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