drivers/net/macb.c

   1 /*
   2  * Copyright (C) 2005-2006 Atmel Corporation
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  17  */
  18 #include <common.h>
  19
  20 /*
  21  * The u-boot networking stack is a little weird.  It seems like the
  22  * networking core allocates receive buffers up front without any
  23  * regard to the hardware that's supposed to actually receive those
  24  * packets.
  25  *
  26  * The MACB receives packets into 128-byte receive buffers, so the
  27  * buffers allocated by the core isn't very practical to use.  We'll
  28  * allocate our own, but we need one such buffer in case a packet
  29  * wraps around the DMA ring so that we have to copy it.
  30  *
  31  * Therefore, define CONFIG_SYS_RX_ETH_BUFFER to 1 in the board-specific
  32  * configuration header.  This way, the core allocates one RX buffer
  33  * and one TX buffer, each of which can hold a ethernet packet of
  34  * maximum size.
  35  *
  36  * For some reason, the networking core unconditionally specifies a
  37  * 32-byte packet "alignment" (which really should be called
  38  * "padding").  MACB shouldn't need that, but we'll refrain from any
  39  * core modifications here...
  40  */
  41
  42 #include <net.h>
  43 #include <netdev.h>
  44 #include <malloc.h>
  45 #include <miiphy.h>
  46
  47 #include <linux/mii.h>
  48 #include <asm/io.h>
  49 #include <asm/dma-mapping.h>
  50 #include <asm/arch/clk.h>
  51
  52 #include "macb.h"
  53
  54 #define barrier() asm volatile("" ::: "memory")
  55
  56 #define CONFIG_SYS_MACB_RX_BUFFER_SIZE          4096
  57 #define CONFIG_SYS_MACB_RX_RING_SIZE            (CONFIG_SYS_MACB_RX_BUFFER_SIZE / 128)
  58 #define CONFIG_SYS_MACB_TX_RING_SIZE            16
  59 #define CONFIG_SYS_MACB_TX_TIMEOUT              1000
  60 #define CONFIG_SYS_MACB_AUTONEG_TIMEOUT 5000000
  61
  62 struct macb_dma_desc {
  63         u32     addr;
  64         u32     ctrl;
  65 };
  66
  67 #define RXADDR_USED             0x00000001
  68 #define RXADDR_WRAP             0x00000002
  69
  70 #define RXBUF_FRMLEN_MASK       0x00000fff
  71 #define RXBUF_FRAME_START       0x00004000
  72 #define RXBUF_FRAME_END         0x00008000
  73 #define RXBUF_TYPEID_MATCH      0x00400000
  74 #define RXBUF_ADDR4_MATCH       0x00800000
  75 #define RXBUF_ADDR3_MATCH       0x01000000
  76 #define RXBUF_ADDR2_MATCH       0x02000000
  77 #define RXBUF_ADDR1_MATCH       0x04000000
  78 #define RXBUF_BROADCAST         0x80000000
  79
  80 #define TXBUF_FRMLEN_MASK       0x000007ff
  81 #define TXBUF_FRAME_END         0x00008000
  82 #define TXBUF_NOCRC             0x00010000
  83 #define TXBUF_EXHAUSTED         0x08000000
  84 #define TXBUF_UNDERRUN          0x10000000
  85 #define TXBUF_MAXRETRY          0x20000000
  86 #define TXBUF_WRAP              0x40000000
  87 #define TXBUF_USED              0x80000000
  88
  89 struct macb_device {
  90         void                    *regs;
  91
  92         unsigned int            rx_tail;
  93         unsigned int            tx_head;
  94         unsigned int            tx_tail;
  95
  96         void                    *rx_buffer;
  97         void                    *tx_buffer;
  98         struct macb_dma_desc    *rx_ring;
  99         struct macb_dma_desc    *tx_ring;
 100
 101         unsigned long           rx_buffer_dma;
 102         unsigned long           rx_ring_dma;
 103         unsigned long           tx_ring_dma;
 104
 105         const struct device     *dev;
 106         struct eth_device       netdev;
 107         unsigned short          phy_addr;
 108 };
 109 #define to_macb(_nd) container_of(_nd, struct macb_device, netdev)
 110
 111 static void macb_mdio_write(struct macb_device *macb, u8 reg, u16 value)
 112 {
 113         unsigned long netctl;
 114         unsigned long netstat;
 115         unsigned long frame;
 116
 117         netctl = macb_readl(macb, NCR);
 118         netctl |= MACB_BIT(MPE);
 119         macb_writel(macb, NCR, netctl);
 120
 121         frame = (MACB_BF(SOF, 1)
 122                  | MACB_BF(RW, 1)
 123                  | MACB_BF(PHYA, macb->phy_addr)
 124                  | MACB_BF(REGA, reg)
 125                  | MACB_BF(CODE, 2)
 126                  | MACB_BF(DATA, value));
 127         macb_writel(macb, MAN, frame);
 128
 129         do {
 130                 netstat = macb_readl(macb, NSR);
 131         } while (!(netstat & MACB_BIT(IDLE)));
 132
 133         netctl = macb_readl(macb, NCR);
 134         netctl &= ~MACB_BIT(MPE);
 135         macb_writel(macb, NCR, netctl);
 136 }
 137
 138 static u16 macb_mdio_read(struct macb_device *macb, u8 reg)
 139 {
 140         unsigned long netctl;
 141         unsigned long netstat;
 142         unsigned long frame;
 143
 144         netctl = macb_readl(macb, NCR);
 145         netctl |= MACB_BIT(MPE);
 146         macb_writel(macb, NCR, netctl);
 147
 148         frame = (MACB_BF(SOF, 1)
 149                  | MACB_BF(RW, 2)
 150                  | MACB_BF(PHYA, macb->phy_addr)
 151                  | MACB_BF(REGA, reg)
 152                  | MACB_BF(CODE, 2));
 153         macb_writel(macb, MAN, frame);
 154
 155         do {
 156                 netstat = macb_readl(macb, NSR);
 157         } while (!(netstat & MACB_BIT(IDLE)));
 158
 159         frame = macb_readl(macb, MAN);
 160
 161         netctl = macb_readl(macb, NCR);
 162         netctl &= ~MACB_BIT(MPE);
 163         macb_writel(macb, NCR, netctl);
 164
 165         return MACB_BFEXT(DATA, frame);
 166 }
 167
 168 #if defined(CONFIG_CMD_MII)
 169
 170 int macb_miiphy_read(char *devname, u8 phy_adr, u8 reg, u16 *value)
 171 {
 172         struct eth_device *dev = eth_get_dev_by_name(devname);
 173         struct macb_device *macb = to_macb(dev);
 174
 175         if ( macb->phy_addr != phy_adr )
 176                 return -1;
 177
 178         *value = macb_mdio_read(macb, reg);
 179
 180         return 0;
 181 }
 182
 183 int macb_miiphy_write(char *devname, u8 phy_adr, u8 reg, u16 value)
 184 {
 185         struct eth_device *dev = eth_get_dev_by_name(devname);
 186         struct macb_device *macb = to_macb(dev);
 187
 188         if ( macb->phy_addr != phy_adr )
 189                 return -1;
 190
 191         macb_mdio_write(macb, reg, value);
 192
 193         return 0;
 194 }
 195 #endif
 196
 197
 198 #if defined(CONFIG_CMD_NET)
 199
 200 static int macb_send(struct eth_device *netdev, volatile void *packet,
 201                      int length)
 202 {
 203         struct macb_device *macb = to_macb(netdev);
 204         unsigned long paddr, ctrl;
 205         unsigned int tx_head = macb->tx_head;
 206         int i;
 207
 208         paddr = dma_map_single(packet, length, DMA_TO_DEVICE);
 209
 210         ctrl = length & TXBUF_FRMLEN_MASK;
 211         ctrl |= TXBUF_FRAME_END;
 212         if (tx_head == (CONFIG_SYS_MACB_TX_RING_SIZE - 1)) {
 213                 ctrl |= TXBUF_WRAP;
 214                 macb->tx_head = 0;
 215         } else
 216                 macb->tx_head++;
 217
 218         macb->tx_ring[tx_head].ctrl = ctrl;
 219         macb->tx_ring[tx_head].addr = paddr;
 220         barrier();
 221         macb_writel(macb, NCR, MACB_BIT(TE) | MACB_BIT(RE) | MACB_BIT(TSTART));
 222
 223         /*
 224          * I guess this is necessary because the networking core may
 225          * re-use the transmit buffer as soon as we return...
 226          */
 227         for (i = 0; i <= CONFIG_SYS_MACB_TX_TIMEOUT; i++) {
 228                 barrier();
 229                 ctrl = macb->tx_ring[tx_head].ctrl;
 230                 if (ctrl & TXBUF_USED)
 231                         break;
 232                 udelay(1);
 233         }
 234
 235         dma_unmap_single(packet, length, paddr);
 236
 237         if (i <= CONFIG_SYS_MACB_TX_TIMEOUT) {
 238                 if (ctrl & TXBUF_UNDERRUN)
 239                         printf("%s: TX underrun\n", netdev->name);
 240                 if (ctrl & TXBUF_EXHAUSTED)
 241                         printf("%s: TX buffers exhausted in mid frame\n",
 242                                netdev->name);
 243         } else {
 244                 printf("%s: TX timeout\n", netdev->name);
 245         }
 246
 247         /* No one cares anyway */
 248         return 0;
 249 }
 250
 251 static void reclaim_rx_buffers(struct macb_device *macb,
 252                                unsigned int new_tail)
 253 {
 254         unsigned int i;
 255
 256         i = macb->rx_tail;
 257         while (i > new_tail) {
 258                 macb->rx_ring[i].addr &= ~RXADDR_USED;
 259                 i++;
 260                 if (i > CONFIG_SYS_MACB_RX_RING_SIZE)
 261                         i = 0;
 262         }
 263
 264         while (i < new_tail) {
 265                 macb->rx_ring[i].addr &= ~RXADDR_USED;
 266                 i++;
 267         }
 268
 269         barrier();
 270         macb->rx_tail = new_tail;
 271 }
 272
 273 static int macb_recv(struct eth_device *netdev)
 274 {
 275         struct macb_device *macb = to_macb(netdev);
 276         unsigned int rx_tail = macb->rx_tail;
 277         void *buffer;
 278         int length;
 279         int wrapped = 0;
 280         u32 status;
 281
 282         for (;;) {
 283                 if (!(macb->rx_ring[rx_tail].addr & RXADDR_USED))
 284                         return -1;
 285
 286                 status = macb->rx_ring[rx_tail].ctrl;
 287                 if (status & RXBUF_FRAME_START) {
 288                         if (rx_tail != macb->rx_tail)
 289                                 reclaim_rx_buffers(macb, rx_tail);
 290                         wrapped = 0;
 291                 }
 292
 293                 if (status & RXBUF_FRAME_END) {
 294                         buffer = macb->rx_buffer + 128 * macb->rx_tail;
 295                         length = status & RXBUF_FRMLEN_MASK;
 296                         if (wrapped) {
 297                                 unsigned int headlen, taillen;
 298
 299                                 headlen = 128 * (CONFIG_SYS_MACB_RX_RING_SIZE
 300                                                  - macb->rx_tail);
 301                                 taillen = length - headlen;
 302                                 memcpy((void *)NetRxPackets[0],
 303                                        buffer, headlen);
 304                                 memcpy((void *)NetRxPackets[0] + headlen,
 305                                        macb->rx_buffer, taillen);
 306                                 buffer = (void *)NetRxPackets[0];
 307                         }
 308
 309                         NetReceive(buffer, length);
 310                         if (++rx_tail >= CONFIG_SYS_MACB_RX_RING_SIZE)
 311                                 rx_tail = 0;
 312                         reclaim_rx_buffers(macb, rx_tail);
 313                 } else {
 314                         if (++rx_tail >= CONFIG_SYS_MACB_RX_RING_SIZE) {
 315                                 wrapped = 1;
 316                                 rx_tail = 0;
 317                         }
 318                 }
 319                 barrier();
 320         }
 321
 322         return 0;
 323 }
 324
 325 static void macb_phy_reset(struct macb_device *macb)
 326 {
 327         struct eth_device *netdev = &macb->netdev;
 328         int i;
 329         u16 status, adv;
 330
 331         adv = ADVERTISE_CSMA | ADVERTISE_ALL;
 332         macb_mdio_write(macb, MII_ADVERTISE, adv);
 333         printf("%s: Starting autonegotiation...\n", netdev->name);
 334         macb_mdio_write(macb, MII_BMCR, (BMCR_ANENABLE
 335                                          | BMCR_ANRESTART));
 336
 337         for (i = 0; i < CONFIG_SYS_MACB_AUTONEG_TIMEOUT / 100; i++) {
 338                 status = macb_mdio_read(macb, MII_BMSR);
 339                 if (status & BMSR_ANEGCOMPLETE)
 340                         break;
 341                 udelay(100);
 342         }
 343
 344         if (status & BMSR_ANEGCOMPLETE)
 345                 printf("%s: Autonegotiation complete\n", netdev->name);
 346         else
 347                 printf("%s: Autonegotiation timed out (status=0x%04x)\n",
 348                        netdev->name, status);
 349 }
 350
 351 #ifdef CONFIG_MACB_SEARCH_PHY
 352 static int macb_phy_find(struct macb_device *macb)
 353 {
 354         int i;
 355         u16 phy_id;
 356
 357         /* Search for PHY... */
 358         for (i = 0; i < 32; i++) {
 359                 macb->phy_addr = i;
 360                 phy_id = macb_mdio_read(macb, MII_PHYSID1);
 361                 if (phy_id != 0xffff) {
 362                         printf("%s: PHY present at %d\n", macb->netdev.name, i);
 363                         return 1;
 364                 }
 365         }
 366
 367         /* PHY isn't up to snuff */
 368         printf("%s: PHY not found", macb->netdev.name);
 369
 370         return 0;
 371 }
 372 #endif /* CONFIG_MACB_SEARCH_PHY */
 373
 374
 375 static int macb_phy_init(struct macb_device *macb)
 376 {
 377         struct eth_device *netdev = &macb->netdev;
 378         u32 ncfgr;
 379         u16 phy_id, status, adv, lpa;
 380         int media, speed, duplex;
 381         int i;
 382
 383 #ifdef CONFIG_MACB_SEARCH_PHY
 384         /* Auto-detect phy_addr */
 385         if (!macb_phy_find(macb)) {
 386                 return 0;
 387         }
 388 #endif /* CONFIG_MACB_SEARCH_PHY */
 389
 390         /* Check if the PHY is up to snuff... */
 391         phy_id = macb_mdio_read(macb, MII_PHYSID1);
 392         if (phy_id == 0xffff) {
 393                 printf("%s: No PHY present\n", netdev->name);
 394                 return 0;
 395         }
 396
 397         status = macb_mdio_read(macb, MII_BMSR);
 398         if (!(status & BMSR_LSTATUS)) {
 399                 /* Try to re-negotiate if we don't have link already. */
 400                 macb_phy_reset(macb);
 401
 402                 for (i = 0; i < CONFIG_SYS_MACB_AUTONEG_TIMEOUT / 100; i++) {
 403                         status = macb_mdio_read(macb, MII_BMSR);
 404                         if (status & BMSR_LSTATUS)
 405                                 break;
 406                         udelay(100);
 407                 }
 408         }
 409
 410         if (!(status & BMSR_LSTATUS)) {
 411                 printf("%s: link down (status: 0x%04x)\n",
 412                        netdev->name, status);
 413                 return 0;
 414         } else {
 415                 adv = macb_mdio_read(macb, MII_ADVERTISE);
 416                 lpa = macb_mdio_read(macb, MII_LPA);
 417                 media = mii_nway_result(lpa & adv);
 418                 speed = (media & (ADVERTISE_100FULL | ADVERTISE_100HALF)
 419                          ? 1 : 0);
 420                 duplex = (media & ADVERTISE_FULL) ? 1 : 0;
 421                 printf("%s: link up, %sMbps %s-duplex (lpa: 0x%04x)\n",
 422                        netdev->name,
 423                        speed ? "100" : "10",
 424                        duplex ? "full" : "half",
 425                        lpa);
 426
 427                 ncfgr = macb_readl(macb, NCFGR);
 428                 ncfgr &= ~(MACB_BIT(SPD) | MACB_BIT(FD));
 429                 if (speed)
 430                         ncfgr |= MACB_BIT(SPD);
 431                 if (duplex)
 432                         ncfgr |= MACB_BIT(FD);
 433                 macb_writel(macb, NCFGR, ncfgr);
 434                 return 1;
 435         }
 436 }
 437
 438 static int macb_init(struct eth_device *netdev, bd_t *bd)
 439 {
 440         struct macb_device *macb = to_macb(netdev);
 441         unsigned long paddr;
 442         int i;
 443
 444         /*
 445          * macb_halt should have been called at some point before now,
 446          * so we'll assume the controller is idle.
 447          */
 448
 449         /* initialize DMA descriptors */
 450         paddr = macb->rx_buffer_dma;
 451         for (i = 0; i < CONFIG_SYS_MACB_RX_RING_SIZE; i++) {
 452                 if (i == (CONFIG_SYS_MACB_RX_RING_SIZE - 1))
 453                         paddr |= RXADDR_WRAP;
 454                 macb->rx_ring[i].addr = paddr;
 455                 macb->rx_ring[i].ctrl = 0;
 456                 paddr += 128;
 457         }
 458         for (i = 0; i < CONFIG_SYS_MACB_TX_RING_SIZE; i++) {
 459                 macb->tx_ring[i].addr = 0;
 460                 if (i == (CONFIG_SYS_MACB_TX_RING_SIZE - 1))
 461                         macb->tx_ring[i].ctrl = TXBUF_USED | TXBUF_WRAP;
 462                 else
 463                         macb->tx_ring[i].ctrl = TXBUF_USED;
 464         }
 465         macb->rx_tail = macb->tx_head = macb->tx_tail = 0;
 466
 467         macb_writel(macb, RBQP, macb->rx_ring_dma);
 468         macb_writel(macb, TBQP, macb->tx_ring_dma);
 469
 470         /* choose RMII or MII mode. This depends on the board */
 471 #ifdef CONFIG_RMII
 472 #if defined(CONFIG_AT91CAP9) || defined(CONFIG_AT91SAM9260) || \
 473     defined(CONFIG_AT91SAM9263) || defined(CONFIG_AT91SAM9G20) || \
 474         defined(CONFIG_AT91SAM9G45) || defined(CONFIG_AT91SAM9M10G45)
 475         macb_writel(macb, USRIO, MACB_BIT(RMII) | MACB_BIT(CLKEN));
 476 #else
 477         macb_writel(macb, USRIO, 0);
 478 #endif
 479 #else
 480 #if defined(CONFIG_AT91CAP9) || defined(CONFIG_AT91SAM9260) || \
 481     defined(CONFIG_AT91SAM9263) || defined(CONFIG_AT91SAM9G20) || \
 482         defined(CONFIG_AT91SAM9G45) || defined(CONFIG_AT91SAM9M10G45)
 483         macb_writel(macb, USRIO, MACB_BIT(CLKEN));
 484 #else
 485         macb_writel(macb, USRIO, MACB_BIT(MII));
 486 #endif
 487 #endif /* CONFIG_RMII */
 488
 489         if (!macb_phy_init(macb))
 490                 return -1;
 491
 492         /* Enable TX and RX */
 493         macb_writel(macb, NCR, MACB_BIT(TE) | MACB_BIT(RE));
 494
 495         return 0;
 496 }
 497
 498 static void macb_halt(struct eth_device *netdev)
 499 {
 500         struct macb_device *macb = to_macb(netdev);
 501         u32 ncr, tsr;
 502
 503         /* Halt the controller and wait for any ongoing transmission to end. */
 504         ncr = macb_readl(macb, NCR);
 505         ncr |= MACB_BIT(THALT);
 506         macb_writel(macb, NCR, ncr);
 507
 508         do {
 509                 tsr = macb_readl(macb, TSR);
 510         } while (tsr & MACB_BIT(TGO));
 511
 512         /* Disable TX and RX, and clear statistics */
 513         macb_writel(macb, NCR, MACB_BIT(CLRSTAT));
 514 }
 515
 516 static int macb_write_hwaddr(struct eth_device *dev)
 517 {
 518         struct macb_device *macb = to_macb(dev);
 519         u32 hwaddr_bottom;
 520         u16 hwaddr_top;
 521
 522         /* set hardware address */
 523         hwaddr_bottom = cpu_to_le32(*((u32 *)dev->enetaddr));
 524         macb_writel(macb, SA1B, hwaddr_bottom);
 525         hwaddr_top = cpu_to_le16(*((u16 *)(dev->enetaddr + 4)));
 526         macb_writel(macb, SA1T, hwaddr_top);
 527         return 0;
 528 }
 529
 530 int macb_eth_initialize(int id, void *regs, unsigned int phy_addr)
 531 {
 532         struct macb_device *macb;
 533         struct eth_device *netdev;
 534         unsigned long macb_hz;
 535         u32 ncfgr;
 536
 537         macb = malloc(sizeof(struct macb_device));
 538         if (!macb) {
 539                 printf("Error: Failed to allocate memory for MACB%d\n", id);
 540                 return -1;
 541         }
 542         memset(macb, 0, sizeof(struct macb_device));
 543
 544         netdev = &macb->netdev;
 545
 546         macb->rx_buffer = dma_alloc_coherent(CONFIG_SYS_MACB_RX_BUFFER_SIZE,
 547                                              &macb->rx_buffer_dma);
 548         macb->rx_ring = dma_alloc_coherent(CONFIG_SYS_MACB_RX_RING_SIZE
 549                                            * sizeof(struct macb_dma_desc),
 550                                            &macb->rx_ring_dma);
 551         macb->tx_ring = dma_alloc_coherent(CONFIG_SYS_MACB_TX_RING_SIZE
 552                                            * sizeof(struct macb_dma_desc),
 553                                            &macb->tx_ring_dma);
 554
 555         macb->regs = regs;
 556         macb->phy_addr = phy_addr;
 557
 558         sprintf(netdev->name, "macb%d", id);
 559         netdev->init = macb_init;
 560         netdev->halt = macb_halt;
 561         netdev->send = macb_send;
 562         netdev->recv = macb_recv;
 563         netdev->write_hwaddr = macb_write_hwaddr;
 564
 565         /*
 566          * Do some basic initialization so that we at least can talk
 567          * to the PHY
 568          */
 569         macb_hz = get_macb_pclk_rate(id);
 570         if (macb_hz < 20000000)
 571                 ncfgr = MACB_BF(CLK, MACB_CLK_DIV8);
 572         else if (macb_hz < 40000000)
 573                 ncfgr = MACB_BF(CLK, MACB_CLK_DIV16);
 574         else if (macb_hz < 80000000)
 575                 ncfgr = MACB_BF(CLK, MACB_CLK_DIV32);
 576         else
 577                 ncfgr = MACB_BF(CLK, MACB_CLK_DIV64);
 578
 579         macb_writel(macb, NCFGR, ncfgr);
 580
 581         eth_register(netdev);
 582
 583 #if defined(CONFIG_CMD_MII)
 584         miiphy_register(netdev->name, macb_miiphy_read, macb_miiphy_write);
 585 #endif
 586         return 0;
 587 }
 588
 589 #endif