2 * INET An implementation of the TCP/IP protocol suite for the LINUX
3 * operating system. INET is implemented using the BSD Socket
4 * interface as the means of communication with the user level.
6 * IPv4 Forwarding Information Base: semantics.
8 * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License
12 * as published by the Free Software Foundation; either version
13 * 2 of the License, or (at your option) any later version.
16 #include <asm/uaccess.h>
17 #include <linux/bitops.h>
18 #include <linux/types.h>
19 #include <linux/kernel.h>
20 #include <linux/jiffies.h>
22 #include <linux/string.h>
23 #include <linux/socket.h>
24 #include <linux/sockios.h>
25 #include <linux/errno.h>
27 #include <linux/inet.h>
28 #include <linux/inetdevice.h>
29 #include <linux/netdevice.h>
30 #include <linux/if_arp.h>
31 #include <linux/proc_fs.h>
32 #include <linux/skbuff.h>
33 #include <linux/init.h>
34 #include <linux/slab.h>
38 #include <net/protocol.h>
39 #include <net/route.h>
42 #include <net/ip_fib.h>
43 #include <net/netlink.h>
44 #include <net/nexthop.h>
45 #include <net/lwtunnel.h>
47 #include "fib_lookup.h"
49 static DEFINE_SPINLOCK(fib_info_lock
);
50 static struct hlist_head
*fib_info_hash
;
51 static struct hlist_head
*fib_info_laddrhash
;
52 static unsigned int fib_info_hash_size
;
53 static unsigned int fib_info_cnt
;
55 #define DEVINDEX_HASHBITS 8
56 #define DEVINDEX_HASHSIZE (1U << DEVINDEX_HASHBITS)
57 static struct hlist_head fib_info_devhash
[DEVINDEX_HASHSIZE
];
59 #ifdef CONFIG_IP_ROUTE_MULTIPATH
60 u32 fib_multipath_secret __read_mostly
;
62 #define for_nexthops(fi) { \
63 int nhsel; const struct fib_nh *nh; \
64 for (nhsel = 0, nh = (fi)->fib_nh; \
65 nhsel < (fi)->fib_nhs; \
68 #define change_nexthops(fi) { \
69 int nhsel; struct fib_nh *nexthop_nh; \
70 for (nhsel = 0, nexthop_nh = (struct fib_nh *)((fi)->fib_nh); \
71 nhsel < (fi)->fib_nhs; \
72 nexthop_nh++, nhsel++)
74 #else /* CONFIG_IP_ROUTE_MULTIPATH */
76 /* Hope, that gcc will optimize it to get rid of dummy loop */
78 #define for_nexthops(fi) { \
79 int nhsel; const struct fib_nh *nh = (fi)->fib_nh; \
80 for (nhsel = 0; nhsel < 1; nhsel++)
82 #define change_nexthops(fi) { \
84 struct fib_nh *nexthop_nh = (struct fib_nh *)((fi)->fib_nh); \
85 for (nhsel = 0; nhsel < 1; nhsel++)
87 #endif /* CONFIG_IP_ROUTE_MULTIPATH */
89 #define endfor_nexthops(fi) }
92 const struct fib_prop fib_props
[RTN_MAX
+ 1] = {
95 .scope
= RT_SCOPE_NOWHERE
,
99 .scope
= RT_SCOPE_UNIVERSE
,
103 .scope
= RT_SCOPE_HOST
,
107 .scope
= RT_SCOPE_LINK
,
111 .scope
= RT_SCOPE_LINK
,
115 .scope
= RT_SCOPE_UNIVERSE
,
119 .scope
= RT_SCOPE_UNIVERSE
,
121 [RTN_UNREACHABLE
] = {
122 .error
= -EHOSTUNREACH
,
123 .scope
= RT_SCOPE_UNIVERSE
,
127 .scope
= RT_SCOPE_UNIVERSE
,
131 .scope
= RT_SCOPE_UNIVERSE
,
135 .scope
= RT_SCOPE_NOWHERE
,
139 .scope
= RT_SCOPE_NOWHERE
,
143 static void rt_fibinfo_free(struct rtable __rcu
**rtp
)
145 struct rtable
*rt
= rcu_dereference_protected(*rtp
, 1);
150 /* Not even needed : RCU_INIT_POINTER(*rtp, NULL);
151 * because we waited an RCU grace period before calling
152 * free_fib_info_rcu()
158 static void free_nh_exceptions(struct fib_nh
*nh
)
160 struct fnhe_hash_bucket
*hash
;
163 hash
= rcu_dereference_protected(nh
->nh_exceptions
, 1);
166 for (i
= 0; i
< FNHE_HASH_SIZE
; i
++) {
167 struct fib_nh_exception
*fnhe
;
169 fnhe
= rcu_dereference_protected(hash
[i
].chain
, 1);
171 struct fib_nh_exception
*next
;
173 next
= rcu_dereference_protected(fnhe
->fnhe_next
, 1);
175 rt_fibinfo_free(&fnhe
->fnhe_rth_input
);
176 rt_fibinfo_free(&fnhe
->fnhe_rth_output
);
186 static void rt_fibinfo_free_cpus(struct rtable __rcu
* __percpu
*rtp
)
193 for_each_possible_cpu(cpu
) {
196 rt
= rcu_dereference_protected(*per_cpu_ptr(rtp
, cpu
), 1);
203 /* Release a nexthop info record */
204 static void free_fib_info_rcu(struct rcu_head
*head
)
206 struct fib_info
*fi
= container_of(head
, struct fib_info
, rcu
);
208 change_nexthops(fi
) {
209 if (nexthop_nh
->nh_dev
)
210 dev_put(nexthop_nh
->nh_dev
);
211 lwtstate_put(nexthop_nh
->nh_lwtstate
);
212 free_nh_exceptions(nexthop_nh
);
213 rt_fibinfo_free_cpus(nexthop_nh
->nh_pcpu_rth_output
);
214 rt_fibinfo_free(&nexthop_nh
->nh_rth_input
);
215 } endfor_nexthops(fi
);
217 if (fi
->fib_metrics
!= (u32
*) dst_default_metrics
)
218 kfree(fi
->fib_metrics
);
222 void free_fib_info(struct fib_info
*fi
)
224 if (fi
->fib_dead
== 0) {
225 pr_warn("Freeing alive fib_info %p\n", fi
);
229 #ifdef CONFIG_IP_ROUTE_CLASSID
230 change_nexthops(fi
) {
231 if (nexthop_nh
->nh_tclassid
)
232 fi
->fib_net
->ipv4
.fib_num_tclassid_users
--;
233 } endfor_nexthops(fi
);
235 call_rcu(&fi
->rcu
, free_fib_info_rcu
);
238 void fib_release_info(struct fib_info
*fi
)
240 spin_lock_bh(&fib_info_lock
);
241 if (fi
&& --fi
->fib_treeref
== 0) {
242 hlist_del(&fi
->fib_hash
);
244 hlist_del(&fi
->fib_lhash
);
245 change_nexthops(fi
) {
246 if (!nexthop_nh
->nh_dev
)
248 hlist_del(&nexthop_nh
->nh_hash
);
249 } endfor_nexthops(fi
)
253 spin_unlock_bh(&fib_info_lock
);
256 static inline int nh_comp(const struct fib_info
*fi
, const struct fib_info
*ofi
)
258 const struct fib_nh
*onh
= ofi
->fib_nh
;
261 if (nh
->nh_oif
!= onh
->nh_oif
||
262 nh
->nh_gw
!= onh
->nh_gw
||
263 nh
->nh_scope
!= onh
->nh_scope
||
264 #ifdef CONFIG_IP_ROUTE_MULTIPATH
265 nh
->nh_weight
!= onh
->nh_weight
||
267 #ifdef CONFIG_IP_ROUTE_CLASSID
268 nh
->nh_tclassid
!= onh
->nh_tclassid
||
270 lwtunnel_cmp_encap(nh
->nh_lwtstate
, onh
->nh_lwtstate
) ||
271 ((nh
->nh_flags
^ onh
->nh_flags
) & ~RTNH_COMPARE_MASK
))
274 } endfor_nexthops(fi
);
278 static inline unsigned int fib_devindex_hashfn(unsigned int val
)
280 unsigned int mask
= DEVINDEX_HASHSIZE
- 1;
283 (val
>> DEVINDEX_HASHBITS
) ^
284 (val
>> (DEVINDEX_HASHBITS
* 2))) & mask
;
287 static inline unsigned int fib_info_hashfn(const struct fib_info
*fi
)
289 unsigned int mask
= (fib_info_hash_size
- 1);
290 unsigned int val
= fi
->fib_nhs
;
292 val
^= (fi
->fib_protocol
<< 8) | fi
->fib_scope
;
293 val
^= (__force u32
)fi
->fib_prefsrc
;
294 val
^= fi
->fib_priority
;
296 val
^= fib_devindex_hashfn(nh
->nh_oif
);
297 } endfor_nexthops(fi
)
299 return (val
^ (val
>> 7) ^ (val
>> 12)) & mask
;
302 static struct fib_info
*fib_find_info(const struct fib_info
*nfi
)
304 struct hlist_head
*head
;
308 hash
= fib_info_hashfn(nfi
);
309 head
= &fib_info_hash
[hash
];
311 hlist_for_each_entry(fi
, head
, fib_hash
) {
312 if (!net_eq(fi
->fib_net
, nfi
->fib_net
))
314 if (fi
->fib_nhs
!= nfi
->fib_nhs
)
316 if (nfi
->fib_protocol
== fi
->fib_protocol
&&
317 nfi
->fib_scope
== fi
->fib_scope
&&
318 nfi
->fib_prefsrc
== fi
->fib_prefsrc
&&
319 nfi
->fib_priority
== fi
->fib_priority
&&
320 nfi
->fib_type
== fi
->fib_type
&&
321 memcmp(nfi
->fib_metrics
, fi
->fib_metrics
,
322 sizeof(u32
) * RTAX_MAX
) == 0 &&
323 !((nfi
->fib_flags
^ fi
->fib_flags
) & ~RTNH_COMPARE_MASK
) &&
324 (nfi
->fib_nhs
== 0 || nh_comp(fi
, nfi
) == 0))
331 /* Check, that the gateway is already configured.
332 * Used only by redirect accept routine.
334 int ip_fib_check_default(__be32 gw
, struct net_device
*dev
)
336 struct hlist_head
*head
;
340 spin_lock(&fib_info_lock
);
342 hash
= fib_devindex_hashfn(dev
->ifindex
);
343 head
= &fib_info_devhash
[hash
];
344 hlist_for_each_entry(nh
, head
, nh_hash
) {
345 if (nh
->nh_dev
== dev
&&
347 !(nh
->nh_flags
& RTNH_F_DEAD
)) {
348 spin_unlock(&fib_info_lock
);
353 spin_unlock(&fib_info_lock
);
358 static inline size_t fib_nlmsg_size(struct fib_info
*fi
)
360 size_t payload
= NLMSG_ALIGN(sizeof(struct rtmsg
))
361 + nla_total_size(4) /* RTA_TABLE */
362 + nla_total_size(4) /* RTA_DST */
363 + nla_total_size(4) /* RTA_PRIORITY */
364 + nla_total_size(4) /* RTA_PREFSRC */
365 + nla_total_size(TCP_CA_NAME_MAX
); /* RTAX_CC_ALGO */
367 /* space for nested metrics */
368 payload
+= nla_total_size((RTAX_MAX
* nla_total_size(4)));
371 size_t nh_encapsize
= 0;
372 /* Also handles the special case fib_nhs == 1 */
374 /* each nexthop is packed in an attribute */
375 size_t nhsize
= nla_total_size(sizeof(struct rtnexthop
));
377 /* may contain flow and gateway attribute */
378 nhsize
+= 2 * nla_total_size(4);
380 /* grab encap info */
382 if (nh
->nh_lwtstate
) {
384 nh_encapsize
+= lwtunnel_get_encap_size(
387 nh_encapsize
+= nla_total_size(2);
389 } endfor_nexthops(fi
);
391 /* all nexthops are packed in a nested attribute */
392 payload
+= nla_total_size((fi
->fib_nhs
* nhsize
) +
400 void rtmsg_fib(int event
, __be32 key
, struct fib_alias
*fa
,
401 int dst_len
, u32 tb_id
, const struct nl_info
*info
,
402 unsigned int nlm_flags
)
405 u32 seq
= info
->nlh
? info
->nlh
->nlmsg_seq
: 0;
408 skb
= nlmsg_new(fib_nlmsg_size(fa
->fa_info
), GFP_KERNEL
);
412 err
= fib_dump_info(skb
, info
->portid
, seq
, event
, tb_id
,
413 fa
->fa_type
, key
, dst_len
,
414 fa
->fa_tos
, fa
->fa_info
, nlm_flags
);
416 /* -EMSGSIZE implies BUG in fib_nlmsg_size() */
417 WARN_ON(err
== -EMSGSIZE
);
421 rtnl_notify(skb
, info
->nl_net
, info
->portid
, RTNLGRP_IPV4_ROUTE
,
422 info
->nlh
, GFP_KERNEL
);
426 rtnl_set_sk_err(info
->nl_net
, RTNLGRP_IPV4_ROUTE
, err
);
429 static int fib_detect_death(struct fib_info
*fi
, int order
,
430 struct fib_info
**last_resort
, int *last_idx
,
434 int state
= NUD_NONE
;
436 n
= neigh_lookup(&arp_tbl
, &fi
->fib_nh
[0].nh_gw
, fi
->fib_dev
);
438 state
= n
->nud_state
;
443 if (state
== NUD_REACHABLE
)
445 if ((state
& NUD_VALID
) && order
!= dflt
)
447 if ((state
& NUD_VALID
) ||
448 (*last_idx
< 0 && order
> dflt
&& state
!= NUD_INCOMPLETE
)) {
455 #ifdef CONFIG_IP_ROUTE_MULTIPATH
457 static int fib_count_nexthops(struct rtnexthop
*rtnh
, int remaining
)
461 while (rtnh_ok(rtnh
, remaining
)) {
463 rtnh
= rtnh_next(rtnh
, &remaining
);
466 /* leftover implies invalid nexthop configuration, discard it */
467 return remaining
> 0 ? 0 : nhs
;
470 static int fib_get_nhs(struct fib_info
*fi
, struct rtnexthop
*rtnh
,
471 int remaining
, struct fib_config
*cfg
)
473 struct net
*net
= cfg
->fc_nlinfo
.nl_net
;
476 change_nexthops(fi
) {
479 if (!rtnh_ok(rtnh
, remaining
))
482 nexthop_nh
->nh_flags
=
483 (cfg
->fc_flags
& ~0xFF) | rtnh
->rtnh_flags
;
484 nexthop_nh
->nh_oif
= rtnh
->rtnh_ifindex
;
485 nexthop_nh
->nh_weight
= rtnh
->rtnh_hops
+ 1;
487 attrlen
= rtnh_attrlen(rtnh
);
489 struct nlattr
*nla
, *attrs
= rtnh_attrs(rtnh
);
491 nla
= nla_find(attrs
, attrlen
, RTA_GATEWAY
);
492 nexthop_nh
->nh_gw
= nla
? nla_get_in_addr(nla
) : 0;
493 #ifdef CONFIG_IP_ROUTE_CLASSID
494 nla
= nla_find(attrs
, attrlen
, RTA_FLOW
);
495 nexthop_nh
->nh_tclassid
= nla
? nla_get_u32(nla
) : 0;
496 if (nexthop_nh
->nh_tclassid
)
497 fi
->fib_net
->ipv4
.fib_num_tclassid_users
++;
499 nla
= nla_find(attrs
, attrlen
, RTA_ENCAP
);
501 struct lwtunnel_state
*lwtstate
;
502 struct net_device
*dev
= NULL
;
503 struct nlattr
*nla_entype
;
505 nla_entype
= nla_find(attrs
, attrlen
,
510 dev
= __dev_get_by_index(net
, cfg
->fc_oif
);
511 ret
= lwtunnel_build_state(dev
, nla_get_u16(
517 nexthop_nh
->nh_lwtstate
=
518 lwtstate_get(lwtstate
);
522 rtnh
= rtnh_next(rtnh
, &remaining
);
523 } endfor_nexthops(fi
);
534 static void fib_rebalance(struct fib_info
*fi
)
538 struct in_device
*in_dev
;
545 if (nh
->nh_flags
& RTNH_F_DEAD
)
548 in_dev
= __in_dev_get_rtnl(nh
->nh_dev
);
551 IN_DEV_IGNORE_ROUTES_WITH_LINKDOWN(in_dev
) &&
552 nh
->nh_flags
& RTNH_F_LINKDOWN
)
555 total
+= nh
->nh_weight
;
556 } endfor_nexthops(fi
);
559 change_nexthops(fi
) {
562 in_dev
= __in_dev_get_rtnl(nexthop_nh
->nh_dev
);
564 if (nexthop_nh
->nh_flags
& RTNH_F_DEAD
) {
567 IN_DEV_IGNORE_ROUTES_WITH_LINKDOWN(in_dev
) &&
568 nexthop_nh
->nh_flags
& RTNH_F_LINKDOWN
) {
571 w
+= nexthop_nh
->nh_weight
;
572 upper_bound
= DIV_ROUND_CLOSEST_ULL((u64
)w
<< 31,
576 atomic_set(&nexthop_nh
->nh_upper_bound
, upper_bound
);
577 } endfor_nexthops(fi
);
579 net_get_random_once(&fib_multipath_secret
,
580 sizeof(fib_multipath_secret
));
583 static inline void fib_add_weight(struct fib_info
*fi
,
584 const struct fib_nh
*nh
)
586 fi
->fib_weight
+= nh
->nh_weight
;
589 #else /* CONFIG_IP_ROUTE_MULTIPATH */
591 #define fib_rebalance(fi) do { } while (0)
592 #define fib_add_weight(fi, nh) do { } while (0)
594 #endif /* CONFIG_IP_ROUTE_MULTIPATH */
596 static int fib_encap_match(struct net
*net
, u16 encap_type
,
597 struct nlattr
*encap
,
598 int oif
, const struct fib_nh
*nh
,
599 const struct fib_config
*cfg
)
601 struct lwtunnel_state
*lwtstate
;
602 struct net_device
*dev
= NULL
;
605 if (encap_type
== LWTUNNEL_ENCAP_NONE
)
609 dev
= __dev_get_by_index(net
, oif
);
610 ret
= lwtunnel_build_state(dev
, encap_type
, encap
,
611 AF_INET
, cfg
, &lwtstate
);
613 result
= lwtunnel_cmp_encap(lwtstate
, nh
->nh_lwtstate
);
614 lwtstate_free(lwtstate
);
620 int fib_nh_match(struct fib_config
*cfg
, struct fib_info
*fi
)
622 struct net
*net
= cfg
->fc_nlinfo
.nl_net
;
623 #ifdef CONFIG_IP_ROUTE_MULTIPATH
624 struct rtnexthop
*rtnh
;
628 if (cfg
->fc_priority
&& cfg
->fc_priority
!= fi
->fib_priority
)
631 if (cfg
->fc_oif
|| cfg
->fc_gw
) {
633 if (fib_encap_match(net
, cfg
->fc_encap_type
,
634 cfg
->fc_encap
, cfg
->fc_oif
,
638 if ((!cfg
->fc_oif
|| cfg
->fc_oif
== fi
->fib_nh
->nh_oif
) &&
639 (!cfg
->fc_gw
|| cfg
->fc_gw
== fi
->fib_nh
->nh_gw
))
644 #ifdef CONFIG_IP_ROUTE_MULTIPATH
649 remaining
= cfg
->fc_mp_len
;
654 if (!rtnh_ok(rtnh
, remaining
))
657 if (rtnh
->rtnh_ifindex
&& rtnh
->rtnh_ifindex
!= nh
->nh_oif
)
660 attrlen
= rtnh_attrlen(rtnh
);
662 struct nlattr
*nla
, *attrs
= rtnh_attrs(rtnh
);
664 nla
= nla_find(attrs
, attrlen
, RTA_GATEWAY
);
665 if (nla
&& nla_get_in_addr(nla
) != nh
->nh_gw
)
667 #ifdef CONFIG_IP_ROUTE_CLASSID
668 nla
= nla_find(attrs
, attrlen
, RTA_FLOW
);
669 if (nla
&& nla_get_u32(nla
) != nh
->nh_tclassid
)
674 rtnh
= rtnh_next(rtnh
, &remaining
);
675 } endfor_nexthops(fi
);
685 * Semantics of nexthop is very messy by historical reasons.
686 * We have to take into account, that:
687 * a) gateway can be actually local interface address,
688 * so that gatewayed route is direct.
689 * b) gateway must be on-link address, possibly
690 * described not by an ifaddr, but also by a direct route.
691 * c) If both gateway and interface are specified, they should not
693 * d) If we use tunnel routes, gateway could be not on-link.
695 * Attempt to reconcile all of these (alas, self-contradictory) conditions
696 * results in pretty ugly and hairy code with obscure logic.
698 * I chose to generalized it instead, so that the size
699 * of code does not increase practically, but it becomes
701 * Every prefix is assigned a "scope" value: "host" is local address,
702 * "link" is direct route,
703 * [ ... "site" ... "interior" ... ]
704 * and "universe" is true gateway route with global meaning.
706 * Every prefix refers to a set of "nexthop"s (gw, oif),
707 * where gw must have narrower scope. This recursion stops
708 * when gw has LOCAL scope or if "nexthop" is declared ONLINK,
709 * which means that gw is forced to be on link.
711 * Code is still hairy, but now it is apparently logically
712 * consistent and very flexible. F.e. as by-product it allows
713 * to co-exists in peace independent exterior and interior
716 * Normally it looks as following.
718 * {universe prefix} -> (gw, oif) [scope link]
720 * |-> {link prefix} -> (gw, oif) [scope local]
722 * |-> {local prefix} (terminal node)
724 static int fib_check_nh(struct fib_config
*cfg
, struct fib_info
*fi
,
729 struct net_device
*dev
;
731 net
= cfg
->fc_nlinfo
.nl_net
;
733 struct fib_result res
;
735 if (nh
->nh_flags
& RTNH_F_ONLINK
) {
736 unsigned int addr_type
;
738 if (cfg
->fc_scope
>= RT_SCOPE_LINK
)
740 dev
= __dev_get_by_index(net
, nh
->nh_oif
);
743 if (!(dev
->flags
& IFF_UP
))
745 addr_type
= inet_addr_type_dev_table(net
, dev
, nh
->nh_gw
);
746 if (addr_type
!= RTN_UNICAST
)
748 if (!netif_carrier_ok(dev
))
749 nh
->nh_flags
|= RTNH_F_LINKDOWN
;
752 nh
->nh_scope
= RT_SCOPE_LINK
;
757 struct fib_table
*tbl
= NULL
;
758 struct flowi4 fl4
= {
760 .flowi4_scope
= cfg
->fc_scope
+ 1,
761 .flowi4_oif
= nh
->nh_oif
,
762 .flowi4_iif
= LOOPBACK_IFINDEX
,
765 /* It is not necessary, but requires a bit of thinking */
766 if (fl4
.flowi4_scope
< RT_SCOPE_LINK
)
767 fl4
.flowi4_scope
= RT_SCOPE_LINK
;
770 tbl
= fib_get_table(net
, cfg
->fc_table
);
773 err
= fib_table_lookup(tbl
, &fl4
, &res
,
774 FIB_LOOKUP_IGNORE_LINKSTATE
|
777 /* on error or if no table given do full lookup. This
778 * is needed for example when nexthops are in the local
779 * table rather than the given table
782 err
= fib_lookup(net
, &fl4
, &res
,
783 FIB_LOOKUP_IGNORE_LINKSTATE
);
792 if (res
.type
!= RTN_UNICAST
&& res
.type
!= RTN_LOCAL
)
794 nh
->nh_scope
= res
.scope
;
795 nh
->nh_oif
= FIB_RES_OIF(res
);
796 nh
->nh_dev
= dev
= FIB_RES_DEV(res
);
800 if (!netif_carrier_ok(dev
))
801 nh
->nh_flags
|= RTNH_F_LINKDOWN
;
802 err
= (dev
->flags
& IFF_UP
) ? 0 : -ENETDOWN
;
804 struct in_device
*in_dev
;
806 if (nh
->nh_flags
& (RTNH_F_PERVASIVE
| RTNH_F_ONLINK
))
811 in_dev
= inetdev_by_index(net
, nh
->nh_oif
);
815 if (!(in_dev
->dev
->flags
& IFF_UP
))
817 nh
->nh_dev
= in_dev
->dev
;
818 dev_hold(nh
->nh_dev
);
819 nh
->nh_scope
= RT_SCOPE_HOST
;
820 if (!netif_carrier_ok(nh
->nh_dev
))
821 nh
->nh_flags
|= RTNH_F_LINKDOWN
;
829 static inline unsigned int fib_laddr_hashfn(__be32 val
)
831 unsigned int mask
= (fib_info_hash_size
- 1);
833 return ((__force u32
)val
^
834 ((__force u32
)val
>> 7) ^
835 ((__force u32
)val
>> 14)) & mask
;
838 static struct hlist_head
*fib_info_hash_alloc(int bytes
)
840 if (bytes
<= PAGE_SIZE
)
841 return kzalloc(bytes
, GFP_KERNEL
);
843 return (struct hlist_head
*)
844 __get_free_pages(GFP_KERNEL
| __GFP_ZERO
,
848 static void fib_info_hash_free(struct hlist_head
*hash
, int bytes
)
853 if (bytes
<= PAGE_SIZE
)
856 free_pages((unsigned long) hash
, get_order(bytes
));
859 static void fib_info_hash_move(struct hlist_head
*new_info_hash
,
860 struct hlist_head
*new_laddrhash
,
861 unsigned int new_size
)
863 struct hlist_head
*old_info_hash
, *old_laddrhash
;
864 unsigned int old_size
= fib_info_hash_size
;
865 unsigned int i
, bytes
;
867 spin_lock_bh(&fib_info_lock
);
868 old_info_hash
= fib_info_hash
;
869 old_laddrhash
= fib_info_laddrhash
;
870 fib_info_hash_size
= new_size
;
872 for (i
= 0; i
< old_size
; i
++) {
873 struct hlist_head
*head
= &fib_info_hash
[i
];
874 struct hlist_node
*n
;
877 hlist_for_each_entry_safe(fi
, n
, head
, fib_hash
) {
878 struct hlist_head
*dest
;
879 unsigned int new_hash
;
881 new_hash
= fib_info_hashfn(fi
);
882 dest
= &new_info_hash
[new_hash
];
883 hlist_add_head(&fi
->fib_hash
, dest
);
886 fib_info_hash
= new_info_hash
;
888 for (i
= 0; i
< old_size
; i
++) {
889 struct hlist_head
*lhead
= &fib_info_laddrhash
[i
];
890 struct hlist_node
*n
;
893 hlist_for_each_entry_safe(fi
, n
, lhead
, fib_lhash
) {
894 struct hlist_head
*ldest
;
895 unsigned int new_hash
;
897 new_hash
= fib_laddr_hashfn(fi
->fib_prefsrc
);
898 ldest
= &new_laddrhash
[new_hash
];
899 hlist_add_head(&fi
->fib_lhash
, ldest
);
902 fib_info_laddrhash
= new_laddrhash
;
904 spin_unlock_bh(&fib_info_lock
);
906 bytes
= old_size
* sizeof(struct hlist_head
*);
907 fib_info_hash_free(old_info_hash
, bytes
);
908 fib_info_hash_free(old_laddrhash
, bytes
);
911 __be32
fib_info_update_nh_saddr(struct net
*net
, struct fib_nh
*nh
)
913 nh
->nh_saddr
= inet_select_addr(nh
->nh_dev
,
915 nh
->nh_parent
->fib_scope
);
916 nh
->nh_saddr_genid
= atomic_read(&net
->ipv4
.dev_addr_genid
);
921 static bool fib_valid_prefsrc(struct fib_config
*cfg
, __be32 fib_prefsrc
)
923 if (cfg
->fc_type
!= RTN_LOCAL
|| !cfg
->fc_dst
||
924 fib_prefsrc
!= cfg
->fc_dst
) {
925 u32 tb_id
= cfg
->fc_table
;
928 if (tb_id
== RT_TABLE_MAIN
)
929 tb_id
= RT_TABLE_LOCAL
;
931 rc
= inet_addr_type_table(cfg
->fc_nlinfo
.nl_net
,
934 if (rc
!= RTN_LOCAL
&& tb_id
!= RT_TABLE_LOCAL
) {
935 rc
= inet_addr_type_table(cfg
->fc_nlinfo
.nl_net
,
936 fib_prefsrc
, RT_TABLE_LOCAL
);
946 fib_convert_metrics(struct fib_info
*fi
, const struct fib_config
*cfg
)
955 nla_for_each_attr(nla
, cfg
->fc_mx
, cfg
->fc_mx_len
, remaining
) {
956 int type
= nla_type(nla
);
964 if (type
== RTAX_CC_ALGO
) {
965 char tmp
[TCP_CA_NAME_MAX
];
967 nla_strlcpy(tmp
, nla
, sizeof(tmp
));
968 val
= tcp_ca_get_key_by_name(tmp
, &ecn_ca
);
969 if (val
== TCP_CA_UNSPEC
)
972 val
= nla_get_u32(nla
);
974 if (type
== RTAX_ADVMSS
&& val
> 65535 - 40)
976 if (type
== RTAX_MTU
&& val
> 65535 - 15)
978 if (type
== RTAX_FEATURES
&& (val
& ~RTAX_FEATURE_MASK
))
980 fi
->fib_metrics
[type
- 1] = val
;
984 fi
->fib_metrics
[RTAX_FEATURES
- 1] |= DST_FEATURE_ECN_CA
;
989 struct fib_info
*fib_create_info(struct fib_config
*cfg
)
992 struct fib_info
*fi
= NULL
;
993 struct fib_info
*ofi
;
995 struct net
*net
= cfg
->fc_nlinfo
.nl_net
;
997 if (cfg
->fc_type
> RTN_MAX
)
1000 /* Fast check to catch the most weird cases */
1001 if (fib_props
[cfg
->fc_type
].scope
> cfg
->fc_scope
)
1004 #ifdef CONFIG_IP_ROUTE_MULTIPATH
1006 nhs
= fib_count_nexthops(cfg
->fc_mp
, cfg
->fc_mp_len
);
1013 if (fib_info_cnt
>= fib_info_hash_size
) {
1014 unsigned int new_size
= fib_info_hash_size
<< 1;
1015 struct hlist_head
*new_info_hash
;
1016 struct hlist_head
*new_laddrhash
;
1021 bytes
= new_size
* sizeof(struct hlist_head
*);
1022 new_info_hash
= fib_info_hash_alloc(bytes
);
1023 new_laddrhash
= fib_info_hash_alloc(bytes
);
1024 if (!new_info_hash
|| !new_laddrhash
) {
1025 fib_info_hash_free(new_info_hash
, bytes
);
1026 fib_info_hash_free(new_laddrhash
, bytes
);
1028 fib_info_hash_move(new_info_hash
, new_laddrhash
, new_size
);
1030 if (!fib_info_hash_size
)
1034 fi
= kzalloc(sizeof(*fi
)+nhs
*sizeof(struct fib_nh
), GFP_KERNEL
);
1039 fi
->fib_metrics
= kzalloc(sizeof(u32
) * RTAX_MAX
, GFP_KERNEL
);
1040 if (!fi
->fib_metrics
)
1043 fi
->fib_metrics
= (u32
*) dst_default_metrics
;
1046 fi
->fib_protocol
= cfg
->fc_protocol
;
1047 fi
->fib_scope
= cfg
->fc_scope
;
1048 fi
->fib_flags
= cfg
->fc_flags
;
1049 fi
->fib_priority
= cfg
->fc_priority
;
1050 fi
->fib_prefsrc
= cfg
->fc_prefsrc
;
1051 fi
->fib_type
= cfg
->fc_type
;
1054 change_nexthops(fi
) {
1055 nexthop_nh
->nh_parent
= fi
;
1056 nexthop_nh
->nh_pcpu_rth_output
= alloc_percpu(struct rtable __rcu
*);
1057 if (!nexthop_nh
->nh_pcpu_rth_output
)
1059 } endfor_nexthops(fi
)
1061 err
= fib_convert_metrics(fi
, cfg
);
1066 #ifdef CONFIG_IP_ROUTE_MULTIPATH
1067 err
= fib_get_nhs(fi
, cfg
->fc_mp
, cfg
->fc_mp_len
, cfg
);
1070 if (cfg
->fc_oif
&& fi
->fib_nh
->nh_oif
!= cfg
->fc_oif
)
1072 if (cfg
->fc_gw
&& fi
->fib_nh
->nh_gw
!= cfg
->fc_gw
)
1074 #ifdef CONFIG_IP_ROUTE_CLASSID
1075 if (cfg
->fc_flow
&& fi
->fib_nh
->nh_tclassid
!= cfg
->fc_flow
)
1082 struct fib_nh
*nh
= fi
->fib_nh
;
1084 if (cfg
->fc_encap
) {
1085 struct lwtunnel_state
*lwtstate
;
1086 struct net_device
*dev
= NULL
;
1088 if (cfg
->fc_encap_type
== LWTUNNEL_ENCAP_NONE
)
1091 dev
= __dev_get_by_index(net
, cfg
->fc_oif
);
1092 err
= lwtunnel_build_state(dev
, cfg
->fc_encap_type
,
1093 cfg
->fc_encap
, AF_INET
, cfg
,
1098 nh
->nh_lwtstate
= lwtstate_get(lwtstate
);
1100 nh
->nh_oif
= cfg
->fc_oif
;
1101 nh
->nh_gw
= cfg
->fc_gw
;
1102 nh
->nh_flags
= cfg
->fc_flags
;
1103 #ifdef CONFIG_IP_ROUTE_CLASSID
1104 nh
->nh_tclassid
= cfg
->fc_flow
;
1105 if (nh
->nh_tclassid
)
1106 fi
->fib_net
->ipv4
.fib_num_tclassid_users
++;
1108 #ifdef CONFIG_IP_ROUTE_MULTIPATH
1113 if (fib_props
[cfg
->fc_type
].error
) {
1114 if (cfg
->fc_gw
|| cfg
->fc_oif
|| cfg
->fc_mp
)
1118 switch (cfg
->fc_type
) {
1130 if (cfg
->fc_scope
> RT_SCOPE_HOST
)
1133 if (cfg
->fc_scope
== RT_SCOPE_HOST
) {
1134 struct fib_nh
*nh
= fi
->fib_nh
;
1136 /* Local address is added. */
1137 if (nhs
!= 1 || nh
->nh_gw
)
1139 nh
->nh_scope
= RT_SCOPE_NOWHERE
;
1140 nh
->nh_dev
= dev_get_by_index(net
, fi
->fib_nh
->nh_oif
);
1147 change_nexthops(fi
) {
1148 err
= fib_check_nh(cfg
, fi
, nexthop_nh
);
1151 if (nexthop_nh
->nh_flags
& RTNH_F_LINKDOWN
)
1153 } endfor_nexthops(fi
)
1154 if (linkdown
== fi
->fib_nhs
)
1155 fi
->fib_flags
|= RTNH_F_LINKDOWN
;
1158 if (fi
->fib_prefsrc
&& !fib_valid_prefsrc(cfg
, fi
->fib_prefsrc
))
1161 change_nexthops(fi
) {
1162 fib_info_update_nh_saddr(net
, nexthop_nh
);
1163 fib_add_weight(fi
, nexthop_nh
);
1164 } endfor_nexthops(fi
)
1169 ofi
= fib_find_info(fi
);
1178 atomic_inc(&fi
->fib_clntref
);
1179 spin_lock_bh(&fib_info_lock
);
1180 hlist_add_head(&fi
->fib_hash
,
1181 &fib_info_hash
[fib_info_hashfn(fi
)]);
1182 if (fi
->fib_prefsrc
) {
1183 struct hlist_head
*head
;
1185 head
= &fib_info_laddrhash
[fib_laddr_hashfn(fi
->fib_prefsrc
)];
1186 hlist_add_head(&fi
->fib_lhash
, head
);
1188 change_nexthops(fi
) {
1189 struct hlist_head
*head
;
1192 if (!nexthop_nh
->nh_dev
)
1194 hash
= fib_devindex_hashfn(nexthop_nh
->nh_dev
->ifindex
);
1195 head
= &fib_info_devhash
[hash
];
1196 hlist_add_head(&nexthop_nh
->nh_hash
, head
);
1197 } endfor_nexthops(fi
)
1198 spin_unlock_bh(&fib_info_lock
);
1210 return ERR_PTR(err
);
1213 int fib_dump_info(struct sk_buff
*skb
, u32 portid
, u32 seq
, int event
,
1214 u32 tb_id
, u8 type
, __be32 dst
, int dst_len
, u8 tos
,
1215 struct fib_info
*fi
, unsigned int flags
)
1217 struct nlmsghdr
*nlh
;
1220 nlh
= nlmsg_put(skb
, portid
, seq
, event
, sizeof(*rtm
), flags
);
1224 rtm
= nlmsg_data(nlh
);
1225 rtm
->rtm_family
= AF_INET
;
1226 rtm
->rtm_dst_len
= dst_len
;
1227 rtm
->rtm_src_len
= 0;
1230 rtm
->rtm_table
= tb_id
;
1232 rtm
->rtm_table
= RT_TABLE_COMPAT
;
1233 if (nla_put_u32(skb
, RTA_TABLE
, tb_id
))
1234 goto nla_put_failure
;
1235 rtm
->rtm_type
= type
;
1236 rtm
->rtm_flags
= fi
->fib_flags
;
1237 rtm
->rtm_scope
= fi
->fib_scope
;
1238 rtm
->rtm_protocol
= fi
->fib_protocol
;
1240 if (rtm
->rtm_dst_len
&&
1241 nla_put_in_addr(skb
, RTA_DST
, dst
))
1242 goto nla_put_failure
;
1243 if (fi
->fib_priority
&&
1244 nla_put_u32(skb
, RTA_PRIORITY
, fi
->fib_priority
))
1245 goto nla_put_failure
;
1246 if (rtnetlink_put_metrics(skb
, fi
->fib_metrics
) < 0)
1247 goto nla_put_failure
;
1249 if (fi
->fib_prefsrc
&&
1250 nla_put_in_addr(skb
, RTA_PREFSRC
, fi
->fib_prefsrc
))
1251 goto nla_put_failure
;
1252 if (fi
->fib_nhs
== 1) {
1253 struct in_device
*in_dev
;
1255 if (fi
->fib_nh
->nh_gw
&&
1256 nla_put_in_addr(skb
, RTA_GATEWAY
, fi
->fib_nh
->nh_gw
))
1257 goto nla_put_failure
;
1258 if (fi
->fib_nh
->nh_oif
&&
1259 nla_put_u32(skb
, RTA_OIF
, fi
->fib_nh
->nh_oif
))
1260 goto nla_put_failure
;
1261 if (fi
->fib_nh
->nh_flags
& RTNH_F_LINKDOWN
) {
1262 in_dev
= __in_dev_get_rtnl(fi
->fib_nh
->nh_dev
);
1264 IN_DEV_IGNORE_ROUTES_WITH_LINKDOWN(in_dev
))
1265 rtm
->rtm_flags
|= RTNH_F_DEAD
;
1267 #ifdef CONFIG_IP_ROUTE_CLASSID
1268 if (fi
->fib_nh
[0].nh_tclassid
&&
1269 nla_put_u32(skb
, RTA_FLOW
, fi
->fib_nh
[0].nh_tclassid
))
1270 goto nla_put_failure
;
1272 if (fi
->fib_nh
->nh_lwtstate
)
1273 lwtunnel_fill_encap(skb
, fi
->fib_nh
->nh_lwtstate
);
1275 #ifdef CONFIG_IP_ROUTE_MULTIPATH
1276 if (fi
->fib_nhs
> 1) {
1277 struct rtnexthop
*rtnh
;
1280 mp
= nla_nest_start(skb
, RTA_MULTIPATH
);
1282 goto nla_put_failure
;
1285 struct in_device
*in_dev
;
1287 rtnh
= nla_reserve_nohdr(skb
, sizeof(*rtnh
));
1289 goto nla_put_failure
;
1291 rtnh
->rtnh_flags
= nh
->nh_flags
& 0xFF;
1292 if (nh
->nh_flags
& RTNH_F_LINKDOWN
) {
1293 in_dev
= __in_dev_get_rtnl(nh
->nh_dev
);
1295 IN_DEV_IGNORE_ROUTES_WITH_LINKDOWN(in_dev
))
1296 rtnh
->rtnh_flags
|= RTNH_F_DEAD
;
1298 rtnh
->rtnh_hops
= nh
->nh_weight
- 1;
1299 rtnh
->rtnh_ifindex
= nh
->nh_oif
;
1302 nla_put_in_addr(skb
, RTA_GATEWAY
, nh
->nh_gw
))
1303 goto nla_put_failure
;
1304 #ifdef CONFIG_IP_ROUTE_CLASSID
1305 if (nh
->nh_tclassid
&&
1306 nla_put_u32(skb
, RTA_FLOW
, nh
->nh_tclassid
))
1307 goto nla_put_failure
;
1309 if (nh
->nh_lwtstate
)
1310 lwtunnel_fill_encap(skb
, nh
->nh_lwtstate
);
1311 /* length of rtnetlink header + attributes */
1312 rtnh
->rtnh_len
= nlmsg_get_pos(skb
) - (void *) rtnh
;
1313 } endfor_nexthops(fi
);
1315 nla_nest_end(skb
, mp
);
1318 nlmsg_end(skb
, nlh
);
1322 nlmsg_cancel(skb
, nlh
);
1328 * - local address disappeared -> we must delete all the entries
1330 * - device went down -> we must shutdown all nexthops going via it.
1332 int fib_sync_down_addr(struct net
*net
, __be32 local
)
1335 unsigned int hash
= fib_laddr_hashfn(local
);
1336 struct hlist_head
*head
= &fib_info_laddrhash
[hash
];
1337 struct fib_info
*fi
;
1339 if (!fib_info_laddrhash
|| local
== 0)
1342 hlist_for_each_entry(fi
, head
, fib_lhash
) {
1343 if (!net_eq(fi
->fib_net
, net
))
1345 if (fi
->fib_prefsrc
== local
) {
1346 fi
->fib_flags
|= RTNH_F_DEAD
;
1353 /* Event force Flags Description
1354 * NETDEV_CHANGE 0 LINKDOWN Carrier OFF, not for scope host
1355 * NETDEV_DOWN 0 LINKDOWN|DEAD Link down, not for scope host
1356 * NETDEV_DOWN 1 LINKDOWN|DEAD Last address removed
1357 * NETDEV_UNREGISTER 1 LINKDOWN|DEAD Device removed
1359 int fib_sync_down_dev(struct net_device
*dev
, unsigned long event
, bool force
)
1362 int scope
= RT_SCOPE_NOWHERE
;
1363 struct fib_info
*prev_fi
= NULL
;
1364 unsigned int hash
= fib_devindex_hashfn(dev
->ifindex
);
1365 struct hlist_head
*head
= &fib_info_devhash
[hash
];
1371 hlist_for_each_entry(nh
, head
, nh_hash
) {
1372 struct fib_info
*fi
= nh
->nh_parent
;
1375 BUG_ON(!fi
->fib_nhs
);
1376 if (nh
->nh_dev
!= dev
|| fi
== prev_fi
)
1380 change_nexthops(fi
) {
1381 if (nexthop_nh
->nh_flags
& RTNH_F_DEAD
)
1383 else if (nexthop_nh
->nh_dev
== dev
&&
1384 nexthop_nh
->nh_scope
!= scope
) {
1387 case NETDEV_UNREGISTER
:
1388 nexthop_nh
->nh_flags
|= RTNH_F_DEAD
;
1391 nexthop_nh
->nh_flags
|= RTNH_F_LINKDOWN
;
1396 #ifdef CONFIG_IP_ROUTE_MULTIPATH
1397 if (event
== NETDEV_UNREGISTER
&&
1398 nexthop_nh
->nh_dev
== dev
) {
1403 } endfor_nexthops(fi
)
1404 if (dead
== fi
->fib_nhs
) {
1407 case NETDEV_UNREGISTER
:
1408 fi
->fib_flags
|= RTNH_F_DEAD
;
1411 fi
->fib_flags
|= RTNH_F_LINKDOWN
;
1423 /* Must be invoked inside of an RCU protected region. */
1424 void fib_select_default(const struct flowi4
*flp
, struct fib_result
*res
)
1426 struct fib_info
*fi
= NULL
, *last_resort
= NULL
;
1427 struct hlist_head
*fa_head
= res
->fa_head
;
1428 struct fib_table
*tb
= res
->table
;
1429 u8 slen
= 32 - res
->prefixlen
;
1430 int order
= -1, last_idx
= -1;
1431 struct fib_alias
*fa
, *fa1
= NULL
;
1432 u32 last_prio
= res
->fi
->fib_priority
;
1435 hlist_for_each_entry_rcu(fa
, fa_head
, fa_list
) {
1436 struct fib_info
*next_fi
= fa
->fa_info
;
1438 if (fa
->fa_slen
!= slen
)
1440 if (fa
->fa_tos
&& fa
->fa_tos
!= flp
->flowi4_tos
)
1442 if (fa
->tb_id
!= tb
->tb_id
)
1444 if (next_fi
->fib_priority
> last_prio
&&
1445 fa
->fa_tos
== last_tos
) {
1450 if (next_fi
->fib_flags
& RTNH_F_DEAD
)
1452 last_tos
= fa
->fa_tos
;
1453 last_prio
= next_fi
->fib_priority
;
1455 if (next_fi
->fib_scope
!= res
->scope
||
1456 fa
->fa_type
!= RTN_UNICAST
)
1458 if (!next_fi
->fib_nh
[0].nh_gw
||
1459 next_fi
->fib_nh
[0].nh_scope
!= RT_SCOPE_LINK
)
1462 fib_alias_accessed(fa
);
1465 if (next_fi
!= res
->fi
)
1468 } else if (!fib_detect_death(fi
, order
, &last_resort
,
1469 &last_idx
, fa1
->fa_default
)) {
1470 fib_result_assign(res
, fi
);
1471 fa1
->fa_default
= order
;
1478 if (order
<= 0 || !fi
) {
1480 fa1
->fa_default
= -1;
1484 if (!fib_detect_death(fi
, order
, &last_resort
, &last_idx
,
1486 fib_result_assign(res
, fi
);
1487 fa1
->fa_default
= order
;
1492 fib_result_assign(res
, last_resort
);
1493 fa1
->fa_default
= last_idx
;
1499 * Dead device goes up. We wake up dead nexthops.
1500 * It takes sense only on multipath routes.
1502 int fib_sync_up(struct net_device
*dev
, unsigned int nh_flags
)
1504 struct fib_info
*prev_fi
;
1506 struct hlist_head
*head
;
1510 if (!(dev
->flags
& IFF_UP
))
1513 if (nh_flags
& RTNH_F_DEAD
) {
1514 unsigned int flags
= dev_get_flags(dev
);
1516 if (flags
& (IFF_RUNNING
| IFF_LOWER_UP
))
1517 nh_flags
|= RTNH_F_LINKDOWN
;
1521 hash
= fib_devindex_hashfn(dev
->ifindex
);
1522 head
= &fib_info_devhash
[hash
];
1525 hlist_for_each_entry(nh
, head
, nh_hash
) {
1526 struct fib_info
*fi
= nh
->nh_parent
;
1529 BUG_ON(!fi
->fib_nhs
);
1530 if (nh
->nh_dev
!= dev
|| fi
== prev_fi
)
1535 change_nexthops(fi
) {
1536 if (!(nexthop_nh
->nh_flags
& nh_flags
)) {
1540 if (!nexthop_nh
->nh_dev
||
1541 !(nexthop_nh
->nh_dev
->flags
& IFF_UP
))
1543 if (nexthop_nh
->nh_dev
!= dev
||
1544 !__in_dev_get_rtnl(dev
))
1547 nexthop_nh
->nh_flags
&= ~nh_flags
;
1548 } endfor_nexthops(fi
)
1551 fi
->fib_flags
&= ~nh_flags
;
1561 #ifdef CONFIG_IP_ROUTE_MULTIPATH
1563 void fib_select_multipath(struct fib_result
*res
, int hash
)
1565 struct fib_info
*fi
= res
->fi
;
1568 if (hash
> atomic_read(&nh
->nh_upper_bound
))
1571 res
->nh_sel
= nhsel
;
1573 } endfor_nexthops(fi
);
1575 /* Race condition: route has just become dead. */
1580 void fib_select_path(struct net
*net
, struct fib_result
*res
,
1581 struct flowi4
*fl4
, int mp_hash
)
1583 #ifdef CONFIG_IP_ROUTE_MULTIPATH
1584 if (res
->fi
->fib_nhs
> 1 && fl4
->flowi4_oif
== 0) {
1586 mp_hash
= get_hash_from_flowi4(fl4
) >> 1;
1588 fib_select_multipath(res
, mp_hash
);
1592 if (!res
->prefixlen
&&
1593 res
->table
->tb_num_default
> 1 &&
1594 res
->type
== RTN_UNICAST
&& !fl4
->flowi4_oif
)
1595 fib_select_default(fl4
, res
);
1598 fl4
->saddr
= FIB_RES_PREFSRC(net
, *res
);
1600 EXPORT_SYMBOL_GPL(fib_select_path
);