source: trunk/target/linux/generic-2.6/files/drivers/net/phy/mvswitch.c @ 14981

Last change on this file since 14981 was 14981, checked in by nbd, 8 years ago

atheros: in later kernels, vlan 0 no longer works as expected, switch to (1,2) instead of (0,1) for lan/wan

File size: 9.8 KB
Line 
1/*
2 * Marvell 88E6060 switch driver
3 * Copyright (c) 2008 Felix Fietkau <nbd@openwrt.org>
4 *
5 * This program is free software; you can redistribute  it and/or modify it
6 * under  the terms of the GNU General Public License v2 as published by the
7 * Free Software Foundation
8 */
9#include <linux/kernel.h>
10#include <linux/string.h>
11#include <linux/errno.h>
12#include <linux/unistd.h>
13#include <linux/slab.h>
14#include <linux/interrupt.h>
15#include <linux/init.h>
16#include <linux/delay.h>
17#include <linux/netdevice.h>
18#include <linux/etherdevice.h>
19#include <linux/skbuff.h>
20#include <linux/spinlock.h>
21#include <linux/mm.h>
22#include <linux/module.h>
23#include <linux/mii.h>
24#include <linux/ethtool.h>
25#include <linux/phy.h>
26#include <linux/if_vlan.h>
27
28#include <asm/io.h>
29#include <asm/irq.h>
30#include <asm/uaccess.h>
31#include "mvswitch.h"
32
33/* Undefine this to use trailer mode instead.
34 * I don't know if header mode works with all chips */
35//#define HEADER_MODE   1
36
37MODULE_DESCRIPTION("Marvell 88E6060 Switch driver");
38MODULE_AUTHOR("Felix Fietkau");
39MODULE_LICENSE("GPL");
40
41#define MVSWITCH_MAGIC 0x88E6060
42
43struct mvswitch_priv {
44        /* the driver's tx function */
45        int (*hardstart)(struct sk_buff *skb, struct net_device *dev);
46        struct vlan_group *grp;
47        u8 vlans[16];
48};
49
50#define to_mvsw(_phy) ((struct mvswitch_priv *) (_phy)->priv)
51
52static inline u16
53r16(struct phy_device *phydev, int addr, int reg)
54{
55        return phydev->bus->read(phydev->bus, addr, reg);
56}
57
58static inline void
59w16(struct phy_device *phydev, int addr, int reg, u16 val)
60{
61        phydev->bus->write(phydev->bus, addr, reg, val);
62}
63
64
65static int
66mvswitch_mangle_tx(struct sk_buff *skb, struct net_device *dev)
67{
68        struct mvswitch_priv *priv;
69        char *buf = NULL;
70        u16 vid;
71
72        priv = dev->phy_ptr;
73        if (unlikely(!priv))
74                goto error;
75
76        if (unlikely(skb->len < 16))
77                goto error;
78
79#ifdef HEADER_MODE
80        if (__vlan_hwaccel_get_tag(skb, &vid))
81                goto error;
82
83        if (skb_cloned(skb) || (skb->len <= 62) || (skb_headroom(skb) < MV_HEADER_SIZE)) {
84                if (pskb_expand_head(skb, MV_HEADER_SIZE, (skb->len < 62 ? 62 - skb->len : 0), GFP_ATOMIC))
85                        goto error_expand;
86                if (skb->len < 62)
87                        skb->len = 62;
88        }
89        buf = skb_push(skb, MV_HEADER_SIZE);
90#else
91        if (__vlan_get_tag(skb, &vid))
92                goto error;
93
94        if (unlikely((vid > 15 || !priv->vlans[vid])))
95                goto error;
96
97        if (skb->len <= 64) {
98                if (pskb_expand_head(skb, 0, 64 + MV_TRAILER_SIZE - skb->len, GFP_ATOMIC))
99                        goto error_expand;
100
101                buf = skb->data + 64;
102                skb->len = 64 + MV_TRAILER_SIZE;
103        } else {
104                if (skb_cloned(skb) || unlikely(skb_tailroom(skb) < 4)) {
105                        if (pskb_expand_head(skb, 0, 4, GFP_ATOMIC))
106                                goto error_expand;
107                }
108                buf = skb_put(skb, 4);
109        }
110
111        /* move the ethernet header 4 bytes forward, overwriting the vlan tag */
112        memmove(skb->data + 4, skb->data, 12);
113        skb->data += 4;
114        skb->len -= 4;
115        skb->mac_header += 4;
116#endif
117
118        if (!buf)
119                goto error;
120
121
122#ifdef HEADER_MODE
123        /* prepend the tag */
124        *((__be16 *) buf) = cpu_to_be16(
125                ((vid << MV_HEADER_VLAN_S) & MV_HEADER_VLAN_M) |
126                ((priv->vlans[vid] << MV_HEADER_PORTS_S) & MV_HEADER_PORTS_M)
127        );
128#else
129        /* append the tag */
130        *((__be32 *) buf) = cpu_to_be32((
131                (MV_TRAILER_OVERRIDE << MV_TRAILER_FLAGS_S) |
132                ((priv->vlans[vid] & MV_TRAILER_PORTS_M) << MV_TRAILER_PORTS_S)
133        ));
134#endif
135
136        return priv->hardstart(skb, dev);
137
138error_expand:
139        if (net_ratelimit())
140                printk("%s: failed to expand/update skb for the switch\n", dev->name);
141
142error:
143        /* any errors? drop the packet! */
144        dev_kfree_skb_any(skb);
145        return 0;
146}
147
148static int
149mvswitch_mangle_rx(struct sk_buff *skb, int napi)
150{
151        struct mvswitch_priv *priv;
152        struct net_device *dev;
153        int vlan = -1;
154        unsigned char *buf;
155        int i;
156
157        dev = skb->dev;
158        if (!dev)
159                goto error;
160
161        priv = dev->phy_ptr;
162        if (!priv)
163                goto error;
164
165        if (!priv->grp)
166                goto error;
167
168#ifdef HEADER_MODE
169        buf = skb->data;
170        skb_pull(skb, MV_HEADER_SIZE);
171#else
172        buf = skb->data + skb->len - MV_TRAILER_SIZE;
173        if (buf[0] != 0x80)
174                goto error;
175#endif
176
177        /* look for the vlan matching the incoming port */
178        for (i = 0; i < ARRAY_SIZE(priv->vlans); i++) {
179                if ((1 << buf[1]) & priv->vlans[i])
180                        vlan = i;
181        }
182
183        if (vlan == -1)
184                goto error;
185
186        skb->protocol = eth_type_trans(skb, skb->dev);
187
188        if (napi)
189                return vlan_hwaccel_receive_skb(skb, priv->grp, vlan);
190        else
191                return vlan_hwaccel_rx(skb, priv->grp, vlan);
192
193error:
194        /* no vlan? eat the packet! */
195        dev_kfree_skb_any(skb);
196        return 0;
197}
198
199
200static int
201mvswitch_netif_rx(struct sk_buff *skb)
202{
203        return mvswitch_mangle_rx(skb, 0);
204}
205
206static int
207mvswitch_netif_receive_skb(struct sk_buff *skb)
208{
209        return mvswitch_mangle_rx(skb, 1);
210}
211
212
213static void
214mvswitch_vlan_rx_register(struct net_device *dev, struct vlan_group *grp)
215{
216        struct mvswitch_priv *priv = dev->phy_ptr;
217        priv->grp = grp;
218}
219
220
221static int
222mvswitch_wait_mask(struct phy_device *pdev, int addr, int reg, u16 mask, u16 val)
223{
224        int i = 100;
225        u16 r;
226
227        do {
228                r = r16(pdev, addr, reg) & mask;
229                if (r == val)
230                        return 0;
231        } while(--i > 0);
232        return -ETIMEDOUT;
233}
234
235static int
236mvswitch_config_init(struct phy_device *pdev)
237{
238        struct mvswitch_priv *priv = to_mvsw(pdev);
239        struct net_device *dev = pdev->attached_dev;
240        u8 vlmap = 0;
241        int i;
242
243        if (!dev)
244                return -EINVAL;
245
246        printk("%s: Marvell 88E6060 PHY driver attached.\n", dev->name);
247        pdev->supported = ADVERTISED_100baseT_Full;
248        pdev->advertising = ADVERTISED_100baseT_Full;
249        dev->phy_ptr = priv;
250        dev->irq = PHY_POLL;
251
252        /* initialize default vlans */
253        for (i = 0; i < MV_PORTS; i++)
254                priv->vlans[(i == MV_WANPORT ? 2 : 1)] |= (1 << i);
255
256        /* before entering reset, disable all ports */
257        for (i = 0; i < MV_PORTS; i++)
258                w16(pdev, MV_PORTREG(CONTROL, i), 0x00);
259
260        msleep(2); /* wait for the status change to settle in */
261
262        /* put the ATU in reset */
263        w16(pdev, MV_SWITCHREG(ATU_CTRL), MV_ATUCTL_RESET);
264
265        i = mvswitch_wait_mask(pdev, MV_SWITCHREG(ATU_CTRL), MV_ATUCTL_RESET, 0);
266        if (i < 0) {
267                printk("%s: Timeout waiting for the switch to reset.\n", dev->name);
268                return i;
269        }
270
271        /* set the ATU flags */
272        w16(pdev, MV_SWITCHREG(ATU_CTRL),
273                MV_ATUCTL_NO_LEARN |
274                MV_ATUCTL_ATU_1K |
275                MV_ATUCTL_AGETIME(MV_ATUCTL_AGETIME_MIN) /* minimum without disabling ageing */
276        );
277
278        /* initialize the cpu port */
279        w16(pdev, MV_PORTREG(CONTROL, MV_CPUPORT),
280#ifdef HEADER_MODE
281                MV_PORTCTRL_HEADER |
282#else
283                MV_PORTCTRL_RXTR |
284                MV_PORTCTRL_TXTR |
285#endif
286                MV_PORTCTRL_ENABLED
287        );
288        /* wait for the phy change to settle in */
289        msleep(2);
290        for (i = 0; i < MV_PORTS; i++) {
291                u8 pvid = 0;
292                int j;
293
294                vlmap = 0;
295
296                /* look for the matching vlan */
297                for (j = 0; j < ARRAY_SIZE(priv->vlans); j++) {
298                        if (priv->vlans[j] & (1 << i)) {
299                                vlmap = priv->vlans[j];
300                                pvid = j;
301                        }
302                }
303                /* leave port unconfigured if it's not part of a vlan */
304                if (!vlmap)
305                        continue;
306
307                /* add the cpu port to the allowed destinations list */
308                vlmap |= (1 << MV_CPUPORT);
309
310                /* take port out of its own vlan destination map */
311                vlmap &= ~(1 << i);
312
313                /* apply vlan settings */
314                w16(pdev, MV_PORTREG(VLANMAP, i),
315                        MV_PORTVLAN_PORTS(vlmap) |
316                        MV_PORTVLAN_ID(i)
317                );
318
319                /* re-enable port */
320                w16(pdev, MV_PORTREG(CONTROL, i),
321                        MV_PORTCTRL_ENABLED
322                );
323        }
324
325        w16(pdev, MV_PORTREG(VLANMAP, MV_CPUPORT),
326                MV_PORTVLAN_ID(MV_CPUPORT)
327        );
328
329        /* set the port association vector */
330        for (i = 0; i <= MV_PORTS; i++) {
331                w16(pdev, MV_PORTREG(ASSOC, i),
332                        MV_PORTASSOC_PORTS(1 << i)
333                );
334        }
335
336        /* init switch control */
337        w16(pdev, MV_SWITCHREG(CTRL),
338                MV_SWITCHCTL_MSIZE |
339                MV_SWITCHCTL_DROP
340        );
341
342        /* hook into the tx function */
343        pdev->pkt_align = 2;
344        priv->hardstart = dev->hard_start_xmit;
345        pdev->netif_receive_skb = mvswitch_netif_receive_skb;
346        pdev->netif_rx = mvswitch_netif_rx;
347        dev->hard_start_xmit = mvswitch_mangle_tx;
348        dev->vlan_rx_register = mvswitch_vlan_rx_register;
349#ifdef HEADER_MODE
350        dev->features |= NETIF_F_HW_VLAN_RX | NETIF_F_HW_VLAN_TX;
351#else
352        dev->features |= NETIF_F_HW_VLAN_RX;
353#endif
354
355        return 0;
356}
357
358static int
359mvswitch_read_status(struct phy_device *pdev)
360{
361        pdev->speed = SPEED_100;
362        pdev->duplex = DUPLEX_FULL;
363        pdev->state = PHY_UP;
364
365        /* XXX ugly workaround: we can't force the switch
366         * to gracefully handle hosts moving from one port to another,
367         * so we have to regularly clear the ATU database */
368
369        /* wait for the ATU to become available */
370        mvswitch_wait_mask(pdev, MV_SWITCHREG(ATU_OP), MV_ATUOP_INPROGRESS, 0);
371
372        /* flush the ATU */
373        w16(pdev, MV_SWITCHREG(ATU_OP),
374                MV_ATUOP_INPROGRESS |
375                MV_ATUOP_FLUSH_ALL
376        );
377
378        /* wait for operation to complete */
379        mvswitch_wait_mask(pdev, MV_SWITCHREG(ATU_OP), MV_ATUOP_INPROGRESS, 0);
380
381        return 0;
382}
383
384static int
385mvswitch_config_aneg(struct phy_device *phydev)
386{
387        return 0;
388}
389
390static void
391mvswitch_remove(struct phy_device *pdev)
392{
393        struct mvswitch_priv *priv = to_mvsw(pdev);
394        struct net_device *dev = pdev->attached_dev;
395
396        /* restore old xmit handler */
397        if (priv->hardstart && dev)
398                dev->hard_start_xmit = priv->hardstart;
399        dev->vlan_rx_register = NULL;
400        dev->vlan_rx_kill_vid = NULL;
401        dev->phy_ptr = NULL;
402        dev->features &= ~NETIF_F_HW_VLAN_RX;
403        kfree(priv);
404}
405
406static int
407mvswitch_probe(struct phy_device *pdev)
408{
409        struct mvswitch_priv *priv;
410
411        priv = kzalloc(sizeof(struct mvswitch_priv), GFP_KERNEL);
412        if (priv == NULL)
413                return -ENOMEM;
414
415        pdev->priv = priv;
416
417        return 0;
418}
419
420static int
421mvswitch_fixup(struct phy_device *dev)
422{
423        u16 reg;
424
425        if (dev->addr != 0x10)
426                return 0;
427
428        reg = dev->bus->read(dev->bus, MV_PORTREG(IDENT, 0)) & MV_IDENT_MASK;
429        if (reg != MV_IDENT_VALUE)
430                return 0;
431
432        dev->phy_id = MVSWITCH_MAGIC;
433        return 0;
434}
435
436
437static struct phy_driver mvswitch_driver = {
438        .name           = "Marvell 88E6060",
439        .phy_id         = MVSWITCH_MAGIC,
440        .phy_id_mask    = 0xffffffff,
441        .features       = PHY_BASIC_FEATURES,
442        .probe          = &mvswitch_probe,
443        .remove         = &mvswitch_remove,
444        .config_init    = &mvswitch_config_init,
445        .config_aneg    = &mvswitch_config_aneg,
446        .read_status    = &mvswitch_read_status,
447        .driver         = { .owner = THIS_MODULE,},
448};
449
450static int __init
451mvswitch_init(void)
452{
453        phy_register_fixup_for_id(PHY_ANY_ID, mvswitch_fixup);
454        return phy_driver_register(&mvswitch_driver);
455}
456
457static void __exit
458mvswitch_exit(void)
459{
460        phy_driver_unregister(&mvswitch_driver);
461}
462
463module_init(mvswitch_init);
464module_exit(mvswitch_exit);
Note: See TracBrowser for help on using the repository browser.