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     : Kernel 2.3.48
  40                     : Handle kmalloc() failures
  41                     : Other resource allocation fixes
  42                     : Add SMP locks
  43                     : Integrate Russ Nelson's ALLOW_DMA functionality back in.
  44                     : If ALLOW_DMA is true, make DMA runtime selectable
  45                     : Folded in changes from Cirrus (Melody Lee
  46                     : <klee@crystal.cirrus.com>)
  47                     : Don't call netif_wake_queue() in net_send_packet()
  48                     : Fixed an out-of-mem bug in dma_rx()
  49                     : Updated Documentation/networking/cs89x0.txt
  50
  51   Andrew Morton     : Kernel 2.3.99-pre1
  52                     : Use skb_reserve to longword align IP header (two places)
  53                     : Remove a delay loop from dma_rx()
  54                     : Replace '100' with HZ
  55                     : Clean up a couple of skb API abuses
  56                     : Added 'cs89x0_dma=N' kernel boot option
  57                     : Correctly initialise lp->lock in non-module compile
  58
  59   Andrew Morton     : Kernel 2.3.99-pre4-1
  60                     : MOD_INC/DEC race fix (see
  61                     : http://www.uwsg.indiana.edu/hypermail/linux/kernel/0003.3/1532.html)
  62
  63   Andrew Morton     : Kernel 2.4.0-test7-pre2
  64                     : Enhanced EEPROM support to cover more devices,
  65                     :   abstracted IRQ mapping to support CONFIG_ARCH_CLPS7500 arch
  66                     :   (Jason Gunthorpe <jgg@ualberta.ca>)
  67
  68   Andrew Morton     : Kernel 2.4.0-test11-pre4
  69                     : Use dev->name in request_*() (Andrey Panin)
  70                     : Fix an error-path memleak in init_module()
  71                     : Preserve return value from request_irq()
  72                     : Fix type of `media' module parm (Keith Owens)
  73                     : Use SET_MODULE_OWNER()
  74                     : Tidied up strange request_irq() abuse in net_open().
  75
  76   Andrew Morton     : Kernel 2.4.3-pre1
  77                     : Request correct number of pages for DMA (Hugh Dickens)
  78                     : Select PP_ChipID _after_ unregister_netdev in cleanup_module()
  79                     :  because unregister_netdev() calls get_stats.
  80                     : Make `version[]' __initdata
  81                     : Uninlined the read/write reg/word functions.
  82
  83   Oskar Schirmer    : oskar@scara.com
  84                     : HiCO.SH4 (superh) support added (irq#1, cs89x0_media=)
  85
  86   Deepak Saxena     : dsaxena@plexity.net
  87                     : Intel IXDP2x01 (XScale ixp2x00 NPU) platform support
  88
  89   Dmitry Pervushin  : dpervushin@ru.mvista.com
  90                     : PNX010X platform support
  91
  92   Deepak Saxena     : dsaxena@plexity.net
  93                     : Intel IXDP2351 platform support
  94
  95   Dmitry Pervushin  : dpervushin@ru.mvista.com
  96                     : PNX010X platform support
  97
  98 */
  99
 100 /* Always include 'config.h' first in case the user wants to turn on
 101    or override something. */
 102 #include <linux/module.h>
 103
 104 /*
 105  * Set this to zero to disable DMA code
 106  *
 107  * Note that even if DMA is turned off we still support the 'dma' and  'use_dma'
 108  * module options so we don't break any startup scripts.
 109  */
 110 #ifndef CONFIG_ISA_DMA_API
 111 #define ALLOW_DMA       0
 112 #else
 113 #define ALLOW_DMA       1
 114 #endif
 115
 116 /*
 117  * Set this to zero to remove all the debug statements via
 118  * dead code elimination
 119  */
 120 #define DEBUGGING       1
 121
 122 /*
 123   Sources:
 124
 125         Crynwr packet driver epktisa.
 126
 127         Crystal Semiconductor data sheets.
 128
 129 */
 130
 131 #include <linux/errno.h>
 132 #include <linux/netdevice.h>
 133 #include <linux/etherdevice.h>
 134 #include <linux/kernel.h>
 135 #include <linux/types.h>
 136 #include <linux/fcntl.h>
 137 #include <linux/interrupt.h>
 138 #include <linux/ioport.h>
 139 #include <linux/in.h>
 140 #include <linux/skbuff.h>
 141 #include <linux/slab.h>
 142 #include <linux/spinlock.h>
 143 #include <linux/string.h>
 144 #include <linux/init.h>
 145 #include <linux/bitops.h>
 146 #include <linux/delay.h>
 147
 148 #include <asm/system.h>
 149 #include <asm/io.h>
 150 #include <asm/irq.h>
 151 #if ALLOW_DMA
 152 #include <asm/dma.h>
 153 #endif
 154
 155 #include "cs89x0.h"
 156
 157 static char version[] __initdata =
 158 "cs89x0.c: v2.4.3-pre1 Russell Nelson <nelson@crynwr.com>, Andrew Morton\n";
 159
 160 #define DRV_NAME "cs89x0"
 161
 162 /* First, a few definitions that the brave might change.
 163    A zero-terminated list of I/O addresses to be probed. Some special flags..
 164       Addr & 1 = Read back the address port, look for signature and reset
 165                  the page window before probing
 166       Addr & 3 = Reset the page window and probe
 167    The CLPS eval board has the Cirrus chip at 0x80090300, in ARM IO space,
 168    but it is possible that a Cirrus board could be plugged into the ISA
 169    slots. */
 170 /* The cs8900 has 4 IRQ pins, software selectable. cs8900_irq_map maps
 171    them to system IRQ numbers. This mapping is card specific and is set to
 172    the configuration of the Cirrus Eval board for this chip. */
 173 #ifdef CONFIG_ARCH_CLPS7500
 174 static unsigned int netcard_portlist[] __used __initdata =
 175    { 0x80090303, 0x300, 0x320, 0x340, 0x360, 0x200, 0x220, 0x240, 0x260, 0x280, 0x2a0, 0x2c0, 0x2e0, 0};
 176 static unsigned int cs8900_irq_map[] = {12,0,0,0};
 177 #elif defined(CONFIG_SH_HICOSH4)
 178 static unsigned int netcard_portlist[] __used __initdata =
 179    { 0x0300, 0};
 180 static unsigned int cs8900_irq_map[] = {1,0,0,0};
 181 #elif defined(CONFIG_MACH_IXDP2351)
 182 static unsigned int netcard_portlist[] __used __initdata = {IXDP2351_VIRT_CS8900_BASE, 0};
 183 static unsigned int cs8900_irq_map[] = {IRQ_IXDP2351_CS8900, 0, 0, 0};
 184 #include <asm/irq.h>
 185 #elif defined(CONFIG_ARCH_IXDP2X01)
 186 #include <asm/irq.h>
 187 static unsigned int netcard_portlist[] __used __initdata = {IXDP2X01_CS8900_VIRT_BASE, 0};
 188 static unsigned int cs8900_irq_map[] = {IRQ_IXDP2X01_CS8900, 0, 0, 0};
 189 #elif defined(CONFIG_ARCH_PNX010X)
 190 #include <asm/irq.h>
 191 #include <mach/gpio.h>
 192 #define CIRRUS_DEFAULT_BASE     IO_ADDRESS(EXT_STATIC2_s0_BASE + 0x200000)      /* = Physical address 0x48200000 */
 193 #define CIRRUS_DEFAULT_IRQ      VH_INTC_INT_NUM_CASCADED_INTERRUPT_1 /* Event inputs bank 1 - ID 35/bit 3 */
 194 static unsigned int netcard_portlist[] __used __initdata = {CIRRUS_DEFAULT_BASE, 0};
 195 static unsigned int cs8900_irq_map[] = {CIRRUS_DEFAULT_IRQ, 0, 0, 0};
 196 #elif defined(CONFIG_MACH_MX31ADS)
 197 #include <mach/board-mx31ads.h>
 198 static unsigned int netcard_portlist[] __used __initdata = {
 199         PBC_BASE_ADDRESS + PBC_CS8900A_IOBASE + 0x300, 0
 200 };
 201 static unsigned cs8900_irq_map[] = {EXPIO_INT_ENET_INT, 0, 0, 0};
 202 #else
 203 static unsigned int netcard_portlist[] __used __initdata =
 204    { 0x300, 0x320, 0x340, 0x360, 0x200, 0x220, 0x240, 0x260, 0x280, 0x2a0, 0x2c0, 0x2e0, 0};
 205 static unsigned int cs8900_irq_map[] = {10,11,12,5};
 206 #endif
 207
 208 #if DEBUGGING
 209 static unsigned int net_debug = DEBUGGING;
 210 #else
 211 #define net_debug 0     /* gcc will remove all the debug code for us */
 212 #endif
 213
 214 /* The number of low I/O ports used by the ethercard. */
 215 #define NETCARD_IO_EXTENT       16
 216
 217 /* we allow the user to override various values normally set in the EEPROM */
 218 #define FORCE_RJ45      0x0001    /* pick one of these three */
 219 #define FORCE_AUI       0x0002
 220 #define FORCE_BNC       0x0004
 221
 222 #define FORCE_AUTO      0x0010    /* pick one of these three */
 223 #define FORCE_HALF      0x0020
 224 #define FORCE_FULL      0x0030
 225
 226 /* Information that need to be kept for each board. */
 227 struct net_local {
 228         struct net_device_stats stats;
 229         int chip_type;          /* one of: CS8900, CS8920, CS8920M */
 230         char chip_revision;     /* revision letter of the chip ('A'...) */
 231         int send_cmd;           /* the proper send command: TX_NOW, TX_AFTER_381, or TX_AFTER_ALL */
 232         int auto_neg_cnf;       /* auto-negotiation word from EEPROM */
 233         int adapter_cnf;        /* adapter configuration from EEPROM */
 234         int isa_config;         /* ISA configuration from EEPROM */
 235         int irq_map;            /* IRQ map from EEPROM */
 236         int rx_mode;            /* what mode are we in? 0, RX_MULTCAST_ACCEPT, or RX_ALL_ACCEPT */
 237         int curr_rx_cfg;        /* a copy of PP_RxCFG */
 238         int linectl;            /* either 0 or LOW_RX_SQUELCH, depending on configuration. */
 239         int send_underrun;      /* keep track of how many underruns in a row we get */
 240         int force;              /* force various values; see FORCE* above. */
 241         spinlock_t lock;
 242 #if ALLOW_DMA
 243         int use_dma;            /* Flag: we're using dma */
 244         int dma;                /* DMA channel */
 245         int dmasize;            /* 16 or 64 */
 246         unsigned char *dma_buff;        /* points to the beginning of the buffer */
 247         unsigned char *end_dma_buff;    /* points to the end of the buffer */
 248         unsigned char *rx_dma_ptr;      /* points to the next packet  */
 249 #endif
 250 };
 251
 252 /* Index to functions, as function prototypes. */
 253
 254 static int cs89x0_probe1(struct net_device *dev, int ioaddr, int modular);
 255 static int net_open(struct net_device *dev);
 256 static int net_send_packet(struct sk_buff *skb, struct net_device *dev);
 257 static irqreturn_t net_interrupt(int irq, void *dev_id);
 258 static void set_multicast_list(struct net_device *dev);
 259 static void net_timeout(struct net_device *dev);
 260 static void net_rx(struct net_device *dev);
 261 static int net_close(struct net_device *dev);
 262 static struct net_device_stats *net_get_stats(struct net_device *dev);
 263 static void reset_chip(struct net_device *dev);
 264 static int get_eeprom_data(struct net_device *dev, int off, int len, int *buffer);
 265 static int get_eeprom_cksum(int off, int len, int *buffer);
 266 static int set_mac_address(struct net_device *dev, void *addr);
 267 static void count_rx_errors(int status, struct net_local *lp);
 268 #ifdef CONFIG_NET_POLL_CONTROLLER
 269 static void net_poll_controller(struct net_device *dev);
 270 #endif
 271 #if ALLOW_DMA
 272 static void get_dma_channel(struct net_device *dev);
 273 static void release_dma_buff(struct net_local *lp);
 274 #endif
 275
 276 /* Example routines you must write ;->. */
 277 #define tx_done(dev) 1
 278
 279 /*
 280  * Permit 'cs89x0_dma=N' in the kernel boot environment
 281  */
 282 #if !defined(MODULE) && (ALLOW_DMA != 0)
 283 static int g_cs89x0_dma;
 284
 285 static int __init dma_fn(char *str)
 286 {
 287         g_cs89x0_dma = simple_strtol(str,NULL,0);
 288         return 1;
 289 }
 290
 291 __setup("cs89x0_dma=", dma_fn);
 292 #endif  /* !defined(MODULE) && (ALLOW_DMA != 0) */
 293
 294 #ifndef MODULE
 295 static int g_cs89x0_media__force;
 296
 297 static int __init media_fn(char *str)
 298 {
 299         if (!strcmp(str, "rj45")) g_cs89x0_media__force = FORCE_RJ45;
 300         else if (!strcmp(str, "aui")) g_cs89x0_media__force = FORCE_AUI;
 301         else if (!strcmp(str, "bnc")) g_cs89x0_media__force = FORCE_BNC;
 302         return 1;
 303 }
 304
 305 __setup("cs89x0_media=", media_fn);
 306
 307
 308 /* Check for a network adaptor of this type, and return '0' iff one exists.
 309    If dev->base_addr == 0, probe all likely locations.
 310    If dev->base_addr == 1, always return failure.
 311    If dev->base_addr == 2, allocate space for the device and return success
 312    (detachable devices only).
 313    Return 0 on success.
 314    */
 315
 316 struct net_device * __init cs89x0_probe(int unit)
 317 {
 318         struct net_device *dev = alloc_etherdev(sizeof(struct net_local));
 319         unsigned *port;
 320         int err = 0;
 321         int irq;
 322         int io;
 323
 324         if (!dev)
 325                 return ERR_PTR(-ENODEV);
 326
 327         sprintf(dev->name, "eth%d", unit);
 328         netdev_boot_setup_check(dev);
 329         io = dev->base_addr;
 330         irq = dev->irq;
 331
 332         if (net_debug)
 333                 printk("cs89x0:cs89x0_probe(0x%x)\n", io);
 334
 335         if (io > 0x1ff) {       /* Check a single specified location. */
 336                 err = cs89x0_probe1(dev, io, 0);
 337         } else if (io != 0) {   /* Don't probe at all. */
 338                 err = -ENXIO;
 339         } else {
 340                 for (port = netcard_portlist; *port; port++) {
 341                         if (cs89x0_probe1(dev, *port, 0) == 0)
 342                                 break;
 343                         dev->irq = irq;
 344                 }
 345                 if (!*port)
 346                         err = -ENODEV;
 347         }
 348         if (err)
 349                 goto out;
 350         return dev;
 351 out:
 352         free_netdev(dev);
 353         printk(KERN_WARNING "cs89x0: no cs8900 or cs8920 detected.  Be sure to disable PnP with SETUP\n");
 354         return ERR_PTR(err);
 355 }
 356 #endif
 357
 358 #if defined(CONFIG_MACH_IXDP2351)
 359 static u16
 360 readword(unsigned long base_addr, int portno)
 361 {
 362         return __raw_readw(base_addr + (portno << 1));
 363 }
 364
 365 static void
 366 writeword(unsigned long base_addr, int portno, u16 value)
 367 {
 368         __raw_writew(value, base_addr + (portno << 1));
 369 }
 370 #elif defined(CONFIG_ARCH_IXDP2X01)
 371 static u16
 372 readword(unsigned long base_addr, int portno)
 373 {
 374         return __raw_readl(base_addr + (portno << 1));
 375 }
 376
 377 static void
 378 writeword(unsigned long base_addr, int portno, u16 value)
 379 {
 380         __raw_writel(value, base_addr + (portno << 1));
 381 }
 382 #elif defined(CONFIG_ARCH_PNX010X)
 383 static u16
 384 readword(unsigned long base_addr, int portno)
 385 {
 386         return inw(base_addr + (portno << 1));
 387 }
 388
 389 static void
 390 writeword(unsigned long base_addr, int portno, u16 value)
 391 {
 392         outw(value, base_addr + (portno << 1));
 393 }
 394 #else
 395 static u16
 396 readword(unsigned long base_addr, int portno)
 397 {
 398         return inw(base_addr + portno);
 399 }
 400
 401 static void
 402 writeword(unsigned long base_addr, int portno, u16 value)
 403 {
 404         outw(value, base_addr + portno);
 405 }
 406 #endif
 407
 408 static void
 409 readwords(unsigned long base_addr, int portno, void *buf, int length)
 410 {
 411         u8 *buf8 = (u8 *)buf;
 412
 413         do {
 414                 u16 tmp16;
 415
 416                 tmp16 = readword(base_addr, portno);
 417                 *buf8++ = (u8)tmp16;
 418                 *buf8++ = (u8)(tmp16 >> 8);
 419         } while (--length);
 420 }
 421
 422 static void
 423 writewords(unsigned long base_addr, int portno, void *buf, int length)
 424 {
 425         u8 *buf8 = (u8 *)buf;
 426
 427         do {
 428                 u16 tmp16;
 429
 430                 tmp16 = *buf8++;
 431                 tmp16 |= (*buf8++) << 8;
 432                 writeword(base_addr, portno, tmp16);
 433         } while (--length);
 434 }
 435
 436 static u16
 437 readreg(struct net_device *dev, u16 regno)
 438 {
 439         writeword(dev->base_addr, ADD_PORT, regno);
 440         return readword(dev->base_addr, DATA_PORT);
 441 }
 442
 443 static void
 444 writereg(struct net_device *dev, u16 regno, u16 value)
 445 {
 446         writeword(dev->base_addr, ADD_PORT, regno);
 447         writeword(dev->base_addr, DATA_PORT, value);
 448 }
 449
 450 static int __init
 451 wait_eeprom_ready(struct net_device *dev)
 452 {
 453         int timeout = jiffies;
 454         /* check to see if the EEPROM is ready, a timeout is used -
 455            just in case EEPROM is ready when SI_BUSY in the
 456            PP_SelfST is clear */
 457         while(readreg(dev, PP_SelfST) & SI_BUSY)
 458                 if (jiffies - timeout >= 40)
 459                         return -1;
 460         return 0;
 461 }
 462
 463 static int __init
 464 get_eeprom_data(struct net_device *dev, int off, int len, int *buffer)
 465 {
 466         int i;
 467
 468         if (net_debug > 3) printk("EEPROM data from %x for %x:\n",off,len);
 469         for (i = 0; i < len; i++) {
 470                 if (wait_eeprom_ready(dev) < 0) return -1;
 471                 /* Now send the EEPROM read command and EEPROM location to read */
 472                 writereg(dev, PP_EECMD, (off + i) | EEPROM_READ_CMD);
 473                 if (wait_eeprom_ready(dev) < 0) return -1;
 474                 buffer[i] = readreg(dev, PP_EEData);
 475                 if (net_debug > 3) printk("%04x ", buffer[i]);
 476         }
 477         if (net_debug > 3) printk("\n");
 478         return 0;
 479 }
 480
 481 static int  __init
 482 get_eeprom_cksum(int off, int len, int *buffer)
 483 {
 484         int i, cksum;
 485
 486         cksum = 0;
 487         for (i = 0; i < len; i++)
 488                 cksum += buffer[i];
 489         cksum &= 0xffff;
 490         if (cksum == 0)
 491                 return 0;
 492         return -1;
 493 }
 494
 495 #ifdef CONFIG_NET_POLL_CONTROLLER
 496 /*
 497  * Polling receive - used by netconsole and other diagnostic tools
 498  * to allow network i/o with interrupts disabled.
 499  */
 500 static void net_poll_controller(struct net_device *dev)
 501 {
 502         disable_irq(dev->irq);
 503         net_interrupt(dev->irq, dev);
 504         enable_irq(dev->irq);
 505 }
 506 #endif
 507
 508 /* This is the real probe routine.  Linux has a history of friendly device
 509    probes on the ISA bus.  A good device probes avoids doing writes, and
 510    verifies that the correct device exists and functions.
 511    Return 0 on success.
 512  */
 513
 514 static int __init
 515 cs89x0_probe1(struct net_device *dev, int ioaddr, int modular)
 516 {
 517         struct net_local *lp = netdev_priv(dev);
 518         static unsigned version_printed;
 519         int i;
 520         int tmp;
 521         unsigned rev_type = 0;
 522         int eeprom_buff[CHKSUM_LEN];
 523         int retval;
 524
 525         /* Initialize the device structure. */
 526         if (!modular) {
 527                 memset(lp, 0, sizeof(*lp));
 528                 spin_lock_init(&lp->lock);
 529 #ifndef MODULE
 530 #if ALLOW_DMA
 531                 if (g_cs89x0_dma) {
 532                         lp->use_dma = 1;
 533                         lp->dma = g_cs89x0_dma;
 534                         lp->dmasize = 16;       /* Could make this an option... */
 535                 }
 536 #endif
 537                 lp->force = g_cs89x0_media__force;
 538 #endif
 539         }
 540
 541 #ifdef CONFIG_ARCH_PNX010X
 542         initialize_ebi();
 543
 544         /* Map GPIO registers for the pins connected to the CS8900a. */
 545         if (map_cirrus_gpio() < 0)
 546                 return -ENODEV;
 547
 548         reset_cirrus();
 549
 550         /* Map event-router registers. */
 551         if (map_event_router() < 0)
 552                 return -ENODEV;
 553
 554         enable_cirrus_irq();
 555
 556         unmap_cirrus_gpio();
 557         unmap_event_router();
 558
 559         dev->base_addr = ioaddr;
 560
 561         for (i = 0 ; i < 3 ; i++)
 562                 readreg(dev, 0);
 563 #endif
 564
 565         /* Grab the region so we can find another board if autoIRQ fails. */
 566         /* WTF is going on here? */
 567         if (!request_region(ioaddr & ~3, NETCARD_IO_EXTENT, DRV_NAME)) {
 568                 printk(KERN_ERR "%s: request_region(0x%x, 0x%x) failed\n",
 569                                 DRV_NAME, ioaddr, NETCARD_IO_EXTENT);
 570                 retval = -EBUSY;
 571                 goto out1;
 572         }
 573
 574 #ifdef CONFIG_SH_HICOSH4
 575         /* truely reset the chip */
 576         writeword(ioaddr, ADD_PORT, 0x0114);
 577         writeword(ioaddr, DATA_PORT, 0x0040);
 578 #endif
 579
 580         /* if they give us an odd I/O address, then do ONE write to
 581            the address port, to get it back to address zero, where we
 582            expect to find the EISA signature word. An IO with a base of 0x3
 583            will skip the test for the ADD_PORT. */
 584         if (ioaddr & 1) {
 585                 if (net_debug > 1)
 586                         printk(KERN_INFO "%s: odd ioaddr 0x%x\n", dev->name, ioaddr);
 587                 if ((ioaddr & 2) != 2)
 588                         if ((readword(ioaddr & ~3, ADD_PORT) & ADD_MASK) != ADD_SIG) {
 589                                 printk(KERN_ERR "%s: bad signature 0x%x\n",
 590                                         dev->name, readword(ioaddr & ~3, ADD_PORT));
 591                                 retval = -ENODEV;
 592                                 goto out2;
 593                         }
 594         }
 595
 596         ioaddr &= ~3;
 597         printk(KERN_DEBUG "PP_addr at %x[%x]: 0x%x\n",
 598                         ioaddr, ADD_PORT, readword(ioaddr, ADD_PORT));
 599         writeword(ioaddr, ADD_PORT, PP_ChipID);
 600
 601         tmp = readword(ioaddr, DATA_PORT);
 602         if (tmp != CHIP_EISA_ID_SIG) {
 603                 printk(KERN_DEBUG "%s: incorrect signature at %x[%x]: 0x%x!="
 604                         CHIP_EISA_ID_SIG_STR "\n",
 605                         dev->name, ioaddr, DATA_PORT, tmp);
 606                 retval = -ENODEV;
 607                 goto out2;
 608         }
 609
 610         /* Fill in the 'dev' fields. */
 611         dev->base_addr = ioaddr;
 612
 613         /* get the chip type */
 614         rev_type = readreg(dev, PRODUCT_ID_ADD);
 615         lp->chip_type = rev_type &~ REVISON_BITS;
 616         lp->chip_revision = ((rev_type & REVISON_BITS) >> 8) + 'A';
 617
 618         /* Check the chip type and revision in order to set the correct send command
 619         CS8920 revision C and CS8900 revision F can use the faster send. */
 620         lp->send_cmd = TX_AFTER_381;
 621         if (lp->chip_type == CS8900 && lp->chip_revision >= 'F')
 622                 lp->send_cmd = TX_NOW;
 623         if (lp->chip_type != CS8900 && lp->chip_revision >= 'C')
 624                 lp->send_cmd = TX_NOW;
 625
 626         if (net_debug  &&  version_printed++ == 0)
 627                 printk(version);
 628
 629         printk(KERN_INFO "%s: cs89%c0%s rev %c found at %#3lx ",
 630                dev->name,
 631                lp->chip_type==CS8900?'0':'2',
 632                lp->chip_type==CS8920M?"M":"",
 633                lp->chip_revision,
 634                dev->base_addr);
 635
 636         reset_chip(dev);
 637
 638         /* Here we read the current configuration of the chip. If there
 639            is no Extended EEPROM then the idea is to not disturb the chip
 640            configuration, it should have been correctly setup by automatic
 641            EEPROM read on reset. So, if the chip says it read the EEPROM
 642            the driver will always do *something* instead of complain that
 643            adapter_cnf is 0. */
 644
 645 #ifdef CONFIG_SH_HICOSH4
 646         if (1) {
 647                 /* For the HiCO.SH4 board, things are different: we don't
 648                    have EEPROM, but there is some data in flash, so we go
 649                    get it there directly (MAC). */
 650                 __u16 *confd;
 651                 short cnt;
 652                 if (((* (volatile __u32 *) 0xa0013ff0) & 0x00ffffff)
 653                         == 0x006c3000) {
 654                         confd = (__u16*) 0xa0013fc0;
 655                 } else {
 656                         confd = (__u16*) 0xa001ffc0;
 657                 }
 658                 cnt = (*confd++ & 0x00ff) >> 1;
 659                 while (--cnt > 0) {
 660                         __u16 j = *confd++;
 661
 662                         switch (j & 0x0fff) {
 663                         case PP_IA:
 664                                 for (i = 0; i < ETH_ALEN/2; i++) {
 665                                         dev->dev_addr[i*2] = confd[i] & 0xFF;
 666                                         dev->dev_addr[i*2+1] = confd[i] >> 8;
 667                                 }
 668                                 break;
 669                         }
 670                         j = (j >> 12) + 1;
 671                         confd += j;
 672                         cnt -= j;
 673                 }
 674         } else
 675 #endif
 676
 677         if ((readreg(dev, PP_SelfST) & (EEPROM_OK | EEPROM_PRESENT)) ==
 678               (EEPROM_OK|EEPROM_PRESENT)) {
 679                 /* Load the MAC. */
 680                 for (i=0; i < ETH_ALEN/2; i++) {
 681                         unsigned int Addr;
 682                         Addr = readreg(dev, PP_IA+i*2);
 683                         dev->dev_addr[i*2] = Addr & 0xFF;
 684                         dev->dev_addr[i*2+1] = Addr >> 8;
 685                 }
 686
 687                 /* Load the Adapter Configuration.
 688                    Note:  Barring any more specific information from some
 689                    other source (ie EEPROM+Schematics), we would not know
 690                    how to operate a 10Base2 interface on the AUI port.
 691                    However, since we  do read the status of HCB1 and use
 692                    settings that always result in calls to control_dc_dc(dev,0)
 693                    a BNC interface should work if the enable pin
 694                    (dc/dc converter) is on HCB1. It will be called AUI
 695                    however. */
 696
 697                 lp->adapter_cnf = 0;
 698                 i = readreg(dev, PP_LineCTL);
 699                 /* Preserve the setting of the HCB1 pin. */
 700                 if ((i & (HCB1 | HCB1_ENBL)) ==  (HCB1 | HCB1_ENBL))
 701                         lp->adapter_cnf |= A_CNF_DC_DC_POLARITY;
 702                 /* Save the sqelch bit */
 703                 if ((i & LOW_RX_SQUELCH) == LOW_RX_SQUELCH)
 704                         lp->adapter_cnf |= A_CNF_EXTND_10B_2 | A_CNF_LOW_RX_SQUELCH;
 705                 /* Check if the card is in 10Base-t only mode */
 706                 if ((i & (AUI_ONLY | AUTO_AUI_10BASET)) == 0)
 707                         lp->adapter_cnf |=  A_CNF_10B_T | A_CNF_MEDIA_10B_T;
 708                 /* Check if the card is in AUI only mode */
 709                 if ((i & (AUI_ONLY | AUTO_AUI_10BASET)) == AUI_ONLY)
 710                         lp->adapter_cnf |=  A_CNF_AUI | A_CNF_MEDIA_AUI;
 711                 /* Check if the card is in Auto mode. */
 712                 if ((i & (AUI_ONLY | AUTO_AUI_10BASET)) == AUTO_AUI_10BASET)
 713                         lp->adapter_cnf |=  A_CNF_AUI | A_CNF_10B_T |
 714                         A_CNF_MEDIA_AUI | A_CNF_MEDIA_10B_T | A_CNF_MEDIA_AUTO;
 715
 716                 if (net_debug > 1)
 717                         printk(KERN_INFO "%s: PP_LineCTL=0x%x, adapter_cnf=0x%x\n",
 718                                         dev->name, i, lp->adapter_cnf);
 719
 720                 /* IRQ. Other chips already probe, see below. */
 721                 if (lp->chip_type == CS8900)
 722                         lp->isa_config = readreg(dev, PP_CS8900_ISAINT) & INT_NO_MASK;
 723
 724                 printk( "[Cirrus EEPROM] ");
 725         }
 726
 727         printk("\n");
 728
 729         /* First check to see if an EEPROM is attached. */
 730 #ifdef CONFIG_SH_HICOSH4 /* no EEPROM on HiCO, don't hazzle with it here */
 731         if (1) {
 732                 printk(KERN_NOTICE "cs89x0: No EEPROM on HiCO.SH4\n");
 733         } else
 734 #endif
 735         if ((readreg(dev, PP_SelfST) & EEPROM_PRESENT) == 0)
 736                 printk(KERN_WARNING "cs89x0: No EEPROM, relying on command line....\n");
 737         else if (get_eeprom_data(dev, START_EEPROM_DATA,CHKSUM_LEN,eeprom_buff) < 0) {
 738                 printk(KERN_WARNING "\ncs89x0: EEPROM read failed, relying on command line.\n");
 739         } else if (get_eeprom_cksum(START_EEPROM_DATA,CHKSUM_LEN,eeprom_buff) < 0) {
 740                 /* Check if the chip was able to read its own configuration starting
 741                    at 0 in the EEPROM*/
 742                 if ((readreg(dev, PP_SelfST) & (EEPROM_OK | EEPROM_PRESENT)) !=
 743                     (EEPROM_OK|EEPROM_PRESENT))
 744                         printk(KERN_WARNING "cs89x0: Extended EEPROM checksum bad and no Cirrus EEPROM, relying on command line\n");
 745
 746         } else {
 747                 /* This reads an extended EEPROM that is not documented
 748                    in the CS8900 datasheet. */
 749
 750                 /* get transmission control word  but keep the autonegotiation bits */
 751                 if (!lp->auto_neg_cnf) lp->auto_neg_cnf = eeprom_buff[AUTO_NEG_CNF_OFFSET/2];
 752                 /* Store adapter configuration */
 753                 if (!lp->adapter_cnf) lp->adapter_cnf = eeprom_buff[ADAPTER_CNF_OFFSET/2];
 754                 /* Store ISA configuration */
 755                 lp->isa_config = eeprom_buff[ISA_CNF_OFFSET/2];
 756                 dev->mem_start = eeprom_buff[PACKET_PAGE_OFFSET/2] << 8;
 757
 758                 /* eeprom_buff has 32-bit ints, so we can't just memcpy it */
 759                 /* store the initial memory base address */
 760                 for (i = 0; i < ETH_ALEN/2; i++) {
 761                         dev->dev_addr[i*2] = eeprom_buff[i];
 762                         dev->dev_addr[i*2+1] = eeprom_buff[i] >> 8;
 763                 }
 764                 if (net_debug > 1)
 765                         printk(KERN_DEBUG "%s: new adapter_cnf: 0x%x\n",
 766                                 dev->name, lp->adapter_cnf);
 767         }
 768
 769         /* allow them to force multiple transceivers.  If they force multiple, autosense */
 770         {
 771                 int count = 0;
 772                 if (lp->force & FORCE_RJ45)     {lp->adapter_cnf |= A_CNF_10B_T; count++; }
 773                 if (lp->force & FORCE_AUI)      {lp->adapter_cnf |= A_CNF_AUI; count++; }
 774                 if (lp->force & FORCE_BNC)      {lp->adapter_cnf |= A_CNF_10B_2; count++; }
 775                 if (count > 1)                  {lp->adapter_cnf |= A_CNF_MEDIA_AUTO; }
 776                 else if (lp->force & FORCE_RJ45){lp->adapter_cnf |= A_CNF_MEDIA_10B_T; }
 777                 else if (lp->force & FORCE_AUI) {lp->adapter_cnf |= A_CNF_MEDIA_AUI; }
 778                 else if (lp->force & FORCE_BNC) {lp->adapter_cnf |= A_CNF_MEDIA_10B_2; }
 779         }
 780
 781         if (net_debug > 1)
 782                 printk(KERN_DEBUG "%s: after force 0x%x, adapter_cnf=0x%x\n",
 783                         dev->name, lp->force, lp->adapter_cnf);
 784
 785         /* FIXME: We don't let you set dc-dc polarity or low RX squelch from the command line: add it here */
 786
 787         /* FIXME: We don't let you set the IMM bit from the command line: add it to lp->auto_neg_cnf here */
 788
 789         /* FIXME: we don't set the Ethernet address on the command line.  Use
 790            ifconfig IFACE hw ether AABBCCDDEEFF */
 791
 792         printk(KERN_INFO "cs89x0 media %s%s%s",
 793                (lp->adapter_cnf & A_CNF_10B_T)?"RJ-45,":"",
 794                (lp->adapter_cnf & A_CNF_AUI)?"AUI,":"",
 795                (lp->adapter_cnf & A_CNF_10B_2)?"BNC,":"");
 796
 797         lp->irq_map = 0xffff;
 798
 799         /* If this is a CS8900 then no pnp soft */
 800         if (lp->chip_type != CS8900 &&
 801             /* Check if the ISA IRQ has been set  */
 802                 (i = readreg(dev, PP_CS8920_ISAINT) & 0xff,
 803                  (i != 0 && i < CS8920_NO_INTS))) {
 804                 if (!dev->irq)
 805                         dev->irq = i;
 806         } else {
 807                 i = lp->isa_config & INT_NO_MASK;
 808                 if (lp->chip_type == CS8900) {
 809 #ifdef CONFIG_CS89x0_NONISA_IRQ
 810                         i = cs8900_irq_map[0];
 811 #else
 812                         /* Translate the IRQ using the IRQ mapping table. */
 813                         if (i >= ARRAY_SIZE(cs8900_irq_map))
 814                                 printk("\ncs89x0: invalid ISA interrupt number %d\n", i);
 815                         else
 816                                 i = cs8900_irq_map[i];
 817
 818                         lp->irq_map = CS8900_IRQ_MAP; /* fixed IRQ map for CS8900 */
 819                 } else {
 820                         int irq_map_buff[IRQ_MAP_LEN/2];
 821
 822                         if (get_eeprom_data(dev, IRQ_MAP_EEPROM_DATA,
 823                                             IRQ_MAP_LEN/2,
 824                                             irq_map_buff) >= 0) {
 825                                 if ((irq_map_buff[0] & 0xff) == PNP_IRQ_FRMT)
 826                                         lp->irq_map = (irq_map_buff[0]>>8) | (irq_map_buff[1] << 8);
 827                         }
 828 #endif
 829                 }
 830                 if (!dev->irq)
 831                         dev->irq = i;
 832         }
 833
 834         printk(" IRQ %d", dev->irq);
 835
 836 #if ALLOW_DMA
 837         if (lp->use_dma) {
 838                 get_dma_channel(dev);
 839                 printk(", DMA %d", dev->dma);
 840         }
 841         else
 842 #endif
 843         {
 844                 printk(", programmed I/O");
 845         }
 846
 847         /* print the ethernet address. */
 848         printk(", MAC %pM", dev->dev_addr);
 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
1008         if (bp + length > lp->end_dma_buff) {
1009                 int semi_cnt = lp->end_dma_buff - bp;
1010                 memcpy(skb_put(skb,semi_cnt), bp, semi_cnt);
1011                 memcpy(skb_put(skb,length - semi_cnt), lp->dma_buff,
1012                        length - semi_cnt);
1013         } else {
1014                 memcpy(skb_put(skb,length), bp, length);
1015         }
1016         bp += (length + 3) & ~3;
1017         if (bp >= lp->end_dma_buff) bp -= lp->dmasize*1024;
1018         lp->rx_dma_ptr = bp;
1019
1020         if (net_debug > 3) {
1021                 printk( "%s: received %d byte DMA packet of type %x\n",
1022                         dev->name, length,
1023                         (skb->data[ETH_ALEN+ETH_ALEN] << 8) | skb->data[ETH_ALEN+ETH_ALEN+1]);
1024         }
1025         skb->protocol=eth_type_trans(skb,dev);
1026         netif_rx(skb);
1027         lp->stats.rx_packets++;
1028         lp->stats.rx_bytes += length;
1029 }
1030
1031 #endif  /* ALLOW_DMA */
1032
1033 static void __init reset_chip(struct net_device *dev)
1034 {
1035 #if !defined(CONFIG_MACH_MX31ADS)
1036 #if !defined(CONFIG_MACH_IXDP2351) && !defined(CONFIG_ARCH_IXDP2X01)
1037         struct net_local *lp = netdev_priv(dev);
1038         int ioaddr = dev->base_addr;
1039 #endif
1040         int reset_start_time;
1041
1042         writereg(dev, PP_SelfCTL, readreg(dev, PP_SelfCTL) | POWER_ON_RESET);
1043
1044         /* wait 30 ms */
1045         msleep(30);
1046
1047 #if !defined(CONFIG_MACH_IXDP2351) && !defined(CONFIG_ARCH_IXDP2X01)
1048         if (lp->chip_type != CS8900) {
1049                 /* Hardware problem requires PNP registers to be reconfigured after a reset */
1050                 writeword(ioaddr, ADD_PORT, PP_CS8920_ISAINT);
1051                 outb(dev->irq, ioaddr + DATA_PORT);
1052                 outb(0,      ioaddr + DATA_PORT + 1);
1053
1054                 writeword(ioaddr, ADD_PORT, PP_CS8920_ISAMemB);
1055                 outb((dev->mem_start >> 16) & 0xff, ioaddr + DATA_PORT);
1056                 outb((dev->mem_start >> 8) & 0xff,   ioaddr + DATA_PORT + 1);
1057         }
1058 #endif  /* IXDP2x01 */
1059
1060         /* Wait until the chip is reset */
1061         reset_start_time = jiffies;
1062         while( (readreg(dev, PP_SelfST) & INIT_DONE) == 0 && jiffies - reset_start_time < 2)
1063                 ;
1064 #endif /* !CONFIG_MACH_MX31ADS */
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 != ARRAY_SIZE(cs8900_irq_map); i++)
1252                         if (cs8900_irq_map[i] == irq)
1253                                 break;
1254                 /* Not found */
1255                 if (i == ARRAY_SIZE(cs8900_irq_map))
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 #ifndef CONFIG_CS89x0_NONISA_IRQ
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_dma:
1403 #if ALLOW_DMA
1404                 free_dma(dev->dma);
1405 release_irq:
1406                 release_dma_buff(lp);
1407 #endif
1408                 writereg(dev, PP_LineCTL, readreg(dev, PP_LineCTL) & ~(SERIAL_TX_ON | SERIAL_RX_ON));
1409                 free_irq(dev->irq, dev);
1410                 ret = -EAGAIN;
1411                 goto bad_out;
1412         }
1413
1414         /* set the hardware to the configured choice */
1415         switch(lp->adapter_cnf & A_CNF_MEDIA_TYPE) {
1416         case A_CNF_MEDIA_10B_T:
1417                 result = detect_tp(dev);
1418                 if (result==DETECTED_NONE) {
1419                         printk(KERN_WARNING "%s: 10Base-T (RJ-45) has no cable\n", dev->name);
1420                         if (lp->auto_neg_cnf & IMM_BIT) /* check "ignore missing media" bit */
1421                                 result = DETECTED_RJ45H; /* Yes! I don't care if I see a link pulse */
1422                 }
1423                 break;
1424         case A_CNF_MEDIA_AUI:
1425                 result = detect_aui(dev);
1426                 if (result==DETECTED_NONE) {
1427                         printk(KERN_WARNING "%s: 10Base-5 (AUI) has no cable\n", dev->name);
1428                         if (lp->auto_neg_cnf & IMM_BIT) /* check "ignore missing media" bit */
1429                                 result = DETECTED_AUI; /* Yes! I don't care if I see a carrrier */
1430                 }
1431                 break;
1432         case A_CNF_MEDIA_10B_2:
1433                 result = detect_bnc(dev);
1434                 if (result==DETECTED_NONE) {
1435                         printk(KERN_WARNING "%s: 10Base-2 (BNC) has no cable\n", dev->name);
1436                         if (lp->auto_neg_cnf & IMM_BIT) /* check "ignore missing media" bit */
1437                                 result = DETECTED_BNC; /* Yes! I don't care if I can xmit a packet */
1438                 }
1439                 break;
1440         case A_CNF_MEDIA_AUTO:
1441                 writereg(dev, PP_LineCTL, lp->linectl | AUTO_AUI_10BASET);
1442                 if (lp->adapter_cnf & A_CNF_10B_T)
1443                         if ((result = detect_tp(dev)) != DETECTED_NONE)
1444                                 break;
1445                 if (lp->adapter_cnf & A_CNF_AUI)
1446                         if ((result = detect_aui(dev)) != DETECTED_NONE)
1447                                 break;
1448                 if (lp->adapter_cnf & A_CNF_10B_2)
1449                         if ((result = detect_bnc(dev)) != DETECTED_NONE)
1450                                 break;
1451                 printk(KERN_ERR "%s: no media detected\n", dev->name);
1452                 goto release_dma;
1453         }
1454         switch(result) {
1455         case DETECTED_NONE:
1456                 printk(KERN_ERR "%s: no network cable attached to configured media\n", dev->name);
1457                 goto release_dma;
1458         case DETECTED_RJ45H:
1459                 printk(KERN_INFO "%s: using half-duplex 10Base-T (RJ-45)\n", dev->name);
1460                 break;
1461         case DETECTED_RJ45F:
1462                 printk(KERN_INFO "%s: using full-duplex 10Base-T (RJ-45)\n", dev->name);
1463                 break;
1464         case DETECTED_AUI:
1465                 printk(KERN_INFO "%s: using 10Base-5 (AUI)\n", dev->name);
1466                 break;
1467         case DETECTED_BNC:
1468                 printk(KERN_INFO "%s: using 10Base-2 (BNC)\n", dev->name);
1469                 break;
1470         }
1471
1472         /* Turn on both receive and transmit operations */
1473         writereg(dev, PP_LineCTL, readreg(dev, PP_LineCTL) | SERIAL_RX_ON | SERIAL_TX_ON);
1474
1475         /* Receive only error free packets addressed to this card */
1476         lp->rx_mode = 0;
1477         writereg(dev, PP_RxCTL, DEF_RX_ACCEPT);
1478
1479         lp->curr_rx_cfg = RX_OK_ENBL | RX_CRC_ERROR_ENBL;
1480
1481         if (lp->isa_config & STREAM_TRANSFER)
1482                 lp->curr_rx_cfg |= RX_STREAM_ENBL;
1483 #if ALLOW_DMA
1484         set_dma_cfg(dev);
1485 #endif
1486         writereg(dev, PP_RxCFG, lp->curr_rx_cfg);
1487
1488         writereg(dev, PP_TxCFG, TX_LOST_CRS_ENBL | TX_SQE_ERROR_ENBL | TX_OK_ENBL |
1489                 TX_LATE_COL_ENBL | TX_JBR_ENBL | TX_ANY_COL_ENBL | TX_16_COL_ENBL);
1490
1491         writereg(dev, PP_BufCFG, READY_FOR_TX_ENBL | RX_MISS_COUNT_OVRFLOW_ENBL |
1492 #if ALLOW_DMA
1493                 dma_bufcfg(dev) |
1494 #endif
1495                 TX_COL_COUNT_OVRFLOW_ENBL | TX_UNDERRUN_ENBL);
1496
1497         /* now that we've got our act together, enable everything */
1498         writereg(dev, PP_BusCTL, ENABLE_IRQ
1499                  | (dev->mem_start?MEMORY_ON : 0) /* turn memory on */
1500 #if ALLOW_DMA
1501                  | dma_busctl(dev)
1502 #endif
1503                  );
1504         netif_start_queue(dev);
1505         if (net_debug > 1)
1506                 printk("cs89x0: net_open() succeeded\n");
1507         return 0;
1508 bad_out:
1509         return ret;
1510 }
1511
1512 static void net_timeout(struct net_device *dev)
1513 {
1514         /* If we get here, some higher level has decided we are broken.
1515            There should really be a "kick me" function call instead. */
1516         if (net_debug > 0) printk("%s: transmit timed out, %s?\n", dev->name,
1517                    tx_done(dev) ? "IRQ conflict ?" : "network cable problem");
1518         /* Try to restart the adaptor. */
1519         netif_wake_queue(dev);
1520 }
1521
1522 static int net_send_packet(struct sk_buff *skb, struct net_device *dev)
1523 {
1524         struct net_local *lp = netdev_priv(dev);
1525
1526         if (net_debug > 3) {
1527                 printk("%s: sent %d byte packet of type %x\n",
1528                         dev->name, skb->len,
1529                         (skb->data[ETH_ALEN+ETH_ALEN] << 8) | skb->data[ETH_ALEN+ETH_ALEN+1]);
1530         }
1531
1532         /* keep the upload from being interrupted, since we
1533                   ask the chip to start transmitting before the
1534                   whole packet has been completely uploaded. */
1535
1536         spin_lock_irq(&lp->lock);
1537         netif_stop_queue(dev);
1538
1539         /* initiate a transmit sequence */
1540         writeword(dev->base_addr, TX_CMD_PORT, lp->send_cmd);
1541         writeword(dev->base_addr, TX_LEN_PORT, skb->len);
1542
1543         /* Test to see if the chip has allocated memory for the packet */
1544         if ((readreg(dev, PP_BusST) & READY_FOR_TX_NOW) == 0) {
1545                 /*
1546                  * Gasp!  It hasn't.  But that shouldn't happen since
1547                  * we're waiting for TxOk, so return 1 and requeue this packet.
1548                  */
1549
1550                 spin_unlock_irq(&lp->lock);
1551                 if (net_debug) printk("cs89x0: Tx buffer not free!\n");
1552                 return 1;
1553         }
1554         /* Write the contents of the packet */
1555         writewords(dev->base_addr, TX_FRAME_PORT,skb->data,(skb->len+1) >>1);
1556         spin_unlock_irq(&lp->lock);
1557         lp->stats.tx_bytes += skb->len;
1558         dev->trans_start = jiffies;
1559         dev_kfree_skb (skb);
1560
1561         /*
1562          * We DO NOT call netif_wake_queue() here.
1563          * We also DO NOT call netif_start_queue().
1564          *
1565          * Either of these would cause another bottom half run through
1566          * net_send_packet() before this packet has fully gone out.  That causes
1567          * us to hit the "Gasp!" above and the send is rescheduled.  it runs like
1568          * a dog.  We just return and wait for the Tx completion interrupt handler
1569          * to restart the netdevice layer
1570          */
1571
1572         return 0;
1573 }
1574
1575 /* The typical workload of the driver:
1576    Handle the network interface interrupts. */
1577
1578 static irqreturn_t net_interrupt(int irq, void *dev_id)
1579 {
1580         struct net_device *dev = dev_id;
1581         struct net_local *lp;
1582         int ioaddr, status;
1583         int handled = 0;
1584
1585         ioaddr = dev->base_addr;
1586         lp = netdev_priv(dev);
1587
1588         /* we MUST read all the events out of the ISQ, otherwise we'll never
1589            get interrupted again.  As a consequence, we can't have any limit
1590            on the number of times we loop in the interrupt handler.  The
1591            hardware guarantees that eventually we'll run out of events.  Of
1592            course, if you're on a slow machine, and packets are arriving
1593            faster than you can read them off, you're screwed.  Hasta la
1594            vista, baby!  */
1595         while ((status = readword(dev->base_addr, ISQ_PORT))) {
1596                 if (net_debug > 4)printk("%s: event=%04x\n", dev->name, status);
1597                 handled = 1;
1598                 switch(status & ISQ_EVENT_MASK) {
1599                 case ISQ_RECEIVER_EVENT:
1600                         /* Got a packet(s). */
1601                         net_rx(dev);
1602                         break;
1603                 case ISQ_TRANSMITTER_EVENT:
1604                         lp->stats.tx_packets++;
1605                         netif_wake_queue(dev);  /* Inform upper layers. */
1606                         if ((status & ( TX_OK |
1607                                         TX_LOST_CRS |
1608                                         TX_SQE_ERROR |
1609                                         TX_LATE_COL |
1610                                         TX_16_COL)) != TX_OK) {
1611                                 if ((status & TX_OK) == 0) lp->stats.tx_errors++;
1612                                 if (status & TX_LOST_CRS) lp->stats.tx_carrier_errors++;
1613                                 if (status & TX_SQE_ERROR) lp->stats.tx_heartbeat_errors++;
1614                                 if (status & TX_LATE_COL) lp->stats.tx_window_errors++;
1615                                 if (status & TX_16_COL) lp->stats.tx_aborted_errors++;
1616                         }
1617                         break;
1618                 case ISQ_BUFFER_EVENT:
1619                         if (status & READY_FOR_TX) {
1620                                 /* we tried to transmit a packet earlier,
1621                                    but inexplicably ran out of buffers.
1622                                    That shouldn't happen since we only ever
1623                                    load one packet.  Shrug.  Do the right
1624                                    thing anyway. */
1625                                 netif_wake_queue(dev);  /* Inform upper layers. */
1626                         }
1627                         if (status & TX_UNDERRUN) {
1628                                 if (net_debug > 0) printk("%s: transmit underrun\n", dev->name);
1629                                 lp->send_underrun++;
1630                                 if (lp->send_underrun == 3) lp->send_cmd = TX_AFTER_381;
1631                                 else if (lp->send_underrun == 6) lp->send_cmd = TX_AFTER_ALL;
1632                                 /* transmit cycle is done, although
1633                                    frame wasn't transmitted - this
1634                                    avoids having to wait for the upper
1635                                    layers to timeout on us, in the
1636                                    event of a tx underrun */
1637                                 netif_wake_queue(dev);  /* Inform upper layers. */
1638                         }
1639 #if ALLOW_DMA
1640                         if (lp->use_dma && (status & RX_DMA)) {
1641                                 int count = readreg(dev, PP_DmaFrameCnt);
1642                                 while(count) {
1643                                         if (net_debug > 5)
1644                                                 printk("%s: receiving %d DMA frames\n", dev->name, count);
1645                                         if (net_debug > 2 && count >1)
1646                                                 printk("%s: receiving %d DMA frames\n", dev->name, count);
1647                                         dma_rx(dev);
1648                                         if (--count == 0)
1649                                                 count = readreg(dev, PP_DmaFrameCnt);
1650                                         if (net_debug > 2 && count > 0)
1651                                                 printk("%s: continuing with %d DMA frames\n", dev->name, count);
1652                                 }
1653                         }
1654 #endif
1655                         break;
1656                 case ISQ_RX_MISS_EVENT:
1657                         lp->stats.rx_missed_errors += (status >>6);
1658                         break;
1659                 case ISQ_TX_COL_EVENT:
1660                         lp->stats.collisions += (status >>6);
1661                         break;
1662                 }
1663         }
1664         return IRQ_RETVAL(handled);
1665 }
1666
1667 static void
1668 count_rx_errors(int status, struct net_local *lp)
1669 {
1670         lp->stats.rx_errors++;
1671         if (status & RX_RUNT) lp->stats.rx_length_errors++;
1672         if (status & RX_EXTRA_DATA) lp->stats.rx_length_errors++;
1673         if (status & RX_CRC_ERROR) if (!(status & (RX_EXTRA_DATA|RX_RUNT)))
1674                 /* per str 172 */
1675                 lp->stats.rx_crc_errors++;
1676         if (status & RX_DRIBBLE) lp->stats.rx_frame_errors++;
1677         return;
1678 }
1679
1680 /* We have a good packet(s), get it/them out of the buffers. */
1681 static void
1682 net_rx(struct net_device *dev)
1683 {
1684         struct net_local *lp = netdev_priv(dev);
1685         struct sk_buff *skb;
1686         int status, length;
1687
1688         int ioaddr = dev->base_addr;
1689         status = readword(ioaddr, RX_FRAME_PORT);
1690         length = readword(ioaddr, RX_FRAME_PORT);
1691
1692         if ((status & RX_OK) == 0) {
1693                 count_rx_errors(status, lp);
1694                 return;
1695         }
1696
1697         /* Malloc up new buffer. */
1698         skb = dev_alloc_skb(length + 2);
1699         if (skb == NULL) {
1700 #if 0           /* Again, this seems a cruel thing to do */
1701                 printk(KERN_WARNING "%s: Memory squeeze, dropping packet.\n", dev->name);
1702 #endif
1703                 lp->stats.rx_dropped++;
1704                 return;
1705         }
1706         skb_reserve(skb, 2);    /* longword align L3 header */
1707
1708         readwords(ioaddr, RX_FRAME_PORT, skb_put(skb, length), length >> 1);
1709         if (length & 1)
1710                 skb->data[length-1] = readword(ioaddr, RX_FRAME_PORT);
1711
1712         if (net_debug > 3) {
1713                 printk( "%s: received %d byte packet of type %x\n",
1714                         dev->name, length,
1715                         (skb->data[ETH_ALEN+ETH_ALEN] << 8) | skb->data[ETH_ALEN+ETH_ALEN+1]);
1716         }
1717
1718         skb->protocol=eth_type_trans(skb,dev);
1719         netif_rx(skb);
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         if (netif_running(dev))
1813                 return -EBUSY;
1814
1815         memcpy(dev->dev_addr, addr->sa_data, dev->addr_len);
1816
1817         if (net_debug)
1818                 printk("%s: Setting MAC address to %pM.\n",
1819                        dev->name, dev->dev_addr);
1820
1821         /* set the Ethernet address */
1822         for (i=0; i < ETH_ALEN/2; i++)
1823                 writereg(dev, PP_IA+i*2, dev->dev_addr[i*2] | (dev->dev_addr[i*2+1] << 8));
1824
1825         return 0;
1826 }
1827
1828 #ifdef MODULE
1829
1830 static struct net_device *dev_cs89x0;
1831
1832 /*
1833  * Support the 'debug' module parm even if we're compiled for non-debug to
1834  * avoid breaking someone's startup scripts
1835  */
1836
1837 static int io;
1838 static int irq;
1839 static int debug;
1840 static char media[8];
1841 static int duplex=-1;
1842
1843 static int use_dma;                     /* These generate unused var warnings if ALLOW_DMA = 0 */
1844 static int dma;
1845 static int dmasize=16;                  /* or 64 */
1846
1847 module_param(io, int, 0);
1848 module_param(irq, int, 0);
1849 module_param(debug, int, 0);
1850 module_param_string(media, media, sizeof(media), 0);
1851 module_param(duplex, int, 0);
1852 module_param(dma , int, 0);
1853 module_param(dmasize , int, 0);
1854 module_param(use_dma , int, 0);
1855 MODULE_PARM_DESC(io, "cs89x0 I/O base address");
1856 MODULE_PARM_DESC(irq, "cs89x0 IRQ number");
1857 #if DEBUGGING
1858 MODULE_PARM_DESC(debug, "cs89x0 debug level (0-6)");
1859 #else
1860 MODULE_PARM_DESC(debug, "(ignored)");
1861 #endif
1862 MODULE_PARM_DESC(media, "Set cs89x0 adapter(s) media type(s) (rj45,bnc,aui)");
1863 /* No other value than -1 for duplex seems to be currently interpreted */
1864 MODULE_PARM_DESC(duplex, "(ignored)");
1865 #if ALLOW_DMA
1866 MODULE_PARM_DESC(dma , "cs89x0 ISA DMA channel; ignored if use_dma=0");
1867 MODULE_PARM_DESC(dmasize , "cs89x0 DMA size in kB (16,64); ignored if use_dma=0");
1868 MODULE_PARM_DESC(use_dma , "cs89x0 using DMA (0-1)");
1869 #else
1870 MODULE_PARM_DESC(dma , "(ignored)");
1871 MODULE_PARM_DESC(dmasize , "(ignored)");
1872 MODULE_PARM_DESC(use_dma , "(ignored)");
1873 #endif
1874
1875 MODULE_AUTHOR("Mike Cruse, Russwll Nelson <nelson@crynwr.com>, Andrew Morton");
1876 MODULE_LICENSE("GPL");
1877
1878
1879 /*
1880 * media=t             - specify media type
1881    or media=2
1882    or media=aui
1883    or medai=auto
1884 * duplex=0            - specify forced half/full/autonegotiate duplex
1885 * debug=#             - debug level
1886
1887
1888 * Default Chip Configuration:
1889   * DMA Burst = enabled
1890   * IOCHRDY Enabled = enabled
1891     * UseSA = enabled
1892     * CS8900 defaults to half-duplex if not specified on command-line
1893     * CS8920 defaults to autoneg if not specified on command-line
1894     * Use reset defaults for other config parameters
1895
1896 * Assumptions:
1897   * media type specified is supported (circuitry is present)
1898   * if memory address is > 1MB, then required mem decode hw is present
1899   * if 10B-2, then agent other than driver will enable DC/DC converter
1900     (hw or software util)
1901
1902
1903 */
1904
1905 int __init init_module(void)
1906 {
1907         struct net_device *dev = alloc_etherdev(sizeof(struct net_local));
1908         struct net_local *lp;
1909         int ret = 0;
1910
1911 #if DEBUGGING
1912         net_debug = debug;
1913 #else
1914         debug = 0;
1915 #endif
1916         if (!dev)
1917                 return -ENOMEM;
1918
1919         dev->irq = irq;
1920         dev->base_addr = io;
1921         lp = netdev_priv(dev);
1922
1923 #if ALLOW_DMA
1924         if (use_dma) {
1925                 lp->use_dma = use_dma;
1926                 lp->dma = dma;
1927                 lp->dmasize = dmasize;
1928         }
1929 #endif
1930
1931         spin_lock_init(&lp->lock);
1932
1933         /* boy, they'd better get these right */
1934         if (!strcmp(media, "rj45"))
1935                 lp->adapter_cnf = A_CNF_MEDIA_10B_T | A_CNF_10B_T;
1936         else if (!strcmp(media, "aui"))
1937                 lp->adapter_cnf = A_CNF_MEDIA_AUI   | A_CNF_AUI;
1938         else if (!strcmp(media, "bnc"))
1939                 lp->adapter_cnf = A_CNF_MEDIA_10B_2 | A_CNF_10B_2;
1940         else
1941                 lp->adapter_cnf = A_CNF_MEDIA_10B_T | A_CNF_10B_T;
1942
1943         if (duplex==-1)
1944                 lp->auto_neg_cnf = AUTO_NEG_ENABLE;
1945
1946         if (io == 0) {
1947                 printk(KERN_ERR "cs89x0.c: Module autoprobing not allowed.\n");
1948                 printk(KERN_ERR "cs89x0.c: Append io=0xNNN\n");
1949                 ret = -EPERM;
1950                 goto out;
1951         } else if (io <= 0x1ff) {
1952                 ret = -ENXIO;
1953                 goto out;
1954         }
1955
1956 #if ALLOW_DMA
1957         if (use_dma && dmasize != 16 && dmasize != 64) {
1958                 printk(KERN_ERR "cs89x0.c: dma size must be either 16K or 64K, not %dK\n", dmasize);
1959                 ret = -EPERM;
1960                 goto out;
1961         }
1962 #endif
1963         ret = cs89x0_probe1(dev, io, 1);
1964         if (ret)
1965                 goto out;
1966
1967         dev_cs89x0 = dev;
1968         return 0;
1969 out:
1970         free_netdev(dev);
1971         return ret;
1972 }
1973
1974 void __exit
1975 cleanup_module(void)
1976 {
1977         unregister_netdev(dev_cs89x0);
1978         writeword(dev_cs89x0->base_addr, ADD_PORT, PP_ChipID);
1979         release_region(dev_cs89x0->base_addr, NETCARD_IO_EXTENT);
1980         free_netdev(dev_cs89x0);
1981 }
1982 #endif /* MODULE */
1983
1984 /*
1985  * Local variables:
1986  *  version-control: t
1987  *  kept-new-versions: 5
1988  *  c-indent-level: 8
1989  *  tab-width: 8
1990  * End:
1991  *
1992  */