2 * Copyright (c) 2011-2012 Stefan Bethke.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 #include <sys/cdefs.h>
30 __FBSDID("$FreeBSD$");
41 #include <sys/types.h>
42 #include <sys/ioctl.h>
44 #include <net/if_media.h>
45 #include <dev/etherswitch/etherswitch.h>
47 int get_media_subtype(int, const char *);
48 int get_media_mode(int, const char *);
49 int get_media_options(int, const char *);
50 int lookup_media_word(struct ifmedia_description *, const char *);
51 void print_media_word(int, int);
52 void print_media_word_ifconfig(int);
55 #define IEEE802DOT1Q_VID_MAX 4094
56 #define IFMEDIAREQ_NULISTENTRIES 256
71 const char *controlfile;
72 etherswitch_conf_t conf;
73 etherswitch_info_t info;
82 void (*f)(struct cfg *, char *argv[]);
84 static struct cmds cmds[];
86 /* Must match the ETHERSWITCH_PORT_LED_* enum order */
87 static const char *ledstyles[] = { "default", "on", "off", "blink", NULL };
90 * Print a value a la the %b format of the kernel's printf.
91 * Stolen from ifconfig.c.
94 printb(const char *s, unsigned v, const char *bits)
99 if (bits && *bits == 8)
100 printf("%s=%o", s, v);
102 printf("%s=%x", s, v);
106 while ((i = *bits++) != '\0') {
107 if (v & (1 << (i-1))) {
111 for (; (c = *bits) > 32; bits++)
114 for (; *bits > 32; bits++)
122 read_register(struct cfg *cfg, int r)
124 struct etherswitch_reg er;
127 if (ioctl(cfg->fd, IOETHERSWITCHGETREG, &er) != 0)
128 err(EX_OSERR, "ioctl(IOETHERSWITCHGETREG)");
133 write_register(struct cfg *cfg, int r, int v)
135 struct etherswitch_reg er;
139 if (ioctl(cfg->fd, IOETHERSWITCHSETREG, &er) != 0)
140 err(EX_OSERR, "ioctl(IOETHERSWITCHSETREG)");
144 read_phyregister(struct cfg *cfg, int phy, int reg)
146 struct etherswitch_phyreg er;
150 if (ioctl(cfg->fd, IOETHERSWITCHGETPHYREG, &er) != 0)
151 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPHYREG)");
156 write_phyregister(struct cfg *cfg, int phy, int reg, int val)
158 struct etherswitch_phyreg er;
163 if (ioctl(cfg->fd, IOETHERSWITCHSETPHYREG, &er) != 0)
164 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPHYREG)");
168 set_port_vid(struct cfg *cfg, char *argv[])
171 etherswitch_port_t p;
173 v = strtol(argv[1], NULL, 0);
174 if (v < 0 || v > IEEE802DOT1Q_VID_MAX)
175 errx(EX_USAGE, "pvid must be between 0 and %d",
176 IEEE802DOT1Q_VID_MAX);
177 bzero(&p, sizeof(p));
178 p.es_port = cfg->unit;
179 if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
180 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
182 if (ioctl(cfg->fd, IOETHERSWITCHSETPORT, &p) != 0)
183 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPORT)");
187 set_port_flag(struct cfg *cfg, char *argv[])
192 etherswitch_port_t p;
197 if (strcmp(flag, "none") != 0) {
202 if (strcasecmp(flag, "striptag") == 0)
203 f = ETHERSWITCH_PORT_STRIPTAG;
204 else if (strcasecmp(flag, "addtag") == 0)
205 f = ETHERSWITCH_PORT_ADDTAG;
206 else if (strcasecmp(flag, "firstlock") == 0)
207 f = ETHERSWITCH_PORT_FIRSTLOCK;
208 else if (strcasecmp(flag, "dropuntagged") == 0)
209 f = ETHERSWITCH_PORT_DROPUNTAGGED;
210 else if (strcasecmp(flag, "doubletag") == 0)
211 f = ETHERSWITCH_PORT_DOUBLE_TAG;
212 else if (strcasecmp(flag, "ingress") == 0)
213 f = ETHERSWITCH_PORT_INGRESS;
215 bzero(&p, sizeof(p));
216 p.es_port = cfg->unit;
217 if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
218 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
223 if (ioctl(cfg->fd, IOETHERSWITCHSETPORT, &p) != 0)
224 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPORT)");
228 set_port_media(struct cfg *cfg, char *argv[])
230 etherswitch_port_t p;
231 int ifm_ulist[IFMEDIAREQ_NULISTENTRIES];
234 bzero(&p, sizeof(p));
235 p.es_port = cfg->unit;
236 p.es_ifmr.ifm_ulist = ifm_ulist;
237 p.es_ifmr.ifm_count = IFMEDIAREQ_NULISTENTRIES;
238 if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
239 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
240 if (p.es_ifmr.ifm_count == 0)
242 subtype = get_media_subtype(IFM_TYPE(ifm_ulist[0]), argv[1]);
243 p.es_ifr.ifr_media = (p.es_ifmr.ifm_current & IFM_IMASK) |
244 IFM_TYPE(ifm_ulist[0]) | subtype;
245 if (ioctl(cfg->fd, IOETHERSWITCHSETPORT, &p) != 0)
246 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPORT)");
250 set_port_mediaopt(struct cfg *cfg, char *argv[])
252 etherswitch_port_t p;
253 int ifm_ulist[IFMEDIAREQ_NULISTENTRIES];
256 bzero(&p, sizeof(p));
257 p.es_port = cfg->unit;
258 p.es_ifmr.ifm_ulist = ifm_ulist;
259 p.es_ifmr.ifm_count = IFMEDIAREQ_NULISTENTRIES;
260 if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
261 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
262 options = get_media_options(IFM_TYPE(ifm_ulist[0]), argv[1]);
264 errx(EX_USAGE, "invalid media options \"%s\"", argv[1]);
265 if (options & IFM_HDX) {
266 p.es_ifr.ifr_media &= ~IFM_FDX;
269 p.es_ifr.ifr_media |= options;
270 if (ioctl(cfg->fd, IOETHERSWITCHSETPORT, &p) != 0)
271 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPORT)");
275 set_port_led(struct cfg *cfg, char *argv[])
277 etherswitch_port_t p;
281 bzero(&p, sizeof(p));
282 p.es_port = cfg->unit;
283 if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
284 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
286 led = strtol(argv[1], NULL, 0);
287 if (led < 1 || led > p.es_nleds)
288 errx(EX_USAGE, "invalid led number %s; must be between 1 and %d",
289 argv[1], p.es_nleds);
293 for (i=0; ledstyles[i] != NULL; i++) {
294 if (strcmp(argv[2], ledstyles[i]) == 0) {
299 if (ledstyles[i] == NULL)
300 errx(EX_USAGE, "invalid led style \"%s\"", argv[2]);
302 if (ioctl(cfg->fd, IOETHERSWITCHSETPORT, &p) != 0)
303 err(EX_OSERR, "ioctl(IOETHERSWITCHSETPORT)");
307 set_vlangroup_vid(struct cfg *cfg, char *argv[])
310 etherswitch_vlangroup_t vg;
312 memset(&vg, 0, sizeof(vg));
313 v = strtol(argv[1], NULL, 0);
314 if (v < 0 || v > IEEE802DOT1Q_VID_MAX)
315 errx(EX_USAGE, "vlan must be between 0 and %d", IEEE802DOT1Q_VID_MAX);
316 vg.es_vlangroup = cfg->unit;
317 if (ioctl(cfg->fd, IOETHERSWITCHGETVLANGROUP, &vg) != 0)
318 err(EX_OSERR, "ioctl(IOETHERSWITCHGETVLANGROUP)");
320 if (ioctl(cfg->fd, IOETHERSWITCHSETVLANGROUP, &vg) != 0)
321 err(EX_OSERR, "ioctl(IOETHERSWITCHSETVLANGROUP)");
325 set_vlangroup_members(struct cfg *cfg, char *argv[])
327 etherswitch_vlangroup_t vg;
328 int member, untagged;
332 member = untagged = 0;
333 memset(&vg, 0, sizeof(vg));
334 if (strcmp(argv[1], "none") != 0) {
335 for (c=argv[1]; *c; c=d) {
336 v = strtol(c, &d, 0);
339 if (v < 0 || v >= cfg->info.es_nports)
340 errx(EX_USAGE, "Member port must be between 0 and %d", cfg->info.es_nports-1);
341 if (d[0] == ',' || d[0] == '\0' ||
342 ((d[0] == 't' || d[0] == 'T') && (d[1] == ',' || d[1] == '\0'))) {
343 if (d[0] == 't' || d[0] == 'T') {
344 untagged &= ~ETHERSWITCH_PORTMASK(v);
347 untagged |= ETHERSWITCH_PORTMASK(v);
348 member |= ETHERSWITCH_PORTMASK(v);
351 errx(EX_USAGE, "Invalid members specification \"%s\"", d);
354 vg.es_vlangroup = cfg->unit;
355 if (ioctl(cfg->fd, IOETHERSWITCHGETVLANGROUP, &vg) != 0)
356 err(EX_OSERR, "ioctl(IOETHERSWITCHGETVLANGROUP)");
357 vg.es_member_ports = member;
358 vg.es_untagged_ports = untagged;
359 if (ioctl(cfg->fd, IOETHERSWITCHSETVLANGROUP, &vg) != 0)
360 err(EX_OSERR, "ioctl(IOETHERSWITCHSETVLANGROUP)");
364 set_register(struct cfg *cfg, char *arg)
369 a = strtol(arg, &c, 0);
373 v = strtoul(c+1, NULL, 0);
374 write_register(cfg, a, v);
376 printf("\treg 0x%04x=0x%08x\n", a, read_register(cfg, a));
381 set_phyregister(struct cfg *cfg, char *arg)
386 phy = strtol(arg, &c, 0);
392 reg = strtol(d, &c, 0);
396 val = strtoul(c+1, NULL, 0);
397 write_phyregister(cfg, phy, reg, val);
399 printf("\treg %d.0x%02x=0x%04x\n", phy, reg, read_phyregister(cfg, phy, reg));
404 set_vlan_mode(struct cfg *cfg, char *argv[])
406 etherswitch_conf_t conf;
408 bzero(&conf, sizeof(conf));
409 conf.cmd = ETHERSWITCH_CONF_VLAN_MODE;
410 if (strcasecmp(argv[1], "isl") == 0)
411 conf.vlan_mode = ETHERSWITCH_VLAN_ISL;
412 else if (strcasecmp(argv[1], "port") == 0)
413 conf.vlan_mode = ETHERSWITCH_VLAN_PORT;
414 else if (strcasecmp(argv[1], "dot1q") == 0)
415 conf.vlan_mode = ETHERSWITCH_VLAN_DOT1Q;
416 else if (strcasecmp(argv[1], "dot1q4k") == 0)
417 conf.vlan_mode = ETHERSWITCH_VLAN_DOT1Q_4K;
418 else if (strcasecmp(argv[1], "qinq") == 0)
419 conf.vlan_mode = ETHERSWITCH_VLAN_DOUBLE_TAG;
422 if (ioctl(cfg->fd, IOETHERSWITCHSETCONF, &conf) != 0)
423 err(EX_OSERR, "ioctl(IOETHERSWITCHSETCONF)");
427 print_config(struct cfg *cfg)
431 /* Get the device name. */
432 c = strrchr(cfg->controlfile, '/');
436 c = cfg->controlfile;
438 /* Print VLAN mode. */
439 if (cfg->conf.cmd & ETHERSWITCH_CONF_VLAN_MODE) {
440 printf("%s: VLAN mode: ", c);
441 switch (cfg->conf.vlan_mode) {
442 case ETHERSWITCH_VLAN_ISL:
445 case ETHERSWITCH_VLAN_PORT:
448 case ETHERSWITCH_VLAN_DOT1Q:
451 case ETHERSWITCH_VLAN_DOT1Q_4K:
454 case ETHERSWITCH_VLAN_DOUBLE_TAG:
464 print_port(struct cfg *cfg, int port)
466 etherswitch_port_t p;
467 int ifm_ulist[IFMEDIAREQ_NULISTENTRIES];
470 bzero(&p, sizeof(p));
472 p.es_ifmr.ifm_ulist = ifm_ulist;
473 p.es_ifmr.ifm_count = IFMEDIAREQ_NULISTENTRIES;
474 if (ioctl(cfg->fd, IOETHERSWITCHGETPORT, &p) != 0)
475 err(EX_OSERR, "ioctl(IOETHERSWITCHGETPORT)");
476 printf("port%d:\n", port);
477 if (cfg->conf.vlan_mode == ETHERSWITCH_VLAN_DOT1Q)
478 printf("\tpvid: %d\n", p.es_pvid);
479 printb("\tflags", p.es_flags, ETHERSWITCH_PORT_FLAGS_BITS);
483 for (i = 0; i < p.es_nleds; i++) {
484 printf("%d:%s%s", i+1, ledstyles[p.es_led[i]], (i==p.es_nleds-1)?"":" ");
489 print_media_word(p.es_ifmr.ifm_current, 1);
490 if (p.es_ifmr.ifm_active != p.es_ifmr.ifm_current) {
493 print_media_word(p.es_ifmr.ifm_active, 0);
497 printf("\tstatus: %s\n", (p.es_ifmr.ifm_status & IFM_ACTIVE) != 0 ? "active" : "no carrier");
498 if (cfg->mediatypes) {
499 printf("\tsupported media:\n");
500 if (p.es_ifmr.ifm_count > IFMEDIAREQ_NULISTENTRIES)
501 p.es_ifmr.ifm_count = IFMEDIAREQ_NULISTENTRIES;
502 for (i=0; i<p.es_ifmr.ifm_count; i++) {
503 printf("\t\tmedia ");
504 print_media_word(ifm_ulist[i], 0);
511 print_vlangroup(struct cfg *cfg, int vlangroup)
513 etherswitch_vlangroup_t vg;
516 vg.es_vlangroup = vlangroup;
517 if (ioctl(cfg->fd, IOETHERSWITCHGETVLANGROUP, &vg) != 0)
518 err(EX_OSERR, "ioctl(IOETHERSWITCHGETVLANGROUP)");
519 if ((vg.es_vid & ETHERSWITCH_VID_VALID) == 0)
521 vg.es_vid &= ETHERSWITCH_VID_MASK;
522 printf("vlangroup%d:\n", vlangroup);
523 if (cfg->conf.vlan_mode == ETHERSWITCH_VLAN_PORT)
524 printf("\tport: %d\n", vg.es_vid);
526 printf("\tvlan: %d\n", vg.es_vid);
527 printf("\tmembers ");
529 if (vg.es_member_ports != 0)
530 for (i=0; i<cfg->info.es_nports; i++) {
531 if ((vg.es_member_ports & ETHERSWITCH_PORTMASK(i)) != 0) {
535 if ((vg.es_untagged_ports & ETHERSWITCH_PORTMASK(i)) == 0)
546 print_info(struct cfg *cfg)
551 c = strrchr(cfg->controlfile, '/');
555 c = cfg->controlfile;
557 printf("%s: %s with %d ports and %d VLAN groups\n", c,
558 cfg->info.es_name, cfg->info.es_nports,
559 cfg->info.es_nvlangroups);
561 printb("VLAN capabilities", cfg->info.es_vlan_caps,
562 ETHERSWITCH_VLAN_CAPS_BITS);
566 for (i=0; i<cfg->info.es_nports; i++) {
569 for (i=0; i<cfg->info.es_nvlangroups; i++) {
570 print_vlangroup(cfg, i);
575 usage(struct cfg *cfg __unused, char *argv[] __unused)
577 fprintf(stderr, "usage: etherswitchctl\n");
578 fprintf(stderr, "\tetherswitchcfg [-f control file] info\n");
579 fprintf(stderr, "\tetherswitchcfg [-f control file] config "
580 "command parameter\n");
581 fprintf(stderr, "\t\tconfig commands: vlan_mode\n");
582 fprintf(stderr, "\tetherswitchcfg [-f control file] phy "
583 "phy.register[=value]\n");
584 fprintf(stderr, "\tetherswitchcfg [-f control file] portX "
585 "[flags] command parameter\n");
586 fprintf(stderr, "\t\tport commands: pvid, media, mediaopt, led\n");
587 fprintf(stderr, "\tetherswitchcfg [-f control file] reg "
588 "register[=value]\n");
589 fprintf(stderr, "\tetherswitchcfg [-f control file] vlangroupX "
590 "command parameter\n");
591 fprintf(stderr, "\t\tvlangroup commands: vlan, members\n");
596 newmode(struct cfg *cfg, enum cmdmode mode)
598 if (mode == cfg->mode)
605 * Read the updated the configuration (it can be different
606 * from the last time we read it).
608 if (ioctl(cfg->fd, IOETHERSWITCHGETCONF, &cfg->conf) != 0)
609 err(EX_OSERR, "ioctl(IOETHERSWITCHGETCONF)");
613 print_port(cfg, cfg->unit);
616 print_vlangroup(cfg, cfg->unit);
626 main(int argc, char *argv[])
632 bzero(&cfg, sizeof(cfg));
633 cfg.controlfile = "/dev/etherswitch0";
634 while ((ch = getopt(argc, argv, "f:mv?")) != -1)
637 cfg.controlfile = optarg;
652 cfg.fd = open(cfg.controlfile, O_RDONLY);
654 err(EX_UNAVAILABLE, "Can't open control file: %s", cfg.controlfile);
655 if (ioctl(cfg.fd, IOETHERSWITCHGETINFO, &cfg.info) != 0)
656 err(EX_OSERR, "ioctl(IOETHERSWITCHGETINFO)");
657 if (ioctl(cfg.fd, IOETHERSWITCHGETCONF, &cfg.conf) != 0)
658 err(EX_OSERR, "ioctl(IOETHERSWITCHGETCONF)");
663 cfg.mode = MODE_NONE;
667 if (strcmp(argv[0], "info") == 0) {
669 } else if (sscanf(argv[0], "port%d", &cfg.unit) == 1) {
670 if (cfg.unit < 0 || cfg.unit >= cfg.info.es_nports)
671 errx(EX_USAGE, "port unit must be between 0 and %d", cfg.info.es_nports - 1);
672 newmode(&cfg, MODE_PORT);
673 } else if (sscanf(argv[0], "vlangroup%d", &cfg.unit) == 1) {
674 if (cfg.unit < 0 || cfg.unit >= cfg.info.es_nvlangroups)
676 "vlangroup unit must be between 0 and %d",
677 cfg.info.es_nvlangroups - 1);
678 newmode(&cfg, MODE_VLANGROUP);
679 } else if (strcmp(argv[0], "config") == 0) {
680 newmode(&cfg, MODE_CONFIG);
681 } else if (strcmp(argv[0], "phy") == 0) {
682 newmode(&cfg, MODE_PHYREG);
683 } else if (strcmp(argv[0], "reg") == 0) {
684 newmode(&cfg, MODE_REGISTER);
685 } else if (strcmp(argv[0], "help") == 0) {
688 errx(EX_USAGE, "Unknown command \"%s\"", argv[0]);
694 for(i=0; cmds[i].name != NULL; i++) {
695 if (cfg.mode == cmds[i].mode && strcmp(argv[0], cmds[i].name) == 0) {
696 if (argc < (cmds[i].args + 1)) {
697 printf("%s needs %d argument%s\n", cmds[i].name, cmds[i].args, (cmds[i].args==1)?"":",");
700 (cmds[i].f)(&cfg, argv);
701 argc -= cmds[i].args;
702 argv += cmds[i].args;
706 if (cmds[i].name == NULL) {
707 newmode(&cfg, MODE_NONE);
712 if (set_register(&cfg, argv[0]) != 0) {
713 newmode(&cfg, MODE_NONE);
718 if (set_phyregister(&cfg, argv[0]) != 0) {
719 newmode(&cfg, MODE_NONE);
727 /* switch back to command mode to print configuration for last command */
728 newmode(&cfg, MODE_NONE);
733 static struct cmds cmds[] = {
734 { MODE_PORT, "pvid", 1, set_port_vid },
735 { MODE_PORT, "media", 1, set_port_media },
736 { MODE_PORT, "mediaopt", 1, set_port_mediaopt },
737 { MODE_PORT, "led", 2, set_port_led },
738 { MODE_PORT, "addtag", 0, set_port_flag },
739 { MODE_PORT, "-addtag", 0, set_port_flag },
740 { MODE_PORT, "ingress", 0, set_port_flag },
741 { MODE_PORT, "-ingress", 0, set_port_flag },
742 { MODE_PORT, "striptag", 0, set_port_flag },
743 { MODE_PORT, "-striptag", 0, set_port_flag },
744 { MODE_PORT, "doubletag", 0, set_port_flag },
745 { MODE_PORT, "-doubletag", 0, set_port_flag },
746 { MODE_PORT, "firstlock", 0, set_port_flag },
747 { MODE_PORT, "-firstlock", 0, set_port_flag },
748 { MODE_PORT, "dropuntagged", 0, set_port_flag },
749 { MODE_PORT, "-dropuntagged", 0, set_port_flag },
750 { MODE_CONFIG, "vlan_mode", 1, set_vlan_mode },
751 { MODE_VLANGROUP, "vlan", 1, set_vlangroup_vid },
752 { MODE_VLANGROUP, "members", 1, set_vlangroup_members },