git.oblomov.eu Git - linux-2.6/blob - drivers/net/sonic.c

   1 /*
   2  * sonic.c
   3  *
   4  * (C) 2005 Finn Thain
   5  *
   6  * Converted to DMA API, added zero-copy buffer handling, and
   7  * (from the mac68k project) introduced dhd's support for 16-bit cards.
   8  *
   9  * (C) 1996,1998 by Thomas Bogendoerfer (tsbogend@alpha.franken.de)
  10  *
  11  * This driver is based on work from Andreas Busse, but most of
  12  * the code is rewritten.
  13  *
  14  * (C) 1995 by Andreas Busse (andy@waldorf-gmbh.de)
  15  *
  16  *    Core code included by system sonic drivers
  17  *
  18  * And... partially rewritten again by David Huggins-Daines in order
  19  * to cope with screwed up Macintosh NICs that may or may not use
  20  * 16-bit DMA.
  21  *
  22  * (C) 1999 David Huggins-Daines <dhd@debian.org>
  23  *
  24  */
  25
  26 /*
  27  * Sources: Olivetti M700-10 Risc Personal Computer hardware handbook,
  28  * National Semiconductors data sheet for the DP83932B Sonic Ethernet
  29  * controller, and the files "8390.c" and "skeleton.c" in this directory.
  30  *
  31  * Additional sources: Nat Semi data sheet for the DP83932C and Nat Semi
  32  * Application Note AN-746, the files "lance.c" and "ibmlana.c". See also
  33  * the NetBSD file "sys/arch/mac68k/dev/if_sn.c".
  34  */
  35
  36
  37
  38 /*
  39  * Open/initialize the SONIC controller.
  40  *
  41  * This routine should set everything up anew at each open, even
  42  *  registers that "should" only need to be set once at boot, so that
  43  *  there is non-reboot way to recover if something goes wrong.
  44  */
  45 static int sonic_open(struct net_device *dev)
  46 {
  47         struct sonic_local *lp = netdev_priv(dev);
  48         int i;
  49
  50         if (sonic_debug > 2)
  51                 printk("sonic_open: initializing sonic driver.\n");
  52
  53         for (i = 0; i < SONIC_NUM_RRS; i++) {
  54                 struct sk_buff *skb = dev_alloc_skb(SONIC_RBSIZE + 2);
  55                 if (skb == NULL) {
  56                         while(i > 0) { /* free any that were allocated successfully */
  57                                 i--;
  58                                 dev_kfree_skb(lp->rx_skb[i]);
  59                                 lp->rx_skb[i] = NULL;
  60                         }
  61                         printk(KERN_ERR "%s: couldn't allocate receive buffers\n",
  62                                dev->name);
  63                         return -ENOMEM;
  64                 }
  65                 /* align IP header unless DMA requires otherwise */
  66                 if (SONIC_BUS_SCALE(lp->dma_bitmode) == 2)
  67                         skb_reserve(skb, 2);
  68                 lp->rx_skb[i] = skb;
  69         }
  70
  71         for (i = 0; i < SONIC_NUM_RRS; i++) {
  72                 dma_addr_t laddr = dma_map_single(lp->device, skb_put(lp->rx_skb[i], SONIC_RBSIZE),
  73                                                   SONIC_RBSIZE, DMA_FROM_DEVICE);
  74                 if (!laddr) {
  75                         while(i > 0) { /* free any that were mapped successfully */
  76                                 i--;
  77                                 dma_unmap_single(lp->device, lp->rx_laddr[i], SONIC_RBSIZE, DMA_FROM_DEVICE);
  78                                 lp->rx_laddr[i] = (dma_addr_t)0;
  79                         }
  80                         for (i = 0; i < SONIC_NUM_RRS; i++) {
  81                                 dev_kfree_skb(lp->rx_skb[i]);
  82                                 lp->rx_skb[i] = NULL;
  83                         }
  84                         printk(KERN_ERR "%s: couldn't map rx DMA buffers\n",
  85                                dev->name);
  86                         return -ENOMEM;
  87                 }
  88                 lp->rx_laddr[i] = laddr;
  89         }
  90
  91         /*
  92          * Initialize the SONIC
  93          */
  94         sonic_init(dev);
  95
  96         netif_start_queue(dev);
  97
  98         if (sonic_debug > 2)
  99                 printk("sonic_open: Initialization done.\n");
 100
 101         return 0;
 102 }
 103
 104
 105 /*
 106  * Close the SONIC device
 107  */
 108 static int sonic_close(struct net_device *dev)
 109 {
 110         struct sonic_local *lp = netdev_priv(dev);
 111         int i;
 112
 113         if (sonic_debug > 2)
 114                 printk("sonic_close\n");
 115
 116         netif_stop_queue(dev);
 117
 118         /*
 119          * stop the SONIC, disable interrupts
 120          */
 121         SONIC_WRITE(SONIC_IMR, 0);
 122         SONIC_WRITE(SONIC_ISR, 0x7fff);
 123         SONIC_WRITE(SONIC_CMD, SONIC_CR_RST);
 124
 125         /* unmap and free skbs that haven't been transmitted */
 126         for (i = 0; i < SONIC_NUM_TDS; i++) {
 127                 if(lp->tx_laddr[i]) {
 128                         dma_unmap_single(lp->device, lp->tx_laddr[i], lp->tx_len[i], DMA_TO_DEVICE);
 129                         lp->tx_laddr[i] = (dma_addr_t)0;
 130                 }
 131                 if(lp->tx_skb[i]) {
 132                         dev_kfree_skb(lp->tx_skb[i]);
 133                         lp->tx_skb[i] = NULL;
 134                 }
 135         }
 136
 137         /* unmap and free the receive buffers */
 138         for (i = 0; i < SONIC_NUM_RRS; i++) {
 139                 if(lp->rx_laddr[i]) {
 140                         dma_unmap_single(lp->device, lp->rx_laddr[i], SONIC_RBSIZE, DMA_FROM_DEVICE);
 141                         lp->rx_laddr[i] = (dma_addr_t)0;
 142                 }
 143                 if(lp->rx_skb[i]) {
 144                         dev_kfree_skb(lp->rx_skb[i]);
 145                         lp->rx_skb[i] = NULL;
 146                 }
 147         }
 148
 149         return 0;
 150 }
 151
 152 static void sonic_tx_timeout(struct net_device *dev)
 153 {
 154         struct sonic_local *lp = netdev_priv(dev);
 155         int i;
 156         /*
 157          * put the Sonic into software-reset mode and
 158          * disable all interrupts before releasing DMA buffers
 159          */
 160         SONIC_WRITE(SONIC_IMR, 0);
 161         SONIC_WRITE(SONIC_ISR, 0x7fff);
 162         SONIC_WRITE(SONIC_CMD, SONIC_CR_RST);
 163         /* We could resend the original skbs. Easier to re-initialise. */
 164         for (i = 0; i < SONIC_NUM_TDS; i++) {
 165                 if(lp->tx_laddr[i]) {
 166                         dma_unmap_single(lp->device, lp->tx_laddr[i], lp->tx_len[i], DMA_TO_DEVICE);
 167                         lp->tx_laddr[i] = (dma_addr_t)0;
 168                 }
 169                 if(lp->tx_skb[i]) {
 170                         dev_kfree_skb(lp->tx_skb[i]);
 171                         lp->tx_skb[i] = NULL;
 172                 }
 173         }
 174         /* Try to restart the adaptor. */
 175         sonic_init(dev);
 176         lp->stats.tx_errors++;
 177         dev->trans_start = jiffies;
 178         netif_wake_queue(dev);
 179 }
 180
 181 /*
 182  * transmit packet
 183  *
 184  * Appends new TD during transmission thus avoiding any TX interrupts
 185  * until we run out of TDs.
 186  * This routine interacts closely with the ISR in that it may,
 187  *   set tx_skb[i]
 188  *   reset the status flags of the new TD
 189  *   set and reset EOL flags
 190  *   stop the tx queue
 191  * The ISR interacts with this routine in various ways. It may,
 192  *   reset tx_skb[i]
 193  *   test the EOL and status flags of the TDs
 194  *   wake the tx queue
 195  * Concurrently with all of this, the SONIC is potentially writing to
 196  * the status flags of the TDs.
 197  * Until some mutual exclusion is added, this code will not work with SMP. However,
 198  * MIPS Jazz machines and m68k Macs were all uni-processor machines.
 199  */
 200
 201 static int sonic_send_packet(struct sk_buff *skb, struct net_device *dev)
 202 {
 203         struct sonic_local *lp = netdev_priv(dev);
 204         dma_addr_t laddr;
 205         int length;
 206         int entry = lp->next_tx;
 207
 208         if (sonic_debug > 2)
 209                 printk("sonic_send_packet: skb=%p, dev=%p\n", skb, dev);
 210
 211         length = skb->len;
 212         if (length < ETH_ZLEN) {
 213                 if (skb_padto(skb, ETH_ZLEN))
 214                         return 0;
 215                 length = ETH_ZLEN;
 216         }
 217
 218         /*
 219          * Map the packet data into the logical DMA address space
 220          */
 221
 222         laddr = dma_map_single(lp->device, skb->data, length, DMA_TO_DEVICE);
 223         if (!laddr) {
 224                 printk(KERN_ERR "%s: failed to map tx DMA buffer.\n", dev->name);
 225                 dev_kfree_skb(skb);
 226                 return 1;
 227         }
 228
 229         sonic_tda_put(dev, entry, SONIC_TD_STATUS, 0);       /* clear status */
 230         sonic_tda_put(dev, entry, SONIC_TD_FRAG_COUNT, 1);   /* single fragment */
 231         sonic_tda_put(dev, entry, SONIC_TD_PKTSIZE, length); /* length of packet */
 232         sonic_tda_put(dev, entry, SONIC_TD_FRAG_PTR_L, laddr & 0xffff);
 233         sonic_tda_put(dev, entry, SONIC_TD_FRAG_PTR_H, laddr >> 16);
 234         sonic_tda_put(dev, entry, SONIC_TD_FRAG_SIZE, length);
 235         sonic_tda_put(dev, entry, SONIC_TD_LINK,
 236                 sonic_tda_get(dev, entry, SONIC_TD_LINK) | SONIC_EOL);
 237
 238         /*
 239          * Must set tx_skb[entry] only after clearing status, and
 240          * before clearing EOL and before stopping queue
 241          */
 242         wmb();
 243         lp->tx_len[entry] = length;
 244         lp->tx_laddr[entry] = laddr;
 245         lp->tx_skb[entry] = skb;
 246
 247         wmb();
 248         sonic_tda_put(dev, lp->eol_tx, SONIC_TD_LINK,
 249                                   sonic_tda_get(dev, lp->eol_tx, SONIC_TD_LINK) & ~SONIC_EOL);
 250         lp->eol_tx = entry;
 251
 252         lp->next_tx = (entry + 1) & SONIC_TDS_MASK;
 253         if (lp->tx_skb[lp->next_tx] != NULL) {
 254                 /* The ring is full, the ISR has yet to process the next TD. */
 255                 if (sonic_debug > 3)
 256                         printk("%s: stopping queue\n", dev->name);
 257                 netif_stop_queue(dev);
 258                 /* after this packet, wait for ISR to free up some TDAs */
 259         } else netif_start_queue(dev);
 260
 261         if (sonic_debug > 2)
 262                 printk("sonic_send_packet: issuing Tx command\n");
 263
 264         SONIC_WRITE(SONIC_CMD, SONIC_CR_TXP);
 265
 266         dev->trans_start = jiffies;
 267
 268         return 0;
 269 }
 270
 271 /*
 272  * The typical workload of the driver:
 273  * Handle the network interface interrupts.
 274  */
 275 static irqreturn_t sonic_interrupt(int irq, void *dev_id)
 276 {
 277         struct net_device *dev = dev_id;
 278         struct sonic_local *lp = netdev_priv(dev);
 279         int status;
 280
 281         if (!(status = SONIC_READ(SONIC_ISR) & SONIC_IMR_DEFAULT))
 282                 return IRQ_NONE;
 283
 284         do {
 285                 if (status & SONIC_INT_PKTRX) {
 286                         if (sonic_debug > 2)
 287                                 printk("%s: packet rx\n", dev->name);
 288                         sonic_rx(dev);  /* got packet(s) */
 289                         SONIC_WRITE(SONIC_ISR, SONIC_INT_PKTRX); /* clear the interrupt */
 290                 }
 291
 292                 if (status & SONIC_INT_TXDN) {
 293                         int entry = lp->cur_tx;
 294                         int td_status;
 295                         int freed_some = 0;
 296
 297                         /* At this point, cur_tx is the index of a TD that is one of:
 298                          *   unallocated/freed                          (status set   & tx_skb[entry] clear)
 299                          *   allocated and sent                         (status set   & tx_skb[entry] set  )
 300                          *   allocated and not yet sent                 (status clear & tx_skb[entry] set  )
 301                          *   still being allocated by sonic_send_packet (status clear & tx_skb[entry] clear)
 302                          */
 303
 304                         if (sonic_debug > 2)
 305                                 printk("%s: tx done\n", dev->name);
 306
 307                         while (lp->tx_skb[entry] != NULL) {
 308                                 if ((td_status = sonic_tda_get(dev, entry, SONIC_TD_STATUS)) == 0)
 309                                         break;
 310
 311                                 if (td_status & 0x0001) {
 312                                         lp->stats.tx_packets++;
 313                                         lp->stats.tx_bytes += sonic_tda_get(dev, entry, SONIC_TD_PKTSIZE);
 314                                 } else {
 315                                         lp->stats.tx_errors++;
 316                                         if (td_status & 0x0642)
 317                                                 lp->stats.tx_aborted_errors++;
 318                                         if (td_status & 0x0180)
 319                                                 lp->stats.tx_carrier_errors++;
 320                                         if (td_status & 0x0020)
 321                                                 lp->stats.tx_window_errors++;
 322                                         if (td_status & 0x0004)
 323                                                 lp->stats.tx_fifo_errors++;
 324                                 }
 325
 326                                 /* We must free the original skb */
 327                                 dev_kfree_skb_irq(lp->tx_skb[entry]);
 328                                 lp->tx_skb[entry] = NULL;
 329                                 /* and unmap DMA buffer */
 330                                 dma_unmap_single(lp->device, lp->tx_laddr[entry], lp->tx_len[entry], DMA_TO_DEVICE);
 331                                 lp->tx_laddr[entry] = (dma_addr_t)0;
 332                                 freed_some = 1;
 333
 334                                 if (sonic_tda_get(dev, entry, SONIC_TD_LINK) & SONIC_EOL) {
 335                                         entry = (entry + 1) & SONIC_TDS_MASK;
 336                                         break;
 337                                 }
 338                                 entry = (entry + 1) & SONIC_TDS_MASK;
 339                         }
 340
 341                         if (freed_some || lp->tx_skb[entry] == NULL)
 342                                 netif_wake_queue(dev);  /* The ring is no longer full */
 343                         lp->cur_tx = entry;
 344                         SONIC_WRITE(SONIC_ISR, SONIC_INT_TXDN); /* clear the interrupt */
 345                 }
 346
 347                 /*
 348                  * check error conditions
 349                  */
 350                 if (status & SONIC_INT_RFO) {
 351                         if (sonic_debug > 1)
 352                                 printk("%s: rx fifo overrun\n", dev->name);
 353                         lp->stats.rx_fifo_errors++;
 354                         SONIC_WRITE(SONIC_ISR, SONIC_INT_RFO); /* clear the interrupt */
 355                 }
 356                 if (status & SONIC_INT_RDE) {
 357                         if (sonic_debug > 1)
 358                                 printk("%s: rx descriptors exhausted\n", dev->name);
 359                         lp->stats.rx_dropped++;
 360                         SONIC_WRITE(SONIC_ISR, SONIC_INT_RDE); /* clear the interrupt */
 361                 }
 362                 if (status & SONIC_INT_RBAE) {
 363                         if (sonic_debug > 1)
 364                                 printk("%s: rx buffer area exceeded\n", dev->name);
 365                         lp->stats.rx_dropped++;
 366                         SONIC_WRITE(SONIC_ISR, SONIC_INT_RBAE); /* clear the interrupt */
 367                 }
 368
 369                 /* counter overruns; all counters are 16bit wide */
 370                 if (status & SONIC_INT_FAE) {
 371                         lp->stats.rx_frame_errors += 65536;
 372                         SONIC_WRITE(SONIC_ISR, SONIC_INT_FAE); /* clear the interrupt */
 373                 }
 374                 if (status & SONIC_INT_CRC) {
 375                         lp->stats.rx_crc_errors += 65536;
 376                         SONIC_WRITE(SONIC_ISR, SONIC_INT_CRC); /* clear the interrupt */
 377                 }
 378                 if (status & SONIC_INT_MP) {
 379                         lp->stats.rx_missed_errors += 65536;
 380                         SONIC_WRITE(SONIC_ISR, SONIC_INT_MP); /* clear the interrupt */
 381                 }
 382
 383                 /* transmit error */
 384                 if (status & SONIC_INT_TXER) {
 385                         if ((SONIC_READ(SONIC_TCR) & SONIC_TCR_FU) && (sonic_debug > 2))
 386                                 printk(KERN_ERR "%s: tx fifo underrun\n", dev->name);
 387                         SONIC_WRITE(SONIC_ISR, SONIC_INT_TXER); /* clear the interrupt */
 388                 }
 389
 390                 /* bus retry */
 391                 if (status & SONIC_INT_BR) {
 392                         printk(KERN_ERR "%s: Bus retry occurred! Device interrupt disabled.\n",
 393                                 dev->name);
 394                         /* ... to help debug DMA problems causing endless interrupts. */
 395                         /* Bounce the eth interface to turn on the interrupt again. */
 396                         SONIC_WRITE(SONIC_IMR, 0);
 397                         SONIC_WRITE(SONIC_ISR, SONIC_INT_BR); /* clear the interrupt */
 398                 }
 399
 400                 /* load CAM done */
 401                 if (status & SONIC_INT_LCD)
 402                         SONIC_WRITE(SONIC_ISR, SONIC_INT_LCD); /* clear the interrupt */
 403         } while((status = SONIC_READ(SONIC_ISR) & SONIC_IMR_DEFAULT));
 404         return IRQ_HANDLED;
 405 }
 406
 407 /*
 408  * We have a good packet(s), pass it/them up the network stack.
 409  */
 410 static void sonic_rx(struct net_device *dev)
 411 {
 412         struct sonic_local *lp = netdev_priv(dev);
 413         int status;
 414         int entry = lp->cur_rx;
 415
 416         while (sonic_rda_get(dev, entry, SONIC_RD_IN_USE) == 0) {
 417                 struct sk_buff *used_skb;
 418                 struct sk_buff *new_skb;
 419                 dma_addr_t new_laddr;
 420                 u16 bufadr_l;
 421                 u16 bufadr_h;
 422                 int pkt_len;
 423
 424                 status = sonic_rda_get(dev, entry, SONIC_RD_STATUS);
 425                 if (status & SONIC_RCR_PRX) {
 426                         /* Malloc up new buffer. */
 427                         new_skb = dev_alloc_skb(SONIC_RBSIZE + 2);
 428                         if (new_skb == NULL) {
 429                                 printk(KERN_ERR "%s: Memory squeeze, dropping packet.\n", dev->name);
 430                                 lp->stats.rx_dropped++;
 431                                 break;
 432                         }
 433                         /* provide 16 byte IP header alignment unless DMA requires otherwise */
 434                         if(SONIC_BUS_SCALE(lp->dma_bitmode) == 2)
 435                                 skb_reserve(new_skb, 2);
 436
 437                         new_laddr = dma_map_single(lp->device, skb_put(new_skb, SONIC_RBSIZE),
 438                                                SONIC_RBSIZE, DMA_FROM_DEVICE);
 439                         if (!new_laddr) {
 440                                 dev_kfree_skb(new_skb);
 441                                 printk(KERN_ERR "%s: Failed to map rx buffer, dropping packet.\n", dev->name);
 442                                 lp->stats.rx_dropped++;
 443                                 break;
 444                         }
 445
 446                         /* now we have a new skb to replace it, pass the used one up the stack */
 447                         dma_unmap_single(lp->device, lp->rx_laddr[entry], SONIC_RBSIZE, DMA_FROM_DEVICE);
 448                         used_skb = lp->rx_skb[entry];
 449                         pkt_len = sonic_rda_get(dev, entry, SONIC_RD_PKTLEN);
 450                         skb_trim(used_skb, pkt_len);
 451                         used_skb->protocol = eth_type_trans(used_skb, dev);
 452                         netif_rx(used_skb);
 453                         lp->stats.rx_packets++;
 454                         lp->stats.rx_bytes += pkt_len;
 455
 456                         /* and insert the new skb */
 457                         lp->rx_laddr[entry] = new_laddr;
 458                         lp->rx_skb[entry] = new_skb;
 459
 460                         bufadr_l = (unsigned long)new_laddr & 0xffff;
 461                         bufadr_h = (unsigned long)new_laddr >> 16;
 462                         sonic_rra_put(dev, entry, SONIC_RR_BUFADR_L, bufadr_l);
 463                         sonic_rra_put(dev, entry, SONIC_RR_BUFADR_H, bufadr_h);
 464                 } else {
 465                         /* This should only happen, if we enable accepting broken packets. */
 466                         lp->stats.rx_errors++;
 467                         if (status & SONIC_RCR_FAER)
 468                                 lp->stats.rx_frame_errors++;
 469                         if (status & SONIC_RCR_CRCR)
 470                                 lp->stats.rx_crc_errors++;
 471                 }
 472                 if (status & SONIC_RCR_LPKT) {
 473                         /*
 474                          * this was the last packet out of the current receive buffer
 475                          * give the buffer back to the SONIC
 476                          */
 477                         lp->cur_rwp += SIZEOF_SONIC_RR * SONIC_BUS_SCALE(lp->dma_bitmode);
 478                         if (lp->cur_rwp >= lp->rra_end) lp->cur_rwp = lp->rra_laddr & 0xffff;
 479                         SONIC_WRITE(SONIC_RWP, lp->cur_rwp);
 480                         if (SONIC_READ(SONIC_ISR) & SONIC_INT_RBE) {
 481                                 if (sonic_debug > 2)
 482                                         printk("%s: rx buffer exhausted\n", dev->name);
 483                                 SONIC_WRITE(SONIC_ISR, SONIC_INT_RBE); /* clear the flag */
 484                         }
 485                 } else
 486                         printk(KERN_ERR "%s: rx desc without RCR_LPKT. Shouldn't happen !?\n",
 487                              dev->name);
 488                 /*
 489                  * give back the descriptor
 490                  */
 491                 sonic_rda_put(dev, entry, SONIC_RD_LINK,
 492                         sonic_rda_get(dev, entry, SONIC_RD_LINK) | SONIC_EOL);
 493                 sonic_rda_put(dev, entry, SONIC_RD_IN_USE, 1);
 494                 sonic_rda_put(dev, lp->eol_rx, SONIC_RD_LINK,
 495                         sonic_rda_get(dev, lp->eol_rx, SONIC_RD_LINK) & ~SONIC_EOL);
 496                 lp->eol_rx = entry;
 497                 lp->cur_rx = entry = (entry + 1) & SONIC_RDS_MASK;
 498         }
 499         /*
 500          * If any worth-while packets have been received, netif_rx()
 501          * has done a mark_bh(NET_BH) for us and will work on them
 502          * when we get to the bottom-half routine.
 503          */
 504 }
 505
 506
 507 /*
 508  * Get the current statistics.
 509  * This may be called with the device open or closed.
 510  */
 511 static struct net_device_stats *sonic_get_stats(struct net_device *dev)
 512 {
 513         struct sonic_local *lp = netdev_priv(dev);
 514
 515         /* read the tally counter from the SONIC and reset them */
 516         lp->stats.rx_crc_errors += SONIC_READ(SONIC_CRCT);
 517         SONIC_WRITE(SONIC_CRCT, 0xffff);
 518         lp->stats.rx_frame_errors += SONIC_READ(SONIC_FAET);
 519         SONIC_WRITE(SONIC_FAET, 0xffff);
 520         lp->stats.rx_missed_errors += SONIC_READ(SONIC_MPT);
 521         SONIC_WRITE(SONIC_MPT, 0xffff);
 522
 523         return &lp->stats;
 524 }
 525
 526
 527 /*
 528  * Set or clear the multicast filter for this adaptor.
 529  */
 530 static void sonic_multicast_list(struct net_device *dev)
 531 {
 532         struct sonic_local *lp = netdev_priv(dev);
 533         unsigned int rcr;
 534         struct dev_mc_list *dmi = dev->mc_list;
 535         unsigned char *addr;
 536         int i;
 537
 538         rcr = SONIC_READ(SONIC_RCR) & ~(SONIC_RCR_PRO | SONIC_RCR_AMC);
 539         rcr |= SONIC_RCR_BRD;   /* accept broadcast packets */
 540
 541         if (dev->flags & IFF_PROMISC) { /* set promiscuous mode */
 542                 rcr |= SONIC_RCR_PRO;
 543         } else {
 544                 if ((dev->flags & IFF_ALLMULTI) || (dev->mc_count > 15)) {
 545                         rcr |= SONIC_RCR_AMC;
 546                 } else {
 547                         if (sonic_debug > 2)
 548                                 printk("sonic_multicast_list: mc_count %d\n", dev->mc_count);
 549                         sonic_set_cam_enable(dev, 1);  /* always enable our own address */
 550                         for (i = 1; i <= dev->mc_count; i++) {
 551                                 addr = dmi->dmi_addr;
 552                                 dmi = dmi->next;
 553                                 sonic_cda_put(dev, i, SONIC_CD_CAP0, addr[1] << 8 | addr[0]);
 554                                 sonic_cda_put(dev, i, SONIC_CD_CAP1, addr[3] << 8 | addr[2]);
 555                                 sonic_cda_put(dev, i, SONIC_CD_CAP2, addr[5] << 8 | addr[4]);
 556                                 sonic_set_cam_enable(dev, sonic_get_cam_enable(dev) | (1 << i));
 557                         }
 558                         SONIC_WRITE(SONIC_CDC, 16);
 559                         /* issue Load CAM command */
 560                         SONIC_WRITE(SONIC_CDP, lp->cda_laddr & 0xffff);
 561                         SONIC_WRITE(SONIC_CMD, SONIC_CR_LCAM);
 562                 }
 563         }
 564
 565         if (sonic_debug > 2)
 566                 printk("sonic_multicast_list: setting RCR=%x\n", rcr);
 567
 568         SONIC_WRITE(SONIC_RCR, rcr);
 569 }
 570
 571
 572 /*
 573  * Initialize the SONIC ethernet controller.
 574  */
 575 static int sonic_init(struct net_device *dev)
 576 {
 577         unsigned int cmd;
 578         struct sonic_local *lp = netdev_priv(dev);
 579         int i;
 580
 581         /*
 582          * put the Sonic into software-reset mode and
 583          * disable all interrupts
 584          */
 585         SONIC_WRITE(SONIC_IMR, 0);
 586         SONIC_WRITE(SONIC_ISR, 0x7fff);
 587         SONIC_WRITE(SONIC_CMD, SONIC_CR_RST);
 588
 589         /*
 590          * clear software reset flag, disable receiver, clear and
 591          * enable interrupts, then completely initialize the SONIC
 592          */
 593         SONIC_WRITE(SONIC_CMD, 0);
 594         SONIC_WRITE(SONIC_CMD, SONIC_CR_RXDIS);
 595
 596         /*
 597          * initialize the receive resource area
 598          */
 599         if (sonic_debug > 2)
 600                 printk("sonic_init: initialize receive resource area\n");
 601
 602         for (i = 0; i < SONIC_NUM_RRS; i++) {
 603                 u16 bufadr_l = (unsigned long)lp->rx_laddr[i] & 0xffff;
 604                 u16 bufadr_h = (unsigned long)lp->rx_laddr[i] >> 16;
 605                 sonic_rra_put(dev, i, SONIC_RR_BUFADR_L, bufadr_l);
 606                 sonic_rra_put(dev, i, SONIC_RR_BUFADR_H, bufadr_h);
 607                 sonic_rra_put(dev, i, SONIC_RR_BUFSIZE_L, SONIC_RBSIZE >> 1);
 608                 sonic_rra_put(dev, i, SONIC_RR_BUFSIZE_H, 0);
 609         }
 610
 611         /* initialize all RRA registers */
 612         lp->rra_end = (lp->rra_laddr + SONIC_NUM_RRS * SIZEOF_SONIC_RR *
 613                                         SONIC_BUS_SCALE(lp->dma_bitmode)) & 0xffff;
 614         lp->cur_rwp = (lp->rra_laddr + (SONIC_NUM_RRS - 1) * SIZEOF_SONIC_RR *
 615                                         SONIC_BUS_SCALE(lp->dma_bitmode)) & 0xffff;
 616
 617         SONIC_WRITE(SONIC_RSA, lp->rra_laddr & 0xffff);
 618         SONIC_WRITE(SONIC_REA, lp->rra_end);
 619         SONIC_WRITE(SONIC_RRP, lp->rra_laddr & 0xffff);
 620         SONIC_WRITE(SONIC_RWP, lp->cur_rwp);
 621         SONIC_WRITE(SONIC_URRA, lp->rra_laddr >> 16);
 622         SONIC_WRITE(SONIC_EOBC, (SONIC_RBSIZE >> 1) - (lp->dma_bitmode ? 2 : 1));
 623
 624         /* load the resource pointers */
 625         if (sonic_debug > 3)
 626                 printk("sonic_init: issuing RRRA command\n");
 627
 628         SONIC_WRITE(SONIC_CMD, SONIC_CR_RRRA);
 629         i = 0;
 630         while (i++ < 100) {
 631                 if (SONIC_READ(SONIC_CMD) & SONIC_CR_RRRA)
 632                         break;
 633         }
 634
 635         if (sonic_debug > 2)
 636                 printk("sonic_init: status=%x i=%d\n", SONIC_READ(SONIC_CMD), i);
 637
 638         /*
 639          * Initialize the receive descriptors so that they
 640          * become a circular linked list, ie. let the last
 641          * descriptor point to the first again.
 642          */
 643         if (sonic_debug > 2)
 644                 printk("sonic_init: initialize receive descriptors\n");
 645         for (i=0; i<SONIC_NUM_RDS; i++) {
 646                 sonic_rda_put(dev, i, SONIC_RD_STATUS, 0);
 647                 sonic_rda_put(dev, i, SONIC_RD_PKTLEN, 0);
 648                 sonic_rda_put(dev, i, SONIC_RD_PKTPTR_L, 0);
 649                 sonic_rda_put(dev, i, SONIC_RD_PKTPTR_H, 0);
 650                 sonic_rda_put(dev, i, SONIC_RD_SEQNO, 0);
 651                 sonic_rda_put(dev, i, SONIC_RD_IN_USE, 1);
 652                 sonic_rda_put(dev, i, SONIC_RD_LINK,
 653                         lp->rda_laddr +
 654                         ((i+1) * SIZEOF_SONIC_RD * SONIC_BUS_SCALE(lp->dma_bitmode)));
 655         }
 656         /* fix last descriptor */
 657         sonic_rda_put(dev, SONIC_NUM_RDS - 1, SONIC_RD_LINK,
 658                 (lp->rda_laddr & 0xffff) | SONIC_EOL);
 659         lp->eol_rx = SONIC_NUM_RDS - 1;
 660         lp->cur_rx = 0;
 661         SONIC_WRITE(SONIC_URDA, lp->rda_laddr >> 16);
 662         SONIC_WRITE(SONIC_CRDA, lp->rda_laddr & 0xffff);
 663
 664         /*
 665          * initialize transmit descriptors
 666          */
 667         if (sonic_debug > 2)
 668                 printk("sonic_init: initialize transmit descriptors\n");
 669         for (i = 0; i < SONIC_NUM_TDS; i++) {
 670                 sonic_tda_put(dev, i, SONIC_TD_STATUS, 0);
 671                 sonic_tda_put(dev, i, SONIC_TD_CONFIG, 0);
 672                 sonic_tda_put(dev, i, SONIC_TD_PKTSIZE, 0);
 673                 sonic_tda_put(dev, i, SONIC_TD_FRAG_COUNT, 0);
 674                 sonic_tda_put(dev, i, SONIC_TD_LINK,
 675                         (lp->tda_laddr & 0xffff) +
 676                         (i + 1) * SIZEOF_SONIC_TD * SONIC_BUS_SCALE(lp->dma_bitmode));
 677                 lp->tx_skb[i] = NULL;
 678         }
 679         /* fix last descriptor */
 680         sonic_tda_put(dev, SONIC_NUM_TDS - 1, SONIC_TD_LINK,
 681                 (lp->tda_laddr & 0xffff));
 682
 683         SONIC_WRITE(SONIC_UTDA, lp->tda_laddr >> 16);
 684         SONIC_WRITE(SONIC_CTDA, lp->tda_laddr & 0xffff);
 685         lp->cur_tx = lp->next_tx = 0;
 686         lp->eol_tx = SONIC_NUM_TDS - 1;
 687
 688         /*
 689          * put our own address to CAM desc[0]
 690          */
 691         sonic_cda_put(dev, 0, SONIC_CD_CAP0, dev->dev_addr[1] << 8 | dev->dev_addr[0]);
 692         sonic_cda_put(dev, 0, SONIC_CD_CAP1, dev->dev_addr[3] << 8 | dev->dev_addr[2]);
 693         sonic_cda_put(dev, 0, SONIC_CD_CAP2, dev->dev_addr[5] << 8 | dev->dev_addr[4]);
 694         sonic_set_cam_enable(dev, 1);
 695
 696         for (i = 0; i < 16; i++)
 697                 sonic_cda_put(dev, i, SONIC_CD_ENTRY_POINTER, i);
 698
 699         /*
 700          * initialize CAM registers
 701          */
 702         SONIC_WRITE(SONIC_CDP, lp->cda_laddr & 0xffff);
 703         SONIC_WRITE(SONIC_CDC, 16);
 704
 705         /*
 706          * load the CAM
 707          */
 708         SONIC_WRITE(SONIC_CMD, SONIC_CR_LCAM);
 709
 710         i = 0;
 711         while (i++ < 100) {
 712                 if (SONIC_READ(SONIC_ISR) & SONIC_INT_LCD)
 713                         break;
 714         }
 715         if (sonic_debug > 2) {
 716                 printk("sonic_init: CMD=%x, ISR=%x\n, i=%d",
 717                        SONIC_READ(SONIC_CMD), SONIC_READ(SONIC_ISR), i);
 718         }
 719
 720         /*
 721          * enable receiver, disable loopback
 722          * and enable all interrupts
 723          */
 724         SONIC_WRITE(SONIC_CMD, SONIC_CR_RXEN | SONIC_CR_STP);
 725         SONIC_WRITE(SONIC_RCR, SONIC_RCR_DEFAULT);
 726         SONIC_WRITE(SONIC_TCR, SONIC_TCR_DEFAULT);
 727         SONIC_WRITE(SONIC_ISR, 0x7fff);
 728         SONIC_WRITE(SONIC_IMR, SONIC_IMR_DEFAULT);
 729
 730         cmd = SONIC_READ(SONIC_CMD);
 731         if ((cmd & SONIC_CR_RXEN) == 0 || (cmd & SONIC_CR_STP) == 0)
 732                 printk(KERN_ERR "sonic_init: failed, status=%x\n", cmd);
 733
 734         if (sonic_debug > 2)
 735                 printk("sonic_init: new status=%x\n",
 736                        SONIC_READ(SONIC_CMD));
 737
 738         return 0;
 739 }
 740
 741 MODULE_LICENSE("GPL");