Merge branch 'upstream-fixes'
[linux-2.6] / drivers / net / arcnet / arc-rimi.c
1 /*
2  * Linux ARCnet driver - "RIM I" (entirely mem-mapped) cards
3  * 
4  * Written 1994-1999 by Avery Pennarun.
5  * Written 1999-2000 by Martin Mares <mj@ucw.cz>.
6  * Derived from skeleton.c by Donald Becker.
7  *
8  * Special thanks to Contemporary Controls, Inc. (www.ccontrols.com)
9  *  for sponsoring the further development of this driver.
10  *
11  * **********************
12  *
13  * The original copyright of skeleton.c was as follows:
14  *
15  * skeleton.c Written 1993 by Donald Becker.
16  * Copyright 1993 United States Government as represented by the
17  * Director, National Security Agency.  This software may only be used
18  * and distributed according to the terms of the GNU General Public License as
19  * modified by SRC, incorporated herein by reference.
20  *
21  * **********************
22  *
23  * For more details, see drivers/net/arcnet.c
24  *
25  * **********************
26  */
27 #include <linux/kernel.h>
28 #include <linux/module.h>
29 #include <linux/moduleparam.h>
30 #include <linux/ioport.h>
31 #include <linux/slab.h>
32 #include <linux/delay.h>
33 #include <linux/netdevice.h>
34 #include <linux/bootmem.h>
35 #include <linux/init.h>
36 #include <asm/io.h>
37 #include <linux/arcdevice.h>
38
39
40 #define VERSION "arcnet: RIM I (entirely mem-mapped) support\n"
41
42
43 /* Internal function declarations */
44
45 static int arcrimi_probe(struct net_device *dev);
46 static int arcrimi_found(struct net_device *dev);
47 static void arcrimi_command(struct net_device *dev, int command);
48 static int arcrimi_status(struct net_device *dev);
49 static void arcrimi_setmask(struct net_device *dev, int mask);
50 static int arcrimi_reset(struct net_device *dev, int really_reset);
51 static void arcrimi_copy_to_card(struct net_device *dev, int bufnum, int offset,
52                                  void *buf, int count);
53 static void arcrimi_copy_from_card(struct net_device *dev, int bufnum, int offset,
54                                    void *buf, int count);
55
56 /* Handy defines for ARCnet specific stuff */
57
58 /* Amount of I/O memory used by the card */
59 #define BUFFER_SIZE (512)
60 #define MIRROR_SIZE (BUFFER_SIZE*4)
61
62 /* COM 9026 controller chip --> ARCnet register addresses */
63 #define _INTMASK (ioaddr+0)     /* writable */
64 #define _STATUS  (ioaddr+0)     /* readable */
65 #define _COMMAND (ioaddr+1)     /* writable, returns random vals on read (?) */
66 #define _RESET  (ioaddr+8)      /* software reset (on read) */
67 #define _MEMDATA  (ioaddr+12)   /* Data port for IO-mapped memory */
68 #define _ADDR_HI  (ioaddr+15)   /* Control registers for said */
69 #define _ADDR_LO  (ioaddr+14)
70 #define _CONFIG  (ioaddr+2)     /* Configuration register */
71
72 #undef ASTATUS
73 #undef ACOMMAND
74 #undef AINTMASK
75
76 #define ASTATUS()       readb(_STATUS)
77 #define ACOMMAND(cmd)   writeb((cmd),_COMMAND)
78 #define AINTMASK(msk)   writeb((msk),_INTMASK)
79 #define SETCONF()       writeb(lp->config,_CONFIG)
80
81
82 /*
83  * We cannot probe for a RIM I card; one reason is I don't know how to reset
84  * them.  In fact, we can't even get their node ID automatically.  So, we
85  * need to be passed a specific shmem address, IRQ, and node ID.
86  */
87 static int __init arcrimi_probe(struct net_device *dev)
88 {
89         BUGLVL(D_NORMAL) printk(VERSION);
90         BUGLVL(D_NORMAL) printk("E-mail me if you actually test the RIM I driver, please!\n");
91
92         BUGMSG(D_NORMAL, "Given: node %02Xh, shmem %lXh, irq %d\n",
93                dev->dev_addr[0], dev->mem_start, dev->irq);
94
95         if (dev->mem_start <= 0 || dev->irq <= 0) {
96                 BUGMSG(D_NORMAL, "No autoprobe for RIM I; you "
97                        "must specify the shmem and irq!\n");
98                 return -ENODEV;
99         }
100         if (dev->dev_addr[0] == 0) {
101                 BUGMSG(D_NORMAL, "You need to specify your card's station "
102                        "ID!\n");
103                 return -ENODEV;
104         }
105         /*
106          * Grab the memory region at mem_start for MIRROR_SIZE bytes.
107          * Later in arcrimi_found() the real size will be determined
108          * and this reserve will be released and the correct size
109          * will be taken.
110          */
111         if (!request_mem_region(dev->mem_start, MIRROR_SIZE, "arcnet (90xx)")) {
112                 BUGMSG(D_NORMAL, "Card memory already allocated\n");
113                 return -ENODEV;
114         }
115         return arcrimi_found(dev);
116 }
117
118 static int check_mirror(unsigned long addr, size_t size)
119 {
120         void __iomem *p;
121         int res = -1;
122
123         if (!request_mem_region(addr, size, "arcnet (90xx)"))
124                 return -1;
125
126         p = ioremap(addr, size);
127         if (p) {
128                 if (readb(p) == TESTvalue)
129                         res = 1;
130                 else
131                         res = 0;
132                 iounmap(p);
133         }
134
135         release_mem_region(addr, size);
136         return res;
137 }
138
139 /*
140  * Set up the struct net_device associated with this card.  Called after
141  * probing succeeds.
142  */
143 static int __init arcrimi_found(struct net_device *dev)
144 {
145         struct arcnet_local *lp;
146         unsigned long first_mirror, last_mirror, shmem;
147         void __iomem *p;
148         int mirror_size;
149         int err;
150
151         p = ioremap(dev->mem_start, MIRROR_SIZE);
152         if (!p) {
153                 release_mem_region(dev->mem_start, MIRROR_SIZE);
154                 BUGMSG(D_NORMAL, "Can't ioremap\n");
155                 return -ENODEV;
156         }
157
158         /* reserve the irq */
159         if (request_irq(dev->irq, &arcnet_interrupt, 0, "arcnet (RIM I)", dev)) {
160                 iounmap(p);
161                 release_mem_region(dev->mem_start, MIRROR_SIZE);
162                 BUGMSG(D_NORMAL, "Can't get IRQ %d!\n", dev->irq);
163                 return -ENODEV;
164         }
165
166         shmem = dev->mem_start;
167         writeb(TESTvalue, p);
168         writeb(dev->dev_addr[0], p + 1);        /* actually the node ID */
169
170         /* find the real shared memory start/end points, including mirrors */
171
172         /* guess the actual size of one "memory mirror" - the number of
173          * bytes between copies of the shared memory.  On most cards, it's
174          * 2k (or there are no mirrors at all) but on some, it's 4k.
175          */
176         mirror_size = MIRROR_SIZE;
177         if (readb(p) == TESTvalue
178             && check_mirror(shmem - MIRROR_SIZE, MIRROR_SIZE) == 0
179             && check_mirror(shmem - 2 * MIRROR_SIZE, MIRROR_SIZE) == 1)
180                 mirror_size = 2 * MIRROR_SIZE;
181
182         first_mirror = shmem - mirror_size;
183         while (check_mirror(first_mirror, mirror_size) == 1)
184                 first_mirror -= mirror_size;
185         first_mirror += mirror_size;
186
187         last_mirror = shmem + mirror_size;
188         while (check_mirror(last_mirror, mirror_size) == 1)
189                 last_mirror += mirror_size;
190         last_mirror -= mirror_size;
191
192         dev->mem_start = first_mirror;
193         dev->mem_end = last_mirror + MIRROR_SIZE - 1;
194
195         /* initialize the rest of the device structure. */
196
197         lp = dev->priv;
198         lp->card_name = "RIM I";
199         lp->hw.command = arcrimi_command;
200         lp->hw.status = arcrimi_status;
201         lp->hw.intmask = arcrimi_setmask;
202         lp->hw.reset = arcrimi_reset;
203         lp->hw.owner = THIS_MODULE;
204         lp->hw.copy_to_card = arcrimi_copy_to_card;
205         lp->hw.copy_from_card = arcrimi_copy_from_card;
206
207         /*
208          * re-reserve the memory region - arcrimi_probe() alloced this reqion
209          * but didn't know the real size.  Free that region and then re-get
210          * with the correct size.  There is a VERY slim chance this could
211          * fail.
212          */
213         iounmap(p);
214         release_mem_region(shmem, MIRROR_SIZE);
215         if (!request_mem_region(dev->mem_start,
216                                 dev->mem_end - dev->mem_start + 1,
217                                 "arcnet (90xx)")) {
218                 BUGMSG(D_NORMAL, "Card memory already allocated\n");
219                 goto err_free_irq;
220         }
221
222         lp->mem_start = ioremap(dev->mem_start, dev->mem_end - dev->mem_start + 1);
223         if (!lp->mem_start) {
224                 BUGMSG(D_NORMAL, "Can't remap device memory!\n");
225                 goto err_release_mem;
226         }
227
228         /* get and check the station ID from offset 1 in shmem */
229         dev->dev_addr[0] = readb(lp->mem_start + 1);
230
231         BUGMSG(D_NORMAL, "ARCnet RIM I: station %02Xh found at IRQ %d, "
232                "ShMem %lXh (%ld*%d bytes).\n",
233                dev->dev_addr[0],
234                dev->irq, dev->mem_start,
235          (dev->mem_end - dev->mem_start + 1) / mirror_size, mirror_size);
236
237         err = register_netdev(dev);
238         if (err)
239                 goto err_unmap;
240
241         return 0;
242
243 err_unmap:
244         iounmap(lp->mem_start);
245 err_release_mem:
246         release_mem_region(dev->mem_start, dev->mem_end - dev->mem_start + 1);
247 err_free_irq:
248         free_irq(dev->irq, dev);
249         return -EIO;
250 }
251
252
253 /*
254  * Do a hardware reset on the card, and set up necessary registers.
255  *
256  * This should be called as little as possible, because it disrupts the
257  * token on the network (causes a RECON) and requires a significant delay.
258  *
259  * However, it does make sure the card is in a defined state.
260  */
261 static int arcrimi_reset(struct net_device *dev, int really_reset)
262 {
263         struct arcnet_local *lp = dev->priv;
264         void __iomem *ioaddr = lp->mem_start + 0x800;
265
266         BUGMSG(D_INIT, "Resetting %s (status=%02Xh)\n", dev->name, ASTATUS());
267
268         if (really_reset) {
269                 writeb(TESTvalue, ioaddr - 0x800);      /* fake reset */
270                 return 0;
271         }
272         ACOMMAND(CFLAGScmd | RESETclear);       /* clear flags & end reset */
273         ACOMMAND(CFLAGScmd | CONFIGclear);
274
275         /* enable extended (512-byte) packets */
276         ACOMMAND(CONFIGcmd | EXTconf);
277
278         /* done!  return success. */
279         return 0;
280 }
281
282 static void arcrimi_setmask(struct net_device *dev, int mask)
283 {
284         struct arcnet_local *lp = dev->priv;
285         void __iomem *ioaddr = lp->mem_start + 0x800;
286
287         AINTMASK(mask);
288 }
289
290 static int arcrimi_status(struct net_device *dev)
291 {
292         struct arcnet_local *lp = dev->priv;
293         void __iomem *ioaddr = lp->mem_start + 0x800;
294
295         return ASTATUS();
296 }
297
298 static void arcrimi_command(struct net_device *dev, int cmd)
299 {
300         struct arcnet_local *lp = dev->priv;
301         void __iomem *ioaddr = lp->mem_start + 0x800;
302
303         ACOMMAND(cmd);
304 }
305
306 static void arcrimi_copy_to_card(struct net_device *dev, int bufnum, int offset,
307                                  void *buf, int count)
308 {
309         struct arcnet_local *lp = dev->priv;
310         void __iomem *memaddr = lp->mem_start + 0x800 + bufnum * 512 + offset;
311         TIME("memcpy_toio", count, memcpy_toio(memaddr, buf, count));
312 }
313
314
315 static void arcrimi_copy_from_card(struct net_device *dev, int bufnum, int offset,
316                                    void *buf, int count)
317 {
318         struct arcnet_local *lp = dev->priv;
319         void __iomem *memaddr = lp->mem_start + 0x800 + bufnum * 512 + offset;
320         TIME("memcpy_fromio", count, memcpy_fromio(buf, memaddr, count));
321 }
322
323 static int node;
324 static int io;                  /* use the insmod io= irq= node= options */
325 static int irq;
326 static char device[9];          /* use eg. device=arc1 to change name */
327
328 module_param(node, int, 0);
329 module_param(io, int, 0);
330 module_param(irq, int, 0);
331 module_param_string(device, device, sizeof(device), 0);
332 MODULE_LICENSE("GPL");
333
334 static struct net_device *my_dev;
335
336 static int __init arc_rimi_init(void)
337 {
338         struct net_device *dev;
339
340         dev = alloc_arcdev(device);
341         if (!dev)
342                 return -ENOMEM;
343
344         if (node && node != 0xff)
345                 dev->dev_addr[0] = node;
346
347         dev->mem_start = io;
348         dev->irq = irq;
349         if (dev->irq == 2)
350                 dev->irq = 9;
351
352         if (arcrimi_probe(dev)) {
353                 free_netdev(dev);
354                 return -EIO;
355         }
356
357         my_dev = dev;
358         return 0;
359 }
360
361 static void __exit arc_rimi_exit(void)
362 {
363         struct net_device *dev = my_dev;
364         struct arcnet_local *lp = dev->priv;
365
366         unregister_netdev(dev);
367         iounmap(lp->mem_start);
368         release_mem_region(dev->mem_start, dev->mem_end - dev->mem_start + 1);
369         free_irq(dev->irq, dev);
370         free_netdev(dev);
371 }
372
373 #ifndef MODULE
374 static int __init arcrimi_setup(char *s)
375 {
376         int ints[8];
377         s = get_options(s, 8, ints);
378         if (!ints[0])
379                 return 1;
380         switch (ints[0]) {
381         default:                /* ERROR */
382                 printk("arcrimi: Too many arguments.\n");
383         case 3:         /* Node ID */
384                 node = ints[3];
385         case 2:         /* IRQ */
386                 irq = ints[2];
387         case 1:         /* IO address */
388                 io = ints[1];
389         }
390         if (*s)
391                 snprintf(device, sizeof(device), "%s", s);
392         return 1;
393 }
394 __setup("arcrimi=", arcrimi_setup);
395 #endif                          /* MODULE */
396
397 module_init(arc_rimi_init)
398 module_exit(arc_rimi_exit)