5 * o allow users to set the parameters
6 * o sync/async switching ?
8 * Note: This does _not_ implement CCITT X.25 asynchronous framing
9 * recommendations. Its primarily for testing purposes. If you wanted
10 * to do CCITT then in theory all you need is to nick the HDLC async
11 * checksum routines from ppp.c
14 * 2000-10-29 Henner Eisen lapb_data_indication() return status.
17 #include <linux/module.h>
19 #include <asm/system.h>
20 #include <asm/uaccess.h>
21 #include <asm/bitops.h>
22 #include <linux/string.h>
24 #include <linux/interrupt.h>
26 #include <linux/tty.h>
27 #include <linux/errno.h>
28 #include <linux/netdevice.h>
29 #include <linux/etherdevice.h>
30 #include <linux/skbuff.h>
31 #include <linux/if_arp.h>
32 #include <linux/x25.h>
33 #include <linux/lapb.h>
34 #include <linux/init.h>
37 static struct net_device **x25_asy_devs;
38 static int x25_asy_maxdev = SL_NRUNIT;
40 MODULE_PARM(x25_asy_maxdev, "i");
41 MODULE_LICENSE("GPL");
43 static int x25_asy_esc(unsigned char *p, unsigned char *d, int len);
44 static void x25_asy_unesc(struct x25_asy *sl, unsigned char c);
45 static void x25_asy_setup(struct net_device *dev);
47 /* Find a free X.25 channel, and link in this `tty' line. */
48 static struct x25_asy *x25_asy_alloc(void)
50 struct net_device *dev = NULL;
54 if (x25_asy_devs == NULL)
55 return NULL; /* Master array missing ! */
57 for (i = 0; i < x25_asy_maxdev; i++) {
58 dev = x25_asy_devs[i];
66 if (!test_and_set_bit(SLF_INUSE, &sl->flags))
71 /* Sorry, too many, all slots in use */
72 if (i >= x25_asy_maxdev)
75 /* If no channels are available, allocate one */
78 sprintf(name, "x25asy%d", i);
80 dev = alloc_netdev(sizeof(struct x25_asy),
85 /* Initialize channel control data */
89 /* register device so that it can be ifconfig'ed */
90 if (register_netdev(dev) == 0) {
91 /* (Re-)Set the INUSE bit. Very Important! */
92 set_bit(SLF_INUSE, &sl->flags);
93 x25_asy_devs[i] = dev;
96 printk("x25_asy_alloc() - register_netdev() failure.\n");
104 /* Free an X.25 channel. */
105 static void x25_asy_free(struct x25_asy *sl)
107 /* Free all X.25 frame buffers. */
117 if (!test_and_clear_bit(SLF_INUSE, &sl->flags)) {
118 printk("%s: x25_asy_free for already free unit.\n", sl->dev->name);
122 static int x25_asy_change_mtu(struct net_device *dev, int newmtu)
124 struct x25_asy *sl = dev->priv;
125 unsigned char *xbuff, *rbuff;
128 xbuff = (unsigned char *) kmalloc (len + 4, GFP_ATOMIC);
129 rbuff = (unsigned char *) kmalloc (len + 4, GFP_ATOMIC);
131 if (xbuff == NULL || rbuff == NULL)
133 printk("%s: unable to grow X.25 buffers, MTU change cancelled.\n",
142 spin_lock_bh(&sl->lock);
143 xbuff = xchg(&sl->xbuff, xbuff);
145 if (sl->xleft <= len) {
146 memcpy(sl->xbuff, sl->xhead, sl->xleft);
149 sl->stats.tx_dropped++;
152 sl->xhead = sl->xbuff;
154 rbuff = xchg(&sl->rbuff, rbuff);
156 if (sl->rcount <= len) {
157 memcpy(sl->rbuff, rbuff, sl->rcount);
160 sl->stats.rx_over_errors++;
161 set_bit(SLF_ERROR, &sl->flags);
168 spin_unlock_bh(&sl->lock);
178 /* Set the "sending" flag. This must be atomic, hence the ASM. */
180 static inline void x25_asy_lock(struct x25_asy *sl)
182 netif_stop_queue(sl->dev);
186 /* Clear the "sending" flag. This must be atomic, hence the ASM. */
188 static inline void x25_asy_unlock(struct x25_asy *sl)
190 netif_wake_queue(sl->dev);
193 /* Send one completely decapsulated IP datagram to the IP layer. */
195 static void x25_asy_bump(struct x25_asy *sl)
202 sl->stats.rx_bytes+=count;
204 skb = dev_alloc_skb(count+1);
207 printk("%s: memory squeeze, dropping packet.\n", sl->dev->name);
208 sl->stats.rx_dropped++;
211 skb_push(skb,1); /* LAPB internal control */
213 memcpy(skb_put(skb,count), sl->rbuff, count);
214 skb->mac.raw=skb->data;
215 skb->protocol=htons(ETH_P_X25);
216 if((err=lapb_data_received(skb->dev, skb))!=LAPB_OK)
219 printk(KERN_DEBUG "x25_asy: data received err - %d\n",err);
224 sl->dev->last_rx = jiffies;
225 sl->stats.rx_packets++;
229 /* Encapsulate one IP datagram and stuff into a TTY queue. */
230 static void x25_asy_encaps(struct x25_asy *sl, unsigned char *icp, int len)
233 int actual, count, mtu = sl->dev->mtu;
236 { /* Sigh, shouldn't occur BUT ... */
238 printk ("%s: truncating oversized transmit packet!\n", sl->dev->name);
239 sl->stats.tx_dropped++;
245 count = x25_asy_esc(p, (unsigned char *) sl->xbuff, len);
247 /* Order of next two lines is *very* important.
248 * When we are sending a little amount of data,
249 * the transfer may be completed inside driver.write()
250 * routine, because it's running with interrupts enabled.
251 * In this case we *never* got WRITE_WAKEUP event,
252 * if we did not request it before write operation.
253 * 14 Oct 1994 Dmitry Gorodchanin.
255 sl->tty->flags |= (1 << TTY_DO_WRITE_WAKEUP);
256 actual = sl->tty->driver->write(sl->tty, 0, sl->xbuff, count);
257 sl->xleft = count - actual;
258 sl->xhead = sl->xbuff + actual;
260 clear_bit(SLF_OUTWAIT, &sl->flags); /* reset outfill flag */
264 * Called by the driver when there's room for more data. If we have
265 * more packets to send, we send them here.
267 static void x25_asy_write_wakeup(struct tty_struct *tty)
270 struct x25_asy *sl = (struct x25_asy *) tty->disc_data;
272 /* First make sure we're connected. */
273 if (!sl || sl->magic != X25_ASY_MAGIC || !netif_running(sl->dev))
278 /* Now serial buffer is almost free & we can start
279 * transmission of another packet */
280 sl->stats.tx_packets++;
281 tty->flags &= ~(1 << TTY_DO_WRITE_WAKEUP);
286 actual = tty->driver->write(tty, 0, sl->xhead, sl->xleft);
291 static void x25_asy_timeout(struct net_device *dev)
293 struct x25_asy *sl = (struct x25_asy*)(dev->priv);
295 spin_lock(&sl->lock);
296 if (netif_queue_stopped(dev)) {
297 /* May be we must check transmitter timeout here ?
298 * 14 Oct 1994 Dmitry Gorodchanin.
300 printk(KERN_WARNING "%s: transmit timed out, %s?\n", dev->name,
301 (sl->tty->driver->chars_in_buffer(sl->tty) || sl->xleft) ?
302 "bad line quality" : "driver error");
304 sl->tty->flags &= ~(1 << TTY_DO_WRITE_WAKEUP);
307 spin_unlock(&sl->lock);
310 /* Encapsulate an IP datagram and kick it into a TTY queue. */
312 static int x25_asy_xmit(struct sk_buff *skb, struct net_device *dev)
314 struct x25_asy *sl = (struct x25_asy*)(dev->priv);
317 if (!netif_running(sl->dev)) {
318 printk("%s: xmit call when iface is down\n", dev->name);
326 case 0x01: /* Connection request .. do nothing */
327 if((err=lapb_connect_request(dev))!=LAPB_OK)
328 printk(KERN_ERR "x25_asy: lapb_connect_request error - %d\n", err);
331 case 0x02: /* Disconnect request .. do nothing - hang up ?? */
332 if((err=lapb_disconnect_request(dev))!=LAPB_OK)
333 printk(KERN_ERR "x25_asy: lapb_disconnect_request error - %d\n", err);
338 skb_pull(skb,1); /* Remove control byte */
340 * If we are busy already- too bad. We ought to be able
341 * to queue things at this point, to allow for a little
342 * frame buffer. Oh well...
343 * -----------------------------------------------------
344 * I hate queues in X.25 driver. May be it's efficient,
345 * but for me latency is more important. ;)
347 * 14 Oct 1994 Dmitry Gorodchanin.
350 if((err=lapb_data_request(dev,skb))!=LAPB_OK)
352 printk(KERN_ERR "lapbeth: lapb_data_request error - %d\n", err);
361 * LAPB interface boilerplate
365 * Called when I frame data arrives. We did the work above - throw it
369 static int x25_asy_data_indication(struct net_device *dev, struct sk_buff *skb)
371 skb->dev->last_rx = jiffies;
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=dev->priv;
385 spin_lock(&sl->lock);
386 if (netif_queue_stopped(sl->dev) || sl->tty == NULL)
388 spin_unlock(&sl->lock);
389 printk(KERN_ERR "x25_asy: tbusy drop\n");
393 /* We were not busy, so we are now... :-) */
397 sl->stats.tx_bytes+=skb->len;
398 x25_asy_encaps(sl, skb->data, skb->len);
401 spin_unlock(&sl->lock);
405 * LAPB connection establish/down information.
408 static void x25_asy_connected(struct net_device *dev, int reason)
410 struct x25_asy *sl = dev->priv;
414 if ((skb = dev_alloc_skb(1)) == NULL) {
415 printk(KERN_ERR "lapbeth: out of memory\n");
419 ptr = skb_put(skb, 1);
423 skb->protocol = htons(ETH_P_X25);
424 skb->mac.raw = skb->data;
425 skb->pkt_type = PACKET_HOST;
428 sl->dev->last_rx = jiffies;
431 static void x25_asy_disconnected(struct net_device *dev, int reason)
433 struct x25_asy *sl = dev->priv;
437 if ((skb = dev_alloc_skb(1)) == NULL) {
438 printk(KERN_ERR "x25_asy: out of memory\n");
442 ptr = skb_put(skb, 1);
446 skb->protocol = htons(ETH_P_X25);
447 skb->mac.raw = skb->data;
448 skb->pkt_type = PACKET_HOST;
451 sl->dev->last_rx = jiffies;
454 static struct lapb_register_struct x25_asy_callbacks = {
455 .connect_confirmation = x25_asy_connected,
456 .connect_indication = x25_asy_connected,
457 .disconnect_confirmation = x25_asy_disconnected,
458 .disconnect_indication = x25_asy_disconnected,
459 .data_indication = x25_asy_data_indication,
460 .data_transmit = x25_asy_data_transmit,
465 /* Open the low-level part of the X.25 channel. Easy! */
466 static int x25_asy_open(struct net_device *dev)
468 struct x25_asy *sl = (struct x25_asy*)(dev->priv);
476 * Allocate the X.25 frame buffers:
478 * rbuff Receive buffer.
479 * xbuff Transmit buffer.
484 sl->rbuff = (unsigned char *) kmalloc(len + 4, GFP_KERNEL);
485 if (sl->rbuff == NULL) {
488 sl->xbuff = (unsigned char *) kmalloc(len + 4, GFP_KERNEL);
489 if (sl->xbuff == NULL) {
496 sl->flags &= (1 << SLF_INUSE); /* Clear ESCAPE & ERROR flags */
498 netif_start_queue(dev);
503 if((err=lapb_register(dev, &x25_asy_callbacks))==LAPB_OK)
515 /* Close the low-level part of the X.25 channel. Easy! */
516 static int x25_asy_close(struct net_device *dev)
518 struct x25_asy *sl = (struct x25_asy*)(dev->priv);
521 spin_lock(&sl->lock);
523 sl->tty->flags &= ~(1 << TTY_DO_WRITE_WAKEUP);
525 netif_stop_queue(dev);
528 if((err=lapb_unregister(dev))!=LAPB_OK)
529 printk(KERN_ERR "x25_asy_close: lapb_unregister error -%d\n",err);
530 spin_unlock(&sl->lock);
534 static int x25_asy_receive_room(struct tty_struct *tty)
536 return 65536; /* We can handle an infinite amount of data. :-) */
540 * Handle the 'receiver data ready' interrupt.
541 * This function is called by the 'tty_io' module in the kernel when
542 * a block of X.25 data has been received, which can now be decapsulated
543 * and sent on to some IP layer for further processing.
546 static void x25_asy_receive_buf(struct tty_struct *tty, const unsigned char *cp, char *fp, int count)
548 struct x25_asy *sl = (struct x25_asy *) tty->disc_data;
550 if (!sl || sl->magic != X25_ASY_MAGIC || !netif_running(sl->dev))
554 /* Read the characters out of the buffer */
557 if (!test_and_set_bit(SLF_ERROR, &sl->flags)) {
558 sl->stats.rx_errors++;
563 x25_asy_unesc(sl, *cp++);
568 * Open the high-level part of the X.25 channel.
569 * This function is called by the TTY module when the
570 * X.25 line discipline is called for. Because we are
571 * sure the tty line exists, we only have to link it to
572 * a free X.25 channel...
575 static int x25_asy_open_tty(struct tty_struct *tty)
577 struct x25_asy *sl = (struct x25_asy *) tty->disc_data;
580 /* First make sure we're not already connected. */
581 if (sl && sl->magic == X25_ASY_MAGIC) {
585 /* OK. Find a free X.25 channel to use. */
586 if ((sl = x25_asy_alloc()) == NULL) {
592 if (tty->driver->flush_buffer) {
593 tty->driver->flush_buffer(tty);
595 if (tty->ldisc.flush_buffer) {
596 tty->ldisc.flush_buffer(tty);
599 /* Restore default settings */
600 sl->dev->type = ARPHRD_X25;
602 /* Perform the low-level X.25 async init */
603 if ((err = x25_asy_open(sl->dev)))
606 /* Done. We have linked the TTY line to a channel. */
607 return sl->dev->base_addr;
612 * Close down an X.25 channel.
613 * This means flushing out any pending queues, and then restoring the
614 * TTY line discipline to what it was before it got hooked to X.25
615 * (which usually is TTY again).
617 static void x25_asy_close_tty(struct tty_struct *tty)
619 struct x25_asy *sl = (struct x25_asy *) tty->disc_data;
621 /* First make sure we're connected. */
622 if (!sl || sl->magic != X25_ASY_MAGIC)
625 if (sl->dev->flags & IFF_UP)
627 (void) dev_close(sl->dev);
630 tty->disc_data = NULL;
636 static struct net_device_stats *x25_asy_get_stats(struct net_device *dev)
638 struct x25_asy *sl = (struct x25_asy*)(dev->priv);
644 /************************************************************************
645 * STANDARD X.25 ENCAPSULATION *
646 ************************************************************************/
648 int x25_asy_esc(unsigned char *s, unsigned char *d, int len)
650 unsigned char *ptr = d;
654 * Send an initial END character to flush out any
655 * data that may have accumulated in the receiver
659 *ptr++ = X25_END; /* Send 10111110 bit seq */
662 * For each byte in the packet, send the appropriate
663 * character sequence, according to the X.25 protocol.
672 *ptr++ = X25_ESCAPE(X25_END);
676 *ptr++ = X25_ESCAPE(X25_ESC);
687 static void x25_asy_unesc(struct x25_asy *sl, unsigned char s)
693 if (!test_and_clear_bit(SLF_ERROR, &sl->flags) && (sl->rcount > 2))
697 clear_bit(SLF_ESCAPE, &sl->flags);
702 set_bit(SLF_ESCAPE, &sl->flags);
705 case X25_ESCAPE(X25_ESC):
706 case X25_ESCAPE(X25_END):
707 if (test_and_clear_bit(SLF_ESCAPE, &sl->flags))
711 if (!test_bit(SLF_ERROR, &sl->flags))
713 if (sl->rcount < sl->buffsize)
715 sl->rbuff[sl->rcount++] = s;
718 sl->stats.rx_over_errors++;
719 set_bit(SLF_ERROR, &sl->flags);
724 /* Perform I/O control on an active X.25 channel. */
725 static int x25_asy_ioctl(struct tty_struct *tty, struct file *file,
726 unsigned int cmd, unsigned long arg)
728 struct x25_asy *sl = (struct x25_asy *) tty->disc_data;
730 /* First make sure we're connected. */
731 if (!sl || sl->magic != X25_ASY_MAGIC)
736 if (copy_to_user((void __user *)arg, sl->dev->name,
737 strlen(sl->dev->name) + 1))
742 /* Allow stty to read, but not set, the serial port */
745 return n_tty_ioctl(tty, file, cmd, arg);
751 static int x25_asy_open_dev(struct net_device *dev)
753 struct x25_asy *sl = (struct x25_asy*)(dev->priv);
759 /* Initialise the X.25 driver. Called by the device init code */
760 static void x25_asy_setup(struct net_device *dev)
762 struct x25_asy *sl = dev->priv;
764 sl->magic = X25_ASY_MAGIC;
766 spin_lock_init(&sl->lock);
767 set_bit(SLF_INUSE, &sl->flags);
770 * Finish setting up the DEVICE info.
774 dev->hard_start_xmit = x25_asy_xmit;
775 dev->tx_timeout = x25_asy_timeout;
776 dev->watchdog_timeo = HZ*20;
777 dev->open = x25_asy_open_dev;
778 dev->stop = x25_asy_close;
779 dev->get_stats = x25_asy_get_stats;
780 dev->change_mtu = x25_asy_change_mtu;
781 dev->hard_header_len = 0;
783 dev->type = ARPHRD_X25;
784 dev->tx_queue_len = 10;
786 /* New-style flags. */
787 dev->flags = IFF_NOARP;
790 static struct tty_ldisc x25_ldisc = {
791 .owner = THIS_MODULE,
792 .magic = TTY_LDISC_MAGIC,
794 .open = x25_asy_open_tty,
795 .close = x25_asy_close_tty,
796 .ioctl = x25_asy_ioctl,
797 .receive_buf = x25_asy_receive_buf,
798 .receive_room = x25_asy_receive_room,
799 .write_wakeup = x25_asy_write_wakeup,
802 static int __init init_x25_asy(void)
804 if (x25_asy_maxdev < 4)
805 x25_asy_maxdev = 4; /* Sanity */
807 printk(KERN_INFO "X.25 async: version 0.00 ALPHA "
808 "(dynamic channels, max=%d).\n", x25_asy_maxdev );
810 x25_asy_devs = kmalloc(sizeof(struct net_device *)*x25_asy_maxdev,
813 printk(KERN_WARNING "X25 async: Can't allocate x25_asy_ctrls[] "
814 "array! Uaargh! (-> No X.25 available)\n");
817 memset(x25_asy_devs, 0, sizeof(struct net_device *)*x25_asy_maxdev);
819 return tty_register_ldisc(N_X25, &x25_ldisc);
823 static void __exit exit_x25_asy(void)
825 struct net_device *dev;
828 for (i = 0; i < x25_asy_maxdev; i++) {
829 dev = x25_asy_devs[i];
831 struct x25_asy *sl = dev->priv;
833 spin_lock_bh(&sl->lock);
837 spin_unlock_bh(&sl->lock);
839 * VSV = if dev->start==0, then device
840 * unregistered while close proc.
842 unregister_netdev(dev);
848 tty_register_ldisc(N_X25, NULL);
851 module_init(init_x25_asy);
852 module_exit(exit_x25_asy);