[mirror_ubuntu-artful-kernel.git] / drivers / net / wan / dlci.c

/*
 * DLCI		Implementation of Frame Relay protocol for Linux, according to
 *		RFC 1490.  This generic device provides en/decapsulation for an
 *		underlying hardware driver.  Routes & IPs are assigned to these
 *		interfaces.  Requires 'dlcicfg' program to create usable 
 *		interfaces, the initial one, 'dlci' is for IOCTL use only.
 *
 * Version:	@(#)dlci.c	0.35	4 Jan 1997
 *
 * Author:	Mike McLagan <mike.mclagan@linux.org>
 *
 * Changes:
 *
 *		0.15	Mike Mclagan	Packet freeing, bug in kmalloc call
 *					DLCI_RET handling
 *		0.20	Mike McLagan	More conservative on which packets
 *					are returned for retry and which are
 *					are dropped.  If DLCI_RET_DROP is
 *					returned from the FRAD, the packet is
 *				 	sent back to Linux for re-transmission
 *		0.25	Mike McLagan	Converted to use SIOC IOCTL calls
 *		0.30	Jim Freeman	Fixed to allow IPX traffic
 *		0.35	Michael Elizabeth	Fixed incorrect memcpy_fromfs
 *
 *		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.
 */

#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt

#include <linux/module.h>
#include <linux/kernel.h>
#include <linux/types.h>
#include <linux/fcntl.h>
#include <linux/interrupt.h>
#include <linux/ptrace.h>
#include <linux/ioport.h>
#include <linux/in.h>
#include <linux/init.h>
#include <linux/slab.h>
#include <linux/string.h>
#include <linux/errno.h>
#include <linux/netdevice.h>
#include <linux/skbuff.h>
#include <linux/if_arp.h>
#include <linux/if_frad.h>
#include <linux/bitops.h>

#include <net/sock.h>

#include <asm/io.h>
#include <asm/dma.h>
#include <asm/uaccess.h>

static const char version[] = "DLCI driver v0.35, 4 Jan 1997, mike.mclagan@linux.org";

static LIST_HEAD(dlci_devs);

static void dlci_setup(struct net_device *);

/* 
 * these encapsulate the RFC 1490 requirements as well as 
 * deal with packet transmission and reception, working with
 * the upper network layers 
 */

static int dlci_header(struct sk_buff *skb, struct net_device *dev, 
		       unsigned short type, const void *daddr,
		       const void *saddr, unsigned len)
{
	struct frhdr		hdr;
	unsigned int		hlen;
	char			*dest;

	hdr.control = FRAD_I_UI;
	switch (type)
	{
		case ETH_P_IP:
			hdr.IP_NLPID = FRAD_P_IP;
			hlen = sizeof(hdr.control) + sizeof(hdr.IP_NLPID);
			break;

		/* feel free to add other types, if necessary */

		default:
			hdr.pad = FRAD_P_PADDING;
			hdr.NLPID = FRAD_P_SNAP;
			memset(hdr.OUI, 0, sizeof(hdr.OUI));
			hdr.PID = htons(type);
			hlen = sizeof(hdr);
			break;
	}

	dest = skb_push(skb, hlen);
	if (!dest)
		return 0;

	memcpy(dest, &hdr, hlen);

	return hlen;
}

static void dlci_receive(struct sk_buff *skb, struct net_device *dev)
{
	struct frhdr		*hdr;
	int					process, header;

	if (!pskb_may_pull(skb, sizeof(*hdr))) {
		netdev_notice(dev, "invalid data no header\n");
		dev->stats.rx_errors++;
		kfree_skb(skb);
		return;
	}

	hdr = (struct frhdr *) skb->data;
	process = 0;
	header = 0;
	skb->dev = dev;

	if (hdr->control != FRAD_I_UI)
	{
		netdev_notice(dev, "Invalid header flag 0x%02X\n",
			      hdr->control);
		dev->stats.rx_errors++;
	}
	else
		switch (hdr->IP_NLPID)
		{
			case FRAD_P_PADDING:
				if (hdr->NLPID != FRAD_P_SNAP)
				{
					netdev_notice(dev, "Unsupported NLPID 0x%02X\n",
						      hdr->NLPID);
					dev->stats.rx_errors++;
					break;
				}
	 
				if (hdr->OUI[0] + hdr->OUI[1] + hdr->OUI[2] != 0)
				{
					netdev_notice(dev, "Unsupported organizationally unique identifier 0x%02X-%02X-%02X\n",
						      hdr->OUI[0],
						      hdr->OUI[1],
						      hdr->OUI[2]);
					dev->stats.rx_errors++;
					break;
				}

				/* at this point, it's an EtherType frame */
				header = sizeof(struct frhdr);
				/* Already in network order ! */
				skb->protocol = hdr->PID;
				process = 1;
				break;

			case FRAD_P_IP:
				header = sizeof(hdr->control) + sizeof(hdr->IP_NLPID);
				skb->protocol = htons(ETH_P_IP);
				process = 1;
				break;

			case FRAD_P_SNAP:
			case FRAD_P_Q933:
			case FRAD_P_CLNP:
				netdev_notice(dev, "Unsupported NLPID 0x%02X\n",
					      hdr->pad);
				dev->stats.rx_errors++;
				break;

			default:
				netdev_notice(dev, "Invalid pad byte 0x%02X\n",
					      hdr->pad);
				dev->stats.rx_errors++;
				break;				
		}

	if (process)
	{
		/* we've set up the protocol, so discard the header */
		skb_reset_mac_header(skb);
		skb_pull(skb, header);
		dev->stats.rx_bytes += skb->len;
		netif_rx(skb);
		dev->stats.rx_packets++;
	}
	else
		dev_kfree_skb(skb);
}

static netdev_tx_t dlci_transmit(struct sk_buff *skb, struct net_device *dev)
{
	struct dlci_local *dlp = netdev_priv(dev);

	if (skb)
		dlp->slave->netdev_ops->ndo_start_xmit(skb, dlp->slave);
	return NETDEV_TX_OK;
}

static int dlci_config(struct net_device *dev, struct dlci_conf __user *conf, int get)
{
	struct dlci_conf	config;
	struct dlci_local	*dlp;
	struct frad_local	*flp;
	int			err;

	dlp = netdev_priv(dev);

	flp = netdev_priv(dlp->slave);

	if (!get)
	{
		if (copy_from_user(&config, conf, sizeof(struct dlci_conf)))
			return -EFAULT;
		if (config.flags & ~DLCI_VALID_FLAGS)
			return -EINVAL;
		memcpy(&dlp->config, &config, sizeof(struct dlci_conf));
		dlp->configured = 1;
	}

	err = (*flp->dlci_conf)(dlp->slave, dev, get);
	if (err)
		return err;

	if (get)
	{
		if (copy_to_user(conf, &dlp->config, sizeof(struct dlci_conf)))
			return -EFAULT;
	}

	return 0;
}

static int dlci_dev_ioctl(struct net_device *dev, struct ifreq *ifr, int cmd)
{
	struct dlci_local *dlp;

	if (!capable(CAP_NET_ADMIN))
		return -EPERM;

	dlp = netdev_priv(dev);

	switch (cmd)
	{
		case DLCI_GET_SLAVE:
			if (!*(short *)(dev->dev_addr))
				return -EINVAL;

			strncpy(ifr->ifr_slave, dlp->slave->name, sizeof(ifr->ifr_slave));
			break;

		case DLCI_GET_CONF:
		case DLCI_SET_CONF:
			if (!*(short *)(dev->dev_addr))
				return -EINVAL;

			return dlci_config(dev, ifr->ifr_data, cmd == DLCI_GET_CONF);
			break;

		default: 
			return -EOPNOTSUPP;
	}
	return 0;
}

static int dlci_change_mtu(struct net_device *dev, int new_mtu)
{
	struct dlci_local *dlp = netdev_priv(dev);

	return dev_set_mtu(dlp->slave, new_mtu);
}

static int dlci_open(struct net_device *dev)
{
	struct dlci_local	*dlp;
	struct frad_local	*flp;
	int			err;

	dlp = netdev_priv(dev);

	if (!*(short *)(dev->dev_addr))
		return -EINVAL;

	if (!netif_running(dlp->slave))
		return -ENOTCONN;

	flp = netdev_priv(dlp->slave);
	err = (*flp->activate)(dlp->slave, dev);
	if (err)
		return err;

	netif_start_queue(dev);

	return 0;
}

static int dlci_close(struct net_device *dev)
{
	struct dlci_local	*dlp;
	struct frad_local	*flp;
	int			err;

	netif_stop_queue(dev);

	dlp = netdev_priv(dev);

	flp = netdev_priv(dlp->slave);
	err = (*flp->deactivate)(dlp->slave, dev);

	return 0;
}

static int dlci_add(struct dlci_add *dlci)
{
	struct net_device	*master, *slave;
	struct dlci_local	*dlp;
	struct frad_local	*flp;
	int			err = -EINVAL;


	/* validate slave device */
	slave = dev_get_by_name(&init_net, dlci->devname);
	if (!slave)
		return -ENODEV;

	if (slave->type != ARPHRD_FRAD || netdev_priv(slave) == NULL)
		goto err1;

	/* create device name */
	master = alloc_netdev( sizeof(struct dlci_local), "dlci%d",
			      dlci_setup);
	if (!master) {
		err = -ENOMEM;
		goto err1;
	}

	/* make sure same slave not already registered */
	rtnl_lock();
	list_for_each_entry(dlp, &dlci_devs, list) {
		if (dlp->slave == slave) {
			err = -EBUSY;
			goto err2;
		}
	}

	*(short *)(master->dev_addr) = dlci->dlci;

	dlp = netdev_priv(master);
	dlp->slave = slave;
	dlp->master = master;

	flp = netdev_priv(slave);
	err = (*flp->assoc)(slave, master);
	if (err < 0)
		goto err2;

	err = register_netdevice(master);
	if (err < 0) 
		goto err2;

	strcpy(dlci->devname, master->name);

	list_add(&dlp->list, &dlci_devs);
	rtnl_unlock();

	return 0;

 err2:
	rtnl_unlock();
	free_netdev(master);
 err1:
	dev_put(slave);
	return err;
}

static int dlci_del(struct dlci_add *dlci)
{
	struct dlci_local	*dlp;
	struct frad_local	*flp;
	struct net_device	*master, *slave;
	int			err;
	bool			found = false;

	rtnl_lock();

	/* validate slave device */
	master = __dev_get_by_name(&init_net, dlci->devname);
	if (!master) {
		err = -ENODEV;
		goto out;
	}

	list_for_each_entry(dlp, &dlci_devs, list) {
		if (dlp->master == master) {
			found = true;
			break;
		}
	}
	if (!found) {
		err = -ENODEV;
		goto out;
	}

	if (netif_running(master)) {
		err = -EBUSY;
		goto out;
	}

	dlp = netdev_priv(master);
	slave = dlp->slave;
	flp = netdev_priv(slave);

	err = (*flp->deassoc)(slave, master);
	if (!err) {
		list_del(&dlp->list);

		unregister_netdevice(master);

		dev_put(slave);
	}
out:
	rtnl_unlock();
	return err;
}

static int dlci_ioctl(unsigned int cmd, void __user *arg)
{
	struct dlci_add add;
	int err;
	
	if (!capable(CAP_NET_ADMIN))
		return -EPERM;

	if (copy_from_user(&add, arg, sizeof(struct dlci_add)))
		return -EFAULT;

	switch (cmd)
	{
		case SIOCADDDLCI:
			err = dlci_add(&add);

			if (!err)
				if (copy_to_user(arg, &add, sizeof(struct dlci_add)))
					return -EFAULT;
			break;

		case SIOCDELDLCI:
			err = dlci_del(&add);
			break;

		default:
			err = -EINVAL;
	}

	return err;
}

static const struct header_ops dlci_header_ops = {
	.create	= dlci_header,
};

static const struct net_device_ops dlci_netdev_ops = {
	.ndo_open	= dlci_open,
	.ndo_stop	= dlci_close,
	.ndo_do_ioctl	= dlci_dev_ioctl,
	.ndo_start_xmit	= dlci_transmit,
	.ndo_change_mtu	= dlci_change_mtu,
};

static void dlci_setup(struct net_device *dev)
{
	struct dlci_local *dlp = netdev_priv(dev);

	dev->flags		= 0;
	dev->header_ops		= &dlci_header_ops;
	dev->netdev_ops		= &dlci_netdev_ops;
	dev->destructor		= free_netdev;

	dlp->receive		= dlci_receive;

	dev->type		= ARPHRD_DLCI;
	dev->hard_header_len	= sizeof(struct frhdr);
	dev->addr_len		= sizeof(short);

}

/* if slave is unregistering, then cleanup master */
static int dlci_dev_event(struct notifier_block *unused,
			  unsigned long event, void *ptr)
{
	struct net_device *dev = netdev_notifier_info_to_dev(ptr);

	if (dev_net(dev) != &init_net)
		return NOTIFY_DONE;

	if (event == NETDEV_UNREGISTER) {
		struct dlci_local *dlp;

		list_for_each_entry(dlp, &dlci_devs, list) {
			if (dlp->slave == dev) {
				list_del(&dlp->list);
				unregister_netdevice(dlp->master);
				dev_put(dlp->slave);
				break;
			}
		}
	}
	return NOTIFY_DONE;
}

static struct notifier_block dlci_notifier = {
	.notifier_call = dlci_dev_event,
};

static int __init init_dlci(void)
{
	dlci_ioctl_set(dlci_ioctl);
	register_netdevice_notifier(&dlci_notifier);

	printk("%s.\n", version);

	return 0;
}

static void __exit dlci_exit(void)
{
	struct dlci_local	*dlp, *nxt;
	
	dlci_ioctl_set(NULL);
	unregister_netdevice_notifier(&dlci_notifier);

	rtnl_lock();
	list_for_each_entry_safe(dlp, nxt, &dlci_devs, list) {
		unregister_netdevice(dlp->master);
		dev_put(dlp->slave);
	}
	rtnl_unlock();
}

module_init(init_dlci);
module_exit(dlci_exit);

MODULE_AUTHOR("Mike McLagan");
MODULE_DESCRIPTION("Frame Relay DLCI layer");
MODULE_LICENSE("GPL");
Commit	Line	Data
1da177e4 LT	1	/*
	2	* DLCI Implementation of Frame Relay protocol for Linux, according to
	3	* RFC 1490. This generic device provides en/decapsulation for an
	4	* underlying hardware driver. Routes & IPs are assigned to these
	5	* interfaces. Requires 'dlcicfg' program to create usable
	6	* interfaces, the initial one, 'dlci' is for IOCTL use only.
	7	*
	8	* Version: @(#)dlci.c 0.35 4 Jan 1997
	9	*
	10	* Author: Mike McLagan <mike.mclagan@linux.org>
	11	*
	12	* Changes:
	13	*
	14	* 0.15 Mike Mclagan Packet freeing, bug in kmalloc call
	15	* DLCI_RET handling
	16	* 0.20 Mike McLagan More conservative on which packets
	17	* are returned for retry and which are
	18	* are dropped. If DLCI_RET_DROP is
	19	* returned from the FRAD, the packet is
	20	* sent back to Linux for re-transmission
	21	* 0.25 Mike McLagan Converted to use SIOC IOCTL calls
	22	* 0.30 Jim Freeman Fixed to allow IPX traffic
	23	* 0.35 Michael Elizabeth Fixed incorrect memcpy_fromfs
	24	*
	25	* This program is free software; you can redistribute it and/or
	26	* modify it under the terms of the GNU General Public License
	27	* as published by the Free Software Foundation; either version
	28	* 2 of the License, or (at your option) any later version.
	29	*/
	30
86fb0ccf JP	31	#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
86fb0ccf JP	32
1da177e4 LT	33	#include <linux/module.h>
	34	#include <linux/kernel.h>
	35	#include <linux/types.h>
	36	#include <linux/fcntl.h>
	37	#include <linux/interrupt.h>
	38	#include <linux/ptrace.h>
	39	#include <linux/ioport.h>
	40	#include <linux/in.h>
	41	#include <linux/init.h>
	42	#include <linux/slab.h>
	43	#include <linux/string.h>
	44	#include <linux/errno.h>
	45	#include <linux/netdevice.h>
	46	#include <linux/skbuff.h>
	47	#include <linux/if_arp.h>
	48	#include <linux/if_frad.h>
	49	#include <linux/bitops.h>
	50
	51	#include <net/sock.h>
	52
1da177e4 LT	53	#include <asm/io.h>
	54	#include <asm/dma.h>
	55	#include <asm/uaccess.h>
	56
	57	static const char version[] = "DLCI driver v0.35, 4 Jan 1997, mike.mclagan@linux.org";
	58
	59	static LIST_HEAD(dlci_devs);
	60
	61	static void dlci_setup(struct net_device *);
	62
	63	/*
	64	* these encapsulate the RFC 1490 requirements as well as
	65	* deal with packet transmission and reception, working with
	66	* the upper network layers
	67	*/
	68
	69	static int dlci_header(struct sk_buff skb, struct net_device dev,
3b04ddde SH	70	unsigned short type, const void *daddr,
3b04ddde SH	71	const void *saddr, unsigned len)
1da177e4 LT	72	{
1da177e4 LT	73	struct frhdr hdr;
1da177e4 LT	74	unsigned int hlen;
	75	char *dest;
	76
1da177e4	77	hdr.control = FRAD_I_UI;
48b3d3ef	78	switch (type)
1da177e4 LT	79	{
	80	case ETH_P_IP:
	81	hdr.IP_NLPID = FRAD_P_IP;
	82	hlen = sizeof(hdr.control) + sizeof(hdr.IP_NLPID);
	83	break;
	84
	85	/* feel free to add other types, if necessary */
	86
	87	default:
	88	hdr.pad = FRAD_P_PADDING;
	89	hdr.NLPID = FRAD_P_SNAP;
	90	memset(hdr.OUI, 0, sizeof(hdr.OUI));
	91	hdr.PID = htons(type);
	92	hlen = sizeof(hdr);
	93	break;
	94	}
	95
	96	dest = skb_push(skb, hlen);
	97	if (!dest)
807540ba	98	return 0;
1da177e4 LT	99
	100	memcpy(dest, &hdr, hlen);
	101
807540ba	102	return hlen;
1da177e4 LT	103	}
	104
	105	static void dlci_receive(struct sk_buff skb, struct net_device dev)
	106	{
1da177e4 LT	107	struct frhdr *hdr;
	108	int process, header;
	109
1da177e4	110	if (!pskb_may_pull(skb, sizeof(*hdr))) {
86fb0ccf	111	netdev_notice(dev, "invalid data no header\n");
07d117cf	112	dev->stats.rx_errors++;
1da177e4 LT	113	kfree_skb(skb);
	114	return;
	115	}
	116
	117	hdr = (struct frhdr *) skb->data;
	118	process = 0;
	119	header = 0;
	120	skb->dev = dev;
	121
	122	if (hdr->control != FRAD_I_UI)
	123	{
86fb0ccf JP	124	netdev_notice(dev, "Invalid header flag 0x%02X\n",
86fb0ccf JP	125	hdr->control);
07d117cf	126	dev->stats.rx_errors++;
1da177e4 LT	127	}
1da177e4 LT	128	else
48b3d3ef	129	switch (hdr->IP_NLPID)
1da177e4 LT	130	{
	131	case FRAD_P_PADDING:
	132	if (hdr->NLPID != FRAD_P_SNAP)
	133	{
86fb0ccf JP	134	netdev_notice(dev, "Unsupported NLPID 0x%02X\n",
86fb0ccf JP	135	hdr->NLPID);
07d117cf	136	dev->stats.rx_errors++;
1da177e4 LT	137	break;
	138	}
	139
	140	if (hdr->OUI[0] + hdr->OUI[1] + hdr->OUI[2] != 0)
	141	{
86fb0ccf JP	142	netdev_notice(dev, "Unsupported organizationally unique identifier 0x%02X-%02X-%02X\n",
	143	hdr->OUI[0],
	144	hdr->OUI[1],
	145	hdr->OUI[2]);
07d117cf	146	dev->stats.rx_errors++;
1da177e4 LT	147	break;
	148	}
	149
	150	/* at this point, it's an EtherType frame */
	151	header = sizeof(struct frhdr);
	152	/* Already in network order ! */
	153	skb->protocol = hdr->PID;
	154	process = 1;
	155	break;
	156
	157	case FRAD_P_IP:
	158	header = sizeof(hdr->control) + sizeof(hdr->IP_NLPID);
	159	skb->protocol = htons(ETH_P_IP);
	160	process = 1;
	161	break;
	162
	163	case FRAD_P_SNAP:
	164	case FRAD_P_Q933:
	165	case FRAD_P_CLNP:
86fb0ccf JP	166	netdev_notice(dev, "Unsupported NLPID 0x%02X\n",
86fb0ccf JP	167	hdr->pad);
07d117cf	168	dev->stats.rx_errors++;
1da177e4 LT	169	break;
	170
	171	default:
86fb0ccf JP	172	netdev_notice(dev, "Invalid pad byte 0x%02X\n",
86fb0ccf JP	173	hdr->pad);
07d117cf	174	dev->stats.rx_errors++;
1da177e4 LT	175	break;
	176	}
	177
	178	if (process)
	179	{
	180	/* we've set up the protocol, so discard the header */
459a98ed	181	skb_reset_mac_header(skb);
1da177e4	182	skb_pull(skb, header);
07d117cf	183	dev->stats.rx_bytes += skb->len;
1da177e4	184	netif_rx(skb);
07d117cf	185	dev->stats.rx_packets++;
1da177e4 LT	186	}
	187	else
	188	dev_kfree_skb(skb);
	189	}
	190
38482428	191	static netdev_tx_t dlci_transmit(struct sk_buff skb, struct net_device dev)
1da177e4	192	{
38482428	193	struct dlci_local *dlp = netdev_priv(dev);
1da177e4	194
38482428 SH	195	if (skb)
	196	dlp->slave->netdev_ops->ndo_start_xmit(skb, dlp->slave);
	197	return NETDEV_TX_OK;
1da177e4 LT	198	}
	199
	200	static int dlci_config(struct net_device dev, struct dlci_conf __user conf, int get)
	201	{
	202	struct dlci_conf config;
	203	struct dlci_local *dlp;
	204	struct frad_local *flp;
	205	int err;
	206
8f15ea42	207	dlp = netdev_priv(dev);
1da177e4	208
8f15ea42	209	flp = netdev_priv(dlp->slave);
1da177e4 LT	210
	211	if (!get)
	212	{
48b3d3ef	213	if (copy_from_user(&config, conf, sizeof(struct dlci_conf)))
1da177e4 LT	214	return -EFAULT;
1da177e4 LT	215	if (config.flags & ~DLCI_VALID_FLAGS)
807540ba	216	return -EINVAL;
1da177e4 LT	217	memcpy(&dlp->config, &config, sizeof(struct dlci_conf));
	218	dlp->configured = 1;
	219	}
	220
	221	err = (*flp->dlci_conf)(dlp->slave, dev, get);
	222	if (err)
807540ba	223	return err;
1da177e4 LT	224
	225	if (get)
	226	{
48b3d3ef	227	if (copy_to_user(conf, &dlp->config, sizeof(struct dlci_conf)))
1da177e4 LT	228	return -EFAULT;
	229	}
	230
807540ba	231	return 0;
1da177e4 LT	232	}
	233
	234	static int dlci_dev_ioctl(struct net_device dev, struct ifreq ifr, int cmd)
	235	{
	236	struct dlci_local *dlp;
	237
	238	if (!capable(CAP_NET_ADMIN))
807540ba	239	return -EPERM;
1da177e4	240
8f15ea42	241	dlp = netdev_priv(dev);
1da177e4	242
48b3d3ef	243	switch (cmd)
1da177e4 LT	244	{
	245	case DLCI_GET_SLAVE:
	246	if (!(short )(dev->dev_addr))
807540ba	247	return -EINVAL;
1da177e4 LT	248
	249	strncpy(ifr->ifr_slave, dlp->slave->name, sizeof(ifr->ifr_slave));
	250	break;
	251
	252	case DLCI_GET_CONF:
	253	case DLCI_SET_CONF:
	254	if (!(short )(dev->dev_addr))
807540ba	255	return -EINVAL;
1da177e4	256
807540ba	257	return dlci_config(dev, ifr->ifr_data, cmd == DLCI_GET_CONF);
1da177e4 LT	258	break;
	259
	260	default:
807540ba	261	return -EOPNOTSUPP;
1da177e4	262	}
807540ba	263	return 0;
1da177e4 LT	264	}
	265
	266	static int dlci_change_mtu(struct net_device *dev, int new_mtu)
	267	{
49e8abaf	268	struct dlci_local *dlp = netdev_priv(dev);
1da177e4	269
49e8abaf	270	return dev_set_mtu(dlp->slave, new_mtu);
1da177e4 LT	271	}
	272
	273	static int dlci_open(struct net_device *dev)
	274	{
	275	struct dlci_local *dlp;
	276	struct frad_local *flp;
	277	int err;
	278
8f15ea42	279	dlp = netdev_priv(dev);
1da177e4 LT	280
1da177e4 LT	281	if (!(short )(dev->dev_addr))
807540ba	282	return -EINVAL;
1da177e4 LT	283
1da177e4 LT	284	if (!netif_running(dlp->slave))
807540ba	285	return -ENOTCONN;
1da177e4	286
8f15ea42	287	flp = netdev_priv(dlp->slave);
1da177e4 LT	288	err = (*flp->activate)(dlp->slave, dev);
1da177e4 LT	289	if (err)
807540ba	290	return err;
1da177e4 LT	291
	292	netif_start_queue(dev);
	293
	294	return 0;
	295	}
	296
	297	static int dlci_close(struct net_device *dev)
	298	{
	299	struct dlci_local *dlp;
	300	struct frad_local *flp;
	301	int err;
	302
	303	netif_stop_queue(dev);
	304
8f15ea42	305	dlp = netdev_priv(dev);
1da177e4	306
8f15ea42	307	flp = netdev_priv(dlp->slave);
1da177e4 LT	308	err = (*flp->deactivate)(dlp->slave, dev);
	309
	310	return 0;
	311	}
	312
1da177e4 LT	313	static int dlci_add(struct dlci_add *dlci)
	314	{
	315	struct net_device master, slave;
	316	struct dlci_local *dlp;
	317	struct frad_local *flp;
	318	int err = -EINVAL;
	319
	320
	321	/* validate slave device */
881d966b	322	slave = dev_get_by_name(&init_net, dlci->devname);
1da177e4 LT	323	if (!slave)
	324	return -ENODEV;
	325
8f15ea42	326	if (slave->type != ARPHRD_FRAD \|\| netdev_priv(slave) == NULL)
1da177e4 LT	327	goto err1;
	328
	329	/* create device name */
	330	master = alloc_netdev( sizeof(struct dlci_local), "dlci%d",
	331	dlci_setup);
	332	if (!master) {
	333	err = -ENOMEM;
	334	goto err1;
	335	}
	336
	337	/* make sure same slave not already registered */
	338	rtnl_lock();
	339	list_for_each_entry(dlp, &dlci_devs, list) {
	340	if (dlp->slave == slave) {
	341	err = -EBUSY;
	342	goto err2;
	343	}
	344	}
	345
1da177e4 LT	346	(short )(master->dev_addr) = dlci->dlci;
1da177e4 LT	347
8f15ea42	348	dlp = netdev_priv(master);
1da177e4 LT	349	dlp->slave = slave;
	350	dlp->master = master;
	351
8f15ea42	352	flp = netdev_priv(slave);
1da177e4 LT	353	err = (*flp->assoc)(slave, master);
	354	if (err < 0)
	355	goto err2;
	356
	357	err = register_netdevice(master);
	358	if (err < 0)
	359	goto err2;
	360
	361	strcpy(dlci->devname, master->name);
	362
	363	list_add(&dlp->list, &dlci_devs);
	364	rtnl_unlock();
	365
807540ba	366	return 0;
1da177e4 LT	367
	368	err2:
	369	rtnl_unlock();
	370	free_netdev(master);
	371	err1:
	372	dev_put(slave);
807540ba	373	return err;
1da177e4 LT	374	}
	375
	376	static int dlci_del(struct dlci_add *dlci)
	377	{
	378	struct dlci_local *dlp;
	379	struct frad_local *flp;
	380	struct net_device master, slave;
	381	int err;
578a1310	382	bool found = false;
1da177e4	383
11eb2645	384	rtnl_lock();
1da177e4 LT	385
1da177e4 LT	386	/* validate slave device */
881d966b	387	master = __dev_get_by_name(&init_net, dlci->devname);
11eb2645 ZL	388	if (!master) {
	389	err = -ENODEV;
	390	goto out;
	391	}
1da177e4	392
578a1310 ZL	393	list_for_each_entry(dlp, &dlci_devs, list) {
	394	if (dlp->master == master) {
	395	found = true;
	396	break;
	397	}
	398	}
	399	if (!found) {
	400	err = -ENODEV;
	401	goto out;
	402	}
1da177e4 LT	403
1da177e4 LT	404	if (netif_running(master)) {
11eb2645 ZL	405	err = -EBUSY;
11eb2645 ZL	406	goto out;
1da177e4 LT	407	}
1da177e4 LT	408
8f15ea42	409	dlp = netdev_priv(master);
1da177e4	410	slave = dlp->slave;
8f15ea42	411	flp = netdev_priv(slave);
1da177e4	412
1da177e4 LT	413	err = (*flp->deassoc)(slave, master);
	414	if (!err) {
	415	list_del(&dlp->list);
	416
	417	unregister_netdevice(master);
	418
	419	dev_put(slave);
	420	}
11eb2645	421	out:
1da177e4	422	rtnl_unlock();
807540ba	423	return err;
1da177e4 LT	424	}
	425
	426	static int dlci_ioctl(unsigned int cmd, void __user *arg)
	427	{
	428	struct dlci_add add;
	429	int err;
	430
	431	if (!capable(CAP_NET_ADMIN))
807540ba	432	return -EPERM;
1da177e4	433
48b3d3ef	434	if (copy_from_user(&add, arg, sizeof(struct dlci_add)))
1da177e4 LT	435	return -EFAULT;
	436
	437	switch (cmd)
	438	{
	439	case SIOCADDDLCI:
	440	err = dlci_add(&add);
	441
	442	if (!err)
48b3d3ef	443	if (copy_to_user(arg, &add, sizeof(struct dlci_add)))
1da177e4 LT	444	return -EFAULT;
	445	break;
	446
	447	case SIOCDELDLCI:
	448	err = dlci_del(&add);
	449	break;
	450
	451	default:
	452	err = -EINVAL;
	453	}
	454
807540ba	455	return err;
1da177e4 LT	456	}
1da177e4 LT	457
3b04ddde SH	458	static const struct header_ops dlci_header_ops = {
	459	.create = dlci_header,
	460	};
	461
49e8abaf SH	462	static const struct net_device_ops dlci_netdev_ops = {
	463	.ndo_open = dlci_open,
	464	.ndo_stop = dlci_close,
	465	.ndo_do_ioctl = dlci_dev_ioctl,
	466	.ndo_start_xmit = dlci_transmit,
	467	.ndo_change_mtu = dlci_change_mtu,
	468	};
	469
1da177e4 LT	470	static void dlci_setup(struct net_device *dev)
1da177e4 LT	471	{
8f15ea42	472	struct dlci_local *dlp = netdev_priv(dev);
1da177e4 LT	473
1da177e4 LT	474	dev->flags = 0;
3b04ddde	475	dev->header_ops = &dlci_header_ops;
49e8abaf	476	dev->netdev_ops = &dlci_netdev_ops;
1da177e4 LT	477	dev->destructor = free_netdev;
	478
	479	dlp->receive = dlci_receive;
	480
	481	dev->type = ARPHRD_DLCI;
	482	dev->hard_header_len = sizeof(struct frhdr);
	483	dev->addr_len = sizeof(short);
	484
	485	}
	486
	487	/* if slave is unregistering, then cleanup master */
	488	static int dlci_dev_event(struct notifier_block *unused,
	489	unsigned long event, void *ptr)
	490	{
351638e7	491	struct net_device *dev = netdev_notifier_info_to_dev(ptr);
1da177e4	492
c346dca1	493	if (dev_net(dev) != &init_net)
e9dc8653 EB	494	return NOTIFY_DONE;
e9dc8653 EB	495
1da177e4 LT	496	if (event == NETDEV_UNREGISTER) {
	497	struct dlci_local *dlp;
	498
	499	list_for_each_entry(dlp, &dlci_devs, list) {
	500	if (dlp->slave == dev) {
	501	list_del(&dlp->list);
	502	unregister_netdevice(dlp->master);
	503	dev_put(dlp->slave);
	504	break;
	505	}
	506	}
	507	}
	508	return NOTIFY_DONE;
	509	}
	510
	511	static struct notifier_block dlci_notifier = {
	512	.notifier_call = dlci_dev_event,
	513	};
	514
	515	static int __init init_dlci(void)
	516	{
	517	dlci_ioctl_set(dlci_ioctl);
	518	register_netdevice_notifier(&dlci_notifier);
	519
	520	printk("%s.\n", version);
	521
	522	return 0;
	523	}
	524
	525	static void __exit dlci_exit(void)
	526	{
	527	struct dlci_local dlp, nxt;
	528
	529	dlci_ioctl_set(NULL);
	530	unregister_netdevice_notifier(&dlci_notifier);
	531
	532	rtnl_lock();
	533	list_for_each_entry_safe(dlp, nxt, &dlci_devs, list) {
	534	unregister_netdevice(dlp->master);
	535	dev_put(dlp->slave);
	536	}
	537	rtnl_unlock();
	538	}
	539
	540	module_init(init_dlci);
	541	module_exit(dlci_exit);
	542
	543	MODULE_AUTHOR("Mike McLagan");
	544	MODULE_DESCRIPTION("Frame Relay DLCI layer");
	545	MODULE_LICENSE("GPL");