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 } Spawn;
  46
  47 struct udev_event *udev_event_new(struct udev_device *dev) {
  48         struct udev *udev = udev_device_get_udev(dev);
  49         struct udev_event *event;
  50
  51         event = new0(struct udev_event, 1);
  52         if (event == NULL)
  53                 return NULL;
  54         event->dev = dev;
  55         event->udev = udev;
  56         udev_list_init(udev, &event->run_list, false);
  57         udev_list_init(udev, &event->seclabel_list, false);
  58         event->birth_usec = clock_boottime_or_monotonic();
  59         return event;
  60 }
  61
  62 void udev_event_unref(struct udev_event *event) {
  63         if (event == NULL)
  64                 return;
  65         sd_rtnl_unref(event->rtnl);
  66         udev_list_cleanup(&event->run_list);
  67         udev_list_cleanup(&event->seclabel_list);
  68         free(event->program_result);
  69         free(event->name);
  70         free(event);
  71 }
  72
  73 size_t udev_event_apply_format(struct udev_event *event, const char *src, char *dest, size_t size) {
  74         struct udev_device *dev = event->dev;
  75         enum subst_type {
  76                 SUBST_UNKNOWN,
  77                 SUBST_DEVNODE,
  78                 SUBST_ATTR,
  79                 SUBST_ENV,
  80                 SUBST_KERNEL,
  81                 SUBST_KERNEL_NUMBER,
  82                 SUBST_DRIVER,
  83                 SUBST_DEVPATH,
  84                 SUBST_ID,
  85                 SUBST_MAJOR,
  86                 SUBST_MINOR,
  87                 SUBST_RESULT,
  88                 SUBST_PARENT,
  89                 SUBST_NAME,
  90                 SUBST_LINKS,
  91                 SUBST_ROOT,
  92                 SUBST_SYS,
  93         };
  94         static const struct subst_map {
  95                 const char *name;
  96                 const char fmt;
  97                 enum subst_type type;
  98         } map[] = {
  99                 { .name = "devnode",  .fmt = 'N', .type = SUBST_DEVNODE },
 100                 { .name = "tempnode", .fmt = 'N', .type = SUBST_DEVNODE },
 101                 { .name = "attr",     .fmt = 's', .type = SUBST_ATTR },
 102                 { .name = "sysfs",    .fmt = 's', .type = SUBST_ATTR },
 103                 { .name = "env",      .fmt = 'E', .type = SUBST_ENV },
 104                 { .name = "kernel",   .fmt = 'k', .type = SUBST_KERNEL },
 105                 { .name = "number",   .fmt = 'n', .type = SUBST_KERNEL_NUMBER },
 106                 { .name = "driver",   .fmt = 'd', .type = SUBST_DRIVER },
 107                 { .name = "devpath",  .fmt = 'p', .type = SUBST_DEVPATH },
 108                 { .name = "id",       .fmt = 'b', .type = SUBST_ID },
 109                 { .name = "major",    .fmt = 'M', .type = SUBST_MAJOR },
 110                 { .name = "minor",    .fmt = 'm', .type = SUBST_MINOR },
 111                 { .name = "result",   .fmt = 'c', .type = SUBST_RESULT },
 112                 { .name = "parent",   .fmt = 'P', .type = SUBST_PARENT },
 113                 { .name = "name",     .fmt = 'D', .type = SUBST_NAME },
 114                 { .name = "links",    .fmt = 'L', .type = SUBST_LINKS },
 115                 { .name = "root",     .fmt = 'r', .type = SUBST_ROOT },
 116                 { .name = "sys",      .fmt = 'S', .type = SUBST_SYS },
 117         };
 118         const char *from;
 119         char *s;
 120         size_t l;
 121
 122         assert(dev);
 123
 124         from = src;
 125         s = dest;
 126         l = size;
 127
 128         for (;;) {
 129                 enum subst_type type = SUBST_UNKNOWN;
 130                 char attrbuf[UTIL_PATH_SIZE];
 131                 char *attr = NULL;
 132
 133                 while (from[0] != '\0') {
 134                         if (from[0] == '$') {
 135                                 /* substitute named variable */
 136                                 unsigned int i;
 137
 138                                 if (from[1] == '$') {
 139                                         from++;
 140                                         goto copy;
 141                                 }
 142
 143                                 for (i = 0; i < ELEMENTSOF(map); i++) {
 144                                         if (startswith(&from[1], map[i].name)) {
 145                                                 type = map[i].type;
 146                                                 from += strlen(map[i].name)+1;
 147                                                 goto subst;
 148                                         }
 149                                 }
 150                         } else if (from[0] == '%') {
 151                                 /* substitute format char */
 152                                 unsigned int i;
 153
 154                                 if (from[1] == '%') {
 155                                         from++;
 156                                         goto copy;
 157                                 }
 158
 159                                 for (i = 0; i < ELEMENTSOF(map); i++) {
 160                                         if (from[1] == map[i].fmt) {
 161                                                 type = map[i].type;
 162                                                 from += 2;
 163                                                 goto subst;
 164                                         }
 165                                 }
 166                         }
 167 copy:
 168                         /* copy char */
 169                         if (l == 0)
 170                                 goto out;
 171                         s[0] = from[0];
 172                         from++;
 173                         s++;
 174                         l--;
 175                 }
 176
 177                 goto out;
 178 subst:
 179                 /* extract possible $format{attr} */
 180                 if (from[0] == '{') {
 181                         unsigned int i;
 182
 183                         from++;
 184                         for (i = 0; from[i] != '}'; i++) {
 185                                 if (from[i] == '\0') {
 186                                         log_error("missing closing brace for format '%s'", src);
 187                                         goto out;
 188                                 }
 189                         }
 190                         if (i >= sizeof(attrbuf))
 191                                 goto out;
 192                         memcpy(attrbuf, from, i);
 193                         attrbuf[i] = '\0';
 194                         from += i+1;
 195                         attr = attrbuf;
 196                 } else {
 197                         attr = NULL;
 198                 }
 199
 200                 switch (type) {
 201                 case SUBST_DEVPATH:
 202                         l = strpcpy(&s, l, udev_device_get_devpath(dev));
 203                         break;
 204                 case SUBST_KERNEL:
 205                         l = strpcpy(&s, l, udev_device_get_sysname(dev));
 206                         break;
 207                 case SUBST_KERNEL_NUMBER:
 208                         if (udev_device_get_sysnum(dev) == NULL)
 209                                 break;
 210                         l = strpcpy(&s, l, udev_device_get_sysnum(dev));
 211                         break;
 212                 case SUBST_ID:
 213                         if (event->dev_parent == NULL)
 214                                 break;
 215                         l = strpcpy(&s, l, udev_device_get_sysname(event->dev_parent));
 216                         break;
 217                 case SUBST_DRIVER: {
 218                         const char *driver;
 219
 220                         if (event->dev_parent == NULL)
 221                                 break;
 222
 223                         driver = udev_device_get_driver(event->dev_parent);
 224                         if (driver == NULL)
 225                                 break;
 226                         l = strpcpy(&s, l, driver);
 227                         break;
 228                 }
 229                 case SUBST_MAJOR: {
 230                         char num[UTIL_PATH_SIZE];
 231
 232                         sprintf(num, "%u", major(udev_device_get_devnum(dev)));
 233                         l = strpcpy(&s, l, num);
 234                         break;
 235                 }
 236                 case SUBST_MINOR: {
 237                         char num[UTIL_PATH_SIZE];
 238
 239                         sprintf(num, "%u", minor(udev_device_get_devnum(dev)));
 240                         l = strpcpy(&s, l, num);
 241                         break;
 242                 }
 243                 case SUBST_RESULT: {
 244                         char *rest;
 245                         int i;
 246
 247                         if (event->program_result == NULL)
 248                                 break;
 249                         /* get part part of the result string */
 250                         i = 0;
 251                         if (attr != NULL)
 252                                 i = strtoul(attr, &rest, 10);
 253                         if (i > 0) {
 254                                 char result[UTIL_PATH_SIZE];
 255                                 char tmp[UTIL_PATH_SIZE];
 256                                 char *cpos;
 257
 258                                 strscpy(result, sizeof(result), event->program_result);
 259                                 cpos = result;
 260                                 while (--i) {
 261                                         while (cpos[0] != '\0' && !isspace(cpos[0]))
 262                                                 cpos++;
 263                                         while (isspace(cpos[0]))
 264                                                 cpos++;
 265                                         if (cpos[0] == '\0')
 266                                                 break;
 267                                 }
 268                                 if (i > 0) {
 269                                         log_error("requested part of result string not found");
 270                                         break;
 271                                 }
 272                                 strscpy(tmp, sizeof(tmp), cpos);
 273                                 /* %{2+}c copies the whole string from the second part on */
 274                                 if (rest[0] != '+') {
 275                                         cpos = strchr(tmp, ' ');
 276                                         if (cpos)
 277                                                 cpos[0] = '\0';
 278                                 }
 279                                 l = strpcpy(&s, l, tmp);
 280                         } else {
 281                                 l = strpcpy(&s, l, event->program_result);
 282                         }
 283                         break;
 284                 }
 285                 case SUBST_ATTR: {
 286                         const char *value = NULL;
 287                         char vbuf[UTIL_NAME_SIZE];
 288                         size_t len;
 289                         int count;
 290
 291                         if (attr == NULL) {
 292                                 log_error("missing file parameter for attr");
 293                                 break;
 294                         }
 295
 296                         /* try to read the value specified by "[dmi/id]product_name" */
 297                         if (util_resolve_subsys_kernel(event->udev, attr, vbuf, sizeof(vbuf), 1) == 0)
 298                                 value = vbuf;
 299
 300                         /* try to read the attribute the device */
 301                         if (value == NULL)
 302                                 value = udev_device_get_sysattr_value(event->dev, attr);
 303
 304                         /* try to read the attribute of the parent device, other matches have selected */
 305                         if (value == NULL && event->dev_parent != NULL && event->dev_parent != event->dev)
 306                                 value = udev_device_get_sysattr_value(event->dev_parent, attr);
 307
 308                         if (value == NULL)
 309                                 break;
 310
 311                         /* strip trailing whitespace, and replace unwanted characters */
 312                         if (value != vbuf)
 313                                 strscpy(vbuf, sizeof(vbuf), value);
 314                         len = strlen(vbuf);
 315                         while (len > 0 && isspace(vbuf[--len]))
 316                                 vbuf[len] = '\0';
 317                         count = util_replace_chars(vbuf, UDEV_ALLOWED_CHARS_INPUT);
 318                         if (count > 0)
 319                                 log_debug("%i character(s) replaced" , count);
 320                         l = strpcpy(&s, l, vbuf);
 321                         break;
 322                 }
 323                 case SUBST_PARENT: {
 324                         struct udev_device *dev_parent;
 325                         const char *devnode;
 326
 327                         dev_parent = udev_device_get_parent(event->dev);
 328                         if (dev_parent == NULL)
 329                                 break;
 330                         devnode = udev_device_get_devnode(dev_parent);
 331                         if (devnode != NULL)
 332                                 l = strpcpy(&s, l, devnode + strlen("/dev/"));
 333                         break;
 334                 }
 335                 case SUBST_DEVNODE:
 336                         if (udev_device_get_devnode(dev) != NULL)
 337                                 l = strpcpy(&s, l, udev_device_get_devnode(dev));
 338                         break;
 339                 case SUBST_NAME:
 340                         if (event->name != NULL)
 341                                 l = strpcpy(&s, l, event->name);
 342                         else if (udev_device_get_devnode(dev) != NULL)
 343                                 l = strpcpy(&s, l, udev_device_get_devnode(dev) + strlen("/dev/"));
 344                         else
 345                                 l = strpcpy(&s, l, udev_device_get_sysname(dev));
 346                         break;
 347                 case SUBST_LINKS: {
 348                         struct udev_list_entry *list_entry;
 349
 350                         list_entry = udev_device_get_devlinks_list_entry(dev);
 351                         if (list_entry == NULL)
 352                                 break;
 353                         l = strpcpy(&s, l, udev_list_entry_get_name(list_entry) + strlen("/dev/"));
 354                         udev_list_entry_foreach(list_entry, udev_list_entry_get_next(list_entry))
 355                                 l = strpcpyl(&s, l, " ", udev_list_entry_get_name(list_entry) + strlen("/dev/"), NULL);
 356                         break;
 357                 }
 358                 case SUBST_ROOT:
 359                         l = strpcpy(&s, l, "/dev");
 360                         break;
 361                 case SUBST_SYS:
 362                         l = strpcpy(&s, l, "/sys");
 363                         break;
 364                 case SUBST_ENV:
 365                         if (attr == NULL) {
 366                                 break;
 367                         } else {
 368                                 const char *value;
 369
 370                                 value = udev_device_get_property_value(event->dev, attr);
 371                                 if (value == NULL)
 372                                         break;
 373                                 l = strpcpy(&s, l, value);
 374                                 break;
 375                         }
 376                 default:
 377                         log_error("unknown substitution type=%i", type);
 378                         break;
 379                 }
 380         }
 381
 382 out:
 383         s[0] = '\0';
 384         return l;
 385 }
 386
 387 static int spawn_exec(struct udev_event *event,
 388                       const char *cmd, char *const argv[], char **envp, const sigset_t *sigmask,
 389                       int fd_stdout, int fd_stderr) {
 390         _cleanup_close_ int fd = -1;
 391
 392         /* discard child output or connect to pipe */
 393         fd = open("/dev/null", O_RDWR);
 394         if (fd >= 0) {
 395                 dup2(fd, STDIN_FILENO);
 396                 if (fd_stdout < 0)
 397                         dup2(fd, STDOUT_FILENO);
 398                 if (fd_stderr < 0)
 399                         dup2(fd, STDERR_FILENO);
 400         } else
 401                 log_error_errno(errno, "open /dev/null failed: %m");
 402
 403         /* connect pipes to std{out,err} */
 404         if (fd_stdout >= 0) {
 405                 dup2(fd_stdout, STDOUT_FILENO);
 406                 safe_close(fd_stdout);
 407         }
 408         if (fd_stderr >= 0) {
 409                 dup2(fd_stderr, STDERR_FILENO);
 410                 safe_close(fd_stderr);
 411         }
 412
 413         /* terminate child in case parent goes away */
 414         prctl(PR_SET_PDEATHSIG, SIGTERM);
 415
 416         /* restore original udev sigmask before exec */
 417         if (sigmask)
 418                 sigprocmask(SIG_SETMASK, sigmask, NULL);
 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_warning("process '%s' failed with exit code %i.", spawn->cmd, si->si_status);
 589                 else {
 590                         log_debug("process '%s' succeeded.", spawn->cmd);
 591                         sd_event_exit(sd_event_source_get_event(s), 0);
 592
 593                         return 1;
 594                 }
 595
 596                 break;
 597         case CLD_KILLED:
 598         case CLD_DUMPED:
 599                 log_warning("process '%s' terminated by signal %s.", spawn->cmd, signal_to_string(si->si_status));
 600
 601                 break;
 602         default:
 603                 log_error("process '%s' failed due to unknown reason.", spawn->cmd);
 604         }
 605
 606         sd_event_exit(sd_event_source_get_event(s), -EIO);
 607
 608         return 1;
 609 }
 610
 611 static int spawn_wait(struct udev_event *event,
 612                       usec_t timeout_usec,
 613                       usec_t timeout_warn_usec,
 614                       const char *cmd, pid_t pid) {
 615         Spawn spawn = {
 616                 .cmd = cmd,
 617                 .pid = pid,
 618         };
 619         _cleanup_event_unref_ sd_event *e = NULL;
 620         int r, ret;
 621
 622         r = sd_event_new(&e);
 623         if (r < 0)
 624                 return r;
 625
 626         if (timeout_usec > 0) {
 627                 usec_t usec, age_usec;
 628
 629                 usec = now(clock_boottime_or_monotonic());
 630                 age_usec = usec - event->birth_usec;
 631                 if (age_usec < timeout_usec) {
 632                         if (timeout_warn_usec > 0 && timeout_warn_usec < timeout_usec && age_usec < timeout_warn_usec) {
 633                                 spawn.timeout_warn = timeout_warn_usec - age_usec;
 634
 635                                 r =  sd_event_add_time(e, NULL, clock_boottime_or_monotonic(),
 636                                                        usec + spawn.timeout_warn, USEC_PER_SEC,
 637                                                        on_spawn_timeout_warning, &spawn);
 638                                 if (r < 0)
 639                                         return r;
 640                         }
 641
 642                         spawn.timeout = timeout_usec - age_usec;
 643
 644                         r = sd_event_add_time(e, NULL, clock_boottime_or_monotonic(),
 645                                               usec + spawn.timeout, USEC_PER_SEC, on_spawn_timeout, &spawn);
 646                         if (r < 0)
 647                                 return r;
 648                 }
 649         }
 650
 651         r = sd_event_add_child(e, NULL, pid, WEXITED, on_spawn_sigchld, &spawn);
 652         if (r < 0)
 653                 return r;
 654
 655         r = sd_event_loop(e);
 656         if (r < 0)
 657                 return r;
 658
 659         r = sd_event_get_exit_code(e, &ret);
 660         if (r < 0)
 661                 return r;
 662
 663         return ret;
 664 }
 665
 666 int udev_build_argv(struct udev *udev, char *cmd, int *argc, char *argv[]) {
 667         int i = 0;
 668         char *pos;
 669
 670         if (strchr(cmd, ' ') == NULL) {
 671                 argv[i++] = cmd;
 672                 goto out;
 673         }
 674
 675         pos = cmd;
 676         while (pos != NULL && pos[0] != '\0') {
 677                 if (pos[0] == '\'') {
 678                         /* do not separate quotes */
 679                         pos++;
 680                         argv[i] = strsep(&pos, "\'");
 681                         if (pos != NULL)
 682                                 while (pos[0] == ' ')
 683                                         pos++;
 684                 } else {
 685                         argv[i] = strsep(&pos, " ");
 686                         if (pos != NULL)
 687                                 while (pos[0] == ' ')
 688                                         pos++;
 689                 }
 690                 i++;
 691         }
 692 out:
 693         argv[i] = NULL;
 694         if (argc)
 695                 *argc = i;
 696         return 0;
 697 }
 698
 699 int udev_event_spawn(struct udev_event *event,
 700                      usec_t timeout_usec,
 701                      usec_t timeout_warn_usec,
 702                      const char *cmd, char **envp, const sigset_t *sigmask,
 703                      char *result, size_t ressize) {
 704         int outpipe[2] = {-1, -1};
 705         int errpipe[2] = {-1, -1};
 706         pid_t pid;
 707         char arg[UTIL_PATH_SIZE];
 708         char *argv[128];
 709         char program[UTIL_PATH_SIZE];
 710         int err = 0;
 711
 712         strscpy(arg, sizeof(arg), cmd);
 713         udev_build_argv(event->udev, arg, NULL, argv);
 714
 715         /* pipes from child to parent */
 716         if (result != NULL || log_get_max_level() >= LOG_INFO) {
 717                 if (pipe2(outpipe, O_NONBLOCK) != 0) {
 718                         err = -errno;
 719                         log_error_errno(errno, "pipe failed: %m");
 720                         goto out;
 721                 }
 722         }
 723         if (log_get_max_level() >= LOG_INFO) {
 724                 if (pipe2(errpipe, O_NONBLOCK) != 0) {
 725                         err = -errno;
 726                         log_error_errno(errno, "pipe failed: %m");
 727                         goto out;
 728                 }
 729         }
 730
 731         /* allow programs in /usr/lib/udev/ to be called without the path */
 732         if (argv[0][0] != '/') {
 733                 strscpyl(program, sizeof(program), UDEVLIBEXECDIR "/", argv[0], NULL);
 734                 argv[0] = program;
 735         }
 736
 737         pid = fork();
 738         switch(pid) {
 739         case 0:
 740                 /* child closes parent's ends of pipes */
 741                 if (outpipe[READ_END] >= 0) {
 742                         close(outpipe[READ_END]);
 743                         outpipe[READ_END] = -1;
 744                 }
 745                 if (errpipe[READ_END] >= 0) {
 746                         close(errpipe[READ_END]);
 747                         errpipe[READ_END] = -1;
 748                 }
 749
 750                 log_debug("starting '%s'", cmd);
 751
 752                 spawn_exec(event, cmd, argv, envp, sigmask,
 753                            outpipe[WRITE_END], errpipe[WRITE_END]);
 754
 755                 _exit(2 );
 756         case -1:
 757                 log_error_errno(errno, "fork of '%s' failed: %m", cmd);
 758                 err = -1;
 759                 goto out;
 760         default:
 761                 /* parent closed child's ends of pipes */
 762                 if (outpipe[WRITE_END] >= 0) {
 763                         close(outpipe[WRITE_END]);
 764                         outpipe[WRITE_END] = -1;
 765                 }
 766                 if (errpipe[WRITE_END] >= 0) {
 767                         close(errpipe[WRITE_END]);
 768                         errpipe[WRITE_END] = -1;
 769                 }
 770
 771                 spawn_read(event,
 772                            timeout_usec,
 773                            cmd,
 774                            outpipe[READ_END], errpipe[READ_END],
 775                            result, ressize);
 776
 777                 err = spawn_wait(event, timeout_usec, timeout_warn_usec, cmd, pid);
 778         }
 779
 780 out:
 781         if (outpipe[READ_END] >= 0)
 782                 close(outpipe[READ_END]);
 783         if (outpipe[WRITE_END] >= 0)
 784                 close(outpipe[WRITE_END]);
 785         if (errpipe[READ_END] >= 0)
 786                 close(errpipe[READ_END]);
 787         if (errpipe[WRITE_END] >= 0)
 788                 close(errpipe[WRITE_END]);
 789         return err;
 790 }
 791
 792 static int rename_netif(struct udev_event *event) {
 793         struct udev_device *dev = event->dev;
 794         char name[IFNAMSIZ];
 795         const char *oldname;
 796         int r;
 797
 798         oldname = udev_device_get_sysname(dev);
 799
 800         strscpy(name, IFNAMSIZ, event->name);
 801
 802         r = rtnl_set_link_name(&event->rtnl, udev_device_get_ifindex(dev), name);
 803         if (r < 0)
 804                 return log_error_errno(r, "Error changing net interface name '%s' to '%s': %m", oldname, name);
 805
 806         log_debug("renamed network interface '%s' to '%s'", oldname, name);
 807
 808         return 0;
 809 }
 810
 811 void udev_event_execute_rules(struct udev_event *event,
 812                               usec_t timeout_usec, usec_t timeout_warn_usec,
 813                               struct udev_list *properties_list,
 814                               struct udev_rules *rules,
 815                               const sigset_t *sigmask) {
 816         struct udev_device *dev = event->dev;
 817
 818         if (udev_device_get_subsystem(dev) == NULL)
 819                 return;
 820
 821         if (streq(udev_device_get_action(dev), "remove")) {
 822                 udev_device_read_db(dev);
 823                 udev_device_tag_index(dev, NULL, false);
 824                 udev_device_delete_db(dev);
 825
 826                 if (major(udev_device_get_devnum(dev)) != 0)
 827                         udev_watch_end(event->udev, dev);
 828
 829                 udev_rules_apply_to_event(rules, event,
 830                                           timeout_usec, timeout_warn_usec,
 831                                           properties_list,
 832                                           sigmask);
 833
 834                 if (major(udev_device_get_devnum(dev)) != 0)
 835                         udev_node_remove(dev);
 836         } else {
 837                 event->dev_db = udev_device_clone_with_db(dev);
 838                 if (event->dev_db != NULL) {
 839                         /* disable watch during event processing */
 840                         if (major(udev_device_get_devnum(dev)) != 0)
 841                                 udev_watch_end(event->udev, event->dev_db);
 842                 }
 843
 844                 if (major(udev_device_get_devnum(dev)) == 0 &&
 845                     streq(udev_device_get_action(dev), "move"))
 846                         udev_device_copy_properties(dev, event->dev_db);
 847
 848                 udev_rules_apply_to_event(rules, event,
 849                                           timeout_usec, timeout_warn_usec,
 850                                           properties_list,
 851                                           sigmask);
 852
 853                 /* rename a new network interface, if needed */
 854                 if (udev_device_get_ifindex(dev) > 0 && streq(udev_device_get_action(dev), "add") &&
 855                     event->name != NULL && !streq(event->name, udev_device_get_sysname(dev))) {
 856                         int r;
 857
 858                         r = rename_netif(event);
 859                         if (r < 0)
 860                                 log_warning_errno(r, "could not rename interface '%d' from '%s' to '%s': %m", udev_device_get_ifindex(dev),
 861                                                   udev_device_get_sysname(dev), event->name);
 862                         else {
 863                                 r = udev_device_rename(dev, event->name);
 864                                 if (r < 0)
 865                                         log_warning_errno(r, "renamed interface '%d' from '%s' to '%s', but could not update udev_device: %m",
 866                                                           udev_device_get_ifindex(dev), udev_device_get_sysname(dev), event->name);
 867                                 else
 868                                         log_debug("changed devpath to '%s'", udev_device_get_devpath(dev));
 869                         }
 870                 }
 871
 872                 if (major(udev_device_get_devnum(dev)) > 0) {
 873                         bool apply;
 874
 875                         /* remove/update possible left-over symlinks from old database entry */
 876                         if (event->dev_db != NULL)
 877                                 udev_node_update_old_links(dev, event->dev_db);
 878
 879                         if (!event->owner_set)
 880                                 event->uid = udev_device_get_devnode_uid(dev);
 881
 882                         if (!event->group_set)
 883                                 event->gid = udev_device_get_devnode_gid(dev);
 884
 885                         if (!event->mode_set) {
 886                                 if (udev_device_get_devnode_mode(dev) > 0) {
 887                                         /* kernel supplied value */
 888                                         event->mode = udev_device_get_devnode_mode(dev);
 889                                 } else if (event->gid > 0) {
 890                                         /* default 0660 if a group is assigned */
 891                                         event->mode = 0660;
 892                                 } else {
 893                                         /* default 0600 */
 894                                         event->mode = 0600;
 895                                 }
 896                         }
 897
 898                         apply = streq(udev_device_get_action(dev), "add") || event->owner_set || event->group_set || event->mode_set;
 899                         udev_node_add(dev, apply, event->mode, event->uid, event->gid, &event->seclabel_list);
 900                 }
 901
 902                 /* preserve old, or get new initialization timestamp */
 903                 udev_device_ensure_usec_initialized(event->dev, event->dev_db);
 904
 905                 /* (re)write database file */
 906                 udev_device_tag_index(dev, event->dev_db, true);
 907                 udev_device_update_db(dev);
 908                 udev_device_set_is_initialized(dev);
 909
 910                 event->dev_db = udev_device_unref(event->dev_db);
 911         }
 912 }
 913
 914 void udev_event_execute_run(struct udev_event *event, usec_t timeout_usec, usec_t timeout_warn_usec, const sigset_t *sigmask) {
 915         struct udev_list_entry *list_entry;
 916
 917         udev_list_entry_foreach(list_entry, udev_list_get_entry(&event->run_list)) {
 918                 const char *cmd = udev_list_entry_get_name(list_entry);
 919                 enum udev_builtin_cmd builtin_cmd = udev_list_entry_get_num(list_entry);
 920
 921                 if (builtin_cmd < UDEV_BUILTIN_MAX) {
 922                         char command[UTIL_PATH_SIZE];
 923
 924                         udev_event_apply_format(event, cmd, command, sizeof(command));
 925                         udev_builtin_run(event->dev, builtin_cmd, command, false);
 926                 } else {
 927                         char program[UTIL_PATH_SIZE];
 928                         char **envp;
 929
 930                         if (event->exec_delay > 0) {
 931                                 log_debug("delay execution of '%s'", program);
 932                                 sleep(event->exec_delay);
 933                         }
 934
 935                         udev_event_apply_format(event, cmd, program, sizeof(program));
 936                         envp = udev_device_get_properties_envp(event->dev);
 937                         udev_event_spawn(event, timeout_usec, timeout_warn_usec, program, envp, sigmask, NULL, 0);
 938                 }
 939         }
 940 }