4 * Copyright (C) 1997, 98 Kunihiro Ishiguro
6 * This file is part of GNU Zebra.
8 * GNU Zebra is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published
10 * by the Free Software Foundation; either version 2, or (at your
11 * option) any later version.
13 * GNU Zebra is distributed in the hope that it will be useful, but
14 * WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with GNU Zebra; see the file COPYING. If not, write to the
20 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
21 * Boston, MA 02111-1307, USA.
31 #include "sockunion.h"
39 /* Master list of interfaces. */
42 /* One for each program. This structure is needed to store hooks. */
45 int (*if_new_hook
) (struct interface
*);
46 int (*if_delete_hook
) (struct interface
*);
49 /* Compare interface names, returning an integer greater than, equal to, or
50 * less than 0, (following the strcmp convention), according to the
51 * relationship between ifp1 and ifp2. Interface names consist of an
52 * alphabetic prefix and a numeric suffix. The primary sort key is
53 * lexicographic by name, and then numeric by number. No number sorts
54 * before all numbers. Examples: de0 < de1, de100 < fxp0 < xl0, devpty <
58 if_cmp_func (struct interface
*ifp1
, struct interface
*ifp2
)
69 /* look up to any number */
70 l1
= strcspn(p1
, "0123456789");
71 l2
= strcspn(p2
, "0123456789");
73 /* name lengths are different -> compare names */
75 return (strcmp(p1
, p2
));
77 /* Note that this relies on all numbers being less than all letters, so
80 res
= strncmp(p1
, p2
, l1
);
82 /* names are different -> compare them */
86 /* with identical name part, go to numeric part */
95 x1
= strtol(p1
, &p1
, 10);
96 x2
= strtol(p2
, &p2
, 10);
98 /* let's compare numbers now */
104 /* numbers were equal, lets do it again..
105 (it happens with name like "eth123.456:789") */
114 /* Create new interface structure. */
116 if_create (const char *name
, int namelen
)
118 struct interface
*ifp
;
120 ifp
= XCALLOC (MTYPE_IF
, sizeof (struct interface
));
121 ifp
->ifindex
= IFINDEX_INTERNAL
;
124 assert (namelen
<= INTERFACE_NAMSIZ
); /* Need space for '\0' at end. */
125 strncpy (ifp
->name
, name
, namelen
);
126 ifp
->name
[namelen
] = '\0';
127 if (if_lookup_by_name(ifp
->name
) == NULL
)
128 listnode_add_sort (iflist
, ifp
);
130 zlog_err("if_create(%s): corruption detected -- interface with this "
131 "name exists already!", ifp
->name
);
132 ifp
->connected
= list_new ();
133 ifp
->connected
->del
= (void (*) (void *)) connected_free
;
135 if (if_master
.if_new_hook
)
136 (*if_master
.if_new_hook
) (ifp
);
141 /* Delete interface structure. */
143 if_delete_retain (struct interface
*ifp
)
145 if (if_master
.if_delete_hook
)
146 (*if_master
.if_delete_hook
) (ifp
);
148 /* Free connected address list */
149 list_delete (ifp
->connected
);
152 /* Delete and free interface structure. */
154 if_delete (struct interface
*ifp
)
156 listnode_delete (iflist
, ifp
);
158 if_delete_retain(ifp
);
160 XFREE (MTYPE_IF
, ifp
);
163 /* Add hook to interface master. */
165 if_add_hook (int type
, int (*func
)(struct interface
*ifp
))
169 if_master
.if_new_hook
= func
;
172 if_master
.if_delete_hook
= func
;
179 /* Interface existance check by index. */
181 if_lookup_by_index (unsigned int index
)
183 struct listnode
*node
;
184 struct interface
*ifp
;
186 for (ALL_LIST_ELEMENTS_RO(iflist
, node
, ifp
))
188 if (ifp
->ifindex
== index
)
195 ifindex2ifname (unsigned int index
)
197 struct interface
*ifp
;
199 return ((ifp
= if_lookup_by_index(index
)) != NULL
) ?
200 ifp
->name
: "unknown";
204 ifname2ifindex (const char *name
)
206 struct interface
*ifp
;
208 return ((ifp
= if_lookup_by_name(name
)) != NULL
) ? ifp
->ifindex
212 /* Interface existance check by interface name. */
214 if_lookup_by_name (const char *name
)
216 struct listnode
*node
;
217 struct interface
*ifp
;
220 for (ALL_LIST_ELEMENTS_RO (iflist
, node
, ifp
))
222 if (strcmp(name
, ifp
->name
) == 0)
229 if_lookup_by_name_len(const char *name
, size_t namelen
)
231 struct listnode
*node
;
232 struct interface
*ifp
;
234 if (namelen
> INTERFACE_NAMSIZ
)
237 for (ALL_LIST_ELEMENTS_RO (iflist
, node
, ifp
))
239 if (!memcmp(name
, ifp
->name
, namelen
) && (ifp
->name
[namelen
] == '\0'))
245 /* Lookup interface by IPv4 address. */
247 if_lookup_exact_address (struct in_addr src
)
249 struct listnode
*node
;
250 struct listnode
*cnode
;
251 struct interface
*ifp
;
255 for (ALL_LIST_ELEMENTS_RO (iflist
, node
, ifp
))
257 for (ALL_LIST_ELEMENTS_RO (ifp
->connected
, cnode
, c
))
261 if (p
&& p
->family
== AF_INET
)
263 if (IPV4_ADDR_SAME (&p
->u
.prefix4
, &src
))
271 /* Lookup interface by IPv4 address. */
273 if_lookup_address (struct in_addr src
)
275 struct listnode
*node
;
278 struct listnode
*cnode
;
279 struct interface
*ifp
;
281 struct interface
*match
;
283 addr
.family
= AF_INET
;
284 addr
.u
.prefix4
= src
;
285 addr
.prefixlen
= IPV4_MAX_BITLEN
;
289 for (ALL_LIST_ELEMENTS_RO (iflist
, node
, ifp
))
291 for (ALL_LIST_ELEMENTS_RO (ifp
->connected
, cnode
, c
))
293 if (c
->address
&& (c
->address
->family
== AF_INET
) &&
294 prefix_match(CONNECTED_PREFIX(c
), &addr
) &&
295 (c
->address
->prefixlen
> bestlen
))
297 bestlen
= c
->address
->prefixlen
;
305 /* Get interface by name if given name interface doesn't exist create
308 if_get_by_name (const char *name
)
310 struct interface
*ifp
;
312 return ((ifp
= if_lookup_by_name(name
)) != NULL
) ? ifp
:
313 if_create(name
, strlen(name
));
317 if_get_by_name_len(const char *name
, size_t namelen
)
319 struct interface
*ifp
;
321 return ((ifp
= if_lookup_by_name_len(name
, namelen
)) != NULL
) ? ifp
:
322 if_create(name
, namelen
);
325 /* Does interface up ? */
327 if_is_up (struct interface
*ifp
)
329 return ifp
->flags
& IFF_UP
;
332 /* Is interface running? */
334 if_is_running (struct interface
*ifp
)
336 return ifp
->flags
& IFF_RUNNING
;
339 /* Is the interface operative, eg. either UP & RUNNING
340 or UP & !ZEBRA_INTERFACE_LINK_DETECTION */
342 if_is_operative (struct interface
*ifp
)
344 return ((ifp
->flags
& IFF_UP
) &&
345 (ifp
->flags
& IFF_RUNNING
|| !CHECK_FLAG(ifp
->status
, ZEBRA_INTERFACE_LINKDETECTION
)));
348 /* Is this loopback interface ? */
350 if_is_loopback (struct interface
*ifp
)
352 /* XXX: Do this better, eg what if IFF_WHATEVER means X on platform M
353 * but Y on platform N?
355 return (ifp
->flags
& (IFF_LOOPBACK
|IFF_NOXMIT
|IFF_VIRTUAL
));
358 /* Does this interface support broadcast ? */
360 if_is_broadcast (struct interface
*ifp
)
362 return ifp
->flags
& IFF_BROADCAST
;
365 /* Does this interface support broadcast ? */
367 if_is_pointopoint (struct interface
*ifp
)
369 return ifp
->flags
& IFF_POINTOPOINT
;
372 /* Does this interface support multicast ? */
374 if_is_multicast (struct interface
*ifp
)
376 return ifp
->flags
& IFF_MULTICAST
;
379 /* Printout flag information into log */
381 if_flag_dump (unsigned long flag
)
384 static char logbuf
[BUFSIZ
];
386 #define IFF_OUT_LOG(X,STR) \
390 strlcat (logbuf, ",", BUFSIZ); \
393 strlcat (logbuf, STR, BUFSIZ); \
396 strlcpy (logbuf
, "<", BUFSIZ
);
397 IFF_OUT_LOG (IFF_UP
, "UP");
398 IFF_OUT_LOG (IFF_BROADCAST
, "BROADCAST");
399 IFF_OUT_LOG (IFF_DEBUG
, "DEBUG");
400 IFF_OUT_LOG (IFF_LOOPBACK
, "LOOPBACK");
401 IFF_OUT_LOG (IFF_POINTOPOINT
, "POINTOPOINT");
402 IFF_OUT_LOG (IFF_NOTRAILERS
, "NOTRAILERS");
403 IFF_OUT_LOG (IFF_RUNNING
, "RUNNING");
404 IFF_OUT_LOG (IFF_NOARP
, "NOARP");
405 IFF_OUT_LOG (IFF_PROMISC
, "PROMISC");
406 IFF_OUT_LOG (IFF_ALLMULTI
, "ALLMULTI");
407 IFF_OUT_LOG (IFF_OACTIVE
, "OACTIVE");
408 IFF_OUT_LOG (IFF_SIMPLEX
, "SIMPLEX");
409 IFF_OUT_LOG (IFF_LINK0
, "LINK0");
410 IFF_OUT_LOG (IFF_LINK1
, "LINK1");
411 IFF_OUT_LOG (IFF_LINK2
, "LINK2");
412 IFF_OUT_LOG (IFF_MULTICAST
, "MULTICAST");
413 IFF_OUT_LOG (IFF_NOXMIT
, "NOXMIT");
414 IFF_OUT_LOG (IFF_NORTEXCH
, "NORTEXCH");
415 IFF_OUT_LOG (IFF_VIRTUAL
, "VIRTUAL");
416 IFF_OUT_LOG (IFF_IPV4
, "IPv4");
417 IFF_OUT_LOG (IFF_IPV6
, "IPv6");
419 strlcat (logbuf
, ">", BUFSIZ
);
427 if_dump (const struct interface
*ifp
)
429 struct listnode
*node
;
432 zlog_info ("Interface %s index %d metric %d mtu %d "
435 #endif /* HAVE_IPV6 */
437 ifp
->name
, ifp
->ifindex
, ifp
->metric
, ifp
->mtu
,
440 #endif /* HAVE_IPV6 */
441 if_flag_dump (ifp
->flags
));
443 for (ALL_LIST_ELEMENTS_RO (ifp
->connected
, node
, c
))
447 /* Interface printing for all interface. */
451 struct listnode
*node
;
454 for (ALL_LIST_ELEMENTS_RO (iflist
, node
, p
))
458 DEFUN (interface_desc
,
461 "Interface specific description\n"
462 "Characters describing this interface\n")
464 struct interface
*ifp
;
471 XFREE (MTYPE_TMP
, ifp
->desc
);
472 ifp
->desc
= argv_concat(argv
, argc
, 0);
477 DEFUN (no_interface_desc
,
478 no_interface_desc_cmd
,
481 "Interface specific description\n")
483 struct interface
*ifp
;
487 XFREE (MTYPE_TMP
, ifp
->desc
);
494 /* Need to handle upgrade from SUNWzebra to Quagga. SUNWzebra created
495 * a seperate struct interface for each logical interface, so config
496 * file may be full of 'interface fooX:Y'. Solaris however does not
497 * expose logical interfaces via PF_ROUTE, so trying to track logical
498 * interfaces can be fruitless, for that reason Quagga only tracks
499 * the primary IP interface.
501 * We try accomodate SUNWzebra by:
502 * - looking up the interface name, to see whether it exists, if so
504 * - for protocol daemons, this could only because zebra told us of
506 * - for zebra, only because it learnt from kernel
508 * - search the name to see if it contains a sub-ipif / logical interface
509 * seperator, the ':' char. If it does:
510 * - text up to that char must be the primary name - get that name.
512 * - no idea, just get the name in its entirety.
514 static struct interface
*
515 if_sunwzebra_get (const char *name
, size_t nlen
)
517 struct interface
*ifp
;
520 if ( (ifp
= if_lookup_by_name_len(name
, nlen
)) != NULL
)
523 /* hunt the primary interface name... */
524 while (seppos
< nlen
&& name
[seppos
] != ':')
527 /* Wont catch seperator as last char, e.g. 'foo0:' but thats invalid */
529 return if_get_by_name_len (name
, seppos
);
531 return if_get_by_name_len (name
, nlen
);
538 "Select an interface to configure\n"
539 "Interface's name\n")
541 struct interface
*ifp
;
544 if ((sl
= strlen(argv
[0])) > INTERFACE_NAMSIZ
)
546 vty_out (vty
, "%% Interface name %s is invalid: length exceeds "
548 argv
[0], INTERFACE_NAMSIZ
, VTY_NEWLINE
);
553 ifp
= if_sunwzebra_get (argv
[0], sl
);
555 ifp
= if_get_by_name_len(argv
[0], sl
);
559 vty
->node
= INTERFACE_NODE
;
564 DEFUN_NOSH (no_interface
,
566 "no interface IFNAME",
568 "Delete a pseudo interface's configuration\n"
569 "Interface's name\n")
571 // deleting interface
572 struct interface
*ifp
;
574 ifp
= if_lookup_by_name (argv
[0]);
578 vty_out (vty
, "%% Interface %s does not exist%s", argv
[0], VTY_NEWLINE
);
582 if (CHECK_FLAG (ifp
->status
, ZEBRA_INTERFACE_ACTIVE
))
584 vty_out (vty
, "%% Only inactive interfaces can be deleted%s",
594 /* For debug purpose. */
601 struct listnode
*node
;
602 struct listnode
*node2
;
603 struct interface
*ifp
;
604 struct connected
*ifc
;
607 for (ALL_LIST_ELEMENTS_RO (iflist
, node
, ifp
))
609 for (ALL_LIST_ELEMENTS_RO (ifp
->connected
, node2
, ifc
))
613 if (p
->family
== AF_INET
)
614 vty_out (vty
, "%s/%d%s", inet_ntoa (p
->u
.prefix4
), p
->prefixlen
,
621 /* Allocate connected structure. */
625 return XCALLOC (MTYPE_CONNECTED
, sizeof (struct connected
));
628 /* Free connected structure. */
630 connected_free (struct connected
*connected
)
632 if (connected
->address
)
633 prefix_free (connected
->address
);
635 if (connected
->destination
)
636 prefix_free (connected
->destination
);
638 if (connected
->label
)
639 XFREE (MTYPE_CONNECTED_LABEL
, connected
->label
);
641 XFREE (MTYPE_CONNECTED
, connected
);
644 /* Print if_addr structure. */
645 static void __attribute__ ((unused
))
646 connected_log (struct connected
*connected
, char *str
)
649 struct interface
*ifp
;
653 ifp
= connected
->ifp
;
654 p
= connected
->address
;
656 snprintf (logbuf
, BUFSIZ
, "%s interface %s %s %s/%d ",
657 str
, ifp
->name
, prefix_family_str (p
),
658 inet_ntop (p
->family
, &p
->u
.prefix
, buf
, BUFSIZ
),
661 p
= connected
->destination
;
664 strncat (logbuf
, inet_ntop (p
->family
, &p
->u
.prefix
, buf
, BUFSIZ
),
665 BUFSIZ
- strlen(logbuf
));
667 zlog (NULL
, LOG_INFO
, logbuf
);
670 /* If two connected address has same prefix return 1. */
672 connected_same_prefix (struct prefix
*p1
, struct prefix
*p2
)
674 if (p1
->family
== p2
->family
)
676 if (p1
->family
== AF_INET
&&
677 IPV4_ADDR_SAME (&p1
->u
.prefix4
, &p2
->u
.prefix4
))
680 if (p1
->family
== AF_INET6
&&
681 IPV6_ADDR_SAME (&p1
->u
.prefix6
, &p2
->u
.prefix6
))
683 #endif /* HAVE_IPV6 */
689 connected_delete_by_prefix (struct interface
*ifp
, struct prefix
*p
)
691 struct listnode
*node
;
692 struct listnode
*next
;
693 struct connected
*ifc
;
695 /* In case of same prefix come, replace it with new one. */
696 for (node
= listhead (ifp
->connected
); node
; node
= next
)
698 ifc
= listgetdata (node
);
701 if (connected_same_prefix (ifc
->address
, p
))
703 listnode_delete (ifp
->connected
, ifc
);
710 /* Find the IPv4 address on our side that will be used when packets
713 connected_lookup_address (struct interface
*ifp
, struct in_addr dst
)
716 struct listnode
*cnode
;
718 struct connected
*match
;
720 addr
.family
= AF_INET
;
721 addr
.u
.prefix4
= dst
;
722 addr
.prefixlen
= IPV4_MAX_BITLEN
;
726 for (ALL_LIST_ELEMENTS_RO (ifp
->connected
, cnode
, c
))
728 if (c
->address
&& (c
->address
->family
== AF_INET
) &&
729 prefix_match(CONNECTED_PREFIX(c
), &addr
) &&
730 (!match
|| (c
->address
->prefixlen
> match
->address
->prefixlen
)))
737 connected_add_by_prefix (struct interface
*ifp
, struct prefix
*p
,
738 struct prefix
*destination
)
740 struct connected
*ifc
;
742 /* Allocate new connected address. */
743 ifc
= connected_new ();
746 /* Fetch interface address */
747 ifc
->address
= prefix_new();
748 memcpy (ifc
->address
, p
, sizeof(struct prefix
));
750 /* Fetch dest address */
753 ifc
->destination
= prefix_new();
754 memcpy (ifc
->destination
, destination
, sizeof(struct prefix
));
757 /* Add connected address to the interface. */
758 listnode_add (ifp
->connected
, ifc
);
762 #ifndef HAVE_IF_NAMETOINDEX
764 if_nametoindex (const char *name
)
766 struct interface
*ifp
;
768 return ((ifp
= if_lookup_by_name_len(name
, strnlen(name
, IFNAMSIZ
))) != NULL
)
773 #ifndef HAVE_IF_INDEXTONAME
775 if_indextoname (unsigned int ifindex
, char *name
)
777 struct interface
*ifp
;
779 if (!(ifp
= if_lookup_by_index(ifindex
)))
781 strncpy (name
, ifp
->name
, IFNAMSIZ
);
786 #if 0 /* this route_table of struct connected's is unused
787 * however, it would be good to use a route_table rather than
790 /* Interface looking up by interface's address. */
791 /* Interface's IPv4 address reverse lookup table. */
792 struct route_table
*ifaddr_ipv4_table
;
793 /* struct route_table *ifaddr_ipv6_table; */
796 ifaddr_ipv4_add (struct in_addr
*ifaddr
, struct interface
*ifp
)
798 struct route_node
*rn
;
799 struct prefix_ipv4 p
;
802 p
.prefixlen
= IPV4_MAX_PREFIXLEN
;
805 rn
= route_node_get (ifaddr_ipv4_table
, (struct prefix
*) &p
);
808 route_unlock_node (rn
);
809 zlog_info ("ifaddr_ipv4_add(): address %s is already added",
810 inet_ntoa (*ifaddr
));
817 ifaddr_ipv4_delete (struct in_addr
*ifaddr
, struct interface
*ifp
)
819 struct route_node
*rn
;
820 struct prefix_ipv4 p
;
823 p
.prefixlen
= IPV4_MAX_PREFIXLEN
;
826 rn
= route_node_lookup (ifaddr_ipv4_table
, (struct prefix
*) &p
);
829 zlog_info ("ifaddr_ipv4_delete(): can't find address %s",
830 inet_ntoa (*ifaddr
));
834 route_unlock_node (rn
);
835 route_unlock_node (rn
);
838 /* Lookup interface by interface's IP address or interface index. */
839 static struct interface
*
840 ifaddr_ipv4_lookup (struct in_addr
*addr
, unsigned int ifindex
)
842 struct prefix_ipv4 p
;
843 struct route_node
*rn
;
844 struct interface
*ifp
;
849 p
.prefixlen
= IPV4_MAX_PREFIXLEN
;
852 rn
= route_node_lookup (ifaddr_ipv4_table
, (struct prefix
*) &p
);
857 route_unlock_node (rn
);
861 return if_lookup_by_index(ifindex
);
863 #endif /* ifaddr_ipv4_table */
865 /* Initialize interface list. */
869 iflist
= list_new ();
871 ifaddr_ipv4_table
= route_table_init ();
872 #endif /* ifaddr_ipv4_table */
875 iflist
->cmp
= (int (*)(void *, void *))if_cmp_func
;
879 memset (&if_master
, 0, sizeof if_master
);