pcmcia: introduce autoconfiguration feature
[linux-2.6.git] / drivers / net / pcmcia / fmvj18x_cs.c
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 DRV_NAME        "fmvj18x_cs"
32 #define DRV_VERSION     "2.9"
33
34 #include <linux/module.h>
35 #include <linux/kernel.h>
36 #include <linux/init.h>
37 #include <linux/ptrace.h>
38 #include <linux/slab.h>
39 #include <linux/string.h>
40 #include <linux/timer.h>
41 #include <linux/interrupt.h>
42 #include <linux/in.h>
43 #include <linux/delay.h>
44 #include <linux/ethtool.h>
45 #include <linux/netdevice.h>
46 #include <linux/etherdevice.h>
47 #include <linux/skbuff.h>
48 #include <linux/if_arp.h>
49 #include <linux/ioport.h>
50 #include <linux/crc32.h>
51
52 #include <pcmcia/cistpl.h>
53 #include <pcmcia/ciscode.h>
54 #include <pcmcia/ds.h>
55
56 #include <asm/uaccess.h>
57 #include <asm/io.h>
58 #include <asm/system.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 typedef enum { MBH10302, MBH10304, TDK, CONTEC, LA501, UNGERMANN, 
103                XXX10304, NEC, KME
104 } cardtype_t;
105
106 /*
107     driver specific data structure
108 */
109 typedef struct local_info_t {
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     cardtype_t cardtype;
116     u_short sent;
117     u_char __iomem *base;
118 } local_info_t;
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_multicast_list = 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     local_info_t *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(local_info_t));
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     SET_ETHTOOL_OPS(dev, &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             printk(KERN_NOTICE "fmvj18x_cs: 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,
323                            cistpl_cftable_entry_t *cfg,
324                            cistpl_cftable_entry_t *dflt,
325                            void *priv_data)
326 {
327         return 0; /* strange, but that's what the code did already before... */
328 }
329
330 static int fmvj18x_config(struct pcmcia_device *link)
331 {
332     struct net_device *dev = link->priv;
333     local_info_t *lp = netdev_priv(dev);
334     int i, ret;
335     unsigned int ioaddr;
336     cardtype_t cardtype;
337     char *card_name = "unknown";
338     u8 *buf;
339     size_t len;
340     u_char buggybuf[32];
341
342     dev_dbg(&link->dev, "fmvj18x_config\n");
343
344     link->io_lines = 5;
345
346     len = pcmcia_get_tuple(link, CISTPL_FUNCE, &buf);
347     kfree(buf);
348
349     if (len) {
350         /* Yes, I have CISTPL_FUNCE. Let's check CISTPL_MANFID */
351         ret = pcmcia_loop_config(link, fmvj18x_ioprobe, NULL);
352         if (ret != 0)
353                 goto failed;
354
355         switch (link->manf_id) {
356         case MANFID_TDK:
357             cardtype = TDK;
358             if (link->card_id == PRODID_TDK_GN3410 ||
359                 link->card_id == PRODID_TDK_NP9610 ||
360                 link->card_id == PRODID_TDK_MN3200) {
361                 /* MultiFunction Card */
362                 link->config_base = 0x800;
363                 link->config_index = 0x47;
364                 link->resource[1]->end = 8;
365             }
366             break;
367         case MANFID_NEC:
368             cardtype = NEC; /* MultiFunction Card */
369             link->config_base = 0x800;
370             link->config_index = 0x47;
371             link->resource[1]->end = 8;
372             break;
373         case MANFID_KME:
374             cardtype = KME; /* MultiFunction Card */
375             link->config_base = 0x800;
376             link->config_index = 0x47;
377             link->resource[1]->end = 8;
378             break;
379         case MANFID_CONTEC:
380             cardtype = CONTEC;
381             break;
382         case MANFID_FUJITSU:
383             if (link->config_base == 0x0fe0)
384                 cardtype = MBH10302;
385             else if (link->card_id == PRODID_FUJITSU_MBH10302) 
386                 /* RATOC REX-5588/9822/4886's PRODID are 0004(=MBH10302),
387                    but these are MBH10304 based card. */ 
388                 cardtype = MBH10304;
389             else if (link->card_id == PRODID_FUJITSU_MBH10304)
390                 cardtype = MBH10304;
391             else
392                 cardtype = LA501;
393             break;
394         default:
395             cardtype = MBH10304;
396         }
397     } else {
398         /* old type card */
399         switch (link->manf_id) {
400         case MANFID_FUJITSU:
401             if (link->card_id == PRODID_FUJITSU_MBH10304) {
402                 cardtype = XXX10304;    /* MBH10304 with buggy CIS */
403                 link->config_index = 0x20;
404             } else {
405                 cardtype = MBH10302;    /* NextCom NC5310, etc. */
406                 link->config_index = 1;
407             }
408             break;
409         case MANFID_UNGERMANN:
410             cardtype = UNGERMANN;
411             break;
412         default:
413             cardtype = MBH10302;
414             link->config_index = 1;
415         }
416     }
417
418     if (link->resource[1]->end != 0) {
419         ret = mfc_try_io_port(link);
420         if (ret != 0) goto failed;
421     } else if (cardtype == UNGERMANN) {
422         ret = ungermann_try_io_port(link);
423         if (ret != 0) goto failed;
424     } else { 
425             ret = pcmcia_request_io(link);
426             if (ret)
427                     goto failed;
428     }
429     ret = pcmcia_request_irq(link, fjn_interrupt);
430     if (ret)
431             goto failed;
432     ret = pcmcia_enable_device(link);
433     if (ret)
434             goto failed;
435
436     dev->irq = link->irq;
437     dev->base_addr = link->resource[0]->start;
438
439     if (resource_size(link->resource[1]) != 0) {
440         ret = fmvj18x_setup_mfc(link);
441         if (ret != 0) goto failed;
442     }
443
444     ioaddr = dev->base_addr;
445
446     /* Reset controller */
447     if (sram_config == 0) 
448         outb(CONFIG0_RST, ioaddr + CONFIG_0);
449     else
450         outb(CONFIG0_RST_1, ioaddr + CONFIG_0);
451
452     /* Power On chip and select bank 0 */
453     if (cardtype == MBH10302)
454         outb(BANK_0, ioaddr + CONFIG_1);
455     else
456         outb(BANK_0U, ioaddr + CONFIG_1);
457     
458     /* Set hardware address */
459     switch (cardtype) {
460     case MBH10304:
461     case TDK:
462     case LA501:
463     case CONTEC:
464     case NEC:
465     case KME:
466         if (cardtype == MBH10304) {
467             card_name = "FMV-J182";
468
469             len = pcmcia_get_tuple(link, CISTPL_FUNCE, &buf);
470             if (len < 11) {
471                     kfree(buf);
472                     goto failed;
473             }
474             /* Read MACID from CIS */
475             for (i = 5; i < 11; i++)
476                     dev->dev_addr[i] = buf[i];
477             kfree(buf);
478         } else {
479             if (pcmcia_get_mac_from_cis(link, dev))
480                 goto failed;
481             if( cardtype == TDK ) {
482                 card_name = "TDK LAK-CD021";
483             } else if( cardtype == LA501 ) {
484                 card_name = "LA501";
485             } else if( cardtype == NEC ) {
486                 card_name = "PK-UG-J001";
487             } else if( cardtype == KME ) {
488                 card_name = "Panasonic";
489             } else {
490                 card_name = "C-NET(PC)C";
491             }
492         }
493         break;
494     case UNGERMANN:
495         /* Read MACID from register */
496         for (i = 0; i < 6; i++) 
497             dev->dev_addr[i] = inb(ioaddr + UNGERMANN_MAC_ID + i);
498         card_name = "Access/CARD";
499         break;
500     case XXX10304:
501         /* Read MACID from Buggy CIS */
502         if (fmvj18x_get_hwinfo(link, buggybuf) == -1) {
503             printk(KERN_NOTICE "fmvj18x_cs: unable to read hardware net address.\n");
504             goto failed;
505         }
506         for (i = 0 ; i < 6; i++) {
507             dev->dev_addr[i] = buggybuf[i];
508         }
509         card_name = "FMV-J182";
510         break;
511     case MBH10302:
512     default:
513         /* Read MACID from register */
514         for (i = 0; i < 6; i++) 
515             dev->dev_addr[i] = inb(ioaddr + MAC_ID + i);
516         card_name = "FMV-J181";
517         break;
518     }
519
520     lp->cardtype = cardtype;
521     SET_NETDEV_DEV(dev, &link->dev);
522
523     if (register_netdev(dev) != 0) {
524         printk(KERN_NOTICE "fmvj18x_cs: register_netdev() failed\n");
525         goto failed;
526     }
527
528     /* print current configuration */
529     printk(KERN_INFO "%s: %s, sram %s, port %#3lx, irq %d, "
530            "hw_addr %pM\n",
531            dev->name, card_name, sram_config == 0 ? "4K TX*2" : "8K TX*2", 
532            dev->base_addr, dev->irq, dev->dev_addr);
533
534     return 0;
535     
536 failed:
537     fmvj18x_release(link);
538     return -ENODEV;
539 } /* fmvj18x_config */
540 /*====================================================================*/
541
542 static int fmvj18x_get_hwinfo(struct pcmcia_device *link, u_char *node_id)
543 {
544     u_char __iomem *base;
545     int i, j;
546
547     /* Allocate a small memory window */
548     link->resource[2]->flags |= WIN_DATA_WIDTH_8|WIN_MEMORY_TYPE_AM|WIN_ENABLE;
549     link->resource[2]->start = 0; link->resource[2]->end = 0;
550     i = pcmcia_request_window(link, link->resource[2], 0);
551     if (i != 0)
552         return -1;
553
554     base = ioremap(link->resource[2]->start, resource_size(link->resource[2]));
555     pcmcia_map_mem_page(link, link->resource[2], 0);
556
557     /*
558      *  MBH10304 CISTPL_FUNCE_LAN_NODE_ID format
559      *  22 0d xx xx xx 04 06 yy yy yy yy yy yy ff
560      *  'xx' is garbage.
561      *  'yy' is MAC address.
562     */ 
563     for (i = 0; i < 0x200; i++) {
564         if (readb(base+i*2) == 0x22) {  
565                 if (readb(base+(i-1)*2) == 0xff &&
566                     readb(base+(i+5)*2) == 0x04 &&
567                     readb(base+(i+6)*2) == 0x06 &&
568                     readb(base+(i+13)*2) == 0xff)
569                         break;
570         }
571     }
572
573     if (i != 0x200) {
574         for (j = 0 ; j < 6; j++,i++) {
575             node_id[j] = readb(base+(i+7)*2);
576         }
577     }
578
579     iounmap(base);
580     j = pcmcia_release_window(link, link->resource[2]);
581     return (i != 0x200) ? 0 : -1;
582
583 } /* fmvj18x_get_hwinfo */
584 /*====================================================================*/
585
586 static int fmvj18x_setup_mfc(struct pcmcia_device *link)
587 {
588     int i;
589     struct net_device *dev = link->priv;
590     unsigned int ioaddr;
591     local_info_t *lp = netdev_priv(dev);
592
593     /* Allocate a small memory window */
594     link->resource[3]->flags = WIN_DATA_WIDTH_8|WIN_MEMORY_TYPE_AM|WIN_ENABLE;
595     link->resource[3]->start = link->resource[3]->end = 0;
596     i = pcmcia_request_window(link, link->resource[3], 0);
597     if (i != 0)
598         return -1;
599
600     lp->base = ioremap(link->resource[3]->start,
601                        resource_size(link->resource[3]));
602     if (lp->base == NULL) {
603         printk(KERN_NOTICE "fmvj18x_cs: ioremap failed\n");
604         return -1;
605     }
606
607     i = pcmcia_map_mem_page(link, link->resource[3], 0);
608     if (i != 0) {
609         iounmap(lp->base);
610         lp->base = NULL;
611         return -1;
612     }
613     
614     ioaddr = dev->base_addr;
615     writeb(0x47, lp->base+0x800);       /* Config Option Register of LAN */
616     writeb(0x0,  lp->base+0x802);       /* Config and Status Register */
617
618     writeb(ioaddr & 0xff, lp->base+0x80a);        /* I/O Base(Low) of LAN */
619     writeb((ioaddr >> 8) & 0xff, lp->base+0x80c); /* I/O Base(High) of LAN */
620    
621     writeb(0x45, lp->base+0x820);       /* Config Option Register of Modem */
622     writeb(0x8,  lp->base+0x822);       /* Config and Status Register */
623
624     return 0;
625
626 }
627 /*====================================================================*/
628
629 static void fmvj18x_release(struct pcmcia_device *link)
630 {
631
632     struct net_device *dev = link->priv;
633     local_info_t *lp = netdev_priv(dev);
634     u_char __iomem *tmp;
635
636     dev_dbg(&link->dev, "fmvj18x_release\n");
637
638     if (lp->base != NULL) {
639         tmp = lp->base;
640         lp->base = NULL;    /* set NULL before iounmap */
641         iounmap(tmp);
642     }
643
644     pcmcia_disable_device(link);
645
646 }
647
648 static int fmvj18x_suspend(struct pcmcia_device *link)
649 {
650         struct net_device *dev = link->priv;
651
652         if (link->open)
653                 netif_device_detach(dev);
654
655         return 0;
656 }
657
658 static int fmvj18x_resume(struct pcmcia_device *link)
659 {
660         struct net_device *dev = link->priv;
661
662         if (link->open) {
663                 fjn_reset(dev);
664                 netif_device_attach(dev);
665         }
666
667         return 0;
668 }
669
670 /*====================================================================*/
671
672 static struct pcmcia_device_id fmvj18x_ids[] = {
673         PCMCIA_DEVICE_MANF_CARD(0x0004, 0x0004),
674         PCMCIA_DEVICE_PROD_ID12("EAGLE Technology", "NE200 ETHERNET LAN MBH10302 04", 0x528c88c4, 0x74f91e59),
675         PCMCIA_DEVICE_PROD_ID12("Eiger Labs,Inc", "EPX-10BT PC Card Ethernet 10BT", 0x53af556e, 0x877f9922),
676         PCMCIA_DEVICE_PROD_ID12("Eiger labs,Inc.", "EPX-10BT PC Card Ethernet 10BT", 0xf47e6c66, 0x877f9922),
677         PCMCIA_DEVICE_PROD_ID12("FUJITSU", "LAN Card(FMV-J182)", 0x6ee5a3d8, 0x5baf31db),
678         PCMCIA_DEVICE_PROD_ID12("FUJITSU", "MBH10308", 0x6ee5a3d8, 0x3f04875e),
679         PCMCIA_DEVICE_PROD_ID12("FUJITSU TOWA", "LA501", 0xb8451188, 0x12939ba2),
680         PCMCIA_DEVICE_PROD_ID12("HITACHI", "HT-4840-11", 0xf4f43949, 0x773910f4),
681         PCMCIA_DEVICE_PROD_ID12("NextComK.K.", "NC5310B Ver1.0       ", 0x8cef4d3a, 0x075fc7b6),
682         PCMCIA_DEVICE_PROD_ID12("NextComK.K.", "NC5310 Ver1.0        ", 0x8cef4d3a, 0xbccf43e6),
683         PCMCIA_DEVICE_PROD_ID12("RATOC System Inc.", "10BASE_T CARD R280", 0x85c10e17, 0xd9413666),
684         PCMCIA_DEVICE_PROD_ID12("TDK", "LAC-CD02x", 0x1eae9475, 0x8fa0ee70),
685         PCMCIA_DEVICE_PROD_ID12("TDK", "LAC-CF010", 0x1eae9475, 0x7683bc9a),
686         PCMCIA_DEVICE_PROD_ID1("CONTEC Co.,Ltd.", 0x58d8fee2),
687         PCMCIA_DEVICE_PROD_ID1("PCMCIA LAN MBH10304  ES", 0x2599f454),
688         PCMCIA_DEVICE_PROD_ID1("PCMCIA MBH10302", 0x8f4005da),
689         PCMCIA_DEVICE_PROD_ID1("UBKK,V2.0", 0x90888080),
690         PCMCIA_PFC_DEVICE_PROD_ID12(0, "TDK", "GlobalNetworker 3410/3412", 0x1eae9475, 0xd9a93bed),
691         PCMCIA_PFC_DEVICE_PROD_ID12(0, "NEC", "PK-UG-J001" ,0x18df0ba0 ,0x831b1064),
692         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0105, 0x0d0a),
693         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0105, 0x0e0a),
694         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0032, 0x0e01),
695         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0032, 0x0a05),
696         PCMCIA_PFC_DEVICE_MANF_CARD(0, 0x0032, 0x1101),
697         PCMCIA_DEVICE_NULL,
698 };
699 MODULE_DEVICE_TABLE(pcmcia, fmvj18x_ids);
700
701 static struct pcmcia_driver fmvj18x_cs_driver = {
702         .owner          = THIS_MODULE,
703         .drv            = {
704                 .name   = "fmvj18x_cs",
705         },
706         .probe          = fmvj18x_probe,
707         .remove         = fmvj18x_detach,
708         .id_table       = fmvj18x_ids,
709         .suspend        = fmvj18x_suspend,
710         .resume         = fmvj18x_resume,
711 };
712
713 static int __init init_fmvj18x_cs(void)
714 {
715         return pcmcia_register_driver(&fmvj18x_cs_driver);
716 }
717
718 static void __exit exit_fmvj18x_cs(void)
719 {
720         pcmcia_unregister_driver(&fmvj18x_cs_driver);
721 }
722
723 module_init(init_fmvj18x_cs);
724 module_exit(exit_fmvj18x_cs);
725
726 /*====================================================================*/
727
728 static irqreturn_t fjn_interrupt(int dummy, void *dev_id)
729 {
730     struct net_device *dev = dev_id;
731     local_info_t *lp = netdev_priv(dev);
732     unsigned int ioaddr;
733     unsigned short tx_stat, rx_stat;
734
735     ioaddr = dev->base_addr;
736
737     /* avoid multiple interrupts */
738     outw(0x0000, ioaddr + TX_INTR);
739
740     /* wait for a while */
741     udelay(1);
742
743     /* get status */
744     tx_stat = inb(ioaddr + TX_STATUS);
745     rx_stat = inb(ioaddr + RX_STATUS);
746
747     /* clear status */
748     outb(tx_stat, ioaddr + TX_STATUS);
749     outb(rx_stat, ioaddr + RX_STATUS);
750     
751     pr_debug("%s: interrupt, rx_status %02x.\n", dev->name, rx_stat);
752     pr_debug("               tx_status %02x.\n", tx_stat);
753     
754     if (rx_stat || (inb(ioaddr + RX_MODE) & F_BUF_EMP) == 0) {
755         /* there is packet(s) in rx buffer */
756         fjn_rx(dev);
757     }
758     if (tx_stat & F_TMT_RDY) {
759         dev->stats.tx_packets += lp->sent ;
760         lp->sent = 0 ;
761         if (lp->tx_queue) {
762             outb(DO_TX | lp->tx_queue, ioaddr + TX_START);
763             lp->sent = lp->tx_queue ;
764             lp->tx_queue = 0;
765             lp->tx_queue_len = 0;
766             dev->trans_start = jiffies;
767         } else {
768             lp->tx_started = 0;
769         }
770         netif_wake_queue(dev);
771     }
772     pr_debug("%s: exiting interrupt,\n", dev->name);
773     pr_debug("    tx_status %02x, rx_status %02x.\n", tx_stat, rx_stat);
774
775     outb(D_TX_INTR, ioaddr + TX_INTR);
776     outb(D_RX_INTR, ioaddr + RX_INTR);
777
778     if (lp->base != NULL) {
779         /* Ack interrupt for multifunction card */
780         writeb(0x01, lp->base+0x802);
781         writeb(0x09, lp->base+0x822);
782     }
783
784     return IRQ_HANDLED;
785
786 } /* fjn_interrupt */
787
788 /*====================================================================*/
789
790 static void fjn_tx_timeout(struct net_device *dev)
791 {
792     struct local_info_t *lp = netdev_priv(dev);
793     unsigned int ioaddr = dev->base_addr;
794
795     printk(KERN_NOTICE "%s: transmit timed out with status %04x, %s?\n",
796            dev->name, htons(inw(ioaddr + TX_STATUS)),
797            inb(ioaddr + TX_STATUS) & F_TMT_RDY
798            ? "IRQ conflict" : "network cable problem");
799     printk(KERN_NOTICE "%s: timeout registers: %04x %04x %04x "
800            "%04x %04x %04x %04x %04x.\n",
801            dev->name, htons(inw(ioaddr + 0)),
802            htons(inw(ioaddr + 2)), htons(inw(ioaddr + 4)),
803            htons(inw(ioaddr + 6)), htons(inw(ioaddr + 8)),
804            htons(inw(ioaddr +10)), htons(inw(ioaddr +12)),
805            htons(inw(ioaddr +14)));
806     dev->stats.tx_errors++;
807     /* ToDo: We should try to restart the adaptor... */
808     local_irq_disable();
809     fjn_reset(dev);
810
811     lp->tx_started = 0;
812     lp->tx_queue = 0;
813     lp->tx_queue_len = 0;
814     lp->sent = 0;
815     lp->open_time = jiffies;
816     local_irq_enable();
817     netif_wake_queue(dev);
818 }
819
820 static netdev_tx_t fjn_start_xmit(struct sk_buff *skb,
821                                         struct net_device *dev)
822 {
823     struct local_info_t *lp = netdev_priv(dev);
824     unsigned int ioaddr = dev->base_addr;
825     short length = skb->len;
826     
827     if (length < ETH_ZLEN)
828     {
829         if (skb_padto(skb, ETH_ZLEN))
830                 return NETDEV_TX_OK;
831         length = ETH_ZLEN;
832     }
833
834     netif_stop_queue(dev);
835
836     {
837         unsigned char *buf = skb->data;
838
839         if (length > ETH_FRAME_LEN) {
840             printk(KERN_NOTICE "%s: Attempting to send a large packet"
841                    " (%d bytes).\n", dev->name, length);
842             return NETDEV_TX_BUSY;
843         }
844
845         pr_debug("%s: Transmitting a packet of length %lu.\n",
846               dev->name, (unsigned long)skb->len);
847         dev->stats.tx_bytes += skb->len;
848
849         /* Disable both interrupts. */
850         outw(0x0000, ioaddr + TX_INTR);
851
852         /* wait for a while */
853         udelay(1);
854
855         outw(length, ioaddr + DATAPORT);
856         outsw(ioaddr + DATAPORT, buf, (length + 1) >> 1);
857
858         lp->tx_queue++;
859         lp->tx_queue_len += ((length+3) & ~1);
860
861         if (lp->tx_started == 0) {
862             /* If the Tx is idle, always trigger a transmit. */
863             outb(DO_TX | lp->tx_queue, ioaddr + TX_START);
864             lp->sent = lp->tx_queue ;
865             lp->tx_queue = 0;
866             lp->tx_queue_len = 0;
867             lp->tx_started = 1;
868             netif_start_queue(dev);
869         } else {
870             if( sram_config == 0 ) {
871                 if (lp->tx_queue_len < (4096 - (ETH_FRAME_LEN +2)) )
872                     /* Yes, there is room for one more packet. */
873                     netif_start_queue(dev);
874             } else {
875                 if (lp->tx_queue_len < (8192 - (ETH_FRAME_LEN +2)) && 
876                                                 lp->tx_queue < 127 )
877                     /* Yes, there is room for one more packet. */
878                     netif_start_queue(dev);
879             }
880         }
881
882         /* Re-enable interrupts */
883         outb(D_TX_INTR, ioaddr + TX_INTR);
884         outb(D_RX_INTR, ioaddr + RX_INTR);
885     }
886     dev_kfree_skb (skb);
887
888     return NETDEV_TX_OK;
889 } /* fjn_start_xmit */
890
891 /*====================================================================*/
892
893 static void fjn_reset(struct net_device *dev)
894 {
895     struct local_info_t *lp = netdev_priv(dev);
896     unsigned int ioaddr = dev->base_addr;
897     int i;
898
899     pr_debug("fjn_reset(%s) called.\n",dev->name);
900
901     /* Reset controller */
902     if( sram_config == 0 ) 
903         outb(CONFIG0_RST, ioaddr + CONFIG_0);
904     else
905         outb(CONFIG0_RST_1, ioaddr + CONFIG_0);
906
907     /* Power On chip and select bank 0 */
908     if (lp->cardtype == MBH10302)
909         outb(BANK_0, ioaddr + CONFIG_1);
910     else
911         outb(BANK_0U, ioaddr + CONFIG_1);
912
913     /* Set Tx modes */
914     outb(D_TX_MODE, ioaddr + TX_MODE);
915     /* set Rx modes */
916     outb(ID_MATCHED, ioaddr + RX_MODE);
917
918     /* Set hardware address */
919     for (i = 0; i < 6; i++) 
920         outb(dev->dev_addr[i], ioaddr + NODE_ID + i);
921
922     /* (re)initialize the multicast table */
923     set_rx_mode(dev);
924
925     /* Switch to bank 2 (runtime mode) */
926     if (lp->cardtype == MBH10302)
927         outb(BANK_2, ioaddr + CONFIG_1);
928     else
929         outb(BANK_2U, ioaddr + CONFIG_1);
930
931     /* set 16col ctrl bits */
932     if( lp->cardtype == TDK || lp->cardtype == CONTEC) 
933         outb(TDK_AUTO_MODE, ioaddr + COL_CTRL);
934     else
935         outb(AUTO_MODE, ioaddr + COL_CTRL);
936
937     /* clear Reserved Regs */
938     outb(0x00, ioaddr + BMPR12);
939     outb(0x00, ioaddr + BMPR13);
940
941     /* reset Skip packet reg. */
942     outb(0x01, ioaddr + RX_SKIP);
943
944     /* Enable Tx and Rx */
945     if( sram_config == 0 )
946         outb(CONFIG0_DFL, ioaddr + CONFIG_0);
947     else
948         outb(CONFIG0_DFL_1, ioaddr + CONFIG_0);
949
950     /* Init receive pointer ? */
951     inw(ioaddr + DATAPORT);
952     inw(ioaddr + DATAPORT);
953
954     /* Clear all status */
955     outb(0xff, ioaddr + TX_STATUS);
956     outb(0xff, ioaddr + RX_STATUS);
957
958     if (lp->cardtype == MBH10302)
959         outb(INTR_OFF, ioaddr + LAN_CTRL);
960
961     /* Turn on Rx interrupts */
962     outb(D_TX_INTR, ioaddr + TX_INTR);
963     outb(D_RX_INTR, ioaddr + RX_INTR);
964
965     /* Turn on interrupts from LAN card controller */
966     if (lp->cardtype == MBH10302)
967         outb(INTR_ON, ioaddr + LAN_CTRL);
968 } /* fjn_reset */
969
970 /*====================================================================*/
971
972 static void fjn_rx(struct net_device *dev)
973 {
974     unsigned int ioaddr = dev->base_addr;
975     int boguscount = 10;        /* 5 -> 10: by agy 19940922 */
976
977     pr_debug("%s: in rx_packet(), rx_status %02x.\n",
978           dev->name, inb(ioaddr + RX_STATUS));
979
980     while ((inb(ioaddr + RX_MODE) & F_BUF_EMP) == 0) {
981         u_short status = inw(ioaddr + DATAPORT);
982
983         pr_debug("%s: Rxing packet mode %02x status %04x.\n",
984               dev->name, inb(ioaddr + RX_MODE), status);
985 #ifndef final_version
986         if (status == 0) {
987             outb(F_SKP_PKT, ioaddr + RX_SKIP);
988             break;
989         }
990 #endif
991         if ((status & 0xF0) != 0x20) {  /* There was an error. */
992             dev->stats.rx_errors++;
993             if (status & F_LEN_ERR) dev->stats.rx_length_errors++;
994             if (status & F_ALG_ERR) dev->stats.rx_frame_errors++;
995             if (status & F_CRC_ERR) dev->stats.rx_crc_errors++;
996             if (status & F_OVR_FLO) dev->stats.rx_over_errors++;
997         } else {
998             u_short pkt_len = inw(ioaddr + DATAPORT);
999             /* Malloc up new buffer. */
1000             struct sk_buff *skb;
1001
1002             if (pkt_len > 1550) {
1003                 printk(KERN_NOTICE "%s: The FMV-18x claimed a very "
1004                        "large packet, size %d.\n", dev->name, pkt_len);
1005                 outb(F_SKP_PKT, ioaddr + RX_SKIP);
1006                 dev->stats.rx_errors++;
1007                 break;
1008             }
1009             skb = dev_alloc_skb(pkt_len+2);
1010             if (skb == NULL) {
1011                 printk(KERN_NOTICE "%s: Memory squeeze, dropping "
1012                        "packet (len %d).\n", dev->name, pkt_len);
1013                 outb(F_SKP_PKT, ioaddr + RX_SKIP);
1014                 dev->stats.rx_dropped++;
1015                 break;
1016             }
1017
1018             skb_reserve(skb, 2);
1019             insw(ioaddr + DATAPORT, skb_put(skb, pkt_len),
1020                  (pkt_len + 1) >> 1);
1021             skb->protocol = eth_type_trans(skb, dev);
1022
1023             {
1024                 int i;
1025                 pr_debug("%s: Rxed packet of length %d: ",
1026                         dev->name, pkt_len);
1027                 for (i = 0; i < 14; i++)
1028                         pr_debug(" %02x", skb->data[i]);
1029                 pr_debug(".\n");
1030             }
1031
1032             netif_rx(skb);
1033             dev->stats.rx_packets++;
1034             dev->stats.rx_bytes += pkt_len;
1035         }
1036         if (--boguscount <= 0)
1037             break;
1038     }
1039
1040     /* If any worth-while packets have been received, dev_rint()
1041            has done a netif_wake_queue() for us and will work on them
1042            when we get to the bottom-half routine. */
1043 /*
1044     if (lp->cardtype != TDK) {
1045         int i;
1046         for (i = 0; i < 20; i++) {
1047             if ((inb(ioaddr + RX_MODE) & F_BUF_EMP) == F_BUF_EMP)
1048                 break;
1049             (void)inw(ioaddr + DATAPORT);  /+ dummy status read +/
1050             outb(F_SKP_PKT, ioaddr + RX_SKIP);
1051         }
1052
1053         if (i > 0)
1054             pr_debug("%s: Exint Rx packet with mode %02x after "
1055                   "%d ticks.\n", dev->name, inb(ioaddr + RX_MODE), i);
1056     }
1057 */
1058 } /* fjn_rx */
1059
1060 /*====================================================================*/
1061
1062 static void netdev_get_drvinfo(struct net_device *dev,
1063                                struct ethtool_drvinfo *info)
1064 {
1065         strcpy(info->driver, DRV_NAME);
1066         strcpy(info->version, DRV_VERSION);
1067         sprintf(info->bus_info, "PCMCIA 0x%lx", dev->base_addr);
1068 }
1069
1070 static const struct ethtool_ops netdev_ethtool_ops = {
1071         .get_drvinfo            = netdev_get_drvinfo,
1072 };
1073
1074 static int fjn_config(struct net_device *dev, struct ifmap *map){
1075     return 0;
1076 }
1077
1078 static int fjn_open(struct net_device *dev)
1079 {
1080     struct local_info_t *lp = netdev_priv(dev);
1081     struct pcmcia_device *link = lp->p_dev;
1082
1083     pr_debug("fjn_open('%s').\n", dev->name);
1084
1085     if (!pcmcia_dev_present(link))
1086         return -ENODEV;
1087     
1088     link->open++;
1089     
1090     fjn_reset(dev);
1091     
1092     lp->tx_started = 0;
1093     lp->tx_queue = 0;
1094     lp->tx_queue_len = 0;
1095     lp->open_time = jiffies;
1096     netif_start_queue(dev);
1097     
1098     return 0;
1099 } /* fjn_open */
1100
1101 /*====================================================================*/
1102
1103 static int fjn_close(struct net_device *dev)
1104 {
1105     struct local_info_t *lp = netdev_priv(dev);
1106     struct pcmcia_device *link = lp->p_dev;
1107     unsigned int ioaddr = dev->base_addr;
1108
1109     pr_debug("fjn_close('%s').\n", dev->name);
1110
1111     lp->open_time = 0;
1112     netif_stop_queue(dev);
1113
1114     /* Set configuration register 0 to disable Tx and Rx. */
1115     if( sram_config == 0 ) 
1116         outb(CONFIG0_RST ,ioaddr + CONFIG_0);
1117     else
1118         outb(CONFIG0_RST_1 ,ioaddr + CONFIG_0);
1119
1120     /* Update the statistics -- ToDo. */
1121
1122     /* Power-down the chip.  Green, green, green! */
1123     outb(CHIP_OFF ,ioaddr + CONFIG_1);
1124
1125     /* Set the ethernet adaptor disable IRQ */
1126     if (lp->cardtype == MBH10302)
1127         outb(INTR_OFF, ioaddr + LAN_CTRL);
1128
1129     link->open--;
1130
1131     return 0;
1132 } /* fjn_close */
1133
1134 /*====================================================================*/
1135
1136 /*
1137   Set the multicast/promiscuous mode for this adaptor.
1138 */
1139
1140 static void set_rx_mode(struct net_device *dev)
1141 {
1142     unsigned int ioaddr = dev->base_addr;
1143     u_char mc_filter[8];                 /* Multicast hash filter */
1144     u_long flags;
1145     int i;
1146     
1147     int saved_bank;
1148     int saved_config_0 = inb(ioaddr + CONFIG_0);
1149      
1150     local_irq_save(flags); 
1151
1152     /* Disable Tx and Rx */
1153     if (sram_config == 0) 
1154         outb(CONFIG0_RST, ioaddr + CONFIG_0);
1155     else
1156         outb(CONFIG0_RST_1, ioaddr + CONFIG_0);
1157
1158     if (dev->flags & IFF_PROMISC) {
1159         memset(mc_filter, 0xff, sizeof(mc_filter));
1160         outb(3, ioaddr + RX_MODE);      /* Enable promiscuous mode */
1161     } else if (netdev_mc_count(dev) > MC_FILTERBREAK ||
1162                (dev->flags & IFF_ALLMULTI)) {
1163         /* Too many to filter perfectly -- accept all multicasts. */
1164         memset(mc_filter, 0xff, sizeof(mc_filter));
1165         outb(2, ioaddr + RX_MODE);      /* Use normal mode. */
1166     } else if (netdev_mc_empty(dev)) {
1167         memset(mc_filter, 0x00, sizeof(mc_filter));
1168         outb(1, ioaddr + RX_MODE);      /* Ignore almost all multicasts. */
1169     } else {
1170         struct netdev_hw_addr *ha;
1171
1172         memset(mc_filter, 0, sizeof(mc_filter));
1173         netdev_for_each_mc_addr(ha, dev) {
1174             unsigned int bit = ether_crc_le(ETH_ALEN, ha->addr) >> 26;
1175             mc_filter[bit >> 3] |= (1 << (bit & 7));
1176         }
1177         outb(2, ioaddr + RX_MODE);      /* Use normal mode. */
1178     }
1179
1180     /* Switch to bank 1 and set the multicast table. */
1181     saved_bank = inb(ioaddr + CONFIG_1);
1182     outb(0xe4, ioaddr + CONFIG_1);
1183
1184     for (i = 0; i < 8; i++)
1185         outb(mc_filter[i], ioaddr + MAR_ADR + i);
1186     outb(saved_bank, ioaddr + CONFIG_1);
1187
1188     outb(saved_config_0, ioaddr + CONFIG_0);
1189
1190     local_irq_restore(flags);
1191 }