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