[deliverable/linux.git] / net / unix / diag.c

#include <linux/types.h>
#include <linux/spinlock.h>
#include <linux/sock_diag.h>
#include <linux/unix_diag.h>
#include <linux/skbuff.h>
#include <linux/module.h>
#include <net/netlink.h>
#include <net/af_unix.h>
#include <net/tcp_states.h>

#define UNIX_DIAG_PUT(skb, attrtype, attrlen) \
	RTA_DATA(__RTA_PUT(skb, attrtype, attrlen))

static int sk_diag_dump_name(struct sock *sk, struct sk_buff *nlskb)
{
	struct unix_address *addr = unix_sk(sk)->addr;
	char *s;

	if (addr) {
		s = UNIX_DIAG_PUT(nlskb, UNIX_DIAG_NAME, addr->len - sizeof(short));
		memcpy(s, addr->name->sun_path, addr->len - sizeof(short));
	}

	return 0;

rtattr_failure:
	return -EMSGSIZE;
}

static int sk_diag_dump_vfs(struct sock *sk, struct sk_buff *nlskb)
{
	struct dentry *dentry = unix_sk(sk)->path.dentry;
	struct unix_diag_vfs *uv;

	if (dentry) {
		uv = UNIX_DIAG_PUT(nlskb, UNIX_DIAG_VFS, sizeof(*uv));
		uv->udiag_vfs_ino = dentry->d_inode->i_ino;
		uv->udiag_vfs_dev = dentry->d_sb->s_dev;
	}

	return 0;

rtattr_failure:
	return -EMSGSIZE;
}

static int sk_diag_dump_peer(struct sock *sk, struct sk_buff *nlskb)
{
	struct sock *peer;
	int ino;

	peer = unix_peer_get(sk);
	if (peer) {
		unix_state_lock(peer);
		ino = sock_i_ino(peer);
		unix_state_unlock(peer);
		sock_put(peer);

		RTA_PUT_U32(nlskb, UNIX_DIAG_PEER, ino);
	}

	return 0;
rtattr_failure:
	return -EMSGSIZE;
}

static int sk_diag_dump_icons(struct sock *sk, struct sk_buff *nlskb)
{
	struct sk_buff *skb;
	u32 *buf;
	int i;

	if (sk->sk_state == TCP_LISTEN) {
		spin_lock(&sk->sk_receive_queue.lock);
		buf = UNIX_DIAG_PUT(nlskb, UNIX_DIAG_ICONS,
				sk->sk_receive_queue.qlen * sizeof(u32));
		i = 0;
		skb_queue_walk(&sk->sk_receive_queue, skb) {
			struct sock *req, *peer;

			req = skb->sk;
			/*
			 * The state lock is outer for the same sk's
			 * queue lock. With the other's queue locked it's
			 * OK to lock the state.
			 */
			unix_state_lock_nested(req);
			peer = unix_sk(req)->peer;
			buf[i++] = (peer ? sock_i_ino(peer) : 0);
			unix_state_unlock(req);
		}
		spin_unlock(&sk->sk_receive_queue.lock);
	}

	return 0;

rtattr_failure:
	spin_unlock(&sk->sk_receive_queue.lock);
	return -EMSGSIZE;
}

static int sk_diag_show_rqlen(struct sock *sk, struct sk_buff *nlskb)
{
	struct unix_diag_rqlen *rql;

	rql = UNIX_DIAG_PUT(nlskb, UNIX_DIAG_RQLEN, sizeof(*rql));

	if (sk->sk_state == TCP_LISTEN) {
		rql->udiag_rqueue = sk->sk_receive_queue.qlen;
		rql->udiag_wqueue = sk->sk_max_ack_backlog;
	} else {
		rql->udiag_rqueue = (__u32)unix_inq_len(sk);
		rql->udiag_wqueue = (__u32)unix_outq_len(sk);
	}

	return 0;

rtattr_failure:
	return -EMSGSIZE;
}

static int sk_diag_fill(struct sock *sk, struct sk_buff *skb, struct unix_diag_req *req,
		u32 pid, u32 seq, u32 flags, int sk_ino)
{
	unsigned char *b = skb_tail_pointer(skb);
	struct nlmsghdr *nlh;
	struct unix_diag_msg *rep;

	nlh = NLMSG_PUT(skb, pid, seq, SOCK_DIAG_BY_FAMILY, sizeof(*rep));
	nlh->nlmsg_flags = flags;

	rep = NLMSG_DATA(nlh);

	rep->udiag_family = AF_UNIX;
	rep->udiag_type = sk->sk_type;
	rep->udiag_state = sk->sk_state;
	rep->udiag_ino = sk_ino;
	sock_diag_save_cookie(sk, rep->udiag_cookie);

	if ((req->udiag_show & UDIAG_SHOW_NAME) &&
	    sk_diag_dump_name(sk, skb))
		goto nlmsg_failure;

	if ((req->udiag_show & UDIAG_SHOW_VFS) &&
	    sk_diag_dump_vfs(sk, skb))
		goto nlmsg_failure;

	if ((req->udiag_show & UDIAG_SHOW_PEER) &&
	    sk_diag_dump_peer(sk, skb))
		goto nlmsg_failure;

	if ((req->udiag_show & UDIAG_SHOW_ICONS) &&
	    sk_diag_dump_icons(sk, skb))
		goto nlmsg_failure;

	if ((req->udiag_show & UDIAG_SHOW_RQLEN) &&
	    sk_diag_show_rqlen(sk, skb))
		goto nlmsg_failure;

	if ((req->udiag_show & UDIAG_SHOW_MEMINFO) &&
	    sock_diag_put_meminfo(sk, skb, UNIX_DIAG_MEMINFO))
		goto nlmsg_failure;

	nlh->nlmsg_len = skb_tail_pointer(skb) - b;
	return skb->len;

nlmsg_failure:
	nlmsg_trim(skb, b);
	return -EMSGSIZE;
}

static int sk_diag_dump(struct sock *sk, struct sk_buff *skb, struct unix_diag_req *req,
		u32 pid, u32 seq, u32 flags)
{
	int sk_ino;

	unix_state_lock(sk);
	sk_ino = sock_i_ino(sk);
	unix_state_unlock(sk);

	if (!sk_ino)
		return 0;

	return sk_diag_fill(sk, skb, req, pid, seq, flags, sk_ino);
}

static int unix_diag_dump(struct sk_buff *skb, struct netlink_callback *cb)
{
	struct unix_diag_req *req;
	int num, s_num, slot, s_slot;

	req = NLMSG_DATA(cb->nlh);

	s_slot = cb->args[0];
	num = s_num = cb->args[1];

	spin_lock(&unix_table_lock);
	for (slot = s_slot; slot <= UNIX_HASH_SIZE; s_num = 0, slot++) {
		struct sock *sk;
		struct hlist_node *node;

		num = 0;
		sk_for_each(sk, node, &unix_socket_table[slot]) {
			if (num < s_num)
				goto next;
			if (!(req->udiag_states & (1 << sk->sk_state)))
				goto next;
			if (sk_diag_dump(sk, skb, req,
					 NETLINK_CB(cb->skb).pid,
					 cb->nlh->nlmsg_seq,
					 NLM_F_MULTI) < 0)
				goto done;
next:
			num++;
		}
	}
done:
	spin_unlock(&unix_table_lock);
	cb->args[0] = slot;
	cb->args[1] = num;

	return skb->len;
}

static struct sock *unix_lookup_by_ino(int ino)
{
	int i;
	struct sock *sk;

	spin_lock(&unix_table_lock);
	for (i = 0; i <= UNIX_HASH_SIZE; i++) {
		struct hlist_node *node;

		sk_for_each(sk, node, &unix_socket_table[i])
			if (ino == sock_i_ino(sk)) {
				sock_hold(sk);
				spin_unlock(&unix_table_lock);

				return sk;
			}
	}

	spin_unlock(&unix_table_lock);
	return NULL;
}

static int unix_diag_get_exact(struct sk_buff *in_skb,
			       const struct nlmsghdr *nlh,
			       struct unix_diag_req *req)
{
	int err = -EINVAL;
	struct sock *sk;
	struct sk_buff *rep;
	unsigned int extra_len;

	if (req->udiag_ino == 0)
		goto out_nosk;

	sk = unix_lookup_by_ino(req->udiag_ino);
	err = -ENOENT;
	if (sk == NULL)
		goto out_nosk;

	err = sock_diag_check_cookie(sk, req->udiag_cookie);
	if (err)
		goto out;

	extra_len = 256;
again:
	err = -ENOMEM;
	rep = alloc_skb(NLMSG_SPACE((sizeof(struct unix_diag_msg) + extra_len)),
			GFP_KERNEL);
	if (!rep)
		goto out;

	err = sk_diag_fill(sk, rep, req, NETLINK_CB(in_skb).pid,
			   nlh->nlmsg_seq, 0, req->udiag_ino);
	if (err < 0) {
		kfree_skb(rep);
		extra_len += 256;
		if (extra_len >= PAGE_SIZE)
			goto out;

		goto again;
	}
	err = netlink_unicast(sock_diag_nlsk, rep, NETLINK_CB(in_skb).pid,
			      MSG_DONTWAIT);
	if (err > 0)
		err = 0;
out:
	if (sk)
		sock_put(sk);
out_nosk:
	return err;
}

static int unix_diag_handler_dump(struct sk_buff *skb, struct nlmsghdr *h)
{
	int hdrlen = sizeof(struct unix_diag_req);

	if (nlmsg_len(h) < hdrlen)
		return -EINVAL;

	if (h->nlmsg_flags & NLM_F_DUMP) {
		struct netlink_dump_control c = {
			.dump = unix_diag_dump,
		};
		return netlink_dump_start(sock_diag_nlsk, skb, h, &c);
	} else
		return unix_diag_get_exact(skb, h, (struct unix_diag_req *)NLMSG_DATA(h));
}

static struct sock_diag_handler unix_diag_handler = {
	.family = AF_UNIX,
	.dump = unix_diag_handler_dump,
};

static int __init unix_diag_init(void)
{
	return sock_diag_register(&unix_diag_handler);
}

static void __exit unix_diag_exit(void)
{
	sock_diag_unregister(&unix_diag_handler);
}

module_init(unix_diag_init);
module_exit(unix_diag_exit);
MODULE_LICENSE("GPL");
MODULE_ALIAS_NET_PF_PROTO_TYPE(PF_NETLINK, NETLINK_SOCK_DIAG, 1 /* AF_LOCAL */);
Commit	Line	Data
22931d3b PE	1	#include <linux/types.h>
	2	#include <linux/spinlock.h>
	3	#include <linux/sock_diag.h>
	4	#include <linux/unix_diag.h>
	5	#include <linux/skbuff.h>
2ea744a5	6	#include <linux/module.h>
22931d3b PE	7	#include <net/netlink.h>
	8	#include <net/af_unix.h>
	9	#include <net/tcp_states.h>
	10
	11	#define UNIX_DIAG_PUT(skb, attrtype, attrlen) \
	12	RTA_DATA(__RTA_PUT(skb, attrtype, attrlen))
	13
f5248b48 PE	14	static int sk_diag_dump_name(struct sock sk, struct sk_buff nlskb)
	15	{
	16	struct unix_address *addr = unix_sk(sk)->addr;
	17	char *s;
	18
	19	if (addr) {
	20	s = UNIX_DIAG_PUT(nlskb, UNIX_DIAG_NAME, addr->len - sizeof(short));
	21	memcpy(s, addr->name->sun_path, addr->len - sizeof(short));
	22	}
	23
	24	return 0;
	25
	26	rtattr_failure:
	27	return -EMSGSIZE;
	28	}
	29
5f7b0569 PE	30	static int sk_diag_dump_vfs(struct sock sk, struct sk_buff nlskb)
5f7b0569 PE	31	{
40ffe67d	32	struct dentry *dentry = unix_sk(sk)->path.dentry;
5f7b0569 PE	33	struct unix_diag_vfs *uv;
	34
	35	if (dentry) {
	36	uv = UNIX_DIAG_PUT(nlskb, UNIX_DIAG_VFS, sizeof(*uv));
	37	uv->udiag_vfs_ino = dentry->d_inode->i_ino;
	38	uv->udiag_vfs_dev = dentry->d_sb->s_dev;
	39	}
	40
	41	return 0;
	42
	43	rtattr_failure:
	44	return -EMSGSIZE;
	45	}
	46
ac02be8d PE	47	static int sk_diag_dump_peer(struct sock sk, struct sk_buff nlskb)
	48	{
	49	struct sock *peer;
	50	int ino;
	51
	52	peer = unix_peer_get(sk);
	53	if (peer) {
	54	unix_state_lock(peer);
	55	ino = sock_i_ino(peer);
	56	unix_state_unlock(peer);
	57	sock_put(peer);
	58
	59	RTA_PUT_U32(nlskb, UNIX_DIAG_PEER, ino);
	60	}
	61
	62	return 0;
	63	rtattr_failure:
	64	return -EMSGSIZE;
	65	}
	66
2aac7a2c PE	67	static int sk_diag_dump_icons(struct sock sk, struct sk_buff nlskb)
	68	{
	69	struct sk_buff *skb;
	70	u32 *buf;
	71	int i;
	72
	73	if (sk->sk_state == TCP_LISTEN) {
	74	spin_lock(&sk->sk_receive_queue.lock);
3b0723c1 PE	75	buf = UNIX_DIAG_PUT(nlskb, UNIX_DIAG_ICONS,
3b0723c1 PE	76	sk->sk_receive_queue.qlen * sizeof(u32));
2aac7a2c PE	77	i = 0;
	78	skb_queue_walk(&sk->sk_receive_queue, skb) {
	79	struct sock req, peer;
	80
	81	req = skb->sk;
	82	/*
	83	* The state lock is outer for the same sk's
	84	* queue lock. With the other's queue locked it's
	85	* OK to lock the state.
	86	*/
	87	unix_state_lock_nested(req);
	88	peer = unix_sk(req)->peer;
e09e9d18	89	buf[i++] = (peer ? sock_i_ino(peer) : 0);
2aac7a2c PE	90	unix_state_unlock(req);
	91	}
	92	spin_unlock(&sk->sk_receive_queue.lock);
	93	}
	94
	95	return 0;
	96
	97	rtattr_failure:
	98	spin_unlock(&sk->sk_receive_queue.lock);
	99	return -EMSGSIZE;
	100	}
	101
cbf39195 PE	102	static int sk_diag_show_rqlen(struct sock sk, struct sk_buff nlskb)
cbf39195 PE	103	{
c9da99e6 PE	104	struct unix_diag_rqlen *rql;
	105
	106	rql = UNIX_DIAG_PUT(nlskb, UNIX_DIAG_RQLEN, sizeof(*rql));
	107
	108	if (sk->sk_state == TCP_LISTEN) {
	109	rql->udiag_rqueue = sk->sk_receive_queue.qlen;
	110	rql->udiag_wqueue = sk->sk_max_ack_backlog;
	111	} else {
	112	rql->udiag_rqueue = (__u32)unix_inq_len(sk);
	113	rql->udiag_wqueue = (__u32)unix_outq_len(sk);
	114	}
	115
cbf39195 PE	116	return 0;
	117
	118	rtattr_failure:
	119	return -EMSGSIZE;
	120	}
	121
45a96b9b PE	122	static int sk_diag_fill(struct sock sk, struct sk_buff skb, struct unix_diag_req *req,
	123	u32 pid, u32 seq, u32 flags, int sk_ino)
	124	{
	125	unsigned char *b = skb_tail_pointer(skb);
	126	struct nlmsghdr *nlh;
	127	struct unix_diag_msg *rep;
	128
	129	nlh = NLMSG_PUT(skb, pid, seq, SOCK_DIAG_BY_FAMILY, sizeof(*rep));
	130	nlh->nlmsg_flags = flags;
	131
	132	rep = NLMSG_DATA(nlh);
	133
	134	rep->udiag_family = AF_UNIX;
	135	rep->udiag_type = sk->sk_type;
	136	rep->udiag_state = sk->sk_state;
	137	rep->udiag_ino = sk_ino;
	138	sock_diag_save_cookie(sk, rep->udiag_cookie);
	139
f5248b48	140	if ((req->udiag_show & UDIAG_SHOW_NAME) &&
257b5298	141	sk_diag_dump_name(sk, skb))
f5248b48 PE	142	goto nlmsg_failure;
f5248b48 PE	143
5f7b0569	144	if ((req->udiag_show & UDIAG_SHOW_VFS) &&
257b5298	145	sk_diag_dump_vfs(sk, skb))
5f7b0569 PE	146	goto nlmsg_failure;
5f7b0569 PE	147
ac02be8d	148	if ((req->udiag_show & UDIAG_SHOW_PEER) &&
257b5298	149	sk_diag_dump_peer(sk, skb))
ac02be8d PE	150	goto nlmsg_failure;
ac02be8d PE	151
2aac7a2c	152	if ((req->udiag_show & UDIAG_SHOW_ICONS) &&
257b5298	153	sk_diag_dump_icons(sk, skb))
2aac7a2c PE	154	goto nlmsg_failure;
2aac7a2c PE	155
cbf39195	156	if ((req->udiag_show & UDIAG_SHOW_RQLEN) &&
257b5298 PE	157	sk_diag_show_rqlen(sk, skb))
	158	goto nlmsg_failure;
	159
	160	if ((req->udiag_show & UDIAG_SHOW_MEMINFO) &&
	161	sock_diag_put_meminfo(sk, skb, UNIX_DIAG_MEMINFO))
cbf39195 PE	162	goto nlmsg_failure;
cbf39195 PE	163
45a96b9b PE	164	nlh->nlmsg_len = skb_tail_pointer(skb) - b;
	165	return skb->len;
	166
	167	nlmsg_failure:
	168	nlmsg_trim(skb, b);
	169	return -EMSGSIZE;
	170	}
	171
	172	static int sk_diag_dump(struct sock sk, struct sk_buff skb, struct unix_diag_req *req,
	173	u32 pid, u32 seq, u32 flags)
	174	{
	175	int sk_ino;
	176
	177	unix_state_lock(sk);
	178	sk_ino = sock_i_ino(sk);
	179	unix_state_unlock(sk);
	180
	181	if (!sk_ino)
	182	return 0;
	183
	184	return sk_diag_fill(sk, skb, req, pid, seq, flags, sk_ino);
	185	}
	186
22931d3b PE	187	static int unix_diag_dump(struct sk_buff skb, struct netlink_callback cb)
22931d3b PE	188	{
45a96b9b PE	189	struct unix_diag_req *req;
	190	int num, s_num, slot, s_slot;
	191
	192	req = NLMSG_DATA(cb->nlh);
	193
	194	s_slot = cb->args[0];
	195	num = s_num = cb->args[1];
	196
	197	spin_lock(&unix_table_lock);
	198	for (slot = s_slot; slot <= UNIX_HASH_SIZE; s_num = 0, slot++) {
	199	struct sock *sk;
	200	struct hlist_node *node;
	201
	202	num = 0;
	203	sk_for_each(sk, node, &unix_socket_table[slot]) {
	204	if (num < s_num)
	205	goto next;
	206	if (!(req->udiag_states & (1 << sk->sk_state)))
	207	goto next;
	208	if (sk_diag_dump(sk, skb, req,
257b5298 PE	209	NETLINK_CB(cb->skb).pid,
	210	cb->nlh->nlmsg_seq,
	211	NLM_F_MULTI) < 0)
45a96b9b PE	212	goto done;
	213	next:
	214	num++;
	215	}
	216	}
	217	done:
	218	spin_unlock(&unix_table_lock);
	219	cb->args[0] = slot;
	220	cb->args[1] = num;
	221
	222	return skb->len;
22931d3b PE	223	}
22931d3b PE	224
5d3cae8b PE	225	static struct sock *unix_lookup_by_ino(int ino)
	226	{
	227	int i;
	228	struct sock *sk;
	229
	230	spin_lock(&unix_table_lock);
	231	for (i = 0; i <= UNIX_HASH_SIZE; i++) {
	232	struct hlist_node *node;
	233
	234	sk_for_each(sk, node, &unix_socket_table[i])
	235	if (ino == sock_i_ino(sk)) {
	236	sock_hold(sk);
	237	spin_unlock(&unix_table_lock);
	238
	239	return sk;
	240	}
	241	}
	242
	243	spin_unlock(&unix_table_lock);
	244	return NULL;
	245	}
	246
22931d3b PE	247	static int unix_diag_get_exact(struct sk_buff *in_skb,
	248	const struct nlmsghdr *nlh,
	249	struct unix_diag_req *req)
	250	{
5d3cae8b PE	251	int err = -EINVAL;
	252	struct sock *sk;
	253	struct sk_buff *rep;
	254	unsigned int extra_len;
	255
	256	if (req->udiag_ino == 0)
	257	goto out_nosk;
	258
	259	sk = unix_lookup_by_ino(req->udiag_ino);
	260	err = -ENOENT;
	261	if (sk == NULL)
	262	goto out_nosk;
	263
	264	err = sock_diag_check_cookie(sk, req->udiag_cookie);
	265	if (err)
	266	goto out;
	267
	268	extra_len = 256;
	269	again:
	270	err = -ENOMEM;
	271	rep = alloc_skb(NLMSG_SPACE((sizeof(struct unix_diag_msg) + extra_len)),
	272	GFP_KERNEL);
	273	if (!rep)
	274	goto out;
	275
	276	err = sk_diag_fill(sk, rep, req, NETLINK_CB(in_skb).pid,
	277	nlh->nlmsg_seq, 0, req->udiag_ino);
	278	if (err < 0) {
	279	kfree_skb(rep);
	280	extra_len += 256;
	281	if (extra_len >= PAGE_SIZE)
	282	goto out;
	283
	284	goto again;
	285	}
	286	err = netlink_unicast(sock_diag_nlsk, rep, NETLINK_CB(in_skb).pid,
	287	MSG_DONTWAIT);
	288	if (err > 0)
	289	err = 0;
	290	out:
	291	if (sk)
	292	sock_put(sk);
	293	out_nosk:
	294	return err;
22931d3b PE	295	}
	296
	297	static int unix_diag_handler_dump(struct sk_buff skb, struct nlmsghdr h)
	298	{
	299	int hdrlen = sizeof(struct unix_diag_req);
	300
	301	if (nlmsg_len(h) < hdrlen)
	302	return -EINVAL;
	303
80d326fa PNA	304	if (h->nlmsg_flags & NLM_F_DUMP) {
	305	struct netlink_dump_control c = {
	306	.dump = unix_diag_dump,
	307	};
	308	return netlink_dump_start(sock_diag_nlsk, skb, h, &c);
	309	} else
22931d3b PE	310	return unix_diag_get_exact(skb, h, (struct unix_diag_req *)NLMSG_DATA(h));
	311	}
	312
	313	static struct sock_diag_handler unix_diag_handler = {
	314	.family = AF_UNIX,
	315	.dump = unix_diag_handler_dump,
	316	};
	317
	318	static int __init unix_diag_init(void)
	319	{
	320	return sock_diag_register(&unix_diag_handler);
	321	}
	322
	323	static void __exit unix_diag_exit(void)
	324	{
	325	sock_diag_unregister(&unix_diag_handler);
	326	}
	327
	328	module_init(unix_diag_init);
	329	module_exit(unix_diag_exit);
	330	MODULE_LICENSE("GPL");
	331	MODULE_ALIAS_NET_PF_PROTO_TYPE(PF_NETLINK, NETLINK_SOCK_DIAG, 1 /* AF_LOCAL */);