1 // SPDX-License-Identifier: GPL-2.0
3 * DECnet An implementation of the DECnet protocol suite for the LINUX
4 * operating system. DECnet is implemented using the BSD Socket
5 * interface as the means of communication with the user level.
7 * DECnet Routing Forwarding Information Base (Glue/Info List)
9 * Author: Steve Whitehouse <SteveW@ACM.org>
13 * Alexey Kuznetsov : SMP locking changes
14 * Steve Whitehouse : Rewrote it... Well to be more correct, I
15 * copied most of it from the ipv4 fib code.
16 * Steve Whitehouse : Updated it in style and fixed a few bugs
17 * which were fixed in the ipv4 code since
18 * this code was copied from it.
21 #include <linux/string.h>
22 #include <linux/net.h>
23 #include <linux/socket.h>
24 #include <linux/slab.h>
25 #include <linux/sockios.h>
26 #include <linux/init.h>
27 #include <linux/skbuff.h>
28 #include <linux/netlink.h>
29 #include <linux/rtnetlink.h>
30 #include <linux/proc_fs.h>
31 #include <linux/netdevice.h>
32 #include <linux/timer.h>
33 #include <linux/spinlock.h>
34 #include <linux/atomic.h>
35 #include <linux/uaccess.h>
36 #include <net/neighbour.h>
39 #include <net/fib_rules.h>
41 #include <net/dn_route.h>
42 #include <net/dn_fib.h>
43 #include <net/dn_neigh.h>
44 #include <net/dn_dev.h>
47 #define RT_MIN_TABLE 1
49 #define for_fib_info() { struct dn_fib_info *fi;\
50 for(fi = dn_fib_info_list; fi; fi = fi->fib_next)
51 #define endfor_fib_info() }
53 #define for_nexthops(fi) { int nhsel; const struct dn_fib_nh *nh;\
54 for(nhsel = 0, nh = (fi)->fib_nh; nhsel < (fi)->fib_nhs; nh++, nhsel++)
56 #define change_nexthops(fi) { int nhsel; struct dn_fib_nh *nh;\
57 for(nhsel = 0, nh = (struct dn_fib_nh *)((fi)->fib_nh); nhsel < (fi)->fib_nhs; nh++, nhsel++)
59 #define endfor_nexthops(fi) }
61 static DEFINE_SPINLOCK(dn_fib_multipath_lock);
62 static struct dn_fib_info *dn_fib_info_list;
63 static DEFINE_SPINLOCK(dn_fib_info_lock);
69 } dn_fib_props[RTN_MAX+1] = {
70 [RTN_UNSPEC] = { .error = 0, .scope = RT_SCOPE_NOWHERE },
71 [RTN_UNICAST] = { .error = 0, .scope = RT_SCOPE_UNIVERSE },
72 [RTN_LOCAL] = { .error = 0, .scope = RT_SCOPE_HOST },
73 [RTN_BROADCAST] = { .error = -EINVAL, .scope = RT_SCOPE_NOWHERE },
74 [RTN_ANYCAST] = { .error = -EINVAL, .scope = RT_SCOPE_NOWHERE },
75 [RTN_MULTICAST] = { .error = -EINVAL, .scope = RT_SCOPE_NOWHERE },
76 [RTN_BLACKHOLE] = { .error = -EINVAL, .scope = RT_SCOPE_UNIVERSE },
77 [RTN_UNREACHABLE] = { .error = -EHOSTUNREACH, .scope = RT_SCOPE_UNIVERSE },
78 [RTN_PROHIBIT] = { .error = -EACCES, .scope = RT_SCOPE_UNIVERSE },
79 [RTN_THROW] = { .error = -EAGAIN, .scope = RT_SCOPE_UNIVERSE },
80 [RTN_NAT] = { .error = 0, .scope = RT_SCOPE_NOWHERE },
81 [RTN_XRESOLVE] = { .error = -EINVAL, .scope = RT_SCOPE_NOWHERE },
84 static int dn_fib_sync_down(__le16 local, struct net_device *dev, int force);
85 static int dn_fib_sync_up(struct net_device *dev);
87 void dn_fib_free_info(struct dn_fib_info *fi)
89 if (fi->fib_dead == 0) {
90 printk(KERN_DEBUG "DECnet: BUG! Attempt to free alive dn_fib_info\n");
98 } endfor_nexthops(fi);
102 void dn_fib_release_info(struct dn_fib_info *fi)
104 spin_lock(&dn_fib_info_lock);
105 if (fi && --fi->fib_treeref == 0) {
107 fi->fib_next->fib_prev = fi->fib_prev;
109 fi->fib_prev->fib_next = fi->fib_next;
110 if (fi == dn_fib_info_list)
111 dn_fib_info_list = fi->fib_next;
115 spin_unlock(&dn_fib_info_lock);
118 static inline int dn_fib_nh_comp(const struct dn_fib_info *fi, const struct dn_fib_info *ofi)
120 const struct dn_fib_nh *onh = ofi->fib_nh;
123 if (nh->nh_oif != onh->nh_oif ||
124 nh->nh_gw != onh->nh_gw ||
125 nh->nh_scope != onh->nh_scope ||
126 nh->nh_weight != onh->nh_weight ||
127 ((nh->nh_flags^onh->nh_flags)&~RTNH_F_DEAD))
130 } endfor_nexthops(fi);
134 static inline struct dn_fib_info *dn_fib_find_info(const struct dn_fib_info *nfi)
137 if (fi->fib_nhs != nfi->fib_nhs)
139 if (nfi->fib_protocol == fi->fib_protocol &&
140 nfi->fib_prefsrc == fi->fib_prefsrc &&
141 nfi->fib_priority == fi->fib_priority &&
142 memcmp(nfi->fib_metrics, fi->fib_metrics, sizeof(fi->fib_metrics)) == 0 &&
143 ((nfi->fib_flags^fi->fib_flags)&~RTNH_F_DEAD) == 0 &&
144 (nfi->fib_nhs == 0 || dn_fib_nh_comp(fi, nfi) == 0))
150 static int dn_fib_count_nhs(const struct nlattr *attr)
152 struct rtnexthop *nhp = nla_data(attr);
153 int nhs = 0, nhlen = nla_len(attr);
155 while (rtnh_ok(nhp, nhlen)) {
157 nhp = rtnh_next(nhp, &nhlen);
160 /* leftover implies invalid nexthop configuration, discard it */
161 return nhlen > 0 ? 0 : nhs;
164 static int dn_fib_get_nhs(struct dn_fib_info *fi, const struct nlattr *attr,
165 const struct rtmsg *r)
167 struct rtnexthop *nhp = nla_data(attr);
168 int nhlen = nla_len(attr);
170 change_nexthops(fi) {
173 if (!rtnh_ok(nhp, nhlen))
176 nh->nh_flags = (r->rtm_flags&~0xFF) | nhp->rtnh_flags;
177 nh->nh_oif = nhp->rtnh_ifindex;
178 nh->nh_weight = nhp->rtnh_hops + 1;
180 attrlen = rtnh_attrlen(nhp);
182 struct nlattr *gw_attr;
184 gw_attr = nla_find((struct nlattr *) (nhp + 1), attrlen, RTA_GATEWAY);
185 nh->nh_gw = gw_attr ? nla_get_le16(gw_attr) : 0;
188 nhp = rtnh_next(nhp, &nhlen);
189 } endfor_nexthops(fi);
195 static int dn_fib_check_nh(const struct rtmsg *r, struct dn_fib_info *fi, struct dn_fib_nh *nh)
201 struct dn_fib_res res;
203 if (nh->nh_flags&RTNH_F_ONLINK) {
204 struct net_device *dev;
206 if (r->rtm_scope >= RT_SCOPE_LINK)
208 if (dnet_addr_type(nh->nh_gw) != RTN_UNICAST)
210 if ((dev = __dev_get_by_index(&init_net, nh->nh_oif)) == NULL)
212 if (!(dev->flags&IFF_UP))
216 nh->nh_scope = RT_SCOPE_LINK;
220 memset(&fld, 0, sizeof(fld));
221 fld.daddr = nh->nh_gw;
222 fld.flowidn_oif = nh->nh_oif;
223 fld.flowidn_scope = r->rtm_scope + 1;
225 if (fld.flowidn_scope < RT_SCOPE_LINK)
226 fld.flowidn_scope = RT_SCOPE_LINK;
228 if ((err = dn_fib_lookup(&fld, &res)) != 0)
232 if (res.type != RTN_UNICAST && res.type != RTN_LOCAL)
234 nh->nh_scope = res.scope;
235 nh->nh_oif = DN_FIB_RES_OIF(res);
236 nh->nh_dev = DN_FIB_RES_DEV(res);
237 if (nh->nh_dev == NULL)
239 dev_hold(nh->nh_dev);
241 if (!(nh->nh_dev->flags & IFF_UP))
245 dn_fib_res_put(&res);
248 struct net_device *dev;
250 if (nh->nh_flags&(RTNH_F_PERVASIVE|RTNH_F_ONLINK))
253 dev = __dev_get_by_index(&init_net, nh->nh_oif);
254 if (dev == NULL || dev->dn_ptr == NULL)
256 if (!(dev->flags&IFF_UP))
259 dev_hold(nh->nh_dev);
260 nh->nh_scope = RT_SCOPE_HOST;
267 struct dn_fib_info *dn_fib_create_info(const struct rtmsg *r, struct nlattr *attrs[],
268 const struct nlmsghdr *nlh, int *errp)
271 struct dn_fib_info *fi = NULL;
272 struct dn_fib_info *ofi;
275 if (r->rtm_type > RTN_MAX)
278 if (dn_fib_props[r->rtm_type].scope > r->rtm_scope)
281 if (attrs[RTA_MULTIPATH] &&
282 (nhs = dn_fib_count_nhs(attrs[RTA_MULTIPATH])) == 0)
285 fi = kzalloc(struct_size(fi, fib_nh, nhs), GFP_KERNEL);
290 fi->fib_protocol = r->rtm_protocol;
292 fi->fib_flags = r->rtm_flags;
294 if (attrs[RTA_PRIORITY])
295 fi->fib_priority = nla_get_u32(attrs[RTA_PRIORITY]);
297 if (attrs[RTA_METRICS]) {
301 nla_for_each_nested(attr, attrs[RTA_METRICS], rem) {
302 int type = nla_type(attr);
305 if (type > RTAX_MAX || type == RTAX_CC_ALGO ||
309 fi->fib_metrics[type-1] = nla_get_u32(attr);
314 if (attrs[RTA_PREFSRC])
315 fi->fib_prefsrc = nla_get_le16(attrs[RTA_PREFSRC]);
317 if (attrs[RTA_MULTIPATH]) {
318 if ((err = dn_fib_get_nhs(fi, attrs[RTA_MULTIPATH], r)) != 0)
321 if (attrs[RTA_OIF] &&
322 fi->fib_nh->nh_oif != nla_get_u32(attrs[RTA_OIF]))
325 if (attrs[RTA_GATEWAY] &&
326 fi->fib_nh->nh_gw != nla_get_le16(attrs[RTA_GATEWAY]))
329 struct dn_fib_nh *nh = fi->fib_nh;
332 nh->nh_oif = nla_get_u32(attrs[RTA_OIF]);
334 if (attrs[RTA_GATEWAY])
335 nh->nh_gw = nla_get_le16(attrs[RTA_GATEWAY]);
337 nh->nh_flags = r->rtm_flags;
341 if (r->rtm_type == RTN_NAT) {
342 if (!attrs[RTA_GATEWAY] || nhs != 1 || attrs[RTA_OIF])
345 fi->fib_nh->nh_gw = nla_get_le16(attrs[RTA_GATEWAY]);
349 if (dn_fib_props[r->rtm_type].error) {
350 if (attrs[RTA_GATEWAY] || attrs[RTA_OIF] || attrs[RTA_MULTIPATH])
356 if (r->rtm_scope > RT_SCOPE_HOST)
359 if (r->rtm_scope == RT_SCOPE_HOST) {
360 struct dn_fib_nh *nh = fi->fib_nh;
362 /* Local address is added */
363 if (nhs != 1 || nh->nh_gw)
365 nh->nh_scope = RT_SCOPE_NOWHERE;
366 nh->nh_dev = dev_get_by_index(&init_net, fi->fib_nh->nh_oif);
368 if (nh->nh_dev == NULL)
371 change_nexthops(fi) {
372 if ((err = dn_fib_check_nh(r, fi, nh)) != 0)
374 } endfor_nexthops(fi)
377 if (fi->fib_prefsrc) {
378 if (r->rtm_type != RTN_LOCAL || !attrs[RTA_DST] ||
379 fi->fib_prefsrc != nla_get_le16(attrs[RTA_DST]))
380 if (dnet_addr_type(fi->fib_prefsrc) != RTN_LOCAL)
385 if ((ofi = dn_fib_find_info(fi)) != NULL) {
387 dn_fib_free_info(fi);
393 refcount_set(&fi->fib_clntref, 1);
394 spin_lock(&dn_fib_info_lock);
395 fi->fib_next = dn_fib_info_list;
397 if (dn_fib_info_list)
398 dn_fib_info_list->fib_prev = fi;
399 dn_fib_info_list = fi;
400 spin_unlock(&dn_fib_info_lock);
410 dn_fib_free_info(fi);
416 int dn_fib_semantic_match(int type, struct dn_fib_info *fi, const struct flowidn *fld, struct dn_fib_res *res)
418 int err = dn_fib_props[type].error;
421 if (fi->fib_flags & RTNH_F_DEAD)
428 DN_FIB_RES_RESET(*res);
429 refcount_inc(&fi->fib_clntref);
434 if (nh->nh_flags & RTNH_F_DEAD)
436 if (!fld->flowidn_oif ||
437 fld->flowidn_oif == nh->nh_oif)
440 if (nhsel < fi->fib_nhs) {
442 refcount_inc(&fi->fib_clntref);
449 net_err_ratelimited("DECnet: impossible routing event : dn_fib_semantic_match type=%d\n",
458 void dn_fib_select_multipath(const struct flowidn *fld, struct dn_fib_res *res)
460 struct dn_fib_info *fi = res->fi;
463 spin_lock_bh(&dn_fib_multipath_lock);
464 if (fi->fib_power <= 0) {
466 change_nexthops(fi) {
467 if (!(nh->nh_flags&RTNH_F_DEAD)) {
468 power += nh->nh_weight;
469 nh->nh_power = nh->nh_weight;
471 } endfor_nexthops(fi);
472 fi->fib_power = power;
474 spin_unlock_bh(&dn_fib_multipath_lock);
480 w = jiffies % fi->fib_power;
482 change_nexthops(fi) {
483 if (!(nh->nh_flags&RTNH_F_DEAD) && nh->nh_power) {
484 if ((w -= nh->nh_power) <= 0) {
488 spin_unlock_bh(&dn_fib_multipath_lock);
492 } endfor_nexthops(fi);
494 spin_unlock_bh(&dn_fib_multipath_lock);
497 static inline u32 rtm_get_table(struct nlattr *attrs[], u8 table)
499 if (attrs[RTA_TABLE])
500 table = nla_get_u32(attrs[RTA_TABLE]);
505 static int dn_fib_rtm_delroute(struct sk_buff *skb, struct nlmsghdr *nlh,
506 struct netlink_ext_ack *extack)
508 struct net *net = sock_net(skb->sk);
509 struct dn_fib_table *tb;
510 struct rtmsg *r = nlmsg_data(nlh);
511 struct nlattr *attrs[RTA_MAX+1];
514 if (!netlink_capable(skb, CAP_NET_ADMIN))
517 if (!net_eq(net, &init_net))
520 err = nlmsg_parse_deprecated(nlh, sizeof(*r), attrs, RTA_MAX,
521 rtm_dn_policy, extack);
525 tb = dn_fib_get_table(rtm_get_table(attrs, r->rtm_table), 0);
529 return tb->delete(tb, r, attrs, nlh, &NETLINK_CB(skb));
532 static int dn_fib_rtm_newroute(struct sk_buff *skb, struct nlmsghdr *nlh,
533 struct netlink_ext_ack *extack)
535 struct net *net = sock_net(skb->sk);
536 struct dn_fib_table *tb;
537 struct rtmsg *r = nlmsg_data(nlh);
538 struct nlattr *attrs[RTA_MAX+1];
541 if (!netlink_capable(skb, CAP_NET_ADMIN))
544 if (!net_eq(net, &init_net))
547 err = nlmsg_parse_deprecated(nlh, sizeof(*r), attrs, RTA_MAX,
548 rtm_dn_policy, extack);
552 tb = dn_fib_get_table(rtm_get_table(attrs, r->rtm_table), 1);
556 return tb->insert(tb, r, attrs, nlh, &NETLINK_CB(skb));
559 static void fib_magic(int cmd, int type, __le16 dst, int dst_len, struct dn_ifaddr *ifa)
561 struct dn_fib_table *tb;
576 .prefsrc = ifa->ifa_local,
582 .oif = ifa->ifa_dev->dev->ifindex,
584 struct nlattr *attrs[RTA_MAX+1] = {
585 [RTA_DST] = (struct nlattr *) &dst_attr,
586 [RTA_PREFSRC] = (struct nlattr * ) &prefsrc_attr,
587 [RTA_OIF] = (struct nlattr *) &oif_attr,
590 memset(&req.rtm, 0, sizeof(req.rtm));
592 if (type == RTN_UNICAST)
593 tb = dn_fib_get_table(RT_MIN_TABLE, 1);
595 tb = dn_fib_get_table(RT_TABLE_LOCAL, 1);
600 req.nlh.nlmsg_len = sizeof(req);
601 req.nlh.nlmsg_type = cmd;
602 req.nlh.nlmsg_flags = NLM_F_REQUEST|NLM_F_CREATE|NLM_F_APPEND;
603 req.nlh.nlmsg_pid = 0;
604 req.nlh.nlmsg_seq = 0;
606 req.rtm.rtm_dst_len = dst_len;
607 req.rtm.rtm_table = tb->n;
608 req.rtm.rtm_protocol = RTPROT_KERNEL;
609 req.rtm.rtm_scope = (type != RTN_LOCAL ? RT_SCOPE_LINK : RT_SCOPE_HOST);
610 req.rtm.rtm_type = type;
612 if (cmd == RTM_NEWROUTE)
613 tb->insert(tb, &req.rtm, attrs, &req.nlh, NULL);
615 tb->delete(tb, &req.rtm, attrs, &req.nlh, NULL);
618 static void dn_fib_add_ifaddr(struct dn_ifaddr *ifa)
621 fib_magic(RTM_NEWROUTE, RTN_LOCAL, ifa->ifa_local, 16, ifa);
624 if (!(dev->flags&IFF_UP))
626 /* In the future, we will want to add default routes here */
631 static void dn_fib_del_ifaddr(struct dn_ifaddr *ifa)
634 struct net_device *dev;
635 struct dn_dev *dn_db;
636 struct dn_ifaddr *ifa2;
640 /* Scan device list */
642 for_each_netdev_rcu(&init_net, dev) {
643 dn_db = rcu_dereference(dev->dn_ptr);
646 for (ifa2 = rcu_dereference(dn_db->ifa_list);
648 ifa2 = rcu_dereference(ifa2->ifa_next)) {
649 if (ifa2->ifa_local == ifa->ifa_local) {
658 fib_magic(RTM_DELROUTE, RTN_LOCAL, ifa->ifa_local, 16, ifa);
660 if (dnet_addr_type(ifa->ifa_local) != RTN_LOCAL) {
661 if (dn_fib_sync_down(ifa->ifa_local, NULL, 0))
667 static void dn_fib_disable_addr(struct net_device *dev, int force)
669 if (dn_fib_sync_down(0, dev, force))
671 dn_rt_cache_flush(0);
672 neigh_ifdown(&dn_neigh_table, dev);
675 static int dn_fib_dnaddr_event(struct notifier_block *this, unsigned long event, void *ptr)
677 struct dn_ifaddr *ifa = (struct dn_ifaddr *)ptr;
681 dn_fib_add_ifaddr(ifa);
682 dn_fib_sync_up(ifa->ifa_dev->dev);
683 dn_rt_cache_flush(-1);
686 dn_fib_del_ifaddr(ifa);
687 if (ifa->ifa_dev && ifa->ifa_dev->ifa_list == NULL) {
688 dn_fib_disable_addr(ifa->ifa_dev->dev, 1);
690 dn_rt_cache_flush(-1);
697 static int dn_fib_sync_down(__le16 local, struct net_device *dev, int force)
700 int scope = RT_SCOPE_NOWHERE;
707 * This makes no sense for DECnet.... we will almost
708 * certainly have more than one local address the same
709 * over all our interfaces. It needs thinking about
712 if (local && fi->fib_prefsrc == local) {
713 fi->fib_flags |= RTNH_F_DEAD;
715 } else if (dev && fi->fib_nhs) {
718 change_nexthops(fi) {
719 if (nh->nh_flags&RTNH_F_DEAD)
721 else if (nh->nh_dev == dev &&
722 nh->nh_scope != scope) {
723 spin_lock_bh(&dn_fib_multipath_lock);
724 nh->nh_flags |= RTNH_F_DEAD;
725 fi->fib_power -= nh->nh_power;
727 spin_unlock_bh(&dn_fib_multipath_lock);
730 } endfor_nexthops(fi)
731 if (dead == fi->fib_nhs) {
732 fi->fib_flags |= RTNH_F_DEAD;
741 static int dn_fib_sync_up(struct net_device *dev)
745 if (!(dev->flags&IFF_UP))
751 change_nexthops(fi) {
752 if (!(nh->nh_flags&RTNH_F_DEAD)) {
756 if (nh->nh_dev == NULL || !(nh->nh_dev->flags&IFF_UP))
758 if (nh->nh_dev != dev || dev->dn_ptr == NULL)
761 spin_lock_bh(&dn_fib_multipath_lock);
763 nh->nh_flags &= ~RTNH_F_DEAD;
764 spin_unlock_bh(&dn_fib_multipath_lock);
765 } endfor_nexthops(fi);
768 fi->fib_flags &= ~RTNH_F_DEAD;
775 static struct notifier_block dn_fib_dnaddr_notifier = {
776 .notifier_call = dn_fib_dnaddr_event,
779 void __exit dn_fib_cleanup(void)
781 dn_fib_table_cleanup();
782 dn_fib_rules_cleanup();
784 unregister_dnaddr_notifier(&dn_fib_dnaddr_notifier);
788 void __init dn_fib_init(void)
793 register_dnaddr_notifier(&dn_fib_dnaddr_notifier);
795 rtnl_register_module(THIS_MODULE, PF_DECnet, RTM_NEWROUTE,
796 dn_fib_rtm_newroute, NULL, 0);
797 rtnl_register_module(THIS_MODULE, PF_DECnet, RTM_DELROUTE,
798 dn_fib_rtm_delroute, NULL, 0);