[mirror_ubuntu-artful-kernel.git] / net / batman-adv / icmp_socket.c

/*
 * Copyright (C) 2007-2012 B.A.T.M.A.N. contributors:
 *
 * Marek Lindner
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of version 2 of the GNU General Public
 * License as published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 * General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
 * 02110-1301, USA
 *
 */

#include "main.h"
#include <linux/debugfs.h>
#include <linux/slab.h>
#include "icmp_socket.h"
#include "send.h"
#include "hash.h"
#include "originator.h"
#include "hard-interface.h"

static struct socket_client *socket_client_hash[256];

static void bat_socket_add_packet(struct socket_client *socket_client,
				  struct icmp_packet_rr *icmp_packet,
				  size_t icmp_len);

void bat_socket_init(void)
{
	memset(socket_client_hash, 0, sizeof(socket_client_hash));
}

static int bat_socket_open(struct inode *inode, struct file *file)
{
	unsigned int i;
	struct socket_client *socket_client;

	nonseekable_open(inode, file);

	socket_client = kmalloc(sizeof(*socket_client), GFP_KERNEL);

	if (!socket_client)
		return -ENOMEM;

	for (i = 0; i < ARRAY_SIZE(socket_client_hash); i++) {
		if (!socket_client_hash[i]) {
			socket_client_hash[i] = socket_client;
			break;
		}
	}

	if (i == ARRAY_SIZE(socket_client_hash)) {
		pr_err("Error - can't add another packet client: "
		       "maximum number of clients reached\n");
		kfree(socket_client);
		return -EXFULL;
	}

	INIT_LIST_HEAD(&socket_client->queue_list);
	socket_client->queue_len = 0;
	socket_client->index = i;
	socket_client->bat_priv = inode->i_private;
	spin_lock_init(&socket_client->lock);
	init_waitqueue_head(&socket_client->queue_wait);

	file->private_data = socket_client;

	inc_module_count();
	return 0;
}

static int bat_socket_release(struct inode *inode, struct file *file)
{
	struct socket_client *socket_client = file->private_data;
	struct socket_packet *socket_packet;
	struct list_head *list_pos, *list_pos_tmp;

	spin_lock_bh(&socket_client->lock);

	/* for all packets in the queue ... */
	list_for_each_safe(list_pos, list_pos_tmp, &socket_client->queue_list) {
		socket_packet = list_entry(list_pos,
					   struct socket_packet, list);

		list_del(list_pos);
		kfree(socket_packet);
	}

	socket_client_hash[socket_client->index] = NULL;
	spin_unlock_bh(&socket_client->lock);

	kfree(socket_client);
	dec_module_count();

	return 0;
}

static ssize_t bat_socket_read(struct file *file, char __user *buf,
			       size_t count, loff_t *ppos)
{
	struct socket_client *socket_client = file->private_data;
	struct socket_packet *socket_packet;
	size_t packet_len;
	int error;

	if ((file->f_flags & O_NONBLOCK) && (socket_client->queue_len == 0))
		return -EAGAIN;

	if ((!buf) || (count < sizeof(struct icmp_packet)))
		return -EINVAL;

	if (!access_ok(VERIFY_WRITE, buf, count))
		return -EFAULT;

	error = wait_event_interruptible(socket_client->queue_wait,
					 socket_client->queue_len);

	if (error)
		return error;

	spin_lock_bh(&socket_client->lock);

	socket_packet = list_first_entry(&socket_client->queue_list,
					 struct socket_packet, list);
	list_del(&socket_packet->list);
	socket_client->queue_len--;

	spin_unlock_bh(&socket_client->lock);

	packet_len = min(count, socket_packet->icmp_len);
	error = copy_to_user(buf, &socket_packet->icmp_packet, packet_len);

	kfree(socket_packet);

	if (error)
		return -EFAULT;

	return packet_len;
}

static ssize_t bat_socket_write(struct file *file, const char __user *buff,
				size_t len, loff_t *off)
{
	struct socket_client *socket_client = file->private_data;
	struct bat_priv *bat_priv = socket_client->bat_priv;
	struct hard_iface *primary_if = NULL;
	struct sk_buff *skb;
	struct icmp_packet_rr *icmp_packet;

	struct orig_node *orig_node = NULL;
	struct neigh_node *neigh_node = NULL;
	size_t packet_len = sizeof(struct icmp_packet);

	if (len < sizeof(struct icmp_packet)) {
		bat_dbg(DBG_BATMAN, bat_priv,
			"Error - can't send packet from char device: "
			"invalid packet size\n");
		return -EINVAL;
	}

	primary_if = primary_if_get_selected(bat_priv);

	if (!primary_if) {
		len = -EFAULT;
		goto out;
	}

	if (len >= sizeof(struct icmp_packet_rr))
		packet_len = sizeof(struct icmp_packet_rr);

	skb = dev_alloc_skb(packet_len + sizeof(struct ethhdr));
	if (!skb) {
		len = -ENOMEM;
		goto out;
	}

	skb_reserve(skb, sizeof(struct ethhdr));
	icmp_packet = (struct icmp_packet_rr *)skb_put(skb, packet_len);

	if (copy_from_user(icmp_packet, buff, packet_len)) {
		len = -EFAULT;
		goto free_skb;
	}

	if (icmp_packet->header.packet_type != BAT_ICMP) {
		bat_dbg(DBG_BATMAN, bat_priv,
			"Error - can't send packet from char device: "
			"got bogus packet type (expected: BAT_ICMP)\n");
		len = -EINVAL;
		goto free_skb;
	}

	if (icmp_packet->msg_type != ECHO_REQUEST) {
		bat_dbg(DBG_BATMAN, bat_priv,
			"Error - can't send packet from char device: "
			"got bogus message type (expected: ECHO_REQUEST)\n");
		len = -EINVAL;
		goto free_skb;
	}

	icmp_packet->uid = socket_client->index;

	if (icmp_packet->header.version != COMPAT_VERSION) {
		icmp_packet->msg_type = PARAMETER_PROBLEM;
		icmp_packet->header.version = COMPAT_VERSION;
		bat_socket_add_packet(socket_client, icmp_packet, packet_len);
		goto free_skb;
	}

	if (atomic_read(&bat_priv->mesh_state) != MESH_ACTIVE)
		goto dst_unreach;

	orig_node = orig_hash_find(bat_priv, icmp_packet->dst);
	if (!orig_node)
		goto dst_unreach;

	neigh_node = orig_node_get_router(orig_node);
	if (!neigh_node)
		goto dst_unreach;

	if (!neigh_node->if_incoming)
		goto dst_unreach;

	if (neigh_node->if_incoming->if_status != IF_ACTIVE)
		goto dst_unreach;

	memcpy(icmp_packet->orig,
	       primary_if->net_dev->dev_addr, ETH_ALEN);

	if (packet_len == sizeof(struct icmp_packet_rr))
		memcpy(icmp_packet->rr,
		       neigh_node->if_incoming->net_dev->dev_addr, ETH_ALEN);

	send_skb_packet(skb, neigh_node->if_incoming, neigh_node->addr);
	goto out;

dst_unreach:
	icmp_packet->msg_type = DESTINATION_UNREACHABLE;
	bat_socket_add_packet(socket_client, icmp_packet, packet_len);
free_skb:
	kfree_skb(skb);
out:
	if (primary_if)
		hardif_free_ref(primary_if);
	if (neigh_node)
		neigh_node_free_ref(neigh_node);
	if (orig_node)
		orig_node_free_ref(orig_node);
	return len;
}

static unsigned int bat_socket_poll(struct file *file, poll_table *wait)
{
	struct socket_client *socket_client = file->private_data;

	poll_wait(file, &socket_client->queue_wait, wait);

	if (socket_client->queue_len > 0)
		return POLLIN | POLLRDNORM;

	return 0;
}

static const struct file_operations fops = {
	.owner = THIS_MODULE,
	.open = bat_socket_open,
	.release = bat_socket_release,
	.read = bat_socket_read,
	.write = bat_socket_write,
	.poll = bat_socket_poll,
	.llseek = no_llseek,
};

int bat_socket_setup(struct bat_priv *bat_priv)
{
	struct dentry *d;

	if (!bat_priv->debug_dir)
		goto err;

	d = debugfs_create_file(ICMP_SOCKET, S_IFREG | S_IWUSR | S_IRUSR,
				bat_priv->debug_dir, bat_priv, &fops);
	if (d)
		goto err;

	return 0;

err:
	return 1;
}

static void bat_socket_add_packet(struct socket_client *socket_client,
				  struct icmp_packet_rr *icmp_packet,
				  size_t icmp_len)
{
	struct socket_packet *socket_packet;

	socket_packet = kmalloc(sizeof(*socket_packet), GFP_ATOMIC);

	if (!socket_packet)
		return;

	INIT_LIST_HEAD(&socket_packet->list);
	memcpy(&socket_packet->icmp_packet, icmp_packet, icmp_len);
	socket_packet->icmp_len = icmp_len;

	spin_lock_bh(&socket_client->lock);

	/* while waiting for the lock the socket_client could have been
	 * deleted */
	if (!socket_client_hash[icmp_packet->uid]) {
		spin_unlock_bh(&socket_client->lock);
		kfree(socket_packet);
		return;
	}

	list_add_tail(&socket_packet->list, &socket_client->queue_list);
	socket_client->queue_len++;

	if (socket_client->queue_len > 100) {
		socket_packet = list_first_entry(&socket_client->queue_list,
						 struct socket_packet, list);

		list_del(&socket_packet->list);
		kfree(socket_packet);
		socket_client->queue_len--;
	}

	spin_unlock_bh(&socket_client->lock);

	wake_up(&socket_client->queue_wait);
}

void bat_socket_receive_packet(struct icmp_packet_rr *icmp_packet,
			       size_t icmp_len)
{
	struct socket_client *hash = socket_client_hash[icmp_packet->uid];

	if (hash)
		bat_socket_add_packet(hash, icmp_packet, icmp_len);
}
Commit	Line	Data
c6c8fea2	1	/*
567db7b0	2	* Copyright (C) 2007-2012 B.A.T.M.A.N. contributors:
c6c8fea2 SE	3	*
	4	* Marek Lindner
	5	*
	6	* This program is free software; you can redistribute it and/or
	7	* modify it under the terms of version 2 of the GNU General Public
	8	* License as published by the Free Software Foundation.
	9	*
	10	* This program is distributed in the hope that it will be useful, but
	11	* WITHOUT ANY WARRANTY; without even the implied warranty of
	12	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	13	* General Public License for more details.
	14	*
	15	* You should have received a copy of the GNU General Public License
	16	* along with this program; if not, write to the Free Software
	17	* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
	18	* 02110-1301, USA
	19	*
	20	*/
	21
	22	#include "main.h"
	23	#include <linux/debugfs.h>
	24	#include <linux/slab.h>
	25	#include "icmp_socket.h"
	26	#include "send.h"
c6c8fea2 SE	27	#include "hash.h"
	28	#include "originator.h"
	29	#include "hard-interface.h"
	30
	31	static struct socket_client *socket_client_hash[256];
	32
	33	static void bat_socket_add_packet(struct socket_client *socket_client,
	34	struct icmp_packet_rr *icmp_packet,
	35	size_t icmp_len);
	36
	37	void bat_socket_init(void)
	38	{
	39	memset(socket_client_hash, 0, sizeof(socket_client_hash));
	40	}
	41
	42	static int bat_socket_open(struct inode inode, struct file file)
	43	{
	44	unsigned int i;
	45	struct socket_client *socket_client;
	46
	47	nonseekable_open(inode, file);
	48
704509b8	49	socket_client = kmalloc(sizeof(*socket_client), GFP_KERNEL);
c6c8fea2 SE	50
	51	if (!socket_client)
	52	return -ENOMEM;
	53
	54	for (i = 0; i < ARRAY_SIZE(socket_client_hash); i++) {
	55	if (!socket_client_hash[i]) {
	56	socket_client_hash[i] = socket_client;
	57	break;
	58	}
	59	}
	60
	61	if (i == ARRAY_SIZE(socket_client_hash)) {
	62	pr_err("Error - can't add another packet client: "
	63	"maximum number of clients reached\n");
	64	kfree(socket_client);
	65	return -EXFULL;
	66	}
	67
	68	INIT_LIST_HEAD(&socket_client->queue_list);
	69	socket_client->queue_len = 0;
	70	socket_client->index = i;
	71	socket_client->bat_priv = inode->i_private;
	72	spin_lock_init(&socket_client->lock);
	73	init_waitqueue_head(&socket_client->queue_wait);
	74
	75	file->private_data = socket_client;
	76
	77	inc_module_count();
	78	return 0;
	79	}
	80
	81	static int bat_socket_release(struct inode inode, struct file file)
	82	{
	83	struct socket_client *socket_client = file->private_data;
	84	struct socket_packet *socket_packet;
	85	struct list_head list_pos, list_pos_tmp;
	86
	87	spin_lock_bh(&socket_client->lock);
	88
	89	/* for all packets in the queue ... */
	90	list_for_each_safe(list_pos, list_pos_tmp, &socket_client->queue_list) {
	91	socket_packet = list_entry(list_pos,
	92	struct socket_packet, list);
	93
	94	list_del(list_pos);
	95	kfree(socket_packet);
	96	}
	97
	98	socket_client_hash[socket_client->index] = NULL;
	99	spin_unlock_bh(&socket_client->lock);
	100
	101	kfree(socket_client);
	102	dec_module_count();
	103
	104	return 0;
	105	}
	106
	107	static ssize_t bat_socket_read(struct file file, char __user buf,
	108	size_t count, loff_t *ppos)
	109	{
	110	struct socket_client *socket_client = file->private_data;
	111	struct socket_packet *socket_packet;
	112	size_t packet_len;
	113	int error;
114
115	if ((file->f_flags & O_NONBLOCK) && (socket_client->queue_len == 0))
116	return -EAGAIN;
117
118	if ((!buf) \|\| (count < sizeof(struct icmp_packet)))
119	return -EINVAL;
120
121	if (!access_ok(VERIFY_WRITE, buf, count))
122	return -EFAULT;
123
124	error = wait_event_interruptible(socket_client->queue_wait,
125	socket_client->queue_len);
126
127	if (error)
128	return error;
129
130	spin_lock_bh(&socket_client->lock);
131
132	socket_packet = list_first_entry(&socket_client->queue_list,
133	struct socket_packet, list);
134	list_del(&socket_packet->list);
135	socket_client->queue_len--;
136
137	spin_unlock_bh(&socket_client->lock);
138
b5a1eeef SE	139	packet_len = min(count, socket_packet->icmp_len);
b5a1eeef SE	140	error = copy_to_user(buf, &socket_packet->icmp_packet, packet_len);
c6c8fea2	141
c6c8fea2 SE	142	kfree(socket_packet);
	143
	144	if (error)
	145	return -EFAULT;
	146
	147	return packet_len;
	148	}
	149
	150	static ssize_t bat_socket_write(struct file file, const char __user buff,
	151	size_t len, loff_t *off)
	152	{
	153	struct socket_client *socket_client = file->private_data;
	154	struct bat_priv *bat_priv = socket_client->bat_priv;
32ae9b22	155	struct hard_iface *primary_if = NULL;
c6c8fea2 SE	156	struct sk_buff *skb;
	157	struct icmp_packet_rr *icmp_packet;
	158
44524fcd ML	159	struct orig_node *orig_node = NULL;
44524fcd ML	160	struct neigh_node *neigh_node = NULL;
c6c8fea2	161	size_t packet_len = sizeof(struct icmp_packet);
c6c8fea2 SE	162
	163	if (len < sizeof(struct icmp_packet)) {
	164	bat_dbg(DBG_BATMAN, bat_priv,
	165	"Error - can't send packet from char device: "
	166	"invalid packet size\n");
	167	return -EINVAL;
	168	}
	169
32ae9b22 ML	170	primary_if = primary_if_get_selected(bat_priv);
	171
	172	if (!primary_if) {
	173	len = -EFAULT;
	174	goto out;
	175	}
c6c8fea2 SE	176
	177	if (len >= sizeof(struct icmp_packet_rr))
	178	packet_len = sizeof(struct icmp_packet_rr);
	179
	180	skb = dev_alloc_skb(packet_len + sizeof(struct ethhdr));
32ae9b22 ML	181	if (!skb) {
	182	len = -ENOMEM;
	183	goto out;
	184	}
c6c8fea2 SE	185
	186	skb_reserve(skb, sizeof(struct ethhdr));
	187	icmp_packet = (struct icmp_packet_rr *)skb_put(skb, packet_len);
	188
d18eb453	189	if (copy_from_user(icmp_packet, buff, packet_len)) {
c6c8fea2 SE	190	len = -EFAULT;
	191	goto free_skb;
	192	}
	193
76543d14	194	if (icmp_packet->header.packet_type != BAT_ICMP) {
c6c8fea2 SE	195	bat_dbg(DBG_BATMAN, bat_priv,
	196	"Error - can't send packet from char device: "
	197	"got bogus packet type (expected: BAT_ICMP)\n");
	198	len = -EINVAL;
	199	goto free_skb;
	200	}
	201
	202	if (icmp_packet->msg_type != ECHO_REQUEST) {
	203	bat_dbg(DBG_BATMAN, bat_priv,
	204	"Error - can't send packet from char device: "
	205	"got bogus message type (expected: ECHO_REQUEST)\n");
	206	len = -EINVAL;
	207	goto free_skb;
	208	}
	209
	210	icmp_packet->uid = socket_client->index;
	211
76543d14	212	if (icmp_packet->header.version != COMPAT_VERSION) {
c6c8fea2	213	icmp_packet->msg_type = PARAMETER_PROBLEM;
76543d14	214	icmp_packet->header.version = COMPAT_VERSION;
c6c8fea2 SE	215	bat_socket_add_packet(socket_client, icmp_packet, packet_len);
	216	goto free_skb;
	217	}
	218
	219	if (atomic_read(&bat_priv->mesh_state) != MESH_ACTIVE)
	220	goto dst_unreach;
	221
7aadf889	222	orig_node = orig_hash_find(bat_priv, icmp_packet->dst);
c6c8fea2	223	if (!orig_node)
e1a5382f	224	goto dst_unreach;
44524fcd	225
e1a5382f	226	neigh_node = orig_node_get_router(orig_node);
44524fcd	227	if (!neigh_node)
e1a5382f	228	goto dst_unreach;
c6c8fea2	229
d0072609	230	if (!neigh_node->if_incoming)
c6c8fea2 SE	231	goto dst_unreach;
c6c8fea2 SE	232
d0072609	233	if (neigh_node->if_incoming->if_status != IF_ACTIVE)
c6c8fea2 SE	234	goto dst_unreach;
	235
	236	memcpy(icmp_packet->orig,
32ae9b22	237	primary_if->net_dev->dev_addr, ETH_ALEN);
c6c8fea2 SE	238
c6c8fea2 SE	239	if (packet_len == sizeof(struct icmp_packet_rr))
44524fcd	240	memcpy(icmp_packet->rr,
d0072609	241	neigh_node->if_incoming->net_dev->dev_addr, ETH_ALEN);
c6c8fea2	242
d0072609	243	send_skb_packet(skb, neigh_node->if_incoming, neigh_node->addr);
c6c8fea2 SE	244	goto out;
c6c8fea2 SE	245
c6c8fea2 SE	246	dst_unreach:
	247	icmp_packet->msg_type = DESTINATION_UNREACHABLE;
	248	bat_socket_add_packet(socket_client, icmp_packet, packet_len);
	249	free_skb:
	250	kfree_skb(skb);
	251	out:
32ae9b22 ML	252	if (primary_if)
32ae9b22 ML	253	hardif_free_ref(primary_if);
44524fcd ML	254	if (neigh_node)
	255	neigh_node_free_ref(neigh_node);
	256	if (orig_node)
7b36e8ee	257	orig_node_free_ref(orig_node);
c6c8fea2 SE	258	return len;
	259	}
	260
	261	static unsigned int bat_socket_poll(struct file file, poll_table wait)
	262	{
	263	struct socket_client *socket_client = file->private_data;
	264
	265	poll_wait(file, &socket_client->queue_wait, wait);
	266
	267	if (socket_client->queue_len > 0)
	268	return POLLIN \| POLLRDNORM;
	269
	270	return 0;
	271	}
	272
	273	static const struct file_operations fops = {
	274	.owner = THIS_MODULE,
	275	.open = bat_socket_open,
	276	.release = bat_socket_release,
	277	.read = bat_socket_read,
	278	.write = bat_socket_write,
	279	.poll = bat_socket_poll,
	280	.llseek = no_llseek,
	281	};
	282
	283	int bat_socket_setup(struct bat_priv *bat_priv)
	284	{
	285	struct dentry *d;
	286
	287	if (!bat_priv->debug_dir)
	288	goto err;
	289
	290	d = debugfs_create_file(ICMP_SOCKET, S_IFREG \| S_IWUSR \| S_IRUSR,
	291	bat_priv->debug_dir, bat_priv, &fops);
	292	if (d)
	293	goto err;
	294
	295	return 0;
	296
	297	err:
	298	return 1;
	299	}
	300
	301	static void bat_socket_add_packet(struct socket_client *socket_client,
	302	struct icmp_packet_rr *icmp_packet,
	303	size_t icmp_len)
	304	{
	305	struct socket_packet *socket_packet;
	306
704509b8	307	socket_packet = kmalloc(sizeof(*socket_packet), GFP_ATOMIC);
c6c8fea2 SE	308
	309	if (!socket_packet)
	310	return;
	311
	312	INIT_LIST_HEAD(&socket_packet->list);
	313	memcpy(&socket_packet->icmp_packet, icmp_packet, icmp_len);
	314	socket_packet->icmp_len = icmp_len;
	315
	316	spin_lock_bh(&socket_client->lock);
	317
	318	/* while waiting for the lock the socket_client could have been
	319	* deleted */
	320	if (!socket_client_hash[icmp_packet->uid]) {
	321	spin_unlock_bh(&socket_client->lock);
	322	kfree(socket_packet);
	323	return;
	324	}
	325
	326	list_add_tail(&socket_packet->list, &socket_client->queue_list);
	327	socket_client->queue_len++;
	328
	329	if (socket_client->queue_len > 100) {
	330	socket_packet = list_first_entry(&socket_client->queue_list,
	331	struct socket_packet, list);
	332
	333	list_del(&socket_packet->list);
	334	kfree(socket_packet);
	335	socket_client->queue_len--;
	336	}
	337
	338	spin_unlock_bh(&socket_client->lock);
	339
	340	wake_up(&socket_client->queue_wait);
	341	}
	342
	343	void bat_socket_receive_packet(struct icmp_packet_rr *icmp_packet,
	344	size_t icmp_len)
	345	{
	346	struct socket_client *hash = socket_client_hash[icmp_packet->uid];
	347
	348	if (hash)
	349	bat_socket_add_packet(hash, icmp_packet, icmp_len);
	350	}