[mirror_ubuntu-zesty-kernel.git] / net / phonet / pn_netlink.c

/*
 * File: pn_netlink.c
 *
 * Phonet netlink interface
 *
 * Copyright (C) 2008 Nokia Corporation.
 *
 * Contact: Remi Denis-Courmont <remi.denis-courmont@nokia.com>
 * Original author: Sakari Ailus <sakari.ailus@nokia.com>
 *
 * 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 St, Fifth Floor, Boston, MA
 * 02110-1301 USA
 */

#include <linux/kernel.h>
#include <linux/netlink.h>
#include <linux/phonet.h>
#include <net/sock.h>
#include <net/phonet/pn_dev.h>

/* Device address handling */

static int fill_addr(struct sk_buff *skb, struct net_device *dev, u8 addr,
		     u32 pid, u32 seq, int event);

void phonet_address_notify(int event, struct net_device *dev, u8 addr)
{
	struct sk_buff *skb;
	int err = -ENOBUFS;

	skb = nlmsg_new(NLMSG_ALIGN(sizeof(struct ifaddrmsg)) +
			nla_total_size(1), GFP_KERNEL);
	if (skb == NULL)
		goto errout;
	err = fill_addr(skb, dev, addr, 0, 0, event);
	if (err < 0) {
		WARN_ON(err == -EMSGSIZE);
		kfree_skb(skb);
		goto errout;
	}
	rtnl_notify(skb, dev_net(dev), 0,
		    RTNLGRP_PHONET_IFADDR, NULL, GFP_KERNEL);
	return;
errout:
	if (err < 0)
		rtnl_set_sk_err(dev_net(dev), RTNLGRP_PHONET_IFADDR, err);
}

static const struct nla_policy ifa_phonet_policy[IFA_MAX+1] = {
	[IFA_LOCAL] = { .type = NLA_U8 },
};

static int addr_doit(struct sk_buff *skb, struct nlmsghdr *nlh, void *attr)
{
	struct net *net = sock_net(skb->sk);
	struct nlattr *tb[IFA_MAX+1];
	struct net_device *dev;
	struct ifaddrmsg *ifm;
	int err;
	u8 pnaddr;

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

	ASSERT_RTNL();

	err = nlmsg_parse(nlh, sizeof(*ifm), tb, IFA_MAX, ifa_phonet_policy);
	if (err < 0)
		return err;

	ifm = nlmsg_data(nlh);
	if (tb[IFA_LOCAL] == NULL)
		return -EINVAL;
	pnaddr = nla_get_u8(tb[IFA_LOCAL]);
	if (pnaddr & 3)
		/* Phonet addresses only have 6 high-order bits */
		return -EINVAL;

	dev = __dev_get_by_index(net, ifm->ifa_index);
	if (dev == NULL)
		return -ENODEV;

	if (nlh->nlmsg_type == RTM_NEWADDR)
		err = phonet_address_add(dev, pnaddr);
	else
		err = phonet_address_del(dev, pnaddr);
	if (!err)
		phonet_address_notify(nlh->nlmsg_type, dev, pnaddr);
	return err;
}

static int fill_addr(struct sk_buff *skb, struct net_device *dev, u8 addr,
			u32 pid, u32 seq, int event)
{
	struct ifaddrmsg *ifm;
	struct nlmsghdr *nlh;

	nlh = nlmsg_put(skb, pid, seq, event, sizeof(*ifm), 0);
	if (nlh == NULL)
		return -EMSGSIZE;

	ifm = nlmsg_data(nlh);
	ifm->ifa_family = AF_PHONET;
	ifm->ifa_prefixlen = 0;
	ifm->ifa_flags = IFA_F_PERMANENT;
	ifm->ifa_scope = RT_SCOPE_LINK;
	ifm->ifa_index = dev->ifindex;
	NLA_PUT_U8(skb, IFA_LOCAL, addr);
	return nlmsg_end(skb, nlh);

nla_put_failure:
	nlmsg_cancel(skb, nlh);
	return -EMSGSIZE;
}

static int getaddr_dumpit(struct sk_buff *skb, struct netlink_callback *cb)
{
	struct phonet_device_list *pndevs;
	struct phonet_device *pnd;
	int dev_idx = 0, dev_start_idx = cb->args[0];
	int addr_idx = 0, addr_start_idx = cb->args[1];

	pndevs = phonet_device_list(sock_net(skb->sk));
	spin_lock_bh(&pndevs->lock);
	list_for_each_entry(pnd, &pndevs->list, list) {
		u8 addr;

		if (dev_idx > dev_start_idx)
			addr_start_idx = 0;
		if (dev_idx++ < dev_start_idx)
			continue;

		addr_idx = 0;
		for (addr = find_first_bit(pnd->addrs, 64); addr < 64;
			addr = find_next_bit(pnd->addrs, 64, 1+addr)) {
			if (addr_idx++ < addr_start_idx)
				continue;

			if (fill_addr(skb, pnd->netdev, addr << 2,
					 NETLINK_CB(cb->skb).pid,
					cb->nlh->nlmsg_seq, RTM_NEWADDR) < 0)
				goto out;
		}
	}

out:
	spin_unlock_bh(&pndevs->lock);
	cb->args[0] = dev_idx;
	cb->args[1] = addr_idx;

	return skb->len;
}

/* Routes handling */

static int fill_route(struct sk_buff *skb, struct net_device *dev, u8 dst,
			u32 pid, u32 seq, int event)
{
	struct rtmsg *rtm;
	struct nlmsghdr *nlh;

	nlh = nlmsg_put(skb, pid, seq, event, sizeof(*rtm), 0);
	if (nlh == NULL)
		return -EMSGSIZE;

	rtm = nlmsg_data(nlh);
	rtm->rtm_family = AF_PHONET;
	rtm->rtm_dst_len = 6;
	rtm->rtm_src_len = 0;
	rtm->rtm_tos = 0;
	rtm->rtm_table = RT_TABLE_MAIN;
	rtm->rtm_protocol = RTPROT_STATIC;
	rtm->rtm_scope = RT_SCOPE_UNIVERSE;
	rtm->rtm_type = RTN_UNICAST;
	rtm->rtm_flags = 0;
	NLA_PUT_U8(skb, RTA_DST, dst);
	NLA_PUT_U32(skb, RTA_OIF, dev->ifindex);
	return nlmsg_end(skb, nlh);

nla_put_failure:
	nlmsg_cancel(skb, nlh);
	return -EMSGSIZE;
}

void rtm_phonet_notify(int event, struct net_device *dev, u8 dst)
{
	struct sk_buff *skb;
	int err = -ENOBUFS;

	skb = nlmsg_new(NLMSG_ALIGN(sizeof(struct ifaddrmsg)) +
			nla_total_size(1) + nla_total_size(4), GFP_KERNEL);
	if (skb == NULL)
		goto errout;
	err = fill_route(skb, dev, dst, 0, 0, event);
	if (err < 0) {
		WARN_ON(err == -EMSGSIZE);
		kfree_skb(skb);
		goto errout;
	}
	rtnl_notify(skb, dev_net(dev), 0,
			  RTNLGRP_PHONET_ROUTE, NULL, GFP_KERNEL);
	return;
errout:
	if (err < 0)
		rtnl_set_sk_err(dev_net(dev), RTNLGRP_PHONET_ROUTE, err);
}

static const struct nla_policy rtm_phonet_policy[RTA_MAX+1] = {
	[RTA_DST] = { .type = NLA_U8 },
	[RTA_OIF] = { .type = NLA_U32 },
};

static int route_doit(struct sk_buff *skb, struct nlmsghdr *nlh, void *attr)
{
	struct net *net = sock_net(skb->sk);
	struct nlattr *tb[RTA_MAX+1];
	struct net_device *dev;
	struct rtmsg *rtm;
	int err;
	u8 dst;

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

	ASSERT_RTNL();

	err = nlmsg_parse(nlh, sizeof(*rtm), tb, RTA_MAX, rtm_phonet_policy);
	if (err < 0)
		return err;

	rtm = nlmsg_data(nlh);
	if (rtm->rtm_table != RT_TABLE_MAIN || rtm->rtm_type != RTN_UNICAST)
		return -EINVAL;
	if (tb[RTA_DST] == NULL || tb[RTA_OIF] == NULL)
		return -EINVAL;
	dst = nla_get_u8(tb[RTA_DST]);
	if (dst & 3) /* Phonet addresses only have 6 high-order bits */
		return -EINVAL;

	dev = __dev_get_by_index(net, nla_get_u32(tb[RTA_OIF]));
	if (dev == NULL)
		return -ENODEV;

	if (nlh->nlmsg_type == RTM_NEWROUTE)
		err = phonet_route_add(dev, dst);
	else
		err = phonet_route_del(dev, dst);
	if (!err)
		rtm_phonet_notify(nlh->nlmsg_type, dev, dst);
	return err;
}

static int route_dumpit(struct sk_buff *skb, struct netlink_callback *cb)
{
	struct net *net = sock_net(skb->sk);
	u8 addr, addr_idx = 0, addr_start_idx = cb->args[0];

	for (addr = 0; addr < 64; addr++) {
		struct net_device *dev;

		dev = phonet_route_get(net, addr << 2);
		if (!dev)
			continue;

		if (addr_idx++ < addr_start_idx)
			continue;
		if (fill_route(skb, dev, addr << 2, NETLINK_CB(cb->skb).pid,
				cb->nlh->nlmsg_seq, RTM_NEWROUTE))
			goto out;
	}

out:
	cb->args[0] = addr_idx;
	cb->args[1] = 0;

	return skb->len;
}

int __init phonet_netlink_register(void)
{
	int err = __rtnl_register(PF_PHONET, RTM_NEWADDR, addr_doit, NULL);
	if (err)
		return err;

	/* Further __rtnl_register() cannot fail */
	__rtnl_register(PF_PHONET, RTM_DELADDR, addr_doit, NULL);
	__rtnl_register(PF_PHONET, RTM_GETADDR, NULL, getaddr_dumpit);
	__rtnl_register(PF_PHONET, RTM_NEWROUTE, route_doit, NULL);
	__rtnl_register(PF_PHONET, RTM_DELROUTE, route_doit, NULL);
	__rtnl_register(PF_PHONET, RTM_GETROUTE, NULL, route_dumpit);
	return 0;
}
Commit	Line	Data
8fb39740 RDC	1	/*
	2	* File: pn_netlink.c
	3	*
	4	* Phonet netlink interface
	5	*
	6	* Copyright (C) 2008 Nokia Corporation.
	7	*
	8	* Contact: Remi Denis-Courmont <remi.denis-courmont@nokia.com>
	9	* Original author: Sakari Ailus <sakari.ailus@nokia.com>
	10	*
	11	* This program is free software; you can redistribute it and/or
	12	* modify it under the terms of the GNU General Public License
	13	* version 2 as published by the Free Software Foundation.
	14	*
	15	* This program is distributed in the hope that it will be useful, but
	16	* WITHOUT ANY WARRANTY; without even the implied warranty of
	17	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
	18	* General Public License for more details.
	19	*
	20	* You should have received a copy of the GNU General Public License
	21	* along with this program; if not, write to the Free Software
	22	* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
	23	* 02110-1301 USA
	24	*/
	25
	26	#include <linux/kernel.h>
	27	#include <linux/netlink.h>
	28	#include <linux/phonet.h>
	29	#include <net/sock.h>
	30	#include <net/phonet/pn_dev.h>
	31
f062f41d RDC	32	/* Device address handling */
f062f41d RDC	33
8fb39740 RDC	34	static int fill_addr(struct sk_buff skb, struct net_device dev, u8 addr,
	35	u32 pid, u32 seq, int event);
	36
c7a1a4c8	37	void phonet_address_notify(int event, struct net_device *dev, u8 addr)
8fb39740 RDC	38	{
	39	struct sk_buff *skb;
	40	int err = -ENOBUFS;
	41
	42	skb = nlmsg_new(NLMSG_ALIGN(sizeof(struct ifaddrmsg)) +
	43	nla_total_size(1), GFP_KERNEL);
	44	if (skb == NULL)
	45	goto errout;
	46	err = fill_addr(skb, dev, addr, 0, 0, event);
	47	if (err < 0) {
	48	WARN_ON(err == -EMSGSIZE);
	49	kfree_skb(skb);
	50	goto errout;
	51	}
1ce85fe4 PNA	52	rtnl_notify(skb, dev_net(dev), 0,
	53	RTNLGRP_PHONET_IFADDR, NULL, GFP_KERNEL);
	54	return;
8fb39740 RDC	55	errout:
	56	if (err < 0)
	57	rtnl_set_sk_err(dev_net(dev), RTNLGRP_PHONET_IFADDR, err);
	58	}
	59
8980713b RDC	60	static const struct nla_policy ifa_phonet_policy[IFA_MAX+1] = {
	61	[IFA_LOCAL] = { .type = NLA_U8 },
	62	};
	63
	64	static int addr_doit(struct sk_buff skb, struct nlmsghdr nlh, void *attr)
8fb39740	65	{
8980713b RDC	66	struct net *net = sock_net(skb->sk);
8980713b RDC	67	struct nlattr *tb[IFA_MAX+1];
8fb39740	68	struct net_device *dev;
8980713b	69	struct ifaddrmsg *ifm;
8fb39740 RDC	70	int err;
	71	u8 pnaddr;
	72
	73	if (!capable(CAP_SYS_ADMIN))
	74	return -EPERM;
	75
	76	ASSERT_RTNL();
	77
8980713b RDC	78	err = nlmsg_parse(nlh, sizeof(*ifm), tb, IFA_MAX, ifa_phonet_policy);
	79	if (err < 0)
	80	return err;
8fb39740	81
8980713b RDC	82	ifm = nlmsg_data(nlh);
8980713b RDC	83	if (tb[IFA_LOCAL] == NULL)
8fb39740	84	return -EINVAL;
8980713b RDC	85	pnaddr = nla_get_u8(tb[IFA_LOCAL]);
	86	if (pnaddr & 3)
	87	/* Phonet addresses only have 6 high-order bits */
8fb39740 RDC	88	return -EINVAL;
8fb39740 RDC	89
8980713b	90	dev = __dev_get_by_index(net, ifm->ifa_index);
8fb39740 RDC	91	if (dev == NULL)
	92	return -ENODEV;
	93
8980713b RDC	94	if (nlh->nlmsg_type == RTM_NEWADDR)
	95	err = phonet_address_add(dev, pnaddr);
	96	else
	97	err = phonet_address_del(dev, pnaddr);
8fb39740	98	if (!err)
c7a1a4c8	99	phonet_address_notify(nlh->nlmsg_type, dev, pnaddr);
8fb39740 RDC	100	return err;
	101	}
	102
	103	static int fill_addr(struct sk_buff skb, struct net_device dev, u8 addr,
	104	u32 pid, u32 seq, int event)
	105	{
	106	struct ifaddrmsg *ifm;
	107	struct nlmsghdr *nlh;
8fb39740	108
8980713b RDC	109	nlh = nlmsg_put(skb, pid, seq, event, sizeof(*ifm), 0);
	110	if (nlh == NULL)
	111	return -EMSGSIZE;
	112
	113	ifm = nlmsg_data(nlh);
8fb39740 RDC	114	ifm->ifa_family = AF_PHONET;
	115	ifm->ifa_prefixlen = 0;
	116	ifm->ifa_flags = IFA_F_PERMANENT;
8980713b	117	ifm->ifa_scope = RT_SCOPE_LINK;
8fb39740	118	ifm->ifa_index = dev->ifindex;
8980713b RDC	119	NLA_PUT_U8(skb, IFA_LOCAL, addr);
8980713b RDC	120	return nlmsg_end(skb, nlh);
8fb39740	121
8980713b RDC	122	nla_put_failure:
	123	nlmsg_cancel(skb, nlh);
	124	return -EMSGSIZE;
8fb39740 RDC	125	}
	126
	127	static int getaddr_dumpit(struct sk_buff skb, struct netlink_callback cb)
	128	{
9a3b7a42	129	struct phonet_device_list *pndevs;
8fb39740 RDC	130	struct phonet_device *pnd;
	131	int dev_idx = 0, dev_start_idx = cb->args[0];
	132	int addr_idx = 0, addr_start_idx = cb->args[1];
	133
9a3b7a42	134	pndevs = phonet_device_list(sock_net(skb->sk));
	135	spin_lock_bh(&pndevs->lock);
	136	list_for_each_entry(pnd, &pndevs->list, list) {
8fb39740 RDC	137	u8 addr;
	138
	139	if (dev_idx > dev_start_idx)
	140	addr_start_idx = 0;
	141	if (dev_idx++ < dev_start_idx)
	142	continue;
	143
	144	addr_idx = 0;
	145	for (addr = find_first_bit(pnd->addrs, 64); addr < 64;
	146	addr = find_next_bit(pnd->addrs, 64, 1+addr)) {
	147	if (addr_idx++ < addr_start_idx)
	148	continue;
	149
	150	if (fill_addr(skb, pnd->netdev, addr << 2,
	151	NETLINK_CB(cb->skb).pid,
998ec759	152	cb->nlh->nlmsg_seq, RTM_NEWADDR) < 0)
8fb39740 RDC	153	goto out;
	154	}
	155	}
	156
	157	out:
9a3b7a42	158	spin_unlock_bh(&pndevs->lock);
8fb39740 RDC	159	cb->args[0] = dev_idx;
	160	cb->args[1] = addr_idx;
	161
	162	return skb->len;
	163	}
	164
f062f41d RDC	165	/* Routes handling */
	166
	167	static int fill_route(struct sk_buff skb, struct net_device dev, u8 dst,
	168	u32 pid, u32 seq, int event)
	169	{
	170	struct rtmsg *rtm;
	171	struct nlmsghdr *nlh;
	172
	173	nlh = nlmsg_put(skb, pid, seq, event, sizeof(*rtm), 0);
	174	if (nlh == NULL)
	175	return -EMSGSIZE;
	176
	177	rtm = nlmsg_data(nlh);
	178	rtm->rtm_family = AF_PHONET;
	179	rtm->rtm_dst_len = 6;
	180	rtm->rtm_src_len = 0;
	181	rtm->rtm_tos = 0;
	182	rtm->rtm_table = RT_TABLE_MAIN;
	183	rtm->rtm_protocol = RTPROT_STATIC;
	184	rtm->rtm_scope = RT_SCOPE_UNIVERSE;
	185	rtm->rtm_type = RTN_UNICAST;
	186	rtm->rtm_flags = 0;
	187	NLA_PUT_U8(skb, RTA_DST, dst);
	188	NLA_PUT_U32(skb, RTA_OIF, dev->ifindex);
	189	return nlmsg_end(skb, nlh);
	190
	191	nla_put_failure:
	192	nlmsg_cancel(skb, nlh);
	193	return -EMSGSIZE;
	194	}
	195
	196	void rtm_phonet_notify(int event, struct net_device *dev, u8 dst)
	197	{
	198	struct sk_buff *skb;
	199	int err = -ENOBUFS;
	200
	201	skb = nlmsg_new(NLMSG_ALIGN(sizeof(struct ifaddrmsg)) +
	202	nla_total_size(1) + nla_total_size(4), GFP_KERNEL);
	203	if (skb == NULL)
	204	goto errout;
	205	err = fill_route(skb, dev, dst, 0, 0, event);
	206	if (err < 0) {
	207	WARN_ON(err == -EMSGSIZE);
	208	kfree_skb(skb);
	209	goto errout;
	210	}
	211	rtnl_notify(skb, dev_net(dev), 0,
	212	RTNLGRP_PHONET_ROUTE, NULL, GFP_KERNEL);
	213	return;
	214	errout:
	215	if (err < 0)
	216	rtnl_set_sk_err(dev_net(dev), RTNLGRP_PHONET_ROUTE, err);
	217	}
	218
	219	static const struct nla_policy rtm_phonet_policy[RTA_MAX+1] = {
	220	[RTA_DST] = { .type = NLA_U8 },
	221	[RTA_OIF] = { .type = NLA_U32 },
	222	};
	223
	224	static int route_doit(struct sk_buff skb, struct nlmsghdr nlh, void *attr)
	225	{
	226	struct net *net = sock_net(skb->sk);
	227	struct nlattr *tb[RTA_MAX+1];
	228	struct net_device *dev;
229	struct rtmsg *rtm;
230	int err;
231	u8 dst;
232
233	if (!capable(CAP_SYS_ADMIN))
234	return -EPERM;
235
236	ASSERT_RTNL();
237
238	err = nlmsg_parse(nlh, sizeof(*rtm), tb, RTA_MAX, rtm_phonet_policy);
239	if (err < 0)
240	return err;
241
242	rtm = nlmsg_data(nlh);
243	if (rtm->rtm_table != RT_TABLE_MAIN \|\| rtm->rtm_type != RTN_UNICAST)
244	return -EINVAL;
245	if (tb[RTA_DST] == NULL \|\| tb[RTA_OIF] == NULL)
246	return -EINVAL;
247	dst = nla_get_u8(tb[RTA_DST]);
248	if (dst & 3) /* Phonet addresses only have 6 high-order bits */
249	return -EINVAL;
250
251	dev = __dev_get_by_index(net, nla_get_u32(tb[RTA_OIF]));
252	if (dev == NULL)
253	return -ENODEV;
254
255	if (nlh->nlmsg_type == RTM_NEWROUTE)
256	err = phonet_route_add(dev, dst);
257	else
258	err = phonet_route_del(dev, dst);
259	if (!err)
260	rtm_phonet_notify(nlh->nlmsg_type, dev, dst);
261	return err;
262	}
263
264	static int route_dumpit(struct sk_buff skb, struct netlink_callback cb)
265	{
266	struct net *net = sock_net(skb->sk);
267	u8 addr, addr_idx = 0, addr_start_idx = cb->args[0];
268
269	for (addr = 0; addr < 64; addr++) {
270	struct net_device *dev;
271
272	dev = phonet_route_get(net, addr << 2);
273	if (!dev)
274	continue;
275
276	if (addr_idx++ < addr_start_idx)
277	continue;
278	if (fill_route(skb, dev, addr << 2, NETLINK_CB(cb->skb).pid,
279	cb->nlh->nlmsg_seq, RTM_NEWROUTE))
280	goto out;
281	}
282
283	out:
284	cb->args[0] = addr_idx;
285	cb->args[1] = 0;
286
287	return skb->len;
288	}
289
660f706d	290	int __init phonet_netlink_register(void)
8fb39740	291	{
660f706d	292	int err = __rtnl_register(PF_PHONET, RTM_NEWADDR, addr_doit, NULL);
	293	if (err)
	294	return err;
	295
	296	/* Further __rtnl_register() cannot fail */
	297	__rtnl_register(PF_PHONET, RTM_DELADDR, addr_doit, NULL);
	298	__rtnl_register(PF_PHONET, RTM_GETADDR, NULL, getaddr_dumpit);
f062f41d RDC	299	__rtnl_register(PF_PHONET, RTM_NEWROUTE, route_doit, NULL);
	300	__rtnl_register(PF_PHONET, RTM_DELROUTE, route_doit, NULL);
	301	__rtnl_register(PF_PHONET, RTM_GETROUTE, NULL, route_dumpit);
660f706d	302	return 0;
8fb39740	303	}