openwrt/target/linux/package/switch/src/switch-robo.c

   1 /*
   2  * Broadcom BCM5325E/536x switch configuration module
   3  *
   4  * Copyright (C) 2005 Felix Fietkau <nbd@nbd.name>
   5  * Based on 'robocfg' by Oleg I. Vdovikin
   6  *
   7  * This program is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU General Public License
   9  * as published by the Free Software Foundation; either version 2
  10  * of the License, or (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
  20  * 02110-1301, USA.
  21  */
  22
  23 #include <linux/config.h>
  24 #include <linux/module.h>
  25 #include <linux/init.h>
  26 #include <linux/if.h>
  27 #include <linux/if_arp.h>
  28 #include <linux/sockios.h>
  29 #include <linux/ethtool.h>
  30 #include <linux/mii.h>
  31 #include <asm/uaccess.h>
  32
  33 #include "switch-core.h"
  34 #include "etc53xx.h"
  35
  36 #define DRIVER_NAME             "bcm53xx"
  37 #define DRIVER_VERSION  "0.01"
  38
  39 #define ROBO_PHY_ADDR   0x1E    /* robo switch phy address */
  40
  41 /* MII registers */
  42 #define REG_MII_PAGE    0x10    /* MII Page register */
  43 #define REG_MII_ADDR    0x11    /* MII Address register */
  44 #define REG_MII_DATA0   0x18    /* MII Data register 0 */
  45
  46 #define REG_MII_PAGE_ENABLE     1
  47 #define REG_MII_ADDR_WRITE      1
  48 #define REG_MII_ADDR_READ       2
  49
  50 /* Private et.o ioctls */
  51 #define SIOCGETCPHYRD           (SIOCDEVPRIVATE + 9)
  52 #define SIOCSETCPHYWR           (SIOCDEVPRIVATE + 10)
  53
  54 static int use_et = 0;
  55 static int is_5350 = 0;
  56 static struct ifreq ifr;
  57 static struct net_device *dev;
  58
  59 static int do_ioctl(int cmd, void *buf)
  60 {
  61         mm_segment_t old_fs = get_fs();
  62         int ret;
  63
  64         if (buf != NULL)
  65                 ifr.ifr_data = (caddr_t) buf;
  66
  67         set_fs(KERNEL_DS);
  68         ret = dev->do_ioctl(dev, &ifr, cmd);
  69         set_fs(old_fs);
  70
  71         return ret;
  72 }
  73
  74 static u16 mdio_read(__u16 phy_id, __u8 reg)
  75 {
  76         if (use_et) {
  77                 int args[2] = { reg };
  78
  79                 if (phy_id != ROBO_PHY_ADDR) {
  80                         printk(
  81                                 "Access to real 'phy' registers unavaliable.\n"
  82                                 "Upgrade kernel driver.\n");
  83
  84                         return 0xffff;
  85                 }
  86
  87
  88                 if (do_ioctl(SIOCGETCPHYRD, &args) < 0) {
  89                         printk("[%s:%d] SIOCGETCPHYRD failed!\n", __FILE__, __LINE__);
  90                         return 0xffff;
  91                 }
  92
  93                 return args[1];
  94         } else {
  95                 struct mii_ioctl_data *mii = (struct mii_ioctl_data *) &ifr.ifr_data;
  96                 mii->phy_id = phy_id;
  97                 mii->reg_num = reg;
  98
  99                 if (do_ioctl(SIOCGMIIREG, NULL) < 0) {
 100                         printk("[%s:%d] SIOCGMIIREG failed!\n", __FILE__, __LINE__);
 101
 102                         return 0xffff;
 103                 }
 104
 105                 return mii->val_out;
 106         }
 107 }
 108
 109 static void mdio_write(__u16 phy_id, __u8 reg, __u16 val)
 110 {
 111         if (use_et) {
 112                 int args[2] = { reg, val };
 113
 114                 if (phy_id != ROBO_PHY_ADDR) {
 115                         printk(
 116                                 "Access to real 'phy' registers unavaliable.\n"
 117                                 "Upgrade kernel driver.\n");
 118
 119                         return;
 120                 }
 121
 122                 if (do_ioctl(SIOCSETCPHYWR, args) < 0) {
 123                         printk("[%s:%d] SIOCGETCPHYWR failed!\n", __FILE__, __LINE__);
 124                         return;
 125                 }
 126         } else {
 127                 struct mii_ioctl_data *mii = (struct mii_ioctl_data *)&ifr.ifr_data;
 128
 129                 mii->phy_id = phy_id;
 130                 mii->reg_num = reg;
 131                 mii->val_in = val;
 132
 133                 if (do_ioctl(SIOCSMIIREG, NULL) < 0) {
 134                         printk("[%s:%d] SIOCSMIIREG failed!\n", __FILE__, __LINE__);
 135                         return;
 136                 }
 137         }
 138 }
 139
 140 static int robo_reg(__u8 page, __u8 reg, __u8 op)
 141 {
 142         int i = 3;
 143
 144         /* set page number */
 145         mdio_write(ROBO_PHY_ADDR, REG_MII_PAGE,
 146                 (page << 8) | REG_MII_PAGE_ENABLE);
 147
 148         /* set register address */
 149         mdio_write(ROBO_PHY_ADDR, REG_MII_ADDR,
 150                 (reg << 8) | op);
 151
 152         /* check if operation completed */
 153         while (i--) {
 154                 if ((mdio_read(ROBO_PHY_ADDR, REG_MII_ADDR) & 3) == 0)
 155                         return 0;
 156         }
 157
 158         printk("[%s:%d] timeout in robo_reg!\n", __FILE__, __LINE__);
 159
 160         return 0;
 161 }
 162
 163 static void robo_read(__u8 page, __u8 reg, __u16 *val, int count)
 164 {
 165         int i;
 166
 167         robo_reg(page, reg, REG_MII_ADDR_READ);
 168
 169         for (i = 0; i < count; i++)
 170                 val[i] = mdio_read(ROBO_PHY_ADDR, REG_MII_DATA0 + i);
 171 }
 172
 173 static __u16 robo_read16(__u8 page, __u8 reg)
 174 {
 175         robo_reg(page, reg, REG_MII_ADDR_READ);
 176
 177         return mdio_read(ROBO_PHY_ADDR, REG_MII_DATA0);
 178 }
 179
 180 static __u32 robo_read32(__u8 page, __u8 reg)
 181 {
 182         robo_reg(page, reg, REG_MII_ADDR_READ);
 183
 184         return mdio_read(ROBO_PHY_ADDR, REG_MII_DATA0) +
 185                 (mdio_read(ROBO_PHY_ADDR, REG_MII_DATA0 + 1) << 16);
 186 }
 187
 188 static void robo_write16(__u8 page, __u8 reg, __u16 val16)
 189 {
 190         /* write data */
 191         mdio_write(ROBO_PHY_ADDR, REG_MII_DATA0, val16);
 192
 193         robo_reg(page, reg, REG_MII_ADDR_WRITE);
 194 }
 195
 196 static void robo_write32(__u8 page, __u8 reg, __u32 val32)
 197 {
 198         /* write data */
 199         mdio_write(ROBO_PHY_ADDR, REG_MII_DATA0, val32 & 65535);
 200         mdio_write(ROBO_PHY_ADDR, REG_MII_DATA0 + 1, val32 >> 16);
 201
 202         robo_reg(page, reg, REG_MII_ADDR_WRITE);
 203 }
 204
 205 /* checks that attached switch is 5325E/5350 */
 206 static int robo_vlan5350()
 207 {
 208         /* set vlan access id to 15 and read it back */
 209         __u16 val16 = 15;
 210         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS_5350, val16);
 211
 212         /* 5365 will refuse this as it does not have this reg */
 213         return (robo_read16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS_5350) == val16);
 214 }
 215
 216
 217
 218 static int robo_probe(char *devname)
 219 {
 220         struct ethtool_drvinfo info;
 221         int i;
 222         __u32 phyid;
 223
 224         printk("Probing device %s: ", devname);
 225         strcpy(ifr.ifr_name, devname);
 226
 227         if ((dev = dev_get_by_name(devname)) == NULL) {
 228                 printk("No such device\n");
 229                 return 1;
 230         }
 231
 232         info.cmd = ETHTOOL_GDRVINFO;
 233         if (do_ioctl(SIOCETHTOOL, (void *) &info) < 0) {
 234                 printk("SIOCETHTOOL: not supported\n");
 235                 return 1;
 236         }
 237
 238         /* try access using MII ioctls - get phy address */
 239         if (do_ioctl(SIOCGMIIPHY, NULL) < 0) {
 240                 use_et = 1;
 241         } else {
 242                 /* got phy address check for robo address */
 243                 struct mii_ioctl_data *mii = (struct mii_ioctl_data *) &ifr.ifr_data;
 244                 if (mii->phy_id != ROBO_PHY_ADDR) {
 245                         printk("Invalid phy address (%d)\n", mii->phy_id);
 246                         return 1;
 247                 }
 248         }
 249
 250         phyid = mdio_read(ROBO_PHY_ADDR, 0x2) |
 251                 (mdio_read(ROBO_PHY_ADDR, 0x3) << 16);
 252
 253         if (phyid == 0xffffffff || phyid == 0x55210022) {
 254                 printk("No Robo switch in managed mode found\n");
 255                 return 1;
 256         }
 257
 258         is_5350 = robo_vlan5350();
 259
 260         printk("found!\n");
 261         return 0;
 262 }
 263
 264
 265 static int handle_vlan_port_read(void *driver, char *buf, int nr)
 266 {
 267         __u16 val16;
 268         int len = 0;
 269         int j;
 270
 271         val16 = (nr) /* vlan */ | (0 << 12) /* read */ | (1 << 13) /* enable */;
 272
 273         if (is_5350) {
 274                 u32 val32;
 275                 robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS_5350, val16);
 276                 /* actual read */
 277                 val32 = robo_read32(ROBO_VLAN_PAGE, ROBO_VLAN_READ);
 278                 if ((val32 & (1 << 20)) /* valid */) {
 279                         for (j = 0; j < 6; j++) {
 280                                 if (val32 & (1 << j)) {
 281                                         len += sprintf(buf + len, "%d%s\t", j,
 282                                                 (val32 & (1 << (j + 6))) ? (j == 5 ? "u" : "") : "t");
 283                                 }
 284                         }
 285                         len += sprintf(buf + len, "\n");
 286                 }
 287         } else {
 288                 robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS, val16);
 289                 /* actual read */
 290                 val16 = robo_read16(ROBO_VLAN_PAGE, ROBO_VLAN_READ);
 291                 if ((val16 & (1 << 14)) /* valid */) {
 292                         for (j = 0; j < 6; j++) {
 293                                 if (val16 & (1 << j)) {
 294                                         len += sprintf(buf + len, "%d%s\t", j, (val16 & (1 << (j + 7))) ?
 295                                                 (j == 5 ? "u" : "") : "t");
 296                                 }
 297                         }
 298                         len += sprintf(buf + len, "\n");
 299                 }
 300         }
 301
 302         return len;
 303 }
 304
 305 static int handle_vlan_port_write(void *driver, char *buf, int nr)
 306 {
 307         switch_driver *d = (switch_driver *) driver;
 308         switch_vlan_config *c = switch_parse_vlan(d, buf);
 309         int j;
 310         __u16 val16;
 311
 312         if (c == NULL)
 313                 return -EINVAL;
 314
 315         for (j = 0; j < d->ports; j++) {
 316                 if ((c->untag | c->pvid) & (1 << j))
 317                         /* change default vlan tag */
 318                         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_PORT0_DEF_TAG + (j << 1), nr);
 319         }
 320
 321         /* write config now */
 322         val16 = (nr) /* vlan */ | (1 << 12) /* write */ | (1 << 13) /* enable */;
 323         if (is_5350) {
 324                 robo_write32(ROBO_VLAN_PAGE, ROBO_VLAN_WRITE_5350,
 325                         (1 << 20) /* valid */ | (c->untag << 6) | c->port);
 326                 robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS_5350, val16);
 327         } else {
 328                 robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_WRITE,
 329                         (1 << 14)  /* valid */ | (c->untag << 7) | c->port);
 330                 robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS, val16);
 331         }
 332
 333         return 0;
 334 }
 335
 336 #define set_switch(state) \
 337         robo_write16(ROBO_CTRL_PAGE, ROBO_SWITCH_MODE, (robo_read16(ROBO_CTRL_PAGE, ROBO_SWITCH_MODE) & ~2) | (state ? 2 : 0));
 338
 339 static int handle_enable_read(void *driver, char *buf, int nr)
 340 {
 341         return sprintf(buf, "%d\n", (((robo_read16(ROBO_CTRL_PAGE, ROBO_SWITCH_MODE) & 2) == 2) ? 1 : 0));
 342 }
 343
 344 static int handle_enable_write(void *driver, char *buf, int nr)
 345 {
 346         set_switch(buf[0] == '1');
 347
 348         return 0;
 349 }
 350
 351 static int handle_enable_vlan_read(void *driver, char *buf, int nr)
 352 {
 353         return sprintf(buf, "%d\n", (((robo_read16(ROBO_VLAN_PAGE, ROBO_VLAN_CTRL0) & (1 << 7)) == (1 << 7)) ? 1 : 0));
 354 }
 355
 356 static int handle_enable_vlan_write(void *driver, char *buf, int nr)
 357 {
 358         int disable = ((buf[0] != '1') ? 1 : 0);
 359
 360         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_CTRL0, disable ? 0 :
 361                 (1 << 7) /* 802.1Q VLAN */ | (3 << 5) /* mac check and hash */);
 362         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_CTRL1, disable ? 0 :
 363                 (1 << 1) | (1 << 2) | (1 << 3) /* RSV multicast */);
 364         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_CTRL4, disable ? 0 :
 365                 (1 << 6) /* drop invalid VID frames */);
 366         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_CTRL5, disable ? 0 :
 367                 (1 << 3) /* drop miss V table frames */);
 368
 369         return 0;
 370 }
 371
 372 static int handle_reset(void *driver, char *buf, int nr)
 373 {
 374         switch_driver *d = (switch_driver *) driver;
 375         switch_vlan_config *c = switch_parse_vlan(d, buf);
 376         int j;
 377         __u16 val16;
 378
 379         if (c == NULL)
 380                 return -EINVAL;
 381
 382         /* disable switching */
 383         set_switch(0);
 384
 385         /* reset vlans */
 386         for (j = 0; j <= (is_5350 ? VLAN_ID_MAX5350 : VLAN_ID_MAX); j++) {
 387                 /* write config now */
 388                 val16 = (j) /* vlan */ | (1 << 12) /* write */ | (1 << 13) /* enable */;
 389                 if (is_5350)
 390                         robo_write32(ROBO_VLAN_PAGE, ROBO_VLAN_WRITE_5350, 0);
 391                 else
 392                         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_WRITE, 0);
 393                 robo_write16(ROBO_VLAN_PAGE, (is_5350 ? ROBO_VLAN_TABLE_ACCESS_5350 : ROBO_VLAN_TABLE_ACCESS), val16);
 394         }
 395
 396         /* enable switching */
 397         set_switch(1);
 398
 399         /* enable vlans */
 400         handle_enable_vlan_write(driver, "1", 0);
 401
 402         return 0;
 403 }
 404
 405 static int __init robo_init()
 406 {
 407         char *device = "ethX";
 408         int notfound = 1;
 409
 410         for (device[3] = '0'; (device[3] <= '3') && notfound; device[3]++) {
 411                 notfound = robo_probe(device);
 412         }
 413         device[3]--;
 414
 415         if (notfound)
 416                 return -ENODEV;
 417         else {
 418                 switch_config main[] = {
 419                         {"enable", handle_enable_read, handle_enable_write},
 420                         {"enable_vlan", handle_enable_vlan_read, handle_enable_vlan_write},
 421                         {"reset", NULL, handle_reset},
 422                         {NULL, NULL, NULL}
 423                 };
 424                 switch_config vlan[] = {
 425                         {"ports", handle_vlan_port_read, handle_vlan_port_write},
 426                         {NULL, NULL, NULL}
 427                 };
 428                 switch_driver driver = {
 429                         name: DRIVER_NAME,
 430                         version: DRIVER_VERSION,
 431                         interface: device,
 432                         cpuport: 5,
 433                         ports: 6,
 434                         vlans: 16,
 435                         driver_handlers: main,
 436                         port_handlers: NULL,
 437                         vlan_handlers: vlan,
 438                 };
 439
 440                 return switch_register_driver(&driver);
 441         }
 442 }
 443
 444 static void __exit robo_exit()
 445 {
 446         switch_unregister_driver(DRIVER_NAME);
 447 }
 448
 449
 450 MODULE_AUTHOR("Felix Fietkau <openwrt@nbd.name>");
 451 MODULE_LICENSE("GPL");
 452
 453 module_init(robo_init);
 454 module_exit(robo_exit);