sbin/etherswitchcfg/etherswitchcfg.c

   1 /*-
   2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
   3  *
   4  * Copyright (c) 2011-2012 Stefan Bethke.
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  *
  16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26  * SUCH DAMAGE.
  27  *
  28  * $FreeBSD$
  29  */
  30
  31 #include <sys/cdefs.h>
  32 __FBSDID("$FreeBSD$");
  33
  34 #include <ctype.h>
  35 #include <err.h>
  36 #include <errno.h>
  37 #include <fcntl.h>
  38 #include <stdio.h>
  39 #include <stdlib.h>
  40 #include <string.h>
  41 #include <sysexits.h>
  42 #include <unistd.h>
  43 #include <sys/types.h>
  44 #include <sys/ioctl.h>
  45 #include <net/if.h>
  46 #include <net/if_media.h>
  47 #include <dev/etherswitch/etherswitch.h>
  48
  49 int     get_media_subtype(int, const char *);
  50 int     get_media_mode(int, const char *);
  51 int     get_media_options(int, const char *);
  52 int     lookup_media_word(struct ifmedia_description *, const char *);
  53 void    print_media_word(int, int);
  54 void    print_media_word_ifconfig(int);
  55
  56 /* some constants */
  57 #define IEEE802DOT1Q_VID_MAX    4094
  58 #define IFMEDIAREQ_NULISTENTRIES        256
  59
  60 enum cmdmode {
  61         MODE_NONE = 0,
  62         MODE_PORT,
  63         MODE_CONFIG,
  64         MODE_VLANGROUP,
  65         MODE_REGISTER,
  66         MODE_PHYREG,
  67         MODE_ATU
  68 };
  69
  70 struct cfg {
  71         int                                     fd;
  72         int                                     verbose;
  73         int                                     mediatypes;
  74         const char                      *controlfile;
  75         etherswitch_conf_t      conf;
  76         etherswitch_info_t      info;
  77         enum cmdmode            mode;
  78         int                                     unit;
  79 };
  80
  81 struct cmds {
  82         enum cmdmode    mode;
  83         const char      *name;
  84         int             args;
  85         int             (*f)(struct cfg *, int argc, char *argv[]);
  86 };
  87 static struct cmds cmds[];
  88
  89 /* Must match the ETHERSWITCH_PORT_LED_* enum order */
  90 static const char *ledstyles[] = { "default", "on", "off", "blink", NULL };
  91
  92 /*
  93  * Print a value a la the %b format of the kernel's printf.
  94  * Stolen from ifconfig.c.
  95  */
  96 static void
  97 printb(const char *s, unsigned v, const char *bits)
  98 {
  99         int i, any = 0;
 100         char c;
 101
 102         if (bits && *bits == 8)
 103                 printf("%s=%o", s, v);
 104         else
 105                 printf("%s=%x", s, v);
 106         bits++;
 107         if (bits) {
 108                 putchar('<');
 109                 while ((i = *bits++) != '\0') {
 110                         if (v & (1 << (i-1))) {
 111                                 if (any)
 112                                         putchar(',');
 113                                 any = 1;
 114                                 for (; (c = *bits) > 32; bits++)
 115                                         putchar(c);
 116                         } else
 117                                 for (; *bits > 32; bits++)
 118                                         ;
 119                 }
 120                 putchar('>');
 121         }
 122 }
 123
 124 static int
 125 read_register(struct cfg *cfg, int r)
 126 {
 127         struct etherswitch_reg er;
 128
 129         er.reg = r;
 130         if (ioctl(cfg->fd, IOETHERSWITCHGETREG, &er) != 0)
 131                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETREG)");
 132         return (er.val);
 133 }
 134
 135 static void
 136 write_register(struct cfg *cfg, int r, int v)
 137 {
 138         struct etherswitch_reg er;
 139
 140         er.reg = r;
 141         er.val = v;
 142         if (ioctl(cfg->fd, IOETHERSWITCHSETREG, &er) != 0)
 143                 err(EX_OSERR, "ioctl(IOETHERSWITCHSETREG)");
 144 }
 145
 146 static int
 147 read_phyregister(struct cfg *cfg, int phy, int reg)
 148 {
 149         struct etherswitch_phyreg er;
 150
 151         er.phy = phy;
 152         er.reg = reg;
 153         if (ioctl(cfg->fd, IOETHERSWITCHGETPHYREG, &er) != 0)
 154                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPHYREG)");
 155         return (er.val);
 156 }
 157
 158 static void
 159 write_phyregister(struct cfg *cfg, int phy, int reg, int val)
 160 {
 161         struct etherswitch_phyreg er;
 162
 163         er.phy = phy;
 164         er.reg = reg;
 165         er.val = val;
 166         if (ioctl(cfg->fd, IOETHERSWITCHSETPHYREG, &er) != 0)
 167                 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPHYREG)");
 168 }
 169
 170 static int
 171 set_port_vid(struct cfg *cfg, int argc, char *argv[])
 172 {
 173         int v;
 174         etherswitch_port_t p;
 175
 176         if (argc < 2)
 177                 return (-1);
 178
 179         v = strtol(argv[1], NULL, 0);
 180         if (v < 0 || v > IEEE802DOT1Q_VID_MAX)
 181                 errx(EX_USAGE, "pvid must be between 0 and %d",
 182                     IEEE802DOT1Q_VID_MAX);
 183         bzero(&p, sizeof(p));
 184         p.es_port = cfg->unit;
 185         if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
 186                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
 187         p.es_pvid = v;
 188         if (ioctl(cfg->fd, IOETHERSWITCHSETPORT, &p) != 0)
 189                 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPORT)");
 190         return (0);
 191 }
 192
 193 static int
 194 set_port_flag(struct cfg *cfg, int argc, char *argv[])
 195 {
 196         char *flag;
 197         int n;
 198         uint32_t f;
 199         etherswitch_port_t p;
 200
 201         if (argc < 1)
 202                 return (-1);
 203
 204         n = 0;
 205         f = 0;
 206         flag = argv[0];
 207         if (strcmp(flag, "none") != 0) {
 208                 if (*flag == '-') {
 209                         n++;
 210                         flag++;
 211                 }
 212                 if (strcasecmp(flag, "striptag") == 0)
 213                         f = ETHERSWITCH_PORT_STRIPTAG;
 214                 else if (strcasecmp(flag, "addtag") == 0)
 215                         f = ETHERSWITCH_PORT_ADDTAG;
 216                 else if (strcasecmp(flag, "firstlock") == 0)
 217                         f = ETHERSWITCH_PORT_FIRSTLOCK;
 218                 else if (strcasecmp(flag, "dropuntagged") == 0)
 219                         f = ETHERSWITCH_PORT_DROPUNTAGGED;
 220                 else if (strcasecmp(flag, "doubletag") == 0)
 221                         f = ETHERSWITCH_PORT_DOUBLE_TAG;
 222                 else if (strcasecmp(flag, "ingress") == 0)
 223                         f = ETHERSWITCH_PORT_INGRESS;
 224         }
 225         bzero(&p, sizeof(p));
 226         p.es_port = cfg->unit;
 227         if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
 228                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
 229         if (n)
 230                 p.es_flags &= ~f;
 231         else
 232                 p.es_flags |= f;
 233         if (ioctl(cfg->fd, IOETHERSWITCHSETPORT, &p) != 0)
 234                 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPORT)");
 235         return (0);
 236 }
 237
 238 static int
 239 set_port_media(struct cfg *cfg, int argc, char *argv[])
 240 {
 241         etherswitch_port_t p;
 242         int ifm_ulist[IFMEDIAREQ_NULISTENTRIES];
 243         int subtype;
 244
 245         if (argc < 2)
 246                 return (-1);
 247
 248         bzero(&p, sizeof(p));
 249         p.es_port = cfg->unit;
 250         p.es_ifmr.ifm_ulist = ifm_ulist;
 251         p.es_ifmr.ifm_count = IFMEDIAREQ_NULISTENTRIES;
 252         if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
 253                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
 254         if (p.es_ifmr.ifm_count == 0)
 255                 return (0);
 256         subtype = get_media_subtype(IFM_TYPE(ifm_ulist[0]), argv[1]);
 257         p.es_ifr.ifr_media = (p.es_ifmr.ifm_current & IFM_IMASK) |
 258                 IFM_TYPE(ifm_ulist[0]) | subtype;
 259         if (ioctl(cfg->fd, IOETHERSWITCHSETPORT, &p) != 0)
 260                 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPORT)");
 261         return (0);
 262 }
 263
 264 static int
 265 set_port_mediaopt(struct cfg *cfg, int argc, char *argv[])
 266 {
 267         etherswitch_port_t p;
 268         int ifm_ulist[IFMEDIAREQ_NULISTENTRIES];
 269         int options;
 270
 271         if (argc < 2)
 272                 return (-1);
 273
 274         bzero(&p, sizeof(p));
 275         p.es_port = cfg->unit;
 276         p.es_ifmr.ifm_ulist = ifm_ulist;
 277         p.es_ifmr.ifm_count = IFMEDIAREQ_NULISTENTRIES;
 278         if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
 279                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
 280         options = get_media_options(IFM_TYPE(ifm_ulist[0]), argv[1]);
 281         if (options == -1)
 282                 errx(EX_USAGE, "invalid media options \"%s\"", argv[1]);
 283         if (options & IFM_HDX) {
 284                 p.es_ifr.ifr_media &= ~IFM_FDX;
 285                 options &= ~IFM_HDX;
 286         }
 287         p.es_ifr.ifr_media |= options;
 288         if (ioctl(cfg->fd, IOETHERSWITCHSETPORT, &p) != 0)
 289                 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPORT)");
 290         return (0);
 291 }
 292
 293 static int
 294 set_port_led(struct cfg *cfg, int argc, char *argv[])
 295 {
 296         etherswitch_port_t p;
 297         int led;
 298         int i;
 299
 300         if (argc < 3)
 301                 return (-1);
 302
 303         bzero(&p, sizeof(p));
 304         p.es_port = cfg->unit;
 305         if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
 306                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
 307
 308         led = strtol(argv[1], NULL, 0);
 309         if (led < 1 || led > p.es_nleds)
 310                 errx(EX_USAGE, "invalid led number %s; must be between 1 and %d",
 311                         argv[1], p.es_nleds);
 312
 313         led--;
 314
 315         for (i=0; ledstyles[i] != NULL; i++) {
 316                 if (strcmp(argv[2], ledstyles[i]) == 0) {
 317                         p.es_led[led] = i;
 318                         break;
 319                 }
 320         }
 321         if (ledstyles[i] == NULL)
 322                 errx(EX_USAGE, "invalid led style \"%s\"", argv[2]);
 323
 324         if (ioctl(cfg->fd, IOETHERSWITCHSETPORT, &p) != 0)
 325                 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPORT)");
 326
 327         return (0);
 328 }
 329
 330 static int
 331 set_vlangroup_vid(struct cfg *cfg, int argc, char *argv[])
 332 {
 333         int v;
 334         etherswitch_vlangroup_t vg;
 335
 336         if (argc < 2)
 337                 return (-1);
 338
 339         memset(&vg, 0, sizeof(vg));
 340         v = strtol(argv[1], NULL, 0);
 341         if (v < 0 || v > IEEE802DOT1Q_VID_MAX)
 342                 errx(EX_USAGE, "vlan must be between 0 and %d", IEEE802DOT1Q_VID_MAX);
 343         vg.es_vlangroup = cfg->unit;
 344         if (ioctl(cfg->fd, IOETHERSWITCHGETVLANGROUP, &vg) != 0)
 345                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETVLANGROUP)");
 346         vg.es_vid = v;
 347         if (ioctl(cfg->fd, IOETHERSWITCHSETVLANGROUP, &vg) != 0)
 348                 err(EX_OSERR, "ioctl(IOETHERSWITCHSETVLANGROUP)");
 349         return (0);
 350 }
 351
 352 static int
 353 set_vlangroup_members(struct cfg *cfg, int argc, char *argv[])
 354 {
 355         etherswitch_vlangroup_t vg;
 356         int member, untagged;
 357         char *c, *d;
 358         int v;
 359
 360         if (argc < 2)
 361                 return (-1);
 362
 363         member = untagged = 0;
 364         memset(&vg, 0, sizeof(vg));
 365         if (strcmp(argv[1], "none") != 0) {
 366                 for (c=argv[1]; *c; c=d) {
 367                         v = strtol(c, &d, 0);
 368                         if (d == c)
 369                                 break;
 370                         if (v < 0 || v >= cfg->info.es_nports)
 371                                 errx(EX_USAGE, "Member port must be between 0 and %d", cfg->info.es_nports-1);
 372                         if (d[0] == ',' || d[0] == '\0' ||
 373                                 ((d[0] == 't' || d[0] == 'T') && (d[1] == ',' || d[1] == '\0'))) {
 374                                 if (d[0] == 't' || d[0] == 'T') {
 375                                         untagged &= ~ETHERSWITCH_PORTMASK(v);
 376                                         d++;
 377                                 } else
 378                                         untagged |= ETHERSWITCH_PORTMASK(v);
 379                                 member |= ETHERSWITCH_PORTMASK(v);
 380                                 d++;
 381                         } else
 382                                 errx(EX_USAGE, "Invalid members specification \"%s\"", d);
 383                 }
 384         }
 385         vg.es_vlangroup = cfg->unit;
 386         if (ioctl(cfg->fd, IOETHERSWITCHGETVLANGROUP, &vg) != 0)
 387                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETVLANGROUP)");
 388         vg.es_member_ports = member;
 389         vg.es_untagged_ports = untagged;
 390         if (ioctl(cfg->fd, IOETHERSWITCHSETVLANGROUP, &vg) != 0)
 391                 err(EX_OSERR, "ioctl(IOETHERSWITCHSETVLANGROUP)");
 392         return (0);
 393 }
 394
 395 static int
 396 set_register(struct cfg *cfg, char *arg)
 397 {
 398         int a, v;
 399         char *c;
 400
 401         a = strtol(arg, &c, 0);
 402         if (c==arg)
 403                 return (1);
 404         if (*c == '=') {
 405                 v = strtoul(c+1, NULL, 0);
 406                 write_register(cfg, a, v);
 407         }
 408         printf("\treg 0x%04x=0x%08x\n", a, read_register(cfg, a));
 409         return (0);
 410 }
 411
 412 static int
 413 set_phyregister(struct cfg *cfg, char *arg)
 414 {
 415         int phy, reg, val;
 416         char *c, *d;
 417
 418         phy = strtol(arg, &c, 0);
 419         if (c==arg)
 420                 return (1);
 421         if (*c != '.')
 422                 return (1);
 423         d = c+1;
 424         reg = strtol(d, &c, 0);
 425         if (d == c)
 426                 return (1);
 427         if (*c == '=') {
 428                 val = strtoul(c+1, NULL, 0);
 429                 write_phyregister(cfg, phy, reg, val);
 430         }
 431         printf("\treg %d.0x%02x=0x%04x\n", phy, reg, read_phyregister(cfg, phy, reg));
 432         return (0);
 433 }
 434
 435 static int
 436 set_vlan_mode(struct cfg *cfg, int argc, char *argv[])
 437 {
 438         etherswitch_conf_t conf;
 439
 440         if (argc < 2)
 441                 return (-1);
 442
 443         bzero(&conf, sizeof(conf));
 444         conf.cmd = ETHERSWITCH_CONF_VLAN_MODE;
 445         if (strcasecmp(argv[1], "isl") == 0)
 446                 conf.vlan_mode = ETHERSWITCH_VLAN_ISL;
 447         else if (strcasecmp(argv[1], "port") == 0)
 448                 conf.vlan_mode = ETHERSWITCH_VLAN_PORT;
 449         else if (strcasecmp(argv[1], "dot1q") == 0)
 450                 conf.vlan_mode = ETHERSWITCH_VLAN_DOT1Q;
 451         else if (strcasecmp(argv[1], "dot1q4k") == 0)
 452                 conf.vlan_mode = ETHERSWITCH_VLAN_DOT1Q_4K;
 453         else if (strcasecmp(argv[1], "qinq") == 0)
 454                 conf.vlan_mode = ETHERSWITCH_VLAN_DOUBLE_TAG;
 455         else
 456                 conf.vlan_mode = 0;
 457         if (ioctl(cfg->fd, IOETHERSWITCHSETCONF, &conf) != 0)
 458                 err(EX_OSERR, "ioctl(IOETHERSWITCHSETCONF)");
 459
 460         return (0);
 461 }
 462
 463 static int
 464 atu_flush(struct cfg *cfg, int argc, char *argv[])
 465 {
 466         etherswitch_portid_t p;
 467         int i, r;
 468
 469         bzero(&p, sizeof(p));
 470
 471         /* note: argv[0] is "flush" */
 472         if (argc > 2 && strcasecmp(argv[1], "port") == 0) {
 473                 p.es_port = atoi(argv[2]);
 474                 i = IOETHERSWITCHFLUSHPORT;
 475                 r = 3;
 476         } else if (argc > 1 && strcasecmp(argv[1], "all") == 0) {
 477                 p.es_port = 0;
 478                 r = 2;
 479                 i = IOETHERSWITCHFLUSHALL;
 480         } else {
 481                 fprintf(stderr,
 482                     "%s: invalid verb (port <x> or all) (got %s)\n",
 483                     __func__, argv[1]);
 484                 return (-1);
 485         }
 486
 487         if (ioctl(cfg->fd, i, &p) != 0)
 488                 err(EX_OSERR, "ioctl(ATU flush (ioctl %d, port %d))",
 489                     i, p.es_port);
 490         return (r);
 491 }
 492
 493 static int
 494 atu_dump(struct cfg *cfg, int argc, char *argv[])
 495 {
 496         etherswitch_atu_table_t p;
 497         etherswitch_atu_entry_t e;
 498         uint32_t i;
 499
 500         (void) argc;
 501         (void) argv;
 502
 503         /* Note: argv[0] is "dump" */
 504         bzero(&p, sizeof(p));
 505
 506         if (ioctl(cfg->fd, IOETHERSWITCHGETTABLE, &p) != 0)
 507                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETTABLE)");
 508
 509         /* And now, iterate to get entries */
 510         for (i = 0; i < p.es_nitems; i++) {
 511                 bzero(&e, sizeof(e));
 512                 e.id = i;
 513                 if (ioctl(cfg->fd, IOETHERSWITCHGETTABLEENTRY, &e) != 0)
 514                         break;
 515
 516                 printf(" [%d] %s: portmask 0x%08x\n", i,
 517                     ether_ntoa((void *) &e.es_macaddr),
 518                     e.es_portmask);
 519         }
 520
 521         return (1);
 522 }
 523
 524 static void
 525 print_config(struct cfg *cfg)
 526 {
 527         const char *c;
 528
 529         /* Get the device name. */
 530         c = strrchr(cfg->controlfile, '/');
 531         if (c != NULL)
 532                 c = c + 1;
 533         else
 534                 c = cfg->controlfile;
 535
 536         /* Print VLAN mode. */
 537         if (cfg->conf.cmd & ETHERSWITCH_CONF_VLAN_MODE) {
 538                 printf("%s: VLAN mode: ", c);
 539                 switch (cfg->conf.vlan_mode) {
 540                 case ETHERSWITCH_VLAN_ISL:
 541                         printf("ISL\n");
 542                         break;
 543                 case ETHERSWITCH_VLAN_PORT:
 544                         printf("PORT\n");
 545                         break;
 546                 case ETHERSWITCH_VLAN_DOT1Q:
 547                         printf("DOT1Q\n");
 548                         break;
 549                 case ETHERSWITCH_VLAN_DOT1Q_4K:
 550                         printf("DOT1Q4K\n");
 551                         break;
 552                 case ETHERSWITCH_VLAN_DOUBLE_TAG:
 553                         printf("QinQ\n");
 554                         break;
 555                 default:
 556                         printf("none\n");
 557                 }
 558         }
 559 }
 560
 561 static void
 562 print_port(struct cfg *cfg, int port)
 563 {
 564         etherswitch_port_t p;
 565         int ifm_ulist[IFMEDIAREQ_NULISTENTRIES];
 566         int i;
 567
 568         bzero(&p, sizeof(p));
 569         p.es_port = port;
 570         p.es_ifmr.ifm_ulist = ifm_ulist;
 571         p.es_ifmr.ifm_count = IFMEDIAREQ_NULISTENTRIES;
 572         if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
 573                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
 574         printf("port%d:\n", port);
 575         if (cfg->conf.vlan_mode == ETHERSWITCH_VLAN_DOT1Q)
 576                 printf("\tpvid: %d\n", p.es_pvid);
 577         printb("\tflags", p.es_flags, ETHERSWITCH_PORT_FLAGS_BITS);
 578         printf("\n");
 579         if (p.es_nleds) {
 580                 printf("\tled: ");
 581                 for (i = 0; i < p.es_nleds; i++) {
 582                         printf("%d:%s%s", i+1, ledstyles[p.es_led[i]], (i==p.es_nleds-1)?"":" ");
 583                 }
 584                 printf("\n");
 585         }
 586         printf("\tmedia: ");
 587         print_media_word(p.es_ifmr.ifm_current, 1);
 588         if (p.es_ifmr.ifm_active != p.es_ifmr.ifm_current) {
 589                 putchar(' ');
 590                 putchar('(');
 591                 print_media_word(p.es_ifmr.ifm_active, 0);
 592                 putchar(')');
 593         }
 594         putchar('\n');
 595         printf("\tstatus: %s\n", (p.es_ifmr.ifm_status & IFM_ACTIVE) != 0 ? "active" : "no carrier");
 596         if (cfg->mediatypes) {
 597                 printf("\tsupported media:\n");
 598                 if (p.es_ifmr.ifm_count > IFMEDIAREQ_NULISTENTRIES)
 599                         p.es_ifmr.ifm_count = IFMEDIAREQ_NULISTENTRIES;
 600                 for (i=0; i<p.es_ifmr.ifm_count; i++) {
 601                         printf("\t\tmedia ");
 602                         print_media_word(ifm_ulist[i], 0);
 603                         putchar('\n');
 604                 }
 605         }
 606 }
 607
 608 static void
 609 print_vlangroup(struct cfg *cfg, int vlangroup)
 610 {
 611         etherswitch_vlangroup_t vg;
 612         int i, comma;
 613
 614         vg.es_vlangroup = vlangroup;
 615         if (ioctl(cfg->fd, IOETHERSWITCHGETVLANGROUP, &vg) != 0)
 616                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETVLANGROUP)");
 617         if ((vg.es_vid & ETHERSWITCH_VID_VALID) == 0)
 618                 return;
 619         vg.es_vid &= ETHERSWITCH_VID_MASK;
 620         printf("vlangroup%d:\n", vlangroup);
 621         if (cfg->conf.vlan_mode == ETHERSWITCH_VLAN_PORT)
 622                 printf("\tport: %d\n", vg.es_vid);
 623         else
 624                 printf("\tvlan: %d\n", vg.es_vid);
 625         printf("\tmembers ");
 626         comma = 0;
 627         if (vg.es_member_ports != 0)
 628                 for (i=0; i<cfg->info.es_nports; i++) {
 629                         if ((vg.es_member_ports & ETHERSWITCH_PORTMASK(i)) != 0) {
 630                                 if (comma)
 631                                         printf(",");
 632                                 printf("%d", i);
 633                                 if ((vg.es_untagged_ports & ETHERSWITCH_PORTMASK(i)) == 0)
 634                                         printf("t");
 635                                 comma = 1;
 636                         }
 637                 }
 638         else
 639                 printf("none");
 640         printf("\n");
 641 }
 642
 643 static void
 644 print_info(struct cfg *cfg)
 645 {
 646         const char *c;
 647         int i;
 648
 649         c = strrchr(cfg->controlfile, '/');
 650         if (c != NULL)
 651                 c = c + 1;
 652         else
 653                 c = cfg->controlfile;
 654         if (cfg->verbose) {
 655                 printf("%s: %s with %d ports and %d VLAN groups\n", c,
 656                     cfg->info.es_name, cfg->info.es_nports,
 657                     cfg->info.es_nvlangroups);
 658                 printf("%s: ", c);
 659                 printb("VLAN capabilities",  cfg->info.es_vlan_caps,
 660                     ETHERSWITCH_VLAN_CAPS_BITS);
 661                 printf("\n");
 662         }
 663         print_config(cfg);
 664         for (i=0; i<cfg->info.es_nports; i++) {
 665                 print_port(cfg, i);
 666         }
 667         for (i=0; i<cfg->info.es_nvlangroups; i++) {
 668                 print_vlangroup(cfg, i);
 669         }
 670 }
 671
 672 static void
 673 usage(struct cfg *cfg __unused, char *argv[] __unused)
 674 {
 675         fprintf(stderr, "usage: etherswitchctl\n");
 676         fprintf(stderr, "\tetherswitchcfg [-f control file] info\n");
 677         fprintf(stderr, "\tetherswitchcfg [-f control file] config "
 678             "command parameter\n");
 679         fprintf(stderr, "\t\tconfig commands: vlan_mode\n");
 680         fprintf(stderr, "\tetherswitchcfg [-f control file] phy "
 681             "phy.register[=value]\n");
 682         fprintf(stderr, "\tetherswitchcfg [-f control file] portX "
 683             "[flags] command parameter\n");
 684         fprintf(stderr, "\t\tport commands: pvid, media, mediaopt, led\n");
 685         fprintf(stderr, "\tetherswitchcfg [-f control file] reg "
 686             "register[=value]\n");
 687         fprintf(stderr, "\tetherswitchcfg [-f control file] vlangroupX "
 688             "command parameter\n");
 689         fprintf(stderr, "\t\tvlangroup commands: vlan, members\n");
 690         exit(EX_USAGE);
 691 }
 692
 693 static void
 694 newmode(struct cfg *cfg, enum cmdmode mode)
 695 {
 696         if (mode == cfg->mode)
 697                 return;
 698         switch (cfg->mode) {
 699         case MODE_NONE:
 700                 break;
 701         case MODE_CONFIG:
 702                 /*
 703                  * Read the updated the configuration (it can be different
 704                  * from the last time we read it).
 705                  */
 706                 if (ioctl(cfg->fd, IOETHERSWITCHGETCONF, &cfg->conf) != 0)
 707                         err(EX_OSERR, "ioctl(IOETHERSWITCHGETCONF)");
 708                 print_config(cfg);
 709                 break;
 710         case MODE_PORT:
 711                 print_port(cfg, cfg->unit);
 712                 break;
 713         case MODE_VLANGROUP:
 714                 print_vlangroup(cfg, cfg->unit);
 715                 break;
 716         case MODE_REGISTER:
 717         case MODE_PHYREG:
 718         case MODE_ATU:
 719                 break;
 720         }
 721         cfg->mode = mode;
 722 }
 723
 724 int
 725 main(int argc, char *argv[])
 726 {
 727         int ch;
 728         struct cfg cfg;
 729         int i;
 730
 731         bzero(&cfg, sizeof(cfg));
 732         cfg.controlfile = "/dev/etherswitch0";
 733         while ((ch = getopt(argc, argv, "f:mv?")) != -1)
 734                 switch(ch) {
 735                 case 'f':
 736                         cfg.controlfile = optarg;
 737                         break;
 738                 case 'm':
 739                         cfg.mediatypes++;
 740                         break;
 741                 case 'v':
 742                         cfg.verbose++;
 743                         break;
 744                 case '?':
 745                         /* FALLTHROUGH */
 746                 default:
 747                         usage(&cfg, argv);
 748                 }
 749         argc -= optind;
 750         argv += optind;
 751         cfg.fd = open(cfg.controlfile, O_RDONLY);
 752         if (cfg.fd < 0)
 753                 err(EX_UNAVAILABLE, "Can't open control file: %s", cfg.controlfile);
 754         if (ioctl(cfg.fd, IOETHERSWITCHGETINFO, &cfg.info) != 0)
 755                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETINFO)");
 756         if (ioctl(cfg.fd, IOETHERSWITCHGETCONF, &cfg.conf) != 0)
 757                 err(EX_OSERR, "ioctl(IOETHERSWITCHGETCONF)");
 758         if (argc == 0) {
 759                 print_info(&cfg);
 760                 return (0);
 761         }
 762         cfg.mode = MODE_NONE;
 763         while (argc > 0) {
 764                 switch(cfg.mode) {
 765                 case MODE_NONE:
 766                         if (strcmp(argv[0], "info") == 0) {
 767                                 print_info(&cfg);
 768                         } else if (sscanf(argv[0], "port%d", &cfg.unit) == 1) {
 769                                 if (cfg.unit < 0 || cfg.unit >= cfg.info.es_nports)
 770                                         errx(EX_USAGE, "port unit must be between 0 and %d", cfg.info.es_nports - 1);
 771                                 newmode(&cfg, MODE_PORT);
 772                         } else if (sscanf(argv[0], "vlangroup%d", &cfg.unit) == 1) {
 773                                 if (cfg.unit < 0 || cfg.unit >= cfg.info.es_nvlangroups)
 774                                         errx(EX_USAGE,
 775                                             "vlangroup unit must be between 0 and %d",
 776                                             cfg.info.es_nvlangroups - 1);
 777                                 newmode(&cfg, MODE_VLANGROUP);
 778                         } else if (strcmp(argv[0], "config") == 0) {
 779                                 newmode(&cfg, MODE_CONFIG);
 780                         } else if (strcmp(argv[0], "phy") == 0) {
 781                                 newmode(&cfg, MODE_PHYREG);
 782                         } else if (strcmp(argv[0], "reg") == 0) {
 783                                 newmode(&cfg, MODE_REGISTER);
 784                         } else if (strcmp(argv[0], "help") == 0) {
 785                                 usage(&cfg, argv);
 786                         } else if (strcmp(argv[0], "atu") == 0) {
 787                                 newmode(&cfg, MODE_ATU);
 788                         } else {
 789                                 errx(EX_USAGE, "Unknown command \"%s\"", argv[0]);
 790                         }
 791                         break;
 792                 case MODE_PORT:
 793                 case MODE_CONFIG:
 794                 case MODE_VLANGROUP:
 795                 case MODE_ATU:
 796                         for(i=0; cmds[i].name != NULL; i++) {
 797                                 int r;
 798                                 if (cfg.mode == cmds[i].mode &&
 799                                     strcmp(argv[0], cmds[i].name) == 0) {
 800                                         if ((cmds[i].args != -1) &&
 801                                             (argc < (cmds[i].args + 1))) {
 802                                                 printf("%s needs %d argument%s\n",
 803                                                     cmds[i].name, cmds[i].args,
 804                                                     (cmds[i].args==1)?"":",");
 805                                                 break;
 806                                         }
 807
 808                                         r = (cmds[i].f)(&cfg, argc, argv);
 809
 810                                         /* -1 here means "error" */
 811                                         if (r == -1) {
 812                                                 argc = 0;
 813                                                 break;
 814                                         }
 815
 816                                         /* Legacy return value */
 817                                         if (r == 0)
 818                                                 r = cmds[i].args;
 819
 820                                         argc -= r;
 821                                         argv += r;
 822                                         break;
 823                                 }
 824                         }
 825                         if (cmds[i].name == NULL) {
 826                                 newmode(&cfg, MODE_NONE);
 827                                 continue;
 828                         }
 829                         break;
 830                 case MODE_REGISTER:
 831                         if (set_register(&cfg, argv[0]) != 0) {
 832                                 newmode(&cfg, MODE_NONE);
 833                                 continue;
 834                         }
 835                         break;
 836                 case MODE_PHYREG:
 837                         if (set_phyregister(&cfg, argv[0]) != 0) {
 838                                 newmode(&cfg, MODE_NONE);
 839                                 continue;
 840                         }
 841                         break;
 842                 }
 843                 argc--;
 844                 argv++;
 845         }
 846         /* switch back to command mode to print configuration for last command */
 847         newmode(&cfg, MODE_NONE);
 848         close(cfg.fd);
 849         return (0);
 850 }
 851
 852 static struct cmds cmds[] = {
 853         { MODE_PORT, "pvid", 1, set_port_vid },
 854         { MODE_PORT, "media", 1, set_port_media },
 855         { MODE_PORT, "mediaopt", 1, set_port_mediaopt },
 856         { MODE_PORT, "led", 2, set_port_led },
 857         { MODE_PORT, "addtag", 0, set_port_flag },
 858         { MODE_PORT, "-addtag", 0, set_port_flag },
 859         { MODE_PORT, "ingress", 0, set_port_flag },
 860         { MODE_PORT, "-ingress", 0, set_port_flag },
 861         { MODE_PORT, "striptag", 0, set_port_flag },
 862         { MODE_PORT, "-striptag", 0, set_port_flag },
 863         { MODE_PORT, "doubletag", 0, set_port_flag },
 864         { MODE_PORT, "-doubletag", 0, set_port_flag },
 865         { MODE_PORT, "firstlock", 0, set_port_flag },
 866         { MODE_PORT, "-firstlock", 0, set_port_flag },
 867         { MODE_PORT, "dropuntagged", 0, set_port_flag },
 868         { MODE_PORT, "-dropuntagged", 0, set_port_flag },
 869         { MODE_CONFIG, "vlan_mode", 1, set_vlan_mode },
 870         { MODE_VLANGROUP, "vlan", 1, set_vlangroup_vid },
 871         { MODE_VLANGROUP, "members", 1, set_vlangroup_members },
 872         { MODE_ATU, "flush", -1, atu_flush },
 873         { MODE_ATU, "dump", -1, atu_dump },
 874         { 0, NULL, 0, NULL }
 875 };