target/linux/ath25/files/drivers/net/phy/mvswitch.c

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