| /* | 
 |  * 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. | 
 |  * | 
 |  * Written by: | 
 |  * Sergey Lapin <[email protected]> | 
 |  * Dmitry Eremin-Solenikov <[email protected]> | 
 |  */ | 
 |  | 
 | #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 <linux/ieee802154.h> | 
 | #include <net/sock.h> | 
 | #include <net/af_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_from_msg(skb_put(skb, size), msg, 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_msg(skb, 0, msg, 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, | 
 | }; | 
 |  |