networking/libiproute/ipaddress.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Licensed under GPLv2 or later, see file LICENSE in this source tree.
   4  *
   5  * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
   6  *
   7  * Changes:
   8  * Laszlo Valko <valko@linux.karinthy.hu> 990223: address label must be zero terminated
   9  */
  10
  11 #include <fnmatch.h>
  12 #include <net/if.h>
  13 #include <net/if_arp.h>
  14
  15 #include "ip_common.h"  /* #include "libbb.h" is inside */
  16 #include "rt_names.h"
  17 #include "utils.h"
  18
  19 #ifndef IFF_LOWER_UP
  20 /* from linux/if.h */
  21 #define IFF_LOWER_UP  0x10000  /* driver signals L1 up */
  22 #endif
  23
  24 struct filter_t {
  25         char *label;
  26         char *flushb;
  27         struct rtnl_handle *rth;
  28         int scope, scopemask;
  29         int flags, flagmask;
  30         int flushp;
  31         int flushe;
  32         int ifindex;
  33         family_t family;
  34         smallint showqueue;
  35         smallint oneline;
  36         smallint up;
  37         smallint flushed;
  38         inet_prefix pfx;
  39 } FIX_ALIASING;
  40 typedef struct filter_t filter_t;
  41
  42 #define G_filter (*(filter_t*)&bb_common_bufsiz1)
  43
  44
  45 static void print_link_flags(unsigned flags, unsigned mdown)
  46 {
  47         static const int flag_masks[] = {
  48                 IFF_LOOPBACK, IFF_BROADCAST, IFF_POINTOPOINT,
  49                 IFF_MULTICAST, IFF_NOARP, IFF_UP, IFF_LOWER_UP };
  50         static const char flag_labels[] ALIGN1 =
  51                 "LOOPBACK\0""BROADCAST\0""POINTOPOINT\0"
  52                 "MULTICAST\0""NOARP\0""UP\0""LOWER_UP\0";
  53
  54         bb_putchar('<');
  55         if (flags & IFF_UP && !(flags & IFF_RUNNING))
  56                 printf("NO-CARRIER,");
  57         flags &= ~IFF_RUNNING;
  58 #if 0
  59         _PF(ALLMULTI);
  60         _PF(PROMISC);
  61         _PF(MASTER);
  62         _PF(SLAVE);
  63         _PF(DEBUG);
  64         _PF(DYNAMIC);
  65         _PF(AUTOMEDIA);
  66         _PF(PORTSEL);
  67         _PF(NOTRAILERS);
  68 #endif
  69         flags = print_flags_separated(flag_masks, flag_labels, flags, ",");
  70         if (flags)
  71                 printf("%x", flags);
  72         if (mdown)
  73                 printf(",M-DOWN");
  74         printf("> ");
  75 }
  76
  77 static void print_queuelen(char *name)
  78 {
  79         struct ifreq ifr;
  80         int s;
  81
  82         s = socket(AF_INET, SOCK_STREAM, 0);
  83         if (s < 0)
  84                 return;
  85
  86         memset(&ifr, 0, sizeof(ifr));
  87         strncpy_IFNAMSIZ(ifr.ifr_name, name);
  88         if (ioctl_or_warn(s, SIOCGIFTXQLEN, &ifr) < 0) {
  89                 close(s);
  90                 return;
  91         }
  92         close(s);
  93
  94         if (ifr.ifr_qlen)
  95                 printf("qlen %d", ifr.ifr_qlen);
  96 }
  97
  98 static NOINLINE int print_linkinfo(const struct nlmsghdr *n)
  99 {
 100         struct ifinfomsg *ifi = NLMSG_DATA(n);
 101         struct rtattr *tb[IFLA_MAX+1];
 102         int len = n->nlmsg_len;
 103
 104         if (n->nlmsg_type != RTM_NEWLINK && n->nlmsg_type != RTM_DELLINK)
 105                 return 0;
 106
 107         len -= NLMSG_LENGTH(sizeof(*ifi));
 108         if (len < 0)
 109                 return -1;
 110
 111         if (G_filter.ifindex && ifi->ifi_index != G_filter.ifindex)
 112                 return 0;
 113         if (G_filter.up && !(ifi->ifi_flags & IFF_UP))
 114                 return 0;
 115
 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");
 120                 return -1;
 121         }
 122         if (G_filter.label
 123          && (!G_filter.family || G_filter.family == AF_PACKET)
 124          && fnmatch(G_filter.label, RTA_DATA(tb[IFLA_IFNAME]), 0)
 125         ) {
 126                 return 0;
 127         }
 128
 129         if (n->nlmsg_type == RTM_DELLINK)
 130                 printf("Deleted ");
 131
 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])
 135         );
 136
 137         {
 138                 unsigned m_flag = 0;
 139                 if (tb[IFLA_LINK]) {
 140                         SPRINT_BUF(b1);
 141                         int iflink = *(int*)RTA_DATA(tb[IFLA_LINK]);
 142                         if (iflink == 0)
 143                                 printf("@NONE: ");
 144                         else {
 145                                 printf("@%s: ", ll_idx_n2a(iflink, b1));
 146                                 m_flag = ll_index_to_flags(iflink);
 147                                 m_flag = !(m_flag & IFF_UP);
 148                         }
 149                 } else {
 150                         printf(": ");
 151                 }
 152                 print_link_flags(ifi->ifi_flags, m_flag);
 153         }
 154
 155         if (tb[IFLA_MTU])
 156                 printf("mtu %u ", *(int*)RTA_DATA(tb[IFLA_MTU]));
 157         if (tb[IFLA_QDISC])
 158                 printf("qdisc %s ", (char*)RTA_DATA(tb[IFLA_QDISC]));
 159 #ifdef IFLA_MASTER
 160         if (tb[IFLA_MASTER]) {
 161                 SPRINT_BUF(b1);
 162                 printf("master %s ", ll_idx_n2a(*(int*)RTA_DATA(tb[IFLA_MASTER]), b1));
 163         }
 164 #endif
 165         if (tb[IFLA_OPERSTATE]) {
 166                 static const char operstate_labels[] ALIGN1 =
 167                         "UNKNOWN\0""NOTPRESENT\0""DOWN\0""LOWERLAYERDOWN\0"
 168                         "TESTING\0""DORMANT\0""UP\0";
 169                 printf("state %s ", nth_string(operstate_labels,
 170                                         *(uint8_t *)RTA_DATA(tb[IFLA_OPERSTATE])));
 171         }
 172         if (G_filter.showqueue)
 173                 print_queuelen((char*)RTA_DATA(tb[IFLA_IFNAME]));
 174
 175         if (!G_filter.family || G_filter.family == AF_PACKET) {
 176                 SPRINT_BUF(b1);
 177                 printf("%c    link/%s ", _SL_, ll_type_n2a(ifi->ifi_type, b1));
 178
 179                 if (tb[IFLA_ADDRESS]) {
 180                         fputs(ll_addr_n2a(RTA_DATA(tb[IFLA_ADDRESS]),
 181                                                       RTA_PAYLOAD(tb[IFLA_ADDRESS]),
 182                                                       ifi->ifi_type,
 183                                                       b1, sizeof(b1)), stdout);
 184                 }
 185                 if (tb[IFLA_BROADCAST]) {
 186                         if (ifi->ifi_flags & IFF_POINTOPOINT)
 187                                 printf(" peer ");
 188                         else
 189                                 printf(" brd ");
 190                         fputs(ll_addr_n2a(RTA_DATA(tb[IFLA_BROADCAST]),
 191                                                       RTA_PAYLOAD(tb[IFLA_BROADCAST]),
 192                                                       ifi->ifi_type,
 193                                                       b1, sizeof(b1)), stdout);
 194                 }
 195         }
 196         bb_putchar('\n');
 197         /*fflush_all();*/
 198         return 0;
 199 }
 200
 201 static int flush_update(void)
 202 {
 203         if (rtnl_send(G_filter.rth, G_filter.flushb, G_filter.flushp) < 0) {
 204                 bb_perror_msg("can't send flush request");
 205                 return -1;
 206         }
 207         G_filter.flushp = 0;
 208         return 0;
 209 }
 210
 211 static int FAST_FUNC print_addrinfo(const struct sockaddr_nl *who UNUSED_PARAM,
 212                 struct nlmsghdr *n, void *arg UNUSED_PARAM)
 213 {
 214         struct ifaddrmsg *ifa = NLMSG_DATA(n);
 215         int len = n->nlmsg_len;
 216         struct rtattr * rta_tb[IFA_MAX+1];
 217         char abuf[256];
 218         SPRINT_BUF(b1);
 219
 220         if (n->nlmsg_type != RTM_NEWADDR && n->nlmsg_type != RTM_DELADDR)
 221                 return 0;
 222         len -= NLMSG_LENGTH(sizeof(*ifa));
 223         if (len < 0) {
 224                 bb_error_msg("wrong nlmsg len %d", len);
 225                 return -1;
 226         }
 227
 228         if (G_filter.flushb && n->nlmsg_type != RTM_NEWADDR)
 229                 return 0;
 230
 231         memset(rta_tb, 0, sizeof(rta_tb));
 232         parse_rtattr(rta_tb, IFA_MAX, IFA_RTA(ifa), n->nlmsg_len - NLMSG_LENGTH(sizeof(*ifa)));
 233
 234         if (!rta_tb[IFA_LOCAL])
 235                 rta_tb[IFA_LOCAL] = rta_tb[IFA_ADDRESS];
 236         if (!rta_tb[IFA_ADDRESS])
 237                 rta_tb[IFA_ADDRESS] = rta_tb[IFA_LOCAL];
 238
 239         if (G_filter.ifindex && G_filter.ifindex != ifa->ifa_index)
 240                 return 0;
 241         if ((G_filter.scope ^ ifa->ifa_scope) & G_filter.scopemask)
 242                 return 0;
 243         if ((G_filter.flags ^ ifa->ifa_flags) & G_filter.flagmask)
 244                 return 0;
 245         if (G_filter.label) {
 246                 const char *label;
 247                 if (rta_tb[IFA_LABEL])
 248                         label = RTA_DATA(rta_tb[IFA_LABEL]);
 249                 else
 250                         label = ll_idx_n2a(ifa->ifa_index, b1);
 251                 if (fnmatch(G_filter.label, label, 0) != 0)
 252                         return 0;
 253         }
 254         if (G_filter.pfx.family) {
 255                 if (rta_tb[IFA_LOCAL]) {
 256                         inet_prefix dst;
 257                         memset(&dst, 0, sizeof(dst));
 258                         dst.family = ifa->ifa_family;
 259                         memcpy(&dst.data, RTA_DATA(rta_tb[IFA_LOCAL]), RTA_PAYLOAD(rta_tb[IFA_LOCAL]));
 260                         if (inet_addr_match(&dst, &G_filter.pfx, G_filter.pfx.bitlen))
 261                                 return 0;
 262                 }
 263         }
 264
 265         if (G_filter.flushb) {
 266                 struct nlmsghdr *fn;
 267                 if (NLMSG_ALIGN(G_filter.flushp) + n->nlmsg_len > G_filter.flushe) {
 268                         if (flush_update())
 269                                 return -1;
 270                 }
 271                 fn = (struct nlmsghdr*)(G_filter.flushb + NLMSG_ALIGN(G_filter.flushp));
 272                 memcpy(fn, n, n->nlmsg_len);
 273                 fn->nlmsg_type = RTM_DELADDR;
 274                 fn->nlmsg_flags = NLM_F_REQUEST;
 275                 fn->nlmsg_seq = ++G_filter.rth->seq;
 276                 G_filter.flushp = (((char*)fn) + n->nlmsg_len) - G_filter.flushb;
 277                 G_filter.flushed = 1;
 278                 return 0;
 279         }
 280
 281         if (n->nlmsg_type == RTM_DELADDR)
 282                 printf("Deleted ");
 283
 284         if (G_filter.oneline)
 285                 printf("%u: %s", ifa->ifa_index, ll_index_to_name(ifa->ifa_index));
 286         if (ifa->ifa_family == AF_INET)
 287                 printf("    inet ");
 288         else if (ifa->ifa_family == AF_INET6)
 289                 printf("    inet6 ");
 290         else
 291                 printf("    family %d ", ifa->ifa_family);
 292
 293         if (rta_tb[IFA_LOCAL]) {
 294                 fputs(rt_addr_n2a(ifa->ifa_family,
 295                                               RTA_DATA(rta_tb[IFA_LOCAL]),
 296                                               abuf, sizeof(abuf)), stdout);
 297
 298                 if (rta_tb[IFA_ADDRESS] == NULL
 299                  || memcmp(RTA_DATA(rta_tb[IFA_ADDRESS]), RTA_DATA(rta_tb[IFA_LOCAL]), 4) == 0
 300                 ) {
 301                         printf("/%d ", ifa->ifa_prefixlen);
 302                 } else {
 303                         printf(" peer %s/%d ",
 304                                 rt_addr_n2a(ifa->ifa_family,
 305                                             RTA_DATA(rta_tb[IFA_ADDRESS]),
 306                                             abuf, sizeof(abuf)),
 307                                 ifa->ifa_prefixlen);
 308                 }
 309         }
 310
 311         if (rta_tb[IFA_BROADCAST]) {
 312                 printf("brd %s ",
 313                         rt_addr_n2a(ifa->ifa_family,
 314                                     RTA_DATA(rta_tb[IFA_BROADCAST]),
 315                                     abuf, sizeof(abuf)));
 316         }
 317         if (rta_tb[IFA_ANYCAST]) {
 318                 printf("any %s ",
 319                         rt_addr_n2a(ifa->ifa_family,
 320                                     RTA_DATA(rta_tb[IFA_ANYCAST]),
 321                                     abuf, sizeof(abuf)));
 322         }
 323         printf("scope %s ", rtnl_rtscope_n2a(ifa->ifa_scope, b1));
 324         if (ifa->ifa_flags & IFA_F_SECONDARY) {
 325                 ifa->ifa_flags &= ~IFA_F_SECONDARY;
 326                 printf("secondary ");
 327         }
 328         if (ifa->ifa_flags & IFA_F_TENTATIVE) {
 329                 ifa->ifa_flags &= ~IFA_F_TENTATIVE;
 330                 printf("tentative ");
 331         }
 332         if (ifa->ifa_flags & IFA_F_DEPRECATED) {
 333                 ifa->ifa_flags &= ~IFA_F_DEPRECATED;
 334                 printf("deprecated ");
 335         }
 336         if (!(ifa->ifa_flags & IFA_F_PERMANENT)) {
 337                 printf("dynamic ");
 338         } else
 339                 ifa->ifa_flags &= ~IFA_F_PERMANENT;
 340         if (ifa->ifa_flags)
 341                 printf("flags %02x ", ifa->ifa_flags);
 342         if (rta_tb[IFA_LABEL])
 343                 fputs((char*)RTA_DATA(rta_tb[IFA_LABEL]), stdout);
 344         if (rta_tb[IFA_CACHEINFO]) {
 345                 struct ifa_cacheinfo *ci = RTA_DATA(rta_tb[IFA_CACHEINFO]);
 346                 char buf[128];
 347                 bb_putchar(_SL_);
 348                 if (ci->ifa_valid == 0xFFFFFFFFU)
 349                         sprintf(buf, "valid_lft forever");
 350                 else
 351                         sprintf(buf, "valid_lft %dsec", ci->ifa_valid);
 352                 if (ci->ifa_prefered == 0xFFFFFFFFU)
 353                         sprintf(buf+strlen(buf), " preferred_lft forever");
 354                 else
 355                         sprintf(buf+strlen(buf), " preferred_lft %dsec", ci->ifa_prefered);
 356                 printf("       %s", buf);
 357         }
 358         bb_putchar('\n');
 359         /*fflush_all();*/
 360         return 0;
 361 }
 362
 363
 364 struct nlmsg_list {
 365         struct nlmsg_list *next;
 366         struct nlmsghdr   h;
 367 };
 368
 369 static int print_selected_addrinfo(int ifindex, struct nlmsg_list *ainfo)
 370 {
 371         for (; ainfo; ainfo = ainfo->next) {
 372                 struct nlmsghdr *n = &ainfo->h;
 373                 struct ifaddrmsg *ifa = NLMSG_DATA(n);
 374
 375                 if (n->nlmsg_type != RTM_NEWADDR)
 376                         continue;
 377                 if (n->nlmsg_len < NLMSG_LENGTH(sizeof(ifa)))
 378                         return -1;
 379                 if (ifa->ifa_index != ifindex
 380                  || (G_filter.family && G_filter.family != ifa->ifa_family)
 381                 ) {
 382                         continue;
 383                 }
 384                 print_addrinfo(NULL, n, NULL);
 385         }
 386         return 0;
 387 }
 388
 389
 390 static int FAST_FUNC store_nlmsg(const struct sockaddr_nl *who, struct nlmsghdr *n, void *arg)
 391 {
 392         struct nlmsg_list **linfo = (struct nlmsg_list**)arg;
 393         struct nlmsg_list *h;
 394         struct nlmsg_list **lp;
 395
 396         h = xzalloc(n->nlmsg_len + sizeof(void*));
 397
 398         memcpy(&h->h, n, n->nlmsg_len);
 399         /*h->next = NULL; - xzalloc did it */
 400
 401         for (lp = linfo; *lp; lp = &(*lp)->next)
 402                 continue;
 403         *lp = h;
 404
 405         ll_remember_index(who, n, NULL);
 406         return 0;
 407 }
 408
 409 static void ipaddr_reset_filter(int _oneline)
 410 {
 411         memset(&G_filter, 0, sizeof(G_filter));
 412         G_filter.oneline = _oneline;
 413 }
 414
 415 /* Return value becomes exitcode. It's okay to not return at all */
 416 int FAST_FUNC ipaddr_list_or_flush(char **argv, int flush)
 417 {
 418         static const char option[] ALIGN1 = "to\0""scope\0""up\0""label\0""dev\0";
 419
 420         struct nlmsg_list *linfo = NULL;
 421         struct nlmsg_list *ainfo = NULL;
 422         struct nlmsg_list *l;
 423         struct rtnl_handle rth;
 424         char *filter_dev = NULL;
 425         int no_link = 0;
 426
 427         ipaddr_reset_filter(oneline);
 428         G_filter.showqueue = 1;
 429
 430         if (G_filter.family == AF_UNSPEC)
 431                 G_filter.family = preferred_family;
 432
 433         if (flush) {
 434                 if (!*argv) {
 435                         bb_error_msg_and_die(bb_msg_requires_arg, "flush");
 436                 }
 437                 if (G_filter.family == AF_PACKET) {
 438                         bb_error_msg_and_die("can't flush link addresses");
 439                 }
 440         }
 441
 442         while (*argv) {
 443                 const smalluint key = index_in_strings(option, *argv);
 444                 if (key == 0) { /* to */
 445                         NEXT_ARG();
 446                         get_prefix(&G_filter.pfx, *argv, G_filter.family);
 447                         if (G_filter.family == AF_UNSPEC) {
 448                                 G_filter.family = G_filter.pfx.family;
 449                         }
 450                 } else if (key == 1) { /* scope */
 451                         uint32_t scope = 0;
 452                         NEXT_ARG();
 453                         G_filter.scopemask = -1;
 454                         if (rtnl_rtscope_a2n(&scope, *argv)) {
 455                                 if (strcmp(*argv, "all") != 0) {
 456                                         invarg(*argv, "scope");
 457                                 }
 458                                 scope = RT_SCOPE_NOWHERE;
 459                                 G_filter.scopemask = 0;
 460                         }
 461                         G_filter.scope = scope;
 462                 } else if (key == 2) { /* up */
 463                         G_filter.up = 1;
 464                 } else if (key == 3) { /* label */
 465                         NEXT_ARG();
 466                         G_filter.label = *argv;
 467                 } else {
 468                         if (key == 4) /* dev */
 469                                 NEXT_ARG();
 470                         if (filter_dev)
 471                                 duparg2("dev", *argv);
 472                         filter_dev = *argv;
 473                 }
 474                 argv++;
 475         }
 476
 477         xrtnl_open(&rth);
 478
 479         xrtnl_wilddump_request(&rth, preferred_family, RTM_GETLINK);
 480         xrtnl_dump_filter(&rth, store_nlmsg, &linfo);
 481
 482         if (filter_dev) {
 483                 G_filter.ifindex = xll_name_to_index(filter_dev);
 484         }
 485
 486         if (flush) {
 487                 char flushb[4096-512];
 488
 489                 G_filter.flushb = flushb;
 490                 G_filter.flushp = 0;
 491                 G_filter.flushe = sizeof(flushb);
 492                 G_filter.rth = &rth;
 493
 494                 for (;;) {
 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) {
 499                                 return 0;
 500                         }
 501                         if (flush_update() < 0) {
 502                                 return 1;
 503                         }
 504                 }
 505         }
 506
 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);
 510         }
 511
 512
 513         if (G_filter.family && G_filter.family != AF_PACKET) {
 514                 struct nlmsg_list **lp;
 515                 lp = &linfo;
 516
 517                 if (G_filter.oneline)
 518                         no_link = 1;
 519
 520                 while ((l = *lp) != NULL) {
 521                         int ok = 0;
 522                         struct ifinfomsg *ifi = NLMSG_DATA(&l->h);
 523                         struct nlmsg_list *a;
 524
 525                         for (a = ainfo; a; a = a->next) {
 526                                 struct nlmsghdr *n = &a->h;
 527                                 struct ifaddrmsg *ifa = NLMSG_DATA(n);
 528
 529                                 if (ifa->ifa_index != ifi->ifi_index
 530                                  || (G_filter.family && G_filter.family != ifa->ifa_family)
 531                                 ) {
 532                                         continue;
 533                                 }
 534                                 if ((G_filter.scope ^ ifa->ifa_scope) & G_filter.scopemask)
 535                                         continue;
 536                                 if ((G_filter.flags ^ ifa->ifa_flags) & G_filter.flagmask)
 537                                         continue;
 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));
 542                                         if (!tb[IFA_LOCAL])
 543                                                 tb[IFA_LOCAL] = tb[IFA_ADDRESS];
 544
 545                                         if (G_filter.pfx.family && tb[IFA_LOCAL]) {
 546                                                 inet_prefix dst;
 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))
 551                                                         continue;
 552                                         }
 553                                         if (G_filter.label) {
 554                                                 SPRINT_BUF(b1);
 555                                                 const char *label;
 556                                                 if (tb[IFA_LABEL])
 557                                                         label = RTA_DATA(tb[IFA_LABEL]);
 558                                                 else
 559                                                         label = ll_idx_n2a(ifa->ifa_index, b1);
 560                                                 if (fnmatch(G_filter.label, label, 0) != 0)
 561                                                         continue;
 562                                         }
 563                                 }
 564
 565                                 ok = 1;
 566                                 break;
 567                         }
 568                         if (!ok)
 569                                 *lp = l->next;
 570                         else
 571                                 lp = &l->next;
 572                 }
 573         }
 574
 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);
 580                 }
 581         }
 582
 583         return 0;
 584 }
 585
 586 static int default_scope(inet_prefix *lcl)
 587 {
 588         if (lcl->family == AF_INET) {
 589                 if (lcl->bytelen >= 1 && *(uint8_t*)&lcl->data == 127)
 590                         return RT_SCOPE_HOST;
 591         }
 592         return 0;
 593 }
 594
 595 /* Return value becomes exitcode. It's okay to not return at all */
 596 static int ipaddr_modify(int cmd, char **argv)
 597 {
 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;
 602         struct {
 603                 struct nlmsghdr  n;
 604                 struct ifaddrmsg ifa;
 605                 char             buf[256];
 606         } req;
 607         char *d = NULL;
 608         char *l = NULL;
 609         inet_prefix lcl;
 610         inet_prefix peer;
 611         int local_len = 0;
 612         int peer_len = 0;
 613         int brd_len = 0;
 614         int any_len = 0;
 615         bool scoped = 0;
 616
 617         memset(&req, 0, sizeof(req));
 618
 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;
 623
 624         while (*argv) {
 625                 const smalluint arg = index_in_strings(option, *argv);
 626                 if (arg <= 1) { /* peer, remote */
 627                         NEXT_ARG();
 628
 629                         if (peer_len) {
 630                                 duparg("peer", *argv);
 631                         }
 632                         get_prefix(&peer, *argv, req.ifa.ifa_family);
 633                         peer_len = peer.bytelen;
 634                         if (req.ifa.ifa_family == AF_UNSPEC) {
 635                                 req.ifa.ifa_family = peer.family;
 636                         }
 637                         addattr_l(&req.n, sizeof(req), IFA_ADDRESS, &peer.data, peer.bytelen);
 638                         req.ifa.ifa_prefixlen = peer.bitlen;
 639                 } else if (arg <= 3) { /* broadcast, brd */
 640                         inet_prefix addr;
 641                         NEXT_ARG();
 642                         if (brd_len) {
 643                                 duparg("broadcast", *argv);
 644                         }
 645                         if (LONE_CHAR(*argv, '+')) {
 646                                 brd_len = -1;
 647                         } else if (LONE_DASH(*argv)) {
 648                                 brd_len = -2;
 649                         } else {
 650                                 get_addr(&addr, *argv, req.ifa.ifa_family);
 651                                 if (req.ifa.ifa_family == AF_UNSPEC)
 652                                         req.ifa.ifa_family = addr.family;
 653                                 addattr_l(&req.n, sizeof(req), IFA_BROADCAST, &addr.data, addr.bytelen);
 654                                 brd_len = addr.bytelen;
 655                         }
 656                 } else if (arg == 4) { /* anycast */
 657                         inet_prefix addr;
 658                         NEXT_ARG();
 659                         if (any_len) {
 660                                 duparg("anycast", *argv);
 661                         }
 662                         get_addr(&addr, *argv, req.ifa.ifa_family);
 663                         if (req.ifa.ifa_family == AF_UNSPEC) {
 664                                 req.ifa.ifa_family = addr.family;
 665                         }
 666                         addattr_l(&req.n, sizeof(req), IFA_ANYCAST, &addr.data, addr.bytelen);
 667                         any_len = addr.bytelen;
 668                 } else if (arg == 5) { /* scope */
 669                         uint32_t scope = 0;
 670                         NEXT_ARG();
 671                         if (rtnl_rtscope_a2n(&scope, *argv)) {
 672                                 invarg(*argv, "scope");
 673                         }
 674                         req.ifa.ifa_scope = scope;
 675                         scoped = 1;
 676                 } else if (arg == 6) { /* dev */
 677                         NEXT_ARG();
 678                         d = *argv;
 679                 } else if (arg == 7) { /* label */
 680                         NEXT_ARG();
 681                         l = *argv;
 682                         addattr_l(&req.n, sizeof(req), IFA_LABEL, l, strlen(l) + 1);
 683                 } else {
 684                         if (arg == 8) /* local */
 685                                 NEXT_ARG();
 686                         if (local_len) {
 687                                 duparg2("local", *argv);
 688                         }
 689                         get_prefix(&lcl, *argv, req.ifa.ifa_family);
 690                         if (req.ifa.ifa_family == AF_UNSPEC) {
 691                                 req.ifa.ifa_family = lcl.family;
 692                         }
 693                         addattr_l(&req.n, sizeof(req), IFA_LOCAL, &lcl.data, lcl.bytelen);
 694                         local_len = lcl.bytelen;
 695                 }
 696                 argv++;
 697         }
 698
 699         if (!d) {
 700                 /* There was no "dev IFACE", but we need that */
 701                 bb_error_msg_and_die("need \"dev IFACE\"");
 702         }
 703         if (l && strncmp(d, l, strlen(d)) != 0) {
 704                 bb_error_msg_and_die("\"dev\" (%s) must match \"label\" (%s)", d, l);
 705         }
 706
 707         if (peer_len == 0 && local_len && cmd != RTM_DELADDR) {
 708                 peer = lcl;
 709                 addattr_l(&req.n, sizeof(req), IFA_ADDRESS, &lcl.data, lcl.bytelen);
 710         }
 711         if (req.ifa.ifa_prefixlen == 0)
 712                 req.ifa.ifa_prefixlen = lcl.bitlen;
 713
 714         if (brd_len < 0 && cmd != RTM_DELADDR) {
 715                 inet_prefix brd;
 716                 int i;
 717                 if (req.ifa.ifa_family != AF_INET) {
 718                         bb_error_msg_and_die("broadcast can be set only for IPv4 addresses");
 719                 }
 720                 brd = peer;
 721                 if (brd.bitlen <= 30) {
 722                         for (i=31; i>=brd.bitlen; i--) {
 723                                 if (brd_len == -1)
 724                                         brd.data[0] |= htonl(1<<(31-i));
 725                                 else
 726                                         brd.data[0] &= ~htonl(1<<(31-i));
 727                         }
 728                         addattr_l(&req.n, sizeof(req), IFA_BROADCAST, &brd.data, brd.bytelen);
 729                         brd_len = brd.bytelen;
 730                 }
 731         }
 732         if (!scoped && cmd != RTM_DELADDR)
 733                 req.ifa.ifa_scope = default_scope(&lcl);
 734
 735         xrtnl_open(&rth);
 736
 737         ll_init_map(&rth);
 738
 739         req.ifa.ifa_index = xll_name_to_index(d);
 740
 741         if (rtnl_talk(&rth, &req.n, 0, 0, NULL, NULL, NULL) < 0)
 742                 return 2;
 743
 744         return 0;
 745 }
 746
 747 /* Return value becomes exitcode. It's okay to not return at all */
 748 int FAST_FUNC do_ipaddr(char **argv)
 749 {
 750         static const char commands[] ALIGN1 =
 751                 "add\0""delete\0""list\0""show\0""lst\0""flush\0";
 752         smalluint cmd = 2;
 753         if (*argv) {
 754                 cmd = index_in_substrings(commands, *argv);
 755                 if (cmd > 5)
 756                         bb_error_msg_and_die(bb_msg_invalid_arg, *argv, applet_name);
 757                 argv++;
 758                 if (cmd <= 1)
 759                         return ipaddr_modify((cmd == 0) ? RTM_NEWADDR : RTM_DELADDR, argv);
 760         }
 761         /* 2 == list, 3 == show, 4 == lst */
 762         return ipaddr_list_or_flush(argv, cmd == 5);
 763 }