+static struct list_head process_list = LIST_HEAD_INIT(process_list);
+static struct list_head fds = LIST_HEAD_INIT(fds);
+
+#define DEFAULT_LOG_LEVEL L_NOTICE
+
+static int log_level = DEFAULT_LOG_LEVEL;
+static const int log_class[] = {
+ [L_CRIT] = LOG_CRIT,
+ [L_WARNING] = LOG_WARNING,
+ [L_NOTICE] = LOG_NOTICE,
+ [L_INFO] = LOG_INFO,
+ [L_DEBUG] = LOG_DEBUG
+};
+
+#ifdef DUMMY_MODE
+#define use_syslog false
+#else
+static bool use_syslog = true;
+#endif
+
+
+static void
+netifd_delete_process(struct netifd_process *proc)
+{
+ if (proc->uloop.pending)
+ uloop_process_delete(&proc->uloop);
+ list_del(&proc->list);
+ netifd_fd_delete(&proc->log_fd);
+}
+
+void
+netifd_log_message(int priority, const char *format, ...)
+{
+ va_list vl;
+
+ if (priority > log_level)
+ return;
+
+ va_start(vl, format);
+ if (use_syslog)
+ vsyslog(log_class[priority], format, vl);
+ else
+ vfprintf(stderr, format, vl);
+ va_end(vl);
+}
+
+static void
+netifd_process_log_cb(struct uloop_fd *fd, unsigned int events)
+{
+ struct netifd_process *proc;
+ const char *log_prefix;
+ char *buf, *cur;
+ int maxlen, len, read_len;
+
+ proc = container_of(fd, struct netifd_process, log_uloop);
+
+ if (!proc->log_buf)
+ proc->log_buf = malloc(LOG_BUF_SIZE + 1);
+
+ buf = proc->log_buf + proc->log_buf_ofs;
+ maxlen = LOG_BUF_SIZE - proc->log_buf_ofs;
+
+ log_prefix = proc->log_prefix;
+ if (!log_prefix)
+ log_prefix = "process";
+
+retry:
+ read_len = len = read(fd->fd, buf, maxlen);
+ if (len < 0) {
+ if (errno == EAGAIN)
+ goto retry;
+
+ goto out;
+ } else if (len == 0)
+ goto out;
+
+ proc->log_buf_ofs += len;
+
+ cur = buf;
+ buf = proc->log_buf;
+ while ((cur = memchr(cur, '\n', len))) {
+ *cur = 0;
+
+ if (!proc->log_overflow)
+ netifd_log_message(L_NOTICE, "%s (%d): %s\n",
+ log_prefix, proc->uloop.pid, buf);
+ else
+ proc->log_overflow = false;
+
+ cur++;
+ len -= cur - buf;
+ buf = cur;
+ }
+
+ if (buf > proc->log_buf && len > 0)
+ memmove(buf, proc->log_buf, len);
+
+ if (len == LOG_BUF_SIZE) {
+ if (!proc->log_overflow) {
+ proc->log_buf[LOG_BUF_SIZE] = 0;
+ netifd_log_message(L_NOTICE, "%s (%d): %s [...]\n",
+ log_prefix, proc->uloop.pid, proc->log_buf);
+ proc->log_overflow = true;
+ }
+ len = 0;
+ }
+ proc->log_buf_ofs = len;
+
+ if (read_len == maxlen)
+ goto retry;
+
+out:
+ if (fd->eof)
+ uloop_fd_delete(fd);
+}
+
+static void
+netifd_process_cb(struct uloop_process *proc, int ret)
+{
+ struct netifd_process *np;
+ np = container_of(proc, struct netifd_process, uloop);
+ netifd_process_log_cb(&np->log_uloop, 0);
+ netifd_delete_process(np);
+ return np->cb(np, ret);
+}
+
+int
+netifd_start_process(const char **argv, char **env, struct netifd_process *proc)
+{
+ struct netifd_fd *fd;
+ int pfds[2];
+ int pid;
+
+ netifd_kill_process(proc);
+
+ if (pipe(pfds) < 0)
+ return -1;
+
+ if ((pid = fork()) < 0)
+ goto error;
+
+ if (!pid) {
+ if (env) {
+ while (*env) {
+ putenv(*env);
+ env++;
+ }
+ }
+ if (proc->dir_fd >= 0)
+ fchdir(proc->dir_fd);
+
+ /* close all non-essential fds */
+ list_for_each_entry(fd, &fds, list) {
+ if (fd->proc == proc)
+ continue;
+ close(fd->fd);
+ }
+
+ dup2(pfds[1], 0);
+ dup2(pfds[1], 1);
+ dup2(pfds[1], 2);
+
+ close(pfds[0]);
+ close(pfds[1]);
+
+ execvp(argv[0], (char **) argv);
+ exit(127);
+ }
+
+ if (pid < 0)
+ goto error;
+
+ close(pfds[1]);
+ proc->uloop.cb = netifd_process_cb;
+ proc->uloop.pid = pid;
+ uloop_process_add(&proc->uloop);
+ list_add_tail(&proc->list, &process_list);
+
+ proc->log_uloop.fd = proc->log_fd.fd = pfds[0];
+ proc->log_uloop.cb = netifd_process_log_cb;
+ netifd_fd_add(&proc->log_fd);
+ uloop_fd_add(&proc->log_uloop, ULOOP_EDGE_TRIGGER | ULOOP_READ);
+
+ return 0;
+
+error:
+ close(pfds[0]);
+ close(pfds[1]);
+ return -1;
+}
+
+void
+netifd_kill_process(struct netifd_process *proc)
+{
+ if (!proc->uloop.pending)
+ return;
+
+ kill(proc->uloop.pid, SIGTERM);
+ netifd_delete_process(proc);
+}
+
+void
+netifd_fd_add(struct netifd_fd *fd)
+{
+ list_add_tail(&fd->list, &fds);
+}
+
+void
+netifd_fd_delete(struct netifd_fd *fd)
+{
+ list_del(&fd->list);
+}
+