IPv6: fix prefix assignment with continuous hints
[project/netifd.git] / proto.c
1 /*
2  * netifd - network interface daemon
3  * Copyright (C) 2012 Felix Fietkau <nbd@openwrt.org>
4  * Copyright (C) 2012 Steven Barth <steven@midlink.org>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2
8  * as published by the Free Software Foundation
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  */
15 #include <string.h>
16 #include <stdlib.h>
17 #include <stdio.h>
18 #include <limits.h>
19
20 #include <arpa/inet.h>
21 #include <netinet/in.h>
22
23 #include "netifd.h"
24 #include "system.h"
25 #include "interface.h"
26 #include "interface-ip.h"
27 #include "proto.h"
28
29 static struct avl_tree handlers;
30
31 enum {
32         OPT_IPADDR,
33         OPT_IP6ADDR,
34         OPT_NETMASK,
35         OPT_BROADCAST,
36         OPT_GATEWAY,
37         OPT_IP6GW,
38         OPT_IP6PREFIX,
39         __OPT_MAX,
40 };
41
42 static const struct blobmsg_policy proto_ip_attributes[__OPT_MAX] = {
43         [OPT_IPADDR] = { .name = "ipaddr", .type = BLOBMSG_TYPE_ARRAY },
44         [OPT_IP6ADDR] = { .name = "ip6addr", .type = BLOBMSG_TYPE_ARRAY },
45         [OPT_NETMASK] = { .name = "netmask", .type = BLOBMSG_TYPE_STRING },
46         [OPT_BROADCAST] = { .name = "broadcast", .type = BLOBMSG_TYPE_STRING },
47         [OPT_GATEWAY] = { .name = "gateway", .type = BLOBMSG_TYPE_STRING },
48         [OPT_IP6GW] = { .name = "ip6gw", .type = BLOBMSG_TYPE_STRING },
49         [OPT_IP6PREFIX] = { .name = "ip6prefix", .type = BLOBMSG_TYPE_ARRAY },
50 };
51
52 static const struct uci_blob_param_info proto_ip_attr_info[__OPT_MAX] = {
53         [OPT_IPADDR] = { .type = BLOBMSG_TYPE_STRING },
54         [OPT_IP6ADDR] = { .type = BLOBMSG_TYPE_STRING },
55         [OPT_IP6PREFIX] = { .type = BLOBMSG_TYPE_STRING },
56 };
57
58 const struct uci_blob_param_list proto_ip_attr = {
59         .n_params = __OPT_MAX,
60         .params = proto_ip_attributes,
61         .info = proto_ip_attr_info,
62 };
63
64 enum {
65         ADDR_IPADDR,
66         ADDR_MASK,
67         ADDR_BROADCAST,
68         ADDR_PTP,
69         ADDR_PREFERRED,
70         ADDR_VALID,
71         ADDR_OFFLINK,
72         __ADDR_MAX
73 };
74
75 static const struct blobmsg_policy proto_ip_addr[__ADDR_MAX] = {
76         [ADDR_IPADDR] = { .name = "ipaddr", .type = BLOBMSG_TYPE_STRING },
77         [ADDR_MASK] = { .name = "mask", .type = BLOBMSG_TYPE_STRING },
78         [ADDR_BROADCAST] = { .name = "broadcast", .type = BLOBMSG_TYPE_STRING },
79         [ADDR_PTP] = { .name = "ptp", .type = BLOBMSG_TYPE_STRING },
80         [ADDR_PREFERRED] = { .name = "preferred", .type = BLOBMSG_TYPE_INT32 },
81         [ADDR_VALID] = { .name = "valid", .type = BLOBMSG_TYPE_INT32 },
82         [ADDR_OFFLINK] = { .name = "offlink", .type = BLOBMSG_TYPE_BOOL },
83 };
84
85 static struct device_addr *
86 alloc_device_addr(bool v6, bool ext)
87 {
88         struct device_addr *addr;
89
90         addr = calloc(1, sizeof(*addr));
91         addr->flags = v6 ? DEVADDR_INET6 : DEVADDR_INET4;
92         if (ext)
93                 addr->flags |= DEVADDR_EXTERNAL;
94
95         return addr;
96 }
97
98 static bool
99 parse_addr(struct interface *iface, const char *str, bool v6, int mask,
100            bool ext, uint32_t broadcast)
101 {
102         struct device_addr *addr;
103         int af = v6 ? AF_INET6 : AF_INET;
104
105         addr = alloc_device_addr(v6, ext);
106         if (!addr)
107                 return false;
108
109         addr->mask = mask;
110         if (!parse_ip_and_netmask(af, str, &addr->addr, &addr->mask)) {
111                 interface_add_error(iface, "proto", "INVALID_ADDRESS", &str, 1);
112                 free(addr);
113                 return false;
114         }
115
116         if (broadcast)
117                 addr->broadcast = broadcast;
118
119         vlist_add(&iface->proto_ip.addr, &addr->node, &addr->flags);
120         return true;
121 }
122
123 static int
124 parse_static_address_option(struct interface *iface, struct blob_attr *attr,
125                             bool v6, int netmask, bool ext, uint32_t broadcast)
126 {
127         struct blob_attr *cur;
128         int n_addr = 0;
129         int rem;
130
131         blobmsg_for_each_attr(cur, attr, rem) {
132                 if (blobmsg_type(cur) != BLOBMSG_TYPE_STRING)
133                         return -1;
134
135                 n_addr++;
136                 if (!parse_addr(iface, blobmsg_data(cur), v6, netmask, ext,
137                                 broadcast))
138                         return -1;
139         }
140
141         return n_addr;
142 }
143
144 static struct device_addr *
145 parse_address_item(struct blob_attr *attr, bool v6, bool ext)
146 {
147         struct device_addr *addr;
148         struct blob_attr *tb[__ADDR_MAX];
149         struct blob_attr *cur;
150
151         if (blobmsg_type(attr) != BLOBMSG_TYPE_TABLE)
152                 return NULL;
153
154         addr = alloc_device_addr(v6, ext);
155         if (!addr)
156                 return NULL;
157
158         blobmsg_parse(proto_ip_addr, __ADDR_MAX, tb, blobmsg_data(attr), blobmsg_data_len(attr));
159
160         addr->mask = v6 ? 128 : 32;
161         if ((cur = tb[ADDR_MASK])) {
162                 unsigned int new_mask;
163
164                 new_mask = parse_netmask_string(blobmsg_data(cur), v6);
165                 if (new_mask > addr->mask)
166                         goto error;
167
168                 addr->mask = new_mask;
169         }
170
171         cur = tb[ADDR_IPADDR];
172         if (!cur)
173                 goto error;
174
175         if (!inet_pton(v6 ? AF_INET6 : AF_INET, blobmsg_data(cur), &addr->addr))
176                 goto error;
177
178         if ((cur = tb[ADDR_OFFLINK]) && blobmsg_get_bool(cur))
179                 addr->flags |= DEVADDR_OFFLINK;
180
181         if (!v6) {
182                 if ((cur = tb[ADDR_BROADCAST]) &&
183                     !inet_pton(AF_INET, blobmsg_data(cur), &addr->broadcast))
184                         goto error;
185                 if ((cur = tb[ADDR_PTP]) &&
186                     !inet_pton(AF_INET, blobmsg_data(cur), &addr->point_to_point))
187                         goto error;
188         } else {
189                 time_t now = system_get_rtime();
190                 if ((cur = tb[ADDR_PREFERRED])) {
191                         int64_t preferred = blobmsg_get_u32(cur);
192                         int64_t preferred_until = preferred + (int64_t)now;
193                         if (preferred_until <= LONG_MAX && preferred != 0xffffffffLL)
194                                 addr->preferred_until = preferred_until;
195                 }
196
197                 if ((cur = tb[ADDR_VALID])) {
198                         int64_t valid = blobmsg_get_u32(cur);
199                         int64_t valid_until = valid + (int64_t)now;
200                         if (valid_until <= LONG_MAX && valid != 0xffffffffLL)
201                                 addr->valid_until = valid_until;
202
203                 }
204
205                 if (addr->valid_until) {
206                         if (!addr->preferred_until)
207                                 addr->preferred_until = addr->valid_until;
208                         else if (addr->preferred_until > addr->valid_until)
209                                 goto error;
210                 }
211         }
212
213         return addr;
214
215 error:
216         free(addr);
217         return NULL;
218 }
219
220 static int
221 parse_address_list(struct interface *iface, struct blob_attr *attr, bool v6,
222                    bool ext)
223 {
224         struct device_addr *addr;
225         struct blob_attr *cur;
226         int n_addr = 0;
227         int rem;
228
229         blobmsg_for_each_attr(cur, attr, rem) {
230                 addr = parse_address_item(cur, v6, ext);
231                 if (!addr)
232                         return -1;
233
234                 n_addr++;
235                 vlist_add(&iface->proto_ip.addr, &addr->node, &addr->flags);
236         }
237
238         return n_addr;
239 }
240
241 static bool
242 parse_gateway_option(struct interface *iface, struct blob_attr *attr, bool v6)
243 {
244         struct device_route *route;
245         const char *str = blobmsg_data(attr);
246         int af = v6 ? AF_INET6 : AF_INET;
247
248         route = calloc(1, sizeof(*route));
249         if (!inet_pton(af, str, &route->nexthop)) {
250                 interface_add_error(iface, "proto", "INVALID_GATEWAY", &str, 1);
251                 free(route);
252                 return false;
253         }
254
255         route->mask = 0;
256         route->flags = (v6 ? DEVADDR_INET6 : DEVADDR_INET4);
257
258         unsigned int table = (v6) ? iface->ip6table : iface->ip4table;
259         if (table) {
260                 route->table = table;
261                 route->flags |= DEVROUTE_SRCTABLE;
262         }
263
264         vlist_add(&iface->proto_ip.route, &route->node, route);
265
266         return true;
267 }
268
269 static bool
270 parse_prefix_option(struct interface *iface, const char *str, size_t len)
271 {
272         char buf[128] = {0}, *saveptr;
273         if (len > sizeof(buf))
274                 return false;
275
276         memcpy(buf, str, len);
277         char *addrstr = strtok_r(buf, "/", &saveptr);
278         if (!addrstr)
279                 return false;
280
281         char *lengthstr = strtok_r(NULL, ",", &saveptr);
282         if (!lengthstr)
283                 return false;
284
285         char *prefstr = strtok_r(NULL, ",", &saveptr);
286         char *validstr = (!prefstr) ? NULL : strtok_r(NULL, ",", &saveptr);
287         char *addstr = (!validstr) ? NULL : strtok_r(NULL, ",", &saveptr);
288         const char *pclass = NULL;
289
290         int64_t pref = (!prefstr) ? 0 : strtoul(prefstr, NULL, 10);
291         int64_t valid = (!validstr) ? 0 : strtoul(validstr, NULL, 10);
292
293         uint8_t length = strtoul(lengthstr, NULL, 10), excl_length = 0;
294         if (length < 1 || length > 64)
295                 return false;
296
297         struct in6_addr addr, excluded, *excludedp = NULL;
298         if (inet_pton(AF_INET6, addrstr, &addr) < 1)
299                 return false;
300
301         for (; addstr; addstr = strtok_r(NULL, ",", &saveptr)) {
302                 char *key = NULL, *val = NULL, *addsaveptr;
303                 if (!(key = strtok_r(addstr, "=", &addsaveptr)) ||
304                                 !(val = strtok_r(NULL, ",", &addsaveptr)))
305                         continue;
306
307                 if (!strcmp(key, "excluded")) {
308                         char *sep = strchr(val, '/');
309                         if (!sep)
310                                 return false;
311
312                         *sep = 0;
313                         excl_length = atoi(sep + 1);
314
315                         if (inet_pton(AF_INET6, val, &excluded) < 1)
316                                 return false;
317
318                         excludedp = &excluded;
319                 } else if (!strcmp(key, "class")) {
320                         pclass = val;
321                 }
322
323         }
324
325
326
327
328         int64_t now = system_get_rtime();
329         time_t preferred_until = 0;
330         if (prefstr && pref != 0xffffffffLL && pref + now <= LONG_MAX)
331                 preferred_until = pref + now;
332
333         time_t valid_until = 0;
334         if (validstr && valid != 0xffffffffLL && valid + now <= LONG_MAX)
335                 valid_until = valid + now;
336
337         interface_ip_add_device_prefix(iface, &addr, length,
338                         valid_until, preferred_until,
339                         excludedp, excl_length, pclass);
340         return true;
341 }
342
343 static int
344 parse_prefix_list(struct interface *iface, struct blob_attr *attr)
345 {
346         struct blob_attr *cur;
347         int n_addr = 0;
348         int rem;
349
350         blobmsg_for_each_attr(cur, attr, rem) {
351                 if (blobmsg_type(cur) != BLOBMSG_TYPE_STRING)
352                         return -1;
353
354                 n_addr++;
355                 if (!parse_prefix_option(iface, blobmsg_data(cur),
356                                 blobmsg_data_len(cur)))
357                         return -1;
358         }
359
360         return n_addr;
361 }
362
363 int
364 proto_apply_static_ip_settings(struct interface *iface, struct blob_attr *attr)
365 {
366         struct blob_attr *tb[__OPT_MAX];
367         struct blob_attr *cur;
368         const char *error;
369         unsigned int netmask = 32;
370         int n_v4 = 0, n_v6 = 0;
371         struct in_addr bcast = {};
372
373         blobmsg_parse(proto_ip_attributes, __OPT_MAX, tb, blob_data(attr), blob_len(attr));
374
375         if ((cur = tb[OPT_NETMASK])) {
376                 netmask = parse_netmask_string(blobmsg_data(cur), false);
377                 if (netmask > 32) {
378                         error = "INVALID_NETMASK";
379                         goto error;
380                 }
381         }
382
383         if ((cur = tb[OPT_BROADCAST])) {
384                 if (!inet_pton(AF_INET, blobmsg_data(cur), &bcast)) {
385                         error = "INVALID_BROADCAST";
386                         goto error;
387                 }
388         }
389
390         if ((cur = tb[OPT_IPADDR]))
391                 n_v4 = parse_static_address_option(iface, cur, false,
392                         netmask, false, bcast.s_addr);
393
394         if ((cur = tb[OPT_IP6ADDR]))
395                 n_v6 = parse_static_address_option(iface, cur, true,
396                         128, false, 0);
397
398         if ((cur = tb[OPT_IP6PREFIX]))
399                 if (parse_prefix_list(iface, cur) < 0)
400                         goto out;
401
402         if (n_v4 < 0 || n_v6 < 0)
403                 goto out;
404
405         if ((cur = tb[OPT_GATEWAY])) {
406                 if (n_v4 && !parse_gateway_option(iface, cur, false))
407                         goto out;
408         }
409
410         if ((cur = tb[OPT_IP6GW])) {
411                 if (n_v6 && !parse_gateway_option(iface, cur, true))
412                         goto out;
413         }
414
415         return 0;
416
417 error:
418         interface_add_error(iface, "proto", error, NULL, 0);
419 out:
420         return -1;
421 }
422
423 int
424 proto_apply_ip_settings(struct interface *iface, struct blob_attr *attr, bool ext)
425 {
426         struct blob_attr *tb[__OPT_MAX];
427         struct blob_attr *cur;
428         int n_v4 = 0, n_v6 = 0;
429
430         blobmsg_parse(proto_ip_attributes, __OPT_MAX, tb, blob_data(attr), blob_len(attr));
431
432         if ((cur = tb[OPT_IPADDR]))
433                 n_v4 = parse_address_list(iface, cur, false, ext);
434
435         if ((cur = tb[OPT_IP6ADDR]))
436                 n_v6 = parse_address_list(iface, cur, true, ext);
437
438         if ((cur = tb[OPT_IP6PREFIX]))
439                 if (parse_prefix_list(iface, cur) < 0)
440                         goto out;
441
442         if (n_v4 < 0 || n_v6 < 0)
443                 goto out;
444
445         if ((cur = tb[OPT_GATEWAY])) {
446                 if (n_v4 && !parse_gateway_option(iface, cur, false))
447                         goto out;
448         }
449
450         if ((cur = tb[OPT_IP6GW])) {
451                 if (n_v6 && !parse_gateway_option(iface, cur, true))
452                         goto out;
453         }
454
455         return 0;
456
457 out:
458         return -1;
459 }
460
461 void add_proto_handler(struct proto_handler *p)
462 {
463         if (!handlers.comp)
464                 avl_init(&handlers, avl_strcmp, false, NULL);
465
466         if (p->avl.key)
467                 return;
468
469         p->avl.key = p->name;
470         avl_insert(&handlers, &p->avl);
471 }
472
473 static void
474 default_proto_free(struct interface_proto_state *proto)
475 {
476         free(proto);
477 }
478
479 static int
480 invalid_proto_handler(struct interface_proto_state *proto,
481                       enum interface_proto_cmd cmd, bool force)
482 {
483         return -1;
484 }
485
486 static int
487 no_proto_handler(struct interface_proto_state *proto,
488                  enum interface_proto_cmd cmd, bool force)
489 {
490         return 0;
491 }
492
493 static struct interface_proto_state *
494 default_proto_attach(const struct proto_handler *h,
495                      struct interface *iface, struct blob_attr *attr)
496 {
497         struct interface_proto_state *proto;
498
499         proto = calloc(1, sizeof(*proto));
500         proto->free = default_proto_free;
501         proto->cb = no_proto_handler;
502
503         return proto;
504 }
505
506 static const struct proto_handler no_proto = {
507         .name = "none",
508         .flags = PROTO_FLAG_IMMEDIATE,
509         .attach = default_proto_attach,
510 };
511
512 static const struct proto_handler *
513 get_proto_handler(const char *name)
514 {
515         struct proto_handler *proto;
516
517         if (!strcmp(name, "none"))
518             return &no_proto;
519
520         if (!handlers.comp)
521                 return NULL;
522
523         return avl_find_element(&handlers, name, proto, avl);
524 }
525
526 void
527 proto_dump_handlers(struct blob_buf *b)
528 {
529         struct proto_handler *p;
530         void *c;
531
532         avl_for_each_element(&handlers, p, avl) {
533                 c = blobmsg_open_table(b, p->name);
534                 blobmsg_add_u8(b, "no_device", !!(p->flags & PROTO_FLAG_NODEV));
535                 blobmsg_close_table(b, c);
536         }
537 }
538
539 void
540 proto_init_interface(struct interface *iface, struct blob_attr *attr)
541 {
542         const struct proto_handler *proto = iface->proto_handler;
543         struct interface_proto_state *state = NULL;
544
545         if (!proto)
546                 proto = &no_proto;
547
548         state = proto->attach(proto, iface, attr);
549         if (!state) {
550                 state = no_proto.attach(&no_proto, iface, attr);
551                 state->cb = invalid_proto_handler;
552         }
553
554         state->handler = proto;
555         interface_set_proto_state(iface, state);
556 }
557
558 void
559 proto_attach_interface(struct interface *iface, const char *proto_name)
560 {
561         const struct proto_handler *proto = &no_proto;
562
563         if (proto_name) {
564                 proto = get_proto_handler(proto_name);
565                 if (!proto) {
566                         interface_add_error(iface, "proto", "INVALID_PROTO", NULL, 0);
567                         proto = &no_proto;
568                 }
569         }
570
571         iface->proto_handler = proto;
572 }
573
574 int
575 interface_proto_event(struct interface_proto_state *proto,
576                       enum interface_proto_cmd cmd, bool force)
577 {
578         enum interface_proto_event ev;
579         int ret;
580
581         ret = proto->cb(proto, cmd, force);
582         if (ret || !(proto->handler->flags & PROTO_FLAG_IMMEDIATE))
583                 goto out;
584
585         switch(cmd) {
586         case PROTO_CMD_SETUP:
587                 ev = IFPEV_UP;
588                 break;
589         case PROTO_CMD_TEARDOWN:
590                 ev = IFPEV_DOWN;
591                 break;
592         default:
593                 return -EINVAL;
594         }
595         proto->proto_event(proto, ev);
596
597 out:
598         return ret;
599 }