blob: a297e3efa05dd32369d0c1c23c14378675c51436 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2 * DLCI Implementation of Frame Relay protocol for Linux, according to
3 * RFC 1490. This generic device provides en/decapsulation for an
4 * underlying hardware driver. Routes & IPs are assigned to these
5 * interfaces. Requires 'dlcicfg' program to create usable
6 * interfaces, the initial one, 'dlci' is for IOCTL use only.
7 *
8 * Version: @(#)dlci.c 0.35 4 Jan 1997
9 *
10 * Author: Mike McLagan <mike.mclagan@linux.org>
11 *
12 * Changes:
13 *
14 * 0.15 Mike Mclagan Packet freeing, bug in kmalloc call
15 * DLCI_RET handling
16 * 0.20 Mike McLagan More conservative on which packets
17 * are returned for retry and which are
18 * are dropped. If DLCI_RET_DROP is
19 * returned from the FRAD, the packet is
20 * sent back to Linux for re-transmission
21 * 0.25 Mike McLagan Converted to use SIOC IOCTL calls
22 * 0.30 Jim Freeman Fixed to allow IPX traffic
23 * 0.35 Michael Elizabeth Fixed incorrect memcpy_fromfs
24 *
25 * This program is free software; you can redistribute it and/or
26 * modify it under the terms of the GNU General Public License
27 * as published by the Free Software Foundation; either version
28 * 2 of the License, or (at your option) any later version.
29 */
30
Linus Torvalds1da177e2005-04-16 15:20:36 -070031#include <linux/module.h>
32#include <linux/kernel.h>
33#include <linux/types.h>
34#include <linux/fcntl.h>
35#include <linux/interrupt.h>
36#include <linux/ptrace.h>
37#include <linux/ioport.h>
38#include <linux/in.h>
39#include <linux/init.h>
40#include <linux/slab.h>
41#include <linux/string.h>
42#include <linux/errno.h>
43#include <linux/netdevice.h>
44#include <linux/skbuff.h>
45#include <linux/if_arp.h>
46#include <linux/if_frad.h>
47#include <linux/bitops.h>
48
49#include <net/sock.h>
50
51#include <asm/system.h>
52#include <asm/io.h>
53#include <asm/dma.h>
54#include <asm/uaccess.h>
55
56static const char version[] = "DLCI driver v0.35, 4 Jan 1997, mike.mclagan@linux.org";
57
58static LIST_HEAD(dlci_devs);
59
60static void dlci_setup(struct net_device *);
61
62/*
63 * these encapsulate the RFC 1490 requirements as well as
64 * deal with packet transmission and reception, working with
65 * the upper network layers
66 */
67
68static int dlci_header(struct sk_buff *skb, struct net_device *dev,
Stephen Hemminger3b04ddd2007-10-09 01:40:57 -070069 unsigned short type, const void *daddr,
70 const void *saddr, unsigned len)
Linus Torvalds1da177e2005-04-16 15:20:36 -070071{
72 struct frhdr hdr;
73 struct dlci_local *dlp;
74 unsigned int hlen;
75 char *dest;
76
Wang Chen8f15ea42008-11-12 23:38:36 -080077 dlp = netdev_priv(dev);
Linus Torvalds1da177e2005-04-16 15:20:36 -070078
79 hdr.control = FRAD_I_UI;
80 switch(type)
81 {
82 case ETH_P_IP:
83 hdr.IP_NLPID = FRAD_P_IP;
84 hlen = sizeof(hdr.control) + sizeof(hdr.IP_NLPID);
85 break;
86
87 /* feel free to add other types, if necessary */
88
89 default:
90 hdr.pad = FRAD_P_PADDING;
91 hdr.NLPID = FRAD_P_SNAP;
92 memset(hdr.OUI, 0, sizeof(hdr.OUI));
93 hdr.PID = htons(type);
94 hlen = sizeof(hdr);
95 break;
96 }
97
98 dest = skb_push(skb, hlen);
99 if (!dest)
100 return(0);
101
102 memcpy(dest, &hdr, hlen);
103
104 return(hlen);
105}
106
107static void dlci_receive(struct sk_buff *skb, struct net_device *dev)
108{
109 struct dlci_local *dlp;
110 struct frhdr *hdr;
111 int process, header;
112
Wang Chen8f15ea42008-11-12 23:38:36 -0800113 dlp = netdev_priv(dev);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700114 if (!pskb_may_pull(skb, sizeof(*hdr))) {
115 printk(KERN_NOTICE "%s: invalid data no header\n",
116 dev->name);
117 dlp->stats.rx_errors++;
118 kfree_skb(skb);
119 return;
120 }
121
122 hdr = (struct frhdr *) skb->data;
123 process = 0;
124 header = 0;
125 skb->dev = dev;
126
127 if (hdr->control != FRAD_I_UI)
128 {
129 printk(KERN_NOTICE "%s: Invalid header flag 0x%02X.\n", dev->name, hdr->control);
130 dlp->stats.rx_errors++;
131 }
132 else
133 switch(hdr->IP_NLPID)
134 {
135 case FRAD_P_PADDING:
136 if (hdr->NLPID != FRAD_P_SNAP)
137 {
138 printk(KERN_NOTICE "%s: Unsupported NLPID 0x%02X.\n", dev->name, hdr->NLPID);
139 dlp->stats.rx_errors++;
140 break;
141 }
142
143 if (hdr->OUI[0] + hdr->OUI[1] + hdr->OUI[2] != 0)
144 {
145 printk(KERN_NOTICE "%s: Unsupported organizationally unique identifier 0x%02X-%02X-%02X.\n", dev->name, hdr->OUI[0], hdr->OUI[1], hdr->OUI[2]);
146 dlp->stats.rx_errors++;
147 break;
148 }
149
150 /* at this point, it's an EtherType frame */
151 header = sizeof(struct frhdr);
152 /* Already in network order ! */
153 skb->protocol = hdr->PID;
154 process = 1;
155 break;
156
157 case FRAD_P_IP:
158 header = sizeof(hdr->control) + sizeof(hdr->IP_NLPID);
159 skb->protocol = htons(ETH_P_IP);
160 process = 1;
161 break;
162
163 case FRAD_P_SNAP:
164 case FRAD_P_Q933:
165 case FRAD_P_CLNP:
166 printk(KERN_NOTICE "%s: Unsupported NLPID 0x%02X.\n", dev->name, hdr->pad);
167 dlp->stats.rx_errors++;
168 break;
169
170 default:
171 printk(KERN_NOTICE "%s: Invalid pad byte 0x%02X.\n", dev->name, hdr->pad);
172 dlp->stats.rx_errors++;
173 break;
174 }
175
176 if (process)
177 {
178 /* we've set up the protocol, so discard the header */
Arnaldo Carvalho de Melo459a98e2007-03-19 15:30:44 -0700179 skb_reset_mac_header(skb);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700180 skb_pull(skb, header);
181 dlp->stats.rx_bytes += skb->len;
182 netif_rx(skb);
183 dlp->stats.rx_packets++;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700184 }
185 else
186 dev_kfree_skb(skb);
187}
188
189static int dlci_transmit(struct sk_buff *skb, struct net_device *dev)
190{
191 struct dlci_local *dlp;
192 int ret;
193
194 ret = 0;
195
196 if (!skb || !dev)
197 return(0);
198
Wang Chen8f15ea42008-11-12 23:38:36 -0800199 dlp = netdev_priv(dev);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700200
201 netif_stop_queue(dev);
202
203 ret = dlp->slave->hard_start_xmit(skb, dlp->slave);
204 switch (ret)
205 {
206 case DLCI_RET_OK:
207 dlp->stats.tx_packets++;
208 ret = 0;
209 break;
210 case DLCI_RET_ERR:
211 dlp->stats.tx_errors++;
212 ret = 0;
213 break;
214 case DLCI_RET_DROP:
215 dlp->stats.tx_dropped++;
216 ret = 1;
217 break;
218 }
219 /* Alan Cox recommends always returning 0, and always freeing the packet */
220 /* experience suggest a slightly more conservative approach */
221
222 if (!ret)
223 {
224 dev_kfree_skb(skb);
225 netif_wake_queue(dev);
226 }
227 return(ret);
228}
229
230static int dlci_config(struct net_device *dev, struct dlci_conf __user *conf, int get)
231{
232 struct dlci_conf config;
233 struct dlci_local *dlp;
234 struct frad_local *flp;
235 int err;
236
Wang Chen8f15ea42008-11-12 23:38:36 -0800237 dlp = netdev_priv(dev);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700238
Wang Chen8f15ea42008-11-12 23:38:36 -0800239 flp = netdev_priv(dlp->slave);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700240
241 if (!get)
242 {
243 if(copy_from_user(&config, conf, sizeof(struct dlci_conf)))
244 return -EFAULT;
245 if (config.flags & ~DLCI_VALID_FLAGS)
246 return(-EINVAL);
247 memcpy(&dlp->config, &config, sizeof(struct dlci_conf));
248 dlp->configured = 1;
249 }
250
251 err = (*flp->dlci_conf)(dlp->slave, dev, get);
252 if (err)
253 return(err);
254
255 if (get)
256 {
257 if(copy_to_user(conf, &dlp->config, sizeof(struct dlci_conf)))
258 return -EFAULT;
259 }
260
261 return(0);
262}
263
264static int dlci_dev_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
265{
266 struct dlci_local *dlp;
267
268 if (!capable(CAP_NET_ADMIN))
269 return(-EPERM);
270
Wang Chen8f15ea42008-11-12 23:38:36 -0800271 dlp = netdev_priv(dev);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700272
273 switch(cmd)
274 {
275 case DLCI_GET_SLAVE:
276 if (!*(short *)(dev->dev_addr))
277 return(-EINVAL);
278
279 strncpy(ifr->ifr_slave, dlp->slave->name, sizeof(ifr->ifr_slave));
280 break;
281
282 case DLCI_GET_CONF:
283 case DLCI_SET_CONF:
284 if (!*(short *)(dev->dev_addr))
285 return(-EINVAL);
286
287 return(dlci_config(dev, ifr->ifr_data, cmd == DLCI_GET_CONF));
288 break;
289
290 default:
291 return(-EOPNOTSUPP);
292 }
293 return(0);
294}
295
296static int dlci_change_mtu(struct net_device *dev, int new_mtu)
297{
298 struct dlci_local *dlp;
299
Wang Chen8f15ea42008-11-12 23:38:36 -0800300 dlp = netdev_priv(dev);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700301
302 return((*dlp->slave->change_mtu)(dlp->slave, new_mtu));
303}
304
305static int dlci_open(struct net_device *dev)
306{
307 struct dlci_local *dlp;
308 struct frad_local *flp;
309 int err;
310
Wang Chen8f15ea42008-11-12 23:38:36 -0800311 dlp = netdev_priv(dev);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700312
313 if (!*(short *)(dev->dev_addr))
314 return(-EINVAL);
315
316 if (!netif_running(dlp->slave))
317 return(-ENOTCONN);
318
Wang Chen8f15ea42008-11-12 23:38:36 -0800319 flp = netdev_priv(dlp->slave);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700320 err = (*flp->activate)(dlp->slave, dev);
321 if (err)
322 return(err);
323
324 netif_start_queue(dev);
325
326 return 0;
327}
328
329static int dlci_close(struct net_device *dev)
330{
331 struct dlci_local *dlp;
332 struct frad_local *flp;
333 int err;
334
335 netif_stop_queue(dev);
336
Wang Chen8f15ea42008-11-12 23:38:36 -0800337 dlp = netdev_priv(dev);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700338
Wang Chen8f15ea42008-11-12 23:38:36 -0800339 flp = netdev_priv(dlp->slave);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700340 err = (*flp->deactivate)(dlp->slave, dev);
341
342 return 0;
343}
344
345static struct net_device_stats *dlci_get_stats(struct net_device *dev)
346{
347 struct dlci_local *dlp;
348
Wang Chen8f15ea42008-11-12 23:38:36 -0800349 dlp = netdev_priv(dev);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700350
351 return(&dlp->stats);
352}
353
354static int dlci_add(struct dlci_add *dlci)
355{
356 struct net_device *master, *slave;
357 struct dlci_local *dlp;
358 struct frad_local *flp;
359 int err = -EINVAL;
360
361
362 /* validate slave device */
Eric W. Biederman881d9662007-09-17 11:56:21 -0700363 slave = dev_get_by_name(&init_net, dlci->devname);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700364 if (!slave)
365 return -ENODEV;
366
Wang Chen8f15ea42008-11-12 23:38:36 -0800367 if (slave->type != ARPHRD_FRAD || netdev_priv(slave) == NULL)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700368 goto err1;
369
370 /* create device name */
371 master = alloc_netdev( sizeof(struct dlci_local), "dlci%d",
372 dlci_setup);
373 if (!master) {
374 err = -ENOMEM;
375 goto err1;
376 }
377
378 /* make sure same slave not already registered */
379 rtnl_lock();
380 list_for_each_entry(dlp, &dlci_devs, list) {
381 if (dlp->slave == slave) {
382 err = -EBUSY;
383 goto err2;
384 }
385 }
386
387 err = dev_alloc_name(master, master->name);
388 if (err < 0)
389 goto err2;
390
391 *(short *)(master->dev_addr) = dlci->dlci;
392
Wang Chen8f15ea42008-11-12 23:38:36 -0800393 dlp = netdev_priv(master);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700394 dlp->slave = slave;
395 dlp->master = master;
396
Wang Chen8f15ea42008-11-12 23:38:36 -0800397 flp = netdev_priv(slave);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700398 err = (*flp->assoc)(slave, master);
399 if (err < 0)
400 goto err2;
401
402 err = register_netdevice(master);
403 if (err < 0)
404 goto err2;
405
406 strcpy(dlci->devname, master->name);
407
408 list_add(&dlp->list, &dlci_devs);
409 rtnl_unlock();
410
411 return(0);
412
413 err2:
414 rtnl_unlock();
415 free_netdev(master);
416 err1:
417 dev_put(slave);
418 return(err);
419}
420
421static int dlci_del(struct dlci_add *dlci)
422{
423 struct dlci_local *dlp;
424 struct frad_local *flp;
425 struct net_device *master, *slave;
426 int err;
427
428 /* validate slave device */
Eric W. Biederman881d9662007-09-17 11:56:21 -0700429 master = __dev_get_by_name(&init_net, dlci->devname);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700430 if (!master)
431 return(-ENODEV);
432
433 if (netif_running(master)) {
434 return(-EBUSY);
435 }
436
Wang Chen8f15ea42008-11-12 23:38:36 -0800437 dlp = netdev_priv(master);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700438 slave = dlp->slave;
Wang Chen8f15ea42008-11-12 23:38:36 -0800439 flp = netdev_priv(slave);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700440
441 rtnl_lock();
442 err = (*flp->deassoc)(slave, master);
443 if (!err) {
444 list_del(&dlp->list);
445
446 unregister_netdevice(master);
447
448 dev_put(slave);
449 }
450 rtnl_unlock();
451
452 return(err);
453}
454
455static int dlci_ioctl(unsigned int cmd, void __user *arg)
456{
457 struct dlci_add add;
458 int err;
459
460 if (!capable(CAP_NET_ADMIN))
461 return(-EPERM);
462
463 if(copy_from_user(&add, arg, sizeof(struct dlci_add)))
464 return -EFAULT;
465
466 switch (cmd)
467 {
468 case SIOCADDDLCI:
469 err = dlci_add(&add);
470
471 if (!err)
472 if(copy_to_user(arg, &add, sizeof(struct dlci_add)))
473 return -EFAULT;
474 break;
475
476 case SIOCDELDLCI:
477 err = dlci_del(&add);
478 break;
479
480 default:
481 err = -EINVAL;
482 }
483
484 return(err);
485}
486
Stephen Hemminger3b04ddd2007-10-09 01:40:57 -0700487static const struct header_ops dlci_header_ops = {
488 .create = dlci_header,
489};
490
Linus Torvalds1da177e2005-04-16 15:20:36 -0700491static void dlci_setup(struct net_device *dev)
492{
Wang Chen8f15ea42008-11-12 23:38:36 -0800493 struct dlci_local *dlp = netdev_priv(dev);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700494
495 dev->flags = 0;
496 dev->open = dlci_open;
497 dev->stop = dlci_close;
498 dev->do_ioctl = dlci_dev_ioctl;
499 dev->hard_start_xmit = dlci_transmit;
Stephen Hemminger3b04ddd2007-10-09 01:40:57 -0700500 dev->header_ops = &dlci_header_ops;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700501 dev->get_stats = dlci_get_stats;
502 dev->change_mtu = dlci_change_mtu;
503 dev->destructor = free_netdev;
504
505 dlp->receive = dlci_receive;
506
507 dev->type = ARPHRD_DLCI;
508 dev->hard_header_len = sizeof(struct frhdr);
509 dev->addr_len = sizeof(short);
510
511}
512
513/* if slave is unregistering, then cleanup master */
514static int dlci_dev_event(struct notifier_block *unused,
515 unsigned long event, void *ptr)
516{
517 struct net_device *dev = (struct net_device *) ptr;
518
YOSHIFUJI Hideakic346dca2008-03-25 21:47:49 +0900519 if (dev_net(dev) != &init_net)
Eric W. Biedermane9dc8652007-09-12 13:02:17 +0200520 return NOTIFY_DONE;
521
Linus Torvalds1da177e2005-04-16 15:20:36 -0700522 if (event == NETDEV_UNREGISTER) {
523 struct dlci_local *dlp;
524
525 list_for_each_entry(dlp, &dlci_devs, list) {
526 if (dlp->slave == dev) {
527 list_del(&dlp->list);
528 unregister_netdevice(dlp->master);
529 dev_put(dlp->slave);
530 break;
531 }
532 }
533 }
534 return NOTIFY_DONE;
535}
536
537static struct notifier_block dlci_notifier = {
538 .notifier_call = dlci_dev_event,
539};
540
541static int __init init_dlci(void)
542{
543 dlci_ioctl_set(dlci_ioctl);
544 register_netdevice_notifier(&dlci_notifier);
545
546 printk("%s.\n", version);
547
548 return 0;
549}
550
551static void __exit dlci_exit(void)
552{
553 struct dlci_local *dlp, *nxt;
554
555 dlci_ioctl_set(NULL);
556 unregister_netdevice_notifier(&dlci_notifier);
557
558 rtnl_lock();
559 list_for_each_entry_safe(dlp, nxt, &dlci_devs, list) {
560 unregister_netdevice(dlp->master);
561 dev_put(dlp->slave);
562 }
563 rtnl_unlock();
564}
565
566module_init(init_dlci);
567module_exit(dlci_exit);
568
569MODULE_AUTHOR("Mike McLagan");
570MODULE_DESCRIPTION("Frame Relay DLCI layer");
571MODULE_LICENSE("GPL");