drivers/net/bfin_mac.c

   1 /*
   2  * Driver for Blackfin On-Chip MAC device
   3  *
   4  * Copyright (c) 2005-2008 Analog Device, Inc.
   5  *
   6  * Licensed under the GPL-2 or later.
   7  */
   8
   9 #include <common.h>
  10 #include <config.h>
  11 #include <net.h>
  12 #include <netdev.h>
  13 #include <command.h>
  14 #include <malloc.h>
  15 #include <miiphy.h>
  16 #include <linux/mii.h>
  17
  18 #include <asm/blackfin.h>
  19 #include <asm/portmux.h>
  20 #include <asm/mach-common/bits/dma.h>
  21 #include <asm/mach-common/bits/emac.h>
  22 #include <asm/mach-common/bits/pll.h>
  23
  24 #include "bfin_mac.h"
  25
  26 #ifndef CONFIG_PHY_ADDR
  27 # define CONFIG_PHY_ADDR 1
  28 #endif
  29 #ifndef CONFIG_PHY_CLOCK_FREQ
  30 # define CONFIG_PHY_CLOCK_FREQ 2500000
  31 #endif
  32
  33 #ifdef CONFIG_POST
  34 #include <post.h>
  35 #endif
  36
  37 #define RXBUF_BASE_ADDR         0xFF900000
  38 #define TXBUF_BASE_ADDR         0xFF800000
  39 #define TX_BUF_CNT              1
  40
  41 #define TOUT_LOOP               1000000
  42
  43 static ADI_ETHER_BUFFER *txbuf[TX_BUF_CNT];
  44 static ADI_ETHER_BUFFER *rxbuf[PKTBUFSRX];
  45 static u16 txIdx;               /* index of the current RX buffer */
  46 static u16 rxIdx;               /* index of the current TX buffer */
  47
  48 /* DMAx_CONFIG values at DMA Restart */
  49 static const union {
  50         u16 data;
  51         ADI_DMA_CONFIG_REG reg;
  52 } txdmacfg = {
  53         .reg = {
  54                 .b_DMA_EN  = 1, /* enabled */
  55                 .b_WNR     = 0, /* read from memory */
  56                 .b_WDSIZE  = 2, /* wordsize is 32 bits */
  57                 .b_DMA2D   = 0,
  58                 .b_RESTART = 0,
  59                 .b_DI_SEL  = 0,
  60                 .b_DI_EN   = 0, /* no interrupt */
  61                 .b_NDSIZE  = 5, /* 5 half words is desc size */
  62                 .b_FLOW    = 7  /* large desc flow */
  63         },
  64 };
  65
  66 static int bfin_miiphy_wait(void)
  67 {
  68         /* poll the STABUSY bit */
  69         while (bfin_read_EMAC_STAADD() & STABUSY)
  70                 continue;
  71         return 0;
  72 }
  73
  74 static int bfin_miiphy_read(const char *devname, uchar addr, uchar reg, ushort *val)
  75 {
  76         if (bfin_miiphy_wait())
  77                 return 1;
  78         bfin_write_EMAC_STAADD(SET_PHYAD(addr) | SET_REGAD(reg) | STABUSY);
  79         if (bfin_miiphy_wait())
  80                 return 1;
  81         *val = bfin_read_EMAC_STADAT();
  82         return 0;
  83 }
  84
  85 static int bfin_miiphy_write(const char *devname, uchar addr, uchar reg, ushort val)
  86 {
  87         if (bfin_miiphy_wait())
  88                 return 1;
  89         bfin_write_EMAC_STADAT(val);
  90         bfin_write_EMAC_STAADD(SET_PHYAD(addr) | SET_REGAD(reg) | STAOP | STABUSY);
  91         return 0;
  92 }
  93
  94 int bfin_EMAC_initialize(bd_t *bis)
  95 {
  96         struct eth_device *dev;
  97         dev = malloc(sizeof(*dev));
  98         if (dev == NULL)
  99                 hang();
 100
 101         memset(dev, 0, sizeof(*dev));
 102         strcpy(dev->name, "bfin_mac");
 103
 104         dev->iobase = 0;
 105         dev->priv = 0;
 106         dev->init = bfin_EMAC_init;
 107         dev->halt = bfin_EMAC_halt;
 108         dev->send = bfin_EMAC_send;
 109         dev->recv = bfin_EMAC_recv;
 110         dev->write_hwaddr = bfin_EMAC_setup_addr;
 111
 112         eth_register(dev);
 113
 114 #if defined(CONFIG_MII) || defined(CONFIG_CMD_MII)
 115         miiphy_register(dev->name, bfin_miiphy_read, bfin_miiphy_write);
 116 #endif
 117
 118         return 0;
 119 }
 120
 121 static int bfin_EMAC_send(struct eth_device *dev, void *packet, int length)
 122 {
 123         int i;
 124         int result = 0;
 125
 126         if (length <= 0) {
 127                 printf("Ethernet: bad packet size: %d\n", length);
 128                 goto out;
 129         }
 130
 131         if (bfin_read_DMA2_IRQ_STATUS() & DMA_ERR) {
 132                 printf("Ethernet: tx DMA error\n");
 133                 goto out;
 134         }
 135
 136         for (i = 0; (bfin_read_DMA2_IRQ_STATUS() & DMA_RUN); ++i) {
 137                 if (i > TOUT_LOOP) {
 138                         puts("Ethernet: tx time out\n");
 139                         goto out;
 140                 }
 141         }
 142         txbuf[txIdx]->FrmData->NoBytes = length;
 143         memcpy(txbuf[txIdx]->FrmData->Dest, (void *)packet, length);
 144         txbuf[txIdx]->Dma[0].START_ADDR = (u32) txbuf[txIdx]->FrmData;
 145         bfin_write_DMA2_NEXT_DESC_PTR(txbuf[txIdx]->Dma);
 146         bfin_write_DMA2_CONFIG(txdmacfg.data);
 147         bfin_write_EMAC_OPMODE(bfin_read_EMAC_OPMODE() | TE);
 148
 149         for (i = 0; (txbuf[txIdx]->StatusWord & TX_COMP) == 0; i++) {
 150                 if (i > TOUT_LOOP) {
 151                         puts("Ethernet: tx error\n");
 152                         goto out;
 153                 }
 154         }
 155         result = txbuf[txIdx]->StatusWord;
 156         txbuf[txIdx]->StatusWord = 0;
 157         if ((txIdx + 1) >= TX_BUF_CNT)
 158                 txIdx = 0;
 159         else
 160                 txIdx++;
 161  out:
 162         debug("BFIN EMAC send: length = %d\n", length);
 163         return result;
 164 }
 165
 166 static int bfin_EMAC_recv(struct eth_device *dev)
 167 {
 168         int length = 0;
 169
 170         for (;;) {
 171                 if ((rxbuf[rxIdx]->StatusWord & RX_COMP) == 0) {
 172                         length = -1;
 173                         break;
 174                 }
 175                 if ((rxbuf[rxIdx]->StatusWord & RX_DMAO) != 0) {
 176                         printf("Ethernet: rx dma overrun\n");
 177                         break;
 178                 }
 179                 if ((rxbuf[rxIdx]->StatusWord & RX_OK) == 0) {
 180                         printf("Ethernet: rx error\n");
 181                         break;
 182                 }
 183                 length = rxbuf[rxIdx]->StatusWord & 0x000007FF;
 184                 if (length <= 4) {
 185                         printf("Ethernet: bad frame\n");
 186                         break;
 187                 }
 188
 189                 debug("%s: len = %d\n", __func__, length - 4);
 190
 191                 NetRxPackets[rxIdx] = rxbuf[rxIdx]->FrmData->Dest;
 192                 NetReceive(NetRxPackets[rxIdx], length - 4);
 193                 bfin_write_DMA1_IRQ_STATUS(DMA_DONE | DMA_ERR);
 194                 rxbuf[rxIdx]->StatusWord = 0x00000000;
 195                 if ((rxIdx + 1) >= PKTBUFSRX)
 196                         rxIdx = 0;
 197                 else
 198                         rxIdx++;
 199         }
 200
 201         return length;
 202 }
 203
 204 /**************************************************************
 205  *
 206  * Ethernet Initialization Routine
 207  *
 208  *************************************************************/
 209
 210 /* MDC = SCLK / MDC_freq / 2 - 1 */
 211 #define MDC_FREQ_TO_DIV(mdc_freq) (get_sclk() / (mdc_freq) / 2 - 1)
 212
 213 #ifndef CONFIG_BFIN_MAC_PINS
 214 # ifdef CONFIG_RMII
 215 #  define CONFIG_BFIN_MAC_PINS P_RMII0
 216 # else
 217 #  define CONFIG_BFIN_MAC_PINS P_MII0
 218 # endif
 219 #endif
 220
 221 static int bfin_miiphy_init(struct eth_device *dev, int *opmode)
 222 {
 223         const unsigned short pins[] = CONFIG_BFIN_MAC_PINS;
 224         u16 phydat;
 225         size_t count;
 226
 227         /* Enable PHY output */
 228         bfin_write_VR_CTL(bfin_read_VR_CTL() | CLKBUFOE);
 229
 230         /* Set all the pins to peripheral mode */
 231         peripheral_request_list(pins, "bfin_mac");
 232
 233         /* Odd word alignment for Receive Frame DMA word */
 234         /* Configure checksum support and rcve frame word alignment */
 235         bfin_write_EMAC_SYSCTL(RXDWA | RXCKS | SET_MDCDIV(MDC_FREQ_TO_DIV(CONFIG_PHY_CLOCK_FREQ)));
 236
 237         /* turn on auto-negotiation and wait for link to come up */
 238         bfin_miiphy_write(dev->name, CONFIG_PHY_ADDR, MII_BMCR, BMCR_ANENABLE);
 239         count = 0;
 240         while (1) {
 241                 ++count;
 242                 if (bfin_miiphy_read(dev->name, CONFIG_PHY_ADDR, MII_BMSR, &phydat))
 243                         return -1;
 244                 if (phydat & BMSR_LSTATUS)
 245                         break;
 246                 if (count > 30000) {
 247                         printf("%s: link down, check cable\n", dev->name);
 248                         return -1;
 249                 }
 250                 udelay(100);
 251         }
 252
 253         /* see what kind of link we have */
 254         if (bfin_miiphy_read(dev->name, CONFIG_PHY_ADDR, MII_LPA, &phydat))
 255                 return -1;
 256         if (phydat & LPA_DUPLEX)
 257                 *opmode = FDMODE;
 258         else
 259                 *opmode = 0;
 260
 261         bfin_write_EMAC_MMC_CTL(RSTC | CROLL);
 262         bfin_write_EMAC_VLAN1(EMAC_VLANX_DEF_VAL);
 263         bfin_write_EMAC_VLAN2(EMAC_VLANX_DEF_VAL);
 264
 265         /* Initialize the TX DMA channel registers */
 266         bfin_write_DMA2_X_COUNT(0);
 267         bfin_write_DMA2_X_MODIFY(4);
 268         bfin_write_DMA2_Y_COUNT(0);
 269         bfin_write_DMA2_Y_MODIFY(0);
 270
 271         /* Initialize the RX DMA channel registers */
 272         bfin_write_DMA1_X_COUNT(0);
 273         bfin_write_DMA1_X_MODIFY(4);
 274         bfin_write_DMA1_Y_COUNT(0);
 275         bfin_write_DMA1_Y_MODIFY(0);
 276
 277         return 0;
 278 }
 279
 280 static int bfin_EMAC_setup_addr(struct eth_device *dev)
 281 {
 282         bfin_write_EMAC_ADDRLO(
 283                 dev->enetaddr[0] |
 284                 dev->enetaddr[1] << 8 |
 285                 dev->enetaddr[2] << 16 |
 286                 dev->enetaddr[3] << 24
 287         );
 288         bfin_write_EMAC_ADDRHI(
 289                 dev->enetaddr[4] |
 290                 dev->enetaddr[5] << 8
 291         );
 292         return 0;
 293 }
 294
 295 static int bfin_EMAC_init(struct eth_device *dev, bd_t *bd)
 296 {
 297         u32 opmode;
 298         int dat;
 299         int i;
 300         debug("Eth_init: ......\n");
 301
 302         txIdx = 0;
 303         rxIdx = 0;
 304
 305         /* Initialize System Register */
 306         if (bfin_miiphy_init(dev, &dat) < 0)
 307                 return -1;
 308
 309         /* Initialize EMAC address */
 310         bfin_EMAC_setup_addr(dev);
 311
 312         /* Initialize TX and RX buffer */
 313         for (i = 0; i < PKTBUFSRX; i++) {
 314                 rxbuf[i] = SetupRxBuffer(i);
 315                 if (i > 0) {
 316                         rxbuf[i - 1]->Dma[1].NEXT_DESC_PTR = rxbuf[i]->Dma;
 317                         if (i == (PKTBUFSRX - 1))
 318                                 rxbuf[i]->Dma[1].NEXT_DESC_PTR = rxbuf[0]->Dma;
 319                 }
 320         }
 321         for (i = 0; i < TX_BUF_CNT; i++) {
 322                 txbuf[i] = SetupTxBuffer(i);
 323                 if (i > 0) {
 324                         txbuf[i - 1]->Dma[1].NEXT_DESC_PTR = txbuf[i]->Dma;
 325                         if (i == (TX_BUF_CNT - 1))
 326                                 txbuf[i]->Dma[1].NEXT_DESC_PTR = txbuf[0]->Dma;
 327                 }
 328         }
 329
 330         /* Set RX DMA */
 331         bfin_write_DMA1_NEXT_DESC_PTR(rxbuf[0]->Dma);
 332         bfin_write_DMA1_CONFIG(rxbuf[0]->Dma[0].CONFIG_DATA);
 333
 334         /* Wait MII done */
 335         bfin_miiphy_wait();
 336
 337         /* We enable only RX here */
 338         /* ASTP   : Enable Automatic Pad Stripping
 339            PR     : Promiscuous Mode for test
 340            PSF    : Receive frames with total length less than 64 bytes.
 341            FDMODE : Full Duplex Mode
 342            LB     : Internal Loopback for test
 343            RE     : Receiver Enable */
 344         if (dat == FDMODE)
 345                 opmode = ASTP | FDMODE | PSF;
 346         else
 347                 opmode = ASTP | PSF;
 348         opmode |= RE;
 349 #ifdef CONFIG_RMII
 350         opmode |= TE | RMII;
 351 #endif
 352         /* Turn on the EMAC */
 353         bfin_write_EMAC_OPMODE(opmode);
 354         return 0;
 355 }
 356
 357 static void bfin_EMAC_halt(struct eth_device *dev)
 358 {
 359         debug("Eth_halt: ......\n");
 360         /* Turn off the EMAC */
 361         bfin_write_EMAC_OPMODE(0);
 362         /* Turn off the EMAC RX DMA */
 363         bfin_write_DMA1_CONFIG(0);
 364         bfin_write_DMA2_CONFIG(0);
 365 }
 366
 367 ADI_ETHER_BUFFER *SetupRxBuffer(int no)
 368 {
 369         ADI_ETHER_FRAME_BUFFER *frmbuf;
 370         ADI_ETHER_BUFFER *buf;
 371         int nobytes_buffer = sizeof(ADI_ETHER_BUFFER[2]) / 2;   /* ensure a multi. of 4 */
 372         int total_size = nobytes_buffer + RECV_BUFSIZE;
 373
 374         buf = (void *) (RXBUF_BASE_ADDR + no * total_size);
 375         frmbuf = (void *) (RXBUF_BASE_ADDR + no * total_size + nobytes_buffer);
 376
 377         memset(buf, 0x00, nobytes_buffer);
 378         buf->FrmData = frmbuf;
 379         memset(frmbuf, 0xfe, RECV_BUFSIZE);
 380
 381         /* set up first desc to point to receive frame buffer */
 382         buf->Dma[0].NEXT_DESC_PTR = &(buf->Dma[1]);
 383         buf->Dma[0].START_ADDR = (u32) buf->FrmData;
 384         buf->Dma[0].CONFIG.b_DMA_EN = 1;        /* enabled */
 385         buf->Dma[0].CONFIG.b_WNR = 1;   /* Write to memory */
 386         buf->Dma[0].CONFIG.b_WDSIZE = 2;        /* wordsize is 32 bits */
 387         buf->Dma[0].CONFIG.b_NDSIZE = 5;        /* 5 half words is desc size. */
 388         buf->Dma[0].CONFIG.b_FLOW = 7;  /* large desc flow */
 389
 390         /* set up second desc to point to status word */
 391         buf->Dma[1].NEXT_DESC_PTR = buf->Dma;
 392         buf->Dma[1].START_ADDR = (u32) & buf->IPHdrChksum;
 393         buf->Dma[1].CONFIG.b_DMA_EN = 1;        /* enabled */
 394         buf->Dma[1].CONFIG.b_WNR = 1;   /* Write to memory */
 395         buf->Dma[1].CONFIG.b_WDSIZE = 2;        /* wordsize is 32 bits */
 396         buf->Dma[1].CONFIG.b_DI_EN = 1; /* enable interrupt */
 397         buf->Dma[1].CONFIG.b_NDSIZE = 5;        /* must be 0 when FLOW is 0 */
 398         buf->Dma[1].CONFIG.b_FLOW = 7;  /* stop */
 399
 400         return buf;
 401 }
 402
 403 ADI_ETHER_BUFFER *SetupTxBuffer(int no)
 404 {
 405         ADI_ETHER_FRAME_BUFFER *frmbuf;
 406         ADI_ETHER_BUFFER *buf;
 407         int nobytes_buffer = sizeof(ADI_ETHER_BUFFER[2]) / 2;   /* ensure a multi. of 4 */
 408         int total_size = nobytes_buffer + RECV_BUFSIZE;
 409
 410         buf = (void *) (TXBUF_BASE_ADDR + no * total_size);
 411         frmbuf = (void *) (TXBUF_BASE_ADDR + no * total_size + nobytes_buffer);
 412
 413         memset(buf, 0x00, nobytes_buffer);
 414         buf->FrmData = frmbuf;
 415         memset(frmbuf, 0x00, RECV_BUFSIZE);
 416
 417         /* set up first desc to point to receive frame buffer */
 418         buf->Dma[0].NEXT_DESC_PTR = &(buf->Dma[1]);
 419         buf->Dma[0].START_ADDR = (u32) buf->FrmData;
 420         buf->Dma[0].CONFIG.b_DMA_EN = 1;        /* enabled */
 421         buf->Dma[0].CONFIG.b_WNR = 0;   /* Read to memory */
 422         buf->Dma[0].CONFIG.b_WDSIZE = 2;        /* wordsize is 32 bits */
 423         buf->Dma[0].CONFIG.b_NDSIZE = 5;        /* 5 half words is desc size. */
 424         buf->Dma[0].CONFIG.b_FLOW = 7;  /* large desc flow */
 425
 426         /* set up second desc to point to status word */
 427         buf->Dma[1].NEXT_DESC_PTR = &(buf->Dma[0]);
 428         buf->Dma[1].START_ADDR = (u32) & buf->StatusWord;
 429         buf->Dma[1].CONFIG.b_DMA_EN = 1;        /* enabled */
 430         buf->Dma[1].CONFIG.b_WNR = 1;   /* Write to memory */
 431         buf->Dma[1].CONFIG.b_WDSIZE = 2;        /* wordsize is 32 bits */
 432         buf->Dma[1].CONFIG.b_DI_EN = 1; /* enable interrupt */
 433         buf->Dma[1].CONFIG.b_NDSIZE = 0;        /* must be 0 when FLOW is 0 */
 434         buf->Dma[1].CONFIG.b_FLOW = 0;  /* stop */
 435
 436         return buf;
 437 }
 438
 439 #if defined(CONFIG_POST) && defined(CONFIG_SYS_POST_ETHER)
 440 int ether_post_test(int flags)
 441 {
 442         uchar buf[64];
 443         int i, value = 0;
 444         int length;
 445         uint addr;
 446
 447         printf("\n--------");
 448         bfin_EMAC_init(NULL, NULL);
 449         /* construct the package */
 450         addr = bfin_read_EMAC_ADDRLO();
 451         buf[0] = buf[6] = addr;
 452         buf[1] = buf[7] = addr >> 8;
 453         buf[2] = buf[8] = addr >> 16;
 454         buf[3] = buf[9] = addr >> 24;
 455         addr = bfin_read_EMAC_ADDRHI();
 456         buf[4] = buf[10] = addr;
 457         buf[5] = buf[11] = addr >> 8;
 458         buf[12] = 0x08;         /* Type: ARP */
 459         buf[13] = 0x06;
 460         buf[14] = 0x00;         /* Hardware type: Ethernet */
 461         buf[15] = 0x01;
 462         buf[16] = 0x08;         /* Protocal type: IP */
 463         buf[17] = 0x00;
 464         buf[18] = 0x06;         /* Hardware size    */
 465         buf[19] = 0x04;         /* Protocol size    */
 466         buf[20] = 0x00;         /* Opcode: request  */
 467         buf[21] = 0x01;
 468
 469         for (i = 0; i < 42; i++)
 470                 buf[i + 22] = i;
 471         printf("--------Send 64 bytes......\n");
 472         bfin_EMAC_send(NULL, buf, 64);
 473         for (i = 0; i < 100; i++) {
 474                 udelay(10000);
 475                 if ((rxbuf[rxIdx]->StatusWord & RX_COMP) != 0) {
 476                         value = 1;
 477                         break;
 478                 }
 479         }
 480         if (value == 0) {
 481                 printf("--------EMAC can't receive any data\n");
 482                 eth_halt();
 483                 return -1;
 484         }
 485         length = rxbuf[rxIdx]->StatusWord & 0x000007FF - 4;
 486         for (i = 0; i < length; i++) {
 487                 if (rxbuf[rxIdx]->FrmData->Dest[i] != buf[i]) {
 488                         printf("--------EMAC receive error data!\n");
 489                         eth_halt();
 490                         return -1;
 491                 }
 492         }
 493         printf("--------receive %d bytes, matched\n", length);
 494         bfin_EMAC_halt(NULL);
 495         return 0;
 496 }
 497 #endif