src/udev/udev-event.c

   1 /*
   2  * Copyright (C) 2003-2013 Kay Sievers <kay@vrfy.org>
   3  *
   4  * This program is free software: you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation, either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  16  */
  17
  18 #include <stdlib.h>
  19 #include <stdio.h>
  20 #include <stddef.h>
  21 #include <unistd.h>
  22 #include <fcntl.h>
  23 #include <errno.h>
  24 #include <ctype.h>
  25 #include <string.h>
  26 #include <net/if.h>
  27 #include <sys/prctl.h>
  28 #include <poll.h>
  29 #include <sys/epoll.h>
  30 #include <sys/wait.h>
  31 #include <sys/signalfd.h>
  32
  33 #include "rtnl-util.h"
  34 #include "event-util.h"
  35 #include "formats-util.h"
  36 #include "process-util.h"
  37 #include "signal-util.h"
  38 #include "udev.h"
  39
  40 typedef struct Spawn {
  41         const char *cmd;
  42         pid_t pid;
  43         usec_t timeout_warn;
  44         usec_t timeout;
  45         bool accept_failure;
  46 } Spawn;
  47
  48 struct udev_event *udev_event_new(struct udev_device *dev) {
  49         struct udev *udev = udev_device_get_udev(dev);
  50         struct udev_event *event;
  51
  52         event = new0(struct udev_event, 1);
  53         if (event == NULL)
  54                 return NULL;
  55         event->dev = dev;
  56         event->udev = udev;
  57         udev_list_init(udev, &event->run_list, false);
  58         udev_list_init(udev, &event->seclabel_list, false);
  59         event->birth_usec = clock_boottime_or_monotonic();
  60         return event;
  61 }
  62
  63 void udev_event_unref(struct udev_event *event) {
  64         if (event == NULL)
  65                 return;
  66         sd_rtnl_unref(event->rtnl);
  67         udev_list_cleanup(&event->run_list);
  68         udev_list_cleanup(&event->seclabel_list);
  69         free(event->program_result);
  70         free(event->name);
  71         free(event);
  72 }
  73
  74 size_t udev_event_apply_format(struct udev_event *event, const char *src, char *dest, size_t size) {
  75         struct udev_device *dev = event->dev;
  76         enum subst_type {
  77                 SUBST_UNKNOWN,
  78                 SUBST_DEVNODE,
  79                 SUBST_ATTR,
  80                 SUBST_ENV,
  81                 SUBST_KERNEL,
  82                 SUBST_KERNEL_NUMBER,
  83                 SUBST_DRIVER,
  84                 SUBST_DEVPATH,
  85                 SUBST_ID,
  86                 SUBST_MAJOR,
  87                 SUBST_MINOR,
  88                 SUBST_RESULT,
  89                 SUBST_PARENT,
  90                 SUBST_NAME,
  91                 SUBST_LINKS,
  92                 SUBST_ROOT,
  93                 SUBST_SYS,
  94         };
  95         static const struct subst_map {
  96                 const char *name;
  97                 const char fmt;
  98                 enum subst_type type;
  99         } map[] = {
 100                 { .name = "devnode",  .fmt = 'N', .type = SUBST_DEVNODE },
 101                 { .name = "tempnode", .fmt = 'N', .type = SUBST_DEVNODE },
 102                 { .name = "attr",     .fmt = 's', .type = SUBST_ATTR },
 103                 { .name = "sysfs",    .fmt = 's', .type = SUBST_ATTR },
 104                 { .name = "env",      .fmt = 'E', .type = SUBST_ENV },
 105                 { .name = "kernel",   .fmt = 'k', .type = SUBST_KERNEL },
 106                 { .name = "number",   .fmt = 'n', .type = SUBST_KERNEL_NUMBER },
 107                 { .name = "driver",   .fmt = 'd', .type = SUBST_DRIVER },
 108                 { .name = "devpath",  .fmt = 'p', .type = SUBST_DEVPATH },
 109                 { .name = "id",       .fmt = 'b', .type = SUBST_ID },
 110                 { .name = "major",    .fmt = 'M', .type = SUBST_MAJOR },
 111                 { .name = "minor",    .fmt = 'm', .type = SUBST_MINOR },
 112                 { .name = "result",   .fmt = 'c', .type = SUBST_RESULT },
 113                 { .name = "parent",   .fmt = 'P', .type = SUBST_PARENT },
 114                 { .name = "name",     .fmt = 'D', .type = SUBST_NAME },
 115                 { .name = "links",    .fmt = 'L', .type = SUBST_LINKS },
 116                 { .name = "root",     .fmt = 'r', .type = SUBST_ROOT },
 117                 { .name = "sys",      .fmt = 'S', .type = SUBST_SYS },
 118         };
 119         const char *from;
 120         char *s;
 121         size_t l;
 122
 123         assert(dev);
 124
 125         from = src;
 126         s = dest;
 127         l = size;
 128
 129         for (;;) {
 130                 enum subst_type type = SUBST_UNKNOWN;
 131                 char attrbuf[UTIL_PATH_SIZE];
 132                 char *attr = NULL;
 133
 134                 while (from[0] != '\0') {
 135                         if (from[0] == '$') {
 136                                 /* substitute named variable */
 137                                 unsigned int i;
 138
 139                                 if (from[1] == '$') {
 140                                         from++;
 141                                         goto copy;
 142                                 }
 143
 144                                 for (i = 0; i < ELEMENTSOF(map); i++) {
 145                                         if (startswith(&from[1], map[i].name)) {
 146                                                 type = map[i].type;
 147                                                 from += strlen(map[i].name)+1;
 148                                                 goto subst;
 149                                         }
 150                                 }
 151                         } else if (from[0] == '%') {
 152                                 /* substitute format char */
 153                                 unsigned int i;
 154
 155                                 if (from[1] == '%') {
 156                                         from++;
 157                                         goto copy;
 158                                 }
 159
 160                                 for (i = 0; i < ELEMENTSOF(map); i++) {
 161                                         if (from[1] == map[i].fmt) {
 162                                                 type = map[i].type;
 163                                                 from += 2;
 164                                                 goto subst;
 165                                         }
 166                                 }
 167                         }
 168 copy:
 169                         /* copy char */
 170                         if (l == 0)
 171                                 goto out;
 172                         s[0] = from[0];
 173                         from++;
 174                         s++;
 175                         l--;
 176                 }
 177
 178                 goto out;
 179 subst:
 180                 /* extract possible $format{attr} */
 181                 if (from[0] == '{') {
 182                         unsigned int i;
 183
 184                         from++;
 185                         for (i = 0; from[i] != '}'; i++) {
 186                                 if (from[i] == '\0') {
 187                                         log_error("missing closing brace for format '%s'", src);
 188                                         goto out;
 189                                 }
 190                         }
 191                         if (i >= sizeof(attrbuf))
 192                                 goto out;
 193                         memcpy(attrbuf, from, i);
 194                         attrbuf[i] = '\0';
 195                         from += i+1;
 196                         attr = attrbuf;
 197                 } else {
 198                         attr = NULL;
 199                 }
 200
 201                 switch (type) {
 202                 case SUBST_DEVPATH:
 203                         l = strpcpy(&s, l, udev_device_get_devpath(dev));
 204                         break;
 205                 case SUBST_KERNEL:
 206                         l = strpcpy(&s, l, udev_device_get_sysname(dev));
 207                         break;
 208                 case SUBST_KERNEL_NUMBER:
 209                         if (udev_device_get_sysnum(dev) == NULL)
 210                                 break;
 211                         l = strpcpy(&s, l, udev_device_get_sysnum(dev));
 212                         break;
 213                 case SUBST_ID:
 214                         if (event->dev_parent == NULL)
 215                                 break;
 216                         l = strpcpy(&s, l, udev_device_get_sysname(event->dev_parent));
 217                         break;
 218                 case SUBST_DRIVER: {
 219                         const char *driver;
 220
 221                         if (event->dev_parent == NULL)
 222                                 break;
 223
 224                         driver = udev_device_get_driver(event->dev_parent);
 225                         if (driver == NULL)
 226                                 break;
 227                         l = strpcpy(&s, l, driver);
 228                         break;
 229                 }
 230                 case SUBST_MAJOR: {
 231                         char num[UTIL_PATH_SIZE];
 232
 233                         sprintf(num, "%u", major(udev_device_get_devnum(dev)));
 234                         l = strpcpy(&s, l, num);
 235                         break;
 236                 }
 237                 case SUBST_MINOR: {
 238                         char num[UTIL_PATH_SIZE];
 239
 240                         sprintf(num, "%u", minor(udev_device_get_devnum(dev)));
 241                         l = strpcpy(&s, l, num);
 242                         break;
 243                 }
 244                 case SUBST_RESULT: {
 245                         char *rest;
 246                         int i;
 247
 248                         if (event->program_result == NULL)
 249                                 break;
 250                         /* get part part of the result string */
 251                         i = 0;
 252                         if (attr != NULL)
 253                                 i = strtoul(attr, &rest, 10);
 254                         if (i > 0) {
 255                                 char result[UTIL_PATH_SIZE];
 256                                 char tmp[UTIL_PATH_SIZE];
 257                                 char *cpos;
 258
 259                                 strscpy(result, sizeof(result), event->program_result);
 260                                 cpos = result;
 261                                 while (--i) {
 262                                         while (cpos[0] != '\0' && !isspace(cpos[0]))
 263                                                 cpos++;
 264                                         while (isspace(cpos[0]))
 265                                                 cpos++;
 266                                         if (cpos[0] == '\0')
 267                                                 break;
 268                                 }
 269                                 if (i > 0) {
 270                                         log_error("requested part of result string not found");
 271                                         break;
 272                                 }
 273                                 strscpy(tmp, sizeof(tmp), cpos);
 274                                 /* %{2+}c copies the whole string from the second part on */
 275                                 if (rest[0] != '+') {
 276                                         cpos = strchr(tmp, ' ');
 277                                         if (cpos)
 278                                                 cpos[0] = '\0';
 279                                 }
 280                                 l = strpcpy(&s, l, tmp);
 281                         } else {
 282                                 l = strpcpy(&s, l, event->program_result);
 283                         }
 284                         break;
 285                 }
 286                 case SUBST_ATTR: {
 287                         const char *value = NULL;
 288                         char vbuf[UTIL_NAME_SIZE];
 289                         size_t len;
 290                         int count;
 291
 292                         if (attr == NULL) {
 293                                 log_error("missing file parameter for attr");
 294                                 break;
 295                         }
 296
 297                         /* try to read the value specified by "[dmi/id]product_name" */
 298                         if (util_resolve_subsys_kernel(event->udev, attr, vbuf, sizeof(vbuf), 1) == 0)
 299                                 value = vbuf;
 300
 301                         /* try to read the attribute the device */
 302                         if (value == NULL)
 303                                 value = udev_device_get_sysattr_value(event->dev, attr);
 304
 305                         /* try to read the attribute of the parent device, other matches have selected */
 306                         if (value == NULL && event->dev_parent != NULL && event->dev_parent != event->dev)
 307                                 value = udev_device_get_sysattr_value(event->dev_parent, attr);
 308
 309                         if (value == NULL)
 310                                 break;
 311
 312                         /* strip trailing whitespace, and replace unwanted characters */
 313                         if (value != vbuf)
 314                                 strscpy(vbuf, sizeof(vbuf), value);
 315                         len = strlen(vbuf);
 316                         while (len > 0 && isspace(vbuf[--len]))
 317                                 vbuf[len] = '\0';
 318                         count = util_replace_chars(vbuf, UDEV_ALLOWED_CHARS_INPUT);
 319                         if (count > 0)
 320                                 log_debug("%i character(s) replaced" , count);
 321                         l = strpcpy(&s, l, vbuf);
 322                         break;
 323                 }
 324                 case SUBST_PARENT: {
 325                         struct udev_device *dev_parent;
 326                         const char *devnode;
 327
 328                         dev_parent = udev_device_get_parent(event->dev);
 329                         if (dev_parent == NULL)
 330                                 break;
 331                         devnode = udev_device_get_devnode(dev_parent);
 332                         if (devnode != NULL)
 333                                 l = strpcpy(&s, l, devnode + strlen("/dev/"));
 334                         break;
 335                 }
 336                 case SUBST_DEVNODE:
 337                         if (udev_device_get_devnode(dev) != NULL)
 338                                 l = strpcpy(&s, l, udev_device_get_devnode(dev));
 339                         break;
 340                 case SUBST_NAME:
 341                         if (event->name != NULL)
 342                                 l = strpcpy(&s, l, event->name);
 343                         else if (udev_device_get_devnode(dev) != NULL)
 344                                 l = strpcpy(&s, l, udev_device_get_devnode(dev) + strlen("/dev/"));
 345                         else
 346                                 l = strpcpy(&s, l, udev_device_get_sysname(dev));
 347                         break;
 348                 case SUBST_LINKS: {
 349                         struct udev_list_entry *list_entry;
 350
 351                         list_entry = udev_device_get_devlinks_list_entry(dev);
 352                         if (list_entry == NULL)
 353                                 break;
 354                         l = strpcpy(&s, l, udev_list_entry_get_name(list_entry) + strlen("/dev/"));
 355                         udev_list_entry_foreach(list_entry, udev_list_entry_get_next(list_entry))
 356                                 l = strpcpyl(&s, l, " ", udev_list_entry_get_name(list_entry) + strlen("/dev/"), NULL);
 357                         break;
 358                 }
 359                 case SUBST_ROOT:
 360                         l = strpcpy(&s, l, "/dev");
 361                         break;
 362                 case SUBST_SYS:
 363                         l = strpcpy(&s, l, "/sys");
 364                         break;
 365                 case SUBST_ENV:
 366                         if (attr == NULL) {
 367                                 break;
 368                         } else {
 369                                 const char *value;
 370
 371                                 value = udev_device_get_property_value(event->dev, attr);
 372                                 if (value == NULL)
 373                                         break;
 374                                 l = strpcpy(&s, l, value);
 375                                 break;
 376                         }
 377                 default:
 378                         log_error("unknown substitution type=%i", type);
 379                         break;
 380                 }
 381         }
 382
 383 out:
 384         s[0] = '\0';
 385         return l;
 386 }
 387
 388 static int spawn_exec(struct udev_event *event,
 389                       const char *cmd, char *const argv[], char **envp,
 390                       int fd_stdout, int fd_stderr) {
 391         _cleanup_close_ int fd = -1;
 392
 393         /* discard child output or connect to pipe */
 394         fd = open("/dev/null", O_RDWR);
 395         if (fd >= 0) {
 396                 dup2(fd, STDIN_FILENO);
 397                 if (fd_stdout < 0)
 398                         dup2(fd, STDOUT_FILENO);
 399                 if (fd_stderr < 0)
 400                         dup2(fd, STDERR_FILENO);
 401         } else
 402                 log_error_errno(errno, "open /dev/null failed: %m");
 403
 404         /* connect pipes to std{out,err} */
 405         if (fd_stdout >= 0) {
 406                 dup2(fd_stdout, STDOUT_FILENO);
 407                 safe_close(fd_stdout);
 408         }
 409         if (fd_stderr >= 0) {
 410                 dup2(fd_stderr, STDERR_FILENO);
 411                 safe_close(fd_stderr);
 412         }
 413
 414         /* terminate child in case parent goes away */
 415         prctl(PR_SET_PDEATHSIG, SIGTERM);
 416
 417         /* restore sigmask before exec */
 418         (void) reset_signal_mask();
 419
 420         execve(argv[0], argv, envp);
 421
 422         /* exec failed */
 423         log_error_errno(errno, "failed to execute '%s' '%s': %m", argv[0], cmd);
 424
 425         return -errno;
 426 }
 427
 428 static void spawn_read(struct udev_event *event,
 429                        usec_t timeout_usec,
 430                        const char *cmd,
 431                        int fd_stdout, int fd_stderr,
 432                        char *result, size_t ressize) {
 433         _cleanup_close_ int fd_ep = -1;
 434         struct epoll_event ep_outpipe = {
 435                 .events = EPOLLIN,
 436                 .data.ptr = &fd_stdout,
 437         };
 438         struct epoll_event ep_errpipe = {
 439                 .events = EPOLLIN,
 440                 .data.ptr = &fd_stderr,
 441         };
 442         size_t respos = 0;
 443         int r;
 444
 445         /* read from child if requested */
 446         if (fd_stdout < 0 && fd_stderr < 0)
 447                 return;
 448
 449         fd_ep = epoll_create1(EPOLL_CLOEXEC);
 450         if (fd_ep < 0) {
 451                 log_error_errno(errno, "error creating epoll fd: %m");
 452                 return;
 453         }
 454
 455         if (fd_stdout >= 0) {
 456                 r = epoll_ctl(fd_ep, EPOLL_CTL_ADD, fd_stdout, &ep_outpipe);
 457                 if (r < 0) {
 458                         log_error_errno(errno, "fail to add stdout fd to epoll: %m");
 459                         return;
 460                 }
 461         }
 462
 463         if (fd_stderr >= 0) {
 464                 r = epoll_ctl(fd_ep, EPOLL_CTL_ADD, fd_stderr, &ep_errpipe);
 465                 if (r < 0) {
 466                         log_error_errno(errno, "fail to add stderr fd to epoll: %m");
 467                         return;
 468                 }
 469         }
 470
 471         /* read child output */
 472         while (fd_stdout >= 0 || fd_stderr >= 0) {
 473                 int timeout;
 474                 int fdcount;
 475                 struct epoll_event ev[4];
 476                 int i;
 477
 478                 if (timeout_usec > 0) {
 479                         usec_t age_usec;
 480
 481                         age_usec = clock_boottime_or_monotonic() - event->birth_usec;
 482                         if (age_usec >= timeout_usec) {
 483                                 log_error("timeout '%s'", cmd);
 484                                 return;
 485                         }
 486                         timeout = ((timeout_usec - age_usec) / USEC_PER_MSEC) + MSEC_PER_SEC;
 487                 } else {
 488                         timeout = -1;
 489                 }
 490
 491                 fdcount = epoll_wait(fd_ep, ev, ELEMENTSOF(ev), timeout);
 492                 if (fdcount < 0) {
 493                         if (errno == EINTR)
 494                                 continue;
 495                         log_error_errno(errno, "failed to poll: %m");
 496                         return;
 497                 } else if (fdcount == 0) {
 498                         log_error("timeout '%s'", cmd);
 499                         return;
 500                 }
 501
 502                 for (i = 0; i < fdcount; i++) {
 503                         int *fd = (int *)ev[i].data.ptr;
 504
 505                         if (*fd < 0)
 506                                 continue;
 507
 508                         if (ev[i].events & EPOLLIN) {
 509                                 ssize_t count;
 510                                 char buf[4096];
 511
 512                                 count = read(*fd, buf, sizeof(buf)-1);
 513                                 if (count <= 0)
 514                                         continue;
 515                                 buf[count] = '\0';
 516
 517                                 /* store stdout result */
 518                                 if (result != NULL && *fd == fd_stdout) {
 519                                         if (respos + count < ressize) {
 520                                                 memcpy(&result[respos], buf, count);
 521                                                 respos += count;
 522                                         } else {
 523                                                 log_error("'%s' ressize %zu too short", cmd, ressize);
 524                                         }
 525                                 }
 526
 527                                 /* log debug output only if we watch stderr */
 528                                 if (fd_stderr >= 0) {
 529                                         char *pos;
 530                                         char *line;
 531
 532                                         pos = buf;
 533                                         while ((line = strsep(&pos, "\n"))) {
 534                                                 if (pos != NULL || line[0] != '\0')
 535                                                         log_debug("'%s'(%s) '%s'", cmd, *fd == fd_stdout ? "out" : "err" , line);
 536                                         }
 537                                 }
 538                         } else if (ev[i].events & EPOLLHUP) {
 539                                 r = epoll_ctl(fd_ep, EPOLL_CTL_DEL, *fd, NULL);
 540                                 if (r < 0) {
 541                                         log_error_errno(errno, "failed to remove fd from epoll: %m");
 542                                         return;
 543                                 }
 544                                 *fd = -1;
 545                         }
 546                 }
 547         }
 548
 549         /* return the child's stdout string */
 550         if (result != NULL)
 551                 result[respos] = '\0';
 552 }
 553
 554 static int on_spawn_timeout(sd_event_source *s, uint64_t usec, void *userdata) {
 555         Spawn *spawn = userdata;
 556         char timeout[FORMAT_TIMESTAMP_RELATIVE_MAX];
 557
 558         assert(spawn);
 559
 560         kill_and_sigcont(spawn->pid, SIGKILL);
 561
 562         log_error("spawned process '%s' ["PID_FMT"] timed out after %s, killing", spawn->cmd, spawn->pid,
 563                   format_timestamp_relative(timeout, sizeof(timeout), spawn->timeout));
 564
 565         return 1;
 566 }
 567
 568 static int on_spawn_timeout_warning(sd_event_source *s, uint64_t usec, void *userdata) {
 569         Spawn *spawn = userdata;
 570         char timeout[FORMAT_TIMESTAMP_RELATIVE_MAX];
 571
 572         assert(spawn);
 573
 574         log_warning("spawned process '%s' ["PID_FMT"] is taking longer than %s to complete", spawn->cmd, spawn->pid,
 575                     format_timestamp_relative(timeout, sizeof(timeout), spawn->timeout));
 576
 577         return 1;
 578 }
 579
 580 static int on_spawn_sigchld(sd_event_source *s, const siginfo_t *si, void *userdata) {
 581         Spawn *spawn = userdata;
 582
 583         assert(spawn);
 584
 585         switch (si->si_code) {
 586         case CLD_EXITED:
 587                 if (si->si_status == 0) {
 588                         log_debug("Process '%s' succeeded.", spawn->cmd);
 589                         sd_event_exit(sd_event_source_get_event(s), 0);
 590
 591                         return 1;
 592                 } else if (spawn->accept_failure)
 593                         log_debug("Process '%s' failed with exit code %i.", spawn->cmd, si->si_status);
 594                 else
 595                         log_warning("Process '%s' failed with exit code %i.", spawn->cmd, si->si_status);
 596
 597                 break;
 598         case CLD_KILLED:
 599         case CLD_DUMPED:
 600                 log_warning("Process '%s' terminated by signal %s.", spawn->cmd, signal_to_string(si->si_status));
 601
 602                 break;
 603         default:
 604                 log_error("Process '%s' failed due to unknown reason.", spawn->cmd);
 605         }
 606
 607         sd_event_exit(sd_event_source_get_event(s), -EIO);
 608
 609         return 1;
 610 }
 611
 612 static int spawn_wait(struct udev_event *event,
 613                       usec_t timeout_usec,
 614                       usec_t timeout_warn_usec,
 615                       const char *cmd, pid_t pid,
 616                       bool accept_failure) {
 617         Spawn spawn = {
 618                 .cmd = cmd,
 619                 .pid = pid,
 620                 .accept_failure = accept_failure,
 621         };
 622         _cleanup_event_unref_ sd_event *e = NULL;
 623         int r, ret;
 624
 625         r = sd_event_new(&e);
 626         if (r < 0)
 627                 return r;
 628
 629         if (timeout_usec > 0) {
 630                 usec_t usec, age_usec;
 631
 632                 usec = now(clock_boottime_or_monotonic());
 633                 age_usec = usec - event->birth_usec;
 634                 if (age_usec < timeout_usec) {
 635                         if (timeout_warn_usec > 0 && timeout_warn_usec < timeout_usec && age_usec < timeout_warn_usec) {
 636                                 spawn.timeout_warn = timeout_warn_usec - age_usec;
 637
 638                                 r = sd_event_add_time(e, NULL, clock_boottime_or_monotonic(),
 639                                                       usec + spawn.timeout_warn, USEC_PER_SEC,
 640                                                       on_spawn_timeout_warning, &spawn);
 641                                 if (r < 0)
 642                                         return r;
 643                         }
 644
 645                         spawn.timeout = timeout_usec - age_usec;
 646
 647                         r = sd_event_add_time(e, NULL, clock_boottime_or_monotonic(),
 648                                               usec + spawn.timeout, USEC_PER_SEC, on_spawn_timeout, &spawn);
 649                         if (r < 0)
 650                                 return r;
 651                 }
 652         }
 653
 654         r = sd_event_add_child(e, NULL, pid, WEXITED, on_spawn_sigchld, &spawn);
 655         if (r < 0)
 656                 return r;
 657
 658         r = sd_event_loop(e);
 659         if (r < 0)
 660                 return r;
 661
 662         r = sd_event_get_exit_code(e, &ret);
 663         if (r < 0)
 664                 return r;
 665
 666         return ret;
 667 }
 668
 669 int udev_build_argv(struct udev *udev, char *cmd, int *argc, char *argv[]) {
 670         int i = 0;
 671         char *pos;
 672
 673         if (strchr(cmd, ' ') == NULL) {
 674                 argv[i++] = cmd;
 675                 goto out;
 676         }
 677
 678         pos = cmd;
 679         while (pos != NULL && pos[0] != '\0') {
 680                 if (pos[0] == '\'') {
 681                         /* do not separate quotes */
 682                         pos++;
 683                         argv[i] = strsep(&pos, "\'");
 684                         if (pos != NULL)
 685                                 while (pos[0] == ' ')
 686                                         pos++;
 687                 } else {
 688                         argv[i] = strsep(&pos, " ");
 689                         if (pos != NULL)
 690                                 while (pos[0] == ' ')
 691                                         pos++;
 692                 }
 693                 i++;
 694         }
 695 out:
 696         argv[i] = NULL;
 697         if (argc)
 698                 *argc = i;
 699         return 0;
 700 }
 701
 702 int udev_event_spawn(struct udev_event *event,
 703                      usec_t timeout_usec,
 704                      usec_t timeout_warn_usec,
 705                      bool accept_failure,
 706                      const char *cmd, char **envp,
 707                      char *result, size_t ressize) {
 708         int outpipe[2] = {-1, -1};
 709         int errpipe[2] = {-1, -1};
 710         pid_t pid;
 711         char arg[UTIL_PATH_SIZE];
 712         char *argv[128];
 713         char program[UTIL_PATH_SIZE];
 714         int err = 0;
 715
 716         strscpy(arg, sizeof(arg), cmd);
 717         udev_build_argv(event->udev, arg, NULL, argv);
 718
 719         /* pipes from child to parent */
 720         if (result != NULL || log_get_max_level() >= LOG_INFO) {
 721                 if (pipe2(outpipe, O_NONBLOCK) != 0) {
 722                         err = -errno;
 723                         log_error_errno(errno, "pipe failed: %m");
 724                         goto out;
 725                 }
 726         }
 727         if (log_get_max_level() >= LOG_INFO) {
 728                 if (pipe2(errpipe, O_NONBLOCK) != 0) {
 729                         err = -errno;
 730                         log_error_errno(errno, "pipe failed: %m");
 731                         goto out;
 732                 }
 733         }
 734
 735         /* allow programs in /usr/lib/udev/ to be called without the path */
 736         if (argv[0][0] != '/') {
 737                 strscpyl(program, sizeof(program), UDEVLIBEXECDIR "/", argv[0], NULL);
 738                 argv[0] = program;
 739         }
 740
 741         pid = fork();
 742         switch(pid) {
 743         case 0:
 744                 /* child closes parent's ends of pipes */
 745                 if (outpipe[READ_END] >= 0) {
 746                         close(outpipe[READ_END]);
 747                         outpipe[READ_END] = -1;
 748                 }
 749                 if (errpipe[READ_END] >= 0) {
 750                         close(errpipe[READ_END]);
 751                         errpipe[READ_END] = -1;
 752                 }
 753
 754                 log_debug("starting '%s'", cmd);
 755
 756                 spawn_exec(event, cmd, argv, envp,
 757                            outpipe[WRITE_END], errpipe[WRITE_END]);
 758
 759                 _exit(2 );
 760         case -1:
 761                 log_error_errno(errno, "fork of '%s' failed: %m", cmd);
 762                 err = -1;
 763                 goto out;
 764         default:
 765                 /* parent closed child's ends of pipes */
 766                 if (outpipe[WRITE_END] >= 0) {
 767                         close(outpipe[WRITE_END]);
 768                         outpipe[WRITE_END] = -1;
 769                 }
 770                 if (errpipe[WRITE_END] >= 0) {
 771                         close(errpipe[WRITE_END]);
 772                         errpipe[WRITE_END] = -1;
 773                 }
 774
 775                 spawn_read(event,
 776                            timeout_usec,
 777                            cmd,
 778                            outpipe[READ_END], errpipe[READ_END],
 779                            result, ressize);
 780
 781                 err = spawn_wait(event, timeout_usec, timeout_warn_usec, cmd, pid, accept_failure);
 782         }
 783
 784 out:
 785         if (outpipe[READ_END] >= 0)
 786                 close(outpipe[READ_END]);
 787         if (outpipe[WRITE_END] >= 0)
 788                 close(outpipe[WRITE_END]);
 789         if (errpipe[READ_END] >= 0)
 790                 close(errpipe[READ_END]);
 791         if (errpipe[WRITE_END] >= 0)
 792                 close(errpipe[WRITE_END]);
 793         return err;
 794 }
 795
 796 static int rename_netif(struct udev_event *event) {
 797         struct udev_device *dev = event->dev;
 798         char name[IFNAMSIZ];
 799         const char *oldname;
 800         int r;
 801
 802         oldname = udev_device_get_sysname(dev);
 803
 804         strscpy(name, IFNAMSIZ, event->name);
 805
 806         r = rtnl_set_link_name(&event->rtnl, udev_device_get_ifindex(dev), name);
 807         if (r < 0)
 808                 return log_error_errno(r, "Error changing net interface name '%s' to '%s': %m", oldname, name);
 809
 810         log_debug("renamed network interface '%s' to '%s'", oldname, name);
 811
 812         return 0;
 813 }
 814
 815 void udev_event_execute_rules(struct udev_event *event,
 816                               usec_t timeout_usec, usec_t timeout_warn_usec,
 817                               struct udev_list *properties_list,
 818                               struct udev_rules *rules) {
 819         struct udev_device *dev = event->dev;
 820
 821         if (udev_device_get_subsystem(dev) == NULL)
 822                 return;
 823
 824         if (streq(udev_device_get_action(dev), "remove")) {
 825                 udev_device_read_db(dev);
 826                 udev_device_tag_index(dev, NULL, false);
 827                 udev_device_delete_db(dev);
 828
 829                 if (major(udev_device_get_devnum(dev)) != 0)
 830                         udev_watch_end(event->udev, dev);
 831
 832                 udev_rules_apply_to_event(rules, event,
 833                                           timeout_usec, timeout_warn_usec,
 834                                           properties_list);
 835
 836                 if (major(udev_device_get_devnum(dev)) != 0)
 837                         udev_node_remove(dev);
 838         } else {
 839                 event->dev_db = udev_device_clone_with_db(dev);
 840                 if (event->dev_db != NULL) {
 841                         /* disable watch during event processing */
 842                         if (major(udev_device_get_devnum(dev)) != 0)
 843                                 udev_watch_end(event->udev, event->dev_db);
 844                 }
 845
 846                 if (major(udev_device_get_devnum(dev)) == 0 &&
 847                     streq(udev_device_get_action(dev), "move"))
 848                         udev_device_copy_properties(dev, event->dev_db);
 849
 850                 udev_rules_apply_to_event(rules, event,
 851                                           timeout_usec, timeout_warn_usec,
 852                                           properties_list);
 853
 854                 /* rename a new network interface, if needed */
 855                 if (udev_device_get_ifindex(dev) > 0 && streq(udev_device_get_action(dev), "add") &&
 856                     event->name != NULL && !streq(event->name, udev_device_get_sysname(dev))) {
 857                         int r;
 858
 859                         r = rename_netif(event);
 860                         if (r < 0)
 861                                 log_warning_errno(r, "could not rename interface '%d' from '%s' to '%s': %m", udev_device_get_ifindex(dev),
 862                                                   udev_device_get_sysname(dev), event->name);
 863                         else {
 864                                 r = udev_device_rename(dev, event->name);
 865                                 if (r < 0)
 866                                         log_warning_errno(r, "renamed interface '%d' from '%s' to '%s', but could not update udev_device: %m",
 867                                                           udev_device_get_ifindex(dev), udev_device_get_sysname(dev), event->name);
 868                                 else
 869                                         log_debug("changed devpath to '%s'", udev_device_get_devpath(dev));
 870                         }
 871                 }
 872
 873                 if (major(udev_device_get_devnum(dev)) > 0) {
 874                         bool apply;
 875
 876                         /* remove/update possible left-over symlinks from old database entry */
 877                         if (event->dev_db != NULL)
 878                                 udev_node_update_old_links(dev, event->dev_db);
 879
 880                         if (!event->owner_set)
 881                                 event->uid = udev_device_get_devnode_uid(dev);
 882
 883                         if (!event->group_set)
 884                                 event->gid = udev_device_get_devnode_gid(dev);
 885
 886                         if (!event->mode_set) {
 887                                 if (udev_device_get_devnode_mode(dev) > 0) {
 888                                         /* kernel supplied value */
 889                                         event->mode = udev_device_get_devnode_mode(dev);
 890                                 } else if (event->gid > 0) {
 891                                         /* default 0660 if a group is assigned */
 892                                         event->mode = 0660;
 893                                 } else {
 894                                         /* default 0600 */
 895                                         event->mode = 0600;
 896                                 }
 897                         }
 898
 899                         apply = streq(udev_device_get_action(dev), "add") || event->owner_set || event->group_set || event->mode_set;
 900                         udev_node_add(dev, apply, event->mode, event->uid, event->gid, &event->seclabel_list);
 901                 }
 902
 903                 /* preserve old, or get new initialization timestamp */
 904                 udev_device_ensure_usec_initialized(event->dev, event->dev_db);
 905
 906                 /* (re)write database file */
 907                 udev_device_tag_index(dev, event->dev_db, true);
 908                 udev_device_update_db(dev);
 909                 udev_device_set_is_initialized(dev);
 910
 911                 event->dev_db = udev_device_unref(event->dev_db);
 912         }
 913 }
 914
 915 void udev_event_execute_run(struct udev_event *event, usec_t timeout_usec, usec_t timeout_warn_usec) {
 916         struct udev_list_entry *list_entry;
 917
 918         udev_list_entry_foreach(list_entry, udev_list_get_entry(&event->run_list)) {
 919                 const char *cmd = udev_list_entry_get_name(list_entry);
 920                 enum udev_builtin_cmd builtin_cmd = udev_list_entry_get_num(list_entry);
 921
 922                 if (builtin_cmd < UDEV_BUILTIN_MAX) {
 923                         char command[UTIL_PATH_SIZE];
 924
 925                         udev_event_apply_format(event, cmd, command, sizeof(command));
 926                         udev_builtin_run(event->dev, builtin_cmd, command, false);
 927                 } else {
 928                         char program[UTIL_PATH_SIZE];
 929                         char **envp;
 930
 931                         if (event->exec_delay > 0) {
 932                                 log_debug("delay execution of '%s'", program);
 933                                 sleep(event->exec_delay);
 934                         }
 935
 936                         udev_event_apply_format(event, cmd, program, sizeof(program));
 937                         envp = udev_device_get_properties_envp(event->dev);
 938                         udev_event_spawn(event, timeout_usec, timeout_warn_usec, false, program, envp, NULL, 0);
 939                 }
 940         }
 941 }