add patches for kernel 2.6.31
[librecmc/librecmc.git] / 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  * Copyright (C) 2008 Michael Buesch <mb@bu3sch.de>
6  * Based on 'robocfg' by Oleg I. Vdovikin
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License
10  * as published by the Free Software Foundation; either version 2
11  * of the License, or (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  
21  * 02110-1301, USA.
22  */
23
24 #include <linux/autoconf.h>
25 #include <linux/module.h>
26 #include <linux/init.h>
27 #include <linux/if.h>
28 #include <linux/if_arp.h>
29 #include <linux/sockios.h>
30 #include <linux/ethtool.h>
31 #include <linux/mii.h>
32 #include <linux/delay.h>
33 #include <asm/uaccess.h>
34
35 #include "switch-core.h"
36 #include "etc53xx.h"
37
38 #define DRIVER_NAME             "bcm53xx"
39 #define DRIVER_VERSION          "0.02"
40 #define PFX                     "roboswitch: "
41
42 #define ROBO_PHY_ADDR           0x1E    /* robo switch phy address */
43 #define ROBO_PHY_ADDR_TG3       0x01    /* Tigon3 PHY address */
44 #define ROBO_PHY_ADDR_BCM63XX   0x00    /* BCM63XX PHY address */
45
46 /* MII registers */
47 #define REG_MII_PAGE    0x10    /* MII Page register */
48 #define REG_MII_ADDR    0x11    /* MII Address register */
49 #define REG_MII_DATA0   0x18    /* MII Data register 0 */
50
51 #define REG_MII_PAGE_ENABLE     1
52 #define REG_MII_ADDR_WRITE      1
53 #define REG_MII_ADDR_READ       2
54
55 /* Robo device ID register (in ROBO_MGMT_PAGE) */
56 #define ROBO_DEVICE_ID          0x30
57 #define  ROBO_DEVICE_ID_5325    0x25 /* Faked */
58 #define  ROBO_DEVICE_ID_5395    0x95
59 #define  ROBO_DEVICE_ID_5397    0x97
60 #define  ROBO_DEVICE_ID_5398    0x98
61
62 /* Private et.o ioctls */
63 #define SIOCGETCPHYRD           (SIOCDEVPRIVATE + 9)
64 #define SIOCSETCPHYWR           (SIOCDEVPRIVATE + 10)
65
66 /* linux 2.4 does not have 'bool' */
67 #if LINUX_VERSION_CODE < KERNEL_VERSION(2,5,0)
68 #define bool int
69 #endif
70
71 /* Only available on brcm-2.4/brcm47xx */
72 #ifdef BROADCOM
73 extern char *nvram_get(const char *name);
74 #define getvar(str) (nvram_get(str)?:"")
75 #else
76 #define getvar(str) ""
77 #endif
78
79 /* Data structure for a Roboswitch device. */
80 struct robo_switch {
81         char *device;                   /* The device name string (ethX) */
82         u16 devid;                      /* ROBO_DEVICE_ID_53xx */
83         bool use_et;
84         bool is_5350;
85         u8 phy_addr;                    /* PHY address of the device */
86         struct ifreq ifr;
87         struct net_device *dev;
88         unsigned char port[6];
89 };
90
91 /* Currently we can only have one device in the system. */
92 static struct robo_switch robo;
93
94
95 static int do_ioctl(int cmd, void *buf)
96 {
97         mm_segment_t old_fs = get_fs();
98         int ret;
99
100         if (buf != NULL)
101                 robo.ifr.ifr_data = (caddr_t) buf;
102
103         set_fs(KERNEL_DS);
104 #if LINUX_VERSION_CODE >= KERNEL_VERSION(2,6,31)
105         ret = robo.dev->netdev_ops->ndo_do_ioctl(robo.dev, &robo.ifr, cmd);
106 #else
107         ret = robo.dev->do_ioctl(robo.dev, &robo.ifr, cmd);
108 #endif
109         set_fs(old_fs);
110
111         return ret;
112 }
113
114 static u16 mdio_read(__u16 phy_id, __u8 reg)
115 {
116         if (robo.use_et) {
117                 int args[2] = { reg };
118
119                 if (phy_id != robo.phy_addr) {
120                         printk(KERN_ERR PFX
121                                 "Access to real 'phy' registers unavaliable.\n"
122                                 "Upgrade kernel driver.\n");
123
124                         return 0xffff;
125                 }
126
127
128                 if (do_ioctl(SIOCGETCPHYRD, &args) < 0) {
129                         printk(KERN_ERR PFX
130                                "[%s:%d] SIOCGETCPHYRD failed!\n", __FILE__, __LINE__);
131                         return 0xffff;
132                 }
133         
134                 return args[1];
135         } else {
136                 struct mii_ioctl_data *mii = (struct mii_ioctl_data *) &robo.ifr.ifr_data;
137                 mii->phy_id = phy_id;
138                 mii->reg_num = reg;
139
140                 if (do_ioctl(SIOCGMIIREG, NULL) < 0) {
141                         printk(KERN_ERR PFX
142                                "[%s:%d] SIOCGMIIREG failed!\n", __FILE__, __LINE__);
143
144                         return 0xffff;
145                 }
146
147                 return mii->val_out;
148         }
149 }
150
151 static void mdio_write(__u16 phy_id, __u8 reg, __u16 val)
152 {
153         if (robo.use_et) {
154                 int args[2] = { reg, val };
155
156                 if (phy_id != robo.phy_addr) {
157                         printk(KERN_ERR PFX
158                                 "Access to real 'phy' registers unavaliable.\n"
159                                 "Upgrade kernel driver.\n");
160
161                         return;
162                 }
163                 
164                 if (do_ioctl(SIOCSETCPHYWR, args) < 0) {
165                         printk(KERN_ERR PFX
166                                "[%s:%d] SIOCGETCPHYWR failed!\n", __FILE__, __LINE__);
167                         return;
168                 }
169         } else {
170                 struct mii_ioctl_data *mii = (struct mii_ioctl_data *)&robo.ifr.ifr_data;
171
172                 mii->phy_id = phy_id;
173                 mii->reg_num = reg;
174                 mii->val_in = val;
175
176                 if (do_ioctl(SIOCSMIIREG, NULL) < 0) {
177                         printk(KERN_ERR PFX
178                                "[%s:%d] SIOCSMIIREG failed!\n", __FILE__, __LINE__);
179                         return;
180                 }
181         }
182 }
183
184 static int robo_reg(__u8 page, __u8 reg, __u8 op)
185 {
186         int i = 3;
187         
188         /* set page number */
189         mdio_write(robo.phy_addr, REG_MII_PAGE, 
190                 (page << 8) | REG_MII_PAGE_ENABLE);
191         
192         /* set register address */
193         mdio_write(robo.phy_addr, REG_MII_ADDR, 
194                 (reg << 8) | op);
195
196         /* check if operation completed */
197         while (i--) {
198                 if ((mdio_read(robo.phy_addr, REG_MII_ADDR) & 3) == 0)
199                         return 0;
200         }
201
202         printk(KERN_ERR PFX "[%s:%d] timeout in robo_reg!\n", __FILE__, __LINE__);
203         
204         return 0;
205 }
206
207 /*
208 static void robo_read(__u8 page, __u8 reg, __u16 *val, int count)
209 {
210         int i;
211         
212         robo_reg(page, reg, REG_MII_ADDR_READ);
213         
214         for (i = 0; i < count; i++)
215                 val[i] = mdio_read(robo.phy_addr, REG_MII_DATA0 + i);
216 }
217 */
218
219 static __u16 robo_read16(__u8 page, __u8 reg)
220 {
221         robo_reg(page, reg, REG_MII_ADDR_READ);
222         
223         return mdio_read(robo.phy_addr, REG_MII_DATA0);
224 }
225
226 static __u32 robo_read32(__u8 page, __u8 reg)
227 {
228         robo_reg(page, reg, REG_MII_ADDR_READ);
229         
230         return mdio_read(robo.phy_addr, REG_MII_DATA0) +
231                 (mdio_read(robo.phy_addr, REG_MII_DATA0 + 1) << 16);
232 }
233
234 static void robo_write16(__u8 page, __u8 reg, __u16 val16)
235 {
236         /* write data */
237         mdio_write(robo.phy_addr, REG_MII_DATA0, val16);
238
239         robo_reg(page, reg, REG_MII_ADDR_WRITE);
240 }
241
242 static void robo_write32(__u8 page, __u8 reg, __u32 val32)
243 {
244         /* write data */
245         mdio_write(robo.phy_addr, REG_MII_DATA0, val32 & 65535);
246         mdio_write(robo.phy_addr, REG_MII_DATA0 + 1, val32 >> 16);
247         
248         robo_reg(page, reg, REG_MII_ADDR_WRITE);
249 }
250
251 /* checks that attached switch is 5325E/5350 */
252 static int robo_vlan5350(void)
253 {
254         /* set vlan access id to 15 and read it back */
255         __u16 val16 = 15;
256         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS_5350, val16);
257         
258         /* 5365 will refuse this as it does not have this reg */
259         return (robo_read16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS_5350) == val16);
260 }
261
262 static int robo_switch_enable(void)
263 {
264         unsigned int i, last_port;
265         u16 val;
266
267         val = robo_read16(ROBO_CTRL_PAGE, ROBO_SWITCH_MODE);
268         if (!(val & (1 << 1))) {
269                 /* Unmanaged mode */
270                 val &= ~(1 << 0);
271                 /* With forwarding */
272                 val |= (1 << 1);
273                 robo_write16(ROBO_CTRL_PAGE, ROBO_SWITCH_MODE, val);
274                 val = robo_read16(ROBO_CTRL_PAGE, ROBO_SWITCH_MODE);
275                 if (!(val & (1 << 1))) {
276                         printk("Failed to enable switch\n");
277                         return -EBUSY;
278                 }
279
280                 last_port = (robo.devid == ROBO_DEVICE_ID_5398) ?
281                                 ROBO_PORT6_CTRL : ROBO_PORT3_CTRL;
282                 for (i = ROBO_PORT0_CTRL; i < last_port + 1; i++)
283                         robo_write16(ROBO_CTRL_PAGE, i, 0);
284         }
285
286         /* WAN port LED, except for Netgear WGT634U */
287         if (strcmp(getvar("nvram_type"), "cfe") != 0)
288                 robo_write16(ROBO_CTRL_PAGE, 0x16, 0x1F);
289
290         return 0;
291 }
292
293 static void robo_switch_reset(void)
294 {
295         if ((robo.devid == ROBO_DEVICE_ID_5395) ||
296             (robo.devid == ROBO_DEVICE_ID_5397) ||
297             (robo.devid == ROBO_DEVICE_ID_5398)) {
298                 /* Trigger a software reset. */
299                 robo_write16(ROBO_CTRL_PAGE, 0x79, 0x83);
300                 robo_write16(ROBO_CTRL_PAGE, 0x79, 0);
301         }
302 }
303
304 static int robo_probe(char *devname)
305 {
306         __u32 phyid;
307         unsigned int i;
308         int err;
309
310         printk(KERN_INFO PFX "Probing device %s: ", devname);
311         strcpy(robo.ifr.ifr_name, devname);
312
313 #if LINUX_VERSION_CODE < KERNEL_VERSION(2,6,24)
314         if ((robo.dev = dev_get_by_name(devname)) == NULL) {
315 #else
316         if ((robo.dev = dev_get_by_name(&init_net, devname)) == NULL) {
317 #endif
318                 printk("No such device\n");
319                 return 1;
320         }
321
322         robo.device = devname;
323         for (i = 0; i < 5; i++)
324                 robo.port[i] = i;
325         robo.port[5] = 8;
326
327         /* try access using MII ioctls - get phy address */
328         if (do_ioctl(SIOCGMIIPHY, NULL) < 0) {
329                 robo.use_et = 1;
330                 robo.phy_addr = ROBO_PHY_ADDR;
331         } else {
332                 /* got phy address check for robo address */
333                 struct mii_ioctl_data *mii = (struct mii_ioctl_data *) &robo.ifr.ifr_data;
334                 if ((mii->phy_id != ROBO_PHY_ADDR) &&
335                     (mii->phy_id != ROBO_PHY_ADDR_BCM63XX) &&
336                     (mii->phy_id != ROBO_PHY_ADDR_TG3)) {
337                         printk("Invalid phy address (%d)\n", mii->phy_id);
338                         return 1;
339                 }
340                 robo.use_et = 0;
341                 /* The robo has a fixed PHY address that is different from the
342                  * Tigon3 and BCM63xx PHY address. */
343                 robo.phy_addr = ROBO_PHY_ADDR;
344         }
345
346         phyid = mdio_read(robo.phy_addr, 0x2) | 
347                 (mdio_read(robo.phy_addr, 0x3) << 16);
348
349         if (phyid == 0xffffffff || phyid == 0x55210022) {
350                 printk("No Robo switch in managed mode found, phy_id = 0x%08x\n", phyid);
351                 return 1;
352         }
353
354         /* Get the device ID */
355         for (i = 0; i < 10; i++) {
356                 robo.devid = robo_read16(ROBO_MGMT_PAGE, ROBO_DEVICE_ID);
357                 if (robo.devid)
358                         break;
359                 udelay(10);
360         }
361         if (!robo.devid)
362                 robo.devid = ROBO_DEVICE_ID_5325; /* Fake it */
363         robo.is_5350 = robo_vlan5350();
364
365         robo_switch_reset();
366         err = robo_switch_enable();
367         if (err)
368                 return err;
369
370         printk("found!\n");
371         return 0;
372 }
373
374
375 static int handle_vlan_port_read(void *driver, char *buf, int nr)
376 {
377         __u16 val16;
378         int len = 0;
379         int j;
380
381         val16 = (nr) /* vlan */ | (0 << 12) /* read */ | (1 << 13) /* enable */;
382         
383         if (robo.is_5350) {
384                 u32 val32;
385                 robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS_5350, val16);
386                 /* actual read */
387                 val32 = robo_read32(ROBO_VLAN_PAGE, ROBO_VLAN_READ);
388                 if ((val32 & (1 << 20)) /* valid */) {
389                         for (j = 0; j < 6; j++) {
390                                 if (val32 & (1 << j)) {
391                                         len += sprintf(buf + len, "%d", j);
392                                         if (val32 & (1 << (j + 6))) {
393                                                 if (j == 5) buf[len++] = 'u';
394                                         } else {
395                                                 buf[len++] = 't';
396                                                 if (robo_read16(ROBO_VLAN_PAGE, ROBO_VLAN_PORT0_DEF_TAG + (j << 1)) == nr)
397                                                         buf[len++] = '*';
398                                         }
399                                         buf[len++] = '\t';
400                                 }
401                         }
402                         len += sprintf(buf + len, "\n");
403                 }
404         } else { 
405                 robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS, val16);
406                 /* actual read */
407                 val16 = robo_read16(ROBO_VLAN_PAGE, ROBO_VLAN_READ);
408                 if ((val16 & (1 << 14)) /* valid */) {
409                         for (j = 0; j < 6; j++) {
410                                 if (val16 & (1 << j)) {
411                                         len += sprintf(buf + len, "%d", j);
412                                         if (val16 & (1 << (j + 7))) {
413                                                 if (j == 5) buf[len++] = 'u';
414                                         } else {
415                                                 buf[len++] = 't';
416                                                 if (robo_read16(ROBO_VLAN_PAGE, ROBO_VLAN_PORT0_DEF_TAG + (j << 1)) == nr)
417                                                         buf[len++] = '*';
418                                         }
419                                         buf[len++] = '\t';
420                                 }
421                         }
422                         len += sprintf(buf + len, "\n");
423                 }
424         }
425
426         buf[len] = '\0';
427
428         return len;
429 }
430
431 static int handle_vlan_port_write(void *driver, char *buf, int nr)
432 {
433         switch_driver *d = (switch_driver *) driver;
434         switch_vlan_config *c = switch_parse_vlan(d, buf);
435         int j;
436         __u16 val16;
437         
438         if (c == NULL)
439                 return -EINVAL;
440
441         for (j = 0; j < d->ports; j++) {
442                 if ((c->untag | c->pvid) & (1 << j))
443                         /* change default vlan tag */
444                         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_PORT0_DEF_TAG + (j << 1), nr);
445         }
446
447         /* write config now */
448         val16 = (nr) /* vlan */ | (1 << 12) /* write */ | (1 << 13) /* enable */;
449         if (robo.is_5350) {
450                 robo_write32(ROBO_VLAN_PAGE, ROBO_VLAN_WRITE_5350,
451                         (1 << 20) /* valid */ | (c->untag << 6) | c->port);
452                 robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS_5350, val16);
453         } else {
454                 robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_WRITE,
455                         (1 << 14)  /* valid */ | (c->untag << 7) | c->port);
456                 robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_TABLE_ACCESS, val16);
457         }
458
459         return 0;
460 }
461
462 #define set_switch(state) \
463         robo_write16(ROBO_CTRL_PAGE, ROBO_SWITCH_MODE, (robo_read16(ROBO_CTRL_PAGE, ROBO_SWITCH_MODE) & ~2) | (state ? 2 : 0));
464
465 static int handle_enable_read(void *driver, char *buf, int nr)
466 {
467         return sprintf(buf, "%d\n", (((robo_read16(ROBO_CTRL_PAGE, ROBO_SWITCH_MODE) & 2) == 2) ? 1 : 0));
468 }
469
470 static int handle_enable_write(void *driver, char *buf, int nr)
471 {
472         set_switch(buf[0] == '1');
473
474         return 0;
475 }
476
477 static int handle_enable_vlan_read(void *driver, char *buf, int nr)
478 {
479         return sprintf(buf, "%d\n", (((robo_read16(ROBO_VLAN_PAGE, ROBO_VLAN_CTRL0) & (1 << 7)) == (1 << 7)) ? 1 : 0));
480 }
481
482 static int handle_enable_vlan_write(void *driver, char *buf, int nr)
483 {
484         int disable = ((buf[0] != '1') ? 1 : 0);
485         
486         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_CTRL0, disable ? 0 :
487                 (1 << 7) /* 802.1Q VLAN */ | (3 << 5) /* mac check and hash */);
488         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_CTRL1, disable ? 0 :
489                 (1 << 1) | (1 << 2) | (1 << 3) /* RSV multicast */);
490         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_CTRL4, disable ? 0 :
491                 (1 << 6) /* drop invalid VID frames */);
492         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_CTRL5, disable ? 0 :
493                 (1 << 3) /* drop miss V table frames */);
494
495         return 0;
496 }
497
498 static int handle_reset(void *driver, char *buf, int nr)
499 {
500         switch_driver *d = (switch_driver *) driver;
501         switch_vlan_config *c = switch_parse_vlan(d, buf);
502         int j;
503         __u16 val16;
504         
505         if (c == NULL)
506                 return -EINVAL;
507
508         /* disable switching */
509         set_switch(0);
510
511         /* reset vlans */
512         for (j = 0; j <= ((robo.is_5350) ? VLAN_ID_MAX5350 : VLAN_ID_MAX); j++) {
513                 /* write config now */
514                 val16 = (j) /* vlan */ | (1 << 12) /* write */ | (1 << 13) /* enable */;
515                 if (robo.is_5350)
516                         robo_write32(ROBO_VLAN_PAGE, ROBO_VLAN_WRITE_5350, 0);
517                 else
518                         robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_WRITE, 0);
519                 robo_write16(ROBO_VLAN_PAGE, robo.is_5350 ? ROBO_VLAN_TABLE_ACCESS_5350 :
520                                                             ROBO_VLAN_TABLE_ACCESS,
521                              val16);
522         }
523
524         /* reset ports to a known good state */
525         for (j = 0; j < d->ports; j++) {
526                 robo_write16(ROBO_CTRL_PAGE, robo.port[j], 0x0000);
527                 robo_write16(ROBO_VLAN_PAGE, ROBO_VLAN_PORT0_DEF_TAG + (j << 1), 0);
528         }
529
530         /* enable switching */
531         set_switch(1);
532
533         /* enable vlans */
534         handle_enable_vlan_write(driver, "1", 0);
535
536         return 0;
537 }
538
539 static int __init robo_init(void)
540 {
541         int notfound = 1;
542         char *device;
543
544         device = strdup("ethX");
545         for (device[3] = '0'; (device[3] <= '3') && notfound; device[3]++) {
546                 if (! switch_device_registered (device))
547                         notfound = robo_probe(device);
548         }
549         device[3]--;
550         
551         if (notfound) {
552                 kfree(device);
553                 return -ENODEV;
554         } else {
555                 static const switch_config cfg[] = {
556                         {
557                                 .name   = "enable",
558                                 .read   = handle_enable_read,
559                                 .write  = handle_enable_write
560                         }, {
561                                 .name   = "enable_vlan",
562                                 .read   = handle_enable_vlan_read,
563                                 .write  = handle_enable_vlan_write
564                         }, {
565                                 .name   = "reset",
566                                 .read   = NULL,
567                                 .write  = handle_reset
568                         }, { NULL, },
569                 };
570                 static const switch_config vlan[] = {
571                         {
572                                 .name   = "ports",
573                                 .read   = handle_vlan_port_read,
574                                 .write  = handle_vlan_port_write
575                         }, { NULL, },
576                 };
577                 switch_driver driver = {
578                         .name                   = DRIVER_NAME,
579                         .version                = DRIVER_VERSION,
580                         .interface              = device,
581                         .cpuport                = 5,
582                         .ports                  = 6,
583                         .vlans                  = 16,
584                         .driver_handlers        = cfg,
585                         .port_handlers          = NULL,
586                         .vlan_handlers          = vlan,
587                 };
588
589                 return switch_register_driver(&driver);
590         }
591 }
592
593 static void __exit robo_exit(void)
594 {
595         switch_unregister_driver(DRIVER_NAME);
596         kfree(robo.device);
597 }
598
599
600 MODULE_AUTHOR("Felix Fietkau <openwrt@nbd.name>");
601 MODULE_LICENSE("GPL");
602
603 module_init(robo_init);
604 module_exit(robo_exit);