2 * linux/drivers/net/am79c961.c 4 * by Russell King <rmk@arm.linux.org.uk> 1995-2000. 6 * This program is free software; you can redistribute it and/or modify 7 * it under the terms of the GNU General Public License version 2 as 8 * published by the Free Software Foundation. 10 * Derived from various things including skeleton.c 12 * This is a special driver for the am79c961A Lance chip used in the 13 * Intel (formally Digital Equipment Corp) EBSA110 platform. 15 #include <linux/module.h> 16 #include <linux/kernel.h> 17 #include <linux/sched.h> 18 #include <linux/types.h> 19 #include <linux/fcntl.h> 20 #include <linux/interrupt.h> 21 #include <linux/ptrace.h> 22 #include <linux/ioport.h> 24 #include <linux/malloc.h> 25 #include <linux/string.h> 26 #include <linux/errno.h> 27 #include <linux/netdevice.h> 28 #include <linux/etherdevice.h> 29 #include <linux/skbuff.h> 30 #include <linux/delay.h> 31 #include <linux/init.h> 33 #include <asm/system.h> 34 #include <asm/bitops.h> 38 #include <asm/ecard.h> 45 static voidam79c961_interrupt(int irq
,void*dev_id
,struct pt_regs
*regs
); 47 static unsigned int net_debug
= NET_DEBUG
; 49 static char*version
="am79c961 ethernet driver (c) 1995 R.M.King v0.02\n"; 51 /* --------------------------------------------------------------------------- */ 55 write_rreg(unsigned long base
,unsigned int reg
,unsigned short val
) 57 __asm__("str%?h %1, [%2] @ NET_RAP 58 str%?h %0, [%2, #-4] @ NET_RDP 59 ": :"r"(val
),"r"(reg
),"r"(0xf0000464)); 62 staticinlineunsigned short 63 read_rreg(unsigned int base_addr
,unsigned int reg
) 66 __asm__("str%?h %1, [%2] @ NET_RAP 67 ldr%?h %0, [%2, #-4] @ NET_RDP 68 ":"=r"(v
):"r"(reg
),"r"(0xf0000464)); 73 write_ireg(unsigned long base
,unsigned int reg
,unsigned short val
) 75 __asm__("str%?h %1, [%2] @ NET_RAP 76 str%?h %0, [%2, #8] @ NET_IDP 77 ": :"r"(val
),"r"(reg
),"r"(0xf0000464)); 80 #define am_writeword(dev,off,val)\ 81 __asm__("str%?h %0, [%1]" : : \ 82 "r" ((val) & 0xffff),"r" (0xe0000000 + ((off) << 1))); 85 am_writebuffer(struct net_device
*dev
, u_int offset
,unsigned char*buf
,unsigned int length
) 87 offset
=0xe0000000+ (offset
<<1); 88 length
= (length
+1) & ~1; 90 __asm__
__volatile__("str%?h %2, [%0], #4" 91 :"=&r"(offset
) :"0"(offset
),"r"(buf
[0] | (buf
[1] <<8))); 96 unsigned int tmp
, tmp2
; 97 __asm__
__volatile__(" 100 mov%? %2, %2, lsr #16 103 mov%? %3, %3, lsr #16 105 ":"=&r"(offset
),"=&r"(buf
),"=r"(tmp
),"=r"(tmp2
) 106 :"0"(offset
),"1"(buf
)); 110 __asm__
__volatile__("str%?h %2, [%0], #4" 111 :"=&r"(offset
) :"0"(offset
),"r"(buf
[0] | (buf
[1] <<8))); 118 * This reads a 16-bit quantity in little-endian 119 * mode from the am79c961 buffer. 121 staticinlineunsigned shortam_readword(struct net_device
*dev
, u_int off
) 123 unsigned long address
=0xe0000000+ (off
<<1); 126 __asm__("ldr%?h %0, [%1]":"=r"(val
):"r"(address
)); 131 am_readbuffer(struct net_device
*dev
, u_int offset
,unsigned char*buf
,unsigned int length
) 133 offset
=0xe0000000+ (offset
<<1); 134 length
= (length
+1) & ~1; 137 __asm__
__volatile__(" 142 ":"=&r"(offset
),"=&r"(buf
),"=r"(tmp
):"0"(offset
),"1"(buf
)); 146 unsigned int tmp
, tmp2
, tmp3
; 147 __asm__
__volatile__(" 150 orr%? %2, %2, %3, lsl #16 153 orr%? %3, %3, %4, lsl #16 154 stm%?ia %1!, {%2, %3} 155 ":"=&r"(offset
),"=&r"(buf
),"=r"(tmp
),"=r"(tmp2
),"=r"(tmp3
) 156 :"0"(offset
),"1"(buf
)); 161 __asm__
__volatile__(" 166 ":"=&r"(offset
),"=&r"(buf
),"=r"(tmp
) :"0"(offset
),"1"(buf
)); 171 #error Not compatable 175 am79c961_ramtest(struct net_device
*dev
,unsigned int val
) 177 unsigned char*buffer
=kmalloc(65536, GFP_KERNEL
); 178 int i
, error
=0, errorcount
=0; 182 memset(buffer
, val
,65536); 183 am_writebuffer(dev
,0, buffer
,65536); 184 memset(buffer
, val
^255,65536); 185 am_readbuffer(dev
,0, buffer
,65536); 186 for(i
=0; i
<65536; i
++) { 187 if(buffer
[i
] != val
&& !error
) { 188 printk("%s: buffer error (%02X %02X) %05X - ", dev
->name
, val
, buffer
[i
], i
); 191 }else if(error
&& buffer
[i
] == val
) { 203 am79c961_init_for_open(struct net_device
*dev
) 205 struct dev_priv
*priv
= (struct dev_priv
*)dev
->priv
; 208 u_int hdr_addr
, first_free_addr
; 214 spin_lock_irqsave(priv
->chip_lock
, flags
); 215 write_rreg(dev
->base_addr
, CSR0
, CSR0_BABL
|CSR0_CERR
|CSR0_MISS
|CSR0_MERR
|CSR0_TINT
|CSR0_RINT
|CSR0_STOP
); 216 spin_unlock_irqrestore(priv
->chip_lock
, flags
); 218 write_ireg(dev
->base_addr
,5,0x00a0);/* Receive address LED */ 219 write_ireg(dev
->base_addr
,6,0x0081);/* Collision LED */ 220 write_ireg(dev
->base_addr
,7,0x0090);/* XMIT LED */ 221 write_ireg(dev
->base_addr
,2,0x0000);/* MODE register selects media */ 223 for(i
= LADRL
; i
<= LADRH
; i
++) 224 write_rreg(dev
->base_addr
, i
,0); 226 for(i
= PADRL
, p
= dev
->dev_addr
; i
<= PADRH
; i
++, p
+=2) 227 write_rreg(dev
->base_addr
, i
, p
[0] | (p
[1] <<8)); 230 if(dev
->flags
& IFF_PROMISC
) 233 write_rreg(dev
->base_addr
, MODE
, i
); 234 write_rreg(dev
->base_addr
, POLLINT
,0); 235 write_rreg(dev
->base_addr
, SIZERXR
, -RX_BUFFERS
); 236 write_rreg(dev
->base_addr
, SIZETXR
, -TX_BUFFERS
); 238 first_free_addr
= RX_BUFFERS
*8+ TX_BUFFERS
*8+16; 243 priv
->rxhdr
= hdr_addr
; 245 for(i
=0; i
< RX_BUFFERS
; i
++) { 246 priv
->rxbuffer
[i
] = first_free_addr
; 247 am_writeword(dev
, hdr_addr
, first_free_addr
); 248 am_writeword(dev
, hdr_addr
+2, RMD_OWN
); 249 am_writeword(dev
, hdr_addr
+4, (-1600)); 250 am_writeword(dev
, hdr_addr
+6,0); 251 first_free_addr
+=1600; 256 priv
->txhdr
= hdr_addr
; 257 for(i
=0; i
< TX_BUFFERS
; i
++) { 258 priv
->txbuffer
[i
] = first_free_addr
; 259 am_writeword(dev
, hdr_addr
, first_free_addr
); 260 am_writeword(dev
, hdr_addr
+2, TMD_STP
|TMD_ENP
); 261 am_writeword(dev
, hdr_addr
+4,0xf000); 262 am_writeword(dev
, hdr_addr
+6,0); 263 first_free_addr
+=1600; 267 write_rreg(dev
->base_addr
, BASERXL
, priv
->rxhdr
); 268 write_rreg(dev
->base_addr
, BASERXH
,0); 269 write_rreg(dev
->base_addr
, BASETXL
, priv
->txhdr
); 270 write_rreg(dev
->base_addr
, BASERXH
,0); 271 write_rreg(dev
->base_addr
, CSR0
, CSR0_STOP
); 272 write_rreg(dev
->base_addr
, CSR3
, CSR3_IDONM
|CSR3_BABLM
|CSR3_DXSUFLO
); 273 write_rreg(dev
->base_addr
, CSR0
, CSR0_IENA
|CSR0_STRT
); 277 * Open/initialize the board. This is called (in the current kernel) 278 * sometime after booting when the 'ifconfig' program is run. 280 * This routine should set everything up anew at each open, even 281 * registers that "should" only need to be set once at boot, so that 282 * there is non-reboot way to recover if something goes wrong. 285 am79c961_open(struct net_device
*dev
) 287 struct dev_priv
*priv
= (struct dev_priv
*)dev
->priv
; 290 memset(&priv
->stats
,0,sizeof(priv
->stats
)); 292 ret
=request_irq(dev
->irq
, am79c961_interrupt
,0, dev
->name
, dev
); 296 am79c961_init_for_open(dev
); 298 netif_start_queue(dev
); 304 * The inverse routine to am79c961_open(). 307 am79c961_close(struct net_device
*dev
) 309 struct dev_priv
*priv
= (struct dev_priv
*)dev
->priv
; 312 netif_stop_queue(dev
); 314 spin_lock_irqsave(priv
->chip_lock
, flags
); 315 write_rreg(dev
->base_addr
, CSR0
, CSR0_STOP
); 316 write_rreg(dev
->base_addr
, CSR3
, CSR3_MASKALL
); 317 spin_unlock_irqrestore(priv
->chip_lock
, flags
); 319 free_irq(dev
->irq
, dev
); 325 * Get the current statistics. This may be called with the card open or 328 static struct net_device_stats
*am79c961_getstats(struct net_device
*dev
) 330 struct dev_priv
*priv
= (struct dev_priv
*)dev
->priv
; 334 staticinline u32
update_crc(u32 crc
, u8 byte
) 338 for(i
=8; i
!=0; i
--) { 351 static voidam79c961_mc_hash(struct dev_mc_list
*dmi
,unsigned short*hash
) 353 if(dmi
->dmi_addrlen
== ETH_ALEN
&& dmi
->dmi_addr
[0] &0x01) { 359 for(i
=0; i
< ETH_ALEN
; i
++) 360 crc
=update_crc(crc
, dmi
->dmi_addr
[i
]); 363 bit
= (crc
>>26) &15; 370 * Set or clear promiscuous/multicast mode filter for this adaptor. 372 static voidam79c961_setmulticastlist(struct net_device
*dev
) 374 struct dev_priv
*priv
= (struct dev_priv
*)dev
->priv
; 376 unsigned short multi_hash
[4], mode
; 379 mode
= MODE_PORT_10BT
; 381 if(dev
->flags
& IFF_PROMISC
) { 382 mode
|= MODE_PROMISC
; 383 }else if(dev
->flags
& IFF_ALLMULTI
) { 384 memset(multi_hash
,0xff,sizeof(multi_hash
)); 386 struct dev_mc_list
*dmi
; 388 memset(multi_hash
,0x00,sizeof(multi_hash
)); 390 for(dmi
= dev
->mc_list
; dmi
; dmi
= dmi
->next
) 391 am79c961_mc_hash(dmi
, multi_hash
); 394 spin_lock_irqsave(priv
->chip_lock
, flags
); 396 stopped
=read_rreg(dev
->base_addr
, CSR0
) & CSR0_STOP
; 400 * Put the chip into suspend mode 402 write_rreg(dev
->base_addr
, CTRL1
, CTRL1_SPND
); 405 * Spin waiting for chip to report suspend mode 407 while((read_rreg(dev
->base_addr
, CTRL1
) & CTRL1_SPND
) ==0) { 408 spin_unlock_irqrestore(priv
->chip_lock
, flags
); 410 spin_lock_irqsave(priv
->chip_lock
, flags
); 415 * Update the multicast hash table 417 for(i
=0; i
<sizeof(multi_hash
) /sizeof(multi_hash
[0]); i
++) 418 write_rreg(dev
->base_addr
, i
+ LADRL
, multi_hash
[i
]); 421 * Write the mode register 423 write_rreg(dev
->base_addr
, MODE
, mode
); 427 * Put the chip back into running mode 429 write_rreg(dev
->base_addr
, CTRL1
,0); 432 spin_unlock_irqrestore(priv
->chip_lock
, flags
); 435 static voidam79c961_timeout(struct net_device
*dev
) 437 printk(KERN_WARNING
"%s: transmit timed out, network cable problem?\n", 441 * ought to do some setup of the tx side here 444 netif_wake_queue(dev
); 451 am79c961_sendpacket(struct sk_buff
*skb
,struct net_device
*dev
) 453 struct dev_priv
*priv
= (struct dev_priv
*)dev
->priv
; 454 unsigned int length
= ETH_ZLEN
< skb
->len
? skb
->len
: ETH_ZLEN
; 455 unsigned int hdraddr
, bufaddr
; 460 hdraddr
= priv
->txhdr
+ (head
<<3); 461 bufaddr
= priv
->txbuffer
[head
]; 463 if(head
>= TX_BUFFERS
) 466 am_writebuffer(dev
, bufaddr
, skb
->data
, length
); 467 am_writeword(dev
, hdraddr
+4, -length
); 468 am_writeword(dev
, hdraddr
+2, TMD_OWN
|TMD_STP
|TMD_ENP
); 471 spin_lock_irqsave(priv
->chip_lock
, flags
); 472 write_rreg(dev
->base_addr
, CSR0
, CSR0_TDMD
|CSR0_IENA
); 473 dev
->trans_start
= jiffies
; 474 spin_unlock_irqrestore(priv
->chip_lock
, flags
); 477 * If the next packet is owned by the ethernet device, 478 * then the tx ring is full and we can't add another 481 if(am_readword(dev
, priv
->txhdr
+ (priv
->txhead
<<3) +2) & TMD_OWN
) { 482 printk(KERN_DEBUG
"tx ring full, stopping queue\n"); 483 netif_stop_queue(dev
); 492 * If we have a good packet(s), get it/them out of the buffers. 495 am79c961_rx(struct net_device
*dev
,struct dev_priv
*priv
) 504 hdraddr
= priv
->rxhdr
+ (priv
->rxtail
<<3); 505 pktaddr
= priv
->rxbuffer
[priv
->rxtail
]; 507 status
=am_readword(dev
, hdraddr
+2); 508 if(status
& RMD_OWN
)/* do we own it? */ 512 if(priv
->rxtail
>= RX_BUFFERS
) 515 if((status
& (RMD_ERR
|RMD_STP
|RMD_ENP
)) != (RMD_STP
|RMD_ENP
)) { 516 am_writeword(dev
, hdraddr
+2, RMD_OWN
); 517 priv
->stats
.rx_errors
++; 518 if(status
& RMD_ERR
) { 519 if(status
& RMD_FRAM
) 520 priv
->stats
.rx_frame_errors
++; 522 priv
->stats
.rx_crc_errors
++; 523 }else if(status
& RMD_STP
) 524 priv
->stats
.rx_length_errors
++; 528 len
=am_readword(dev
, hdraddr
+6); 529 skb
=dev_alloc_skb(len
+2); 535 am_readbuffer(dev
, pktaddr
,skb_put(skb
, len
), len
); 536 am_writeword(dev
, hdraddr
+2, RMD_OWN
); 537 skb
->protocol
=eth_type_trans(skb
, dev
); 539 dev
->last_rx
= jiffies
; 540 priv
->stats
.rx_bytes
+= len
; 541 priv
->stats
.rx_packets
++; 543 am_writeword(dev
, hdraddr
+2, RMD_OWN
); 544 printk(KERN_WARNING
"%s: memory squeeze, dropping packet.\n", dev
->name
); 545 priv
->stats
.rx_dropped
++; 552 * Update stats for the transmitted packet 555 am79c961_tx(struct net_device
*dev
,struct dev_priv
*priv
) 562 bufnum
= priv
->txtail
; 563 hdraddr
= priv
->txhdr
+ (priv
->txtail
<<3); 564 status
=am_readword(dev
, hdraddr
+2); 569 if(priv
->txtail
>= TX_BUFFERS
) 572 if(status
& TMD_ERR
) { 575 priv
->stats
.tx_errors
++; 577 status2
=am_readword(dev
, hdraddr
+6); 580 * Clear the error byte 582 am_writeword(dev
, hdraddr
+6,0); 584 if(status2
& TST_RTRY
) 585 priv
->stats
.collisions
+=16; 586 if(status2
& TST_LCOL
) 587 priv
->stats
.tx_window_errors
++; 588 if(status2
& TST_LCAR
) 589 priv
->stats
.tx_carrier_errors
++; 590 if(status2
& TST_UFLO
) 591 priv
->stats
.tx_fifo_errors
++; 594 priv
->stats
.tx_packets
++; 595 }while(priv
->txtail
!= priv
->txhead
); 597 netif_wake_queue(dev
); 601 am79c961_interrupt(int irq
,void*dev_id
,struct pt_regs
*regs
) 603 struct net_device
*dev
= (struct net_device
*)dev_id
; 604 struct dev_priv
*priv
= (struct dev_priv
*)dev
->priv
; 607 status
=read_rreg(dev
->base_addr
, CSR0
); 608 write_rreg(dev
->base_addr
, CSR0
, status
& (CSR0_TINT
|CSR0_RINT
|CSR0_MISS
|CSR0_IENA
)); 610 if(status
& CSR0_RINT
) 611 am79c961_rx(dev
, priv
); 612 if(status
& CSR0_TINT
) 613 am79c961_tx(dev
, priv
); 614 if(status
& CSR0_MISS
) 615 priv
->stats
.rx_dropped
++; 619 * Initialise the chip. Note that we always expect 620 * to be entered with interrupts enabled. 623 am79c961_hw_init(struct net_device
*dev
) 625 struct dev_priv
*priv
= (struct dev_priv
*)dev
->priv
; 627 spin_lock_irq(priv
->chip_lock
); 628 write_rreg(dev
->base_addr
, CSR0
, CSR0_STOP
); 629 write_rreg(dev
->base_addr
, CSR3
, CSR3_MASKALL
); 630 spin_unlock_irq(priv
->chip_lock
); 632 am79c961_ramtest(dev
,0x66); 633 am79c961_ramtest(dev
,0x99); 638 static void __init
am79c961_banner(void) 640 static unsigned version_printed
=0; 642 if(net_debug
&& version_printed
++ ==0) 643 printk(KERN_INFO
"%s", version
); 646 static int __init
am79c961_init(void) 648 struct net_device
*dev
; 649 struct dev_priv
*priv
; 652 dev
=init_etherdev(NULL
,sizeof(struct dev_priv
)); 657 SET_MODULE_OWNER(dev
); 661 * Fixed address and IRQ lines here. 662 * The PNP initialisation should have been 663 * done by the ether bootp loader. 665 dev
->base_addr
=0x220; 666 dev
->irq
= IRQ_EBSA110_ETHERNET
; 671 inb((dev
->base_addr
+ NET_RESET
) >>1); 675 * Check the manufacturer part of the 679 if(inb(dev
->base_addr
>>1) !=0x08|| 680 inb((dev
->base_addr
>>1) +1) !=00|| 681 inb((dev
->base_addr
>>1) +2) !=0x2b) 684 if(!request_region(dev
->base_addr
,0x18, dev
->name
)) 688 printk(KERN_INFO
"%s: am79c961 found at %08lx, IRQ%d, ether address ", 689 dev
->name
, dev
->base_addr
, dev
->irq
); 691 /* Retrive and print the ethernet address. */ 692 for(i
=0; i
<6; i
++) { 693 dev
->dev_addr
[i
] =inb((dev
->base_addr
>>1) + i
) &0xff; 694 printk(i
==5?"%02x\n":"%02x:", dev
->dev_addr
[i
]); 697 if(am79c961_hw_init(dev
)) 700 dev
->open
= am79c961_open
; 701 dev
->stop
= am79c961_close
; 702 dev
->hard_start_xmit
= am79c961_sendpacket
; 703 dev
->get_stats
= am79c961_getstats
; 704 dev
->set_multicast_list
= am79c961_setmulticastlist
; 705 dev
->tx_timeout
= am79c961_timeout
; 710 release_region(dev
->base_addr
,0x18); 712 unregister_netdev(dev
); 718 module_init(am79c961_init
);