1 // SPDX-License-Identifier: GPL-2.0-only
6 * o allow users to set the parameters
7 * o sync/async switching ?
9 * Note: This does _not_ implement CCITT X.25 asynchronous framing
10 * recommendations. Its primarily for testing purposes. If you wanted
11 * to do CCITT then in theory all you need is to nick the HDLC async
12 * checksum routines from ppp.c
15 * 2000-10-29 Henner Eisen lapb_data_indication() return status.
18 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
20 #include <linux/module.h>
22 #include <linux/uaccess.h>
23 #include <linux/bitops.h>
24 #include <linux/string.h>
26 #include <linux/interrupt.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>
41 static struct net_device
**x25_asy_devs
;
42 static int x25_asy_maxdev
= SL_NRUNIT
;
44 module_param(x25_asy_maxdev
, int, 0);
45 MODULE_LICENSE("GPL");
47 static int x25_asy_esc(unsigned char *p
, unsigned char *d
, int len
);
48 static void x25_asy_unesc(struct x25_asy
*sl
, unsigned char c
);
49 static void x25_asy_setup(struct net_device
*dev
);
51 /* Find a free X.25 channel, and link in this `tty' line. */
52 static struct x25_asy
*x25_asy_alloc(void)
54 struct net_device
*dev
= NULL
;
58 if (x25_asy_devs
== NULL
)
59 return NULL
; /* Master array missing ! */
61 for (i
= 0; i
< x25_asy_maxdev
; i
++) {
62 dev
= x25_asy_devs
[i
];
68 sl
= netdev_priv(dev
);
70 if (!test_and_set_bit(SLF_INUSE
, &sl
->flags
))
75 /* Sorry, too many, all slots in use */
76 if (i
>= x25_asy_maxdev
)
79 /* If no channels are available, allocate one */
82 sprintf(name
, "x25asy%d", i
);
84 dev
= alloc_netdev(sizeof(struct x25_asy
), name
,
85 NET_NAME_UNKNOWN
, x25_asy_setup
);
89 /* Initialize channel control data */
90 sl
= netdev_priv(dev
);
93 /* register device so that it can be ifconfig'ed */
94 if (register_netdev(dev
) == 0) {
95 /* (Re-)Set the INUSE bit. Very Important! */
96 set_bit(SLF_INUSE
, &sl
->flags
);
97 x25_asy_devs
[i
] = dev
;
100 pr_warn("%s(): register_netdev() failure\n", __func__
);
108 /* Free an X.25 channel. */
109 static void x25_asy_free(struct x25_asy
*sl
)
111 /* Free all X.25 frame buffers. */
117 if (!test_and_clear_bit(SLF_INUSE
, &sl
->flags
))
118 netdev_err(sl
->dev
, "x25_asy_free for already free unit\n");
121 static int x25_asy_change_mtu(struct net_device
*dev
, int newmtu
)
123 struct x25_asy
*sl
= netdev_priv(dev
);
124 unsigned char *xbuff
, *rbuff
;
128 xbuff
= kmalloc(len
+ 4, GFP_ATOMIC
);
129 rbuff
= kmalloc(len
+ 4, GFP_ATOMIC
);
131 if (xbuff
== NULL
|| rbuff
== NULL
) {
137 spin_lock_bh(&sl
->lock
);
138 xbuff
= xchg(&sl
->xbuff
, xbuff
);
140 if (sl
->xleft
<= len
) {
141 memcpy(sl
->xbuff
, sl
->xhead
, sl
->xleft
);
144 dev
->stats
.tx_dropped
++;
147 sl
->xhead
= sl
->xbuff
;
149 rbuff
= xchg(&sl
->rbuff
, rbuff
);
151 if (sl
->rcount
<= len
) {
152 memcpy(sl
->rbuff
, rbuff
, sl
->rcount
);
155 dev
->stats
.rx_over_errors
++;
156 set_bit(SLF_ERROR
, &sl
->flags
);
163 spin_unlock_bh(&sl
->lock
);
171 /* Set the "sending" flag. This must be atomic, hence the ASM. */
173 static inline void x25_asy_lock(struct x25_asy
*sl
)
175 netif_stop_queue(sl
->dev
);
179 /* Clear the "sending" flag. This must be atomic, hence the ASM. */
181 static inline void x25_asy_unlock(struct x25_asy
*sl
)
183 netif_wake_queue(sl
->dev
);
186 /* Send an LAPB frame to the LAPB module to process. */
188 static void x25_asy_bump(struct x25_asy
*sl
)
190 struct net_device
*dev
= sl
->dev
;
196 dev
->stats
.rx_bytes
+= count
;
198 skb
= dev_alloc_skb(count
);
200 netdev_warn(sl
->dev
, "memory squeeze, dropping packet\n");
201 dev
->stats
.rx_dropped
++;
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
) {
209 printk(KERN_DEBUG
"x25_asy: data received err - %d\n", err
);
211 dev
->stats
.rx_packets
++;
215 /* Encapsulate one IP datagram and stuff into a TTY queue. */
216 static void x25_asy_encaps(struct x25_asy
*sl
, unsigned char *icp
, int len
)
219 int actual
, count
, mtu
= sl
->dev
->mtu
;
222 /* Sigh, shouldn't occur BUT ... */
224 printk(KERN_DEBUG
"%s: truncating oversized transmit packet!\n",
226 sl
->dev
->stats
.tx_dropped
++;
232 count
= x25_asy_esc(p
, sl
->xbuff
, len
);
234 /* Order of next two lines is *very* important.
235 * When we are sending a little amount of data,
236 * the transfer may be completed inside driver.write()
237 * routine, because it's running with interrupts enabled.
238 * In this case we *never* got WRITE_WAKEUP event,
239 * if we did not request it before write operation.
240 * 14 Oct 1994 Dmitry Gorodchanin.
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
;
247 clear_bit(SLF_OUTWAIT
, &sl
->flags
); /* reset outfill flag */
251 * Called by the driver when there's room for more data. If we have
252 * more packets to send, we send them here.
254 static void x25_asy_write_wakeup(struct tty_struct
*tty
)
257 struct x25_asy
*sl
= tty
->disc_data
;
259 /* First make sure we're connected. */
260 if (!sl
|| sl
->magic
!= X25_ASY_MAGIC
|| !netif_running(sl
->dev
))
263 if (sl
->xleft
<= 0) {
264 /* Now serial buffer is almost free & we can start
265 * transmission of another packet */
266 sl
->dev
->stats
.tx_packets
++;
267 clear_bit(TTY_DO_WRITE_WAKEUP
, &tty
->flags
);
272 actual
= tty
->ops
->write(tty
, sl
->xhead
, sl
->xleft
);
277 static void x25_asy_timeout(struct net_device
*dev
, unsigned int txqueue
)
279 struct x25_asy
*sl
= netdev_priv(dev
);
281 spin_lock(&sl
->lock
);
282 if (netif_queue_stopped(dev
)) {
283 /* May be we must check transmitter timeout here ?
284 * 14 Oct 1994 Dmitry Gorodchanin.
286 netdev_warn(dev
, "transmit timed out, %s?\n",
287 (tty_chars_in_buffer(sl
->tty
) || sl
->xleft
) ?
288 "bad line quality" : "driver error");
290 clear_bit(TTY_DO_WRITE_WAKEUP
, &sl
->tty
->flags
);
293 spin_unlock(&sl
->lock
);
296 /* Encapsulate an IP datagram and kick it into a TTY queue. */
298 static netdev_tx_t
x25_asy_xmit(struct sk_buff
*skb
,
299 struct net_device
*dev
)
301 struct x25_asy
*sl
= netdev_priv(dev
);
304 if (!netif_running(sl
->dev
)) {
305 netdev_err(dev
, "xmit call when iface is down\n");
310 switch (skb
->data
[0]) {
313 case X25_IFACE_CONNECT
: /* Connection request .. do nothing */
314 err
= lapb_connect_request(dev
);
316 netdev_err(dev
, "lapb_connect_request error: %d\n",
320 case X25_IFACE_DISCONNECT
: /* do nothing - hang up ?? */
321 err
= lapb_disconnect_request(dev
);
323 netdev_err(dev
, "lapb_disconnect_request error: %d\n",
330 skb_pull(skb
, 1); /* Remove control byte */
332 * If we are busy already- too bad. We ought to be able
333 * to queue things at this point, to allow for a little
334 * frame buffer. Oh well...
335 * -----------------------------------------------------
336 * I hate queues in X.25 driver. May be it's efficient,
337 * but for me latency is more important. ;)
339 * 14 Oct 1994 Dmitry Gorodchanin.
342 err
= lapb_data_request(dev
, skb
);
343 if (err
!= LAPB_OK
) {
344 netdev_err(dev
, "lapb_data_request error: %d\n", err
);
353 * LAPB interface boilerplate
357 * Called when I frame data arrive. We add a pseudo header for upper
358 * layers and pass it to upper layers.
361 static int x25_asy_data_indication(struct net_device
*dev
, struct sk_buff
*skb
)
363 if (skb_cow(skb
, 1)) {
368 skb
->data
[0] = X25_IFACE_DATA
;
370 skb
->protocol
= x25_type_trans(skb
, dev
);
372 return netif_rx(skb
);
376 * Data has emerged from the LAPB protocol machine. We don't handle
377 * busy cases too well. Its tricky to see how to do this nicely -
378 * perhaps lapb should allow us to bounce this ?
381 static void x25_asy_data_transmit(struct net_device
*dev
, struct sk_buff
*skb
)
383 struct x25_asy
*sl
= netdev_priv(dev
);
385 spin_lock(&sl
->lock
);
386 if (netif_queue_stopped(sl
->dev
) || sl
->tty
== NULL
) {
387 spin_unlock(&sl
->lock
);
388 netdev_err(dev
, "tbusy drop\n");
392 /* We were not busy, so we are now... :-) */
395 dev
->stats
.tx_bytes
+= skb
->len
;
396 x25_asy_encaps(sl
, skb
->data
, skb
->len
);
399 spin_unlock(&sl
->lock
);
403 * LAPB connection establish/down information.
406 static void x25_asy_connected(struct net_device
*dev
, int reason
)
408 struct x25_asy
*sl
= netdev_priv(dev
);
412 skb
= dev_alloc_skb(1);
414 netdev_err(dev
, "out of memory\n");
418 ptr
= skb_put(skb
, 1);
419 *ptr
= X25_IFACE_CONNECT
;
421 skb
->protocol
= x25_type_trans(skb
, sl
->dev
);
425 static void x25_asy_disconnected(struct net_device
*dev
, int reason
)
427 struct x25_asy
*sl
= netdev_priv(dev
);
431 skb
= dev_alloc_skb(1);
433 netdev_err(dev
, "out of memory\n");
437 ptr
= skb_put(skb
, 1);
438 *ptr
= X25_IFACE_DISCONNECT
;
440 skb
->protocol
= x25_type_trans(skb
, sl
->dev
);
444 static const struct lapb_register_struct x25_asy_callbacks
= {
445 .connect_confirmation
= x25_asy_connected
,
446 .connect_indication
= x25_asy_connected
,
447 .disconnect_confirmation
= x25_asy_disconnected
,
448 .disconnect_indication
= x25_asy_disconnected
,
449 .data_indication
= x25_asy_data_indication
,
450 .data_transmit
= x25_asy_data_transmit
,
454 /* Open the low-level part of the X.25 channel. Easy! */
455 static int x25_asy_open(struct net_device
*dev
)
457 struct x25_asy
*sl
= netdev_priv(dev
);
465 * Allocate the X.25 frame buffers:
467 * rbuff Receive buffer.
468 * xbuff Transmit buffer.
473 sl
->rbuff
= kmalloc(len
+ 4, GFP_KERNEL
);
474 if (sl
->rbuff
== NULL
)
476 sl
->xbuff
= kmalloc(len
+ 4, GFP_KERNEL
);
477 if (sl
->xbuff
== NULL
)
483 sl
->flags
&= (1 << SLF_INUSE
); /* Clear ESCAPE & ERROR flags */
485 netif_start_queue(dev
);
490 err
= lapb_register(dev
, &x25_asy_callbacks
);
505 /* Close the low-level part of the X.25 channel. Easy! */
506 static int x25_asy_close(struct net_device
*dev
)
508 struct x25_asy
*sl
= netdev_priv(dev
);
510 spin_lock(&sl
->lock
);
512 clear_bit(TTY_DO_WRITE_WAKEUP
, &sl
->tty
->flags
);
514 netif_stop_queue(dev
);
517 spin_unlock(&sl
->lock
);
522 * Handle the 'receiver data ready' interrupt.
523 * This function is called by the 'tty_io' module in the kernel when
524 * a block of X.25 data has been received, which can now be decapsulated
525 * and sent on to some IP layer for further processing.
528 static void x25_asy_receive_buf(struct tty_struct
*tty
,
529 const unsigned char *cp
, char *fp
, int count
)
531 struct x25_asy
*sl
= tty
->disc_data
;
533 if (!sl
|| sl
->magic
!= X25_ASY_MAGIC
|| !netif_running(sl
->dev
))
537 /* Read the characters out of the buffer */
540 if (!test_and_set_bit(SLF_ERROR
, &sl
->flags
))
541 sl
->dev
->stats
.rx_errors
++;
545 x25_asy_unesc(sl
, *cp
++);
550 * Open the high-level part of the X.25 channel.
551 * This function is called by the TTY module when the
552 * X.25 line discipline is called for. Because we are
553 * sure the tty line exists, we only have to link it to
554 * a free X.25 channel...
557 static int x25_asy_open_tty(struct tty_struct
*tty
)
562 if (tty
->ops
->write
== NULL
)
565 /* OK. Find a free X.25 channel to use. */
566 sl
= x25_asy_alloc();
572 tty
->receive_room
= 65536;
573 tty_driver_flush_buffer(tty
);
574 tty_ldisc_flush(tty
);
576 /* Restore default settings */
577 sl
->dev
->type
= ARPHRD_X25
;
579 /* Perform the low-level X.25 async init */
580 err
= x25_asy_open(sl
->dev
);
585 /* Done. We have linked the TTY line to a channel. */
591 * Close down an X.25 channel.
592 * This means flushing out any pending queues, and then restoring the
593 * TTY line discipline to what it was before it got hooked to X.25
594 * (which usually is TTY again).
596 static void x25_asy_close_tty(struct tty_struct
*tty
)
598 struct x25_asy
*sl
= tty
->disc_data
;
601 /* First make sure we're connected. */
602 if (!sl
|| sl
->magic
!= X25_ASY_MAGIC
)
606 if (sl
->dev
->flags
& IFF_UP
)
610 err
= lapb_unregister(sl
->dev
);
612 pr_err("%s: lapb_unregister error: %d\n",
615 tty
->disc_data
= NULL
;
620 /************************************************************************
621 * STANDARD X.25 ENCAPSULATION *
622 ************************************************************************/
624 static int x25_asy_esc(unsigned char *s
, unsigned char *d
, int len
)
626 unsigned char *ptr
= d
;
630 * Send an initial END character to flush out any
631 * data that may have accumulated in the receiver
635 *ptr
++ = X25_END
; /* Send 10111110 bit seq */
638 * For each byte in the packet, send the appropriate
639 * character sequence, according to the X.25 protocol.
646 *ptr
++ = X25_ESCAPE(X25_END
);
650 *ptr
++ = X25_ESCAPE(X25_ESC
);
661 static void x25_asy_unesc(struct x25_asy
*sl
, unsigned char s
)
666 if (!test_and_clear_bit(SLF_ERROR
, &sl
->flags
) &&
669 clear_bit(SLF_ESCAPE
, &sl
->flags
);
673 set_bit(SLF_ESCAPE
, &sl
->flags
);
675 case X25_ESCAPE(X25_ESC
):
676 case X25_ESCAPE(X25_END
):
677 if (test_and_clear_bit(SLF_ESCAPE
, &sl
->flags
))
681 if (!test_bit(SLF_ERROR
, &sl
->flags
)) {
682 if (sl
->rcount
< sl
->buffsize
) {
683 sl
->rbuff
[sl
->rcount
++] = s
;
686 sl
->dev
->stats
.rx_over_errors
++;
687 set_bit(SLF_ERROR
, &sl
->flags
);
692 /* Perform I/O control on an active X.25 channel. */
693 static int x25_asy_ioctl(struct tty_struct
*tty
, struct file
*file
,
694 unsigned int cmd
, unsigned long arg
)
696 struct x25_asy
*sl
= tty
->disc_data
;
698 /* First make sure we're connected. */
699 if (!sl
|| sl
->magic
!= X25_ASY_MAGIC
)
704 if (copy_to_user((void __user
*)arg
, sl
->dev
->name
,
705 strlen(sl
->dev
->name
) + 1))
711 return tty_mode_ioctl(tty
, file
, cmd
, arg
);
715 static int x25_asy_open_dev(struct net_device
*dev
)
717 struct x25_asy
*sl
= netdev_priv(dev
);
723 static const struct net_device_ops x25_asy_netdev_ops
= {
724 .ndo_open
= x25_asy_open_dev
,
725 .ndo_stop
= x25_asy_close
,
726 .ndo_start_xmit
= x25_asy_xmit
,
727 .ndo_tx_timeout
= x25_asy_timeout
,
728 .ndo_change_mtu
= x25_asy_change_mtu
,
731 /* Initialise the X.25 driver. Called by the device init code */
732 static void x25_asy_setup(struct net_device
*dev
)
734 struct x25_asy
*sl
= netdev_priv(dev
);
736 sl
->magic
= X25_ASY_MAGIC
;
738 spin_lock_init(&sl
->lock
);
739 set_bit(SLF_INUSE
, &sl
->flags
);
742 * Finish setting up the DEVICE info.
747 dev
->max_mtu
= 65534;
748 dev
->netdev_ops
= &x25_asy_netdev_ops
;
749 dev
->watchdog_timeo
= HZ
*20;
750 dev
->hard_header_len
= 0;
752 dev
->type
= ARPHRD_X25
;
753 dev
->tx_queue_len
= 10;
755 /* New-style flags. */
756 dev
->flags
= IFF_NOARP
;
759 static struct tty_ldisc_ops x25_ldisc
= {
760 .owner
= THIS_MODULE
,
761 .magic
= TTY_LDISC_MAGIC
,
763 .open
= x25_asy_open_tty
,
764 .close
= x25_asy_close_tty
,
765 .ioctl
= x25_asy_ioctl
,
766 .receive_buf
= x25_asy_receive_buf
,
767 .write_wakeup
= x25_asy_write_wakeup
,
770 static int __init
init_x25_asy(void)
772 if (x25_asy_maxdev
< 4)
773 x25_asy_maxdev
= 4; /* Sanity */
775 pr_info("X.25 async: version 0.00 ALPHA (dynamic channels, max=%d)\n",
778 x25_asy_devs
= kcalloc(x25_asy_maxdev
, sizeof(struct net_device
*),
783 return tty_register_ldisc(N_X25
, &x25_ldisc
);
787 static void __exit
exit_x25_asy(void)
789 struct net_device
*dev
;
792 for (i
= 0; i
< x25_asy_maxdev
; i
++) {
793 dev
= x25_asy_devs
[i
];
795 struct x25_asy
*sl
= netdev_priv(dev
);
797 spin_lock_bh(&sl
->lock
);
801 spin_unlock_bh(&sl
->lock
);
803 * VSV = if dev->start==0, then device
804 * unregistered while close proc.
806 unregister_netdev(dev
);
812 tty_unregister_ldisc(N_X25
);
815 module_init(init_x25_asy
);
816 module_exit(exit_x25_asy
);