1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
19
20#include <linux/module.h>
21
22#include <linux/uaccess.h>
23#include <linux/bitops.h>
24#include <linux/string.h>
25#include <linux/mm.h>
26#include <linux/interrupt.h>
27#include <linux/in.h>
28#include <linux/tty.h>
29#include <linux/errno.h>
30#include <linux/netdevice.h>
31#include <linux/etherdevice.h>
32#include <linux/skbuff.h>
33#include <linux/if_arp.h>
34#include <linux/lapb.h>
35#include <linux/init.h>
36#include <linux/rtnetlink.h>
37#include <linux/slab.h>
38#include <net/x25device.h>
39#include "x25_asy.h"
40
41static struct net_device **x25_asy_devs;
42static int x25_asy_maxdev = SL_NRUNIT;
43
44module_param(x25_asy_maxdev, int, 0);
45MODULE_LICENSE("GPL");
46
47static int x25_asy_esc(unsigned char *p, unsigned char *d, int len);
48static void x25_asy_unesc(struct x25_asy *sl, unsigned char c);
49static void x25_asy_setup(struct net_device *dev);
50
51
52static struct x25_asy *x25_asy_alloc(void)
53{
54 struct net_device *dev = NULL;
55 struct x25_asy *sl;
56 int i;
57
58 if (x25_asy_devs == NULL)
59 return NULL;
60
61 for (i = 0; i < x25_asy_maxdev; i++) {
62 dev = x25_asy_devs[i];
63
64
65 if (dev == NULL)
66 break;
67
68 sl = netdev_priv(dev);
69
70 if (!test_and_set_bit(SLF_INUSE, &sl->flags))
71 return sl;
72 }
73
74
75
76 if (i >= x25_asy_maxdev)
77 return NULL;
78
79
80 if (!dev) {
81 char name[IFNAMSIZ];
82 sprintf(name, "x25asy%d", i);
83
84 dev = alloc_netdev(sizeof(struct x25_asy), name,
85 NET_NAME_UNKNOWN, x25_asy_setup);
86 if (!dev)
87 return NULL;
88
89
90 sl = netdev_priv(dev);
91 dev->base_addr = i;
92
93
94 if (register_netdev(dev) == 0) {
95
96 set_bit(SLF_INUSE, &sl->flags);
97 x25_asy_devs[i] = dev;
98 return sl;
99 } else {
100 pr_warn("%s(): register_netdev() failure\n", __func__);
101 free_netdev(dev);
102 }
103 }
104 return NULL;
105}
106
107
108
109static void x25_asy_free(struct x25_asy *sl)
110{
111
112 kfree(sl->rbuff);
113 sl->rbuff = NULL;
114 kfree(sl->xbuff);
115 sl->xbuff = NULL;
116
117 if (!test_and_clear_bit(SLF_INUSE, &sl->flags))
118 netdev_err(sl->dev, "x25_asy_free for already free unit\n");
119}
120
121static int x25_asy_change_mtu(struct net_device *dev, int newmtu)
122{
123 struct x25_asy *sl = netdev_priv(dev);
124 unsigned char *xbuff, *rbuff;
125 int len;
126
127 len = 2 * newmtu;
128 xbuff = kmalloc(len + 4, GFP_ATOMIC);
129 rbuff = kmalloc(len + 4, GFP_ATOMIC);
130
131 if (xbuff == NULL || rbuff == NULL) {
132 kfree(xbuff);
133 kfree(rbuff);
134 return -ENOMEM;
135 }
136
137 spin_lock_bh(&sl->lock);
138 xbuff = xchg(&sl->xbuff, xbuff);
139 if (sl->xleft) {
140 if (sl->xleft <= len) {
141 memcpy(sl->xbuff, sl->xhead, sl->xleft);
142 } else {
143 sl->xleft = 0;
144 dev->stats.tx_dropped++;
145 }
146 }
147 sl->xhead = sl->xbuff;
148
149 rbuff = xchg(&sl->rbuff, rbuff);
150 if (sl->rcount) {
151 if (sl->rcount <= len) {
152 memcpy(sl->rbuff, rbuff, sl->rcount);
153 } else {
154 sl->rcount = 0;
155 dev->stats.rx_over_errors++;
156 set_bit(SLF_ERROR, &sl->flags);
157 }
158 }
159
160 dev->mtu = newmtu;
161 sl->buffsize = len;
162
163 spin_unlock_bh(&sl->lock);
164
165 kfree(xbuff);
166 kfree(rbuff);
167 return 0;
168}
169
170
171
172
173static inline void x25_asy_lock(struct x25_asy *sl)
174{
175 netif_stop_queue(sl->dev);
176}
177
178
179
180
181static inline void x25_asy_unlock(struct x25_asy *sl)
182{
183 netif_wake_queue(sl->dev);
184}
185
186
187
188static void x25_asy_bump(struct x25_asy *sl)
189{
190 struct net_device *dev = sl->dev;
191 struct sk_buff *skb;
192 int count;
193 int err;
194
195 count = sl->rcount;
196 dev->stats.rx_bytes += count;
197
198 skb = dev_alloc_skb(count);
199 if (skb == NULL) {
200 netdev_warn(sl->dev, "memory squeeze, dropping packet\n");
201 dev->stats.rx_dropped++;
202 return;
203 }
204 skb_put_data(skb, sl->rbuff, count);
205 skb->protocol = x25_type_trans(skb, sl->dev);
206 err = lapb_data_received(skb->dev, skb);
207 if (err != LAPB_OK) {
208 kfree_skb(skb);
209 printk(KERN_DEBUG "x25_asy: data received err - %d\n", err);
210 } else {
211 dev->stats.rx_packets++;
212 }
213}
214
215
216static void x25_asy_encaps(struct x25_asy *sl, unsigned char *icp, int len)
217{
218 unsigned char *p;
219 int actual, count, mtu = sl->dev->mtu;
220
221 if (len > mtu) {
222
223 len = mtu;
224 printk(KERN_DEBUG "%s: truncating oversized transmit packet!\n",
225 sl->dev->name);
226 sl->dev->stats.tx_dropped++;
227 x25_asy_unlock(sl);
228 return;
229 }
230
231 p = icp;
232 count = x25_asy_esc(p, sl->xbuff, len);
233
234
235
236
237
238
239
240
241
242 set_bit(TTY_DO_WRITE_WAKEUP, &sl->tty->flags);
243 actual = sl->tty->ops->write(sl->tty, sl->xbuff, count);
244 sl->xleft = count - actual;
245 sl->xhead = sl->xbuff + actual;
246
247 clear_bit(SLF_OUTWAIT, &sl->flags);
248}
249
250
251
252
253
254static void x25_asy_write_wakeup(struct tty_struct *tty)
255{
256 int actual;
257 struct x25_asy *sl = tty->disc_data;
258
259
260 if (!sl || sl->magic != X25_ASY_MAGIC || !netif_running(sl->dev))
261 return;
262
263 if (sl->xleft <= 0) {
264
265
266 sl->dev->stats.tx_packets++;
267 clear_bit(TTY_DO_WRITE_WAKEUP, &tty->flags);
268 x25_asy_unlock(sl);
269 return;
270 }
271
272 actual = tty->ops->write(tty, sl->xhead, sl->xleft);
273 sl->xleft -= actual;
274 sl->xhead += actual;
275}
276
277static void x25_asy_timeout(struct net_device *dev, unsigned int txqueue)
278{
279 struct x25_asy *sl = netdev_priv(dev);
280
281 spin_lock(&sl->lock);
282 if (netif_queue_stopped(dev)) {
283
284
285
286 netdev_warn(dev, "transmit timed out, %s?\n",
287 (tty_chars_in_buffer(sl->tty) || sl->xleft) ?
288 "bad line quality" : "driver error");
289 sl->xleft = 0;
290 clear_bit(TTY_DO_WRITE_WAKEUP, &sl->tty->flags);
291 x25_asy_unlock(sl);
292 }
293 spin_unlock(&sl->lock);
294}
295
296
297
298static netdev_tx_t x25_asy_xmit(struct sk_buff *skb,
299 struct net_device *dev)
300{
301 struct x25_asy *sl = netdev_priv(dev);
302 int err;
303
304 if (!netif_running(sl->dev)) {
305 netdev_err(dev, "xmit call when iface is down\n");
306 kfree_skb(skb);
307 return NETDEV_TX_OK;
308 }
309
310
311
312
313 if (skb->len < 1) {
314 kfree_skb(skb);
315 return NETDEV_TX_OK;
316 }
317
318 switch (skb->data[0]) {
319 case X25_IFACE_DATA:
320 break;
321 case X25_IFACE_CONNECT:
322 err = lapb_connect_request(dev);
323 if (err != LAPB_OK)
324 netdev_err(dev, "lapb_connect_request error: %d\n",
325 err);
326 kfree_skb(skb);
327 return NETDEV_TX_OK;
328 case X25_IFACE_DISCONNECT:
329 err = lapb_disconnect_request(dev);
330 if (err != LAPB_OK)
331 netdev_err(dev, "lapb_disconnect_request error: %d\n",
332 err);
333 fallthrough;
334 default:
335 kfree_skb(skb);
336 return NETDEV_TX_OK;
337 }
338 skb_pull(skb, 1);
339
340
341
342
343
344
345
346
347
348
349
350 err = lapb_data_request(dev, skb);
351 if (err != LAPB_OK) {
352 netdev_err(dev, "lapb_data_request error: %d\n", err);
353 kfree_skb(skb);
354 return NETDEV_TX_OK;
355 }
356 return NETDEV_TX_OK;
357}
358
359
360
361
362
363
364
365
366
367
368
369static int x25_asy_data_indication(struct net_device *dev, struct sk_buff *skb)
370{
371 if (skb_cow(skb, 1)) {
372 kfree_skb(skb);
373 return NET_RX_DROP;
374 }
375 skb_push(skb, 1);
376 skb->data[0] = X25_IFACE_DATA;
377
378 skb->protocol = x25_type_trans(skb, dev);
379
380 return netif_rx(skb);
381}
382
383
384
385
386
387
388
389static void x25_asy_data_transmit(struct net_device *dev, struct sk_buff *skb)
390{
391 struct x25_asy *sl = netdev_priv(dev);
392
393 spin_lock(&sl->lock);
394 if (netif_queue_stopped(sl->dev) || sl->tty == NULL) {
395 spin_unlock(&sl->lock);
396 netdev_err(dev, "tbusy drop\n");
397 kfree_skb(skb);
398 return;
399 }
400
401 if (skb != NULL) {
402 x25_asy_lock(sl);
403 dev->stats.tx_bytes += skb->len;
404 x25_asy_encaps(sl, skb->data, skb->len);
405 dev_kfree_skb(skb);
406 }
407 spin_unlock(&sl->lock);
408}
409
410
411
412
413
414static void x25_asy_connected(struct net_device *dev, int reason)
415{
416 struct x25_asy *sl = netdev_priv(dev);
417 struct sk_buff *skb;
418 unsigned char *ptr;
419
420 skb = dev_alloc_skb(1);
421 if (skb == NULL) {
422 netdev_err(dev, "out of memory\n");
423 return;
424 }
425
426 ptr = skb_put(skb, 1);
427 *ptr = X25_IFACE_CONNECT;
428
429 skb->protocol = x25_type_trans(skb, sl->dev);
430 netif_rx(skb);
431}
432
433static void x25_asy_disconnected(struct net_device *dev, int reason)
434{
435 struct x25_asy *sl = netdev_priv(dev);
436 struct sk_buff *skb;
437 unsigned char *ptr;
438
439 skb = dev_alloc_skb(1);
440 if (skb == NULL) {
441 netdev_err(dev, "out of memory\n");
442 return;
443 }
444
445 ptr = skb_put(skb, 1);
446 *ptr = X25_IFACE_DISCONNECT;
447
448 skb->protocol = x25_type_trans(skb, sl->dev);
449 netif_rx(skb);
450}
451
452static const struct lapb_register_struct x25_asy_callbacks = {
453 .connect_confirmation = x25_asy_connected,
454 .connect_indication = x25_asy_connected,
455 .disconnect_confirmation = x25_asy_disconnected,
456 .disconnect_indication = x25_asy_disconnected,
457 .data_indication = x25_asy_data_indication,
458 .data_transmit = x25_asy_data_transmit,
459};
460
461
462
463static int x25_asy_open(struct net_device *dev)
464{
465 struct x25_asy *sl = netdev_priv(dev);
466 unsigned long len;
467
468 if (sl->tty == NULL)
469 return -ENODEV;
470
471
472
473
474
475
476
477
478 len = dev->mtu * 2;
479
480 sl->rbuff = kmalloc(len + 4, GFP_KERNEL);
481 if (sl->rbuff == NULL)
482 goto norbuff;
483 sl->xbuff = kmalloc(len + 4, GFP_KERNEL);
484 if (sl->xbuff == NULL)
485 goto noxbuff;
486
487 sl->buffsize = len;
488 sl->rcount = 0;
489 sl->xleft = 0;
490 sl->flags &= (1 << SLF_INUSE);
491
492 return 0;
493
494
495 kfree(sl->xbuff);
496 sl->xbuff = NULL;
497noxbuff:
498 kfree(sl->rbuff);
499 sl->rbuff = NULL;
500norbuff:
501 return -ENOMEM;
502}
503
504
505
506static int x25_asy_close(struct net_device *dev)
507{
508 struct x25_asy *sl = netdev_priv(dev);
509
510 spin_lock(&sl->lock);
511 if (sl->tty)
512 clear_bit(TTY_DO_WRITE_WAKEUP, &sl->tty->flags);
513
514 sl->rcount = 0;
515 sl->xleft = 0;
516 spin_unlock(&sl->lock);
517 return 0;
518}
519
520
521
522
523
524
525
526
527static void x25_asy_receive_buf(struct tty_struct *tty,
528 const unsigned char *cp, char *fp, int count)
529{
530 struct x25_asy *sl = tty->disc_data;
531
532 if (!sl || sl->magic != X25_ASY_MAGIC || !netif_running(sl->dev))
533 return;
534
535
536
537 while (count--) {
538 if (fp && *fp++) {
539 if (!test_and_set_bit(SLF_ERROR, &sl->flags))
540 sl->dev->stats.rx_errors++;
541 cp++;
542 continue;
543 }
544 x25_asy_unesc(sl, *cp++);
545 }
546}
547
548
549
550
551
552
553
554
555
556static int x25_asy_open_tty(struct tty_struct *tty)
557{
558 struct x25_asy *sl;
559 int err;
560
561 if (tty->ops->write == NULL)
562 return -EOPNOTSUPP;
563
564
565 sl = x25_asy_alloc();
566 if (sl == NULL)
567 return -ENFILE;
568
569 sl->tty = tty;
570 tty->disc_data = sl;
571 tty->receive_room = 65536;
572 tty_driver_flush_buffer(tty);
573 tty_ldisc_flush(tty);
574
575
576 sl->dev->type = ARPHRD_X25;
577
578
579 err = x25_asy_open(sl->dev);
580 if (err) {
581 x25_asy_free(sl);
582 return err;
583 }
584
585 return 0;
586}
587
588
589
590
591
592
593
594
595static void x25_asy_close_tty(struct tty_struct *tty)
596{
597 struct x25_asy *sl = tty->disc_data;
598
599
600 if (!sl || sl->magic != X25_ASY_MAGIC)
601 return;
602
603 rtnl_lock();
604 if (sl->dev->flags & IFF_UP)
605 dev_close(sl->dev);
606 rtnl_unlock();
607
608 tty->disc_data = NULL;
609 sl->tty = NULL;
610 x25_asy_free(sl);
611}
612
613
614
615
616
617static int x25_asy_esc(unsigned char *s, unsigned char *d, int len)
618{
619 unsigned char *ptr = d;
620 unsigned char c;
621
622
623
624
625
626
627
628 *ptr++ = X25_END;
629
630
631
632
633
634
635 while (len-- > 0) {
636 switch (c = *s++) {
637 case X25_END:
638 *ptr++ = X25_ESC;
639 *ptr++ = X25_ESCAPE(X25_END);
640 break;
641 case X25_ESC:
642 *ptr++ = X25_ESC;
643 *ptr++ = X25_ESCAPE(X25_ESC);
644 break;
645 default:
646 *ptr++ = c;
647 break;
648 }
649 }
650 *ptr++ = X25_END;
651 return ptr - d;
652}
653
654static void x25_asy_unesc(struct x25_asy *sl, unsigned char s)
655{
656
657 switch (s) {
658 case X25_END:
659 if (!test_and_clear_bit(SLF_ERROR, &sl->flags) &&
660 sl->rcount >= 2)
661 x25_asy_bump(sl);
662 clear_bit(SLF_ESCAPE, &sl->flags);
663 sl->rcount = 0;
664 return;
665 case X25_ESC:
666 set_bit(SLF_ESCAPE, &sl->flags);
667 return;
668 case X25_ESCAPE(X25_ESC):
669 case X25_ESCAPE(X25_END):
670 if (test_and_clear_bit(SLF_ESCAPE, &sl->flags))
671 s = X25_UNESCAPE(s);
672 break;
673 }
674 if (!test_bit(SLF_ERROR, &sl->flags)) {
675 if (sl->rcount < sl->buffsize) {
676 sl->rbuff[sl->rcount++] = s;
677 return;
678 }
679 sl->dev->stats.rx_over_errors++;
680 set_bit(SLF_ERROR, &sl->flags);
681 }
682}
683
684
685
686static int x25_asy_ioctl(struct tty_struct *tty, struct file *file,
687 unsigned int cmd, unsigned long arg)
688{
689 struct x25_asy *sl = tty->disc_data;
690
691
692 if (!sl || sl->magic != X25_ASY_MAGIC)
693 return -EINVAL;
694
695 switch (cmd) {
696 case SIOCGIFNAME:
697 if (copy_to_user((void __user *)arg, sl->dev->name,
698 strlen(sl->dev->name) + 1))
699 return -EFAULT;
700 return 0;
701 case SIOCSIFHWADDR:
702 return -EINVAL;
703 default:
704 return tty_mode_ioctl(tty, file, cmd, arg);
705 }
706}
707
708static int x25_asy_open_dev(struct net_device *dev)
709{
710 int err;
711 struct x25_asy *sl = netdev_priv(dev);
712 if (sl->tty == NULL)
713 return -ENODEV;
714
715 err = lapb_register(dev, &x25_asy_callbacks);
716 if (err != LAPB_OK)
717 return -ENOMEM;
718
719 netif_start_queue(dev);
720
721 return 0;
722}
723
724static int x25_asy_close_dev(struct net_device *dev)
725{
726 int err;
727
728 netif_stop_queue(dev);
729
730 err = lapb_unregister(dev);
731 if (err != LAPB_OK)
732 pr_err("%s: lapb_unregister error: %d\n",
733 __func__, err);
734
735 x25_asy_close(dev);
736
737 return 0;
738}
739
740static const struct net_device_ops x25_asy_netdev_ops = {
741 .ndo_open = x25_asy_open_dev,
742 .ndo_stop = x25_asy_close_dev,
743 .ndo_start_xmit = x25_asy_xmit,
744 .ndo_tx_timeout = x25_asy_timeout,
745 .ndo_change_mtu = x25_asy_change_mtu,
746};
747
748
749static void x25_asy_setup(struct net_device *dev)
750{
751 struct x25_asy *sl = netdev_priv(dev);
752
753 sl->magic = X25_ASY_MAGIC;
754 sl->dev = dev;
755 spin_lock_init(&sl->lock);
756 set_bit(SLF_INUSE, &sl->flags);
757
758
759
760
761
762 dev->mtu = SL_MTU;
763 dev->min_mtu = 0;
764 dev->max_mtu = 65534;
765 dev->netdev_ops = &x25_asy_netdev_ops;
766 dev->watchdog_timeo = HZ*20;
767 dev->hard_header_len = 0;
768 dev->addr_len = 0;
769 dev->type = ARPHRD_X25;
770 dev->tx_queue_len = 10;
771
772
773
774
775
776 dev->needed_headroom = 3 - 1;
777
778
779 dev->flags = IFF_NOARP;
780}
781
782static struct tty_ldisc_ops x25_ldisc = {
783 .owner = THIS_MODULE,
784 .magic = TTY_LDISC_MAGIC,
785 .name = "X.25",
786 .open = x25_asy_open_tty,
787 .close = x25_asy_close_tty,
788 .ioctl = x25_asy_ioctl,
789 .receive_buf = x25_asy_receive_buf,
790 .write_wakeup = x25_asy_write_wakeup,
791};
792
793static int __init init_x25_asy(void)
794{
795 if (x25_asy_maxdev < 4)
796 x25_asy_maxdev = 4;
797
798 pr_info("X.25 async: version 0.00 ALPHA (dynamic channels, max=%d)\n",
799 x25_asy_maxdev);
800
801 x25_asy_devs = kcalloc(x25_asy_maxdev, sizeof(struct net_device *),
802 GFP_KERNEL);
803 if (!x25_asy_devs)
804 return -ENOMEM;
805
806 return tty_register_ldisc(N_X25, &x25_ldisc);
807}
808
809
810static void __exit exit_x25_asy(void)
811{
812 struct net_device *dev;
813 int i;
814
815 for (i = 0; i < x25_asy_maxdev; i++) {
816 dev = x25_asy_devs[i];
817 if (dev) {
818 struct x25_asy *sl = netdev_priv(dev);
819
820 spin_lock_bh(&sl->lock);
821 if (sl->tty)
822 tty_hangup(sl->tty);
823
824 spin_unlock_bh(&sl->lock);
825
826
827
828
829 unregister_netdev(dev);
830 free_netdev(dev);
831 }
832 }
833
834 kfree(x25_asy_devs);
835 tty_unregister_ldisc(N_X25);
836}
837
838module_init(init_x25_asy);
839module_exit(exit_x25_asy);
840