63110d7c94d1796a676f9fb6e6eab5d1a9783dda
[openwrt.git] / 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);