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