]>
Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* lance.c: An AMD LANCE/PCnet ethernet driver for Linux. */ |
2 | /* | |
3 | Written/copyright 1993-1998 by Donald Becker. | |
4 | ||
5 | Copyright 1993 United States Government as represented by the | |
6 | Director, National Security Agency. | |
7 | This software may be used and distributed according to the terms | |
8 | of the GNU General Public License, incorporated herein by reference. | |
9 | ||
10 | This driver is for the Allied Telesis AT1500 and HP J2405A, and should work | |
11 | with most other LANCE-based bus-master (NE2100/NE2500) ethercards. | |
12 | ||
13 | The author may be reached as becker@scyld.com, or C/O | |
14 | Scyld Computing Corporation | |
15 | 410 Severn Ave., Suite 210 | |
16 | Annapolis MD 21403 | |
17 | ||
18 | Andrey V. Savochkin: | |
19 | - alignment problem with 1.3.* kernel and some minor changes. | |
20 | Thomas Bogendoerfer (tsbogend@bigbug.franken.de): | |
21 | - added support for Linux/Alpha, but removed most of it, because | |
22 | it worked only for the PCI chip. | |
23 | - added hook for the 32bit lance driver | |
24 | - added PCnetPCI II (79C970A) to chip table | |
25 | Paul Gortmaker (gpg109@rsphy1.anu.edu.au): | |
26 | - hopefully fix above so Linux/Alpha can use ISA cards too. | |
27 | 8/20/96 Fixed 7990 autoIRQ failure and reversed unneeded alignment -djb | |
28 | v1.12 10/27/97 Module support -djb | |
29 | v1.14 2/3/98 Module support modified, made PCI support optional -djb | |
30 | v1.15 5/27/99 Fixed bug in the cleanup_module(). dev->priv was freed | |
31 | before unregister_netdev() which caused NULL pointer | |
32 | reference later in the chain (in rtnetlink_fill_ifinfo()) | |
33 | -- Mika Kuoppala <miku@iki.fi> | |
34 | ||
35 | Forward ported v1.14 to 2.1.129, merged the PCI and misc changes from | |
36 | the 2.1 version of the old driver - Alan Cox | |
37 | ||
38 | Get rid of check_region, check kmalloc return in lance_probe1 | |
39 | Arnaldo Carvalho de Melo <acme@conectiva.com.br> - 11/01/2001 | |
40 | ||
41 | Reworked detection, added support for Racal InterLan EtherBlaster cards | |
42 | Vesselin Kostadinov <vesok at yahoo dot com > - 22/4/2004 | |
43 | */ | |
44 | ||
45 | static const char version[] = "lance.c:v1.15ac 1999/11/13 dplatt@3do.com, becker@cesdis.gsfc.nasa.gov\n"; | |
46 | ||
47 | #include <linux/module.h> | |
48 | #include <linux/kernel.h> | |
49 | #include <linux/string.h> | |
50 | #include <linux/delay.h> | |
51 | #include <linux/errno.h> | |
52 | #include <linux/ioport.h> | |
53 | #include <linux/slab.h> | |
54 | #include <linux/interrupt.h> | |
55 | #include <linux/pci.h> | |
56 | #include <linux/init.h> | |
57 | #include <linux/netdevice.h> | |
58 | #include <linux/etherdevice.h> | |
59 | #include <linux/skbuff.h> | |
60 | #include <linux/bitops.h> | |
61 | ||
62 | #include <asm/io.h> | |
63 | #include <asm/dma.h> | |
64 | ||
65 | static unsigned int lance_portlist[] __initdata = { 0x300, 0x320, 0x340, 0x360, 0}; | |
66 | static int lance_probe1(struct net_device *dev, int ioaddr, int irq, int options); | |
67 | static int __init do_lance_probe(struct net_device *dev); | |
68 | ||
69 | ||
70 | static struct card { | |
71 | char id_offset14; | |
72 | char id_offset15; | |
73 | } cards[] = { | |
74 | { //"normal" | |
75 | .id_offset14 = 0x57, | |
76 | .id_offset15 = 0x57, | |
77 | }, | |
78 | { //NI6510EB | |
79 | .id_offset14 = 0x52, | |
80 | .id_offset15 = 0x44, | |
81 | }, | |
82 | { //Racal InterLan EtherBlaster | |
83 | .id_offset14 = 0x52, | |
84 | .id_offset15 = 0x49, | |
85 | }, | |
86 | }; | |
87 | #define NUM_CARDS 3 | |
88 | ||
89 | #ifdef LANCE_DEBUG | |
90 | static int lance_debug = LANCE_DEBUG; | |
91 | #else | |
92 | static int lance_debug = 1; | |
93 | #endif | |
94 | ||
95 | /* | |
96 | Theory of Operation | |
97 | ||
98 | I. Board Compatibility | |
99 | ||
100 | This device driver is designed for the AMD 79C960, the "PCnet-ISA | |
101 | single-chip ethernet controller for ISA". This chip is used in a wide | |
102 | variety of boards from vendors such as Allied Telesis, HP, Kingston, | |
103 | and Boca. This driver is also intended to work with older AMD 7990 | |
104 | designs, such as the NE1500 and NE2100, and newer 79C961. For convenience, | |
105 | I use the name LANCE to refer to all of the AMD chips, even though it properly | |
106 | refers only to the original 7990. | |
107 | ||
108 | II. Board-specific settings | |
109 | ||
110 | The driver is designed to work the boards that use the faster | |
111 | bus-master mode, rather than in shared memory mode. (Only older designs | |
112 | have on-board buffer memory needed to support the slower shared memory mode.) | |
113 | ||
114 | Most ISA boards have jumpered settings for the I/O base, IRQ line, and DMA | |
115 | channel. This driver probes the likely base addresses: | |
116 | {0x300, 0x320, 0x340, 0x360}. | |
117 | After the board is found it generates a DMA-timeout interrupt and uses | |
118 | autoIRQ to find the IRQ line. The DMA channel can be set with the low bits | |
119 | of the otherwise-unused dev->mem_start value (aka PARAM1). If unset it is | |
120 | probed for by enabling each free DMA channel in turn and checking if | |
121 | initialization succeeds. | |
122 | ||
123 | The HP-J2405A board is an exception: with this board it is easy to read the | |
124 | EEPROM-set values for the base, IRQ, and DMA. (Of course you must already | |
125 | _know_ the base address -- that field is for writing the EEPROM.) | |
126 | ||
127 | III. Driver operation | |
128 | ||
129 | IIIa. Ring buffers | |
130 | The LANCE uses ring buffers of Tx and Rx descriptors. Each entry describes | |
131 | the base and length of the data buffer, along with status bits. The length | |
132 | of these buffers is set by LANCE_LOG_{RX,TX}_BUFFERS, which is log_2() of | |
133 | the buffer length (rather than being directly the buffer length) for | |
134 | implementation ease. The current values are 2 (Tx) and 4 (Rx), which leads to | |
135 | ring sizes of 4 (Tx) and 16 (Rx). Increasing the number of ring entries | |
136 | needlessly uses extra space and reduces the chance that an upper layer will | |
137 | be able to reorder queued Tx packets based on priority. Decreasing the number | |
138 | of entries makes it more difficult to achieve back-to-back packet transmission | |
139 | and increases the chance that Rx ring will overflow. (Consider the worst case | |
140 | of receiving back-to-back minimum-sized packets.) | |
141 | ||
142 | The LANCE has the capability to "chain" both Rx and Tx buffers, but this driver | |
143 | statically allocates full-sized (slightly oversized -- PKT_BUF_SZ) buffers to | |
144 | avoid the administrative overhead. For the Rx side this avoids dynamically | |
145 | allocating full-sized buffers "just in case", at the expense of a | |
146 | memory-to-memory data copy for each packet received. For most systems this | |
147 | is a good tradeoff: the Rx buffer will always be in low memory, the copy | |
148 | is inexpensive, and it primes the cache for later packet processing. For Tx | |
149 | the buffers are only used when needed as low-memory bounce buffers. | |
150 | ||
151 | IIIB. 16M memory limitations. | |
152 | For the ISA bus master mode all structures used directly by the LANCE, | |
153 | the initialization block, Rx and Tx rings, and data buffers, must be | |
154 | accessible from the ISA bus, i.e. in the lower 16M of real memory. | |
155 | This is a problem for current Linux kernels on >16M machines. The network | |
156 | devices are initialized after memory initialization, and the kernel doles out | |
157 | memory from the top of memory downward. The current solution is to have a | |
158 | special network initialization routine that's called before memory | |
159 | initialization; this will eventually be generalized for all network devices. | |
160 | As mentioned before, low-memory "bounce-buffers" are used when needed. | |
161 | ||
162 | IIIC. Synchronization | |
163 | The driver runs as two independent, single-threaded flows of control. One | |
164 | is the send-packet routine, which enforces single-threaded use by the | |
165 | dev->tbusy flag. The other thread is the interrupt handler, which is single | |
166 | threaded by the hardware and other software. | |
167 | ||
168 | The send packet thread has partial control over the Tx ring and 'dev->tbusy' | |
169 | flag. It sets the tbusy flag whenever it's queuing a Tx packet. If the next | |
170 | queue slot is empty, it clears the tbusy flag when finished otherwise it sets | |
171 | the 'lp->tx_full' flag. | |
172 | ||
173 | The interrupt handler has exclusive control over the Rx ring and records stats | |
174 | from the Tx ring. (The Tx-done interrupt can't be selectively turned off, so | |
175 | we can't avoid the interrupt overhead by having the Tx routine reap the Tx | |
176 | stats.) After reaping the stats, it marks the queue entry as empty by setting | |
177 | the 'base' to zero. Iff the 'lp->tx_full' flag is set, it clears both the | |
178 | tx_full and tbusy flags. | |
179 | ||
180 | */ | |
181 | ||
182 | /* Set the number of Tx and Rx buffers, using Log_2(# buffers). | |
183 | Reasonable default values are 16 Tx buffers, and 16 Rx buffers. | |
184 | That translates to 4 and 4 (16 == 2^^4). | |
185 | This is a compile-time option for efficiency. | |
186 | */ | |
187 | #ifndef LANCE_LOG_TX_BUFFERS | |
188 | #define LANCE_LOG_TX_BUFFERS 4 | |
189 | #define LANCE_LOG_RX_BUFFERS 4 | |
190 | #endif | |
191 | ||
192 | #define TX_RING_SIZE (1 << (LANCE_LOG_TX_BUFFERS)) | |
193 | #define TX_RING_MOD_MASK (TX_RING_SIZE - 1) | |
194 | #define TX_RING_LEN_BITS ((LANCE_LOG_TX_BUFFERS) << 29) | |
195 | ||
196 | #define RX_RING_SIZE (1 << (LANCE_LOG_RX_BUFFERS)) | |
197 | #define RX_RING_MOD_MASK (RX_RING_SIZE - 1) | |
198 | #define RX_RING_LEN_BITS ((LANCE_LOG_RX_BUFFERS) << 29) | |
199 | ||
200 | #define PKT_BUF_SZ 1544 | |
201 | ||
202 | /* Offsets from base I/O address. */ | |
203 | #define LANCE_DATA 0x10 | |
204 | #define LANCE_ADDR 0x12 | |
205 | #define LANCE_RESET 0x14 | |
206 | #define LANCE_BUS_IF 0x16 | |
207 | #define LANCE_TOTAL_SIZE 0x18 | |
208 | ||
209 | #define TX_TIMEOUT 20 | |
210 | ||
211 | /* The LANCE Rx and Tx ring descriptors. */ | |
212 | struct lance_rx_head { | |
213 | s32 base; | |
214 | s16 buf_length; /* This length is 2s complement (negative)! */ | |
215 | s16 msg_length; /* This length is "normal". */ | |
216 | }; | |
217 | ||
218 | struct lance_tx_head { | |
219 | s32 base; | |
220 | s16 length; /* Length is 2s complement (negative)! */ | |
221 | s16 misc; | |
222 | }; | |
223 | ||
224 | /* The LANCE initialization block, described in databook. */ | |
225 | struct lance_init_block { | |
226 | u16 mode; /* Pre-set mode (reg. 15) */ | |
227 | u8 phys_addr[6]; /* Physical ethernet address */ | |
228 | u32 filter[2]; /* Multicast filter (unused). */ | |
229 | /* Receive and transmit ring base, along with extra bits. */ | |
230 | u32 rx_ring; /* Tx and Rx ring base pointers */ | |
231 | u32 tx_ring; | |
232 | }; | |
233 | ||
234 | struct lance_private { | |
235 | /* The Tx and Rx ring entries must be aligned on 8-byte boundaries. */ | |
236 | struct lance_rx_head rx_ring[RX_RING_SIZE]; | |
237 | struct lance_tx_head tx_ring[TX_RING_SIZE]; | |
238 | struct lance_init_block init_block; | |
239 | const char *name; | |
240 | /* The saved address of a sent-in-place packet/buffer, for skfree(). */ | |
241 | struct sk_buff* tx_skbuff[TX_RING_SIZE]; | |
242 | /* The addresses of receive-in-place skbuffs. */ | |
243 | struct sk_buff* rx_skbuff[RX_RING_SIZE]; | |
244 | unsigned long rx_buffs; /* Address of Rx and Tx buffers. */ | |
245 | /* Tx low-memory "bounce buffer" address. */ | |
246 | char (*tx_bounce_buffs)[PKT_BUF_SZ]; | |
247 | int cur_rx, cur_tx; /* The next free ring entry */ | |
248 | int dirty_rx, dirty_tx; /* The ring entries to be free()ed. */ | |
249 | int dma; | |
250 | struct net_device_stats stats; | |
251 | unsigned char chip_version; /* See lance_chip_type. */ | |
252 | spinlock_t devlock; | |
253 | }; | |
254 | ||
255 | #define LANCE_MUST_PAD 0x00000001 | |
256 | #define LANCE_ENABLE_AUTOSELECT 0x00000002 | |
257 | #define LANCE_MUST_REINIT_RING 0x00000004 | |
258 | #define LANCE_MUST_UNRESET 0x00000008 | |
259 | #define LANCE_HAS_MISSED_FRAME 0x00000010 | |
260 | ||
261 | /* A mapping from the chip ID number to the part number and features. | |
262 | These are from the datasheets -- in real life the '970 version | |
263 | reportedly has the same ID as the '965. */ | |
264 | static struct lance_chip_type { | |
265 | int id_number; | |
266 | const char *name; | |
267 | int flags; | |
268 | } chip_table[] = { | |
269 | {0x0000, "LANCE 7990", /* Ancient lance chip. */ | |
270 | LANCE_MUST_PAD + LANCE_MUST_UNRESET}, | |
271 | {0x0003, "PCnet/ISA 79C960", /* 79C960 PCnet/ISA. */ | |
272 | LANCE_ENABLE_AUTOSELECT + LANCE_MUST_REINIT_RING + | |
273 | LANCE_HAS_MISSED_FRAME}, | |
274 | {0x2260, "PCnet/ISA+ 79C961", /* 79C961 PCnet/ISA+, Plug-n-Play. */ | |
275 | LANCE_ENABLE_AUTOSELECT + LANCE_MUST_REINIT_RING + | |
276 | LANCE_HAS_MISSED_FRAME}, | |
277 | {0x2420, "PCnet/PCI 79C970", /* 79C970 or 79C974 PCnet-SCSI, PCI. */ | |
278 | LANCE_ENABLE_AUTOSELECT + LANCE_MUST_REINIT_RING + | |
279 | LANCE_HAS_MISSED_FRAME}, | |
280 | /* Bug: the PCnet/PCI actually uses the PCnet/VLB ID number, so just call | |
281 | it the PCnet32. */ | |
282 | {0x2430, "PCnet32", /* 79C965 PCnet for VL bus. */ | |
283 | LANCE_ENABLE_AUTOSELECT + LANCE_MUST_REINIT_RING + | |
284 | LANCE_HAS_MISSED_FRAME}, | |
285 | {0x2621, "PCnet/PCI-II 79C970A", /* 79C970A PCInetPCI II. */ | |
286 | LANCE_ENABLE_AUTOSELECT + LANCE_MUST_REINIT_RING + | |
287 | LANCE_HAS_MISSED_FRAME}, | |
288 | {0x0, "PCnet (unknown)", | |
289 | LANCE_ENABLE_AUTOSELECT + LANCE_MUST_REINIT_RING + | |
290 | LANCE_HAS_MISSED_FRAME}, | |
291 | }; | |
292 | ||
293 | enum {OLD_LANCE = 0, PCNET_ISA=1, PCNET_ISAP=2, PCNET_PCI=3, PCNET_VLB=4, PCNET_PCI_II=5, LANCE_UNKNOWN=6}; | |
294 | ||
295 | ||
296 | /* Non-zero if lance_probe1() needs to allocate low-memory bounce buffers. | |
297 | Assume yes until we know the memory size. */ | |
298 | static unsigned char lance_need_isa_bounce_buffers = 1; | |
299 | ||
300 | static int lance_open(struct net_device *dev); | |
9e24974d | 301 | static void lance_init_ring(struct net_device *dev, gfp_t mode); |
1da177e4 LT |
302 | static int lance_start_xmit(struct sk_buff *skb, struct net_device *dev); |
303 | static int lance_rx(struct net_device *dev); | |
304 | static irqreturn_t lance_interrupt(int irq, void *dev_id, struct pt_regs *regs); | |
305 | static int lance_close(struct net_device *dev); | |
306 | static struct net_device_stats *lance_get_stats(struct net_device *dev); | |
307 | static void set_multicast_list(struct net_device *dev); | |
308 | static void lance_tx_timeout (struct net_device *dev); | |
309 | ||
310 | \f | |
311 | ||
1da177e4 LT |
312 | #ifdef MODULE |
313 | #define MAX_CARDS 8 /* Max number of interfaces (cards) per module */ | |
314 | ||
315 | static struct net_device *dev_lance[MAX_CARDS]; | |
316 | static int io[MAX_CARDS]; | |
317 | static int dma[MAX_CARDS]; | |
318 | static int irq[MAX_CARDS]; | |
319 | ||
320 | module_param_array(io, int, NULL, 0); | |
321 | module_param_array(dma, int, NULL, 0); | |
322 | module_param_array(irq, int, NULL, 0); | |
323 | module_param(lance_debug, int, 0); | |
324 | MODULE_PARM_DESC(io, "LANCE/PCnet I/O base address(es),required"); | |
325 | MODULE_PARM_DESC(dma, "LANCE/PCnet ISA DMA channel (ignored for some devices)"); | |
326 | MODULE_PARM_DESC(irq, "LANCE/PCnet IRQ number (ignored for some devices)"); | |
327 | MODULE_PARM_DESC(lance_debug, "LANCE/PCnet debug level (0-7)"); | |
328 | ||
329 | int init_module(void) | |
330 | { | |
331 | struct net_device *dev; | |
332 | int this_dev, found = 0; | |
333 | ||
334 | for (this_dev = 0; this_dev < MAX_CARDS; this_dev++) { | |
335 | if (io[this_dev] == 0) { | |
336 | if (this_dev != 0) /* only complain once */ | |
337 | break; | |
338 | printk(KERN_NOTICE "lance.c: Module autoprobing not allowed. Append \"io=0xNNN\" value(s).\n"); | |
339 | return -EPERM; | |
340 | } | |
341 | dev = alloc_etherdev(0); | |
342 | if (!dev) | |
343 | break; | |
344 | dev->irq = irq[this_dev]; | |
345 | dev->base_addr = io[this_dev]; | |
346 | dev->dma = dma[this_dev]; | |
347 | if (do_lance_probe(dev) == 0) { | |
b1fc5505 HX |
348 | dev_lance[found++] = dev; |
349 | continue; | |
1da177e4 LT |
350 | } |
351 | free_netdev(dev); | |
352 | break; | |
353 | } | |
354 | if (found != 0) | |
355 | return 0; | |
356 | return -ENXIO; | |
357 | } | |
358 | ||
64916f1e DV |
359 | static void cleanup_card(struct net_device *dev) |
360 | { | |
361 | struct lance_private *lp = dev->priv; | |
362 | if (dev->dma != 4) | |
363 | free_dma(dev->dma); | |
364 | release_region(dev->base_addr, LANCE_TOTAL_SIZE); | |
365 | kfree(lp->tx_bounce_buffs); | |
366 | kfree((void*)lp->rx_buffs); | |
367 | kfree(lp); | |
368 | } | |
369 | ||
1da177e4 LT |
370 | void cleanup_module(void) |
371 | { | |
372 | int this_dev; | |
373 | ||
374 | for (this_dev = 0; this_dev < MAX_CARDS; this_dev++) { | |
375 | struct net_device *dev = dev_lance[this_dev]; | |
376 | if (dev) { | |
377 | unregister_netdev(dev); | |
378 | cleanup_card(dev); | |
379 | free_netdev(dev); | |
380 | } | |
381 | } | |
382 | } | |
383 | #endif /* MODULE */ | |
384 | MODULE_LICENSE("GPL"); | |
385 | ||
386 | ||
387 | /* Starting in v2.1.*, the LANCE/PCnet probe is now similar to the other | |
388 | board probes now that kmalloc() can allocate ISA DMA-able regions. | |
389 | This also allows the LANCE driver to be used as a module. | |
390 | */ | |
391 | static int __init do_lance_probe(struct net_device *dev) | |
392 | { | |
393 | int *port, result; | |
394 | ||
395 | if (high_memory <= phys_to_virt(16*1024*1024)) | |
396 | lance_need_isa_bounce_buffers = 0; | |
397 | ||
398 | for (port = lance_portlist; *port; port++) { | |
399 | int ioaddr = *port; | |
400 | struct resource *r = request_region(ioaddr, LANCE_TOTAL_SIZE, | |
401 | "lance-probe"); | |
402 | ||
403 | if (r) { | |
404 | /* Detect the card with minimal I/O reads */ | |
405 | char offset14 = inb(ioaddr + 14); | |
406 | int card; | |
407 | for (card = 0; card < NUM_CARDS; ++card) | |
408 | if (cards[card].id_offset14 == offset14) | |
409 | break; | |
410 | if (card < NUM_CARDS) {/*yes, the first byte matches*/ | |
411 | char offset15 = inb(ioaddr + 15); | |
412 | for (card = 0; card < NUM_CARDS; ++card) | |
413 | if ((cards[card].id_offset14 == offset14) && | |
414 | (cards[card].id_offset15 == offset15)) | |
415 | break; | |
416 | } | |
417 | if (card < NUM_CARDS) { /*Signature OK*/ | |
418 | result = lance_probe1(dev, ioaddr, 0, 0); | |
419 | if (!result) { | |
420 | struct lance_private *lp = dev->priv; | |
421 | int ver = lp->chip_version; | |
422 | ||
423 | r->name = chip_table[ver].name; | |
424 | return 0; | |
425 | } | |
426 | } | |
427 | release_region(ioaddr, LANCE_TOTAL_SIZE); | |
428 | } | |
429 | } | |
430 | return -ENODEV; | |
431 | } | |
432 | ||
433 | #ifndef MODULE | |
434 | struct net_device * __init lance_probe(int unit) | |
435 | { | |
436 | struct net_device *dev = alloc_etherdev(0); | |
437 | int err; | |
438 | ||
439 | if (!dev) | |
440 | return ERR_PTR(-ENODEV); | |
441 | ||
442 | sprintf(dev->name, "eth%d", unit); | |
443 | netdev_boot_setup_check(dev); | |
444 | ||
445 | err = do_lance_probe(dev); | |
446 | if (err) | |
447 | goto out; | |
1da177e4 | 448 | return dev; |
1da177e4 LT |
449 | out: |
450 | free_netdev(dev); | |
451 | return ERR_PTR(err); | |
452 | } | |
453 | #endif | |
454 | ||
455 | static int __init lance_probe1(struct net_device *dev, int ioaddr, int irq, int options) | |
456 | { | |
457 | struct lance_private *lp; | |
458 | long dma_channels; /* Mark spuriously-busy DMA channels */ | |
459 | int i, reset_val, lance_version; | |
460 | const char *chipname; | |
461 | /* Flags for specific chips or boards. */ | |
462 | unsigned char hpJ2405A = 0; /* HP ISA adaptor */ | |
463 | int hp_builtin = 0; /* HP on-board ethernet. */ | |
464 | static int did_version; /* Already printed version info. */ | |
465 | unsigned long flags; | |
466 | int err = -ENOMEM; | |
c44fec11 | 467 | void __iomem *bios; |
1da177e4 LT |
468 | |
469 | /* First we look for special cases. | |
470 | Check for HP's on-board ethernet by looking for 'HP' in the BIOS. | |
471 | There are two HP versions, check the BIOS for the configuration port. | |
472 | This method provided by L. Julliard, Laurent_Julliard@grenoble.hp.com. | |
473 | */ | |
c44fec11 AV |
474 | bios = ioremap(0xf00f0, 0x14); |
475 | if (!bios) | |
476 | return -ENOMEM; | |
477 | if (readw(bios + 0x12) == 0x5048) { | |
1da177e4 | 478 | static const short ioaddr_table[] = { 0x300, 0x320, 0x340, 0x360}; |
c44fec11 | 479 | int hp_port = (readl(bios + 1) & 1) ? 0x499 : 0x99; |
1da177e4 LT |
480 | /* We can have boards other than the built-in! Verify this is on-board. */ |
481 | if ((inb(hp_port) & 0xc0) == 0x80 | |
482 | && ioaddr_table[inb(hp_port) & 3] == ioaddr) | |
483 | hp_builtin = hp_port; | |
484 | } | |
c44fec11 | 485 | iounmap(bios); |
1da177e4 LT |
486 | /* We also recognize the HP Vectra on-board here, but check below. */ |
487 | hpJ2405A = (inb(ioaddr) == 0x08 && inb(ioaddr+1) == 0x00 | |
488 | && inb(ioaddr+2) == 0x09); | |
489 | ||
490 | /* Reset the LANCE. */ | |
491 | reset_val = inw(ioaddr+LANCE_RESET); /* Reset the LANCE */ | |
492 | ||
493 | /* The Un-Reset needed is only needed for the real NE2100, and will | |
494 | confuse the HP board. */ | |
495 | if (!hpJ2405A) | |
496 | outw(reset_val, ioaddr+LANCE_RESET); | |
497 | ||
498 | outw(0x0000, ioaddr+LANCE_ADDR); /* Switch to window 0 */ | |
499 | if (inw(ioaddr+LANCE_DATA) != 0x0004) | |
500 | return -ENODEV; | |
501 | ||
502 | /* Get the version of the chip. */ | |
503 | outw(88, ioaddr+LANCE_ADDR); | |
504 | if (inw(ioaddr+LANCE_ADDR) != 88) { | |
505 | lance_version = 0; | |
506 | } else { /* Good, it's a newer chip. */ | |
507 | int chip_version = inw(ioaddr+LANCE_DATA); | |
508 | outw(89, ioaddr+LANCE_ADDR); | |
509 | chip_version |= inw(ioaddr+LANCE_DATA) << 16; | |
510 | if (lance_debug > 2) | |
511 | printk(" LANCE chip version is %#x.\n", chip_version); | |
512 | if ((chip_version & 0xfff) != 0x003) | |
513 | return -ENODEV; | |
514 | chip_version = (chip_version >> 12) & 0xffff; | |
515 | for (lance_version = 1; chip_table[lance_version].id_number; lance_version++) { | |
516 | if (chip_table[lance_version].id_number == chip_version) | |
517 | break; | |
518 | } | |
519 | } | |
520 | ||
521 | /* We can't allocate dev->priv from alloc_etherdev() because it must | |
522 | a ISA DMA-able region. */ | |
523 | SET_MODULE_OWNER(dev); | |
524 | chipname = chip_table[lance_version].name; | |
525 | printk("%s: %s at %#3x,", dev->name, chipname, ioaddr); | |
526 | ||
527 | /* There is a 16 byte station address PROM at the base address. | |
528 | The first six bytes are the station address. */ | |
529 | for (i = 0; i < 6; i++) | |
530 | printk(" %2.2x", dev->dev_addr[i] = inb(ioaddr + i)); | |
531 | ||
532 | dev->base_addr = ioaddr; | |
533 | /* Make certain the data structures used by the LANCE are aligned and DMAble. */ | |
534 | ||
535 | lp = kmalloc(sizeof(*lp), GFP_DMA | GFP_KERNEL); | |
536 | if(lp==NULL) | |
537 | return -ENODEV; | |
538 | if (lance_debug > 6) printk(" (#0x%05lx)", (unsigned long)lp); | |
539 | memset(lp, 0, sizeof(*lp)); | |
540 | dev->priv = lp; | |
541 | lp->name = chipname; | |
542 | lp->rx_buffs = (unsigned long)kmalloc(PKT_BUF_SZ*RX_RING_SIZE, | |
543 | GFP_DMA | GFP_KERNEL); | |
544 | if (!lp->rx_buffs) | |
545 | goto out_lp; | |
546 | if (lance_need_isa_bounce_buffers) { | |
547 | lp->tx_bounce_buffs = kmalloc(PKT_BUF_SZ*TX_RING_SIZE, | |
548 | GFP_DMA | GFP_KERNEL); | |
549 | if (!lp->tx_bounce_buffs) | |
550 | goto out_rx; | |
551 | } else | |
552 | lp->tx_bounce_buffs = NULL; | |
553 | ||
554 | lp->chip_version = lance_version; | |
555 | spin_lock_init(&lp->devlock); | |
556 | ||
557 | lp->init_block.mode = 0x0003; /* Disable Rx and Tx. */ | |
558 | for (i = 0; i < 6; i++) | |
559 | lp->init_block.phys_addr[i] = dev->dev_addr[i]; | |
560 | lp->init_block.filter[0] = 0x00000000; | |
561 | lp->init_block.filter[1] = 0x00000000; | |
562 | lp->init_block.rx_ring = ((u32)isa_virt_to_bus(lp->rx_ring) & 0xffffff) | RX_RING_LEN_BITS; | |
563 | lp->init_block.tx_ring = ((u32)isa_virt_to_bus(lp->tx_ring) & 0xffffff) | TX_RING_LEN_BITS; | |
564 | ||
565 | outw(0x0001, ioaddr+LANCE_ADDR); | |
566 | inw(ioaddr+LANCE_ADDR); | |
567 | outw((short) (u32) isa_virt_to_bus(&lp->init_block), ioaddr+LANCE_DATA); | |
568 | outw(0x0002, ioaddr+LANCE_ADDR); | |
569 | inw(ioaddr+LANCE_ADDR); | |
570 | outw(((u32)isa_virt_to_bus(&lp->init_block)) >> 16, ioaddr+LANCE_DATA); | |
571 | outw(0x0000, ioaddr+LANCE_ADDR); | |
572 | inw(ioaddr+LANCE_ADDR); | |
573 | ||
574 | if (irq) { /* Set iff PCI card. */ | |
575 | dev->dma = 4; /* Native bus-master, no DMA channel needed. */ | |
576 | dev->irq = irq; | |
577 | } else if (hp_builtin) { | |
578 | static const char dma_tbl[4] = {3, 5, 6, 0}; | |
579 | static const char irq_tbl[4] = {3, 4, 5, 9}; | |
580 | unsigned char port_val = inb(hp_builtin); | |
581 | dev->dma = dma_tbl[(port_val >> 4) & 3]; | |
582 | dev->irq = irq_tbl[(port_val >> 2) & 3]; | |
583 | printk(" HP Vectra IRQ %d DMA %d.\n", dev->irq, dev->dma); | |
584 | } else if (hpJ2405A) { | |
585 | static const char dma_tbl[4] = {3, 5, 6, 7}; | |
586 | static const char irq_tbl[8] = {3, 4, 5, 9, 10, 11, 12, 15}; | |
587 | short reset_val = inw(ioaddr+LANCE_RESET); | |
588 | dev->dma = dma_tbl[(reset_val >> 2) & 3]; | |
589 | dev->irq = irq_tbl[(reset_val >> 4) & 7]; | |
590 | printk(" HP J2405A IRQ %d DMA %d.\n", dev->irq, dev->dma); | |
591 | } else if (lance_version == PCNET_ISAP) { /* The plug-n-play version. */ | |
592 | short bus_info; | |
593 | outw(8, ioaddr+LANCE_ADDR); | |
594 | bus_info = inw(ioaddr+LANCE_BUS_IF); | |
595 | dev->dma = bus_info & 0x07; | |
596 | dev->irq = (bus_info >> 4) & 0x0F; | |
597 | } else { | |
598 | /* The DMA channel may be passed in PARAM1. */ | |
599 | if (dev->mem_start & 0x07) | |
600 | dev->dma = dev->mem_start & 0x07; | |
601 | } | |
602 | ||
603 | if (dev->dma == 0) { | |
604 | /* Read the DMA channel status register, so that we can avoid | |
605 | stuck DMA channels in the DMA detection below. */ | |
606 | dma_channels = ((inb(DMA1_STAT_REG) >> 4) & 0x0f) | | |
607 | (inb(DMA2_STAT_REG) & 0xf0); | |
608 | } | |
609 | err = -ENODEV; | |
610 | if (dev->irq >= 2) | |
611 | printk(" assigned IRQ %d", dev->irq); | |
612 | else if (lance_version != 0) { /* 7990 boards need DMA detection first. */ | |
613 | unsigned long irq_mask; | |
614 | ||
615 | /* To auto-IRQ we enable the initialization-done and DMA error | |
616 | interrupts. For ISA boards we get a DMA error, but VLB and PCI | |
617 | boards will work. */ | |
618 | irq_mask = probe_irq_on(); | |
619 | ||
620 | /* Trigger an initialization just for the interrupt. */ | |
621 | outw(0x0041, ioaddr+LANCE_DATA); | |
622 | ||
623 | mdelay(20); | |
624 | dev->irq = probe_irq_off(irq_mask); | |
625 | if (dev->irq) | |
626 | printk(", probed IRQ %d", dev->irq); | |
627 | else { | |
628 | printk(", failed to detect IRQ line.\n"); | |
629 | goto out_tx; | |
630 | } | |
631 | ||
632 | /* Check for the initialization done bit, 0x0100, which means | |
633 | that we don't need a DMA channel. */ | |
634 | if (inw(ioaddr+LANCE_DATA) & 0x0100) | |
635 | dev->dma = 4; | |
636 | } | |
637 | ||
638 | if (dev->dma == 4) { | |
639 | printk(", no DMA needed.\n"); | |
640 | } else if (dev->dma) { | |
641 | if (request_dma(dev->dma, chipname)) { | |
642 | printk("DMA %d allocation failed.\n", dev->dma); | |
643 | goto out_tx; | |
644 | } else | |
645 | printk(", assigned DMA %d.\n", dev->dma); | |
646 | } else { /* OK, we have to auto-DMA. */ | |
647 | for (i = 0; i < 4; i++) { | |
648 | static const char dmas[] = { 5, 6, 7, 3 }; | |
649 | int dma = dmas[i]; | |
650 | int boguscnt; | |
651 | ||
652 | /* Don't enable a permanently busy DMA channel, or the machine | |
653 | will hang. */ | |
654 | if (test_bit(dma, &dma_channels)) | |
655 | continue; | |
656 | outw(0x7f04, ioaddr+LANCE_DATA); /* Clear the memory error bits. */ | |
657 | if (request_dma(dma, chipname)) | |
658 | continue; | |
659 | ||
660 | flags=claim_dma_lock(); | |
661 | set_dma_mode(dma, DMA_MODE_CASCADE); | |
662 | enable_dma(dma); | |
663 | release_dma_lock(flags); | |
664 | ||
665 | /* Trigger an initialization. */ | |
666 | outw(0x0001, ioaddr+LANCE_DATA); | |
667 | for (boguscnt = 100; boguscnt > 0; --boguscnt) | |
668 | if (inw(ioaddr+LANCE_DATA) & 0x0900) | |
669 | break; | |
670 | if (inw(ioaddr+LANCE_DATA) & 0x0100) { | |
671 | dev->dma = dma; | |
672 | printk(", DMA %d.\n", dev->dma); | |
673 | break; | |
674 | } else { | |
675 | flags=claim_dma_lock(); | |
676 | disable_dma(dma); | |
677 | release_dma_lock(flags); | |
678 | free_dma(dma); | |
679 | } | |
680 | } | |
681 | if (i == 4) { /* Failure: bail. */ | |
682 | printk("DMA detection failed.\n"); | |
683 | goto out_tx; | |
684 | } | |
685 | } | |
686 | ||
687 | if (lance_version == 0 && dev->irq == 0) { | |
688 | /* We may auto-IRQ now that we have a DMA channel. */ | |
689 | /* Trigger an initialization just for the interrupt. */ | |
690 | unsigned long irq_mask; | |
691 | ||
692 | irq_mask = probe_irq_on(); | |
693 | outw(0x0041, ioaddr+LANCE_DATA); | |
694 | ||
695 | mdelay(40); | |
696 | dev->irq = probe_irq_off(irq_mask); | |
697 | if (dev->irq == 0) { | |
698 | printk(" Failed to detect the 7990 IRQ line.\n"); | |
699 | goto out_dma; | |
700 | } | |
701 | printk(" Auto-IRQ detected IRQ%d.\n", dev->irq); | |
702 | } | |
703 | ||
704 | if (chip_table[lp->chip_version].flags & LANCE_ENABLE_AUTOSELECT) { | |
705 | /* Turn on auto-select of media (10baseT or BNC) so that the user | |
706 | can watch the LEDs even if the board isn't opened. */ | |
707 | outw(0x0002, ioaddr+LANCE_ADDR); | |
708 | /* Don't touch 10base2 power bit. */ | |
709 | outw(inw(ioaddr+LANCE_BUS_IF) | 0x0002, ioaddr+LANCE_BUS_IF); | |
710 | } | |
711 | ||
712 | if (lance_debug > 0 && did_version++ == 0) | |
713 | printk(version); | |
714 | ||
715 | /* The LANCE-specific entries in the device structure. */ | |
716 | dev->open = lance_open; | |
717 | dev->hard_start_xmit = lance_start_xmit; | |
718 | dev->stop = lance_close; | |
719 | dev->get_stats = lance_get_stats; | |
720 | dev->set_multicast_list = set_multicast_list; | |
721 | dev->tx_timeout = lance_tx_timeout; | |
722 | dev->watchdog_timeo = TX_TIMEOUT; | |
723 | ||
b1fc5505 HX |
724 | err = register_netdev(dev); |
725 | if (err) | |
726 | goto out_dma; | |
1da177e4 LT |
727 | return 0; |
728 | out_dma: | |
729 | if (dev->dma != 4) | |
730 | free_dma(dev->dma); | |
731 | out_tx: | |
732 | kfree(lp->tx_bounce_buffs); | |
733 | out_rx: | |
734 | kfree((void*)lp->rx_buffs); | |
735 | out_lp: | |
736 | kfree(lp); | |
737 | return err; | |
738 | } | |
739 | ||
740 | \f | |
741 | static int | |
742 | lance_open(struct net_device *dev) | |
743 | { | |
744 | struct lance_private *lp = dev->priv; | |
745 | int ioaddr = dev->base_addr; | |
746 | int i; | |
747 | ||
748 | if (dev->irq == 0 || | |
749 | request_irq(dev->irq, &lance_interrupt, 0, lp->name, dev)) { | |
750 | return -EAGAIN; | |
751 | } | |
752 | ||
753 | /* We used to allocate DMA here, but that was silly. | |
754 | DMA lines can't be shared! We now permanently allocate them. */ | |
755 | ||
756 | /* Reset the LANCE */ | |
757 | inw(ioaddr+LANCE_RESET); | |
758 | ||
759 | /* The DMA controller is used as a no-operation slave, "cascade mode". */ | |
760 | if (dev->dma != 4) { | |
761 | unsigned long flags=claim_dma_lock(); | |
762 | enable_dma(dev->dma); | |
763 | set_dma_mode(dev->dma, DMA_MODE_CASCADE); | |
764 | release_dma_lock(flags); | |
765 | } | |
766 | ||
767 | /* Un-Reset the LANCE, needed only for the NE2100. */ | |
768 | if (chip_table[lp->chip_version].flags & LANCE_MUST_UNRESET) | |
769 | outw(0, ioaddr+LANCE_RESET); | |
770 | ||
771 | if (chip_table[lp->chip_version].flags & LANCE_ENABLE_AUTOSELECT) { | |
772 | /* This is 79C960-specific: Turn on auto-select of media (AUI, BNC). */ | |
773 | outw(0x0002, ioaddr+LANCE_ADDR); | |
774 | /* Only touch autoselect bit. */ | |
775 | outw(inw(ioaddr+LANCE_BUS_IF) | 0x0002, ioaddr+LANCE_BUS_IF); | |
776 | } | |
777 | ||
778 | if (lance_debug > 1) | |
779 | printk("%s: lance_open() irq %d dma %d tx/rx rings %#x/%#x init %#x.\n", | |
780 | dev->name, dev->irq, dev->dma, | |
781 | (u32) isa_virt_to_bus(lp->tx_ring), | |
782 | (u32) isa_virt_to_bus(lp->rx_ring), | |
783 | (u32) isa_virt_to_bus(&lp->init_block)); | |
784 | ||
785 | lance_init_ring(dev, GFP_KERNEL); | |
786 | /* Re-initialize the LANCE, and start it when done. */ | |
787 | outw(0x0001, ioaddr+LANCE_ADDR); | |
788 | outw((short) (u32) isa_virt_to_bus(&lp->init_block), ioaddr+LANCE_DATA); | |
789 | outw(0x0002, ioaddr+LANCE_ADDR); | |
790 | outw(((u32)isa_virt_to_bus(&lp->init_block)) >> 16, ioaddr+LANCE_DATA); | |
791 | ||
792 | outw(0x0004, ioaddr+LANCE_ADDR); | |
793 | outw(0x0915, ioaddr+LANCE_DATA); | |
794 | ||
795 | outw(0x0000, ioaddr+LANCE_ADDR); | |
796 | outw(0x0001, ioaddr+LANCE_DATA); | |
797 | ||
798 | netif_start_queue (dev); | |
799 | ||
800 | i = 0; | |
801 | while (i++ < 100) | |
802 | if (inw(ioaddr+LANCE_DATA) & 0x0100) | |
803 | break; | |
804 | /* | |
805 | * We used to clear the InitDone bit, 0x0100, here but Mark Stockton | |
806 | * reports that doing so triggers a bug in the '974. | |
807 | */ | |
808 | outw(0x0042, ioaddr+LANCE_DATA); | |
809 | ||
810 | if (lance_debug > 2) | |
811 | printk("%s: LANCE open after %d ticks, init block %#x csr0 %4.4x.\n", | |
812 | dev->name, i, (u32) isa_virt_to_bus(&lp->init_block), inw(ioaddr+LANCE_DATA)); | |
813 | ||
814 | return 0; /* Always succeed */ | |
815 | } | |
816 | ||
817 | /* The LANCE has been halted for one reason or another (busmaster memory | |
818 | arbitration error, Tx FIFO underflow, driver stopped it to reconfigure, | |
819 | etc.). Modern LANCE variants always reload their ring-buffer | |
820 | configuration when restarted, so we must reinitialize our ring | |
821 | context before restarting. As part of this reinitialization, | |
822 | find all packets still on the Tx ring and pretend that they had been | |
823 | sent (in effect, drop the packets on the floor) - the higher-level | |
824 | protocols will time out and retransmit. It'd be better to shuffle | |
825 | these skbs to a temp list and then actually re-Tx them after | |
826 | restarting the chip, but I'm too lazy to do so right now. dplatt@3do.com | |
827 | */ | |
828 | ||
829 | static void | |
830 | lance_purge_ring(struct net_device *dev) | |
831 | { | |
832 | struct lance_private *lp = dev->priv; | |
833 | int i; | |
834 | ||
835 | /* Free all the skbuffs in the Rx and Tx queues. */ | |
836 | for (i = 0; i < RX_RING_SIZE; i++) { | |
837 | struct sk_buff *skb = lp->rx_skbuff[i]; | |
838 | lp->rx_skbuff[i] = NULL; | |
839 | lp->rx_ring[i].base = 0; /* Not owned by LANCE chip. */ | |
840 | if (skb) | |
841 | dev_kfree_skb_any(skb); | |
842 | } | |
843 | for (i = 0; i < TX_RING_SIZE; i++) { | |
844 | if (lp->tx_skbuff[i]) { | |
845 | dev_kfree_skb_any(lp->tx_skbuff[i]); | |
846 | lp->tx_skbuff[i] = NULL; | |
847 | } | |
848 | } | |
849 | } | |
850 | ||
851 | ||
852 | /* Initialize the LANCE Rx and Tx rings. */ | |
853 | static void | |
9e24974d | 854 | lance_init_ring(struct net_device *dev, gfp_t gfp) |
1da177e4 LT |
855 | { |
856 | struct lance_private *lp = dev->priv; | |
857 | int i; | |
858 | ||
859 | lp->cur_rx = lp->cur_tx = 0; | |
860 | lp->dirty_rx = lp->dirty_tx = 0; | |
861 | ||
862 | for (i = 0; i < RX_RING_SIZE; i++) { | |
863 | struct sk_buff *skb; | |
864 | void *rx_buff; | |
865 | ||
866 | skb = alloc_skb(PKT_BUF_SZ, GFP_DMA | gfp); | |
867 | lp->rx_skbuff[i] = skb; | |
868 | if (skb) { | |
869 | skb->dev = dev; | |
689be439 | 870 | rx_buff = skb->data; |
1da177e4 LT |
871 | } else |
872 | rx_buff = kmalloc(PKT_BUF_SZ, GFP_DMA | gfp); | |
873 | if (rx_buff == NULL) | |
874 | lp->rx_ring[i].base = 0; | |
875 | else | |
876 | lp->rx_ring[i].base = (u32)isa_virt_to_bus(rx_buff) | 0x80000000; | |
877 | lp->rx_ring[i].buf_length = -PKT_BUF_SZ; | |
878 | } | |
879 | /* The Tx buffer address is filled in as needed, but we do need to clear | |
880 | the upper ownership bit. */ | |
881 | for (i = 0; i < TX_RING_SIZE; i++) { | |
882 | lp->tx_skbuff[i] = NULL; | |
883 | lp->tx_ring[i].base = 0; | |
884 | } | |
885 | ||
886 | lp->init_block.mode = 0x0000; | |
887 | for (i = 0; i < 6; i++) | |
888 | lp->init_block.phys_addr[i] = dev->dev_addr[i]; | |
889 | lp->init_block.filter[0] = 0x00000000; | |
890 | lp->init_block.filter[1] = 0x00000000; | |
891 | lp->init_block.rx_ring = ((u32)isa_virt_to_bus(lp->rx_ring) & 0xffffff) | RX_RING_LEN_BITS; | |
892 | lp->init_block.tx_ring = ((u32)isa_virt_to_bus(lp->tx_ring) & 0xffffff) | TX_RING_LEN_BITS; | |
893 | } | |
894 | ||
895 | static void | |
896 | lance_restart(struct net_device *dev, unsigned int csr0_bits, int must_reinit) | |
897 | { | |
898 | struct lance_private *lp = dev->priv; | |
899 | ||
900 | if (must_reinit || | |
901 | (chip_table[lp->chip_version].flags & LANCE_MUST_REINIT_RING)) { | |
902 | lance_purge_ring(dev); | |
903 | lance_init_ring(dev, GFP_ATOMIC); | |
904 | } | |
905 | outw(0x0000, dev->base_addr + LANCE_ADDR); | |
906 | outw(csr0_bits, dev->base_addr + LANCE_DATA); | |
907 | } | |
908 | ||
909 | ||
910 | static void lance_tx_timeout (struct net_device *dev) | |
911 | { | |
912 | struct lance_private *lp = (struct lance_private *) dev->priv; | |
913 | int ioaddr = dev->base_addr; | |
914 | ||
915 | outw (0, ioaddr + LANCE_ADDR); | |
916 | printk ("%s: transmit timed out, status %4.4x, resetting.\n", | |
917 | dev->name, inw (ioaddr + LANCE_DATA)); | |
918 | outw (0x0004, ioaddr + LANCE_DATA); | |
919 | lp->stats.tx_errors++; | |
920 | #ifndef final_version | |
921 | if (lance_debug > 3) { | |
922 | int i; | |
923 | printk (" Ring data dump: dirty_tx %d cur_tx %d%s cur_rx %d.", | |
924 | lp->dirty_tx, lp->cur_tx, netif_queue_stopped(dev) ? " (full)" : "", | |
925 | lp->cur_rx); | |
926 | for (i = 0; i < RX_RING_SIZE; i++) | |
927 | printk ("%s %08x %04x %04x", i & 0x3 ? "" : "\n ", | |
928 | lp->rx_ring[i].base, -lp->rx_ring[i].buf_length, | |
929 | lp->rx_ring[i].msg_length); | |
930 | for (i = 0; i < TX_RING_SIZE; i++) | |
931 | printk ("%s %08x %04x %04x", i & 0x3 ? "" : "\n ", | |
932 | lp->tx_ring[i].base, -lp->tx_ring[i].length, | |
933 | lp->tx_ring[i].misc); | |
934 | printk ("\n"); | |
935 | } | |
936 | #endif | |
937 | lance_restart (dev, 0x0043, 1); | |
938 | ||
939 | dev->trans_start = jiffies; | |
940 | netif_wake_queue (dev); | |
941 | } | |
942 | ||
943 | ||
944 | static int lance_start_xmit(struct sk_buff *skb, struct net_device *dev) | |
945 | { | |
946 | struct lance_private *lp = dev->priv; | |
947 | int ioaddr = dev->base_addr; | |
948 | int entry; | |
949 | unsigned long flags; | |
950 | ||
951 | spin_lock_irqsave(&lp->devlock, flags); | |
952 | ||
953 | if (lance_debug > 3) { | |
954 | outw(0x0000, ioaddr+LANCE_ADDR); | |
955 | printk("%s: lance_start_xmit() called, csr0 %4.4x.\n", dev->name, | |
956 | inw(ioaddr+LANCE_DATA)); | |
957 | outw(0x0000, ioaddr+LANCE_DATA); | |
958 | } | |
959 | ||
960 | /* Fill in a Tx ring entry */ | |
961 | ||
962 | /* Mask to ring buffer boundary. */ | |
963 | entry = lp->cur_tx & TX_RING_MOD_MASK; | |
964 | ||
965 | /* Caution: the write order is important here, set the base address | |
966 | with the "ownership" bits last. */ | |
967 | ||
968 | /* The old LANCE chips doesn't automatically pad buffers to min. size. */ | |
969 | if (chip_table[lp->chip_version].flags & LANCE_MUST_PAD) { | |
970 | if (skb->len < ETH_ZLEN) { | |
5b057c6b | 971 | if (skb_padto(skb, ETH_ZLEN)) |
1da177e4 LT |
972 | goto out; |
973 | lp->tx_ring[entry].length = -ETH_ZLEN; | |
974 | } | |
975 | else | |
976 | lp->tx_ring[entry].length = -skb->len; | |
977 | } else | |
978 | lp->tx_ring[entry].length = -skb->len; | |
979 | ||
980 | lp->tx_ring[entry].misc = 0x0000; | |
981 | ||
982 | lp->stats.tx_bytes += skb->len; | |
983 | ||
984 | /* If any part of this buffer is >16M we must copy it to a low-memory | |
985 | buffer. */ | |
986 | if ((u32)isa_virt_to_bus(skb->data) + skb->len > 0x01000000) { | |
987 | if (lance_debug > 5) | |
988 | printk("%s: bouncing a high-memory packet (%#x).\n", | |
989 | dev->name, (u32)isa_virt_to_bus(skb->data)); | |
990 | memcpy(&lp->tx_bounce_buffs[entry], skb->data, skb->len); | |
991 | lp->tx_ring[entry].base = | |
992 | ((u32)isa_virt_to_bus((lp->tx_bounce_buffs + entry)) & 0xffffff) | 0x83000000; | |
993 | dev_kfree_skb(skb); | |
994 | } else { | |
995 | lp->tx_skbuff[entry] = skb; | |
996 | lp->tx_ring[entry].base = ((u32)isa_virt_to_bus(skb->data) & 0xffffff) | 0x83000000; | |
997 | } | |
998 | lp->cur_tx++; | |
999 | ||
1000 | /* Trigger an immediate send poll. */ | |
1001 | outw(0x0000, ioaddr+LANCE_ADDR); | |
1002 | outw(0x0048, ioaddr+LANCE_DATA); | |
1003 | ||
1004 | dev->trans_start = jiffies; | |
1005 | ||
1006 | if ((lp->cur_tx - lp->dirty_tx) >= TX_RING_SIZE) | |
1007 | netif_stop_queue(dev); | |
1008 | ||
1009 | out: | |
1010 | spin_unlock_irqrestore(&lp->devlock, flags); | |
1011 | return 0; | |
1012 | } | |
1013 | ||
1014 | /* The LANCE interrupt handler. */ | |
1015 | static irqreturn_t | |
1016 | lance_interrupt(int irq, void *dev_id, struct pt_regs * regs) | |
1017 | { | |
1018 | struct net_device *dev = dev_id; | |
1019 | struct lance_private *lp; | |
1020 | int csr0, ioaddr, boguscnt=10; | |
1021 | int must_restart; | |
1022 | ||
1023 | if (dev == NULL) { | |
1024 | printk ("lance_interrupt(): irq %d for unknown device.\n", irq); | |
1025 | return IRQ_NONE; | |
1026 | } | |
1027 | ||
1028 | ioaddr = dev->base_addr; | |
1029 | lp = dev->priv; | |
1030 | ||
1031 | spin_lock (&lp->devlock); | |
1032 | ||
1033 | outw(0x00, dev->base_addr + LANCE_ADDR); | |
1034 | while ((csr0 = inw(dev->base_addr + LANCE_DATA)) & 0x8600 | |
1035 | && --boguscnt >= 0) { | |
1036 | /* Acknowledge all of the current interrupt sources ASAP. */ | |
1037 | outw(csr0 & ~0x004f, dev->base_addr + LANCE_DATA); | |
1038 | ||
1039 | must_restart = 0; | |
1040 | ||
1041 | if (lance_debug > 5) | |
1042 | printk("%s: interrupt csr0=%#2.2x new csr=%#2.2x.\n", | |
1043 | dev->name, csr0, inw(dev->base_addr + LANCE_DATA)); | |
1044 | ||
1045 | if (csr0 & 0x0400) /* Rx interrupt */ | |
1046 | lance_rx(dev); | |
1047 | ||
1048 | if (csr0 & 0x0200) { /* Tx-done interrupt */ | |
1049 | int dirty_tx = lp->dirty_tx; | |
1050 | ||
1051 | while (dirty_tx < lp->cur_tx) { | |
1052 | int entry = dirty_tx & TX_RING_MOD_MASK; | |
1053 | int status = lp->tx_ring[entry].base; | |
1054 | ||
1055 | if (status < 0) | |
1056 | break; /* It still hasn't been Txed */ | |
1057 | ||
1058 | lp->tx_ring[entry].base = 0; | |
1059 | ||
1060 | if (status & 0x40000000) { | |
1061 | /* There was an major error, log it. */ | |
1062 | int err_status = lp->tx_ring[entry].misc; | |
1063 | lp->stats.tx_errors++; | |
1064 | if (err_status & 0x0400) lp->stats.tx_aborted_errors++; | |
1065 | if (err_status & 0x0800) lp->stats.tx_carrier_errors++; | |
1066 | if (err_status & 0x1000) lp->stats.tx_window_errors++; | |
1067 | if (err_status & 0x4000) { | |
1068 | /* Ackk! On FIFO errors the Tx unit is turned off! */ | |
1069 | lp->stats.tx_fifo_errors++; | |
1070 | /* Remove this verbosity later! */ | |
1071 | printk("%s: Tx FIFO error! Status %4.4x.\n", | |
1072 | dev->name, csr0); | |
1073 | /* Restart the chip. */ | |
1074 | must_restart = 1; | |
1075 | } | |
1076 | } else { | |
1077 | if (status & 0x18000000) | |
1078 | lp->stats.collisions++; | |
1079 | lp->stats.tx_packets++; | |
1080 | } | |
1081 | ||
1082 | /* We must free the original skb if it's not a data-only copy | |
1083 | in the bounce buffer. */ | |
1084 | if (lp->tx_skbuff[entry]) { | |
1085 | dev_kfree_skb_irq(lp->tx_skbuff[entry]); | |
1086 | lp->tx_skbuff[entry] = NULL; | |
1087 | } | |
1088 | dirty_tx++; | |
1089 | } | |
1090 | ||
1091 | #ifndef final_version | |
1092 | if (lp->cur_tx - dirty_tx >= TX_RING_SIZE) { | |
1093 | printk("out-of-sync dirty pointer, %d vs. %d, full=%s.\n", | |
1094 | dirty_tx, lp->cur_tx, | |
1095 | netif_queue_stopped(dev) ? "yes" : "no"); | |
1096 | dirty_tx += TX_RING_SIZE; | |
1097 | } | |
1098 | #endif | |
1099 | ||
1100 | /* if the ring is no longer full, accept more packets */ | |
1101 | if (netif_queue_stopped(dev) && | |
1102 | dirty_tx > lp->cur_tx - TX_RING_SIZE + 2) | |
1103 | netif_wake_queue (dev); | |
1104 | ||
1105 | lp->dirty_tx = dirty_tx; | |
1106 | } | |
1107 | ||
1108 | /* Log misc errors. */ | |
1109 | if (csr0 & 0x4000) lp->stats.tx_errors++; /* Tx babble. */ | |
1110 | if (csr0 & 0x1000) lp->stats.rx_errors++; /* Missed a Rx frame. */ | |
1111 | if (csr0 & 0x0800) { | |
1112 | printk("%s: Bus master arbitration failure, status %4.4x.\n", | |
1113 | dev->name, csr0); | |
1114 | /* Restart the chip. */ | |
1115 | must_restart = 1; | |
1116 | } | |
1117 | ||
1118 | if (must_restart) { | |
1119 | /* stop the chip to clear the error condition, then restart */ | |
1120 | outw(0x0000, dev->base_addr + LANCE_ADDR); | |
1121 | outw(0x0004, dev->base_addr + LANCE_DATA); | |
1122 | lance_restart(dev, 0x0002, 0); | |
1123 | } | |
1124 | } | |
1125 | ||
1126 | /* Clear any other interrupt, and set interrupt enable. */ | |
1127 | outw(0x0000, dev->base_addr + LANCE_ADDR); | |
1128 | outw(0x7940, dev->base_addr + LANCE_DATA); | |
1129 | ||
1130 | if (lance_debug > 4) | |
1131 | printk("%s: exiting interrupt, csr%d=%#4.4x.\n", | |
1132 | dev->name, inw(ioaddr + LANCE_ADDR), | |
1133 | inw(dev->base_addr + LANCE_DATA)); | |
1134 | ||
1135 | spin_unlock (&lp->devlock); | |
1136 | return IRQ_HANDLED; | |
1137 | } | |
1138 | ||
1139 | static int | |
1140 | lance_rx(struct net_device *dev) | |
1141 | { | |
1142 | struct lance_private *lp = dev->priv; | |
1143 | int entry = lp->cur_rx & RX_RING_MOD_MASK; | |
1144 | int i; | |
1145 | ||
1146 | /* If we own the next entry, it's a new packet. Send it up. */ | |
1147 | while (lp->rx_ring[entry].base >= 0) { | |
1148 | int status = lp->rx_ring[entry].base >> 24; | |
1149 | ||
1150 | if (status != 0x03) { /* There was an error. */ | |
1151 | /* There is a tricky error noted by John Murphy, | |
1152 | <murf@perftech.com> to Russ Nelson: Even with full-sized | |
1153 | buffers it's possible for a jabber packet to use two | |
1154 | buffers, with only the last correctly noting the error. */ | |
1155 | if (status & 0x01) /* Only count a general error at the */ | |
1156 | lp->stats.rx_errors++; /* end of a packet.*/ | |
1157 | if (status & 0x20) lp->stats.rx_frame_errors++; | |
1158 | if (status & 0x10) lp->stats.rx_over_errors++; | |
1159 | if (status & 0x08) lp->stats.rx_crc_errors++; | |
1160 | if (status & 0x04) lp->stats.rx_fifo_errors++; | |
1161 | lp->rx_ring[entry].base &= 0x03ffffff; | |
1162 | } | |
1163 | else | |
1164 | { | |
1165 | /* Malloc up new buffer, compatible with net3. */ | |
1166 | short pkt_len = (lp->rx_ring[entry].msg_length & 0xfff)-4; | |
1167 | struct sk_buff *skb; | |
1168 | ||
1169 | if(pkt_len<60) | |
1170 | { | |
1171 | printk("%s: Runt packet!\n",dev->name); | |
1172 | lp->stats.rx_errors++; | |
1173 | } | |
1174 | else | |
1175 | { | |
1176 | skb = dev_alloc_skb(pkt_len+2); | |
1177 | if (skb == NULL) | |
1178 | { | |
1179 | printk("%s: Memory squeeze, deferring packet.\n", dev->name); | |
1180 | for (i=0; i < RX_RING_SIZE; i++) | |
1181 | if (lp->rx_ring[(entry+i) & RX_RING_MOD_MASK].base < 0) | |
1182 | break; | |
1183 | ||
1184 | if (i > RX_RING_SIZE -2) | |
1185 | { | |
1186 | lp->stats.rx_dropped++; | |
1187 | lp->rx_ring[entry].base |= 0x80000000; | |
1188 | lp->cur_rx++; | |
1189 | } | |
1190 | break; | |
1191 | } | |
1192 | skb->dev = dev; | |
1193 | skb_reserve(skb,2); /* 16 byte align */ | |
1194 | skb_put(skb,pkt_len); /* Make room */ | |
1195 | eth_copy_and_sum(skb, | |
1196 | (unsigned char *)isa_bus_to_virt((lp->rx_ring[entry].base & 0x00ffffff)), | |
1197 | pkt_len,0); | |
1198 | skb->protocol=eth_type_trans(skb,dev); | |
1199 | netif_rx(skb); | |
1200 | dev->last_rx = jiffies; | |
1201 | lp->stats.rx_packets++; | |
1202 | lp->stats.rx_bytes+=pkt_len; | |
1203 | } | |
1204 | } | |
1205 | /* The docs say that the buffer length isn't touched, but Andrew Boyd | |
1206 | of QNX reports that some revs of the 79C965 clear it. */ | |
1207 | lp->rx_ring[entry].buf_length = -PKT_BUF_SZ; | |
1208 | lp->rx_ring[entry].base |= 0x80000000; | |
1209 | entry = (++lp->cur_rx) & RX_RING_MOD_MASK; | |
1210 | } | |
1211 | ||
1212 | /* We should check that at least two ring entries are free. If not, | |
1213 | we should free one and mark stats->rx_dropped++. */ | |
1214 | ||
1215 | return 0; | |
1216 | } | |
1217 | ||
1218 | static int | |
1219 | lance_close(struct net_device *dev) | |
1220 | { | |
1221 | int ioaddr = dev->base_addr; | |
1222 | struct lance_private *lp = dev->priv; | |
1223 | ||
1224 | netif_stop_queue (dev); | |
1225 | ||
1226 | if (chip_table[lp->chip_version].flags & LANCE_HAS_MISSED_FRAME) { | |
1227 | outw(112, ioaddr+LANCE_ADDR); | |
1228 | lp->stats.rx_missed_errors = inw(ioaddr+LANCE_DATA); | |
1229 | } | |
1230 | outw(0, ioaddr+LANCE_ADDR); | |
1231 | ||
1232 | if (lance_debug > 1) | |
1233 | printk("%s: Shutting down ethercard, status was %2.2x.\n", | |
1234 | dev->name, inw(ioaddr+LANCE_DATA)); | |
1235 | ||
1236 | /* We stop the LANCE here -- it occasionally polls | |
1237 | memory if we don't. */ | |
1238 | outw(0x0004, ioaddr+LANCE_DATA); | |
1239 | ||
1240 | if (dev->dma != 4) | |
1241 | { | |
1242 | unsigned long flags=claim_dma_lock(); | |
1243 | disable_dma(dev->dma); | |
1244 | release_dma_lock(flags); | |
1245 | } | |
1246 | free_irq(dev->irq, dev); | |
1247 | ||
1248 | lance_purge_ring(dev); | |
1249 | ||
1250 | return 0; | |
1251 | } | |
1252 | ||
1253 | static struct net_device_stats *lance_get_stats(struct net_device *dev) | |
1254 | { | |
1255 | struct lance_private *lp = dev->priv; | |
1256 | ||
1257 | if (chip_table[lp->chip_version].flags & LANCE_HAS_MISSED_FRAME) { | |
1258 | short ioaddr = dev->base_addr; | |
1259 | short saved_addr; | |
1260 | unsigned long flags; | |
1261 | ||
1262 | spin_lock_irqsave(&lp->devlock, flags); | |
1263 | saved_addr = inw(ioaddr+LANCE_ADDR); | |
1264 | outw(112, ioaddr+LANCE_ADDR); | |
1265 | lp->stats.rx_missed_errors = inw(ioaddr+LANCE_DATA); | |
1266 | outw(saved_addr, ioaddr+LANCE_ADDR); | |
1267 | spin_unlock_irqrestore(&lp->devlock, flags); | |
1268 | } | |
1269 | ||
1270 | return &lp->stats; | |
1271 | } | |
1272 | ||
1273 | /* Set or clear the multicast filter for this adaptor. | |
1274 | */ | |
1275 | ||
1276 | static void set_multicast_list(struct net_device *dev) | |
1277 | { | |
1278 | short ioaddr = dev->base_addr; | |
1279 | ||
1280 | outw(0, ioaddr+LANCE_ADDR); | |
1281 | outw(0x0004, ioaddr+LANCE_DATA); /* Temporarily stop the lance. */ | |
1282 | ||
1283 | if (dev->flags&IFF_PROMISC) { | |
1284 | /* Log any net taps. */ | |
1285 | printk("%s: Promiscuous mode enabled.\n", dev->name); | |
1286 | outw(15, ioaddr+LANCE_ADDR); | |
1287 | outw(0x8000, ioaddr+LANCE_DATA); /* Set promiscuous mode */ | |
1288 | } else { | |
1289 | short multicast_table[4]; | |
1290 | int i; | |
1291 | int num_addrs=dev->mc_count; | |
1292 | if(dev->flags&IFF_ALLMULTI) | |
1293 | num_addrs=1; | |
1294 | /* FIXIT: We don't use the multicast table, but rely on upper-layer filtering. */ | |
1295 | memset(multicast_table, (num_addrs == 0) ? 0 : -1, sizeof(multicast_table)); | |
1296 | for (i = 0; i < 4; i++) { | |
1297 | outw(8 + i, ioaddr+LANCE_ADDR); | |
1298 | outw(multicast_table[i], ioaddr+LANCE_DATA); | |
1299 | } | |
1300 | outw(15, ioaddr+LANCE_ADDR); | |
1301 | outw(0x0000, ioaddr+LANCE_DATA); /* Unset promiscuous mode */ | |
1302 | } | |
1303 | ||
1304 | lance_restart(dev, 0x0142, 0); /* Resume normal operation */ | |
1305 | ||
1306 | } | |
1307 |