+ va_list args;
+
+ if (priority > udev_log_priority)
+ return;
+
+ va_start(args, format);
+ vsyslog(priority, format, args);
+ va_end(args);
+}
+#endif
+
+static void asmlinkage udev_event_sig_handler(int signum)
+{
+ if (signum == SIGALRM)
+ exit(1);
+}
+
+static int udev_event_process(struct uevent_msg *msg)
+{
+ struct sigaction act;
+ struct udevice udev;
+ struct name_entry *name_loop;
+ int i;
+ int retval;
+
+ /* set signal handlers */
+ memset(&act, 0x00, sizeof(act));
+ act.sa_handler = (void (*)(int)) udev_event_sig_handler;
+ sigemptyset (&act.sa_mask);
+ act.sa_flags = 0;
+ sigaction(SIGALRM, &act, NULL);
+
+ /* trigger timeout to prevent hanging processes */
+ alarm(UDEV_ALARM_TIMEOUT);
+
+ /* reconstruct env from message */
+ for (i = 0; msg->envp[i]; i++)
+ putenv(msg->envp[i]);
+
+ udev_init_device(&udev, msg->devpath, msg->subsystem, msg->action);
+ retval = udev_process_event(&rules, &udev);
+
+ /* run programs collected by RUN-key*/
+ if (!retval) {
+ list_for_each_entry(name_loop, &udev.run_list, node) {
+ if (strncmp(name_loop->name, "socket:", strlen("socket:")) == 0)
+ pass_env_to_socket(&name_loop->name[strlen("socket:")], msg->devpath, msg->action);
+ else
+ if (run_program(name_loop->name, udev.subsystem, NULL, 0, NULL,
+ (udev_log_priority >= LOG_INFO)))
+ retval = -1;
+ }
+ }
+
+ udev_cleanup_device(&udev);
+
+ return retval;
+}
+
+enum event_state {
+ EVENT_QUEUED,
+ EVENT_FINISHED,
+ EVENT_FAILED,
+};
+
+static void export_event_state(struct uevent_msg *msg, enum event_state state)
+{
+ char filename[PATH_SIZE];
+ char filename_failed[PATH_SIZE];
+ char target[PATH_SIZE];
+ size_t start, end, i;
+ struct uevent_msg *loop_msg;
+
+ /* add location of queue files */
+ strlcpy(filename, udev_root, sizeof(filename));
+ strlcat(filename, "/", sizeof(filename));
+ start = strlcat(filename, EVENT_QUEUE_DIR, sizeof(filename));
+ end = strlcat(filename, msg->devpath, sizeof(filename));
+ if (end > sizeof(filename))
+ end = sizeof(filename);
+
+ /* replace '/' to transform path into a filename */
+ for (i = start+1; i < end; i++)
+ if (filename[i] == '/')
+ filename[i] = PATH_TO_NAME_CHAR;
+
+ /* add location of failed files */
+ strlcpy(filename_failed, udev_root, sizeof(filename_failed));
+ strlcat(filename_failed, "/", sizeof(filename_failed));
+ start = strlcat(filename_failed, EVENT_FAILED_DIR, sizeof(filename_failed));
+ end = strlcat(filename_failed, msg->devpath, sizeof(filename_failed));
+ if (end > sizeof(filename_failed))
+ end = sizeof(filename_failed);
+
+ /* replace '/' to transform path into a filename */
+ for (i = start+1; i < end; i++)
+ if (filename_failed[i] == '/')
+ filename_failed[i] = PATH_TO_NAME_CHAR;
+
+ switch (state) {
+ case EVENT_QUEUED:
+ unlink(filename_failed);
+
+ strlcpy(target, sysfs_path, sizeof(target));
+ strlcat(target, msg->devpath, sizeof(target));
+ create_path(filename);
+ symlink(target, filename);
+ return;
+ case EVENT_FINISHED:
+ unlink(filename_failed);
+
+ /* don't remove if events for the same path are still pending */
+ list_for_each_entry(loop_msg, &running_list, node)
+ if (loop_msg->devpath && strcmp(loop_msg->devpath, msg->devpath) == 0)
+ return;
+ unlink(filename);
+ case EVENT_FAILED:
+ create_path(filename_failed);
+ rename(filename, filename_failed);
+ return;
+ }
+}
+
+static void msg_queue_delete(struct uevent_msg *msg)
+{
+ list_del(&msg->node);
+
+ /* mark as failed, if add event returns non-zero */
+ if (msg->exitstatus && strcmp(msg->action, "add") == 0)
+ export_event_state(msg, EVENT_FAILED);
+ else
+ export_event_state(msg, EVENT_FINISHED);
+
+ free(msg);
+}
+
+static void udev_event_run(struct uevent_msg *msg)
+{
+ pid_t pid;
+ int retval;
+
+ pid = fork();
+ switch (pid) {
+ case 0:
+ /* child */
+ close(uevent_netlink_sock);
+ close(udevd_sock);
+ if (inotify_fd > 0)
+ close(inotify_fd);
+ close(signal_pipe[READ_END]);
+ close(signal_pipe[WRITE_END]);
+ logging_close();
+
+ logging_init("udevd-event");
+ setpriority(PRIO_PROCESS, 0, UDEV_PRIORITY);
+ retval = udev_event_process(msg);
+ info("seq %llu finished", msg->seqnum);
+
+ logging_close();
+ if (retval)
+ exit(1);
+ exit(0);
+ case -1:
+ err("fork of child failed: %s", strerror(errno));
+ msg_queue_delete(msg);
+ break;
+ default:
+ /* get SIGCHLD in main loop */
+ info("seq %llu forked, pid [%d], '%s' '%s', %ld seconds old",
+ msg->seqnum, pid, msg->action, msg->subsystem, time(NULL) - msg->queue_time);
+ msg->pid = pid;
+ }
+}
+
+static void msg_queue_insert(struct uevent_msg *msg)
+{
+ msg->queue_time = time(NULL);
+
+ export_event_state(msg, EVENT_QUEUED);
+
+ /* run all events with a timeout set immediately */
+ if (msg->timeout != 0) {
+ list_add_tail(&msg->node, &running_list);
+ udev_event_run(msg);
+ return;
+ }
+
+ list_add_tail(&msg->node, &exec_list);
+ run_exec_q = 1;
+}
+
+/* runs event and removes event from run queue when finished */
+static int running_processes(void)
+{
+ int f;
+ static char buf[4096];
+ int len;
+ int running;
+ const char *pos;
+
+ f = open("/proc/stat", O_RDONLY);
+ if (f == -1)
+ return -1;
+
+ len = read(f, buf, sizeof(buf)-1);
+ close(f);
+
+ if (len <= 0)
+ return -1;
+ else
+ buf[len] = '\0';
+
+ pos = strstr(buf, "procs_running ");
+ if (pos == NULL)
+ return -1;
+
+ if (sscanf(pos, "procs_running %u", &running) != 1)
+ return -1;
+
+ return running;
+}
+
+/* return the number of process es in our session, count only until limit */
+static int running_processes_in_session(pid_t session, int limit)
+{
+ DIR *dir;
+ struct dirent *dent;
+ int running = 0;
+
+ dir = opendir("/proc");
+ if (!dir)
+ return -1;
+
+ /* read process info from /proc */
+ for (dent = readdir(dir); dent != NULL; dent = readdir(dir)) {
+ int f;
+ char procdir[64];
+ char line[256];
+ const char *pos;
+ char state;
+ pid_t ppid, pgrp, sess;
+ int len;
+
+ if (!isdigit(dent->d_name[0]))
+ continue;
+
+ snprintf(procdir, sizeof(procdir), "/proc/%s/stat", dent->d_name);
+ procdir[sizeof(procdir)-1] = '\0';
+
+ f = open(procdir, O_RDONLY);
+ if (f == -1)
+ continue;
+
+ len = read(f, line, sizeof(line)-1);
+ close(f);
+
+ if (len <= 0)
+ continue;
+ else
+ line[len] = '\0';
+
+ /* skip ugly program name */
+ pos = strrchr(line, ')') + 2;
+ if (pos == NULL)
+ continue;
+
+ if (sscanf(pos, "%c %d %d %d ", &state, &ppid, &pgrp, &sess) != 4)
+ continue;
+
+ /* count only processes in our session */
+ if (sess != session)
+ continue;
+
+ /* count only running, no sleeping processes */
+ if (state != 'R')
+ continue;
+
+ running++;
+ if (limit > 0 && running >= limit)