53528a0137cb285a92d1a77a2d5d3579fa56b6df
[oweals/odhcpd.git] / src / config.c
1 #include <fcntl.h>
2 #include <resolv.h>
3 #include <signal.h>
4 #include <arpa/inet.h>
5 #include <unistd.h>
6 #include <libgen.h>
7 #include <net/if.h>
8 #include <string.h>
9 #include <sys/stat.h>
10 #include <syslog.h>
11
12 #include <uci.h>
13 #include <uci_blob.h>
14 #include <libubox/utils.h>
15 #include <libubox/avl.h>
16 #include <libubox/avl-cmp.h>
17 #include <libubox/list.h>
18 #include <libubox/vlist.h>
19
20 #include "odhcpd.h"
21
22 static struct blob_buf b;
23 static int reload_pipe[2] = { -1, -1 };
24
25 static int lease_cmp(const void *k1, const void *k2, void *ptr);
26 static void lease_update(struct vlist_tree *tree, struct vlist_node *node_new,
27                          struct vlist_node *node_old);
28
29 struct vlist_tree leases = VLIST_TREE_INIT(leases, lease_cmp, lease_update, true, false);
30 AVL_TREE(interfaces, avl_strcmp, false, NULL);
31 struct config config = {.legacy = false, .main_dhcpv4 = false,
32                         .dhcp_cb = NULL, .dhcp_statefile = NULL,
33                         .log_level = LOG_WARNING};
34
35 #define START_DEFAULT   100
36 #define LIMIT_DEFAULT   150
37
38 enum {
39         IFACE_ATTR_INTERFACE,
40         IFACE_ATTR_IFNAME,
41         IFACE_ATTR_NETWORKID,
42         IFACE_ATTR_DYNAMICDHCP,
43         IFACE_ATTR_LEASETIME,
44         IFACE_ATTR_LIMIT,
45         IFACE_ATTR_START,
46         IFACE_ATTR_MASTER,
47         IFACE_ATTR_UPSTREAM,
48         IFACE_ATTR_RA,
49         IFACE_ATTR_DHCPV4,
50         IFACE_ATTR_DHCPV6,
51         IFACE_ATTR_NDP,
52         IFACE_ATTR_ROUTER,
53         IFACE_ATTR_DNS,
54         IFACE_ATTR_DOMAIN,
55         IFACE_ATTR_FILTER_CLASS,
56         IFACE_ATTR_DHCPV4_FORCERECONF,
57         IFACE_ATTR_DHCPV6_RAW,
58         IFACE_ATTR_DHCPV6_ASSIGNALL,
59         IFACE_ATTR_DHCPV6_PD,
60         IFACE_ATTR_DHCPV6_NA,
61         IFACE_ATTR_RA_DEFAULT,
62         IFACE_ATTR_RA_FLAGS,
63         IFACE_ATTR_RA_SLAAC,
64         IFACE_ATTR_RA_OFFLINK,
65         IFACE_ATTR_RA_PREFERENCE,
66         IFACE_ATTR_RA_ADVROUTER,
67         IFACE_ATTR_RA_MININTERVAL,
68         IFACE_ATTR_RA_MAXINTERVAL,
69         IFACE_ATTR_RA_LIFETIME,
70         IFACE_ATTR_RA_USELEASETIME,
71         IFACE_ATTR_RA_REACHABLETIME,
72         IFACE_ATTR_RA_RETRANSTIME,
73         IFACE_ATTR_RA_HOPLIMIT,
74         IFACE_ATTR_RA_MTU,
75         IFACE_ATTR_RA_DNS,
76         IFACE_ATTR_PD_MANAGER,
77         IFACE_ATTR_PD_CER,
78         IFACE_ATTR_NDPROXY_ROUTING,
79         IFACE_ATTR_NDPROXY_SLAVE,
80         IFACE_ATTR_PREFIX_FILTER,
81         IFACE_ATTR_MAX
82 };
83
84 static const struct blobmsg_policy iface_attrs[IFACE_ATTR_MAX] = {
85         [IFACE_ATTR_INTERFACE] = { .name = "interface", .type = BLOBMSG_TYPE_STRING },
86         [IFACE_ATTR_IFNAME] = { .name = "ifname", .type = BLOBMSG_TYPE_STRING },
87         [IFACE_ATTR_NETWORKID] = { .name = "networkid", .type = BLOBMSG_TYPE_STRING },
88         [IFACE_ATTR_DYNAMICDHCP] = { .name = "dynamicdhcp", .type = BLOBMSG_TYPE_BOOL },
89         [IFACE_ATTR_LEASETIME] = { .name = "leasetime", .type = BLOBMSG_TYPE_STRING },
90         [IFACE_ATTR_START] = { .name = "start", .type = BLOBMSG_TYPE_INT32 },
91         [IFACE_ATTR_LIMIT] = { .name = "limit", .type = BLOBMSG_TYPE_INT32 },
92         [IFACE_ATTR_MASTER] = { .name = "master", .type = BLOBMSG_TYPE_BOOL },
93         [IFACE_ATTR_UPSTREAM] = { .name = "upstream", .type = BLOBMSG_TYPE_ARRAY },
94         [IFACE_ATTR_RA] = { .name = "ra", .type = BLOBMSG_TYPE_STRING },
95         [IFACE_ATTR_DHCPV4] = { .name = "dhcpv4", .type = BLOBMSG_TYPE_STRING },
96         [IFACE_ATTR_DHCPV6] = { .name = "dhcpv6", .type = BLOBMSG_TYPE_STRING },
97         [IFACE_ATTR_NDP] = { .name = "ndp", .type = BLOBMSG_TYPE_STRING },
98         [IFACE_ATTR_ROUTER] = { .name = "router", .type = BLOBMSG_TYPE_ARRAY },
99         [IFACE_ATTR_DNS] = { .name = "dns", .type = BLOBMSG_TYPE_ARRAY },
100         [IFACE_ATTR_DOMAIN] = { .name = "domain", .type = BLOBMSG_TYPE_ARRAY },
101         [IFACE_ATTR_FILTER_CLASS] = { .name = "filter_class", .type = BLOBMSG_TYPE_STRING },
102         [IFACE_ATTR_DHCPV4_FORCERECONF] = { .name = "dhcpv4_forcereconf", .type = BLOBMSG_TYPE_BOOL },
103         [IFACE_ATTR_DHCPV6_RAW] = { .name = "dhcpv6_raw", .type = BLOBMSG_TYPE_STRING },
104         [IFACE_ATTR_DHCPV6_ASSIGNALL] = { .name ="dhcpv6_assignall", .type = BLOBMSG_TYPE_BOOL },
105         [IFACE_ATTR_DHCPV6_PD] = { .name = "dhcpv6_pd", .type = BLOBMSG_TYPE_BOOL },
106         [IFACE_ATTR_DHCPV6_NA] = { .name = "dhcpv6_na", .type = BLOBMSG_TYPE_BOOL },
107         [IFACE_ATTR_PD_MANAGER] = { .name = "pd_manager", .type = BLOBMSG_TYPE_STRING },
108         [IFACE_ATTR_PD_CER] = { .name = "pd_cer", .type = BLOBMSG_TYPE_STRING },
109         [IFACE_ATTR_RA_DEFAULT] = { .name = "ra_default", .type = BLOBMSG_TYPE_INT32 },
110         [IFACE_ATTR_RA_FLAGS] = { .name = "ra_flags", . type = BLOBMSG_TYPE_ARRAY },
111         [IFACE_ATTR_RA_SLAAC] = { .name = "ra_slaac", .type = BLOBMSG_TYPE_BOOL },
112         [IFACE_ATTR_RA_OFFLINK] = { .name = "ra_offlink", .type = BLOBMSG_TYPE_BOOL },
113         [IFACE_ATTR_RA_PREFERENCE] = { .name = "ra_preference", .type = BLOBMSG_TYPE_STRING },
114         [IFACE_ATTR_RA_ADVROUTER] = { .name = "ra_advrouter", .type = BLOBMSG_TYPE_BOOL },
115         [IFACE_ATTR_RA_MININTERVAL] = { .name = "ra_mininterval", .type = BLOBMSG_TYPE_INT32 },
116         [IFACE_ATTR_RA_MAXINTERVAL] = { .name = "ra_maxinterval", .type = BLOBMSG_TYPE_INT32 },
117         [IFACE_ATTR_RA_LIFETIME] = { .name = "ra_lifetime", .type = BLOBMSG_TYPE_INT32 },
118         [IFACE_ATTR_RA_USELEASETIME] = { .name = "ra_useleasetime", .type = BLOBMSG_TYPE_BOOL },
119         [IFACE_ATTR_RA_REACHABLETIME] = { .name = "ra_reachabletime", .type = BLOBMSG_TYPE_INT32 },
120         [IFACE_ATTR_RA_RETRANSTIME] = { .name = "ra_retranstime", .type = BLOBMSG_TYPE_INT32 },
121         [IFACE_ATTR_RA_HOPLIMIT] = { .name = "ra_hoplimit", .type = BLOBMSG_TYPE_INT32 },
122         [IFACE_ATTR_RA_MTU] = { .name = "ra_mtu", .type = BLOBMSG_TYPE_INT32 },
123         [IFACE_ATTR_RA_DNS] = { .name = "ra_dns", .type = BLOBMSG_TYPE_BOOL },
124         [IFACE_ATTR_NDPROXY_ROUTING] = { .name = "ndproxy_routing", .type = BLOBMSG_TYPE_BOOL },
125         [IFACE_ATTR_NDPROXY_SLAVE] = { .name = "ndproxy_slave", .type = BLOBMSG_TYPE_BOOL },
126         [IFACE_ATTR_PREFIX_FILTER] = { .name = "prefix_filter", .type = BLOBMSG_TYPE_STRING },
127 };
128
129 static const struct uci_blob_param_info iface_attr_info[IFACE_ATTR_MAX] = {
130         [IFACE_ATTR_UPSTREAM] = { .type = BLOBMSG_TYPE_STRING },
131         [IFACE_ATTR_DNS] = { .type = BLOBMSG_TYPE_STRING },
132         [IFACE_ATTR_DOMAIN] = { .type = BLOBMSG_TYPE_STRING },
133 };
134
135 const struct uci_blob_param_list interface_attr_list = {
136         .n_params = IFACE_ATTR_MAX,
137         .params = iface_attrs,
138         .info = iface_attr_info,
139 };
140
141 enum {
142         LEASE_ATTR_IP,
143         LEASE_ATTR_MAC,
144         LEASE_ATTR_DUID,
145         LEASE_ATTR_HOSTID,
146         LEASE_ATTR_LEASETIME,
147         LEASE_ATTR_NAME,
148         LEASE_ATTR_MAX
149 };
150
151 static const struct blobmsg_policy lease_attrs[LEASE_ATTR_MAX] = {
152         [LEASE_ATTR_IP] = { .name = "ip", .type = BLOBMSG_TYPE_STRING },
153         [LEASE_ATTR_MAC] = { .name = "mac", .type = BLOBMSG_TYPE_STRING },
154         [LEASE_ATTR_DUID] = { .name = "duid", .type = BLOBMSG_TYPE_STRING },
155         [LEASE_ATTR_HOSTID] = { .name = "hostid", .type = BLOBMSG_TYPE_STRING },
156         [LEASE_ATTR_LEASETIME] = { .name = "leasetime", .type = BLOBMSG_TYPE_STRING },
157         [LEASE_ATTR_NAME] = { .name = "name", .type = BLOBMSG_TYPE_STRING },
158 };
159
160 const struct uci_blob_param_list lease_attr_list = {
161         .n_params = LEASE_ATTR_MAX,
162         .params = lease_attrs,
163 };
164
165 enum {
166         ODHCPD_ATTR_LEGACY,
167         ODHCPD_ATTR_MAINDHCP,
168         ODHCPD_ATTR_LEASEFILE,
169         ODHCPD_ATTR_LEASETRIGGER,
170         ODHCPD_ATTR_LOGLEVEL,
171         ODHCPD_ATTR_MAX
172 };
173
174 static const struct blobmsg_policy odhcpd_attrs[ODHCPD_ATTR_MAX] = {
175         [ODHCPD_ATTR_LEGACY] = { .name = "legacy", .type = BLOBMSG_TYPE_BOOL },
176         [ODHCPD_ATTR_MAINDHCP] = { .name = "maindhcp", .type = BLOBMSG_TYPE_BOOL },
177         [ODHCPD_ATTR_LEASEFILE] = { .name = "leasefile", .type = BLOBMSG_TYPE_STRING },
178         [ODHCPD_ATTR_LEASETRIGGER] = { .name = "leasetrigger", .type = BLOBMSG_TYPE_STRING },
179         [ODHCPD_ATTR_LOGLEVEL] = { .name = "loglevel", .type = BLOBMSG_TYPE_INT32 },
180 };
181
182 const struct uci_blob_param_list odhcpd_attr_list = {
183         .n_params = ODHCPD_ATTR_MAX,
184         .params = odhcpd_attrs,
185 };
186
187 static const struct { const char *name; uint8_t flag; } ra_flags[] = {
188         { .name = "managed-config", .flag = ND_RA_FLAG_MANAGED },
189         { .name = "other-config", .flag = ND_RA_FLAG_OTHER },
190         { .name = "home-agent", .flag = ND_RA_FLAG_HOME_AGENT },
191         { .name = "none", . flag = 0 },
192         { .name = NULL, },
193 };
194
195 static int mkdir_p(char *dir, mode_t mask)
196 {
197         char *l = strrchr(dir, '/');
198         int ret;
199
200         if (!l)
201                 return 0;
202
203         *l = '\0';
204
205         if (mkdir_p(dir, mask))
206                 return -1;
207
208         *l = '/';
209
210         ret = mkdir(dir, mask);
211         if (ret && errno == EEXIST)
212                 return 0;
213
214         if (ret)
215                 syslog(LOG_ERR, "mkdir(%s, %d) failed: %m\n", dir, mask);
216
217         return ret;
218 }
219
220 static void set_interface_defaults(struct interface *iface)
221 {
222         iface->ignore = true;
223         iface->dhcpv4 = MODE_DISABLED;
224         iface->dhcpv6 = MODE_DISABLED;
225         iface->ra = MODE_DISABLED;
226         iface->ndp = MODE_DISABLED;
227         iface->learn_routes = 1;
228         iface->dhcpv4_leasetime = 43200;
229         iface->dhcpv4_start.s_addr = htonl(START_DEFAULT);
230         iface->dhcpv4_end.s_addr = htonl(START_DEFAULT + LIMIT_DEFAULT - 1);
231         iface->dhcpv6_assignall = true;
232         iface->dhcpv6_pd = true;
233         iface->dhcpv6_na = true;
234         iface->ra_flags = ND_RA_FLAG_OTHER;
235         iface->ra_slaac = true;
236         iface->ra_maxinterval = 600;
237         iface->ra_mininterval = iface->ra_maxinterval/3;
238         iface->ra_lifetime = -1;
239         iface->ra_dns = true;
240 }
241
242 static void clean_interface(struct interface *iface)
243 {
244         free(iface->dns);
245         free(iface->search);
246         free(iface->upstream);
247         free(iface->dhcpv4_router);
248         free(iface->dhcpv4_dns);
249         free(iface->dhcpv6_raw);
250         free(iface->filter_class);
251         memset(&iface->ra, 0, sizeof(*iface) - offsetof(struct interface, ra));
252         set_interface_defaults(iface);
253 }
254
255 static void close_interface(struct interface *iface)
256 {
257         avl_delete(&interfaces, &iface->avl);
258
259         router_setup_interface(iface, false);
260         dhcpv6_setup_interface(iface, false);
261         ndp_setup_interface(iface, false);
262 #ifdef DHCPV4_SUPPORT
263         dhcpv4_setup_interface(iface, false);
264 #endif
265
266         clean_interface(iface);
267         free(iface->addr4);
268         free(iface->addr6);
269         free(iface->ifname);
270         free(iface);
271 }
272
273 static int parse_mode(const char *mode)
274 {
275         if (!strcmp(mode, "disabled"))
276                 return MODE_DISABLED;
277         else if (!strcmp(mode, "server"))
278                 return MODE_SERVER;
279         else if (!strcmp(mode, "relay"))
280                 return MODE_RELAY;
281         else if (!strcmp(mode, "hybrid"))
282                 return MODE_HYBRID;
283         else
284                 return -1;
285 }
286
287 static int parse_ra_flags(uint8_t *flags, struct blob_attr *attr)
288 {
289         struct blob_attr *cur;
290         unsigned rem;
291
292         blobmsg_for_each_attr(cur, attr, rem) {
293                 int i;
294
295                 if (blobmsg_type(cur) != BLOBMSG_TYPE_STRING)
296                         continue;
297
298                 if (!blobmsg_check_attr(cur, false))
299                         continue;
300
301                 for (i = 0; ra_flags[i].name; i++) {
302                         if (!strcmp(ra_flags[i].name, blobmsg_get_string(cur))) {
303                                 *flags |= ra_flags[i].flag;
304                                 break;
305                         }
306                 }
307
308                 if (!ra_flags[i].name)
309                         return -1;
310         }
311
312         return 0;
313 }
314
315 static void set_config(struct uci_section *s)
316 {
317         struct blob_attr *tb[ODHCPD_ATTR_MAX], *c;
318
319         blob_buf_init(&b, 0);
320         uci_to_blob(&b, s, &odhcpd_attr_list);
321         blobmsg_parse(odhcpd_attrs, ODHCPD_ATTR_MAX, tb, blob_data(b.head), blob_len(b.head));
322
323         if ((c = tb[ODHCPD_ATTR_LEGACY]))
324                 config.legacy = blobmsg_get_bool(c);
325
326         if ((c = tb[ODHCPD_ATTR_MAINDHCP]))
327                 config.main_dhcpv4 = blobmsg_get_bool(c);
328
329         if ((c = tb[ODHCPD_ATTR_LEASEFILE])) {
330                 free(config.dhcp_statefile);
331                 config.dhcp_statefile = strdup(blobmsg_get_string(c));
332         }
333
334         if ((c = tb[ODHCPD_ATTR_LEASETRIGGER])) {
335                 free(config.dhcp_cb);
336                 config.dhcp_cb = strdup(blobmsg_get_string(c));
337         }
338
339         if ((c = tb[ODHCPD_ATTR_LOGLEVEL])) {
340                 int log_level = (blobmsg_get_u32(c) & LOG_PRIMASK);
341
342                 if (config.log_level != log_level) {
343                         config.log_level = log_level;
344                         setlogmask(LOG_UPTO(config.log_level));
345                 }
346         }
347 }
348
349 static double parse_leasetime(struct blob_attr *c) {
350         char *val = blobmsg_get_string(c), *endptr = NULL;
351         double time = strcmp(val, "infinite") ? strtod(val, &endptr) : UINT32_MAX;
352
353         if (time && endptr && endptr[0]) {
354                 if (endptr[0] == 's')
355                         time *= 1;
356                 else if (endptr[0] == 'm')
357                         time *= 60;
358                 else if (endptr[0] == 'h')
359                         time *= 3600;
360                 else if (endptr[0] == 'd')
361                         time *= 24 * 3600;
362                 else if (endptr[0] == 'w')
363                         time *= 7 * 24 * 3600;
364                 else
365                         goto err;
366         }
367
368         if (time < 60)
369                 time = 60;
370
371         return time;
372
373 err:
374         return -1;
375 }
376
377 static void free_lease(struct lease *l)
378 {
379         free(l->hostname);
380         free(l);
381 }
382
383 static int set_lease(struct uci_section *s)
384 {
385         struct blob_attr *tb[LEASE_ATTR_MAX], *c;
386         struct lease *l;
387         size_t duidlen = 0;
388         uint8_t *duid;
389
390         blob_buf_init(&b, 0);
391         uci_to_blob(&b, s, &lease_attr_list);
392         blobmsg_parse(lease_attrs, LEASE_ATTR_MAX, tb, blob_data(b.head), blob_len(b.head));
393
394         if ((c = tb[LEASE_ATTR_DUID]))
395                 duidlen = (blobmsg_data_len(c) - 1) / 2;
396
397         l = calloc_a(sizeof(*l), &duid, duidlen);
398         if (!l)
399                 goto err;
400
401         if ((c = tb[LEASE_ATTR_MAC]))
402                 if (!ether_aton_r(blobmsg_get_string(c), &l->mac))
403                         goto err;
404
405         if ((c = tb[LEASE_ATTR_DUID])) {
406                 ssize_t len;
407
408                 l->duid = duid;
409                 len = odhcpd_unhexlify(l->duid, duidlen, blobmsg_get_string(c));
410
411                 if (len < 0)
412                         goto err;
413
414                 l->duid_len = len;
415         }
416
417         if ((c = tb[LEASE_ATTR_NAME])) {
418                 l->hostname = strdup(blobmsg_get_string(c));
419                 if (!l->hostname || !odhcpd_valid_hostname(l->hostname))
420                         goto err;
421         }
422
423         if ((c = tb[LEASE_ATTR_IP]))
424                 if (inet_pton(AF_INET, blobmsg_get_string(c), &l->ipaddr) < 0)
425                         goto err;
426
427         if ((c = tb[LEASE_ATTR_HOSTID])) {
428                 errno = 0;
429                 l->hostid = strtoul(blobmsg_get_string(c), NULL, 16);
430                 if (errno)
431                         goto err;
432         } else {
433                 uint32_t i4a = ntohl(l->ipaddr) & 0xff;
434                 l->hostid = ((i4a / 100) << 8) | (((i4a % 100) / 10) << 4) | (i4a % 10);
435         }
436
437         if ((c = tb[LEASE_ATTR_LEASETIME])) {
438                 double time = parse_leasetime(c);
439                 if (time < 0)
440                         goto err;
441
442                 l->leasetime = time;
443         }
444
445         INIT_LIST_HEAD(&l->assignments);
446         vlist_add(&leases, &l->node, l);
447         return 0;
448
449 err:
450         if (l)
451                 free_lease(l);
452
453         return -1;
454 }
455
456 int config_parse_interface(void *data, size_t len, const char *name, bool overwrite)
457 {
458         struct interface *iface;
459         struct blob_attr *tb[IFACE_ATTR_MAX], *c;
460         bool get_addrs = false;
461
462         blobmsg_parse(iface_attrs, IFACE_ATTR_MAX, tb, data, len);
463
464         if (tb[IFACE_ATTR_INTERFACE])
465                 name = blobmsg_get_string(tb[IFACE_ATTR_INTERFACE]);
466
467         if (!name)
468                 return -1;
469
470         iface = avl_find_element(&interfaces, name, iface, avl);
471         if (!iface) {
472                 char *new_name;
473
474                 iface = calloc_a(sizeof(*iface), &new_name, strlen(name) + 1);
475                 if (!iface)
476                         return -1;
477
478                 iface->name = strcpy(new_name, name);
479                 iface->avl.key = iface->name;
480                 iface->router_event.uloop.fd = -1;
481                 iface->dhcpv6_event.uloop.fd = -1;
482                 iface->ndp_event.uloop.fd = -1;
483                 iface->ndp_ping_fd = -1;
484                 iface->dhcpv4_event.uloop.fd = -1;
485                 INIT_LIST_HEAD(&iface->ia_assignments);
486                 INIT_LIST_HEAD(&iface->dhcpv4_assignments);
487                 INIT_LIST_HEAD(&iface->dhcpv4_fr_ips);
488
489                 set_interface_defaults(iface);
490
491                 avl_insert(&interfaces, &iface->avl);
492                 get_addrs = overwrite = true;
493         }
494
495         const char *ifname = NULL;
496         if (overwrite) {
497                 if ((c = tb[IFACE_ATTR_IFNAME]))
498                         ifname = blobmsg_get_string(c);
499                 else if ((c = tb[IFACE_ATTR_NETWORKID]))
500                         ifname = blobmsg_get_string(c);
501         }
502
503 #ifdef WITH_UBUS
504         if (overwrite || !iface->ifname)
505                 ifname = ubus_get_ifname(name);
506 #endif
507
508         if (!iface->ifname && !ifname)
509                 goto err;
510
511         if (ifname) {
512                 free(iface->ifname);
513                 iface->ifname = strdup(ifname);
514
515                 if (!iface->ifname)
516                         goto err;
517
518                 if (!iface->ifindex &&
519                     (iface->ifindex = if_nametoindex(iface->ifname)) <= 0)
520                         goto err;
521         }
522
523         if (get_addrs) {
524                 ssize_t len = netlink_get_interface_addrs(iface->ifindex,
525                                                 true, &iface->addr6);
526
527                 if (len > 0)
528                         iface->addr6_len = len;
529
530                 len = netlink_get_interface_addrs(iface->ifindex,
531                                                 false, &iface->addr4);
532                 if (len > 0)
533                         iface->addr4_len = len;
534         }
535
536         iface->inuse = true;
537
538         if ((c = tb[IFACE_ATTR_DYNAMICDHCP]))
539                 iface->no_dynamic_dhcp = !blobmsg_get_bool(c);
540
541         if ((c = tb[IFACE_ATTR_LEASETIME])) {
542                 double time = parse_leasetime(c);
543                 if (time < 0)
544                         goto err;
545
546                 iface->dhcpv4_leasetime = time;
547         }
548
549         if ((c = tb[IFACE_ATTR_START])) {
550                 iface->dhcpv4_start.s_addr = htonl(blobmsg_get_u32(c));
551                 iface->dhcpv4_end.s_addr = htonl(ntohl(iface->dhcpv4_start.s_addr) +
552                                                         LIMIT_DEFAULT - 1);
553
554                 if (config.main_dhcpv4 && config.legacy)
555                         iface->dhcpv4 = MODE_SERVER;
556         }
557
558         if ((c = tb[IFACE_ATTR_LIMIT]))
559                 iface->dhcpv4_end.s_addr = htonl(ntohl(iface->dhcpv4_start.s_addr) +
560                                                         blobmsg_get_u32(c) - 1);
561
562         if ((c = tb[IFACE_ATTR_MASTER]))
563                 iface->master = blobmsg_get_bool(c);
564
565         if (overwrite && (c = tb[IFACE_ATTR_UPSTREAM])) {
566                 struct blob_attr *cur;
567                 unsigned rem;
568
569                 blobmsg_for_each_attr(cur, c, rem) {
570                         if (blobmsg_type(cur) != BLOBMSG_TYPE_STRING || !blobmsg_check_attr(cur, false))
571                                 continue;
572
573                         iface->upstream = realloc(iface->upstream,
574                                         iface->upstream_len + blobmsg_data_len(cur));
575                         if (!iface->upstream)
576                                 goto err;
577
578                         memcpy(iface->upstream + iface->upstream_len, blobmsg_get_string(cur), blobmsg_data_len(cur));
579                         iface->upstream_len += blobmsg_data_len(cur);
580                 }
581         }
582
583         int mode;
584         if ((c = tb[IFACE_ATTR_RA])) {
585                 if ((mode = parse_mode(blobmsg_get_string(c))) >= 0) {
586                         iface->ra = mode;
587
588                         if (iface->ra != MODE_DISABLED)
589                                 iface->ignore = false;
590                 } else
591                         goto err;
592         }
593
594         if ((c = tb[IFACE_ATTR_DHCPV4])) {
595                 if ((mode = parse_mode(blobmsg_get_string(c))) >= 0) {
596                         if (config.main_dhcpv4) {
597                                 iface->dhcpv4 = mode;
598
599                                 if (iface->dhcpv4 != MODE_DISABLED)
600                                         iface->ignore = false;
601                         }
602                 }
603                 else
604                         goto err;
605         }
606
607         if ((c = tb[IFACE_ATTR_DHCPV6])) {
608                 if ((mode = parse_mode(blobmsg_get_string(c))) >= 0) {
609                         iface->dhcpv6 = mode;
610
611                         if (iface->dhcpv6 != MODE_DISABLED)
612                                 iface->ignore = false;
613                 } else
614                         goto err;
615         }
616
617         if ((c = tb[IFACE_ATTR_NDP])) {
618                 if ((mode = parse_mode(blobmsg_get_string(c))) >= 0) {
619                         iface->ndp = mode;
620
621                         if (iface->ndp != MODE_DISABLED)
622                                 iface->ignore = false;
623                 } else
624                         goto err;
625         }
626
627         if ((c = tb[IFACE_ATTR_ROUTER])) {
628                 struct blob_attr *cur;
629                 unsigned rem;
630
631                 blobmsg_for_each_attr(cur, c, rem) {
632                         if (blobmsg_type(cur) != BLOBMSG_TYPE_STRING || !blobmsg_check_attr(cur, false))
633                                 continue;
634
635                         struct in_addr addr4;
636                         if (inet_pton(AF_INET, blobmsg_get_string(cur), &addr4) == 1) {
637                                 iface->dhcpv4_router = realloc(iface->dhcpv4_router,
638                                                 (++iface->dhcpv4_router_cnt) * sizeof(*iface->dhcpv4_router));
639                                 if (!iface->dhcpv4_router)
640                                         goto err;
641
642                                 iface->dhcpv4_router[iface->dhcpv4_router_cnt - 1] = addr4;
643                         } else
644                                 goto err;
645                 }
646         }
647
648         if ((c = tb[IFACE_ATTR_DNS])) {
649                 struct blob_attr *cur;
650                 unsigned rem;
651
652                 iface->always_rewrite_dns = true;
653                 blobmsg_for_each_attr(cur, c, rem) {
654                         if (blobmsg_type(cur) != BLOBMSG_TYPE_STRING || !blobmsg_check_attr(cur, false))
655                                 continue;
656
657                         struct in_addr addr4;
658                         struct in6_addr addr6;
659                         if (inet_pton(AF_INET, blobmsg_get_string(cur), &addr4) == 1) {
660                                 if (addr4.s_addr == INADDR_ANY)
661                                         goto err;
662
663                                 iface->dhcpv4_dns = realloc(iface->dhcpv4_dns,
664                                                 (++iface->dhcpv4_dns_cnt) * sizeof(*iface->dhcpv4_dns));
665                                 if (!iface->dhcpv4_dns)
666                                         goto err;
667
668                                 iface->dhcpv4_dns[iface->dhcpv4_dns_cnt - 1] = addr4;
669                         } else if (inet_pton(AF_INET6, blobmsg_get_string(cur), &addr6) == 1) {
670                                 if (IN6_IS_ADDR_UNSPECIFIED(&addr6))
671                                         goto err;
672
673                                 iface->dns = realloc(iface->dns,
674                                                 (++iface->dns_cnt) * sizeof(*iface->dns));
675                                 if (!iface->dns)
676                                         goto err;
677
678                                 iface->dns[iface->dns_cnt - 1] = addr6;
679                         } else
680                                 goto err;
681                 }
682         }
683
684         if ((c = tb[IFACE_ATTR_DOMAIN])) {
685                 struct blob_attr *cur;
686                 unsigned rem;
687
688                 blobmsg_for_each_attr(cur, c, rem) {
689                         if (blobmsg_type(cur) != BLOBMSG_TYPE_STRING || !blobmsg_check_attr(cur, false))
690                                 continue;
691
692                         uint8_t buf[256];
693                         char *domain = blobmsg_get_string(cur);
694                         size_t domainlen = strlen(domain);
695                         if (domainlen > 0 && domain[domainlen - 1] == '.')
696                                 domain[domainlen - 1] = 0;
697
698                         int len = dn_comp(domain, buf, sizeof(buf), NULL, NULL);
699                         if (len <= 0)
700                                 goto err;
701
702                         iface->search = realloc(iface->search, iface->search_len + len);
703                         if (!iface->search)
704                                 goto err;
705
706                         memcpy(&iface->search[iface->search_len], buf, len);
707                         iface->search_len += len;
708                 }
709         }
710
711         if ((c = tb[IFACE_ATTR_FILTER_CLASS])) {
712                 iface->filter_class = realloc(iface->filter_class, blobmsg_data_len(c) + 1);
713                 memcpy(iface->filter_class, blobmsg_get_string(c), blobmsg_data_len(c) + 1);
714         }
715
716         if ((c = tb[IFACE_ATTR_DHCPV4_FORCERECONF]))
717                 iface->dhcpv4_forcereconf = blobmsg_get_bool(c);
718
719         if ((c = tb[IFACE_ATTR_DHCPV6_RAW])) {
720                 iface->dhcpv6_raw_len = blobmsg_data_len(c) / 2;
721                 iface->dhcpv6_raw = realloc(iface->dhcpv6_raw, iface->dhcpv6_raw_len);
722                 odhcpd_unhexlify(iface->dhcpv6_raw, iface->dhcpv6_raw_len, blobmsg_get_string(c));
723         }
724
725         if ((c = tb[IFACE_ATTR_DHCPV6_ASSIGNALL]))
726                 iface->dhcpv6_assignall = blobmsg_get_bool(c);
727
728         if ((c = tb[IFACE_ATTR_DHCPV6_PD]))
729                 iface->dhcpv6_pd = blobmsg_get_bool(c);
730
731         if ((c = tb[IFACE_ATTR_DHCPV6_NA]))
732                 iface->dhcpv6_na = blobmsg_get_bool(c);
733
734         if ((c = tb[IFACE_ATTR_RA_DEFAULT]))
735                 iface->default_router = blobmsg_get_u32(c);
736
737         if ((c = tb[IFACE_ATTR_RA_FLAGS])) {
738                 iface->ra_flags = 0;
739                 if (parse_ra_flags(&iface->ra_flags, c) < 0)
740                         goto err;
741         }
742
743         if ((c = tb[IFACE_ATTR_RA_REACHABLETIME])) {
744                 uint32_t ra_reachabletime = blobmsg_get_u32(c);
745                 if (ra_reachabletime > 3600000)
746                         goto err;
747
748                 iface->ra_reachabletime = ra_reachabletime;
749         }
750
751         if ((c = tb[IFACE_ATTR_RA_RETRANSTIME])) {
752                 uint32_t ra_retranstime = blobmsg_get_u32(c);
753                 if (ra_retranstime > 60000)
754                         goto err;
755
756                 iface->ra_retranstime = ra_retranstime;
757         }
758
759         if ((c = tb[IFACE_ATTR_RA_HOPLIMIT])) {
760                 uint32_t ra_hoplimit = blobmsg_get_u32(c);
761                 if (ra_hoplimit > 255)
762                         goto err;
763
764                 iface->ra_hoplimit = ra_hoplimit;
765         }
766
767         if ((c = tb[IFACE_ATTR_RA_MTU])) {
768                 uint32_t ra_mtu = blobmsg_get_u32(c);
769                 if (ra_mtu < 1280 || ra_mtu > 65535)
770                         goto err;
771
772                 iface->ra_mtu = ra_mtu;
773         }
774
775         if ((c = tb[IFACE_ATTR_RA_SLAAC]))
776                 iface->ra_slaac = blobmsg_get_bool(c);
777
778         if ((c = tb[IFACE_ATTR_RA_OFFLINK]))
779                 iface->ra_not_onlink = blobmsg_get_bool(c);
780
781         if ((c = tb[IFACE_ATTR_RA_ADVROUTER]))
782                 iface->ra_advrouter = blobmsg_get_bool(c);
783
784         if ((c = tb[IFACE_ATTR_RA_MININTERVAL]))
785                 iface->ra_mininterval =  blobmsg_get_u32(c);
786
787         if ((c = tb[IFACE_ATTR_RA_MAXINTERVAL]))
788                 iface->ra_maxinterval = blobmsg_get_u32(c);
789
790         if ((c = tb[IFACE_ATTR_RA_LIFETIME]))
791                 iface->ra_lifetime = blobmsg_get_u32(c);
792
793         if ((c = tb[IFACE_ATTR_RA_USELEASETIME]))
794                 iface->ra_useleasetime = blobmsg_get_bool(c);
795
796         if ((c = tb[IFACE_ATTR_RA_DNS]))
797                 iface->ra_dns = blobmsg_get_bool(c);
798
799         if ((c = tb[IFACE_ATTR_RA_PREFERENCE])) {
800                 const char *prio = blobmsg_get_string(c);
801
802                 if (!strcmp(prio, "high"))
803                         iface->route_preference = 1;
804                 else if (!strcmp(prio, "low"))
805                         iface->route_preference = -1;
806                 else if (!strcmp(prio, "medium") || !strcmp(prio, "default"))
807                         iface->route_preference = 0;
808                 else
809                         goto err;
810         }
811
812         if ((c = tb[IFACE_ATTR_PD_MANAGER]))
813                 strncpy(iface->dhcpv6_pd_manager, blobmsg_get_string(c),
814                                 sizeof(iface->dhcpv6_pd_manager) - 1);
815
816         if ((c = tb[IFACE_ATTR_PD_CER]) &&
817                         inet_pton(AF_INET6, blobmsg_get_string(c), &iface->dhcpv6_pd_cer) < 1)
818                 goto err;
819
820         if ((c = tb[IFACE_ATTR_NDPROXY_ROUTING]))
821                 iface->learn_routes = blobmsg_get_bool(c);
822
823         if ((c = tb[IFACE_ATTR_NDPROXY_SLAVE]))
824                 iface->external = blobmsg_get_bool(c);
825
826         if ((c = tb[IFACE_ATTR_PREFIX_FILTER])) {
827                 const char *str = blobmsg_get_string(c);
828                 char *astr = malloc(strlen(str) + 1);
829                 char *delim;
830                 int l;
831
832                 if (!astr || !strcpy(astr, str) ||
833                                 (delim = strchr(astr, '/')) == NULL || (*(delim++) = 0) ||
834                                 sscanf(delim, "%i", &l) == 0 || l > 128 ||
835                                 inet_pton(AF_INET6, astr, &iface->pio_filter_addr) == 0)
836                         iface->pio_filter_length = 0;
837                 else
838                         iface->pio_filter_length = l;
839
840                 if (astr)
841                         free(astr);
842         }
843
844         return 0;
845
846 err:
847         close_interface(iface);
848         return -1;
849 }
850
851 static int set_interface(struct uci_section *s)
852 {
853         blob_buf_init(&b, 0);
854         uci_to_blob(&b, s, &interface_attr_list);
855
856         return config_parse_interface(blob_data(b.head), blob_len(b.head), s->e.name, true);
857 }
858
859 static void lease_delete_assignments(struct lease *l, bool v6)
860 {
861         struct dhcp_assignment *a, *tmp;
862         unsigned int flag = v6 ? OAF_DHCPV6 : OAF_DHCPV4;
863
864         list_for_each_entry_safe(a, tmp, &l->assignments, lease_list) {
865                 if (a->flags & flag)
866                         free_assignment(a);
867         }
868 }
869
870 static void lease_update_assignments(struct lease *l)
871 {
872         struct dhcp_assignment *a;
873
874         list_for_each_entry(a, &l->assignments, lease_list) {
875                 if (a->hostname)
876                         free(a->hostname);
877                 a->hostname = NULL;
878
879                 if (l->hostname)
880                         a->hostname = strdup(l->hostname);
881
882                 a->leasetime = l->leasetime;
883         }
884 }
885
886 static int lease_cmp(const void *k1, const void *k2, _unused void *ptr)
887 {
888         const struct lease *l1 = k1, *l2 = k2;
889         int cmp = 0;
890
891         if (l1->duid_len != l2->duid_len)
892                 return l1->duid_len - l2->duid_len;
893
894         if (l1->duid_len && l2->duid_len)
895                 cmp = memcmp(l1->duid, l2->duid, l1->duid_len);
896
897         if (cmp)
898                 return cmp;
899
900         return memcmp(l1->mac.ether_addr_octet, l2->mac.ether_addr_octet,
901                       sizeof(l1->mac.ether_addr_octet));
902 }
903
904 static void lease_change_config(struct lease *l_old, struct lease *l_new)
905 {
906         bool update = false;
907
908         if ((!!l_new->hostname != !!l_old->hostname) ||
909             (l_new->hostname && strcmp(l_new->hostname, l_old->hostname))) {
910                 free(l_old->hostname);
911                 l_old->hostname = NULL;
912
913                 if (l_new->hostname)
914                         l_old->hostname = strdup(l_new->hostname);
915
916                 update = true;
917         }
918
919         if (l_old->leasetime != l_new->leasetime) {
920                 l_old->leasetime = l_new->leasetime;
921                 update = true;
922         }
923
924         if (l_old->ipaddr != l_new->ipaddr) {
925                 l_old->ipaddr = l_new->ipaddr;
926                 lease_delete_assignments(l_old, false);
927         }
928
929         if (l_old->hostid != l_new->hostid) {
930                 l_old->hostid = l_new->hostid;
931                 lease_delete_assignments(l_old, true);
932         }
933
934         if (update)
935                 lease_update_assignments(l_old);
936
937         free_lease(l_new);
938 }
939
940 static void lease_delete(struct lease *l)
941 {
942         struct dhcp_assignment *a, *tmp;
943
944         list_for_each_entry_safe(a, tmp, &l->assignments, lease_list)
945                 free_assignment(a);
946
947         free_lease(l);
948 }
949
950 static void lease_update(_unused struct vlist_tree *tree, struct vlist_node *node_new,
951                          struct vlist_node *node_old)
952 {
953         struct lease *lease_new = container_of(node_new, struct lease, node);
954         struct lease *lease_old = container_of(node_old, struct lease, node);
955
956         if (node_old && node_new)
957                 lease_change_config(lease_old, lease_new);
958         else if (node_old)
959                 lease_delete(lease_old);
960 }
961
962 struct lease *config_find_lease_by_duid(const uint8_t *duid, const uint16_t len)
963 {
964         struct lease *l;
965
966         vlist_for_each_element(&leases, l, node) {
967                 if (l->duid_len == len && !memcmp(l->duid, duid, len))
968                         return l;
969         }
970
971         return NULL;
972 }
973
974 struct lease *config_find_lease_by_mac(const uint8_t *mac)
975 {
976         struct lease *l;
977
978         vlist_for_each_element(&leases, l, node) {
979                 if (!memcmp(l->mac.ether_addr_octet, mac,
980                             sizeof(l->mac.ether_addr_octet)))
981                         return l;
982         }
983
984         return NULL;
985 }
986
987 struct lease *config_find_lease_by_hostid(const uint32_t hostid)
988 {
989         struct lease *l;
990
991         vlist_for_each_element(&leases, l, node) {
992                 if (l->hostid == hostid)
993                         return l;
994         }
995
996         return NULL;
997 }
998
999 struct lease *config_find_lease_by_ipaddr(const uint32_t ipaddr)
1000 {
1001         struct lease *l;
1002
1003         vlist_for_each_element(&leases, l, node) {
1004                 if (l->ipaddr == ipaddr)
1005                         return l;
1006         }
1007
1008         return NULL;
1009 }
1010
1011 void odhcpd_reload(void)
1012 {
1013         struct uci_context *uci = uci_alloc_context();
1014         struct interface *master = NULL, *i, *tmp;
1015
1016         if (!uci)
1017                 return;
1018
1019         vlist_update(&leases);
1020         avl_for_each_element(&interfaces, i, avl)
1021                 clean_interface(i);
1022
1023         struct uci_package *dhcp = NULL;
1024         if (!uci_load(uci, "dhcp", &dhcp)) {
1025                 struct uci_element *e;
1026
1027                 /* 1. Global settings */
1028                 uci_foreach_element(&dhcp->sections, e) {
1029                         struct uci_section *s = uci_to_section(e);
1030                         if (!strcmp(s->type, "odhcpd"))
1031                                 set_config(s);
1032                 }
1033
1034                 /* 2. DHCP pools */
1035                 uci_foreach_element(&dhcp->sections, e) {
1036                         struct uci_section *s = uci_to_section(e);
1037                         if (!strcmp(s->type, "dhcp"))
1038                                 set_interface(s);
1039                 }
1040
1041                 /* 3. Static leases */
1042                 uci_foreach_element(&dhcp->sections, e) {
1043                         struct uci_section* s = uci_to_section(e);
1044                         if (!strcmp(s->type, "host"))
1045                                 set_lease(s);
1046                 }
1047         }
1048
1049         if (config.dhcp_statefile) {
1050                 char *path = strdup(config.dhcp_statefile);
1051
1052                 mkdir_p(dirname(path), 0755);
1053                 free(path);
1054         }
1055
1056         vlist_flush(&leases);
1057
1058 #ifdef WITH_UBUS
1059         ubus_apply_network();
1060 #endif
1061
1062         bool any_dhcpv6_slave = false, any_ra_slave = false, any_ndp_slave = false;
1063
1064         /* Test for */
1065         avl_for_each_element(&interfaces, i, avl) {
1066                 if (i->master)
1067                         continue;
1068
1069                 if (i->dhcpv6 == MODE_HYBRID || i->dhcpv6 == MODE_RELAY)
1070                         any_dhcpv6_slave = true;
1071
1072                 if (i->ra == MODE_HYBRID || i->ra == MODE_RELAY)
1073                         any_ra_slave = true;
1074
1075                 if (i->ndp == MODE_HYBRID || i->ndp == MODE_RELAY)
1076                         any_ndp_slave = true;
1077         }
1078
1079         /* Evaluate hybrid mode for master */
1080         avl_for_each_element(&interfaces, i, avl) {
1081                 if (!i->master)
1082                         continue;
1083
1084                 enum odhcpd_mode hybrid_mode = MODE_DISABLED;
1085 #ifdef WITH_UBUS
1086                 if (!ubus_has_prefix(i->name, i->ifname))
1087                         hybrid_mode = MODE_RELAY;
1088 #endif
1089
1090                 if (i->dhcpv6 == MODE_HYBRID)
1091                         i->dhcpv6 = hybrid_mode;
1092
1093                 if (i->dhcpv6 == MODE_RELAY && !any_dhcpv6_slave)
1094                         i->dhcpv6 = MODE_DISABLED;
1095
1096                 if (i->ra == MODE_HYBRID)
1097                         i->ra = hybrid_mode;
1098
1099                 if (i->ra == MODE_RELAY && !any_ra_slave)
1100                         i->ra = MODE_DISABLED;
1101
1102                 if (i->ndp == MODE_HYBRID)
1103                         i->ndp = hybrid_mode;
1104
1105                 if (i->ndp == MODE_RELAY && !any_ndp_slave)
1106                         i->ndp = MODE_DISABLED;
1107
1108                 if (i->dhcpv6 == MODE_RELAY || i->ra == MODE_RELAY || i->ndp == MODE_RELAY)
1109                         master = i;
1110         }
1111
1112
1113         avl_for_each_element_safe(&interfaces, i, avl, tmp) {
1114                 if (i->inuse) {
1115                         /* Resolve hybrid mode */
1116                         if (i->dhcpv6 == MODE_HYBRID)
1117                                 i->dhcpv6 = (master && master->dhcpv6 == MODE_RELAY) ?
1118                                                 MODE_RELAY : MODE_SERVER;
1119
1120                         if (i->ra == MODE_HYBRID)
1121                                 i->ra = (master && master->ra == MODE_RELAY) ?
1122                                                 MODE_RELAY : MODE_SERVER;
1123
1124                         if (i->ndp == MODE_HYBRID)
1125                                 i->ndp = (master && master->ndp == MODE_RELAY) ?
1126                                                 MODE_RELAY : MODE_DISABLED;
1127
1128                         router_setup_interface(i, i->ra != MODE_DISABLED);
1129                         dhcpv6_setup_interface(i, i->dhcpv6 != MODE_DISABLED);
1130                         ndp_setup_interface(i, i->ndp != MODE_DISABLED);
1131 #ifdef DHCPV4_SUPPORT
1132                         dhcpv4_setup_interface(i, i->dhcpv4 != MODE_DISABLED);
1133 #endif
1134                 } else
1135                         close_interface(i);
1136         }
1137
1138         uci_unload(uci, dhcp);
1139         uci_free_context(uci);
1140 }
1141
1142 static void handle_signal(int signal)
1143 {
1144         char b[1] = {0};
1145
1146         if (signal == SIGHUP) {
1147                 if (write(reload_pipe[1], b, sizeof(b)) < 0) {}
1148         } else
1149                 uloop_end();
1150 }
1151
1152 static void reload_cb(struct uloop_fd *u, _unused unsigned int events)
1153 {
1154         char b[512];
1155         if (read(u->fd, b, sizeof(b)) < 0) {}
1156
1157         odhcpd_reload();
1158 }
1159
1160 static struct uloop_fd reload_fd = { .fd = -1, .cb = reload_cb };
1161
1162 void odhcpd_run(void)
1163 {
1164         if (pipe2(reload_pipe, O_NONBLOCK | O_CLOEXEC) < 0) {}
1165
1166         reload_fd.fd = reload_pipe[0];
1167         uloop_fd_add(&reload_fd, ULOOP_READ);
1168
1169         signal(SIGTERM, handle_signal);
1170         signal(SIGINT, handle_signal);
1171         signal(SIGHUP, handle_signal);
1172
1173 #ifdef WITH_UBUS
1174         while (ubus_init())
1175                 sleep(1);
1176 #endif
1177
1178         odhcpd_reload();
1179         uloop_run();
1180 }