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