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_change_mtu = hdlc_change_mtu,
178 	.ndo_start_xmit = hdlc_start_xmit,
179 	.ndo_do_ioctl   = sealevel_ioctl,
180 };
181 
slvl_setup(struct slvl_device * sv,int iobase,int irq)182 static int slvl_setup(struct slvl_device *sv, int iobase, int irq)
183 {
184 	struct net_device *dev = alloc_hdlcdev(sv);
185 	if (!dev)
186 		return -1;
187 
188 	dev_to_hdlc(dev)->attach = sealevel_attach;
189 	dev_to_hdlc(dev)->xmit = sealevel_queue_xmit;
190 	dev->netdev_ops = &sealevel_ops;
191 	dev->base_addr = iobase;
192 	dev->irq = irq;
193 
194 	if (register_hdlc_device(dev)) {
195 		pr_err("unable to register HDLC device\n");
196 		free_netdev(dev);
197 		return -1;
198 	}
199 
200 	sv->chan->netdevice = dev;
201 	return 0;
202 }
203 
204 
205 /*
206  *	Allocate and setup Sealevel board.
207  */
208 
slvl_init(int iobase,int irq,int txdma,int rxdma,int slow)209 static __init struct slvl_board *slvl_init(int iobase, int irq,
210 					   int txdma, int rxdma, int slow)
211 {
212 	struct z8530_dev *dev;
213 	struct slvl_board *b;
214 
215 	/*
216 	 *	Get the needed I/O space
217 	 */
218 
219 	if (!request_region(iobase, 8, "Sealevel 4021")) {
220 		pr_warn("I/O 0x%X already in use\n", iobase);
221 		return NULL;
222 	}
223 
224 	b = kzalloc(sizeof(struct slvl_board), GFP_KERNEL);
225 	if (!b)
226 		goto err_kzalloc;
227 
228 	b->dev[0].chan = &b->board.chanA;
229 	b->dev[0].channel = 0;
230 
231 	b->dev[1].chan = &b->board.chanB;
232 	b->dev[1].channel = 1;
233 
234 	dev = &b->board;
235 
236 	/*
237 	 *	Stuff in the I/O addressing
238 	 */
239 
240 	dev->active = 0;
241 
242 	b->iobase = iobase;
243 
244 	/*
245 	 *	Select 8530 delays for the old board
246 	 */
247 
248 	if (slow)
249 		iobase |= Z8530_PORT_SLEEP;
250 
251 	dev->chanA.ctrlio = iobase + 1;
252 	dev->chanA.dataio = iobase;
253 	dev->chanB.ctrlio = iobase + 3;
254 	dev->chanB.dataio = iobase + 2;
255 
256 	dev->chanA.irqs = &z8530_nop;
257 	dev->chanB.irqs = &z8530_nop;
258 
259 	/*
260 	 *	Assert DTR enable DMA
261 	 */
262 
263 	outb(3 | (1 << 7), b->iobase + 4);
264 
265 
266 	/* We want a fast IRQ for this device. Actually we'd like an even faster
267 	   IRQ ;) - This is one driver RtLinux is made for */
268 
269 	if (request_irq(irq, z8530_interrupt, IRQF_DISABLED,
270 			"SeaLevel", dev) < 0) {
271 		pr_warn("IRQ %d already in use\n", irq);
272 		goto err_request_irq;
273 	}
274 
275 	dev->irq = irq;
276 	dev->chanA.private = &b->dev[0];
277 	dev->chanB.private = &b->dev[1];
278 	dev->chanA.dev = dev;
279 	dev->chanB.dev = dev;
280 
281 	dev->chanA.txdma = 3;
282 	dev->chanA.rxdma = 1;
283 	if (request_dma(dev->chanA.txdma, "SeaLevel (TX)"))
284 		goto err_dma_tx;
285 
286 	if (request_dma(dev->chanA.rxdma, "SeaLevel (RX)"))
287 		goto err_dma_rx;
288 
289 	disable_irq(irq);
290 
291 	/*
292 	 *	Begin normal initialise
293 	 */
294 
295 	if (z8530_init(dev) != 0) {
296 		pr_err("Z8530 series device not found\n");
297 		enable_irq(irq);
298 		goto free_hw;
299 	}
300 	if (dev->type == Z85C30) {
301 		z8530_channel_load(&dev->chanA, z8530_hdlc_kilostream);
302 		z8530_channel_load(&dev->chanB, z8530_hdlc_kilostream);
303 	} else {
304 		z8530_channel_load(&dev->chanA, z8530_hdlc_kilostream_85230);
305 		z8530_channel_load(&dev->chanB, z8530_hdlc_kilostream_85230);
306 	}
307 
308 	/*
309 	 *	Now we can take the IRQ
310 	 */
311 
312 	enable_irq(irq);
313 
314 	if (slvl_setup(&b->dev[0], iobase, irq))
315 		goto free_hw;
316 	if (slvl_setup(&b->dev[1], iobase, irq))
317 		goto free_netdev0;
318 
319 	z8530_describe(dev, "I/O", iobase);
320 	dev->active = 1;
321 	return b;
322 
323 free_netdev0:
324 	unregister_hdlc_device(b->dev[0].chan->netdevice);
325 	free_netdev(b->dev[0].chan->netdevice);
326 free_hw:
327 	free_dma(dev->chanA.rxdma);
328 err_dma_rx:
329 	free_dma(dev->chanA.txdma);
330 err_dma_tx:
331 	free_irq(irq, dev);
332 err_request_irq:
333 	kfree(b);
334 err_kzalloc:
335 	release_region(iobase, 8);
336 	return NULL;
337 }
338 
slvl_shutdown(struct slvl_board * b)339 static void __exit slvl_shutdown(struct slvl_board *b)
340 {
341 	int u;
342 
343 	z8530_shutdown(&b->board);
344 
345 	for (u = 0; u < 2; u++) {
346 		struct net_device *d = b->dev[u].chan->netdevice;
347 		unregister_hdlc_device(d);
348 		free_netdev(d);
349 	}
350 
351 	free_irq(b->board.irq, &b->board);
352 	free_dma(b->board.chanA.rxdma);
353 	free_dma(b->board.chanA.txdma);
354 	/* DMA off on the card, drop DTR */
355 	outb(0, b->iobase);
356 	release_region(b->iobase, 8);
357 	kfree(b);
358 }
359 
360 
361 static int io=0x238;
362 static int txdma=1;
363 static int rxdma=3;
364 static int irq=5;
365 static bool slow=false;
366 
367 module_param(io, int, 0);
368 MODULE_PARM_DESC(io, "The I/O base of the Sealevel card");
369 module_param(txdma, int, 0);
370 MODULE_PARM_DESC(txdma, "Transmit DMA channel");
371 module_param(rxdma, int, 0);
372 MODULE_PARM_DESC(rxdma, "Receive DMA channel");
373 module_param(irq, int, 0);
374 MODULE_PARM_DESC(irq, "The interrupt line setting for the SeaLevel card");
375 module_param(slow, bool, 0);
376 MODULE_PARM_DESC(slow, "Set this for an older Sealevel card such as the 4012");
377 
378 MODULE_AUTHOR("Alan Cox");
379 MODULE_LICENSE("GPL");
380 MODULE_DESCRIPTION("Modular driver for the SeaLevel 4021");
381 
382 static struct slvl_board *slvl_unit;
383 
slvl_init_module(void)384 static int __init slvl_init_module(void)
385 {
386 	slvl_unit = slvl_init(io, irq, txdma, rxdma, slow);
387 
388 	return slvl_unit ? 0 : -ENODEV;
389 }
390 
slvl_cleanup_module(void)391 static void __exit slvl_cleanup_module(void)
392 {
393 	if (slvl_unit)
394 		slvl_shutdown(slvl_unit);
395 }
396 
397 module_init(slvl_init_module);
398 module_exit(slvl_cleanup_module);
399