drivers/net/sgiseeq.c

   1 /*
   2  * sgiseeq.c: Seeq8003 ethernet driver for SGI machines.
   3  *
   4  * Copyright (C) 1996 David S. Miller (dm@engr.sgi.com)
   5  */
   6
   7 #undef DEBUG
   8
   9 #include <linux/kernel.h>
  10 #include <linux/module.h>
  11 #include <linux/errno.h>
  12 #include <linux/init.h>
  13 #include <linux/types.h>
  14 #include <linux/interrupt.h>
  15 #include <linux/string.h>
  16 #include <linux/delay.h>
  17 #include <linux/netdevice.h>
  18 #include <linux/platform_device.h>
  19 #include <linux/etherdevice.h>
  20 #include <linux/skbuff.h>
  21
  22 #include <asm/sgi/hpc3.h>
  23 #include <asm/sgi/ip22.h>
  24 #include <asm/sgi/seeq.h>
  25
  26 #include "sgiseeq.h"
  27
  28 static char *sgiseeqstr = "SGI Seeq8003";
  29
  30 /*
  31  * If you want speed, you do something silly, it always has worked for me.  So,
  32  * with that in mind, I've decided to make this driver look completely like a
  33  * stupid Lance from a driver architecture perspective.  Only difference is that
  34  * here our "ring buffer" looks and acts like a real Lance one does but is
  35  * layed out like how the HPC DMA and the Seeq want it to.  You'd be surprised
  36  * how a stupid idea like this can pay off in performance, not to mention
  37  * making this driver 2,000 times easier to write. ;-)
  38  */
  39
  40 /* Tune these if we tend to run out often etc. */
  41 #define SEEQ_RX_BUFFERS  16
  42 #define SEEQ_TX_BUFFERS  16
  43
  44 #define PKT_BUF_SZ       1584
  45
  46 #define NEXT_RX(i)  (((i) + 1) & (SEEQ_RX_BUFFERS - 1))
  47 #define NEXT_TX(i)  (((i) + 1) & (SEEQ_TX_BUFFERS - 1))
  48 #define PREV_RX(i)  (((i) - 1) & (SEEQ_RX_BUFFERS - 1))
  49 #define PREV_TX(i)  (((i) - 1) & (SEEQ_TX_BUFFERS - 1))
  50
  51 #define TX_BUFFS_AVAIL(sp) ((sp->tx_old <= sp->tx_new) ? \
  52                             sp->tx_old + (SEEQ_TX_BUFFERS - 1) - sp->tx_new : \
  53                             sp->tx_old - sp->tx_new - 1)
  54
  55 #define VIRT_TO_DMA(sp, v) ((sp)->srings_dma +                                 \
  56                                   (dma_addr_t)((unsigned long)(v) -            \
  57                                                (unsigned long)((sp)->rx_desc)))
  58
  59 /* Copy frames shorter than rx_copybreak, otherwise pass on up in
  60  * a full sized sk_buff.  Value of 100 stolen from tulip.c (!alpha).
  61  */
  62 static int rx_copybreak = 100;
  63
  64 #define PAD_SIZE    (128 - sizeof(struct hpc_dma_desc) - sizeof(void *))
  65
  66 struct sgiseeq_rx_desc {
  67         volatile struct hpc_dma_desc rdma;
  68         u8 padding[PAD_SIZE];
  69         struct sk_buff *skb;
  70 };
  71
  72 struct sgiseeq_tx_desc {
  73         volatile struct hpc_dma_desc tdma;
  74         u8 padding[PAD_SIZE];
  75         struct sk_buff *skb;
  76 };
  77
  78 /*
  79  * Warning: This structure is layed out in a certain way because HPC dma
  80  *          descriptors must be 8-byte aligned.  So don't touch this without
  81  *          some care.
  82  */
  83 struct sgiseeq_init_block { /* Note the name ;-) */
  84         struct sgiseeq_rx_desc rxvector[SEEQ_RX_BUFFERS];
  85         struct sgiseeq_tx_desc txvector[SEEQ_TX_BUFFERS];
  86 };
  87
  88 struct sgiseeq_private {
  89         struct sgiseeq_init_block *srings;
  90         dma_addr_t srings_dma;
  91
  92         /* Ptrs to the descriptors in uncached space. */
  93         struct sgiseeq_rx_desc *rx_desc;
  94         struct sgiseeq_tx_desc *tx_desc;
  95
  96         char *name;
  97         struct hpc3_ethregs *hregs;
  98         struct sgiseeq_regs *sregs;
  99
 100         /* Ring entry counters. */
 101         unsigned int rx_new, tx_new;
 102         unsigned int rx_old, tx_old;
 103
 104         int is_edlc;
 105         unsigned char control;
 106         unsigned char mode;
 107
 108         spinlock_t tx_lock;
 109 };
 110
 111 static inline void dma_sync_desc_cpu(struct net_device *dev, void *addr)
 112 {
 113         dma_cache_sync(dev->dev.parent, addr, sizeof(struct sgiseeq_rx_desc),
 114                        DMA_FROM_DEVICE);
 115 }
 116
 117 static inline void dma_sync_desc_dev(struct net_device *dev, void *addr)
 118 {
 119         dma_cache_sync(dev->dev.parent, addr, sizeof(struct sgiseeq_rx_desc),
 120                        DMA_TO_DEVICE);
 121 }
 122
 123 static inline void hpc3_eth_reset(struct hpc3_ethregs *hregs)
 124 {
 125         hregs->reset = HPC3_ERST_CRESET | HPC3_ERST_CLRIRQ;
 126         udelay(20);
 127         hregs->reset = 0;
 128 }
 129
 130 static inline void reset_hpc3_and_seeq(struct hpc3_ethregs *hregs,
 131                                        struct sgiseeq_regs *sregs)
 132 {
 133         hregs->rx_ctrl = hregs->tx_ctrl = 0;
 134         hpc3_eth_reset(hregs);
 135 }
 136
 137 #define RSTAT_GO_BITS (SEEQ_RCMD_IGOOD | SEEQ_RCMD_IEOF | SEEQ_RCMD_ISHORT | \
 138                        SEEQ_RCMD_IDRIB | SEEQ_RCMD_ICRC)
 139
 140 static inline void seeq_go(struct sgiseeq_private *sp,
 141                            struct hpc3_ethregs *hregs,
 142                            struct sgiseeq_regs *sregs)
 143 {
 144         sregs->rstat = sp->mode | RSTAT_GO_BITS;
 145         hregs->rx_ctrl = HPC3_ERXCTRL_ACTIVE;
 146 }
 147
 148 static inline void __sgiseeq_set_mac_address(struct net_device *dev)
 149 {
 150         struct sgiseeq_private *sp = netdev_priv(dev);
 151         struct sgiseeq_regs *sregs = sp->sregs;
 152         int i;
 153
 154         sregs->tstat = SEEQ_TCMD_RB0;
 155         for (i = 0; i < 6; i++)
 156                 sregs->rw.eth_addr[i] = dev->dev_addr[i];
 157 }
 158
 159 static int sgiseeq_set_mac_address(struct net_device *dev, void *addr)
 160 {
 161         struct sgiseeq_private *sp = netdev_priv(dev);
 162         struct sockaddr *sa = addr;
 163
 164         memcpy(dev->dev_addr, sa->sa_data, dev->addr_len);
 165
 166         spin_lock_irq(&sp->tx_lock);
 167         __sgiseeq_set_mac_address(dev);
 168         spin_unlock_irq(&sp->tx_lock);
 169
 170         return 0;
 171 }
 172
 173 #define TCNTINFO_INIT (HPCDMA_EOX | HPCDMA_ETXD)
 174 #define RCNTCFG_INIT  (HPCDMA_OWN | HPCDMA_EORP | HPCDMA_XIE)
 175 #define RCNTINFO_INIT (RCNTCFG_INIT | (PKT_BUF_SZ & HPCDMA_BCNT))
 176
 177 static int seeq_init_ring(struct net_device *dev)
 178 {
 179         struct sgiseeq_private *sp = netdev_priv(dev);
 180         int i;
 181
 182         netif_stop_queue(dev);
 183         sp->rx_new = sp->tx_new = 0;
 184         sp->rx_old = sp->tx_old = 0;
 185
 186         __sgiseeq_set_mac_address(dev);
 187
 188         /* Setup tx ring. */
 189         for(i = 0; i < SEEQ_TX_BUFFERS; i++) {
 190                 sp->tx_desc[i].tdma.cntinfo = TCNTINFO_INIT;
 191                 dma_sync_desc_dev(dev, &sp->tx_desc[i]);
 192         }
 193
 194         /* And now the rx ring. */
 195         for (i = 0; i < SEEQ_RX_BUFFERS; i++) {
 196                 if (!sp->rx_desc[i].skb) {
 197                         dma_addr_t dma_addr;
 198                         struct sk_buff *skb = netdev_alloc_skb(dev, PKT_BUF_SZ);
 199
 200                         if (skb == NULL)
 201                                 return -ENOMEM;
 202                         skb_reserve(skb, 2);
 203                         dma_addr = dma_map_single(dev->dev.parent,
 204                                                   skb->data - 2,
 205                                                   PKT_BUF_SZ, DMA_FROM_DEVICE);
 206                         sp->rx_desc[i].skb = skb;
 207                         sp->rx_desc[i].rdma.pbuf = dma_addr;
 208                 }
 209                 sp->rx_desc[i].rdma.cntinfo = RCNTINFO_INIT;
 210                 dma_sync_desc_dev(dev, &sp->rx_desc[i]);
 211         }
 212         sp->rx_desc[i - 1].rdma.cntinfo |= HPCDMA_EOR;
 213         dma_sync_desc_dev(dev, &sp->rx_desc[i - 1]);
 214         return 0;
 215 }
 216
 217 static void seeq_purge_ring(struct net_device *dev)
 218 {
 219         struct sgiseeq_private *sp = netdev_priv(dev);
 220         int i;
 221
 222         /* clear tx ring. */
 223         for (i = 0; i < SEEQ_TX_BUFFERS; i++) {
 224                 if (sp->tx_desc[i].skb) {
 225                         dev_kfree_skb(sp->tx_desc[i].skb);
 226                         sp->tx_desc[i].skb = NULL;
 227                 }
 228         }
 229
 230         /* And now the rx ring. */
 231         for (i = 0; i < SEEQ_RX_BUFFERS; i++) {
 232                 if (sp->rx_desc[i].skb) {
 233                         dev_kfree_skb(sp->rx_desc[i].skb);
 234                         sp->rx_desc[i].skb = NULL;
 235                 }
 236         }
 237 }
 238
 239 #ifdef DEBUG
 240 static struct sgiseeq_private *gpriv;
 241 static struct net_device *gdev;
 242
 243 static void sgiseeq_dump_rings(void)
 244 {
 245         static int once;
 246         struct sgiseeq_rx_desc *r = gpriv->rx_desc;
 247         struct sgiseeq_tx_desc *t = gpriv->tx_desc;
 248         struct hpc3_ethregs *hregs = gpriv->hregs;
 249         int i;
 250
 251         if (once)
 252                 return;
 253         once++;
 254         printk("RING DUMP:\n");
 255         for (i = 0; i < SEEQ_RX_BUFFERS; i++) {
 256                 printk("RX [%d]: @(%p) [%08x,%08x,%08x] ",
 257                        i, (&r[i]), r[i].rdma.pbuf, r[i].rdma.cntinfo,
 258                        r[i].rdma.pnext);
 259                 i += 1;
 260                 printk("-- [%d]: @(%p) [%08x,%08x,%08x]\n",
 261                        i, (&r[i]), r[i].rdma.pbuf, r[i].rdma.cntinfo,
 262                        r[i].rdma.pnext);
 263         }
 264         for (i = 0; i < SEEQ_TX_BUFFERS; i++) {
 265                 printk("TX [%d]: @(%p) [%08x,%08x,%08x] ",
 266                        i, (&t[i]), t[i].tdma.pbuf, t[i].tdma.cntinfo,
 267                        t[i].tdma.pnext);
 268                 i += 1;
 269                 printk("-- [%d]: @(%p) [%08x,%08x,%08x]\n",
 270                        i, (&t[i]), t[i].tdma.pbuf, t[i].tdma.cntinfo,
 271                        t[i].tdma.pnext);
 272         }
 273         printk("INFO: [rx_new = %d rx_old=%d] [tx_new = %d tx_old = %d]\n",
 274                gpriv->rx_new, gpriv->rx_old, gpriv->tx_new, gpriv->tx_old);
 275         printk("RREGS: rx_cbptr[%08x] rx_ndptr[%08x] rx_ctrl[%08x]\n",
 276                hregs->rx_cbptr, hregs->rx_ndptr, hregs->rx_ctrl);
 277         printk("TREGS: tx_cbptr[%08x] tx_ndptr[%08x] tx_ctrl[%08x]\n",
 278                hregs->tx_cbptr, hregs->tx_ndptr, hregs->tx_ctrl);
 279 }
 280 #endif
 281
 282 #define TSTAT_INIT_SEEQ (SEEQ_TCMD_IPT|SEEQ_TCMD_I16|SEEQ_TCMD_IC|SEEQ_TCMD_IUF)
 283 #define TSTAT_INIT_EDLC ((TSTAT_INIT_SEEQ) | SEEQ_TCMD_RB2)
 284
 285 static int init_seeq(struct net_device *dev, struct sgiseeq_private *sp,
 286                      struct sgiseeq_regs *sregs)
 287 {
 288         struct hpc3_ethregs *hregs = sp->hregs;
 289         int err;
 290
 291         reset_hpc3_and_seeq(hregs, sregs);
 292         err = seeq_init_ring(dev);
 293         if (err)
 294                 return err;
 295
 296         /* Setup to field the proper interrupt types. */
 297         if (sp->is_edlc) {
 298                 sregs->tstat = TSTAT_INIT_EDLC;
 299                 sregs->rw.wregs.control = sp->control;
 300                 sregs->rw.wregs.frame_gap = 0;
 301         } else {
 302                 sregs->tstat = TSTAT_INIT_SEEQ;
 303         }
 304
 305         hregs->rx_ndptr = VIRT_TO_DMA(sp, sp->rx_desc);
 306         hregs->tx_ndptr = VIRT_TO_DMA(sp, sp->tx_desc);
 307
 308         seeq_go(sp, hregs, sregs);
 309         return 0;
 310 }
 311
 312 static void record_rx_errors(struct net_device *dev, unsigned char status)
 313 {
 314         if (status & SEEQ_RSTAT_OVERF ||
 315             status & SEEQ_RSTAT_SFRAME)
 316                 dev->stats.rx_over_errors++;
 317         if (status & SEEQ_RSTAT_CERROR)
 318                 dev->stats.rx_crc_errors++;
 319         if (status & SEEQ_RSTAT_DERROR)
 320                 dev->stats.rx_frame_errors++;
 321         if (status & SEEQ_RSTAT_REOF)
 322                 dev->stats.rx_errors++;
 323 }
 324
 325 static inline void rx_maybe_restart(struct sgiseeq_private *sp,
 326                                     struct hpc3_ethregs *hregs,
 327                                     struct sgiseeq_regs *sregs)
 328 {
 329         if (!(hregs->rx_ctrl & HPC3_ERXCTRL_ACTIVE)) {
 330                 hregs->rx_ndptr = VIRT_TO_DMA(sp, sp->rx_desc + sp->rx_new);
 331                 seeq_go(sp, hregs, sregs);
 332         }
 333 }
 334
 335 static inline void sgiseeq_rx(struct net_device *dev, struct sgiseeq_private *sp,
 336                               struct hpc3_ethregs *hregs,
 337                               struct sgiseeq_regs *sregs)
 338 {
 339         struct sgiseeq_rx_desc *rd;
 340         struct sk_buff *skb = NULL;
 341         struct sk_buff *newskb;
 342         unsigned char pkt_status;
 343         int len = 0;
 344         unsigned int orig_end = PREV_RX(sp->rx_new);
 345
 346         /* Service every received packet. */
 347         rd = &sp->rx_desc[sp->rx_new];
 348         dma_sync_desc_cpu(dev, rd);
 349         while (!(rd->rdma.cntinfo & HPCDMA_OWN)) {
 350                 len = PKT_BUF_SZ - (rd->rdma.cntinfo & HPCDMA_BCNT) - 3;
 351                 dma_unmap_single(dev->dev.parent, rd->rdma.pbuf,
 352                                  PKT_BUF_SZ, DMA_FROM_DEVICE);
 353                 pkt_status = rd->skb->data[len];
 354                 if (pkt_status & SEEQ_RSTAT_FIG) {
 355                         /* Packet is OK. */
 356                         /* We don't want to receive our own packets */
 357                         if (memcmp(rd->skb->data + 6, dev->dev_addr, ETH_ALEN)) {
 358                                 if (len > rx_copybreak) {
 359                                         skb = rd->skb;
 360                                         newskb = netdev_alloc_skb(dev, PKT_BUF_SZ);
 361                                         if (!newskb) {
 362                                                 newskb = skb;
 363                                                 skb = NULL;
 364                                                 goto memory_squeeze;
 365                                         }
 366                                         skb_reserve(newskb, 2);
 367                                 } else {
 368                                         skb = netdev_alloc_skb(dev, len + 2);
 369                                         if (skb) {
 370                                                 skb_reserve(skb, 2);
 371                                                 skb_copy_to_linear_data(skb, rd->skb->data, len);
 372                                         }
 373                                         newskb = rd->skb;
 374                                 }
 375 memory_squeeze:
 376                                 if (skb) {
 377                                         skb_put(skb, len);
 378                                         skb->protocol = eth_type_trans(skb, dev);
 379                                         netif_rx(skb);
 380                                         dev->last_rx = jiffies;
 381                                         dev->stats.rx_packets++;
 382                                         dev->stats.rx_bytes += len;
 383                                 } else {
 384                                         printk(KERN_NOTICE "%s: Memory squeeze, deferring packet.\n",
 385                                                 dev->name);
 386                                         dev->stats.rx_dropped++;
 387                                 }
 388                         } else {
 389                                 /* Silently drop my own packets */
 390                                 newskb = rd->skb;
 391                         }
 392                 } else {
 393                         record_rx_errors(dev, pkt_status);
 394                         newskb = rd->skb;
 395                 }
 396                 rd->skb = newskb;
 397                 rd->rdma.pbuf = dma_map_single(dev->dev.parent,
 398                                                newskb->data - 2,
 399                                                PKT_BUF_SZ, DMA_FROM_DEVICE);
 400
 401                 /* Return the entry to the ring pool. */
 402                 rd->rdma.cntinfo = RCNTINFO_INIT;
 403                 sp->rx_new = NEXT_RX(sp->rx_new);
 404                 dma_sync_desc_dev(dev, rd);
 405                 rd = &sp->rx_desc[sp->rx_new];
 406                 dma_sync_desc_cpu(dev, rd);
 407         }
 408         dma_sync_desc_cpu(dev, &sp->rx_desc[orig_end]);
 409         sp->rx_desc[orig_end].rdma.cntinfo &= ~(HPCDMA_EOR);
 410         dma_sync_desc_dev(dev, &sp->rx_desc[orig_end]);
 411         dma_sync_desc_cpu(dev, &sp->rx_desc[PREV_RX(sp->rx_new)]);
 412         sp->rx_desc[PREV_RX(sp->rx_new)].rdma.cntinfo |= HPCDMA_EOR;
 413         dma_sync_desc_dev(dev, &sp->rx_desc[PREV_RX(sp->rx_new)]);
 414         rx_maybe_restart(sp, hregs, sregs);
 415 }
 416
 417 static inline void tx_maybe_reset_collisions(struct sgiseeq_private *sp,
 418                                              struct sgiseeq_regs *sregs)
 419 {
 420         if (sp->is_edlc) {
 421                 sregs->rw.wregs.control = sp->control & ~(SEEQ_CTRL_XCNT);
 422                 sregs->rw.wregs.control = sp->control;
 423         }
 424 }
 425
 426 static inline void kick_tx(struct net_device *dev,
 427                            struct sgiseeq_private *sp,
 428                            struct hpc3_ethregs *hregs)
 429 {
 430         struct sgiseeq_tx_desc *td;
 431         int i = sp->tx_old;
 432
 433         /* If the HPC aint doin nothin, and there are more packets
 434          * with ETXD cleared and XIU set we must make very certain
 435          * that we restart the HPC else we risk locking up the
 436          * adapter.  The following code is only safe iff the HPCDMA
 437          * is not active!
 438          */
 439         td = &sp->tx_desc[i];
 440         dma_sync_desc_cpu(dev, td);
 441         while ((td->tdma.cntinfo & (HPCDMA_XIU | HPCDMA_ETXD)) ==
 442               (HPCDMA_XIU | HPCDMA_ETXD)) {
 443                 i = NEXT_TX(i);
 444                 td = &sp->tx_desc[i];
 445                 dma_sync_desc_cpu(dev, td);
 446         }
 447         if (td->tdma.cntinfo & HPCDMA_XIU) {
 448                 hregs->tx_ndptr = VIRT_TO_DMA(sp, td);
 449                 hregs->tx_ctrl = HPC3_ETXCTRL_ACTIVE;
 450         }
 451 }
 452
 453 static inline void sgiseeq_tx(struct net_device *dev, struct sgiseeq_private *sp,
 454                               struct hpc3_ethregs *hregs,
 455                               struct sgiseeq_regs *sregs)
 456 {
 457         struct sgiseeq_tx_desc *td;
 458         unsigned long status = hregs->tx_ctrl;
 459         int j;
 460
 461         tx_maybe_reset_collisions(sp, sregs);
 462
 463         if (!(status & (HPC3_ETXCTRL_ACTIVE | SEEQ_TSTAT_PTRANS))) {
 464                 /* Oops, HPC detected some sort of error. */
 465                 if (status & SEEQ_TSTAT_R16)
 466                         dev->stats.tx_aborted_errors++;
 467                 if (status & SEEQ_TSTAT_UFLOW)
 468                         dev->stats.tx_fifo_errors++;
 469                 if (status & SEEQ_TSTAT_LCLS)
 470                         dev->stats.collisions++;
 471         }
 472
 473         /* Ack 'em... */
 474         for (j = sp->tx_old; j != sp->tx_new; j = NEXT_TX(j)) {
 475                 td = &sp->tx_desc[j];
 476
 477                 dma_sync_desc_cpu(dev, td);
 478                 if (!(td->tdma.cntinfo & (HPCDMA_XIU)))
 479                         break;
 480                 if (!(td->tdma.cntinfo & (HPCDMA_ETXD))) {
 481                         if (!(status & HPC3_ETXCTRL_ACTIVE)) {
 482                                 hregs->tx_ndptr = VIRT_TO_DMA(sp, td);
 483                                 hregs->tx_ctrl = HPC3_ETXCTRL_ACTIVE;
 484                         }
 485                         break;
 486                 }
 487                 dev->stats.tx_packets++;
 488                 sp->tx_old = NEXT_TX(sp->tx_old);
 489                 td->tdma.cntinfo &= ~(HPCDMA_XIU | HPCDMA_XIE);
 490                 td->tdma.cntinfo |= HPCDMA_EOX;
 491                 if (td->skb) {
 492                         dev_kfree_skb_any(td->skb);
 493                         td->skb = NULL;
 494                 }
 495                 dma_sync_desc_dev(dev, td);
 496         }
 497 }
 498
 499 static irqreturn_t sgiseeq_interrupt(int irq, void *dev_id)
 500 {
 501         struct net_device *dev = (struct net_device *) dev_id;
 502         struct sgiseeq_private *sp = netdev_priv(dev);
 503         struct hpc3_ethregs *hregs = sp->hregs;
 504         struct sgiseeq_regs *sregs = sp->sregs;
 505
 506         spin_lock(&sp->tx_lock);
 507
 508         /* Ack the IRQ and set software state. */
 509         hregs->reset = HPC3_ERST_CLRIRQ;
 510
 511         /* Always check for received packets. */
 512         sgiseeq_rx(dev, sp, hregs, sregs);
 513
 514         /* Only check for tx acks if we have something queued. */
 515         if (sp->tx_old != sp->tx_new)
 516                 sgiseeq_tx(dev, sp, hregs, sregs);
 517
 518         if ((TX_BUFFS_AVAIL(sp) > 0) && netif_queue_stopped(dev)) {
 519                 netif_wake_queue(dev);
 520         }
 521         spin_unlock(&sp->tx_lock);
 522
 523         return IRQ_HANDLED;
 524 }
 525
 526 static int sgiseeq_open(struct net_device *dev)
 527 {
 528         struct sgiseeq_private *sp = netdev_priv(dev);
 529         struct sgiseeq_regs *sregs = sp->sregs;
 530         unsigned int irq = dev->irq;
 531         int err;
 532
 533         if (request_irq(irq, sgiseeq_interrupt, 0, sgiseeqstr, dev)) {
 534                 printk(KERN_ERR "Seeq8003: Can't get irq %d\n", dev->irq);
 535                 err = -EAGAIN;
 536         }
 537
 538         err = init_seeq(dev, sp, sregs);
 539         if (err)
 540                 goto out_free_irq;
 541
 542         netif_start_queue(dev);
 543
 544         return 0;
 545
 546 out_free_irq:
 547         free_irq(irq, dev);
 548
 549         return err;
 550 }
 551
 552 static int sgiseeq_close(struct net_device *dev)
 553 {
 554         struct sgiseeq_private *sp = netdev_priv(dev);
 555         struct sgiseeq_regs *sregs = sp->sregs;
 556         unsigned int irq = dev->irq;
 557
 558         netif_stop_queue(dev);
 559
 560         /* Shutdown the Seeq. */
 561         reset_hpc3_and_seeq(sp->hregs, sregs);
 562         free_irq(irq, dev);
 563         seeq_purge_ring(dev);
 564
 565         return 0;
 566 }
 567
 568 static inline int sgiseeq_reset(struct net_device *dev)
 569 {
 570         struct sgiseeq_private *sp = netdev_priv(dev);
 571         struct sgiseeq_regs *sregs = sp->sregs;
 572         int err;
 573
 574         err = init_seeq(dev, sp, sregs);
 575         if (err)
 576                 return err;
 577
 578         dev->trans_start = jiffies;
 579         netif_wake_queue(dev);
 580
 581         return 0;
 582 }
 583
 584 static int sgiseeq_start_xmit(struct sk_buff *skb, struct net_device *dev)
 585 {
 586         struct sgiseeq_private *sp = netdev_priv(dev);
 587         struct hpc3_ethregs *hregs = sp->hregs;
 588         unsigned long flags;
 589         struct sgiseeq_tx_desc *td;
 590         int len, entry;
 591
 592         spin_lock_irqsave(&sp->tx_lock, flags);
 593
 594         /* Setup... */
 595         len = skb->len;
 596         if (len < ETH_ZLEN) {
 597                 if (skb_padto(skb, ETH_ZLEN))
 598                         return 0;
 599                 len = ETH_ZLEN;
 600         }
 601
 602         dev->stats.tx_bytes += len;
 603         entry = sp->tx_new;
 604         td = &sp->tx_desc[entry];
 605         dma_sync_desc_cpu(dev, td);
 606
 607         /* Create entry.  There are so many races with adding a new
 608          * descriptor to the chain:
 609          * 1) Assume that the HPC is off processing a DMA chain while
 610          *    we are changing all of the following.
 611          * 2) Do no allow the HPC to look at a new descriptor until
 612          *    we have completely set up it's state.  This means, do
 613          *    not clear HPCDMA_EOX in the current last descritptor
 614          *    until the one we are adding looks consistent and could
 615          *    be processes right now.
 616          * 3) The tx interrupt code must notice when we've added a new
 617          *    entry and the HPC got to the end of the chain before we
 618          *    added this new entry and restarted it.
 619          */
 620         td->skb = skb;
 621         td->tdma.pbuf = dma_map_single(dev->dev.parent, skb->data,
 622                                        len, DMA_TO_DEVICE);
 623         td->tdma.cntinfo = (len & HPCDMA_BCNT) |
 624                            HPCDMA_XIU | HPCDMA_EOXP | HPCDMA_XIE | HPCDMA_EOX;
 625         dma_sync_desc_dev(dev, td);
 626         if (sp->tx_old != sp->tx_new) {
 627                 struct sgiseeq_tx_desc *backend;
 628
 629                 backend = &sp->tx_desc[PREV_TX(sp->tx_new)];
 630                 dma_sync_desc_cpu(dev, backend);
 631                 backend->tdma.cntinfo &= ~HPCDMA_EOX;
 632                 dma_sync_desc_dev(dev, backend);
 633         }
 634         sp->tx_new = NEXT_TX(sp->tx_new); /* Advance. */
 635
 636         /* Maybe kick the HPC back into motion. */
 637         if (!(hregs->tx_ctrl & HPC3_ETXCTRL_ACTIVE))
 638                 kick_tx(dev, sp, hregs);
 639
 640         dev->trans_start = jiffies;
 641
 642         if (!TX_BUFFS_AVAIL(sp))
 643                 netif_stop_queue(dev);
 644         spin_unlock_irqrestore(&sp->tx_lock, flags);
 645
 646         return 0;
 647 }
 648
 649 static void timeout(struct net_device *dev)
 650 {
 651         printk(KERN_NOTICE "%s: transmit timed out, resetting\n", dev->name);
 652         sgiseeq_reset(dev);
 653
 654         dev->trans_start = jiffies;
 655         netif_wake_queue(dev);
 656 }
 657
 658 static void sgiseeq_set_multicast(struct net_device *dev)
 659 {
 660         struct sgiseeq_private *sp = (struct sgiseeq_private *) dev->priv;
 661         unsigned char oldmode = sp->mode;
 662
 663         if(dev->flags & IFF_PROMISC)
 664                 sp->mode = SEEQ_RCMD_RANY;
 665         else if ((dev->flags & IFF_ALLMULTI) || dev->mc_count)
 666                 sp->mode = SEEQ_RCMD_RBMCAST;
 667         else
 668                 sp->mode = SEEQ_RCMD_RBCAST;
 669
 670         /* XXX I know this sucks, but is there a better way to reprogram
 671          * XXX the receiver? At least, this shouldn't happen too often.
 672          */
 673
 674         if (oldmode != sp->mode)
 675                 sgiseeq_reset(dev);
 676 }
 677
 678 static inline void setup_tx_ring(struct net_device *dev,
 679                                  struct sgiseeq_tx_desc *buf,
 680                                  int nbufs)
 681 {
 682         struct sgiseeq_private *sp = netdev_priv(dev);
 683         int i = 0;
 684
 685         while (i < (nbufs - 1)) {
 686                 buf[i].tdma.pnext = VIRT_TO_DMA(sp, buf + i + 1);
 687                 buf[i].tdma.pbuf = 0;
 688                 dma_sync_desc_dev(dev, &buf[i]);
 689                 i++;
 690         }
 691         buf[i].tdma.pnext = VIRT_TO_DMA(sp, buf);
 692         dma_sync_desc_dev(dev, &buf[i]);
 693 }
 694
 695 static inline void setup_rx_ring(struct net_device *dev,
 696                                  struct sgiseeq_rx_desc *buf,
 697                                  int nbufs)
 698 {
 699         struct sgiseeq_private *sp = netdev_priv(dev);
 700         int i = 0;
 701
 702         while (i < (nbufs - 1)) {
 703                 buf[i].rdma.pnext = VIRT_TO_DMA(sp, buf + i + 1);
 704                 buf[i].rdma.pbuf = 0;
 705                 dma_sync_desc_dev(dev, &buf[i]);
 706                 i++;
 707         }
 708         buf[i].rdma.pbuf = 0;
 709         buf[i].rdma.pnext = VIRT_TO_DMA(sp, buf);
 710         dma_sync_desc_dev(dev, &buf[i]);
 711 }
 712
 713 static int __init sgiseeq_probe(struct platform_device *pdev)
 714 {
 715         struct sgiseeq_platform_data *pd = pdev->dev.platform_data;
 716         struct hpc3_regs *hpcregs = pd->hpc;
 717         struct sgiseeq_init_block *sr;
 718         unsigned int irq = pd->irq;
 719         struct sgiseeq_private *sp;
 720         struct net_device *dev;
 721         int err;
 722         DECLARE_MAC_BUF(mac);
 723
 724         dev = alloc_etherdev(sizeof (struct sgiseeq_private));
 725         if (!dev) {
 726                 printk(KERN_ERR "Sgiseeq: Etherdev alloc failed, aborting.\n");
 727                 err = -ENOMEM;
 728                 goto err_out;
 729         }
 730
 731         platform_set_drvdata(pdev, dev);
 732         sp = netdev_priv(dev);
 733
 734         /* Make private data page aligned */
 735         sr = dma_alloc_noncoherent(&pdev->dev, sizeof(*sp->srings),
 736                                 &sp->srings_dma, GFP_KERNEL);
 737         if (!sr) {
 738                 printk(KERN_ERR "Sgiseeq: Page alloc failed, aborting.\n");
 739                 err = -ENOMEM;
 740                 goto err_out_free_dev;
 741         }
 742         sp->srings = sr;
 743         sp->rx_desc = sp->srings->rxvector;
 744         sp->tx_desc = sp->srings->txvector;
 745
 746         /* A couple calculations now, saves many cycles later. */
 747         setup_rx_ring(dev, sp->rx_desc, SEEQ_RX_BUFFERS);
 748         setup_tx_ring(dev, sp->tx_desc, SEEQ_TX_BUFFERS);
 749
 750         memcpy(dev->dev_addr, pd->mac, ETH_ALEN);
 751
 752 #ifdef DEBUG
 753         gpriv = sp;
 754         gdev = dev;
 755 #endif
 756         sp->sregs = (struct sgiseeq_regs *) &hpcregs->eth_ext[0];
 757         sp->hregs = &hpcregs->ethregs;
 758         sp->name = sgiseeqstr;
 759         sp->mode = SEEQ_RCMD_RBCAST;
 760
 761         /* Setup PIO and DMA transfer timing */
 762         sp->hregs->pconfig = 0x161;
 763         sp->hregs->dconfig = HPC3_EDCFG_FIRQ | HPC3_EDCFG_FEOP |
 764                              HPC3_EDCFG_FRXDC | HPC3_EDCFG_PTO | 0x026;
 765
 766         /* Setup PIO and DMA transfer timing */
 767         sp->hregs->pconfig = 0x161;
 768         sp->hregs->dconfig = HPC3_EDCFG_FIRQ | HPC3_EDCFG_FEOP |
 769                              HPC3_EDCFG_FRXDC | HPC3_EDCFG_PTO | 0x026;
 770
 771         /* Reset the chip. */
 772         hpc3_eth_reset(sp->hregs);
 773
 774         sp->is_edlc = !(sp->sregs->rw.rregs.collision_tx[0] & 0xff);
 775         if (sp->is_edlc)
 776                 sp->control = SEEQ_CTRL_XCNT | SEEQ_CTRL_ACCNT |
 777                               SEEQ_CTRL_SFLAG | SEEQ_CTRL_ESHORT |
 778                               SEEQ_CTRL_ENCARR;
 779
 780         dev->open               = sgiseeq_open;
 781         dev->stop               = sgiseeq_close;
 782         dev->hard_start_xmit    = sgiseeq_start_xmit;
 783         dev->tx_timeout         = timeout;
 784         dev->watchdog_timeo     = (200 * HZ) / 1000;
 785         dev->set_multicast_list = sgiseeq_set_multicast;
 786         dev->set_mac_address    = sgiseeq_set_mac_address;
 787         dev->irq                = irq;
 788
 789         if (register_netdev(dev)) {
 790                 printk(KERN_ERR "Sgiseeq: Cannot register net device, "
 791                        "aborting.\n");
 792                 err = -ENODEV;
 793                 goto err_out_free_page;
 794         }
 795
 796         printk(KERN_INFO "%s: %s %s\n",
 797                dev->name, sgiseeqstr, print_mac(mac, dev->dev_addr));
 798
 799         return 0;
 800
 801 err_out_free_page:
 802         free_page((unsigned long) sp->srings);
 803 err_out_free_dev:
 804         kfree(dev);
 805
 806 err_out:
 807         return err;
 808 }
 809
 810 static int __exit sgiseeq_remove(struct platform_device *pdev)
 811 {
 812         struct net_device *dev = platform_get_drvdata(pdev);
 813         struct sgiseeq_private *sp = netdev_priv(dev);
 814
 815         unregister_netdev(dev);
 816         dma_free_noncoherent(&pdev->dev, sizeof(*sp->srings), sp->srings,
 817                              sp->srings_dma);
 818         free_netdev(dev);
 819         platform_set_drvdata(pdev, NULL);
 820
 821         return 0;
 822 }
 823
 824 static struct platform_driver sgiseeq_driver = {
 825         .probe  = sgiseeq_probe,
 826         .remove = __devexit_p(sgiseeq_remove),
 827         .driver = {
 828                 .name   = "sgiseeq",
 829                 .owner  = THIS_MODULE,
 830         }
 831 };
 832
 833 static int __init sgiseeq_module_init(void)
 834 {
 835         if (platform_driver_register(&sgiseeq_driver)) {
 836                 printk(KERN_ERR "Driver registration failed\n");
 837                 return -ENODEV;
 838         }
 839
 840         return 0;
 841 }
 842
 843 static void __exit sgiseeq_module_exit(void)
 844 {
 845         platform_driver_unregister(&sgiseeq_driver);
 846 }
 847
 848 module_init(sgiseeq_module_init);
 849 module_exit(sgiseeq_module_exit);
 850
 851 MODULE_DESCRIPTION("SGI Seeq 8003 driver");
 852 MODULE_AUTHOR("Linux/MIPS Mailing List <linux-mips@linux-mips.org>");
 853 MODULE_LICENSE("GPL");
 854 MODULE_ALIAS("platform:sgiseeq");