src/network/networkctl.c

   1 /***
   2   This file is part of systemd.
   3
   4   Copyright 2014 Lennart Poettering
   5
   6   systemd is free software; you can redistribute it and/or modify it
   7   under the terms of the GNU Lesser General Public License as published by
   8   the Free Software Foundation; either version 2.1 of the License, or
   9   (at your option) any later version.
  10
  11   systemd is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   Lesser General Public License for more details.
  15
  16   You should have received a copy of the GNU Lesser General Public License
  17   along with systemd; If not, see <http://www.gnu.org/licenses/>.
  18 ***/
  19
  20 #include <getopt.h>
  21 #include <linux/if_addrlabel.h>
  22 #include <net/if.h>
  23 #include <stdbool.h>
  24
  25 #include "sd-device.h"
  26 #include "sd-hwdb.h"
  27 #include "sd-lldp.h"
  28 #include "sd-netlink.h"
  29 #include "sd-network.h"
  30
  31 #include "alloc-util.h"
  32 #include "arphrd-list.h"
  33 #include "device-util.h"
  34 #include "ether-addr-util.h"
  35 #include "fd-util.h"
  36 #include "hwdb-util.h"
  37 #include "local-addresses.h"
  38 #include "locale-util.h"
  39 #include "macro.h"
  40 #include "netlink-util.h"
  41 #include "pager.h"
  42 #include "parse-util.h"
  43 #include "socket-util.h"
  44 #include "sparse-endian.h"
  45 #include "stdio-util.h"
  46 #include "string-table.h"
  47 #include "string-util.h"
  48 #include "strv.h"
  49 #include "strxcpyx.h"
  50 #include "terminal-util.h"
  51 #include "util.h"
  52 #include "verbs.h"
  53
  54 static bool arg_no_pager = false;
  55 static bool arg_legend = true;
  56 static bool arg_all = false;
  57
  58 static int link_get_type_string(unsigned short iftype, sd_device *d, char **ret) {
  59         const char *t;
  60         char *p;
  61
  62         assert(ret);
  63
  64         if (iftype == ARPHRD_ETHER && d) {
  65                 const char *devtype = NULL, *id = NULL;
  66                 /* WLANs have iftype ARPHRD_ETHER, but we want
  67                  * to show a more useful type string for
  68                  * them */
  69
  70                 (void) sd_device_get_devtype(d, &devtype);
  71
  72                 if (streq_ptr(devtype, "wlan"))
  73                         id = "wlan";
  74                 else if (streq_ptr(devtype, "wwan"))
  75                         id = "wwan";
  76
  77                 if (id) {
  78                         p = strdup(id);
  79                         if (!p)
  80                                 return -ENOMEM;
  81
  82                         *ret = p;
  83                         return 1;
  84                 }
  85         }
  86
  87         t = arphrd_to_name(iftype);
  88         if (!t) {
  89                 *ret = NULL;
  90                 return 0;
  91         }
  92
  93         p = strdup(t);
  94         if (!p)
  95                 return -ENOMEM;
  96
  97         ascii_strlower(p);
  98         *ret = p;
  99
 100         return 0;
 101 }
 102
 103 static void operational_state_to_color(const char *state, const char **on, const char **off) {
 104         assert(on);
 105         assert(off);
 106
 107         if (streq_ptr(state, "routable")) {
 108                 *on = ansi_highlight_green();
 109                 *off = ansi_normal();
 110         } else if (streq_ptr(state, "degraded")) {
 111                 *on = ansi_highlight_yellow();
 112                 *off = ansi_normal();
 113         } else
 114                 *on = *off = "";
 115 }
 116
 117 static void setup_state_to_color(const char *state, const char **on, const char **off) {
 118         assert(on);
 119         assert(off);
 120
 121         if (streq_ptr(state, "configured")) {
 122                 *on = ansi_highlight_green();
 123                 *off = ansi_normal();
 124         } else if (streq_ptr(state, "configuring")) {
 125                 *on = ansi_highlight_yellow();
 126                 *off = ansi_normal();
 127         } else if (STRPTR_IN_SET(state, "failed", "linger")) {
 128                 *on = ansi_highlight_red();
 129                 *off = ansi_normal();
 130         } else
 131                 *on = *off = "";
 132 }
 133
 134 typedef struct LinkInfo {
 135         char name[IFNAMSIZ+1];
 136         int ifindex;
 137         unsigned short iftype;
 138         struct ether_addr mac_address;
 139         uint32_t mtu;
 140
 141         bool has_mac_address:1;
 142         bool has_mtu:1;
 143 } LinkInfo;
 144
 145 static int link_info_compare(const void *a, const void *b) {
 146         const LinkInfo *x = a, *y = b;
 147
 148         return x->ifindex - y->ifindex;
 149 }
 150
 151 static int decode_link(sd_netlink_message *m, LinkInfo *info) {
 152         const char *name;
 153         uint16_t type;
 154         int r;
 155
 156         assert(m);
 157         assert(info);
 158
 159         r = sd_netlink_message_get_type(m, &type);
 160         if (r < 0)
 161                 return r;
 162
 163         if (type != RTM_NEWLINK)
 164                 return 0;
 165
 166         r = sd_rtnl_message_link_get_ifindex(m, &info->ifindex);
 167         if (r < 0)
 168                 return r;
 169
 170         r = sd_netlink_message_read_string(m, IFLA_IFNAME, &name);
 171         if (r < 0)
 172                 return r;
 173
 174         r = sd_rtnl_message_link_get_type(m, &info->iftype);
 175         if (r < 0)
 176                 return r;
 177
 178         strscpy(info->name, sizeof info->name, name);
 179
 180         info->has_mac_address =
 181                 sd_netlink_message_read_ether_addr(m, IFLA_ADDRESS, &info->mac_address) >= 0 &&
 182                 memcmp(&info->mac_address, &ETHER_ADDR_NULL, sizeof(struct ether_addr)) != 0;
 183
 184         info->has_mtu =
 185                 sd_netlink_message_read_u32(m, IFLA_MTU, &info->mtu) &&
 186                 info->mtu > 0;
 187
 188         return 1;
 189 }
 190
 191 static int acquire_link_info_strv(sd_netlink *rtnl, char **l, LinkInfo **ret) {
 192         _cleanup_free_ LinkInfo *links = NULL;
 193         char **i;
 194         size_t c = 0;
 195         int r;
 196
 197         assert(rtnl);
 198         assert(ret);
 199
 200         links = new(LinkInfo, strv_length(l));
 201         if (!links)
 202                 return log_oom();
 203
 204         STRV_FOREACH(i, l) {
 205                 _cleanup_(sd_netlink_message_unrefp) sd_netlink_message *req = NULL, *reply = NULL;
 206                 int ifindex;
 207
 208                 if (parse_ifindex(*i, &ifindex) >= 0)
 209                         r = sd_rtnl_message_new_link(rtnl, &req, RTM_GETLINK, ifindex);
 210                 else {
 211                         r = sd_rtnl_message_new_link(rtnl, &req, RTM_GETLINK, 0);
 212                         if (r < 0)
 213                                 return rtnl_log_create_error(r);
 214
 215                         r = sd_netlink_message_append_string(req, IFLA_IFNAME, *i);
 216                 }
 217                 if (r < 0)
 218                         return rtnl_log_create_error(r);
 219
 220                 r = sd_netlink_call(rtnl, req, 0, &reply);
 221                 if (r < 0)
 222                         return log_error_errno(r, "Failed to request link: %m");
 223
 224                 r = decode_link(reply, links + c);
 225                 if (r < 0)
 226                         return r;
 227                 if (r > 0)
 228                         c++;
 229         }
 230
 231         qsort_safe(links, c, sizeof(LinkInfo), link_info_compare);
 232
 233         *ret = links;
 234         links = NULL;
 235
 236         return (int) c;
 237 }
 238
 239 static int acquire_link_info_all(sd_netlink *rtnl, LinkInfo **ret) {
 240         _cleanup_(sd_netlink_message_unrefp) sd_netlink_message *req = NULL, *reply = NULL;
 241         _cleanup_free_ LinkInfo *links = NULL;
 242         size_t allocated = 0, c = 0;
 243         sd_netlink_message *i;
 244         int r;
 245
 246         assert(rtnl);
 247         assert(ret);
 248
 249         r = sd_rtnl_message_new_link(rtnl, &req, RTM_GETLINK, 0);
 250         if (r < 0)
 251                 return rtnl_log_create_error(r);
 252
 253         r = sd_netlink_message_request_dump(req, true);
 254         if (r < 0)
 255                 return rtnl_log_create_error(r);
 256
 257         r = sd_netlink_call(rtnl, req, 0, &reply);
 258         if (r < 0)
 259                 return log_error_errno(r, "Failed to enumerate links: %m");
 260
 261         for (i = reply; i; i = sd_netlink_message_next(i)) {
 262                 if (!GREEDY_REALLOC(links, allocated, c+1))
 263                         return -ENOMEM;
 264
 265                 r = decode_link(i, links + c);
 266                 if (r < 0)
 267                         return r;
 268                 if (r > 0)
 269                         c++;
 270         }
 271
 272         qsort_safe(links, c, sizeof(LinkInfo), link_info_compare);
 273
 274         *ret = links;
 275         links = NULL;
 276
 277         return (int) c;
 278 }
 279
 280 static int list_links(int argc, char *argv[], void *userdata) {
 281         _cleanup_(sd_netlink_unrefp) sd_netlink *rtnl = NULL;
 282         _cleanup_free_ LinkInfo *links = NULL;
 283         int c, i, r;
 284
 285         r = sd_netlink_open(&rtnl);
 286         if (r < 0)
 287                 return log_error_errno(r, "Failed to connect to netlink: %m");
 288
 289         if (argc > 1)
 290                 c = acquire_link_info_strv(rtnl, argv + 1, &links);
 291         else
 292                 c = acquire_link_info_all(rtnl, &links);
 293         if (c < 0)
 294                 return c;
 295
 296         pager_open(arg_no_pager, false);
 297
 298         if (arg_legend)
 299                 printf("%3s %-16s %-18s %-11s %-10s\n",
 300                        "IDX",
 301                        "LINK",
 302                        "TYPE",
 303                        "OPERATIONAL",
 304                        "SETUP");
 305
 306         for (i = 0; i < c; i++) {
 307                 _cleanup_free_ char *setup_state = NULL, *operational_state = NULL;
 308                 _cleanup_(sd_device_unrefp) sd_device *d = NULL;
 309                 const char *on_color_operational, *off_color_operational,
 310                            *on_color_setup, *off_color_setup;
 311                 char devid[2 + DECIMAL_STR_MAX(int)];
 312                 _cleanup_free_ char *t = NULL;
 313
 314                 (void) sd_network_link_get_operational_state(links[i].ifindex, &operational_state);
 315                 operational_state_to_color(operational_state, &on_color_operational, &off_color_operational);
 316
 317                 r = sd_network_link_get_setup_state(links[i].ifindex, &setup_state);
 318                 if (r == -ENODATA) /* If there's no info available about this iface, it's unmanaged by networkd */
 319                         setup_state = strdup("unmanaged");
 320                 setup_state_to_color(setup_state, &on_color_setup, &off_color_setup);
 321
 322                 xsprintf(devid, "n%i", links[i].ifindex);
 323                 (void) sd_device_new_from_device_id(&d, devid);
 324
 325                 (void) link_get_type_string(links[i].iftype, d, &t);
 326
 327                 printf("%3i %-16s %-18s %s%-11s%s %s%-10s%s\n",
 328                        links[i].ifindex, links[i].name, strna(t),
 329                        on_color_operational, strna(operational_state), off_color_operational,
 330                        on_color_setup, strna(setup_state), off_color_setup);
 331         }
 332
 333         if (arg_legend)
 334                 printf("\n%i links listed.\n", c);
 335
 336         return 0;
 337 }
 338
 339 /* IEEE Organizationally Unique Identifier vendor string */
 340 static int ieee_oui(sd_hwdb *hwdb, const struct ether_addr *mac, char **ret) {
 341         const char *description;
 342         char modalias[strlen("OUI:XXYYXXYYXXYY") + 1], *desc;
 343         int r;
 344
 345         assert(ret);
 346
 347         if (!hwdb)
 348                 return -EINVAL;
 349
 350         if (!mac)
 351                 return -EINVAL;
 352
 353         /* skip commonly misused 00:00:00 (Xerox) prefix */
 354         if (memcmp(mac, "\0\0\0", 3) == 0)
 355                 return -EINVAL;
 356
 357         xsprintf(modalias, "OUI:" ETHER_ADDR_FORMAT_STR,
 358                  ETHER_ADDR_FORMAT_VAL(*mac));
 359
 360         r = sd_hwdb_get(hwdb, modalias, "ID_OUI_FROM_DATABASE", &description);
 361         if (r < 0)
 362                 return r;
 363
 364         desc = strdup(description);
 365         if (!desc)
 366                 return -ENOMEM;
 367
 368         *ret = desc;
 369
 370         return 0;
 371 }
 372
 373 static int get_gateway_description(
 374                 sd_netlink *rtnl,
 375                 sd_hwdb *hwdb,
 376                 int ifindex,
 377                 int family,
 378                 union in_addr_union *gateway,
 379                 char **gateway_description) {
 380         _cleanup_(sd_netlink_message_unrefp) sd_netlink_message *req = NULL, *reply = NULL;
 381         sd_netlink_message *m;
 382         int r;
 383
 384         assert(rtnl);
 385         assert(ifindex >= 0);
 386         assert(IN_SET(family, AF_INET, AF_INET6));
 387         assert(gateway);
 388         assert(gateway_description);
 389
 390         r = sd_rtnl_message_new_neigh(rtnl, &req, RTM_GETNEIGH, ifindex, family);
 391         if (r < 0)
 392                 return r;
 393
 394         r = sd_netlink_message_request_dump(req, true);
 395         if (r < 0)
 396                 return r;
 397
 398         r = sd_netlink_call(rtnl, req, 0, &reply);
 399         if (r < 0)
 400                 return r;
 401
 402         for (m = reply; m; m = sd_netlink_message_next(m)) {
 403                 union in_addr_union gw = {};
 404                 struct ether_addr mac = {};
 405                 uint16_t type;
 406                 int ifi, fam;
 407
 408                 r = sd_netlink_message_get_errno(m);
 409                 if (r < 0) {
 410                         log_error_errno(r, "got error: %m");
 411                         continue;
 412                 }
 413
 414                 r = sd_netlink_message_get_type(m, &type);
 415                 if (r < 0) {
 416                         log_error_errno(r, "could not get type: %m");
 417                         continue;
 418                 }
 419
 420                 if (type != RTM_NEWNEIGH) {
 421                         log_error("type is not RTM_NEWNEIGH");
 422                         continue;
 423                 }
 424
 425                 r = sd_rtnl_message_neigh_get_family(m, &fam);
 426                 if (r < 0) {
 427                         log_error_errno(r, "could not get family: %m");
 428                         continue;
 429                 }
 430
 431                 if (fam != family) {
 432                         log_error("family is not correct");
 433                         continue;
 434                 }
 435
 436                 r = sd_rtnl_message_neigh_get_ifindex(m, &ifi);
 437                 if (r < 0) {
 438                         log_error_errno(r, "could not get ifindex: %m");
 439                         continue;
 440                 }
 441
 442                 if (ifindex > 0 && ifi != ifindex)
 443                         continue;
 444
 445                 switch (fam) {
 446                 case AF_INET:
 447                         r = sd_netlink_message_read_in_addr(m, NDA_DST, &gw.in);
 448                         if (r < 0)
 449                                 continue;
 450
 451                         break;
 452                 case AF_INET6:
 453                         r = sd_netlink_message_read_in6_addr(m, NDA_DST, &gw.in6);
 454                         if (r < 0)
 455                                 continue;
 456
 457                         break;
 458                 default:
 459                         continue;
 460                 }
 461
 462                 if (!in_addr_equal(fam, &gw, gateway))
 463                         continue;
 464
 465                 r = sd_netlink_message_read_ether_addr(m, NDA_LLADDR, &mac);
 466                 if (r < 0)
 467                         continue;
 468
 469                 r = ieee_oui(hwdb, &mac, gateway_description);
 470                 if (r < 0)
 471                         continue;
 472
 473                 return 0;
 474         }
 475
 476         return -ENODATA;
 477 }
 478
 479 static int dump_gateways(
 480                 sd_netlink *rtnl,
 481                 sd_hwdb *hwdb,
 482                 const char *prefix,
 483                 int ifindex) {
 484         _cleanup_free_ struct local_address *local = NULL;
 485         int r, n, i;
 486
 487         assert(rtnl);
 488         assert(prefix);
 489
 490         n = local_gateways(rtnl, ifindex, AF_UNSPEC, &local);
 491         if (n < 0)
 492                 return n;
 493
 494         for (i = 0; i < n; i++) {
 495                 _cleanup_free_ char *gateway = NULL, *description = NULL;
 496
 497                 r = in_addr_to_string(local[i].family, &local[i].address, &gateway);
 498                 if (r < 0)
 499                         return r;
 500
 501                 r = get_gateway_description(rtnl, hwdb, local[i].ifindex, local[i].family, &local[i].address, &description);
 502                 if (r < 0)
 503                         log_debug_errno(r, "Could not get description of gateway: %m");
 504
 505                 printf("%*s%s",
 506                        (int) strlen(prefix),
 507                        i == 0 ? prefix : "",
 508                        gateway);
 509
 510                 if (description)
 511                         printf(" (%s)", description);
 512
 513                 /* Show interface name for the entry if we show
 514                  * entries for all interfaces */
 515                 if (ifindex <= 0) {
 516                         char name[IF_NAMESIZE+1];
 517
 518                         if (if_indextoname(local[i].ifindex, name)) {
 519                                 fputs(" on ", stdout);
 520                                 fputs(name, stdout);
 521                         } else
 522                                 printf(" on %%%i", local[i].ifindex);
 523                 }
 524
 525                 fputc('\n', stdout);
 526         }
 527
 528         return 0;
 529 }
 530
 531 static int dump_addresses(
 532                 sd_netlink *rtnl,
 533                 const char *prefix,
 534                 int ifindex) {
 535
 536         _cleanup_free_ struct local_address *local = NULL;
 537         int r, n, i;
 538
 539         assert(rtnl);
 540         assert(prefix);
 541
 542         n = local_addresses(rtnl, ifindex, AF_UNSPEC, &local);
 543         if (n < 0)
 544                 return n;
 545
 546         for (i = 0; i < n; i++) {
 547                 _cleanup_free_ char *pretty = NULL;
 548
 549                 r = in_addr_to_string(local[i].family, &local[i].address, &pretty);
 550                 if (r < 0)
 551                         return r;
 552
 553                 printf("%*s%s",
 554                        (int) strlen(prefix),
 555                        i == 0 ? prefix : "",
 556                        pretty);
 557
 558                 if (ifindex <= 0) {
 559                         char name[IF_NAMESIZE+1];
 560
 561                         if (if_indextoname(local[i].ifindex, name)) {
 562                                 fputs(" on ", stdout);
 563                                 fputs(name, stdout);
 564                         } else
 565                                 printf(" on %%%i", local[i].ifindex);
 566                 }
 567
 568                 fputc('\n', stdout);
 569         }
 570
 571         return 0;
 572 }
 573
 574 static int dump_address_labels(sd_netlink *rtnl) {
 575         _cleanup_(sd_netlink_message_unrefp) sd_netlink_message *req = NULL, *reply = NULL;
 576         sd_netlink_message *m;
 577         int r;
 578
 579         assert(rtnl);
 580
 581         r = sd_rtnl_message_new_addrlabel(rtnl, &req, RTM_GETADDRLABEL, 0, AF_INET6);
 582         if (r < 0)
 583                 return log_error_errno(r, "Could not allocate RTM_GETADDRLABEL message: %m");
 584
 585         r = sd_netlink_message_request_dump(req, true);
 586         if (r < 0)
 587                 return r;
 588
 589         r = sd_netlink_call(rtnl, req, 0, &reply);
 590         if (r < 0)
 591                 return r;
 592
 593         printf("%10s/%s %30s\n", "Prefix", "Prefixlen", "Label");
 594
 595         for (m = reply; m; m = sd_netlink_message_next(m)) {
 596                 _cleanup_free_ char *pretty = NULL;
 597                 union in_addr_union prefix = {};
 598                 uint8_t prefixlen;
 599                 uint32_t label;
 600
 601                 r = sd_netlink_message_get_errno(m);
 602                 if (r < 0) {
 603                         log_error_errno(r, "got error: %m");
 604                         continue;
 605                 }
 606
 607                 r = sd_netlink_message_read_u32(m, IFAL_LABEL, &label);
 608                 if (r < 0 && r != -ENODATA) {
 609                         log_error_errno(r, "Could not read IFAL_LABEL, ignoring: %m");
 610                         continue;
 611                 }
 612
 613                 r = sd_netlink_message_read_in6_addr(m, IFAL_ADDRESS, &prefix.in6);
 614                 if (r < 0)
 615                         continue;
 616
 617                 r = in_addr_to_string(AF_INET6, &prefix, &pretty);
 618                 if (r < 0)
 619                         continue;
 620
 621                 r = sd_rtnl_message_addrlabel_get_prefixlen(m, &prefixlen);
 622                 if (r < 0)
 623                         continue;
 624
 625                 printf("%10s/%-5u %30u\n", pretty, prefixlen, label);
 626         }
 627
 628         return 0;
 629 }
 630
 631 static int list_address_labels(int argc, char *argv[], void *userdata) {
 632         _cleanup_(sd_netlink_unrefp) sd_netlink *rtnl = NULL;
 633         int r;
 634
 635         r = sd_netlink_open(&rtnl);
 636         if (r < 0)
 637                 return log_error_errno(r, "Failed to connect to netlink: %m");
 638
 639         dump_address_labels(rtnl);
 640
 641         return 0;
 642 }
 643
 644 static int open_lldp_neighbors(int ifindex, FILE **ret) {
 645         _cleanup_free_ char *p = NULL;
 646         FILE *f;
 647
 648         if (asprintf(&p, "/run/systemd/netif/lldp/%i", ifindex) < 0)
 649                 return -ENOMEM;
 650
 651         f = fopen(p, "re");
 652         if (!f)
 653                 return -errno;
 654
 655         *ret = f;
 656         return 0;
 657 }
 658
 659 static int next_lldp_neighbor(FILE *f, sd_lldp_neighbor **ret) {
 660         _cleanup_free_ void *raw = NULL;
 661         size_t l;
 662         le64_t u;
 663         int r;
 664
 665         assert(f);
 666         assert(ret);
 667
 668         l = fread(&u, 1, sizeof(u), f);
 669         if (l == 0 && feof(f))
 670                 return 0;
 671         if (l != sizeof(u))
 672                 return -EBADMSG;
 673
 674         raw = new(uint8_t, le64toh(u));
 675         if (!raw)
 676                 return -ENOMEM;
 677
 678         if (fread(raw, 1, le64toh(u), f) != le64toh(u))
 679                 return -EBADMSG;
 680
 681         r = sd_lldp_neighbor_from_raw(ret, raw, le64toh(u));
 682         if (r < 0)
 683                 return r;
 684
 685         return 1;
 686 }
 687
 688 static int dump_lldp_neighbors(const char *prefix, int ifindex) {
 689         _cleanup_fclose_ FILE *f = NULL;
 690         int r, c = 0;
 691
 692         assert(prefix);
 693         assert(ifindex > 0);
 694
 695         r = open_lldp_neighbors(ifindex, &f);
 696         if (r < 0)
 697                 return r;
 698
 699         for (;;) {
 700                 const char *system_name = NULL, *port_id = NULL, *port_description = NULL;
 701                 _cleanup_(sd_lldp_neighbor_unrefp) sd_lldp_neighbor *n = NULL;
 702
 703                 r = next_lldp_neighbor(f, &n);
 704                 if (r < 0)
 705                         return r;
 706                 if (r == 0)
 707                         break;
 708
 709                 printf("%*s",
 710                        (int) strlen(prefix),
 711                        c == 0 ? prefix : "");
 712
 713                 (void) sd_lldp_neighbor_get_system_name(n, &system_name);
 714                 (void) sd_lldp_neighbor_get_port_id_as_string(n, &port_id);
 715                 (void) sd_lldp_neighbor_get_port_description(n, &port_description);
 716
 717                 printf("%s on port %s", strna(system_name), strna(port_id));
 718
 719                 if (!isempty(port_description))
 720                         printf(" (%s)", port_description);
 721
 722                 putchar('\n');
 723
 724                 c++;
 725         }
 726
 727         return c;
 728 }
 729
 730 static void dump_ifindexes(const char *prefix, const int *ifindexes) {
 731         unsigned c;
 732
 733         assert(prefix);
 734
 735         if (!ifindexes || ifindexes[0] <= 0)
 736                 return;
 737
 738         for (c = 0; ifindexes[c] > 0; c++) {
 739                 char name[IF_NAMESIZE+1];
 740
 741                 printf("%*s",
 742                        (int) strlen(prefix),
 743                        c == 0 ? prefix : "");
 744
 745                 if (if_indextoname(ifindexes[c], name))
 746                         fputs(name, stdout);
 747                 else
 748                         printf("%i", ifindexes[c]);
 749
 750                 fputc('\n', stdout);
 751         }
 752 }
 753
 754 static void dump_list(const char *prefix, char **l) {
 755         char **i;
 756
 757         if (strv_isempty(l))
 758                 return;
 759
 760         STRV_FOREACH(i, l) {
 761                 printf("%*s%s\n",
 762                        (int) strlen(prefix),
 763                        i == l ? prefix : "",
 764                        *i);
 765         }
 766 }
 767
 768 static int link_status_one(
 769                 sd_netlink *rtnl,
 770                 sd_hwdb *hwdb,
 771                 const LinkInfo *info) {
 772
 773         _cleanup_strv_free_ char **dns = NULL, **ntp = NULL, **search_domains = NULL, **route_domains = NULL;
 774         _cleanup_free_ char *setup_state = NULL, *operational_state = NULL, *tz = NULL;
 775         _cleanup_(sd_device_unrefp) sd_device *d = NULL;
 776         char devid[2 + DECIMAL_STR_MAX(int)];
 777         _cleanup_free_ char *t = NULL, *network = NULL;
 778         const char *driver = NULL, *path = NULL, *vendor = NULL, *model = NULL, *link = NULL;
 779         const char *on_color_operational, *off_color_operational,
 780                    *on_color_setup, *off_color_setup;
 781         _cleanup_free_ int *carrier_bound_to = NULL, *carrier_bound_by = NULL;
 782         int r;
 783
 784         assert(rtnl);
 785         assert(info);
 786
 787         (void) sd_network_link_get_operational_state(info->ifindex, &operational_state);
 788         operational_state_to_color(operational_state, &on_color_operational, &off_color_operational);
 789
 790         r = sd_network_link_get_setup_state(info->ifindex, &setup_state);
 791         if (r == -ENODATA) /* If there's no info available about this iface, it's unmanaged by networkd */
 792                 setup_state = strdup("unmanaged");
 793         setup_state_to_color(setup_state, &on_color_setup, &off_color_setup);
 794
 795         (void) sd_network_link_get_dns(info->ifindex, &dns);
 796         (void) sd_network_link_get_search_domains(info->ifindex, &search_domains);
 797         (void) sd_network_link_get_route_domains(info->ifindex, &route_domains);
 798         (void) sd_network_link_get_ntp(info->ifindex, &ntp);
 799
 800         xsprintf(devid, "n%i", info->ifindex);
 801
 802         (void) sd_device_new_from_device_id(&d, devid);
 803
 804         if (d) {
 805                 (void) sd_device_get_property_value(d, "ID_NET_LINK_FILE", &link);
 806                 (void) sd_device_get_property_value(d, "ID_NET_DRIVER", &driver);
 807                 (void) sd_device_get_property_value(d, "ID_PATH", &path);
 808
 809                 r = sd_device_get_property_value(d, "ID_VENDOR_FROM_DATABASE", &vendor);
 810                 if (r < 0)
 811                         (void) sd_device_get_property_value(d, "ID_VENDOR", &vendor);
 812
 813                 r = sd_device_get_property_value(d, "ID_MODEL_FROM_DATABASE", &model);
 814                 if (r < 0)
 815                         (void) sd_device_get_property_value(d, "ID_MODEL", &model);
 816         }
 817
 818         (void) link_get_type_string(info->iftype, d, &t);
 819
 820         (void) sd_network_link_get_network_file(info->ifindex, &network);
 821
 822         (void) sd_network_link_get_carrier_bound_to(info->ifindex, &carrier_bound_to);
 823         (void) sd_network_link_get_carrier_bound_by(info->ifindex, &carrier_bound_by);
 824
 825         printf("%s%s%s %i: %s\n", on_color_operational, special_glyph(BLACK_CIRCLE), off_color_operational, info->ifindex, info->name);
 826
 827         printf("       Link File: %s\n"
 828                "    Network File: %s\n"
 829                "            Type: %s\n"
 830                "           State: %s%s%s (%s%s%s)\n",
 831                strna(link),
 832                strna(network),
 833                strna(t),
 834                on_color_operational, strna(operational_state), off_color_operational,
 835                on_color_setup, strna(setup_state), off_color_setup);
 836
 837         if (path)
 838                 printf("            Path: %s\n", path);
 839         if (driver)
 840                 printf("          Driver: %s\n", driver);
 841         if (vendor)
 842                 printf("          Vendor: %s\n", vendor);
 843         if (model)
 844                 printf("           Model: %s\n", model);
 845
 846         if (info->has_mac_address) {
 847                 _cleanup_free_ char *description = NULL;
 848                 char ea[ETHER_ADDR_TO_STRING_MAX];
 849
 850                 (void) ieee_oui(hwdb, &info->mac_address, &description);
 851
 852                 if (description)
 853                         printf("      HW Address: %s (%s)\n", ether_addr_to_string(&info->mac_address, ea), description);
 854                 else
 855                         printf("      HW Address: %s\n", ether_addr_to_string(&info->mac_address, ea));
 856         }
 857
 858         if (info->has_mtu)
 859                 printf("             MTU: %u\n", info->mtu);
 860
 861         (void) dump_addresses(rtnl, "         Address: ", info->ifindex);
 862         (void) dump_gateways(rtnl, hwdb, "         Gateway: ", info->ifindex);
 863
 864         dump_list("             DNS: ", dns);
 865         dump_list("  Search Domains: ", search_domains);
 866         dump_list("   Route Domains: ", route_domains);
 867
 868         dump_list("             NTP: ", ntp);
 869
 870         dump_ifindexes("Carrier Bound To: ", carrier_bound_to);
 871         dump_ifindexes("Carrier Bound By: ", carrier_bound_by);
 872
 873         (void) sd_network_link_get_timezone(info->ifindex, &tz);
 874         if (tz)
 875                 printf("       Time Zone: %s\n", tz);
 876
 877         (void) dump_lldp_neighbors("    Connected To: ", info->ifindex);
 878
 879         return 0;
 880 }
 881
 882 static int system_status(sd_netlink *rtnl, sd_hwdb *hwdb) {
 883         _cleanup_free_ char *operational_state = NULL;
 884         _cleanup_strv_free_ char **dns = NULL, **ntp = NULL, **search_domains = NULL, **route_domains = NULL;
 885         const char *on_color_operational, *off_color_operational;
 886
 887         assert(rtnl);
 888
 889         (void) sd_network_get_operational_state(&operational_state);
 890         operational_state_to_color(operational_state, &on_color_operational, &off_color_operational);
 891
 892         printf("%s%s%s        State: %s%s%s\n",
 893                on_color_operational, special_glyph(BLACK_CIRCLE), off_color_operational,
 894                on_color_operational, strna(operational_state), off_color_operational);
 895
 896         (void) dump_addresses(rtnl, "       Address: ", 0);
 897         (void) dump_gateways(rtnl, hwdb, "       Gateway: ", 0);
 898
 899         (void) sd_network_get_dns(&dns);
 900         dump_list("           DNS: ", dns);
 901
 902         (void) sd_network_get_search_domains(&search_domains);
 903         dump_list("Search Domains: ", search_domains);
 904
 905         (void) sd_network_get_route_domains(&route_domains);
 906         dump_list(" Route Domains: ", route_domains);
 907
 908         (void) sd_network_get_ntp(&ntp);
 909         dump_list("           NTP: ", ntp);
 910
 911         return 0;
 912 }
 913
 914 static int link_status(int argc, char *argv[], void *userdata) {
 915         _cleanup_(sd_netlink_unrefp) sd_netlink *rtnl = NULL;
 916         _cleanup_(sd_hwdb_unrefp) sd_hwdb *hwdb = NULL;
 917         _cleanup_free_ LinkInfo *links = NULL;
 918         int r, c, i;
 919
 920         pager_open(arg_no_pager, false);
 921
 922         r = sd_netlink_open(&rtnl);
 923         if (r < 0)
 924                 return log_error_errno(r, "Failed to connect to netlink: %m");
 925
 926         r = sd_hwdb_new(&hwdb);
 927         if (r < 0)
 928                 log_debug_errno(r, "Failed to open hardware database: %m");
 929
 930         if (arg_all)
 931                 c = acquire_link_info_all(rtnl, &links);
 932         else if (argc <= 1)
 933                 return system_status(rtnl, hwdb);
 934         else
 935                 c = acquire_link_info_strv(rtnl, argv + 1, &links);
 936         if (c < 0)
 937                 return c;
 938
 939         for (i = 0; i < c; i++) {
 940                 if (i > 0)
 941                         fputc('\n', stdout);
 942
 943                 link_status_one(rtnl, hwdb, links + i);
 944         }
 945
 946         return 0;
 947 }
 948
 949 static char *lldp_capabilities_to_string(uint16_t x) {
 950         static const char characters[] = {
 951                 'o', 'p', 'b', 'w', 'r', 't', 'd', 'a', 'c', 's', 'm',
 952         };
 953         char *ret;
 954         unsigned i;
 955
 956         ret = new(char, ELEMENTSOF(characters) + 1);
 957         if (!ret)
 958                 return NULL;
 959
 960         for (i = 0; i < ELEMENTSOF(characters); i++)
 961                 ret[i] = (x & (1U << i)) ? characters[i] : '.';
 962
 963         ret[i] = 0;
 964         return ret;
 965 }
 966
 967 static void lldp_capabilities_legend(uint16_t x) {
 968         unsigned w, i, cols = columns();
 969         static const char* const table[] = {
 970                 "o - Other",
 971                 "p - Repeater",
 972                 "b - Bridge",
 973                 "w - WLAN Access Point",
 974                 "r - Router",
 975                 "t - Telephone",
 976                 "d - DOCSIS cable device",
 977                 "a - Station",
 978                 "c - Customer VLAN",
 979                 "s - Service VLAN",
 980                 "m - Two-port MAC Relay (TPMR)",
 981         };
 982
 983         if (x == 0)
 984                 return;
 985
 986         printf("\nCapability Flags:\n");
 987         for (w = 0, i = 0; i < ELEMENTSOF(table); i++)
 988                 if (x & (1U << i) || arg_all) {
 989                         bool newline;
 990
 991                         newline = w + strlen(table[i]) + (w == 0 ? 0 : 2) > cols;
 992                         if (newline)
 993                                 w = 0;
 994                         w += printf("%s%s%s", newline ? "\n" : "", w == 0 ? "" : "; ", table[i]);
 995                 }
 996         puts("");
 997 }
 998
 999 static int link_lldp_status(int argc, char *argv[], void *userdata) {
1000         _cleanup_(sd_netlink_unrefp) sd_netlink *rtnl = NULL;
1001         _cleanup_free_ LinkInfo *links = NULL;
1002         int i, r, c, m = 0;
1003         uint16_t all = 0;
1004
1005         r = sd_netlink_open(&rtnl);
1006         if (r < 0)
1007                 return log_error_errno(r, "Failed to connect to netlink: %m");
1008
1009         if (argc > 1)
1010                 c = acquire_link_info_strv(rtnl, argv + 1, &links);
1011         else
1012                 c = acquire_link_info_all(rtnl, &links);
1013         if (c < 0)
1014                 return c;
1015
1016         pager_open(arg_no_pager, false);
1017
1018         if (arg_legend)
1019                 printf("%-16s %-17s %-16s %-11s %-17s %-16s\n",
1020                        "LINK",
1021                        "CHASSIS ID",
1022                        "SYSTEM NAME",
1023                        "CAPS",
1024                        "PORT ID",
1025                        "PORT DESCRIPTION");
1026
1027         for (i = 0; i < c; i++) {
1028                 _cleanup_fclose_ FILE *f = NULL;
1029
1030                 r = open_lldp_neighbors(links[i].ifindex, &f);
1031                 if (r == -ENOENT)
1032                         continue;
1033                 if (r < 0) {
1034                         log_warning_errno(r, "Failed to open LLDP data for %i, ignoring: %m", links[i].ifindex);
1035                         continue;
1036                 }
1037
1038                 for (;;) {
1039                         _cleanup_free_ char *cid = NULL, *pid = NULL, *sname = NULL, *pdesc = NULL;
1040                         const char *chassis_id = NULL, *port_id = NULL, *system_name = NULL, *port_description = NULL, *capabilities = NULL;
1041                         _cleanup_(sd_lldp_neighbor_unrefp) sd_lldp_neighbor *n = NULL;
1042                         uint16_t cc;
1043
1044                         r = next_lldp_neighbor(f, &n);
1045                         if (r < 0) {
1046                                 log_warning_errno(r, "Failed to read neighbor data: %m");
1047                                 break;
1048                         }
1049                         if (r == 0)
1050                                 break;
1051
1052                         (void) sd_lldp_neighbor_get_chassis_id_as_string(n, &chassis_id);
1053                         (void) sd_lldp_neighbor_get_port_id_as_string(n, &port_id);
1054                         (void) sd_lldp_neighbor_get_system_name(n, &system_name);
1055                         (void) sd_lldp_neighbor_get_port_description(n, &port_description);
1056
1057                         if (chassis_id) {
1058                                 cid = ellipsize(chassis_id, 17, 100);
1059                                 if (cid)
1060                                         chassis_id = cid;
1061                         }
1062
1063                         if (port_id) {
1064                                 pid = ellipsize(port_id, 17, 100);
1065                                 if (pid)
1066                                         port_id = pid;
1067                         }
1068
1069                         if (system_name) {
1070                                 sname = ellipsize(system_name, 16, 100);
1071                                 if (sname)
1072                                         system_name = sname;
1073                         }
1074
1075                         if (port_description) {
1076                                 pdesc = ellipsize(port_description, 16, 100);
1077                                 if (pdesc)
1078                                         port_description = pdesc;
1079                         }
1080
1081                         if (sd_lldp_neighbor_get_enabled_capabilities(n, &cc) >= 0) {
1082                                 capabilities = lldp_capabilities_to_string(cc);
1083                                 all |= cc;
1084                         }
1085
1086                         printf("%-16s %-17s %-16s %-11s %-17s %-16s\n",
1087                                links[i].name,
1088                                strna(chassis_id),
1089                                strna(system_name),
1090                                strna(capabilities),
1091                                strna(port_id),
1092                                strna(port_description));
1093
1094                         m++;
1095                 }
1096         }
1097
1098         if (arg_legend) {
1099                 lldp_capabilities_legend(all);
1100                 printf("\n%i neighbors listed.\n", m);
1101         }
1102
1103         return 0;
1104 }
1105
1106 static void help(void) {
1107         printf("%s [OPTIONS...]\n\n"
1108                "Query and control the networking subsystem.\n\n"
1109                "  -h --help             Show this help\n"
1110                "     --version          Show package version\n"
1111                "     --no-pager         Do not pipe output into a pager\n"
1112                "     --no-legend        Do not show the headers and footers\n"
1113                "  -a --all              Show status for all links\n\n"
1114                "Commands:\n"
1115                "  list [LINK...]        List links\n"
1116                "  status [LINK...]      Show link status\n"
1117                "  lldp [LINK...]        Show LLDP neighbors\n"
1118                "  label                 Show current address label entries in the kernel\n"
1119                , program_invocation_short_name);
1120 }
1121
1122 static int parse_argv(int argc, char *argv[]) {
1123
1124         enum {
1125                 ARG_VERSION = 0x100,
1126                 ARG_NO_PAGER,
1127                 ARG_NO_LEGEND,
1128         };
1129
1130         static const struct option options[] = {
1131                 { "help",      no_argument,       NULL, 'h'           },
1132                 { "version",   no_argument,       NULL, ARG_VERSION   },
1133                 { "no-pager",  no_argument,       NULL, ARG_NO_PAGER  },
1134                 { "no-legend", no_argument,       NULL, ARG_NO_LEGEND },
1135                 { "all",       no_argument,       NULL, 'a'           },
1136                 {}
1137         };
1138
1139         int c;
1140
1141         assert(argc >= 0);
1142         assert(argv);
1143
1144         while ((c = getopt_long(argc, argv, "ha", options, NULL)) >= 0) {
1145
1146                 switch (c) {
1147
1148                 case 'h':
1149                         help();
1150                         return 0;
1151
1152                 case ARG_VERSION:
1153                         return version();
1154
1155                 case ARG_NO_PAGER:
1156                         arg_no_pager = true;
1157                         break;
1158
1159                 case ARG_NO_LEGEND:
1160                         arg_legend = false;
1161                         break;
1162
1163                 case 'a':
1164                         arg_all = true;
1165                         break;
1166
1167                 case '?':
1168                         return -EINVAL;
1169
1170                 default:
1171                         assert_not_reached("Unhandled option");
1172                 }
1173         }
1174
1175         return 1;
1176 }
1177
1178 static int networkctl_main(int argc, char *argv[]) {
1179         const Verb verbs[] = {
1180                 { "list",   VERB_ANY, VERB_ANY, VERB_DEFAULT, list_links       },
1181                 { "status", VERB_ANY, VERB_ANY, 0,            link_status      },
1182                 { "lldp",   VERB_ANY, VERB_ANY, 0,            link_lldp_status },
1183                 { "label",  VERB_ANY, VERB_ANY, 0,            list_address_labels},
1184                 {}
1185         };
1186
1187         return dispatch_verb(argc, argv, verbs, NULL);
1188 }
1189
1190 static void warn_networkd_missing(void) {
1191
1192         if (access("/run/systemd/netif/state", F_OK) >= 0)
1193                 return;
1194
1195         fprintf(stderr, "WARNING: systemd-networkd is not running, output will be incomplete.\n\n");
1196 }
1197
1198 int main(int argc, char* argv[]) {
1199         int r;
1200
1201         log_parse_environment();
1202         log_open();
1203
1204         r = parse_argv(argc, argv);
1205         if (r <= 0)
1206                 goto finish;
1207
1208         warn_networkd_missing();
1209
1210         r = networkctl_main(argc, argv);
1211
1212 finish:
1213         pager_close();
1214
1215         return r < 0 ? EXIT_FAILURE : EXIT_SUCCESS;
1216 }