SAFE public projects git trees. - safe/jmp/linux-2.6/blob - drivers/net/bfin_mac.c

   1 /*
   2  * Blackfin On-Chip MAC Driver
   3  *
   4  * Copyright 2004-2007 Analog Devices Inc.
   5  *
   6  * Enter bugs at http://blackfin.uclinux.org/
   7  *
   8  * Licensed under the GPL-2 or later.
   9  */
  10
  11 #include <linux/init.h>
  12 #include <linux/module.h>
  13 #include <linux/kernel.h>
  14 #include <linux/sched.h>
  15 #include <linux/slab.h>
  16 #include <linux/delay.h>
  17 #include <linux/timer.h>
  18 #include <linux/errno.h>
  19 #include <linux/irq.h>
  20 #include <linux/io.h>
  21 #include <linux/ioport.h>
  22 #include <linux/crc32.h>
  23 #include <linux/device.h>
  24 #include <linux/spinlock.h>
  25 #include <linux/mii.h>
  26 #include <linux/phy.h>
  27 #include <linux/netdevice.h>
  28 #include <linux/etherdevice.h>
  29 #include <linux/ethtool.h>
  30 #include <linux/skbuff.h>
  31 #include <linux/platform_device.h>
  32
  33 #include <asm/dma.h>
  34 #include <linux/dma-mapping.h>
  35
  36 #include <asm/blackfin.h>
  37 #include <asm/cacheflush.h>
  38 #include <asm/portmux.h>
  39
  40 #include "bfin_mac.h"
  41
  42 #define DRV_NAME        "bfin_mac"
  43 #define DRV_VERSION     "1.1"
  44 #define DRV_AUTHOR      "Bryan Wu, Luke Yang"
  45 #define DRV_DESC        "Blackfin on-chip Ethernet MAC driver"
  46
  47 MODULE_AUTHOR(DRV_AUTHOR);
  48 MODULE_LICENSE("GPL");
  49 MODULE_DESCRIPTION(DRV_DESC);
  50 MODULE_ALIAS("platform:bfin_mac");
  51
  52 #if defined(CONFIG_BFIN_MAC_USE_L1)
  53 # define bfin_mac_alloc(dma_handle, size)  l1_data_sram_zalloc(size)
  54 # define bfin_mac_free(dma_handle, ptr)    l1_data_sram_free(ptr)
  55 #else
  56 # define bfin_mac_alloc(dma_handle, size) \
  57         dma_alloc_coherent(NULL, size, dma_handle, GFP_KERNEL)
  58 # define bfin_mac_free(dma_handle, ptr) \
  59         dma_free_coherent(NULL, sizeof(*ptr), ptr, dma_handle)
  60 #endif
  61
  62 #define PKT_BUF_SZ 1580
  63
  64 #define MAX_TIMEOUT_CNT 500
  65
  66 /* pointers to maintain transmit list */
  67 static struct net_dma_desc_tx *tx_list_head;
  68 static struct net_dma_desc_tx *tx_list_tail;
  69 static struct net_dma_desc_rx *rx_list_head;
  70 static struct net_dma_desc_rx *rx_list_tail;
  71 static struct net_dma_desc_rx *current_rx_ptr;
  72 static struct net_dma_desc_tx *current_tx_ptr;
  73 static struct net_dma_desc_tx *tx_desc;
  74 static struct net_dma_desc_rx *rx_desc;
  75
  76 #if defined(CONFIG_BFIN_MAC_RMII)
  77 static u16 pin_req[] = P_RMII0;
  78 #else
  79 static u16 pin_req[] = P_MII0;
  80 #endif
  81
  82 static void bfin_mac_disable(void);
  83 static void bfin_mac_enable(void);
  84
  85 static void desc_list_free(void)
  86 {
  87         struct net_dma_desc_rx *r;
  88         struct net_dma_desc_tx *t;
  89         int i;
  90 #if !defined(CONFIG_BFIN_MAC_USE_L1)
  91         dma_addr_t dma_handle = 0;
  92 #endif
  93
  94         if (tx_desc) {
  95                 t = tx_list_head;
  96                 for (i = 0; i < CONFIG_BFIN_TX_DESC_NUM; i++) {
  97                         if (t) {
  98                                 if (t->skb) {
  99                                         dev_kfree_skb(t->skb);
 100                                         t->skb = NULL;
 101                                 }
 102                                 t = t->next;
 103                         }
 104                 }
 105                 bfin_mac_free(dma_handle, tx_desc);
 106         }
 107
 108         if (rx_desc) {
 109                 r = rx_list_head;
 110                 for (i = 0; i < CONFIG_BFIN_RX_DESC_NUM; i++) {
 111                         if (r) {
 112                                 if (r->skb) {
 113                                         dev_kfree_skb(r->skb);
 114                                         r->skb = NULL;
 115                                 }
 116                                 r = r->next;
 117                         }
 118                 }
 119                 bfin_mac_free(dma_handle, rx_desc);
 120         }
 121 }
 122
 123 static int desc_list_init(void)
 124 {
 125         int i;
 126         struct sk_buff *new_skb;
 127 #if !defined(CONFIG_BFIN_MAC_USE_L1)
 128         /*
 129          * This dma_handle is useless in Blackfin dma_alloc_coherent().
 130          * The real dma handler is the return value of dma_alloc_coherent().
 131          */
 132         dma_addr_t dma_handle;
 133 #endif
 134
 135         tx_desc = bfin_mac_alloc(&dma_handle,
 136                                 sizeof(struct net_dma_desc_tx) *
 137                                 CONFIG_BFIN_TX_DESC_NUM);
 138         if (tx_desc == NULL)
 139                 goto init_error;
 140
 141         rx_desc = bfin_mac_alloc(&dma_handle,
 142                                 sizeof(struct net_dma_desc_rx) *
 143                                 CONFIG_BFIN_RX_DESC_NUM);
 144         if (rx_desc == NULL)
 145                 goto init_error;
 146
 147         /* init tx_list */
 148         tx_list_head = tx_list_tail = tx_desc;
 149
 150         for (i = 0; i < CONFIG_BFIN_TX_DESC_NUM; i++) {
 151                 struct net_dma_desc_tx *t = tx_desc + i;
 152                 struct dma_descriptor *a = &(t->desc_a);
 153                 struct dma_descriptor *b = &(t->desc_b);
 154
 155                 /*
 156                  * disable DMA
 157                  * read from memory WNR = 0
 158                  * wordsize is 32 bits
 159                  * 6 half words is desc size
 160                  * large desc flow
 161                  */
 162                 a->config = WDSIZE_32 | NDSIZE_6 | DMAFLOW_LARGE;
 163                 a->start_addr = (unsigned long)t->packet;
 164                 a->x_count = 0;
 165                 a->next_dma_desc = b;
 166
 167                 /*
 168                  * enabled DMA
 169                  * write to memory WNR = 1
 170                  * wordsize is 32 bits
 171                  * disable interrupt
 172                  * 6 half words is desc size
 173                  * large desc flow
 174                  */
 175                 b->config = DMAEN | WNR | WDSIZE_32 | NDSIZE_6 | DMAFLOW_LARGE;
 176                 b->start_addr = (unsigned long)(&(t->status));
 177                 b->x_count = 0;
 178
 179                 t->skb = NULL;
 180                 tx_list_tail->desc_b.next_dma_desc = a;
 181                 tx_list_tail->next = t;
 182                 tx_list_tail = t;
 183         }
 184         tx_list_tail->next = tx_list_head;      /* tx_list is a circle */
 185         tx_list_tail->desc_b.next_dma_desc = &(tx_list_head->desc_a);
 186         current_tx_ptr = tx_list_head;
 187
 188         /* init rx_list */
 189         rx_list_head = rx_list_tail = rx_desc;
 190
 191         for (i = 0; i < CONFIG_BFIN_RX_DESC_NUM; i++) {
 192                 struct net_dma_desc_rx *r = rx_desc + i;
 193                 struct dma_descriptor *a = &(r->desc_a);
 194                 struct dma_descriptor *b = &(r->desc_b);
 195
 196                 /* allocate a new skb for next time receive */
 197                 new_skb = dev_alloc_skb(PKT_BUF_SZ + 2);
 198                 if (!new_skb) {
 199                         printk(KERN_NOTICE DRV_NAME
 200                                ": init: low on mem - packet dropped\n");
 201                         goto init_error;
 202                 }
 203                 skb_reserve(new_skb, 2);
 204                 r->skb = new_skb;
 205
 206                 /*
 207                  * enabled DMA
 208                  * write to memory WNR = 1
 209                  * wordsize is 32 bits
 210                  * disable interrupt
 211                  * 6 half words is desc size
 212                  * large desc flow
 213                  */
 214                 a->config = DMAEN | WNR | WDSIZE_32 | NDSIZE_6 | DMAFLOW_LARGE;
 215                 /* since RXDWA is enabled */
 216                 a->start_addr = (unsigned long)new_skb->data - 2;
 217                 a->x_count = 0;
 218                 a->next_dma_desc = b;
 219
 220                 /*
 221                  * enabled DMA
 222                  * write to memory WNR = 1
 223                  * wordsize is 32 bits
 224                  * enable interrupt
 225                  * 6 half words is desc size
 226                  * large desc flow
 227                  */
 228                 b->config = DMAEN | WNR | WDSIZE_32 | DI_EN |
 229                                 NDSIZE_6 | DMAFLOW_LARGE;
 230                 b->start_addr = (unsigned long)(&(r->status));
 231                 b->x_count = 0;
 232
 233                 rx_list_tail->desc_b.next_dma_desc = a;
 234                 rx_list_tail->next = r;
 235                 rx_list_tail = r;
 236         }
 237         rx_list_tail->next = rx_list_head;      /* rx_list is a circle */
 238         rx_list_tail->desc_b.next_dma_desc = &(rx_list_head->desc_a);
 239         current_rx_ptr = rx_list_head;
 240
 241         return 0;
 242
 243 init_error:
 244         desc_list_free();
 245         printk(KERN_ERR DRV_NAME ": kmalloc failed\n");
 246         return -ENOMEM;
 247 }
 248
 249
 250 /*---PHY CONTROL AND CONFIGURATION-----------------------------------------*/
 251
 252 /*
 253  * MII operations
 254  */
 255 /* Wait until the previous MDC/MDIO transaction has completed */
 256 static void bfin_mdio_poll(void)
 257 {
 258         int timeout_cnt = MAX_TIMEOUT_CNT;
 259
 260         /* poll the STABUSY bit */
 261         while ((bfin_read_EMAC_STAADD()) & STABUSY) {
 262                 udelay(1);
 263                 if (timeout_cnt-- < 0) {
 264                         printk(KERN_ERR DRV_NAME
 265                         ": wait MDC/MDIO transaction to complete timeout\n");
 266                         break;
 267                 }
 268         }
 269 }
 270
 271 /* Read an off-chip register in a PHY through the MDC/MDIO port */
 272 static int bfin_mdiobus_read(struct mii_bus *bus, int phy_addr, int regnum)
 273 {
 274         bfin_mdio_poll();
 275
 276         /* read mode */
 277         bfin_write_EMAC_STAADD(SET_PHYAD((u16) phy_addr) |
 278                                 SET_REGAD((u16) regnum) |
 279                                 STABUSY);
 280
 281         bfin_mdio_poll();
 282
 283         return (int) bfin_read_EMAC_STADAT();
 284 }
 285
 286 /* Write an off-chip register in a PHY through the MDC/MDIO port */
 287 static int bfin_mdiobus_write(struct mii_bus *bus, int phy_addr, int regnum,
 288                               u16 value)
 289 {
 290         bfin_mdio_poll();
 291
 292         bfin_write_EMAC_STADAT((u32) value);
 293
 294         /* write mode */
 295         bfin_write_EMAC_STAADD(SET_PHYAD((u16) phy_addr) |
 296                                 SET_REGAD((u16) regnum) |
 297                                 STAOP |
 298                                 STABUSY);
 299
 300         bfin_mdio_poll();
 301
 302         return 0;
 303 }
 304
 305 static int bfin_mdiobus_reset(struct mii_bus *bus)
 306 {
 307         return 0;
 308 }
 309
 310 static void bfin_mac_adjust_link(struct net_device *dev)
 311 {
 312         struct bfin_mac_local *lp = netdev_priv(dev);
 313         struct phy_device *phydev = lp->phydev;
 314         unsigned long flags;
 315         int new_state = 0;
 316
 317         spin_lock_irqsave(&lp->lock, flags);
 318         if (phydev->link) {
 319                 /* Now we make sure that we can be in full duplex mode.
 320                  * If not, we operate in half-duplex mode. */
 321                 if (phydev->duplex != lp->old_duplex) {
 322                         u32 opmode = bfin_read_EMAC_OPMODE();
 323                         new_state = 1;
 324
 325                         if (phydev->duplex)
 326                                 opmode |= FDMODE;
 327                         else
 328                                 opmode &= ~(FDMODE);
 329
 330                         bfin_write_EMAC_OPMODE(opmode);
 331                         lp->old_duplex = phydev->duplex;
 332                 }
 333
 334                 if (phydev->speed != lp->old_speed) {
 335 #if defined(CONFIG_BFIN_MAC_RMII)
 336                         u32 opmode = bfin_read_EMAC_OPMODE();
 337                         switch (phydev->speed) {
 338                         case 10:
 339                                 opmode |= RMII_10;
 340                                 break;
 341                         case 100:
 342                                 opmode &= ~(RMII_10);
 343                                 break;
 344                         default:
 345                                 printk(KERN_WARNING
 346                                         "%s: Ack!  Speed (%d) is not 10/100!\n",
 347                                         DRV_NAME, phydev->speed);
 348                                 break;
 349                         }
 350                         bfin_write_EMAC_OPMODE(opmode);
 351 #endif
 352
 353                         new_state = 1;
 354                         lp->old_speed = phydev->speed;
 355                 }
 356
 357                 if (!lp->old_link) {
 358                         new_state = 1;
 359                         lp->old_link = 1;
 360                 }
 361         } else if (lp->old_link) {
 362                 new_state = 1;
 363                 lp->old_link = 0;
 364                 lp->old_speed = 0;
 365                 lp->old_duplex = -1;
 366         }
 367
 368         if (new_state) {
 369                 u32 opmode = bfin_read_EMAC_OPMODE();
 370                 phy_print_status(phydev);
 371                 pr_debug("EMAC_OPMODE = 0x%08x\n", opmode);
 372         }
 373
 374         spin_unlock_irqrestore(&lp->lock, flags);
 375 }
 376
 377 /* MDC  = 2.5 MHz */
 378 #define MDC_CLK 2500000
 379
 380 static int mii_probe(struct net_device *dev)
 381 {
 382         struct bfin_mac_local *lp = netdev_priv(dev);
 383         struct phy_device *phydev = NULL;
 384         unsigned short sysctl;
 385         int i;
 386         u32 sclk, mdc_div;
 387
 388         /* Enable PHY output early */
 389         if (!(bfin_read_VR_CTL() & PHYCLKOE))
 390                 bfin_write_VR_CTL(bfin_read_VR_CTL() | PHYCLKOE);
 391
 392         sclk = get_sclk();
 393         mdc_div = ((sclk / MDC_CLK) / 2) - 1;
 394
 395         sysctl = bfin_read_EMAC_SYSCTL();
 396         sysctl = (sysctl & ~MDCDIV) | SET_MDCDIV(mdc_div);
 397         bfin_write_EMAC_SYSCTL(sysctl);
 398
 399         /* search for connect PHY device */
 400         for (i = 0; i < PHY_MAX_ADDR; i++) {
 401                 struct phy_device *const tmp_phydev = lp->mii_bus->phy_map[i];
 402
 403                 if (!tmp_phydev)
 404                         continue; /* no PHY here... */
 405
 406                 phydev = tmp_phydev;
 407                 break; /* found it */
 408         }
 409
 410         /* now we are supposed to have a proper phydev, to attach to... */
 411         if (!phydev) {
 412                 printk(KERN_INFO "%s: Don't found any phy device at all\n",
 413                         dev->name);
 414                 return -ENODEV;
 415         }
 416
 417 #if defined(CONFIG_BFIN_MAC_RMII)
 418         phydev = phy_connect(dev, dev_name(&phydev->dev), &bfin_mac_adjust_link,
 419                         0, PHY_INTERFACE_MODE_RMII);
 420 #else
 421         phydev = phy_connect(dev, dev_name(&phydev->dev), &bfin_mac_adjust_link,
 422                         0, PHY_INTERFACE_MODE_MII);
 423 #endif
 424
 425         if (IS_ERR(phydev)) {
 426                 printk(KERN_ERR "%s: Could not attach to PHY\n", dev->name);
 427                 return PTR_ERR(phydev);
 428         }
 429
 430         /* mask with MAC supported features */
 431         phydev->supported &= (SUPPORTED_10baseT_Half
 432                               | SUPPORTED_10baseT_Full
 433                               | SUPPORTED_100baseT_Half
 434                               | SUPPORTED_100baseT_Full
 435                               | SUPPORTED_Autoneg
 436                               | SUPPORTED_Pause | SUPPORTED_Asym_Pause
 437                               | SUPPORTED_MII
 438                               | SUPPORTED_TP);
 439
 440         phydev->advertising = phydev->supported;
 441
 442         lp->old_link = 0;
 443         lp->old_speed = 0;
 444         lp->old_duplex = -1;
 445         lp->phydev = phydev;
 446
 447         printk(KERN_INFO "%s: attached PHY driver [%s] "
 448                "(mii_bus:phy_addr=%s, irq=%d, mdc_clk=%dHz(mdc_div=%d)"
 449                "@sclk=%dMHz)\n",
 450                DRV_NAME, phydev->drv->name, dev_name(&phydev->dev), phydev->irq,
 451                MDC_CLK, mdc_div, sclk/1000000);
 452
 453         return 0;
 454 }
 455
 456 /*
 457  * Ethtool support
 458  */
 459
 460 static int
 461 bfin_mac_ethtool_getsettings(struct net_device *dev, struct ethtool_cmd *cmd)
 462 {
 463         struct bfin_mac_local *lp = netdev_priv(dev);
 464
 465         if (lp->phydev)
 466                 return phy_ethtool_gset(lp->phydev, cmd);
 467
 468         return -EINVAL;
 469 }
 470
 471 static int
 472 bfin_mac_ethtool_setsettings(struct net_device *dev, struct ethtool_cmd *cmd)
 473 {
 474         struct bfin_mac_local *lp = netdev_priv(dev);
 475
 476         if (!capable(CAP_NET_ADMIN))
 477                 return -EPERM;
 478
 479         if (lp->phydev)
 480                 return phy_ethtool_sset(lp->phydev, cmd);
 481
 482         return -EINVAL;
 483 }
 484
 485 static void bfin_mac_ethtool_getdrvinfo(struct net_device *dev,
 486                                         struct ethtool_drvinfo *info)
 487 {
 488         strcpy(info->driver, DRV_NAME);
 489         strcpy(info->version, DRV_VERSION);
 490         strcpy(info->fw_version, "N/A");
 491         strcpy(info->bus_info, dev_name(&dev->dev));
 492 }
 493
 494 static struct ethtool_ops bfin_mac_ethtool_ops = {
 495         .get_settings = bfin_mac_ethtool_getsettings,
 496         .set_settings = bfin_mac_ethtool_setsettings,
 497         .get_link = ethtool_op_get_link,
 498         .get_drvinfo = bfin_mac_ethtool_getdrvinfo,
 499 };
 500
 501 /**************************************************************************/
 502 void setup_system_regs(struct net_device *dev)
 503 {
 504         unsigned short sysctl;
 505
 506         /*
 507          * Odd word alignment for Receive Frame DMA word
 508          * Configure checksum support and rcve frame word alignment
 509          */
 510         sysctl = bfin_read_EMAC_SYSCTL();
 511 #if defined(BFIN_MAC_CSUM_OFFLOAD)
 512         sysctl |= RXDWA | RXCKS;
 513 #else
 514         sysctl |= RXDWA;
 515 #endif
 516         bfin_write_EMAC_SYSCTL(sysctl);
 517
 518         bfin_write_EMAC_MMC_CTL(RSTC | CROLL);
 519
 520         /* Initialize the TX DMA channel registers */
 521         bfin_write_DMA2_X_COUNT(0);
 522         bfin_write_DMA2_X_MODIFY(4);
 523         bfin_write_DMA2_Y_COUNT(0);
 524         bfin_write_DMA2_Y_MODIFY(0);
 525
 526         /* Initialize the RX DMA channel registers */
 527         bfin_write_DMA1_X_COUNT(0);
 528         bfin_write_DMA1_X_MODIFY(4);
 529         bfin_write_DMA1_Y_COUNT(0);
 530         bfin_write_DMA1_Y_MODIFY(0);
 531 }
 532
 533 static void setup_mac_addr(u8 *mac_addr)
 534 {
 535         u32 addr_low = le32_to_cpu(*(__le32 *) & mac_addr[0]);
 536         u16 addr_hi = le16_to_cpu(*(__le16 *) & mac_addr[4]);
 537
 538         /* this depends on a little-endian machine */
 539         bfin_write_EMAC_ADDRLO(addr_low);
 540         bfin_write_EMAC_ADDRHI(addr_hi);
 541 }
 542
 543 static int bfin_mac_set_mac_address(struct net_device *dev, void *p)
 544 {
 545         struct sockaddr *addr = p;
 546         if (netif_running(dev))
 547                 return -EBUSY;
 548         memcpy(dev->dev_addr, addr->sa_data, dev->addr_len);
 549         setup_mac_addr(dev->dev_addr);
 550         return 0;
 551 }
 552
 553 static void adjust_tx_list(void)
 554 {
 555         int timeout_cnt = MAX_TIMEOUT_CNT;
 556
 557         if (tx_list_head->status.status_word != 0
 558             && current_tx_ptr != tx_list_head) {
 559                 goto adjust_head;       /* released something, just return; */
 560         }
 561
 562         /*
 563          * if nothing released, check wait condition
 564          * current's next can not be the head,
 565          * otherwise the dma will not stop as we want
 566          */
 567         if (current_tx_ptr->next->next == tx_list_head) {
 568                 while (tx_list_head->status.status_word == 0) {
 569                         mdelay(1);
 570                         if (tx_list_head->status.status_word != 0
 571                             || !(bfin_read_DMA2_IRQ_STATUS() & 0x08)) {
 572                                 goto adjust_head;
 573                         }
 574                         if (timeout_cnt-- < 0) {
 575                                 printk(KERN_ERR DRV_NAME
 576                                 ": wait for adjust tx list head timeout\n");
 577                                 break;
 578                         }
 579                 }
 580                 if (tx_list_head->status.status_word != 0) {
 581                         goto adjust_head;
 582                 }
 583         }
 584
 585         return;
 586
 587 adjust_head:
 588         do {
 589                 tx_list_head->desc_a.config &= ~DMAEN;
 590                 tx_list_head->status.status_word = 0;
 591                 if (tx_list_head->skb) {
 592                         dev_kfree_skb(tx_list_head->skb);
 593                         tx_list_head->skb = NULL;
 594                 } else {
 595                         printk(KERN_ERR DRV_NAME
 596                                ": no sk_buff in a transmitted frame!\n");
 597                 }
 598                 tx_list_head = tx_list_head->next;
 599         } while (tx_list_head->status.status_word != 0
 600                  && current_tx_ptr != tx_list_head);
 601         return;
 602
 603 }
 604
 605 static int bfin_mac_hard_start_xmit(struct sk_buff *skb,
 606                                 struct net_device *dev)
 607 {
 608         u16 *data;
 609
 610         current_tx_ptr->skb = skb;
 611
 612         if (ANOMALY_05000285) {
 613                 /*
 614                  * TXDWA feature is not avaible to older revision < 0.3 silicon
 615                  * of BF537
 616                  *
 617                  * Only if data buffer is ODD WORD alignment, we do not
 618                  * need to memcpy
 619                  */
 620                 u32 data_align = (u32)(skb->data) & 0x3;
 621                 if (data_align == 0x2) {
 622                         /* move skb->data to current_tx_ptr payload */
 623                         data = (u16 *)(skb->data) - 1;
 624                         *data = (u16)(skb->len);
 625                         current_tx_ptr->desc_a.start_addr = (u32)data;
 626                         /* this is important! */
 627                         blackfin_dcache_flush_range((u32)data,
 628                                         (u32)((u8 *)data + skb->len + 4));
 629                 } else {
 630                         *((u16 *)(current_tx_ptr->packet)) = (u16)(skb->len);
 631                         memcpy((u8 *)(current_tx_ptr->packet + 2), skb->data,
 632                                 skb->len);
 633                         current_tx_ptr->desc_a.start_addr =
 634                                 (u32)current_tx_ptr->packet;
 635                         if (current_tx_ptr->status.status_word != 0)
 636                                 current_tx_ptr->status.status_word = 0;
 637                         blackfin_dcache_flush_range(
 638                                 (u32)current_tx_ptr->packet,
 639                                 (u32)(current_tx_ptr->packet + skb->len + 2));
 640                 }
 641         } else {
 642                 /*
 643                  * TXDWA feature is avaible to revision < 0.3 silicon of
 644                  * BF537 and always avaible to BF52x
 645                  */
 646                 u32 data_align = (u32)(skb->data) & 0x3;
 647                 if (data_align == 0x0) {
 648                         u16 sysctl = bfin_read_EMAC_SYSCTL();
 649                         sysctl |= TXDWA;
 650                         bfin_write_EMAC_SYSCTL(sysctl);
 651
 652                         /* move skb->data to current_tx_ptr payload */
 653                         data = (u16 *)(skb->data) - 2;
 654                         *data = (u16)(skb->len);
 655                         current_tx_ptr->desc_a.start_addr = (u32)data;
 656                         /* this is important! */
 657                         blackfin_dcache_flush_range(
 658                                         (u32)data,
 659                                         (u32)((u8 *)data + skb->len + 4));
 660                 } else if (data_align == 0x2) {
 661                         u16 sysctl = bfin_read_EMAC_SYSCTL();
 662                         sysctl &= ~TXDWA;
 663                         bfin_write_EMAC_SYSCTL(sysctl);
 664
 665                         /* move skb->data to current_tx_ptr payload */
 666                         data = (u16 *)(skb->data) - 1;
 667                         *data = (u16)(skb->len);
 668                         current_tx_ptr->desc_a.start_addr = (u32)data;
 669                         /* this is important! */
 670                         blackfin_dcache_flush_range(
 671                                         (u32)data,
 672                                         (u32)((u8 *)data + skb->len + 4));
 673                 } else {
 674                         u16 sysctl = bfin_read_EMAC_SYSCTL();
 675                         sysctl &= ~TXDWA;
 676                         bfin_write_EMAC_SYSCTL(sysctl);
 677
 678                         *((u16 *)(current_tx_ptr->packet)) = (u16)(skb->len);
 679                         memcpy((u8 *)(current_tx_ptr->packet + 2), skb->data,
 680                                 skb->len);
 681                         current_tx_ptr->desc_a.start_addr =
 682                                 (u32)current_tx_ptr->packet;
 683                         if (current_tx_ptr->status.status_word != 0)
 684                                 current_tx_ptr->status.status_word = 0;
 685                         blackfin_dcache_flush_range(
 686                                 (u32)current_tx_ptr->packet,
 687                                 (u32)(current_tx_ptr->packet + skb->len + 2));
 688                 }
 689         }
 690
 691         /* make sure the internal data buffers in the core are drained
 692          * so that the DMA descriptors are completely written when the
 693          * DMA engine goes to fetch them below
 694          */
 695         SSYNC();
 696
 697         /* enable this packet's dma */
 698         current_tx_ptr->desc_a.config |= DMAEN;
 699
 700         /* tx dma is running, just return */
 701         if (bfin_read_DMA2_IRQ_STATUS() & 0x08)
 702                 goto out;
 703
 704         /* tx dma is not running */
 705         bfin_write_DMA2_NEXT_DESC_PTR(&(current_tx_ptr->desc_a));
 706         /* dma enabled, read from memory, size is 6 */
 707         bfin_write_DMA2_CONFIG(current_tx_ptr->desc_a.config);
 708         /* Turn on the EMAC tx */
 709         bfin_write_EMAC_OPMODE(bfin_read_EMAC_OPMODE() | TE);
 710
 711 out:
 712         adjust_tx_list();
 713         current_tx_ptr = current_tx_ptr->next;
 714         dev->trans_start = jiffies;
 715         dev->stats.tx_packets++;
 716         dev->stats.tx_bytes += (skb->len);
 717         return 0;
 718 }
 719
 720 static void bfin_mac_rx(struct net_device *dev)
 721 {
 722         struct sk_buff *skb, *new_skb;
 723         unsigned short len;
 724
 725         /* allocate a new skb for next time receive */
 726         skb = current_rx_ptr->skb;
 727         new_skb = dev_alloc_skb(PKT_BUF_SZ + 2);
 728         if (!new_skb) {
 729                 printk(KERN_NOTICE DRV_NAME
 730                        ": rx: low on mem - packet dropped\n");
 731                 dev->stats.rx_dropped++;
 732                 goto out;
 733         }
 734         /* reserve 2 bytes for RXDWA padding */
 735         skb_reserve(new_skb, 2);
 736         current_rx_ptr->skb = new_skb;
 737         current_rx_ptr->desc_a.start_addr = (unsigned long)new_skb->data - 2;
 738
 739         /* Invidate the data cache of skb->data range when it is write back
 740          * cache. It will prevent overwritting the new data from DMA
 741          */
 742         blackfin_dcache_invalidate_range((unsigned long)new_skb->head,
 743                                          (unsigned long)new_skb->end);
 744
 745         len = (unsigned short)((current_rx_ptr->status.status_word) & RX_FRLEN);
 746         skb_put(skb, len);
 747         blackfin_dcache_invalidate_range((unsigned long)skb->head,
 748                                          (unsigned long)skb->tail);
 749
 750         skb->protocol = eth_type_trans(skb, dev);
 751 #if defined(BFIN_MAC_CSUM_OFFLOAD)
 752         skb->csum = current_rx_ptr->status.ip_payload_csum;
 753         skb->ip_summed = CHECKSUM_COMPLETE;
 754 #endif
 755
 756         netif_rx(skb);
 757         dev->stats.rx_packets++;
 758         dev->stats.rx_bytes += len;
 759         current_rx_ptr->status.status_word = 0x00000000;
 760         current_rx_ptr = current_rx_ptr->next;
 761
 762 out:
 763         return;
 764 }
 765
 766 /* interrupt routine to handle rx and error signal */
 767 static irqreturn_t bfin_mac_interrupt(int irq, void *dev_id)
 768 {
 769         struct net_device *dev = dev_id;
 770         int number = 0;
 771
 772 get_one_packet:
 773         if (current_rx_ptr->status.status_word == 0) {
 774                 /* no more new packet received */
 775                 if (number == 0) {
 776                         if (current_rx_ptr->next->status.status_word != 0) {
 777                                 current_rx_ptr = current_rx_ptr->next;
 778                                 goto real_rx;
 779                         }
 780                 }
 781                 bfin_write_DMA1_IRQ_STATUS(bfin_read_DMA1_IRQ_STATUS() |
 782                                            DMA_DONE | DMA_ERR);
 783                 return IRQ_HANDLED;
 784         }
 785
 786 real_rx:
 787         bfin_mac_rx(dev);
 788         number++;
 789         goto get_one_packet;
 790 }
 791
 792 #ifdef CONFIG_NET_POLL_CONTROLLER
 793 static void bfin_mac_poll(struct net_device *dev)
 794 {
 795         disable_irq(IRQ_MAC_RX);
 796         bfin_mac_interrupt(IRQ_MAC_RX, dev);
 797         enable_irq(IRQ_MAC_RX);
 798 }
 799 #endif                          /* CONFIG_NET_POLL_CONTROLLER */
 800
 801 static void bfin_mac_disable(void)
 802 {
 803         unsigned int opmode;
 804
 805         opmode = bfin_read_EMAC_OPMODE();
 806         opmode &= (~RE);
 807         opmode &= (~TE);
 808         /* Turn off the EMAC */
 809         bfin_write_EMAC_OPMODE(opmode);
 810 }
 811
 812 /*
 813  * Enable Interrupts, Receive, and Transmit
 814  */
 815 static void bfin_mac_enable(void)
 816 {
 817         u32 opmode;
 818
 819         pr_debug("%s: %s\n", DRV_NAME, __func__);
 820
 821         /* Set RX DMA */
 822         bfin_write_DMA1_NEXT_DESC_PTR(&(rx_list_head->desc_a));
 823         bfin_write_DMA1_CONFIG(rx_list_head->desc_a.config);
 824
 825         /* Wait MII done */
 826         bfin_mdio_poll();
 827
 828         /* We enable only RX here */
 829         /* ASTP   : Enable Automatic Pad Stripping
 830            PR     : Promiscuous Mode for test
 831            PSF    : Receive frames with total length less than 64 bytes.
 832            FDMODE : Full Duplex Mode
 833            LB     : Internal Loopback for test
 834            RE     : Receiver Enable */
 835         opmode = bfin_read_EMAC_OPMODE();
 836         if (opmode & FDMODE)
 837                 opmode |= PSF;
 838         else
 839                 opmode |= DRO | DC | PSF;
 840         opmode |= RE;
 841
 842 #if defined(CONFIG_BFIN_MAC_RMII)
 843         opmode |= RMII; /* For Now only 100MBit are supported */
 844 #if (defined(CONFIG_BF537) || defined(CONFIG_BF536)) && CONFIG_BF_REV_0_2
 845         opmode |= TE;
 846 #endif
 847 #endif
 848         /* Turn on the EMAC rx */
 849         bfin_write_EMAC_OPMODE(opmode);
 850 }
 851
 852 /* Our watchdog timed out. Called by the networking layer */
 853 static void bfin_mac_timeout(struct net_device *dev)
 854 {
 855         pr_debug("%s: %s\n", dev->name, __func__);
 856
 857         bfin_mac_disable();
 858
 859         /* reset tx queue */
 860         tx_list_tail = tx_list_head->next;
 861
 862         bfin_mac_enable();
 863
 864         /* We can accept TX packets again */
 865         dev->trans_start = jiffies;
 866         netif_wake_queue(dev);
 867 }
 868
 869 static void bfin_mac_multicast_hash(struct net_device *dev)
 870 {
 871         u32 emac_hashhi, emac_hashlo;
 872         struct dev_mc_list *dmi = dev->mc_list;
 873         char *addrs;
 874         int i;
 875         u32 crc;
 876
 877         emac_hashhi = emac_hashlo = 0;
 878
 879         for (i = 0; i < dev->mc_count; i++) {
 880                 addrs = dmi->dmi_addr;
 881                 dmi = dmi->next;
 882
 883                 /* skip non-multicast addresses */
 884                 if (!(*addrs & 1))
 885                         continue;
 886
 887                 crc = ether_crc(ETH_ALEN, addrs);
 888                 crc >>= 26;
 889
 890                 if (crc & 0x20)
 891                         emac_hashhi |= 1 << (crc & 0x1f);
 892                 else
 893                         emac_hashlo |= 1 << (crc & 0x1f);
 894         }
 895
 896         bfin_write_EMAC_HASHHI(emac_hashhi);
 897         bfin_write_EMAC_HASHLO(emac_hashlo);
 898
 899         return;
 900 }
 901
 902 /*
 903  * This routine will, depending on the values passed to it,
 904  * either make it accept multicast packets, go into
 905  * promiscuous mode (for TCPDUMP and cousins) or accept
 906  * a select set of multicast packets
 907  */
 908 static void bfin_mac_set_multicast_list(struct net_device *dev)
 909 {
 910         u32 sysctl;
 911
 912         if (dev->flags & IFF_PROMISC) {
 913                 printk(KERN_INFO "%s: set to promisc mode\n", dev->name);
 914                 sysctl = bfin_read_EMAC_OPMODE();
 915                 sysctl |= RAF;
 916                 bfin_write_EMAC_OPMODE(sysctl);
 917         } else if (dev->flags & IFF_ALLMULTI) {
 918                 /* accept all multicast */
 919                 sysctl = bfin_read_EMAC_OPMODE();
 920                 sysctl |= PAM;
 921                 bfin_write_EMAC_OPMODE(sysctl);
 922         } else if (dev->mc_count) {
 923                 /* set up multicast hash table */
 924                 sysctl = bfin_read_EMAC_OPMODE();
 925                 sysctl |= HM;
 926                 bfin_write_EMAC_OPMODE(sysctl);
 927                 bfin_mac_multicast_hash(dev);
 928         } else {
 929                 /* clear promisc or multicast mode */
 930                 sysctl = bfin_read_EMAC_OPMODE();
 931                 sysctl &= ~(RAF | PAM);
 932                 bfin_write_EMAC_OPMODE(sysctl);
 933         }
 934 }
 935
 936 /*
 937  * this puts the device in an inactive state
 938  */
 939 static void bfin_mac_shutdown(struct net_device *dev)
 940 {
 941         /* Turn off the EMAC */
 942         bfin_write_EMAC_OPMODE(0x00000000);
 943         /* Turn off the EMAC RX DMA */
 944         bfin_write_DMA1_CONFIG(0x0000);
 945         bfin_write_DMA2_CONFIG(0x0000);
 946 }
 947
 948 /*
 949  * Open and Initialize the interface
 950  *
 951  * Set up everything, reset the card, etc..
 952  */
 953 static int bfin_mac_open(struct net_device *dev)
 954 {
 955         struct bfin_mac_local *lp = netdev_priv(dev);
 956         int retval;
 957         pr_debug("%s: %s\n", dev->name, __func__);
 958
 959         /*
 960          * Check that the address is valid.  If its not, refuse
 961          * to bring the device up.  The user must specify an
 962          * address using ifconfig eth0 hw ether xx:xx:xx:xx:xx:xx
 963          */
 964         if (!is_valid_ether_addr(dev->dev_addr)) {
 965                 printk(KERN_WARNING DRV_NAME ": no valid ethernet hw addr\n");
 966                 return -EINVAL;
 967         }
 968
 969         /* initial rx and tx list */
 970         retval = desc_list_init();
 971
 972         if (retval)
 973                 return retval;
 974
 975         phy_start(lp->phydev);
 976         phy_write(lp->phydev, MII_BMCR, BMCR_RESET);
 977         setup_system_regs(dev);
 978         setup_mac_addr(dev->dev_addr);
 979         bfin_mac_disable();
 980         bfin_mac_enable();
 981         pr_debug("hardware init finished\n");
 982         netif_start_queue(dev);
 983         netif_carrier_on(dev);
 984
 985         return 0;
 986 }
 987
 988 static const struct net_device_ops bfin_mac_netdev_ops = {
 989         .ndo_open               = bfin_mac_open,
 990         .ndo_stop               = bfin_mac_close,
 991         .ndo_start_xmit         = bfin_mac_hard_start_xmit,
 992         .ndo_set_mac_address    = bfin_mac_set_mac_address,
 993         .ndo_tx_timeout         = bfin_mac_timeout,
 994         .ndo_set_multicast_list = bfin_mac_set_multicast_list,
 995         .ndo_validate_addr      = eth_validate_addr,
 996         .ndo_change_mtu         = eth_change_mtu,
 997 #ifdef CONFIG_NET_POLL_CONTROLLER
 998         .ndo_poll_controller    = bfin_mac_poll,
 999 #endif
1000 };
1001
1002 /*
1003  *
1004  * this makes the board clean up everything that it can
1005  * and not talk to the outside world.   Caused by
1006  * an 'ifconfig ethX down'
1007  */
1008 static int bfin_mac_close(struct net_device *dev)
1009 {
1010         struct bfin_mac_local *lp = netdev_priv(dev);
1011         pr_debug("%s: %s\n", dev->name, __func__);
1012
1013         netif_stop_queue(dev);
1014         netif_carrier_off(dev);
1015
1016         phy_stop(lp->phydev);
1017         phy_write(lp->phydev, MII_BMCR, BMCR_PDOWN);
1018
1019         /* clear everything */
1020         bfin_mac_shutdown(dev);
1021
1022         /* free the rx/tx buffers */
1023         desc_list_free();
1024
1025         return 0;
1026 }
1027
1028 static int __devinit bfin_mac_probe(struct platform_device *pdev)
1029 {
1030         struct net_device *ndev;
1031         struct bfin_mac_local *lp;
1032         int rc, i;
1033
1034         ndev = alloc_etherdev(sizeof(struct bfin_mac_local));
1035         if (!ndev) {
1036                 dev_err(&pdev->dev, "Cannot allocate net device!\n");
1037                 return -ENOMEM;
1038         }
1039
1040         SET_NETDEV_DEV(ndev, &pdev->dev);
1041         platform_set_drvdata(pdev, ndev);
1042         lp = netdev_priv(ndev);
1043
1044         /* Grab the MAC address in the MAC */
1045         *(__le32 *) (&(ndev->dev_addr[0])) = cpu_to_le32(bfin_read_EMAC_ADDRLO());
1046         *(__le16 *) (&(ndev->dev_addr[4])) = cpu_to_le16((u16) bfin_read_EMAC_ADDRHI());
1047
1048         /* probe mac */
1049         /*todo: how to proble? which is revision_register */
1050         bfin_write_EMAC_ADDRLO(0x12345678);
1051         if (bfin_read_EMAC_ADDRLO() != 0x12345678) {
1052                 dev_err(&pdev->dev, "Cannot detect Blackfin on-chip ethernet MAC controller!\n");
1053                 rc = -ENODEV;
1054                 goto out_err_probe_mac;
1055         }
1056
1057         /* set the GPIO pins to Ethernet mode */
1058         rc = peripheral_request_list(pin_req, DRV_NAME);
1059         if (rc) {
1060                 dev_err(&pdev->dev, "Requesting peripherals failed!\n");
1061                 rc = -EFAULT;
1062                 goto out_err_setup_pin_mux;
1063         }
1064
1065         /*
1066          * Is it valid? (Did bootloader initialize it?)
1067          * Grab the MAC from the board somehow
1068          * this is done in the arch/blackfin/mach-bfxxx/boards/eth_mac.c
1069          */
1070         if (!is_valid_ether_addr(ndev->dev_addr))
1071                 bfin_get_ether_addr(ndev->dev_addr);
1072
1073         /* If still not valid, get a random one */
1074         if (!is_valid_ether_addr(ndev->dev_addr))
1075                 random_ether_addr(ndev->dev_addr);
1076
1077         setup_mac_addr(ndev->dev_addr);
1078
1079         /* MDIO bus initial */
1080         lp->mii_bus = mdiobus_alloc();
1081         if (lp->mii_bus == NULL)
1082                 goto out_err_mdiobus_alloc;
1083
1084         lp->mii_bus->priv = ndev;
1085         lp->mii_bus->read = bfin_mdiobus_read;
1086         lp->mii_bus->write = bfin_mdiobus_write;
1087         lp->mii_bus->reset = bfin_mdiobus_reset;
1088         lp->mii_bus->name = "bfin_mac_mdio";
1089         snprintf(lp->mii_bus->id, MII_BUS_ID_SIZE, "0");
1090         lp->mii_bus->irq = kmalloc(sizeof(int)*PHY_MAX_ADDR, GFP_KERNEL);
1091         for (i = 0; i < PHY_MAX_ADDR; ++i)
1092                 lp->mii_bus->irq[i] = PHY_POLL;
1093
1094         rc = mdiobus_register(lp->mii_bus);
1095         if (rc) {
1096                 dev_err(&pdev->dev, "Cannot register MDIO bus!\n");
1097                 goto out_err_mdiobus_register;
1098         }
1099
1100         rc = mii_probe(ndev);
1101         if (rc) {
1102                 dev_err(&pdev->dev, "MII Probe failed!\n");
1103                 goto out_err_mii_probe;
1104         }
1105
1106         /* Fill in the fields of the device structure with ethernet values. */
1107         ether_setup(ndev);
1108
1109         ndev->netdev_ops = &bfin_mac_netdev_ops;
1110         ndev->ethtool_ops = &bfin_mac_ethtool_ops;
1111
1112         spin_lock_init(&lp->lock);
1113
1114         /* now, enable interrupts */
1115         /* register irq handler */
1116         rc = request_irq(IRQ_MAC_RX, bfin_mac_interrupt,
1117                         IRQF_DISABLED, "EMAC_RX", ndev);
1118         if (rc) {
1119                 dev_err(&pdev->dev, "Cannot request Blackfin MAC RX IRQ!\n");
1120                 rc = -EBUSY;
1121                 goto out_err_request_irq;
1122         }
1123
1124         rc = register_netdev(ndev);
1125         if (rc) {
1126                 dev_err(&pdev->dev, "Cannot register net device!\n");
1127                 goto out_err_reg_ndev;
1128         }
1129
1130         /* now, print out the card info, in a short format.. */
1131         dev_info(&pdev->dev, "%s, Version %s\n", DRV_DESC, DRV_VERSION);
1132
1133         return 0;
1134
1135 out_err_reg_ndev:
1136         free_irq(IRQ_MAC_RX, ndev);
1137 out_err_request_irq:
1138 out_err_mii_probe:
1139         mdiobus_unregister(lp->mii_bus);
1140 out_err_mdiobus_register:
1141         mdiobus_free(lp->mii_bus);
1142 out_err_mdiobus_alloc:
1143         peripheral_free_list(pin_req);
1144 out_err_setup_pin_mux:
1145 out_err_probe_mac:
1146         platform_set_drvdata(pdev, NULL);
1147         free_netdev(ndev);
1148
1149         return rc;
1150 }
1151
1152 static int __devexit bfin_mac_remove(struct platform_device *pdev)
1153 {
1154         struct net_device *ndev = platform_get_drvdata(pdev);
1155         struct bfin_mac_local *lp = netdev_priv(ndev);
1156
1157         platform_set_drvdata(pdev, NULL);
1158
1159         mdiobus_unregister(lp->mii_bus);
1160         mdiobus_free(lp->mii_bus);
1161
1162         unregister_netdev(ndev);
1163
1164         free_irq(IRQ_MAC_RX, ndev);
1165
1166         free_netdev(ndev);
1167
1168         peripheral_free_list(pin_req);
1169
1170         return 0;
1171 }
1172
1173 #ifdef CONFIG_PM
1174 static int bfin_mac_suspend(struct platform_device *pdev, pm_message_t mesg)
1175 {
1176         struct net_device *net_dev = platform_get_drvdata(pdev);
1177
1178         if (netif_running(net_dev))
1179                 bfin_mac_close(net_dev);
1180
1181         return 0;
1182 }
1183
1184 static int bfin_mac_resume(struct platform_device *pdev)
1185 {
1186         struct net_device *net_dev = platform_get_drvdata(pdev);
1187
1188         if (netif_running(net_dev))
1189                 bfin_mac_open(net_dev);
1190
1191         return 0;
1192 }
1193 #else
1194 #define bfin_mac_suspend NULL
1195 #define bfin_mac_resume NULL
1196 #endif  /* CONFIG_PM */
1197
1198 static struct platform_driver bfin_mac_driver = {
1199         .probe = bfin_mac_probe,
1200         .remove = __devexit_p(bfin_mac_remove),
1201         .resume = bfin_mac_resume,
1202         .suspend = bfin_mac_suspend,
1203         .driver = {
1204                 .name = DRV_NAME,
1205                 .owner  = THIS_MODULE,
1206         },
1207 };
1208
1209 static int __init bfin_mac_init(void)
1210 {
1211         return platform_driver_register(&bfin_mac_driver);
1212 }
1213
1214 module_init(bfin_mac_init);
1215
1216 static void __exit bfin_mac_cleanup(void)
1217 {
1218         platform_driver_unregister(&bfin_mac_driver);
1219 }
1220
1221 module_exit(bfin_mac_cleanup);
1222