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