[thirdparty/systemd.git] / src / libsystemd-network / sd-radv.c

/***
  This file is part of systemd.

  Copyright (C) 2017 Intel Corporation. All rights reserved.

  systemd is free software; you can redistribute it and/or modify it
  under the terms of the GNU Lesser General Public License as published by
  the Free Software Foundation; either version 2.1 of the License, or
  (at your option) any later version.

  systemd is distributed in the hope that it will be useful, but
  WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  Lesser General Public License for more details.

  You should have received a copy of the GNU Lesser General Public License
  along with systemd; If not, see <http://www.gnu.org/licenses/>.
***/

#include <netinet/icmp6.h>
#include <netinet/in.h>
#include <arpa/inet.h>

#include "sd-radv.h"

#include "macro.h"
#include "alloc-util.h"
#include "fd-util.h"
#include "icmp6-util.h"
#include "in-addr-util.h"
#include "radv-internal.h"
#include "socket-util.h"
#include "string-util.h"
#include "util.h"

_public_ int sd_radv_new(sd_radv **ret) {
        _cleanup_(sd_radv_unrefp) sd_radv *ra = NULL;

        assert_return(ret, -EINVAL);

        ra = new0(sd_radv, 1);
        if (!ra)
                return -ENOMEM;

        ra->n_ref = 1;

        LIST_HEAD_INIT(ra->prefixes);

        *ret = ra;
        ra = NULL;

        return 0;
}

_public_ int sd_radv_attach_event(sd_radv *ra, sd_event *event, int64_t priority) {
        int r;

        assert_return(ra, -EINVAL);
        assert_return(!ra->event, -EBUSY);

        if (event)
                ra->event = sd_event_ref(event);
        else {
                r = sd_event_default(&ra->event);
                if (r < 0)
                        return 0;
        }

        ra->event_priority = priority;

        return 0;
}

_public_ int sd_radv_detach_event(sd_radv *ra) {

        assert_return(ra, -EINVAL);

        ra->event = sd_event_unref(ra->event);
        return 0;
}

_public_ sd_event *sd_radv_get_event(sd_radv *ra) {
        assert_return(ra, NULL);

        return ra->event;
}

_public_ sd_radv *sd_radv_ref(sd_radv *ra) {
        if (!ra)
                return NULL;

        assert(ra->n_ref > 0);
        ra->n_ref++;

        return ra;
}

_public_ sd_radv *sd_radv_unref(sd_radv *ra) {
        if (!ra)
                return NULL;

        assert(ra->n_ref > 0);
        ra->n_ref--;

        if (ra->n_ref > 0)
                return NULL;

        while (ra->prefixes) {
                sd_radv_prefix *p = ra->prefixes;

                LIST_REMOVE(prefix, ra->prefixes, p);
                sd_radv_prefix_unref(p);
        }

        sd_radv_detach_event(ra);
        return mfree(ra);
}

_public_ int sd_radv_stop(sd_radv *ra) {
        assert_return(ra, -EINVAL);

        log_radv("Stopping IPv6 Router Advertisement daemon");

        ra->state = SD_RADV_STATE_IDLE;

        return 0;
}

_public_ int sd_radv_start(sd_radv *ra) {
        assert_return(ra, -EINVAL);
        assert_return(ra->event, -EINVAL);
        assert_return(ra->ifindex > 0, -EINVAL);

        if (ra->state != SD_RADV_STATE_IDLE)
                return 0;

        ra->state = SD_RADV_STATE_ADVERTISING;

        log_radv("Started IPv6 Router Advertisement daemon");

        return 0;
}

_public_ int sd_radv_set_ifindex(sd_radv *ra, int ifindex) {
        assert_return(ra, -EINVAL);
        assert_return(ifindex >= -1, -EINVAL);

        if (ra->state != SD_RADV_STATE_IDLE)
                return -EBUSY;

        ra->ifindex = ifindex;

        return 0;
}

_public_ int sd_radv_set_mac(sd_radv *ra, const struct ether_addr *mac_addr) {
        assert_return(ra, -EINVAL);

        if (ra->state != SD_RADV_STATE_IDLE)
                return -EBUSY;

        if (mac_addr)
                ra->mac_addr = *mac_addr;
        else
                zero(ra->mac_addr);

        return 0;
}

_public_ int sd_radv_set_mtu(sd_radv *ra, uint32_t mtu) {
        assert_return(ra, -EINVAL);
        assert_return(mtu >= 1280, -EINVAL);

        if (ra->state != SD_RADV_STATE_IDLE)
                return -EBUSY;

        ra->mtu = mtu;

        return 0;
}

_public_ int sd_radv_set_hop_limit(sd_radv *ra, uint8_t hop_limit) {
        assert_return(ra, -EINVAL);

        if (ra->state != SD_RADV_STATE_IDLE)
                return -EBUSY;

        ra->hop_limit = hop_limit;

        return 0;
}

_public_ int sd_radv_set_router_lifetime(sd_radv *ra, uint32_t router_lifetime) {
        assert_return(ra, -EINVAL);

        if (ra->state != SD_RADV_STATE_IDLE)
                return -EBUSY;

        /* RFC 4191, Section 2.2, "...If the Router Lifetime is zero, the
           preference value MUST be set to (00) by the sender..." */
        if (router_lifetime == 0 &&
            (ra->flags & (0x3 << 3)) != (SD_NDISC_PREFERENCE_MEDIUM << 3))
                return -ETIME;

        ra->lifetime = router_lifetime;

        return 0;
}

_public_ int sd_radv_set_managed_information(sd_radv *ra, int managed) {
        assert_return(ra, -EINVAL);

        if (ra->state != SD_RADV_STATE_IDLE)
                return -EBUSY;

        SET_FLAG(ra->flags, ND_RA_FLAG_MANAGED, managed);

        return 0;
}

_public_ int sd_radv_set_other_information(sd_radv *ra, int other) {
        assert_return(ra, -EINVAL);

        if (ra->state != SD_RADV_STATE_IDLE)
                return -EBUSY;

        SET_FLAG(ra->flags, ND_RA_FLAG_OTHER, other);

        return 0;
}

_public_ int sd_radv_set_preference(sd_radv *ra, unsigned preference) {
        int r = 0;

        assert_return(ra, -EINVAL);
        assert_return(IN_SET(preference,
                             SD_NDISC_PREFERENCE_LOW,
                             SD_NDISC_PREFERENCE_MEDIUM,
                             SD_NDISC_PREFERENCE_HIGH), -EINVAL);

        ra->flags = (ra->flags & ~(0x3 << 3)) | (preference << 3);

        return r;
}

_public_ int sd_radv_add_prefix(sd_radv *ra, sd_radv_prefix *p) {
        sd_radv_prefix *cur;
        _cleanup_free_ char *addr_p = NULL;

        assert_return(ra, -EINVAL);

        if (!p)
                return -EINVAL;

        LIST_FOREACH(prefix, cur, ra->prefixes) {
                int r;

                r = in_addr_prefix_intersect(AF_INET6,
                                             (union in_addr_union*) &cur->opt.in6_addr,
                                             cur->opt.prefixlen,
                                             (union in_addr_union*) &p->opt.in6_addr,
                                             p->opt.prefixlen);
                if (r > 0) {
                        _cleanup_free_ char *addr_cur = NULL;

                        (void) in_addr_to_string(AF_INET6,
                                                 (union in_addr_union*) &cur->opt.in6_addr,
                                                 &addr_cur);
                        (void) in_addr_to_string(AF_INET6,
                                                 (union in_addr_union*) &p->opt.in6_addr,
                                                 &addr_p);

                        log_radv("IPv6 prefix %s/%u already configured, ignoring %s/%u",
                                 addr_cur, cur->opt.prefixlen,
                                 addr_p, p->opt.prefixlen);

                        return -EEXIST;
                }
        }

        p = sd_radv_prefix_ref(p);

        LIST_APPEND(prefix, ra->prefixes, p);

        ra->n_prefixes++;

        (void) in_addr_to_string(AF_INET6, (union in_addr_union*) &p->opt.in6_addr, &addr_p);
        log_radv("Added prefix %s/%d", addr_p, p->opt.prefixlen);

        return 0;
}

_public_ int sd_radv_prefix_new(sd_radv_prefix **ret) {
        _cleanup_(sd_radv_prefix_unrefp) sd_radv_prefix *p = NULL;

        assert_return(ret, -EINVAL);

        p = new0(sd_radv_prefix, 1);
        if (!p)
                return -ENOMEM;

        p->n_ref = 1;

        p->opt.type = ND_OPT_PREFIX_INFORMATION;
        p->opt.length = (sizeof(p->opt) - 1) /8 + 1;

        p->opt.prefixlen = 64;

        /* RFC 4861, Section 6.2.1 */
        SET_FLAG(p->opt.flags, ND_OPT_PI_FLAG_ONLINK, true);
        SET_FLAG(p->opt.flags, ND_OPT_PI_FLAG_AUTO, true);
        p->opt.preferred_lifetime = htobe32(604800);
        p->opt.valid_lifetime = htobe32(2592000);

        LIST_INIT(prefix, p);

        *ret = p;
        p = NULL;

        return 0;
}

_public_ sd_radv_prefix *sd_radv_prefix_ref(sd_radv_prefix *p) {
        if (!p)
                return NULL;

        assert(p->n_ref > 0);
        p->n_ref++;

        return p;
}

_public_ sd_radv_prefix *sd_radv_prefix_unref(sd_radv_prefix *p) {
        if (!p)
                return NULL;

        assert(p->n_ref > 0);
        p->n_ref--;

        if (p->n_ref > 0)
                return NULL;

        return mfree(p);
}

_public_ int sd_radv_prefix_set_prefix(sd_radv_prefix *p, struct in6_addr *in6_addr,
                                       unsigned char prefixlen) {
        assert_return(p, -EINVAL);
        assert_return(in6_addr, -EINVAL);

        if (prefixlen < 3 || prefixlen > 128)
                return -EINVAL;

        if (prefixlen > 64)
                /* unusual but allowed, log it */
                log_radv("Unusual prefix length %d greater than 64", prefixlen);

        p->opt.in6_addr = *in6_addr;
        p->opt.prefixlen = prefixlen;

        return 0;
}

_public_ int sd_radv_prefix_set_onlink(sd_radv_prefix *p, int onlink) {
        assert_return(p, -EINVAL);

        SET_FLAG(p->opt.flags, ND_OPT_PI_FLAG_ONLINK, onlink);

        return 0;
}

_public_ int sd_radv_prefix_set_address_autoconfiguration(sd_radv_prefix *p,
                                                          int address_autoconfiguration) {
        assert_return(p, -EINVAL);

        SET_FLAG(p->opt.flags, ND_OPT_PI_FLAG_AUTO, address_autoconfiguration);

        return 0;
}

_public_ int sd_radv_prefix_set_valid_lifetime(sd_radv_prefix *p,
                                               uint32_t valid_lifetime) {
        assert_return(p, -EINVAL);

        p->opt.valid_lifetime = htobe32(valid_lifetime);

        return 0;
}

_public_ int sd_radv_prefix_set_preferred_lifetime(sd_radv_prefix *p,
                                                   uint32_t preferred_lifetime) {
        assert_return(p, -EINVAL);

        p->opt.preferred_lifetime = htobe32(preferred_lifetime);

        return 0;
}
Commit	Line	Data
04473969 PF	1	/***
	2	This file is part of systemd.
	3
	4	Copyright (C) 2017 Intel Corporation. All rights reserved.
	5
	6	systemd is free software; you can redistribute it and/or modify it
	7	under the terms of the GNU Lesser General Public License as published by
	8	the Free Software Foundation; either version 2.1 of the License, or
	9	(at your option) any later version.
	10
	11	systemd is distributed in the hope that it will be useful, but
	12	WITHOUT ANY WARRANTY; without even the implied warranty of
	13	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	14	Lesser General Public License for more details.
	15
	16	You should have received a copy of the GNU Lesser General Public License
	17	along with systemd; If not, see <http://www.gnu.org/licenses/>.
	18	***/
	19
	20	#include <netinet/icmp6.h>
	21	#include <netinet/in.h>
204f99d2	22	#include <arpa/inet.h>
04473969 PF	23
	24	#include "sd-radv.h"
	25
204f99d2	26	#include "macro.h"
04473969 PF	27	#include "alloc-util.h"
	28	#include "fd-util.h"
	29	#include "icmp6-util.h"
	30	#include "in-addr-util.h"
	31	#include "radv-internal.h"
	32	#include "socket-util.h"
	33	#include "string-util.h"
	34	#include "util.h"
	35
204f99d2 PF	36	_public_ int sd_radv_new(sd_radv **ret) {
	37	_cleanup_(sd_radv_unrefp) sd_radv *ra = NULL;
	38
	39	assert_return(ret, -EINVAL);
	40
	41	ra = new0(sd_radv, 1);
	42	if (!ra)
	43	return -ENOMEM;
	44
	45	ra->n_ref = 1;
	46
	47	LIST_HEAD_INIT(ra->prefixes);
	48
	49	*ret = ra;
	50	ra = NULL;
	51
	52	return 0;
	53	}
	54
	55	_public_ int sd_radv_attach_event(sd_radv ra, sd_event event, int64_t priority) {
	56	int r;
	57
	58	assert_return(ra, -EINVAL);
	59	assert_return(!ra->event, -EBUSY);
	60
	61	if (event)
	62	ra->event = sd_event_ref(event);
	63	else {
	64	r = sd_event_default(&ra->event);
	65	if (r < 0)
	66	return 0;
	67	}
	68
	69	ra->event_priority = priority;
	70
	71	return 0;
	72	}
	73
	74	_public_ int sd_radv_detach_event(sd_radv *ra) {
	75
	76	assert_return(ra, -EINVAL);
	77
	78	ra->event = sd_event_unref(ra->event);
	79	return 0;
	80	}
	81
	82	_public_ sd_event sd_radv_get_event(sd_radv ra) {
	83	assert_return(ra, NULL);
	84
	85	return ra->event;
	86	}
	87
	88	_public_ sd_radv sd_radv_ref(sd_radv ra) {
	89	if (!ra)
	90	return NULL;
	91
	92	assert(ra->n_ref > 0);
	93	ra->n_ref++;
	94
	95	return ra;
	96	}
	97
	98	_public_ sd_radv sd_radv_unref(sd_radv ra) {
	99	if (!ra)
100	return NULL;
101
102	assert(ra->n_ref > 0);
103	ra->n_ref--;
104
105	if (ra->n_ref > 0)
106	return NULL;
107
108	while (ra->prefixes) {
109	sd_radv_prefix *p = ra->prefixes;
110
111	LIST_REMOVE(prefix, ra->prefixes, p);
112	sd_radv_prefix_unref(p);
113	}
114
115	sd_radv_detach_event(ra);
116	return mfree(ra);
117	}
118
119	_public_ int sd_radv_stop(sd_radv *ra) {
120	assert_return(ra, -EINVAL);
121
122	log_radv("Stopping IPv6 Router Advertisement daemon");
123
124	ra->state = SD_RADV_STATE_IDLE;
125
126	return 0;
127	}
128
129	_public_ int sd_radv_start(sd_radv *ra) {
130	assert_return(ra, -EINVAL);
131	assert_return(ra->event, -EINVAL);
132	assert_return(ra->ifindex > 0, -EINVAL);
133
134	if (ra->state != SD_RADV_STATE_IDLE)
135	return 0;
136
137	ra->state = SD_RADV_STATE_ADVERTISING;
138
139	log_radv("Started IPv6 Router Advertisement daemon");
140
141	return 0;
142	}
143
144	_public_ int sd_radv_set_ifindex(sd_radv *ra, int ifindex) {
145	assert_return(ra, -EINVAL);
146	assert_return(ifindex >= -1, -EINVAL);
147
148	if (ra->state != SD_RADV_STATE_IDLE)
149	return -EBUSY;
150
151	ra->ifindex = ifindex;
152
153	return 0;
154	}
155
156	_public_ int sd_radv_set_mac(sd_radv ra, const struct ether_addr mac_addr) {
157	assert_return(ra, -EINVAL);
158
159	if (ra->state != SD_RADV_STATE_IDLE)
160	return -EBUSY;
161
162	if (mac_addr)
163	ra->mac_addr = *mac_addr;
164	else
165	zero(ra->mac_addr);
166
167	return 0;
168	}
169
170	_public_ int sd_radv_set_mtu(sd_radv *ra, uint32_t mtu) {
171	assert_return(ra, -EINVAL);
172	assert_return(mtu >= 1280, -EINVAL);
173
174	if (ra->state != SD_RADV_STATE_IDLE)
175	return -EBUSY;
176
177	ra->mtu = mtu;
178
179	return 0;
180	}
181
182	_public_ int sd_radv_set_hop_limit(sd_radv *ra, uint8_t hop_limit) {
183	assert_return(ra, -EINVAL);
184
185	if (ra->state != SD_RADV_STATE_IDLE)
186	return -EBUSY;
187
188	ra->hop_limit = hop_limit;
189
190	return 0;
191	}
192
193	_public_ int sd_radv_set_router_lifetime(sd_radv *ra, uint32_t router_lifetime) {
194	assert_return(ra, -EINVAL);
195
196	if (ra->state != SD_RADV_STATE_IDLE)
197	return -EBUSY;
198
199	/* RFC 4191, Section 2.2, "...If the Router Lifetime is zero, the
200	preference value MUST be set to (00) by the sender..." */
201	if (router_lifetime == 0 &&
202	(ra->flags & (0x3 << 3)) != (SD_NDISC_PREFERENCE_MEDIUM << 3))
203	return -ETIME;
204
205	ra->lifetime = router_lifetime;
206
207	return 0;
208	}
209
210	_public_ int sd_radv_set_managed_information(sd_radv *ra, int managed) {
211	assert_return(ra, -EINVAL);
212
213	if (ra->state != SD_RADV_STATE_IDLE)
214	return -EBUSY;
215
216	SET_FLAG(ra->flags, ND_RA_FLAG_MANAGED, managed);
217
218	return 0;
219	}
220
221	_public_ int sd_radv_set_other_information(sd_radv *ra, int other) {
222	assert_return(ra, -EINVAL);
223
224	if (ra->state != SD_RADV_STATE_IDLE)
225	return -EBUSY;
226
227	SET_FLAG(ra->flags, ND_RA_FLAG_OTHER, other);
228
229	return 0;
230	}
231
232	_public_ int sd_radv_set_preference(sd_radv *ra, unsigned preference) {
233	int r = 0;
234
235	assert_return(ra, -EINVAL);
236	assert_return(IN_SET(preference,
237	SD_NDISC_PREFERENCE_LOW,
238	SD_NDISC_PREFERENCE_MEDIUM,
239	SD_NDISC_PREFERENCE_HIGH), -EINVAL);
240
241	ra->flags = (ra->flags & ~(0x3 << 3)) \| (preference << 3);
242
243	return r;
244	}
245
246	_public_ int sd_radv_add_prefix(sd_radv ra, sd_radv_prefix p) {
247	sd_radv_prefix *cur;
248	_cleanup_free_ char *addr_p = NULL;
249
250	assert_return(ra, -EINVAL);
251
252	if (!p)
253	return -EINVAL;
254
255	LIST_FOREACH(prefix, cur, ra->prefixes) {
256	int r;
257
258	r = in_addr_prefix_intersect(AF_INET6,
259	(union in_addr_union*) &cur->opt.in6_addr,
260	cur->opt.prefixlen,
261	(union in_addr_union*) &p->opt.in6_addr,
262	p->opt.prefixlen);
263	if (r > 0) {
264	_cleanup_free_ char *addr_cur = NULL;
265
266	(void) in_addr_to_string(AF_INET6,
267	(union in_addr_union*) &cur->opt.in6_addr,
268	&addr_cur);
269	(void) in_addr_to_string(AF_INET6,
270	(union in_addr_union*) &p->opt.in6_addr,
271	&addr_p);
272
273	log_radv("IPv6 prefix %s/%u already configured, ignoring %s/%u",
274	addr_cur, cur->opt.prefixlen,
275	addr_p, p->opt.prefixlen);
276
277	return -EEXIST;
278	}
279	}
280
281	p = sd_radv_prefix_ref(p);
282
283	LIST_APPEND(prefix, ra->prefixes, p);
284
285	ra->n_prefixes++;
286
287	(void) in_addr_to_string(AF_INET6, (union in_addr_union*) &p->opt.in6_addr, &addr_p);
288	log_radv("Added prefix %s/%d", addr_p, p->opt.prefixlen);
289
290	return 0;
291	}
292
04473969 PF	293	_public_ int sd_radv_prefix_new(sd_radv_prefix **ret) {
	294	_cleanup_(sd_radv_prefix_unrefp) sd_radv_prefix *p = NULL;
	295
	296	assert_return(ret, -EINVAL);
	297
	298	p = new0(sd_radv_prefix, 1);
	299	if (!p)
	300	return -ENOMEM;
	301
	302	p->n_ref = 1;
	303
	304	p->opt.type = ND_OPT_PREFIX_INFORMATION;
	305	p->opt.length = (sizeof(p->opt) - 1) /8 + 1;
	306
	307	p->opt.prefixlen = 64;
	308
	309	/* RFC 4861, Section 6.2.1 */
	310	SET_FLAG(p->opt.flags, ND_OPT_PI_FLAG_ONLINK, true);
	311	SET_FLAG(p->opt.flags, ND_OPT_PI_FLAG_AUTO, true);
	312	p->opt.preferred_lifetime = htobe32(604800);
	313	p->opt.valid_lifetime = htobe32(2592000);
	314
204f99d2 PF	315	LIST_INIT(prefix, p);
204f99d2 PF	316
04473969 PF	317	*ret = p;
	318	p = NULL;
	319
	320	return 0;
	321	}
	322
	323	_public_ sd_radv_prefix sd_radv_prefix_ref(sd_radv_prefix p) {
	324	if (!p)
	325	return NULL;
	326
	327	assert(p->n_ref > 0);
	328	p->n_ref++;
	329
	330	return p;
	331	}
	332
	333	_public_ sd_radv_prefix sd_radv_prefix_unref(sd_radv_prefix p) {
	334	if (!p)
	335	return NULL;
	336
	337	assert(p->n_ref > 0);
	338	p->n_ref--;
	339
	340	if (p->n_ref > 0)
	341	return NULL;
	342
	343	return mfree(p);
	344	}
	345
	346	_public_ int sd_radv_prefix_set_prefix(sd_radv_prefix p, struct in6_addr in6_addr,
	347	unsigned char prefixlen) {
	348	assert_return(p, -EINVAL);
	349	assert_return(in6_addr, -EINVAL);
	350
	351	if (prefixlen < 3 \|\| prefixlen > 128)
	352	return -EINVAL;
	353
	354	if (prefixlen > 64)
	355	/* unusual but allowed, log it */
	356	log_radv("Unusual prefix length %d greater than 64", prefixlen);
	357
	358	p->opt.in6_addr = *in6_addr;
	359	p->opt.prefixlen = prefixlen;
	360
	361	return 0;
	362	}
	363
	364	_public_ int sd_radv_prefix_set_onlink(sd_radv_prefix *p, int onlink) {
	365	assert_return(p, -EINVAL);
	366
	367	SET_FLAG(p->opt.flags, ND_OPT_PI_FLAG_ONLINK, onlink);
	368
	369	return 0;
	370	}
	371
	372	_public_ int sd_radv_prefix_set_address_autoconfiguration(sd_radv_prefix *p,
	373	int address_autoconfiguration) {
	374	assert_return(p, -EINVAL);
	375
	376	SET_FLAG(p->opt.flags, ND_OPT_PI_FLAG_AUTO, address_autoconfiguration);
	377
	378	return 0;
	379	}
	380
381	_public_ int sd_radv_prefix_set_valid_lifetime(sd_radv_prefix *p,
382	uint32_t valid_lifetime) {
383	assert_return(p, -EINVAL);
384
385	p->opt.valid_lifetime = htobe32(valid_lifetime);
386
387	return 0;
388	}
389
390	_public_ int sd_radv_prefix_set_preferred_lifetime(sd_radv_prefix *p,
391	uint32_t preferred_lifetime) {
392	assert_return(p, -EINVAL);
393
394	p->opt.preferred_lifetime = htobe32(preferred_lifetime);
395
396	return 0;
397	}