Merge git://git.kernel.org/pub/scm/linux/kernel/git/davem/net-2.6
[linux-2.6] / drivers / net / cs89x0.c
1 /* cs89x0.c: A Crystal Semiconductor (Now Cirrus Logic) CS89[02]0
2  *  driver for linux.
3  */
4
5 /*
6         Written 1996 by Russell Nelson, with reference to skeleton.c
7         written 1993-1994 by Donald Becker.
8
9         This software may be used and distributed according to the terms
10         of the GNU General Public License, incorporated herein by reference.
11
12         The author may be reached at nelson@crynwr.com, Crynwr
13         Software, 521 Pleasant Valley Rd., Potsdam, NY 13676
14
15   Changelog:
16
17   Mike Cruse        : mcruse@cti-ltd.com
18                     : Changes for Linux 2.0 compatibility.
19                     : Added dev_id parameter in net_interrupt(),
20                     : request_irq() and free_irq(). Just NULL for now.
21
22   Mike Cruse        : Added MOD_INC_USE_COUNT and MOD_DEC_USE_COUNT macros
23                     : in net_open() and net_close() so kerneld would know
24                     : that the module is in use and wouldn't eject the
25                     : driver prematurely.
26
27   Mike Cruse        : Rewrote init_module() and cleanup_module using 8390.c
28                     : as an example. Disabled autoprobing in init_module(),
29                     : not a good thing to do to other devices while Linux
30                     : is running from all accounts.
31
32   Russ Nelson       : Jul 13 1998.  Added RxOnly DMA support.
33
34   Melody Lee        : Aug 10 1999.  Changes for Linux 2.2.5 compatibility.
35                     : email: ethernet@crystal.cirrus.com
36
37   Alan Cox          : Removed 1.2 support, added 2.1 extra counters.
38
39   Andrew Morton     : andrewm@uow.edu.au
40                     : Kernel 2.3.48
41                     : Handle kmalloc() failures
42                     : Other resource allocation fixes
43                     : Add SMP locks
44                     : Integrate Russ Nelson's ALLOW_DMA functionality back in.
45                     : If ALLOW_DMA is true, make DMA runtime selectable
46                     : Folded in changes from Cirrus (Melody Lee
47                     : <klee@crystal.cirrus.com>)
48                     : Don't call netif_wake_queue() in net_send_packet()
49                     : Fixed an out-of-mem bug in dma_rx()
50                     : Updated Documentation/networking/cs89x0.txt
51
52   Andrew Morton     : andrewm@uow.edu.au / Kernel 2.3.99-pre1
53                     : Use skb_reserve to longword align IP header (two places)
54                     : Remove a delay loop from dma_rx()
55                     : Replace '100' with HZ
56                     : Clean up a couple of skb API abuses
57                     : Added 'cs89x0_dma=N' kernel boot option
58                     : Correctly initialise lp->lock in non-module compile
59
60   Andrew Morton     : andrewm@uow.edu.au / Kernel 2.3.99-pre4-1
61                     : MOD_INC/DEC race fix (see
62                     : http://www.uwsg.indiana.edu/hypermail/linux/kernel/0003.3/1532.html)
63
64   Andrew Morton     : andrewm@uow.edu.au / Kernel 2.4.0-test7-pre2
65                     : Enhanced EEPROM support to cover more devices,
66                     :   abstracted IRQ mapping to support CONFIG_ARCH_CLPS7500 arch
67                     :   (Jason Gunthorpe <jgg@ualberta.ca>)
68
69   Andrew Morton     : Kernel 2.4.0-test11-pre4
70                     : Use dev->name in request_*() (Andrey Panin)
71                     : Fix an error-path memleak in init_module()
72                     : Preserve return value from request_irq()
73                     : Fix type of `media' module parm (Keith Owens)
74                     : Use SET_MODULE_OWNER()
75                     : Tidied up strange request_irq() abuse in net_open().
76
77   Andrew Morton     : Kernel 2.4.3-pre1
78                     : Request correct number of pages for DMA (Hugh Dickens)
79                     : Select PP_ChipID _after_ unregister_netdev in cleanup_module()
80                     :  because unregister_netdev() calls get_stats.
81                     : Make `version[]' __initdata
82                     : Uninlined the read/write reg/word functions.
83
84   Oskar Schirmer    : oskar@scara.com
85                     : HiCO.SH4 (superh) support added (irq#1, cs89x0_media=)
86
87   Deepak Saxena     : dsaxena@plexity.net
88                     : Intel IXDP2x01 (XScale ixp2x00 NPU) platform support
89
90   Dmitry Pervushin  : dpervushin@ru.mvista.com
91                     : PNX010X platform support
92
93   Deepak Saxena     : dsaxena@plexity.net
94                     : Intel IXDP2351 platform support
95
96   Dmitry Pervushin  : dpervushin@ru.mvista.com
97                     : PNX010X platform support
98
99 */
100
101 /* Always include 'config.h' first in case the user wants to turn on
102    or override something. */
103 #include <linux/module.h>
104
105 /*
106  * Set this to zero to disable DMA code
107  *
108  * Note that even if DMA is turned off we still support the 'dma' and  'use_dma'
109  * module options so we don't break any startup scripts.
110  */
111 #ifndef CONFIG_ISA_DMA_API
112 #define ALLOW_DMA       0
113 #else
114 #define ALLOW_DMA       1
115 #endif
116
117 /*
118  * Set this to zero to remove all the debug statements via
119  * dead code elimination
120  */
121 #define DEBUGGING       1
122
123 /*
124   Sources:
125
126         Crynwr packet driver epktisa.
127
128         Crystal Semiconductor data sheets.
129
130 */
131
132 #include <linux/errno.h>
133 #include <linux/netdevice.h>
134 #include <linux/etherdevice.h>
135 #include <linux/kernel.h>
136 #include <linux/types.h>
137 #include <linux/fcntl.h>
138 #include <linux/interrupt.h>
139 #include <linux/ioport.h>
140 #include <linux/in.h>
141 #include <linux/skbuff.h>
142 #include <linux/slab.h>
143 #include <linux/spinlock.h>
144 #include <linux/string.h>
145 #include <linux/init.h>
146 #include <linux/bitops.h>
147 #include <linux/delay.h>
148
149 #include <asm/system.h>
150 #include <asm/io.h>
151 #include <asm/irq.h>
152 #if ALLOW_DMA
153 #include <asm/dma.h>
154 #endif
155
156 #include "cs89x0.h"
157
158 static char version[] __initdata =
159 "cs89x0.c: v2.4.3-pre1 Russell Nelson <nelson@crynwr.com>, Andrew Morton <andrewm@uow.edu.au>\n";
160
161 #define DRV_NAME "cs89x0"
162
163 /* First, a few definitions that the brave might change.
164    A zero-terminated list of I/O addresses to be probed. Some special flags..
165       Addr & 1 = Read back the address port, look for signature and reset
166                  the page window before probing
167       Addr & 3 = Reset the page window and probe
168    The CLPS eval board has the Cirrus chip at 0x80090300, in ARM IO space,
169    but it is possible that a Cirrus board could be plugged into the ISA
170    slots. */
171 /* The cs8900 has 4 IRQ pins, software selectable. cs8900_irq_map maps
172    them to system IRQ numbers. This mapping is card specific and is set to
173    the configuration of the Cirrus Eval board for this chip. */
174 #ifdef CONFIG_ARCH_CLPS7500
175 static unsigned int netcard_portlist[] __used __initdata =
176    { 0x80090303, 0x300, 0x320, 0x340, 0x360, 0x200, 0x220, 0x240, 0x260, 0x280, 0x2a0, 0x2c0, 0x2e0, 0};
177 static unsigned int cs8900_irq_map[] = {12,0,0,0};
178 #elif defined(CONFIG_SH_HICOSH4)
179 static unsigned int netcard_portlist[] __used __initdata =
180    { 0x0300, 0};
181 static unsigned int cs8900_irq_map[] = {1,0,0,0};
182 #elif defined(CONFIG_MACH_IXDP2351)
183 static unsigned int netcard_portlist[] __used __initdata = {IXDP2351_VIRT_CS8900_BASE, 0};
184 static unsigned int cs8900_irq_map[] = {IRQ_IXDP2351_CS8900, 0, 0, 0};
185 #include <asm/irq.h>
186 #elif defined(CONFIG_ARCH_IXDP2X01)
187 #include <asm/irq.h>
188 static unsigned int netcard_portlist[] __used __initdata = {IXDP2X01_CS8900_VIRT_BASE, 0};
189 static unsigned int cs8900_irq_map[] = {IRQ_IXDP2X01_CS8900, 0, 0, 0};
190 #elif defined(CONFIG_ARCH_PNX010X)
191 #include <asm/irq.h>
192 #include <mach/gpio.h>
193 #define CIRRUS_DEFAULT_BASE     IO_ADDRESS(EXT_STATIC2_s0_BASE + 0x200000)      /* = Physical address 0x48200000 */
194 #define CIRRUS_DEFAULT_IRQ      VH_INTC_INT_NUM_CASCADED_INTERRUPT_1 /* Event inputs bank 1 - ID 35/bit 3 */
195 static unsigned int netcard_portlist[] __used __initdata = {CIRRUS_DEFAULT_BASE, 0};
196 static unsigned int cs8900_irq_map[] = {CIRRUS_DEFAULT_IRQ, 0, 0, 0};
197 #elif defined(CONFIG_MACH_MX31ADS)
198 #include <mach/board-mx31ads.h>
199 static unsigned int netcard_portlist[] __used __initdata = {
200         PBC_BASE_ADDRESS + PBC_CS8900A_IOBASE + 0x300, 0
201 };
202 static unsigned cs8900_irq_map[] = {EXPIO_INT_ENET_INT, 0, 0, 0};
203 #else
204 static unsigned int netcard_portlist[] __used __initdata =
205    { 0x300, 0x320, 0x340, 0x360, 0x200, 0x220, 0x240, 0x260, 0x280, 0x2a0, 0x2c0, 0x2e0, 0};
206 static unsigned int cs8900_irq_map[] = {10,11,12,5};
207 #endif
208
209 #if DEBUGGING
210 static unsigned int net_debug = DEBUGGING;
211 #else
212 #define net_debug 0     /* gcc will remove all the debug code for us */
213 #endif
214
215 /* The number of low I/O ports used by the ethercard. */
216 #define NETCARD_IO_EXTENT       16
217
218 /* we allow the user to override various values normally set in the EEPROM */
219 #define FORCE_RJ45      0x0001    /* pick one of these three */
220 #define FORCE_AUI       0x0002
221 #define FORCE_BNC       0x0004
222
223 #define FORCE_AUTO      0x0010    /* pick one of these three */
224 #define FORCE_HALF      0x0020
225 #define FORCE_FULL      0x0030
226
227 /* Information that need to be kept for each board. */
228 struct net_local {
229         struct net_device_stats stats;
230         int chip_type;          /* one of: CS8900, CS8920, CS8920M */
231         char chip_revision;     /* revision letter of the chip ('A'...) */
232         int send_cmd;           /* the proper send command: TX_NOW, TX_AFTER_381, or TX_AFTER_ALL */
233         int auto_neg_cnf;       /* auto-negotiation word from EEPROM */
234         int adapter_cnf;        /* adapter configuration from EEPROM */
235         int isa_config;         /* ISA configuration from EEPROM */
236         int irq_map;            /* IRQ map from EEPROM */
237         int rx_mode;            /* what mode are we in? 0, RX_MULTCAST_ACCEPT, or RX_ALL_ACCEPT */
238         int curr_rx_cfg;        /* a copy of PP_RxCFG */
239         int linectl;            /* either 0 or LOW_RX_SQUELCH, depending on configuration. */
240         int send_underrun;      /* keep track of how many underruns in a row we get */
241         int force;              /* force various values; see FORCE* above. */
242         spinlock_t lock;
243 #if ALLOW_DMA
244         int use_dma;            /* Flag: we're using dma */
245         int dma;                /* DMA channel */
246         int dmasize;            /* 16 or 64 */
247         unsigned char *dma_buff;        /* points to the beginning of the buffer */
248         unsigned char *end_dma_buff;    /* points to the end of the buffer */
249         unsigned char *rx_dma_ptr;      /* points to the next packet  */
250 #endif
251 };
252
253 /* Index to functions, as function prototypes. */
254
255 static int cs89x0_probe1(struct net_device *dev, int ioaddr, int modular);
256 static int net_open(struct net_device *dev);
257 static int net_send_packet(struct sk_buff *skb, struct net_device *dev);
258 static irqreturn_t net_interrupt(int irq, void *dev_id);
259 static void set_multicast_list(struct net_device *dev);
260 static void net_timeout(struct net_device *dev);
261 static void net_rx(struct net_device *dev);
262 static int net_close(struct net_device *dev);
263 static struct net_device_stats *net_get_stats(struct net_device *dev);
264 static void reset_chip(struct net_device *dev);
265 static int get_eeprom_data(struct net_device *dev, int off, int len, int *buffer);
266 static int get_eeprom_cksum(int off, int len, int *buffer);
267 static int set_mac_address(struct net_device *dev, void *addr);
268 static void count_rx_errors(int status, struct net_local *lp);
269 #ifdef CONFIG_NET_POLL_CONTROLLER
270 static void net_poll_controller(struct net_device *dev);
271 #endif
272 #if ALLOW_DMA
273 static void get_dma_channel(struct net_device *dev);
274 static void release_dma_buff(struct net_local *lp);
275 #endif
276
277 /* Example routines you must write ;->. */
278 #define tx_done(dev) 1
279
280 /*
281  * Permit 'cs89x0_dma=N' in the kernel boot environment
282  */
283 #if !defined(MODULE) && (ALLOW_DMA != 0)
284 static int g_cs89x0_dma;
285
286 static int __init dma_fn(char *str)
287 {
288         g_cs89x0_dma = simple_strtol(str,NULL,0);
289         return 1;
290 }
291
292 __setup("cs89x0_dma=", dma_fn);
293 #endif  /* !defined(MODULE) && (ALLOW_DMA != 0) */
294
295 #ifndef MODULE
296 static int g_cs89x0_media__force;
297
298 static int __init media_fn(char *str)
299 {
300         if (!strcmp(str, "rj45")) g_cs89x0_media__force = FORCE_RJ45;
301         else if (!strcmp(str, "aui")) g_cs89x0_media__force = FORCE_AUI;
302         else if (!strcmp(str, "bnc")) g_cs89x0_media__force = FORCE_BNC;
303         return 1;
304 }
305
306 __setup("cs89x0_media=", media_fn);
307
308
309 /* Check for a network adaptor of this type, and return '0' iff one exists.
310    If dev->base_addr == 0, probe all likely locations.
311    If dev->base_addr == 1, always return failure.
312    If dev->base_addr == 2, allocate space for the device and return success
313    (detachable devices only).
314    Return 0 on success.
315    */
316
317 struct net_device * __init cs89x0_probe(int unit)
318 {
319         struct net_device *dev = alloc_etherdev(sizeof(struct net_local));
320         unsigned *port;
321         int err = 0;
322         int irq;
323         int io;
324
325         if (!dev)
326                 return ERR_PTR(-ENODEV);
327
328         sprintf(dev->name, "eth%d", unit);
329         netdev_boot_setup_check(dev);
330         io = dev->base_addr;
331         irq = dev->irq;
332
333         if (net_debug)
334                 printk("cs89x0:cs89x0_probe(0x%x)\n", io);
335
336         if (io > 0x1ff) {       /* Check a single specified location. */
337                 err = cs89x0_probe1(dev, io, 0);
338         } else if (io != 0) {   /* Don't probe at all. */
339                 err = -ENXIO;
340         } else {
341                 for (port = netcard_portlist; *port; port++) {
342                         if (cs89x0_probe1(dev, *port, 0) == 0)
343                                 break;
344                         dev->irq = irq;
345                 }
346                 if (!*port)
347                         err = -ENODEV;
348         }
349         if (err)
350                 goto out;
351         return dev;
352 out:
353         free_netdev(dev);
354         printk(KERN_WARNING "cs89x0: no cs8900 or cs8920 detected.  Be sure to disable PnP with SETUP\n");
355         return ERR_PTR(err);
356 }
357 #endif
358
359 #if defined(CONFIG_MACH_IXDP2351)
360 static u16
361 readword(unsigned long base_addr, int portno)
362 {
363         return __raw_readw(base_addr + (portno << 1));
364 }
365
366 static void
367 writeword(unsigned long base_addr, int portno, u16 value)
368 {
369         __raw_writew(value, base_addr + (portno << 1));
370 }
371 #elif defined(CONFIG_ARCH_IXDP2X01)
372 static u16
373 readword(unsigned long base_addr, int portno)
374 {
375         return __raw_readl(base_addr + (portno << 1));
376 }
377
378 static void
379 writeword(unsigned long base_addr, int portno, u16 value)
380 {
381         __raw_writel(value, base_addr + (portno << 1));
382 }
383 #elif defined(CONFIG_ARCH_PNX010X)
384 static u16
385 readword(unsigned long base_addr, int portno)
386 {
387         return inw(base_addr + (portno << 1));
388 }
389
390 static void
391 writeword(unsigned long base_addr, int portno, u16 value)
392 {
393         outw(value, base_addr + (portno << 1));
394 }
395 #else
396 static u16
397 readword(unsigned long base_addr, int portno)
398 {
399         return inw(base_addr + portno);
400 }
401
402 static void
403 writeword(unsigned long base_addr, int portno, u16 value)
404 {
405         outw(value, base_addr + portno);
406 }
407 #endif
408
409 static void
410 readwords(unsigned long base_addr, int portno, void *buf, int length)
411 {
412         u8 *buf8 = (u8 *)buf;
413
414         do {
415                 u16 tmp16;
416
417                 tmp16 = readword(base_addr, portno);
418                 *buf8++ = (u8)tmp16;
419                 *buf8++ = (u8)(tmp16 >> 8);
420         } while (--length);
421 }
422
423 static void
424 writewords(unsigned long base_addr, int portno, void *buf, int length)
425 {
426         u8 *buf8 = (u8 *)buf;
427
428         do {
429                 u16 tmp16;
430
431                 tmp16 = *buf8++;
432                 tmp16 |= (*buf8++) << 8;
433                 writeword(base_addr, portno, tmp16);
434         } while (--length);
435 }
436
437 static u16
438 readreg(struct net_device *dev, u16 regno)
439 {
440         writeword(dev->base_addr, ADD_PORT, regno);
441         return readword(dev->base_addr, DATA_PORT);
442 }
443
444 static void
445 writereg(struct net_device *dev, u16 regno, u16 value)
446 {
447         writeword(dev->base_addr, ADD_PORT, regno);
448         writeword(dev->base_addr, DATA_PORT, value);
449 }
450
451 static int __init
452 wait_eeprom_ready(struct net_device *dev)
453 {
454         int timeout = jiffies;
455         /* check to see if the EEPROM is ready, a timeout is used -
456            just in case EEPROM is ready when SI_BUSY in the
457            PP_SelfST is clear */
458         while(readreg(dev, PP_SelfST) & SI_BUSY)
459                 if (jiffies - timeout >= 40)
460                         return -1;
461         return 0;
462 }
463
464 static int __init
465 get_eeprom_data(struct net_device *dev, int off, int len, int *buffer)
466 {
467         int i;
468
469         if (net_debug > 3) printk("EEPROM data from %x for %x:\n",off,len);
470         for (i = 0; i < len; i++) {
471                 if (wait_eeprom_ready(dev) < 0) return -1;
472                 /* Now send the EEPROM read command and EEPROM location to read */
473                 writereg(dev, PP_EECMD, (off + i) | EEPROM_READ_CMD);
474                 if (wait_eeprom_ready(dev) < 0) return -1;
475                 buffer[i] = readreg(dev, PP_EEData);
476                 if (net_debug > 3) printk("%04x ", buffer[i]);
477         }
478         if (net_debug > 3) printk("\n");
479         return 0;
480 }
481
482 static int  __init
483 get_eeprom_cksum(int off, int len, int *buffer)
484 {
485         int i, cksum;
486
487         cksum = 0;
488         for (i = 0; i < len; i++)
489                 cksum += buffer[i];
490         cksum &= 0xffff;
491         if (cksum == 0)
492                 return 0;
493         return -1;
494 }
495
496 #ifdef CONFIG_NET_POLL_CONTROLLER
497 /*
498  * Polling receive - used by netconsole and other diagnostic tools
499  * to allow network i/o with interrupts disabled.
500  */
501 static void net_poll_controller(struct net_device *dev)
502 {
503         disable_irq(dev->irq);
504         net_interrupt(dev->irq, dev);
505         enable_irq(dev->irq);
506 }
507 #endif
508
509 /* This is the real probe routine.  Linux has a history of friendly device
510    probes on the ISA bus.  A good device probes avoids doing writes, and
511    verifies that the correct device exists and functions.
512    Return 0 on success.
513  */
514
515 static int __init
516 cs89x0_probe1(struct net_device *dev, int ioaddr, int modular)
517 {
518         struct net_local *lp = netdev_priv(dev);
519         static unsigned version_printed;
520         int i;
521         int tmp;
522         unsigned rev_type = 0;
523         int eeprom_buff[CHKSUM_LEN];
524         int retval;
525         DECLARE_MAC_BUF(mac);
526
527         /* Initialize the device structure. */
528         if (!modular) {
529                 memset(lp, 0, sizeof(*lp));
530                 spin_lock_init(&lp->lock);
531 #ifndef MODULE
532 #if ALLOW_DMA
533                 if (g_cs89x0_dma) {
534                         lp->use_dma = 1;
535                         lp->dma = g_cs89x0_dma;
536                         lp->dmasize = 16;       /* Could make this an option... */
537                 }
538 #endif
539                 lp->force = g_cs89x0_media__force;
540 #endif
541         }
542
543 #ifdef CONFIG_ARCH_PNX010X
544         initialize_ebi();
545
546         /* Map GPIO registers for the pins connected to the CS8900a. */
547         if (map_cirrus_gpio() < 0)
548                 return -ENODEV;
549
550         reset_cirrus();
551
552         /* Map event-router registers. */
553         if (map_event_router() < 0)
554                 return -ENODEV;
555
556         enable_cirrus_irq();
557
558         unmap_cirrus_gpio();
559         unmap_event_router();
560
561         dev->base_addr = ioaddr;
562
563         for (i = 0 ; i < 3 ; i++)
564                 readreg(dev, 0);
565 #endif
566
567         /* Grab the region so we can find another board if autoIRQ fails. */
568         /* WTF is going on here? */
569         if (!request_region(ioaddr & ~3, NETCARD_IO_EXTENT, DRV_NAME)) {
570                 printk(KERN_ERR "%s: request_region(0x%x, 0x%x) failed\n",
571                                 DRV_NAME, ioaddr, NETCARD_IO_EXTENT);
572                 retval = -EBUSY;
573                 goto out1;
574         }
575
576 #ifdef CONFIG_SH_HICOSH4
577         /* truely reset the chip */
578         writeword(ioaddr, ADD_PORT, 0x0114);
579         writeword(ioaddr, DATA_PORT, 0x0040);
580 #endif
581
582         /* if they give us an odd I/O address, then do ONE write to
583            the address port, to get it back to address zero, where we
584            expect to find the EISA signature word. An IO with a base of 0x3
585            will skip the test for the ADD_PORT. */
586         if (ioaddr & 1) {
587                 if (net_debug > 1)
588                         printk(KERN_INFO "%s: odd ioaddr 0x%x\n", dev->name, ioaddr);
589                 if ((ioaddr & 2) != 2)
590                         if ((readword(ioaddr & ~3, ADD_PORT) & ADD_MASK) != ADD_SIG) {
591                                 printk(KERN_ERR "%s: bad signature 0x%x\n",
592                                         dev->name, readword(ioaddr & ~3, ADD_PORT));
593                                 retval = -ENODEV;
594                                 goto out2;
595                         }
596         }
597
598         ioaddr &= ~3;
599         printk(KERN_DEBUG "PP_addr at %x[%x]: 0x%x\n",
600                         ioaddr, ADD_PORT, readword(ioaddr, ADD_PORT));
601         writeword(ioaddr, ADD_PORT, PP_ChipID);
602
603         tmp = readword(ioaddr, DATA_PORT);
604         if (tmp != CHIP_EISA_ID_SIG) {
605                 printk(KERN_DEBUG "%s: incorrect signature at %x[%x]: 0x%x!="
606                         CHIP_EISA_ID_SIG_STR "\n",
607                         dev->name, ioaddr, DATA_PORT, tmp);
608                 retval = -ENODEV;
609                 goto out2;
610         }
611
612         /* Fill in the 'dev' fields. */
613         dev->base_addr = ioaddr;
614
615         /* get the chip type */
616         rev_type = readreg(dev, PRODUCT_ID_ADD);
617         lp->chip_type = rev_type &~ REVISON_BITS;
618         lp->chip_revision = ((rev_type & REVISON_BITS) >> 8) + 'A';
619
620         /* Check the chip type and revision in order to set the correct send command
621         CS8920 revision C and CS8900 revision F can use the faster send. */
622         lp->send_cmd = TX_AFTER_381;
623         if (lp->chip_type == CS8900 && lp->chip_revision >= 'F')
624                 lp->send_cmd = TX_NOW;
625         if (lp->chip_type != CS8900 && lp->chip_revision >= 'C')
626                 lp->send_cmd = TX_NOW;
627
628         if (net_debug  &&  version_printed++ == 0)
629                 printk(version);
630
631         printk(KERN_INFO "%s: cs89%c0%s rev %c found at %#3lx ",
632                dev->name,
633                lp->chip_type==CS8900?'0':'2',
634                lp->chip_type==CS8920M?"M":"",
635                lp->chip_revision,
636                dev->base_addr);
637
638         reset_chip(dev);
639
640         /* Here we read the current configuration of the chip. If there
641            is no Extended EEPROM then the idea is to not disturb the chip
642            configuration, it should have been correctly setup by automatic
643            EEPROM read on reset. So, if the chip says it read the EEPROM
644            the driver will always do *something* instead of complain that
645            adapter_cnf is 0. */
646
647 #ifdef CONFIG_SH_HICOSH4
648         if (1) {
649                 /* For the HiCO.SH4 board, things are different: we don't
650                    have EEPROM, but there is some data in flash, so we go
651                    get it there directly (MAC). */
652                 __u16 *confd;
653                 short cnt;
654                 if (((* (volatile __u32 *) 0xa0013ff0) & 0x00ffffff)
655                         == 0x006c3000) {
656                         confd = (__u16*) 0xa0013fc0;
657                 } else {
658                         confd = (__u16*) 0xa001ffc0;
659                 }
660                 cnt = (*confd++ & 0x00ff) >> 1;
661                 while (--cnt > 0) {
662                         __u16 j = *confd++;
663
664                         switch (j & 0x0fff) {
665                         case PP_IA:
666                                 for (i = 0; i < ETH_ALEN/2; i++) {
667                                         dev->dev_addr[i*2] = confd[i] & 0xFF;
668                                         dev->dev_addr[i*2+1] = confd[i] >> 8;
669                                 }
670                                 break;
671                         }
672                         j = (j >> 12) + 1;
673                         confd += j;
674                         cnt -= j;
675                 }
676         } else
677 #endif
678
679         if ((readreg(dev, PP_SelfST) & (EEPROM_OK | EEPROM_PRESENT)) ==
680               (EEPROM_OK|EEPROM_PRESENT)) {
681                 /* Load the MAC. */
682                 for (i=0; i < ETH_ALEN/2; i++) {
683                         unsigned int Addr;
684                         Addr = readreg(dev, PP_IA+i*2);
685                         dev->dev_addr[i*2] = Addr & 0xFF;
686                         dev->dev_addr[i*2+1] = Addr >> 8;
687                 }
688
689                 /* Load the Adapter Configuration.
690                    Note:  Barring any more specific information from some
691                    other source (ie EEPROM+Schematics), we would not know
692                    how to operate a 10Base2 interface on the AUI port.
693                    However, since we  do read the status of HCB1 and use
694                    settings that always result in calls to control_dc_dc(dev,0)
695                    a BNC interface should work if the enable pin
696                    (dc/dc converter) is on HCB1. It will be called AUI
697                    however. */
698
699                 lp->adapter_cnf = 0;
700                 i = readreg(dev, PP_LineCTL);
701                 /* Preserve the setting of the HCB1 pin. */
702                 if ((i & (HCB1 | HCB1_ENBL)) ==  (HCB1 | HCB1_ENBL))
703                         lp->adapter_cnf |= A_CNF_DC_DC_POLARITY;
704                 /* Save the sqelch bit */
705                 if ((i & LOW_RX_SQUELCH) == LOW_RX_SQUELCH)
706                         lp->adapter_cnf |= A_CNF_EXTND_10B_2 | A_CNF_LOW_RX_SQUELCH;
707                 /* Check if the card is in 10Base-t only mode */
708                 if ((i & (AUI_ONLY | AUTO_AUI_10BASET)) == 0)
709                         lp->adapter_cnf |=  A_CNF_10B_T | A_CNF_MEDIA_10B_T;
710                 /* Check if the card is in AUI only mode */
711                 if ((i & (AUI_ONLY | AUTO_AUI_10BASET)) == AUI_ONLY)
712                         lp->adapter_cnf |=  A_CNF_AUI | A_CNF_MEDIA_AUI;
713                 /* Check if the card is in Auto mode. */
714                 if ((i & (AUI_ONLY | AUTO_AUI_10BASET)) == AUTO_AUI_10BASET)
715                         lp->adapter_cnf |=  A_CNF_AUI | A_CNF_10B_T |
716                         A_CNF_MEDIA_AUI | A_CNF_MEDIA_10B_T | A_CNF_MEDIA_AUTO;
717
718                 if (net_debug > 1)
719                         printk(KERN_INFO "%s: PP_LineCTL=0x%x, adapter_cnf=0x%x\n",
720                                         dev->name, i, lp->adapter_cnf);
721
722                 /* IRQ. Other chips already probe, see below. */
723                 if (lp->chip_type == CS8900)
724                         lp->isa_config = readreg(dev, PP_CS8900_ISAINT) & INT_NO_MASK;
725
726                 printk( "[Cirrus EEPROM] ");
727         }
728
729         printk("\n");
730
731         /* First check to see if an EEPROM is attached. */
732 #ifdef CONFIG_SH_HICOSH4 /* no EEPROM on HiCO, don't hazzle with it here */
733         if (1) {
734                 printk(KERN_NOTICE "cs89x0: No EEPROM on HiCO.SH4\n");
735         } else
736 #endif
737         if ((readreg(dev, PP_SelfST) & EEPROM_PRESENT) == 0)
738                 printk(KERN_WARNING "cs89x0: No EEPROM, relying on command line....\n");
739         else if (get_eeprom_data(dev, START_EEPROM_DATA,CHKSUM_LEN,eeprom_buff) < 0) {
740                 printk(KERN_WARNING "\ncs89x0: EEPROM read failed, relying on command line.\n");
741         } else if (get_eeprom_cksum(START_EEPROM_DATA,CHKSUM_LEN,eeprom_buff) < 0) {
742                 /* Check if the chip was able to read its own configuration starting
743                    at 0 in the EEPROM*/
744                 if ((readreg(dev, PP_SelfST) & (EEPROM_OK | EEPROM_PRESENT)) !=
745                     (EEPROM_OK|EEPROM_PRESENT))
746                         printk(KERN_WARNING "cs89x0: Extended EEPROM checksum bad and no Cirrus EEPROM, relying on command line\n");
747
748         } else {
749                 /* This reads an extended EEPROM that is not documented
750                    in the CS8900 datasheet. */
751
752                 /* get transmission control word  but keep the autonegotiation bits */
753                 if (!lp->auto_neg_cnf) lp->auto_neg_cnf = eeprom_buff[AUTO_NEG_CNF_OFFSET/2];
754                 /* Store adapter configuration */
755                 if (!lp->adapter_cnf) lp->adapter_cnf = eeprom_buff[ADAPTER_CNF_OFFSET/2];
756                 /* Store ISA configuration */
757                 lp->isa_config = eeprom_buff[ISA_CNF_OFFSET/2];
758                 dev->mem_start = eeprom_buff[PACKET_PAGE_OFFSET/2] << 8;
759
760                 /* eeprom_buff has 32-bit ints, so we can't just memcpy it */
761                 /* store the initial memory base address */
762                 for (i = 0; i < ETH_ALEN/2; i++) {
763                         dev->dev_addr[i*2] = eeprom_buff[i];
764                         dev->dev_addr[i*2+1] = eeprom_buff[i] >> 8;
765                 }
766                 if (net_debug > 1)
767                         printk(KERN_DEBUG "%s: new adapter_cnf: 0x%x\n",
768                                 dev->name, lp->adapter_cnf);
769         }
770
771         /* allow them to force multiple transceivers.  If they force multiple, autosense */
772         {
773                 int count = 0;
774                 if (lp->force & FORCE_RJ45)     {lp->adapter_cnf |= A_CNF_10B_T; count++; }
775                 if (lp->force & FORCE_AUI)      {lp->adapter_cnf |= A_CNF_AUI; count++; }
776                 if (lp->force & FORCE_BNC)      {lp->adapter_cnf |= A_CNF_10B_2; count++; }
777                 if (count > 1)                  {lp->adapter_cnf |= A_CNF_MEDIA_AUTO; }
778                 else if (lp->force & FORCE_RJ45){lp->adapter_cnf |= A_CNF_MEDIA_10B_T; }
779                 else if (lp->force & FORCE_AUI) {lp->adapter_cnf |= A_CNF_MEDIA_AUI; }
780                 else if (lp->force & FORCE_BNC) {lp->adapter_cnf |= A_CNF_MEDIA_10B_2; }
781         }
782
783         if (net_debug > 1)
784                 printk(KERN_DEBUG "%s: after force 0x%x, adapter_cnf=0x%x\n",
785                         dev->name, lp->force, lp->adapter_cnf);
786
787         /* FIXME: We don't let you set dc-dc polarity or low RX squelch from the command line: add it here */
788
789         /* FIXME: We don't let you set the IMM bit from the command line: add it to lp->auto_neg_cnf here */
790
791         /* FIXME: we don't set the Ethernet address on the command line.  Use
792            ifconfig IFACE hw ether AABBCCDDEEFF */
793
794         printk(KERN_INFO "cs89x0 media %s%s%s",
795                (lp->adapter_cnf & A_CNF_10B_T)?"RJ-45,":"",
796                (lp->adapter_cnf & A_CNF_AUI)?"AUI,":"",
797                (lp->adapter_cnf & A_CNF_10B_2)?"BNC,":"");
798
799         lp->irq_map = 0xffff;
800
801         /* If this is a CS8900 then no pnp soft */
802         if (lp->chip_type != CS8900 &&
803             /* Check if the ISA IRQ has been set  */
804                 (i = readreg(dev, PP_CS8920_ISAINT) & 0xff,
805                  (i != 0 && i < CS8920_NO_INTS))) {
806                 if (!dev->irq)
807                         dev->irq = i;
808         } else {
809                 i = lp->isa_config & INT_NO_MASK;
810                 if (lp->chip_type == CS8900) {
811 #ifdef CONFIG_CS89x0_NONISA_IRQ
812                         i = cs8900_irq_map[0];
813 #else
814                         /* Translate the IRQ using the IRQ mapping table. */
815                         if (i >= ARRAY_SIZE(cs8900_irq_map))
816                                 printk("\ncs89x0: invalid ISA interrupt number %d\n", i);
817                         else
818                                 i = cs8900_irq_map[i];
819
820                         lp->irq_map = CS8900_IRQ_MAP; /* fixed IRQ map for CS8900 */
821                 } else {
822                         int irq_map_buff[IRQ_MAP_LEN/2];
823
824                         if (get_eeprom_data(dev, IRQ_MAP_EEPROM_DATA,
825                                             IRQ_MAP_LEN/2,
826                                             irq_map_buff) >= 0) {
827                                 if ((irq_map_buff[0] & 0xff) == PNP_IRQ_FRMT)
828                                         lp->irq_map = (irq_map_buff[0]>>8) | (irq_map_buff[1] << 8);
829                         }
830 #endif
831                 }
832                 if (!dev->irq)
833                         dev->irq = i;
834         }
835
836         printk(" IRQ %d", dev->irq);
837
838 #if ALLOW_DMA
839         if (lp->use_dma) {
840                 get_dma_channel(dev);
841                 printk(", DMA %d", dev->dma);
842         }
843         else
844 #endif
845         {
846                 printk(", programmed I/O");
847         }
848
849         /* print the ethernet address. */
850         printk(", MAC %s", print_mac(mac, dev->dev_addr));
851
852         dev->open               = net_open;
853         dev->stop               = net_close;
854         dev->tx_timeout         = net_timeout;
855         dev->watchdog_timeo     = HZ;
856         dev->hard_start_xmit    = net_send_packet;
857         dev->get_stats          = net_get_stats;
858         dev->set_multicast_list = set_multicast_list;
859         dev->set_mac_address    = set_mac_address;
860 #ifdef CONFIG_NET_POLL_CONTROLLER
861         dev->poll_controller    = net_poll_controller;
862 #endif
863
864         printk("\n");
865         if (net_debug)
866                 printk("cs89x0_probe1() successful\n");
867
868         retval = register_netdev(dev);
869         if (retval)
870                 goto out3;
871         return 0;
872 out3:
873         writeword(dev->base_addr, ADD_PORT, PP_ChipID);
874 out2:
875         release_region(ioaddr & ~3, NETCARD_IO_EXTENT);
876 out1:
877         return retval;
878 }
879
880
881 /*********************************
882  * This page contains DMA routines
883 **********************************/
884
885 #if ALLOW_DMA
886
887 #define dma_page_eq(ptr1, ptr2) ((long)(ptr1)>>17 == (long)(ptr2)>>17)
888
889 static void
890 get_dma_channel(struct net_device *dev)
891 {
892         struct net_local *lp = netdev_priv(dev);
893
894         if (lp->dma) {
895                 dev->dma = lp->dma;
896                 lp->isa_config |= ISA_RxDMA;
897         } else {
898                 if ((lp->isa_config & ANY_ISA_DMA) == 0)
899                         return;
900                 dev->dma = lp->isa_config & DMA_NO_MASK;
901                 if (lp->chip_type == CS8900)
902                         dev->dma += 5;
903                 if (dev->dma < 5 || dev->dma > 7) {
904                         lp->isa_config &= ~ANY_ISA_DMA;
905                         return;
906                 }
907         }
908         return;
909 }
910
911 static void
912 write_dma(struct net_device *dev, int chip_type, int dma)
913 {
914         struct net_local *lp = netdev_priv(dev);
915         if ((lp->isa_config & ANY_ISA_DMA) == 0)
916                 return;
917         if (chip_type == CS8900) {
918                 writereg(dev, PP_CS8900_ISADMA, dma-5);
919         } else {
920                 writereg(dev, PP_CS8920_ISADMA, dma);
921         }
922 }
923
924 static void
925 set_dma_cfg(struct net_device *dev)
926 {
927         struct net_local *lp = netdev_priv(dev);
928
929         if (lp->use_dma) {
930                 if ((lp->isa_config & ANY_ISA_DMA) == 0) {
931                         if (net_debug > 3)
932                                 printk("set_dma_cfg(): no DMA\n");
933                         return;
934                 }
935                 if (lp->isa_config & ISA_RxDMA) {
936                         lp->curr_rx_cfg |= RX_DMA_ONLY;
937                         if (net_debug > 3)
938                                 printk("set_dma_cfg(): RX_DMA_ONLY\n");
939                 } else {
940                         lp->curr_rx_cfg |= AUTO_RX_DMA; /* not that we support it... */
941                         if (net_debug > 3)
942                                 printk("set_dma_cfg(): AUTO_RX_DMA\n");
943                 }
944         }
945 }
946
947 static int
948 dma_bufcfg(struct net_device *dev)
949 {
950         struct net_local *lp = netdev_priv(dev);
951         if (lp->use_dma)
952                 return (lp->isa_config & ANY_ISA_DMA)? RX_DMA_ENBL : 0;
953         else
954                 return 0;
955 }
956
957 static int
958 dma_busctl(struct net_device *dev)
959 {
960         int retval = 0;
961         struct net_local *lp = netdev_priv(dev);
962         if (lp->use_dma) {
963                 if (lp->isa_config & ANY_ISA_DMA)
964                         retval |= RESET_RX_DMA; /* Reset the DMA pointer */
965                 if (lp->isa_config & DMA_BURST)
966                         retval |= DMA_BURST_MODE; /* Does ISA config specify DMA burst ? */
967                 if (lp->dmasize == 64)
968                         retval |= RX_DMA_SIZE_64K; /* did they ask for 64K? */
969                 retval |= MEMORY_ON;    /* we need memory enabled to use DMA. */
970         }
971         return retval;
972 }
973
974 static void
975 dma_rx(struct net_device *dev)
976 {
977         struct net_local *lp = netdev_priv(dev);
978         struct sk_buff *skb;
979         int status, length;
980         unsigned char *bp = lp->rx_dma_ptr;
981
982         status = bp[0] + (bp[1]<<8);
983         length = bp[2] + (bp[3]<<8);
984         bp += 4;
985         if (net_debug > 5) {
986                 printk( "%s: receiving DMA packet at %lx, status %x, length %x\n",
987                         dev->name, (unsigned long)bp, status, length);
988         }
989         if ((status & RX_OK) == 0) {
990                 count_rx_errors(status, lp);
991                 goto skip_this_frame;
992         }
993
994         /* Malloc up new buffer. */
995         skb = dev_alloc_skb(length + 2);
996         if (skb == NULL) {
997                 if (net_debug)  /* I don't think we want to do this to a stressed system */
998                         printk("%s: Memory squeeze, dropping packet.\n", dev->name);
999                 lp->stats.rx_dropped++;
1000
1001                 /* AKPM: advance bp to the next frame */
1002 skip_this_frame:
1003                 bp += (length + 3) & ~3;
1004                 if (bp >= lp->end_dma_buff) bp -= lp->dmasize*1024;
1005                 lp->rx_dma_ptr = bp;
1006                 return;
1007         }
1008         skb_reserve(skb, 2);    /* longword align L3 header */
1009
1010         if (bp + length > lp->end_dma_buff) {
1011                 int semi_cnt = lp->end_dma_buff - bp;
1012                 memcpy(skb_put(skb,semi_cnt), bp, semi_cnt);
1013                 memcpy(skb_put(skb,length - semi_cnt), lp->dma_buff,
1014                        length - semi_cnt);
1015         } else {
1016                 memcpy(skb_put(skb,length), bp, length);
1017         }
1018         bp += (length + 3) & ~3;
1019         if (bp >= lp->end_dma_buff) bp -= lp->dmasize*1024;
1020         lp->rx_dma_ptr = bp;
1021
1022         if (net_debug > 3) {
1023                 printk( "%s: received %d byte DMA packet of type %x\n",
1024                         dev->name, length,
1025                         (skb->data[ETH_ALEN+ETH_ALEN] << 8) | skb->data[ETH_ALEN+ETH_ALEN+1]);
1026         }
1027         skb->protocol=eth_type_trans(skb,dev);
1028         netif_rx(skb);
1029         dev->last_rx = jiffies;
1030         lp->stats.rx_packets++;
1031         lp->stats.rx_bytes += length;
1032 }
1033
1034 #endif  /* ALLOW_DMA */
1035
1036 void  __init reset_chip(struct net_device *dev)
1037 {
1038 #if !defined(CONFIG_MACH_MX31ADS)
1039 #if !defined(CONFIG_MACH_IXDP2351) && !defined(CONFIG_ARCH_IXDP2X01)
1040         struct net_local *lp = netdev_priv(dev);
1041         int ioaddr = dev->base_addr;
1042 #endif
1043         int reset_start_time;
1044
1045         writereg(dev, PP_SelfCTL, readreg(dev, PP_SelfCTL) | POWER_ON_RESET);
1046
1047         /* wait 30 ms */
1048         msleep(30);
1049
1050 #if !defined(CONFIG_MACH_IXDP2351) && !defined(CONFIG_ARCH_IXDP2X01)
1051         if (lp->chip_type != CS8900) {
1052                 /* Hardware problem requires PNP registers to be reconfigured after a reset */
1053                 writeword(ioaddr, ADD_PORT, PP_CS8920_ISAINT);
1054                 outb(dev->irq, ioaddr + DATA_PORT);
1055                 outb(0,      ioaddr + DATA_PORT + 1);
1056
1057                 writeword(ioaddr, ADD_PORT, PP_CS8920_ISAMemB);
1058                 outb((dev->mem_start >> 16) & 0xff, ioaddr + DATA_PORT);
1059                 outb((dev->mem_start >> 8) & 0xff,   ioaddr + DATA_PORT + 1);
1060         }
1061 #endif  /* IXDP2x01 */
1062
1063         /* Wait until the chip is reset */
1064         reset_start_time = jiffies;
1065         while( (readreg(dev, PP_SelfST) & INIT_DONE) == 0 && jiffies - reset_start_time < 2)
1066                 ;
1067 #endif /* !CONFIG_MACH_MX31ADS */
1068 }
1069
1070
1071 static void
1072 control_dc_dc(struct net_device *dev, int on_not_off)
1073 {
1074         struct net_local *lp = netdev_priv(dev);
1075         unsigned int selfcontrol;
1076         int timenow = jiffies;
1077         /* control the DC to DC convertor in the SelfControl register.
1078            Note: This is hooked up to a general purpose pin, might not
1079            always be a DC to DC convertor. */
1080
1081         selfcontrol = HCB1_ENBL; /* Enable the HCB1 bit as an output */
1082         if (((lp->adapter_cnf & A_CNF_DC_DC_POLARITY) != 0) ^ on_not_off)
1083                 selfcontrol |= HCB1;
1084         else
1085                 selfcontrol &= ~HCB1;
1086         writereg(dev, PP_SelfCTL, selfcontrol);
1087
1088         /* Wait for the DC/DC converter to power up - 500ms */
1089         while (jiffies - timenow < HZ)
1090                 ;
1091 }
1092
1093 #define DETECTED_NONE  0
1094 #define DETECTED_RJ45H 1
1095 #define DETECTED_RJ45F 2
1096 #define DETECTED_AUI   3
1097 #define DETECTED_BNC   4
1098
1099 static int
1100 detect_tp(struct net_device *dev)
1101 {
1102         struct net_local *lp = netdev_priv(dev);
1103         int timenow = jiffies;
1104         int fdx;
1105
1106         if (net_debug > 1) printk("%s: Attempting TP\n", dev->name);
1107
1108         /* If connected to another full duplex capable 10-Base-T card the link pulses
1109            seem to be lost when the auto detect bit in the LineCTL is set.
1110            To overcome this the auto detect bit will be cleared whilst testing the
1111            10-Base-T interface.  This would not be necessary for the sparrow chip but
1112            is simpler to do it anyway. */
1113         writereg(dev, PP_LineCTL, lp->linectl &~ AUI_ONLY);
1114         control_dc_dc(dev, 0);
1115
1116         /* Delay for the hardware to work out if the TP cable is present - 150ms */
1117         for (timenow = jiffies; jiffies - timenow < 15; )
1118                 ;
1119         if ((readreg(dev, PP_LineST) & LINK_OK) == 0)
1120                 return DETECTED_NONE;
1121
1122         if (lp->chip_type == CS8900) {
1123                 switch (lp->force & 0xf0) {
1124 #if 0
1125                 case FORCE_AUTO:
1126                         printk("%s: cs8900 doesn't autonegotiate\n",dev->name);
1127                         return DETECTED_NONE;
1128 #endif
1129                 /* CS8900 doesn't support AUTO, change to HALF*/
1130                 case FORCE_AUTO:
1131                         lp->force &= ~FORCE_AUTO;
1132                         lp->force |= FORCE_HALF;
1133                         break;
1134                 case FORCE_HALF:
1135                         break;
1136                 case FORCE_FULL:
1137                         writereg(dev, PP_TestCTL, readreg(dev, PP_TestCTL) | FDX_8900);
1138                         break;
1139                 }
1140                 fdx = readreg(dev, PP_TestCTL) & FDX_8900;
1141         } else {
1142                 switch (lp->force & 0xf0) {
1143                 case FORCE_AUTO:
1144                         lp->auto_neg_cnf = AUTO_NEG_ENABLE;
1145                         break;
1146                 case FORCE_HALF:
1147                         lp->auto_neg_cnf = 0;
1148                         break;
1149                 case FORCE_FULL:
1150                         lp->auto_neg_cnf = RE_NEG_NOW | ALLOW_FDX;
1151                         break;
1152                 }
1153
1154                 writereg(dev, PP_AutoNegCTL, lp->auto_neg_cnf & AUTO_NEG_MASK);
1155
1156                 if ((lp->auto_neg_cnf & AUTO_NEG_BITS) == AUTO_NEG_ENABLE) {
1157                         printk(KERN_INFO "%s: negotiating duplex...\n",dev->name);
1158                         while (readreg(dev, PP_AutoNegST) & AUTO_NEG_BUSY) {
1159                                 if (jiffies - timenow > 4000) {
1160                                         printk(KERN_ERR "**** Full / half duplex auto-negotiation timed out ****\n");
1161                                         break;
1162                                 }
1163                         }
1164                 }
1165                 fdx = readreg(dev, PP_AutoNegST) & FDX_ACTIVE;
1166         }
1167         if (fdx)
1168                 return DETECTED_RJ45F;
1169         else
1170                 return DETECTED_RJ45H;
1171 }
1172
1173 /* send a test packet - return true if carrier bits are ok */
1174 static int
1175 send_test_pkt(struct net_device *dev)
1176 {
1177         char test_packet[] = { 0,0,0,0,0,0, 0,0,0,0,0,0,
1178                                  0, 46, /* A 46 in network order */
1179                                  0, 0, /* DSAP=0 & SSAP=0 fields */
1180                                  0xf3, 0 /* Control (Test Req + P bit set) */ };
1181         long timenow = jiffies;
1182
1183         writereg(dev, PP_LineCTL, readreg(dev, PP_LineCTL) | SERIAL_TX_ON);
1184
1185         memcpy(test_packet,          dev->dev_addr, ETH_ALEN);
1186         memcpy(test_packet+ETH_ALEN, dev->dev_addr, ETH_ALEN);
1187
1188         writeword(dev->base_addr, TX_CMD_PORT, TX_AFTER_ALL);
1189         writeword(dev->base_addr, TX_LEN_PORT, ETH_ZLEN);
1190
1191         /* Test to see if the chip has allocated memory for the packet */
1192         while (jiffies - timenow < 5)
1193                 if (readreg(dev, PP_BusST) & READY_FOR_TX_NOW)
1194                         break;
1195         if (jiffies - timenow >= 5)
1196                 return 0;       /* this shouldn't happen */
1197
1198         /* Write the contents of the packet */
1199         writewords(dev->base_addr, TX_FRAME_PORT,test_packet,(ETH_ZLEN+1) >>1);
1200
1201         if (net_debug > 1) printk("Sending test packet ");
1202         /* wait a couple of jiffies for packet to be received */
1203         for (timenow = jiffies; jiffies - timenow < 3; )
1204                 ;
1205         if ((readreg(dev, PP_TxEvent) & TX_SEND_OK_BITS) == TX_OK) {
1206                 if (net_debug > 1) printk("succeeded\n");
1207                 return 1;
1208         }
1209         if (net_debug > 1) printk("failed\n");
1210         return 0;
1211 }
1212
1213
1214 static int
1215 detect_aui(struct net_device *dev)
1216 {
1217         struct net_local *lp = netdev_priv(dev);
1218
1219         if (net_debug > 1) printk("%s: Attempting AUI\n", dev->name);
1220         control_dc_dc(dev, 0);
1221
1222         writereg(dev, PP_LineCTL, (lp->linectl &~ AUTO_AUI_10BASET) | AUI_ONLY);
1223
1224         if (send_test_pkt(dev))
1225                 return DETECTED_AUI;
1226         else
1227                 return DETECTED_NONE;
1228 }
1229
1230 static int
1231 detect_bnc(struct net_device *dev)
1232 {
1233         struct net_local *lp = netdev_priv(dev);
1234
1235         if (net_debug > 1) printk("%s: Attempting BNC\n", dev->name);
1236         control_dc_dc(dev, 1);
1237
1238         writereg(dev, PP_LineCTL, (lp->linectl &~ AUTO_AUI_10BASET) | AUI_ONLY);
1239
1240         if (send_test_pkt(dev))
1241                 return DETECTED_BNC;
1242         else
1243                 return DETECTED_NONE;
1244 }
1245
1246
1247 static void
1248 write_irq(struct net_device *dev, int chip_type, int irq)
1249 {
1250         int i;
1251
1252         if (chip_type == CS8900) {
1253                 /* Search the mapping table for the corresponding IRQ pin. */
1254                 for (i = 0; i != ARRAY_SIZE(cs8900_irq_map); i++)
1255                         if (cs8900_irq_map[i] == irq)
1256                                 break;
1257                 /* Not found */
1258                 if (i == ARRAY_SIZE(cs8900_irq_map))
1259                         i = 3;
1260                 writereg(dev, PP_CS8900_ISAINT, i);
1261         } else {
1262                 writereg(dev, PP_CS8920_ISAINT, irq);
1263         }
1264 }
1265
1266 /* Open/initialize the board.  This is called (in the current kernel)
1267    sometime after booting when the 'ifconfig' program is run.
1268
1269    This routine should set everything up anew at each open, even
1270    registers that "should" only need to be set once at boot, so that
1271    there is non-reboot way to recover if something goes wrong.
1272    */
1273
1274 /* AKPM: do we need to do any locking here? */
1275
1276 static int
1277 net_open(struct net_device *dev)
1278 {
1279         struct net_local *lp = netdev_priv(dev);
1280         int result = 0;
1281         int i;
1282         int ret;
1283
1284 #if !defined(CONFIG_SH_HICOSH4) && !defined(CONFIG_ARCH_PNX010X) /* uses irq#1, so this won't work */
1285         if (dev->irq < 2) {
1286                 /* Allow interrupts to be generated by the chip */
1287 /* Cirrus' release had this: */
1288 #if 0
1289                 writereg(dev, PP_BusCTL, readreg(dev, PP_BusCTL)|ENABLE_IRQ );
1290 #endif
1291 /* And 2.3.47 had this: */
1292                 writereg(dev, PP_BusCTL, ENABLE_IRQ | MEMORY_ON);
1293
1294                 for (i = 2; i < CS8920_NO_INTS; i++) {
1295                         if ((1 << i) & lp->irq_map) {
1296                                 if (request_irq(i, net_interrupt, 0, dev->name, dev) == 0) {
1297                                         dev->irq = i;
1298                                         write_irq(dev, lp->chip_type, i);
1299                                         /* writereg(dev, PP_BufCFG, GENERATE_SW_INTERRUPT); */
1300                                         break;
1301                                 }
1302                         }
1303                 }
1304
1305                 if (i >= CS8920_NO_INTS) {
1306                         writereg(dev, PP_BusCTL, 0);    /* disable interrupts. */
1307                         printk(KERN_ERR "cs89x0: can't get an interrupt\n");
1308                         ret = -EAGAIN;
1309                         goto bad_out;
1310                 }
1311         }
1312         else
1313 #endif
1314         {
1315 #ifndef CONFIG_CS89x0_NONISA_IRQ
1316                 if (((1 << dev->irq) & lp->irq_map) == 0) {
1317                         printk(KERN_ERR "%s: IRQ %d is not in our map of allowable IRQs, which is %x\n",
1318                                dev->name, dev->irq, lp->irq_map);
1319                         ret = -EAGAIN;
1320                         goto bad_out;
1321                 }
1322 #endif
1323 /* FIXME: Cirrus' release had this: */
1324                 writereg(dev, PP_BusCTL, readreg(dev, PP_BusCTL)|ENABLE_IRQ );
1325 /* And 2.3.47 had this: */
1326 #if 0
1327                 writereg(dev, PP_BusCTL, ENABLE_IRQ | MEMORY_ON);
1328 #endif
1329                 write_irq(dev, lp->chip_type, dev->irq);
1330                 ret = request_irq(dev->irq, &net_interrupt, 0, dev->name, dev);
1331                 if (ret) {
1332                         if (net_debug)
1333                                 printk(KERN_DEBUG "cs89x0: request_irq(%d) failed\n", dev->irq);
1334                         goto bad_out;
1335                 }
1336         }
1337
1338 #if ALLOW_DMA
1339         if (lp->use_dma) {
1340                 if (lp->isa_config & ANY_ISA_DMA) {
1341                         unsigned long flags;
1342                         lp->dma_buff = (unsigned char *)__get_dma_pages(GFP_KERNEL,
1343                                                         get_order(lp->dmasize * 1024));
1344
1345                         if (!lp->dma_buff) {
1346                                 printk(KERN_ERR "%s: cannot get %dK memory for DMA\n", dev->name, lp->dmasize);
1347                                 goto release_irq;
1348                         }
1349                         if (net_debug > 1) {
1350                                 printk( "%s: dma %lx %lx\n",
1351                                         dev->name,
1352                                         (unsigned long)lp->dma_buff,
1353                                         (unsigned long)isa_virt_to_bus(lp->dma_buff));
1354                         }
1355                         if ((unsigned long) lp->dma_buff >= MAX_DMA_ADDRESS ||
1356                             !dma_page_eq(lp->dma_buff, lp->dma_buff+lp->dmasize*1024-1)) {
1357                                 printk(KERN_ERR "%s: not usable as DMA buffer\n", dev->name);
1358                                 goto release_irq;
1359                         }
1360                         memset(lp->dma_buff, 0, lp->dmasize * 1024);    /* Why? */
1361                         if (request_dma(dev->dma, dev->name)) {
1362                                 printk(KERN_ERR "%s: cannot get dma channel %d\n", dev->name, dev->dma);
1363                                 goto release_irq;
1364                         }
1365                         write_dma(dev, lp->chip_type, dev->dma);
1366                         lp->rx_dma_ptr = lp->dma_buff;
1367                         lp->end_dma_buff = lp->dma_buff + lp->dmasize*1024;
1368                         spin_lock_irqsave(&lp->lock, flags);
1369                         disable_dma(dev->dma);
1370                         clear_dma_ff(dev->dma);
1371                         set_dma_mode(dev->dma, 0x14); /* auto_init as well */
1372                         set_dma_addr(dev->dma, isa_virt_to_bus(lp->dma_buff));
1373                         set_dma_count(dev->dma, lp->dmasize*1024);
1374                         enable_dma(dev->dma);
1375                         spin_unlock_irqrestore(&lp->lock, flags);
1376                 }
1377         }
1378 #endif  /* ALLOW_DMA */
1379
1380         /* set the Ethernet address */
1381         for (i=0; i < ETH_ALEN/2; i++)
1382                 writereg(dev, PP_IA+i*2, dev->dev_addr[i*2] | (dev->dev_addr[i*2+1] << 8));
1383
1384         /* while we're testing the interface, leave interrupts disabled */
1385         writereg(dev, PP_BusCTL, MEMORY_ON);
1386
1387         /* Set the LineCTL quintuplet based on adapter configuration read from EEPROM */
1388         if ((lp->adapter_cnf & A_CNF_EXTND_10B_2) && (lp->adapter_cnf & A_CNF_LOW_RX_SQUELCH))
1389                 lp->linectl = LOW_RX_SQUELCH;
1390         else
1391                 lp->linectl = 0;
1392
1393         /* check to make sure that they have the "right" hardware available */
1394         switch(lp->adapter_cnf & A_CNF_MEDIA_TYPE) {
1395         case A_CNF_MEDIA_10B_T: result = lp->adapter_cnf & A_CNF_10B_T; break;
1396         case A_CNF_MEDIA_AUI:   result = lp->adapter_cnf & A_CNF_AUI; break;
1397         case A_CNF_MEDIA_10B_2: result = lp->adapter_cnf & A_CNF_10B_2; break;
1398         default: result = lp->adapter_cnf & (A_CNF_10B_T | A_CNF_AUI | A_CNF_10B_2);
1399         }
1400 #ifdef CONFIG_ARCH_PNX010X
1401         result = A_CNF_10B_T;
1402 #endif
1403         if (!result) {
1404                 printk(KERN_ERR "%s: EEPROM is configured for unavailable media\n", dev->name);
1405 release_dma:
1406 #if ALLOW_DMA
1407                 free_dma(dev->dma);
1408 release_irq:
1409                 release_dma_buff(lp);
1410 #endif
1411                 writereg(dev, PP_LineCTL, readreg(dev, PP_LineCTL) & ~(SERIAL_TX_ON | SERIAL_RX_ON));
1412                 free_irq(dev->irq, dev);
1413                 ret = -EAGAIN;
1414                 goto bad_out;
1415         }
1416
1417         /* set the hardware to the configured choice */
1418         switch(lp->adapter_cnf & A_CNF_MEDIA_TYPE) {
1419         case A_CNF_MEDIA_10B_T:
1420                 result = detect_tp(dev);
1421                 if (result==DETECTED_NONE) {
1422                         printk(KERN_WARNING "%s: 10Base-T (RJ-45) has no cable\n", dev->name);
1423                         if (lp->auto_neg_cnf & IMM_BIT) /* check "ignore missing media" bit */
1424                                 result = DETECTED_RJ45H; /* Yes! I don't care if I see a link pulse */
1425                 }
1426                 break;
1427         case A_CNF_MEDIA_AUI:
1428                 result = detect_aui(dev);
1429                 if (result==DETECTED_NONE) {
1430                         printk(KERN_WARNING "%s: 10Base-5 (AUI) has no cable\n", dev->name);
1431                         if (lp->auto_neg_cnf & IMM_BIT) /* check "ignore missing media" bit */
1432                                 result = DETECTED_AUI; /* Yes! I don't care if I see a carrrier */
1433                 }
1434                 break;
1435         case A_CNF_MEDIA_10B_2:
1436                 result = detect_bnc(dev);
1437                 if (result==DETECTED_NONE) {
1438                         printk(KERN_WARNING "%s: 10Base-2 (BNC) has no cable\n", dev->name);
1439                         if (lp->auto_neg_cnf & IMM_BIT) /* check "ignore missing media" bit */
1440                                 result = DETECTED_BNC; /* Yes! I don't care if I can xmit a packet */
1441                 }
1442                 break;
1443         case A_CNF_MEDIA_AUTO:
1444                 writereg(dev, PP_LineCTL, lp->linectl | AUTO_AUI_10BASET);
1445                 if (lp->adapter_cnf & A_CNF_10B_T)
1446                         if ((result = detect_tp(dev)) != DETECTED_NONE)
1447                                 break;
1448                 if (lp->adapter_cnf & A_CNF_AUI)
1449                         if ((result = detect_aui(dev)) != DETECTED_NONE)
1450                                 break;
1451                 if (lp->adapter_cnf & A_CNF_10B_2)
1452                         if ((result = detect_bnc(dev)) != DETECTED_NONE)
1453                                 break;
1454                 printk(KERN_ERR "%s: no media detected\n", dev->name);
1455                 goto release_dma;
1456         }
1457         switch(result) {
1458         case DETECTED_NONE:
1459                 printk(KERN_ERR "%s: no network cable attached to configured media\n", dev->name);
1460                 goto release_dma;
1461         case DETECTED_RJ45H:
1462                 printk(KERN_INFO "%s: using half-duplex 10Base-T (RJ-45)\n", dev->name);
1463                 break;
1464         case DETECTED_RJ45F:
1465                 printk(KERN_INFO "%s: using full-duplex 10Base-T (RJ-45)\n", dev->name);
1466                 break;
1467         case DETECTED_AUI:
1468                 printk(KERN_INFO "%s: using 10Base-5 (AUI)\n", dev->name);
1469                 break;
1470         case DETECTED_BNC:
1471                 printk(KERN_INFO "%s: using 10Base-2 (BNC)\n", dev->name);
1472                 break;
1473         }
1474
1475         /* Turn on both receive and transmit operations */
1476         writereg(dev, PP_LineCTL, readreg(dev, PP_LineCTL) | SERIAL_RX_ON | SERIAL_TX_ON);
1477
1478         /* Receive only error free packets addressed to this card */
1479         lp->rx_mode = 0;
1480         writereg(dev, PP_RxCTL, DEF_RX_ACCEPT);
1481
1482         lp->curr_rx_cfg = RX_OK_ENBL | RX_CRC_ERROR_ENBL;
1483
1484         if (lp->isa_config & STREAM_TRANSFER)
1485                 lp->curr_rx_cfg |= RX_STREAM_ENBL;
1486 #if ALLOW_DMA
1487         set_dma_cfg(dev);
1488 #endif
1489         writereg(dev, PP_RxCFG, lp->curr_rx_cfg);
1490
1491         writereg(dev, PP_TxCFG, TX_LOST_CRS_ENBL | TX_SQE_ERROR_ENBL | TX_OK_ENBL |
1492                 TX_LATE_COL_ENBL | TX_JBR_ENBL | TX_ANY_COL_ENBL | TX_16_COL_ENBL);
1493
1494         writereg(dev, PP_BufCFG, READY_FOR_TX_ENBL | RX_MISS_COUNT_OVRFLOW_ENBL |
1495 #if ALLOW_DMA
1496                 dma_bufcfg(dev) |
1497 #endif
1498                 TX_COL_COUNT_OVRFLOW_ENBL | TX_UNDERRUN_ENBL);
1499
1500         /* now that we've got our act together, enable everything */
1501         writereg(dev, PP_BusCTL, ENABLE_IRQ
1502                  | (dev->mem_start?MEMORY_ON : 0) /* turn memory on */
1503 #if ALLOW_DMA
1504                  | dma_busctl(dev)
1505 #endif
1506                  );
1507         netif_start_queue(dev);
1508         if (net_debug > 1)
1509                 printk("cs89x0: net_open() succeeded\n");
1510         return 0;
1511 bad_out:
1512         return ret;
1513 }
1514
1515 static void net_timeout(struct net_device *dev)
1516 {
1517         /* If we get here, some higher level has decided we are broken.
1518            There should really be a "kick me" function call instead. */
1519         if (net_debug > 0) printk("%s: transmit timed out, %s?\n", dev->name,
1520                    tx_done(dev) ? "IRQ conflict ?" : "network cable problem");
1521         /* Try to restart the adaptor. */
1522         netif_wake_queue(dev);
1523 }
1524
1525 static int net_send_packet(struct sk_buff *skb, struct net_device *dev)
1526 {
1527         struct net_local *lp = netdev_priv(dev);
1528
1529         if (net_debug > 3) {
1530                 printk("%s: sent %d byte packet of type %x\n",
1531                         dev->name, skb->len,
1532                         (skb->data[ETH_ALEN+ETH_ALEN] << 8) | skb->data[ETH_ALEN+ETH_ALEN+1]);
1533         }
1534
1535         /* keep the upload from being interrupted, since we
1536                   ask the chip to start transmitting before the
1537                   whole packet has been completely uploaded. */
1538
1539         spin_lock_irq(&lp->lock);
1540         netif_stop_queue(dev);
1541
1542         /* initiate a transmit sequence */
1543         writeword(dev->base_addr, TX_CMD_PORT, lp->send_cmd);
1544         writeword(dev->base_addr, TX_LEN_PORT, skb->len);
1545
1546         /* Test to see if the chip has allocated memory for the packet */
1547         if ((readreg(dev, PP_BusST) & READY_FOR_TX_NOW) == 0) {
1548                 /*
1549                  * Gasp!  It hasn't.  But that shouldn't happen since
1550                  * we're waiting for TxOk, so return 1 and requeue this packet.
1551                  */
1552
1553                 spin_unlock_irq(&lp->lock);
1554                 if (net_debug) printk("cs89x0: Tx buffer not free!\n");
1555                 return 1;
1556         }
1557         /* Write the contents of the packet */
1558         writewords(dev->base_addr, TX_FRAME_PORT,skb->data,(skb->len+1) >>1);
1559         spin_unlock_irq(&lp->lock);
1560         lp->stats.tx_bytes += skb->len;
1561         dev->trans_start = jiffies;
1562         dev_kfree_skb (skb);
1563
1564         /*
1565          * We DO NOT call netif_wake_queue() here.
1566          * We also DO NOT call netif_start_queue().
1567          *
1568          * Either of these would cause another bottom half run through
1569          * net_send_packet() before this packet has fully gone out.  That causes
1570          * us to hit the "Gasp!" above and the send is rescheduled.  it runs like
1571          * a dog.  We just return and wait for the Tx completion interrupt handler
1572          * to restart the netdevice layer
1573          */
1574
1575         return 0;
1576 }
1577
1578 /* The typical workload of the driver:
1579    Handle the network interface interrupts. */
1580
1581 static irqreturn_t net_interrupt(int irq, void *dev_id)
1582 {
1583         struct net_device *dev = dev_id;
1584         struct net_local *lp;
1585         int ioaddr, status;
1586         int handled = 0;
1587
1588         ioaddr = dev->base_addr;
1589         lp = netdev_priv(dev);
1590
1591         /* we MUST read all the events out of the ISQ, otherwise we'll never
1592            get interrupted again.  As a consequence, we can't have any limit
1593            on the number of times we loop in the interrupt handler.  The
1594            hardware guarantees that eventually we'll run out of events.  Of
1595            course, if you're on a slow machine, and packets are arriving
1596            faster than you can read them off, you're screwed.  Hasta la
1597            vista, baby!  */
1598         while ((status = readword(dev->base_addr, ISQ_PORT))) {
1599                 if (net_debug > 4)printk("%s: event=%04x\n", dev->name, status);
1600                 handled = 1;
1601                 switch(status & ISQ_EVENT_MASK) {
1602                 case ISQ_RECEIVER_EVENT:
1603                         /* Got a packet(s). */
1604                         net_rx(dev);
1605                         break;
1606                 case ISQ_TRANSMITTER_EVENT:
1607                         lp->stats.tx_packets++;
1608                         netif_wake_queue(dev);  /* Inform upper layers. */
1609                         if ((status & ( TX_OK |
1610                                         TX_LOST_CRS |
1611                                         TX_SQE_ERROR |
1612                                         TX_LATE_COL |
1613                                         TX_16_COL)) != TX_OK) {
1614                                 if ((status & TX_OK) == 0) lp->stats.tx_errors++;
1615                                 if (status & TX_LOST_CRS) lp->stats.tx_carrier_errors++;
1616                                 if (status & TX_SQE_ERROR) lp->stats.tx_heartbeat_errors++;
1617                                 if (status & TX_LATE_COL) lp->stats.tx_window_errors++;
1618                                 if (status & TX_16_COL) lp->stats.tx_aborted_errors++;
1619                         }
1620                         break;
1621                 case ISQ_BUFFER_EVENT:
1622                         if (status & READY_FOR_TX) {
1623                                 /* we tried to transmit a packet earlier,
1624                                    but inexplicably ran out of buffers.
1625                                    That shouldn't happen since we only ever
1626                                    load one packet.  Shrug.  Do the right
1627                                    thing anyway. */
1628                                 netif_wake_queue(dev);  /* Inform upper layers. */
1629                         }
1630                         if (status & TX_UNDERRUN) {
1631                                 if (net_debug > 0) printk("%s: transmit underrun\n", dev->name);
1632                                 lp->send_underrun++;
1633                                 if (lp->send_underrun == 3) lp->send_cmd = TX_AFTER_381;
1634                                 else if (lp->send_underrun == 6) lp->send_cmd = TX_AFTER_ALL;
1635                                 /* transmit cycle is done, although
1636                                    frame wasn't transmitted - this
1637                                    avoids having to wait for the upper
1638                                    layers to timeout on us, in the
1639                                    event of a tx underrun */
1640                                 netif_wake_queue(dev);  /* Inform upper layers. */
1641                         }
1642 #if ALLOW_DMA
1643                         if (lp->use_dma && (status & RX_DMA)) {
1644                                 int count = readreg(dev, PP_DmaFrameCnt);
1645                                 while(count) {
1646                                         if (net_debug > 5)
1647                                                 printk("%s: receiving %d DMA frames\n", dev->name, count);
1648                                         if (net_debug > 2 && count >1)
1649                                                 printk("%s: receiving %d DMA frames\n", dev->name, count);
1650                                         dma_rx(dev);
1651                                         if (--count == 0)
1652                                                 count = readreg(dev, PP_DmaFrameCnt);
1653                                         if (net_debug > 2 && count > 0)
1654                                                 printk("%s: continuing with %d DMA frames\n", dev->name, count);
1655                                 }
1656                         }
1657 #endif
1658                         break;
1659                 case ISQ_RX_MISS_EVENT:
1660                         lp->stats.rx_missed_errors += (status >>6);
1661                         break;
1662                 case ISQ_TX_COL_EVENT:
1663                         lp->stats.collisions += (status >>6);
1664                         break;
1665                 }
1666         }
1667         return IRQ_RETVAL(handled);
1668 }
1669
1670 static void
1671 count_rx_errors(int status, struct net_local *lp)
1672 {
1673         lp->stats.rx_errors++;
1674         if (status & RX_RUNT) lp->stats.rx_length_errors++;
1675         if (status & RX_EXTRA_DATA) lp->stats.rx_length_errors++;
1676         if (status & RX_CRC_ERROR) if (!(status & (RX_EXTRA_DATA|RX_RUNT)))
1677                 /* per str 172 */
1678                 lp->stats.rx_crc_errors++;
1679         if (status & RX_DRIBBLE) lp->stats.rx_frame_errors++;
1680         return;
1681 }
1682
1683 /* We have a good packet(s), get it/them out of the buffers. */
1684 static void
1685 net_rx(struct net_device *dev)
1686 {
1687         struct net_local *lp = netdev_priv(dev);
1688         struct sk_buff *skb;
1689         int status, length;
1690
1691         int ioaddr = dev->base_addr;
1692         status = readword(ioaddr, RX_FRAME_PORT);
1693         length = readword(ioaddr, RX_FRAME_PORT);
1694
1695         if ((status & RX_OK) == 0) {
1696                 count_rx_errors(status, lp);
1697                 return;
1698         }
1699
1700         /* Malloc up new buffer. */
1701         skb = dev_alloc_skb(length + 2);
1702         if (skb == NULL) {
1703 #if 0           /* Again, this seems a cruel thing to do */
1704                 printk(KERN_WARNING "%s: Memory squeeze, dropping packet.\n", dev->name);
1705 #endif
1706                 lp->stats.rx_dropped++;
1707                 return;
1708         }
1709         skb_reserve(skb, 2);    /* longword align L3 header */
1710
1711         readwords(ioaddr, RX_FRAME_PORT, skb_put(skb, length), length >> 1);
1712         if (length & 1)
1713                 skb->data[length-1] = readword(ioaddr, RX_FRAME_PORT);
1714
1715         if (net_debug > 3) {
1716                 printk( "%s: received %d byte packet of type %x\n",
1717                         dev->name, length,
1718                         (skb->data[ETH_ALEN+ETH_ALEN] << 8) | skb->data[ETH_ALEN+ETH_ALEN+1]);
1719         }
1720
1721         skb->protocol=eth_type_trans(skb,dev);
1722         netif_rx(skb);
1723         dev->last_rx = jiffies;
1724         lp->stats.rx_packets++;
1725         lp->stats.rx_bytes += length;
1726 }
1727
1728 #if ALLOW_DMA
1729 static void release_dma_buff(struct net_local *lp)
1730 {
1731         if (lp->dma_buff) {
1732                 free_pages((unsigned long)(lp->dma_buff), get_order(lp->dmasize * 1024));
1733                 lp->dma_buff = NULL;
1734         }
1735 }
1736 #endif
1737
1738 /* The inverse routine to net_open(). */
1739 static int
1740 net_close(struct net_device *dev)
1741 {
1742 #if ALLOW_DMA
1743         struct net_local *lp = netdev_priv(dev);
1744 #endif
1745
1746         netif_stop_queue(dev);
1747
1748         writereg(dev, PP_RxCFG, 0);
1749         writereg(dev, PP_TxCFG, 0);
1750         writereg(dev, PP_BufCFG, 0);
1751         writereg(dev, PP_BusCTL, 0);
1752
1753         free_irq(dev->irq, dev);
1754
1755 #if ALLOW_DMA
1756         if (lp->use_dma && lp->dma) {
1757                 free_dma(dev->dma);
1758                 release_dma_buff(lp);
1759         }
1760 #endif
1761
1762         /* Update the statistics here. */
1763         return 0;
1764 }
1765
1766 /* Get the current statistics.  This may be called with the card open or
1767    closed. */
1768 static struct net_device_stats *
1769 net_get_stats(struct net_device *dev)
1770 {
1771         struct net_local *lp = netdev_priv(dev);
1772         unsigned long flags;
1773
1774         spin_lock_irqsave(&lp->lock, flags);
1775         /* Update the statistics from the device registers. */
1776         lp->stats.rx_missed_errors += (readreg(dev, PP_RxMiss) >> 6);
1777         lp->stats.collisions += (readreg(dev, PP_TxCol) >> 6);
1778         spin_unlock_irqrestore(&lp->lock, flags);
1779
1780         return &lp->stats;
1781 }
1782
1783 static void set_multicast_list(struct net_device *dev)
1784 {
1785         struct net_local *lp = netdev_priv(dev);
1786         unsigned long flags;
1787
1788         spin_lock_irqsave(&lp->lock, flags);
1789         if(dev->flags&IFF_PROMISC)
1790         {
1791                 lp->rx_mode = RX_ALL_ACCEPT;
1792         }
1793         else if((dev->flags&IFF_ALLMULTI)||dev->mc_list)
1794         {
1795                 /* The multicast-accept list is initialized to accept-all, and we
1796                    rely on higher-level filtering for now. */
1797                 lp->rx_mode = RX_MULTCAST_ACCEPT;
1798         }
1799         else
1800                 lp->rx_mode = 0;
1801
1802         writereg(dev, PP_RxCTL, DEF_RX_ACCEPT | lp->rx_mode);
1803
1804         /* in promiscuous mode, we accept errored packets, so we have to enable interrupts on them also */
1805         writereg(dev, PP_RxCFG, lp->curr_rx_cfg |
1806              (lp->rx_mode == RX_ALL_ACCEPT? (RX_CRC_ERROR_ENBL|RX_RUNT_ENBL|RX_EXTRA_DATA_ENBL) : 0));
1807         spin_unlock_irqrestore(&lp->lock, flags);
1808 }
1809
1810
1811 static int set_mac_address(struct net_device *dev, void *p)
1812 {
1813         int i;
1814         struct sockaddr *addr = p;
1815
1816         if (netif_running(dev))
1817                 return -EBUSY;
1818
1819         memcpy(dev->dev_addr, addr->sa_data, dev->addr_len);
1820
1821         if (net_debug) {
1822                 DECLARE_MAC_BUF(mac);
1823                 printk("%s: Setting MAC address to %s.\n",
1824                        dev->name, print_mac(mac, dev->dev_addr));
1825         }
1826         /* set the Ethernet address */
1827         for (i=0; i < ETH_ALEN/2; i++)
1828                 writereg(dev, PP_IA+i*2, dev->dev_addr[i*2] | (dev->dev_addr[i*2+1] << 8));
1829
1830         return 0;
1831 }
1832
1833 #ifdef MODULE
1834
1835 static struct net_device *dev_cs89x0;
1836
1837 /*
1838  * Support the 'debug' module parm even if we're compiled for non-debug to
1839  * avoid breaking someone's startup scripts
1840  */
1841
1842 static int io;
1843 static int irq;
1844 static int debug;
1845 static char media[8];
1846 static int duplex=-1;
1847
1848 static int use_dma;                     /* These generate unused var warnings if ALLOW_DMA = 0 */
1849 static int dma;
1850 static int dmasize=16;                  /* or 64 */
1851
1852 module_param(io, int, 0);
1853 module_param(irq, int, 0);
1854 module_param(debug, int, 0);
1855 module_param_string(media, media, sizeof(media), 0);
1856 module_param(duplex, int, 0);
1857 module_param(dma , int, 0);
1858 module_param(dmasize , int, 0);
1859 module_param(use_dma , int, 0);
1860 MODULE_PARM_DESC(io, "cs89x0 I/O base address");
1861 MODULE_PARM_DESC(irq, "cs89x0 IRQ number");
1862 #if DEBUGGING
1863 MODULE_PARM_DESC(debug, "cs89x0 debug level (0-6)");
1864 #else
1865 MODULE_PARM_DESC(debug, "(ignored)");
1866 #endif
1867 MODULE_PARM_DESC(media, "Set cs89x0 adapter(s) media type(s) (rj45,bnc,aui)");
1868 /* No other value than -1 for duplex seems to be currently interpreted */
1869 MODULE_PARM_DESC(duplex, "(ignored)");
1870 #if ALLOW_DMA
1871 MODULE_PARM_DESC(dma , "cs89x0 ISA DMA channel; ignored if use_dma=0");
1872 MODULE_PARM_DESC(dmasize , "cs89x0 DMA size in kB (16,64); ignored if use_dma=0");
1873 MODULE_PARM_DESC(use_dma , "cs89x0 using DMA (0-1)");
1874 #else
1875 MODULE_PARM_DESC(dma , "(ignored)");
1876 MODULE_PARM_DESC(dmasize , "(ignored)");
1877 MODULE_PARM_DESC(use_dma , "(ignored)");
1878 #endif
1879
1880 MODULE_AUTHOR("Mike Cruse, Russwll Nelson <nelson@crynwr.com>, Andrew Morton <andrewm@uow.edu.au>");
1881 MODULE_LICENSE("GPL");
1882
1883
1884 /*
1885 * media=t             - specify media type
1886    or media=2
1887    or media=aui
1888    or medai=auto
1889 * duplex=0            - specify forced half/full/autonegotiate duplex
1890 * debug=#             - debug level
1891
1892
1893 * Default Chip Configuration:
1894   * DMA Burst = enabled
1895   * IOCHRDY Enabled = enabled
1896     * UseSA = enabled
1897     * CS8900 defaults to half-duplex if not specified on command-line
1898     * CS8920 defaults to autoneg if not specified on command-line
1899     * Use reset defaults for other config parameters
1900
1901 * Assumptions:
1902   * media type specified is supported (circuitry is present)
1903   * if memory address is > 1MB, then required mem decode hw is present
1904   * if 10B-2, then agent other than driver will enable DC/DC converter
1905     (hw or software util)
1906
1907
1908 */
1909
1910 int __init init_module(void)
1911 {
1912         struct net_device *dev = alloc_etherdev(sizeof(struct net_local));
1913         struct net_local *lp;
1914         int ret = 0;
1915
1916 #if DEBUGGING
1917         net_debug = debug;
1918 #else
1919         debug = 0;
1920 #endif
1921         if (!dev)
1922                 return -ENOMEM;
1923
1924         dev->irq = irq;
1925         dev->base_addr = io;
1926         lp = netdev_priv(dev);
1927
1928 #if ALLOW_DMA
1929         if (use_dma) {
1930                 lp->use_dma = use_dma;
1931                 lp->dma = dma;
1932                 lp->dmasize = dmasize;
1933         }
1934 #endif
1935
1936         spin_lock_init(&lp->lock);
1937
1938         /* boy, they'd better get these right */
1939         if (!strcmp(media, "rj45"))
1940                 lp->adapter_cnf = A_CNF_MEDIA_10B_T | A_CNF_10B_T;
1941         else if (!strcmp(media, "aui"))
1942                 lp->adapter_cnf = A_CNF_MEDIA_AUI   | A_CNF_AUI;
1943         else if (!strcmp(media, "bnc"))
1944                 lp->adapter_cnf = A_CNF_MEDIA_10B_2 | A_CNF_10B_2;
1945         else
1946                 lp->adapter_cnf = A_CNF_MEDIA_10B_T | A_CNF_10B_T;
1947
1948         if (duplex==-1)
1949                 lp->auto_neg_cnf = AUTO_NEG_ENABLE;
1950
1951         if (io == 0) {
1952                 printk(KERN_ERR "cs89x0.c: Module autoprobing not allowed.\n");
1953                 printk(KERN_ERR "cs89x0.c: Append io=0xNNN\n");
1954                 ret = -EPERM;
1955                 goto out;
1956         } else if (io <= 0x1ff) {
1957                 ret = -ENXIO;
1958                 goto out;
1959         }
1960
1961 #if ALLOW_DMA
1962         if (use_dma && dmasize != 16 && dmasize != 64) {
1963                 printk(KERN_ERR "cs89x0.c: dma size must be either 16K or 64K, not %dK\n", dmasize);
1964                 ret = -EPERM;
1965                 goto out;
1966         }
1967 #endif
1968         ret = cs89x0_probe1(dev, io, 1);
1969         if (ret)
1970                 goto out;
1971
1972         dev_cs89x0 = dev;
1973         return 0;
1974 out:
1975         free_netdev(dev);
1976         return ret;
1977 }
1978
1979 void __exit
1980 cleanup_module(void)
1981 {
1982         unregister_netdev(dev_cs89x0);
1983         writeword(dev_cs89x0->base_addr, ADD_PORT, PP_ChipID);
1984         release_region(dev_cs89x0->base_addr, NETCARD_IO_EXTENT);
1985         free_netdev(dev_cs89x0);
1986 }
1987 #endif /* MODULE */
1988
1989 /*
1990  * Local variables:
1991  *  version-control: t
1992  *  kept-new-versions: 5
1993  *  c-indent-level: 8
1994  *  tab-width: 8
1995  * End:
1996  *
1997  */