1607 lines
45 KiB
C
1607 lines
45 KiB
C
/*
|
|
* cycx_x25.c Cyclom 2X WAN Link Driver. X.25 module.
|
|
*
|
|
* Author: Arnaldo Carvalho de Melo <acme@conectiva.com.br>
|
|
*
|
|
* Copyright: (c) 1998-2003 Arnaldo Carvalho de Melo
|
|
*
|
|
* Based on sdla_x25.c by Gene Kozin <genek@compuserve.com>
|
|
*
|
|
* This program 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.
|
|
* ============================================================================
|
|
* 2001/01/12 acme use dev_kfree_skb_irq on interrupt context
|
|
* 2000/04/02 acme dprintk, cycx_debug
|
|
* fixed the bug introduced in get_dev_by_lcn and
|
|
* get_dev_by_dte_addr by the anonymous hacker
|
|
* that converted this driver to softnet
|
|
* 2000/01/08 acme cleanup
|
|
* 1999/10/27 acme use ARPHRD_HWX25 so that the X.25 stack know
|
|
* that we have a X.25 stack implemented in
|
|
* firmware onboard
|
|
* 1999/10/18 acme support for X.25 sockets in if_send,
|
|
* beware: socket(AF_X25...) IS WORK IN PROGRESS,
|
|
* TCP/IP over X.25 via wanrouter not affected,
|
|
* working.
|
|
* 1999/10/09 acme chan_disc renamed to chan_disconnect,
|
|
* began adding support for X.25 sockets:
|
|
* conf->protocol in new_if
|
|
* 1999/10/05 acme fixed return E... to return -E...
|
|
* 1999/08/10 acme serialized access to the card thru a spinlock
|
|
* in x25_exec
|
|
* 1999/08/09 acme removed per channel spinlocks
|
|
* removed references to enable_tx_int
|
|
* 1999/05/28 acme fixed nibble_to_byte, ackvc now properly treated
|
|
* if_send simplified
|
|
* 1999/05/25 acme fixed t1, t2, t21 & t23 configuration
|
|
* use spinlocks instead of cli/sti in some points
|
|
* 1999/05/24 acme finished the x25_get_stat function
|
|
* 1999/05/23 acme dev->type = ARPHRD_X25 (tcpdump only works,
|
|
* AFAIT, with ARPHRD_ETHER). This seems to be
|
|
* needed to use socket(AF_X25)...
|
|
* Now the config file must specify a peer media
|
|
* address for svc channels over a crossover cable.
|
|
* Removed hold_timeout from x25_channel_t,
|
|
* not used.
|
|
* A little enhancement in the DEBUG processing
|
|
* 1999/05/22 acme go to DISCONNECTED in disconnect_confirm_intr,
|
|
* instead of chan_disc.
|
|
* 1999/05/16 marcelo fixed timer initialization in SVCs
|
|
* 1999/01/05 acme x25_configure now get (most of) all
|
|
* parameters...
|
|
* 1999/01/05 acme pktlen now (correctly) uses log2 (value
|
|
* configured)
|
|
* 1999/01/03 acme judicious use of data types (u8, u16, u32, etc)
|
|
* 1999/01/03 acme cyx_isr: reset dpmbase to acknowledge
|
|
* indication (interrupt from cyclom 2x)
|
|
* 1999/01/02 acme cyx_isr: first hackings...
|
|
* 1999/01/0203 acme when initializing an array don't give less
|
|
* elements than declared...
|
|
* example: char send_cmd[6] = "?\xFF\x10";
|
|
* you'll gonna lose a couple hours, 'cause your
|
|
* brain won't admit that there's an error in the
|
|
* above declaration... the side effect is that
|
|
* memset is put into the unresolved symbols
|
|
* instead of using the inline memset functions...
|
|
* 1999/01/02 acme began chan_connect, chan_send, x25_send
|
|
* 1998/12/31 acme x25_configure
|
|
* this code can be compiled as non module
|
|
* 1998/12/27 acme code cleanup
|
|
* IPX code wiped out! let's decrease code
|
|
* complexity for now, remember: I'm learning! :)
|
|
* bps_to_speed_code OK
|
|
* 1998/12/26 acme Minimal debug code cleanup
|
|
* 1998/08/08 acme Initial version.
|
|
*/
|
|
|
|
#define CYCLOMX_X25_DEBUG 1
|
|
|
|
#include <linux/ctype.h> /* isdigit() */
|
|
#include <linux/errno.h> /* return codes */
|
|
#include <linux/if_arp.h> /* ARPHRD_HWX25 */
|
|
#include <linux/kernel.h> /* printk(), and other useful stuff */
|
|
#include <linux/module.h>
|
|
#include <linux/string.h> /* inline memset(), etc. */
|
|
#include <linux/slab.h> /* kmalloc(), kfree() */
|
|
#include <linux/stddef.h> /* offsetof(), etc. */
|
|
#include <linux/wanrouter.h> /* WAN router definitions */
|
|
|
|
#include <asm/byteorder.h> /* htons(), etc. */
|
|
|
|
#include <linux/cyclomx.h> /* Cyclom 2X common user API definitions */
|
|
#include <linux/cycx_x25.h> /* X.25 firmware API definitions */
|
|
|
|
#include <net/x25device.h>
|
|
|
|
/* Defines & Macros */
|
|
#define CYCX_X25_MAX_CMD_RETRY 5
|
|
#define CYCX_X25_CHAN_MTU 2048 /* unfragmented logical channel MTU */
|
|
|
|
/* Data Structures */
|
|
/* This is an extension of the 'struct net_device' we create for each network
|
|
interface to keep the rest of X.25 channel-specific data. */
|
|
struct cycx_x25_channel {
|
|
/* This member must be first. */
|
|
struct net_device *slave; /* WAN slave */
|
|
|
|
char name[WAN_IFNAME_SZ+1]; /* interface name, ASCIIZ */
|
|
char addr[WAN_ADDRESS_SZ+1]; /* media address, ASCIIZ */
|
|
char *local_addr; /* local media address, ASCIIZ -
|
|
svc thru crossover cable */
|
|
s16 lcn; /* logical channel number/conn.req.key*/
|
|
u8 link;
|
|
struct timer_list timer; /* timer used for svc channel disc. */
|
|
u16 protocol; /* ethertype, 0 - multiplexed */
|
|
u8 svc; /* 0 - permanent, 1 - switched */
|
|
u8 state; /* channel state */
|
|
u8 drop_sequence; /* mark sequence for dropping */
|
|
u32 idle_tmout; /* sec, before disconnecting */
|
|
struct sk_buff *rx_skb; /* receive socket buffer */
|
|
struct cycx_device *card; /* -> owner */
|
|
struct net_device_stats ifstats;/* interface statistics */
|
|
};
|
|
|
|
/* Function Prototypes */
|
|
/* WAN link driver entry points. These are called by the WAN router module. */
|
|
static int cycx_wan_update(struct wan_device *wandev),
|
|
cycx_wan_new_if(struct wan_device *wandev, struct net_device *dev,
|
|
wanif_conf_t *conf),
|
|
cycx_wan_del_if(struct wan_device *wandev, struct net_device *dev);
|
|
|
|
/* Network device interface */
|
|
static int cycx_netdevice_init(struct net_device *dev),
|
|
cycx_netdevice_open(struct net_device *dev),
|
|
cycx_netdevice_stop(struct net_device *dev),
|
|
cycx_netdevice_hard_header(struct sk_buff *skb,
|
|
struct net_device *dev, u16 type,
|
|
void *daddr, void *saddr, unsigned len),
|
|
cycx_netdevice_rebuild_header(struct sk_buff *skb),
|
|
cycx_netdevice_hard_start_xmit(struct sk_buff *skb,
|
|
struct net_device *dev);
|
|
|
|
static struct net_device_stats *
|
|
cycx_netdevice_get_stats(struct net_device *dev);
|
|
|
|
/* Interrupt handlers */
|
|
static void cycx_x25_irq_handler(struct cycx_device *card),
|
|
cycx_x25_irq_tx(struct cycx_device *card, struct cycx_x25_cmd *cmd),
|
|
cycx_x25_irq_rx(struct cycx_device *card, struct cycx_x25_cmd *cmd),
|
|
cycx_x25_irq_log(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd),
|
|
cycx_x25_irq_stat(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd),
|
|
cycx_x25_irq_connect_confirm(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd),
|
|
cycx_x25_irq_disconnect_confirm(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd),
|
|
cycx_x25_irq_connect(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd),
|
|
cycx_x25_irq_disconnect(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd),
|
|
cycx_x25_irq_spurious(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd);
|
|
|
|
/* X.25 firmware interface functions */
|
|
static int cycx_x25_configure(struct cycx_device *card,
|
|
struct cycx_x25_config *conf),
|
|
cycx_x25_get_stats(struct cycx_device *card),
|
|
cycx_x25_send(struct cycx_device *card, u8 link, u8 lcn, u8 bitm,
|
|
int len, void *buf),
|
|
cycx_x25_connect_response(struct cycx_device *card,
|
|
struct cycx_x25_channel *chan),
|
|
cycx_x25_disconnect_response(struct cycx_device *card, u8 link,
|
|
u8 lcn);
|
|
|
|
/* channel functions */
|
|
static int cycx_x25_chan_connect(struct net_device *dev),
|
|
cycx_x25_chan_send(struct net_device *dev, struct sk_buff *skb);
|
|
|
|
static void cycx_x25_chan_disconnect(struct net_device *dev),
|
|
cycx_x25_chan_send_event(struct net_device *dev, u8 event);
|
|
|
|
/* Miscellaneous functions */
|
|
static void cycx_x25_set_chan_state(struct net_device *dev, u8 state),
|
|
cycx_x25_chan_timer(unsigned long d);
|
|
|
|
static void nibble_to_byte(u8 *s, u8 *d, u8 len, u8 nibble),
|
|
reset_timer(struct net_device *dev);
|
|
|
|
static u8 bps_to_speed_code(u32 bps);
|
|
static u8 cycx_log2(u32 n);
|
|
|
|
static unsigned dec_to_uint(u8 *str, int len);
|
|
|
|
static struct net_device *cycx_x25_get_dev_by_lcn(struct wan_device *wandev,
|
|
s16 lcn);
|
|
static struct net_device *
|
|
cycx_x25_get_dev_by_dte_addr(struct wan_device *wandev, char *dte);
|
|
|
|
#ifdef CYCLOMX_X25_DEBUG
|
|
static void hex_dump(char *msg, unsigned char *p, int len);
|
|
static void cycx_x25_dump_config(struct cycx_x25_config *conf);
|
|
static void cycx_x25_dump_stats(struct cycx_x25_stats *stats);
|
|
static void cycx_x25_dump_devs(struct wan_device *wandev);
|
|
#else
|
|
#define hex_dump(msg, p, len)
|
|
#define cycx_x25_dump_config(conf)
|
|
#define cycx_x25_dump_stats(stats)
|
|
#define cycx_x25_dump_devs(wandev)
|
|
#endif
|
|
/* Public Functions */
|
|
|
|
/* X.25 Protocol Initialization routine.
|
|
*
|
|
* This routine is called by the main Cyclom 2X module during setup. At this
|
|
* point adapter is completely initialized and X.25 firmware is running.
|
|
* o configure adapter
|
|
* o initialize protocol-specific fields of the adapter data space.
|
|
*
|
|
* Return: 0 o.k.
|
|
* < 0 failure. */
|
|
int cycx_x25_wan_init(struct cycx_device *card, wandev_conf_t *conf)
|
|
{
|
|
struct cycx_x25_config cfg;
|
|
|
|
/* Verify configuration ID */
|
|
if (conf->config_id != WANCONFIG_X25) {
|
|
printk(KERN_INFO "%s: invalid configuration ID %u!\n",
|
|
card->devname, conf->config_id);
|
|
return -EINVAL;
|
|
}
|
|
|
|
/* Initialize protocol-specific fields */
|
|
card->mbox = card->hw.dpmbase + X25_MBOX_OFFS;
|
|
card->u.x.connection_keys = 0;
|
|
spin_lock_init(&card->u.x.lock);
|
|
|
|
/* Configure adapter. Here we set reasonable defaults, then parse
|
|
* device configuration structure and set configuration options.
|
|
* Most configuration options are verified and corrected (if
|
|
* necessary) since we can't rely on the adapter to do so and don't
|
|
* want it to fail either. */
|
|
memset(&cfg, 0, sizeof(cfg));
|
|
cfg.link = 0;
|
|
cfg.clock = conf->clocking == WANOPT_EXTERNAL ? 8 : 55;
|
|
cfg.speed = bps_to_speed_code(conf->bps);
|
|
cfg.n3win = 7;
|
|
cfg.n2win = 2;
|
|
cfg.n2 = 5;
|
|
cfg.nvc = 1;
|
|
cfg.npvc = 1;
|
|
cfg.flags = 0x02; /* default = V35 */
|
|
cfg.t1 = 10; /* line carrier timeout */
|
|
cfg.t2 = 29; /* tx timeout */
|
|
cfg.t21 = 180; /* CALL timeout */
|
|
cfg.t23 = 180; /* CLEAR timeout */
|
|
|
|
/* adjust MTU */
|
|
if (!conf->mtu || conf->mtu >= 512)
|
|
card->wandev.mtu = 512;
|
|
else if (conf->mtu >= 256)
|
|
card->wandev.mtu = 256;
|
|
else if (conf->mtu >= 128)
|
|
card->wandev.mtu = 128;
|
|
else
|
|
card->wandev.mtu = 64;
|
|
|
|
cfg.pktlen = cycx_log2(card->wandev.mtu);
|
|
|
|
if (conf->station == WANOPT_DTE) {
|
|
cfg.locaddr = 3; /* DTE */
|
|
cfg.remaddr = 1; /* DCE */
|
|
} else {
|
|
cfg.locaddr = 1; /* DCE */
|
|
cfg.remaddr = 3; /* DTE */
|
|
}
|
|
|
|
if (conf->interface == WANOPT_RS232)
|
|
cfg.flags = 0; /* FIXME just reset the 2nd bit */
|
|
|
|
if (conf->u.x25.hi_pvc) {
|
|
card->u.x.hi_pvc = min_t(unsigned int, conf->u.x25.hi_pvc, 4095);
|
|
card->u.x.lo_pvc = min_t(unsigned int, conf->u.x25.lo_pvc, card->u.x.hi_pvc);
|
|
}
|
|
|
|
if (conf->u.x25.hi_svc) {
|
|
card->u.x.hi_svc = min_t(unsigned int, conf->u.x25.hi_svc, 4095);
|
|
card->u.x.lo_svc = min_t(unsigned int, conf->u.x25.lo_svc, card->u.x.hi_svc);
|
|
}
|
|
|
|
if (card->u.x.lo_pvc == 255)
|
|
cfg.npvc = 0;
|
|
else
|
|
cfg.npvc = card->u.x.hi_pvc - card->u.x.lo_pvc + 1;
|
|
|
|
cfg.nvc = card->u.x.hi_svc - card->u.x.lo_svc + 1 + cfg.npvc;
|
|
|
|
if (conf->u.x25.hdlc_window)
|
|
cfg.n2win = min_t(unsigned int, conf->u.x25.hdlc_window, 7);
|
|
|
|
if (conf->u.x25.pkt_window)
|
|
cfg.n3win = min_t(unsigned int, conf->u.x25.pkt_window, 7);
|
|
|
|
if (conf->u.x25.t1)
|
|
cfg.t1 = min_t(unsigned int, conf->u.x25.t1, 30);
|
|
|
|
if (conf->u.x25.t2)
|
|
cfg.t2 = min_t(unsigned int, conf->u.x25.t2, 30);
|
|
|
|
if (conf->u.x25.t11_t21)
|
|
cfg.t21 = min_t(unsigned int, conf->u.x25.t11_t21, 30);
|
|
|
|
if (conf->u.x25.t13_t23)
|
|
cfg.t23 = min_t(unsigned int, conf->u.x25.t13_t23, 30);
|
|
|
|
if (conf->u.x25.n2)
|
|
cfg.n2 = min_t(unsigned int, conf->u.x25.n2, 30);
|
|
|
|
/* initialize adapter */
|
|
if (cycx_x25_configure(card, &cfg))
|
|
return -EIO;
|
|
|
|
/* Initialize protocol-specific fields of adapter data space */
|
|
card->wandev.bps = conf->bps;
|
|
card->wandev.interface = conf->interface;
|
|
card->wandev.clocking = conf->clocking;
|
|
card->wandev.station = conf->station;
|
|
card->isr = cycx_x25_irq_handler;
|
|
card->exec = NULL;
|
|
card->wandev.update = cycx_wan_update;
|
|
card->wandev.new_if = cycx_wan_new_if;
|
|
card->wandev.del_if = cycx_wan_del_if;
|
|
card->wandev.state = WAN_DISCONNECTED;
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* WAN Device Driver Entry Points */
|
|
/* Update device status & statistics. */
|
|
static int cycx_wan_update(struct wan_device *wandev)
|
|
{
|
|
/* sanity checks */
|
|
if (!wandev || !wandev->private)
|
|
return -EFAULT;
|
|
|
|
if (wandev->state == WAN_UNCONFIGURED)
|
|
return -ENODEV;
|
|
|
|
cycx_x25_get_stats(wandev->private);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Create new logical channel.
|
|
* This routine is called by the router when ROUTER_IFNEW IOCTL is being
|
|
* handled.
|
|
* o parse media- and hardware-specific configuration
|
|
* o make sure that a new channel can be created
|
|
* o allocate resources, if necessary
|
|
* o prepare network device structure for registration.
|
|
*
|
|
* Return: 0 o.k.
|
|
* < 0 failure (channel will not be created) */
|
|
static int cycx_wan_new_if(struct wan_device *wandev, struct net_device *dev,
|
|
wanif_conf_t *conf)
|
|
{
|
|
struct cycx_device *card = wandev->private;
|
|
struct cycx_x25_channel *chan;
|
|
int err = 0;
|
|
|
|
if (!conf->name[0] || strlen(conf->name) > WAN_IFNAME_SZ) {
|
|
printk(KERN_INFO "%s: invalid interface name!\n",
|
|
card->devname);
|
|
return -EINVAL;
|
|
}
|
|
|
|
/* allocate and initialize private data */
|
|
chan = kmalloc(sizeof(struct cycx_x25_channel), GFP_KERNEL);
|
|
if (!chan)
|
|
return -ENOMEM;
|
|
|
|
memset(chan, 0, sizeof(*chan));
|
|
strcpy(chan->name, conf->name);
|
|
chan->card = card;
|
|
chan->link = conf->port;
|
|
chan->protocol = conf->protocol ? ETH_P_X25 : ETH_P_IP;
|
|
chan->rx_skb = NULL;
|
|
/* only used in svc connected thru crossover cable */
|
|
chan->local_addr = NULL;
|
|
|
|
if (conf->addr[0] == '@') { /* SVC */
|
|
int len = strlen(conf->local_addr);
|
|
|
|
if (len) {
|
|
if (len > WAN_ADDRESS_SZ) {
|
|
printk(KERN_ERR "%s: %s local addr too long!\n",
|
|
wandev->name, chan->name);
|
|
kfree(chan);
|
|
return -EINVAL;
|
|
} else {
|
|
chan->local_addr = kmalloc(len + 1, GFP_KERNEL);
|
|
|
|
if (!chan->local_addr) {
|
|
kfree(chan);
|
|
return -ENOMEM;
|
|
}
|
|
}
|
|
|
|
strncpy(chan->local_addr, conf->local_addr,
|
|
WAN_ADDRESS_SZ);
|
|
}
|
|
|
|
chan->svc = 1;
|
|
strncpy(chan->addr, &conf->addr[1], WAN_ADDRESS_SZ);
|
|
init_timer(&chan->timer);
|
|
chan->timer.function = cycx_x25_chan_timer;
|
|
chan->timer.data = (unsigned long)dev;
|
|
|
|
/* Set channel timeouts (default if not specified) */
|
|
chan->idle_tmout = conf->idle_timeout ? conf->idle_timeout : 90;
|
|
} else if (isdigit(conf->addr[0])) { /* PVC */
|
|
s16 lcn = dec_to_uint(conf->addr, 0);
|
|
|
|
if (lcn >= card->u.x.lo_pvc && lcn <= card->u.x.hi_pvc)
|
|
chan->lcn = lcn;
|
|
else {
|
|
printk(KERN_ERR
|
|
"%s: PVC %u is out of range on interface %s!\n",
|
|
wandev->name, lcn, chan->name);
|
|
err = -EINVAL;
|
|
}
|
|
} else {
|
|
printk(KERN_ERR "%s: invalid media address on interface %s!\n",
|
|
wandev->name, chan->name);
|
|
err = -EINVAL;
|
|
}
|
|
|
|
if (err) {
|
|
kfree(chan->local_addr);
|
|
kfree(chan);
|
|
return err;
|
|
}
|
|
|
|
/* prepare network device data space for registration */
|
|
strcpy(dev->name, chan->name);
|
|
dev->init = cycx_netdevice_init;
|
|
dev->priv = chan;
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Delete logical channel. */
|
|
static int cycx_wan_del_if(struct wan_device *wandev, struct net_device *dev)
|
|
{
|
|
if (dev->priv) {
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
|
|
if (chan->svc) {
|
|
kfree(chan->local_addr);
|
|
if (chan->state == WAN_CONNECTED)
|
|
del_timer(&chan->timer);
|
|
}
|
|
|
|
kfree(chan);
|
|
dev->priv = NULL;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Network Device Interface */
|
|
/* Initialize Linux network interface.
|
|
*
|
|
* This routine is called only once for each interface, during Linux network
|
|
* interface registration. Returning anything but zero will fail interface
|
|
* registration. */
|
|
static int cycx_netdevice_init(struct net_device *dev)
|
|
{
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
struct cycx_device *card = chan->card;
|
|
struct wan_device *wandev = &card->wandev;
|
|
|
|
/* Initialize device driver entry points */
|
|
dev->open = cycx_netdevice_open;
|
|
dev->stop = cycx_netdevice_stop;
|
|
dev->hard_header = cycx_netdevice_hard_header;
|
|
dev->rebuild_header = cycx_netdevice_rebuild_header;
|
|
dev->hard_start_xmit = cycx_netdevice_hard_start_xmit;
|
|
dev->get_stats = cycx_netdevice_get_stats;
|
|
|
|
/* Initialize media-specific parameters */
|
|
dev->mtu = CYCX_X25_CHAN_MTU;
|
|
dev->type = ARPHRD_HWX25; /* ARP h/w type */
|
|
dev->hard_header_len = 0; /* media header length */
|
|
dev->addr_len = 0; /* hardware address length */
|
|
|
|
if (!chan->svc)
|
|
*(u16*)dev->dev_addr = htons(chan->lcn);
|
|
|
|
/* Initialize hardware parameters (just for reference) */
|
|
dev->irq = wandev->irq;
|
|
dev->dma = wandev->dma;
|
|
dev->base_addr = wandev->ioport;
|
|
dev->mem_start = (unsigned long)wandev->maddr;
|
|
dev->mem_end = (unsigned long)(wandev->maddr +
|
|
wandev->msize - 1);
|
|
dev->flags |= IFF_NOARP;
|
|
|
|
/* Set transmit buffer queue length */
|
|
dev->tx_queue_len = 10;
|
|
SET_MODULE_OWNER(dev);
|
|
|
|
/* Initialize socket buffers */
|
|
cycx_x25_set_chan_state(dev, WAN_DISCONNECTED);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Open network interface.
|
|
* o prevent module from unloading by incrementing use count
|
|
* o if link is disconnected then initiate connection
|
|
*
|
|
* Return 0 if O.k. or errno. */
|
|
static int cycx_netdevice_open(struct net_device *dev)
|
|
{
|
|
if (netif_running(dev))
|
|
return -EBUSY; /* only one open is allowed */
|
|
|
|
netif_start_queue(dev);
|
|
return 0;
|
|
}
|
|
|
|
/* Close network interface.
|
|
* o reset flags.
|
|
* o if there's no more open channels then disconnect physical link. */
|
|
static int cycx_netdevice_stop(struct net_device *dev)
|
|
{
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
|
|
netif_stop_queue(dev);
|
|
|
|
if (chan->state == WAN_CONNECTED || chan->state == WAN_CONNECTING)
|
|
cycx_x25_chan_disconnect(dev);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Build media header.
|
|
* o encapsulate packet according to encapsulation type.
|
|
*
|
|
* The trick here is to put packet type (Ethertype) into 'protocol' field of
|
|
* the socket buffer, so that we don't forget it. If encapsulation fails,
|
|
* set skb->protocol to 0 and discard packet later.
|
|
*
|
|
* Return: media header length. */
|
|
static int cycx_netdevice_hard_header(struct sk_buff *skb,
|
|
struct net_device *dev, u16 type,
|
|
void *daddr, void *saddr, unsigned len)
|
|
{
|
|
skb->protocol = type;
|
|
|
|
return dev->hard_header_len;
|
|
}
|
|
|
|
/* * Re-build media header.
|
|
* Return: 1 physical address resolved.
|
|
* 0 physical address not resolved */
|
|
static int cycx_netdevice_rebuild_header(struct sk_buff *skb)
|
|
{
|
|
return 1;
|
|
}
|
|
|
|
/* Send a packet on a network interface.
|
|
* o set busy flag (marks start of the transmission).
|
|
* o check link state. If link is not up, then drop the packet.
|
|
* o check channel status. If it's down then initiate a call.
|
|
* o pass a packet to corresponding WAN device.
|
|
* o free socket buffer
|
|
*
|
|
* Return: 0 complete (socket buffer must be freed)
|
|
* non-0 packet may be re-transmitted (tbusy must be set)
|
|
*
|
|
* Notes:
|
|
* 1. This routine is called either by the protocol stack or by the "net
|
|
* bottom half" (with interrupts enabled).
|
|
* 2. Setting tbusy flag will inhibit further transmit requests from the
|
|
* protocol stack and can be used for flow control with protocol layer. */
|
|
static int cycx_netdevice_hard_start_xmit(struct sk_buff *skb,
|
|
struct net_device *dev)
|
|
{
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
struct cycx_device *card = chan->card;
|
|
|
|
if (!chan->svc)
|
|
chan->protocol = skb->protocol;
|
|
|
|
if (card->wandev.state != WAN_CONNECTED)
|
|
++chan->ifstats.tx_dropped;
|
|
else if (chan->svc && chan->protocol &&
|
|
chan->protocol != skb->protocol) {
|
|
printk(KERN_INFO
|
|
"%s: unsupported Ethertype 0x%04X on interface %s!\n",
|
|
card->devname, skb->protocol, dev->name);
|
|
++chan->ifstats.tx_errors;
|
|
} else if (chan->protocol == ETH_P_IP) {
|
|
switch (chan->state) {
|
|
case WAN_DISCONNECTED:
|
|
if (cycx_x25_chan_connect(dev)) {
|
|
netif_stop_queue(dev);
|
|
return -EBUSY;
|
|
}
|
|
/* fall thru */
|
|
case WAN_CONNECTED:
|
|
reset_timer(dev);
|
|
dev->trans_start = jiffies;
|
|
netif_stop_queue(dev);
|
|
|
|
if (cycx_x25_chan_send(dev, skb))
|
|
return -EBUSY;
|
|
|
|
break;
|
|
default:
|
|
++chan->ifstats.tx_dropped;
|
|
++card->wandev.stats.tx_dropped;
|
|
}
|
|
} else { /* chan->protocol == ETH_P_X25 */
|
|
switch (skb->data[0]) {
|
|
case 0: break;
|
|
case 1: /* Connect request */
|
|
cycx_x25_chan_connect(dev);
|
|
goto free_packet;
|
|
case 2: /* Disconnect request */
|
|
cycx_x25_chan_disconnect(dev);
|
|
goto free_packet;
|
|
default:
|
|
printk(KERN_INFO
|
|
"%s: unknown %d x25-iface request on %s!\n",
|
|
card->devname, skb->data[0], dev->name);
|
|
++chan->ifstats.tx_errors;
|
|
goto free_packet;
|
|
}
|
|
|
|
skb_pull(skb, 1); /* Remove control byte */
|
|
reset_timer(dev);
|
|
dev->trans_start = jiffies;
|
|
netif_stop_queue(dev);
|
|
|
|
if (cycx_x25_chan_send(dev, skb)) {
|
|
/* prepare for future retransmissions */
|
|
skb_push(skb, 1);
|
|
return -EBUSY;
|
|
}
|
|
}
|
|
|
|
free_packet:
|
|
dev_kfree_skb(skb);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Get Ethernet-style interface statistics.
|
|
* Return a pointer to struct net_device_stats */
|
|
static struct net_device_stats *cycx_netdevice_get_stats(struct net_device *dev)
|
|
{
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
|
|
return chan ? &chan->ifstats : NULL;
|
|
}
|
|
|
|
/* Interrupt Handlers */
|
|
/* X.25 Interrupt Service Routine. */
|
|
static void cycx_x25_irq_handler(struct cycx_device *card)
|
|
{
|
|
struct cycx_x25_cmd cmd;
|
|
u16 z = 0;
|
|
|
|
card->in_isr = 1;
|
|
card->buff_int_mode_unbusy = 0;
|
|
cycx_peek(&card->hw, X25_RXMBOX_OFFS, &cmd, sizeof(cmd));
|
|
|
|
switch (cmd.command) {
|
|
case X25_DATA_INDICATION:
|
|
cycx_x25_irq_rx(card, &cmd);
|
|
break;
|
|
case X25_ACK_FROM_VC:
|
|
cycx_x25_irq_tx(card, &cmd);
|
|
break;
|
|
case X25_LOG:
|
|
cycx_x25_irq_log(card, &cmd);
|
|
break;
|
|
case X25_STATISTIC:
|
|
cycx_x25_irq_stat(card, &cmd);
|
|
break;
|
|
case X25_CONNECT_CONFIRM:
|
|
cycx_x25_irq_connect_confirm(card, &cmd);
|
|
break;
|
|
case X25_CONNECT_INDICATION:
|
|
cycx_x25_irq_connect(card, &cmd);
|
|
break;
|
|
case X25_DISCONNECT_INDICATION:
|
|
cycx_x25_irq_disconnect(card, &cmd);
|
|
break;
|
|
case X25_DISCONNECT_CONFIRM:
|
|
cycx_x25_irq_disconnect_confirm(card, &cmd);
|
|
break;
|
|
case X25_LINE_ON:
|
|
cycx_set_state(card, WAN_CONNECTED);
|
|
break;
|
|
case X25_LINE_OFF:
|
|
cycx_set_state(card, WAN_DISCONNECTED);
|
|
break;
|
|
default:
|
|
cycx_x25_irq_spurious(card, &cmd);
|
|
break;
|
|
}
|
|
|
|
cycx_poke(&card->hw, 0, &z, sizeof(z));
|
|
cycx_poke(&card->hw, X25_RXMBOX_OFFS, &z, sizeof(z));
|
|
card->in_isr = 0;
|
|
}
|
|
|
|
/* Transmit interrupt handler.
|
|
* o Release socket buffer
|
|
* o Clear 'tbusy' flag */
|
|
static void cycx_x25_irq_tx(struct cycx_device *card, struct cycx_x25_cmd *cmd)
|
|
{
|
|
struct net_device *dev;
|
|
struct wan_device *wandev = &card->wandev;
|
|
u8 lcn;
|
|
|
|
cycx_peek(&card->hw, cmd->buf, &lcn, sizeof(lcn));
|
|
|
|
/* unbusy device and then dev_tint(); */
|
|
dev = cycx_x25_get_dev_by_lcn(wandev, lcn);
|
|
if (dev) {
|
|
card->buff_int_mode_unbusy = 1;
|
|
netif_wake_queue(dev);
|
|
} else
|
|
printk(KERN_ERR "%s:ackvc for inexistent lcn %d\n",
|
|
card->devname, lcn);
|
|
}
|
|
|
|
/* Receive interrupt handler.
|
|
* This routine handles fragmented IP packets using M-bit according to the
|
|
* RFC1356.
|
|
* o map logical channel number to network interface.
|
|
* o allocate socket buffer or append received packet to the existing one.
|
|
* o if M-bit is reset (i.e. it's the last packet in a sequence) then
|
|
* decapsulate packet and pass socket buffer to the protocol stack.
|
|
*
|
|
* Notes:
|
|
* 1. When allocating a socket buffer, if M-bit is set then more data is
|
|
* coming and we have to allocate buffer for the maximum IP packet size
|
|
* expected on this channel.
|
|
* 2. If something goes wrong and X.25 packet has to be dropped (e.g. no
|
|
* socket buffers available) the whole packet sequence must be discarded. */
|
|
static void cycx_x25_irq_rx(struct cycx_device *card, struct cycx_x25_cmd *cmd)
|
|
{
|
|
struct wan_device *wandev = &card->wandev;
|
|
struct net_device *dev;
|
|
struct cycx_x25_channel *chan;
|
|
struct sk_buff *skb;
|
|
u8 bitm, lcn;
|
|
int pktlen = cmd->len - 5;
|
|
|
|
cycx_peek(&card->hw, cmd->buf, &lcn, sizeof(lcn));
|
|
cycx_peek(&card->hw, cmd->buf + 4, &bitm, sizeof(bitm));
|
|
bitm &= 0x10;
|
|
|
|
dev = cycx_x25_get_dev_by_lcn(wandev, lcn);
|
|
if (!dev) {
|
|
/* Invalid channel, discard packet */
|
|
printk(KERN_INFO "%s: receiving on orphaned LCN %d!\n",
|
|
card->devname, lcn);
|
|
return;
|
|
}
|
|
|
|
chan = dev->priv;
|
|
reset_timer(dev);
|
|
|
|
if (chan->drop_sequence) {
|
|
if (!bitm)
|
|
chan->drop_sequence = 0;
|
|
else
|
|
return;
|
|
}
|
|
|
|
if ((skb = chan->rx_skb) == NULL) {
|
|
/* Allocate new socket buffer */
|
|
int bufsize = bitm ? dev->mtu : pktlen;
|
|
|
|
if ((skb = dev_alloc_skb((chan->protocol == ETH_P_X25 ? 1 : 0) +
|
|
bufsize +
|
|
dev->hard_header_len)) == NULL) {
|
|
printk(KERN_INFO "%s: no socket buffers available!\n",
|
|
card->devname);
|
|
chan->drop_sequence = 1;
|
|
++chan->ifstats.rx_dropped;
|
|
return;
|
|
}
|
|
|
|
if (chan->protocol == ETH_P_X25) /* X.25 socket layer control */
|
|
/* 0 = data packet (dev_alloc_skb zeroed skb->data) */
|
|
skb_put(skb, 1);
|
|
|
|
skb->dev = dev;
|
|
skb->protocol = htons(chan->protocol);
|
|
chan->rx_skb = skb;
|
|
}
|
|
|
|
if (skb_tailroom(skb) < pktlen) {
|
|
/* No room for the packet. Call off the whole thing! */
|
|
dev_kfree_skb_irq(skb);
|
|
chan->rx_skb = NULL;
|
|
|
|
if (bitm)
|
|
chan->drop_sequence = 1;
|
|
|
|
printk(KERN_INFO "%s: unexpectedly long packet sequence "
|
|
"on interface %s!\n", card->devname, dev->name);
|
|
++chan->ifstats.rx_length_errors;
|
|
return;
|
|
}
|
|
|
|
/* Append packet to the socket buffer */
|
|
cycx_peek(&card->hw, cmd->buf + 5, skb_put(skb, pktlen), pktlen);
|
|
|
|
if (bitm)
|
|
return; /* more data is coming */
|
|
|
|
chan->rx_skb = NULL; /* dequeue packet */
|
|
|
|
++chan->ifstats.rx_packets;
|
|
chan->ifstats.rx_bytes += pktlen;
|
|
|
|
skb->mac.raw = skb->data;
|
|
netif_rx(skb);
|
|
dev->last_rx = jiffies; /* timestamp */
|
|
}
|
|
|
|
/* Connect interrupt handler. */
|
|
static void cycx_x25_irq_connect(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd)
|
|
{
|
|
struct wan_device *wandev = &card->wandev;
|
|
struct net_device *dev = NULL;
|
|
struct cycx_x25_channel *chan;
|
|
u8 d[32],
|
|
loc[24],
|
|
rem[24];
|
|
u8 lcn, sizeloc, sizerem;
|
|
|
|
cycx_peek(&card->hw, cmd->buf, &lcn, sizeof(lcn));
|
|
cycx_peek(&card->hw, cmd->buf + 5, &sizeloc, sizeof(sizeloc));
|
|
cycx_peek(&card->hw, cmd->buf + 6, d, cmd->len - 6);
|
|
|
|
sizerem = sizeloc >> 4;
|
|
sizeloc &= 0x0F;
|
|
|
|
loc[0] = rem[0] = '\0';
|
|
|
|
if (sizeloc)
|
|
nibble_to_byte(d, loc, sizeloc, 0);
|
|
|
|
if (sizerem)
|
|
nibble_to_byte(d + (sizeloc >> 1), rem, sizerem, sizeloc & 1);
|
|
|
|
dprintk(1, KERN_INFO "%s:lcn=%d, local=%s, remote=%s\n",
|
|
__FUNCTION__, lcn, loc, rem);
|
|
|
|
dev = cycx_x25_get_dev_by_dte_addr(wandev, rem);
|
|
if (!dev) {
|
|
/* Invalid channel, discard packet */
|
|
printk(KERN_INFO "%s: connect not expected: remote %s!\n",
|
|
card->devname, rem);
|
|
return;
|
|
}
|
|
|
|
chan = dev->priv;
|
|
chan->lcn = lcn;
|
|
cycx_x25_connect_response(card, chan);
|
|
cycx_x25_set_chan_state(dev, WAN_CONNECTED);
|
|
}
|
|
|
|
/* Connect confirm interrupt handler. */
|
|
static void cycx_x25_irq_connect_confirm(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd)
|
|
{
|
|
struct wan_device *wandev = &card->wandev;
|
|
struct net_device *dev;
|
|
struct cycx_x25_channel *chan;
|
|
u8 lcn, key;
|
|
|
|
cycx_peek(&card->hw, cmd->buf, &lcn, sizeof(lcn));
|
|
cycx_peek(&card->hw, cmd->buf + 1, &key, sizeof(key));
|
|
dprintk(1, KERN_INFO "%s: %s:lcn=%d, key=%d\n",
|
|
card->devname, __FUNCTION__, lcn, key);
|
|
|
|
dev = cycx_x25_get_dev_by_lcn(wandev, -key);
|
|
if (!dev) {
|
|
/* Invalid channel, discard packet */
|
|
clear_bit(--key, (void*)&card->u.x.connection_keys);
|
|
printk(KERN_INFO "%s: connect confirm not expected: lcn %d, "
|
|
"key=%d!\n", card->devname, lcn, key);
|
|
return;
|
|
}
|
|
|
|
clear_bit(--key, (void*)&card->u.x.connection_keys);
|
|
chan = dev->priv;
|
|
chan->lcn = lcn;
|
|
cycx_x25_set_chan_state(dev, WAN_CONNECTED);
|
|
}
|
|
|
|
/* Disconnect confirm interrupt handler. */
|
|
static void cycx_x25_irq_disconnect_confirm(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd)
|
|
{
|
|
struct wan_device *wandev = &card->wandev;
|
|
struct net_device *dev;
|
|
u8 lcn;
|
|
|
|
cycx_peek(&card->hw, cmd->buf, &lcn, sizeof(lcn));
|
|
dprintk(1, KERN_INFO "%s: %s:lcn=%d\n",
|
|
card->devname, __FUNCTION__, lcn);
|
|
dev = cycx_x25_get_dev_by_lcn(wandev, lcn);
|
|
if (!dev) {
|
|
/* Invalid channel, discard packet */
|
|
printk(KERN_INFO "%s:disconnect confirm not expected!:lcn %d\n",
|
|
card->devname, lcn);
|
|
return;
|
|
}
|
|
|
|
cycx_x25_set_chan_state(dev, WAN_DISCONNECTED);
|
|
}
|
|
|
|
/* disconnect interrupt handler. */
|
|
static void cycx_x25_irq_disconnect(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd)
|
|
{
|
|
struct wan_device *wandev = &card->wandev;
|
|
struct net_device *dev;
|
|
u8 lcn;
|
|
|
|
cycx_peek(&card->hw, cmd->buf, &lcn, sizeof(lcn));
|
|
dprintk(1, KERN_INFO "%s:lcn=%d\n", __FUNCTION__, lcn);
|
|
|
|
dev = cycx_x25_get_dev_by_lcn(wandev, lcn);
|
|
if (dev) {
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
|
|
cycx_x25_disconnect_response(card, chan->link, lcn);
|
|
cycx_x25_set_chan_state(dev, WAN_DISCONNECTED);
|
|
} else
|
|
cycx_x25_disconnect_response(card, 0, lcn);
|
|
}
|
|
|
|
/* LOG interrupt handler. */
|
|
static void cycx_x25_irq_log(struct cycx_device *card, struct cycx_x25_cmd *cmd)
|
|
{
|
|
#if CYCLOMX_X25_DEBUG
|
|
char bf[20];
|
|
u16 size, toread, link, msg_code;
|
|
u8 code, routine;
|
|
|
|
cycx_peek(&card->hw, cmd->buf, &msg_code, sizeof(msg_code));
|
|
cycx_peek(&card->hw, cmd->buf + 2, &link, sizeof(link));
|
|
cycx_peek(&card->hw, cmd->buf + 4, &size, sizeof(size));
|
|
/* at most 20 bytes are available... thanks to Daniela :) */
|
|
toread = size < 20 ? size : 20;
|
|
cycx_peek(&card->hw, cmd->buf + 10, &bf, toread);
|
|
cycx_peek(&card->hw, cmd->buf + 10 + toread, &code, 1);
|
|
cycx_peek(&card->hw, cmd->buf + 10 + toread + 1, &routine, 1);
|
|
|
|
printk(KERN_INFO "cycx_x25_irq_handler: X25_LOG (0x4500) indic.:\n");
|
|
printk(KERN_INFO "cmd->buf=0x%X\n", cmd->buf);
|
|
printk(KERN_INFO "Log message code=0x%X\n", msg_code);
|
|
printk(KERN_INFO "Link=%d\n", link);
|
|
printk(KERN_INFO "log code=0x%X\n", code);
|
|
printk(KERN_INFO "log routine=0x%X\n", routine);
|
|
printk(KERN_INFO "Message size=%d\n", size);
|
|
hex_dump("Message", bf, toread);
|
|
#endif
|
|
}
|
|
|
|
/* STATISTIC interrupt handler. */
|
|
static void cycx_x25_irq_stat(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd)
|
|
{
|
|
cycx_peek(&card->hw, cmd->buf, &card->u.x.stats,
|
|
sizeof(card->u.x.stats));
|
|
hex_dump("cycx_x25_irq_stat", (unsigned char*)&card->u.x.stats,
|
|
sizeof(card->u.x.stats));
|
|
cycx_x25_dump_stats(&card->u.x.stats);
|
|
wake_up_interruptible(&card->wait_stats);
|
|
}
|
|
|
|
/* Spurious interrupt handler.
|
|
* o print a warning
|
|
* If number of spurious interrupts exceeded some limit, then ??? */
|
|
static void cycx_x25_irq_spurious(struct cycx_device *card,
|
|
struct cycx_x25_cmd *cmd)
|
|
{
|
|
printk(KERN_INFO "%s: spurious interrupt (0x%X)!\n",
|
|
card->devname, cmd->command);
|
|
}
|
|
#ifdef CYCLOMX_X25_DEBUG
|
|
static void hex_dump(char *msg, unsigned char *p, int len)
|
|
{
|
|
unsigned char hex[1024],
|
|
* phex = hex;
|
|
|
|
if (len >= (sizeof(hex) / 2))
|
|
len = (sizeof(hex) / 2) - 1;
|
|
|
|
while (len--) {
|
|
sprintf(phex, "%02x", *p++);
|
|
phex += 2;
|
|
}
|
|
|
|
printk(KERN_INFO "%s: %s\n", msg, hex);
|
|
}
|
|
#endif
|
|
|
|
/* Cyclom 2X Firmware-Specific Functions */
|
|
/* Exec X.25 command. */
|
|
static int x25_exec(struct cycx_device *card, int command, int link,
|
|
void *d1, int len1, void *d2, int len2)
|
|
{
|
|
struct cycx_x25_cmd c;
|
|
unsigned long flags;
|
|
u32 addr = 0x1200 + 0x2E0 * link + 0x1E2;
|
|
u8 retry = CYCX_X25_MAX_CMD_RETRY;
|
|
int err = 0;
|
|
|
|
c.command = command;
|
|
c.link = link;
|
|
c.len = len1 + len2;
|
|
|
|
spin_lock_irqsave(&card->u.x.lock, flags);
|
|
|
|
/* write command */
|
|
cycx_poke(&card->hw, X25_MBOX_OFFS, &c, sizeof(c) - sizeof(c.buf));
|
|
|
|
/* write X.25 data */
|
|
if (d1) {
|
|
cycx_poke(&card->hw, addr, d1, len1);
|
|
|
|
if (d2) {
|
|
if (len2 > 254) {
|
|
u32 addr1 = 0xA00 + 0x400 * link;
|
|
|
|
cycx_poke(&card->hw, addr + len1, d2, 249);
|
|
cycx_poke(&card->hw, addr1, ((u8*)d2) + 249,
|
|
len2 - 249);
|
|
} else
|
|
cycx_poke(&card->hw, addr + len1, d2, len2);
|
|
}
|
|
}
|
|
|
|
/* generate interruption, executing command */
|
|
cycx_intr(&card->hw);
|
|
|
|
/* wait till card->mbox == 0 */
|
|
do {
|
|
err = cycx_exec(card->mbox);
|
|
} while (retry-- && err);
|
|
|
|
spin_unlock_irqrestore(&card->u.x.lock, flags);
|
|
|
|
return err;
|
|
}
|
|
|
|
/* Configure adapter. */
|
|
static int cycx_x25_configure(struct cycx_device *card,
|
|
struct cycx_x25_config *conf)
|
|
{
|
|
struct {
|
|
u16 nlinks;
|
|
struct cycx_x25_config conf[2];
|
|
} x25_cmd_conf;
|
|
|
|
memset(&x25_cmd_conf, 0, sizeof(x25_cmd_conf));
|
|
x25_cmd_conf.nlinks = 2;
|
|
x25_cmd_conf.conf[0] = *conf;
|
|
/* FIXME: we need to find a way in the wanrouter framework
|
|
to configure the second link, for now lets use it
|
|
with the same config from the first link, fixing
|
|
the interface type to RS232, the speed in 38400 and
|
|
the clock to external */
|
|
x25_cmd_conf.conf[1] = *conf;
|
|
x25_cmd_conf.conf[1].link = 1;
|
|
x25_cmd_conf.conf[1].speed = 5; /* 38400 */
|
|
x25_cmd_conf.conf[1].clock = 8;
|
|
x25_cmd_conf.conf[1].flags = 0; /* default = RS232 */
|
|
|
|
cycx_x25_dump_config(&x25_cmd_conf.conf[0]);
|
|
cycx_x25_dump_config(&x25_cmd_conf.conf[1]);
|
|
|
|
return x25_exec(card, X25_CONFIG, 0,
|
|
&x25_cmd_conf, sizeof(x25_cmd_conf), NULL, 0);
|
|
}
|
|
|
|
/* Get protocol statistics. */
|
|
static int cycx_x25_get_stats(struct cycx_device *card)
|
|
{
|
|
/* the firmware expects 20 in the size field!!!
|
|
thanks to Daniela */
|
|
int err = x25_exec(card, X25_STATISTIC, 0, NULL, 20, NULL, 0);
|
|
|
|
if (err)
|
|
return err;
|
|
|
|
interruptible_sleep_on(&card->wait_stats);
|
|
|
|
if (signal_pending(current))
|
|
return -EINTR;
|
|
|
|
card->wandev.stats.rx_packets = card->u.x.stats.n2_rx_frames;
|
|
card->wandev.stats.rx_over_errors = card->u.x.stats.rx_over_errors;
|
|
card->wandev.stats.rx_crc_errors = card->u.x.stats.rx_crc_errors;
|
|
card->wandev.stats.rx_length_errors = 0; /* not available from fw */
|
|
card->wandev.stats.rx_frame_errors = 0; /* not available from fw */
|
|
card->wandev.stats.rx_missed_errors = card->u.x.stats.rx_aborts;
|
|
card->wandev.stats.rx_dropped = 0; /* not available from fw */
|
|
card->wandev.stats.rx_errors = 0; /* not available from fw */
|
|
card->wandev.stats.tx_packets = card->u.x.stats.n2_tx_frames;
|
|
card->wandev.stats.tx_aborted_errors = card->u.x.stats.tx_aborts;
|
|
card->wandev.stats.tx_dropped = 0; /* not available from fw */
|
|
card->wandev.stats.collisions = 0; /* not available from fw */
|
|
card->wandev.stats.tx_errors = 0; /* not available from fw */
|
|
|
|
cycx_x25_dump_devs(&card->wandev);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* return the number of nibbles */
|
|
static int byte_to_nibble(u8 *s, u8 *d, char *nibble)
|
|
{
|
|
int i = 0;
|
|
|
|
if (*nibble && *s) {
|
|
d[i] |= *s++ - '0';
|
|
*nibble = 0;
|
|
++i;
|
|
}
|
|
|
|
while (*s) {
|
|
d[i] = (*s - '0') << 4;
|
|
if (*(s + 1))
|
|
d[i] |= *(s + 1) - '0';
|
|
else {
|
|
*nibble = 1;
|
|
break;
|
|
}
|
|
++i;
|
|
s += 2;
|
|
}
|
|
|
|
return i;
|
|
}
|
|
|
|
static void nibble_to_byte(u8 *s, u8 *d, u8 len, u8 nibble)
|
|
{
|
|
if (nibble) {
|
|
*d++ = '0' + (*s++ & 0x0F);
|
|
--len;
|
|
}
|
|
|
|
while (len) {
|
|
*d++ = '0' + (*s >> 4);
|
|
|
|
if (--len) {
|
|
*d++ = '0' + (*s & 0x0F);
|
|
--len;
|
|
} else break;
|
|
|
|
++s;
|
|
}
|
|
|
|
*d = '\0';
|
|
}
|
|
|
|
/* Place X.25 call. */
|
|
static int x25_place_call(struct cycx_device *card,
|
|
struct cycx_x25_channel *chan)
|
|
{
|
|
int err = 0,
|
|
len;
|
|
char d[64],
|
|
nibble = 0,
|
|
mylen = chan->local_addr ? strlen(chan->local_addr) : 0,
|
|
remotelen = strlen(chan->addr);
|
|
u8 key;
|
|
|
|
if (card->u.x.connection_keys == ~0U) {
|
|
printk(KERN_INFO "%s: too many simultaneous connection "
|
|
"requests!\n", card->devname);
|
|
return -EAGAIN;
|
|
}
|
|
|
|
key = ffz(card->u.x.connection_keys);
|
|
set_bit(key, (void*)&card->u.x.connection_keys);
|
|
++key;
|
|
dprintk(1, KERN_INFO "%s:x25_place_call:key=%d\n", card->devname, key);
|
|
memset(d, 0, sizeof(d));
|
|
d[1] = key; /* user key */
|
|
d[2] = 0x10;
|
|
d[4] = 0x0B;
|
|
|
|
len = byte_to_nibble(chan->addr, d + 6, &nibble);
|
|
|
|
if (chan->local_addr)
|
|
len += byte_to_nibble(chan->local_addr, d + 6 + len, &nibble);
|
|
|
|
if (nibble)
|
|
++len;
|
|
|
|
d[5] = mylen << 4 | remotelen;
|
|
d[6 + len + 1] = 0xCC; /* TCP/IP over X.25, thanks to Daniela :) */
|
|
|
|
if ((err = x25_exec(card, X25_CONNECT_REQUEST, chan->link,
|
|
&d, 7 + len + 1, NULL, 0)) != 0)
|
|
clear_bit(--key, (void*)&card->u.x.connection_keys);
|
|
else
|
|
chan->lcn = -key;
|
|
|
|
return err;
|
|
}
|
|
|
|
/* Place X.25 CONNECT RESPONSE. */
|
|
static int cycx_x25_connect_response(struct cycx_device *card,
|
|
struct cycx_x25_channel *chan)
|
|
{
|
|
u8 d[8];
|
|
|
|
memset(d, 0, sizeof(d));
|
|
d[0] = d[3] = chan->lcn;
|
|
d[2] = 0x10;
|
|
d[4] = 0x0F;
|
|
d[7] = 0xCC; /* TCP/IP over X.25, thanks Daniela */
|
|
|
|
return x25_exec(card, X25_CONNECT_RESPONSE, chan->link, &d, 8, NULL, 0);
|
|
}
|
|
|
|
/* Place X.25 DISCONNECT RESPONSE. */
|
|
static int cycx_x25_disconnect_response(struct cycx_device *card, u8 link,
|
|
u8 lcn)
|
|
{
|
|
char d[5];
|
|
|
|
memset(d, 0, sizeof(d));
|
|
d[0] = d[3] = lcn;
|
|
d[2] = 0x10;
|
|
d[4] = 0x17;
|
|
|
|
return x25_exec(card, X25_DISCONNECT_RESPONSE, link, &d, 5, NULL, 0);
|
|
}
|
|
|
|
/* Clear X.25 call. */
|
|
static int x25_clear_call(struct cycx_device *card, u8 link, u8 lcn, u8 cause,
|
|
u8 diagn)
|
|
{
|
|
u8 d[7];
|
|
|
|
memset(d, 0, sizeof(d));
|
|
d[0] = d[3] = lcn;
|
|
d[2] = 0x10;
|
|
d[4] = 0x13;
|
|
d[5] = cause;
|
|
d[6] = diagn;
|
|
|
|
return x25_exec(card, X25_DISCONNECT_REQUEST, link, d, 7, NULL, 0);
|
|
}
|
|
|
|
/* Send X.25 data packet. */
|
|
static int cycx_x25_send(struct cycx_device *card, u8 link, u8 lcn, u8 bitm,
|
|
int len, void *buf)
|
|
{
|
|
u8 d[] = "?\xFF\x10??";
|
|
|
|
d[0] = d[3] = lcn;
|
|
d[4] = bitm;
|
|
|
|
return x25_exec(card, X25_DATA_REQUEST, link, &d, 5, buf, len);
|
|
}
|
|
|
|
/* Miscellaneous */
|
|
/* Find network device by its channel number. */
|
|
static struct net_device *cycx_x25_get_dev_by_lcn(struct wan_device *wandev,
|
|
s16 lcn)
|
|
{
|
|
struct net_device *dev = wandev->dev;
|
|
struct cycx_x25_channel *chan;
|
|
|
|
while (dev) {
|
|
chan = (struct cycx_x25_channel*)dev->priv;
|
|
|
|
if (chan->lcn == lcn)
|
|
break;
|
|
dev = chan->slave;
|
|
}
|
|
return dev;
|
|
}
|
|
|
|
/* Find network device by its remote dte address. */
|
|
static struct net_device *
|
|
cycx_x25_get_dev_by_dte_addr(struct wan_device *wandev, char *dte)
|
|
{
|
|
struct net_device *dev = wandev->dev;
|
|
struct cycx_x25_channel *chan;
|
|
|
|
while (dev) {
|
|
chan = (struct cycx_x25_channel*)dev->priv;
|
|
|
|
if (!strcmp(chan->addr, dte))
|
|
break;
|
|
dev = chan->slave;
|
|
}
|
|
return dev;
|
|
}
|
|
|
|
/* Initiate connection on the logical channel.
|
|
* o for PVC we just get channel configuration
|
|
* o for SVCs place an X.25 call
|
|
*
|
|
* Return: 0 connected
|
|
* >0 connection in progress
|
|
* <0 failure */
|
|
static int cycx_x25_chan_connect(struct net_device *dev)
|
|
{
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
struct cycx_device *card = chan->card;
|
|
|
|
if (chan->svc) {
|
|
if (!chan->addr[0])
|
|
return -EINVAL; /* no destination address */
|
|
|
|
dprintk(1, KERN_INFO "%s: placing X.25 call to %s...\n",
|
|
card->devname, chan->addr);
|
|
|
|
if (x25_place_call(card, chan))
|
|
return -EIO;
|
|
|
|
cycx_x25_set_chan_state(dev, WAN_CONNECTING);
|
|
return 1;
|
|
} else
|
|
cycx_x25_set_chan_state(dev, WAN_CONNECTED);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Disconnect logical channel.
|
|
* o if SVC then clear X.25 call */
|
|
static void cycx_x25_chan_disconnect(struct net_device *dev)
|
|
{
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
|
|
if (chan->svc) {
|
|
x25_clear_call(chan->card, chan->link, chan->lcn, 0, 0);
|
|
cycx_x25_set_chan_state(dev, WAN_DISCONNECTING);
|
|
} else
|
|
cycx_x25_set_chan_state(dev, WAN_DISCONNECTED);
|
|
}
|
|
|
|
/* Called by kernel timer */
|
|
static void cycx_x25_chan_timer(unsigned long d)
|
|
{
|
|
struct net_device *dev = (struct net_device *)d;
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
|
|
if (chan->state == WAN_CONNECTED)
|
|
cycx_x25_chan_disconnect(dev);
|
|
else
|
|
printk(KERN_ERR "%s: %s for svc (%s) not connected!\n",
|
|
chan->card->devname, __FUNCTION__, dev->name);
|
|
}
|
|
|
|
/* Set logical channel state. */
|
|
static void cycx_x25_set_chan_state(struct net_device *dev, u8 state)
|
|
{
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
struct cycx_device *card = chan->card;
|
|
unsigned long flags;
|
|
char *string_state = NULL;
|
|
|
|
spin_lock_irqsave(&card->lock, flags);
|
|
|
|
if (chan->state != state) {
|
|
if (chan->svc && chan->state == WAN_CONNECTED)
|
|
del_timer(&chan->timer);
|
|
|
|
switch (state) {
|
|
case WAN_CONNECTED:
|
|
string_state = "connected!";
|
|
*(u16*)dev->dev_addr = htons(chan->lcn);
|
|
netif_wake_queue(dev);
|
|
reset_timer(dev);
|
|
|
|
if (chan->protocol == ETH_P_X25)
|
|
cycx_x25_chan_send_event(dev, 1);
|
|
|
|
break;
|
|
case WAN_CONNECTING:
|
|
string_state = "connecting...";
|
|
break;
|
|
case WAN_DISCONNECTING:
|
|
string_state = "disconnecting...";
|
|
break;
|
|
case WAN_DISCONNECTED:
|
|
string_state = "disconnected!";
|
|
|
|
if (chan->svc) {
|
|
*(unsigned short*)dev->dev_addr = 0;
|
|
chan->lcn = 0;
|
|
}
|
|
|
|
if (chan->protocol == ETH_P_X25)
|
|
cycx_x25_chan_send_event(dev, 2);
|
|
|
|
netif_wake_queue(dev);
|
|
break;
|
|
}
|
|
|
|
printk(KERN_INFO "%s: interface %s %s\n", card->devname,
|
|
dev->name, string_state);
|
|
chan->state = state;
|
|
}
|
|
|
|
spin_unlock_irqrestore(&card->lock, flags);
|
|
}
|
|
|
|
/* Send packet on a logical channel.
|
|
* When this function is called, tx_skb field of the channel data space
|
|
* points to the transmit socket buffer. When transmission is complete,
|
|
* release socket buffer and reset 'tbusy' flag.
|
|
*
|
|
* Return: 0 - transmission complete
|
|
* 1 - busy
|
|
*
|
|
* Notes:
|
|
* 1. If packet length is greater than MTU for this channel, we'll fragment
|
|
* the packet into 'complete sequence' using M-bit.
|
|
* 2. When transmission is complete, an event notification should be issued
|
|
* to the router. */
|
|
static int cycx_x25_chan_send(struct net_device *dev, struct sk_buff *skb)
|
|
{
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
struct cycx_device *card = chan->card;
|
|
int bitm = 0; /* final packet */
|
|
unsigned len = skb->len;
|
|
|
|
if (skb->len > card->wandev.mtu) {
|
|
len = card->wandev.mtu;
|
|
bitm = 0x10; /* set M-bit (more data) */
|
|
}
|
|
|
|
if (cycx_x25_send(card, chan->link, chan->lcn, bitm, len, skb->data))
|
|
return 1;
|
|
|
|
if (bitm) {
|
|
skb_pull(skb, len);
|
|
return 1;
|
|
}
|
|
|
|
++chan->ifstats.tx_packets;
|
|
chan->ifstats.tx_bytes += len;
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Send event (connection, disconnection, etc) to X.25 socket layer */
|
|
|
|
static void cycx_x25_chan_send_event(struct net_device *dev, u8 event)
|
|
{
|
|
struct sk_buff *skb;
|
|
unsigned char *ptr;
|
|
|
|
if ((skb = dev_alloc_skb(1)) == NULL) {
|
|
printk(KERN_ERR "%s: out of memory\n", __FUNCTION__);
|
|
return;
|
|
}
|
|
|
|
ptr = skb_put(skb, 1);
|
|
*ptr = event;
|
|
|
|
skb->protocol = x25_type_trans(skb, dev);
|
|
netif_rx(skb);
|
|
dev->last_rx = jiffies; /* timestamp */
|
|
}
|
|
|
|
/* Convert line speed in bps to a number used by cyclom 2x code. */
|
|
static u8 bps_to_speed_code(u32 bps)
|
|
{
|
|
u8 number = 0; /* defaults to the lowest (1200) speed ;> */
|
|
|
|
if (bps >= 512000) number = 8;
|
|
else if (bps >= 256000) number = 7;
|
|
else if (bps >= 64000) number = 6;
|
|
else if (bps >= 38400) number = 5;
|
|
else if (bps >= 19200) number = 4;
|
|
else if (bps >= 9600) number = 3;
|
|
else if (bps >= 4800) number = 2;
|
|
else if (bps >= 2400) number = 1;
|
|
|
|
return number;
|
|
}
|
|
|
|
/* log base 2 */
|
|
static u8 cycx_log2(u32 n)
|
|
{
|
|
u8 log = 0;
|
|
|
|
if (!n)
|
|
return 0;
|
|
|
|
while (n > 1) {
|
|
n >>= 1;
|
|
++log;
|
|
}
|
|
|
|
return log;
|
|
}
|
|
|
|
/* Convert decimal string to unsigned integer.
|
|
* If len != 0 then only 'len' characters of the string are converted. */
|
|
static unsigned dec_to_uint(u8 *str, int len)
|
|
{
|
|
unsigned val = 0;
|
|
|
|
if (!len)
|
|
len = strlen(str);
|
|
|
|
for (; len && isdigit(*str); ++str, --len)
|
|
val = (val * 10) + (*str - (unsigned) '0');
|
|
|
|
return val;
|
|
}
|
|
|
|
static void reset_timer(struct net_device *dev)
|
|
{
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
|
|
if (chan->svc)
|
|
mod_timer(&chan->timer, jiffies+chan->idle_tmout*HZ);
|
|
}
|
|
#ifdef CYCLOMX_X25_DEBUG
|
|
static void cycx_x25_dump_config(struct cycx_x25_config *conf)
|
|
{
|
|
printk(KERN_INFO "X.25 configuration\n");
|
|
printk(KERN_INFO "-----------------\n");
|
|
printk(KERN_INFO "link number=%d\n", conf->link);
|
|
printk(KERN_INFO "line speed=%d\n", conf->speed);
|
|
printk(KERN_INFO "clock=%sternal\n", conf->clock == 8 ? "Ex" : "In");
|
|
printk(KERN_INFO "# level 2 retransm.=%d\n", conf->n2);
|
|
printk(KERN_INFO "level 2 window=%d\n", conf->n2win);
|
|
printk(KERN_INFO "level 3 window=%d\n", conf->n3win);
|
|
printk(KERN_INFO "# logical channels=%d\n", conf->nvc);
|
|
printk(KERN_INFO "level 3 pkt len=%d\n", conf->pktlen);
|
|
printk(KERN_INFO "my address=%d\n", conf->locaddr);
|
|
printk(KERN_INFO "remote address=%d\n", conf->remaddr);
|
|
printk(KERN_INFO "t1=%d seconds\n", conf->t1);
|
|
printk(KERN_INFO "t2=%d seconds\n", conf->t2);
|
|
printk(KERN_INFO "t21=%d seconds\n", conf->t21);
|
|
printk(KERN_INFO "# PVCs=%d\n", conf->npvc);
|
|
printk(KERN_INFO "t23=%d seconds\n", conf->t23);
|
|
printk(KERN_INFO "flags=0x%x\n", conf->flags);
|
|
}
|
|
|
|
static void cycx_x25_dump_stats(struct cycx_x25_stats *stats)
|
|
{
|
|
printk(KERN_INFO "X.25 statistics\n");
|
|
printk(KERN_INFO "--------------\n");
|
|
printk(KERN_INFO "rx_crc_errors=%d\n", stats->rx_crc_errors);
|
|
printk(KERN_INFO "rx_over_errors=%d\n", stats->rx_over_errors);
|
|
printk(KERN_INFO "n2_tx_frames=%d\n", stats->n2_tx_frames);
|
|
printk(KERN_INFO "n2_rx_frames=%d\n", stats->n2_rx_frames);
|
|
printk(KERN_INFO "tx_timeouts=%d\n", stats->tx_timeouts);
|
|
printk(KERN_INFO "rx_timeouts=%d\n", stats->rx_timeouts);
|
|
printk(KERN_INFO "n3_tx_packets=%d\n", stats->n3_tx_packets);
|
|
printk(KERN_INFO "n3_rx_packets=%d\n", stats->n3_rx_packets);
|
|
printk(KERN_INFO "tx_aborts=%d\n", stats->tx_aborts);
|
|
printk(KERN_INFO "rx_aborts=%d\n", stats->rx_aborts);
|
|
}
|
|
|
|
static void cycx_x25_dump_devs(struct wan_device *wandev)
|
|
{
|
|
struct net_device *dev = wandev->dev;
|
|
|
|
printk(KERN_INFO "X.25 dev states\n");
|
|
printk(KERN_INFO "name: addr: txoff: protocol:\n");
|
|
printk(KERN_INFO "---------------------------------------\n");
|
|
|
|
while(dev) {
|
|
struct cycx_x25_channel *chan = dev->priv;
|
|
|
|
printk(KERN_INFO "%-5.5s %-15.15s %d ETH_P_%s\n",
|
|
chan->name, chan->addr, netif_queue_stopped(dev),
|
|
chan->protocol == ETH_P_IP ? "IP" : "X25");
|
|
dev = chan->slave;
|
|
}
|
|
}
|
|
|
|
#endif /* CYCLOMX_X25_DEBUG */
|
|
/* End */
|