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