0941a26f6e3f9b94d794bc2f43ecce49a35290cb
[sfrench/cifs-2.6.git] / drivers / net / wan / sealevel.c
1 /*
2  *      Sealevel Systems 4021 driver.
3  *
4  *      This program is free software; you can redistribute it and/or
5  *      modify it under the terms of the GNU General Public License
6  *      as published by the Free Software Foundation; either version
7  *      2 of the License, or (at your option) any later version.
8  *
9  *      (c) Copyright 1999, 2001 Alan Cox
10  *      (c) Copyright 2001 Red Hat Inc.
11  *      Generic HDLC port Copyright (C) 2008 Krzysztof Halasa <khc@pm.waw.pl>
12  *
13  */
14
15 #include <linux/module.h>
16 #include <linux/kernel.h>
17 #include <linux/mm.h>
18 #include <linux/net.h>
19 #include <linux/skbuff.h>
20 #include <linux/netdevice.h>
21 #include <linux/if_arp.h>
22 #include <linux/delay.h>
23 #include <linux/hdlc.h>
24 #include <linux/ioport.h>
25 #include <linux/init.h>
26 #include <net/arp.h>
27
28 #include <asm/irq.h>
29 #include <asm/io.h>
30 #include <asm/dma.h>
31 #include <asm/byteorder.h>
32 #include "z85230.h"
33
34
35 struct slvl_device
36 {
37         struct z8530_channel *chan;
38         int channel;
39 };
40
41
42 struct slvl_board
43 {
44         struct slvl_device dev[2];
45         struct z8530_dev board;
46         int iobase;
47 };
48
49 /*
50  *      Network driver support routines
51  */
52
53 static inline struct slvl_device* dev_to_chan(struct net_device *dev)
54 {
55         return (struct slvl_device *)dev_to_hdlc(dev)->priv;
56 }
57
58 /*
59  *      Frame receive. Simple for our card as we do HDLC and there
60  *      is no funny garbage involved
61  */
62
63 static void sealevel_input(struct z8530_channel *c, struct sk_buff *skb)
64 {
65         /* Drop the CRC - it's not a good idea to try and negotiate it ;) */
66         skb_trim(skb, skb->len - 2);
67         skb->protocol = hdlc_type_trans(skb, c->netdevice);
68         skb_reset_mac_header(skb);
69         skb->dev = c->netdevice;
70         netif_rx(skb);
71 }
72
73 /*
74  *      We've been placed in the UP state
75  */
76
77 static int sealevel_open(struct net_device *d)
78 {
79         struct slvl_device *slvl = dev_to_chan(d);
80         int err = -1;
81         int unit = slvl->channel;
82
83         /*
84          *      Link layer up.
85          */
86
87         switch (unit)
88         {
89                 case 0:
90                         err = z8530_sync_dma_open(d, slvl->chan);
91                         break;
92                 case 1:
93                         err = z8530_sync_open(d, slvl->chan);
94                         break;
95         }
96
97         if (err)
98                 return err;
99
100         err = hdlc_open(d);
101         if (err) {
102                 switch (unit) {
103                         case 0:
104                                 z8530_sync_dma_close(d, slvl->chan);
105                                 break;
106                         case 1:
107                                 z8530_sync_close(d, slvl->chan);
108                                 break;
109                 }
110                 return err;
111         }
112
113         slvl->chan->rx_function = sealevel_input;
114
115         /*
116          *      Go go go
117          */
118         netif_start_queue(d);
119         return 0;
120 }
121
122 static int sealevel_close(struct net_device *d)
123 {
124         struct slvl_device *slvl = dev_to_chan(d);
125         int unit = slvl->channel;
126
127         /*
128          *      Discard new frames
129          */
130
131         slvl->chan->rx_function = z8530_null_rx;
132
133         hdlc_close(d);
134         netif_stop_queue(d);
135
136         switch (unit)
137         {
138                 case 0:
139                         z8530_sync_dma_close(d, slvl->chan);
140                         break;
141                 case 1:
142                         z8530_sync_close(d, slvl->chan);
143                         break;
144         }
145         return 0;
146 }
147
148 static int sealevel_ioctl(struct net_device *d, struct ifreq *ifr, int cmd)
149 {
150         /* struct slvl_device *slvl=dev_to_chan(d);
151            z8530_ioctl(d,&slvl->sync.chanA,ifr,cmd) */
152         return hdlc_ioctl(d, ifr, cmd);
153 }
154
155 /*
156  *      Passed network frames, fire them downwind.
157  */
158
159 static int sealevel_queue_xmit(struct sk_buff *skb, struct net_device *d)
160 {
161         return z8530_queue_xmit(dev_to_chan(d)->chan, skb);
162 }
163
164 static int sealevel_attach(struct net_device *dev, unsigned short encoding,
165                            unsigned short parity)
166 {
167         if (encoding == ENCODING_NRZ && parity == PARITY_CRC16_PR1_CCITT)
168                 return 0;
169         return -EINVAL;
170 }
171
172 static int slvl_setup(struct slvl_device *sv, int iobase, int irq)
173 {
174         struct net_device *dev = alloc_hdlcdev(sv);
175         if (!dev)
176                 return -1;
177
178         dev_to_hdlc(dev)->attach = sealevel_attach;
179         dev_to_hdlc(dev)->xmit = sealevel_queue_xmit;
180         dev->open = sealevel_open;
181         dev->stop = sealevel_close;
182         dev->do_ioctl = sealevel_ioctl;
183         dev->base_addr = iobase;
184         dev->irq = irq;
185
186         if (register_hdlc_device(dev)) {
187                 printk(KERN_ERR "sealevel: unable to register HDLC device\n");
188                 free_netdev(dev);
189                 return -1;
190         }
191
192         sv->chan->netdevice = dev;
193         return 0;
194 }
195
196
197 /*
198  *      Allocate and setup Sealevel board.
199  */
200
201 static __init struct slvl_board *slvl_init(int iobase, int irq,
202                                            int txdma, int rxdma, int slow)
203 {
204         struct z8530_dev *dev;
205         struct slvl_board *b;
206
207         /*
208          *      Get the needed I/O space
209          */
210
211         if (!request_region(iobase, 8, "Sealevel 4021")) {
212                 printk(KERN_WARNING "sealevel: I/O 0x%X already in use.\n",
213                        iobase);
214                 return NULL;
215         }
216
217         b = kzalloc(sizeof(struct slvl_board), GFP_KERNEL);
218         if (!b)
219                 goto err_kzalloc;
220
221         b->dev[0].chan = &b->board.chanA;
222         b->dev[0].channel = 0;
223
224         b->dev[1].chan = &b->board.chanB;
225         b->dev[1].channel = 1;
226
227         dev = &b->board;
228
229         /*
230          *      Stuff in the I/O addressing
231          */
232
233         dev->active = 0;
234
235         b->iobase = iobase;
236
237         /*
238          *      Select 8530 delays for the old board
239          */
240
241         if (slow)
242                 iobase |= Z8530_PORT_SLEEP;
243
244         dev->chanA.ctrlio = iobase + 1;
245         dev->chanA.dataio = iobase;
246         dev->chanB.ctrlio = iobase + 3;
247         dev->chanB.dataio = iobase + 2;
248
249         dev->chanA.irqs = &z8530_nop;
250         dev->chanB.irqs = &z8530_nop;
251
252         /*
253          *      Assert DTR enable DMA
254          */
255
256         outb(3 | (1 << 7), b->iobase + 4);
257
258
259         /* We want a fast IRQ for this device. Actually we'd like an even faster
260            IRQ ;) - This is one driver RtLinux is made for */
261
262         if (request_irq(irq, &z8530_interrupt, IRQF_DISABLED,
263                         "SeaLevel", dev) < 0) {
264                 printk(KERN_WARNING "sealevel: IRQ %d already in use.\n", irq);
265                 goto err_request_irq;
266         }
267
268         dev->irq = irq;
269         dev->chanA.private = &b->dev[0];
270         dev->chanB.private = &b->dev[1];
271         dev->chanA.dev = dev;
272         dev->chanB.dev = dev;
273
274         dev->chanA.txdma = 3;
275         dev->chanA.rxdma = 1;
276         if (request_dma(dev->chanA.txdma, "SeaLevel (TX)"))
277                 goto err_dma_tx;
278
279         if (request_dma(dev->chanA.rxdma, "SeaLevel (RX)"))
280                 goto err_dma_rx;
281
282         disable_irq(irq);
283
284         /*
285          *      Begin normal initialise
286          */
287
288         if (z8530_init(dev) != 0) {
289                 printk(KERN_ERR "Z8530 series device not found.\n");
290                 enable_irq(irq);
291                 goto free_hw;
292         }
293         if (dev->type == Z85C30) {
294                 z8530_channel_load(&dev->chanA, z8530_hdlc_kilostream);
295                 z8530_channel_load(&dev->chanB, z8530_hdlc_kilostream);
296         } else {
297                 z8530_channel_load(&dev->chanA, z8530_hdlc_kilostream_85230);
298                 z8530_channel_load(&dev->chanB, z8530_hdlc_kilostream_85230);
299         }
300
301         /*
302          *      Now we can take the IRQ
303          */
304
305         enable_irq(irq);
306
307         if (slvl_setup(&b->dev[0], iobase, irq))
308                 goto free_hw;
309         if (slvl_setup(&b->dev[1], iobase, irq))
310                 goto free_netdev0;
311
312         z8530_describe(dev, "I/O", iobase);
313         dev->active = 1;
314         return b;
315
316 free_netdev0:
317         unregister_hdlc_device(b->dev[0].chan->netdevice);
318         free_netdev(b->dev[0].chan->netdevice);
319 free_hw:
320         free_dma(dev->chanA.rxdma);
321 err_dma_rx:
322         free_dma(dev->chanA.txdma);
323 err_dma_tx:
324         free_irq(irq, dev);
325 err_request_irq:
326         kfree(b);
327 err_kzalloc:
328         release_region(iobase, 8);
329         return NULL;
330 }
331
332 static void __exit slvl_shutdown(struct slvl_board *b)
333 {
334         int u;
335
336         z8530_shutdown(&b->board);
337
338         for (u = 0; u < 2; u++)
339         {
340                 struct net_device *d = b->dev[u].chan->netdevice;
341                 unregister_hdlc_device(d);
342                 free_netdev(d);
343         }
344
345         free_irq(b->board.irq, &b->board);
346         free_dma(b->board.chanA.rxdma);
347         free_dma(b->board.chanA.txdma);
348         /* DMA off on the card, drop DTR */
349         outb(0, b->iobase);
350         release_region(b->iobase, 8);
351         kfree(b);
352 }
353
354
355 static int io=0x238;
356 static int txdma=1;
357 static int rxdma=3;
358 static int irq=5;
359 static int slow=0;
360
361 module_param(io, int, 0);
362 MODULE_PARM_DESC(io, "The I/O base of the Sealevel card");
363 module_param(txdma, int, 0);
364 MODULE_PARM_DESC(txdma, "Transmit DMA channel");
365 module_param(rxdma, int, 0);
366 MODULE_PARM_DESC(rxdma, "Receive DMA channel");
367 module_param(irq, int, 0);
368 MODULE_PARM_DESC(irq, "The interrupt line setting for the SeaLevel card");
369 module_param(slow, bool, 0);
370 MODULE_PARM_DESC(slow, "Set this for an older Sealevel card such as the 4012");
371
372 MODULE_AUTHOR("Alan Cox");
373 MODULE_LICENSE("GPL");
374 MODULE_DESCRIPTION("Modular driver for the SeaLevel 4021");
375
376 static struct slvl_board *slvl_unit;
377
378 static int __init slvl_init_module(void)
379 {
380         slvl_unit = slvl_init(io, irq, txdma, rxdma, slow);
381
382         return slvl_unit ? 0 : -ENODEV;
383 }
384
385 static void __exit slvl_cleanup_module(void)
386 {
387         if(slvl_unit)
388                 slvl_shutdown(slvl_unit);
389 }
390
391 module_init(slvl_init_module);
392 module_exit(slvl_cleanup_module);