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