Phonet: routing table Netlink interface
[linux-2.6.git] / net / phonet / pn_netlink.c
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
32 /* Device address handling */
33
34 static int fill_addr(struct sk_buff *skb, struct net_device *dev, u8 addr,
35                      u32 pid, u32 seq, int event);
36
37 void phonet_address_notify(int event, struct net_device *dev, u8 addr)
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         }
52         rtnl_notify(skb, dev_net(dev), 0,
53                     RTNLGRP_PHONET_IFADDR, NULL, GFP_KERNEL);
54         return;
55 errout:
56         if (err < 0)
57                 rtnl_set_sk_err(dev_net(dev), RTNLGRP_PHONET_IFADDR, err);
58 }
59
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)
65 {
66         struct net *net = sock_net(skb->sk);
67         struct nlattr *tb[IFA_MAX+1];
68         struct net_device *dev;
69         struct ifaddrmsg *ifm;
70         int err;
71         u8 pnaddr;
72
73         if (!capable(CAP_SYS_ADMIN))
74                 return -EPERM;
75
76         ASSERT_RTNL();
77
78         err = nlmsg_parse(nlh, sizeof(*ifm), tb, IFA_MAX, ifa_phonet_policy);
79         if (err < 0)
80                 return err;
81
82         ifm = nlmsg_data(nlh);
83         if (tb[IFA_LOCAL] == NULL)
84                 return -EINVAL;
85         pnaddr = nla_get_u8(tb[IFA_LOCAL]);
86         if (pnaddr & 3)
87                 /* Phonet addresses only have 6 high-order bits */
88                 return -EINVAL;
89
90         dev = __dev_get_by_index(net, ifm->ifa_index);
91         if (dev == NULL)
92                 return -ENODEV;
93
94         if (nlh->nlmsg_type == RTM_NEWADDR)
95                 err = phonet_address_add(dev, pnaddr);
96         else
97                 err = phonet_address_del(dev, pnaddr);
98         if (!err)
99                 phonet_address_notify(nlh->nlmsg_type, dev, pnaddr);
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;
108
109         nlh = nlmsg_put(skb, pid, seq, event, sizeof(*ifm), 0);
110         if (nlh == NULL)
111                 return -EMSGSIZE;
112
113         ifm = nlmsg_data(nlh);
114         ifm->ifa_family = AF_PHONET;
115         ifm->ifa_prefixlen = 0;
116         ifm->ifa_flags = IFA_F_PERMANENT;
117         ifm->ifa_scope = RT_SCOPE_LINK;
118         ifm->ifa_index = dev->ifindex;
119         NLA_PUT_U8(skb, IFA_LOCAL, addr);
120         return nlmsg_end(skb, nlh);
121
122 nla_put_failure:
123         nlmsg_cancel(skb, nlh);
124         return -EMSGSIZE;
125 }
126
127 static int getaddr_dumpit(struct sk_buff *skb, struct netlink_callback *cb)
128 {
129         struct phonet_device_list *pndevs;
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
134         pndevs = phonet_device_list(sock_net(skb->sk));
135         spin_lock_bh(&pndevs->lock);
136         list_for_each_entry(pnd, &pndevs->list, list) {
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,
152                                         cb->nlh->nlmsg_seq, RTM_NEWADDR) < 0)
153                                 goto out;
154                 }
155         }
156
157 out:
158         spin_unlock_bh(&pndevs->lock);
159         cb->args[0] = dev_idx;
160         cb->args[1] = addr_idx;
161
162         return skb->len;
163 }
164
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
290 int __init phonet_netlink_register(void)
291 {
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);
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);
302         return 0;
303 }