1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * SR-IPv6 implementation
4 *
5 * Author:
6 * David Lebrun <david.lebrun@uclouvain.be>
7 */
8
9#include <linux/errno.h>
10#include <linux/types.h>
11#include <linux/socket.h>
12#include <linux/net.h>
13#include <linux/in6.h>
14#include <linux/slab.h>
15#include <linux/rhashtable.h>
16
17#include <net/ipv6.h>
18#include <net/protocol.h>
19
20#include <net/seg6.h>
21#include <net/genetlink.h>
22#include <linux/seg6.h>
23#include <linux/seg6_genl.h>
24#include <net/seg6_hmac.h>
25
26bool seg6_validate_srh(struct ipv6_sr_hdr *srh, int len, bool reduced)
27{
28 unsigned int tlv_offset;
29 int max_last_entry;
30 int trailing;
31
32 if (srh->type != IPV6_SRCRT_TYPE_4)
33 return false;
34
35 if (((srh->hdrlen + 1) << 3) != len)
36 return false;
37
38 if (!reduced && srh->segments_left > srh->first_segment) {
39 return false;
40 } else {
41 max_last_entry = (srh->hdrlen / 2) - 1;
42
43 if (srh->first_segment > max_last_entry)
44 return false;
45
46 if (srh->segments_left > srh->first_segment + 1)
47 return false;
48 }
49
50 tlv_offset = sizeof(*srh) + ((srh->first_segment + 1) << 4);
51
52 trailing = len - tlv_offset;
53 if (trailing < 0)
54 return false;
55
56 while (trailing) {
57 struct sr6_tlv *tlv;
58 unsigned int tlv_len;
59
60 if (trailing < sizeof(*tlv))
61 return false;
62
63 tlv = (struct sr6_tlv *)((unsigned char *)srh + tlv_offset);
64 tlv_len = sizeof(*tlv) + tlv->len;
65
66 trailing -= tlv_len;
67 if (trailing < 0)
68 return false;
69
70 tlv_offset += tlv_len;
71 }
72
73 return true;
74}
75
76struct ipv6_sr_hdr *seg6_get_srh(struct sk_buff *skb, int flags)
77{
78 struct ipv6_sr_hdr *srh;
79 int len, srhoff = 0;
80
81 if (ipv6_find_hdr(skb, offset: &srhoff, IPPROTO_ROUTING, NULL, fragflg: &flags) < 0)
82 return NULL;
83
84 if (!pskb_may_pull(skb, len: srhoff + sizeof(*srh)))
85 return NULL;
86
87 srh = (struct ipv6_sr_hdr *)(skb->data + srhoff);
88
89 len = (srh->hdrlen + 1) << 3;
90
91 if (!pskb_may_pull(skb, len: srhoff + len))
92 return NULL;
93
94 /* note that pskb_may_pull may change pointers in header;
95 * for this reason it is necessary to reload them when needed.
96 */
97 srh = (struct ipv6_sr_hdr *)(skb->data + srhoff);
98
99 if (!seg6_validate_srh(srh, len, reduced: true))
100 return NULL;
101
102 return srh;
103}
104
105/* Determine if an ICMP invoking packet contains a segment routing
106 * header. If it does, extract the offset to the true destination
107 * address, which is in the first segment address.
108 */
109void seg6_icmp_srh(struct sk_buff *skb, struct inet6_skb_parm *opt)
110{
111 __u16 network_header = skb->network_header;
112 struct ipv6_sr_hdr *srh;
113
114 /* Update network header to point to the invoking packet
115 * inside the ICMP packet, so we can use the seg6_get_srh()
116 * helper.
117 */
118 skb_reset_network_header(skb);
119
120 srh = seg6_get_srh(skb, flags: 0);
121 if (!srh)
122 goto out;
123
124 if (srh->type != IPV6_SRCRT_TYPE_4)
125 goto out;
126
127 opt->flags |= IP6SKB_SEG6;
128 opt->srhoff = (unsigned char *)srh - skb->data;
129
130out:
131 /* Restore the network header back to the ICMP packet */
132 skb->network_header = network_header;
133}
134
135static struct genl_family seg6_genl_family;
136
137static const struct nla_policy seg6_genl_policy[SEG6_ATTR_MAX + 1] = {
138 [SEG6_ATTR_DST] = { .type = NLA_BINARY,
139 .len = sizeof(struct in6_addr) },
140 [SEG6_ATTR_DSTLEN] = { .type = NLA_S32, },
141 [SEG6_ATTR_HMACKEYID] = { .type = NLA_U32, },
142 [SEG6_ATTR_SECRET] = { .type = NLA_BINARY, },
143 [SEG6_ATTR_SECRETLEN] = { .type = NLA_U8, },
144 [SEG6_ATTR_ALGID] = { .type = NLA_U8, },
145 [SEG6_ATTR_HMACINFO] = { .type = NLA_NESTED, },
146};
147
148#ifdef CONFIG_IPV6_SEG6_HMAC
149
150static int seg6_genl_sethmac(struct sk_buff *skb, struct genl_info *info)
151{
152 struct net *net = genl_info_net(info);
153 struct seg6_pernet_data *sdata;
154 struct seg6_hmac_info *hinfo;
155 u32 hmackeyid;
156 char *secret;
157 int err = 0;
158 u8 algid;
159 u8 slen;
160
161 sdata = seg6_pernet(net);
162
163 if (!info->attrs[SEG6_ATTR_HMACKEYID] ||
164 !info->attrs[SEG6_ATTR_SECRETLEN] ||
165 !info->attrs[SEG6_ATTR_ALGID])
166 return -EINVAL;
167
168 hmackeyid = nla_get_u32(info->attrs[SEG6_ATTR_HMACKEYID]);
169 slen = nla_get_u8(info->attrs[SEG6_ATTR_SECRETLEN]);
170 algid = nla_get_u8(info->attrs[SEG6_ATTR_ALGID]);
171
172 if (hmackeyid == 0)
173 return -EINVAL;
174
175 if (slen > SEG6_HMAC_SECRET_LEN)
176 return -EINVAL;
177
178 mutex_lock(&sdata->lock);
179 hinfo = seg6_hmac_info_lookup(net, hmackeyid);
180
181 if (!slen) {
182 err = seg6_hmac_info_del(net, hmackeyid);
183
184 goto out_unlock;
185 }
186
187 if (!info->attrs[SEG6_ATTR_SECRET]) {
188 err = -EINVAL;
189 goto out_unlock;
190 }
191
192 if (slen > nla_len(info->attrs[SEG6_ATTR_SECRET])) {
193 err = -EINVAL;
194 goto out_unlock;
195 }
196
197 if (hinfo) {
198 err = seg6_hmac_info_del(net, hmackeyid);
199 if (err)
200 goto out_unlock;
201 }
202
203 secret = (char *)nla_data(info->attrs[SEG6_ATTR_SECRET]);
204
205 hinfo = kzalloc(sizeof(*hinfo), GFP_KERNEL);
206 if (!hinfo) {
207 err = -ENOMEM;
208 goto out_unlock;
209 }
210
211 memcpy(hinfo->secret, secret, slen);
212 hinfo->slen = slen;
213 hinfo->alg_id = algid;
214 hinfo->hmackeyid = hmackeyid;
215
216 err = seg6_hmac_info_add(net, hmackeyid, hinfo);
217 if (err)
218 kfree(hinfo);
219
220out_unlock:
221 mutex_unlock(&sdata->lock);
222 return err;
223}
224
225#else
226
227static int seg6_genl_sethmac(struct sk_buff *skb, struct genl_info *info)
228{
229 return -ENOTSUPP;
230}
231
232#endif
233
234static int seg6_genl_set_tunsrc(struct sk_buff *skb, struct genl_info *info)
235{
236 struct net *net = genl_info_net(info);
237 struct in6_addr *val, *t_old, *t_new;
238 struct seg6_pernet_data *sdata;
239
240 sdata = seg6_pernet(net);
241
242 if (!info->attrs[SEG6_ATTR_DST])
243 return -EINVAL;
244
245 val = nla_data(nla: info->attrs[SEG6_ATTR_DST]);
246 t_new = kmemdup(val, sizeof(*val), GFP_KERNEL);
247 if (!t_new)
248 return -ENOMEM;
249
250 mutex_lock(lock: &sdata->lock);
251
252 t_old = sdata->tun_src;
253 rcu_assign_pointer(sdata->tun_src, t_new);
254
255 mutex_unlock(lock: &sdata->lock);
256
257 synchronize_net();
258 kfree(objp: t_old);
259
260 return 0;
261}
262
263static int seg6_genl_get_tunsrc(struct sk_buff *skb, struct genl_info *info)
264{
265 struct net *net = genl_info_net(info);
266 struct in6_addr *tun_src;
267 struct sk_buff *msg;
268 void *hdr;
269
270 msg = genlmsg_new(NLMSG_DEFAULT_SIZE, GFP_KERNEL);
271 if (!msg)
272 return -ENOMEM;
273
274 hdr = genlmsg_put(skb: msg, portid: info->snd_portid, seq: info->snd_seq,
275 family: &seg6_genl_family, flags: 0, cmd: SEG6_CMD_GET_TUNSRC);
276 if (!hdr)
277 goto free_msg;
278
279 rcu_read_lock();
280 tun_src = rcu_dereference(seg6_pernet(net)->tun_src);
281
282 if (nla_put(skb: msg, attrtype: SEG6_ATTR_DST, attrlen: sizeof(struct in6_addr), data: tun_src))
283 goto nla_put_failure;
284
285 rcu_read_unlock();
286
287 genlmsg_end(skb: msg, hdr);
288 return genlmsg_reply(skb: msg, info);
289
290nla_put_failure:
291 rcu_read_unlock();
292free_msg:
293 nlmsg_free(skb: msg);
294 return -ENOMEM;
295}
296
297#ifdef CONFIG_IPV6_SEG6_HMAC
298
299static int __seg6_hmac_fill_info(struct seg6_hmac_info *hinfo,
300 struct sk_buff *msg)
301{
302 if (nla_put_u32(msg, SEG6_ATTR_HMACKEYID, hinfo->hmackeyid) ||
303 nla_put_u8(msg, SEG6_ATTR_SECRETLEN, hinfo->slen) ||
304 nla_put(msg, SEG6_ATTR_SECRET, hinfo->slen, hinfo->secret) ||
305 nla_put_u8(msg, SEG6_ATTR_ALGID, hinfo->alg_id))
306 return -1;
307
308 return 0;
309}
310
311static int __seg6_genl_dumphmac_element(struct seg6_hmac_info *hinfo,
312 u32 portid, u32 seq, u32 flags,
313 struct sk_buff *skb, u8 cmd)
314{
315 void *hdr;
316
317 hdr = genlmsg_put(skb, portid, seq, &seg6_genl_family, flags, cmd);
318 if (!hdr)
319 return -ENOMEM;
320
321 if (__seg6_hmac_fill_info(hinfo, skb) < 0)
322 goto nla_put_failure;
323
324 genlmsg_end(skb, hdr);
325 return 0;
326
327nla_put_failure:
328 genlmsg_cancel(skb, hdr);
329 return -EMSGSIZE;
330}
331
332static int seg6_genl_dumphmac_start(struct netlink_callback *cb)
333{
334 struct net *net = sock_net(cb->skb->sk);
335 struct seg6_pernet_data *sdata;
336 struct rhashtable_iter *iter;
337
338 sdata = seg6_pernet(net);
339 iter = (struct rhashtable_iter *)cb->args[0];
340
341 if (!iter) {
342 iter = kmalloc(sizeof(*iter), GFP_KERNEL);
343 if (!iter)
344 return -ENOMEM;
345
346 cb->args[0] = (long)iter;
347 }
348
349 rhashtable_walk_enter(&sdata->hmac_infos, iter);
350
351 return 0;
352}
353
354static int seg6_genl_dumphmac_done(struct netlink_callback *cb)
355{
356 struct rhashtable_iter *iter = (struct rhashtable_iter *)cb->args[0];
357
358 rhashtable_walk_exit(iter);
359
360 kfree(iter);
361
362 return 0;
363}
364
365static int seg6_genl_dumphmac(struct sk_buff *skb, struct netlink_callback *cb)
366{
367 struct rhashtable_iter *iter = (struct rhashtable_iter *)cb->args[0];
368 struct seg6_hmac_info *hinfo;
369 int ret;
370
371 rhashtable_walk_start(iter);
372
373 for (;;) {
374 hinfo = rhashtable_walk_next(iter);
375
376 if (IS_ERR(hinfo)) {
377 if (PTR_ERR(hinfo) == -EAGAIN)
378 continue;
379 ret = PTR_ERR(hinfo);
380 goto done;
381 } else if (!hinfo) {
382 break;
383 }
384
385 ret = __seg6_genl_dumphmac_element(hinfo,
386 NETLINK_CB(cb->skb).portid,
387 cb->nlh->nlmsg_seq,
388 NLM_F_MULTI,
389 skb, SEG6_CMD_DUMPHMAC);
390 if (ret)
391 goto done;
392 }
393
394 ret = skb->len;
395
396done:
397 rhashtable_walk_stop(iter);
398 return ret;
399}
400
401#else
402
403static int seg6_genl_dumphmac_start(struct netlink_callback *cb)
404{
405 return 0;
406}
407
408static int seg6_genl_dumphmac_done(struct netlink_callback *cb)
409{
410 return 0;
411}
412
413static int seg6_genl_dumphmac(struct sk_buff *skb, struct netlink_callback *cb)
414{
415 return -ENOTSUPP;
416}
417
418#endif
419
420static int __net_init seg6_net_init(struct net *net)
421{
422 struct seg6_pernet_data *sdata;
423
424 sdata = kzalloc(sizeof(*sdata), GFP_KERNEL);
425 if (!sdata)
426 return -ENOMEM;
427
428 mutex_init(&sdata->lock);
429
430 sdata->tun_src = kzalloc(sizeof(*sdata->tun_src), GFP_KERNEL);
431 if (!sdata->tun_src) {
432 kfree(objp: sdata);
433 return -ENOMEM;
434 }
435
436 net->ipv6.seg6_data = sdata;
437
438 if (seg6_hmac_net_init(net)) {
439 kfree(rcu_dereference_raw(sdata->tun_src));
440 kfree(objp: sdata);
441 return -ENOMEM;
442 }
443
444 return 0;
445}
446
447static void __net_exit seg6_net_exit(struct net *net)
448{
449 struct seg6_pernet_data *sdata = seg6_pernet(net);
450
451 seg6_hmac_net_exit(net);
452
453 kfree(rcu_dereference_raw(sdata->tun_src));
454 kfree(objp: sdata);
455}
456
457static struct pernet_operations ip6_segments_ops = {
458 .init = seg6_net_init,
459 .exit = seg6_net_exit,
460};
461
462static const struct genl_ops seg6_genl_ops[] = {
463 {
464 .cmd = SEG6_CMD_SETHMAC,
465 .validate = GENL_DONT_VALIDATE_STRICT | GENL_DONT_VALIDATE_DUMP,
466 .doit = seg6_genl_sethmac,
467 .flags = GENL_ADMIN_PERM,
468 },
469 {
470 .cmd = SEG6_CMD_DUMPHMAC,
471 .validate = GENL_DONT_VALIDATE_STRICT | GENL_DONT_VALIDATE_DUMP,
472 .start = seg6_genl_dumphmac_start,
473 .dumpit = seg6_genl_dumphmac,
474 .done = seg6_genl_dumphmac_done,
475 .flags = GENL_ADMIN_PERM,
476 },
477 {
478 .cmd = SEG6_CMD_SET_TUNSRC,
479 .validate = GENL_DONT_VALIDATE_STRICT | GENL_DONT_VALIDATE_DUMP,
480 .doit = seg6_genl_set_tunsrc,
481 .flags = GENL_ADMIN_PERM,
482 },
483 {
484 .cmd = SEG6_CMD_GET_TUNSRC,
485 .validate = GENL_DONT_VALIDATE_STRICT | GENL_DONT_VALIDATE_DUMP,
486 .doit = seg6_genl_get_tunsrc,
487 .flags = GENL_ADMIN_PERM,
488 },
489};
490
491static struct genl_family seg6_genl_family __ro_after_init = {
492 .hdrsize = 0,
493 .name = SEG6_GENL_NAME,
494 .version = SEG6_GENL_VERSION,
495 .maxattr = SEG6_ATTR_MAX,
496 .policy = seg6_genl_policy,
497 .netnsok = true,
498 .parallel_ops = true,
499 .ops = seg6_genl_ops,
500 .n_ops = ARRAY_SIZE(seg6_genl_ops),
501 .resv_start_op = SEG6_CMD_GET_TUNSRC + 1,
502 .module = THIS_MODULE,
503};
504
505int __init seg6_init(void)
506{
507 int err;
508
509 err = register_pernet_subsys(&ip6_segments_ops);
510 if (err)
511 goto out;
512
513 err = genl_register_family(family: &seg6_genl_family);
514 if (err)
515 goto out_unregister_pernet;
516
517 err = seg6_iptunnel_init();
518 if (err)
519 goto out_unregister_genl;
520
521 err = seg6_local_init();
522 if (err)
523 goto out_unregister_iptun;
524
525 pr_info("Segment Routing with IPv6\n");
526
527out:
528 return err;
529out_unregister_iptun:
530 seg6_iptunnel_exit();
531out_unregister_genl:
532 genl_unregister_family(family: &seg6_genl_family);
533out_unregister_pernet:
534 unregister_pernet_subsys(&ip6_segments_ops);
535 goto out;
536}
537
538void seg6_exit(void)
539{
540 seg6_local_exit();
541 seg6_iptunnel_exit();
542 genl_unregister_family(family: &seg6_genl_family);
543 unregister_pernet_subsys(&ip6_segments_ops);
544}
545