ac96f7df9b3bf7078d77a0e208f99ae1343ba73a
[oweals/procd.git] / service / instance.c
1 /*
2  * Copyright (C) 2013 Felix Fietkau <nbd@openwrt.org>
3  * Copyright (C) 2013 John Crispin <blogic@openwrt.org>
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU Lesser General Public License version 2.1
7  * as published by the Free Software Foundation
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  */
14
15 #define _GNU_SOURCE
16 #include <sys/resource.h>
17 #include <sys/types.h>
18 #include <sys/socket.h>
19 #include <sys/stat.h>
20 #include <grp.h>
21 #include <net/if.h>
22 #include <unistd.h>
23 #include <stdint.h>
24 #include <stdio.h>
25 #include <fcntl.h>
26 #include <pwd.h>
27 #include <libgen.h>
28 #include <unistd.h>
29
30 #include <libubox/md5.h>
31
32 #include "../procd.h"
33
34 #include "service.h"
35 #include "instance.h"
36
37
38 enum {
39         INSTANCE_ATTR_COMMAND,
40         INSTANCE_ATTR_ENV,
41         INSTANCE_ATTR_DATA,
42         INSTANCE_ATTR_NETDEV,
43         INSTANCE_ATTR_FILE,
44         INSTANCE_ATTR_TRIGGER,
45         INSTANCE_ATTR_RESPAWN,
46         INSTANCE_ATTR_NICE,
47         INSTANCE_ATTR_LIMITS,
48         INSTANCE_ATTR_WATCH,
49         INSTANCE_ATTR_ERROR,
50         INSTANCE_ATTR_USER,
51         INSTANCE_ATTR_STDOUT,
52         INSTANCE_ATTR_STDERR,
53         INSTANCE_ATTR_NO_NEW_PRIVS,
54         INSTANCE_ATTR_JAIL,
55         INSTANCE_ATTR_TRACE,
56         INSTANCE_ATTR_SECCOMP,
57         INSTANCE_ATTR_PIDFILE,
58         INSTANCE_ATTR_RELOADSIG,
59         INSTANCE_ATTR_TERMTIMEOUT,
60         __INSTANCE_ATTR_MAX
61 };
62
63 static const struct blobmsg_policy instance_attr[__INSTANCE_ATTR_MAX] = {
64         [INSTANCE_ATTR_COMMAND] = { "command", BLOBMSG_TYPE_ARRAY },
65         [INSTANCE_ATTR_ENV] = { "env", BLOBMSG_TYPE_TABLE },
66         [INSTANCE_ATTR_DATA] = { "data", BLOBMSG_TYPE_TABLE },
67         [INSTANCE_ATTR_NETDEV] = { "netdev", BLOBMSG_TYPE_ARRAY },
68         [INSTANCE_ATTR_FILE] = { "file", BLOBMSG_TYPE_ARRAY },
69         [INSTANCE_ATTR_TRIGGER] = { "triggers", BLOBMSG_TYPE_ARRAY },
70         [INSTANCE_ATTR_RESPAWN] = { "respawn", BLOBMSG_TYPE_ARRAY },
71         [INSTANCE_ATTR_NICE] = { "nice", BLOBMSG_TYPE_INT32 },
72         [INSTANCE_ATTR_LIMITS] = { "limits", BLOBMSG_TYPE_TABLE },
73         [INSTANCE_ATTR_WATCH] = { "watch", BLOBMSG_TYPE_ARRAY },
74         [INSTANCE_ATTR_ERROR] = { "error", BLOBMSG_TYPE_ARRAY },
75         [INSTANCE_ATTR_USER] = { "user", BLOBMSG_TYPE_STRING },
76         [INSTANCE_ATTR_STDOUT] = { "stdout", BLOBMSG_TYPE_BOOL },
77         [INSTANCE_ATTR_STDERR] = { "stderr", BLOBMSG_TYPE_BOOL },
78         [INSTANCE_ATTR_NO_NEW_PRIVS] = { "no_new_privs", BLOBMSG_TYPE_BOOL },
79         [INSTANCE_ATTR_JAIL] = { "jail", BLOBMSG_TYPE_TABLE },
80         [INSTANCE_ATTR_TRACE] = { "trace", BLOBMSG_TYPE_BOOL },
81         [INSTANCE_ATTR_SECCOMP] = { "seccomp", BLOBMSG_TYPE_STRING },
82         [INSTANCE_ATTR_PIDFILE] = { "pidfile", BLOBMSG_TYPE_STRING },
83         [INSTANCE_ATTR_RELOADSIG] = { "reload_signal", BLOBMSG_TYPE_INT32 },
84         [INSTANCE_ATTR_TERMTIMEOUT] = { "term_timeout", BLOBMSG_TYPE_INT32 },
85 };
86
87 enum {
88         JAIL_ATTR_NAME,
89         JAIL_ATTR_HOSTNAME,
90         JAIL_ATTR_PROCFS,
91         JAIL_ATTR_SYSFS,
92         JAIL_ATTR_UBUS,
93         JAIL_ATTR_LOG,
94         JAIL_ATTR_RONLY,
95         JAIL_ATTR_MOUNT,
96         __JAIL_ATTR_MAX,
97 };
98
99 static const struct blobmsg_policy jail_attr[__JAIL_ATTR_MAX] = {
100         [JAIL_ATTR_NAME] = { "name", BLOBMSG_TYPE_STRING },
101         [JAIL_ATTR_HOSTNAME] = { "hostname", BLOBMSG_TYPE_STRING },
102         [JAIL_ATTR_PROCFS] = { "procfs", BLOBMSG_TYPE_BOOL },
103         [JAIL_ATTR_SYSFS] = { "sysfs", BLOBMSG_TYPE_BOOL },
104         [JAIL_ATTR_UBUS] = { "ubus", BLOBMSG_TYPE_BOOL },
105         [JAIL_ATTR_LOG] = { "log", BLOBMSG_TYPE_BOOL },
106         [JAIL_ATTR_RONLY] = { "ronly", BLOBMSG_TYPE_BOOL },
107         [JAIL_ATTR_MOUNT] = { "mount", BLOBMSG_TYPE_TABLE },
108 };
109
110 struct instance_netdev {
111         struct blobmsg_list_node node;
112         int ifindex;
113 };
114
115 struct instance_file {
116         struct blobmsg_list_node node;
117         uint32_t md5[4];
118 };
119
120 struct rlimit_name {
121         const char *name;
122         int resource;
123 };
124
125 static const struct rlimit_name rlimit_names[] = {
126         { "as", RLIMIT_AS },
127         { "core", RLIMIT_CORE },
128         { "cpu", RLIMIT_CPU },
129         { "data", RLIMIT_DATA },
130         { "fsize", RLIMIT_FSIZE },
131         { "memlock", RLIMIT_MEMLOCK },
132         { "nofile", RLIMIT_NOFILE },
133         { "nproc", RLIMIT_NPROC },
134         { "rss", RLIMIT_RSS },
135         { "stack", RLIMIT_STACK },
136 #ifdef linux
137         { "nice", RLIMIT_NICE },
138         { "rtprio", RLIMIT_RTPRIO },
139         { "msgqueue", RLIMIT_MSGQUEUE },
140         { "sigpending", RLIMIT_SIGPENDING },
141 #endif
142         { NULL, 0 }
143 };
144
145 static void closefd(int fd)
146 {
147         if (fd > STDERR_FILENO)
148                 close(fd);
149 }
150
151 static void
152 instance_limits(const char *limit, const char *value)
153 {
154         int i;
155         struct rlimit rlim;
156         unsigned long cur, max;
157
158         for (i = 0; rlimit_names[i].name != NULL; i++) {
159                 if (strcmp(rlimit_names[i].name, limit))
160                         continue;
161                 if (!strcmp(value, "unlimited")) {
162                         rlim.rlim_cur = RLIM_INFINITY;
163                         rlim.rlim_max = RLIM_INFINITY;
164                 } else {
165                         if (getrlimit(rlimit_names[i].resource, &rlim))
166                                 return;
167
168                         cur = rlim.rlim_cur;
169                         max = rlim.rlim_max;
170
171                         if (sscanf(value, "%lu %lu", &cur, &max) < 1)
172                                 return;
173
174                         rlim.rlim_cur = cur;
175                         rlim.rlim_max = max;
176                 }
177
178                 setrlimit(rlimit_names[i].resource, &rlim);
179                 return;
180         }
181 }
182
183 static inline int
184 jail_run(struct service_instance *in, char **argv)
185 {
186         struct blobmsg_list_node *var;
187         struct jail *jail = &in->jail;
188         int argc = 0;
189
190         argv[argc++] = "/sbin/ujail";
191
192         if (jail->name) {
193                 argv[argc++] = "-n";
194                 argv[argc++] = jail->name;
195         }
196
197         if (jail->hostname) {
198                 argv[argc++] = "-h";
199                 argv[argc++] = jail->hostname;
200         }
201
202         if (in->seccomp) {
203                 argv[argc++] = "-S";
204                 argv[argc++] = in->seccomp;
205         }
206
207         if (in->no_new_privs)
208                 argv[argc++] = "-c";
209
210         if (jail->procfs)
211                 argv[argc++] = "-p";
212
213         if (jail->sysfs)
214                 argv[argc++] = "-s";
215
216         if (jail->ubus)
217                 argv[argc++] = "-u";
218
219         if (jail->log)
220                 argv[argc++] = "-l";
221
222         if (jail->ronly)
223                 argv[argc++] = "-o";
224
225         blobmsg_list_for_each(&jail->mount, var) {
226                 const char *type = blobmsg_data(var->data);
227
228                 if (*type == '1')
229                         argv[argc++] = "-w";
230                 else
231                         argv[argc++] = "-r";
232                 argv[argc++] = (char *) blobmsg_name(var->data);
233         }
234
235         argv[argc++] = "--";
236
237         return argc;
238 }
239
240 static int
241 instance_removepid(struct service_instance *in) {
242         if (!in->pidfile)
243                 return 0;
244         if (unlink(in->pidfile)) {
245                 ERROR("Failed to removed pidfile: %s: %m\n", in->pidfile);
246                 return 1;
247         }
248         return 0;
249 }
250
251 static int
252 instance_writepid(struct service_instance *in)
253 {
254         FILE *_pidfile;
255
256         if (!in->pidfile) {
257                 return 0;
258         }
259         _pidfile = fopen(in->pidfile, "w");
260         if (_pidfile == NULL) {
261                 ERROR("failed to open pidfile for writing: %s: %m", in->pidfile);
262                 return 1;
263         }
264         if (fprintf(_pidfile, "%d\n", in->proc.pid) < 0) {
265                 ERROR("failed to write pidfile: %s: %m", in->pidfile);
266                 fclose(_pidfile);
267                 return 2;
268         }
269         if (fclose(_pidfile)) {
270                 ERROR("failed to close pidfile: %s: %m", in->pidfile);
271                 return 3;
272         }
273
274         return 0;
275 }
276
277 static void
278 instance_run(struct service_instance *in, int _stdout, int _stderr)
279 {
280         struct blobmsg_list_node *var;
281         struct blob_attr *cur;
282         char **argv;
283         int argc = 1; /* NULL terminated */
284         int rem, _stdin;
285         bool seccomp = !in->trace && !in->has_jail && in->seccomp;
286         bool setlbf = _stdout >= 0;
287
288         if (in->nice)
289                 setpriority(PRIO_PROCESS, 0, in->nice);
290
291         blobmsg_for_each_attr(cur, in->command, rem)
292                 argc++;
293
294         blobmsg_list_for_each(&in->env, var)
295                 setenv(blobmsg_name(var->data), blobmsg_data(var->data), 1);
296
297         if (seccomp)
298                 setenv("SECCOMP_FILE", in->seccomp, 1);
299
300         if (setlbf)
301                 setenv("LD_PRELOAD", "/lib/libsetlbf.so", 1);
302
303         blobmsg_list_for_each(&in->limits, var)
304                 instance_limits(blobmsg_name(var->data), blobmsg_data(var->data));
305
306         if (in->trace || seccomp)
307                 argc += 1;
308
309         argv = alloca(sizeof(char *) * (argc + in->jail.argc));
310         argc = 0;
311
312 #ifdef SECCOMP_SUPPORT
313         if (in->trace)
314                 argv[argc++] = "/sbin/utrace";
315         else if (seccomp)
316                 argv[argc++] = "/sbin/seccomp-trace";
317 #else
318         if (in->trace || seccomp)
319                 ULOG_WARN("Seccomp support for %s::%s not available\n", in->srv->name, in->name);
320 #endif
321
322         if (in->has_jail)
323                 argc = jail_run(in, argv);
324
325         blobmsg_for_each_attr(cur, in->command, rem)
326                 argv[argc++] = blobmsg_data(cur);
327
328         argv[argc] = NULL;
329
330         _stdin = open("/dev/null", O_RDONLY);
331
332         if (_stdout == -1)
333                 _stdout = open("/dev/null", O_WRONLY);
334
335         if (_stderr == -1)
336                 _stderr = open("/dev/null", O_WRONLY);
337
338         if (_stdin > -1) {
339                 dup2(_stdin, STDIN_FILENO);
340                 closefd(_stdin);
341         }
342         if (_stdout > -1) {
343                 dup2(_stdout, STDOUT_FILENO);
344                 closefd(_stdout);
345         }
346         if (_stderr > -1) {
347                 dup2(_stderr, STDERR_FILENO);
348                 closefd(_stderr);
349         }
350
351         if (in->user && in->gid && initgroups(in->user, in->gid)) {
352                 ERROR("failed to initgroups() for user %s: %m\n", in->user);
353                 exit(127);
354         }
355         if (in->gid && setgid(in->gid)) {
356                 ERROR("failed to set group id %d: %m\n", in->gid);
357                 exit(127);
358         }
359         if (in->uid && setuid(in->uid)) {
360                 ERROR("failed to set user id %d: %m\n", in->uid);
361                 exit(127);
362         }
363
364         execvp(argv[0], argv);
365         exit(127);
366 }
367
368 static void
369 instance_free_stdio(struct service_instance *in)
370 {
371         if (in->_stdout.fd.fd > -1) {
372                 ustream_free(&in->_stdout.stream);
373                 close(in->_stdout.fd.fd);
374                 in->_stdout.fd.fd = -1;
375         }
376
377         if (in->_stderr.fd.fd > -1) {
378                 ustream_free(&in->_stderr.stream);
379                 close(in->_stderr.fd.fd);
380                 in->_stderr.fd.fd = -1;
381         }
382 }
383
384 void
385 instance_start(struct service_instance *in)
386 {
387         int pid;
388         int opipe[2] = { -1, -1 };
389         int epipe[2] = { -1, -1 };
390
391         if (!avl_is_empty(&in->errors.avl)) {
392                 LOG("Not starting instance %s::%s, an error was indicated\n", in->srv->name, in->name);
393                 return;
394         }
395
396         if (!in->command) {
397                 LOG("Not starting instance %s::%s, command not set\n", in->srv->name, in->name);
398                 return;
399         }
400
401         if (in->proc.pending) {
402                 if (in->halt)
403                         in->restart = true;
404                 return;
405         }
406
407         instance_free_stdio(in);
408         if (in->_stdout.fd.fd > -2) {
409                 if (pipe(opipe)) {
410                         ULOG_WARN("pipe() failed: %m\n");
411                         opipe[0] = opipe[1] = -1;
412                 }
413         }
414
415         if (in->_stderr.fd.fd > -2) {
416                 if (pipe(epipe)) {
417                         ULOG_WARN("pipe() failed: %m\n");
418                         epipe[0] = epipe[1] = -1;
419                 }
420         }
421
422         in->restart = false;
423         in->halt = false;
424
425         if (!in->valid)
426                 return;
427
428         pid = fork();
429         if (pid < 0)
430                 return;
431
432         if (!pid) {
433                 uloop_done();
434                 closefd(opipe[0]);
435                 closefd(epipe[0]);
436                 instance_run(in, opipe[1], epipe[1]);
437                 return;
438         }
439
440         DEBUG(2, "Started instance %s::%s[%d]\n", in->srv->name, in->name, pid);
441         in->proc.pid = pid;
442         instance_writepid(in);
443         clock_gettime(CLOCK_MONOTONIC, &in->start);
444         uloop_process_add(&in->proc);
445
446         if (opipe[0] > -1) {
447                 ustream_fd_init(&in->_stdout, opipe[0]);
448                 closefd(opipe[1]);
449                 fcntl(opipe[0], F_SETFD, FD_CLOEXEC);
450         }
451
452         if (epipe[0] > -1) {
453                 ustream_fd_init(&in->_stderr, epipe[0]);
454                 closefd(epipe[1]);
455                 fcntl(epipe[0], F_SETFD, FD_CLOEXEC);
456         }
457
458         service_event("instance.start", in->srv->name, in->name);
459 }
460
461 static void
462 instance_stdio(struct ustream *s, int prio, struct service_instance *in)
463 {
464         char *newline, *str, *arg0, ident[32];
465         int len;
466
467         arg0 = basename(blobmsg_data(blobmsg_data(in->command)));
468         snprintf(ident, sizeof(ident), "%s[%d]", arg0, in->proc.pid);
469         ulog_open(ULOG_SYSLOG, LOG_DAEMON, ident);
470
471         do {
472                 str = ustream_get_read_buf(s, &len);
473                 if (!str)
474                         break;
475
476                 newline = memchr(str, '\n', len);
477                 if (!newline && (s->r.buffer_len != len))
478                         break;
479
480                 if (newline) {
481                         *newline = 0;
482                         len = newline + 1 - str;
483                 }
484                 ulog(prio, "%s\n", str);
485
486                 ustream_consume(s, len);
487         } while (1);
488
489         ulog_open(ULOG_SYSLOG, LOG_DAEMON, "procd");
490 }
491
492 static void
493 instance_stdout(struct ustream *s, int bytes)
494 {
495         instance_stdio(s, LOG_INFO,
496                        container_of(s, struct service_instance, _stdout.stream));
497 }
498
499 static void
500 instance_stderr(struct ustream *s, int bytes)
501 {
502         instance_stdio(s, LOG_ERR,
503                        container_of(s, struct service_instance, _stderr.stream));
504 }
505
506 static void
507 instance_timeout(struct uloop_timeout *t)
508 {
509         struct service_instance *in;
510
511         in = container_of(t, struct service_instance, timeout);
512
513         if (in->halt) {
514                 LOG("Instance %s::%s pid %d not stopped on SIGTERM, sending SIGKILL instead\n",
515                                 in->srv->name, in->name, in->proc.pid);
516                 kill(in->proc.pid, SIGKILL);
517         } else if (in->restart || in->respawn)
518                 instance_start(in);
519 }
520
521 static void
522 instance_delete(struct service_instance *in)
523 {
524         struct service *s = in->srv;
525
526         avl_delete(&s->instances.avl, &in->node.avl);
527         instance_free(in);
528         service_stopped(s);
529 }
530
531 static void
532 instance_exit(struct uloop_process *p, int ret)
533 {
534         struct service_instance *in;
535         struct timespec tp;
536         long runtime;
537
538         in = container_of(p, struct service_instance, proc);
539
540         clock_gettime(CLOCK_MONOTONIC, &tp);
541         runtime = tp.tv_sec - in->start.tv_sec;
542
543         DEBUG(2, "Instance %s::%s exit with error code %d after %ld seconds\n", in->srv->name, in->name, ret, runtime);
544
545         uloop_timeout_cancel(&in->timeout);
546         service_event("instance.stop", in->srv->name, in->name);
547
548         if (in->halt) {
549                 instance_removepid(in);
550                 if (in->restart)
551                         instance_start(in);
552                 else
553                         instance_delete(in);
554         } else if (in->restart) {
555                 instance_start(in);
556         } else if (in->respawn) {
557                 if (runtime < in->respawn_threshold)
558                         in->respawn_count++;
559                 else
560                         in->respawn_count = 0;
561                 if (in->respawn_count > in->respawn_retry && in->respawn_retry > 0 ) {
562                         LOG("Instance %s::%s s in a crash loop %d crashes, %ld seconds since last crash\n",
563                                                                 in->srv->name, in->name, in->respawn_count, runtime);
564                         in->restart = in->respawn = 0;
565                         in->halt = 1;
566                         service_event("instance.fail", in->srv->name, in->name);
567                 } else {
568                         service_event("instance.respawn", in->srv->name, in->name);
569                         uloop_timeout_set(&in->timeout, in->respawn_timeout * 1000);
570                 }
571         }
572 }
573
574 void
575 instance_stop(struct service_instance *in, bool halt)
576 {
577         if (!in->proc.pending) {
578                 if (halt)
579                         instance_delete(in);
580                 return;
581         }
582         in->halt = halt;
583         in->restart = in->respawn = false;
584         kill(in->proc.pid, SIGTERM);
585         uloop_timeout_set(&in->timeout, in->term_timeout * 1000);
586 }
587
588 static void
589 instance_restart(struct service_instance *in)
590 {
591         if (!in->proc.pending)
592                 return;
593
594         if (in->reload_signal) {
595                 kill(in->proc.pid, in->reload_signal);
596                 return;
597         }
598
599         in->halt = true;
600         in->restart = true;
601         kill(in->proc.pid, SIGTERM);
602         uloop_timeout_set(&in->timeout, in->term_timeout * 1000);
603 }
604
605 static bool string_changed(const char *a, const char *b)
606 {
607         return !((!a && !b) || (a && b && !strcmp(a, b)));
608 }
609
610 static bool
611 instance_config_changed(struct service_instance *in, struct service_instance *in_new)
612 {
613         if (!in->valid)
614                 return true;
615
616         if (!blob_attr_equal(in->command, in_new->command))
617                 return true;
618
619         if (!blobmsg_list_equal(&in->env, &in_new->env))
620                 return true;
621
622         if (!blobmsg_list_equal(&in->netdev, &in_new->netdev))
623                 return true;
624
625         if (!blobmsg_list_equal(&in->file, &in_new->file))
626                 return true;
627
628         if (in->nice != in_new->nice)
629                 return true;
630
631         if (string_changed(in->user, in_new->user))
632                 return true;
633
634         if (in->uid != in_new->uid)
635                 return true;
636
637         if (in->gid != in_new->gid)
638                 return true;
639
640         if (string_changed(in->pidfile, in_new->pidfile))
641                 return true;
642
643         if (in->respawn_retry != in_new->respawn_retry)
644                 return true;
645         if (in->respawn_threshold != in_new->respawn_threshold)
646                 return true;
647         if (in->respawn_timeout != in_new->respawn_timeout)
648                 return true;
649
650         if ((!in->seccomp && in_new->seccomp) ||
651             (in->seccomp && !in_new->seccomp) ||
652             (in->seccomp && in_new->seccomp && strcmp(in->seccomp, in_new->seccomp)))
653                 return true;
654
655         if (!blobmsg_list_equal(&in->limits, &in_new->limits))
656                 return true;
657
658         if (!blobmsg_list_equal(&in->jail.mount, &in_new->jail.mount))
659                 return true;
660
661         if (!blobmsg_list_equal(&in->errors, &in_new->errors))
662                 return true;
663
664         return false;
665 }
666
667 static bool
668 instance_netdev_cmp(struct blobmsg_list_node *l1, struct blobmsg_list_node *l2)
669 {
670         struct instance_netdev *n1 = container_of(l1, struct instance_netdev, node);
671         struct instance_netdev *n2 = container_of(l2, struct instance_netdev, node);
672
673         return n1->ifindex == n2->ifindex;
674 }
675
676 static void
677 instance_netdev_update(struct blobmsg_list_node *l)
678 {
679         struct instance_netdev *n = container_of(l, struct instance_netdev, node);
680
681         n->ifindex = if_nametoindex(n->node.avl.key);
682 }
683
684 static bool
685 instance_file_cmp(struct blobmsg_list_node *l1, struct blobmsg_list_node *l2)
686 {
687         struct instance_file *f1 = container_of(l1, struct instance_file, node);
688         struct instance_file *f2 = container_of(l2, struct instance_file, node);
689
690         return !memcmp(f1->md5, f2->md5, sizeof(f1->md5));
691 }
692
693 static void
694 instance_file_update(struct blobmsg_list_node *l)
695 {
696         struct instance_file *f = container_of(l, struct instance_file, node);
697         md5_ctx_t md5;
698         char buf[256];
699         int len, fd;
700
701         memset(f->md5, 0, sizeof(f->md5));
702
703         fd = open(l->avl.key, O_RDONLY);
704         if (fd < 0)
705                 return;
706
707         md5_begin(&md5);
708         do {
709                 len = read(fd, buf, sizeof(buf));
710                 if (len < 0) {
711                         if (errno == EINTR)
712                                 continue;
713
714                         break;
715                 }
716                 if (!len)
717                         break;
718
719                 md5_hash(buf, len, &md5);
720         } while(1);
721
722         md5_end(f->md5, &md5);
723         close(fd);
724 }
725
726 static void
727 instance_fill_any(struct blobmsg_list *l, struct blob_attr *cur)
728 {
729         if (!cur)
730                 return;
731
732         blobmsg_list_fill(l, blobmsg_data(cur), blobmsg_data_len(cur), false);
733 }
734
735 static bool
736 instance_fill_array(struct blobmsg_list *l, struct blob_attr *cur, blobmsg_update_cb cb, bool array)
737 {
738         struct blobmsg_list_node *node;
739
740         if (!cur)
741                 return true;
742
743         if (!blobmsg_check_attr_list(cur, BLOBMSG_TYPE_STRING))
744                 return false;
745
746         blobmsg_list_fill(l, blobmsg_data(cur), blobmsg_data_len(cur), array);
747         if (cb) {
748                 blobmsg_list_for_each(l, node)
749                         cb(node);
750         }
751         return true;
752 }
753
754 static int
755 instance_jail_parse(struct service_instance *in, struct blob_attr *attr)
756 {
757         struct blob_attr *tb[__JAIL_ATTR_MAX];
758         struct jail *jail = &in->jail;
759         struct stat s;
760
761         if (stat("/sbin/ujail", &s))
762                 return 0;
763
764         blobmsg_parse(jail_attr, __JAIL_ATTR_MAX, tb,
765                 blobmsg_data(attr), blobmsg_data_len(attr));
766
767         jail->argc = 2;
768
769         if (tb[JAIL_ATTR_NAME]) {
770                 jail->name = blobmsg_get_string(tb[JAIL_ATTR_NAME]);
771                 jail->argc += 2;
772         }
773         if (tb[JAIL_ATTR_HOSTNAME]) {
774                 jail->hostname = blobmsg_get_string(tb[JAIL_ATTR_HOSTNAME]);
775                 jail->argc += 2;
776         }
777         if (tb[JAIL_ATTR_PROCFS]) {
778                 jail->procfs = blobmsg_get_bool(tb[JAIL_ATTR_PROCFS]);
779                 jail->argc++;
780         }
781         if (tb[JAIL_ATTR_SYSFS]) {
782                 jail->sysfs = blobmsg_get_bool(tb[JAIL_ATTR_SYSFS]);
783                 jail->argc++;
784         }
785         if (tb[JAIL_ATTR_UBUS]) {
786                 jail->ubus = blobmsg_get_bool(tb[JAIL_ATTR_UBUS]);
787                 jail->argc++;
788         }
789         if (tb[JAIL_ATTR_LOG]) {
790                 jail->log = blobmsg_get_bool(tb[JAIL_ATTR_LOG]);
791                 jail->argc++;
792         }
793         if (tb[JAIL_ATTR_RONLY]) {
794                 jail->ronly = blobmsg_get_bool(tb[JAIL_ATTR_RONLY]);
795                 jail->argc++;
796         }
797         if (tb[JAIL_ATTR_MOUNT]) {
798                 struct blob_attr *cur;
799                 int rem;
800
801                 blobmsg_for_each_attr(cur, tb[JAIL_ATTR_MOUNT], rem)
802                         jail->argc += 2;
803                 instance_fill_array(&jail->mount, tb[JAIL_ATTR_MOUNT], NULL, false);
804         }
805         if (in->seccomp)
806                 jail->argc += 2;
807
808         return 1;
809 }
810
811 static bool
812 instance_config_parse_command(struct service_instance *in, struct blob_attr **tb)
813 {
814         struct blob_attr *cur, *cur2;
815         bool ret = false;
816         int rem;
817
818         cur = tb[INSTANCE_ATTR_COMMAND];
819         if (!cur) {
820                 in->command = NULL;
821                 return true;
822         }
823
824         if (!blobmsg_check_attr_list(cur, BLOBMSG_TYPE_STRING))
825                 return false;
826
827         blobmsg_for_each_attr(cur2, cur, rem) {
828                 ret = true;
829                 break;
830         }
831
832         in->command = cur;
833         return ret;
834 }
835
836 static bool
837 instance_config_parse(struct service_instance *in)
838 {
839         struct blob_attr *tb[__INSTANCE_ATTR_MAX];
840         struct blob_attr *cur, *cur2;
841         int rem;
842
843         blobmsg_parse(instance_attr, __INSTANCE_ATTR_MAX, tb,
844                 blobmsg_data(in->config), blobmsg_data_len(in->config));
845
846         if (!instance_config_parse_command(in, tb))
847                 return false;
848
849         if (tb[INSTANCE_ATTR_TERMTIMEOUT])
850                 in->term_timeout = blobmsg_get_u32(tb[INSTANCE_ATTR_TERMTIMEOUT]);
851         if (tb[INSTANCE_ATTR_RESPAWN]) {
852                 int i = 0;
853                 uint32_t vals[3] = { 3600, 5, 5};
854
855                 blobmsg_for_each_attr(cur2, tb[INSTANCE_ATTR_RESPAWN], rem) {
856                         if ((i >= 3) && (blobmsg_type(cur2) == BLOBMSG_TYPE_STRING))
857                                 continue;
858                         vals[i] = atoi(blobmsg_get_string(cur2));
859                         i++;
860                 }
861                 in->respawn = true;
862                 in->respawn_count = 0;
863                 in->respawn_threshold = vals[0];
864                 in->respawn_timeout = vals[1];
865                 in->respawn_retry = vals[2];
866         }
867         if (tb[INSTANCE_ATTR_TRIGGER]) {
868                 in->trigger = tb[INSTANCE_ATTR_TRIGGER];
869                 trigger_add(in->trigger, in);
870         }
871
872         if (tb[INSTANCE_ATTR_WATCH]) {
873                 blobmsg_for_each_attr(cur2, tb[INSTANCE_ATTR_WATCH], rem) {
874                         if (blobmsg_type(cur2) != BLOBMSG_TYPE_STRING)
875                                 continue;
876                         DEBUG(3, "watch for %s\n", blobmsg_get_string(cur2));
877                         watch_add(blobmsg_get_string(cur2), in);
878                 }
879         }
880
881         if ((cur = tb[INSTANCE_ATTR_NICE])) {
882                 in->nice = (int8_t) blobmsg_get_u32(cur);
883                 if (in->nice < -20 || in->nice > 20)
884                         return false;
885         }
886
887         if (tb[INSTANCE_ATTR_USER]) {
888                 const char *user = blobmsg_get_string(tb[INSTANCE_ATTR_USER]);
889                 struct passwd *p = getpwnam(user);
890                 if (p) {
891                         in->user = strdup(user);
892                         in->uid = p->pw_uid;
893                         in->gid = p->pw_gid;
894                 }
895         }
896
897         if (tb[INSTANCE_ATTR_TRACE])
898                 in->trace = blobmsg_get_bool(tb[INSTANCE_ATTR_TRACE]);
899
900         if (tb[INSTANCE_ATTR_NO_NEW_PRIVS])
901                 in->no_new_privs = blobmsg_get_bool(tb[INSTANCE_ATTR_NO_NEW_PRIVS]);
902
903         if (!in->trace && tb[INSTANCE_ATTR_SECCOMP])
904                 in->seccomp = blobmsg_get_string(tb[INSTANCE_ATTR_SECCOMP]);
905
906         if (tb[INSTANCE_ATTR_PIDFILE]) {
907                 char *pidfile = blobmsg_get_string(tb[INSTANCE_ATTR_PIDFILE]);
908                 if (pidfile)
909                         in->pidfile = pidfile;
910         }
911
912         if (tb[INSTANCE_ATTR_RELOADSIG])
913                 in->reload_signal = blobmsg_get_u32(tb[INSTANCE_ATTR_RELOADSIG]);
914
915         if (!in->trace && tb[INSTANCE_ATTR_JAIL])
916                 in->has_jail = instance_jail_parse(in, tb[INSTANCE_ATTR_JAIL]);
917
918         if (tb[INSTANCE_ATTR_STDOUT] && blobmsg_get_bool(tb[INSTANCE_ATTR_STDOUT]))
919                 in->_stdout.fd.fd = -1;
920
921         if (tb[INSTANCE_ATTR_STDERR] && blobmsg_get_bool(tb[INSTANCE_ATTR_STDERR]))
922                 in->_stderr.fd.fd = -1;
923
924         instance_fill_any(&in->data, tb[INSTANCE_ATTR_DATA]);
925
926         if (!instance_fill_array(&in->env, tb[INSTANCE_ATTR_ENV], NULL, false))
927                 return false;
928
929         if (!instance_fill_array(&in->netdev, tb[INSTANCE_ATTR_NETDEV], instance_netdev_update, true))
930                 return false;
931
932         if (!instance_fill_array(&in->file, tb[INSTANCE_ATTR_FILE], instance_file_update, true))
933                 return false;
934
935         if (!instance_fill_array(&in->limits, tb[INSTANCE_ATTR_LIMITS], NULL, false))
936                 return false;
937
938         if (!instance_fill_array(&in->errors, tb[INSTANCE_ATTR_ERROR], NULL, true))
939                 return false;
940
941         return true;
942 }
943
944 static void
945 instance_config_cleanup(struct service_instance *in)
946 {
947         blobmsg_list_free(&in->env);
948         blobmsg_list_free(&in->data);
949         blobmsg_list_free(&in->netdev);
950         blobmsg_list_free(&in->file);
951         blobmsg_list_free(&in->limits);
952         blobmsg_list_free(&in->errors);
953         blobmsg_list_free(&in->jail.mount);
954 }
955
956 static void
957 instance_config_move(struct service_instance *in, struct service_instance *in_src)
958 {
959         instance_config_cleanup(in);
960         blobmsg_list_move(&in->env, &in_src->env);
961         blobmsg_list_move(&in->data, &in_src->data);
962         blobmsg_list_move(&in->netdev, &in_src->netdev);
963         blobmsg_list_move(&in->file, &in_src->file);
964         blobmsg_list_move(&in->limits, &in_src->limits);
965         blobmsg_list_move(&in->errors, &in_src->errors);
966         blobmsg_list_move(&in->jail.mount, &in_src->jail.mount);
967         in->trigger = in_src->trigger;
968         in->command = in_src->command;
969         in->pidfile = in_src->pidfile;
970         in->respawn = in_src->respawn;
971         in->respawn_retry = in_src->respawn_retry;
972         in->respawn_threshold = in_src->respawn_threshold;
973         in->respawn_timeout = in_src->respawn_timeout;
974         in->name = in_src->name;
975         in->trace = in_src->trace;
976         in->seccomp = in_src->seccomp;
977         in->node.avl.key = in_src->node.avl.key;
978
979         free(in->config);
980         in->config = in_src->config;
981         in_src->config = NULL;
982 }
983
984 void
985 instance_update(struct service_instance *in, struct service_instance *in_new)
986 {
987         bool changed = instance_config_changed(in, in_new);
988         bool running = in->proc.pending;
989         bool stopping = in->halt;
990
991         if (!running || stopping) {
992                 instance_config_move(in, in_new);
993                 instance_start(in);
994         } else {
995                 if (changed)
996                         instance_restart(in);
997                 instance_config_move(in, in_new);
998                 /* restart happens in the child callback handler */
999         }
1000 }
1001
1002 void
1003 instance_free(struct service_instance *in)
1004 {
1005         instance_free_stdio(in);
1006         uloop_process_delete(&in->proc);
1007         uloop_timeout_cancel(&in->timeout);
1008         trigger_del(in);
1009         watch_del(in);
1010         instance_config_cleanup(in);
1011         free(in->config);
1012         free(in->user);
1013         free(in);
1014 }
1015
1016 void
1017 instance_init(struct service_instance *in, struct service *s, struct blob_attr *config)
1018 {
1019         config = blob_memdup(config);
1020         in->srv = s;
1021         in->name = blobmsg_name(config);
1022         in->config = config;
1023         in->timeout.cb = instance_timeout;
1024         in->proc.cb = instance_exit;
1025         in->term_timeout = 5;
1026
1027         in->_stdout.fd.fd = -2;
1028         in->_stdout.stream.string_data = true;
1029         in->_stdout.stream.notify_read = instance_stdout;
1030
1031         in->_stderr.fd.fd = -2;
1032         in->_stderr.stream.string_data = true;
1033         in->_stderr.stream.notify_read = instance_stderr;
1034
1035         blobmsg_list_init(&in->netdev, struct instance_netdev, node, instance_netdev_cmp);
1036         blobmsg_list_init(&in->file, struct instance_file, node, instance_file_cmp);
1037         blobmsg_list_simple_init(&in->env);
1038         blobmsg_list_simple_init(&in->data);
1039         blobmsg_list_simple_init(&in->limits);
1040         blobmsg_list_simple_init(&in->errors);
1041         blobmsg_list_simple_init(&in->jail.mount);
1042         in->valid = instance_config_parse(in);
1043 }
1044
1045 void instance_dump(struct blob_buf *b, struct service_instance *in, int verbose)
1046 {
1047         void *i;
1048
1049         if (!in->valid)
1050                 return;
1051
1052         i = blobmsg_open_table(b, in->name);
1053         blobmsg_add_u8(b, "running", in->proc.pending);
1054         if (in->proc.pending)
1055                 blobmsg_add_u32(b, "pid", in->proc.pid);
1056         if (in->command)
1057                 blobmsg_add_blob(b, in->command);
1058         blobmsg_add_u32(b, "term_timeout", in->term_timeout);
1059
1060         if (!avl_is_empty(&in->errors.avl)) {
1061                 struct blobmsg_list_node *var;
1062                 void *e = blobmsg_open_array(b, "errors");
1063                 blobmsg_list_for_each(&in->errors, var)
1064                         blobmsg_add_string(b, NULL, blobmsg_data(var->data));
1065                 blobmsg_close_table(b, e);
1066         }
1067
1068         if (!avl_is_empty(&in->env.avl)) {
1069                 struct blobmsg_list_node *var;
1070                 void *e = blobmsg_open_table(b, "env");
1071                 blobmsg_list_for_each(&in->env, var)
1072                         blobmsg_add_string(b, blobmsg_name(var->data), blobmsg_data(var->data));
1073                 blobmsg_close_table(b, e);
1074         }
1075
1076         if (!avl_is_empty(&in->data.avl)) {
1077                 struct blobmsg_list_node *var;
1078                 void *e = blobmsg_open_table(b, "data");
1079                 blobmsg_list_for_each(&in->data, var)
1080                         blobmsg_add_blob(b, var->data);
1081                 blobmsg_close_table(b, e);
1082         }
1083
1084         if (!avl_is_empty(&in->limits.avl)) {
1085                 struct blobmsg_list_node *var;
1086                 void *e = blobmsg_open_table(b, "limits");
1087                 blobmsg_list_for_each(&in->limits, var)
1088                         blobmsg_add_string(b, blobmsg_name(var->data), blobmsg_data(var->data));
1089                 blobmsg_close_table(b, e);
1090         }
1091
1092         if (in->reload_signal)
1093                 blobmsg_add_u32(b, "reload_signal", in->reload_signal);
1094
1095         if (in->respawn) {
1096                 void *r = blobmsg_open_table(b, "respawn");
1097                 blobmsg_add_u32(b, "threshold", in->respawn_threshold);
1098                 blobmsg_add_u32(b, "timeout", in->respawn_timeout);
1099                 blobmsg_add_u32(b, "retry", in->respawn_retry);
1100                 blobmsg_close_table(b, r);
1101         }
1102
1103         if (in->trace)
1104                 blobmsg_add_u8(b, "trace", true);
1105
1106         if (in->no_new_privs)
1107                 blobmsg_add_u8(b, "no_new_privs", true);
1108
1109         if (in->seccomp)
1110                 blobmsg_add_string(b, "seccomp", in->seccomp);
1111
1112         if (in->pidfile)
1113                 blobmsg_add_string(b, "pidfile", in->pidfile);
1114
1115         if (in->has_jail) {
1116                 void *r = blobmsg_open_table(b, "jail");
1117                 if (in->jail.name)
1118                         blobmsg_add_string(b, "name", in->jail.name);
1119                 if (in->jail.hostname)
1120                         blobmsg_add_string(b, "hostname", in->jail.hostname);
1121                 blobmsg_add_u8(b, "procfs", in->jail.procfs);
1122                 blobmsg_add_u8(b, "sysfs", in->jail.sysfs);
1123                 blobmsg_add_u8(b, "ubus", in->jail.ubus);
1124                 blobmsg_add_u8(b, "log", in->jail.log);
1125                 blobmsg_add_u8(b, "ronly", in->jail.ronly);
1126                 blobmsg_close_table(b, r);
1127                 if (!avl_is_empty(&in->jail.mount.avl)) {
1128                         struct blobmsg_list_node *var;
1129                         void *e = blobmsg_open_table(b, "mount");
1130                         blobmsg_list_for_each(&in->jail.mount, var)
1131                                 blobmsg_add_string(b, blobmsg_name(var->data), blobmsg_data(var->data));
1132                         blobmsg_close_table(b, e);
1133                 }
1134         }
1135
1136         if (verbose && in->trigger)
1137                 blobmsg_add_blob(b, in->trigger);
1138
1139         blobmsg_close_table(b, i);
1140 }