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/div64.h>
  37 #include <asm/dpmc.h>
  38 #include <asm/blackfin.h>
  39 #include <asm/cacheflush.h>
  40 #include <asm/portmux.h>
  41 #include <mach/pll.h>
  42
  43 #include "bfin_mac.h"
  44
  45 #define DRV_NAME        "bfin_mac"
  46 #define DRV_VERSION     "1.1"
  47 #define DRV_AUTHOR      "Bryan Wu, Luke Yang"
  48 #define DRV_DESC        "Blackfin on-chip Ethernet MAC driver"
  49
  50 MODULE_AUTHOR(DRV_AUTHOR);
  51 MODULE_LICENSE("GPL");
  52 MODULE_DESCRIPTION(DRV_DESC);
  53 MODULE_ALIAS("platform:bfin_mac");
  54
  55 #if defined(CONFIG_BFIN_MAC_USE_L1)
  56 # define bfin_mac_alloc(dma_handle, size)  l1_data_sram_zalloc(size)
  57 # define bfin_mac_free(dma_handle, ptr)    l1_data_sram_free(ptr)
  58 #else
  59 # define bfin_mac_alloc(dma_handle, size) \
  60         dma_alloc_coherent(NULL, size, dma_handle, GFP_KERNEL)
  61 # define bfin_mac_free(dma_handle, ptr) \
  62         dma_free_coherent(NULL, sizeof(*ptr), ptr, dma_handle)
  63 #endif
  64
  65 #define PKT_BUF_SZ 1580
  66
  67 #define MAX_TIMEOUT_CNT 500
  68
  69 /* pointers to maintain transmit list */
  70 static struct net_dma_desc_tx *tx_list_head;
  71 static struct net_dma_desc_tx *tx_list_tail;
  72 static struct net_dma_desc_rx *rx_list_head;
  73 static struct net_dma_desc_rx *rx_list_tail;
  74 static struct net_dma_desc_rx *current_rx_ptr;
  75 static struct net_dma_desc_tx *current_tx_ptr;
  76 static struct net_dma_desc_tx *tx_desc;
  77 static struct net_dma_desc_rx *rx_desc;
  78
  79 #if defined(CONFIG_BFIN_MAC_RMII)
  80 static u16 pin_req[] = P_RMII0;
  81 #else
  82 static u16 pin_req[] = P_MII0;
  83 #endif
  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 + NET_IP_ALIGN);
 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, NET_IP_ALIGN);
 204                 /* Invidate the data cache of skb->data range when it is write back
 205                  * cache. It will prevent overwritting the new data from DMA
 206                  */
 207                 blackfin_dcache_invalidate_range((unsigned long)new_skb->head,
 208                                          (unsigned long)new_skb->end);
 209                 r->skb = new_skb;
 210
 211                 /*
 212                  * enabled DMA
 213                  * write to memory WNR = 1
 214                  * wordsize is 32 bits
 215                  * disable interrupt
 216                  * 6 half words is desc size
 217                  * large desc flow
 218                  */
 219                 a->config = DMAEN | WNR | WDSIZE_32 | NDSIZE_6 | DMAFLOW_LARGE;
 220                 /* since RXDWA is enabled */
 221                 a->start_addr = (unsigned long)new_skb->data - 2;
 222                 a->x_count = 0;
 223                 a->next_dma_desc = b;
 224
 225                 /*
 226                  * enabled DMA
 227                  * write to memory WNR = 1
 228                  * wordsize is 32 bits
 229                  * enable interrupt
 230                  * 6 half words is desc size
 231                  * large desc flow
 232                  */
 233                 b->config = DMAEN | WNR | WDSIZE_32 | DI_EN |
 234                                 NDSIZE_6 | DMAFLOW_LARGE;
 235                 b->start_addr = (unsigned long)(&(r->status));
 236                 b->x_count = 0;
 237
 238                 rx_list_tail->desc_b.next_dma_desc = a;
 239                 rx_list_tail->next = r;
 240                 rx_list_tail = r;
 241         }
 242         rx_list_tail->next = rx_list_head;      /* rx_list is a circle */
 243         rx_list_tail->desc_b.next_dma_desc = &(rx_list_head->desc_a);
 244         current_rx_ptr = rx_list_head;
 245
 246         return 0;
 247
 248 init_error:
 249         desc_list_free();
 250         printk(KERN_ERR DRV_NAME ": kmalloc failed\n");
 251         return -ENOMEM;
 252 }
 253
 254
 255 /*---PHY CONTROL AND CONFIGURATION-----------------------------------------*/
 256
 257 /*
 258  * MII operations
 259  */
 260 /* Wait until the previous MDC/MDIO transaction has completed */
 261 static int bfin_mdio_poll(void)
 262 {
 263         int timeout_cnt = MAX_TIMEOUT_CNT;
 264
 265         /* poll the STABUSY bit */
 266         while ((bfin_read_EMAC_STAADD()) & STABUSY) {
 267                 udelay(1);
 268                 if (timeout_cnt-- < 0) {
 269                         printk(KERN_ERR DRV_NAME
 270                         ": wait MDC/MDIO transaction to complete timeout\n");
 271                         return -ETIMEDOUT;
 272                 }
 273         }
 274
 275         return 0;
 276 }
 277
 278 /* Read an off-chip register in a PHY through the MDC/MDIO port */
 279 static int bfin_mdiobus_read(struct mii_bus *bus, int phy_addr, int regnum)
 280 {
 281         int ret;
 282
 283         ret = bfin_mdio_poll();
 284         if (ret)
 285                 return ret;
 286
 287         /* read mode */
 288         bfin_write_EMAC_STAADD(SET_PHYAD((u16) phy_addr) |
 289                                 SET_REGAD((u16) regnum) |
 290                                 STABUSY);
 291
 292         ret = bfin_mdio_poll();
 293         if (ret)
 294                 return ret;
 295
 296         return (int) bfin_read_EMAC_STADAT();
 297 }
 298
 299 /* Write an off-chip register in a PHY through the MDC/MDIO port */
 300 static int bfin_mdiobus_write(struct mii_bus *bus, int phy_addr, int regnum,
 301                               u16 value)
 302 {
 303         int ret;
 304
 305         ret = bfin_mdio_poll();
 306         if (ret)
 307                 return ret;
 308
 309         bfin_write_EMAC_STADAT((u32) value);
 310
 311         /* write mode */
 312         bfin_write_EMAC_STAADD(SET_PHYAD((u16) phy_addr) |
 313                                 SET_REGAD((u16) regnum) |
 314                                 STAOP |
 315                                 STABUSY);
 316
 317         return bfin_mdio_poll();
 318 }
 319
 320 static int bfin_mdiobus_reset(struct mii_bus *bus)
 321 {
 322         return 0;
 323 }
 324
 325 static void bfin_mac_adjust_link(struct net_device *dev)
 326 {
 327         struct bfin_mac_local *lp = netdev_priv(dev);
 328         struct phy_device *phydev = lp->phydev;
 329         unsigned long flags;
 330         int new_state = 0;
 331
 332         spin_lock_irqsave(&lp->lock, flags);
 333         if (phydev->link) {
 334                 /* Now we make sure that we can be in full duplex mode.
 335                  * If not, we operate in half-duplex mode. */
 336                 if (phydev->duplex != lp->old_duplex) {
 337                         u32 opmode = bfin_read_EMAC_OPMODE();
 338                         new_state = 1;
 339
 340                         if (phydev->duplex)
 341                                 opmode |= FDMODE;
 342                         else
 343                                 opmode &= ~(FDMODE);
 344
 345                         bfin_write_EMAC_OPMODE(opmode);
 346                         lp->old_duplex = phydev->duplex;
 347                 }
 348
 349                 if (phydev->speed != lp->old_speed) {
 350 #if defined(CONFIG_BFIN_MAC_RMII)
 351                         u32 opmode = bfin_read_EMAC_OPMODE();
 352                         switch (phydev->speed) {
 353                         case 10:
 354                                 opmode |= RMII_10;
 355                                 break;
 356                         case 100:
 357                                 opmode &= ~(RMII_10);
 358                                 break;
 359                         default:
 360                                 printk(KERN_WARNING
 361                                         "%s: Ack!  Speed (%d) is not 10/100!\n",
 362                                         DRV_NAME, phydev->speed);
 363                                 break;
 364                         }
 365                         bfin_write_EMAC_OPMODE(opmode);
 366 #endif
 367
 368                         new_state = 1;
 369                         lp->old_speed = phydev->speed;
 370                 }
 371
 372                 if (!lp->old_link) {
 373                         new_state = 1;
 374                         lp->old_link = 1;
 375                 }
 376         } else if (lp->old_link) {
 377                 new_state = 1;
 378                 lp->old_link = 0;
 379                 lp->old_speed = 0;
 380                 lp->old_duplex = -1;
 381         }
 382
 383         if (new_state) {
 384                 u32 opmode = bfin_read_EMAC_OPMODE();
 385                 phy_print_status(phydev);
 386                 pr_debug("EMAC_OPMODE = 0x%08x\n", opmode);
 387         }
 388
 389         spin_unlock_irqrestore(&lp->lock, flags);
 390 }
 391
 392 /* MDC  = 2.5 MHz */
 393 #define MDC_CLK 2500000
 394
 395 static int mii_probe(struct net_device *dev)
 396 {
 397         struct bfin_mac_local *lp = netdev_priv(dev);
 398         struct phy_device *phydev = NULL;
 399         unsigned short sysctl;
 400         int i;
 401         u32 sclk, mdc_div;
 402
 403         /* Enable PHY output early */
 404         if (!(bfin_read_VR_CTL() & CLKBUFOE))
 405                 bfin_write_VR_CTL(bfin_read_VR_CTL() | CLKBUFOE);
 406
 407         sclk = get_sclk();
 408         mdc_div = ((sclk / MDC_CLK) / 2) - 1;
 409
 410         sysctl = bfin_read_EMAC_SYSCTL();
 411         sysctl = (sysctl & ~MDCDIV) | SET_MDCDIV(mdc_div);
 412         bfin_write_EMAC_SYSCTL(sysctl);
 413
 414         /* search for connect PHY device */
 415         for (i = 0; i < PHY_MAX_ADDR; i++) {
 416                 struct phy_device *const tmp_phydev = lp->mii_bus->phy_map[i];
 417
 418                 if (!tmp_phydev)
 419                         continue; /* no PHY here... */
 420
 421                 phydev = tmp_phydev;
 422                 break; /* found it */
 423         }
 424
 425         /* now we are supposed to have a proper phydev, to attach to... */
 426         if (!phydev) {
 427                 printk(KERN_INFO "%s: Don't found any phy device at all\n",
 428                         dev->name);
 429                 return -ENODEV;
 430         }
 431
 432 #if defined(CONFIG_BFIN_MAC_RMII)
 433         phydev = phy_connect(dev, dev_name(&phydev->dev), &bfin_mac_adjust_link,
 434                         0, PHY_INTERFACE_MODE_RMII);
 435 #else
 436         phydev = phy_connect(dev, dev_name(&phydev->dev), &bfin_mac_adjust_link,
 437                         0, PHY_INTERFACE_MODE_MII);
 438 #endif
 439
 440         if (IS_ERR(phydev)) {
 441                 printk(KERN_ERR "%s: Could not attach to PHY\n", dev->name);
 442                 return PTR_ERR(phydev);
 443         }
 444
 445         /* mask with MAC supported features */
 446         phydev->supported &= (SUPPORTED_10baseT_Half
 447                               | SUPPORTED_10baseT_Full
 448                               | SUPPORTED_100baseT_Half
 449                               | SUPPORTED_100baseT_Full
 450                               | SUPPORTED_Autoneg
 451                               | SUPPORTED_Pause | SUPPORTED_Asym_Pause
 452                               | SUPPORTED_MII
 453                               | SUPPORTED_TP);
 454
 455         phydev->advertising = phydev->supported;
 456
 457         lp->old_link = 0;
 458         lp->old_speed = 0;
 459         lp->old_duplex = -1;
 460         lp->phydev = phydev;
 461
 462         printk(KERN_INFO "%s: attached PHY driver [%s] "
 463                "(mii_bus:phy_addr=%s, irq=%d, mdc_clk=%dHz(mdc_div=%d)"
 464                "@sclk=%dMHz)\n",
 465                DRV_NAME, phydev->drv->name, dev_name(&phydev->dev), phydev->irq,
 466                MDC_CLK, mdc_div, sclk/1000000);
 467
 468         return 0;
 469 }
 470
 471 /*
 472  * Ethtool support
 473  */
 474
 475 /*
 476  * interrupt routine for magic packet wakeup
 477  */
 478 static irqreturn_t bfin_mac_wake_interrupt(int irq, void *dev_id)
 479 {
 480         return IRQ_HANDLED;
 481 }
 482
 483 static int
 484 bfin_mac_ethtool_getsettings(struct net_device *dev, struct ethtool_cmd *cmd)
 485 {
 486         struct bfin_mac_local *lp = netdev_priv(dev);
 487
 488         if (lp->phydev)
 489                 return phy_ethtool_gset(lp->phydev, cmd);
 490
 491         return -EINVAL;
 492 }
 493
 494 static int
 495 bfin_mac_ethtool_setsettings(struct net_device *dev, struct ethtool_cmd *cmd)
 496 {
 497         struct bfin_mac_local *lp = netdev_priv(dev);
 498
 499         if (!capable(CAP_NET_ADMIN))
 500                 return -EPERM;
 501
 502         if (lp->phydev)
 503                 return phy_ethtool_sset(lp->phydev, cmd);
 504
 505         return -EINVAL;
 506 }
 507
 508 static void bfin_mac_ethtool_getdrvinfo(struct net_device *dev,
 509                                         struct ethtool_drvinfo *info)
 510 {
 511         strcpy(info->driver, DRV_NAME);
 512         strcpy(info->version, DRV_VERSION);
 513         strcpy(info->fw_version, "N/A");
 514         strcpy(info->bus_info, dev_name(&dev->dev));
 515 }
 516
 517 static void bfin_mac_ethtool_getwol(struct net_device *dev,
 518         struct ethtool_wolinfo *wolinfo)
 519 {
 520         struct bfin_mac_local *lp = netdev_priv(dev);
 521
 522         wolinfo->supported = WAKE_MAGIC;
 523         wolinfo->wolopts = lp->wol;
 524 }
 525
 526 static int bfin_mac_ethtool_setwol(struct net_device *dev,
 527         struct ethtool_wolinfo *wolinfo)
 528 {
 529         struct bfin_mac_local *lp = netdev_priv(dev);
 530         int rc;
 531
 532         if (wolinfo->wolopts & (WAKE_MAGICSECURE |
 533                                 WAKE_UCAST |
 534                                 WAKE_MCAST |
 535                                 WAKE_BCAST |
 536                                 WAKE_ARP))
 537                 return -EOPNOTSUPP;
 538
 539         lp->wol = wolinfo->wolopts;
 540
 541         if (lp->wol && !lp->irq_wake_requested) {
 542                 /* register wake irq handler */
 543                 rc = request_irq(IRQ_MAC_WAKEDET, bfin_mac_wake_interrupt,
 544                                  IRQF_DISABLED, "EMAC_WAKE", dev);
 545                 if (rc)
 546                         return rc;
 547                 lp->irq_wake_requested = true;
 548         }
 549
 550         if (!lp->wol && lp->irq_wake_requested) {
 551                 free_irq(IRQ_MAC_WAKEDET, dev);
 552                 lp->irq_wake_requested = false;
 553         }
 554
 555         /* Make sure the PHY driver doesn't suspend */
 556         device_init_wakeup(&dev->dev, lp->wol);
 557
 558         return 0;
 559 }
 560
 561 static const struct ethtool_ops bfin_mac_ethtool_ops = {
 562         .get_settings = bfin_mac_ethtool_getsettings,
 563         .set_settings = bfin_mac_ethtool_setsettings,
 564         .get_link = ethtool_op_get_link,
 565         .get_drvinfo = bfin_mac_ethtool_getdrvinfo,
 566         .get_wol = bfin_mac_ethtool_getwol,
 567         .set_wol = bfin_mac_ethtool_setwol,
 568 };
 569
 570 /**************************************************************************/
 571 void setup_system_regs(struct net_device *dev)
 572 {
 573         unsigned short sysctl;
 574
 575         /*
 576          * Odd word alignment for Receive Frame DMA word
 577          * Configure checksum support and rcve frame word alignment
 578          */
 579         sysctl = bfin_read_EMAC_SYSCTL();
 580         sysctl |= RXDWA;
 581 #if defined(BFIN_MAC_CSUM_OFFLOAD)
 582         sysctl |= RXCKS;
 583 #else
 584         sysctl &= ~RXCKS;
 585 #endif
 586         bfin_write_EMAC_SYSCTL(sysctl);
 587
 588         bfin_write_EMAC_MMC_CTL(RSTC | CROLL);
 589
 590         /* Initialize the TX DMA channel registers */
 591         bfin_write_DMA2_X_COUNT(0);
 592         bfin_write_DMA2_X_MODIFY(4);
 593         bfin_write_DMA2_Y_COUNT(0);
 594         bfin_write_DMA2_Y_MODIFY(0);
 595
 596         /* Initialize the RX DMA channel registers */
 597         bfin_write_DMA1_X_COUNT(0);
 598         bfin_write_DMA1_X_MODIFY(4);
 599         bfin_write_DMA1_Y_COUNT(0);
 600         bfin_write_DMA1_Y_MODIFY(0);
 601 }
 602
 603 static void setup_mac_addr(u8 *mac_addr)
 604 {
 605         u32 addr_low = le32_to_cpu(*(__le32 *) & mac_addr[0]);
 606         u16 addr_hi = le16_to_cpu(*(__le16 *) & mac_addr[4]);
 607
 608         /* this depends on a little-endian machine */
 609         bfin_write_EMAC_ADDRLO(addr_low);
 610         bfin_write_EMAC_ADDRHI(addr_hi);
 611 }
 612
 613 static int bfin_mac_set_mac_address(struct net_device *dev, void *p)
 614 {
 615         struct sockaddr *addr = p;
 616         if (netif_running(dev))
 617                 return -EBUSY;
 618         memcpy(dev->dev_addr, addr->sa_data, dev->addr_len);
 619         setup_mac_addr(dev->dev_addr);
 620         return 0;
 621 }
 622
 623 #ifdef CONFIG_BFIN_MAC_USE_HWSTAMP
 624 #define bfin_mac_hwtstamp_is_none(cfg) ((cfg) == HWTSTAMP_FILTER_NONE)
 625
 626 static int bfin_mac_hwtstamp_ioctl(struct net_device *netdev,
 627                 struct ifreq *ifr, int cmd)
 628 {
 629         struct hwtstamp_config config;
 630         struct bfin_mac_local *lp = netdev_priv(netdev);
 631         u16 ptpctl;
 632         u32 ptpfv1, ptpfv2, ptpfv3, ptpfoff;
 633
 634         if (copy_from_user(&config, ifr->ifr_data, sizeof(config)))
 635                 return -EFAULT;
 636
 637         pr_debug("%s config flag:0x%x, tx_type:0x%x, rx_filter:0x%x\n",
 638                         __func__, config.flags, config.tx_type, config.rx_filter);
 639
 640         /* reserved for future extensions */
 641         if (config.flags)
 642                 return -EINVAL;
 643
 644         if ((config.tx_type != HWTSTAMP_TX_OFF) &&
 645                         (config.tx_type != HWTSTAMP_TX_ON))
 646                 return -ERANGE;
 647
 648         ptpctl = bfin_read_EMAC_PTP_CTL();
 649
 650         switch (config.rx_filter) {
 651         case HWTSTAMP_FILTER_NONE:
 652                 /*
 653                  * Dont allow any timestamping
 654                  */
 655                 ptpfv3 = 0xFFFFFFFF;
 656                 bfin_write_EMAC_PTP_FV3(ptpfv3);
 657                 break;
 658         case HWTSTAMP_FILTER_PTP_V1_L4_EVENT:
 659         case HWTSTAMP_FILTER_PTP_V1_L4_SYNC:
 660         case HWTSTAMP_FILTER_PTP_V1_L4_DELAY_REQ:
 661                 /*
 662                  * Clear the five comparison mask bits (bits[12:8]) in EMAC_PTP_CTL)
 663                  * to enable all the field matches.
 664                  */
 665                 ptpctl &= ~0x1F00;
 666                 bfin_write_EMAC_PTP_CTL(ptpctl);
 667                 /*
 668                  * Keep the default values of the EMAC_PTP_FOFF register.
 669                  */
 670                 ptpfoff = 0x4A24170C;
 671                 bfin_write_EMAC_PTP_FOFF(ptpfoff);
 672                 /*
 673                  * Keep the default values of the EMAC_PTP_FV1 and EMAC_PTP_FV2
 674                  * registers.
 675                  */
 676                 ptpfv1 = 0x11040800;
 677                 bfin_write_EMAC_PTP_FV1(ptpfv1);
 678                 ptpfv2 = 0x0140013F;
 679                 bfin_write_EMAC_PTP_FV2(ptpfv2);
 680                 /*
 681                  * The default value (0xFFFC) allows the timestamping of both
 682                  * received Sync messages and Delay_Req messages.
 683                  */
 684                 ptpfv3 = 0xFFFFFFFC;
 685                 bfin_write_EMAC_PTP_FV3(ptpfv3);
 686
 687                 config.rx_filter = HWTSTAMP_FILTER_PTP_V1_L4_EVENT;
 688                 break;
 689         case HWTSTAMP_FILTER_PTP_V2_L4_EVENT:
 690         case HWTSTAMP_FILTER_PTP_V2_L4_SYNC:
 691         case HWTSTAMP_FILTER_PTP_V2_DELAY_REQ:
 692                 /* Clear all five comparison mask bits (bits[12:8]) in the
 693                  * EMAC_PTP_CTL register to enable all the field matches.
 694                  */
 695                 ptpctl &= ~0x1F00;
 696                 bfin_write_EMAC_PTP_CTL(ptpctl);
 697                 /*
 698                  * Keep the default values of the EMAC_PTP_FOFF register, except set
 699                  * the PTPCOF field to 0x2A.
 700                  */
 701                 ptpfoff = 0x2A24170C;
 702                 bfin_write_EMAC_PTP_FOFF(ptpfoff);
 703                 /*
 704                  * Keep the default values of the EMAC_PTP_FV1 and EMAC_PTP_FV2
 705                  * registers.
 706                  */
 707                 ptpfv1 = 0x11040800;
 708                 bfin_write_EMAC_PTP_FV1(ptpfv1);
 709                 ptpfv2 = 0x0140013F;
 710                 bfin_write_EMAC_PTP_FV2(ptpfv2);
 711                 /*
 712                  * To allow the timestamping of Pdelay_Req and Pdelay_Resp, set
 713                  * the value to 0xFFF0.
 714                  */
 715                 ptpfv3 = 0xFFFFFFF0;
 716                 bfin_write_EMAC_PTP_FV3(ptpfv3);
 717
 718                 config.rx_filter = HWTSTAMP_FILTER_PTP_V2_L4_EVENT;
 719                 break;
 720         case HWTSTAMP_FILTER_PTP_V2_L2_EVENT:
 721         case HWTSTAMP_FILTER_PTP_V2_L2_SYNC:
 722         case HWTSTAMP_FILTER_PTP_V2_L2_DELAY_REQ:
 723                 /*
 724                  * Clear bits 8 and 12 of the EMAC_PTP_CTL register to enable only the
 725                  * EFTM and PTPCM field comparison.
 726                  */
 727                 ptpctl &= ~0x1100;
 728                 bfin_write_EMAC_PTP_CTL(ptpctl);
 729                 /*
 730                  * Keep the default values of all the fields of the EMAC_PTP_FOFF
 731                  * register, except set the PTPCOF field to 0x0E.
 732                  */
 733                 ptpfoff = 0x0E24170C;
 734                 bfin_write_EMAC_PTP_FOFF(ptpfoff);
 735                 /*
 736                  * Program bits [15:0] of the EMAC_PTP_FV1 register to 0x88F7, which
 737                  * corresponds to PTP messages on the MAC layer.
 738                  */
 739                 ptpfv1 = 0x110488F7;
 740                 bfin_write_EMAC_PTP_FV1(ptpfv1);
 741                 ptpfv2 = 0x0140013F;
 742                 bfin_write_EMAC_PTP_FV2(ptpfv2);
 743                 /*
 744                  * To allow the timestamping of Pdelay_Req and Pdelay_Resp
 745                  * messages, set the value to 0xFFF0.
 746                  */
 747                 ptpfv3 = 0xFFFFFFF0;
 748                 bfin_write_EMAC_PTP_FV3(ptpfv3);
 749
 750                 config.rx_filter = HWTSTAMP_FILTER_PTP_V2_L2_EVENT;
 751                 break;
 752         default:
 753                 return -ERANGE;
 754         }
 755
 756         if (config.tx_type == HWTSTAMP_TX_OFF &&
 757             bfin_mac_hwtstamp_is_none(config.rx_filter)) {
 758                 ptpctl &= ~PTP_EN;
 759                 bfin_write_EMAC_PTP_CTL(ptpctl);
 760
 761                 SSYNC();
 762         } else {
 763                 ptpctl |= PTP_EN;
 764                 bfin_write_EMAC_PTP_CTL(ptpctl);
 765
 766                 /*
 767                  * clear any existing timestamp
 768                  */
 769                 bfin_read_EMAC_PTP_RXSNAPLO();
 770                 bfin_read_EMAC_PTP_RXSNAPHI();
 771
 772                 bfin_read_EMAC_PTP_TXSNAPLO();
 773                 bfin_read_EMAC_PTP_TXSNAPHI();
 774
 775                 /*
 776                  * Set registers so that rollover occurs soon to test this.
 777                  */
 778                 bfin_write_EMAC_PTP_TIMELO(0x00000000);
 779                 bfin_write_EMAC_PTP_TIMEHI(0xFF800000);
 780
 781                 SSYNC();
 782
 783                 lp->compare.last_update = 0;
 784                 timecounter_init(&lp->clock,
 785                                 &lp->cycles,
 786                                 ktime_to_ns(ktime_get_real()));
 787                 timecompare_update(&lp->compare, 0);
 788         }
 789
 790         lp->stamp_cfg = config;
 791         return copy_to_user(ifr->ifr_data, &config, sizeof(config)) ?
 792                 -EFAULT : 0;
 793 }
 794
 795 static void bfin_dump_hwtamp(char *s, ktime_t *hw, ktime_t *ts, struct timecompare *cmp)
 796 {
 797         ktime_t sys = ktime_get_real();
 798
 799         pr_debug("%s %s hardware:%d,%d transform system:%d,%d system:%d,%d, cmp:%lld, %lld\n",
 800                         __func__, s, hw->tv.sec, hw->tv.nsec, ts->tv.sec, ts->tv.nsec, sys.tv.sec,
 801                         sys.tv.nsec, cmp->offset, cmp->skew);
 802 }
 803
 804 static void bfin_tx_hwtstamp(struct net_device *netdev, struct sk_buff *skb)
 805 {
 806         struct bfin_mac_local *lp = netdev_priv(netdev);
 807         union skb_shared_tx *shtx = skb_tx(skb);
 808
 809         if (shtx->hardware) {
 810                 int timeout_cnt = MAX_TIMEOUT_CNT;
 811
 812                 /* When doing time stamping, keep the connection to the socket
 813                  * a while longer
 814                  */
 815                 shtx->in_progress = 1;
 816
 817                 /*
 818                  * The timestamping is done at the EMAC module's MII/RMII interface
 819                  * when the module sees the Start of Frame of an event message packet. This
 820                  * interface is the closest possible place to the physical Ethernet transmission
 821                  * medium, providing the best timing accuracy.
 822                  */
 823                 while ((!(bfin_read_EMAC_PTP_ISTAT() & TXTL)) && (--timeout_cnt))
 824                         udelay(1);
 825                 if (timeout_cnt == 0)
 826                         printk(KERN_ERR DRV_NAME
 827                                         ": fails to timestamp the TX packet\n");
 828                 else {
 829                         struct skb_shared_hwtstamps shhwtstamps;
 830                         u64 ns;
 831                         u64 regval;
 832
 833                         regval = bfin_read_EMAC_PTP_TXSNAPLO();
 834                         regval |= (u64)bfin_read_EMAC_PTP_TXSNAPHI() << 32;
 835                         memset(&shhwtstamps, 0, sizeof(shhwtstamps));
 836                         ns = timecounter_cyc2time(&lp->clock,
 837                                         regval);
 838                         timecompare_update(&lp->compare, ns);
 839                         shhwtstamps.hwtstamp = ns_to_ktime(ns);
 840                         shhwtstamps.syststamp =
 841                                 timecompare_transform(&lp->compare, ns);
 842                         skb_tstamp_tx(skb, &shhwtstamps);
 843
 844                         bfin_dump_hwtamp("TX", &shhwtstamps.hwtstamp, &shhwtstamps.syststamp, &lp->compare);
 845                 }
 846         }
 847 }
 848
 849 static void bfin_rx_hwtstamp(struct net_device *netdev, struct sk_buff *skb)
 850 {
 851         struct bfin_mac_local *lp = netdev_priv(netdev);
 852         u32 valid;
 853         u64 regval, ns;
 854         struct skb_shared_hwtstamps *shhwtstamps;
 855
 856         if (bfin_mac_hwtstamp_is_none(lp->stamp_cfg.rx_filter))
 857                 return;
 858
 859         valid = bfin_read_EMAC_PTP_ISTAT() & RXEL;
 860         if (!valid)
 861                 return;
 862
 863         shhwtstamps = skb_hwtstamps(skb);
 864
 865         regval = bfin_read_EMAC_PTP_RXSNAPLO();
 866         regval |= (u64)bfin_read_EMAC_PTP_RXSNAPHI() << 32;
 867         ns = timecounter_cyc2time(&lp->clock, regval);
 868         timecompare_update(&lp->compare, ns);
 869         memset(shhwtstamps, 0, sizeof(*shhwtstamps));
 870         shhwtstamps->hwtstamp = ns_to_ktime(ns);
 871         shhwtstamps->syststamp = timecompare_transform(&lp->compare, ns);
 872
 873         bfin_dump_hwtamp("RX", &shhwtstamps->hwtstamp, &shhwtstamps->syststamp, &lp->compare);
 874 }
 875
 876 /*
 877  * bfin_read_clock - read raw cycle counter (to be used by time counter)
 878  */
 879 static cycle_t bfin_read_clock(const struct cyclecounter *tc)
 880 {
 881         u64 stamp;
 882
 883         stamp =  bfin_read_EMAC_PTP_TIMELO();
 884         stamp |= (u64)bfin_read_EMAC_PTP_TIMEHI() << 32ULL;
 885
 886         return stamp;
 887 }
 888
 889 #define PTP_CLK 25000000
 890
 891 static void bfin_mac_hwtstamp_init(struct net_device *netdev)
 892 {
 893         struct bfin_mac_local *lp = netdev_priv(netdev);
 894         u64 append;
 895
 896         /* Initialize hardware timer */
 897         append = PTP_CLK * (1ULL << 32);
 898         do_div(append, get_sclk());
 899         bfin_write_EMAC_PTP_ADDEND((u32)append);
 900
 901         memset(&lp->cycles, 0, sizeof(lp->cycles));
 902         lp->cycles.read = bfin_read_clock;
 903         lp->cycles.mask = CLOCKSOURCE_MASK(64);
 904         lp->cycles.mult = 1000000000 / PTP_CLK;
 905         lp->cycles.shift = 0;
 906
 907         /* Synchronize our NIC clock against system wall clock */
 908         memset(&lp->compare, 0, sizeof(lp->compare));
 909         lp->compare.source = &lp->clock;
 910         lp->compare.target = ktime_get_real;
 911         lp->compare.num_samples = 10;
 912
 913         /* Initialize hwstamp config */
 914         lp->stamp_cfg.rx_filter = HWTSTAMP_FILTER_NONE;
 915         lp->stamp_cfg.tx_type = HWTSTAMP_TX_OFF;
 916 }
 917
 918 #else
 919 # define bfin_mac_hwtstamp_is_none(cfg) 0
 920 # define bfin_mac_hwtstamp_init(dev)
 921 # define bfin_mac_hwtstamp_ioctl(dev, ifr, cmd) (-EOPNOTSUPP)
 922 # define bfin_rx_hwtstamp(dev, skb)
 923 # define bfin_tx_hwtstamp(dev, skb)
 924 #endif
 925
 926 static inline void _tx_reclaim_skb(void)
 927 {
 928         do {
 929                 tx_list_head->desc_a.config &= ~DMAEN;
 930                 tx_list_head->status.status_word = 0;
 931                 if (tx_list_head->skb) {
 932                         dev_kfree_skb(tx_list_head->skb);
 933                         tx_list_head->skb = NULL;
 934                 }
 935                 tx_list_head = tx_list_head->next;
 936
 937         } while (tx_list_head->status.status_word != 0);
 938 }
 939
 940 static void tx_reclaim_skb(struct bfin_mac_local *lp)
 941 {
 942         int timeout_cnt = MAX_TIMEOUT_CNT;
 943
 944         if (tx_list_head->status.status_word != 0)
 945                 _tx_reclaim_skb();
 946
 947         if (current_tx_ptr->next == tx_list_head) {
 948                 while (tx_list_head->status.status_word == 0) {
 949                         /* slow down polling to avoid too many queue stop. */
 950                         udelay(10);
 951                         /* reclaim skb if DMA is not running. */
 952                         if (!(bfin_read_DMA2_IRQ_STATUS() & DMA_RUN))
 953                                 break;
 954                         if (timeout_cnt-- < 0)
 955                                 break;
 956                 }
 957
 958                 if (timeout_cnt >= 0)
 959                         _tx_reclaim_skb();
 960                 else
 961                         netif_stop_queue(lp->ndev);
 962         }
 963
 964         if (current_tx_ptr->next != tx_list_head &&
 965                 netif_queue_stopped(lp->ndev))
 966                 netif_wake_queue(lp->ndev);
 967
 968         if (tx_list_head != current_tx_ptr) {
 969                 /* shorten the timer interval if tx queue is stopped */
 970                 if (netif_queue_stopped(lp->ndev))
 971                         lp->tx_reclaim_timer.expires =
 972                                 jiffies + (TX_RECLAIM_JIFFIES >> 4);
 973                 else
 974                         lp->tx_reclaim_timer.expires =
 975                                 jiffies + TX_RECLAIM_JIFFIES;
 976
 977                 mod_timer(&lp->tx_reclaim_timer,
 978                         lp->tx_reclaim_timer.expires);
 979         }
 980
 981         return;
 982 }
 983
 984 static void tx_reclaim_skb_timeout(unsigned long lp)
 985 {
 986         tx_reclaim_skb((struct bfin_mac_local *)lp);
 987 }
 988
 989 static int bfin_mac_hard_start_xmit(struct sk_buff *skb,
 990                                 struct net_device *dev)
 991 {
 992         struct bfin_mac_local *lp = netdev_priv(dev);
 993         u16 *data;
 994         u32 data_align = (unsigned long)(skb->data) & 0x3;
 995         union skb_shared_tx *shtx = skb_tx(skb);
 996
 997         current_tx_ptr->skb = skb;
 998
 999         if (data_align == 0x2) {
1000                 /* move skb->data to current_tx_ptr payload */
1001                 data = (u16 *)(skb->data) - 1;
1002                 *data = (u16)(skb->len);
1003                 /*
1004                  * When transmitting an Ethernet packet, the PTP_TSYNC module requires
1005                  * a DMA_Length_Word field associated with the packet. The lower 12 bits
1006                  * of this field are the length of the packet payload in bytes and the higher
1007                  * 4 bits are the timestamping enable field.
1008                  */
1009                 if (shtx->hardware)
1010                         *data |= 0x1000;
1011
1012                 current_tx_ptr->desc_a.start_addr = (u32)data;
1013                 /* this is important! */
1014                 blackfin_dcache_flush_range((u32)data,
1015                                 (u32)((u8 *)data + skb->len + 4));
1016         } else {
1017                 *((u16 *)(current_tx_ptr->packet)) = (u16)(skb->len);
1018                 /* enable timestamping for the sent packet */
1019                 if (shtx->hardware)
1020                         *((u16 *)(current_tx_ptr->packet)) |= 0x1000;
1021                 memcpy((u8 *)(current_tx_ptr->packet + 2), skb->data,
1022                         skb->len);
1023                 current_tx_ptr->desc_a.start_addr =
1024                         (u32)current_tx_ptr->packet;
1025                 blackfin_dcache_flush_range(
1026                         (u32)current_tx_ptr->packet,
1027                         (u32)(current_tx_ptr->packet + skb->len + 2));
1028         }
1029
1030         /* make sure the internal data buffers in the core are drained
1031          * so that the DMA descriptors are completely written when the
1032          * DMA engine goes to fetch them below
1033          */
1034         SSYNC();
1035
1036         /* always clear status buffer before start tx dma */
1037         current_tx_ptr->status.status_word = 0;
1038
1039         /* enable this packet's dma */
1040         current_tx_ptr->desc_a.config |= DMAEN;
1041
1042         /* tx dma is running, just return */
1043         if (bfin_read_DMA2_IRQ_STATUS() & DMA_RUN)
1044                 goto out;
1045
1046         /* tx dma is not running */
1047         bfin_write_DMA2_NEXT_DESC_PTR(&(current_tx_ptr->desc_a));
1048         /* dma enabled, read from memory, size is 6 */
1049         bfin_write_DMA2_CONFIG(current_tx_ptr->desc_a.config);
1050         /* Turn on the EMAC tx */
1051         bfin_write_EMAC_OPMODE(bfin_read_EMAC_OPMODE() | TE);
1052
1053 out:
1054         bfin_tx_hwtstamp(dev, skb);
1055
1056         current_tx_ptr = current_tx_ptr->next;
1057         dev->stats.tx_packets++;
1058         dev->stats.tx_bytes += (skb->len);
1059
1060         tx_reclaim_skb(lp);
1061
1062         return NETDEV_TX_OK;
1063 }
1064
1065 #define IP_HEADER_OFF  0
1066 #define RX_ERROR_MASK (RX_LONG | RX_ALIGN | RX_CRC | RX_LEN | \
1067         RX_FRAG | RX_ADDR | RX_DMAO | RX_PHY | RX_LATE | RX_RANGE)
1068
1069 static void bfin_mac_rx(struct net_device *dev)
1070 {
1071         struct sk_buff *skb, *new_skb;
1072         unsigned short len;
1073         struct bfin_mac_local *lp __maybe_unused = netdev_priv(dev);
1074 #if defined(BFIN_MAC_CSUM_OFFLOAD)
1075         unsigned int i;
1076         unsigned char fcs[ETH_FCS_LEN + 1];
1077 #endif
1078
1079         /* check if frame status word reports an error condition
1080          * we which case we simply drop the packet
1081          */
1082         if (current_rx_ptr->status.status_word & RX_ERROR_MASK) {
1083                 printk(KERN_NOTICE DRV_NAME
1084                        ": rx: receive error - packet dropped\n");
1085                 dev->stats.rx_dropped++;
1086                 goto out;
1087         }
1088
1089         /* allocate a new skb for next time receive */
1090         skb = current_rx_ptr->skb;
1091
1092         new_skb = dev_alloc_skb(PKT_BUF_SZ + NET_IP_ALIGN);
1093         if (!new_skb) {
1094                 printk(KERN_NOTICE DRV_NAME
1095                        ": rx: low on mem - packet dropped\n");
1096                 dev->stats.rx_dropped++;
1097                 goto out;
1098         }
1099         /* reserve 2 bytes for RXDWA padding */
1100         skb_reserve(new_skb, NET_IP_ALIGN);
1101         /* Invidate the data cache of skb->data range when it is write back
1102          * cache. It will prevent overwritting the new data from DMA
1103          */
1104         blackfin_dcache_invalidate_range((unsigned long)new_skb->head,
1105                                          (unsigned long)new_skb->end);
1106
1107         current_rx_ptr->skb = new_skb;
1108         current_rx_ptr->desc_a.start_addr = (unsigned long)new_skb->data - 2;
1109
1110         len = (unsigned short)((current_rx_ptr->status.status_word) & RX_FRLEN);
1111         /* Deduce Ethernet FCS length from Ethernet payload length */
1112         len -= ETH_FCS_LEN;
1113         skb_put(skb, len);
1114
1115         skb->protocol = eth_type_trans(skb, dev);
1116
1117         bfin_rx_hwtstamp(dev, skb);
1118
1119 #if defined(BFIN_MAC_CSUM_OFFLOAD)
1120         /* Checksum offloading only works for IPv4 packets with the standard IP header
1121          * length of 20 bytes, because the blackfin MAC checksum calculation is
1122          * based on that assumption. We must NOT use the calculated checksum if our
1123          * IP version or header break that assumption.
1124          */
1125         if (skb->data[IP_HEADER_OFF] == 0x45) {
1126                 skb->csum = current_rx_ptr->status.ip_payload_csum;
1127                 /*
1128                  * Deduce Ethernet FCS from hardware generated IP payload checksum.
1129                  * IP checksum is based on 16-bit one's complement algorithm.
1130                  * To deduce a value from checksum is equal to add its inversion.
1131                  * If the IP payload len is odd, the inversed FCS should also
1132                  * begin from odd address and leave first byte zero.
1133                  */
1134                 if (skb->len % 2) {
1135                         fcs[0] = 0;
1136                         for (i = 0; i < ETH_FCS_LEN; i++)
1137                                 fcs[i + 1] = ~skb->data[skb->len + i];
1138                         skb->csum = csum_partial(fcs, ETH_FCS_LEN + 1, skb->csum);
1139                 } else {
1140                         for (i = 0; i < ETH_FCS_LEN; i++)
1141                                 fcs[i] = ~skb->data[skb->len + i];
1142                         skb->csum = csum_partial(fcs, ETH_FCS_LEN, skb->csum);
1143                 }
1144                 skb->ip_summed = CHECKSUM_COMPLETE;
1145         }
1146 #endif
1147
1148         netif_rx(skb);
1149         dev->stats.rx_packets++;
1150         dev->stats.rx_bytes += len;
1151 out:
1152         current_rx_ptr->status.status_word = 0x00000000;
1153         current_rx_ptr = current_rx_ptr->next;
1154 }
1155
1156 /* interrupt routine to handle rx and error signal */
1157 static irqreturn_t bfin_mac_interrupt(int irq, void *dev_id)
1158 {
1159         struct net_device *dev = dev_id;
1160         int number = 0;
1161
1162 get_one_packet:
1163         if (current_rx_ptr->status.status_word == 0) {
1164                 /* no more new packet received */
1165                 if (number == 0) {
1166                         if (current_rx_ptr->next->status.status_word != 0) {
1167                                 current_rx_ptr = current_rx_ptr->next;
1168                                 goto real_rx;
1169                         }
1170                 }
1171                 bfin_write_DMA1_IRQ_STATUS(bfin_read_DMA1_IRQ_STATUS() |
1172                                            DMA_DONE | DMA_ERR);
1173                 return IRQ_HANDLED;
1174         }
1175
1176 real_rx:
1177         bfin_mac_rx(dev);
1178         number++;
1179         goto get_one_packet;
1180 }
1181
1182 #ifdef CONFIG_NET_POLL_CONTROLLER
1183 static void bfin_mac_poll(struct net_device *dev)
1184 {
1185         struct bfin_mac_local *lp = netdev_priv(dev);
1186
1187         disable_irq(IRQ_MAC_RX);
1188         bfin_mac_interrupt(IRQ_MAC_RX, dev);
1189         tx_reclaim_skb(lp);
1190         enable_irq(IRQ_MAC_RX);
1191 }
1192 #endif                          /* CONFIG_NET_POLL_CONTROLLER */
1193
1194 static void bfin_mac_disable(void)
1195 {
1196         unsigned int opmode;
1197
1198         opmode = bfin_read_EMAC_OPMODE();
1199         opmode &= (~RE);
1200         opmode &= (~TE);
1201         /* Turn off the EMAC */
1202         bfin_write_EMAC_OPMODE(opmode);
1203 }
1204
1205 /*
1206  * Enable Interrupts, Receive, and Transmit
1207  */
1208 static int bfin_mac_enable(void)
1209 {
1210         int ret;
1211         u32 opmode;
1212
1213         pr_debug("%s: %s\n", DRV_NAME, __func__);
1214
1215         /* Set RX DMA */
1216         bfin_write_DMA1_NEXT_DESC_PTR(&(rx_list_head->desc_a));
1217         bfin_write_DMA1_CONFIG(rx_list_head->desc_a.config);
1218
1219         /* Wait MII done */
1220         ret = bfin_mdio_poll();
1221         if (ret)
1222                 return ret;
1223
1224         /* We enable only RX here */
1225         /* ASTP   : Enable Automatic Pad Stripping
1226            PR     : Promiscuous Mode for test
1227            PSF    : Receive frames with total length less than 64 bytes.
1228            FDMODE : Full Duplex Mode
1229            LB     : Internal Loopback for test
1230            RE     : Receiver Enable */
1231         opmode = bfin_read_EMAC_OPMODE();
1232         if (opmode & FDMODE)
1233                 opmode |= PSF;
1234         else
1235                 opmode |= DRO | DC | PSF;
1236         opmode |= RE;
1237
1238 #if defined(CONFIG_BFIN_MAC_RMII)
1239         opmode |= RMII; /* For Now only 100MBit are supported */
1240 #if (defined(CONFIG_BF537) || defined(CONFIG_BF536)) && CONFIG_BF_REV_0_2
1241         opmode |= TE;
1242 #endif
1243 #endif
1244         /* Turn on the EMAC rx */
1245         bfin_write_EMAC_OPMODE(opmode);
1246
1247         return 0;
1248 }
1249
1250 /* Our watchdog timed out. Called by the networking layer */
1251 static void bfin_mac_timeout(struct net_device *dev)
1252 {
1253         struct bfin_mac_local *lp = netdev_priv(dev);
1254
1255         pr_debug("%s: %s\n", dev->name, __func__);
1256
1257         bfin_mac_disable();
1258
1259         del_timer(&lp->tx_reclaim_timer);
1260
1261         /* reset tx queue and free skb */
1262         while (tx_list_head != current_tx_ptr) {
1263                 tx_list_head->desc_a.config &= ~DMAEN;
1264                 tx_list_head->status.status_word = 0;
1265                 if (tx_list_head->skb) {
1266                         dev_kfree_skb(tx_list_head->skb);
1267                         tx_list_head->skb = NULL;
1268                 }
1269                 tx_list_head = tx_list_head->next;
1270         }
1271
1272         if (netif_queue_stopped(lp->ndev))
1273                 netif_wake_queue(lp->ndev);
1274
1275         bfin_mac_enable();
1276
1277         /* We can accept TX packets again */
1278         dev->trans_start = jiffies; /* prevent tx timeout */
1279         netif_wake_queue(dev);
1280 }
1281
1282 static void bfin_mac_multicast_hash(struct net_device *dev)
1283 {
1284         u32 emac_hashhi, emac_hashlo;
1285         struct netdev_hw_addr *ha;
1286         char *addrs;
1287         u32 crc;
1288
1289         emac_hashhi = emac_hashlo = 0;
1290
1291         netdev_for_each_mc_addr(ha, dev) {
1292                 addrs = ha->addr;
1293
1294                 /* skip non-multicast addresses */
1295                 if (!(*addrs & 1))
1296                         continue;
1297
1298                 crc = ether_crc(ETH_ALEN, addrs);
1299                 crc >>= 26;
1300
1301                 if (crc & 0x20)
1302                         emac_hashhi |= 1 << (crc & 0x1f);
1303                 else
1304                         emac_hashlo |= 1 << (crc & 0x1f);
1305         }
1306
1307         bfin_write_EMAC_HASHHI(emac_hashhi);
1308         bfin_write_EMAC_HASHLO(emac_hashlo);
1309 }
1310
1311 /*
1312  * This routine will, depending on the values passed to it,
1313  * either make it accept multicast packets, go into
1314  * promiscuous mode (for TCPDUMP and cousins) or accept
1315  * a select set of multicast packets
1316  */
1317 static void bfin_mac_set_multicast_list(struct net_device *dev)
1318 {
1319         u32 sysctl;
1320
1321         if (dev->flags & IFF_PROMISC) {
1322                 printk(KERN_INFO "%s: set to promisc mode\n", dev->name);
1323                 sysctl = bfin_read_EMAC_OPMODE();
1324                 sysctl |= PR;
1325                 bfin_write_EMAC_OPMODE(sysctl);
1326         } else if (dev->flags & IFF_ALLMULTI) {
1327                 /* accept all multicast */
1328                 sysctl = bfin_read_EMAC_OPMODE();
1329                 sysctl |= PAM;
1330                 bfin_write_EMAC_OPMODE(sysctl);
1331         } else if (!netdev_mc_empty(dev)) {
1332                 /* set up multicast hash table */
1333                 sysctl = bfin_read_EMAC_OPMODE();
1334                 sysctl |= HM;
1335                 bfin_write_EMAC_OPMODE(sysctl);
1336                 bfin_mac_multicast_hash(dev);
1337         } else {
1338                 /* clear promisc or multicast mode */
1339                 sysctl = bfin_read_EMAC_OPMODE();
1340                 sysctl &= ~(RAF | PAM);
1341                 bfin_write_EMAC_OPMODE(sysctl);
1342         }
1343 }
1344
1345 static int bfin_mac_ioctl(struct net_device *netdev, struct ifreq *ifr, int cmd)
1346 {
1347         switch (cmd) {
1348         case SIOCSHWTSTAMP:
1349                 return bfin_mac_hwtstamp_ioctl(netdev, ifr, cmd);
1350         default:
1351                 return -EOPNOTSUPP;
1352         }
1353 }
1354
1355 /*
1356  * this puts the device in an inactive state
1357  */
1358 static void bfin_mac_shutdown(struct net_device *dev)
1359 {
1360         /* Turn off the EMAC */
1361         bfin_write_EMAC_OPMODE(0x00000000);
1362         /* Turn off the EMAC RX DMA */
1363         bfin_write_DMA1_CONFIG(0x0000);
1364         bfin_write_DMA2_CONFIG(0x0000);
1365 }
1366
1367 /*
1368  * Open and Initialize the interface
1369  *
1370  * Set up everything, reset the card, etc..
1371  */
1372 static int bfin_mac_open(struct net_device *dev)
1373 {
1374         struct bfin_mac_local *lp = netdev_priv(dev);
1375         int ret;
1376         pr_debug("%s: %s\n", dev->name, __func__);
1377
1378         /*
1379          * Check that the address is valid.  If its not, refuse
1380          * to bring the device up.  The user must specify an
1381          * address using ifconfig eth0 hw ether xx:xx:xx:xx:xx:xx
1382          */
1383         if (!is_valid_ether_addr(dev->dev_addr)) {
1384                 printk(KERN_WARNING DRV_NAME ": no valid ethernet hw addr\n");
1385                 return -EINVAL;
1386         }
1387
1388         /* initial rx and tx list */
1389         ret = desc_list_init();
1390         if (ret)
1391                 return ret;
1392
1393         phy_start(lp->phydev);
1394         phy_write(lp->phydev, MII_BMCR, BMCR_RESET);
1395         setup_system_regs(dev);
1396         setup_mac_addr(dev->dev_addr);
1397
1398         bfin_mac_disable();
1399         ret = bfin_mac_enable();
1400         if (ret)
1401                 return ret;
1402         pr_debug("hardware init finished\n");
1403
1404         netif_start_queue(dev);
1405         netif_carrier_on(dev);
1406
1407         return 0;
1408 }
1409
1410 /*
1411  * this makes the board clean up everything that it can
1412  * and not talk to the outside world.   Caused by
1413  * an 'ifconfig ethX down'
1414  */
1415 static int bfin_mac_close(struct net_device *dev)
1416 {
1417         struct bfin_mac_local *lp = netdev_priv(dev);
1418         pr_debug("%s: %s\n", dev->name, __func__);
1419
1420         netif_stop_queue(dev);
1421         netif_carrier_off(dev);
1422
1423         phy_stop(lp->phydev);
1424         phy_write(lp->phydev, MII_BMCR, BMCR_PDOWN);
1425
1426         /* clear everything */
1427         bfin_mac_shutdown(dev);
1428
1429         /* free the rx/tx buffers */
1430         desc_list_free();
1431
1432         return 0;
1433 }
1434
1435 static const struct net_device_ops bfin_mac_netdev_ops = {
1436         .ndo_open               = bfin_mac_open,
1437         .ndo_stop               = bfin_mac_close,
1438         .ndo_start_xmit         = bfin_mac_hard_start_xmit,
1439         .ndo_set_mac_address    = bfin_mac_set_mac_address,
1440         .ndo_tx_timeout         = bfin_mac_timeout,
1441         .ndo_set_multicast_list = bfin_mac_set_multicast_list,
1442         .ndo_do_ioctl           = bfin_mac_ioctl,
1443         .ndo_validate_addr      = eth_validate_addr,
1444         .ndo_change_mtu         = eth_change_mtu,
1445 #ifdef CONFIG_NET_POLL_CONTROLLER
1446         .ndo_poll_controller    = bfin_mac_poll,
1447 #endif
1448 };
1449
1450 static int __devinit bfin_mac_probe(struct platform_device *pdev)
1451 {
1452         struct net_device *ndev;
1453         struct bfin_mac_local *lp;
1454         struct platform_device *pd;
1455         int rc;
1456
1457         ndev = alloc_etherdev(sizeof(struct bfin_mac_local));
1458         if (!ndev) {
1459                 dev_err(&pdev->dev, "Cannot allocate net device!\n");
1460                 return -ENOMEM;
1461         }
1462
1463         SET_NETDEV_DEV(ndev, &pdev->dev);
1464         platform_set_drvdata(pdev, ndev);
1465         lp = netdev_priv(ndev);
1466         lp->ndev = ndev;
1467
1468         /* Grab the MAC address in the MAC */
1469         *(__le32 *) (&(ndev->dev_addr[0])) = cpu_to_le32(bfin_read_EMAC_ADDRLO());
1470         *(__le16 *) (&(ndev->dev_addr[4])) = cpu_to_le16((u16) bfin_read_EMAC_ADDRHI());
1471
1472         /* probe mac */
1473         /*todo: how to proble? which is revision_register */
1474         bfin_write_EMAC_ADDRLO(0x12345678);
1475         if (bfin_read_EMAC_ADDRLO() != 0x12345678) {
1476                 dev_err(&pdev->dev, "Cannot detect Blackfin on-chip ethernet MAC controller!\n");
1477                 rc = -ENODEV;
1478                 goto out_err_probe_mac;
1479         }
1480
1481
1482         /*
1483          * Is it valid? (Did bootloader initialize it?)
1484          * Grab the MAC from the board somehow
1485          * this is done in the arch/blackfin/mach-bfxxx/boards/eth_mac.c
1486          */
1487         if (!is_valid_ether_addr(ndev->dev_addr))
1488                 bfin_get_ether_addr(ndev->dev_addr);
1489
1490         /* If still not valid, get a random one */
1491         if (!is_valid_ether_addr(ndev->dev_addr))
1492                 random_ether_addr(ndev->dev_addr);
1493
1494         setup_mac_addr(ndev->dev_addr);
1495
1496         if (!pdev->dev.platform_data) {
1497                 dev_err(&pdev->dev, "Cannot get platform device bfin_mii_bus!\n");
1498                 rc = -ENODEV;
1499                 goto out_err_probe_mac;
1500         }
1501         pd = pdev->dev.platform_data;
1502         lp->mii_bus = platform_get_drvdata(pd);
1503         if (!lp->mii_bus) {
1504                 dev_err(&pdev->dev, "Cannot get mii_bus!\n");
1505                 rc = -ENODEV;
1506                 goto out_err_mii_bus_probe;
1507         }
1508         lp->mii_bus->priv = ndev;
1509
1510         rc = mii_probe(ndev);
1511         if (rc) {
1512                 dev_err(&pdev->dev, "MII Probe failed!\n");
1513                 goto out_err_mii_probe;
1514         }
1515
1516         /* Fill in the fields of the device structure with ethernet values. */
1517         ether_setup(ndev);
1518
1519         ndev->netdev_ops = &bfin_mac_netdev_ops;
1520         ndev->ethtool_ops = &bfin_mac_ethtool_ops;
1521
1522         init_timer(&lp->tx_reclaim_timer);
1523         lp->tx_reclaim_timer.data = (unsigned long)lp;
1524         lp->tx_reclaim_timer.function = tx_reclaim_skb_timeout;
1525
1526         spin_lock_init(&lp->lock);
1527
1528         /* now, enable interrupts */
1529         /* register irq handler */
1530         rc = request_irq(IRQ_MAC_RX, bfin_mac_interrupt,
1531                         IRQF_DISABLED, "EMAC_RX", ndev);
1532         if (rc) {
1533                 dev_err(&pdev->dev, "Cannot request Blackfin MAC RX IRQ!\n");
1534                 rc = -EBUSY;
1535                 goto out_err_request_irq;
1536         }
1537
1538         rc = register_netdev(ndev);
1539         if (rc) {
1540                 dev_err(&pdev->dev, "Cannot register net device!\n");
1541                 goto out_err_reg_ndev;
1542         }
1543
1544         bfin_mac_hwtstamp_init(ndev);
1545
1546         /* now, print out the card info, in a short format.. */
1547         dev_info(&pdev->dev, "%s, Version %s\n", DRV_DESC, DRV_VERSION);
1548
1549         return 0;
1550
1551 out_err_reg_ndev:
1552         free_irq(IRQ_MAC_RX, ndev);
1553 out_err_request_irq:
1554 out_err_mii_probe:
1555         mdiobus_unregister(lp->mii_bus);
1556         mdiobus_free(lp->mii_bus);
1557 out_err_mii_bus_probe:
1558         peripheral_free_list(pin_req);
1559 out_err_probe_mac:
1560         platform_set_drvdata(pdev, NULL);
1561         free_netdev(ndev);
1562
1563         return rc;
1564 }
1565
1566 static int __devexit bfin_mac_remove(struct platform_device *pdev)
1567 {
1568         struct net_device *ndev = platform_get_drvdata(pdev);
1569         struct bfin_mac_local *lp = netdev_priv(ndev);
1570
1571         platform_set_drvdata(pdev, NULL);
1572
1573         lp->mii_bus->priv = NULL;
1574
1575         unregister_netdev(ndev);
1576
1577         free_irq(IRQ_MAC_RX, ndev);
1578
1579         free_netdev(ndev);
1580
1581         peripheral_free_list(pin_req);
1582
1583         return 0;
1584 }
1585
1586 #ifdef CONFIG_PM
1587 static int bfin_mac_suspend(struct platform_device *pdev, pm_message_t mesg)
1588 {
1589         struct net_device *net_dev = platform_get_drvdata(pdev);
1590         struct bfin_mac_local *lp = netdev_priv(net_dev);
1591
1592         if (lp->wol) {
1593                 bfin_write_EMAC_OPMODE((bfin_read_EMAC_OPMODE() & ~TE) | RE);
1594                 bfin_write_EMAC_WKUP_CTL(MPKE);
1595                 enable_irq_wake(IRQ_MAC_WAKEDET);
1596         } else {
1597                 if (netif_running(net_dev))
1598                         bfin_mac_close(net_dev);
1599         }
1600
1601         return 0;
1602 }
1603
1604 static int bfin_mac_resume(struct platform_device *pdev)
1605 {
1606         struct net_device *net_dev = platform_get_drvdata(pdev);
1607         struct bfin_mac_local *lp = netdev_priv(net_dev);
1608
1609         if (lp->wol) {
1610                 bfin_write_EMAC_OPMODE(bfin_read_EMAC_OPMODE() | TE);
1611                 bfin_write_EMAC_WKUP_CTL(0);
1612                 disable_irq_wake(IRQ_MAC_WAKEDET);
1613         } else {
1614                 if (netif_running(net_dev))
1615                         bfin_mac_open(net_dev);
1616         }
1617
1618         return 0;
1619 }
1620 #else
1621 #define bfin_mac_suspend NULL
1622 #define bfin_mac_resume NULL
1623 #endif  /* CONFIG_PM */
1624
1625 static int __devinit bfin_mii_bus_probe(struct platform_device *pdev)
1626 {
1627         struct mii_bus *miibus;
1628         int rc, i;
1629
1630         /*
1631          * We are setting up a network card,
1632          * so set the GPIO pins to Ethernet mode
1633          */
1634         rc = peripheral_request_list(pin_req, DRV_NAME);
1635         if (rc) {
1636                 dev_err(&pdev->dev, "Requesting peripherals failed!\n");
1637                 return rc;
1638         }
1639
1640         rc = -ENOMEM;
1641         miibus = mdiobus_alloc();
1642         if (miibus == NULL)
1643                 goto out_err_alloc;
1644         miibus->read = bfin_mdiobus_read;
1645         miibus->write = bfin_mdiobus_write;
1646         miibus->reset = bfin_mdiobus_reset;
1647
1648         miibus->parent = &pdev->dev;
1649         miibus->name = "bfin_mii_bus";
1650         snprintf(miibus->id, MII_BUS_ID_SIZE, "0");
1651         miibus->irq = kmalloc(sizeof(int)*PHY_MAX_ADDR, GFP_KERNEL);
1652         if (miibus->irq == NULL)
1653                 goto out_err_alloc;
1654         for (i = 0; i < PHY_MAX_ADDR; ++i)
1655                 miibus->irq[i] = PHY_POLL;
1656
1657         rc = mdiobus_register(miibus);
1658         if (rc) {
1659                 dev_err(&pdev->dev, "Cannot register MDIO bus!\n");
1660                 goto out_err_mdiobus_register;
1661         }
1662
1663         platform_set_drvdata(pdev, miibus);
1664         return 0;
1665
1666 out_err_mdiobus_register:
1667         kfree(miibus->irq);
1668         mdiobus_free(miibus);
1669 out_err_alloc:
1670         peripheral_free_list(pin_req);
1671
1672         return rc;
1673 }
1674
1675 static int __devexit bfin_mii_bus_remove(struct platform_device *pdev)
1676 {
1677         struct mii_bus *miibus = platform_get_drvdata(pdev);
1678         platform_set_drvdata(pdev, NULL);
1679         mdiobus_unregister(miibus);
1680         kfree(miibus->irq);
1681         mdiobus_free(miibus);
1682         peripheral_free_list(pin_req);
1683         return 0;
1684 }
1685
1686 static struct platform_driver bfin_mii_bus_driver = {
1687         .probe = bfin_mii_bus_probe,
1688         .remove = __devexit_p(bfin_mii_bus_remove),
1689         .driver = {
1690                 .name = "bfin_mii_bus",
1691                 .owner  = THIS_MODULE,
1692         },
1693 };
1694
1695 static struct platform_driver bfin_mac_driver = {
1696         .probe = bfin_mac_probe,
1697         .remove = __devexit_p(bfin_mac_remove),
1698         .resume = bfin_mac_resume,
1699         .suspend = bfin_mac_suspend,
1700         .driver = {
1701                 .name = DRV_NAME,
1702                 .owner  = THIS_MODULE,
1703         },
1704 };
1705
1706 static int __init bfin_mac_init(void)
1707 {
1708         int ret;
1709         ret = platform_driver_register(&bfin_mii_bus_driver);
1710         if (!ret)
1711                 return platform_driver_register(&bfin_mac_driver);
1712         return -ENODEV;
1713 }
1714
1715 module_init(bfin_mac_init);
1716
1717 static void __exit bfin_mac_cleanup(void)
1718 {
1719         platform_driver_unregister(&bfin_mac_driver);
1720         platform_driver_unregister(&bfin_mii_bus_driver);
1721 }
1722
1723 module_exit(bfin_mac_cleanup);
1724