1 /* vi: set sw=4 ts=4: */
3 * ipaddress.c "ip address".
5 * Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
7 * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
10 * Laszlo Valko <valko@linux.karinthy.hu> 990223: address label must be zero terminated
15 #include <net/if_arp.h>
17 #include "ip_common.h" /* #include "libbb.h" is inside */
23 #define IFF_LOWER_UP 0x10000 /* driver signals L1 up*/
29 struct rtnl_handle *rth;
42 typedef struct filter_t filter_t;
44 #define G_filter (*(filter_t*)&bb_common_bufsiz1)
47 static void print_link_flags(unsigned flags, unsigned mdown)
49 static const int flag_masks[] = {
50 IFF_LOOPBACK, IFF_BROADCAST, IFF_POINTOPOINT,
51 IFF_MULTICAST, IFF_NOARP, IFF_UP, IFF_LOWER_UP };
52 static const char flag_labels[] ALIGN1 =
53 "LOOPBACK\0""BROADCAST\0""POINTOPOINT\0"
54 "MULTICAST\0""NOARP\0""UP\0""LOWER_UP\0";
57 flags &= ~IFF_RUNNING;
69 flags = print_flags_separated(flag_masks, flag_labels, flags, ",");
77 static void print_queuelen(char *name)
82 s = socket(AF_INET, SOCK_STREAM, 0);
86 memset(&ifr, 0, sizeof(ifr));
87 strncpy_IFNAMSIZ(ifr.ifr_name, name);
88 if (ioctl_or_warn(s, SIOCGIFTXQLEN, &ifr) < 0) {
95 printf("qlen %d", ifr.ifr_qlen);
98 static NOINLINE int print_linkinfo(const struct nlmsghdr *n)
100 struct ifinfomsg *ifi = NLMSG_DATA(n);
101 struct rtattr *tb[IFLA_MAX+1];
102 int len = n->nlmsg_len;
104 if (n->nlmsg_type != RTM_NEWLINK && n->nlmsg_type != RTM_DELLINK)
107 len -= NLMSG_LENGTH(sizeof(*ifi));
111 if (G_filter.ifindex && ifi->ifi_index != G_filter.ifindex)
113 if (G_filter.up && !(ifi->ifi_flags & IFF_UP))
116 memset(tb, 0, sizeof(tb));
117 parse_rtattr(tb, IFLA_MAX, IFLA_RTA(ifi), len);
118 if (tb[IFLA_IFNAME] == NULL) {
119 bb_error_msg("nil ifname");
123 && (!G_filter.family || G_filter.family == AF_PACKET)
124 && fnmatch(G_filter.label, RTA_DATA(tb[IFLA_IFNAME]), 0)
129 if (n->nlmsg_type == RTM_DELLINK)
132 printf("%d: %s", ifi->ifi_index,
133 /*tb[IFLA_IFNAME] ? (char*)RTA_DATA(tb[IFLA_IFNAME]) : "<nil>" - we checked tb[IFLA_IFNAME] above*/
134 (char*)RTA_DATA(tb[IFLA_IFNAME])
141 int iflink = *(int*)RTA_DATA(tb[IFLA_LINK]);
145 printf("@%s: ", ll_idx_n2a(iflink, b1));
146 m_flag = ll_index_to_flags(iflink);
147 m_flag = !(m_flag & IFF_UP);
152 print_link_flags(ifi->ifi_flags, m_flag);
156 printf("mtu %u ", *(int*)RTA_DATA(tb[IFLA_MTU]));
158 printf("qdisc %s ", (char*)RTA_DATA(tb[IFLA_QDISC]));
160 if (tb[IFLA_MASTER]) {
162 printf("master %s ", ll_idx_n2a(*(int*)RTA_DATA(tb[IFLA_MASTER]), b1));
165 if (G_filter.showqueue)
166 print_queuelen((char*)RTA_DATA(tb[IFLA_IFNAME]));
168 if (!G_filter.family || G_filter.family == AF_PACKET) {
170 printf("%c link/%s ", _SL_, ll_type_n2a(ifi->ifi_type, b1));
172 if (tb[IFLA_ADDRESS]) {
173 fputs(ll_addr_n2a(RTA_DATA(tb[IFLA_ADDRESS]),
174 RTA_PAYLOAD(tb[IFLA_ADDRESS]),
176 b1, sizeof(b1)), stdout);
178 if (tb[IFLA_BROADCAST]) {
179 if (ifi->ifi_flags & IFF_POINTOPOINT)
183 fputs(ll_addr_n2a(RTA_DATA(tb[IFLA_BROADCAST]),
184 RTA_PAYLOAD(tb[IFLA_BROADCAST]),
186 b1, sizeof(b1)), stdout);
194 static int flush_update(void)
196 if (rtnl_send(G_filter.rth, G_filter.flushb, G_filter.flushp) < 0) {
197 bb_perror_msg("can't send flush request");
204 static int FAST_FUNC print_addrinfo(const struct sockaddr_nl *who UNUSED_PARAM,
205 struct nlmsghdr *n, void *arg UNUSED_PARAM)
207 struct ifaddrmsg *ifa = NLMSG_DATA(n);
208 int len = n->nlmsg_len;
209 struct rtattr * rta_tb[IFA_MAX+1];
213 if (n->nlmsg_type != RTM_NEWADDR && n->nlmsg_type != RTM_DELADDR)
215 len -= NLMSG_LENGTH(sizeof(*ifa));
217 bb_error_msg("wrong nlmsg len %d", len);
221 if (G_filter.flushb && n->nlmsg_type != RTM_NEWADDR)
224 memset(rta_tb, 0, sizeof(rta_tb));
225 parse_rtattr(rta_tb, IFA_MAX, IFA_RTA(ifa), n->nlmsg_len - NLMSG_LENGTH(sizeof(*ifa)));
227 if (!rta_tb[IFA_LOCAL])
228 rta_tb[IFA_LOCAL] = rta_tb[IFA_ADDRESS];
229 if (!rta_tb[IFA_ADDRESS])
230 rta_tb[IFA_ADDRESS] = rta_tb[IFA_LOCAL];
232 if (G_filter.ifindex && G_filter.ifindex != ifa->ifa_index)
234 if ((G_filter.scope ^ ifa->ifa_scope) & G_filter.scopemask)
236 if ((G_filter.flags ^ ifa->ifa_flags) & G_filter.flagmask)
238 if (G_filter.label) {
240 if (rta_tb[IFA_LABEL])
241 label = RTA_DATA(rta_tb[IFA_LABEL]);
243 label = ll_idx_n2a(ifa->ifa_index, b1);
244 if (fnmatch(G_filter.label, label, 0) != 0)
247 if (G_filter.pfx.family) {
248 if (rta_tb[IFA_LOCAL]) {
250 memset(&dst, 0, sizeof(dst));
251 dst.family = ifa->ifa_family;
252 memcpy(&dst.data, RTA_DATA(rta_tb[IFA_LOCAL]), RTA_PAYLOAD(rta_tb[IFA_LOCAL]));
253 if (inet_addr_match(&dst, &G_filter.pfx, G_filter.pfx.bitlen))
258 if (G_filter.flushb) {
260 if (NLMSG_ALIGN(G_filter.flushp) + n->nlmsg_len > G_filter.flushe) {
264 fn = (struct nlmsghdr*)(G_filter.flushb + NLMSG_ALIGN(G_filter.flushp));
265 memcpy(fn, n, n->nlmsg_len);
266 fn->nlmsg_type = RTM_DELADDR;
267 fn->nlmsg_flags = NLM_F_REQUEST;
268 fn->nlmsg_seq = ++G_filter.rth->seq;
269 G_filter.flushp = (((char*)fn) + n->nlmsg_len) - G_filter.flushb;
270 G_filter.flushed = 1;
274 if (n->nlmsg_type == RTM_DELADDR)
277 if (G_filter.oneline)
278 printf("%u: %s", ifa->ifa_index, ll_index_to_name(ifa->ifa_index));
279 if (ifa->ifa_family == AF_INET)
281 else if (ifa->ifa_family == AF_INET6)
284 printf(" family %d ", ifa->ifa_family);
286 if (rta_tb[IFA_LOCAL]) {
287 fputs(rt_addr_n2a(ifa->ifa_family,
288 RTA_DATA(rta_tb[IFA_LOCAL]),
289 abuf, sizeof(abuf)), stdout);
291 if (rta_tb[IFA_ADDRESS] == NULL
292 || memcmp(RTA_DATA(rta_tb[IFA_ADDRESS]), RTA_DATA(rta_tb[IFA_LOCAL]), 4) == 0
294 printf("/%d ", ifa->ifa_prefixlen);
296 printf(" peer %s/%d ",
297 rt_addr_n2a(ifa->ifa_family,
298 RTA_DATA(rta_tb[IFA_ADDRESS]),
304 if (rta_tb[IFA_BROADCAST]) {
306 rt_addr_n2a(ifa->ifa_family,
307 RTA_DATA(rta_tb[IFA_BROADCAST]),
308 abuf, sizeof(abuf)));
310 if (rta_tb[IFA_ANYCAST]) {
312 rt_addr_n2a(ifa->ifa_family,
313 RTA_DATA(rta_tb[IFA_ANYCAST]),
314 abuf, sizeof(abuf)));
316 printf("scope %s ", rtnl_rtscope_n2a(ifa->ifa_scope, b1));
317 if (ifa->ifa_flags & IFA_F_SECONDARY) {
318 ifa->ifa_flags &= ~IFA_F_SECONDARY;
319 printf("secondary ");
321 if (ifa->ifa_flags & IFA_F_TENTATIVE) {
322 ifa->ifa_flags &= ~IFA_F_TENTATIVE;
323 printf("tentative ");
325 if (ifa->ifa_flags & IFA_F_DEPRECATED) {
326 ifa->ifa_flags &= ~IFA_F_DEPRECATED;
327 printf("deprecated ");
329 if (!(ifa->ifa_flags & IFA_F_PERMANENT)) {
332 ifa->ifa_flags &= ~IFA_F_PERMANENT;
334 printf("flags %02x ", ifa->ifa_flags);
335 if (rta_tb[IFA_LABEL])
336 fputs((char*)RTA_DATA(rta_tb[IFA_LABEL]), stdout);
337 if (rta_tb[IFA_CACHEINFO]) {
338 struct ifa_cacheinfo *ci = RTA_DATA(rta_tb[IFA_CACHEINFO]);
341 if (ci->ifa_valid == 0xFFFFFFFFU)
342 sprintf(buf, "valid_lft forever");
344 sprintf(buf, "valid_lft %dsec", ci->ifa_valid);
345 if (ci->ifa_prefered == 0xFFFFFFFFU)
346 sprintf(buf+strlen(buf), " preferred_lft forever");
348 sprintf(buf+strlen(buf), " preferred_lft %dsec", ci->ifa_prefered);
358 struct nlmsg_list *next;
362 static int print_selected_addrinfo(int ifindex, struct nlmsg_list *ainfo)
364 for (; ainfo; ainfo = ainfo->next) {
365 struct nlmsghdr *n = &ainfo->h;
366 struct ifaddrmsg *ifa = NLMSG_DATA(n);
368 if (n->nlmsg_type != RTM_NEWADDR)
370 if (n->nlmsg_len < NLMSG_LENGTH(sizeof(ifa)))
372 if (ifa->ifa_index != ifindex
373 || (G_filter.family && G_filter.family != ifa->ifa_family)
377 print_addrinfo(NULL, n, NULL);
383 static int FAST_FUNC store_nlmsg(const struct sockaddr_nl *who, struct nlmsghdr *n, void *arg)
385 struct nlmsg_list **linfo = (struct nlmsg_list**)arg;
386 struct nlmsg_list *h;
387 struct nlmsg_list **lp;
389 h = xzalloc(n->nlmsg_len + sizeof(void*));
391 memcpy(&h->h, n, n->nlmsg_len);
392 /*h->next = NULL; - xzalloc did it */
394 for (lp = linfo; *lp; lp = &(*lp)->next)
398 ll_remember_index(who, n, NULL);
402 static void ipaddr_reset_filter(int _oneline)
404 memset(&G_filter, 0, sizeof(G_filter));
405 G_filter.oneline = _oneline;
408 /* Return value becomes exitcode. It's okay to not return at all */
409 int ipaddr_list_or_flush(char **argv, int flush)
411 static const char option[] ALIGN1 = "to\0""scope\0""up\0""label\0""dev\0";
413 struct nlmsg_list *linfo = NULL;
414 struct nlmsg_list *ainfo = NULL;
415 struct nlmsg_list *l;
416 struct rtnl_handle rth;
417 char *filter_dev = NULL;
420 ipaddr_reset_filter(oneline);
421 G_filter.showqueue = 1;
423 if (G_filter.family == AF_UNSPEC)
424 G_filter.family = preferred_family;
428 bb_error_msg_and_die(bb_msg_requires_arg, "flush");
430 if (G_filter.family == AF_PACKET) {
431 bb_error_msg_and_die("can't flush link addresses");
436 const int option_num = index_in_strings(option, *argv);
437 switch (option_num) {
440 get_prefix(&G_filter.pfx, *argv, G_filter.family);
441 if (G_filter.family == AF_UNSPEC) {
442 G_filter.family = G_filter.pfx.family;
445 case 1: { /* scope */
448 G_filter.scopemask = -1;
449 if (rtnl_rtscope_a2n(&scope, *argv)) {
450 if (strcmp(*argv, "all") != 0) {
451 invarg(*argv, "scope");
453 scope = RT_SCOPE_NOWHERE;
454 G_filter.scopemask = 0;
456 G_filter.scope = scope;
464 G_filter.label = *argv;
470 duparg2("dev", *argv);
479 xrtnl_wilddump_request(&rth, preferred_family, RTM_GETLINK);
480 xrtnl_dump_filter(&rth, store_nlmsg, &linfo);
483 G_filter.ifindex = xll_name_to_index(filter_dev);
487 char flushb[4096-512];
489 G_filter.flushb = flushb;
491 G_filter.flushe = sizeof(flushb);
495 xrtnl_wilddump_request(&rth, G_filter.family, RTM_GETADDR);
496 G_filter.flushed = 0;
497 xrtnl_dump_filter(&rth, print_addrinfo, NULL);
498 if (G_filter.flushed == 0) {
501 if (flush_update() < 0) {
507 if (G_filter.family != AF_PACKET) {
508 xrtnl_wilddump_request(&rth, G_filter.family, RTM_GETADDR);
509 xrtnl_dump_filter(&rth, store_nlmsg, &ainfo);
513 if (G_filter.family && G_filter.family != AF_PACKET) {
514 struct nlmsg_list **lp;
517 if (G_filter.oneline)
520 while ((l = *lp) != NULL) {
522 struct ifinfomsg *ifi = NLMSG_DATA(&l->h);
523 struct nlmsg_list *a;
525 for (a = ainfo; a; a = a->next) {
526 struct nlmsghdr *n = &a->h;
527 struct ifaddrmsg *ifa = NLMSG_DATA(n);
529 if (ifa->ifa_index != ifi->ifi_index
530 || (G_filter.family && G_filter.family != ifa->ifa_family)
534 if ((G_filter.scope ^ ifa->ifa_scope) & G_filter.scopemask)
536 if ((G_filter.flags ^ ifa->ifa_flags) & G_filter.flagmask)
538 if (G_filter.pfx.family || G_filter.label) {
539 struct rtattr *tb[IFA_MAX+1];
540 memset(tb, 0, sizeof(tb));
541 parse_rtattr(tb, IFA_MAX, IFA_RTA(ifa), IFA_PAYLOAD(n));
543 tb[IFA_LOCAL] = tb[IFA_ADDRESS];
545 if (G_filter.pfx.family && tb[IFA_LOCAL]) {
547 memset(&dst, 0, sizeof(dst));
548 dst.family = ifa->ifa_family;
549 memcpy(&dst.data, RTA_DATA(tb[IFA_LOCAL]), RTA_PAYLOAD(tb[IFA_LOCAL]));
550 if (inet_addr_match(&dst, &G_filter.pfx, G_filter.pfx.bitlen))
553 if (G_filter.label) {
557 label = RTA_DATA(tb[IFA_LABEL]);
559 label = ll_idx_n2a(ifa->ifa_index, b1);
560 if (fnmatch(G_filter.label, label, 0) != 0)
575 for (l = linfo; l; l = l->next) {
576 if (no_link || print_linkinfo(&l->h) == 0) {
577 struct ifinfomsg *ifi = NLMSG_DATA(&l->h);
578 if (G_filter.family != AF_PACKET)
579 print_selected_addrinfo(ifi->ifi_index, ainfo);
586 static int default_scope(inet_prefix *lcl)
588 if (lcl->family == AF_INET) {
589 if (lcl->bytelen >= 1 && *(uint8_t*)&lcl->data == 127)
590 return RT_SCOPE_HOST;
595 /* Return value becomes exitcode. It's okay to not return at all */
596 static int ipaddr_modify(int cmd, char **argv)
598 static const char option[] ALIGN1 =
599 "peer\0""remote\0""broadcast\0""brd\0"
600 "anycast\0""scope\0""dev\0""label\0""local\0";
601 struct rtnl_handle rth;
604 struct ifaddrmsg ifa;
617 memset(&req, 0, sizeof(req));
619 req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct ifaddrmsg));
620 req.n.nlmsg_flags = NLM_F_REQUEST;
621 req.n.nlmsg_type = cmd;
622 req.ifa.ifa_family = preferred_family;
625 const int option_num = index_in_strings(option, *argv);
626 switch (option_num) {
632 duparg("peer", *argv);
634 get_prefix(&peer, *argv, req.ifa.ifa_family);
635 peer_len = peer.bytelen;
636 if (req.ifa.ifa_family == AF_UNSPEC) {
637 req.ifa.ifa_family = peer.family;
639 addattr_l(&req.n, sizeof(req), IFA_ADDRESS, &peer.data, peer.bytelen);
640 req.ifa.ifa_prefixlen = peer.bitlen;
642 case 2: /* broadcast */
648 duparg("broadcast", *argv);
650 if (LONE_CHAR(*argv, '+')) {
652 } else if (LONE_DASH(*argv)) {
655 get_addr(&addr, *argv, req.ifa.ifa_family);
656 if (req.ifa.ifa_family == AF_UNSPEC)
657 req.ifa.ifa_family = addr.family;
658 addattr_l(&req.n, sizeof(req), IFA_BROADCAST, &addr.data, addr.bytelen);
659 brd_len = addr.bytelen;
663 case 4: /* anycast */
668 duparg("anycast", *argv);
670 get_addr(&addr, *argv, req.ifa.ifa_family);
671 if (req.ifa.ifa_family == AF_UNSPEC) {
672 req.ifa.ifa_family = addr.family;
674 addattr_l(&req.n, sizeof(req), IFA_ANYCAST, &addr.data, addr.bytelen);
675 any_len = addr.bytelen;
682 if (rtnl_rtscope_a2n(&scope, *argv)) {
683 invarg(*argv, "scope");
685 req.ifa.ifa_scope = scope;
696 addattr_l(&req.n, sizeof(req), IFA_LABEL, l, strlen(l)+1);
702 duparg2("local", *argv);
704 get_prefix(&lcl, *argv, req.ifa.ifa_family);
705 if (req.ifa.ifa_family == AF_UNSPEC) {
706 req.ifa.ifa_family = lcl.family;
708 addattr_l(&req.n, sizeof(req), IFA_LOCAL, &lcl.data, lcl.bytelen);
709 local_len = lcl.bytelen;
715 bb_error_msg(bb_msg_requires_arg, "\"dev\"");
718 if (l && strncmp(d, l, strlen(d)) != 0) {
719 bb_error_msg_and_die("\"dev\" (%s) must match \"label\" (%s)", d, l);
722 if (peer_len == 0 && local_len && cmd != RTM_DELADDR) {
724 addattr_l(&req.n, sizeof(req), IFA_ADDRESS, &lcl.data, lcl.bytelen);
726 if (req.ifa.ifa_prefixlen == 0)
727 req.ifa.ifa_prefixlen = lcl.bitlen;
729 if (brd_len < 0 && cmd != RTM_DELADDR) {
732 if (req.ifa.ifa_family != AF_INET) {
733 bb_error_msg_and_die("broadcast can be set only for IPv4 addresses");
736 if (brd.bitlen <= 30) {
737 for (i=31; i>=brd.bitlen; i--) {
739 brd.data[0] |= htonl(1<<(31-i));
741 brd.data[0] &= ~htonl(1<<(31-i));
743 addattr_l(&req.n, sizeof(req), IFA_BROADCAST, &brd.data, brd.bytelen);
744 brd_len = brd.bytelen;
747 if (!scoped && cmd != RTM_DELADDR)
748 req.ifa.ifa_scope = default_scope(&lcl);
754 req.ifa.ifa_index = xll_name_to_index(d);
756 if (rtnl_talk(&rth, &req.n, 0, 0, NULL, NULL, NULL) < 0)
762 /* Return value becomes exitcode. It's okay to not return at all */
763 int do_ipaddr(char **argv)
765 static const char commands[] ALIGN1 =
766 "add\0""delete\0""list\0""show\0""lst\0""flush\0";
768 int command_num = 2; /* default command is list */
771 command_num = index_in_substrings(commands, *argv);
772 if (command_num < 0 || command_num > 5)
773 bb_error_msg_and_die("unknown command %s", *argv);
776 if (command_num == 0) /* add */
777 return ipaddr_modify(RTM_NEWADDR, argv);
778 if (command_num == 1) /* delete */
779 return ipaddr_modify(RTM_DELADDR, argv);
780 if (command_num == 5) /* flush */
781 return ipaddr_list_or_flush(argv, 1);
782 /* 2 == list, 3 == show, 4 == lst */
783 return ipaddr_list_or_flush(argv, 0);