xref: /linux/drivers/net/ethernet/fujitsu/fmvj18x_cs.c (revision 3932b9ca55b0be314a36d3e84faff3e823c081f5)
1 /*======================================================================
2     fmvj18x_cs.c 2.8 2002/03/23
3 
4     A fmvj18x (and its compatibles) PCMCIA client driver
5 
6     Contributed by Shingo Fujimoto, shingo@flab.fujitsu.co.jp
7 
8     TDK LAK-CD021 and CONTEC C-NET(PC)C support added by
9     Nobuhiro Katayama, kata-n@po.iijnet.or.jp
10 
11     The PCMCIA client code is based on code written by David Hinds.
12     Network code is based on the "FMV-18x driver" by Yutaka TAMIYA
13     but is actually largely Donald Becker's AT1700 driver, which
14     carries the following attribution:
15 
16     Written 1993-94 by Donald Becker.
17 
18     Copyright 1993 United States Government as represented by the
19     Director, National Security Agency.
20 
21     This software may be used and distributed according to the terms
22     of the GNU General Public License, incorporated herein by reference.
23 
24     The author may be reached as becker@scyld.com, or C/O
25     Scyld Computing Corporation
26     410 Severn Ave., Suite 210
27     Annapolis MD 21403
28 
29 ======================================================================*/
30 
31 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
32 
33 #define DRV_NAME	"fmvj18x_cs"
34 #define DRV_VERSION	"2.9"
35 
36 #include <linux/module.h>
37 #include <linux/kernel.h>
38 #include <linux/ptrace.h>
39 #include <linux/slab.h>
40 #include <linux/string.h>
41 #include <linux/timer.h>
42 #include <linux/interrupt.h>
43 #include <linux/in.h>
44 #include <linux/delay.h>
45 #include <linux/ethtool.h>
46 #include <linux/netdevice.h>
47 #include <linux/etherdevice.h>
48 #include <linux/skbuff.h>
49 #include <linux/if_arp.h>
50 #include <linux/ioport.h>
51 #include <linux/crc32.h>
52 
53 #include <pcmcia/cistpl.h>
54 #include <pcmcia/ciscode.h>
55 #include <pcmcia/ds.h>
56 
57 #include <asm/uaccess.h>
58 #include <asm/io.h>
59 
60 /*====================================================================*/
61 
62 /* Module parameters */
63 
64 MODULE_DESCRIPTION("fmvj18x and compatible PCMCIA ethernet driver");
65 MODULE_LICENSE("GPL");
66 
67 #define INT_MODULE_PARM(n, v) static int n = v; module_param(n, int, 0)
68 
69 /* SRAM configuration */
70 /* 0:4KB*2 TX buffer   else:8KB*2 TX buffer */
71 INT_MODULE_PARM(sram_config, 0);
72 
73 
74 /*====================================================================*/
75 /*
76     PCMCIA event handlers
77  */
78 static int fmvj18x_config(struct pcmcia_device *link);
79 static int fmvj18x_get_hwinfo(struct pcmcia_device *link, u_char *node_id);
80 static int fmvj18x_setup_mfc(struct pcmcia_device *link);
81 static void fmvj18x_release(struct pcmcia_device *link);
82 static void fmvj18x_detach(struct pcmcia_device *p_dev);
83 
84 /*
85     LAN controller(MBH86960A) specific routines
86  */
87 static int fjn_config(struct net_device *dev, struct ifmap *map);
88 static int fjn_open(struct net_device *dev);
89 static int fjn_close(struct net_device *dev);
90 static netdev_tx_t fjn_start_xmit(struct sk_buff *skb,
91 					struct net_device *dev);
92 static irqreturn_t fjn_interrupt(int irq, void *dev_id);
93 static void fjn_rx(struct net_device *dev);
94 static void fjn_reset(struct net_device *dev);
95 static void set_rx_mode(struct net_device *dev);
96 static void fjn_tx_timeout(struct net_device *dev);
97 static const struct ethtool_ops netdev_ethtool_ops;
98 
99 /*
100     card type
101  */
102 enum cardtype { MBH10302, MBH10304, TDK, CONTEC, LA501, UNGERMANN,
103 	       XXX10304, NEC, KME
104 };
105 
106 /*
107     driver specific data structure
108 */
109 struct local_info {
110 	struct pcmcia_device	*p_dev;
111     long open_time;
112     uint tx_started:1;
113     uint tx_queue;
114     u_short tx_queue_len;
115     enum cardtype cardtype;
116     u_short sent;
117     u_char __iomem *base;
118 };
119 
120 #define MC_FILTERBREAK 64
121 
122 /*====================================================================*/
123 /*
124     ioport offset from the base address
125  */
126 #define TX_STATUS               0 /* transmit status register */
127 #define RX_STATUS               1 /* receive status register */
128 #define TX_INTR                 2 /* transmit interrupt mask register */
129 #define RX_INTR                 3 /* receive interrupt mask register */
130 #define TX_MODE                 4 /* transmit mode register */
131 #define RX_MODE                 5 /* receive mode register */
132 #define CONFIG_0                6 /* configuration register 0 */
133 #define CONFIG_1                7 /* configuration register 1 */
134 
135 #define NODE_ID                 8 /* node ID register            (bank 0) */
136 #define MAR_ADR                 8 /* multicast address registers (bank 1) */
137 
138 #define DATAPORT                8 /* buffer mem port registers   (bank 2) */
139 #define TX_START               10 /* transmit start register */
140 #define COL_CTRL               11 /* 16 collision control register */
141 #define BMPR12                 12 /* reserved */
142 #define BMPR13                 13 /* reserved */
143 #define RX_SKIP                14 /* skip received packet register */
144 
145 #define LAN_CTRL               16 /* LAN card control register */
146 
147 #define MAC_ID               0x1a /* hardware address */
148 #define UNGERMANN_MAC_ID     0x18 /* UNGERMANN-BASS hardware address */
149 
150 /*
151     control bits
152  */
153 #define ENA_TMT_OK           0x80
154 #define ENA_TMT_REC          0x20
155 #define ENA_COL              0x04
156 #define ENA_16_COL           0x02
157 #define ENA_TBUS_ERR         0x01
158 
159 #define ENA_PKT_RDY          0x80
160 #define ENA_BUS_ERR          0x40
161 #define ENA_LEN_ERR          0x08
162 #define ENA_ALG_ERR          0x04
163 #define ENA_CRC_ERR          0x02
164 #define ENA_OVR_FLO          0x01
165 
166 /* flags */
167 #define F_TMT_RDY            0x80 /* can accept new packet */
168 #define F_NET_BSY            0x40 /* carrier is detected */
169 #define F_TMT_OK             0x20 /* send packet successfully */
170 #define F_SRT_PKT            0x10 /* short packet error */
171 #define F_COL_ERR            0x04 /* collision error */
172 #define F_16_COL             0x02 /* 16 collision error */
173 #define F_TBUS_ERR           0x01 /* bus read error */
174 
175 #define F_PKT_RDY            0x80 /* packet(s) in buffer */
176 #define F_BUS_ERR            0x40 /* bus read error */
177 #define F_LEN_ERR            0x08 /* short packet */
178 #define F_ALG_ERR            0x04 /* frame error */
179 #define F_CRC_ERR            0x02 /* CRC error */
180 #define F_OVR_FLO            0x01 /* overflow error */
181 
182 #define F_BUF_EMP            0x40 /* receive buffer is empty */
183 
184 #define F_SKP_PKT            0x05 /* drop packet in buffer */
185 
186 /* default bitmaps */
187 #define D_TX_INTR  ( ENA_TMT_OK )
188 #define D_RX_INTR  ( ENA_PKT_RDY | ENA_LEN_ERR \
189 		   | ENA_ALG_ERR | ENA_CRC_ERR | ENA_OVR_FLO )
190 #define TX_STAT_M  ( F_TMT_RDY )
191 #define RX_STAT_M  ( F_PKT_RDY | F_LEN_ERR \
192                    | F_ALG_ERR | F_CRC_ERR | F_OVR_FLO )
193 
194 /* commands */
195 #define D_TX_MODE            0x06 /* no tests, detect carrier */
196 #define ID_MATCHED           0x02 /* (RX_MODE) */
197 #define RECV_ALL             0x03 /* (RX_MODE) */
198 #define CONFIG0_DFL          0x5a /* 16bit bus, 4K x 2 Tx queues */
199 #define CONFIG0_DFL_1        0x5e /* 16bit bus, 8K x 2 Tx queues */
200 #define CONFIG0_RST          0xda /* Data Link Controller off (CONFIG_0) */
201 #define CONFIG0_RST_1        0xde /* Data Link Controller off (CONFIG_0) */
202 #define BANK_0               0xa0 /* bank 0 (CONFIG_1) */
203 #define BANK_1               0xa4 /* bank 1 (CONFIG_1) */
204 #define BANK_2               0xa8 /* bank 2 (CONFIG_1) */
205 #define CHIP_OFF             0x80 /* contrl chip power off (CONFIG_1) */
206 #define DO_TX                0x80 /* do transmit packet */
207 #define SEND_PKT             0x81 /* send a packet */
208 #define AUTO_MODE            0x07 /* Auto skip packet on 16 col detected */
209 #define MANU_MODE            0x03 /* Stop and skip packet on 16 col */
210 #define TDK_AUTO_MODE        0x47 /* Auto skip packet on 16 col detected */
211 #define TDK_MANU_MODE        0x43 /* Stop and skip packet on 16 col */
212 #define INTR_OFF             0x0d /* LAN controller ignores interrupts */
213 #define INTR_ON              0x1d /* LAN controller will catch interrupts */
214 
215 #define TX_TIMEOUT		((400*HZ)/1000)
216 
217 #define BANK_0U              0x20 /* bank 0 (CONFIG_1) */
218 #define BANK_1U              0x24 /* bank 1 (CONFIG_1) */
219 #define BANK_2U              0x28 /* bank 2 (CONFIG_1) */
220 
221 static const struct net_device_ops fjn_netdev_ops = {
222 	.ndo_open 		= fjn_open,
223 	.ndo_stop		= fjn_close,
224 	.ndo_start_xmit 	= fjn_start_xmit,
225 	.ndo_tx_timeout 	= fjn_tx_timeout,
226 	.ndo_set_config 	= fjn_config,
227 	.ndo_set_rx_mode	= set_rx_mode,
228 	.ndo_change_mtu		= eth_change_mtu,
229 	.ndo_set_mac_address 	= eth_mac_addr,
230 	.ndo_validate_addr	= eth_validate_addr,
231 };
232 
233 static int fmvj18x_probe(struct pcmcia_device *link)
234 {
235     struct local_info *lp;
236     struct net_device *dev;
237 
238     dev_dbg(&link->dev, "fmvj18x_attach()\n");
239 
240     /* Make up a FMVJ18x specific data structure */
241     dev = alloc_etherdev(sizeof(struct local_info));
242     if (!dev)
243 	return -ENOMEM;
244     lp = netdev_priv(dev);
245     link->priv = dev;
246     lp->p_dev = link;
247     lp->base = NULL;
248 
249     /* The io structure describes IO port mapping */
250     link->resource[0]->end = 32;
251     link->resource[0]->flags |= IO_DATA_PATH_WIDTH_AUTO;
252 
253     /* General socket configuration */
254     link->config_flags |= CONF_ENABLE_IRQ;
255 
256     dev->netdev_ops = &fjn_netdev_ops;
257     dev->watchdog_timeo = TX_TIMEOUT;
258 
259     dev->ethtool_ops = &netdev_ethtool_ops;
260 
261     return fmvj18x_config(link);
262 } /* fmvj18x_attach */
263 
264 /*====================================================================*/
265 
266 static void fmvj18x_detach(struct pcmcia_device *link)
267 {
268     struct net_device *dev = link->priv;
269 
270     dev_dbg(&link->dev, "fmvj18x_detach\n");
271 
272     unregister_netdev(dev);
273 
274     fmvj18x_release(link);
275 
276     free_netdev(dev);
277 } /* fmvj18x_detach */
278 
279 /*====================================================================*/
280 
281 static int mfc_try_io_port(struct pcmcia_device *link)
282 {
283     int i, ret;
284     static const unsigned int serial_base[5] =
285 	{ 0x3f8, 0x2f8, 0x3e8, 0x2e8, 0x0 };
286 
287     for (i = 0; i < 5; i++) {
288 	link->resource[1]->start = serial_base[i];
289 	link->resource[1]->flags |= IO_DATA_PATH_WIDTH_8;
290 	if (link->resource[1]->start == 0) {
291 	    link->resource[1]->end = 0;
292 	    pr_notice("out of resource for serial\n");
293 	}
294 	ret = pcmcia_request_io(link);
295 	if (ret == 0)
296 		return ret;
297     }
298     return ret;
299 }
300 
301 static int ungermann_try_io_port(struct pcmcia_device *link)
302 {
303     int ret;
304     unsigned int ioaddr;
305     /*
306 	Ungermann-Bass Access/CARD accepts 0x300,0x320,0x340,0x360
307 	0x380,0x3c0 only for ioport.
308     */
309     for (ioaddr = 0x300; ioaddr < 0x3e0; ioaddr += 0x20) {
310 	link->resource[0]->start = ioaddr;
311 	ret = pcmcia_request_io(link);
312 	if (ret == 0) {
313 	    /* calculate ConfigIndex value */
314 	    link->config_index =
315 		((link->resource[0]->start & 0x0f0) >> 3) | 0x22;
316 	    return ret;
317 	}
318     }
319     return ret;	/* RequestIO failed */
320 }
321 
322 static int fmvj18x_ioprobe(struct pcmcia_device *p_dev, void *priv_data)
323 {
324 	return 0; /* strange, but that's what the code did already before... */
325 }
326 
327 static int fmvj18x_config(struct pcmcia_device *link)
328 {
329     struct net_device *dev = link->priv;
330     struct local_info *lp = netdev_priv(dev);
331     int i, ret;
332     unsigned int ioaddr;
333     enum cardtype cardtype;
334     char *card_name = "unknown";
335     u8 *buf;
336     size_t len;
337     u_char buggybuf[32];
338 
339     dev_dbg(&link->dev, "fmvj18x_config\n");
340 
341     link->io_lines = 5;
342 
343     len = pcmcia_get_tuple(link, CISTPL_FUNCE, &buf);
344     kfree(buf);
345 
346     if (len) {
347 	/* Yes, I have CISTPL_FUNCE. Let's check CISTPL_MANFID */
348 	ret = pcmcia_loop_config(link, fmvj18x_ioprobe, NULL);
349 	if (ret != 0)
350 		goto failed;
351 
352 	switch (link->manf_id) {
353 	case MANFID_TDK:
354 	    cardtype = TDK;
355 	    if (link->card_id == PRODID_TDK_GN3410 ||
356 		link->card_id == PRODID_TDK_NP9610 ||
357 		link->card_id == PRODID_TDK_MN3200) {
358 		/* MultiFunction Card */
359 		link->config_base = 0x800;
360 		link->config_index = 0x47;
361 		link->resource[1]->end = 8;
362 	    }
363 	    break;
364 	case MANFID_NEC:
365 	    cardtype = NEC; /* MultiFunction Card */
366 	    link->config_base = 0x800;
367 	    link->config_index = 0x47;
368 	    link->resource[1]->end = 8;
369 	    break;
370 	case MANFID_KME:
371 	    cardtype = KME; /* MultiFunction Card */
372 	    link->config_base = 0x800;
373 	    link->config_index = 0x47;
374 	    link->resource[1]->end = 8;
375 	    break;
376 	case MANFID_CONTEC:
377 	    cardtype = CONTEC;
378 	    break;
379 	case MANFID_FUJITSU:
380 	    if (link->config_base == 0x0fe0)
381 		cardtype = MBH10302;
382 	    else if (link->card_id == PRODID_FUJITSU_MBH10302)
383                 /* RATOC REX-5588/9822/4886's PRODID are 0004(=MBH10302),
384                    but these are MBH10304 based card. */
385 		cardtype = MBH10304;
386 	    else if (link->card_id == PRODID_FUJITSU_MBH10304)
387 		cardtype = MBH10304;
388 	    else
389 		cardtype = LA501;
390 	    break;
391 	default:
392 	    cardtype = MBH10304;
393 	}
394     } else {
395 	/* old type card */
396 	switch (link->manf_id) {
397 	case MANFID_FUJITSU:
398 	    if (link->card_id == PRODID_FUJITSU_MBH10304) {
399 		cardtype = XXX10304;    /* MBH10304 with buggy CIS */
400 		link->config_index = 0x20;
401 	    } else {
402 		cardtype = MBH10302;    /* NextCom NC5310, etc. */
403 		link->config_index = 1;
404 	    }
405 	    break;
406 	case MANFID_UNGERMANN:
407 	    cardtype = UNGERMANN;
408 	    break;
409 	default:
410 	    cardtype = MBH10302;
411 	    link->config_index = 1;
412 	}
413     }
414 
415     if (link->resource[1]->end != 0) {
416 	ret = mfc_try_io_port(link);
417 	if (ret != 0) goto failed;
418     } else if (cardtype == UNGERMANN) {
419 	ret = ungermann_try_io_port(link);
420 	if (ret != 0) goto failed;
421     } else {
422 	    ret = pcmcia_request_io(link);
423 	    if (ret)
424 		    goto failed;
425     }
426     ret = pcmcia_request_irq(link, fjn_interrupt);
427     if (ret)
428 	    goto failed;
429     ret = pcmcia_enable_device(link);
430     if (ret)
431 	    goto failed;
432 
433     dev->irq = link->irq;
434     dev->base_addr = link->resource[0]->start;
435 
436     if (resource_size(link->resource[1]) != 0) {
437 	ret = fmvj18x_setup_mfc(link);
438 	if (ret != 0) goto failed;
439     }
440 
441     ioaddr = dev->base_addr;
442 
443     /* Reset controller */
444     if (sram_config == 0)
445 	outb(CONFIG0_RST, ioaddr + CONFIG_0);
446     else
447 	outb(CONFIG0_RST_1, ioaddr + CONFIG_0);
448 
449     /* Power On chip and select bank 0 */
450     if (cardtype == MBH10302)
451 	outb(BANK_0, ioaddr + CONFIG_1);
452     else
453 	outb(BANK_0U, ioaddr + CONFIG_1);
454 
455     /* Set hardware address */
456     switch (cardtype) {
457     case MBH10304:
458     case TDK:
459     case LA501:
460     case CONTEC:
461     case NEC:
462     case KME:
463 	if (cardtype == MBH10304) {
464 	    card_name = "FMV-J182";
465 
466 	    len = pcmcia_get_tuple(link, CISTPL_FUNCE, &buf);
467 	    if (len < 11) {
468 		    kfree(buf);
469 		    goto failed;
470 	    }
471 	    /* Read MACID from CIS */
472 	    for (i = 5; i < 11; i++)
473 		    dev->dev_addr[i] = buf[i];
474 	    kfree(buf);
475 	} else {
476 	    if (pcmcia_get_mac_from_cis(link, dev))
477 		goto failed;
478 	    if( cardtype == TDK ) {
479 		card_name = "TDK LAK-CD021";
480 	    } else if( cardtype == LA501 ) {
481 		card_name = "LA501";
482 	    } else if( cardtype == NEC ) {
483 		card_name = "PK-UG-J001";
484 	    } else if( cardtype == KME ) {
485 		card_name = "Panasonic";
486 	    } else {
487 		card_name = "C-NET(PC)C";
488 	    }
489 	}
490 	break;
491     case UNGERMANN:
492 	/* Read MACID from register */
493 	for (i = 0; i < 6; i++)
494 	    dev->dev_addr[i] = inb(ioaddr + UNGERMANN_MAC_ID + i);
495 	card_name = "Access/CARD";
496 	break;
497     case XXX10304:
498 	/* Read MACID from Buggy CIS */
499 	if (fmvj18x_get_hwinfo(link, buggybuf) == -1) {
500 	    pr_notice("unable to read hardware net address\n");
501 	    goto failed;
502 	}
503 	for (i = 0 ; i < 6; i++) {
504 	    dev->dev_addr[i] = buggybuf[i];
505 	}
506 	card_name = "FMV-J182";
507 	break;
508     case MBH10302:
509     default:
510 	/* Read MACID from register */
511 	for (i = 0; i < 6; i++)
512 	    dev->dev_addr[i] = inb(ioaddr + MAC_ID + i);
513 	card_name = "FMV-J181";
514 	break;
515     }
516 
517     lp->cardtype = cardtype;
518     SET_NETDEV_DEV(dev, &link->dev);
519 
520     if (register_netdev(dev) != 0) {
521 	pr_notice("register_netdev() failed\n");
522 	goto failed;
523     }
524 
525     /* print current configuration */
526     netdev_info(dev, "%s, sram %s, port %#3lx, irq %d, hw_addr %pM\n",
527 		card_name, sram_config == 0 ? "4K TX*2" : "8K TX*2",
528 		dev->base_addr, dev->irq, dev->dev_addr);
529 
530     return 0;
531 
532 failed:
533     fmvj18x_release(link);
534     return -ENODEV;
535 } /* fmvj18x_config */
536 /*====================================================================*/
537 
538 static int fmvj18x_get_hwinfo(struct pcmcia_device *link, u_char *node_id)
539 {
540     u_char __iomem *base;
541     int i, j;
542 
543     /* Allocate a small memory window */
544     link->resource[2]->flags |= WIN_DATA_WIDTH_8|WIN_MEMORY_TYPE_AM|WIN_ENABLE;
545     link->resource[2]->start = 0; link->resource[2]->end = 0;
546     i = pcmcia_request_window(link, link->resource[2], 0);
547     if (i != 0)
548 	return -1;
549 
550     base = ioremap(link->resource[2]->start, resource_size(link->resource[2]));
551     pcmcia_map_mem_page(link, link->resource[2], 0);
552 
553     /*
554      *  MBH10304 CISTPL_FUNCE_LAN_NODE_ID format
555      *  22 0d xx xx xx 04 06 yy yy yy yy yy yy ff
556      *  'xx' is garbage.
557      *  'yy' is MAC address.
558     */
559     for (i = 0; i < 0x200; i++) {
560 	if (readb(base+i*2) == 0x22) {
561 		if (readb(base+(i-1)*2) == 0xff &&
562 		    readb(base+(i+5)*2) == 0x04 &&
563 		    readb(base+(i+6)*2) == 0x06 &&
564 		    readb(base+(i+13)*2) == 0xff)
565 			break;
566 	}
567     }
568 
569     if (i != 0x200) {
570 	for (j = 0 ; j < 6; j++,i++) {
571 	    node_id[j] = readb(base+(i+7)*2);
572 	}
573     }
574 
575     iounmap(base);
576     j = pcmcia_release_window(link, link->resource[2]);
577     return (i != 0x200) ? 0 : -1;
578 
579 } /* fmvj18x_get_hwinfo */
580 /*====================================================================*/
581 
582 static int fmvj18x_setup_mfc(struct pcmcia_device *link)
583 {
584     int i;
585     struct net_device *dev = link->priv;
586     unsigned int ioaddr;
587     struct local_info *lp = netdev_priv(dev);
588 
589     /* Allocate a small memory window */
590     link->resource[3]->flags = WIN_DATA_WIDTH_8|WIN_MEMORY_TYPE_AM|WIN_ENABLE;
591     link->resource[3]->start = link->resource[3]->end = 0;
592     i = pcmcia_request_window(link, link->resource[3], 0);
593     if (i != 0)
594 	return -1;
595 
596     lp->base = ioremap(link->resource[3]->start,
597 		       resource_size(link->resource[3]));
598     if (lp->base == NULL) {
599 	netdev_notice(dev, "ioremap failed\n");
600 	return -1;
601     }
602 
603     i = pcmcia_map_mem_page(link, link->resource[3], 0);
604     if (i != 0) {
605 	iounmap(lp->base);
606 	lp->base = NULL;
607 	return -1;
608     }
609 
610     ioaddr = dev->base_addr;
611     writeb(0x47, lp->base+0x800);	/* Config Option Register of LAN */
612     writeb(0x0,  lp->base+0x802);	/* Config and Status Register */
613 
614     writeb(ioaddr & 0xff, lp->base+0x80a);	  /* I/O Base(Low) of LAN */
615     writeb((ioaddr >> 8) & 0xff, lp->base+0x80c); /* I/O Base(High) of LAN */
616 
617     writeb(0x45, lp->base+0x820);	/* Config Option Register of Modem */
618     writeb(0x8,  lp->base+0x822);	/* Config and Status Register */
619 
620     return 0;
621 
622 }
623 /*====================================================================*/
624 
625 static void fmvj18x_release(struct pcmcia_device *link)
626 {
627 
628     struct net_device *dev = link->priv;
629     struct local_info *lp = netdev_priv(dev);
630     u_char __iomem *tmp;
631 
632     dev_dbg(&link->dev, "fmvj18x_release\n");
633 
634     if (lp->base != NULL) {
635 	tmp = lp->base;
636 	lp->base = NULL;    /* set NULL before iounmap */
637 	iounmap(tmp);
638     }
639 
640     pcmcia_disable_device(link);
641 
642 }
643 
644 static int fmvj18x_suspend(struct pcmcia_device *link)
645 {
646 	struct net_device *dev = link->priv;
647 
648 	if (link->open)
649 		netif_device_detach(dev);
650 
651 	return 0;
652 }
653 
654 static int fmvj18x_resume(struct pcmcia_device *link)
655 {
656 	struct net_device *dev = link->priv;
657 
658 	if (link->open) {
659 		fjn_reset(dev);
660 		netif_device_attach(dev);
661 	}
662 
663 	return 0;
664 }
665 
666 /*====================================================================*/
667 
668 static const struct pcmcia_device_id fmvj18x_ids[] = {
669 	PCMCIA_DEVICE_MANF_CARD(0x0004, 0x0004),
670 	PCMCIA_DEVICE_PROD_ID12("EAGLE Technology", "NE200 ETHERNET LAN MBH10302 04", 0x528c88c4, 0x74f91e59),
671 	PCMCIA_DEVICE_PROD_ID12("Eiger Labs,Inc", "EPX-10BT PC Card Ethernet 10BT", 0x53af556e, 0x877f9922),
672 	PCMCIA_DEVICE_PROD_ID12("Eiger labs,Inc.", "EPX-10BT PC Card Ethernet 10BT", 0xf47e6c66, 0x877f9922),
673 	PCMCIA_DEVICE_PROD_ID12("FUJITSU", "LAN Card(FMV-J182)", 0x6ee5a3d8, 0x5baf31db),
674 	PCMCIA_DEVICE_PROD_ID12("FUJITSU", "MBH10308", 0x6ee5a3d8, 0x3f04875e),
675 	PCMCIA_DEVICE_PROD_ID12("FUJITSU TOWA", "LA501", 0xb8451188, 0x12939ba2),
676 	PCMCIA_DEVICE_PROD_ID12("HITACHI", "HT-4840-11", 0xf4f43949, 0x773910f4),
677 	PCMCIA_DEVICE_PROD_ID12("NextComK.K.", "NC5310B Ver1.0       ", 0x8cef4d3a, 0x075fc7b6),
678 	PCMCIA_DEVICE_PROD_ID12("NextComK.K.", "NC5310 Ver1.0        ", 0x8cef4d3a, 0xbccf43e6),
679 	PCMCIA_DEVICE_PROD_ID12("RATOC System Inc.", "10BASE_T CARD R280", 0x85c10e17, 0xd9413666),
680 	PCMCIA_DEVICE_PROD_ID12("TDK", "LAC-CD02x", 0x1eae9475, 0x8fa0ee70),
681 	PCMCIA_DEVICE_PROD_ID12("TDK", "LAC-CF010", 0x1eae9475, 0x7683bc9a),
682 	PCMCIA_DEVICE_PROD_ID1("CONTEC Co.,Ltd.", 0x58d8fee2),
683 	PCMCIA_DEVICE_PROD_ID1("PCMCIA LAN MBH10304  ES", 0x2599f454),
684 	PCMCIA_DEVICE_PROD_ID1("PCMCIA MBH10302", 0x8f4005da),
685 	PCMCIA_DEVICE_PROD_ID1("UBKK,V2.0", 0x90888080),
686 	PCMCIA_PFC_DEVICE_PROD_ID12(0, "TDK", "GlobalNetworker 3410/3412", 0x1eae9475, 0xd9a93bed),
687 	PCMCIA_PFC_DEVICE_PROD_ID12(0, "NEC", "PK-UG-J001" ,0x18df0ba0 ,0x831b1064),
688 	PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0105, 0x0d0a),
689 	PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0105, 0x0e0a),
690 	PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0032, 0x0e01),
691 	PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0032, 0x0a05),
692 	PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0032, 0x0b05),
693 	PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0032, 0x1101),
694 	PCMCIA_DEVICE_NULL,
695 };
696 MODULE_DEVICE_TABLE(pcmcia, fmvj18x_ids);
697 
698 static struct pcmcia_driver fmvj18x_cs_driver = {
699 	.owner		= THIS_MODULE,
700 	.name		= "fmvj18x_cs",
701 	.probe		= fmvj18x_probe,
702 	.remove		= fmvj18x_detach,
703 	.id_table       = fmvj18x_ids,
704 	.suspend	= fmvj18x_suspend,
705 	.resume		= fmvj18x_resume,
706 };
707 module_pcmcia_driver(fmvj18x_cs_driver);
708 
709 /*====================================================================*/
710 
711 static irqreturn_t fjn_interrupt(int dummy, void *dev_id)
712 {
713     struct net_device *dev = dev_id;
714     struct local_info *lp = netdev_priv(dev);
715     unsigned int ioaddr;
716     unsigned short tx_stat, rx_stat;
717 
718     ioaddr = dev->base_addr;
719 
720     /* avoid multiple interrupts */
721     outw(0x0000, ioaddr + TX_INTR);
722 
723     /* wait for a while */
724     udelay(1);
725 
726     /* get status */
727     tx_stat = inb(ioaddr + TX_STATUS);
728     rx_stat = inb(ioaddr + RX_STATUS);
729 
730     /* clear status */
731     outb(tx_stat, ioaddr + TX_STATUS);
732     outb(rx_stat, ioaddr + RX_STATUS);
733 
734     pr_debug("%s: interrupt, rx_status %02x.\n", dev->name, rx_stat);
735     pr_debug("               tx_status %02x.\n", tx_stat);
736 
737     if (rx_stat || (inb(ioaddr + RX_MODE) & F_BUF_EMP) == 0) {
738 	/* there is packet(s) in rx buffer */
739 	fjn_rx(dev);
740     }
741     if (tx_stat & F_TMT_RDY) {
742 	dev->stats.tx_packets += lp->sent ;
743         lp->sent = 0 ;
744 	if (lp->tx_queue) {
745 	    outb(DO_TX | lp->tx_queue, ioaddr + TX_START);
746 	    lp->sent = lp->tx_queue ;
747 	    lp->tx_queue = 0;
748 	    lp->tx_queue_len = 0;
749 	    dev->trans_start = jiffies;
750 	} else {
751 	    lp->tx_started = 0;
752 	}
753 	netif_wake_queue(dev);
754     }
755     pr_debug("%s: exiting interrupt,\n", dev->name);
756     pr_debug("    tx_status %02x, rx_status %02x.\n", tx_stat, rx_stat);
757 
758     outb(D_TX_INTR, ioaddr + TX_INTR);
759     outb(D_RX_INTR, ioaddr + RX_INTR);
760 
761     if (lp->base != NULL) {
762 	/* Ack interrupt for multifunction card */
763 	writeb(0x01, lp->base+0x802);
764 	writeb(0x09, lp->base+0x822);
765     }
766 
767     return IRQ_HANDLED;
768 
769 } /* fjn_interrupt */
770 
771 /*====================================================================*/
772 
773 static void fjn_tx_timeout(struct net_device *dev)
774 {
775     struct local_info *lp = netdev_priv(dev);
776     unsigned int ioaddr = dev->base_addr;
777 
778     netdev_notice(dev, "transmit timed out with status %04x, %s?\n",
779 		  htons(inw(ioaddr + TX_STATUS)),
780 		  inb(ioaddr + TX_STATUS) & F_TMT_RDY
781 		  ? "IRQ conflict" : "network cable problem");
782     netdev_notice(dev, "timeout registers: %04x %04x %04x "
783 		  "%04x %04x %04x %04x %04x.\n",
784 		  htons(inw(ioaddr + 0)), htons(inw(ioaddr + 2)),
785 		  htons(inw(ioaddr + 4)), htons(inw(ioaddr + 6)),
786 		  htons(inw(ioaddr + 8)), htons(inw(ioaddr + 10)),
787 		  htons(inw(ioaddr + 12)), htons(inw(ioaddr + 14)));
788     dev->stats.tx_errors++;
789     /* ToDo: We should try to restart the adaptor... */
790     local_irq_disable();
791     fjn_reset(dev);
792 
793     lp->tx_started = 0;
794     lp->tx_queue = 0;
795     lp->tx_queue_len = 0;
796     lp->sent = 0;
797     lp->open_time = jiffies;
798     local_irq_enable();
799     netif_wake_queue(dev);
800 }
801 
802 static netdev_tx_t fjn_start_xmit(struct sk_buff *skb,
803 					struct net_device *dev)
804 {
805     struct local_info *lp = netdev_priv(dev);
806     unsigned int ioaddr = dev->base_addr;
807     short length = skb->len;
808 
809     if (length < ETH_ZLEN)
810     {
811     	if (skb_padto(skb, ETH_ZLEN))
812     		return NETDEV_TX_OK;
813     	length = ETH_ZLEN;
814     }
815 
816     netif_stop_queue(dev);
817 
818     {
819 	unsigned char *buf = skb->data;
820 
821 	if (length > ETH_FRAME_LEN) {
822 	    netdev_notice(dev, "Attempting to send a large packet (%d bytes)\n",
823 			  length);
824 	    return NETDEV_TX_BUSY;
825 	}
826 
827 	netdev_dbg(dev, "Transmitting a packet of length %lu\n",
828 		   (unsigned long)skb->len);
829 	dev->stats.tx_bytes += skb->len;
830 
831 	/* Disable both interrupts. */
832 	outw(0x0000, ioaddr + TX_INTR);
833 
834 	/* wait for a while */
835 	udelay(1);
836 
837 	outw(length, ioaddr + DATAPORT);
838 	outsw(ioaddr + DATAPORT, buf, (length + 1) >> 1);
839 
840 	lp->tx_queue++;
841 	lp->tx_queue_len += ((length+3) & ~1);
842 
843 	if (lp->tx_started == 0) {
844 	    /* If the Tx is idle, always trigger a transmit. */
845 	    outb(DO_TX | lp->tx_queue, ioaddr + TX_START);
846 	    lp->sent = lp->tx_queue ;
847 	    lp->tx_queue = 0;
848 	    lp->tx_queue_len = 0;
849 	    lp->tx_started = 1;
850 	    netif_start_queue(dev);
851 	} else {
852 	    if( sram_config == 0 ) {
853 		if (lp->tx_queue_len < (4096 - (ETH_FRAME_LEN +2)) )
854 		    /* Yes, there is room for one more packet. */
855 		    netif_start_queue(dev);
856 	    } else {
857 		if (lp->tx_queue_len < (8192 - (ETH_FRAME_LEN +2)) &&
858 						lp->tx_queue < 127 )
859 		    /* Yes, there is room for one more packet. */
860 		    netif_start_queue(dev);
861 	    }
862 	}
863 
864 	/* Re-enable interrupts */
865 	outb(D_TX_INTR, ioaddr + TX_INTR);
866 	outb(D_RX_INTR, ioaddr + RX_INTR);
867     }
868     dev_kfree_skb (skb);
869 
870     return NETDEV_TX_OK;
871 } /* fjn_start_xmit */
872 
873 /*====================================================================*/
874 
875 static void fjn_reset(struct net_device *dev)
876 {
877     struct local_info *lp = netdev_priv(dev);
878     unsigned int ioaddr = dev->base_addr;
879     int i;
880 
881     netdev_dbg(dev, "fjn_reset() called\n");
882 
883     /* Reset controller */
884     if( sram_config == 0 )
885 	outb(CONFIG0_RST, ioaddr + CONFIG_0);
886     else
887 	outb(CONFIG0_RST_1, ioaddr + CONFIG_0);
888 
889     /* Power On chip and select bank 0 */
890     if (lp->cardtype == MBH10302)
891 	outb(BANK_0, ioaddr + CONFIG_1);
892     else
893 	outb(BANK_0U, ioaddr + CONFIG_1);
894 
895     /* Set Tx modes */
896     outb(D_TX_MODE, ioaddr + TX_MODE);
897     /* set Rx modes */
898     outb(ID_MATCHED, ioaddr + RX_MODE);
899 
900     /* Set hardware address */
901     for (i = 0; i < 6; i++)
902         outb(dev->dev_addr[i], ioaddr + NODE_ID + i);
903 
904     /* (re)initialize the multicast table */
905     set_rx_mode(dev);
906 
907     /* Switch to bank 2 (runtime mode) */
908     if (lp->cardtype == MBH10302)
909 	outb(BANK_2, ioaddr + CONFIG_1);
910     else
911 	outb(BANK_2U, ioaddr + CONFIG_1);
912 
913     /* set 16col ctrl bits */
914     if( lp->cardtype == TDK || lp->cardtype == CONTEC)
915         outb(TDK_AUTO_MODE, ioaddr + COL_CTRL);
916     else
917         outb(AUTO_MODE, ioaddr + COL_CTRL);
918 
919     /* clear Reserved Regs */
920     outb(0x00, ioaddr + BMPR12);
921     outb(0x00, ioaddr + BMPR13);
922 
923     /* reset Skip packet reg. */
924     outb(0x01, ioaddr + RX_SKIP);
925 
926     /* Enable Tx and Rx */
927     if( sram_config == 0 )
928 	outb(CONFIG0_DFL, ioaddr + CONFIG_0);
929     else
930 	outb(CONFIG0_DFL_1, ioaddr + CONFIG_0);
931 
932     /* Init receive pointer ? */
933     inw(ioaddr + DATAPORT);
934     inw(ioaddr + DATAPORT);
935 
936     /* Clear all status */
937     outb(0xff, ioaddr + TX_STATUS);
938     outb(0xff, ioaddr + RX_STATUS);
939 
940     if (lp->cardtype == MBH10302)
941 	outb(INTR_OFF, ioaddr + LAN_CTRL);
942 
943     /* Turn on Rx interrupts */
944     outb(D_TX_INTR, ioaddr + TX_INTR);
945     outb(D_RX_INTR, ioaddr + RX_INTR);
946 
947     /* Turn on interrupts from LAN card controller */
948     if (lp->cardtype == MBH10302)
949 	outb(INTR_ON, ioaddr + LAN_CTRL);
950 } /* fjn_reset */
951 
952 /*====================================================================*/
953 
954 static void fjn_rx(struct net_device *dev)
955 {
956     unsigned int ioaddr = dev->base_addr;
957     int boguscount = 10;	/* 5 -> 10: by agy 19940922 */
958 
959     pr_debug("%s: in rx_packet(), rx_status %02x.\n",
960 	  dev->name, inb(ioaddr + RX_STATUS));
961 
962     while ((inb(ioaddr + RX_MODE) & F_BUF_EMP) == 0) {
963 	u_short status = inw(ioaddr + DATAPORT);
964 
965 	netdev_dbg(dev, "Rxing packet mode %02x status %04x.\n",
966 		   inb(ioaddr + RX_MODE), status);
967 #ifndef final_version
968 	if (status == 0) {
969 	    outb(F_SKP_PKT, ioaddr + RX_SKIP);
970 	    break;
971 	}
972 #endif
973 	if ((status & 0xF0) != 0x20) {	/* There was an error. */
974 	    dev->stats.rx_errors++;
975 	    if (status & F_LEN_ERR) dev->stats.rx_length_errors++;
976 	    if (status & F_ALG_ERR) dev->stats.rx_frame_errors++;
977 	    if (status & F_CRC_ERR) dev->stats.rx_crc_errors++;
978 	    if (status & F_OVR_FLO) dev->stats.rx_over_errors++;
979 	} else {
980 	    u_short pkt_len = inw(ioaddr + DATAPORT);
981 	    /* Malloc up new buffer. */
982 	    struct sk_buff *skb;
983 
984 	    if (pkt_len > 1550) {
985 		netdev_notice(dev, "The FMV-18x claimed a very large packet, size %d\n",
986 			      pkt_len);
987 		outb(F_SKP_PKT, ioaddr + RX_SKIP);
988 		dev->stats.rx_errors++;
989 		break;
990 	    }
991 	    skb = netdev_alloc_skb(dev, pkt_len + 2);
992 	    if (skb == NULL) {
993 		outb(F_SKP_PKT, ioaddr + RX_SKIP);
994 		dev->stats.rx_dropped++;
995 		break;
996 	    }
997 
998 	    skb_reserve(skb, 2);
999 	    insw(ioaddr + DATAPORT, skb_put(skb, pkt_len),
1000 		 (pkt_len + 1) >> 1);
1001 	    skb->protocol = eth_type_trans(skb, dev);
1002 
1003 	    {
1004 		int i;
1005 		pr_debug("%s: Rxed packet of length %d: ",
1006 			dev->name, pkt_len);
1007 		for (i = 0; i < 14; i++)
1008 			pr_debug(" %02x", skb->data[i]);
1009 		pr_debug(".\n");
1010 	    }
1011 
1012 	    netif_rx(skb);
1013 	    dev->stats.rx_packets++;
1014 	    dev->stats.rx_bytes += pkt_len;
1015 	}
1016 	if (--boguscount <= 0)
1017 	    break;
1018     }
1019 
1020     /* If any worth-while packets have been received, dev_rint()
1021 	   has done a netif_wake_queue() for us and will work on them
1022 	   when we get to the bottom-half routine. */
1023 /*
1024     if (lp->cardtype != TDK) {
1025 	int i;
1026 	for (i = 0; i < 20; i++) {
1027 	    if ((inb(ioaddr + RX_MODE) & F_BUF_EMP) == F_BUF_EMP)
1028 		break;
1029 	    (void)inw(ioaddr + DATAPORT);  /+ dummy status read +/
1030 	    outb(F_SKP_PKT, ioaddr + RX_SKIP);
1031 	}
1032 
1033 	if (i > 0)
1034 	    pr_debug("%s: Exint Rx packet with mode %02x after "
1035 		  "%d ticks.\n", dev->name, inb(ioaddr + RX_MODE), i);
1036     }
1037 */
1038 } /* fjn_rx */
1039 
1040 /*====================================================================*/
1041 
1042 static void netdev_get_drvinfo(struct net_device *dev,
1043 			       struct ethtool_drvinfo *info)
1044 {
1045 	strlcpy(info->driver, DRV_NAME, sizeof(info->driver));
1046 	strlcpy(info->version, DRV_VERSION, sizeof(info->version));
1047 	snprintf(info->bus_info, sizeof(info->bus_info),
1048 		"PCMCIA 0x%lx", dev->base_addr);
1049 }
1050 
1051 static const struct ethtool_ops netdev_ethtool_ops = {
1052 	.get_drvinfo		= netdev_get_drvinfo,
1053 };
1054 
1055 static int fjn_config(struct net_device *dev, struct ifmap *map){
1056     return 0;
1057 }
1058 
1059 static int fjn_open(struct net_device *dev)
1060 {
1061     struct local_info *lp = netdev_priv(dev);
1062     struct pcmcia_device *link = lp->p_dev;
1063 
1064     pr_debug("fjn_open('%s').\n", dev->name);
1065 
1066     if (!pcmcia_dev_present(link))
1067 	return -ENODEV;
1068 
1069     link->open++;
1070 
1071     fjn_reset(dev);
1072 
1073     lp->tx_started = 0;
1074     lp->tx_queue = 0;
1075     lp->tx_queue_len = 0;
1076     lp->open_time = jiffies;
1077     netif_start_queue(dev);
1078 
1079     return 0;
1080 } /* fjn_open */
1081 
1082 /*====================================================================*/
1083 
1084 static int fjn_close(struct net_device *dev)
1085 {
1086     struct local_info *lp = netdev_priv(dev);
1087     struct pcmcia_device *link = lp->p_dev;
1088     unsigned int ioaddr = dev->base_addr;
1089 
1090     pr_debug("fjn_close('%s').\n", dev->name);
1091 
1092     lp->open_time = 0;
1093     netif_stop_queue(dev);
1094 
1095     /* Set configuration register 0 to disable Tx and Rx. */
1096     if( sram_config == 0 )
1097 	outb(CONFIG0_RST ,ioaddr + CONFIG_0);
1098     else
1099 	outb(CONFIG0_RST_1 ,ioaddr + CONFIG_0);
1100 
1101     /* Update the statistics -- ToDo. */
1102 
1103     /* Power-down the chip.  Green, green, green! */
1104     outb(CHIP_OFF ,ioaddr + CONFIG_1);
1105 
1106     /* Set the ethernet adaptor disable IRQ */
1107     if (lp->cardtype == MBH10302)
1108 	outb(INTR_OFF, ioaddr + LAN_CTRL);
1109 
1110     link->open--;
1111 
1112     return 0;
1113 } /* fjn_close */
1114 
1115 /*====================================================================*/
1116 
1117 /*
1118   Set the multicast/promiscuous mode for this adaptor.
1119 */
1120 
1121 static void set_rx_mode(struct net_device *dev)
1122 {
1123     unsigned int ioaddr = dev->base_addr;
1124     u_char mc_filter[8];		 /* Multicast hash filter */
1125     u_long flags;
1126     int i;
1127 
1128     int saved_bank;
1129     int saved_config_0 = inb(ioaddr + CONFIG_0);
1130 
1131     local_irq_save(flags);
1132 
1133     /* Disable Tx and Rx */
1134     if (sram_config == 0)
1135 	outb(CONFIG0_RST, ioaddr + CONFIG_0);
1136     else
1137 	outb(CONFIG0_RST_1, ioaddr + CONFIG_0);
1138 
1139     if (dev->flags & IFF_PROMISC) {
1140 	memset(mc_filter, 0xff, sizeof(mc_filter));
1141 	outb(3, ioaddr + RX_MODE);	/* Enable promiscuous mode */
1142     } else if (netdev_mc_count(dev) > MC_FILTERBREAK ||
1143 	       (dev->flags & IFF_ALLMULTI)) {
1144 	/* Too many to filter perfectly -- accept all multicasts. */
1145 	memset(mc_filter, 0xff, sizeof(mc_filter));
1146 	outb(2, ioaddr + RX_MODE);	/* Use normal mode. */
1147     } else if (netdev_mc_empty(dev)) {
1148 	memset(mc_filter, 0x00, sizeof(mc_filter));
1149 	outb(1, ioaddr + RX_MODE);	/* Ignore almost all multicasts. */
1150     } else {
1151 	struct netdev_hw_addr *ha;
1152 
1153 	memset(mc_filter, 0, sizeof(mc_filter));
1154 	netdev_for_each_mc_addr(ha, dev) {
1155 	    unsigned int bit = ether_crc_le(ETH_ALEN, ha->addr) >> 26;
1156 	    mc_filter[bit >> 3] |= (1 << (bit & 7));
1157 	}
1158 	outb(2, ioaddr + RX_MODE);	/* Use normal mode. */
1159     }
1160 
1161     /* Switch to bank 1 and set the multicast table. */
1162     saved_bank = inb(ioaddr + CONFIG_1);
1163     outb(0xe4, ioaddr + CONFIG_1);
1164 
1165     for (i = 0; i < 8; i++)
1166 	outb(mc_filter[i], ioaddr + MAR_ADR + i);
1167     outb(saved_bank, ioaddr + CONFIG_1);
1168 
1169     outb(saved_config_0, ioaddr + CONFIG_0);
1170 
1171     local_irq_restore(flags);
1172 }
1173