SAFE public projects git trees. - safe/jmp/linux-2.6/blob - drivers/net/pcmcia/xirc2ps_cs.c

   1 /* [xirc2ps_cs.c wk 03.11.99] (1.40 1999/11/18 00:06:03)
   2  * Xircom CreditCard Ethernet Adapter IIps driver
   3  * Xircom Realport 10/100 (RE-100) driver
   4  *
   5  * This driver supports various Xircom CreditCard Ethernet adapters
   6  * including the CE2, CE IIps, RE-10, CEM28, CEM33, CE33, CEM56,
   7  * CE3-100, CE3B, RE-100, REM10BT, and REM56G-100.
   8  *
   9  * 2000-09-24 <psheer@icon.co.za> The Xircom CE3B-100 may not
  10  * autodetect the media properly. In this case use the
  11  * if_port=1 (for 10BaseT) or if_port=4 (for 100BaseT) options
  12  * to force the media type.
  13  *
  14  * Written originally by Werner Koch based on David Hinds' skeleton of the
  15  * PCMCIA driver.
  16  *
  17  * Copyright (c) 1997,1998 Werner Koch (dd9jn)
  18  *
  19  * This driver is free software; you can redistribute it and/or modify
  20  * it under the terms of the GNU General Public License as published by
  21  * the Free Software Foundation; either version 2 of the License, or
  22  * (at your option) any later version.
  23  *
  24  * It is distributed in the hope that it will be useful,
  25  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  26  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  27  * GNU General Public License for more details.
  28  *
  29  * You should have received a copy of the GNU General Public License
  30  * along with this program; if not, write to the Free Software
  31  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  32  *
  33  *
  34  * ALTERNATIVELY, this driver may be distributed under the terms of
  35  * the following license, in which case the provisions of this license
  36  * are required INSTEAD OF the GNU General Public License.  (This clause
  37  * is necessary due to a potential bad interaction between the GPL and
  38  * the restrictions contained in a BSD-style copyright.)
  39  *
  40  * Redistribution and use in source and binary forms, with or without
  41  * modification, are permitted provided that the following conditions
  42  * are met:
  43  * 1. Redistributions of source code must retain the above copyright
  44  *    notice, and the entire permission notice in its entirety,
  45  *    including the disclaimer of warranties.
  46  * 2. Redistributions in binary form must reproduce the above copyright
  47  *    notice, this list of conditions and the following disclaimer in the
  48  *    documentation and/or other materials provided with the distribution.
  49  * 3. The name of the author may not be used to endorse or promote
  50  *    products derived from this software without specific prior
  51  *    written permission.
  52  *
  53  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
  54  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  55  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  56  * DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
  57  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  58  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  59  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  60  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  61  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  62  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
  63  * OF THE POSSIBILITY OF SUCH DAMAGE.
  64  */
  65
  66 #include <linux/module.h>
  67 #include <linux/kernel.h>
  68 #include <linux/init.h>
  69 #include <linux/ptrace.h>
  70 #include <linux/slab.h>
  71 #include <linux/string.h>
  72 #include <linux/timer.h>
  73 #include <linux/interrupt.h>
  74 #include <linux/in.h>
  75 #include <linux/delay.h>
  76 #include <linux/ethtool.h>
  77 #include <linux/netdevice.h>
  78 #include <linux/etherdevice.h>
  79 #include <linux/skbuff.h>
  80 #include <linux/if_arp.h>
  81 #include <linux/ioport.h>
  82 #include <linux/bitops.h>
  83 #include <linux/mii.h>
  84
  85 #include <pcmcia/cs_types.h>
  86 #include <pcmcia/cs.h>
  87 #include <pcmcia/cistpl.h>
  88 #include <pcmcia/cisreg.h>
  89 #include <pcmcia/ciscode.h>
  90
  91 #include <asm/io.h>
  92 #include <asm/system.h>
  93 #include <asm/uaccess.h>
  94
  95 #ifndef MANFID_COMPAQ
  96   #define MANFID_COMPAQ            0x0138
  97   #define MANFID_COMPAQ2           0x0183  /* is this correct? */
  98 #endif
  99
 100 #include <pcmcia/ds.h>
 101
 102 /* Time in jiffies before concluding Tx hung */
 103 #define TX_TIMEOUT      ((400*HZ)/1000)
 104
 105 /****************
 106  * Some constants used to access the hardware
 107  */
 108
 109 /* Register offsets and value constans */
 110 #define XIRCREG_CR  0   /* Command register (wr) */
 111 enum xirc_cr {
 112     TransmitPacket = 0x01,
 113     SoftReset = 0x02,
 114     EnableIntr = 0x04,
 115     ForceIntr  = 0x08,
 116     ClearTxFIFO = 0x10,
 117     ClearRxOvrun = 0x20,
 118     RestartTx    = 0x40
 119 };
 120 #define XIRCREG_ESR 0   /* Ethernet status register (rd) */
 121 enum xirc_esr {
 122     FullPktRcvd = 0x01, /* full packet in receive buffer */
 123     PktRejected = 0x04, /* a packet has been rejected */
 124     TxPktPend = 0x08,   /* TX Packet Pending */
 125     IncorPolarity = 0x10,
 126     MediaSelect = 0x20  /* set if TP, clear if AUI */
 127 };
 128 #define XIRCREG_PR  1   /* Page Register select */
 129 #define XIRCREG_EDP 4   /* Ethernet Data Port Register */
 130 #define XIRCREG_ISR 6   /* Ethernet Interrupt Status Register */
 131 enum xirc_isr {
 132     TxBufOvr = 0x01,    /* TX Buffer Overflow */
 133     PktTxed  = 0x02,    /* Packet Transmitted */
 134     MACIntr  = 0x04,    /* MAC Interrupt occurred */
 135     TxResGrant = 0x08,  /* Tx Reservation Granted */
 136     RxFullPkt = 0x20,   /* Rx Full Packet */
 137     RxPktRej  = 0x40,   /* Rx Packet Rejected */
 138     ForcedIntr= 0x80    /* Forced Interrupt */
 139 };
 140 #define XIRCREG1_IMR0 12 /* Ethernet Interrupt Mask Register (on page 1)*/
 141 #define XIRCREG1_IMR1 13
 142 #define XIRCREG0_TSO  8  /* Transmit Space Open Register (on page 0)*/
 143 #define XIRCREG0_TRS  10 /* Transmit reservation Size Register (page 0)*/
 144 #define XIRCREG0_DO   12 /* Data Offset Register (page 0) (wr) */
 145 #define XIRCREG0_RSR  12 /* Receive Status Register (page 0) (rd) */
 146 enum xirc_rsr {
 147     PhyPkt = 0x01,      /* set:physical packet, clear: multicast packet */
 148     BrdcstPkt = 0x02,   /* set if it is a broadcast packet */
 149     PktTooLong = 0x04,  /* set if packet length > 1518 */
 150     AlignErr = 0x10,    /* incorrect CRC and last octet not complete */
 151     CRCErr = 0x20,      /* incorrect CRC and last octet is complete */
 152     PktRxOk = 0x80      /* received ok */
 153 };
 154 #define XIRCREG0_PTR 13 /* packets transmitted register (rd) */
 155 #define XIRCREG0_RBC 14 /* receive byte count regsister (rd) */
 156 #define XIRCREG1_ECR 14 /* ethernet configurationn register */
 157 enum xirc_ecr {
 158     FullDuplex = 0x04,  /* enable full duplex mode */
 159     LongTPMode = 0x08,  /* adjust for longer lengths of TP cable */
 160     DisablePolCor = 0x10,/* disable auto polarity correction */
 161     DisableLinkPulse = 0x20, /* disable link pulse generation */
 162     DisableAutoTx = 0x40, /* disable auto-transmit */
 163 };
 164 #define XIRCREG2_RBS 8  /* receive buffer start register */
 165 #define XIRCREG2_LED 10 /* LED Configuration register */
 166 /* values for the leds:    Bits 2-0 for led 1
 167  *  0 disabled             Bits 5-3 for led 2
 168  *  1 collision
 169  *  2 noncollision
 170  *  3 link_detected
 171  *  4 incor_polarity
 172  *  5 jabber
 173  *  6 auto_assertion
 174  *  7 rx_tx_activity
 175  */
 176 #define XIRCREG2_MSR 12 /* Mohawk specific register */
 177
 178 #define XIRCREG4_GPR0 8 /* General Purpose Register 0 */
 179 #define XIRCREG4_GPR1 9 /* General Purpose Register 1 */
 180 #define XIRCREG2_GPR2 13 /* General Purpose Register 2 (page2!)*/
 181 #define XIRCREG4_BOV 10 /* Bonding Version Register */
 182 #define XIRCREG4_LMA 12 /* Local Memory Address Register */
 183 #define XIRCREG4_LMD 14 /* Local Memory Data Port */
 184 /* MAC register can only by accessed with 8 bit operations */
 185 #define XIRCREG40_CMD0 8    /* Command Register (wr) */
 186 enum xirc_cmd {             /* Commands */
 187     Transmit = 0x01,
 188     EnableRecv = 0x04,
 189     DisableRecv = 0x08,
 190     Abort = 0x10,
 191     Online = 0x20,
 192     IntrAck = 0x40,
 193     Offline = 0x80
 194 };
 195 #define XIRCREG5_RHSA0  10  /* Rx Host Start Address */
 196 #define XIRCREG40_RXST0 9   /* Receive Status Register */
 197 #define XIRCREG40_TXST0 11  /* Transmit Status Register 0 */
 198 #define XIRCREG40_TXST1 12  /* Transmit Status Register 10 */
 199 #define XIRCREG40_RMASK0 13  /* Receive Mask Register */
 200 #define XIRCREG40_TMASK0 14  /* Transmit Mask Register 0 */
 201 #define XIRCREG40_TMASK1 15  /* Transmit Mask Register 0 */
 202 #define XIRCREG42_SWC0  8   /* Software Configuration 0 */
 203 #define XIRCREG42_SWC1  9   /* Software Configuration 1 */
 204 #define XIRCREG42_BOC   10  /* Back-Off Configuration */
 205 #define XIRCREG44_TDR0  8   /* Time Domain Reflectometry 0 */
 206 #define XIRCREG44_TDR1  9   /* Time Domain Reflectometry 1 */
 207 #define XIRCREG44_RXBC_LO 10 /* Rx Byte Count 0 (rd) */
 208 #define XIRCREG44_RXBC_HI 11 /* Rx Byte Count 1 (rd) */
 209 #define XIRCREG45_REV    15 /* Revision Register (rd) */
 210 #define XIRCREG50_IA    8   /* Individual Address (8-13) */
 211
 212 static const char *if_names[] = { "Auto", "10BaseT", "10Base2", "AUI", "100BaseT" };
 213
 214
 215 #define KDBG_XIRC KERN_DEBUG   "xirc2ps_cs: "
 216 #define KERR_XIRC KERN_ERR     "xirc2ps_cs: "
 217 #define KWRN_XIRC KERN_WARNING "xirc2ps_cs: "
 218 #define KNOT_XIRC KERN_NOTICE  "xirc2ps_cs: "
 219 #define KINF_XIRC KERN_INFO    "xirc2ps_cs: "
 220
 221 /* card types */
 222 #define XIR_UNKNOWN  0  /* unknown: not supported */
 223 #define XIR_CE       1  /* (prodid 1) different hardware: not supported */
 224 #define XIR_CE2      2  /* (prodid 2) */
 225 #define XIR_CE3      3  /* (prodid 3) */
 226 #define XIR_CEM      4  /* (prodid 1) different hardware: not supported */
 227 #define XIR_CEM2     5  /* (prodid 2) */
 228 #define XIR_CEM3     6  /* (prodid 3) */
 229 #define XIR_CEM33    7  /* (prodid 4) */
 230 #define XIR_CEM56M   8  /* (prodid 5) */
 231 #define XIR_CEM56    9  /* (prodid 6) */
 232 #define XIR_CM28    10  /* (prodid 3) modem only: not supported here */
 233 #define XIR_CM33    11  /* (prodid 4) modem only: not supported here */
 234 #define XIR_CM56    12  /* (prodid 5) modem only: not supported here */
 235 #define XIR_CG      13  /* (prodid 1) GSM modem only: not supported */
 236 #define XIR_CBE     14  /* (prodid 1) cardbus ethernet: not supported */
 237 /*====================================================================*/
 238
 239 /* Module parameters */
 240
 241 MODULE_DESCRIPTION("Xircom PCMCIA ethernet driver");
 242 MODULE_LICENSE("Dual MPL/GPL");
 243
 244 #define INT_MODULE_PARM(n, v) static int n = v; module_param(n, int, 0)
 245
 246 INT_MODULE_PARM(if_port,        0);
 247 INT_MODULE_PARM(full_duplex,    0);
 248 INT_MODULE_PARM(do_sound,       1);
 249 INT_MODULE_PARM(lockup_hack,    0);  /* anti lockup hack */
 250
 251 /*====================================================================*/
 252
 253 /* We do not process more than these number of bytes during one
 254  * interrupt. (Of course we receive complete packets, so this is not
 255  * an exact value).
 256  * Something between 2000..22000; first value gives best interrupt latency,
 257  * the second enables the usage of the complete on-chip buffer. We use the
 258  * high value as the initial value.
 259  */
 260 static unsigned maxrx_bytes = 22000;
 261
 262 /* MII management prototypes */
 263 static void mii_idle(unsigned int ioaddr);
 264 static void mii_putbit(unsigned int ioaddr, unsigned data);
 265 static int  mii_getbit(unsigned int ioaddr);
 266 static void mii_wbits(unsigned int ioaddr, unsigned data, int len);
 267 static unsigned mii_rd(unsigned int ioaddr, u_char phyaddr, u_char phyreg);
 268 static void mii_wr(unsigned int ioaddr, u_char phyaddr, u_char phyreg,
 269                    unsigned data, int len);
 270
 271 /*
 272  * The event() function is this driver's Card Services event handler.
 273  * It will be called by Card Services when an appropriate card status
 274  * event is received.  The config() and release() entry points are
 275  * used to configure or release a socket, in response to card insertion
 276  * and ejection events.  They are invoked from the event handler.
 277  */
 278
 279 static int has_ce2_string(struct pcmcia_device * link);
 280 static int xirc2ps_config(struct pcmcia_device * link);
 281 static void xirc2ps_release(struct pcmcia_device * link);
 282
 283 /****************
 284  * The attach() and detach() entry points are used to create and destroy
 285  * "instances" of the driver, where each instance represents everything
 286  * needed to manage one actual PCMCIA card.
 287  */
 288
 289 static void xirc2ps_detach(struct pcmcia_device *p_dev);
 290
 291 /****************
 292  * You'll also need to prototype all the functions that will actually
 293  * be used to talk to your device.  See 'pcmem_cs' for a good example
 294  * of a fully self-sufficient driver; the other drivers rely more or
 295  * less on other parts of the kernel.
 296  */
 297
 298 static irqreturn_t xirc2ps_interrupt(int irq, void *dev_id);
 299
 300 /****************
 301  * A linked list of "instances" of the device.  Each actual
 302  * PCMCIA card corresponds to one device instance, and is described
 303  * by one struct pcmcia_device structure (defined in ds.h).
 304  *
 305  * You may not want to use a linked list for this -- for example, the
 306  * memory card driver uses an array of struct pcmcia_device pointers, where minor
 307  * device numbers are used to derive the corresponding array index.
 308  */
 309
 310 /****************
 311  * A driver needs to provide a dev_node_t structure for each device
 312  * on a card.  In some cases, there is only one device per card (for
 313  * example, ethernet cards, modems).  In other cases, there may be
 314  * many actual or logical devices (SCSI adapters, memory cards with
 315  * multiple partitions).  The dev_node_t structures need to be kept
 316  * in a linked list starting at the 'dev' field of a struct pcmcia_device
 317  * structure.  We allocate them in the card's private data structure,
 318  * because they generally can't be allocated dynamically.
 319  */
 320
 321 typedef struct local_info_t {
 322         struct net_device       *dev;
 323         struct pcmcia_device    *p_dev;
 324     dev_node_t node;
 325
 326     int card_type;
 327     int probe_port;
 328     int silicon; /* silicon revision. 0=old CE2, 1=Scipper, 4=Mohawk */
 329     int mohawk;  /* a CE3 type card */
 330     int dingo;   /* a CEM56 type card */
 331     int new_mii; /* has full 10baseT/100baseT MII */
 332     int modem;   /* is a multi function card (i.e with a modem) */
 333     void __iomem *dingo_ccr; /* only used for CEM56 cards */
 334     unsigned last_ptr_value; /* last packets transmitted value */
 335     const char *manf_str;
 336     struct work_struct tx_timeout_task;
 337 } local_info_t;
 338
 339 /****************
 340  * Some more prototypes
 341  */
 342 static netdev_tx_t do_start_xmit(struct sk_buff *skb,
 343                                        struct net_device *dev);
 344 static void xirc_tx_timeout(struct net_device *dev);
 345 static void xirc2ps_tx_timeout_task(struct work_struct *work);
 346 static void set_addresses(struct net_device *dev);
 347 static void set_multicast_list(struct net_device *dev);
 348 static int set_card_type(struct pcmcia_device *link);
 349 static int do_config(struct net_device *dev, struct ifmap *map);
 350 static int do_open(struct net_device *dev);
 351 static int do_ioctl(struct net_device *dev, struct ifreq *rq, int cmd);
 352 static const struct ethtool_ops netdev_ethtool_ops;
 353 static void hardreset(struct net_device *dev);
 354 static void do_reset(struct net_device *dev, int full);
 355 static int init_mii(struct net_device *dev);
 356 static void do_powerdown(struct net_device *dev);
 357 static int do_stop(struct net_device *dev);
 358
 359 /*=============== Helper functions =========================*/
 360 #define SelectPage(pgnr)   outb((pgnr), ioaddr + XIRCREG_PR)
 361 #define GetByte(reg)       ((unsigned)inb(ioaddr + (reg)))
 362 #define GetWord(reg)       ((unsigned)inw(ioaddr + (reg)))
 363 #define PutByte(reg,value) outb((value), ioaddr+(reg))
 364 #define PutWord(reg,value) outw((value), ioaddr+(reg))
 365
 366 /*====== Functions used for debugging =================================*/
 367 #if 0 /* reading regs may change system status */
 368 static void
 369 PrintRegisters(struct net_device *dev)
 370 {
 371     unsigned int ioaddr = dev->base_addr;
 372
 373     if (pc_debug > 1) {
 374         int i, page;
 375
 376         printk(KDBG_XIRC "Register  common: ");
 377         for (i = 0; i < 8; i++)
 378             printk(" %2.2x", GetByte(i));
 379         printk("\n");
 380         for (page = 0; page <= 8; page++) {
 381             printk(KDBG_XIRC "Register page %2x: ", page);
 382             SelectPage(page);
 383             for (i = 8; i < 16; i++)
 384                 printk(" %2.2x", GetByte(i));
 385             printk("\n");
 386         }
 387         for (page=0x40 ; page <= 0x5f; page++) {
 388                 if (page == 0x43 || (page >= 0x46 && page <= 0x4f) ||
 389                     (page >= 0x51 && page <=0x5e))
 390                         continue;
 391             printk(KDBG_XIRC "Register page %2x: ", page);
 392             SelectPage(page);
 393             for (i = 8; i < 16; i++)
 394                 printk(" %2.2x", GetByte(i));
 395             printk("\n");
 396         }
 397     }
 398 }
 399 #endif /* 0 */
 400
 401 /*============== MII Management functions ===============*/
 402
 403 /****************
 404  * Turn around for read
 405  */
 406 static void
 407 mii_idle(unsigned int ioaddr)
 408 {
 409     PutByte(XIRCREG2_GPR2, 0x04|0); /* drive MDCK low */
 410     udelay(1);
 411     PutByte(XIRCREG2_GPR2, 0x04|1); /* and drive MDCK high */
 412     udelay(1);
 413 }
 414
 415 /****************
 416  * Write a bit to MDI/O
 417  */
 418 static void
 419 mii_putbit(unsigned int ioaddr, unsigned data)
 420 {
 421   #if 1
 422     if (data) {
 423         PutByte(XIRCREG2_GPR2, 0x0c|2|0); /* set MDIO */
 424         udelay(1);
 425         PutByte(XIRCREG2_GPR2, 0x0c|2|1); /* and drive MDCK high */
 426         udelay(1);
 427     } else {
 428         PutByte(XIRCREG2_GPR2, 0x0c|0|0); /* clear MDIO */
 429         udelay(1);
 430         PutByte(XIRCREG2_GPR2, 0x0c|0|1); /* and drive MDCK high */
 431         udelay(1);
 432     }
 433   #else
 434     if (data) {
 435         PutWord(XIRCREG2_GPR2-1, 0x0e0e);
 436         udelay(1);
 437         PutWord(XIRCREG2_GPR2-1, 0x0f0f);
 438         udelay(1);
 439     } else {
 440         PutWord(XIRCREG2_GPR2-1, 0x0c0c);
 441         udelay(1);
 442         PutWord(XIRCREG2_GPR2-1, 0x0d0d);
 443         udelay(1);
 444     }
 445   #endif
 446 }
 447
 448 /****************
 449  * Get a bit from MDI/O
 450  */
 451 static int
 452 mii_getbit(unsigned int ioaddr)
 453 {
 454     unsigned d;
 455
 456     PutByte(XIRCREG2_GPR2, 4|0); /* drive MDCK low */
 457     udelay(1);
 458     d = GetByte(XIRCREG2_GPR2); /* read MDIO */
 459     PutByte(XIRCREG2_GPR2, 4|1); /* drive MDCK high again */
 460     udelay(1);
 461     return d & 0x20; /* read MDIO */
 462 }
 463
 464 static void
 465 mii_wbits(unsigned int ioaddr, unsigned data, int len)
 466 {
 467     unsigned m = 1 << (len-1);
 468     for (; m; m >>= 1)
 469         mii_putbit(ioaddr, data & m);
 470 }
 471
 472 static unsigned
 473 mii_rd(unsigned int ioaddr,     u_char phyaddr, u_char phyreg)
 474 {
 475     int i;
 476     unsigned data=0, m;
 477
 478     SelectPage(2);
 479     for (i=0; i < 32; i++)              /* 32 bit preamble */
 480         mii_putbit(ioaddr, 1);
 481     mii_wbits(ioaddr, 0x06, 4);         /* Start and opcode for read */
 482     mii_wbits(ioaddr, phyaddr, 5);      /* PHY address to be accessed */
 483     mii_wbits(ioaddr, phyreg, 5);       /* PHY register to read */
 484     mii_idle(ioaddr);                   /* turn around */
 485     mii_getbit(ioaddr);
 486
 487     for (m = 1<<15; m; m >>= 1)
 488         if (mii_getbit(ioaddr))
 489             data |= m;
 490     mii_idle(ioaddr);
 491     return data;
 492 }
 493
 494 static void
 495 mii_wr(unsigned int ioaddr, u_char phyaddr, u_char phyreg, unsigned data,
 496        int len)
 497 {
 498     int i;
 499
 500     SelectPage(2);
 501     for (i=0; i < 32; i++)              /* 32 bit preamble */
 502         mii_putbit(ioaddr, 1);
 503     mii_wbits(ioaddr, 0x05, 4);         /* Start and opcode for write */
 504     mii_wbits(ioaddr, phyaddr, 5);      /* PHY address to be accessed */
 505     mii_wbits(ioaddr, phyreg, 5);       /* PHY Register to write */
 506     mii_putbit(ioaddr, 1);              /* turn around */
 507     mii_putbit(ioaddr, 0);
 508     mii_wbits(ioaddr, data, len);       /* And write the data */
 509     mii_idle(ioaddr);
 510 }
 511
 512 /*============= Main bulk of functions  =========================*/
 513
 514 static const struct net_device_ops netdev_ops = {
 515         .ndo_open               = do_open,
 516         .ndo_stop               = do_stop,
 517         .ndo_start_xmit         = do_start_xmit,
 518         .ndo_tx_timeout         = xirc_tx_timeout,
 519         .ndo_set_config         = do_config,
 520         .ndo_do_ioctl           = do_ioctl,
 521         .ndo_set_multicast_list = set_multicast_list,
 522         .ndo_change_mtu         = eth_change_mtu,
 523         .ndo_set_mac_address    = eth_mac_addr,
 524         .ndo_validate_addr      = eth_validate_addr,
 525 };
 526
 527 /****************
 528  * xirc2ps_attach() creates an "instance" of the driver, allocating
 529  * local data structures for one device.  The device is registered
 530  * with Card Services.
 531  *
 532  * The dev_link structure is initialized, but we don't actually
 533  * configure the card at this point -- we wait until we receive a
 534  * card insertion event.
 535  */
 536
 537 static int
 538 xirc2ps_probe(struct pcmcia_device *link)
 539 {
 540     struct net_device *dev;
 541     local_info_t *local;
 542
 543     dev_dbg(&link->dev, "attach()\n");
 544
 545     /* Allocate the device structure */
 546     dev = alloc_etherdev(sizeof(local_info_t));
 547     if (!dev)
 548             return -ENOMEM;
 549     local = netdev_priv(dev);
 550     local->dev = dev;
 551     local->p_dev = link;
 552     link->priv = dev;
 553
 554     /* General socket configuration */
 555     link->conf.Attributes = CONF_ENABLE_IRQ;
 556     link->conf.IntType = INT_MEMORY_AND_IO;
 557     link->conf.ConfigIndex = 1;
 558     link->irq.Handler = xirc2ps_interrupt;
 559
 560     /* Fill in card specific entries */
 561     dev->netdev_ops = &netdev_ops;
 562     dev->ethtool_ops = &netdev_ethtool_ops;
 563     dev->watchdog_timeo = TX_TIMEOUT;
 564     INIT_WORK(&local->tx_timeout_task, xirc2ps_tx_timeout_task);
 565
 566     return xirc2ps_config(link);
 567 } /* xirc2ps_attach */
 568
 569 /****************
 570  *  This deletes a driver "instance".  The device is de-registered
 571  *  with Card Services.  If it has been released, all local data
 572  *  structures are freed.  Otherwise, the structures will be freed
 573  *  when the device is released.
 574  */
 575
 576 static void
 577 xirc2ps_detach(struct pcmcia_device *link)
 578 {
 579     struct net_device *dev = link->priv;
 580
 581     dev_dbg(&link->dev, "detach\n");
 582
 583     if (link->dev_node)
 584         unregister_netdev(dev);
 585
 586     xirc2ps_release(link);
 587
 588     free_netdev(dev);
 589 } /* xirc2ps_detach */
 590
 591 /****************
 592  * Detect the type of the card. s is the buffer with the data of tuple 0x20
 593  * Returns: 0 := not supported
 594  *                     mediaid=11 and prodid=47
 595  * Media-Id bits:
 596  *  Ethernet        0x01
 597  *  Tokenring       0x02
 598  *  Arcnet          0x04
 599  *  Wireless        0x08
 600  *  Modem           0x10
 601  *  GSM only        0x20
 602  * Prod-Id bits:
 603  *  Pocket          0x10
 604  *  External        0x20
 605  *  Creditcard      0x40
 606  *  Cardbus         0x80
 607  *
 608  */
 609 static int
 610 set_card_type(struct pcmcia_device *link)
 611 {
 612     struct net_device *dev = link->priv;
 613     local_info_t *local = netdev_priv(dev);
 614     u8 *buf;
 615     unsigned int cisrev, mediaid, prodid;
 616     size_t len;
 617
 618     len = pcmcia_get_tuple(link, CISTPL_MANFID, &buf);
 619     if (len < 5) {
 620             dev_err(&link->dev, "invalid CIS -- sorry\n");
 621             return 0;
 622     }
 623
 624     cisrev = buf[2];
 625     mediaid = buf[3];
 626     prodid = buf[4];
 627
 628     dev_dbg(&link->dev, "cisrev=%02x mediaid=%02x prodid=%02x\n",
 629           cisrev, mediaid, prodid);
 630
 631     local->mohawk = 0;
 632     local->dingo = 0;
 633     local->modem = 0;
 634     local->card_type = XIR_UNKNOWN;
 635     if (!(prodid & 0x40)) {
 636         printk(KNOT_XIRC "Ooops: Not a creditcard\n");
 637         return 0;
 638     }
 639     if (!(mediaid & 0x01)) {
 640         printk(KNOT_XIRC "Not an Ethernet card\n");
 641         return 0;
 642     }
 643     if (mediaid & 0x10) {
 644         local->modem = 1;
 645         switch(prodid & 15) {
 646           case 1: local->card_type = XIR_CEM   ; break;
 647           case 2: local->card_type = XIR_CEM2  ; break;
 648           case 3: local->card_type = XIR_CEM3  ; break;
 649           case 4: local->card_type = XIR_CEM33 ; break;
 650           case 5: local->card_type = XIR_CEM56M;
 651                   local->mohawk = 1;
 652                   break;
 653           case 6:
 654           case 7: /* 7 is the RealPort 10/56 */
 655                   local->card_type = XIR_CEM56 ;
 656                   local->mohawk = 1;
 657                   local->dingo = 1;
 658                   break;
 659         }
 660     } else {
 661         switch(prodid & 15) {
 662           case 1: local->card_type = has_ce2_string(link)? XIR_CE2 : XIR_CE ;
 663                   break;
 664           case 2: local->card_type = XIR_CE2; break;
 665           case 3: local->card_type = XIR_CE3;
 666                   local->mohawk = 1;
 667                   break;
 668         }
 669     }
 670     if (local->card_type == XIR_CE || local->card_type == XIR_CEM) {
 671         printk(KNOT_XIRC "Sorry, this is an old CE card\n");
 672         return 0;
 673     }
 674     if (local->card_type == XIR_UNKNOWN)
 675         printk(KNOT_XIRC "unknown card (mediaid=%02x prodid=%02x)\n",
 676                mediaid, prodid);
 677
 678     return 1;
 679 }
 680
 681 /****************
 682  * There are some CE2 cards out which claim to be a CE card.
 683  * This function looks for a "CE2" in the 3rd version field.
 684  * Returns: true if this is a CE2
 685  */
 686 static int
 687 has_ce2_string(struct pcmcia_device * p_dev)
 688 {
 689         if (p_dev->prod_id[2] && strstr(p_dev->prod_id[2], "CE2"))
 690                 return 1;
 691         return 0;
 692 }
 693
 694 static int
 695 xirc2ps_config_modem(struct pcmcia_device *p_dev,
 696                      cistpl_cftable_entry_t *cf,
 697                      cistpl_cftable_entry_t *dflt,
 698                      unsigned int vcc,
 699                      void *priv_data)
 700 {
 701         unsigned int ioaddr;
 702
 703         if (cf->io.nwin > 0  &&  (cf->io.win[0].base & 0xf) == 8) {
 704                 for (ioaddr = 0x300; ioaddr < 0x400; ioaddr += 0x10) {
 705                         p_dev->io.BasePort2 = cf->io.win[0].base;
 706                         p_dev->io.BasePort1 = ioaddr;
 707                         if (!pcmcia_request_io(p_dev, &p_dev->io))
 708                                 return 0;
 709                 }
 710         }
 711         return -ENODEV;
 712 }
 713
 714 static int
 715 xirc2ps_config_check(struct pcmcia_device *p_dev,
 716                      cistpl_cftable_entry_t *cf,
 717                      cistpl_cftable_entry_t *dflt,
 718                      unsigned int vcc,
 719                      void *priv_data)
 720 {
 721         int *pass = priv_data;
 722
 723         if (cf->io.nwin > 0 && (cf->io.win[0].base & 0xf) == 8) {
 724                 p_dev->io.BasePort2 = cf->io.win[0].base;
 725                 p_dev->io.BasePort1 = p_dev->io.BasePort2
 726                         + (*pass ? (cf->index & 0x20 ? -24:8)
 727                            : (cf->index & 0x20 ?   8:-24));
 728                 if (!pcmcia_request_io(p_dev, &p_dev->io))
 729                         return 0;
 730         }
 731         return -ENODEV;
 732
 733 }
 734
 735
 736 static int pcmcia_get_mac_ce(struct pcmcia_device *p_dev,
 737                              tuple_t *tuple,
 738                              void *priv)
 739 {
 740         struct net_device *dev = priv;
 741         int i;
 742
 743         if (tuple->TupleDataLen != 13)
 744                 return -EINVAL;
 745         if ((tuple->TupleData[0] != 2) || (tuple->TupleData[1] != 1) ||
 746                 (tuple->TupleData[2] != 6))
 747                 return -EINVAL;
 748         /* another try  (James Lehmer's CE2 version 4.1)*/
 749         for (i = 2; i < 6; i++)
 750                 dev->dev_addr[i] = tuple->TupleData[i+2];
 751         return 0;
 752 };
 753
 754
 755 /****************
 756  * xirc2ps_config() is scheduled to run after a CARD_INSERTION event
 757  * is received, to configure the PCMCIA socket, and to make the
 758  * ethernet device available to the system.
 759  */
 760 static int
 761 xirc2ps_config(struct pcmcia_device * link)
 762 {
 763     struct net_device *dev = link->priv;
 764     local_info_t *local = netdev_priv(dev);
 765     unsigned int ioaddr;
 766     int err;
 767     u8 *buf;
 768     size_t len;
 769
 770     local->dingo_ccr = NULL;
 771
 772     dev_dbg(&link->dev, "config\n");
 773
 774     /* Is this a valid  card */
 775     if (link->has_manf_id == 0) {
 776         printk(KNOT_XIRC "manfid not found in CIS\n");
 777         goto failure;
 778     }
 779
 780     switch (link->manf_id) {
 781       case MANFID_XIRCOM:
 782         local->manf_str = "Xircom";
 783         break;
 784       case MANFID_ACCTON:
 785         local->manf_str = "Accton";
 786         break;
 787       case MANFID_COMPAQ:
 788       case MANFID_COMPAQ2:
 789         local->manf_str = "Compaq";
 790         break;
 791       case MANFID_INTEL:
 792         local->manf_str = "Intel";
 793         break;
 794       case MANFID_TOSHIBA:
 795         local->manf_str = "Toshiba";
 796         break;
 797       default:
 798         printk(KNOT_XIRC "Unknown Card Manufacturer ID: 0x%04x\n",
 799                (unsigned)link->manf_id);
 800         goto failure;
 801     }
 802     dev_dbg(&link->dev, "found %s card\n", local->manf_str);
 803
 804     if (!set_card_type(link)) {
 805         printk(KNOT_XIRC "this card is not supported\n");
 806         goto failure;
 807     }
 808
 809     /* get the ethernet address from the CIS */
 810     err = pcmcia_get_mac_from_cis(link, dev);
 811
 812     /* not found: try to get the node-id from tuple 0x89 */
 813     if (err) {
 814             len = pcmcia_get_tuple(link, 0x89, &buf);
 815             /* data layout looks like tuple 0x22 */
 816             if (buf && len == 8) {
 817                     if (*buf == CISTPL_FUNCE_LAN_NODE_ID) {
 818                             int i;
 819                             for (i = 2; i < 6; i++)
 820                                     dev->dev_addr[i] = buf[i+2];
 821                     } else
 822                             err = -1;
 823             }
 824             kfree(buf);
 825     }
 826
 827     if (err)
 828         err = pcmcia_loop_tuple(link, CISTPL_FUNCE, pcmcia_get_mac_ce, dev);
 829
 830     if (err) {
 831         printk(KNOT_XIRC "node-id not found in CIS\n");
 832         goto failure;
 833     }
 834
 835     link->io.IOAddrLines =10;
 836     link->io.Attributes1 = IO_DATA_PATH_WIDTH_16;
 837     if (local->modem) {
 838         int pass;
 839
 840         if (do_sound) {
 841             link->conf.Attributes |= CONF_ENABLE_SPKR;
 842             link->conf.Status |= CCSR_AUDIO_ENA;
 843         }
 844         link->irq.Attributes |= IRQ_TYPE_DYNAMIC_SHARING;
 845         link->io.NumPorts2 = 8;
 846         link->io.Attributes2 = IO_DATA_PATH_WIDTH_8;
 847         if (local->dingo) {
 848             /* Take the Modem IO port from the CIS and scan for a free
 849              * Ethernet port */
 850             link->io.NumPorts1 = 16; /* no Mako stuff anymore */
 851             if (!pcmcia_loop_config(link, xirc2ps_config_modem, NULL))
 852                     goto port_found;
 853         } else {
 854             link->io.NumPorts1 = 18;
 855             /* We do 2 passes here: The first one uses the regular mapping and
 856              * the second tries again, thereby considering that the 32 ports are
 857              * mirrored every 32 bytes. Actually we use a mirrored port for
 858              * the Mako if (on the first pass) the COR bit 5 is set.
 859              */
 860             for (pass=0; pass < 2; pass++)
 861                     if (!pcmcia_loop_config(link, xirc2ps_config_check, &pass))
 862                             goto port_found;
 863             /* if special option:
 864              * try to configure as Ethernet only.
 865              * .... */
 866         }
 867         printk(KNOT_XIRC "no ports available\n");
 868     } else {
 869         link->irq.Attributes |= IRQ_TYPE_DYNAMIC_SHARING;
 870         link->io.NumPorts1 = 16;
 871         for (ioaddr = 0x300; ioaddr < 0x400; ioaddr += 0x10) {
 872             link->io.BasePort1 = ioaddr;
 873             if (!(err=pcmcia_request_io(link, &link->io)))
 874                 goto port_found;
 875         }
 876         link->io.BasePort1 = 0; /* let CS decide */
 877         if ((err=pcmcia_request_io(link, &link->io)))
 878             goto config_error;
 879     }
 880   port_found:
 881     if (err)
 882          goto config_error;
 883
 884     /****************
 885      * Now allocate an interrupt line.  Note that this does not
 886      * actually assign a handler to the interrupt.
 887      */
 888     if ((err=pcmcia_request_irq(link, &link->irq)))
 889         goto config_error;
 890
 891     /****************
 892      * This actually configures the PCMCIA socket -- setting up
 893      * the I/O windows and the interrupt mapping.
 894      */
 895     if ((err=pcmcia_request_configuration(link, &link->conf)))
 896         goto config_error;
 897
 898     if (local->dingo) {
 899         conf_reg_t reg;
 900         win_req_t req;
 901         memreq_t mem;
 902
 903         /* Reset the modem's BAR to the correct value
 904          * This is necessary because in the RequestConfiguration call,
 905          * the base address of the ethernet port (BasePort1) is written
 906          * to the BAR registers of the modem.
 907          */
 908         reg.Action = CS_WRITE;
 909         reg.Offset = CISREG_IOBASE_0;
 910         reg.Value = link->io.BasePort2 & 0xff;
 911         if ((err = pcmcia_access_configuration_register(link, &reg)))
 912             goto config_error;
 913         reg.Action = CS_WRITE;
 914         reg.Offset = CISREG_IOBASE_1;
 915         reg.Value = (link->io.BasePort2 >> 8) & 0xff;
 916         if ((err = pcmcia_access_configuration_register(link, &reg)))
 917             goto config_error;
 918
 919         /* There is no config entry for the Ethernet part which
 920          * is at 0x0800. So we allocate a window into the attribute
 921          * memory and write direct to the CIS registers
 922          */
 923         req.Attributes = WIN_DATA_WIDTH_8|WIN_MEMORY_TYPE_AM|WIN_ENABLE;
 924         req.Base = req.Size = 0;
 925         req.AccessSpeed = 0;
 926         if ((err = pcmcia_request_window(link, &req, &link->win)))
 927             goto config_error;
 928
 929         local->dingo_ccr = ioremap(req.Base,0x1000) + 0x0800;
 930         mem.CardOffset = 0x0;
 931         mem.Page = 0;
 932         if ((err = pcmcia_map_mem_page(link, link->win, &mem)))
 933             goto config_error;
 934
 935         /* Setup the CCRs; there are no infos in the CIS about the Ethernet
 936          * part.
 937          */
 938         writeb(0x47, local->dingo_ccr + CISREG_COR);
 939         ioaddr = link->io.BasePort1;
 940         writeb(ioaddr & 0xff      , local->dingo_ccr + CISREG_IOBASE_0);
 941         writeb((ioaddr >> 8)&0xff , local->dingo_ccr + CISREG_IOBASE_1);
 942
 943       #if 0
 944         {
 945             u_char tmp;
 946             printk(KERN_INFO "ECOR:");
 947             for (i=0; i < 7; i++) {
 948                 tmp = readb(local->dingo_ccr + i*2);
 949                 printk(" %02x", tmp);
 950             }
 951             printk("\n");
 952             printk(KERN_INFO "DCOR:");
 953             for (i=0; i < 4; i++) {
 954                 tmp = readb(local->dingo_ccr + 0x20 + i*2);
 955                 printk(" %02x", tmp);
 956             }
 957             printk("\n");
 958             printk(KERN_INFO "SCOR:");
 959             for (i=0; i < 10; i++) {
 960                 tmp = readb(local->dingo_ccr + 0x40 + i*2);
 961                 printk(" %02x", tmp);
 962             }
 963             printk("\n");
 964         }
 965       #endif
 966
 967         writeb(0x01, local->dingo_ccr + 0x20);
 968         writeb(0x0c, local->dingo_ccr + 0x22);
 969         writeb(0x00, local->dingo_ccr + 0x24);
 970         writeb(0x00, local->dingo_ccr + 0x26);
 971         writeb(0x00, local->dingo_ccr + 0x28);
 972     }
 973
 974     /* The if_port symbol can be set when the module is loaded */
 975     local->probe_port=0;
 976     if (!if_port) {
 977         local->probe_port = dev->if_port = 1;
 978     } else if ((if_port >= 1 && if_port <= 2) ||
 979                (local->mohawk && if_port==4))
 980         dev->if_port = if_port;
 981     else
 982         printk(KNOT_XIRC "invalid if_port requested\n");
 983
 984     /* we can now register the device with the net subsystem */
 985     dev->irq = link->irq.AssignedIRQ;
 986     dev->base_addr = link->io.BasePort1;
 987
 988     if (local->dingo)
 989         do_reset(dev, 1); /* a kludge to make the cem56 work */
 990
 991     link->dev_node = &local->node;
 992     SET_NETDEV_DEV(dev, &link->dev);
 993
 994     if ((err=register_netdev(dev))) {
 995         printk(KNOT_XIRC "register_netdev() failed\n");
 996         link->dev_node = NULL;
 997         goto config_error;
 998     }
 999
1000     strcpy(local->node.dev_name, dev->name);
1001
1002     /* give some infos about the hardware */
1003     printk(KERN_INFO "%s: %s: port %#3lx, irq %d, hwaddr %pM\n",
1004            dev->name, local->manf_str,(u_long)dev->base_addr, (int)dev->irq,
1005            dev->dev_addr);
1006
1007     return 0;
1008
1009   config_error:
1010     xirc2ps_release(link);
1011     return -ENODEV;
1012
1013   failure:
1014     return -ENODEV;
1015 } /* xirc2ps_config */
1016
1017 /****************
1018  * After a card is removed, xirc2ps_release() will unregister the net
1019  * device, and release the PCMCIA configuration.  If the device is
1020  * still open, this will be postponed until it is closed.
1021  */
1022 static void
1023 xirc2ps_release(struct pcmcia_device *link)
1024 {
1025         dev_dbg(&link->dev, "release\n");
1026
1027         if (link->win) {
1028                 struct net_device *dev = link->priv;
1029                 local_info_t *local = netdev_priv(dev);
1030                 if (local->dingo)
1031                         iounmap(local->dingo_ccr - 0x0800);
1032         }
1033         pcmcia_disable_device(link);
1034 } /* xirc2ps_release */
1035
1036 /*====================================================================*/
1037
1038
1039 static int xirc2ps_suspend(struct pcmcia_device *link)
1040 {
1041         struct net_device *dev = link->priv;
1042
1043         if (link->open) {
1044                 netif_device_detach(dev);
1045                 do_powerdown(dev);
1046         }
1047
1048         return 0;
1049 }
1050
1051 static int xirc2ps_resume(struct pcmcia_device *link)
1052 {
1053         struct net_device *dev = link->priv;
1054
1055         if (link->open) {
1056                 do_reset(dev,1);
1057                 netif_device_attach(dev);
1058         }
1059
1060         return 0;
1061 }
1062
1063
1064 /*====================================================================*/
1065
1066 /****************
1067  * This is the Interrupt service route.
1068  */
1069 static irqreturn_t
1070 xirc2ps_interrupt(int irq, void *dev_id)
1071 {
1072     struct net_device *dev = (struct net_device *)dev_id;
1073     local_info_t *lp = netdev_priv(dev);
1074     unsigned int ioaddr;
1075     u_char saved_page;
1076     unsigned bytes_rcvd;
1077     unsigned int_status, eth_status, rx_status, tx_status;
1078     unsigned rsr, pktlen;
1079     ulong start_ticks = jiffies; /* fixme: jiffies rollover every 497 days
1080                                   * is this something to worry about?
1081                                   * -- on a laptop?
1082                                   */
1083
1084     if (!netif_device_present(dev))
1085         return IRQ_HANDLED;
1086
1087     ioaddr = dev->base_addr;
1088     if (lp->mohawk) { /* must disable the interrupt */
1089         PutByte(XIRCREG_CR, 0);
1090     }
1091
1092     pr_debug("%s: interrupt %d at %#x.\n", dev->name, irq, ioaddr);
1093
1094     saved_page = GetByte(XIRCREG_PR);
1095     /* Read the ISR to see whats the cause for the interrupt.
1096      * This also clears the interrupt flags on CE2 cards
1097      */
1098     int_status = GetByte(XIRCREG_ISR);
1099     bytes_rcvd = 0;
1100   loop_entry:
1101     if (int_status == 0xff) { /* card may be ejected */
1102         pr_debug("%s: interrupt %d for dead card\n", dev->name, irq);
1103         goto leave;
1104     }
1105     eth_status = GetByte(XIRCREG_ESR);
1106
1107     SelectPage(0x40);
1108     rx_status  = GetByte(XIRCREG40_RXST0);
1109     PutByte(XIRCREG40_RXST0, (~rx_status & 0xff));
1110     tx_status = GetByte(XIRCREG40_TXST0);
1111     tx_status |= GetByte(XIRCREG40_TXST1) << 8;
1112     PutByte(XIRCREG40_TXST0, 0);
1113     PutByte(XIRCREG40_TXST1, 0);
1114
1115     pr_debug("%s: ISR=%#2.2x ESR=%#2.2x RSR=%#2.2x TSR=%#4.4x\n",
1116           dev->name, int_status, eth_status, rx_status, tx_status);
1117
1118     /***** receive section ******/
1119     SelectPage(0);
1120     while (eth_status & FullPktRcvd) {
1121         rsr = GetByte(XIRCREG0_RSR);
1122         if (bytes_rcvd > maxrx_bytes && (rsr & PktRxOk)) {
1123             /* too many bytes received during this int, drop the rest of the
1124              * packets */
1125             dev->stats.rx_dropped++;
1126             pr_debug("%s: RX drop, too much done\n", dev->name);
1127         } else if (rsr & PktRxOk) {
1128             struct sk_buff *skb;
1129
1130             pktlen = GetWord(XIRCREG0_RBC);
1131             bytes_rcvd += pktlen;
1132
1133             pr_debug("rsr=%#02x packet_length=%u\n", rsr, pktlen);
1134
1135             skb = dev_alloc_skb(pktlen+3); /* 1 extra so we can use insw */
1136             if (!skb) {
1137                 printk(KNOT_XIRC "low memory, packet dropped (size=%u)\n",
1138                        pktlen);
1139                 dev->stats.rx_dropped++;
1140             } else { /* okay get the packet */
1141                 skb_reserve(skb, 2);
1142                 if (lp->silicon == 0 ) { /* work around a hardware bug */
1143                     unsigned rhsa; /* receive start address */
1144
1145                     SelectPage(5);
1146                     rhsa = GetWord(XIRCREG5_RHSA0);
1147                     SelectPage(0);
1148                     rhsa += 3; /* skip control infos */
1149                     if (rhsa >= 0x8000)
1150                         rhsa = 0;
1151                     if (rhsa + pktlen > 0x8000) {
1152                         unsigned i;
1153                         u_char *buf = skb_put(skb, pktlen);
1154                         for (i=0; i < pktlen ; i++, rhsa++) {
1155                             buf[i] = GetByte(XIRCREG_EDP);
1156                             if (rhsa == 0x8000) {
1157                                 rhsa = 0;
1158                                 i--;
1159                             }
1160                         }
1161                     } else {
1162                         insw(ioaddr+XIRCREG_EDP,
1163                                 skb_put(skb, pktlen), (pktlen+1)>>1);
1164                     }
1165                 }
1166               #if 0
1167                 else if (lp->mohawk) {
1168                     /* To use this 32 bit access we should use
1169                      * a manual optimized loop
1170                      * Also the words are swapped, we can get more
1171                      * performance by using 32 bit access and swapping
1172                      * the words in a register. Will need this for cardbus
1173                      *
1174                      * Note: don't forget to change the ALLOC_SKB to .. +3
1175                      */
1176                     unsigned i;
1177                     u_long *p = skb_put(skb, pktlen);
1178                     register u_long a;
1179                     unsigned int edpreg = ioaddr+XIRCREG_EDP-2;
1180                     for (i=0; i < len ; i += 4, p++) {
1181                         a = inl(edpreg);
1182                         __asm__("rorl $16,%0\n\t"
1183                                 :"=q" (a)
1184                                 : "0" (a));
1185                         *p = a;
1186                     }
1187                 }
1188               #endif
1189                 else {
1190                     insw(ioaddr+XIRCREG_EDP, skb_put(skb, pktlen),
1191                             (pktlen+1)>>1);
1192                 }
1193                 skb->protocol = eth_type_trans(skb, dev);
1194                 netif_rx(skb);
1195                 dev->stats.rx_packets++;
1196                 dev->stats.rx_bytes += pktlen;
1197                 if (!(rsr & PhyPkt))
1198                     dev->stats.multicast++;
1199             }
1200         } else { /* bad packet */
1201             pr_debug("rsr=%#02x\n", rsr);
1202         }
1203         if (rsr & PktTooLong) {
1204             dev->stats.rx_frame_errors++;
1205             pr_debug("%s: Packet too long\n", dev->name);
1206         }
1207         if (rsr & CRCErr) {
1208             dev->stats.rx_crc_errors++;
1209             pr_debug("%s: CRC error\n", dev->name);
1210         }
1211         if (rsr & AlignErr) {
1212             dev->stats.rx_fifo_errors++; /* okay ? */
1213             pr_debug("%s: Alignment error\n", dev->name);
1214         }
1215
1216         /* clear the received/dropped/error packet */
1217         PutWord(XIRCREG0_DO, 0x8000); /* issue cmd: skip_rx_packet */
1218
1219         /* get the new ethernet status */
1220         eth_status = GetByte(XIRCREG_ESR);
1221     }
1222     if (rx_status & 0x10) { /* Receive overrun */
1223         dev->stats.rx_over_errors++;
1224         PutByte(XIRCREG_CR, ClearRxOvrun);
1225         pr_debug("receive overrun cleared\n");
1226     }
1227
1228     /***** transmit section ******/
1229     if (int_status & PktTxed) {
1230         unsigned n, nn;
1231
1232         n = lp->last_ptr_value;
1233         nn = GetByte(XIRCREG0_PTR);
1234         lp->last_ptr_value = nn;
1235         if (nn < n) /* rollover */
1236             dev->stats.tx_packets += 256 - n;
1237         else if (n == nn) { /* happens sometimes - don't know why */
1238             pr_debug("PTR not changed?\n");
1239         } else
1240             dev->stats.tx_packets += lp->last_ptr_value - n;
1241         netif_wake_queue(dev);
1242     }
1243     if (tx_status & 0x0002) {   /* Execessive collissions */
1244         pr_debug("tx restarted due to execssive collissions\n");
1245         PutByte(XIRCREG_CR, RestartTx);  /* restart transmitter process */
1246     }
1247     if (tx_status & 0x0040)
1248         dev->stats.tx_aborted_errors++;
1249
1250     /* recalculate our work chunk so that we limit the duration of this
1251      * ISR to about 1/10 of a second.
1252      * Calculate only if we received a reasonable amount of bytes.
1253      */
1254     if (bytes_rcvd > 1000) {
1255         u_long duration = jiffies - start_ticks;
1256
1257         if (duration >= HZ/10) { /* if more than about 1/10 second */
1258             maxrx_bytes = (bytes_rcvd * (HZ/10)) / duration;
1259             if (maxrx_bytes < 2000)
1260                 maxrx_bytes = 2000;
1261             else if (maxrx_bytes > 22000)
1262                 maxrx_bytes = 22000;
1263             pr_debug("set maxrx=%u (rcvd=%u ticks=%lu)\n",
1264                   maxrx_bytes, bytes_rcvd, duration);
1265         } else if (!duration && maxrx_bytes < 22000) {
1266             /* now much faster */
1267             maxrx_bytes += 2000;
1268             if (maxrx_bytes > 22000)
1269                 maxrx_bytes = 22000;
1270             pr_debug("set maxrx=%u\n", maxrx_bytes);
1271         }
1272     }
1273
1274   leave:
1275     if (lockup_hack) {
1276         if (int_status != 0xff && (int_status = GetByte(XIRCREG_ISR)) != 0)
1277             goto loop_entry;
1278     }
1279     SelectPage(saved_page);
1280     PutByte(XIRCREG_CR, EnableIntr);  /* re-enable interrupts */
1281     /* Instead of dropping packets during a receive, we could
1282      * force an interrupt with this command:
1283      *    PutByte(XIRCREG_CR, EnableIntr|ForceIntr);
1284      */
1285     return IRQ_HANDLED;
1286 } /* xirc2ps_interrupt */
1287
1288 /*====================================================================*/
1289
1290 static void
1291 xirc2ps_tx_timeout_task(struct work_struct *work)
1292 {
1293         local_info_t *local =
1294                 container_of(work, local_info_t, tx_timeout_task);
1295         struct net_device *dev = local->dev;
1296     /* reset the card */
1297     do_reset(dev,1);
1298     dev->trans_start = jiffies; /* prevent tx timeout */
1299     netif_wake_queue(dev);
1300 }
1301
1302 static void
1303 xirc_tx_timeout(struct net_device *dev)
1304 {
1305     local_info_t *lp = netdev_priv(dev);
1306     dev->stats.tx_errors++;
1307     printk(KERN_NOTICE "%s: transmit timed out\n", dev->name);
1308     schedule_work(&lp->tx_timeout_task);
1309 }
1310
1311 static netdev_tx_t
1312 do_start_xmit(struct sk_buff *skb, struct net_device *dev)
1313 {
1314     local_info_t *lp = netdev_priv(dev);
1315     unsigned int ioaddr = dev->base_addr;
1316     int okay;
1317     unsigned freespace;
1318     unsigned pktlen = skb->len;
1319
1320     pr_debug("do_start_xmit(skb=%p, dev=%p) len=%u\n",
1321           skb, dev, pktlen);
1322
1323
1324     /* adjust the packet length to min. required
1325      * and hope that the buffer is large enough
1326      * to provide some random data.
1327      * fixme: For Mohawk we can change this by sending
1328      * a larger packetlen than we actually have; the chip will
1329      * pad this in his buffer with random bytes
1330      */
1331     if (pktlen < ETH_ZLEN)
1332     {
1333         if (skb_padto(skb, ETH_ZLEN))
1334                 return NETDEV_TX_OK;
1335         pktlen = ETH_ZLEN;
1336     }
1337
1338     netif_stop_queue(dev);
1339     SelectPage(0);
1340     PutWord(XIRCREG0_TRS, (u_short)pktlen+2);
1341     freespace = GetWord(XIRCREG0_TSO);
1342     okay = freespace & 0x8000;
1343     freespace &= 0x7fff;
1344     /* TRS doesn't work - (indeed it is eliminated with sil-rev 1) */
1345     okay = pktlen +2 < freespace;
1346     pr_debug("%s: avail. tx space=%u%s\n",
1347           dev->name, freespace, okay ? " (okay)":" (not enough)");
1348     if (!okay) { /* not enough space */
1349         return NETDEV_TX_BUSY;  /* upper layer may decide to requeue this packet */
1350     }
1351     /* send the packet */
1352     PutWord(XIRCREG_EDP, (u_short)pktlen);
1353     outsw(ioaddr+XIRCREG_EDP, skb->data, pktlen>>1);
1354     if (pktlen & 1)
1355         PutByte(XIRCREG_EDP, skb->data[pktlen-1]);
1356
1357     if (lp->mohawk)
1358         PutByte(XIRCREG_CR, TransmitPacket|EnableIntr);
1359
1360     dev_kfree_skb (skb);
1361     dev->stats.tx_bytes += pktlen;
1362     netif_start_queue(dev);
1363     return NETDEV_TX_OK;
1364 }
1365
1366 struct set_address_info {
1367         int reg_nr;
1368         int page_nr;
1369         int mohawk;
1370         unsigned int ioaddr;
1371 };
1372
1373 static void set_address(struct set_address_info *sa_info, char *addr)
1374 {
1375         unsigned int ioaddr = sa_info->ioaddr;
1376         int i;
1377
1378         for (i = 0; i < 6; i++) {
1379                 if (sa_info->reg_nr > 15) {
1380                         sa_info->reg_nr = 8;
1381                         sa_info->page_nr++;
1382                         SelectPage(sa_info->page_nr);
1383                 }
1384                 if (sa_info->mohawk)
1385                         PutByte(sa_info->reg_nr++, addr[5 - i]);
1386                 else
1387                         PutByte(sa_info->reg_nr++, addr[i]);
1388         }
1389 }
1390
1391 /****************
1392  * Set all addresses: This first one is the individual address,
1393  * the next 9 addresses are taken from the multicast list and
1394  * the rest is filled with the individual address.
1395  */
1396 static void set_addresses(struct net_device *dev)
1397 {
1398         unsigned int ioaddr = dev->base_addr;
1399         local_info_t *lp = netdev_priv(dev);
1400         struct netdev_hw_addr *ha;
1401         struct set_address_info sa_info;
1402         int i;
1403
1404         /*
1405          * Setup the info structure so that by first set_address call it will do
1406          * SelectPage with the right page number. Hence these ones here.
1407          */
1408         sa_info.reg_nr = 15 + 1;
1409         sa_info.page_nr = 0x50 - 1;
1410         sa_info.mohawk = lp->mohawk;
1411         sa_info.ioaddr = ioaddr;
1412
1413         set_address(&sa_info, dev->dev_addr);
1414         i = 0;
1415         netdev_for_each_mc_addr(ha, dev) {
1416                 if (i++ == 9)
1417                         break;
1418                 set_address(&sa_info, ha->addr);
1419         }
1420         while (i++ < 9)
1421                 set_address(&sa_info, dev->dev_addr);
1422         SelectPage(0);
1423 }
1424
1425 /****************
1426  * Set or clear the multicast filter for this adaptor.
1427  * We can filter up to 9 addresses, if more are requested we set
1428  * multicast promiscuous mode.
1429  */
1430
1431 static void
1432 set_multicast_list(struct net_device *dev)
1433 {
1434     unsigned int ioaddr = dev->base_addr;
1435     unsigned value;
1436
1437     SelectPage(0x42);
1438     value = GetByte(XIRCREG42_SWC1) & 0xC0;
1439
1440     if (dev->flags & IFF_PROMISC) { /* snoop */
1441         PutByte(XIRCREG42_SWC1, value | 0x06); /* set MPE and PME */
1442     } else if (netdev_mc_count(dev) > 9 || (dev->flags & IFF_ALLMULTI)) {
1443         PutByte(XIRCREG42_SWC1, value | 0x02); /* set MPE */
1444     } else if (!netdev_mc_empty(dev)) {
1445         /* the chip can filter 9 addresses perfectly */
1446         PutByte(XIRCREG42_SWC1, value | 0x01);
1447         SelectPage(0x40);
1448         PutByte(XIRCREG40_CMD0, Offline);
1449         set_addresses(dev);
1450         SelectPage(0x40);
1451         PutByte(XIRCREG40_CMD0, EnableRecv | Online);
1452     } else { /* standard usage */
1453         PutByte(XIRCREG42_SWC1, value | 0x00);
1454     }
1455     SelectPage(0);
1456 }
1457
1458 static int
1459 do_config(struct net_device *dev, struct ifmap *map)
1460 {
1461     local_info_t *local = netdev_priv(dev);
1462
1463     pr_debug("do_config(%p)\n", dev);
1464     if (map->port != 255 && map->port != dev->if_port) {
1465         if (map->port > 4)
1466             return -EINVAL;
1467         if (!map->port) {
1468             local->probe_port = 1;
1469             dev->if_port = 1;
1470         } else {
1471             local->probe_port = 0;
1472             dev->if_port = map->port;
1473         }
1474         printk(KERN_INFO "%s: switching to %s port\n",
1475                dev->name, if_names[dev->if_port]);
1476         do_reset(dev,1);  /* not the fine way :-) */
1477     }
1478     return 0;
1479 }
1480
1481 /****************
1482  * Open the driver
1483  */
1484 static int
1485 do_open(struct net_device *dev)
1486 {
1487     local_info_t *lp = netdev_priv(dev);
1488     struct pcmcia_device *link = lp->p_dev;
1489
1490     dev_dbg(&link->dev, "do_open(%p)\n", dev);
1491
1492     /* Check that the PCMCIA card is still here. */
1493     /* Physical device present signature. */
1494     if (!pcmcia_dev_present(link))
1495         return -ENODEV;
1496
1497     /* okay */
1498     link->open++;
1499
1500     netif_start_queue(dev);
1501     do_reset(dev,1);
1502
1503     return 0;
1504 }
1505
1506 static void netdev_get_drvinfo(struct net_device *dev,
1507                                struct ethtool_drvinfo *info)
1508 {
1509         strcpy(info->driver, "xirc2ps_cs");
1510         sprintf(info->bus_info, "PCMCIA 0x%lx", dev->base_addr);
1511 }
1512
1513 static const struct ethtool_ops netdev_ethtool_ops = {
1514         .get_drvinfo            = netdev_get_drvinfo,
1515 };
1516
1517 static int
1518 do_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
1519 {
1520     local_info_t *local = netdev_priv(dev);
1521     unsigned int ioaddr = dev->base_addr;
1522     struct mii_ioctl_data *data = if_mii(rq);
1523
1524     pr_debug("%s: ioctl(%-.6s, %#04x) %04x %04x %04x %04x\n",
1525           dev->name, rq->ifr_ifrn.ifrn_name, cmd,
1526           data->phy_id, data->reg_num, data->val_in, data->val_out);
1527
1528     if (!local->mohawk)
1529         return -EOPNOTSUPP;
1530
1531     switch(cmd) {
1532       case SIOCGMIIPHY:         /* Get the address of the PHY in use. */
1533         data->phy_id = 0;       /* we have only this address */
1534         /* fall through */
1535       case SIOCGMIIREG:         /* Read the specified MII register. */
1536         data->val_out = mii_rd(ioaddr, data->phy_id & 0x1f,
1537                                data->reg_num & 0x1f);
1538         break;
1539       case SIOCSMIIREG:         /* Write the specified MII register */
1540         mii_wr(ioaddr, data->phy_id & 0x1f, data->reg_num & 0x1f, data->val_in,
1541                16);
1542         break;
1543       default:
1544         return -EOPNOTSUPP;
1545     }
1546     return 0;
1547 }
1548
1549 static void
1550 hardreset(struct net_device *dev)
1551 {
1552     local_info_t *local = netdev_priv(dev);
1553     unsigned int ioaddr = dev->base_addr;
1554
1555     SelectPage(4);
1556     udelay(1);
1557     PutByte(XIRCREG4_GPR1, 0);       /* clear bit 0: power down */
1558     msleep(40);                              /* wait 40 msec */
1559     if (local->mohawk)
1560         PutByte(XIRCREG4_GPR1, 1);       /* set bit 0: power up */
1561     else
1562         PutByte(XIRCREG4_GPR1, 1 | 4);   /* set bit 0: power up, bit 2: AIC */
1563     msleep(20);                      /* wait 20 msec */
1564 }
1565
1566 static void
1567 do_reset(struct net_device *dev, int full)
1568 {
1569     local_info_t *local = netdev_priv(dev);
1570     unsigned int ioaddr = dev->base_addr;
1571     unsigned value;
1572
1573     pr_debug("%s: do_reset(%p,%d)\n", dev? dev->name:"eth?", dev, full);
1574
1575     hardreset(dev);
1576     PutByte(XIRCREG_CR, SoftReset); /* set */
1577     msleep(20);                      /* wait 20 msec */
1578     PutByte(XIRCREG_CR, 0);          /* clear */
1579     msleep(40);                      /* wait 40 msec */
1580     if (local->mohawk) {
1581         SelectPage(4);
1582         /* set pin GP1 and GP2 to output  (0x0c)
1583          * set GP1 to low to power up the ML6692 (0x00)
1584          * set GP2 to high to power up the 10Mhz chip  (0x02)
1585          */
1586         PutByte(XIRCREG4_GPR0, 0x0e);
1587     }
1588
1589     /* give the circuits some time to power up */
1590     msleep(500);                        /* about 500ms */
1591
1592     local->last_ptr_value = 0;
1593     local->silicon = local->mohawk ? (GetByte(XIRCREG4_BOV) & 0x70) >> 4
1594                                    : (GetByte(XIRCREG4_BOV) & 0x30) >> 4;
1595
1596     if (local->probe_port) {
1597         if (!local->mohawk) {
1598             SelectPage(4);
1599             PutByte(XIRCREG4_GPR0, 4);
1600             local->probe_port = 0;
1601         }
1602     } else if (dev->if_port == 2) { /* enable 10Base2 */
1603         SelectPage(0x42);
1604         PutByte(XIRCREG42_SWC1, 0xC0);
1605     } else { /* enable 10BaseT */
1606         SelectPage(0x42);
1607         PutByte(XIRCREG42_SWC1, 0x80);
1608     }
1609     msleep(40);                      /* wait 40 msec to let it complete */
1610
1611   #if 0
1612     {
1613         SelectPage(0);
1614         value = GetByte(XIRCREG_ESR);    /* read the ESR */
1615         printk(KERN_DEBUG "%s: ESR is: %#02x\n", dev->name, value);
1616     }
1617   #endif
1618
1619     /* setup the ECR */
1620     SelectPage(1);
1621     PutByte(XIRCREG1_IMR0, 0xff); /* allow all ints */
1622     PutByte(XIRCREG1_IMR1, 1    ); /* and Set TxUnderrunDetect */
1623     value = GetByte(XIRCREG1_ECR);
1624   #if 0
1625     if (local->mohawk)
1626         value |= DisableLinkPulse;
1627     PutByte(XIRCREG1_ECR, value);
1628   #endif
1629     pr_debug("%s: ECR is: %#02x\n", dev->name, value);
1630
1631     SelectPage(0x42);
1632     PutByte(XIRCREG42_SWC0, 0x20); /* disable source insertion */
1633
1634     if (local->silicon != 1) {
1635         /* set the local memory dividing line.
1636          * The comments in the sample code say that this is only
1637          * settable with the scipper version 2 which is revision 0.
1638          * Always for CE3 cards
1639          */
1640         SelectPage(2);
1641         PutWord(XIRCREG2_RBS, 0x2000);
1642     }
1643
1644     if (full)
1645         set_addresses(dev);
1646
1647     /* Hardware workaround:
1648      * The receive byte pointer after reset is off by 1 so we need
1649      * to move the offset pointer back to 0.
1650      */
1651     SelectPage(0);
1652     PutWord(XIRCREG0_DO, 0x2000); /* change offset command, off=0 */
1653
1654     /* setup MAC IMRs and clear status registers */
1655     SelectPage(0x40);                /* Bit 7 ... bit 0 */
1656     PutByte(XIRCREG40_RMASK0, 0xff); /* ROK, RAB, rsv, RO, CRC, AE, PTL, MP */
1657     PutByte(XIRCREG40_TMASK0, 0xff); /* TOK, TAB, SQE, LL, TU, JAB, EXC, CRS */
1658     PutByte(XIRCREG40_TMASK1, 0xb0); /* rsv, rsv, PTD, EXT, rsv,rsv,rsv, rsv*/
1659     PutByte(XIRCREG40_RXST0,  0x00); /* ROK, RAB, REN, RO, CRC, AE, PTL, MP */
1660     PutByte(XIRCREG40_TXST0,  0x00); /* TOK, TAB, SQE, LL, TU, JAB, EXC, CRS */
1661     PutByte(XIRCREG40_TXST1,  0x00); /* TEN, rsv, PTD, EXT, retry_counter:4  */
1662
1663     if (full && local->mohawk && init_mii(dev)) {
1664         if (dev->if_port == 4 || local->dingo || local->new_mii) {
1665             printk(KERN_INFO "%s: MII selected\n", dev->name);
1666             SelectPage(2);
1667             PutByte(XIRCREG2_MSR, GetByte(XIRCREG2_MSR) | 0x08);
1668             msleep(20);
1669         } else {
1670             printk(KERN_INFO "%s: MII detected; using 10mbs\n",
1671                    dev->name);
1672             SelectPage(0x42);
1673             if (dev->if_port == 2) /* enable 10Base2 */
1674                 PutByte(XIRCREG42_SWC1, 0xC0);
1675             else  /* enable 10BaseT */
1676                 PutByte(XIRCREG42_SWC1, 0x80);
1677             msleep(40);                 /* wait 40 msec to let it complete */
1678         }
1679         if (full_duplex)
1680             PutByte(XIRCREG1_ECR, GetByte(XIRCREG1_ECR | FullDuplex));
1681     } else {  /* No MII */
1682         SelectPage(0);
1683         value = GetByte(XIRCREG_ESR);    /* read the ESR */
1684         dev->if_port = (value & MediaSelect) ? 1 : 2;
1685     }
1686
1687     /* configure the LEDs */
1688     SelectPage(2);
1689     if (dev->if_port == 1 || dev->if_port == 4) /* TP: Link and Activity */
1690         PutByte(XIRCREG2_LED, 0x3b);
1691     else                              /* Coax: Not-Collision and Activity */
1692         PutByte(XIRCREG2_LED, 0x3a);
1693
1694     if (local->dingo)
1695         PutByte(0x0b, 0x04); /* 100 Mbit LED */
1696
1697     /* enable receiver and put the mac online */
1698     if (full) {
1699         set_multicast_list(dev);
1700         SelectPage(0x40);
1701         PutByte(XIRCREG40_CMD0, EnableRecv | Online);
1702     }
1703
1704     /* setup Ethernet IMR and enable interrupts */
1705     SelectPage(1);
1706     PutByte(XIRCREG1_IMR0, 0xff);
1707     udelay(1);
1708     SelectPage(0);
1709     PutByte(XIRCREG_CR, EnableIntr);
1710     if (local->modem && !local->dingo) { /* do some magic */
1711         if (!(GetByte(0x10) & 0x01))
1712             PutByte(0x10, 0x11); /* unmask master-int bit */
1713     }
1714
1715     if (full)
1716         printk(KERN_INFO "%s: media %s, silicon revision %d\n",
1717                dev->name, if_names[dev->if_port], local->silicon);
1718     /* We should switch back to page 0 to avoid a bug in revision 0
1719      * where regs with offset below 8 can't be read after an access
1720      * to the MAC registers */
1721     SelectPage(0);
1722 }
1723
1724 /****************
1725  * Initialize the Media-Independent-Interface
1726  * Returns: True if we have a good MII
1727  */
1728 static int
1729 init_mii(struct net_device *dev)
1730 {
1731     local_info_t *local = netdev_priv(dev);
1732     unsigned int ioaddr = dev->base_addr;
1733     unsigned control, status, linkpartner;
1734     int i;
1735
1736     if (if_port == 4 || if_port == 1) { /* force 100BaseT or 10BaseT */
1737         dev->if_port = if_port;
1738         local->probe_port = 0;
1739         return 1;
1740     }
1741
1742     status = mii_rd(ioaddr,  0, 1);
1743     if ((status & 0xff00) != 0x7800)
1744         return 0; /* No MII */
1745
1746     local->new_mii = (mii_rd(ioaddr, 0, 2) != 0xffff);
1747
1748     if (local->probe_port)
1749         control = 0x1000; /* auto neg */
1750     else if (dev->if_port == 4)
1751         control = 0x2000; /* no auto neg, 100mbs mode */
1752     else
1753         control = 0x0000; /* no auto neg, 10mbs mode */
1754     mii_wr(ioaddr,  0, 0, control, 16);
1755     udelay(100);
1756     control = mii_rd(ioaddr, 0, 0);
1757
1758     if (control & 0x0400) {
1759         printk(KERN_NOTICE "%s can't take PHY out of isolation mode\n",
1760                dev->name);
1761         local->probe_port = 0;
1762         return 0;
1763     }
1764
1765     if (local->probe_port) {
1766         /* according to the DP83840A specs the auto negotiation process
1767          * may take up to 3.5 sec, so we use this also for our ML6692
1768          * Fixme: Better to use a timer here!
1769          */
1770         for (i=0; i < 35; i++) {
1771             msleep(100);         /* wait 100 msec */
1772             status = mii_rd(ioaddr,  0, 1);
1773             if ((status & 0x0020) && (status & 0x0004))
1774                 break;
1775         }
1776
1777         if (!(status & 0x0020)) {
1778             printk(KERN_INFO "%s: autonegotiation failed;"
1779                    " using 10mbs\n", dev->name);
1780             if (!local->new_mii) {
1781                 control = 0x0000;
1782                 mii_wr(ioaddr,  0, 0, control, 16);
1783                 udelay(100);
1784                 SelectPage(0);
1785                 dev->if_port = (GetByte(XIRCREG_ESR) & MediaSelect) ? 1 : 2;
1786             }
1787         } else {
1788             linkpartner = mii_rd(ioaddr, 0, 5);
1789             printk(KERN_INFO "%s: MII link partner: %04x\n",
1790                    dev->name, linkpartner);
1791             if (linkpartner & 0x0080) {
1792                 dev->if_port = 4;
1793             } else
1794                 dev->if_port = 1;
1795         }
1796     }
1797
1798     return 1;
1799 }
1800
1801 static void
1802 do_powerdown(struct net_device *dev)
1803 {
1804
1805     unsigned int ioaddr = dev->base_addr;
1806
1807     pr_debug("do_powerdown(%p)\n", dev);
1808
1809     SelectPage(4);
1810     PutByte(XIRCREG4_GPR1, 0);       /* clear bit 0: power down */
1811     SelectPage(0);
1812 }
1813
1814 static int
1815 do_stop(struct net_device *dev)
1816 {
1817     unsigned int ioaddr = dev->base_addr;
1818     local_info_t *lp = netdev_priv(dev);
1819     struct pcmcia_device *link = lp->p_dev;
1820
1821     dev_dbg(&link->dev, "do_stop(%p)\n", dev);
1822
1823     if (!link)
1824         return -ENODEV;
1825
1826     netif_stop_queue(dev);
1827
1828     SelectPage(0);
1829     PutByte(XIRCREG_CR, 0);  /* disable interrupts */
1830     SelectPage(0x01);
1831     PutByte(XIRCREG1_IMR0, 0x00); /* forbid all ints */
1832     SelectPage(4);
1833     PutByte(XIRCREG4_GPR1, 0);  /* clear bit 0: power down */
1834     SelectPage(0);
1835
1836     link->open--;
1837     return 0;
1838 }
1839
1840 static struct pcmcia_device_id xirc2ps_ids[] = {
1841         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0089, 0x110a),
1842         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0138, 0x110a),
1843         PCMCIA_PFC_DEVICE_PROD_ID13(0, "Xircom", "CEM28", 0x2e3ee845, 0x0ea978ea),
1844         PCMCIA_PFC_DEVICE_PROD_ID13(0, "Xircom", "CEM33", 0x2e3ee845, 0x80609023),
1845         PCMCIA_PFC_DEVICE_PROD_ID13(0, "Xircom", "CEM56", 0x2e3ee845, 0xa650c32a),
1846         PCMCIA_PFC_DEVICE_PROD_ID13(0, "Xircom", "REM10", 0x2e3ee845, 0x76df1d29),
1847         PCMCIA_PFC_DEVICE_PROD_ID13(0, "Xircom", "XEM5600", 0x2e3ee845, 0xf1403719),
1848         PCMCIA_PFC_DEVICE_PROD_ID12(0, "Xircom", "CreditCard Ethernet+Modem II", 0x2e3ee845, 0xeca401bf),
1849         PCMCIA_DEVICE_MANF_CARD(0x01bf, 0x010a),
1850         PCMCIA_DEVICE_PROD_ID13("Toshiba Information Systems", "TPCENET", 0x1b3b94fe, 0xf381c1a2),
1851         PCMCIA_DEVICE_PROD_ID13("Xircom", "CE3-10/100", 0x2e3ee845, 0x0ec0ac37),
1852         PCMCIA_DEVICE_PROD_ID13("Xircom", "PS-CE2-10", 0x2e3ee845, 0x947d9073),
1853         PCMCIA_DEVICE_PROD_ID13("Xircom", "R2E-100BTX", 0x2e3ee845, 0x2464a6e3),
1854         PCMCIA_DEVICE_PROD_ID13("Xircom", "RE-10", 0x2e3ee845, 0x3e08d609),
1855         PCMCIA_DEVICE_PROD_ID13("Xircom", "XE2000", 0x2e3ee845, 0xf7188e46),
1856         PCMCIA_DEVICE_PROD_ID12("Compaq", "Ethernet LAN Card", 0x54f7c49c, 0x9fd2f0a2),
1857         PCMCIA_DEVICE_PROD_ID12("Compaq", "Netelligent 10/100 PC Card", 0x54f7c49c, 0xefe96769),
1858         PCMCIA_DEVICE_PROD_ID12("Intel", "EtherExpress(TM) PRO/100 PC Card Mobile Adapter16", 0x816cc815, 0x174397db),
1859         PCMCIA_DEVICE_PROD_ID12("Toshiba", "10/100 Ethernet PC Card", 0x44a09d9c, 0xb44deecf),
1860         /* also matches CFE-10 cards! */
1861         /* PCMCIA_DEVICE_MANF_CARD(0x0105, 0x010a), */
1862         PCMCIA_DEVICE_NULL,
1863 };
1864 MODULE_DEVICE_TABLE(pcmcia, xirc2ps_ids);
1865
1866
1867 static struct pcmcia_driver xirc2ps_cs_driver = {
1868         .owner          = THIS_MODULE,
1869         .drv            = {
1870                 .name   = "xirc2ps_cs",
1871         },
1872         .probe          = xirc2ps_probe,
1873         .remove         = xirc2ps_detach,
1874         .id_table       = xirc2ps_ids,
1875         .suspend        = xirc2ps_suspend,
1876         .resume         = xirc2ps_resume,
1877 };
1878
1879 static int __init
1880 init_xirc2ps_cs(void)
1881 {
1882         return pcmcia_register_driver(&xirc2ps_cs_driver);
1883 }
1884
1885 static void __exit
1886 exit_xirc2ps_cs(void)
1887 {
1888         pcmcia_unregister_driver(&xirc2ps_cs_driver);
1889 }
1890
1891 module_init(init_xirc2ps_cs);
1892 module_exit(exit_xirc2ps_cs);
1893
1894 #ifndef MODULE
1895 static int __init setup_xirc2ps_cs(char *str)
1896 {
1897         /* if_port, full_duplex, do_sound, lockup_hack
1898          */
1899         int ints[10] = { -1 };
1900
1901         str = get_options(str, 9, ints);
1902
1903 #define MAYBE_SET(X,Y) if (ints[0] >= Y && ints[Y] != -1) { X = ints[Y]; }
1904         MAYBE_SET(if_port, 3);
1905         MAYBE_SET(full_duplex, 4);
1906         MAYBE_SET(do_sound, 5);
1907         MAYBE_SET(lockup_hack, 6);
1908 #undef  MAYBE_SET
1909
1910         return 1;
1911 }
1912
1913 __setup("xirc2ps_cs=", setup_xirc2ps_cs);
1914 #endif