2 * slip.c This module implements the SLIP protocol for kernel-based
3 * devices like TTY. It interfaces between a raw TTY, and the
4 * kernel's INET protocol layers.
6 * Version: @(#)slip.c 0.8.3 12/24/94
12 * Alan Cox : Sanity checks and avoid tx overruns.
13 * Has a new sl->mtu field.
14 * Alan Cox : Found cause of overrun. ifconfig sl0
15 * mtu upwards. Driver now spots this
16 * and grows/shrinks its buffers(hack!).
17 * Memory leak if you run out of memory
18 * setting up a slip driver fixed.
19 * Matt Dillon : Printable slip (borrowed from NET2E)
20 * Pauline Middelink : Slip driver fixes.
21 * Alan Cox : Honours the old SL_COMPRESSED flag
22 * Alan Cox : KISS AX.25 and AXUI IP support
23 * Michael Riepe : Automatic CSLIP recognition added
24 * Charles Hedrick : CSLIP header length problem fix.
25 * Alan Cox : Corrected non-IP cases of the above.
26 * Alan Cox : Now uses hardware type as per FvK.
27 * Alan Cox : Default to 192.168.0.0 (RFC 1597)
28 * A.N.Kuznetsov : dev_tint() recursion fix.
29 * Dmitry Gorodchanin : SLIP memory leaks
30 * Dmitry Gorodchanin : Code cleanup. Reduce tty driver
31 * buffering from 4096 to 256 bytes.
32 * Improving SLIP response time.
33 * CONFIG_SLIP_MODE_SLIP6.
34 * ifconfig sl? up & down now works
37 * Alan Cox : Oops - fix AX.25 buffer lengths
38 * Dmitry Gorodchanin : Even more cleanups. Preserve CSLIP
39 * statistics. Include CSLIP code only
40 * if it really needed.
41 * Alan Cox : Free slhc buffers in the right place.
42 * Alan Cox : Allow for digipeated IP over AX.25
43 * Matti Aarnio : Dynamic SLIP devices, with ideas taken
45 * dynamic PPP devices. We do NOT kfree()
46 * device entries, just reg./unreg. them
47 * as they are needed. We kfree() them
49 * With MODULE-loading ``insmod'', user
50 * can issue parameter: slip_maxdev=1024
51 * (Or how much he/she wants.. Default
53 * Stanislav Voronyi : Slip line checking, with ideas taken
54 * from multislip BSDI driver which was
55 * written by Igor Chechik, RELCOM Corp.
56 * Only algorithms have been ported to
58 * Vitaly E. Lavrov : Sane behaviour on tty hangup.
59 * Alexey Kuznetsov : Cleanup interfaces to tty & netdevice
63 #define SL_CHECK_TRANSMIT
64 #include <linux/module.h>
65 #include <linux/moduleparam.h>
67 #include <asm/system.h>
68 #include <asm/uaccess.h>
69 #include <linux/bitops.h>
70 #include <linux/string.h>
72 #include <linux/interrupt.h>
74 #include <linux/tty.h>
75 #include <linux/errno.h>
76 #include <linux/netdevice.h>
77 #include <linux/etherdevice.h>
78 #include <linux/skbuff.h>
79 #include <linux/rtnetlink.h>
80 #include <linux/if_arp.h>
81 #include <linux/if_slip.h>
82 #include <linux/delay.h>
83 #include <linux/init.h>
87 #include <linux/tcp.h>
88 #include <net/slhc_vj.h>
91 #define SLIP_VERSION "0.8.4-NET3.019-NEWTTY"
93 static struct net_device **slip_devs;
95 static int slip_maxdev = SL_NRUNIT;
96 module_param(slip_maxdev, int, 0);
97 MODULE_PARM_DESC(slip_maxdev, "Maximum number of slip devices");
99 static int slip_esc(unsigned char *p, unsigned char *d, int len);
100 static void slip_unesc(struct slip *sl, unsigned char c);
101 #ifdef CONFIG_SLIP_MODE_SLIP6
102 static int slip_esc6(unsigned char *p, unsigned char *d, int len);
103 static void slip_unesc6(struct slip *sl, unsigned char c);
105 #ifdef CONFIG_SLIP_SMART
106 static void sl_keepalive(unsigned long sls);
107 static void sl_outfill(unsigned long sls);
108 static int sl_ioctl(struct net_device *dev, struct ifreq *rq, int cmd);
111 /********************************
112 * Buffer administration routines:
117 * NOTE: sl_realloc_bufs != sl_free_bufs + sl_alloc_bufs, because
118 * sl_realloc_bufs provides strong atomicity and reallocation
119 * on actively running device.
120 *********************************/
123 Allocate channel buffers.
126 static int sl_alloc_bufs(struct slip *sl, int mtu)
132 #ifdef SL_INCLUDE_CSLIP
134 struct slcompress *slcomp = NULL;
138 * Allocate the SLIP frame buffers:
140 * rbuff Receive buffer.
141 * xbuff Transmit buffer.
142 * cbuff Temporary compression buffer.
147 * allow for arrival of larger UDP packets, even if we say not to
148 * also fixes a bug in which SunOS sends 512-byte packets even with
153 rbuff = kmalloc(len + 4, GFP_KERNEL);
156 xbuff = kmalloc(len + 4, GFP_KERNEL);
159 #ifdef SL_INCLUDE_CSLIP
160 cbuff = kmalloc(len + 4, GFP_KERNEL);
163 slcomp = slhc_init(16, 16);
167 spin_lock_bh(&sl->lock);
168 if (sl->tty == NULL) {
169 spin_unlock_bh(&sl->lock);
177 rbuff = xchg(&sl->rbuff, rbuff);
178 xbuff = xchg(&sl->xbuff, xbuff);
179 #ifdef SL_INCLUDE_CSLIP
180 cbuff = xchg(&sl->cbuff, cbuff);
181 slcomp = xchg(&sl->slcomp, slcomp);
182 #ifdef CONFIG_SLIP_MODE_SLIP6
187 spin_unlock_bh(&sl->lock);
192 #ifdef SL_INCLUDE_CSLIP
202 /* Free a SLIP channel buffers. */
203 static void sl_free_bufs(struct slip *sl)
205 /* Free all SLIP frame buffers. */
206 kfree(xchg(&sl->rbuff, NULL));
207 kfree(xchg(&sl->xbuff, NULL));
208 #ifdef SL_INCLUDE_CSLIP
209 kfree(xchg(&sl->cbuff, NULL));
210 slhc_free(xchg(&sl->slcomp, NULL));
215 Reallocate slip channel buffers.
218 static int sl_realloc_bufs(struct slip *sl, int mtu)
221 struct net_device *dev = sl->dev;
222 unsigned char *xbuff, *rbuff;
223 #ifdef SL_INCLUDE_CSLIP
224 unsigned char *cbuff;
229 * allow for arrival of larger UDP packets, even if we say not to
230 * also fixes a bug in which SunOS sends 512-byte packets even with
236 xbuff = kmalloc(len + 4, GFP_ATOMIC);
237 rbuff = kmalloc(len + 4, GFP_ATOMIC);
238 #ifdef SL_INCLUDE_CSLIP
239 cbuff = kmalloc(len + 4, GFP_ATOMIC);
243 #ifdef SL_INCLUDE_CSLIP
244 if (xbuff == NULL || rbuff == NULL || cbuff == NULL) {
246 if (xbuff == NULL || rbuff == NULL) {
248 if (mtu >= sl->mtu) {
249 printk(KERN_WARNING "%s: unable to grow slip buffers, MTU change cancelled.\n",
255 spin_lock_bh(&sl->lock);
261 xbuff = xchg(&sl->xbuff, xbuff);
262 rbuff = xchg(&sl->rbuff, rbuff);
263 #ifdef SL_INCLUDE_CSLIP
264 cbuff = xchg(&sl->cbuff, cbuff);
267 if (sl->xleft <= len) {
268 memcpy(sl->xbuff, sl->xhead, sl->xleft);
274 sl->xhead = sl->xbuff;
277 if (sl->rcount <= len) {
278 memcpy(sl->rbuff, rbuff, sl->rcount);
281 sl->rx_over_errors++;
282 set_bit(SLF_ERROR, &sl->flags);
291 spin_unlock_bh(&sl->lock);
296 #ifdef SL_INCLUDE_CSLIP
303 /* Set the "sending" flag. This must be atomic hence the set_bit. */
304 static inline void sl_lock(struct slip *sl)
306 netif_stop_queue(sl->dev);
310 /* Clear the "sending" flag. This must be atomic, hence the ASM. */
311 static inline void sl_unlock(struct slip *sl)
313 netif_wake_queue(sl->dev);
316 /* Send one completely decapsulated IP datagram to the IP layer. */
317 static void sl_bump(struct slip *sl)
323 #ifdef SL_INCLUDE_CSLIP
324 if (sl->mode & (SL_MODE_ADAPTIVE | SL_MODE_CSLIP)) {
325 unsigned char c = sl->rbuff[0];
326 if (c & SL_TYPE_COMPRESSED_TCP) {
327 /* ignore compressed packets when CSLIP is off */
328 if (!(sl->mode & SL_MODE_CSLIP)) {
329 printk(KERN_WARNING "%s: compressed packet ignored\n", sl->dev->name);
332 /* make sure we've reserved enough space for uncompress
334 if (count + 80 > sl->buffsize) {
335 sl->rx_over_errors++;
338 count = slhc_uncompress(sl->slcomp, sl->rbuff, count);
341 } else if (c >= SL_TYPE_UNCOMPRESSED_TCP) {
342 if (!(sl->mode & SL_MODE_CSLIP)) {
343 /* turn on header compression */
344 sl->mode |= SL_MODE_CSLIP;
345 sl->mode &= ~SL_MODE_ADAPTIVE;
346 printk(KERN_INFO "%s: header compression turned on\n", sl->dev->name);
348 sl->rbuff[0] &= 0x4f;
349 if (slhc_remember(sl->slcomp, sl->rbuff, count) <= 0)
353 #endif /* SL_INCLUDE_CSLIP */
355 sl->rx_bytes += count;
357 skb = dev_alloc_skb(count);
359 printk(KERN_WARNING "%s: memory squeeze, dropping packet.\n", sl->dev->name);
364 memcpy(skb_put(skb, count), sl->rbuff, count);
365 skb_reset_mac_header(skb);
366 skb->protocol = htons(ETH_P_IP);
371 /* Encapsulate one IP datagram and stuff into a TTY queue. */
372 static void sl_encaps(struct slip *sl, unsigned char *icp, int len)
377 if (len > sl->mtu) { /* Sigh, shouldn't occur BUT ... */
378 printk(KERN_WARNING "%s: truncating oversized transmit packet!\n", sl->dev->name);
385 #ifdef SL_INCLUDE_CSLIP
386 if (sl->mode & SL_MODE_CSLIP)
387 len = slhc_compress(sl->slcomp, p, len, sl->cbuff, &p, 1);
389 #ifdef CONFIG_SLIP_MODE_SLIP6
390 if (sl->mode & SL_MODE_SLIP6)
391 count = slip_esc6(p, (unsigned char *) sl->xbuff, len);
394 count = slip_esc(p, (unsigned char *) sl->xbuff, len);
396 /* Order of next two lines is *very* important.
397 * When we are sending a little amount of data,
398 * the transfer may be completed inside the ops->write()
399 * routine, because it's running with interrupts enabled.
400 * In this case we *never* got WRITE_WAKEUP event,
401 * if we did not request it before write operation.
402 * 14 Oct 1994 Dmitry Gorodchanin.
404 set_bit(TTY_DO_WRITE_WAKEUP, &sl->tty->flags);
405 actual = sl->tty->ops->write(sl->tty, sl->xbuff, count);
406 #ifdef SL_CHECK_TRANSMIT
407 sl->dev->trans_start = jiffies;
409 sl->xleft = count - actual;
410 sl->xhead = sl->xbuff + actual;
411 #ifdef CONFIG_SLIP_SMART
413 clear_bit(SLF_OUTWAIT, &sl->flags); /* reset outfill flag */
418 * Called by the driver when there's room for more data. If we have
419 * more packets to send, we send them here.
421 static void slip_write_wakeup(struct tty_struct *tty)
424 struct slip *sl = tty->disc_data;
426 /* First make sure we're connected. */
427 if (!sl || sl->magic != SLIP_MAGIC || !netif_running(sl->dev))
430 if (sl->xleft <= 0) {
431 /* Now serial buffer is almost free & we can start
432 * transmission of another packet */
434 clear_bit(TTY_DO_WRITE_WAKEUP, &tty->flags);
439 actual = tty->ops->write(tty, sl->xhead, sl->xleft);
444 static void sl_tx_timeout(struct net_device *dev)
446 struct slip *sl = netdev_priv(dev);
448 spin_lock(&sl->lock);
450 if (netif_queue_stopped(dev)) {
451 if (!netif_running(dev))
454 /* May be we must check transmitter timeout here ?
455 * 14 Oct 1994 Dmitry Gorodchanin.
457 #ifdef SL_CHECK_TRANSMIT
458 if (time_before(jiffies, dev->trans_start + 20 * HZ)) {
459 /* 20 sec timeout not reached */
462 printk(KERN_WARNING "%s: transmit timed out, %s?\n",
464 (tty_chars_in_buffer(sl->tty) || sl->xleft) ?
465 "bad line quality" : "driver error");
467 clear_bit(TTY_DO_WRITE_WAKEUP, &sl->tty->flags);
472 spin_unlock(&sl->lock);
476 /* Encapsulate an IP datagram and kick it into a TTY queue. */
478 sl_xmit(struct sk_buff *skb, struct net_device *dev)
480 struct slip *sl = netdev_priv(dev);
482 spin_lock(&sl->lock);
483 if (!netif_running(dev)) {
484 spin_unlock(&sl->lock);
485 printk(KERN_WARNING "%s: xmit call when iface is down\n", dev->name);
489 if (sl->tty == NULL) {
490 spin_unlock(&sl->lock);
496 sl->tx_bytes += skb->len;
497 sl_encaps(sl, skb->data, skb->len);
498 spin_unlock(&sl->lock);
505 /******************************************
506 * Routines looking at netdevice side.
507 ******************************************/
509 /* Netdevice UP -> DOWN routine */
512 sl_close(struct net_device *dev)
514 struct slip *sl = netdev_priv(dev);
516 spin_lock_bh(&sl->lock);
518 /* TTY discipline is running. */
519 clear_bit(TTY_DO_WRITE_WAKEUP, &sl->tty->flags);
520 netif_stop_queue(dev);
523 spin_unlock_bh(&sl->lock);
528 /* Netdevice DOWN -> UP routine */
530 static int sl_open(struct net_device *dev)
532 struct slip *sl = netdev_priv(dev);
537 sl->flags &= (1 << SLF_INUSE);
538 netif_start_queue(dev);
542 /* Netdevice change MTU request */
544 static int sl_change_mtu(struct net_device *dev, int new_mtu)
546 struct slip *sl = netdev_priv(dev);
548 if (new_mtu < 68 || new_mtu > 65534)
551 if (new_mtu != dev->mtu)
552 return sl_realloc_bufs(sl, new_mtu);
556 /* Netdevice get statistics request */
558 static struct net_device_stats *
559 sl_get_stats(struct net_device *dev)
561 static struct net_device_stats stats;
562 struct slip *sl = netdev_priv(dev);
563 #ifdef SL_INCLUDE_CSLIP
564 struct slcompress *comp;
567 memset(&stats, 0, sizeof(struct net_device_stats));
569 stats.rx_packets = sl->rx_packets;
570 stats.tx_packets = sl->tx_packets;
571 stats.rx_bytes = sl->rx_bytes;
572 stats.tx_bytes = sl->tx_bytes;
573 stats.rx_dropped = sl->rx_dropped;
574 stats.tx_dropped = sl->tx_dropped;
575 stats.tx_errors = sl->tx_errors;
576 stats.rx_errors = sl->rx_errors;
577 stats.rx_over_errors = sl->rx_over_errors;
578 #ifdef SL_INCLUDE_CSLIP
579 stats.rx_fifo_errors = sl->rx_compressed;
580 stats.tx_fifo_errors = sl->tx_compressed;
581 stats.collisions = sl->tx_misses;
584 stats.rx_fifo_errors += comp->sls_i_compressed;
585 stats.rx_dropped += comp->sls_i_tossed;
586 stats.tx_fifo_errors += comp->sls_o_compressed;
587 stats.collisions += comp->sls_o_misses;
589 #endif /* CONFIG_INET */
593 /* Netdevice register callback */
595 static int sl_init(struct net_device *dev)
597 struct slip *sl = netdev_priv(dev);
600 * Finish setting up the DEVICE info.
604 dev->type = ARPHRD_SLIP + sl->mode;
605 #ifdef SL_CHECK_TRANSMIT
606 dev->watchdog_timeo = 20*HZ;
612 static void sl_uninit(struct net_device *dev)
614 struct slip *sl = netdev_priv(dev);
619 /* Hook the destructor so we can free slip devices at the right point in time */
620 static void sl_free_netdev(struct net_device *dev)
622 int i = dev->base_addr;
627 static const struct net_device_ops sl_netdev_ops = {
629 .ndo_uninit = sl_uninit,
631 .ndo_stop = sl_close,
632 .ndo_start_xmit = sl_xmit,
633 .ndo_get_stats = sl_get_stats,
634 .ndo_change_mtu = sl_change_mtu,
635 .ndo_tx_timeout = sl_tx_timeout,
636 #ifdef CONFIG_SLIP_SMART
637 .ndo_do_ioctl = sl_ioctl,
642 static void sl_setup(struct net_device *dev)
644 dev->netdev_ops = &sl_netdev_ops;
645 dev->destructor = sl_free_netdev;
647 dev->hard_header_len = 0;
649 dev->tx_queue_len = 10;
651 /* New-style flags. */
652 dev->flags = IFF_NOARP|IFF_POINTOPOINT|IFF_MULTICAST;
655 /******************************************
656 Routines looking at TTY side.
657 ******************************************/
661 * Handle the 'receiver data ready' interrupt.
662 * This function is called by the 'tty_io' module in the kernel when
663 * a block of SLIP data has been received, which can now be decapsulated
664 * and sent on to some IP layer for further processing. This will not
665 * be re-entered while running but other ldisc functions may be called
669 static void slip_receive_buf(struct tty_struct *tty, const unsigned char *cp,
672 struct slip *sl = tty->disc_data;
674 if (!sl || sl->magic != SLIP_MAGIC || !netif_running(sl->dev))
677 /* Read the characters out of the buffer */
680 if (!test_and_set_bit(SLF_ERROR, &sl->flags))
685 #ifdef CONFIG_SLIP_MODE_SLIP6
686 if (sl->mode & SL_MODE_SLIP6)
687 slip_unesc6(sl, *cp++);
690 slip_unesc(sl, *cp++);
694 /************************************
695 * slip_open helper routines.
696 ************************************/
698 /* Collect hanged up channels */
699 static void sl_sync(void)
702 struct net_device *dev;
705 for (i = 0; i < slip_maxdev; i++) {
710 sl = netdev_priv(dev);
711 if (sl->tty || sl->leased)
713 if (dev->flags & IFF_UP)
719 /* Find a free SLIP channel, and link in this `tty' line. */
720 static struct slip *sl_alloc(dev_t line)
723 struct net_device *dev = NULL;
726 if (slip_devs == NULL)
727 return NULL; /* Master array missing ! */
729 for (i = 0; i < slip_maxdev; i++) {
734 /* Sorry, too many, all slots in use */
735 if (i >= slip_maxdev)
739 sl = netdev_priv(dev);
740 if (test_bit(SLF_INUSE, &sl->flags)) {
741 unregister_netdevice(dev);
749 sprintf(name, "sl%d", i);
751 dev = alloc_netdev(sizeof(*sl), name, sl_setup);
757 sl = netdev_priv(dev);
759 /* Initialize channel control data */
760 sl->magic = SLIP_MAGIC;
762 spin_lock_init(&sl->lock);
763 sl->mode = SL_MODE_DEFAULT;
764 #ifdef CONFIG_SLIP_SMART
765 /* initialize timer_list struct */
766 init_timer(&sl->keepalive_timer);
767 sl->keepalive_timer.data = (unsigned long)sl;
768 sl->keepalive_timer.function = sl_keepalive;
769 init_timer(&sl->outfill_timer);
770 sl->outfill_timer.data = (unsigned long)sl;
771 sl->outfill_timer.function = sl_outfill;
778 * Open the high-level part of the SLIP channel.
779 * This function is called by the TTY module when the
780 * SLIP line discipline is called for. Because we are
781 * sure the tty line exists, we only have to link it to
782 * a free SLIP channel...
784 * Called in process context serialized from other ldisc calls.
787 static int slip_open(struct tty_struct *tty)
792 if (!capable(CAP_NET_ADMIN))
795 if (tty->ops->write == NULL)
798 /* RTnetlink lock is misused here to serialize concurrent
799 opens of slip channels. There are better ways, but it is
804 /* Collect hanged up channels. */
810 /* First make sure we're not already connected. */
811 if (sl && sl->magic == SLIP_MAGIC)
814 /* OK. Find a free SLIP channel to use. */
816 sl = sl_alloc(tty_devnum(tty));
822 sl->line = tty_devnum(tty);
823 sl->pid = current->pid;
825 if (!test_bit(SLF_INUSE, &sl->flags)) {
826 /* Perform the low-level SLIP initialization. */
827 err = sl_alloc_bufs(sl, SL_MTU);
831 set_bit(SLF_INUSE, &sl->flags);
833 err = register_netdevice(sl->dev);
838 #ifdef CONFIG_SLIP_SMART
840 sl->keepalive_timer.expires = jiffies + sl->keepalive * HZ;
841 add_timer(&sl->keepalive_timer);
844 sl->outfill_timer.expires = jiffies + sl->outfill * HZ;
845 add_timer(&sl->outfill_timer);
849 /* Done. We have linked the TTY line to a channel. */
851 tty->receive_room = 65536; /* We don't flow control */
852 return sl->dev->base_addr;
859 tty->disc_data = NULL;
860 clear_bit(SLF_INUSE, &sl->flags);
865 /* Count references from TTY module */
870 * Close down a SLIP channel.
871 * This means flushing out any pending queues, and then returning. This
872 * call is serialized against other ldisc functions.
874 * We also use this method fo a hangup event
877 static void slip_close(struct tty_struct *tty)
879 struct slip *sl = tty->disc_data;
881 /* First make sure we're connected. */
882 if (!sl || sl->magic != SLIP_MAGIC || sl->tty != tty)
885 tty->disc_data = NULL;
890 /* VSV = very important to remove timers */
891 #ifdef CONFIG_SLIP_SMART
892 del_timer_sync(&sl->keepalive_timer);
893 del_timer_sync(&sl->outfill_timer);
895 /* Flush network side */
896 unregister_netdev(sl->dev);
897 /* This will complete via sl_free_netdev */
900 static int slip_hangup(struct tty_struct *tty)
905 /************************************************************************
906 * STANDARD SLIP ENCAPSULATION *
907 ************************************************************************/
909 static int slip_esc(unsigned char *s, unsigned char *d, int len)
911 unsigned char *ptr = d;
915 * Send an initial END character to flush out any
916 * data that may have accumulated in the receiver
923 * For each byte in the packet, send the appropriate
924 * character sequence, according to the SLIP protocol.
946 static void slip_unesc(struct slip *sl, unsigned char s)
951 #ifdef CONFIG_SLIP_SMART
952 /* drop keeptest bit = VSV */
953 if (test_bit(SLF_KEEPTEST, &sl->flags))
954 clear_bit(SLF_KEEPTEST, &sl->flags);
957 if (!test_and_clear_bit(SLF_ERROR, &sl->flags)
960 clear_bit(SLF_ESCAPE, &sl->flags);
965 set_bit(SLF_ESCAPE, &sl->flags);
968 if (test_and_clear_bit(SLF_ESCAPE, &sl->flags))
972 if (test_and_clear_bit(SLF_ESCAPE, &sl->flags))
976 if (!test_bit(SLF_ERROR, &sl->flags)) {
977 if (sl->rcount < sl->buffsize) {
978 sl->rbuff[sl->rcount++] = s;
981 sl->rx_over_errors++;
982 set_bit(SLF_ERROR, &sl->flags);
987 #ifdef CONFIG_SLIP_MODE_SLIP6
988 /************************************************************************
989 * 6 BIT SLIP ENCAPSULATION *
990 ************************************************************************/
992 static int slip_esc6(unsigned char *s, unsigned char *d, int len)
994 unsigned char *ptr = d;
997 unsigned short v = 0;
1001 * Send an initial END character to flush out any
1002 * data that may have accumulated in the receiver
1003 * due to line noise.
1009 * Encode the packet into printable ascii characters
1012 for (i = 0; i < len; ++i) {
1013 v = (v << 8) | s[i];
1017 c = 0x30 + ((v >> bits) & 0x3F);
1022 c = 0x30 + ((v << (6 - bits)) & 0x3F);
1029 static void slip_unesc6(struct slip *sl, unsigned char s)
1034 #ifdef CONFIG_SLIP_SMART
1035 /* drop keeptest bit = VSV */
1036 if (test_bit(SLF_KEEPTEST, &sl->flags))
1037 clear_bit(SLF_KEEPTEST, &sl->flags);
1040 if (!test_and_clear_bit(SLF_ERROR, &sl->flags)
1041 && (sl->rcount > 2))
1046 } else if (s >= 0x30 && s < 0x70) {
1047 sl->xdata = (sl->xdata << 6) | ((s - 0x30) & 0x3F);
1049 if (sl->xbits >= 8) {
1051 c = (unsigned char)(sl->xdata >> sl->xbits);
1052 if (!test_bit(SLF_ERROR, &sl->flags)) {
1053 if (sl->rcount < sl->buffsize) {
1054 sl->rbuff[sl->rcount++] = c;
1057 sl->rx_over_errors++;
1058 set_bit(SLF_ERROR, &sl->flags);
1063 #endif /* CONFIG_SLIP_MODE_SLIP6 */
1065 /* Perform I/O control on an active SLIP channel. */
1066 static int slip_ioctl(struct tty_struct *tty, struct file *file,
1067 unsigned int cmd, unsigned long arg)
1069 struct slip *sl = tty->disc_data;
1071 int __user *p = (int __user *)arg;
1073 /* First make sure we're connected. */
1074 if (!sl || sl->magic != SLIP_MAGIC)
1079 tmp = strlen(sl->dev->name) + 1;
1080 if (copy_to_user((void __user *)arg, sl->dev->name, tmp))
1085 if (put_user(sl->mode, p))
1090 if (get_user(tmp, p))
1092 #ifndef SL_INCLUDE_CSLIP
1093 if (tmp & (SL_MODE_CSLIP|SL_MODE_ADAPTIVE))
1096 if ((tmp & (SL_MODE_ADAPTIVE | SL_MODE_CSLIP)) ==
1097 (SL_MODE_ADAPTIVE | SL_MODE_CSLIP))
1098 /* return -EINVAL; */
1099 tmp &= ~SL_MODE_ADAPTIVE;
1101 #ifndef CONFIG_SLIP_MODE_SLIP6
1102 if (tmp & SL_MODE_SLIP6)
1106 sl->dev->type = ARPHRD_SLIP + sl->mode;
1112 #ifdef CONFIG_SLIP_SMART
1113 /* VSV changes start here */
1114 case SIOCSKEEPALIVE:
1115 if (get_user(tmp, p))
1117 if (tmp > 255) /* max for unchar */
1120 spin_lock_bh(&sl->lock);
1122 spin_unlock_bh(&sl->lock);
1125 sl->keepalive = (u8)tmp;
1126 if (sl->keepalive != 0) {
1127 mod_timer(&sl->keepalive_timer,
1128 jiffies + sl->keepalive * HZ);
1129 set_bit(SLF_KEEPTEST, &sl->flags);
1131 del_timer(&sl->keepalive_timer);
1132 spin_unlock_bh(&sl->lock);
1135 case SIOCGKEEPALIVE:
1136 if (put_user(sl->keepalive, p))
1141 if (get_user(tmp, p))
1143 if (tmp > 255) /* max for unchar */
1145 spin_lock_bh(&sl->lock);
1147 spin_unlock_bh(&sl->lock);
1150 sl->outfill = (u8)tmp;
1151 if (sl->outfill != 0) {
1152 mod_timer(&sl->outfill_timer,
1153 jiffies + sl->outfill * HZ);
1154 set_bit(SLF_OUTWAIT, &sl->flags);
1156 del_timer(&sl->outfill_timer);
1157 spin_unlock_bh(&sl->lock);
1161 if (put_user(sl->outfill, p))
1164 /* VSV changes end */
1167 return tty_mode_ioctl(tty, file, cmd, arg);
1171 /* VSV changes start here */
1172 #ifdef CONFIG_SLIP_SMART
1173 /* function do_ioctl called from net/core/dev.c
1174 to allow get/set outfill/keepalive parameter
1177 static int sl_ioctl(struct net_device *dev, struct ifreq *rq, int cmd)
1179 struct slip *sl = netdev_priv(dev);
1180 unsigned long *p = (unsigned long *)&rq->ifr_ifru;
1182 if (sl == NULL) /* Allocation failed ?? */
1185 spin_lock_bh(&sl->lock);
1188 spin_unlock_bh(&sl->lock);
1193 case SIOCSKEEPALIVE:
1194 /* max for unchar */
1195 if ((unsigned)*p > 255) {
1196 spin_unlock_bh(&sl->lock);
1199 sl->keepalive = (u8)*p;
1200 if (sl->keepalive != 0) {
1201 sl->keepalive_timer.expires =
1202 jiffies + sl->keepalive * HZ;
1203 mod_timer(&sl->keepalive_timer,
1204 jiffies + sl->keepalive * HZ);
1205 set_bit(SLF_KEEPTEST, &sl->flags);
1207 del_timer(&sl->keepalive_timer);
1210 case SIOCGKEEPALIVE:
1215 if ((unsigned)*p > 255) { /* max for unchar */
1216 spin_unlock_bh(&sl->lock);
1219 sl->outfill = (u8)*p;
1220 if (sl->outfill != 0) {
1221 mod_timer(&sl->outfill_timer,
1222 jiffies + sl->outfill * HZ);
1223 set_bit(SLF_OUTWAIT, &sl->flags);
1225 del_timer(&sl->outfill_timer);
1233 /* Resolve race condition, when ioctl'ing hanged up
1234 and opened by another process device.
1236 if (sl->tty != current->signal->tty &&
1237 sl->pid != current->pid) {
1238 spin_unlock_bh(&sl->lock);
1249 spin_unlock_bh(&sl->lock);
1253 /* VSV changes end */
1255 static struct tty_ldisc_ops sl_ldisc = {
1256 .owner = THIS_MODULE,
1257 .magic = TTY_LDISC_MAGIC,
1260 .close = slip_close,
1261 .hangup = slip_hangup,
1262 .ioctl = slip_ioctl,
1263 .receive_buf = slip_receive_buf,
1264 .write_wakeup = slip_write_wakeup,
1267 static int __init slip_init(void)
1271 if (slip_maxdev < 4)
1272 slip_maxdev = 4; /* Sanity */
1274 printk(KERN_INFO "SLIP: version %s (dynamic channels, max=%d)"
1275 #ifdef CONFIG_SLIP_MODE_SLIP6
1276 " (6 bit encapsulation enabled)"
1279 SLIP_VERSION, slip_maxdev);
1280 #if defined(SL_INCLUDE_CSLIP)
1281 printk(KERN_INFO "CSLIP: code copyright 1989 Regents of the University of California.\n");
1283 #ifdef CONFIG_SLIP_SMART
1284 printk(KERN_INFO "SLIP linefill/keepalive option.\n");
1287 slip_devs = kzalloc(sizeof(struct net_device *)*slip_maxdev,
1290 printk(KERN_ERR "SLIP: Can't allocate slip devices array.\n");
1294 /* Fill in our line protocol discipline, and register it */
1295 status = tty_register_ldisc(N_SLIP, &sl_ldisc);
1297 printk(KERN_ERR "SLIP: can't register line discipline (err = %d)\n", status);
1303 static void __exit slip_exit(void)
1306 struct net_device *dev;
1308 unsigned long timeout = jiffies + HZ;
1311 if (slip_devs == NULL)
1314 /* First of all: check for active disciplines and hangup them.
1318 msleep_interruptible(100);
1321 for (i = 0; i < slip_maxdev; i++) {
1325 sl = netdev_priv(dev);
1326 spin_lock_bh(&sl->lock);
1329 tty_hangup(sl->tty);
1331 spin_unlock_bh(&sl->lock);
1333 } while (busy && time_before(jiffies, timeout));
1335 /* FIXME: hangup is async so we should wait when doing this second
1338 for (i = 0; i < slip_maxdev; i++) {
1342 slip_devs[i] = NULL;
1344 sl = netdev_priv(dev);
1346 printk(KERN_ERR "%s: tty discipline still running\n",
1348 /* Intentionally leak the control block. */
1349 dev->destructor = NULL;
1352 unregister_netdev(dev);
1358 i = tty_unregister_ldisc(N_SLIP);
1360 printk(KERN_ERR "SLIP: can't unregister line discipline (err = %d)\n", i);
1363 module_init(slip_init);
1364 module_exit(slip_exit);
1366 #ifdef CONFIG_SLIP_SMART
1368 * This is start of the code for multislip style line checking
1369 * added by Stanislav Voronyi. All changes before marked VSV
1372 static void sl_outfill(unsigned long sls)
1374 struct slip *sl = (struct slip *)sls;
1376 spin_lock(&sl->lock);
1378 if (sl->tty == NULL)
1382 if (test_bit(SLF_OUTWAIT, &sl->flags)) {
1383 /* no packets were transmitted, do outfill */
1384 #ifdef CONFIG_SLIP_MODE_SLIP6
1385 unsigned char s = (sl->mode & SL_MODE_SLIP6)?0x70:END;
1387 unsigned char s = END;
1389 /* put END into tty queue. Is it right ??? */
1390 if (!netif_queue_stopped(sl->dev)) {
1391 /* if device busy no outfill */
1392 sl->tty->ops->write(sl->tty, &s, 1);
1395 set_bit(SLF_OUTWAIT, &sl->flags);
1397 mod_timer(&sl->outfill_timer, jiffies+sl->outfill*HZ);
1400 spin_unlock(&sl->lock);
1403 static void sl_keepalive(unsigned long sls)
1405 struct slip *sl = (struct slip *)sls;
1407 spin_lock(&sl->lock);
1409 if (sl->tty == NULL)
1412 if (sl->keepalive) {
1413 if (test_bit(SLF_KEEPTEST, &sl->flags)) {
1414 /* keepalive still high :(, we must hangup */
1416 /* outfill timer must be deleted too */
1417 (void)del_timer(&sl->outfill_timer);
1418 printk(KERN_DEBUG "%s: no packets received during keepalive timeout, hangup.\n", sl->dev->name);
1419 /* this must hangup tty & close slip */
1420 tty_hangup(sl->tty);
1421 /* I think we need not something else */
1424 set_bit(SLF_KEEPTEST, &sl->flags);
1426 mod_timer(&sl->keepalive_timer, jiffies+sl->keepalive*HZ);
1429 spin_unlock(&sl->lock);
1433 MODULE_LICENSE("GPL");
1434 MODULE_ALIAS_LDISC(N_SLIP);