drivers/net/fs_enet/mac-scc.c

   1 /*
   2  * Ethernet on Serial Communications Controller (SCC) driver for Motorola MPC8xx and MPC82xx.
   3  *
   4  * Copyright (c) 2003 Intracom S.A.
   5  *  by Pantelis Antoniou <panto@intracom.gr>
   6  *
   7  * 2005 (c) MontaVista Software, Inc.
   8  * Vitaly Bordug <vbordug@ru.mvista.com>
   9  *
  10  * This file is licensed under the terms of the GNU General Public License
  11  * version 2. This program is licensed "as is" without any warranty of any
  12  * kind, whether express or implied.
  13  */
  14
  15 #include <linux/module.h>
  16 #include <linux/kernel.h>
  17 #include <linux/types.h>
  18 #include <linux/sched.h>
  19 #include <linux/string.h>
  20 #include <linux/ptrace.h>
  21 #include <linux/errno.h>
  22 #include <linux/ioport.h>
  23 #include <linux/slab.h>
  24 #include <linux/interrupt.h>
  25 #include <linux/pci.h>
  26 #include <linux/init.h>
  27 #include <linux/delay.h>
  28 #include <linux/netdevice.h>
  29 #include <linux/etherdevice.h>
  30 #include <linux/skbuff.h>
  31 #include <linux/spinlock.h>
  32 #include <linux/mii.h>
  33 #include <linux/ethtool.h>
  34 #include <linux/bitops.h>
  35 #include <linux/fs.h>
  36 #include <linux/platform_device.h>
  37
  38 #include <asm/irq.h>
  39 #include <asm/uaccess.h>
  40
  41 #ifdef CONFIG_8xx
  42 #include <asm/8xx_immap.h>
  43 #include <asm/pgtable.h>
  44 #include <asm/mpc8xx.h>
  45 #include <asm/commproc.h>
  46 #endif
  47
  48 #include "fs_enet.h"
  49
  50 /*************************************************/
  51
  52 #if defined(CONFIG_CPM1)
  53 /* for a 8xx __raw_xxx's are sufficient */
  54 #define __fs_out32(addr, x)     __raw_writel(x, addr)
  55 #define __fs_out16(addr, x)     __raw_writew(x, addr)
  56 #define __fs_out8(addr, x)      __raw_writeb(x, addr)
  57 #define __fs_in32(addr) __raw_readl(addr)
  58 #define __fs_in16(addr) __raw_readw(addr)
  59 #define __fs_in8(addr)  __raw_readb(addr)
  60 #else
  61 /* for others play it safe */
  62 #define __fs_out32(addr, x)     out_be32(addr, x)
  63 #define __fs_out16(addr, x)     out_be16(addr, x)
  64 #define __fs_in32(addr) in_be32(addr)
  65 #define __fs_in16(addr) in_be16(addr)
  66 #endif
  67
  68 /* write, read, set bits, clear bits */
  69 #define W32(_p, _m, _v) __fs_out32(&(_p)->_m, (_v))
  70 #define R32(_p, _m)     __fs_in32(&(_p)->_m)
  71 #define S32(_p, _m, _v) W32(_p, _m, R32(_p, _m) | (_v))
  72 #define C32(_p, _m, _v) W32(_p, _m, R32(_p, _m) & ~(_v))
  73
  74 #define W16(_p, _m, _v) __fs_out16(&(_p)->_m, (_v))
  75 #define R16(_p, _m)     __fs_in16(&(_p)->_m)
  76 #define S16(_p, _m, _v) W16(_p, _m, R16(_p, _m) | (_v))
  77 #define C16(_p, _m, _v) W16(_p, _m, R16(_p, _m) & ~(_v))
  78
  79 #define W8(_p, _m, _v)  __fs_out8(&(_p)->_m, (_v))
  80 #define R8(_p, _m)      __fs_in8(&(_p)->_m)
  81 #define S8(_p, _m, _v)  W8(_p, _m, R8(_p, _m) | (_v))
  82 #define C8(_p, _m, _v)  W8(_p, _m, R8(_p, _m) & ~(_v))
  83
  84 #define SCC_MAX_MULTICAST_ADDRS 64
  85
  86 /*
  87  * Delay to wait for SCC reset command to complete (in us)
  88  */
  89 #define SCC_RESET_DELAY         50
  90 #define MAX_CR_CMD_LOOPS        10000
  91
  92 static inline int scc_cr_cmd(struct fs_enet_private *fep, u32 op)
  93 {
  94         cpm8xx_t *cpmp = &((immap_t *)fs_enet_immap)->im_cpm;
  95         u32 v, ch;
  96         int i = 0;
  97
  98         ch = fep->scc.idx << 2;
  99         v = mk_cr_cmd(ch, op);
 100         W16(cpmp, cp_cpcr, v | CPM_CR_FLG);
 101         for (i = 0; i < MAX_CR_CMD_LOOPS; i++)
 102                 if ((R16(cpmp, cp_cpcr) & CPM_CR_FLG) == 0)
 103                         break;
 104
 105         if (i >= MAX_CR_CMD_LOOPS) {
 106                 printk(KERN_ERR "%s(): Not able to issue CPM command\n",
 107                         __FUNCTION__);
 108                 return 1;
 109         }
 110         return 0;
 111 }
 112
 113 static int do_pd_setup(struct fs_enet_private *fep)
 114 {
 115         struct platform_device *pdev = to_platform_device(fep->dev);
 116         struct resource *r;
 117
 118         /* Fill out IRQ field */
 119         fep->interrupt = platform_get_irq_byname(pdev, "interrupt");
 120         if (fep->interrupt < 0)
 121                 return -EINVAL;
 122
 123         r = platform_get_resource_byname(pdev, IORESOURCE_MEM, "regs");
 124         fep->scc.sccp = ioremap(r->start, r->end - r->start + 1);
 125
 126         if (fep->scc.sccp == NULL)
 127                 return -EINVAL;
 128
 129         r = platform_get_resource_byname(pdev, IORESOURCE_MEM, "pram");
 130         fep->scc.ep = ioremap(r->start, r->end - r->start + 1);
 131
 132         if (fep->scc.ep == NULL)
 133                 return -EINVAL;
 134
 135         return 0;
 136 }
 137
 138 #define SCC_NAPI_RX_EVENT_MSK   (SCCE_ENET_RXF | SCCE_ENET_RXB)
 139 #define SCC_RX_EVENT            (SCCE_ENET_RXF)
 140 #define SCC_TX_EVENT            (SCCE_ENET_TXB)
 141 #define SCC_ERR_EVENT_MSK       (SCCE_ENET_TXE | SCCE_ENET_BSY)
 142
 143 static int setup_data(struct net_device *dev)
 144 {
 145         struct fs_enet_private *fep = netdev_priv(dev);
 146         const struct fs_platform_info *fpi = fep->fpi;
 147
 148         fep->scc.idx = fs_get_scc_index(fpi->fs_no);
 149         if ((unsigned int)fep->fcc.idx > 4)     /* max 4 SCCs */
 150                 return -EINVAL;
 151
 152         do_pd_setup(fep);
 153
 154         fep->scc.hthi = 0;
 155         fep->scc.htlo = 0;
 156
 157         fep->ev_napi_rx = SCC_NAPI_RX_EVENT_MSK;
 158         fep->ev_rx = SCC_RX_EVENT;
 159         fep->ev_tx = SCC_TX_EVENT;
 160         fep->ev_err = SCC_ERR_EVENT_MSK;
 161
 162         return 0;
 163 }
 164
 165 static int allocate_bd(struct net_device *dev)
 166 {
 167         struct fs_enet_private *fep = netdev_priv(dev);
 168         const struct fs_platform_info *fpi = fep->fpi;
 169
 170         fep->ring_mem_addr = cpm_dpalloc((fpi->tx_ring + fpi->rx_ring) *
 171                                          sizeof(cbd_t), 8);
 172         if (IS_DPERR(fep->ring_mem_addr))
 173                 return -ENOMEM;
 174
 175         fep->ring_base = cpm_dpram_addr(fep->ring_mem_addr);
 176
 177         return 0;
 178 }
 179
 180 static void free_bd(struct net_device *dev)
 181 {
 182         struct fs_enet_private *fep = netdev_priv(dev);
 183
 184         if (fep->ring_base)
 185                 cpm_dpfree(fep->ring_mem_addr);
 186 }
 187
 188 static void cleanup_data(struct net_device *dev)
 189 {
 190         /* nothing */
 191 }
 192
 193 static void set_promiscuous_mode(struct net_device *dev)
 194 {
 195         struct fs_enet_private *fep = netdev_priv(dev);
 196         scc_t *sccp = fep->scc.sccp;
 197
 198         S16(sccp, scc_psmr, SCC_PSMR_PRO);
 199 }
 200
 201 static void set_multicast_start(struct net_device *dev)
 202 {
 203         struct fs_enet_private *fep = netdev_priv(dev);
 204         scc_enet_t *ep = fep->scc.ep;
 205
 206         W16(ep, sen_gaddr1, 0);
 207         W16(ep, sen_gaddr2, 0);
 208         W16(ep, sen_gaddr3, 0);
 209         W16(ep, sen_gaddr4, 0);
 210 }
 211
 212 static void set_multicast_one(struct net_device *dev, const u8 * mac)
 213 {
 214         struct fs_enet_private *fep = netdev_priv(dev);
 215         scc_enet_t *ep = fep->scc.ep;
 216         u16 taddrh, taddrm, taddrl;
 217
 218         taddrh = ((u16) mac[5] << 8) | mac[4];
 219         taddrm = ((u16) mac[3] << 8) | mac[2];
 220         taddrl = ((u16) mac[1] << 8) | mac[0];
 221
 222         W16(ep, sen_taddrh, taddrh);
 223         W16(ep, sen_taddrm, taddrm);
 224         W16(ep, sen_taddrl, taddrl);
 225         scc_cr_cmd(fep, CPM_CR_SET_GADDR);
 226 }
 227
 228 static void set_multicast_finish(struct net_device *dev)
 229 {
 230         struct fs_enet_private *fep = netdev_priv(dev);
 231         scc_t *sccp = fep->scc.sccp;
 232         scc_enet_t *ep = fep->scc.ep;
 233
 234         /* clear promiscuous always */
 235         C16(sccp, scc_psmr, SCC_PSMR_PRO);
 236
 237         /* if all multi or too many multicasts; just enable all */
 238         if ((dev->flags & IFF_ALLMULTI) != 0 ||
 239             dev->mc_count > SCC_MAX_MULTICAST_ADDRS) {
 240
 241                 W16(ep, sen_gaddr1, 0xffff);
 242                 W16(ep, sen_gaddr2, 0xffff);
 243                 W16(ep, sen_gaddr3, 0xffff);
 244                 W16(ep, sen_gaddr4, 0xffff);
 245         }
 246 }
 247
 248 static void set_multicast_list(struct net_device *dev)
 249 {
 250         struct dev_mc_list *pmc;
 251
 252         if ((dev->flags & IFF_PROMISC) == 0) {
 253                 set_multicast_start(dev);
 254                 for (pmc = dev->mc_list; pmc != NULL; pmc = pmc->next)
 255                         set_multicast_one(dev, pmc->dmi_addr);
 256                 set_multicast_finish(dev);
 257         } else
 258                 set_promiscuous_mode(dev);
 259 }
 260
 261 /*
 262  * This function is called to start or restart the FEC during a link
 263  * change.  This only happens when switching between half and full
 264  * duplex.
 265  */
 266 static void restart(struct net_device *dev)
 267 {
 268         struct fs_enet_private *fep = netdev_priv(dev);
 269         scc_t *sccp = fep->scc.sccp;
 270         scc_enet_t *ep = fep->scc.ep;
 271         const struct fs_platform_info *fpi = fep->fpi;
 272         u16 paddrh, paddrm, paddrl;
 273         const unsigned char *mac;
 274         int i;
 275
 276         C32(sccp, scc_gsmrl, SCC_GSMRL_ENR | SCC_GSMRL_ENT);
 277
 278         /* clear everything (slow & steady does it) */
 279         for (i = 0; i < sizeof(*ep); i++)
 280                 __fs_out8((char *)ep + i, 0);
 281
 282         /* point to bds */
 283         W16(ep, sen_genscc.scc_rbase, fep->ring_mem_addr);
 284         W16(ep, sen_genscc.scc_tbase,
 285             fep->ring_mem_addr + sizeof(cbd_t) * fpi->rx_ring);
 286
 287         /* Initialize function code registers for big-endian.
 288          */
 289         W8(ep, sen_genscc.scc_rfcr, SCC_EB);
 290         W8(ep, sen_genscc.scc_tfcr, SCC_EB);
 291
 292         /* Set maximum bytes per receive buffer.
 293          * This appears to be an Ethernet frame size, not the buffer
 294          * fragment size.  It must be a multiple of four.
 295          */
 296         W16(ep, sen_genscc.scc_mrblr, 0x5f0);
 297
 298         /* Set CRC preset and mask.
 299          */
 300         W32(ep, sen_cpres, 0xffffffff);
 301         W32(ep, sen_cmask, 0xdebb20e3);
 302
 303         W32(ep, sen_crcec, 0);  /* CRC Error counter */
 304         W32(ep, sen_alec, 0);   /* alignment error counter */
 305         W32(ep, sen_disfc, 0);  /* discard frame counter */
 306
 307         W16(ep, sen_pads, 0x8888);      /* Tx short frame pad character */
 308         W16(ep, sen_retlim, 15);        /* Retry limit threshold */
 309
 310         W16(ep, sen_maxflr, 0x5ee);     /* maximum frame length register */
 311
 312         W16(ep, sen_minflr, PKT_MINBUF_SIZE);   /* minimum frame length register */
 313
 314         W16(ep, sen_maxd1, 0x000005f0); /* maximum DMA1 length */
 315         W16(ep, sen_maxd2, 0x000005f0); /* maximum DMA2 length */
 316
 317         /* Clear hash tables.
 318          */
 319         W16(ep, sen_gaddr1, 0);
 320         W16(ep, sen_gaddr2, 0);
 321         W16(ep, sen_gaddr3, 0);
 322         W16(ep, sen_gaddr4, 0);
 323         W16(ep, sen_iaddr1, 0);
 324         W16(ep, sen_iaddr2, 0);
 325         W16(ep, sen_iaddr3, 0);
 326         W16(ep, sen_iaddr4, 0);
 327
 328         /* set address
 329          */
 330         mac = dev->dev_addr;
 331         paddrh = ((u16) mac[5] << 8) | mac[4];
 332         paddrm = ((u16) mac[3] << 8) | mac[2];
 333         paddrl = ((u16) mac[1] << 8) | mac[0];
 334
 335         W16(ep, sen_paddrh, paddrh);
 336         W16(ep, sen_paddrm, paddrm);
 337         W16(ep, sen_paddrl, paddrl);
 338
 339         W16(ep, sen_pper, 0);
 340         W16(ep, sen_taddrl, 0);
 341         W16(ep, sen_taddrm, 0);
 342         W16(ep, sen_taddrh, 0);
 343
 344         fs_init_bds(dev);
 345
 346         scc_cr_cmd(fep, CPM_CR_INIT_TRX);
 347
 348         W16(sccp, scc_scce, 0xffff);
 349
 350         /* Enable interrupts we wish to service.
 351          */
 352         W16(sccp, scc_sccm, SCCE_ENET_TXE | SCCE_ENET_RXF | SCCE_ENET_TXB);
 353
 354         /* Set GSMR_H to enable all normal operating modes.
 355          * Set GSMR_L to enable Ethernet to MC68160.
 356          */
 357         W32(sccp, scc_gsmrh, 0);
 358         W32(sccp, scc_gsmrl,
 359             SCC_GSMRL_TCI | SCC_GSMRL_TPL_48 | SCC_GSMRL_TPP_10 |
 360             SCC_GSMRL_MODE_ENET);
 361
 362         /* Set sync/delimiters.
 363          */
 364         W16(sccp, scc_dsr, 0xd555);
 365
 366         /* Set processing mode.  Use Ethernet CRC, catch broadcast, and
 367          * start frame search 22 bit times after RENA.
 368          */
 369         W16(sccp, scc_psmr, SCC_PSMR_ENCRC | SCC_PSMR_NIB22);
 370
 371         /* Set full duplex mode if needed */
 372         if (fep->phydev->duplex)
 373                 S16(sccp, scc_psmr, SCC_PSMR_LPB | SCC_PSMR_FDE);
 374
 375         S32(sccp, scc_gsmrl, SCC_GSMRL_ENR | SCC_GSMRL_ENT);
 376 }
 377
 378 static void stop(struct net_device *dev)
 379 {
 380         struct fs_enet_private *fep = netdev_priv(dev);
 381         scc_t *sccp = fep->scc.sccp;
 382         int i;
 383
 384         for (i = 0; (R16(sccp, scc_sccm) == 0) && i < SCC_RESET_DELAY; i++)
 385                 udelay(1);
 386
 387         if (i == SCC_RESET_DELAY)
 388                 printk(KERN_WARNING DRV_MODULE_NAME
 389                        ": %s SCC timeout on graceful transmit stop\n",
 390                        dev->name);
 391
 392         W16(sccp, scc_sccm, 0);
 393         C32(sccp, scc_gsmrl, SCC_GSMRL_ENR | SCC_GSMRL_ENT);
 394
 395         fs_cleanup_bds(dev);
 396 }
 397
 398 static void pre_request_irq(struct net_device *dev, int irq)
 399 {
 400 #ifndef CONFIG_PPC_MERGE
 401         immap_t *immap = fs_enet_immap;
 402         u32 siel;
 403
 404         /* SIU interrupt */
 405         if (irq >= SIU_IRQ0 && irq < SIU_LEVEL7) {
 406
 407                 siel = in_be32(&immap->im_siu_conf.sc_siel);
 408                 if ((irq & 1) == 0)
 409                         siel |= (0x80000000 >> irq);
 410                 else
 411                         siel &= ~(0x80000000 >> (irq & ~1));
 412                 out_be32(&immap->im_siu_conf.sc_siel, siel);
 413         }
 414 #endif
 415 }
 416
 417 static void post_free_irq(struct net_device *dev, int irq)
 418 {
 419         /* nothing */
 420 }
 421
 422 static void napi_clear_rx_event(struct net_device *dev)
 423 {
 424         struct fs_enet_private *fep = netdev_priv(dev);
 425         scc_t *sccp = fep->scc.sccp;
 426
 427         W16(sccp, scc_scce, SCC_NAPI_RX_EVENT_MSK);
 428 }
 429
 430 static void napi_enable_rx(struct net_device *dev)
 431 {
 432         struct fs_enet_private *fep = netdev_priv(dev);
 433         scc_t *sccp = fep->scc.sccp;
 434
 435         S16(sccp, scc_sccm, SCC_NAPI_RX_EVENT_MSK);
 436 }
 437
 438 static void napi_disable_rx(struct net_device *dev)
 439 {
 440         struct fs_enet_private *fep = netdev_priv(dev);
 441         scc_t *sccp = fep->scc.sccp;
 442
 443         C16(sccp, scc_sccm, SCC_NAPI_RX_EVENT_MSK);
 444 }
 445
 446 static void rx_bd_done(struct net_device *dev)
 447 {
 448         /* nothing */
 449 }
 450
 451 static void tx_kickstart(struct net_device *dev)
 452 {
 453         /* nothing */
 454 }
 455
 456 static u32 get_int_events(struct net_device *dev)
 457 {
 458         struct fs_enet_private *fep = netdev_priv(dev);
 459         scc_t *sccp = fep->scc.sccp;
 460
 461         return (u32) R16(sccp, scc_scce);
 462 }
 463
 464 static void clear_int_events(struct net_device *dev, u32 int_events)
 465 {
 466         struct fs_enet_private *fep = netdev_priv(dev);
 467         scc_t *sccp = fep->scc.sccp;
 468
 469         W16(sccp, scc_scce, int_events & 0xffff);
 470 }
 471
 472 static void ev_error(struct net_device *dev, u32 int_events)
 473 {
 474         printk(KERN_WARNING DRV_MODULE_NAME
 475                ": %s SCC ERROR(s) 0x%x\n", dev->name, int_events);
 476 }
 477
 478 static int get_regs(struct net_device *dev, void *p, int *sizep)
 479 {
 480         struct fs_enet_private *fep = netdev_priv(dev);
 481
 482         if (*sizep < sizeof(scc_t) + sizeof(scc_enet_t))
 483                 return -EINVAL;
 484
 485         memcpy_fromio(p, fep->scc.sccp, sizeof(scc_t));
 486         p = (char *)p + sizeof(scc_t);
 487
 488         memcpy_fromio(p, fep->scc.ep, sizeof(scc_enet_t));
 489
 490         return 0;
 491 }
 492
 493 static int get_regs_len(struct net_device *dev)
 494 {
 495         return sizeof(scc_t) + sizeof(scc_enet_t);
 496 }
 497
 498 static void tx_restart(struct net_device *dev)
 499 {
 500         struct fs_enet_private *fep = netdev_priv(dev);
 501
 502         scc_cr_cmd(fep, CPM_CR_RESTART_TX);
 503 }
 504
 505
 506
 507 /*************************************************************************/
 508
 509 const struct fs_ops fs_scc_ops = {
 510         .setup_data             = setup_data,
 511         .cleanup_data           = cleanup_data,
 512         .set_multicast_list     = set_multicast_list,
 513         .restart                = restart,
 514         .stop                   = stop,
 515         .pre_request_irq        = pre_request_irq,
 516         .post_free_irq          = post_free_irq,
 517         .napi_clear_rx_event    = napi_clear_rx_event,
 518         .napi_enable_rx         = napi_enable_rx,
 519         .napi_disable_rx        = napi_disable_rx,
 520         .rx_bd_done             = rx_bd_done,
 521         .tx_kickstart           = tx_kickstart,
 522         .get_int_events         = get_int_events,
 523         .clear_int_events       = clear_int_events,
 524         .ev_error               = ev_error,
 525         .get_regs               = get_regs,
 526         .get_regs_len           = get_regs_len,
 527         .tx_restart             = tx_restart,
 528         .allocate_bd            = allocate_bd,
 529         .free_bd                = free_bd,
 530 };