target/linux/generic-2.6/files-2.6.25/drivers/net/phy/mvswitch.c

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