alias: add (and call) a check_state function to fix dynamically creating aliases...
[project/netifd.git] / main.c
1 /*
2  * netifd - network interface daemon
3  * Copyright (C) 2012 Felix Fietkau <nbd@openwrt.org>
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License version 2
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 #include <stdio.h>
15 #include <stdlib.h>
16 #include <string.h>
17 #include <getopt.h>
18 #include <unistd.h>
19 #include <signal.h>
20 #include <stdarg.h>
21 #include <syslog.h>
22
23 #include "netifd.h"
24 #include "ubus.h"
25 #include "config.h"
26 #include "system.h"
27 #include "interface.h"
28
29 unsigned int debug_mask = 0;
30 const char *main_path = DEFAULT_MAIN_PATH;
31 const char *resolv_conf = DEFAULT_RESOLV_CONF;
32 static char **global_argv;
33
34 static struct list_head process_list = LIST_HEAD_INIT(process_list);
35
36 #define DEFAULT_LOG_LEVEL L_NOTICE
37
38 static int log_level = DEFAULT_LOG_LEVEL;
39 static const int log_class[] = {
40         [L_CRIT] = LOG_CRIT,
41         [L_WARNING] = LOG_WARNING,
42         [L_NOTICE] = LOG_NOTICE,
43         [L_INFO] = LOG_INFO,
44         [L_DEBUG] = LOG_DEBUG
45 };
46
47 #ifdef DUMMY_MODE
48 #define use_syslog false
49 #else
50 static bool use_syslog = true;
51 #endif
52
53
54 static void
55 netifd_delete_process(struct netifd_process *proc)
56 {
57         list_del(&proc->list);
58         ustream_free(&proc->log.stream);
59         close(proc->log.fd.fd);
60 }
61
62 void
63 netifd_log_message(int priority, const char *format, ...)
64 {
65         va_list vl;
66
67         if (priority > log_level)
68                 return;
69
70         va_start(vl, format);
71         if (use_syslog)
72                 vsyslog(log_class[priority], format, vl);
73         else
74                 vfprintf(stderr, format, vl);
75         va_end(vl);
76 }
77
78 static void
79 netifd_process_log_read_cb(struct ustream *s, int bytes)
80 {
81         struct netifd_process *proc;
82         const char *log_prefix;
83         char *data;
84         int len = 0;
85
86         proc = container_of(s, struct netifd_process, log.stream);
87         log_prefix = proc->log_prefix;
88         if (!log_prefix)
89                 log_prefix = "process";
90
91         do {
92                 char *newline;
93
94                 data = ustream_get_read_buf(s, &len);
95                 if (!len)
96                         break;
97
98                 newline = strchr(data, '\n');
99
100                 if (proc->log_overflow) {
101                         if (newline) {
102                                 len = newline + 1 - data;
103                                 proc->log_overflow = false;
104                         }
105                 } else if (newline) {
106                         *newline = 0;
107                         len = newline + 1 - data;
108                         netifd_log_message(L_NOTICE, "%s (%d): %s\n",
109                                 log_prefix, proc->uloop.pid, data);
110                 } else if (len == s->r.buffer_len) {
111                         netifd_log_message(L_NOTICE, "%s (%d): %s [...]\n",
112                                 log_prefix, proc->uloop.pid, data);
113                         proc->log_overflow = true;
114                 }
115                 ustream_consume(s, len);
116         } while (1);
117 }
118
119 static void
120 netifd_process_cb(struct uloop_process *proc, int ret)
121 {
122         struct netifd_process *np;
123         np = container_of(proc, struct netifd_process, uloop);
124
125         while (ustream_poll(&np->log.stream));
126         netifd_delete_process(np);
127         return np->cb(np, ret);
128 }
129
130 int
131 netifd_start_process(const char **argv, char **env, struct netifd_process *proc)
132 {
133         int pfds[2];
134         int pid;
135
136         netifd_kill_process(proc);
137
138         if (pipe(pfds) < 0)
139                 return -1;
140
141         if ((pid = fork()) < 0)
142                 goto error;
143
144         if (!pid) {
145                 if (env) {
146                         while (*env) {
147                                 putenv(*env);
148                                 env++;
149                         }
150                 }
151                 if (proc->dir_fd >= 0)
152                         fchdir(proc->dir_fd);
153
154                 dup2(pfds[1], 0);
155                 dup2(pfds[1], 1);
156                 dup2(pfds[1], 2);
157
158                 close(pfds[0]);
159                 close(pfds[1]);
160
161                 execvp(argv[0], (char **) argv);
162                 exit(127);
163         }
164
165         if (pid < 0)
166                 goto error;
167
168         close(pfds[1]);
169         proc->uloop.cb = netifd_process_cb;
170         proc->uloop.pid = pid;
171         uloop_process_add(&proc->uloop);
172         list_add_tail(&proc->list, &process_list);
173
174         system_fd_set_cloexec(pfds[0]);
175         proc->log.stream.string_data = true;
176         proc->log.stream.notify_read = netifd_process_log_read_cb;
177         ustream_fd_init(&proc->log, pfds[0]);
178
179         return 0;
180
181 error:
182         close(pfds[0]);
183         close(pfds[1]);
184         return -1;
185 }
186
187 void
188 netifd_kill_process(struct netifd_process *proc)
189 {
190         if (!proc->uloop.pending)
191                 return;
192
193         kill(proc->uloop.pid, SIGKILL);
194         uloop_process_delete(&proc->uloop);
195         netifd_delete_process(proc);
196 }
197
198 static void netifd_do_restart(struct uloop_timeout *timeout)
199 {
200         execvp(global_argv[0], global_argv);
201 }
202
203 static void netifd_do_reload(struct uloop_timeout *timeout)
204 {
205         config_init_all();
206 }
207
208 static struct uloop_timeout main_timer;
209
210 void netifd_reload(void)
211 {
212         main_timer.cb = netifd_do_reload;
213         uloop_timeout_set(&main_timer, 100);
214 }
215
216 void netifd_restart(void)
217 {
218         main_timer.cb = netifd_do_restart;
219         interface_set_down(NULL);
220         uloop_timeout_set(&main_timer, 1000);
221 }
222
223 static int usage(const char *progname)
224 {
225         fprintf(stderr, "Usage: %s [options]\n"
226                 "Options:\n"
227                 " -d <mask>:            Mask for debug messages\n"
228                 " -s <path>:            Path to the ubus socket\n"
229                 " -p <path>:            Path to netifd addons (default: %s)\n"
230                 " -h <path>:            Path to the hotplug script\n"
231                 " -r <path>:            Path to resolv.conf\n"
232                 " -l <level>:           Log output level (default: %d)\n"
233                 " -S:                   Use stderr instead of syslog for log messages\n"
234                 "                       (default: "DEFAULT_HOTPLUG_PATH")\n"
235                 "\n", progname, main_path, DEFAULT_LOG_LEVEL);
236
237         return 1;
238 }
239
240 static void
241 netifd_handle_signal(int signo)
242 {
243         uloop_end();
244 }
245
246 static void
247 netifd_setup_signals(void)
248 {
249         struct sigaction s;
250
251         memset(&s, 0, sizeof(s));
252         s.sa_handler = netifd_handle_signal;
253         s.sa_flags = 0;
254         sigaction(SIGINT, &s, NULL);
255         sigaction(SIGTERM, &s, NULL);
256         sigaction(SIGUSR1, &s, NULL);
257         sigaction(SIGUSR2, &s, NULL);
258
259         s.sa_handler = SIG_IGN;
260         sigaction(SIGPIPE, &s, NULL);
261 }
262
263 static void
264 netifd_kill_processes(void)
265 {
266         struct netifd_process *proc, *tmp;
267
268         list_for_each_entry_safe(proc, tmp, &process_list, list)
269                 netifd_kill_process(proc);
270 }
271
272 int main(int argc, char **argv)
273 {
274         const char *socket = NULL;
275         int ch;
276
277         global_argv = argv;
278
279         while ((ch = getopt(argc, argv, "d:s:p:h:r:l:S")) != -1) {
280                 switch(ch) {
281                 case 'd':
282                         debug_mask = strtoul(optarg, NULL, 0);
283                         break;
284                 case 's':
285                         socket = optarg;
286                         break;
287                 case 'p':
288                         main_path = optarg;
289                         break;
290                 case 'h':
291                         hotplug_cmd_path = optarg;
292                         break;
293                 case 'r':
294                         resolv_conf = optarg;
295                         break;
296                 case 'l':
297                         log_level = atoi(optarg);
298                         if (log_level >= ARRAY_SIZE(log_class))
299                                 log_level = ARRAY_SIZE(log_class) - 1;
300                         break;
301 #ifndef DUMMY_MODE
302                 case 'S':
303                         use_syslog = false;
304                         break;
305 #endif
306                 default:
307                         return usage(argv[0]);
308                 }
309         }
310
311         if (use_syslog)
312                 openlog("netifd", 0, LOG_DAEMON);
313
314         netifd_setup_signals();
315         if (netifd_ubus_init(socket) < 0) {
316                 fprintf(stderr, "Failed to connect to ubus\n");
317                 return 1;
318         }
319
320         if (system_init()) {
321                 fprintf(stderr, "Failed to initialize system control\n");
322                 return 1;
323         }
324
325         config_init_all();
326
327         uloop_run();
328         netifd_kill_processes();
329
330         netifd_ubus_done();
331
332         if (use_syslog)
333                 closelog();
334
335         return 0;
336 }