mirror of https://gitee.com/openkylin/linux.git
952 lines
24 KiB
C
952 lines
24 KiB
C
/*
|
|
* MKISS Driver
|
|
*
|
|
* This module:
|
|
* This module is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License
|
|
* as published by the Free Software Foundation; either version
|
|
* 2 of the License, or (at your option) any later version.
|
|
*
|
|
* This module implements the AX.25 protocol for kernel-based
|
|
* devices like TTYs. It interfaces between a raw TTY, and the
|
|
* kernel's AX.25 protocol layers, just like slip.c.
|
|
* AX.25 needs to be separated from slip.c while slip.c is no
|
|
* longer a static kernel device since it is a module.
|
|
* This method clears the way to implement other kiss protocols
|
|
* like mkiss smack g8bpq ..... so far only mkiss is implemented.
|
|
*
|
|
* Hans Alblas <hans@esrac.ele.tue.nl>
|
|
*
|
|
* History
|
|
* Jonathan (G4KLX) Fixed to match Linux networking changes - 2.1.15.
|
|
* Matthias (DG2FEF) Added support for FlexNet CRC (on special request)
|
|
* Fixed bug in ax25_close(): dev_lock_wait() was
|
|
* called twice, causing a deadlock.
|
|
* Jeroen (PE1RXQ) Removed old MKISS_MAGIC stuff and calls to
|
|
* MOD_*_USE_COUNT
|
|
* Remove cli() and fix rtnl lock usage.
|
|
*/
|
|
|
|
#include <linux/config.h>
|
|
#include <linux/module.h>
|
|
#include <asm/system.h>
|
|
#include <linux/bitops.h>
|
|
#include <asm/uaccess.h>
|
|
#include <linux/string.h>
|
|
#include <linux/mm.h>
|
|
#include <linux/interrupt.h>
|
|
#include <linux/in.h>
|
|
#include <linux/inet.h>
|
|
#include <linux/tty.h>
|
|
#include <linux/errno.h>
|
|
#include <linux/netdevice.h>
|
|
#include <linux/major.h>
|
|
#include <linux/init.h>
|
|
#include <linux/rtnetlink.h>
|
|
#include <linux/etherdevice.h>
|
|
#include <linux/skbuff.h>
|
|
#include <linux/if_arp.h>
|
|
|
|
#include <net/ax25.h>
|
|
|
|
#include "mkiss.h"
|
|
|
|
#ifdef CONFIG_INET
|
|
#include <linux/ip.h>
|
|
#include <linux/tcp.h>
|
|
#endif
|
|
|
|
static char banner[] __initdata = KERN_INFO "mkiss: AX.25 Multikiss, Hans Albas PE1AYX\n";
|
|
|
|
typedef struct ax25_ctrl {
|
|
struct ax_disp ctrl; /* */
|
|
struct net_device dev; /* the device */
|
|
} ax25_ctrl_t;
|
|
|
|
static ax25_ctrl_t **ax25_ctrls;
|
|
|
|
int ax25_maxdev = AX25_MAXDEV; /* Can be overridden with insmod! */
|
|
|
|
static struct tty_ldisc ax_ldisc;
|
|
|
|
static int ax25_init(struct net_device *);
|
|
static int kiss_esc(unsigned char *, unsigned char *, int);
|
|
static int kiss_esc_crc(unsigned char *, unsigned char *, unsigned short, int);
|
|
static void kiss_unesc(struct ax_disp *, unsigned char);
|
|
|
|
/*---------------------------------------------------------------------------*/
|
|
|
|
static const unsigned short Crc_flex_table[] = {
|
|
0x0f87, 0x1e0e, 0x2c95, 0x3d1c, 0x49a3, 0x582a, 0x6ab1, 0x7b38,
|
|
0x83cf, 0x9246, 0xa0dd, 0xb154, 0xc5eb, 0xd462, 0xe6f9, 0xf770,
|
|
0x1f06, 0x0e8f, 0x3c14, 0x2d9d, 0x5922, 0x48ab, 0x7a30, 0x6bb9,
|
|
0x934e, 0x82c7, 0xb05c, 0xa1d5, 0xd56a, 0xc4e3, 0xf678, 0xe7f1,
|
|
0x2e85, 0x3f0c, 0x0d97, 0x1c1e, 0x68a1, 0x7928, 0x4bb3, 0x5a3a,
|
|
0xa2cd, 0xb344, 0x81df, 0x9056, 0xe4e9, 0xf560, 0xc7fb, 0xd672,
|
|
0x3e04, 0x2f8d, 0x1d16, 0x0c9f, 0x7820, 0x69a9, 0x5b32, 0x4abb,
|
|
0xb24c, 0xa3c5, 0x915e, 0x80d7, 0xf468, 0xe5e1, 0xd77a, 0xc6f3,
|
|
0x4d83, 0x5c0a, 0x6e91, 0x7f18, 0x0ba7, 0x1a2e, 0x28b5, 0x393c,
|
|
0xc1cb, 0xd042, 0xe2d9, 0xf350, 0x87ef, 0x9666, 0xa4fd, 0xb574,
|
|
0x5d02, 0x4c8b, 0x7e10, 0x6f99, 0x1b26, 0x0aaf, 0x3834, 0x29bd,
|
|
0xd14a, 0xc0c3, 0xf258, 0xe3d1, 0x976e, 0x86e7, 0xb47c, 0xa5f5,
|
|
0x6c81, 0x7d08, 0x4f93, 0x5e1a, 0x2aa5, 0x3b2c, 0x09b7, 0x183e,
|
|
0xe0c9, 0xf140, 0xc3db, 0xd252, 0xa6ed, 0xb764, 0x85ff, 0x9476,
|
|
0x7c00, 0x6d89, 0x5f12, 0x4e9b, 0x3a24, 0x2bad, 0x1936, 0x08bf,
|
|
0xf048, 0xe1c1, 0xd35a, 0xc2d3, 0xb66c, 0xa7e5, 0x957e, 0x84f7,
|
|
0x8b8f, 0x9a06, 0xa89d, 0xb914, 0xcdab, 0xdc22, 0xeeb9, 0xff30,
|
|
0x07c7, 0x164e, 0x24d5, 0x355c, 0x41e3, 0x506a, 0x62f1, 0x7378,
|
|
0x9b0e, 0x8a87, 0xb81c, 0xa995, 0xdd2a, 0xcca3, 0xfe38, 0xefb1,
|
|
0x1746, 0x06cf, 0x3454, 0x25dd, 0x5162, 0x40eb, 0x7270, 0x63f9,
|
|
0xaa8d, 0xbb04, 0x899f, 0x9816, 0xeca9, 0xfd20, 0xcfbb, 0xde32,
|
|
0x26c5, 0x374c, 0x05d7, 0x145e, 0x60e1, 0x7168, 0x43f3, 0x527a,
|
|
0xba0c, 0xab85, 0x991e, 0x8897, 0xfc28, 0xeda1, 0xdf3a, 0xceb3,
|
|
0x3644, 0x27cd, 0x1556, 0x04df, 0x7060, 0x61e9, 0x5372, 0x42fb,
|
|
0xc98b, 0xd802, 0xea99, 0xfb10, 0x8faf, 0x9e26, 0xacbd, 0xbd34,
|
|
0x45c3, 0x544a, 0x66d1, 0x7758, 0x03e7, 0x126e, 0x20f5, 0x317c,
|
|
0xd90a, 0xc883, 0xfa18, 0xeb91, 0x9f2e, 0x8ea7, 0xbc3c, 0xadb5,
|
|
0x5542, 0x44cb, 0x7650, 0x67d9, 0x1366, 0x02ef, 0x3074, 0x21fd,
|
|
0xe889, 0xf900, 0xcb9b, 0xda12, 0xaead, 0xbf24, 0x8dbf, 0x9c36,
|
|
0x64c1, 0x7548, 0x47d3, 0x565a, 0x22e5, 0x336c, 0x01f7, 0x107e,
|
|
0xf808, 0xe981, 0xdb1a, 0xca93, 0xbe2c, 0xafa5, 0x9d3e, 0x8cb7,
|
|
0x7440, 0x65c9, 0x5752, 0x46db, 0x3264, 0x23ed, 0x1176, 0x00ff
|
|
};
|
|
|
|
/*---------------------------------------------------------------------------*/
|
|
|
|
static unsigned short calc_crc_flex(unsigned char *cp, int size)
|
|
{
|
|
unsigned short crc = 0xffff;
|
|
|
|
while (size--)
|
|
crc = (crc << 8) ^ Crc_flex_table[((crc >> 8) ^ *cp++) & 0xff];
|
|
|
|
return crc;
|
|
}
|
|
|
|
/*---------------------------------------------------------------------------*/
|
|
|
|
static int check_crc_flex(unsigned char *cp, int size)
|
|
{
|
|
unsigned short crc = 0xffff;
|
|
|
|
if (size < 3)
|
|
return -1;
|
|
|
|
while (size--)
|
|
crc = (crc << 8) ^ Crc_flex_table[((crc >> 8) ^ *cp++) & 0xff];
|
|
|
|
if ((crc & 0xffff) != 0x7070)
|
|
return -1;
|
|
|
|
return 0;
|
|
}
|
|
|
|
/*---------------------------------------------------------------------------*/
|
|
|
|
/* Find a free channel, and link in this `tty' line. */
|
|
static inline struct ax_disp *ax_alloc(void)
|
|
{
|
|
ax25_ctrl_t *axp=NULL;
|
|
int i;
|
|
|
|
for (i = 0; i < ax25_maxdev; i++) {
|
|
axp = ax25_ctrls[i];
|
|
|
|
/* Not allocated ? */
|
|
if (axp == NULL)
|
|
break;
|
|
|
|
/* Not in use ? */
|
|
if (!test_and_set_bit(AXF_INUSE, &axp->ctrl.flags))
|
|
break;
|
|
}
|
|
|
|
/* Sorry, too many, all slots in use */
|
|
if (i >= ax25_maxdev)
|
|
return NULL;
|
|
|
|
/* If no channels are available, allocate one */
|
|
if (axp == NULL && (ax25_ctrls[i] = kmalloc(sizeof(ax25_ctrl_t), GFP_KERNEL)) != NULL) {
|
|
axp = ax25_ctrls[i];
|
|
}
|
|
memset(axp, 0, sizeof(ax25_ctrl_t));
|
|
|
|
/* Initialize channel control data */
|
|
set_bit(AXF_INUSE, &axp->ctrl.flags);
|
|
sprintf(axp->dev.name, "ax%d", i++);
|
|
axp->ctrl.tty = NULL;
|
|
axp->dev.base_addr = i;
|
|
axp->dev.priv = (void *)&axp->ctrl;
|
|
axp->dev.next = NULL;
|
|
axp->dev.init = ax25_init;
|
|
|
|
if (axp != NULL) {
|
|
/*
|
|
* register device so that it can be ifconfig'ed
|
|
* ax25_init() will be called as a side-effect
|
|
* SIDE-EFFECT WARNING: ax25_init() CLEARS axp->ctrl !
|
|
*/
|
|
if (register_netdev(&axp->dev) == 0) {
|
|
/* (Re-)Set the INUSE bit. Very Important! */
|
|
set_bit(AXF_INUSE, &axp->ctrl.flags);
|
|
axp->ctrl.dev = &axp->dev;
|
|
axp->dev.priv = (void *) &axp->ctrl;
|
|
|
|
return &axp->ctrl;
|
|
} else {
|
|
clear_bit(AXF_INUSE,&axp->ctrl.flags);
|
|
printk(KERN_ERR "mkiss: ax_alloc() - register_netdev() failure.\n");
|
|
}
|
|
}
|
|
|
|
return NULL;
|
|
}
|
|
|
|
/* Free an AX25 channel. */
|
|
static inline void ax_free(struct ax_disp *ax)
|
|
{
|
|
/* Free all AX25 frame buffers. */
|
|
if (ax->rbuff)
|
|
kfree(ax->rbuff);
|
|
ax->rbuff = NULL;
|
|
if (ax->xbuff)
|
|
kfree(ax->xbuff);
|
|
ax->xbuff = NULL;
|
|
if (!test_and_clear_bit(AXF_INUSE, &ax->flags))
|
|
printk(KERN_ERR "mkiss: %s: ax_free for already free unit.\n", ax->dev->name);
|
|
}
|
|
|
|
static void ax_changedmtu(struct ax_disp *ax)
|
|
{
|
|
struct net_device *dev = ax->dev;
|
|
unsigned char *xbuff, *rbuff, *oxbuff, *orbuff;
|
|
int len;
|
|
|
|
len = dev->mtu * 2;
|
|
|
|
/*
|
|
* allow for arrival of larger UDP packets, even if we say not to
|
|
* also fixes a bug in which SunOS sends 512-byte packets even with
|
|
* an MSS of 128
|
|
*/
|
|
if (len < 576 * 2)
|
|
len = 576 * 2;
|
|
|
|
xbuff = kmalloc(len + 4, GFP_ATOMIC);
|
|
rbuff = kmalloc(len + 4, GFP_ATOMIC);
|
|
|
|
if (xbuff == NULL || rbuff == NULL) {
|
|
printk(KERN_ERR "mkiss: %s: unable to grow ax25 buffers, MTU change cancelled.\n",
|
|
ax->dev->name);
|
|
dev->mtu = ax->mtu;
|
|
if (xbuff != NULL)
|
|
kfree(xbuff);
|
|
if (rbuff != NULL)
|
|
kfree(rbuff);
|
|
return;
|
|
}
|
|
|
|
spin_lock_bh(&ax->buflock);
|
|
|
|
oxbuff = ax->xbuff;
|
|
ax->xbuff = xbuff;
|
|
orbuff = ax->rbuff;
|
|
ax->rbuff = rbuff;
|
|
|
|
if (ax->xleft) {
|
|
if (ax->xleft <= len) {
|
|
memcpy(ax->xbuff, ax->xhead, ax->xleft);
|
|
} else {
|
|
ax->xleft = 0;
|
|
ax->tx_dropped++;
|
|
}
|
|
}
|
|
|
|
ax->xhead = ax->xbuff;
|
|
|
|
if (ax->rcount) {
|
|
if (ax->rcount <= len) {
|
|
memcpy(ax->rbuff, orbuff, ax->rcount);
|
|
} else {
|
|
ax->rcount = 0;
|
|
ax->rx_over_errors++;
|
|
set_bit(AXF_ERROR, &ax->flags);
|
|
}
|
|
}
|
|
|
|
ax->mtu = dev->mtu + 73;
|
|
ax->buffsize = len;
|
|
|
|
spin_unlock_bh(&ax->buflock);
|
|
|
|
if (oxbuff != NULL)
|
|
kfree(oxbuff);
|
|
if (orbuff != NULL)
|
|
kfree(orbuff);
|
|
}
|
|
|
|
|
|
/* Set the "sending" flag. This must be atomic. */
|
|
static inline void ax_lock(struct ax_disp *ax)
|
|
{
|
|
netif_stop_queue(ax->dev);
|
|
}
|
|
|
|
|
|
/* Clear the "sending" flag. This must be atomic. */
|
|
static inline void ax_unlock(struct ax_disp *ax)
|
|
{
|
|
netif_start_queue(ax->dev);
|
|
}
|
|
|
|
/* Send one completely decapsulated AX.25 packet to the AX.25 layer. */
|
|
static void ax_bump(struct ax_disp *ax)
|
|
{
|
|
struct sk_buff *skb;
|
|
int count;
|
|
|
|
spin_lock_bh(&ax->buflock);
|
|
if (ax->rbuff[0] > 0x0f) {
|
|
if (ax->rbuff[0] & 0x20) {
|
|
ax->crcmode = CRC_MODE_FLEX;
|
|
if (check_crc_flex(ax->rbuff, ax->rcount) < 0) {
|
|
ax->rx_errors++;
|
|
return;
|
|
}
|
|
ax->rcount -= 2;
|
|
/* dl9sau bugfix: the trailling two bytes flexnet crc
|
|
* will not be passed to the kernel. thus we have
|
|
* to correct the kissparm signature, because it
|
|
* indicates a crc but there's none
|
|
*/
|
|
*ax->rbuff &= ~0x20;
|
|
}
|
|
}
|
|
spin_unlock_bh(&ax->buflock);
|
|
|
|
count = ax->rcount;
|
|
|
|
if ((skb = dev_alloc_skb(count)) == NULL) {
|
|
printk(KERN_ERR "mkiss: %s: memory squeeze, dropping packet.\n", ax->dev->name);
|
|
ax->rx_dropped++;
|
|
return;
|
|
}
|
|
|
|
skb->dev = ax->dev;
|
|
spin_lock_bh(&ax->buflock);
|
|
memcpy(skb_put(skb,count), ax->rbuff, count);
|
|
spin_unlock_bh(&ax->buflock);
|
|
skb->mac.raw = skb->data;
|
|
skb->protocol = htons(ETH_P_AX25);
|
|
netif_rx(skb);
|
|
ax->dev->last_rx = jiffies;
|
|
ax->rx_packets++;
|
|
ax->rx_bytes+=count;
|
|
}
|
|
|
|
/* Encapsulate one AX.25 packet and stuff into a TTY queue. */
|
|
static void ax_encaps(struct ax_disp *ax, unsigned char *icp, int len)
|
|
{
|
|
unsigned char *p;
|
|
int actual, count;
|
|
|
|
if (ax->mtu != ax->dev->mtu + 73) /* Someone has been ifconfigging */
|
|
ax_changedmtu(ax);
|
|
|
|
if (len > ax->mtu) { /* Sigh, shouldn't occur BUT ... */
|
|
len = ax->mtu;
|
|
printk(KERN_ERR "mkiss: %s: truncating oversized transmit packet!\n", ax->dev->name);
|
|
ax->tx_dropped++;
|
|
ax_unlock(ax);
|
|
return;
|
|
}
|
|
|
|
p = icp;
|
|
|
|
spin_lock_bh(&ax->buflock);
|
|
switch (ax->crcmode) {
|
|
unsigned short crc;
|
|
|
|
case CRC_MODE_FLEX:
|
|
*p |= 0x20;
|
|
crc = calc_crc_flex(p, len);
|
|
count = kiss_esc_crc(p, (unsigned char *)ax->xbuff, crc, len+2);
|
|
break;
|
|
|
|
default:
|
|
count = kiss_esc(p, (unsigned char *)ax->xbuff, len);
|
|
break;
|
|
}
|
|
|
|
ax->tty->flags |= (1 << TTY_DO_WRITE_WAKEUP);
|
|
actual = ax->tty->driver->write(ax->tty, ax->xbuff, count);
|
|
ax->tx_packets++;
|
|
ax->tx_bytes+=actual;
|
|
ax->dev->trans_start = jiffies;
|
|
ax->xleft = count - actual;
|
|
ax->xhead = ax->xbuff + actual;
|
|
|
|
spin_unlock_bh(&ax->buflock);
|
|
}
|
|
|
|
/*
|
|
* Called by the driver when there's room for more data. If we have
|
|
* more packets to send, we send them here.
|
|
*/
|
|
static void ax25_write_wakeup(struct tty_struct *tty)
|
|
{
|
|
int actual;
|
|
struct ax_disp *ax = (struct ax_disp *) tty->disc_data;
|
|
|
|
/* First make sure we're connected. */
|
|
if (ax == NULL || ax->magic != AX25_MAGIC || !netif_running(ax->dev))
|
|
return;
|
|
if (ax->xleft <= 0) {
|
|
/* Now serial buffer is almost free & we can start
|
|
* transmission of another packet
|
|
*/
|
|
tty->flags &= ~(1 << TTY_DO_WRITE_WAKEUP);
|
|
|
|
netif_wake_queue(ax->dev);
|
|
return;
|
|
}
|
|
|
|
actual = tty->driver->write(tty, ax->xhead, ax->xleft);
|
|
ax->xleft -= actual;
|
|
ax->xhead += actual;
|
|
}
|
|
|
|
/* Encapsulate an AX.25 packet and kick it into a TTY queue. */
|
|
static int ax_xmit(struct sk_buff *skb, struct net_device *dev)
|
|
{
|
|
struct ax_disp *ax = netdev_priv(dev);
|
|
|
|
if (!netif_running(dev)) {
|
|
printk(KERN_ERR "mkiss: %s: xmit call when iface is down\n", dev->name);
|
|
return 1;
|
|
}
|
|
|
|
if (netif_queue_stopped(dev)) {
|
|
/*
|
|
* May be we must check transmitter timeout here ?
|
|
* 14 Oct 1994 Dmitry Gorodchanin.
|
|
*/
|
|
if (jiffies - dev->trans_start < 20 * HZ) {
|
|
/* 20 sec timeout not reached */
|
|
return 1;
|
|
}
|
|
|
|
printk(KERN_ERR "mkiss: %s: transmit timed out, %s?\n", dev->name,
|
|
(ax->tty->driver->chars_in_buffer(ax->tty) || ax->xleft) ?
|
|
"bad line quality" : "driver error");
|
|
|
|
ax->xleft = 0;
|
|
ax->tty->flags &= ~(1 << TTY_DO_WRITE_WAKEUP);
|
|
ax_unlock(ax);
|
|
}
|
|
|
|
/* We were not busy, so we are now... :-) */
|
|
if (skb != NULL) {
|
|
ax_lock(ax);
|
|
ax_encaps(ax, skb->data, skb->len);
|
|
kfree_skb(skb);
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
#if defined(CONFIG_AX25) || defined(CONFIG_AX25_MODULE)
|
|
|
|
/* Return the frame type ID */
|
|
static int ax_header(struct sk_buff *skb, struct net_device *dev, unsigned short type,
|
|
void *daddr, void *saddr, unsigned len)
|
|
{
|
|
#ifdef CONFIG_INET
|
|
if (type != htons(ETH_P_AX25))
|
|
return ax25_encapsulate(skb, dev, type, daddr, saddr, len);
|
|
#endif
|
|
return 0;
|
|
}
|
|
|
|
|
|
static int ax_rebuild_header(struct sk_buff *skb)
|
|
{
|
|
#ifdef CONFIG_INET
|
|
return ax25_rebuild_header(skb);
|
|
#else
|
|
return 0;
|
|
#endif
|
|
}
|
|
|
|
#endif /* CONFIG_{AX25,AX25_MODULE} */
|
|
|
|
/* Open the low-level part of the AX25 channel. Easy! */
|
|
static int ax_open(struct net_device *dev)
|
|
{
|
|
struct ax_disp *ax = netdev_priv(dev);
|
|
unsigned long len;
|
|
|
|
if (ax->tty == NULL)
|
|
return -ENODEV;
|
|
|
|
/*
|
|
* Allocate the frame buffers:
|
|
*
|
|
* rbuff Receive buffer.
|
|
* xbuff Transmit buffer.
|
|
*/
|
|
len = dev->mtu * 2;
|
|
|
|
/*
|
|
* allow for arrival of larger UDP packets, even if we say not to
|
|
* also fixes a bug in which SunOS sends 512-byte packets even with
|
|
* an MSS of 128
|
|
*/
|
|
if (len < 576 * 2)
|
|
len = 576 * 2;
|
|
|
|
if ((ax->rbuff = kmalloc(len + 4, GFP_KERNEL)) == NULL)
|
|
goto norbuff;
|
|
|
|
if ((ax->xbuff = kmalloc(len + 4, GFP_KERNEL)) == NULL)
|
|
goto noxbuff;
|
|
|
|
ax->mtu = dev->mtu + 73;
|
|
ax->buffsize = len;
|
|
ax->rcount = 0;
|
|
ax->xleft = 0;
|
|
|
|
ax->flags &= (1 << AXF_INUSE); /* Clear ESCAPE & ERROR flags */
|
|
|
|
spin_lock_init(&ax->buflock);
|
|
|
|
netif_start_queue(dev);
|
|
return 0;
|
|
|
|
noxbuff:
|
|
kfree(ax->rbuff);
|
|
|
|
norbuff:
|
|
return -ENOMEM;
|
|
}
|
|
|
|
|
|
/* Close the low-level part of the AX25 channel. Easy! */
|
|
static int ax_close(struct net_device *dev)
|
|
{
|
|
struct ax_disp *ax = netdev_priv(dev);
|
|
|
|
if (ax->tty == NULL)
|
|
return -EBUSY;
|
|
|
|
ax->tty->flags &= ~(1 << TTY_DO_WRITE_WAKEUP);
|
|
|
|
netif_stop_queue(dev);
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int ax25_receive_room(struct tty_struct *tty)
|
|
{
|
|
return 65536; /* We can handle an infinite amount of data. :-) */
|
|
}
|
|
|
|
/*
|
|
* Handle the 'receiver data ready' interrupt.
|
|
* This function is called by the 'tty_io' module in the kernel when
|
|
* a block of data has been received, which can now be decapsulated
|
|
* and sent on to the AX.25 layer for further processing.
|
|
*/
|
|
static void ax25_receive_buf(struct tty_struct *tty, const unsigned char *cp, char *fp, int count)
|
|
{
|
|
struct ax_disp *ax = (struct ax_disp *) tty->disc_data;
|
|
|
|
if (ax == NULL || ax->magic != AX25_MAGIC || !netif_running(ax->dev))
|
|
return;
|
|
|
|
/*
|
|
* Argh! mtu change time! - costs us the packet part received
|
|
* at the change
|
|
*/
|
|
if (ax->mtu != ax->dev->mtu + 73)
|
|
ax_changedmtu(ax);
|
|
|
|
/* Read the characters out of the buffer */
|
|
while (count--) {
|
|
if (fp != NULL && *fp++) {
|
|
if (!test_and_set_bit(AXF_ERROR, &ax->flags))
|
|
ax->rx_errors++;
|
|
cp++;
|
|
continue;
|
|
}
|
|
|
|
kiss_unesc(ax, *cp++);
|
|
}
|
|
}
|
|
|
|
static int ax25_open(struct tty_struct *tty)
|
|
{
|
|
struct ax_disp *ax = (struct ax_disp *) tty->disc_data;
|
|
int err;
|
|
|
|
/* First make sure we're not already connected. */
|
|
if (ax && ax->magic == AX25_MAGIC)
|
|
return -EEXIST;
|
|
|
|
/* OK. Find a free AX25 channel to use. */
|
|
if ((ax = ax_alloc()) == NULL)
|
|
return -ENFILE;
|
|
|
|
ax->tty = tty;
|
|
tty->disc_data = ax;
|
|
|
|
if (tty->driver->flush_buffer)
|
|
tty->driver->flush_buffer(tty);
|
|
|
|
/* Restore default settings */
|
|
ax->dev->type = ARPHRD_AX25;
|
|
|
|
/* Perform the low-level AX25 initialization. */
|
|
if ((err = ax_open(ax->dev)))
|
|
return err;
|
|
|
|
/* Done. We have linked the TTY line to a channel. */
|
|
return ax->dev->base_addr;
|
|
}
|
|
|
|
static void ax25_close(struct tty_struct *tty)
|
|
{
|
|
struct ax_disp *ax = (struct ax_disp *) tty->disc_data;
|
|
|
|
/* First make sure we're connected. */
|
|
if (ax == NULL || ax->magic != AX25_MAGIC)
|
|
return;
|
|
|
|
unregister_netdev(ax->dev);
|
|
|
|
tty->disc_data = NULL;
|
|
ax->tty = NULL;
|
|
|
|
ax_free(ax);
|
|
}
|
|
|
|
|
|
static struct net_device_stats *ax_get_stats(struct net_device *dev)
|
|
{
|
|
static struct net_device_stats stats;
|
|
struct ax_disp *ax = netdev_priv(dev);
|
|
|
|
memset(&stats, 0, sizeof(struct net_device_stats));
|
|
|
|
stats.rx_packets = ax->rx_packets;
|
|
stats.tx_packets = ax->tx_packets;
|
|
stats.rx_bytes = ax->rx_bytes;
|
|
stats.tx_bytes = ax->tx_bytes;
|
|
stats.rx_dropped = ax->rx_dropped;
|
|
stats.tx_dropped = ax->tx_dropped;
|
|
stats.tx_errors = ax->tx_errors;
|
|
stats.rx_errors = ax->rx_errors;
|
|
stats.rx_over_errors = ax->rx_over_errors;
|
|
|
|
return &stats;
|
|
}
|
|
|
|
|
|
/************************************************************************
|
|
* STANDARD ENCAPSULATION *
|
|
************************************************************************/
|
|
|
|
static int kiss_esc(unsigned char *s, unsigned char *d, int len)
|
|
{
|
|
unsigned char *ptr = d;
|
|
unsigned char c;
|
|
|
|
/*
|
|
* Send an initial END character to flush out any
|
|
* data that may have accumulated in the receiver
|
|
* due to line noise.
|
|
*/
|
|
|
|
*ptr++ = END;
|
|
|
|
while (len-- > 0) {
|
|
switch (c = *s++) {
|
|
case END:
|
|
*ptr++ = ESC;
|
|
*ptr++ = ESC_END;
|
|
break;
|
|
case ESC:
|
|
*ptr++ = ESC;
|
|
*ptr++ = ESC_ESC;
|
|
break;
|
|
default:
|
|
*ptr++ = c;
|
|
break;
|
|
}
|
|
}
|
|
|
|
*ptr++ = END;
|
|
|
|
return ptr - d;
|
|
}
|
|
|
|
/*
|
|
* MW:
|
|
* OK its ugly, but tell me a better solution without copying the
|
|
* packet to a temporary buffer :-)
|
|
*/
|
|
static int kiss_esc_crc(unsigned char *s, unsigned char *d, unsigned short crc, int len)
|
|
{
|
|
unsigned char *ptr = d;
|
|
unsigned char c=0;
|
|
|
|
*ptr++ = END;
|
|
while (len > 0) {
|
|
if (len > 2)
|
|
c = *s++;
|
|
else if (len > 1)
|
|
c = crc >> 8;
|
|
else if (len > 0)
|
|
c = crc & 0xff;
|
|
|
|
len--;
|
|
|
|
switch (c) {
|
|
case END:
|
|
*ptr++ = ESC;
|
|
*ptr++ = ESC_END;
|
|
break;
|
|
case ESC:
|
|
*ptr++ = ESC;
|
|
*ptr++ = ESC_ESC;
|
|
break;
|
|
default:
|
|
*ptr++ = c;
|
|
break;
|
|
}
|
|
}
|
|
*ptr++ = END;
|
|
return ptr - d;
|
|
}
|
|
|
|
static void kiss_unesc(struct ax_disp *ax, unsigned char s)
|
|
{
|
|
switch (s) {
|
|
case END:
|
|
/* drop keeptest bit = VSV */
|
|
if (test_bit(AXF_KEEPTEST, &ax->flags))
|
|
clear_bit(AXF_KEEPTEST, &ax->flags);
|
|
|
|
if (!test_and_clear_bit(AXF_ERROR, &ax->flags) && (ax->rcount > 2))
|
|
ax_bump(ax);
|
|
|
|
clear_bit(AXF_ESCAPE, &ax->flags);
|
|
ax->rcount = 0;
|
|
return;
|
|
|
|
case ESC:
|
|
set_bit(AXF_ESCAPE, &ax->flags);
|
|
return;
|
|
case ESC_ESC:
|
|
if (test_and_clear_bit(AXF_ESCAPE, &ax->flags))
|
|
s = ESC;
|
|
break;
|
|
case ESC_END:
|
|
if (test_and_clear_bit(AXF_ESCAPE, &ax->flags))
|
|
s = END;
|
|
break;
|
|
}
|
|
|
|
spin_lock_bh(&ax->buflock);
|
|
if (!test_bit(AXF_ERROR, &ax->flags)) {
|
|
if (ax->rcount < ax->buffsize) {
|
|
ax->rbuff[ax->rcount++] = s;
|
|
spin_unlock_bh(&ax->buflock);
|
|
return;
|
|
}
|
|
|
|
ax->rx_over_errors++;
|
|
set_bit(AXF_ERROR, &ax->flags);
|
|
}
|
|
spin_unlock_bh(&ax->buflock);
|
|
}
|
|
|
|
|
|
static int ax_set_mac_address(struct net_device *dev, void __user *addr)
|
|
{
|
|
if (copy_from_user(dev->dev_addr, addr, AX25_ADDR_LEN))
|
|
return -EFAULT;
|
|
return 0;
|
|
}
|
|
|
|
static int ax_set_dev_mac_address(struct net_device *dev, void *addr)
|
|
{
|
|
struct sockaddr *sa = addr;
|
|
|
|
memcpy(dev->dev_addr, sa->sa_data, AX25_ADDR_LEN);
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
/* Perform I/O control on an active ax25 channel. */
|
|
static int ax25_disp_ioctl(struct tty_struct *tty, void *file, int cmd, void __user *arg)
|
|
{
|
|
struct ax_disp *ax = (struct ax_disp *) tty->disc_data;
|
|
unsigned int tmp;
|
|
|
|
/* First make sure we're connected. */
|
|
if (ax == NULL || ax->magic != AX25_MAGIC)
|
|
return -EINVAL;
|
|
|
|
switch (cmd) {
|
|
case SIOCGIFNAME:
|
|
if (copy_to_user(arg, ax->dev->name, strlen(ax->dev->name) + 1))
|
|
return -EFAULT;
|
|
return 0;
|
|
|
|
case SIOCGIFENCAP:
|
|
return put_user(4, (int __user *)arg);
|
|
|
|
case SIOCSIFENCAP:
|
|
if (get_user(tmp, (int __user *)arg))
|
|
return -EFAULT;
|
|
ax->mode = tmp;
|
|
ax->dev->addr_len = AX25_ADDR_LEN; /* sizeof an AX.25 addr */
|
|
ax->dev->hard_header_len = AX25_KISS_HEADER_LEN + AX25_MAX_HEADER_LEN + 3;
|
|
ax->dev->type = ARPHRD_AX25;
|
|
return 0;
|
|
|
|
case SIOCSIFHWADDR:
|
|
return ax_set_mac_address(ax->dev, arg);
|
|
|
|
default:
|
|
return -ENOIOCTLCMD;
|
|
}
|
|
}
|
|
|
|
static int ax_open_dev(struct net_device *dev)
|
|
{
|
|
struct ax_disp *ax = netdev_priv(dev);
|
|
|
|
if (ax->tty == NULL)
|
|
return -ENODEV;
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
/* Initialize the driver. Called by network startup. */
|
|
static int ax25_init(struct net_device *dev)
|
|
{
|
|
struct ax_disp *ax = netdev_priv(dev);
|
|
|
|
static char ax25_bcast[AX25_ADDR_LEN] =
|
|
{'Q'<<1,'S'<<1,'T'<<1,' '<<1,' '<<1,' '<<1,'0'<<1};
|
|
static char ax25_test[AX25_ADDR_LEN] =
|
|
{'L'<<1,'I'<<1,'N'<<1,'U'<<1,'X'<<1,' '<<1,'1'<<1};
|
|
|
|
if (ax == NULL) /* Allocation failed ?? */
|
|
return -ENODEV;
|
|
|
|
/* Set up the "AX25 Control Block". (And clear statistics) */
|
|
memset(ax, 0, sizeof (struct ax_disp));
|
|
ax->magic = AX25_MAGIC;
|
|
ax->dev = dev;
|
|
|
|
/* Finish setting up the DEVICE info. */
|
|
dev->mtu = AX_MTU;
|
|
dev->hard_start_xmit = ax_xmit;
|
|
dev->open = ax_open_dev;
|
|
dev->stop = ax_close;
|
|
dev->get_stats = ax_get_stats;
|
|
dev->set_mac_address = ax_set_dev_mac_address;
|
|
dev->hard_header_len = 0;
|
|
dev->addr_len = 0;
|
|
dev->type = ARPHRD_AX25;
|
|
dev->tx_queue_len = 10;
|
|
dev->hard_header = ax_header;
|
|
dev->rebuild_header = ax_rebuild_header;
|
|
|
|
memcpy(dev->broadcast, ax25_bcast, AX25_ADDR_LEN);
|
|
memcpy(dev->dev_addr, ax25_test, AX25_ADDR_LEN);
|
|
|
|
/* New-style flags. */
|
|
dev->flags = IFF_BROADCAST | IFF_MULTICAST;
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
/* ******************************************************************** */
|
|
/* * Init MKISS driver * */
|
|
/* ******************************************************************** */
|
|
|
|
static int __init mkiss_init_driver(void)
|
|
{
|
|
int status;
|
|
|
|
printk(banner);
|
|
|
|
if (ax25_maxdev < 4)
|
|
ax25_maxdev = 4; /* Sanity */
|
|
|
|
if ((ax25_ctrls = kmalloc(sizeof(void *) * ax25_maxdev, GFP_KERNEL)) == NULL) {
|
|
printk(KERN_ERR "mkiss: Can't allocate ax25_ctrls[] array!\n");
|
|
return -ENOMEM;
|
|
}
|
|
|
|
/* Clear the pointer array, we allocate devices when we need them */
|
|
memset(ax25_ctrls, 0, sizeof(void*) * ax25_maxdev); /* Pointers */
|
|
|
|
/* Fill in our line protocol discipline, and register it */
|
|
ax_ldisc.magic = TTY_LDISC_MAGIC;
|
|
ax_ldisc.name = "mkiss";
|
|
ax_ldisc.open = ax25_open;
|
|
ax_ldisc.close = ax25_close;
|
|
ax_ldisc.ioctl = (int (*)(struct tty_struct *, struct file *,
|
|
unsigned int, unsigned long))ax25_disp_ioctl;
|
|
ax_ldisc.receive_buf = ax25_receive_buf;
|
|
ax_ldisc.receive_room = ax25_receive_room;
|
|
ax_ldisc.write_wakeup = ax25_write_wakeup;
|
|
|
|
if ((status = tty_register_ldisc(N_AX25, &ax_ldisc)) != 0) {
|
|
printk(KERN_ERR "mkiss: can't register line discipline (err = %d)\n", status);
|
|
kfree(ax25_ctrls);
|
|
}
|
|
return status;
|
|
}
|
|
|
|
static void __exit mkiss_exit_driver(void)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < ax25_maxdev; i++) {
|
|
if (ax25_ctrls[i]) {
|
|
/*
|
|
* VSV = if dev->start==0, then device
|
|
* unregistered while close proc.
|
|
*/
|
|
if (netif_running(&ax25_ctrls[i]->dev))
|
|
unregister_netdev(&ax25_ctrls[i]->dev);
|
|
kfree(ax25_ctrls[i]);
|
|
}
|
|
}
|
|
|
|
kfree(ax25_ctrls);
|
|
ax25_ctrls = NULL;
|
|
|
|
if ((i = tty_register_ldisc(N_AX25, NULL)))
|
|
printk(KERN_ERR "mkiss: can't unregister line discipline (err = %d)\n", i);
|
|
}
|
|
|
|
MODULE_AUTHOR("Hans Albas PE1AYX <hans@esrac.ele.tue.nl>");
|
|
MODULE_DESCRIPTION("KISS driver for AX.25 over TTYs");
|
|
MODULE_PARM(ax25_maxdev, "i");
|
|
MODULE_PARM_DESC(ax25_maxdev, "number of MKISS devices");
|
|
MODULE_LICENSE("GPL");
|
|
MODULE_ALIAS_LDISC(N_AX25);
|
|
module_init(mkiss_init_driver);
|
|
module_exit(mkiss_exit_driver);
|
|
|