drivers/net/sonic.c - kernel/msm - Gitiles

 /*
  * sonic.c
  *
  * (C) 1996,1998 by Thomas Bogendoerfer (tsbogend@alpha.franken.de)
  *
  * This driver is based on work from Andreas Busse, but most of
  * the code is rewritten.
  *
  * (C) 1995 by Andreas Busse (andy@waldorf-gmbh.de)
  *
  *    Core code included by system sonic drivers
  */

 /*
  * Sources: Olivetti M700-10 Risc Personal Computer hardware handbook,
  * National Semiconductors data sheet for the DP83932B Sonic Ethernet
  * controller, and the files "8390.c" and "skeleton.c" in this directory.
  */


 /*
  * Open/initialize the SONIC controller.
  *
  * This routine should set everything up anew at each open, even
  *  registers that "should" only need to be set once at boot, so that
  *  there is non-reboot way to recover if something goes wrong.
  */
 static int sonic_open(struct net_device *dev)
 {
 	if (sonic_debug > 2)
 		printk("sonic_open: initializing sonic driver.\n");

 	/*
 	 * We don't need to deal with auto-irq stuff since we
 	 * hardwire the sonic interrupt.
 	 */
 /*
  * XXX Horrible work around:  We install sonic_interrupt as fast interrupt.
  * This means that during execution of the handler interrupt are disabled
  * covering another bug otherwise corrupting data.  This doesn't mean
  * this glue works ok under all situations.
  */
 //    if (sonic_request_irq(dev->irq, &sonic_interrupt, 0, "sonic", dev)) {
 	if (sonic_request_irq(dev->irq, &sonic_interrupt, SA_INTERRUPT,
 	                      "sonic", dev)) {
 		printk("\n%s: unable to get IRQ %d .\n", dev->name, dev->irq);
 		return -EAGAIN;
 	}

 	/*
 	 * Initialize the SONIC
 	 */
 	sonic_init(dev);

 	netif_start_queue(dev);

 	if (sonic_debug > 2)
 		printk("sonic_open: Initialization done.\n");

 	return 0;
 }


 /*
  * Close the SONIC device
  */
 static int sonic_close(struct net_device *dev)
 {
 	unsigned int base_addr = dev->base_addr;

 	if (sonic_debug > 2)
 		printk("sonic_close\n");

 	netif_stop_queue(dev);

 	/*
 	 * stop the SONIC, disable interrupts
 	 */
 	SONIC_WRITE(SONIC_ISR, 0x7fff);
 	SONIC_WRITE(SONIC_IMR, 0);
 	SONIC_WRITE(SONIC_CMD, SONIC_CR_RST);

 	sonic_free_irq(dev->irq, dev);	/* release the IRQ */

 	return 0;
 }

 static void sonic_tx_timeout(struct net_device *dev)
 {
 	struct sonic_local *lp = (struct sonic_local *) dev->priv;
 	printk("%s: transmit timed out.\n", dev->name);

 	/* Try to restart the adaptor. */
 	sonic_init(dev);
 	lp->stats.tx_errors++;
 	dev->trans_start = jiffies;
 	netif_wake_queue(dev);
 }

 /*
  * transmit packet
  */
 static int sonic_send_packet(struct sk_buff *skb, struct net_device *dev)
 {
 	struct sonic_local *lp = (struct sonic_local *) dev->priv;
 	unsigned int base_addr = dev->base_addr;
 	unsigned int laddr;
 	int entry, length;

 	netif_stop_queue(dev);

 	if (sonic_debug > 2)
 		printk("sonic_send_packet: skb=%p, dev=%p\n", skb, dev);

 	/*
 	 * Map the packet data into the logical DMA address space
 	 */
 	if ((laddr = vdma_alloc(CPHYSADDR(skb->data), skb->len)) == ~0UL) {
 		printk("%s: no VDMA entry for transmit available.\n",
 		       dev->name);
 		dev_kfree_skb(skb);
 		netif_start_queue(dev);
 		return 1;
 	}
 	entry = lp->cur_tx & SONIC_TDS_MASK;
 	lp->tx_laddr[entry] = laddr;
 	lp->tx_skb[entry] = skb;

 	length = (skb->len < ETH_ZLEN) ? ETH_ZLEN : skb->len;
 	flush_cache_all();

 	/*
 	 * Setup the transmit descriptor and issue the transmit command.
 	 */
 	lp->tda[entry].tx_status = 0;	/* clear status */
 	lp->tda[entry].tx_frag_count = 1;	/* single fragment */
 	lp->tda[entry].tx_pktsize = length;	/* length of packet */
 	lp->tda[entry].tx_frag_ptr_l = laddr & 0xffff;
 	lp->tda[entry].tx_frag_ptr_h = laddr >> 16;
 	lp->tda[entry].tx_frag_size = length;
 	lp->cur_tx++;
 	lp->stats.tx_bytes += length;

 	if (sonic_debug > 2)
 		printk("sonic_send_packet: issueing Tx command\n");

 	SONIC_WRITE(SONIC_CMD, SONIC_CR_TXP);

 	dev->trans_start = jiffies;

 	if (lp->cur_tx < lp->dirty_tx + SONIC_NUM_TDS)
 		netif_start_queue(dev);
 	else
 		lp->tx_full = 1;

 	return 0;
 }

 /*
  * The typical workload of the driver:
  * Handle the network interface interrupts.
  */
 static irqreturn_t sonic_interrupt(int irq, void *dev_id, struct pt_regs *regs)
 {
 	struct net_device *dev = (struct net_device *) dev_id;
 	unsigned int base_addr = dev->base_addr;
 	struct sonic_local *lp;
 	int status;

 	if (dev == NULL) {
 		printk("sonic_interrupt: irq %d for unknown device.\n", irq);
 		return IRQ_NONE;
 	}

 	lp = (struct sonic_local *) dev->priv;

 	status = SONIC_READ(SONIC_ISR);
 	SONIC_WRITE(SONIC_ISR, 0x7fff);	/* clear all bits */

 	if (sonic_debug > 2)
 		printk("sonic_interrupt: ISR=%x\n", status);

 	if (status & SONIC_INT_PKTRX) {
 		sonic_rx(dev);	/* got packet(s) */
 	}

 	if (status & SONIC_INT_TXDN) {
 		int dirty_tx = lp->dirty_tx;

 		while (dirty_tx < lp->cur_tx) {
 			int entry = dirty_tx & SONIC_TDS_MASK;
 			int status = lp->tda[entry].tx_status;

 			if (sonic_debug > 3)
 				printk
 				    ("sonic_interrupt: status %d, cur_tx %d, dirty_tx %d\n",
 				     status, lp->cur_tx, lp->dirty_tx);

 			if (status == 0) {
 				/* It still hasn't been Txed, kick the sonic again */
 				SONIC_WRITE(SONIC_CMD, SONIC_CR_TXP);
 				break;
 			}

 			/* put back EOL and free descriptor */
 			lp->tda[entry].tx_frag_count = 0;
 			lp->tda[entry].tx_status = 0;

 			if (status & 0x0001)
 				lp->stats.tx_packets++;
 			else {
 				lp->stats.tx_errors++;
 				if (status & 0x0642)
 					lp->stats.tx_aborted_errors++;
 				if (status & 0x0180)
 					lp->stats.tx_carrier_errors++;
 				if (status & 0x0020)
 					lp->stats.tx_window_errors++;
 				if (status & 0x0004)
 					lp->stats.tx_fifo_errors++;
 			}

 			/* We must free the original skb */
 			if (lp->tx_skb[entry]) {
 				dev_kfree_skb_irq(lp->tx_skb[entry]);
 				lp->tx_skb[entry] = 0;
 			}
 			/* and the VDMA address */
 			vdma_free(lp->tx_laddr[entry]);
 			dirty_tx++;
 		}

 		if (lp->tx_full
 		    && dirty_tx + SONIC_NUM_TDS > lp->cur_tx + 2) {
 			/* The ring is no longer full, clear tbusy. */
 			lp->tx_full = 0;
 			netif_wake_queue(dev);
 		}

 		lp->dirty_tx = dirty_tx;
 	}

 	/*
 	 * check error conditions
 	 */
 	if (status & SONIC_INT_RFO) {
 		printk("%s: receive fifo underrun\n", dev->name);
 		lp->stats.rx_fifo_errors++;
 	}
 	if (status & SONIC_INT_RDE) {
 		printk("%s: receive descriptors exhausted\n", dev->name);
 		lp->stats.rx_dropped++;
 	}
 	if (status & SONIC_INT_RBE) {
 		printk("%s: receive buffer exhausted\n", dev->name);
 		lp->stats.rx_dropped++;
 	}
 	if (status & SONIC_INT_RBAE) {
 		printk("%s: receive buffer area exhausted\n", dev->name);
 		lp->stats.rx_dropped++;
 	}

 	/* counter overruns; all counters are 16bit wide */
 	if (status & SONIC_INT_FAE)
 		lp->stats.rx_frame_errors += 65536;
 	if (status & SONIC_INT_CRC)
 		lp->stats.rx_crc_errors += 65536;
 	if (status & SONIC_INT_MP)
 		lp->stats.rx_missed_errors += 65536;

 	/* transmit error */
 	if (status & SONIC_INT_TXER)
 		lp->stats.tx_errors++;

 	/*
 	 * clear interrupt bits and return
 	 */
 	SONIC_WRITE(SONIC_ISR, status);
 	return IRQ_HANDLED;
 }

 /*
  * We have a good packet(s), get it/them out of the buffers.
  */
 static void sonic_rx(struct net_device *dev)
 {
 	unsigned int base_addr = dev->base_addr;
 	struct sonic_local *lp = (struct sonic_local *) dev->priv;
 	sonic_rd_t *rd = &lp->rda[lp->cur_rx & SONIC_RDS_MASK];
 	int status;

 	while (rd->in_use == 0) {
 		struct sk_buff *skb;
 		int pkt_len;
 		unsigned char *pkt_ptr;

 		status = rd->rx_status;
 		if (sonic_debug > 3)
 			printk("status %x, cur_rx %d, cur_rra %x\n",
 			       status, lp->cur_rx, lp->cur_rra);
 		if (status & SONIC_RCR_PRX) {
 			pkt_len = rd->rx_pktlen;
 			pkt_ptr =
 			    (char *)
 			    sonic_chiptomem((rd->rx_pktptr_h << 16) +
 					    rd->rx_pktptr_l);

 			if (sonic_debug > 3)
 				printk
 				    ("pktptr %p (rba %p) h:%x l:%x, bsize h:%x l:%x\n",
 				     pkt_ptr, lp->rba, rd->rx_pktptr_h,
 				     rd->rx_pktptr_l,
 				     SONIC_READ(SONIC_RBWC1),
 				     SONIC_READ(SONIC_RBWC0));

 			/* Malloc up new buffer. */
 			skb = dev_alloc_skb(pkt_len + 2);
 			if (skb == NULL) {
 				printk
 				    ("%s: Memory squeeze, dropping packet.\n",
 				     dev->name);
 				lp->stats.rx_dropped++;
 				break;
 			}
 			skb->dev = dev;
 			skb_reserve(skb, 2);	/* 16 byte align */
 			skb_put(skb, pkt_len);	/* Make room */
 			eth_copy_and_sum(skb, pkt_ptr, pkt_len, 0);
 			skb->protocol = eth_type_trans(skb, dev);
 			netif_rx(skb);	/* pass the packet to upper layers */
 			dev->last_rx = jiffies;
 			lp->stats.rx_packets++;
 			lp->stats.rx_bytes += pkt_len;

 		} else {
 			/* This should only happen, if we enable accepting broken packets. */
 			lp->stats.rx_errors++;
 			if (status & SONIC_RCR_FAER)
 				lp->stats.rx_frame_errors++;
 			if (status & SONIC_RCR_CRCR)
 				lp->stats.rx_crc_errors++;
 		}

 		rd->in_use = 1;
 		rd = &lp->rda[(++lp->cur_rx) & SONIC_RDS_MASK];
 		/* now give back the buffer to the receive buffer area */
 		if (status & SONIC_RCR_LPKT) {
 			/*
 			 * this was the last packet out of the current receice buffer
 			 * give the buffer back to the SONIC
 			 */
 			lp->cur_rra += sizeof(sonic_rr_t);
 			if (lp->cur_rra >
 			    (lp->rra_laddr +
 			     (SONIC_NUM_RRS -
 			      1) * sizeof(sonic_rr_t))) lp->cur_rra =
 				    lp->rra_laddr;
 			SONIC_WRITE(SONIC_RWP, lp->cur_rra & 0xffff);
 		} else
 			printk
 			    ("%s: rx desc without RCR_LPKT. Shouldn't happen !?\n",
 			     dev->name);
 	}
 	/*
 	 * If any worth-while packets have been received, dev_rint()
 	 * has done a mark_bh(NET_BH) for us and will work on them
 	 * when we get to the bottom-half routine.
 	 */
 }


 /*
  * Get the current statistics.
  * This may be called with the device open or closed.
  */
 static struct net_device_stats *sonic_get_stats(struct net_device *dev)
 {
 	struct sonic_local *lp = (struct sonic_local *) dev->priv;
 	unsigned int base_addr = dev->base_addr;

 	/* read the tally counter from the SONIC and reset them */
 	lp->stats.rx_crc_errors += SONIC_READ(SONIC_CRCT);
 	SONIC_WRITE(SONIC_CRCT, 0xffff);
 	lp->stats.rx_frame_errors += SONIC_READ(SONIC_FAET);
 	SONIC_WRITE(SONIC_FAET, 0xffff);
 	lp->stats.rx_missed_errors += SONIC_READ(SONIC_MPT);
 	SONIC_WRITE(SONIC_MPT, 0xffff);

 	return &lp->stats;
 }


 /*
  * Set or clear the multicast filter for this adaptor.
  */
 static void sonic_multicast_list(struct net_device *dev)
 {
 	struct sonic_local *lp = (struct sonic_local *) dev->priv;
 	unsigned int base_addr = dev->base_addr;
 	unsigned int rcr;
 	struct dev_mc_list *dmi = dev->mc_list;
 	unsigned char *addr;
 	int i;

 	rcr = SONIC_READ(SONIC_RCR) & ~(SONIC_RCR_PRO | SONIC_RCR_AMC);
 	rcr |= SONIC_RCR_BRD;	/* accept broadcast packets */

 	if (dev->flags & IFF_PROMISC) {	/* set promiscuous mode */
 		rcr |= SONIC_RCR_PRO;
 	} else {
 		if ((dev->flags & IFF_ALLMULTI) || (dev->mc_count > 15)) {
 			rcr |= SONIC_RCR_AMC;
 		} else {
 			if (sonic_debug > 2)
 				printk
 				    ("sonic_multicast_list: mc_count %d\n",
 				     dev->mc_count);
 			lp->cda.cam_enable = 1;	/* always enable our own address */
 			for (i = 1; i <= dev->mc_count; i++) {
 				addr = dmi->dmi_addr;
 				dmi = dmi->next;
 				lp->cda.cam_desc[i].cam_cap0 =
 				    addr[1] << 8 | addr[0];
 				lp->cda.cam_desc[i].cam_cap1 =
 				    addr[3] << 8 | addr[2];
 				lp->cda.cam_desc[i].cam_cap2 =
 				    addr[5] << 8 | addr[4];
 				lp->cda.cam_enable |= (1 << i);
 			}
 			SONIC_WRITE(SONIC_CDC, 16);
 			/* issue Load CAM command */
 			SONIC_WRITE(SONIC_CDP, lp->cda_laddr & 0xffff);
 			SONIC_WRITE(SONIC_CMD, SONIC_CR_LCAM);
 		}
 	}

 	if (sonic_debug > 2)
 		printk("sonic_multicast_list: setting RCR=%x\n", rcr);

 	SONIC_WRITE(SONIC_RCR, rcr);
 }


 /*
  * Initialize the SONIC ethernet controller.
  */
 static int sonic_init(struct net_device *dev)
 {
 	unsigned int base_addr = dev->base_addr;
 	unsigned int cmd;
 	struct sonic_local *lp = (struct sonic_local *) dev->priv;
 	unsigned int rra_start;
 	unsigned int rra_end;
 	int i;

 	/*
 	 * put the Sonic into software-reset mode and
 	 * disable all interrupts
 	 */
 	SONIC_WRITE(SONIC_ISR, 0x7fff);
 	SONIC_WRITE(SONIC_IMR, 0);
 	SONIC_WRITE(SONIC_CMD, SONIC_CR_RST);

 	/*
 	 * clear software reset flag, disable receiver, clear and
 	 * enable interrupts, then completely initialize the SONIC
 	 */
 	SONIC_WRITE(SONIC_CMD, 0);
 	SONIC_WRITE(SONIC_CMD, SONIC_CR_RXDIS);

 	/*
 	 * initialize the receive resource area
 	 */
 	if (sonic_debug > 2)
 		printk("sonic_init: initialize receive resource area\n");

 	rra_start = lp->rra_laddr & 0xffff;
 	rra_end =
 	    (rra_start + (SONIC_NUM_RRS * sizeof(sonic_rr_t))) & 0xffff;

 	for (i = 0; i < SONIC_NUM_RRS; i++) {
 		lp->rra[i].rx_bufadr_l =
 		    (lp->rba_laddr + i * SONIC_RBSIZE) & 0xffff;
 		lp->rra[i].rx_bufadr_h =
 		    (lp->rba_laddr + i * SONIC_RBSIZE) >> 16;
 		lp->rra[i].rx_bufsize_l = SONIC_RBSIZE >> 1;
 		lp->rra[i].rx_bufsize_h = 0;
 	}

 	/* initialize all RRA registers */
 	SONIC_WRITE(SONIC_RSA, rra_start);
 	SONIC_WRITE(SONIC_REA, rra_end);
 	SONIC_WRITE(SONIC_RRP, rra_start);
 	SONIC_WRITE(SONIC_RWP, rra_end);
 	SONIC_WRITE(SONIC_URRA, lp->rra_laddr >> 16);
 	SONIC_WRITE(SONIC_EOBC, (SONIC_RBSIZE - 2) >> 1);

 	lp->cur_rra =
 	    lp->rra_laddr + (SONIC_NUM_RRS - 1) * sizeof(sonic_rr_t);

 	/* load the resource pointers */
 	if (sonic_debug > 3)
 		printk("sonic_init: issueing RRRA command\n");

 	SONIC_WRITE(SONIC_CMD, SONIC_CR_RRRA);
 	i = 0;
 	while (i++ < 100) {
 		if (SONIC_READ(SONIC_CMD) & SONIC_CR_RRRA)
 			break;
 	}

 	if (sonic_debug > 2)
 		printk("sonic_init: status=%x\n", SONIC_READ(SONIC_CMD));

 	/*
 	 * Initialize the receive descriptors so that they
 	 * become a circular linked list, ie. let the last
 	 * descriptor point to the first again.
 	 */
 	if (sonic_debug > 2)
 		printk("sonic_init: initialize receive descriptors\n");
 	for (i = 0; i < SONIC_NUM_RDS; i++) {
 		lp->rda[i].rx_status = 0;
 		lp->rda[i].rx_pktlen = 0;
 		lp->rda[i].rx_pktptr_l = 0;
 		lp->rda[i].rx_pktptr_h = 0;
 		lp->rda[i].rx_seqno = 0;
 		lp->rda[i].in_use = 1;
 		lp->rda[i].link =
 		    lp->rda_laddr + (i + 1) * sizeof(sonic_rd_t);
 	}
 	/* fix last descriptor */
 	lp->rda[SONIC_NUM_RDS - 1].link = lp->rda_laddr;
 	lp->cur_rx = 0;
 	SONIC_WRITE(SONIC_URDA, lp->rda_laddr >> 16);
 	SONIC_WRITE(SONIC_CRDA, lp->rda_laddr & 0xffff);

 	/*
 	 * initialize transmit descriptors
 	 */
 	if (sonic_debug > 2)
 		printk("sonic_init: initialize transmit descriptors\n");
 	for (i = 0; i < SONIC_NUM_TDS; i++) {
 		lp->tda[i].tx_status = 0;
 		lp->tda[i].tx_config = 0;
 		lp->tda[i].tx_pktsize = 0;
 		lp->tda[i].tx_frag_count = 0;
 		lp->tda[i].link =
 		    (lp->tda_laddr +
 		     (i + 1) * sizeof(sonic_td_t)) | SONIC_END_OF_LINKS;
 	}
 	lp->tda[SONIC_NUM_TDS - 1].link =
 	    (lp->tda_laddr & 0xffff) | SONIC_END_OF_LINKS;

 	SONIC_WRITE(SONIC_UTDA, lp->tda_laddr >> 16);
 	SONIC_WRITE(SONIC_CTDA, lp->tda_laddr & 0xffff);
 	lp->cur_tx = lp->dirty_tx = 0;

 	/*
 	 * put our own address to CAM desc[0]
 	 */
 	lp->cda.cam_desc[0].cam_cap0 =
 	    dev->dev_addr[1] << 8 | dev->dev_addr[0];
 	lp->cda.cam_desc[0].cam_cap1 =
 	    dev->dev_addr[3] << 8 | dev->dev_addr[2];
 	lp->cda.cam_desc[0].cam_cap2 =
 	    dev->dev_addr[5] << 8 | dev->dev_addr[4];
 	lp->cda.cam_enable = 1;

 	for (i = 0; i < 16; i++)
 		lp->cda.cam_desc[i].cam_entry_pointer = i;

 	/*
 	 * initialize CAM registers
 	 */
 	SONIC_WRITE(SONIC_CDP, lp->cda_laddr & 0xffff);
 	SONIC_WRITE(SONIC_CDC, 16);

 	/*
 	 * load the CAM
 	 */
 	SONIC_WRITE(SONIC_CMD, SONIC_CR_LCAM);

 	i = 0;
 	while (i++ < 100) {
 		if (SONIC_READ(SONIC_ISR) & SONIC_INT_LCD)
 			break;
 	}
 	if (sonic_debug > 2) {
 		printk("sonic_init: CMD=%x, ISR=%x\n",
 		       SONIC_READ(SONIC_CMD), SONIC_READ(SONIC_ISR));
 	}

 	/*
 	 * enable receiver, disable loopback
 	 * and enable all interrupts
 	 */
 	SONIC_WRITE(SONIC_CMD, SONIC_CR_RXEN | SONIC_CR_STP);
 	SONIC_WRITE(SONIC_RCR, SONIC_RCR_DEFAULT);
 	SONIC_WRITE(SONIC_TCR, SONIC_TCR_DEFAULT);
 	SONIC_WRITE(SONIC_ISR, 0x7fff);
 	SONIC_WRITE(SONIC_IMR, SONIC_IMR_DEFAULT);

 	cmd = SONIC_READ(SONIC_CMD);
 	if ((cmd & SONIC_CR_RXEN) == 0 || (cmd & SONIC_CR_STP) == 0)
 		printk("sonic_init: failed, status=%x\n", cmd);

 	if (sonic_debug > 2)
 		printk("sonic_init: new status=%x\n",
 		       SONIC_READ(SONIC_CMD));

 	return 0;
 }

 MODULE_LICENSE("GPL");
	/*
	* sonic.c
	*
	* (C) 1996,1998 by Thomas Bogendoerfer (tsbogend@alpha.franken.de)
	*
	* This driver is based on work from Andreas Busse, but most of
	* the code is rewritten.
	*
	* (C) 1995 by Andreas Busse (andy@waldorf-gmbh.de)
	*
	* Core code included by system sonic drivers
	*/

	/*
	* Sources: Olivetti M700-10 Risc Personal Computer hardware handbook,
	* National Semiconductors data sheet for the DP83932B Sonic Ethernet
	* controller, and the files "8390.c" and "skeleton.c" in this directory.
	*/



	/*
	* Open/initialize the SONIC controller.
	*
	* This routine should set everything up anew at each open, even
	* registers that "should" only need to be set once at boot, so that
	* there is non-reboot way to recover if something goes wrong.
	*/
	static int sonic_open(struct net_device *dev)
	{
	if (sonic_debug > 2)
	printk("sonic_open: initializing sonic driver.\n");

	/*
	* We don't need to deal with auto-irq stuff since we
	* hardwire the sonic interrupt.
	*/
	/*
	* XXX Horrible work around: We install sonic_interrupt as fast interrupt.
	* This means that during execution of the handler interrupt are disabled
	* covering another bug otherwise corrupting data. This doesn't mean
	* this glue works ok under all situations.
	*/
	// if (sonic_request_irq(dev->irq, &sonic_interrupt, 0, "sonic", dev)) {
	if (sonic_request_irq(dev->irq, &sonic_interrupt, SA_INTERRUPT,
	"sonic", dev)) {
	printk("\n%s: unable to get IRQ %d .\n", dev->name, dev->irq);
	return -EAGAIN;
	}

	/*
	* Initialize the SONIC
	*/
	sonic_init(dev);

	netif_start_queue(dev);

	if (sonic_debug > 2)
	printk("sonic_open: Initialization done.\n");

	return 0;
	}


	/*
	* Close the SONIC device
	*/
	static int sonic_close(struct net_device *dev)
	{
	unsigned int base_addr = dev->base_addr;

	if (sonic_debug > 2)
	printk("sonic_close\n");

	netif_stop_queue(dev);

	/*
	* stop the SONIC, disable interrupts
	*/
	SONIC_WRITE(SONIC_ISR, 0x7fff);
	SONIC_WRITE(SONIC_IMR, 0);
	SONIC_WRITE(SONIC_CMD, SONIC_CR_RST);

	sonic_free_irq(dev->irq, dev); /* release the IRQ */

	return 0;
	}

	static void sonic_tx_timeout(struct net_device *dev)
	{
	struct sonic_local lp = (struct sonic_local ) dev->priv;
	printk("%s: transmit timed out.\n", dev->name);

	/* Try to restart the adaptor. */
	sonic_init(dev);
	lp->stats.tx_errors++;
	dev->trans_start = jiffies;
	netif_wake_queue(dev);
	}

	/*
	* transmit packet
	*/
	static int sonic_send_packet(struct sk_buff skb, struct net_device dev)
	{
	struct sonic_local lp = (struct sonic_local ) dev->priv;
	unsigned int base_addr = dev->base_addr;
	unsigned int laddr;
	int entry, length;

	netif_stop_queue(dev);

	if (sonic_debug > 2)
	printk("sonic_send_packet: skb=%p, dev=%p\n", skb, dev);

	/*
	* Map the packet data into the logical DMA address space
	*/
	if ((laddr = vdma_alloc(CPHYSADDR(skb->data), skb->len)) == ~0UL) {
	printk("%s: no VDMA entry for transmit available.\n",
	dev->name);
	dev_kfree_skb(skb);
	netif_start_queue(dev);
	return 1;
	}
	entry = lp->cur_tx & SONIC_TDS_MASK;
	lp->tx_laddr[entry] = laddr;
	lp->tx_skb[entry] = skb;

	length = (skb->len < ETH_ZLEN) ? ETH_ZLEN : skb->len;
	flush_cache_all();

	/*
	* Setup the transmit descriptor and issue the transmit command.
	*/
	lp->tda[entry].tx_status = 0; /* clear status */
	lp->tda[entry].tx_frag_count = 1; /* single fragment */
	lp->tda[entry].tx_pktsize = length; /* length of packet */
	lp->tda[entry].tx_frag_ptr_l = laddr & 0xffff;
	lp->tda[entry].tx_frag_ptr_h = laddr >> 16;
	lp->tda[entry].tx_frag_size = length;
	lp->cur_tx++;
	lp->stats.tx_bytes += length;

	if (sonic_debug > 2)
	printk("sonic_send_packet: issueing Tx command\n");

	SONIC_WRITE(SONIC_CMD, SONIC_CR_TXP);

	dev->trans_start = jiffies;

	if (lp->cur_tx < lp->dirty_tx + SONIC_NUM_TDS)
	netif_start_queue(dev);
	else
	lp->tx_full = 1;

	return 0;
	}

	/*
	* The typical workload of the driver:
	* Handle the network interface interrupts.
	*/
	static irqreturn_t sonic_interrupt(int irq, void dev_id, struct pt_regs regs)
	{
	struct net_device dev = (struct net_device ) dev_id;
	unsigned int base_addr = dev->base_addr;
	struct sonic_local *lp;
	int status;

	if (dev == NULL) {
	printk("sonic_interrupt: irq %d for unknown device.\n", irq);
	return IRQ_NONE;
	}

	lp = (struct sonic_local *) dev->priv;

	status = SONIC_READ(SONIC_ISR);
	SONIC_WRITE(SONIC_ISR, 0x7fff); /* clear all bits */

	if (sonic_debug > 2)
	printk("sonic_interrupt: ISR=%x\n", status);

	if (status & SONIC_INT_PKTRX) {
	sonic_rx(dev); /* got packet(s) */
	}

	if (status & SONIC_INT_TXDN) {
	int dirty_tx = lp->dirty_tx;

	while (dirty_tx < lp->cur_tx) {
	int entry = dirty_tx & SONIC_TDS_MASK;
	int status = lp->tda[entry].tx_status;

	if (sonic_debug > 3)
	printk
	("sonic_interrupt: status %d, cur_tx %d, dirty_tx %d\n",
	status, lp->cur_tx, lp->dirty_tx);

	if (status == 0) {
	/* It still hasn't been Txed, kick the sonic again */
	SONIC_WRITE(SONIC_CMD, SONIC_CR_TXP);
	break;
	}

	/* put back EOL and free descriptor */
	lp->tda[entry].tx_frag_count = 0;
	lp->tda[entry].tx_status = 0;

	if (status & 0x0001)
	lp->stats.tx_packets++;
	else {
	lp->stats.tx_errors++;
	if (status & 0x0642)
	lp->stats.tx_aborted_errors++;
	if (status & 0x0180)
	lp->stats.tx_carrier_errors++;
	if (status & 0x0020)
	lp->stats.tx_window_errors++;
	if (status & 0x0004)
	lp->stats.tx_fifo_errors++;
	}

	/* We must free the original skb */
	if (lp->tx_skb[entry]) {
	dev_kfree_skb_irq(lp->tx_skb[entry]);
	lp->tx_skb[entry] = 0;
	}
	/* and the VDMA address */
	vdma_free(lp->tx_laddr[entry]);
	dirty_tx++;
	}

	if (lp->tx_full
	&& dirty_tx + SONIC_NUM_TDS > lp->cur_tx + 2) {
	/* The ring is no longer full, clear tbusy. */
	lp->tx_full = 0;
	netif_wake_queue(dev);
	}

	lp->dirty_tx = dirty_tx;
	}

	/*
	* check error conditions
	*/
	if (status & SONIC_INT_RFO) {
	printk("%s: receive fifo underrun\n", dev->name);
	lp->stats.rx_fifo_errors++;
	}
	if (status & SONIC_INT_RDE) {
	printk("%s: receive descriptors exhausted\n", dev->name);
	lp->stats.rx_dropped++;
	}
	if (status & SONIC_INT_RBE) {
	printk("%s: receive buffer exhausted\n", dev->name);
	lp->stats.rx_dropped++;
	}
	if (status & SONIC_INT_RBAE) {
	printk("%s: receive buffer area exhausted\n", dev->name);
	lp->stats.rx_dropped++;
	}

	/* counter overruns; all counters are 16bit wide */
	if (status & SONIC_INT_FAE)
	lp->stats.rx_frame_errors += 65536;
	if (status & SONIC_INT_CRC)
	lp->stats.rx_crc_errors += 65536;
	if (status & SONIC_INT_MP)
	lp->stats.rx_missed_errors += 65536;

	/* transmit error */
	if (status & SONIC_INT_TXER)
	lp->stats.tx_errors++;

	/*
	* clear interrupt bits and return
	*/
	SONIC_WRITE(SONIC_ISR, status);
	return IRQ_HANDLED;
	}

	/*
	* We have a good packet(s), get it/them out of the buffers.
	*/
	static void sonic_rx(struct net_device *dev)
	{
	unsigned int base_addr = dev->base_addr;
	struct sonic_local lp = (struct sonic_local ) dev->priv;
	sonic_rd_t *rd = &lp->rda[lp->cur_rx & SONIC_RDS_MASK];
	int status;

	while (rd->in_use == 0) {
	struct sk_buff *skb;
	int pkt_len;
	unsigned char *pkt_ptr;

	status = rd->rx_status;
	if (sonic_debug > 3)
	printk("status %x, cur_rx %d, cur_rra %x\n",
	status, lp->cur_rx, lp->cur_rra);
	if (status & SONIC_RCR_PRX) {
	pkt_len = rd->rx_pktlen;
	pkt_ptr =
	(char *)
	sonic_chiptomem((rd->rx_pktptr_h << 16) +
	rd->rx_pktptr_l);

	if (sonic_debug > 3)
	printk
	("pktptr %p (rba %p) h:%x l:%x, bsize h:%x l:%x\n",
	pkt_ptr, lp->rba, rd->rx_pktptr_h,
	rd->rx_pktptr_l,
	SONIC_READ(SONIC_RBWC1),
	SONIC_READ(SONIC_RBWC0));

	/* Malloc up new buffer. */
	skb = dev_alloc_skb(pkt_len + 2);
	if (skb == NULL) {
	printk
	("%s: Memory squeeze, dropping packet.\n",
	dev->name);
	lp->stats.rx_dropped++;
	break;
	}
	skb->dev = dev;
	skb_reserve(skb, 2); /* 16 byte align */
	skb_put(skb, pkt_len); /* Make room */
	eth_copy_and_sum(skb, pkt_ptr, pkt_len, 0);
	skb->protocol = eth_type_trans(skb, dev);
	netif_rx(skb); /* pass the packet to upper layers */
	dev->last_rx = jiffies;
	lp->stats.rx_packets++;
	lp->stats.rx_bytes += pkt_len;

	} else {
	/* This should only happen, if we enable accepting broken packets. */
	lp->stats.rx_errors++;
	if (status & SONIC_RCR_FAER)
	lp->stats.rx_frame_errors++;
	if (status & SONIC_RCR_CRCR)
	lp->stats.rx_crc_errors++;
	}

	rd->in_use = 1;
	rd = &lp->rda[(++lp->cur_rx) & SONIC_RDS_MASK];
	/* now give back the buffer to the receive buffer area */
	if (status & SONIC_RCR_LPKT) {
	/*
	* this was the last packet out of the current receice buffer
	* give the buffer back to the SONIC
	*/
	lp->cur_rra += sizeof(sonic_rr_t);
	if (lp->cur_rra >
	(lp->rra_laddr +
	(SONIC_NUM_RRS -
	1) * sizeof(sonic_rr_t))) lp->cur_rra =
	lp->rra_laddr;
	SONIC_WRITE(SONIC_RWP, lp->cur_rra & 0xffff);
	} else
	printk
	("%s: rx desc without RCR_LPKT. Shouldn't happen !?\n",
	dev->name);
	}
	/*
	* If any worth-while packets have been received, dev_rint()
	* has done a mark_bh(NET_BH) for us and will work on them
	* when we get to the bottom-half routine.
	*/
	}


	/*
	* Get the current statistics.
	* This may be called with the device open or closed.
	*/
	static struct net_device_stats sonic_get_stats(struct net_device dev)
	{
	struct sonic_local lp = (struct sonic_local ) dev->priv;
	unsigned int base_addr = dev->base_addr;

	/* read the tally counter from the SONIC and reset them */
	lp->stats.rx_crc_errors += SONIC_READ(SONIC_CRCT);
	SONIC_WRITE(SONIC_CRCT, 0xffff);
	lp->stats.rx_frame_errors += SONIC_READ(SONIC_FAET);
	SONIC_WRITE(SONIC_FAET, 0xffff);
	lp->stats.rx_missed_errors += SONIC_READ(SONIC_MPT);
	SONIC_WRITE(SONIC_MPT, 0xffff);

	return &lp->stats;
	}


	/*
	* Set or clear the multicast filter for this adaptor.
	*/
	static void sonic_multicast_list(struct net_device *dev)
	{
	struct sonic_local lp = (struct sonic_local ) dev->priv;
	unsigned int base_addr = dev->base_addr;
	unsigned int rcr;
	struct dev_mc_list *dmi = dev->mc_list;
	unsigned char *addr;
	int i;

	rcr = SONIC_READ(SONIC_RCR) & ~(SONIC_RCR_PRO \| SONIC_RCR_AMC);
	rcr \|= SONIC_RCR_BRD; /* accept broadcast packets */

	if (dev->flags & IFF_PROMISC) { /* set promiscuous mode */
	rcr \|= SONIC_RCR_PRO;
	} else {
	if ((dev->flags & IFF_ALLMULTI) \|\| (dev->mc_count > 15)) {
	rcr \|= SONIC_RCR_AMC;
	} else {
	if (sonic_debug > 2)
	printk
	("sonic_multicast_list: mc_count %d\n",
	dev->mc_count);
	lp->cda.cam_enable = 1; /* always enable our own address */
	for (i = 1; i <= dev->mc_count; i++) {
	addr = dmi->dmi_addr;
	dmi = dmi->next;
	lp->cda.cam_desc[i].cam_cap0 =
	addr[1] << 8 \| addr[0];
	lp->cda.cam_desc[i].cam_cap1 =
	addr[3] << 8 \| addr[2];
	lp->cda.cam_desc[i].cam_cap2 =
	addr[5] << 8 \| addr[4];
	lp->cda.cam_enable \|= (1 << i);
	}
	SONIC_WRITE(SONIC_CDC, 16);
	/* issue Load CAM command */
	SONIC_WRITE(SONIC_CDP, lp->cda_laddr & 0xffff);
	SONIC_WRITE(SONIC_CMD, SONIC_CR_LCAM);
	}
	}

	if (sonic_debug > 2)
	printk("sonic_multicast_list: setting RCR=%x\n", rcr);

	SONIC_WRITE(SONIC_RCR, rcr);
	}


	/*
	* Initialize the SONIC ethernet controller.
	*/
	static int sonic_init(struct net_device *dev)
	{
	unsigned int base_addr = dev->base_addr;
	unsigned int cmd;
	struct sonic_local lp = (struct sonic_local ) dev->priv;
	unsigned int rra_start;
	unsigned int rra_end;
	int i;

	/*
	* put the Sonic into software-reset mode and
	* disable all interrupts
	*/
	SONIC_WRITE(SONIC_ISR, 0x7fff);
	SONIC_WRITE(SONIC_IMR, 0);
	SONIC_WRITE(SONIC_CMD, SONIC_CR_RST);

	/*
	* clear software reset flag, disable receiver, clear and
	* enable interrupts, then completely initialize the SONIC
	*/
	SONIC_WRITE(SONIC_CMD, 0);
	SONIC_WRITE(SONIC_CMD, SONIC_CR_RXDIS);

	/*
	* initialize the receive resource area
	*/
	if (sonic_debug > 2)
	printk("sonic_init: initialize receive resource area\n");

	rra_start = lp->rra_laddr & 0xffff;
	rra_end =
	(rra_start + (SONIC_NUM_RRS * sizeof(sonic_rr_t))) & 0xffff;

	for (i = 0; i < SONIC_NUM_RRS; i++) {
	lp->rra[i].rx_bufadr_l =
	(lp->rba_laddr + i * SONIC_RBSIZE) & 0xffff;
	lp->rra[i].rx_bufadr_h =
	(lp->rba_laddr + i * SONIC_RBSIZE) >> 16;
	lp->rra[i].rx_bufsize_l = SONIC_RBSIZE >> 1;
	lp->rra[i].rx_bufsize_h = 0;
	}

	/* initialize all RRA registers */
	SONIC_WRITE(SONIC_RSA, rra_start);
	SONIC_WRITE(SONIC_REA, rra_end);
	SONIC_WRITE(SONIC_RRP, rra_start);
	SONIC_WRITE(SONIC_RWP, rra_end);
	SONIC_WRITE(SONIC_URRA, lp->rra_laddr >> 16);
	SONIC_WRITE(SONIC_EOBC, (SONIC_RBSIZE - 2) >> 1);

	lp->cur_rra =
	lp->rra_laddr + (SONIC_NUM_RRS - 1) * sizeof(sonic_rr_t);

	/* load the resource pointers */
	if (sonic_debug > 3)
	printk("sonic_init: issueing RRRA command\n");

	SONIC_WRITE(SONIC_CMD, SONIC_CR_RRRA);
	i = 0;
	while (i++ < 100) {
	if (SONIC_READ(SONIC_CMD) & SONIC_CR_RRRA)
	break;
	}

	if (sonic_debug > 2)
	printk("sonic_init: status=%x\n", SONIC_READ(SONIC_CMD));

	/*
	* Initialize the receive descriptors so that they
	* become a circular linked list, ie. let the last
	* descriptor point to the first again.
	*/
	if (sonic_debug > 2)
	printk("sonic_init: initialize receive descriptors\n");
	for (i = 0; i < SONIC_NUM_RDS; i++) {
	lp->rda[i].rx_status = 0;
	lp->rda[i].rx_pktlen = 0;
	lp->rda[i].rx_pktptr_l = 0;
	lp->rda[i].rx_pktptr_h = 0;
	lp->rda[i].rx_seqno = 0;
	lp->rda[i].in_use = 1;
	lp->rda[i].link =
	lp->rda_laddr + (i + 1) * sizeof(sonic_rd_t);
	}
	/* fix last descriptor */
	lp->rda[SONIC_NUM_RDS - 1].link = lp->rda_laddr;
	lp->cur_rx = 0;
	SONIC_WRITE(SONIC_URDA, lp->rda_laddr >> 16);
	SONIC_WRITE(SONIC_CRDA, lp->rda_laddr & 0xffff);

	/*
	* initialize transmit descriptors
	*/
	if (sonic_debug > 2)
	printk("sonic_init: initialize transmit descriptors\n");
	for (i = 0; i < SONIC_NUM_TDS; i++) {
	lp->tda[i].tx_status = 0;
	lp->tda[i].tx_config = 0;
	lp->tda[i].tx_pktsize = 0;
	lp->tda[i].tx_frag_count = 0;
	lp->tda[i].link =
	(lp->tda_laddr +
	(i + 1) * sizeof(sonic_td_t)) \| SONIC_END_OF_LINKS;
	}
	lp->tda[SONIC_NUM_TDS - 1].link =
	(lp->tda_laddr & 0xffff) \| SONIC_END_OF_LINKS;

	SONIC_WRITE(SONIC_UTDA, lp->tda_laddr >> 16);
	SONIC_WRITE(SONIC_CTDA, lp->tda_laddr & 0xffff);
	lp->cur_tx = lp->dirty_tx = 0;

	/*
	* put our own address to CAM desc[0]
	*/
	lp->cda.cam_desc[0].cam_cap0 =
	dev->dev_addr[1] << 8 \| dev->dev_addr[0];
	lp->cda.cam_desc[0].cam_cap1 =
	dev->dev_addr[3] << 8 \| dev->dev_addr[2];
	lp->cda.cam_desc[0].cam_cap2 =
	dev->dev_addr[5] << 8 \| dev->dev_addr[4];
	lp->cda.cam_enable = 1;

	for (i = 0; i < 16; i++)
	lp->cda.cam_desc[i].cam_entry_pointer = i;

	/*
	* initialize CAM registers
	*/
	SONIC_WRITE(SONIC_CDP, lp->cda_laddr & 0xffff);
	SONIC_WRITE(SONIC_CDC, 16);

	/*
	* load the CAM
	*/
	SONIC_WRITE(SONIC_CMD, SONIC_CR_LCAM);

	i = 0;
	while (i++ < 100) {
	if (SONIC_READ(SONIC_ISR) & SONIC_INT_LCD)
	break;
	}
	if (sonic_debug > 2) {
	printk("sonic_init: CMD=%x, ISR=%x\n",
	SONIC_READ(SONIC_CMD), SONIC_READ(SONIC_ISR));
	}

	/*
	* enable receiver, disable loopback
	* and enable all interrupts
	*/
	SONIC_WRITE(SONIC_CMD, SONIC_CR_RXEN \| SONIC_CR_STP);
	SONIC_WRITE(SONIC_RCR, SONIC_RCR_DEFAULT);
	SONIC_WRITE(SONIC_TCR, SONIC_TCR_DEFAULT);
	SONIC_WRITE(SONIC_ISR, 0x7fff);
	SONIC_WRITE(SONIC_IMR, SONIC_IMR_DEFAULT);

	cmd = SONIC_READ(SONIC_CMD);
	if ((cmd & SONIC_CR_RXEN) == 0 \|\| (cmd & SONIC_CR_STP) == 0)
	printk("sonic_init: failed, status=%x\n", cmd);

	if (sonic_debug > 2)
	printk("sonic_init: new status=%x\n",
	SONIC_READ(SONIC_CMD));

	return 0;
	}

	MODULE_LICENSE("GPL");