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