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