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