udev/udevd.c

   1 /*
   2  * Copyright (C) 2004-2008 Kay Sievers <kay.sievers@vrfy.org>
   3  * Copyright (C) 2004 Chris Friesen <chris_friesen@sympatico.ca>
   4  *
   5  * This program is free software: you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation, either version 2 of the License, or
   8  * (at your option) any later version.
   9  *
  10  * This program is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU General Public License
  16  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  17  */
  18
  19 #include <stddef.h>
  20 #include <signal.h>
  21 #include <unistd.h>
  22 #include <errno.h>
  23 #include <stdio.h>
  24 #include <stdlib.h>
  25 #include <string.h>
  26 #include <ctype.h>
  27 #include <fcntl.h>
  28 #include <time.h>
  29 #include <getopt.h>
  30 #include <dirent.h>
  31 #include <sys/select.h>
  32 #include <sys/poll.h>
  33 #include <sys/wait.h>
  34 #include <sys/stat.h>
  35 #include <sys/ioctl.h>
  36 #ifdef HAVE_INOTIFY
  37 #include <sys/inotify.h>
  38 #endif
  39
  40 #include "udev.h"
  41
  42 #define UDEVD_PRIORITY                  -4
  43 #define UDEV_PRIORITY                   -2
  44
  45 /* maximum limit of forked childs */
  46 #define UDEVD_MAX_CHILDS                256
  47
  48 static int debug;
  49
  50 static void log_fn(struct udev *udev, int priority,
  51                    const char *file, int line, const char *fn,
  52                    const char *format, va_list args)
  53 {
  54         if (debug) {
  55                 fprintf(stderr, "[%d] %s: ", (int) getpid(), fn);
  56                 vfprintf(stderr, format, args);
  57         } else {
  58                 vsyslog(priority, format, args);
  59         }
  60 }
  61
  62 static void reap_sigchilds(void);
  63
  64 static int debug_trace;
  65 static struct udev_rules *rules;
  66 static struct udev_ctrl *udev_ctrl;
  67 static struct udev_monitor *kernel_monitor;
  68 static volatile int sigchilds_waiting;
  69 static volatile int udev_exit;
  70 static volatile int reload_config;
  71 static volatile int signal_received;
  72 static int run_exec_q;
  73 static int stop_exec_q;
  74 static int max_childs;
  75 static int childs;
  76 static struct udev_list_node event_list;
  77
  78 enum event_state {
  79         EVENT_QUEUED,
  80         EVENT_FINISHED,
  81         EVENT_FAILED,
  82 };
  83
  84 static struct udev_event *node_to_event(struct udev_list_node *node)
  85 {
  86         char *event;
  87
  88         event = (char *)node;
  89         event -= offsetof(struct udev_event, node);
  90         return (struct udev_event *)event;
  91 }
  92
  93 static void export_event_state(struct udev_event *event, enum event_state state)
  94 {
  95         char filename[UTIL_PATH_SIZE];
  96         char filename_failed[UTIL_PATH_SIZE];
  97         size_t start;
  98
  99         /* location of queue file */
 100         snprintf(filename, sizeof(filename), "%s/.udev/queue/%llu",
 101                  udev_get_dev_path(event->udev), udev_device_get_seqnum(event->dev));
 102
 103         /* location of failed file */
 104         util_strlcpy(filename_failed, udev_get_dev_path(event->udev), sizeof(filename_failed));
 105         util_strlcat(filename_failed, "/", sizeof(filename_failed));
 106         start = util_strlcat(filename_failed, ".udev/failed/", sizeof(filename_failed));
 107         util_strlcat(filename_failed, udev_device_get_devpath(event->dev), sizeof(filename_failed));
 108         util_path_encode(&filename_failed[start], sizeof(filename_failed) - start);
 109
 110         switch (state) {
 111         case EVENT_QUEUED:
 112                 if(unlink(filename_failed) == 0)
 113                         util_delete_path(event->udev, filename_failed);
 114                 util_create_path(event->udev, filename);
 115                 udev_selinux_setfscreatecon(event->udev, filename, S_IFLNK);
 116                 symlink(udev_device_get_devpath(event->dev), filename);
 117                 udev_selinux_resetfscreatecon(event->udev);
 118                 break;
 119         case EVENT_FINISHED:
 120                 if (udev_device_get_devpath_old(event->dev) != NULL) {
 121                         /* "move" event - rename failed file to current name, do not delete failed */
 122                         char filename_failed_old[UTIL_PATH_SIZE];
 123
 124                         util_strlcpy(filename_failed_old, udev_get_dev_path(event->udev), sizeof(filename_failed_old));
 125                         util_strlcat(filename_failed_old, "/", sizeof(filename_failed_old));
 126                         start = util_strlcat(filename_failed_old, ".udev/failed/", sizeof(filename_failed_old));
 127                         util_strlcat(filename_failed_old, udev_device_get_devpath_old(event->dev), sizeof(filename_failed_old));
 128                         util_path_encode(&filename_failed_old[start], sizeof(filename) - start);
 129
 130                         if (rename(filename_failed_old, filename_failed) == 0)
 131                                 info(event->udev, "renamed devpath, moved failed state of '%s' to %s'\n",
 132                                      udev_device_get_devpath_old(event->dev), udev_device_get_devpath(event->dev));
 133                 } else {
 134                         if (unlink(filename_failed) == 0)
 135                                 util_delete_path(event->udev, filename_failed);
 136                 }
 137
 138                 unlink(filename);
 139
 140                 /* clean up possibly empty queue directory */
 141                 if (udev_list_is_empty(&event_list))
 142                         util_delete_path(event->udev, filename);
 143                 break;
 144         case EVENT_FAILED:
 145                 /* move failed event to the failed directory */
 146                 util_create_path(event->udev, filename_failed);
 147                 rename(filename, filename_failed);
 148
 149                 /* clean up possibly empty queue directory */
 150                 if (udev_list_is_empty(&event_list))
 151                         util_delete_path(event->udev, filename);
 152                 break;
 153         }
 154
 155         return;
 156 }
 157
 158 static void event_queue_delete(struct udev_event *event)
 159 {
 160         udev_list_node_remove(&event->node);
 161
 162         /* mark as failed, if "add" event returns non-zero */
 163         if (event->exitstatus && strcmp(udev_device_get_action(event->dev), "add") == 0)
 164                 export_event_state(event, EVENT_FAILED);
 165         else
 166                 export_event_state(event, EVENT_FINISHED);
 167
 168         udev_device_unref(event->dev);
 169         udev_event_unref(event);
 170 }
 171
 172 static void asmlinkage event_sig_handler(int signum)
 173 {
 174         if (signum == SIGALRM)
 175                 exit(1);
 176 }
 177
 178 static void event_fork(struct udev_event *event)
 179 {
 180         pid_t pid;
 181         struct sigaction act;
 182         int err;
 183
 184         if (debug_trace) {
 185                 event->trace = 1;
 186                 fprintf(stderr, "fork %s (%llu)\n",
 187                        udev_device_get_syspath(event->dev),
 188                        udev_device_get_seqnum(event->dev));
 189         }
 190
 191         pid = fork();
 192         switch (pid) {
 193         case 0:
 194                 /* child */
 195                 udev_monitor_unref(kernel_monitor);
 196                 udev_ctrl_unref(udev_ctrl);
 197                 logging_close();
 198                 logging_init("udevd-event");
 199                 setpriority(PRIO_PROCESS, 0, UDEV_PRIORITY);
 200
 201                 /* set signal handlers */
 202                 memset(&act, 0x00, sizeof(act));
 203                 act.sa_handler = (void (*)(int)) event_sig_handler;
 204                 sigemptyset (&act.sa_mask);
 205                 act.sa_flags = 0;
 206                 sigaction(SIGALRM, &act, NULL);
 207
 208                 /* reset to default */
 209                 act.sa_handler = SIG_DFL;
 210                 sigaction(SIGINT, &act, NULL);
 211                 sigaction(SIGTERM, &act, NULL);
 212                 sigaction(SIGCHLD, &act, NULL);
 213                 sigaction(SIGHUP, &act, NULL);
 214
 215                 /* set timeout to prevent hanging processes */
 216                 alarm(UDEV_EVENT_TIMEOUT);
 217
 218                 /* clear any existing udev watch on the node */
 219                 if (inotify_fd != -1) {
 220                         struct udev_device *dev_old;
 221
 222                         dev_old = udev_device_new_from_syspath(event->udev, udev_device_get_syspath(event->dev));
 223                         if (dev_old != NULL) {
 224                                 udev_watch_end(event->udev, dev_old);
 225                                 udev_device_unref(dev_old);
 226                         }
 227                 }
 228
 229                 /* apply rules, create node, symlinks */
 230                 err = udev_event_execute_rules(event, rules);
 231
 232                 /* rules may change/disable the timeout */
 233                 if (udev_device_get_event_timeout(event->dev) >= 0)
 234                         alarm(udev_device_get_event_timeout(event->dev));
 235
 236                 /* execute RUN= */
 237                 if (err == 0 && !event->ignore_device && udev_get_run(event->udev))
 238                         udev_event_execute_run(event);
 239
 240                 /* apply/restore inotify watch */
 241                 if (err == 0 && event->inotify_watch &&
 242                     strcmp(udev_device_get_action(event->dev), "remove") != 0)
 243                         udev_watch_begin(event->udev, event->dev);
 244
 245                 info(event->udev, "seq %llu exit with %i\n", udev_device_get_seqnum(event->dev), err);
 246                 logging_close();
 247                 if (err != 0)
 248                         exit(1);
 249                 exit(0);
 250         case -1:
 251                 err(event->udev, "fork of child failed: %m\n");
 252                 event_queue_delete(event);
 253                 break;
 254         default:
 255                 /* get SIGCHLD in main loop */
 256                 info(event->udev, "seq %llu forked, pid [%d], '%s' '%s', %ld seconds old\n",
 257                      udev_device_get_seqnum(event->dev),
 258                      pid,
 259                      udev_device_get_action(event->dev),
 260                      udev_device_get_subsystem(event->dev),
 261                      time(NULL) - event->queue_time);
 262                 event->pid = pid;
 263                 childs++;
 264         }
 265 }
 266
 267 static void event_queue_insert(struct udev_event *event)
 268 {
 269         char filename[UTIL_PATH_SIZE];
 270         int fd;
 271
 272         event->queue_time = time(NULL);
 273
 274         export_event_state(event, EVENT_QUEUED);
 275         info(event->udev, "seq %llu queued, '%s' '%s'\n", udev_device_get_seqnum(event->dev),
 276              udev_device_get_action(event->dev), udev_device_get_subsystem(event->dev));
 277
 278         util_strlcpy(filename, udev_get_dev_path(event->udev), sizeof(filename));
 279         util_strlcat(filename, "/.udev/uevent_seqnum", sizeof(filename));
 280         fd = open(filename, O_WRONLY|O_TRUNC|O_CREAT, 0644);
 281         if (fd >= 0) {
 282                 char str[32];
 283                 int len;
 284
 285                 len = sprintf(str, "%llu\n", udev_device_get_seqnum(event->dev));
 286                 write(fd, str, len);
 287                 close(fd);
 288         }
 289
 290
 291         udev_list_node_append(&event->node, &event_list);
 292         run_exec_q = 1;
 293
 294         /* run all events with a timeout set immediately */
 295         if (udev_device_get_timeout(event->dev) > 0) {
 296                 event_fork(event);
 297                 return;
 298         }
 299 }
 300
 301 static int mem_size_mb(void)
 302 {
 303         FILE* f;
 304         char buf[4096];
 305         long int memsize = -1;
 306
 307         f = fopen("/proc/meminfo", "r");
 308         if (f == NULL)
 309                 return -1;
 310
 311         while (fgets(buf, sizeof(buf), f) != NULL) {
 312                 long int value;
 313
 314                 if (sscanf(buf, "MemTotal: %ld kB", &value) == 1) {
 315                         memsize = value / 1024;
 316                         break;
 317                 }
 318         }
 319
 320         fclose(f);
 321         return memsize;
 322 }
 323
 324 static int compare_devpath(const char *running, const char *waiting)
 325 {
 326         int i = 0;
 327
 328         while (running[i] != '\0' && running[i] == waiting[i])
 329                 i++;
 330
 331         /* identical device event found */
 332         if (running[i] == '\0' && waiting[i] == '\0')
 333                 return 1;
 334
 335         /* parent device event found */
 336         if (running[i] == '\0' && waiting[i] == '/')
 337                 return 2;
 338
 339         /* child device event found */
 340         if (running[i] == '/' && waiting[i] == '\0')
 341                 return 3;
 342
 343         /* no matching event */
 344         return 0;
 345 }
 346
 347 /* lookup event for identical, parent, child, or physical device */
 348 static int devpath_busy(struct udev_event *event)
 349 {
 350         struct udev_list_node *loop;
 351
 352         if (event->delaying_seqnum > 0) {
 353         }
 354         /* check if queue contains events we depend on */
 355         udev_list_node_foreach(loop, &event_list) {
 356                 struct udev_event *loop_event = node_to_event(loop);
 357
 358                 /* we already found a later event, earlier can not block us, no need to check again */
 359                 if (udev_device_get_seqnum(loop_event->dev) < event->delaying_seqnum)
 360                         continue;
 361
 362                 /* event we checked earlier still exists, no need to check again */
 363                 if (udev_device_get_seqnum(loop_event->dev) == event->delaying_seqnum)
 364                         return 2;
 365
 366                 /* found ourself, no later event can block us */
 367                 if (udev_device_get_seqnum(loop_event->dev) >= udev_device_get_seqnum(event->dev))
 368                         break;
 369
 370                 /* check our old name */
 371                 if (udev_device_get_devpath_old(event->dev) != NULL)
 372                         if (strcmp(udev_device_get_devpath(loop_event->dev), udev_device_get_devpath_old(event->dev)) == 0) {
 373                                 event->delaying_seqnum = udev_device_get_seqnum(loop_event->dev);
 374                                 return 3;
 375                         }
 376
 377                 /* check identical, parent, or child device event */
 378                 if (compare_devpath(udev_device_get_devpath(loop_event->dev), udev_device_get_devpath(event->dev)) != 0) {
 379                         dbg(event->udev, "%llu, device event still pending %llu (%s)\n",
 380                             udev_device_get_seqnum(event->dev),
 381                             udev_device_get_seqnum(loop_event->dev),
 382                             udev_device_get_devpath(loop_event->dev));
 383                         event->delaying_seqnum = udev_device_get_seqnum(loop_event->dev);
 384                         return 4;
 385                 }
 386
 387                 /* check for our major:minor number */
 388                 if (major(udev_device_get_devnum(event->dev)) > 0 &&
 389                     udev_device_get_devnum(loop_event->dev) == udev_device_get_devnum(event->dev) &&
 390                     strcmp(udev_device_get_subsystem(event->dev), udev_device_get_subsystem(loop_event->dev)) == 0) {
 391                         dbg(event->udev, "%llu, device event still pending %llu (%d:%d)\n",
 392                             udev_device_get_seqnum(event->dev),
 393                             udev_device_get_seqnum(loop_event->dev),
 394                             major(udev_device_get_devnum(loop_event->dev)), minor(udev_device_get_devnum(loop_event->dev)));
 395                         event->delaying_seqnum = udev_device_get_seqnum(loop_event->dev);
 396                         return 5;
 397                 }
 398
 399                 /* check physical device event (special case of parent) */
 400                 if (udev_device_get_physdevpath(event->dev) != NULL &&
 401                     strcmp(udev_device_get_action(event->dev), "add") == 0)
 402                         if (compare_devpath(udev_device_get_devpath(loop_event->dev),
 403                                             udev_device_get_physdevpath(event->dev)) != 0) {
 404                                 dbg(event->udev, "%llu, physical device event still pending %llu (%s)\n",
 405                                     udev_device_get_seqnum(event->dev),
 406                                     udev_device_get_seqnum(loop_event->dev),
 407                                     udev_device_get_devpath(loop_event->dev));
 408                                 event->delaying_seqnum = udev_device_get_seqnum(loop_event->dev);
 409                                 return 6;
 410                         }
 411         }
 412         return 0;
 413 }
 414
 415 /* serializes events for the identical and parent and child devices */
 416 static void event_queue_manager(struct udev *udev)
 417 {
 418         struct udev_list_node *loop;
 419         struct udev_list_node *tmp;
 420
 421 start_over:
 422         if (udev_list_is_empty(&event_list)) {
 423                 if (childs > 0) {
 424                         err(udev, "event list empty, but childs count is %i", childs);
 425                         childs = 0;
 426                 }
 427                 return;
 428         }
 429
 430         udev_list_node_foreach_safe(loop, tmp, &event_list) {
 431                 struct udev_event *loop_event = node_to_event(loop);
 432
 433                 if (childs >= max_childs) {
 434                         info(udev, "maximum number (%i) of childs reached\n", childs);
 435                         break;
 436                 }
 437
 438                 if (loop_event->pid != 0)
 439                         continue;
 440
 441                 /* do not start event if parent or child event is still running */
 442                 if (devpath_busy(loop_event) != 0) {
 443                         dbg(udev, "delay seq %llu (%s)\n",
 444                             udev_device_get_seqnum(loop_event->dev),
 445                             udev_device_get_devpath(loop_event->dev));
 446                         continue;
 447                 }
 448
 449                 event_fork(loop_event);
 450                 dbg(udev, "moved seq %llu to running list\n", udev_device_get_seqnum(loop_event->dev));
 451
 452                 /* retry if events finished in the meantime */
 453                 if (sigchilds_waiting) {
 454                         sigchilds_waiting = 0;
 455                         reap_sigchilds();
 456                         goto start_over;
 457                 }
 458         }
 459 }
 460
 461 /* receive the udevd message from userspace */
 462 static void handle_ctrl_msg(struct udev_ctrl *uctrl)
 463 {
 464         struct udev *udev = udev_ctrl_get_udev(uctrl);
 465         struct udev_ctrl_msg *ctrl_msg;
 466         const char *str;
 467         int i;
 468
 469         ctrl_msg = udev_ctrl_receive_msg(uctrl);
 470         if (ctrl_msg == NULL)
 471                 return;
 472
 473         i = udev_ctrl_get_set_log_level(ctrl_msg);
 474         if (i >= 0) {
 475                 info(udev, "udevd message (SET_LOG_PRIORITY) received, log_priority=%i\n", i);
 476                 udev_set_log_priority(udev, i);
 477         }
 478
 479         if (udev_ctrl_get_stop_exec_queue(ctrl_msg) > 0) {
 480                 info(udev, "udevd message (STOP_EXEC_QUEUE) received\n");
 481                 stop_exec_q = 1;
 482         }
 483
 484         if (udev_ctrl_get_start_exec_queue(ctrl_msg) > 0) {
 485                 info(udev, "udevd message (START_EXEC_QUEUE) received\n");
 486                 stop_exec_q = 0;
 487                 event_queue_manager(udev);
 488         }
 489
 490         if (udev_ctrl_get_reload_rules(ctrl_msg) > 0) {
 491                 info(udev, "udevd message (RELOAD_RULES) received\n");
 492                 reload_config = 1;
 493         }
 494
 495         str = udev_ctrl_get_set_env(ctrl_msg);
 496         if (str != NULL) {
 497                 char *key;
 498
 499                 key = strdup(str);
 500                 if (key != NULL) {
 501                         char *val;
 502
 503                         val = strchr(key, '=');
 504                         if (val != NULL) {
 505                                 val[0] = '\0';
 506                                 val = &val[1];
 507                                 if (val[0] == '\0') {
 508                                         info(udev, "udevd message (ENV) received, unset '%s'\n", key);
 509                                         udev_add_property(udev, key, NULL);
 510                                 } else {
 511                                         info(udev, "udevd message (ENV) received, set '%s=%s'\n", key, val);
 512                                         udev_add_property(udev, key, val);
 513                                 }
 514                         } else {
 515                                 err(udev, "wrong key format '%s'\n", key);
 516                         }
 517                         free(key);
 518                 }
 519         }
 520
 521         i = udev_ctrl_get_set_max_childs(ctrl_msg);
 522         if (i >= 0) {
 523                 info(udev, "udevd message (SET_MAX_CHILDS) received, max_childs=%i\n", i);
 524                 max_childs = i;
 525         }
 526         udev_ctrl_msg_unref(ctrl_msg);
 527 }
 528
 529 /* read inotify messages */
 530 static int handle_inotify(struct udev *udev)
 531 {
 532         int nbytes, pos;
 533         char *buf;
 534         struct inotify_event *ev;
 535
 536         if ((ioctl(inotify_fd, FIONREAD, &nbytes) < 0) || (nbytes <= 0))
 537                 return 0;
 538
 539         buf = malloc(nbytes);
 540         if (buf == NULL) {
 541                 err(udev, "error getting buffer for inotify, disable watching\n");
 542                 close(inotify_fd);
 543                 inotify_fd = -1;
 544                 return 0;
 545         }
 546
 547         read(inotify_fd, buf, nbytes);
 548
 549         for (pos = 0, ev = (struct inotify_event *)(buf + pos); pos < nbytes; pos += sizeof(struct inotify_event) + ev->len) {
 550                 struct udev_device *dev;
 551
 552                 if (ev->len) {
 553                         dbg(udev, "inotify event: %x for %s\n", ev->mask, ev->name);
 554                         reload_config = 1;
 555                         continue;
 556                 }
 557
 558                 dev = udev_watch_lookup(udev, ev->wd);
 559                 if (dev != NULL) {
 560                         dbg(udev, "inotify event: %x for %s\n", ev->mask, udev_device_get_devnode(dev));
 561                         if (ev->mask & IN_CLOSE_WRITE) {
 562                                 char filename[UTIL_PATH_SIZE];
 563                                 int fd;
 564
 565                                 info(udev, "device %s closed, synthesising 'change'\n", udev_device_get_devnode(dev));
 566                                 util_strlcpy(filename, udev_device_get_syspath(dev), sizeof(filename));
 567                                 util_strlcat(filename, "/uevent", sizeof(filename));
 568                                 fd = open(filename, O_WRONLY);
 569                                 if (fd < 0 || write(fd, "change", 6) < 0)
 570                                         info(udev, "error writing uevent: %m\n");
 571                                 close(fd);
 572                         }
 573                         if (ev->mask & IN_IGNORED)
 574                                 udev_watch_end(udev, dev);
 575
 576                         udev_device_unref(dev);
 577                 }
 578
 579         }
 580
 581         free (buf);
 582         return 0;
 583 }
 584
 585 static void asmlinkage sig_handler(int signum)
 586 {
 587         switch (signum) {
 588                 case SIGINT:
 589                 case SIGTERM:
 590                         udev_exit = 1;
 591                         break;
 592                 case SIGCHLD:
 593                         /* set flag, then write to pipe if needed */
 594                         sigchilds_waiting = 1;
 595                         break;
 596                 case SIGHUP:
 597                         reload_config = 1;
 598                         break;
 599         }
 600
 601         signal_received = 1;
 602 }
 603
 604 static void udev_done(int pid, int exitstatus)
 605 {
 606         struct udev_list_node *loop;
 607
 608         /* find event associated with pid and delete it */
 609         udev_list_node_foreach(loop, &event_list) {
 610                 struct udev_event *loop_event = node_to_event(loop);
 611
 612                 if (loop_event->pid == pid) {
 613                         info(loop_event->udev, "seq %llu cleanup, pid [%d], status %i, %ld seconds old\n",
 614                              udev_device_get_seqnum(loop_event->dev), loop_event->pid,
 615                              exitstatus, time(NULL) - loop_event->queue_time);
 616                         loop_event->exitstatus = exitstatus;
 617                         if (debug_trace)
 618                                 fprintf(stderr, "exit %s (%llu)\n",
 619                                        udev_device_get_syspath(loop_event->dev),
 620                                        udev_device_get_seqnum(loop_event->dev));
 621                         event_queue_delete(loop_event);
 622                         childs--;
 623
 624                         /* there may be dependent events waiting */
 625                         run_exec_q = 1;
 626                         return;
 627                 }
 628         }
 629 }
 630
 631 static void reap_sigchilds(void)
 632 {
 633         pid_t pid;
 634         int status;
 635
 636         while (1) {
 637                 pid = waitpid(-1, &status, WNOHANG);
 638                 if (pid <= 0)
 639                         break;
 640                 if (WIFEXITED(status))
 641                         status = WEXITSTATUS(status);
 642                 else if (WIFSIGNALED(status))
 643                         status = WTERMSIG(status) + 128;
 644                 else
 645                         status = 0;
 646                 udev_done(pid, status);
 647         }
 648 }
 649
 650 static void cleanup_queue_dir(struct udev *udev)
 651 {
 652         char dirname[UTIL_PATH_SIZE];
 653         char filename[UTIL_PATH_SIZE];
 654         DIR *dir;
 655
 656         util_strlcpy(filename, udev_get_dev_path(udev), sizeof(filename));
 657         util_strlcat(filename, "/.udev/uevent_seqnum", sizeof(filename));
 658         unlink(filename);
 659
 660         util_strlcpy(dirname, udev_get_dev_path(udev), sizeof(dirname));
 661         util_strlcat(dirname, "/.udev/queue", sizeof(dirname));
 662         dir = opendir(dirname);
 663         if (dir != NULL) {
 664                 while (1) {
 665                         struct dirent *dent;
 666
 667                         dent = readdir(dir);
 668                         if (dent == NULL || dent->d_name[0] == '\0')
 669                                 break;
 670                         if (dent->d_name[0] == '.')
 671                                 continue;
 672                         util_strlcpy(filename, dirname, sizeof(filename));
 673                         util_strlcat(filename, "/", sizeof(filename));
 674                         util_strlcat(filename, dent->d_name, sizeof(filename));
 675                         unlink(filename);
 676                 }
 677                 closedir(dir);
 678                 rmdir(dirname);
 679         }
 680 }
 681
 682 static void export_initial_seqnum(struct udev *udev)
 683 {
 684         char filename[UTIL_PATH_SIZE];
 685         int fd;
 686         char seqnum[32];
 687         ssize_t len = 0;
 688
 689         util_strlcpy(filename, udev_get_sys_path(udev), sizeof(filename));
 690         util_strlcat(filename, "/kernel/uevent_seqnum", sizeof(filename));
 691         fd = open(filename, O_RDONLY);
 692         if (fd >= 0) {
 693                 len = read(fd, seqnum, sizeof(seqnum)-1);
 694                 close(fd);
 695         }
 696         if (len <= 0) {
 697                 strcpy(seqnum, "0\n");
 698                 len = 3;
 699         }
 700         util_strlcpy(filename, udev_get_dev_path(udev), sizeof(filename));
 701         util_strlcat(filename, "/.udev/uevent_seqnum", sizeof(filename));
 702         util_create_path(udev, filename);
 703         fd = open(filename, O_WRONLY|O_TRUNC|O_CREAT, 0644);
 704         if (fd >= 0) {
 705                 write(fd, seqnum, len);
 706                 close(fd);
 707         }
 708 }
 709
 710 int main(int argc, char *argv[])
 711 {
 712         struct udev *udev;
 713         int fd;
 714         struct sigaction act;
 715         const char *value;
 716         int daemonize = 0;
 717         int resolve_names = 1;
 718         static const struct option options[] = {
 719                 { "daemon", no_argument, NULL, 'd' },
 720                 { "debug-trace", no_argument, NULL, 't' },
 721                 { "debug", no_argument, NULL, 'D' },
 722                 { "help", no_argument, NULL, 'h' },
 723                 { "version", no_argument, NULL, 'V' },
 724                 { "resolve-names", required_argument, NULL, 'N' },
 725                 {}
 726         };
 727         int rc = 1;
 728
 729         udev = udev_new();
 730         if (udev == NULL)
 731                 goto exit;
 732
 733         logging_init("udevd");
 734         udev_set_log_fn(udev, log_fn);
 735         info(udev, "version %s\n", VERSION);
 736         udev_selinux_init(udev);
 737
 738         while (1) {
 739                 int option;
 740
 741                 option = getopt_long(argc, argv, "dDthV", options, NULL);
 742                 if (option == -1)
 743                         break;
 744
 745                 switch (option) {
 746                 case 'd':
 747                         daemonize = 1;
 748                         break;
 749                 case 't':
 750                         debug_trace = 1;
 751                         break;
 752                 case 'D':
 753                         debug = 1;
 754                         if (udev_get_log_priority(udev) < LOG_INFO)
 755                                 udev_set_log_priority(udev, LOG_INFO);
 756                         break;
 757                 case 'N':
 758                         if (strcmp (optarg, "early") == 0) {
 759                                 resolve_names = 1;
 760                         } else if (strcmp (optarg, "late") == 0) {
 761                                 resolve_names = 0;
 762                         } else if (strcmp (optarg, "never") == 0) {
 763                                 resolve_names = -1;
 764                         } else {
 765                                 fprintf(stderr, "resolve-names must be early, late or never\n");
 766                                 err(udev, "resolve-names must be early, late or never\n");
 767                                 goto exit;
 768                         }
 769                         break;
 770                 case 'h':
 771                         printf("Usage: udevd [--help] [--daemon] [--debug-trace] [--debug] "
 772                                "[--resolve-names=early|late|never] [--version]\n");
 773                         goto exit;
 774                 case 'V':
 775                         printf("%s\n", VERSION);
 776                         goto exit;
 777                 default:
 778                         goto exit;
 779                 }
 780         }
 781
 782         if (getuid() != 0) {
 783                 fprintf(stderr, "root privileges required\n");
 784                 err(udev, "root privileges required\n");
 785                 goto exit;
 786         }
 787
 788         /* make sure std{in,out,err} fd's are in a sane state */
 789         fd = open("/dev/null", O_RDWR);
 790         if (fd < 0) {
 791                 fprintf(stderr, "cannot open /dev/null\n");
 792                 err(udev, "cannot open /dev/null\n");
 793         }
 794         if (write(STDOUT_FILENO, 0, 0) < 0)
 795                 dup2(fd, STDOUT_FILENO);
 796         if (write(STDERR_FILENO, 0, 0) < 0)
 797                 dup2(fd, STDERR_FILENO);
 798
 799         /* init control socket, bind() ensures, that only one udevd instance is running */
 800         udev_ctrl = udev_ctrl_new_from_socket(udev, UDEV_CTRL_SOCK_PATH);
 801         if (udev_ctrl == NULL) {
 802                 fprintf(stderr, "error initializing control socket");
 803                 err(udev, "error initializing udevd socket");
 804                 rc = 1;
 805                 goto exit;
 806         }
 807
 808         if (udev_ctrl_enable_receiving(udev_ctrl) < 0) {
 809                 fprintf(stderr, "error binding control socket, seems udevd is already running\n");
 810                 err(udev, "error binding control socket, seems udevd is already running\n");
 811                 rc = 1;
 812                 goto exit;
 813         }
 814
 815         kernel_monitor = udev_monitor_new_from_netlink(udev);
 816         if (kernel_monitor == NULL || udev_monitor_enable_receiving(kernel_monitor) < 0) {
 817                 fprintf(stderr, "error initializing netlink socket\n");
 818                 err(udev, "error initializing netlink socket\n");
 819                 rc = 3;
 820                 goto exit;
 821         }
 822         udev_monitor_set_receive_buffer_size(kernel_monitor, 128*1024*1024);
 823
 824         rules = udev_rules_new(udev, resolve_names);
 825         if (rules == NULL) {
 826                 err(udev, "error reading rules\n");
 827                 goto exit;
 828         }
 829         udev_list_init(&event_list);
 830         cleanup_queue_dir(udev);
 831         export_initial_seqnum(udev);
 832
 833         if (daemonize) {
 834                 pid_t pid;
 835
 836                 pid = fork();
 837                 switch (pid) {
 838                 case 0:
 839                         dbg(udev, "daemonized fork running\n");
 840                         break;
 841                 case -1:
 842                         err(udev, "fork of daemon failed: %m\n");
 843                         rc = 4;
 844                         goto exit;
 845                 default:
 846                         dbg(udev, "child [%u] running, parent exits\n", pid);
 847                         rc = 0;
 848                         goto exit;
 849                 }
 850         }
 851
 852         /* redirect std{out,err} */
 853         if (!debug && !debug_trace) {
 854                 dup2(fd, STDIN_FILENO);
 855                 dup2(fd, STDOUT_FILENO);
 856                 dup2(fd, STDERR_FILENO);
 857         }
 858         if (fd > STDERR_FILENO)
 859                 close(fd);
 860
 861         /* set scheduling priority for the daemon */
 862         setpriority(PRIO_PROCESS, 0, UDEVD_PRIORITY);
 863
 864         chdir("/");
 865         umask(022);
 866         setsid();
 867
 868         /* OOM_DISABLE == -17 */
 869         fd = open("/proc/self/oom_adj", O_RDWR);
 870         if (fd < 0)
 871                 err(udev, "error disabling OOM: %m\n");
 872         else {
 873                 write(fd, "-17", 3);
 874                 close(fd);
 875         }
 876
 877         fd = open("/dev/kmsg", O_WRONLY);
 878         if (fd > 0) {
 879                 const char *ver_str = "<6>udev: starting version " VERSION "\n";
 880                 char path[UTIL_PATH_SIZE];
 881                 struct stat statbuf;
 882
 883                 write(fd, ver_str, strlen(ver_str));
 884                 util_strlcpy(path, udev_get_sys_path(udev), sizeof(path));
 885                 util_strlcat(path, "/class/mem/null", sizeof(path));
 886                 if (lstat(path, &statbuf) == 0) {
 887                         if (S_ISDIR(statbuf.st_mode)) {
 888                                 const char *depr_str =
 889                                         "<6>udev: deprecated sysfs layout; update the kernel or "
 890                                         "disable CONFIG_SYSFS_DEPRECATED; some udev features will "
 891                                         "not work correctly\n";
 892
 893                                 write(fd, depr_str, strlen(depr_str));
 894                         }
 895                 }
 896                 close(fd);
 897         }
 898
 899         /* set signal handlers */
 900         memset(&act, 0x00, sizeof(struct sigaction));
 901         act.sa_handler = (void (*)(int)) sig_handler;
 902         sigemptyset(&act.sa_mask);
 903         act.sa_flags = SA_RESTART;
 904         sigaction(SIGINT, &act, NULL);
 905         sigaction(SIGTERM, &act, NULL);
 906         sigaction(SIGCHLD, &act, NULL);
 907         sigaction(SIGHUP, &act, NULL);
 908
 909         /* watch rules directory */
 910         udev_watch_init(udev);
 911         if (inotify_fd >= 0) {
 912                 if (udev_get_rules_path(udev) != NULL) {
 913                         inotify_add_watch(inotify_fd, udev_get_rules_path(udev),
 914                                           IN_CREATE | IN_DELETE | IN_MOVE | IN_CLOSE_WRITE);
 915                 } else {
 916                         char filename[UTIL_PATH_SIZE];
 917
 918                         inotify_add_watch(inotify_fd, UDEV_PREFIX "/lib/udev/rules.d",
 919                                           IN_CREATE | IN_DELETE | IN_MOVE | IN_CLOSE_WRITE);
 920                         inotify_add_watch(inotify_fd, SYSCONFDIR "/udev/rules.d",
 921                                           IN_CREATE | IN_DELETE | IN_MOVE | IN_CLOSE_WRITE);
 922
 923                         /* watch dynamic rules directory */
 924                         util_strlcpy(filename, udev_get_dev_path(udev), sizeof(filename));
 925                         util_strlcat(filename, "/.udev/rules.d", sizeof(filename));
 926                         inotify_add_watch(inotify_fd, filename,
 927                                           IN_CREATE | IN_DELETE | IN_MOVE | IN_CLOSE_WRITE);
 928                 }
 929
 930                 udev_watch_restore(udev);
 931         }
 932
 933         /* in trace mode run one event after the other */
 934         if (debug_trace) {
 935                 max_childs = 1;
 936         } else {
 937                 int memsize = mem_size_mb();
 938                 if (memsize > 0)
 939                         max_childs = 128 + (memsize / 4);
 940                 else
 941                         max_childs = UDEVD_MAX_CHILDS;
 942         }
 943         /* possibly overwrite maximum limit of executed events */
 944         value = getenv("UDEVD_MAX_CHILDS");
 945         if (value)
 946                 max_childs = strtoul(value, NULL, 10);
 947         info(udev, "initialize max_childs to %u\n", max_childs);
 948
 949         while (!udev_exit) {
 950                 sigset_t blocked_mask, orig_mask;
 951                 struct pollfd pfd[4];
 952                 struct pollfd *ctrl_poll, *monitor_poll, *inotify_poll = NULL;
 953                 int nfds = 0;
 954                 int fdcount;
 955
 956                 sigfillset(&blocked_mask);
 957                 sigprocmask(SIG_SETMASK, &blocked_mask, &orig_mask);
 958                 if (signal_received) {
 959                         sigprocmask(SIG_SETMASK, &orig_mask, NULL);
 960                         goto handle_signals;
 961                 }
 962
 963                 ctrl_poll = &pfd[nfds++];
 964                 ctrl_poll->fd = udev_ctrl_get_fd(udev_ctrl);
 965                 ctrl_poll->events = POLLIN;
 966
 967                 monitor_poll = &pfd[nfds++];
 968                 monitor_poll->fd = udev_monitor_get_fd(kernel_monitor);
 969                 monitor_poll->events = POLLIN;
 970
 971                 if (inotify_fd >= 0) {
 972                         inotify_poll = &pfd[nfds++];
 973                         inotify_poll->fd = inotify_fd;
 974                         inotify_poll->events = POLLIN;
 975                 }
 976
 977                 fdcount = ppoll(pfd, nfds, NULL, &orig_mask);
 978                 sigprocmask(SIG_SETMASK, &orig_mask, NULL);
 979                 if (fdcount < 0) {
 980                         if (errno == EINTR)
 981                                 goto handle_signals;
 982                         err(udev, "error in select: %m\n");
 983                         continue;
 984                 }
 985
 986                 /* get control message */
 987                 if (ctrl_poll->revents & POLLIN)
 988                         handle_ctrl_msg(udev_ctrl);
 989
 990                 /* get kernel uevent */
 991                 if (monitor_poll->revents & POLLIN) {
 992                         struct udev_device *dev;
 993
 994                         dev = udev_monitor_receive_device(kernel_monitor);
 995                         if (dev != NULL) {
 996                                 struct udev_event *event;
 997
 998                                 event = udev_event_new(dev);
 999                                 if (event != NULL)
1000                                         event_queue_insert(event);
1001                                 else
1002                                         udev_device_unref(dev);
1003                         }
1004                 }
1005
1006                 /* rules directory inotify watch */
1007                 if (inotify_poll && (inotify_poll->revents & POLLIN))
1008                         handle_inotify(udev);
1009
1010 handle_signals:
1011                 signal_received = 0;
1012
1013                 /* rules changed, set by inotify or a HUP signal */
1014                 if (reload_config) {
1015                         struct udev_rules *rules_new;
1016
1017                         reload_config = 0;
1018                         rules_new = udev_rules_new(udev, resolve_names);
1019                         if (rules_new != NULL) {
1020                                 udev_rules_unref(rules);
1021                                 rules = rules_new;
1022                         }
1023                 }
1024
1025                 if (sigchilds_waiting) {
1026                         sigchilds_waiting = 0;
1027                         reap_sigchilds();
1028                 }
1029
1030                 if (run_exec_q) {
1031                         run_exec_q = 0;
1032                         if (!stop_exec_q)
1033                                 event_queue_manager(udev);
1034                 }
1035         }
1036         cleanup_queue_dir(udev);
1037         rc = 0;
1038 exit:
1039         udev_rules_unref(rules);
1040         udev_ctrl_unref(udev_ctrl);
1041         if (inotify_fd >= 0)
1042                 close(inotify_fd);
1043         udev_monitor_unref(kernel_monitor);
1044         udev_selinux_exit(udev);
1045         udev_unref(udev);
1046         logging_close();
1047         return rc;
1048 }