drivers/net/cpsw.c

   1 /*
   2  * CPSW Ethernet Switch Driver
   3  *
   4  * Copyright (C) 2010 Texas Instruments Incorporated - http://www.ti.com/
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU General Public License as
   8  * published by the Free Software Foundation version 2.
   9  *
  10  * This program is distributed "as is" WITHOUT ANY WARRANTY of any
  11  * kind, whether express or implied; without even the implied warranty
  12  * of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  13  * GNU General Public License for more details.
  14  */
  15
  16 #include <common.h>
  17 #include <command.h>
  18 #include <net.h>
  19 #include <miiphy.h>
  20 #include <malloc.h>
  21 #include <net.h>
  22 #include <netdev.h>
  23 #include <asm/errno.h>
  24 #include <asm/io.h>
  25 #include <phy.h>
  26 #include <asm/arch/cpu.h>
  27
  28 #define BITMASK(bits)           (BIT(bits) - 1)
  29
  30 #define PHY_REG_MASK            0x1f
  31 #define PHY_ID_MASK             0x1f
  32 #define NUM_DESCS               (PKTBUFSRX * 2)
  33 #define PKT_MIN                 60
  34 #define PKT_MAX                 (1500 + 14 + 4 + 4)
  35 #define CLEAR_BIT               1
  36
  37 /* MAC_CONTROL register bits */
  38 #define GIGABITEN               BIT(7)
  39 #define FULLDUPLEXEN            BIT(0)
  40 #define MAC_CTRL_CMD_IDLE       BIT(11)
  41 #define MIIEN                   BIT(15)
  42
  43 /* MAC_STATUS register bits */
  44 #define MAC_STAT_IDLE           BIT(31)
  45
  46 /* DMA Registers */
  47 #define CPDMA_TXCONTROL         0x004
  48 #define CPDMA_RXCONTROL         0x014
  49 #define CPDMA_SOFTRESET         0x01c
  50 #define CPDMA_DMACONTROL        0x020
  51 #define CPDMA_DMASTATUS         0x024
  52 #define CPDMA_RXFREE            0x0e0
  53 #define CPDMA_TXHDP_VER1        0x100
  54 #define CPDMA_TXHDP_VER2        0x200
  55 #define CPDMA_RXHDP_VER1        0x120
  56 #define CPDMA_RXHDP_VER2        0x220
  57 #define CPDMA_TXCP_VER1         0x140
  58 #define CPDMA_TXCP_VER2         0x240
  59 #define CPDMA_RXCP_VER1         0x160
  60 #define CPDMA_RXCP_VER2         0x260
  61
  62 #define DMACONTROL_CMD_IDLE     BIT(3)
  63
  64 #define DMASTATUS_IDLE          BIT(31)
  65
  66 /* Descriptor mode bits */
  67 #define CPDMA_DESC_SOP          BIT(31)
  68 #define CPDMA_DESC_EOP          BIT(30)
  69 #define CPDMA_DESC_OWNER        BIT(29)
  70 #define CPDMA_DESC_EOQ          BIT(28)
  71
  72 /*
  73  * This timeout definition is a worst-case ultra defensive measure against
  74  * unexpected controller lock ups.  Ideally, we should never ever hit this
  75  * scenario in practice.
  76  */
  77 #define MDIO_TIMEOUT            100 /* msecs */
  78 #define CPDMA_TIMEOUT           100 /* msecs */
  79
  80 struct cpsw_mdio_regs {
  81         u32     version;
  82         u32     control;
  83 #define CONTROL_IDLE            BIT(31)
  84 #define CONTROL_ENABLE          BIT(30)
  85
  86         u32     alive;
  87         u32     link;
  88         u32     linkintraw;
  89         u32     linkintmasked;
  90         u32     __reserved_0[2];
  91         u32     userintraw;
  92         u32     userintmasked;
  93         u32     userintmaskset;
  94         u32     userintmaskclr;
  95         u32     __reserved_1[20];
  96
  97         struct {
  98                 u32             access;
  99                 u32             physel;
 100 #define USERACCESS_GO           BIT(31)
 101 #define USERACCESS_WRITE        BIT(30)
 102 #define USERACCESS_ACK          BIT(29)
 103 #define USERACCESS_READ         0
 104 #define USERACCESS_DATA         0xffff
 105         } user[0];
 106 };
 107
 108 struct cpsw_regs {
 109         u32     id_ver;
 110         u32     control;
 111         u32     soft_reset;
 112         u32     stat_port_en;
 113         u32     ptype;
 114 };
 115
 116 struct cpsw_slave_regs {
 117         u32     max_blks;
 118         u32     blk_cnt;
 119         u32     flow_thresh;
 120         u32     port_vlan;
 121         u32     tx_pri_map;
 122 #ifdef CONFIG_AM33XX
 123         u32     gap_thresh;
 124 #elif defined(CONFIG_TI814X)
 125         u32     ts_ctl;
 126         u32     ts_seq_ltype;
 127         u32     ts_vlan;
 128 #endif
 129         u32     sa_lo;
 130         u32     sa_hi;
 131 };
 132
 133 struct cpsw_host_regs {
 134         u32     max_blks;
 135         u32     blk_cnt;
 136         u32     flow_thresh;
 137         u32     port_vlan;
 138         u32     tx_pri_map;
 139         u32     cpdma_tx_pri_map;
 140         u32     cpdma_rx_chan_map;
 141 };
 142
 143 struct cpsw_sliver_regs {
 144         u32     id_ver;
 145         u32     mac_control;
 146         u32     mac_status;
 147         u32     soft_reset;
 148         u32     rx_maxlen;
 149         u32     __reserved_0;
 150         u32     rx_pause;
 151         u32     tx_pause;
 152         u32     __reserved_1;
 153         u32     rx_pri_map;
 154 };
 155
 156 #define ALE_ENTRY_BITS          68
 157 #define ALE_ENTRY_WORDS         DIV_ROUND_UP(ALE_ENTRY_BITS, 32)
 158
 159 /* ALE Registers */
 160 #define ALE_CONTROL             0x08
 161 #define ALE_UNKNOWNVLAN         0x18
 162 #define ALE_TABLE_CONTROL       0x20
 163 #define ALE_TABLE               0x34
 164 #define ALE_PORTCTL             0x40
 165
 166 #define ALE_TABLE_WRITE         BIT(31)
 167
 168 #define ALE_TYPE_FREE                   0
 169 #define ALE_TYPE_ADDR                   1
 170 #define ALE_TYPE_VLAN                   2
 171 #define ALE_TYPE_VLAN_ADDR              3
 172
 173 #define ALE_UCAST_PERSISTANT            0
 174 #define ALE_UCAST_UNTOUCHED             1
 175 #define ALE_UCAST_OUI                   2
 176 #define ALE_UCAST_TOUCHED               3
 177
 178 #define ALE_MCAST_FWD                   0
 179 #define ALE_MCAST_BLOCK_LEARN_FWD       1
 180 #define ALE_MCAST_FWD_LEARN             2
 181 #define ALE_MCAST_FWD_2                 3
 182
 183 enum cpsw_ale_port_state {
 184         ALE_PORT_STATE_DISABLE  = 0x00,
 185         ALE_PORT_STATE_BLOCK    = 0x01,
 186         ALE_PORT_STATE_LEARN    = 0x02,
 187         ALE_PORT_STATE_FORWARD  = 0x03,
 188 };
 189
 190 /* ALE unicast entry flags - passed into cpsw_ale_add_ucast() */
 191 #define ALE_SECURE      1
 192 #define ALE_BLOCKED     2
 193
 194 struct cpsw_slave {
 195         struct cpsw_slave_regs          *regs;
 196         struct cpsw_sliver_regs         *sliver;
 197         int                             slave_num;
 198         u32                             mac_control;
 199         struct cpsw_slave_data          *data;
 200 };
 201
 202 struct cpdma_desc {
 203         /* hardware fields */
 204         u32                     hw_next;
 205         u32                     hw_buffer;
 206         u32                     hw_len;
 207         u32                     hw_mode;
 208 } __attribute__((aligned(CONFIG_SYS_CACHELINE_SIZE)));
 209
 210 struct cpsw_desc {
 211         void *sw_buffer;
 212         struct cpsw_desc *next;
 213         struct cpdma_desc *dma_desc;
 214 };
 215
 216 struct cpdma_chan {
 217         struct cpsw_desc        *head, *tail;
 218         void                    *hdp, *cp, *rxfree;
 219 };
 220
 221 #define desc_write(desc, fld, val)      __raw_writel((u32)(val), &(desc)->dma_desc->fld)
 222 #define desc_read(desc, fld)            __raw_readl(&(desc)->dma_desc->fld)
 223 #define desc_read_ptr(desc, fld)        ((void *)__raw_readl(&(desc)->dma_desc->fld))
 224
 225 #define chan_write(chan, fld, val)      __raw_writel((u32)(val), (chan)->fld)
 226 #define chan_read(chan, fld)            __raw_readl((chan)->fld)
 227 #define chan_read_ptr(chan, fld)        ((void *)__raw_readl((chan)->fld))
 228
 229 #define for_active_slave(slave, priv) \
 230         slave = (priv)->slaves + (priv)->data.active_slave; if (slave)
 231 #define for_each_slave(slave, priv) \
 232         for (slave = (priv)->slaves; slave != (priv)->slaves + \
 233                                 (priv)->data->slaves; slave++)
 234
 235 struct cpsw_priv {
 236         struct eth_device               *dev;
 237         struct cpsw_platform_data       *data;
 238         int                             host_port;
 239
 240         struct cpsw_regs                *regs;
 241         void                            *dma_regs;
 242         struct cpsw_host_regs           *host_port_regs;
 243         void                            *ale_regs;
 244
 245         struct cpsw_desc                descs[NUM_DESCS];
 246         struct cpsw_desc                *desc_free;
 247         struct cpdma_chan               rx_chan, tx_chan;
 248
 249         struct cpsw_slave               *slaves;
 250         struct phy_device               *phydev;
 251         struct mii_dev                  *bus;
 252
 253         u32                             phy_mask;
 254 };
 255
 256 static inline int cpsw_ale_get_field(u32 *ale_entry, u32 start, u32 bits)
 257 {
 258         int idx;
 259
 260         idx    = start / 32;
 261         start -= idx * 32;
 262         idx    = 2 - idx; /* flip */
 263         return (ale_entry[idx] >> start) & BITMASK(bits);
 264 }
 265
 266 static inline void cpsw_ale_set_field(u32 *ale_entry, u32 start, u32 bits,
 267                                       u32 value)
 268 {
 269         int idx;
 270
 271         value &= BITMASK(bits);
 272         idx    = start / 32;
 273         start -= idx * 32;
 274         idx    = 2 - idx; /* flip */
 275         ale_entry[idx] &= ~(BITMASK(bits) << start);
 276         ale_entry[idx] |=  (value << start);
 277 }
 278
 279 #define DEFINE_ALE_FIELD(name, start, bits)                             \
 280 static inline int cpsw_ale_get_##name(u32 *ale_entry)                   \
 281 {                                                                       \
 282         return cpsw_ale_get_field(ale_entry, start, bits);              \
 283 }                                                                       \
 284 static inline void cpsw_ale_set_##name(u32 *ale_entry, u32 value)       \
 285 {                                                                       \
 286         cpsw_ale_set_field(ale_entry, start, bits, value);              \
 287 }
 288
 289 DEFINE_ALE_FIELD(entry_type,            60,     2)
 290 DEFINE_ALE_FIELD(mcast_state,           62,     2)
 291 DEFINE_ALE_FIELD(port_mask,             66,     3)
 292 DEFINE_ALE_FIELD(ucast_type,            62,     2)
 293 DEFINE_ALE_FIELD(port_num,              66,     2)
 294 DEFINE_ALE_FIELD(blocked,               65,     1)
 295 DEFINE_ALE_FIELD(secure,                64,     1)
 296 DEFINE_ALE_FIELD(mcast,                 40,     1)
 297
 298 /* The MAC address field in the ALE entry cannot be macroized as above */
 299 static inline void cpsw_ale_get_addr(u32 *ale_entry, u8 *addr)
 300 {
 301         int i;
 302
 303         for (i = 0; i < 6; i++)
 304                 addr[i] = cpsw_ale_get_field(ale_entry, 40 - 8*i, 8);
 305 }
 306
 307 static inline void cpsw_ale_set_addr(u32 *ale_entry, u8 *addr)
 308 {
 309         int i;
 310
 311         for (i = 0; i < 6; i++)
 312                 cpsw_ale_set_field(ale_entry, 40 - 8*i, 8, addr[i]);
 313 }
 314
 315 static int cpsw_ale_read(struct cpsw_priv *priv, int idx, u32 *ale_entry)
 316 {
 317         int i;
 318
 319         __raw_writel(idx, priv->ale_regs + ALE_TABLE_CONTROL);
 320
 321         for (i = 0; i < ALE_ENTRY_WORDS; i++)
 322                 ale_entry[i] = __raw_readl(priv->ale_regs + ALE_TABLE + 4 * i);
 323
 324         return idx;
 325 }
 326
 327 static int cpsw_ale_write(struct cpsw_priv *priv, int idx, u32 *ale_entry)
 328 {
 329         int i;
 330
 331         for (i = 0; i < ALE_ENTRY_WORDS; i++)
 332                 __raw_writel(ale_entry[i], priv->ale_regs + ALE_TABLE + 4 * i);
 333
 334         __raw_writel(idx | ALE_TABLE_WRITE, priv->ale_regs + ALE_TABLE_CONTROL);
 335
 336         return idx;
 337 }
 338
 339 static int cpsw_ale_match_addr(struct cpsw_priv *priv, u8* addr)
 340 {
 341         u32 ale_entry[ALE_ENTRY_WORDS];
 342         int type, idx;
 343
 344         for (idx = 0; idx < priv->data->ale_entries; idx++) {
 345                 u8 entry_addr[6];
 346
 347                 cpsw_ale_read(priv, idx, ale_entry);
 348                 type = cpsw_ale_get_entry_type(ale_entry);
 349                 if (type != ALE_TYPE_ADDR && type != ALE_TYPE_VLAN_ADDR)
 350                         continue;
 351                 cpsw_ale_get_addr(ale_entry, entry_addr);
 352                 if (memcmp(entry_addr, addr, 6) == 0)
 353                         return idx;
 354         }
 355         return -ENOENT;
 356 }
 357
 358 static int cpsw_ale_match_free(struct cpsw_priv *priv)
 359 {
 360         u32 ale_entry[ALE_ENTRY_WORDS];
 361         int type, idx;
 362
 363         for (idx = 0; idx < priv->data->ale_entries; idx++) {
 364                 cpsw_ale_read(priv, idx, ale_entry);
 365                 type = cpsw_ale_get_entry_type(ale_entry);
 366                 if (type == ALE_TYPE_FREE)
 367                         return idx;
 368         }
 369         return -ENOENT;
 370 }
 371
 372 static int cpsw_ale_find_ageable(struct cpsw_priv *priv)
 373 {
 374         u32 ale_entry[ALE_ENTRY_WORDS];
 375         int type, idx;
 376
 377         for (idx = 0; idx < priv->data->ale_entries; idx++) {
 378                 cpsw_ale_read(priv, idx, ale_entry);
 379                 type = cpsw_ale_get_entry_type(ale_entry);
 380                 if (type != ALE_TYPE_ADDR && type != ALE_TYPE_VLAN_ADDR)
 381                         continue;
 382                 if (cpsw_ale_get_mcast(ale_entry))
 383                         continue;
 384                 type = cpsw_ale_get_ucast_type(ale_entry);
 385                 if (type != ALE_UCAST_PERSISTANT &&
 386                     type != ALE_UCAST_OUI)
 387                         return idx;
 388         }
 389         return -ENOENT;
 390 }
 391
 392 static int cpsw_ale_add_ucast(struct cpsw_priv *priv, u8 *addr,
 393                               int port, int flags)
 394 {
 395         u32 ale_entry[ALE_ENTRY_WORDS] = {0, 0, 0};
 396         int idx;
 397
 398         cpsw_ale_set_entry_type(ale_entry, ALE_TYPE_ADDR);
 399         cpsw_ale_set_addr(ale_entry, addr);
 400         cpsw_ale_set_ucast_type(ale_entry, ALE_UCAST_PERSISTANT);
 401         cpsw_ale_set_secure(ale_entry, (flags & ALE_SECURE) ? 1 : 0);
 402         cpsw_ale_set_blocked(ale_entry, (flags & ALE_BLOCKED) ? 1 : 0);
 403         cpsw_ale_set_port_num(ale_entry, port);
 404
 405         idx = cpsw_ale_match_addr(priv, addr);
 406         if (idx < 0)
 407                 idx = cpsw_ale_match_free(priv);
 408         if (idx < 0)
 409                 idx = cpsw_ale_find_ageable(priv);
 410         if (idx < 0)
 411                 return -ENOMEM;
 412
 413         cpsw_ale_write(priv, idx, ale_entry);
 414         return 0;
 415 }
 416
 417 static int cpsw_ale_add_mcast(struct cpsw_priv *priv, u8 *addr, int port_mask)
 418 {
 419         u32 ale_entry[ALE_ENTRY_WORDS] = {0, 0, 0};
 420         int idx, mask;
 421
 422         idx = cpsw_ale_match_addr(priv, addr);
 423         if (idx >= 0)
 424                 cpsw_ale_read(priv, idx, ale_entry);
 425
 426         cpsw_ale_set_entry_type(ale_entry, ALE_TYPE_ADDR);
 427         cpsw_ale_set_addr(ale_entry, addr);
 428         cpsw_ale_set_mcast_state(ale_entry, ALE_MCAST_FWD_2);
 429
 430         mask = cpsw_ale_get_port_mask(ale_entry);
 431         port_mask |= mask;
 432         cpsw_ale_set_port_mask(ale_entry, port_mask);
 433
 434         if (idx < 0)
 435                 idx = cpsw_ale_match_free(priv);
 436         if (idx < 0)
 437                 idx = cpsw_ale_find_ageable(priv);
 438         if (idx < 0)
 439                 return -ENOMEM;
 440
 441         cpsw_ale_write(priv, idx, ale_entry);
 442         return 0;
 443 }
 444
 445 static inline void cpsw_ale_control(struct cpsw_priv *priv, int bit, int val)
 446 {
 447         u32 tmp, mask = BIT(bit);
 448
 449         tmp  = __raw_readl(priv->ale_regs + ALE_CONTROL);
 450         tmp &= ~mask;
 451         tmp |= val ? mask : 0;
 452         __raw_writel(tmp, priv->ale_regs + ALE_CONTROL);
 453 }
 454
 455 #define cpsw_ale_enable(priv, val)      cpsw_ale_control(priv, 31, val)
 456 #define cpsw_ale_clear(priv, val)       cpsw_ale_control(priv, 30, val)
 457 #define cpsw_ale_vlan_aware(priv, val)  cpsw_ale_control(priv,  2, val)
 458
 459 static inline void cpsw_ale_port_state(struct cpsw_priv *priv, int port,
 460                                        int val)
 461 {
 462         int offset = ALE_PORTCTL + 4 * port;
 463         u32 tmp, mask = 0x3;
 464
 465         tmp  = __raw_readl(priv->ale_regs + offset);
 466         tmp &= ~mask;
 467         tmp |= val & mask;
 468         __raw_writel(tmp, priv->ale_regs + offset);
 469 }
 470
 471 static struct cpsw_mdio_regs *mdio_regs;
 472
 473 /* wait until hardware is ready for another user access */
 474 static inline u32 wait_for_user_access(void)
 475 {
 476         int timeout = MDIO_TIMEOUT;
 477         u32 reg;
 478
 479         while ((reg = __raw_readl(&mdio_regs->user[0].access)) & USERACCESS_GO) {
 480                 udelay(1000);
 481                 if (--timeout <= 0) {
 482                         printf("TIMEOUT waiting for USERACCESS_GO\n");
 483                         break;
 484                 }
 485         }
 486
 487         return reg;
 488 }
 489
 490 /* wait until hardware state machine is idle */
 491 static inline void wait_for_idle(void)
 492 {
 493         int timeout = MDIO_TIMEOUT;
 494
 495         while ((__raw_readl(&mdio_regs->control) & CONTROL_IDLE) == 0) {
 496                 if (--timeout <= 0) {
 497                         printf("TIMEOUT waiting for state machine idle\n");
 498                         break;
 499                 }
 500                 udelay(1000);
 501         }
 502 }
 503
 504 static int cpsw_mdio_read(struct mii_dev *bus, int phy_id,
 505                                 int dev_addr, int phy_reg)
 506 {
 507         int data;
 508         u32 reg;
 509
 510         if (phy_reg & ~PHY_REG_MASK || phy_id & ~PHY_ID_MASK)
 511                 return -EINVAL;
 512
 513         if (wait_for_user_access() & USERACCESS_GO)
 514                 /* promote error from previous access */
 515                 return -ETIME;
 516
 517         reg = (USERACCESS_GO | USERACCESS_READ | (phy_reg << 21) |
 518                (phy_id << 16));
 519         __raw_writel(reg, &mdio_regs->user[0].access);
 520         reg = wait_for_user_access();
 521         if (reg & USERACCESS_GO)
 522                 return -ETIME;
 523
 524         data = (reg & USERACCESS_ACK) ? (reg & USERACCESS_DATA) : -1;
 525         return data;
 526 }
 527
 528 static int cpsw_mdio_write(struct mii_dev *bus, int phy_id, int dev_addr,
 529                                 int phy_reg, u16 data)
 530 {
 531         u32 reg;
 532
 533         if (phy_reg & ~PHY_REG_MASK || phy_id & ~PHY_ID_MASK)
 534                 return -EINVAL;
 535
 536         if (wait_for_user_access() & USERACCESS_GO)
 537                 /* promote error from previous access */
 538                 return -ETIME;
 539
 540         reg = (USERACCESS_GO | USERACCESS_WRITE | (phy_reg << 21) |
 541                    (phy_id << 16) | (data & USERACCESS_DATA));
 542         __raw_writel(reg, &mdio_regs->user[0].access);
 543         if (wait_for_user_access() & USERACCESS_GO)
 544                 return -ETIME;
 545
 546         return 0;
 547 }
 548
 549 static void cpsw_mdio_init(char *name, u32 mdio_base, u32 div)
 550 {
 551         struct mii_dev *bus = mdio_alloc();
 552
 553         mdio_regs = (struct cpsw_mdio_regs *)mdio_base;
 554
 555         /* set enable and clock divider */
 556         __raw_writel(div | CONTROL_ENABLE, &mdio_regs->control);
 557
 558         /*
 559          * wait for scan logic to settle:
 560          * the scan time consists of (a) a large fixed component, and (b) a
 561          * small component that varies with the mii bus frequency.  These
 562          * were estimated using measurements at 1.1 and 2.2 MHz on tnetv107x
 563          * silicon.  Since the effect of (b) was found to be largely
 564          * negligible, we keep things simple here.
 565          */
 566         udelay(1000);
 567
 568         bus->read = cpsw_mdio_read;
 569         bus->write = cpsw_mdio_write;
 570         sprintf(bus->name, name);
 571
 572         mdio_register(bus);
 573 }
 574
 575 /* Set a self-clearing bit in a register, and wait for it to clear */
 576 static inline void setbit_and_wait_for_clear32(void *addr)
 577 {
 578         int loops = 0;
 579
 580         __raw_writel(CLEAR_BIT, addr);
 581         while (__raw_readl(addr) & CLEAR_BIT)
 582                 loops++;
 583         debug("%s: reset finished after %u loops\n", __func__, loops);
 584 }
 585
 586 #define mac_hi(mac)     (((mac)[0] << 0) | ((mac)[1] << 8) |    \
 587                          ((mac)[2] << 16) | ((mac)[3] << 24))
 588 #define mac_lo(mac)     (((mac)[4] << 0) | ((mac)[5] << 8))
 589
 590 static void cpsw_set_slave_mac(struct cpsw_slave *slave,
 591                                struct cpsw_priv *priv)
 592 {
 593         __raw_writel(mac_hi(priv->dev->enetaddr), &slave->regs->sa_hi);
 594         __raw_writel(mac_lo(priv->dev->enetaddr), &slave->regs->sa_lo);
 595 }
 596
 597 #define NUM_TRIES 50
 598 static void cpsw_slave_update_link(struct cpsw_slave *slave,
 599                                    struct cpsw_priv *priv, int *link)
 600 {
 601         struct phy_device *phy;
 602         u32 mac_control = 0;
 603         int retries = NUM_TRIES;
 604
 605         do {
 606                 phy_startup(phy);
 607                 *link = phy->link;
 608
 609                 if (*link) { /* link up */
 610                         mac_control = priv->data->mac_control;
 611                         if (phy->speed == 1000)
 612                                 mac_control |= GIGABITEN;
 613                         if (phy->duplex == DUPLEX_FULL)
 614                                 mac_control |= FULLDUPLEXEN;
 615                         if (phy->speed == 100)
 616                                 mac_control |= MIIEN;
 617                 } else {
 618                         udelay(10000);
 619                 }
 620         } while (!*link && retries-- > 0);
 621         debug("%s: mac_control: %08x -> %08x after %u loops\n", __func__,
 622                 slave->mac_control, mac_control, NUM_TRIES - retries);
 623
 624         if (mac_control == slave->mac_control)
 625                 return;
 626
 627         if (mac_control) {
 628                 printf("link up on port %d, speed %d, %s duplex\n",
 629                                 slave->slave_num, phy->speed,
 630                                 (phy->duplex == DUPLEX_FULL) ? "full" : "half");
 631         } else {
 632                 printf("link down on port %d\n", slave->slave_num);
 633         }
 634
 635         __raw_writel(mac_control, &slave->sliver->mac_control);
 636         slave->mac_control = mac_control;
 637 }
 638
 639 static int cpsw_update_link(struct cpsw_priv *priv)
 640 {
 641         int link = 0;
 642         struct cpsw_slave *slave;
 643
 644         for_active_slave(slave, priv)
 645                 cpsw_slave_update_link(slave, priv, &link);
 646
 647         return link;
 648 }
 649
 650 static inline u32  cpsw_get_slave_port(struct cpsw_priv *priv, u32 slave_num)
 651 {
 652         if (priv->host_port == 0)
 653                 return slave_num + 1;
 654         else
 655                 return slave_num;
 656 }
 657
 658 static void cpsw_slave_init(struct cpsw_slave *slave, struct cpsw_priv *priv)
 659 {
 660         u32     slave_port;
 661
 662         debug("%s\n", __func__);
 663         setbit_and_wait_for_clear32(&slave->sliver->soft_reset);
 664
 665         /* setup priority mapping */
 666         __raw_writel(0x76543210, &slave->sliver->rx_pri_map);
 667         __raw_writel(0x33221100, &slave->regs->tx_pri_map);
 668
 669         /* setup max packet size, and mac address */
 670         __raw_writel(PKT_MAX, &slave->sliver->rx_maxlen);
 671         cpsw_set_slave_mac(slave, priv);
 672
 673         slave->mac_control = 0; /* no link yet */
 674
 675         /* enable forwarding */
 676         slave_port = cpsw_get_slave_port(priv, slave->slave_num);
 677         cpsw_ale_port_state(priv, slave_port, ALE_PORT_STATE_FORWARD);
 678
 679         cpsw_ale_add_mcast(priv, NetBcastAddr, 1 << slave_port);
 680
 681         priv->phy_mask |= 1 << slave->data->phy_addr;
 682 }
 683
 684 static void cpdma_desc_get(struct cpsw_desc *desc)
 685 {
 686         invalidate_dcache_range((u32)desc->dma_desc, (u32)(&desc->dma_desc[1]));
 687 }
 688
 689 static void cpdma_desc_put(struct cpsw_desc *desc)
 690 {
 691         flush_dcache_range((u32)desc->dma_desc, (u32)(&desc->dma_desc[1]));
 692 }
 693
 694 static struct cpsw_desc *cpdma_desc_alloc(struct cpsw_priv *priv)
 695 {
 696         struct cpsw_desc *desc = priv->desc_free;
 697
 698         if (desc) {
 699                 cpdma_desc_get(desc);
 700                 priv->desc_free = desc->next;
 701         }
 702         return desc;
 703 }
 704
 705 static void cpdma_desc_free(struct cpsw_priv *priv, struct cpsw_desc *desc)
 706 {
 707         if (desc) {
 708                 desc_write(desc, hw_next, priv->desc_free->dma_desc);
 709                 cpdma_desc_put(desc);
 710                 desc->next = priv->desc_free;
 711                 priv->desc_free = desc;
 712         }
 713 }
 714
 715 static int cpdma_submit(struct cpsw_priv *priv, struct cpdma_chan *chan,
 716                         void *buffer, int len)
 717 {
 718         struct cpsw_desc *desc, *prev;
 719         u32 mode;
 720
 721         if (!buffer) {
 722                 printf("ERROR: %s() NULL buffer\n", __func__);
 723                 return -EINVAL;
 724         }
 725
 726         flush_dcache_range((u32)buffer, (u32)buffer + len);
 727
 728         desc = cpdma_desc_alloc(priv);
 729         if (!desc)
 730                 return -ENOMEM;
 731
 732         debug("%s@%d: %cX desc %p DMA %p\n", __func__, __LINE__,
 733                 chan == &priv->rx_chan ? 'R' : 'T', desc, desc->dma_desc);
 734         if (len < PKT_MIN)
 735                 len = PKT_MIN;
 736
 737         mode = CPDMA_DESC_OWNER | CPDMA_DESC_SOP | CPDMA_DESC_EOP;
 738
 739         desc->next = NULL;
 740         desc_write(desc, hw_next,   0);
 741         desc_write(desc, hw_buffer, buffer);
 742         desc_write(desc, hw_len,    len);
 743         desc_write(desc, hw_mode,   mode | len);
 744
 745         desc->sw_buffer = buffer;
 746
 747         cpdma_desc_put(desc);
 748         if (!chan->head) {
 749                 /* simple case - first packet enqueued */
 750                 chan->head = desc;
 751                 chan->tail = desc;
 752                 chan_write(chan, hdp, desc->dma_desc);
 753                 goto done;
 754         }
 755
 756         /* not the first packet - enqueue at the tail */
 757         prev = chan->tail;
 758
 759         prev->next = desc;
 760         cpdma_desc_get(prev);
 761         desc_write(prev, hw_next, desc->dma_desc);
 762         cpdma_desc_put(prev);
 763
 764         chan->tail = desc;
 765
 766         /* next check if EOQ has been triggered already */
 767         if (desc_read(prev, hw_mode) & CPDMA_DESC_EOQ)
 768                 chan_write(chan, hdp, desc->dma_desc);
 769
 770 done:
 771         if (chan->rxfree)
 772                 chan_write(chan, rxfree, 1);
 773         debug("%s@%d\n", __func__, __LINE__);
 774         return 0;
 775 }
 776
 777 static int cpdma_process(struct cpsw_priv *priv, struct cpdma_chan *chan,
 778                          void **buffer, int *len)
 779 {
 780         struct cpsw_desc *desc = chan->head;
 781         u32 status;
 782
 783         if (!desc)
 784                 return -ENOENT;
 785
 786         cpdma_desc_get(desc);
 787
 788         status = desc_read(desc, hw_mode);
 789         if (status & CPDMA_DESC_OWNER)
 790                 return -EBUSY;
 791
 792         if (len)
 793                 *len = status & 0x7ff;
 794
 795         if (buffer)
 796                 *buffer = desc->sw_buffer;
 797         debug("%s@%d: buffer=%p\n", __func__, __LINE__, desc->sw_buffer);
 798
 799         chan->head = desc->next;
 800         chan_write(chan, cp, desc->dma_desc);
 801
 802         cpdma_desc_free(priv, desc);
 803         return 0;
 804 }
 805
 806 static int cpsw_init(struct eth_device *dev, bd_t *bis)
 807 {
 808         struct cpsw_priv        *priv = dev->priv;
 809         struct cpsw_slave       *slave;
 810         int i, ret;
 811
 812         debug("%s\n", __func__);
 813         /* soft reset the controller and initialize priv */
 814         setbit_and_wait_for_clear32(&priv->regs->soft_reset);
 815
 816         /* initialize and reset the address lookup engine */
 817         cpsw_ale_enable(priv, 1);
 818         cpsw_ale_clear(priv, 1);
 819         cpsw_ale_vlan_aware(priv, 0); /* vlan unaware mode */
 820
 821         /* setup host port priority mapping */
 822         __raw_writel(0x76543210, &priv->host_port_regs->cpdma_tx_pri_map);
 823         __raw_writel(0, &priv->host_port_regs->cpdma_rx_chan_map);
 824
 825         /* disable priority elevation and enable statistics on all ports */
 826         __raw_writel(0, &priv->regs->ptype);
 827
 828         /* enable statistics collection only on the host port */
 829         __raw_writel(BIT(priv->host_port), &priv->regs->stat_port_en);
 830         __raw_writel(0x7, &priv->regs->stat_port_en);
 831
 832         cpsw_ale_port_state(priv, priv->host_port, ALE_PORT_STATE_FORWARD);
 833
 834         cpsw_ale_add_ucast(priv, priv->dev->enetaddr, priv->host_port,
 835                            ALE_SECURE);
 836         cpsw_ale_add_mcast(priv, NetBcastAddr, 1 << priv->host_port);
 837
 838         for_active_slave(slave, priv)
 839                 cpsw_slave_init(slave, priv);
 840
 841         cpsw_update_link(priv);
 842
 843         /* init descriptor pool */
 844         for (i = 0; i < NUM_DESCS; i++) {
 845                 struct cpsw_desc *next_desc = (i < (NUM_DESCS - 1)) ?
 846                         &priv->descs[i + 1] : NULL;
 847
 848                 priv->descs[i].next = next_desc;
 849                 desc_write(&priv->descs[i], hw_next,
 850                         next_desc ? next_desc->dma_desc : 0);
 851                 cpdma_desc_put(&priv->descs[i]);
 852         }
 853         priv->desc_free = &priv->descs[0];
 854
 855         /* initialize channels */
 856         if (priv->data->version == CPSW_CTRL_VERSION_2) {
 857                 memset(&priv->rx_chan, 0, sizeof(struct cpdma_chan));
 858                 priv->rx_chan.hdp       = priv->dma_regs + CPDMA_RXHDP_VER2;
 859                 priv->rx_chan.cp        = priv->dma_regs + CPDMA_RXCP_VER2;
 860                 priv->rx_chan.rxfree    = priv->dma_regs + CPDMA_RXFREE;
 861
 862                 memset(&priv->tx_chan, 0, sizeof(struct cpdma_chan));
 863                 priv->tx_chan.hdp       = priv->dma_regs + CPDMA_TXHDP_VER2;
 864                 priv->tx_chan.cp        = priv->dma_regs + CPDMA_TXCP_VER2;
 865         } else {
 866                 memset(&priv->rx_chan, 0, sizeof(struct cpdma_chan));
 867                 priv->rx_chan.hdp       = priv->dma_regs + CPDMA_RXHDP_VER1;
 868                 priv->rx_chan.cp        = priv->dma_regs + CPDMA_RXCP_VER1;
 869                 priv->rx_chan.rxfree    = priv->dma_regs + CPDMA_RXFREE;
 870
 871                 memset(&priv->tx_chan, 0, sizeof(struct cpdma_chan));
 872                 priv->tx_chan.hdp       = priv->dma_regs + CPDMA_TXHDP_VER1;
 873                 priv->tx_chan.cp        = priv->dma_regs + CPDMA_TXCP_VER1;
 874         }
 875
 876         /* clear dma state */
 877         setbit_and_wait_for_clear32(priv->dma_regs + CPDMA_SOFTRESET);
 878
 879         if (priv->data->version == CPSW_CTRL_VERSION_2) {
 880                 for (i = 0; i < priv->data->channels; i++) {
 881                         __raw_writel(0, priv->dma_regs + CPDMA_RXHDP_VER2 + 4 * i);
 882                         __raw_writel(0, priv->dma_regs + CPDMA_RXFREE + 4 * i);
 883                         __raw_writel(0, priv->dma_regs + CPDMA_RXCP_VER2 + 4 * i);
 884                         __raw_writel(0, priv->dma_regs + CPDMA_TXHDP_VER2 + 4 * i);
 885                         __raw_writel(0, priv->dma_regs + CPDMA_TXCP_VER2 + 4 * i);
 886                 }
 887         } else {
 888                 for (i = 0; i < priv->data->channels; i++) {
 889                         __raw_writel(0, priv->dma_regs + CPDMA_RXHDP_VER1 + 4 * i);
 890                         __raw_writel(0, priv->dma_regs + CPDMA_RXFREE + 4 * i);
 891                         __raw_writel(0, priv->dma_regs + CPDMA_RXCP_VER1 + 4 * i);
 892                         __raw_writel(0, priv->dma_regs + CPDMA_TXHDP_VER1 + 4 * i);
 893                         __raw_writel(0, priv->dma_regs + CPDMA_TXCP_VER1 + 4 * i);
 894
 895                 }
 896         }
 897
 898         __raw_writel(1, priv->dma_regs + CPDMA_TXCONTROL);
 899         __raw_writel(1, priv->dma_regs + CPDMA_RXCONTROL);
 900
 901         /* submit rx descs */
 902         for (i = 0; i < PKTBUFSRX; i++) {
 903                 ret = cpdma_submit(priv, &priv->rx_chan, NetRxPackets[i],
 904                                    PKTSIZE);
 905                 if (ret < 0) {
 906                         printf("error %d submitting rx desc\n", ret);
 907                         break;
 908                 }
 909         }
 910
 911         return ret;
 912 }
 913
 914 static void cpsw_halt(struct eth_device *dev)
 915 {
 916         struct cpsw_priv        *priv = dev->priv;
 917         struct cpsw_slave       *slave;
 918         int idle = 0;
 919         int timeout = 1000000;
 920
 921         __raw_writel(DMACONTROL_CMD_IDLE, priv->dma_regs + CPDMA_DMACONTROL);
 922         while (!(__raw_readl(priv->dma_regs + CPDMA_DMASTATUS) &
 923                         DMASTATUS_IDLE) && (--timeout >= 0))
 924                 udelay(1);
 925
 926         timeout = 1000000;
 927         while (!idle) {
 928                 idle = 1;
 929                 for_each_slave(slave, priv) {
 930                         if (!(__raw_readl(&slave->sliver->mac_status) &
 931                                         MAC_STAT_IDLE)) {
 932                                 idle = 0;
 933                                 break;
 934                         }
 935                 }
 936                 if (idle || --timeout < 0)
 937                         break;
 938                 udelay(1);
 939         }
 940         if (!idle)
 941                 printf("CPSW: Aborting DMA transfers; packets may be lost\n");
 942
 943         writel(0, priv->dma_regs + CPDMA_TXCONTROL);
 944         writel(0, priv->dma_regs + CPDMA_RXCONTROL);
 945
 946         /* soft reset the controller and initialize priv */
 947         setbit_and_wait_for_clear32(&priv->regs->soft_reset);
 948
 949         /* clear dma state */
 950         setbit_and_wait_for_clear32(priv->dma_regs + CPDMA_SOFTRESET);
 951
 952         debug("%s\n", __func__);
 953         priv->data->control(0);
 954 }
 955
 956 static int cpsw_send(struct eth_device *dev, void *packet, int length)
 957 {
 958         struct cpsw_priv *priv = dev->priv;
 959         void *buffer;
 960         int len;
 961
 962
 963         /* first reap completed packets */
 964         while (cpdma_process(priv, &priv->tx_chan, &buffer, &len) == 0)
 965                 /* NOP */;
 966
 967         return cpdma_submit(priv, &priv->tx_chan, packet, length);
 968 }
 969
 970 static int cpsw_recv(struct eth_device *dev)
 971 {
 972         struct cpsw_priv        *priv = dev->priv;
 973         void *buffer;
 974         int len;
 975
 976         while (cpdma_process(priv, &priv->rx_chan, &buffer, &len) == 0) {
 977                 if (buffer) {
 978                         NetReceive(buffer, len);
 979                         cpdma_submit(priv, &priv->rx_chan, buffer, PKTSIZE);
 980                 } else {
 981                         printf("NULL buffer returned from cpdma_process\n");
 982                         return -EIO;
 983                 }
 984         }
 985
 986         return 0;
 987 }
 988
 989 static void cpsw_slave_setup(struct cpsw_slave *slave, int slave_num,
 990                             struct cpsw_priv *priv)
 991 {
 992         void                    *regs = priv->regs;
 993         struct cpsw_slave_data  *data = priv->data->slave_data + slave_num;
 994
 995         debug("%s@%d: slave[%d] %p\n", __func__, __LINE__,
 996                 slave_num, slave);
 997         slave->slave_num = slave_num;
 998         slave->data     = data;
 999         slave->regs     = regs + data->slave_reg_ofs;
1000         slave->sliver   = regs + data->sliver_reg_ofs;
1001 }
1002
1003 static int cpsw_phy_init(struct eth_device *dev, struct cpsw_slave *slave)
1004 {
1005         struct cpsw_priv *priv = (struct cpsw_priv *)dev->priv;
1006         struct phy_device *phydev;
1007         u32 supported = PHY_GBIT_FEATURES;
1008
1009         if (slave->data->phy_id < 0) {
1010                 u32 phy_addr;
1011
1012                 for (phy_addr = 0; phy_addr < 32; phy_addr++) {
1013                         debug("Trying to connect to PHY @ addr %02x\n",
1014                                 phy_addr);
1015                         phydev = phy_connect(priv->bus, phy_addr,
1016                                         dev, slave->data->phy_if);
1017                         if (phydev)
1018                                 break;
1019                 }
1020         } else {
1021                 phydev = phy_connect(priv->bus,
1022                                 slave->data->phy_id,
1023                                 dev,
1024                                 slave->data->phy_if);
1025         }
1026         if (!phydev) {
1027                 printf("Failed to connect to PHY\n");
1028                 return -EINVAL;
1029         }
1030
1031         if (!phydev)
1032                 return -1;
1033
1034         phydev->supported &= supported;
1035         phydev->advertising = phydev->supported;
1036
1037         priv->phydev = phydev;
1038         phy_config(phydev);
1039
1040         return 0;
1041 }
1042
1043 int cpsw_register(struct cpsw_platform_data *data)
1044 {
1045         int ret = 1;
1046         struct cpsw_priv        *priv;
1047         struct cpsw_slave       *slave;
1048         void                    *regs = (void *)data->cpsw_base;
1049         struct eth_device       *dev;
1050         int i;
1051         int idx = 0;
1052
1053         debug("%s@%d\n", __func__, __LINE__);
1054
1055         dev = calloc(sizeof(*dev), 1);
1056         if (!dev)
1057                 return -ENOMEM;
1058
1059         priv = calloc(sizeof(*priv), 1);
1060         if (!priv) {
1061                 free(dev);
1062                 return -ENOMEM;
1063         }
1064
1065         priv->data = data;
1066         priv->dev = dev;
1067
1068         priv->slaves = calloc(sizeof(struct cpsw_slave), data->slaves);
1069         if (!priv->slaves) {
1070                 free(dev);
1071                 free(priv);
1072                 return -ENOMEM;
1073         }
1074
1075         priv->host_port         = data->host_port_num;
1076         priv->regs              = regs;
1077         priv->host_port_regs    = regs + data->host_port_reg_ofs;
1078         priv->dma_regs          = regs + data->cpdma_reg_ofs;
1079         priv->ale_regs          = regs + data->ale_reg_ofs;
1080         priv->descs             = (void *)regs + data->bd_ram_ofs;
1081
1082         for_each_slave(slave, priv) {
1083                 cpsw_slave_setup(slave, idx, priv);
1084                 idx = idx + 1;
1085         }
1086
1087         strcpy(dev->name, "cpsw");
1088         dev->iobase     = 0;
1089         dev->init       = cpsw_init;
1090         dev->halt       = cpsw_halt;
1091         dev->send       = cpsw_send;
1092         dev->recv       = cpsw_recv;
1093         dev->priv       = priv;
1094
1095         eth_register(dev);
1096
1097         cpsw_mdio_init(dev->name, data->mdio_base, data->mdio_div);
1098         priv->bus = miiphy_get_dev_by_name(dev->name);
1099         for_active_slave(slave, priv) {
1100                 ret = cpsw_phy_init(dev, slave);
1101                 if (ret < 0)
1102                         break;
1103         }
1104         return ret;
1105 }