[deliverable/linux.git] / net / ieee802154 / dgram.c

/*
 * IEEE 802.15.4 dgram socket interface
 *
 * Copyright 2007, 2008 Siemens AG
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2
 * 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.
 *
 * Written by:
 * Sergey Lapin <slapin@ossfans.org>
 * Dmitry Eremin-Solenikov <dbaryshkov@gmail.com>
 */

#include <linux/capability.h>
#include <linux/net.h>
#include <linux/module.h>
#include <linux/if_arp.h>
#include <linux/list.h>
#include <linux/slab.h>
#include <net/sock.h>
#include <net/af_ieee802154.h>
#include <net/ieee802154.h>
#include <net/ieee802154_netdev.h>

#include <asm/ioctls.h>

#include "af802154.h"

static HLIST_HEAD(dgram_head);
static DEFINE_RWLOCK(dgram_lock);

struct dgram_sock {
	struct sock sk;

	struct ieee802154_addr src_addr;
	struct ieee802154_addr dst_addr;

	unsigned int bound:1;
	unsigned int connected:1;
	unsigned int want_ack:1;
	unsigned int secen:1;
	unsigned int secen_override:1;
	unsigned int seclevel:3;
	unsigned int seclevel_override:1;
};

static inline struct dgram_sock *dgram_sk(const struct sock *sk)
{
	return container_of(sk, struct dgram_sock, sk);
}

static void dgram_hash(struct sock *sk)
{
	write_lock_bh(&dgram_lock);
	sk_add_node(sk, &dgram_head);
	sock_prot_inuse_add(sock_net(sk), sk->sk_prot, 1);
	write_unlock_bh(&dgram_lock);
}

static void dgram_unhash(struct sock *sk)
{
	write_lock_bh(&dgram_lock);
	if (sk_del_node_init(sk))
		sock_prot_inuse_add(sock_net(sk), sk->sk_prot, -1);
	write_unlock_bh(&dgram_lock);
}

static int dgram_init(struct sock *sk)
{
	struct dgram_sock *ro = dgram_sk(sk);

	ro->want_ack = 1;
	return 0;
}

static void dgram_close(struct sock *sk, long timeout)
{
	sk_common_release(sk);
}

static int dgram_bind(struct sock *sk, struct sockaddr *uaddr, int len)
{
	struct sockaddr_ieee802154 *addr = (struct sockaddr_ieee802154 *)uaddr;
	struct ieee802154_addr haddr;
	struct dgram_sock *ro = dgram_sk(sk);
	int err = -EINVAL;
	struct net_device *dev;

	lock_sock(sk);

	ro->bound = 0;

	if (len < sizeof(*addr))
		goto out;

	if (addr->family != AF_IEEE802154)
		goto out;

	ieee802154_addr_from_sa(&haddr, &addr->addr);
	dev = ieee802154_get_dev(sock_net(sk), &haddr);
	if (!dev) {
		err = -ENODEV;
		goto out;
	}

	if (dev->type != ARPHRD_IEEE802154) {
		err = -ENODEV;
		goto out_put;
	}

	ro->src_addr = haddr;

	ro->bound = 1;
	err = 0;
out_put:
	dev_put(dev);
out:
	release_sock(sk);

	return err;
}

static int dgram_ioctl(struct sock *sk, int cmd, unsigned long arg)
{
	switch (cmd) {
	case SIOCOUTQ:
	{
		int amount = sk_wmem_alloc_get(sk);

		return put_user(amount, (int __user *)arg);
	}

	case SIOCINQ:
	{
		struct sk_buff *skb;
		unsigned long amount;

		amount = 0;
		spin_lock_bh(&sk->sk_receive_queue.lock);
		skb = skb_peek(&sk->sk_receive_queue);
		if (skb != NULL) {
			/* We will only return the amount
			 * of this packet since that is all
			 * that will be read.
			 */
			amount = skb->len - ieee802154_hdr_length(skb);
		}
		spin_unlock_bh(&sk->sk_receive_queue.lock);
		return put_user(amount, (int __user *)arg);
	}

	}

	return -ENOIOCTLCMD;
}

/* FIXME: autobind */
static int dgram_connect(struct sock *sk, struct sockaddr *uaddr,
			 int len)
{
	struct sockaddr_ieee802154 *addr = (struct sockaddr_ieee802154 *)uaddr;
	struct dgram_sock *ro = dgram_sk(sk);
	int err = 0;

	if (len < sizeof(*addr))
		return -EINVAL;

	if (addr->family != AF_IEEE802154)
		return -EINVAL;

	lock_sock(sk);

	if (!ro->bound) {
		err = -ENETUNREACH;
		goto out;
	}

	ieee802154_addr_from_sa(&ro->dst_addr, &addr->addr);
	ro->connected = 1;

out:
	release_sock(sk);
	return err;
}

static int dgram_disconnect(struct sock *sk, int flags)
{
	struct dgram_sock *ro = dgram_sk(sk);

	lock_sock(sk);
	ro->connected = 0;
	release_sock(sk);

	return 0;
}

static int dgram_sendmsg(struct kiocb *iocb, struct sock *sk,
			 struct msghdr *msg, size_t size)
{
	struct net_device *dev;
	unsigned int mtu;
	struct sk_buff *skb;
	struct ieee802154_mac_cb *cb;
	struct dgram_sock *ro = dgram_sk(sk);
	struct ieee802154_addr dst_addr;
	int hlen, tlen;
	int err;

	if (msg->msg_flags & MSG_OOB) {
		pr_debug("msg->msg_flags = 0x%x\n", msg->msg_flags);
		return -EOPNOTSUPP;
	}

	if (!ro->connected && !msg->msg_name)
		return -EDESTADDRREQ;
	else if (ro->connected && msg->msg_name)
		return -EISCONN;

	if (!ro->bound)
		dev = dev_getfirstbyhwtype(sock_net(sk), ARPHRD_IEEE802154);
	else
		dev = ieee802154_get_dev(sock_net(sk), &ro->src_addr);

	if (!dev) {
		pr_debug("no dev\n");
		err = -ENXIO;
		goto out;
	}
	mtu = dev->mtu;
	pr_debug("name = %s, mtu = %u\n", dev->name, mtu);

	if (size > mtu) {
		pr_debug("size = %Zu, mtu = %u\n", size, mtu);
		err = -EMSGSIZE;
		goto out_dev;
	}

	hlen = LL_RESERVED_SPACE(dev);
	tlen = dev->needed_tailroom;
	skb = sock_alloc_send_skb(sk, hlen + tlen + size,
				  msg->msg_flags & MSG_DONTWAIT,
				  &err);
	if (!skb)
		goto out_dev;

	skb_reserve(skb, hlen);

	skb_reset_network_header(skb);

	cb = mac_cb_init(skb);
	cb->type = IEEE802154_FC_TYPE_DATA;
	cb->ackreq = ro->want_ack;

	if (msg->msg_name) {
		DECLARE_SOCKADDR(struct sockaddr_ieee802154*,
				 daddr, msg->msg_name);

		ieee802154_addr_from_sa(&dst_addr, &daddr->addr);
	} else {
		dst_addr = ro->dst_addr;
	}

	cb->secen = ro->secen;
	cb->secen_override = ro->secen_override;
	cb->seclevel = ro->seclevel;
	cb->seclevel_override = ro->seclevel_override;

	err = dev_hard_header(skb, dev, ETH_P_IEEE802154, &dst_addr,
			      ro->bound ? &ro->src_addr : NULL, size);
	if (err < 0)
		goto out_skb;

	err = memcpy_fromiovec(skb_put(skb, size), msg->msg_iov, size);
	if (err < 0)
		goto out_skb;

	skb->dev = dev;
	skb->sk  = sk;
	skb->protocol = htons(ETH_P_IEEE802154);

	dev_put(dev);

	err = dev_queue_xmit(skb);
	if (err > 0)
		err = net_xmit_errno(err);

	return err ?: size;

out_skb:
	kfree_skb(skb);
out_dev:
	dev_put(dev);
out:
	return err;
}

static int dgram_recvmsg(struct kiocb *iocb, struct sock *sk,
			 struct msghdr *msg, size_t len, int noblock,
			 int flags, int *addr_len)
{
	size_t copied = 0;
	int err = -EOPNOTSUPP;
	struct sk_buff *skb;
	DECLARE_SOCKADDR(struct sockaddr_ieee802154 *, saddr, msg->msg_name);

	skb = skb_recv_datagram(sk, flags, noblock, &err);
	if (!skb)
		goto out;

	copied = skb->len;
	if (len < copied) {
		msg->msg_flags |= MSG_TRUNC;
		copied = len;
	}

	/* FIXME: skip headers if necessary ?! */
	err = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
	if (err)
		goto done;

	sock_recv_ts_and_drops(msg, sk, skb);

	if (saddr) {
		saddr->family = AF_IEEE802154;
		ieee802154_addr_to_sa(&saddr->addr, &mac_cb(skb)->source);
		*addr_len = sizeof(*saddr);
	}

	if (flags & MSG_TRUNC)
		copied = skb->len;
done:
	skb_free_datagram(sk, skb);
out:
	if (err)
		return err;
	return copied;
}

static int dgram_rcv_skb(struct sock *sk, struct sk_buff *skb)
{
	skb = skb_share_check(skb, GFP_ATOMIC);
	if (!skb)
		return NET_RX_DROP;

	if (sock_queue_rcv_skb(sk, skb) < 0) {
		kfree_skb(skb);
		return NET_RX_DROP;
	}

	return NET_RX_SUCCESS;
}

static inline bool
ieee802154_match_sock(__le64 hw_addr, __le16 pan_id, __le16 short_addr,
		      struct dgram_sock *ro)
{
	if (!ro->bound)
		return true;

	if (ro->src_addr.mode == IEEE802154_ADDR_LONG &&
	    hw_addr == ro->src_addr.extended_addr)
		return true;

	if (ro->src_addr.mode == IEEE802154_ADDR_SHORT &&
	    pan_id == ro->src_addr.pan_id &&
	    short_addr == ro->src_addr.short_addr)
		return true;

	return false;
}

int ieee802154_dgram_deliver(struct net_device *dev, struct sk_buff *skb)
{
	struct sock *sk, *prev = NULL;
	int ret = NET_RX_SUCCESS;
	__le16 pan_id, short_addr;
	__le64 hw_addr;

	/* Data frame processing */
	BUG_ON(dev->type != ARPHRD_IEEE802154);

	pan_id = ieee802154_mlme_ops(dev)->get_pan_id(dev);
	short_addr = ieee802154_mlme_ops(dev)->get_short_addr(dev);
	hw_addr = ieee802154_devaddr_from_raw(dev->dev_addr);

	read_lock(&dgram_lock);
	sk_for_each(sk, &dgram_head) {
		if (ieee802154_match_sock(hw_addr, pan_id, short_addr,
					  dgram_sk(sk))) {
			if (prev) {
				struct sk_buff *clone;

				clone = skb_clone(skb, GFP_ATOMIC);
				if (clone)
					dgram_rcv_skb(prev, clone);
			}

			prev = sk;
		}
	}

	if (prev) {
		dgram_rcv_skb(prev, skb);
	} else {
		kfree_skb(skb);
		ret = NET_RX_DROP;
	}
	read_unlock(&dgram_lock);

	return ret;
}

static int dgram_getsockopt(struct sock *sk, int level, int optname,
			    char __user *optval, int __user *optlen)
{
	struct dgram_sock *ro = dgram_sk(sk);

	int val, len;

	if (level != SOL_IEEE802154)
		return -EOPNOTSUPP;

	if (get_user(len, optlen))
		return -EFAULT;

	len = min_t(unsigned int, len, sizeof(int));

	switch (optname) {
	case WPAN_WANTACK:
		val = ro->want_ack;
		break;
	case WPAN_SECURITY:
		if (!ro->secen_override)
			val = WPAN_SECURITY_DEFAULT;
		else if (ro->secen)
			val = WPAN_SECURITY_ON;
		else
			val = WPAN_SECURITY_OFF;
		break;
	case WPAN_SECURITY_LEVEL:
		if (!ro->seclevel_override)
			val = WPAN_SECURITY_LEVEL_DEFAULT;
		else
			val = ro->seclevel;
		break;
	default:
		return -ENOPROTOOPT;
	}

	if (put_user(len, optlen))
		return -EFAULT;
	if (copy_to_user(optval, &val, len))
		return -EFAULT;
	return 0;
}

static int dgram_setsockopt(struct sock *sk, int level, int optname,
			    char __user *optval, unsigned int optlen)
{
	struct dgram_sock *ro = dgram_sk(sk);
	struct net *net = sock_net(sk);
	int val;
	int err = 0;

	if (optlen < sizeof(int))
		return -EINVAL;

	if (get_user(val, (int __user *)optval))
		return -EFAULT;

	lock_sock(sk);

	switch (optname) {
	case WPAN_WANTACK:
		ro->want_ack = !!val;
		break;
	case WPAN_SECURITY:
		if (!ns_capable(net->user_ns, CAP_NET_ADMIN) &&
		    !ns_capable(net->user_ns, CAP_NET_RAW)) {
			err = -EPERM;
			break;
		}

		switch (val) {
		case WPAN_SECURITY_DEFAULT:
			ro->secen_override = 0;
			break;
		case WPAN_SECURITY_ON:
			ro->secen_override = 1;
			ro->secen = 1;
			break;
		case WPAN_SECURITY_OFF:
			ro->secen_override = 1;
			ro->secen = 0;
			break;
		default:
			err = -EINVAL;
			break;
		}
		break;
	case WPAN_SECURITY_LEVEL:
		if (!ns_capable(net->user_ns, CAP_NET_ADMIN) &&
		    !ns_capable(net->user_ns, CAP_NET_RAW)) {
			err = -EPERM;
			break;
		}

		if (val < WPAN_SECURITY_LEVEL_DEFAULT ||
		    val > IEEE802154_SCF_SECLEVEL_ENC_MIC128) {
			err = -EINVAL;
		} else if (val == WPAN_SECURITY_LEVEL_DEFAULT) {
			ro->seclevel_override = 0;
		} else {
			ro->seclevel_override = 1;
			ro->seclevel = val;
		}
		break;
	default:
		err = -ENOPROTOOPT;
		break;
	}

	release_sock(sk);
	return err;
}

struct proto ieee802154_dgram_prot = {
	.name		= "IEEE-802.15.4-MAC",
	.owner		= THIS_MODULE,
	.obj_size	= sizeof(struct dgram_sock),
	.init		= dgram_init,
	.close		= dgram_close,
	.bind		= dgram_bind,
	.sendmsg	= dgram_sendmsg,
	.recvmsg	= dgram_recvmsg,
	.hash		= dgram_hash,
	.unhash		= dgram_unhash,
	.connect	= dgram_connect,
	.disconnect	= dgram_disconnect,
	.ioctl		= dgram_ioctl,
	.getsockopt	= dgram_getsockopt,
	.setsockopt	= dgram_setsockopt,
};
Commit	Line	Data
9ec76716	1	/*
5fd72607	2	* IEEE 802.15.4 dgram socket interface
9ec76716 SL	3	*
	4	* Copyright 2007, 2008 Siemens AG
	5	*
	6	* This program is free software; you can redistribute it and/or modify
	7	* it under the terms of the GNU General Public License version 2
	8	* as published by the Free Software Foundation.
	9	*
	10	* This program is distributed in the hope that it will be useful,
	11	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	12	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	13	* GNU General Public License for more details.
	14	*
	15	* You should have received a copy of the GNU General Public License along
	16	* with this program; if not, write to the Free Software Foundation, Inc.,
	17	* 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
	18	*
	19	* Written by:
	20	* Sergey Lapin <slapin@ossfans.org>
	21	* Dmitry Eremin-Solenikov <dbaryshkov@gmail.com>
	22	*/
	23
af9eed5b	24	#include <linux/capability.h>
9ec76716 SL	25	#include <linux/net.h>
	26	#include <linux/module.h>
	27	#include <linux/if_arp.h>
	28	#include <linux/list.h>
5a0e3ad6	29	#include <linux/slab.h>
9ec76716	30	#include <net/sock.h>
f0166e5e DES	31	#include <net/af_ieee802154.h>
	32	#include <net/ieee802154.h>
	33	#include <net/ieee802154_netdev.h>
9ec76716 SL	34
	35	#include <asm/ioctls.h>
	36
	37	#include "af802154.h"
	38
	39	static HLIST_HEAD(dgram_head);
	40	static DEFINE_RWLOCK(dgram_lock);
	41
	42	struct dgram_sock {
	43	struct sock sk;
	44
e6278d92 PB	45	struct ieee802154_addr src_addr;
e6278d92 PB	46	struct ieee802154_addr dst_addr;
74eda55d	47
95c96174	48	unsigned int bound:1;
1cc76e36	49	unsigned int connected:1;
95c96174	50	unsigned int want_ack:1;
af9eed5b PB	51	unsigned int secen:1;
	52	unsigned int secen_override:1;
	53	unsigned int seclevel:3;
	54	unsigned int seclevel_override:1;
9ec76716 SL	55	};
	56
	57	static inline struct dgram_sock dgram_sk(const struct sock sk)
	58	{
	59	return container_of(sk, struct dgram_sock, sk);
	60	}
	61
9ec76716 SL	62	static void dgram_hash(struct sock *sk)
	63	{
	64	write_lock_bh(&dgram_lock);
	65	sk_add_node(sk, &dgram_head);
	66	sock_prot_inuse_add(sock_net(sk), sk->sk_prot, 1);
	67	write_unlock_bh(&dgram_lock);
	68	}
	69
	70	static void dgram_unhash(struct sock *sk)
	71	{
	72	write_lock_bh(&dgram_lock);
	73	if (sk_del_node_init(sk))
	74	sock_prot_inuse_add(sock_net(sk), sk->sk_prot, -1);
	75	write_unlock_bh(&dgram_lock);
	76	}
	77
	78	static int dgram_init(struct sock *sk)
	79	{
	80	struct dgram_sock *ro = dgram_sk(sk);
	81
99eb8558	82	ro->want_ack = 1;
9ec76716 SL	83	return 0;
	84	}
	85
	86	static void dgram_close(struct sock *sk, long timeout)
	87	{
	88	sk_common_release(sk);
	89	}
	90
	91	static int dgram_bind(struct sock sk, struct sockaddr uaddr, int len)
	92	{
	93	struct sockaddr_ieee802154 addr = (struct sockaddr_ieee802154 )uaddr;
e6278d92	94	struct ieee802154_addr haddr;
9ec76716	95	struct dgram_sock *ro = dgram_sk(sk);
74eda55d	96	int err = -EINVAL;
9ec76716 SL	97	struct net_device *dev;
9ec76716 SL	98
74eda55d DB	99	lock_sock(sk);
74eda55d DB	100
9ec76716 SL	101	ro->bound = 0;
	102
	103	if (len < sizeof(*addr))
74eda55d	104	goto out;
9ec76716 SL	105
9ec76716 SL	106	if (addr->family != AF_IEEE802154)
74eda55d	107	goto out;
9ec76716	108
e6278d92 PB	109	ieee802154_addr_from_sa(&haddr, &addr->addr);
e6278d92 PB	110	dev = ieee802154_get_dev(sock_net(sk), &haddr);
9ec76716 SL	111	if (!dev) {
	112	err = -ENODEV;
	113	goto out;
	114	}
	115
	116	if (dev->type != ARPHRD_IEEE802154) {
	117	err = -ENODEV;
	118	goto out_put;
	119	}
	120
e6278d92	121	ro->src_addr = haddr;
9ec76716 SL	122
9ec76716 SL	123	ro->bound = 1;
74eda55d	124	err = 0;
9ec76716 SL	125	out_put:
	126	dev_put(dev);
	127	out:
	128	release_sock(sk);
	129
	130	return err;
	131	}
	132
	133	static int dgram_ioctl(struct sock *sk, int cmd, unsigned long arg)
	134	{
	135	switch (cmd) {
	136	case SIOCOUTQ:
	137	{
31e6d363 ED	138	int amount = sk_wmem_alloc_get(sk);
31e6d363 ED	139
9ec76716 SL	140	return put_user(amount, (int __user *)arg);
	141	}
	142
	143	case SIOCINQ:
	144	{
	145	struct sk_buff *skb;
	146	unsigned long amount;
	147
	148	amount = 0;
	149	spin_lock_bh(&sk->sk_receive_queue.lock);
	150	skb = skb_peek(&sk->sk_receive_queue);
	151	if (skb != NULL) {
4710d806	152	/* We will only return the amount
9ec76716 SL	153	* of this packet since that is all
	154	* that will be read.
	155	*/
e6278d92	156	amount = skb->len - ieee802154_hdr_length(skb);
9ec76716 SL	157	}
	158	spin_unlock_bh(&sk->sk_receive_queue.lock);
	159	return put_user(amount, (int __user *)arg);
	160	}
	161
	162	}
4710d806	163
9ec76716 SL	164	return -ENOIOCTLCMD;
	165	}
	166
	167	/* FIXME: autobind */
	168	static int dgram_connect(struct sock sk, struct sockaddr uaddr,
4710d806	169	int len)
9ec76716 SL	170	{
	171	struct sockaddr_ieee802154 addr = (struct sockaddr_ieee802154 )uaddr;
	172	struct dgram_sock *ro = dgram_sk(sk);
	173	int err = 0;
	174
	175	if (len < sizeof(*addr))
	176	return -EINVAL;
	177
	178	if (addr->family != AF_IEEE802154)
	179	return -EINVAL;
	180
	181	lock_sock(sk);
	182
	183	if (!ro->bound) {
	184	err = -ENETUNREACH;
	185	goto out;
	186	}
	187
e6278d92	188	ieee802154_addr_from_sa(&ro->dst_addr, &addr->addr);
1cc76e36	189	ro->connected = 1;
9ec76716 SL	190
	191	out:
	192	release_sock(sk);
	193	return err;
	194	}
	195
	196	static int dgram_disconnect(struct sock *sk, int flags)
	197	{
	198	struct dgram_sock *ro = dgram_sk(sk);
	199
	200	lock_sock(sk);
1cc76e36	201	ro->connected = 0;
9ec76716 SL	202	release_sock(sk);
	203
	204	return 0;
	205	}
	206
	207	static int dgram_sendmsg(struct kiocb iocb, struct sock sk,
4710d806	208	struct msghdr *msg, size_t size)
9ec76716 SL	209	{
9ec76716 SL	210	struct net_device *dev;
95c96174	211	unsigned int mtu;
9ec76716	212	struct sk_buff *skb;
32edc40a	213	struct ieee802154_mac_cb *cb;
9ec76716	214	struct dgram_sock *ro = dgram_sk(sk);
1cc76e36	215	struct ieee802154_addr dst_addr;
ae641949	216	int hlen, tlen;
9ec76716 SL	217	int err;
	218
	219	if (msg->msg_flags & MSG_OOB) {
	220	pr_debug("msg->msg_flags = 0x%x\n", msg->msg_flags);
	221	return -EOPNOTSUPP;
	222	}
	223
1cc76e36 PB	224	if (!ro->connected && !msg->msg_name)
	225	return -EDESTADDRREQ;
	226	else if (ro->connected && msg->msg_name)
	227	return -EISCONN;
	228
9ec76716 SL	229	if (!ro->bound)
	230	dev = dev_getfirstbyhwtype(sock_net(sk), ARPHRD_IEEE802154);
	231	else
	232	dev = ieee802154_get_dev(sock_net(sk), &ro->src_addr);
	233
	234	if (!dev) {
	235	pr_debug("no dev\n");
	236	err = -ENXIO;
	237	goto out;
	238	}
	239	mtu = dev->mtu;
	240	pr_debug("name = %s, mtu = %u\n", dev->name, mtu);
	241
3da947b2 SL	242	if (size > mtu) {
3da947b2 SL	243	pr_debug("size = %Zu, mtu = %u\n", size, mtu);
d1d7358e	244	err = -EMSGSIZE;
3da947b2 SL	245	goto out_dev;
	246	}
	247
ae641949 HX	248	hlen = LL_RESERVED_SPACE(dev);
	249	tlen = dev->needed_tailroom;
	250	skb = sock_alloc_send_skb(sk, hlen + tlen + size,
4710d806 VB	251	msg->msg_flags & MSG_DONTWAIT,
4710d806 VB	252	&err);
9ec76716 SL	253	if (!skb)
	254	goto out_dev;
	255
ae641949	256	skb_reserve(skb, hlen);
9ec76716 SL	257
	258	skb_reset_network_header(skb);
	259
32edc40a PB	260	cb = mac_cb_init(skb);
	261	cb->type = IEEE802154_FC_TYPE_DATA;
	262	cb->ackreq = ro->want_ack;
99eb8558	263
1cc76e36	264	if (msg->msg_name) {
4710d806 VB	265	DECLARE_SOCKADDR(struct sockaddr_ieee802154*,
4710d806 VB	266	daddr, msg->msg_name);
1cc76e36 PB	267
	268	ieee802154_addr_from_sa(&dst_addr, &daddr->addr);
	269	} else {
	270	dst_addr = ro->dst_addr;
	271	}
	272
af9eed5b PB	273	cb->secen = ro->secen;
	274	cb->secen_override = ro->secen_override;
	275	cb->seclevel = ro->seclevel;
	276	cb->seclevel_override = ro->seclevel_override;
	277
1cc76e36 PB	278	err = dev_hard_header(skb, dev, ETH_P_IEEE802154, &dst_addr,
1cc76e36 PB	279	ro->bound ? &ro->src_addr : NULL, size);
9ec76716 SL	280	if (err < 0)
	281	goto out_skb;
	282
9ec76716 SL	283	err = memcpy_fromiovec(skb_put(skb, size), msg->msg_iov, size);
	284	if (err < 0)
	285	goto out_skb;
	286
9ec76716 SL	287	skb->dev = dev;
	288	skb->sk = sk;
	289	skb->protocol = htons(ETH_P_IEEE802154);
	290
	291	dev_put(dev);
	292
	293	err = dev_queue_xmit(skb);
	294	if (err > 0)
	295	err = net_xmit_errno(err);
	296
	297	return err ?: size;
	298
	299	out_skb:
	300	kfree_skb(skb);
	301	out_dev:
	302	dev_put(dev);
	303	out:
	304	return err;
	305	}
	306
	307	static int dgram_recvmsg(struct kiocb iocb, struct sock sk,
4710d806 VB	308	struct msghdr *msg, size_t len, int noblock,
4710d806 VB	309	int flags, int *addr_len)
9ec76716 SL	310	{
	311	size_t copied = 0;
	312	int err = -EOPNOTSUPP;
	313	struct sk_buff *skb;
342dfc30	314	DECLARE_SOCKADDR(struct sockaddr_ieee802154 *, saddr, msg->msg_name);
9ec76716 SL	315
	316	skb = skb_recv_datagram(sk, flags, noblock, &err);
	317	if (!skb)
	318	goto out;
	319
	320	copied = skb->len;
	321	if (len < copied) {
	322	msg->msg_flags \|= MSG_TRUNC;
	323	copied = len;
	324	}
	325
	326	/* FIXME: skip headers if necessary ?! */
	327	err = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
	328	if (err)
	329	goto done;
	330
3b885787	331	sock_recv_ts_and_drops(msg, sk, skb);
9ec76716	332
6364e6ee SR	333	if (saddr) {
6364e6ee SR	334	saddr->family = AF_IEEE802154;
ae531b94	335	ieee802154_addr_to_sa(&saddr->addr, &mac_cb(skb)->source);
6364e6ee	336	addr_len = sizeof(saddr);
bceaa902	337	}
6364e6ee	338
9ec76716 SL	339	if (flags & MSG_TRUNC)
	340	copied = skb->len;
	341	done:
	342	skb_free_datagram(sk, skb);
	343	out:
	344	if (err)
	345	return err;
	346	return copied;
	347	}
	348
	349	static int dgram_rcv_skb(struct sock sk, struct sk_buff skb)
	350	{
8cfad496 PB	351	skb = skb_share_check(skb, GFP_ATOMIC);
	352	if (!skb)
	353	return NET_RX_DROP;
	354
9ec76716	355	if (sock_queue_rcv_skb(sk, skb) < 0) {
9ec76716 SL	356	kfree_skb(skb);
	357	return NET_RX_DROP;
	358	}
	359
	360	return NET_RX_SUCCESS;
	361	}
	362
e6278d92 PB	363	static inline bool
	364	ieee802154_match_sock(__le64 hw_addr, __le16 pan_id, __le16 short_addr,
	365	struct dgram_sock *ro)
9ec76716 SL	366	{
9ec76716 SL	367	if (!ro->bound)
e6278d92	368	return true;
9ec76716	369
e6278d92 PB	370	if (ro->src_addr.mode == IEEE802154_ADDR_LONG &&
	371	hw_addr == ro->src_addr.extended_addr)
	372	return true;
9ec76716	373
e6278d92 PB	374	if (ro->src_addr.mode == IEEE802154_ADDR_SHORT &&
	375	pan_id == ro->src_addr.pan_id &&
	376	short_addr == ro->src_addr.short_addr)
	377	return true;
9ec76716	378
e6278d92	379	return false;
9ec76716 SL	380	}
	381
	382	int ieee802154_dgram_deliver(struct net_device dev, struct sk_buff skb)
	383	{
	384	struct sock sk, prev = NULL;
9ec76716	385	int ret = NET_RX_SUCCESS;
e6278d92 PB	386	__le16 pan_id, short_addr;
e6278d92 PB	387	__le64 hw_addr;
9ec76716 SL	388
	389	/* Data frame processing */
	390	BUG_ON(dev->type != ARPHRD_IEEE802154);
	391
e6278d92 PB	392	pan_id = ieee802154_mlme_ops(dev)->get_pan_id(dev);
	393	short_addr = ieee802154_mlme_ops(dev)->get_short_addr(dev);
	394	hw_addr = ieee802154_devaddr_from_raw(dev->dev_addr);
9ec76716 SL	395
9ec76716 SL	396	read_lock(&dgram_lock);
b67bfe0d	397	sk_for_each(sk, &dgram_head) {
e6278d92 PB	398	if (ieee802154_match_sock(hw_addr, pan_id, short_addr,
e6278d92 PB	399	dgram_sk(sk))) {
9ec76716 SL	400	if (prev) {
9ec76716 SL	401	struct sk_buff *clone;
4710d806	402
9ec76716 SL	403	clone = skb_clone(skb, GFP_ATOMIC);
	404	if (clone)
	405	dgram_rcv_skb(prev, clone);
	406	}
	407
	408	prev = sk;
	409	}
	410	}
	411
4710d806	412	if (prev) {
9ec76716	413	dgram_rcv_skb(prev, skb);
4710d806	414	} else {
9ec76716 SL	415	kfree_skb(skb);
	416	ret = NET_RX_DROP;
	417	}
	418	read_unlock(&dgram_lock);
	419
	420	return ret;
	421	}
	422
a9dfac33	423	static int dgram_getsockopt(struct sock *sk, int level, int optname,
4710d806	424	char __user optval, int __user optlen)
a9dfac33	425	{
99eb8558 DB	426	struct dgram_sock *ro = dgram_sk(sk);
	427
	428	int val, len;
	429
	430	if (level != SOL_IEEE802154)
	431	return -EOPNOTSUPP;
	432
	433	if (get_user(len, optlen))
	434	return -EFAULT;
	435
	436	len = min_t(unsigned int, len, sizeof(int));
	437
	438	switch (optname) {
	439	case WPAN_WANTACK:
	440	val = ro->want_ack;
	441	break;
af9eed5b PB	442	case WPAN_SECURITY:
	443	if (!ro->secen_override)
	444	val = WPAN_SECURITY_DEFAULT;
	445	else if (ro->secen)
	446	val = WPAN_SECURITY_ON;
	447	else
	448	val = WPAN_SECURITY_OFF;
	449	break;
	450	case WPAN_SECURITY_LEVEL:
	451	if (!ro->seclevel_override)
	452	val = WPAN_SECURITY_LEVEL_DEFAULT;
	453	else
	454	val = ro->seclevel;
	455	break;
99eb8558 DB	456	default:
	457	return -ENOPROTOOPT;
	458	}
	459
	460	if (put_user(len, optlen))
	461	return -EFAULT;
	462	if (copy_to_user(optval, &val, len))
	463	return -EFAULT;
	464	return 0;
a9dfac33 DES	465	}
	466
	467	static int dgram_setsockopt(struct sock *sk, int level, int optname,
4710d806	468	char __user *optval, unsigned int optlen)
a9dfac33	469	{
99eb8558	470	struct dgram_sock *ro = dgram_sk(sk);
af9eed5b	471	struct net *net = sock_net(sk);
99eb8558 DB	472	int val;
	473	int err = 0;
	474
	475	if (optlen < sizeof(int))
	476	return -EINVAL;
	477
	478	if (get_user(val, (int __user *)optval))
	479	return -EFAULT;
	480
	481	lock_sock(sk);
	482
	483	switch (optname) {
	484	case WPAN_WANTACK:
	485	ro->want_ack = !!val;
	486	break;
af9eed5b PB	487	case WPAN_SECURITY:
	488	if (!ns_capable(net->user_ns, CAP_NET_ADMIN) &&
	489	!ns_capable(net->user_ns, CAP_NET_RAW)) {
	490	err = -EPERM;
	491	break;
	492	}
	493
	494	switch (val) {
	495	case WPAN_SECURITY_DEFAULT:
	496	ro->secen_override = 0;
	497	break;
	498	case WPAN_SECURITY_ON:
	499	ro->secen_override = 1;
	500	ro->secen = 1;
	501	break;
	502	case WPAN_SECURITY_OFF:
	503	ro->secen_override = 1;
	504	ro->secen = 0;
	505	break;
	506	default:
	507	err = -EINVAL;
	508	break;
	509	}
	510	break;
	511	case WPAN_SECURITY_LEVEL:
	512	if (!ns_capable(net->user_ns, CAP_NET_ADMIN) &&
	513	!ns_capable(net->user_ns, CAP_NET_RAW)) {
	514	err = -EPERM;
	515	break;
	516	}
	517
	518	if (val < WPAN_SECURITY_LEVEL_DEFAULT \|\|
	519	val > IEEE802154_SCF_SECLEVEL_ENC_MIC128) {
	520	err = -EINVAL;
	521	} else if (val == WPAN_SECURITY_LEVEL_DEFAULT) {
	522	ro->seclevel_override = 0;
	523	} else {
	524	ro->seclevel_override = 1;
	525	ro->seclevel = val;
	526	}
	527	break;
99eb8558 DB	528	default:
	529	err = -ENOPROTOOPT;
	530	break;
	531	}
	532
	533	release_sock(sk);
	534	return err;
a9dfac33 DES	535	}
a9dfac33 DES	536
9ec76716 SL	537	struct proto ieee802154_dgram_prot = {
	538	.name = "IEEE-802.15.4-MAC",
	539	.owner = THIS_MODULE,
	540	.obj_size = sizeof(struct dgram_sock),
	541	.init = dgram_init,
	542	.close = dgram_close,
	543	.bind = dgram_bind,
	544	.sendmsg = dgram_sendmsg,
	545	.recvmsg = dgram_recvmsg,
	546	.hash = dgram_hash,
	547	.unhash = dgram_unhash,
	548	.connect = dgram_connect,
	549	.disconnect = dgram_disconnect,
	550	.ioctl = dgram_ioctl,
a9dfac33 DES	551	.getsockopt = dgram_getsockopt,
a9dfac33 DES	552	.setsockopt = dgram_setsockopt,
9ec76716 SL	553	};
9ec76716 SL	554