net: phonet: Modifications for RMC PegaPCI.
[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 <linux/slab.h>
30 #include <net/sock.h>
31 #include <net/phonet/pn_dev.h>
32
33 /* Device address handling */
34
35 static int fill_addr(struct sk_buff *skb, struct net_device *dev, u8 addr,
36                      u32 pid, u32 seq, int event);
37
38 void phonet_address_notify(int event, struct net_device *dev, u8 addr)
39 {
40         struct sk_buff *skb;
41         int err = -ENOBUFS;
42
43         skb = nlmsg_new(NLMSG_ALIGN(sizeof(struct ifaddrmsg)) +
44                         nla_total_size(1), GFP_KERNEL);
45         if (skb == NULL)
46                 goto errout;
47         err = fill_addr(skb, dev, addr, 0, 0, event);
48         if (err < 0) {
49                 WARN_ON(err == -EMSGSIZE);
50                 kfree_skb(skb);
51                 goto errout;
52         }
53         rtnl_notify(skb, dev_net(dev), 0,
54                     RTNLGRP_PHONET_IFADDR, NULL, GFP_KERNEL);
55         return;
56 errout:
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         ASSERT_RTNL();
74
75         err = nlmsg_parse(nlh, sizeof(*ifm), tb, IFA_MAX, ifa_phonet_policy);
76         if (err < 0)
77                 return err;
78
79         ifm = nlmsg_data(nlh);
80         if (tb[IFA_LOCAL] == NULL)
81                 return -EINVAL;
82         pnaddr = nla_get_u8(tb[IFA_LOCAL]);
83         if (pnaddr & 3)
84                 /* Phonet addresses only have 6 high-order bits */
85                 return -EINVAL;
86
87         dev = __dev_get_by_index(net, ifm->ifa_index);
88         if (dev == NULL)
89                 return -ENODEV;
90
91         if (nlh->nlmsg_type == RTM_NEWADDR)
92                 err = phonet_address_add(dev, pnaddr);
93         else
94                 err = phonet_address_del(dev, pnaddr);
95         if (!err)
96                 phonet_address_notify(nlh->nlmsg_type, dev, pnaddr);
97         return err;
98 }
99
100 static int fill_addr(struct sk_buff *skb, struct net_device *dev, u8 addr,
101                         u32 pid, u32 seq, int event)
102 {
103         struct ifaddrmsg *ifm;
104         struct nlmsghdr *nlh;
105
106         nlh = nlmsg_put(skb, pid, seq, event, sizeof(*ifm), 0);
107         if (nlh == NULL)
108                 return -EMSGSIZE;
109
110         ifm = nlmsg_data(nlh);
111         ifm->ifa_family = AF_PHONET;
112         ifm->ifa_prefixlen = 0;
113         ifm->ifa_flags = IFA_F_PERMANENT;
114         ifm->ifa_scope = RT_SCOPE_LINK;
115         ifm->ifa_index = dev->ifindex;
116         NLA_PUT_U8(skb, IFA_LOCAL, addr);
117         return nlmsg_end(skb, nlh);
118
119 nla_put_failure:
120         nlmsg_cancel(skb, nlh);
121         return -EMSGSIZE;
122 }
123
124 static int getaddr_dumpit(struct sk_buff *skb, struct netlink_callback *cb)
125 {
126         struct phonet_device_list *pndevs;
127         struct phonet_device *pnd;
128         int dev_idx = 0, dev_start_idx = cb->args[0];
129         int addr_idx = 0, addr_start_idx = cb->args[1];
130
131         pndevs = phonet_device_list(sock_net(skb->sk));
132         rcu_read_lock();
133         list_for_each_entry_rcu(pnd, &pndevs->list, list) {
134                 u8 addr;
135
136                 if (dev_idx > dev_start_idx)
137                         addr_start_idx = 0;
138                 if (dev_idx++ < dev_start_idx)
139                         continue;
140
141                 addr_idx = 0;
142                 for_each_set_bit(addr, pnd->addrs, 64) {
143                         if (addr_idx++ < addr_start_idx)
144                                 continue;
145
146                         if (fill_addr(skb, pnd->netdev, addr << 2,
147                                          NETLINK_CB(cb->skb).pid,
148                                         cb->nlh->nlmsg_seq, RTM_NEWADDR) < 0)
149                                 goto out;
150                 }
151         }
152
153 out:
154         rcu_read_unlock();
155         cb->args[0] = dev_idx;
156         cb->args[1] = addr_idx;
157
158         return skb->len;
159 }
160
161 /* Routes handling */
162
163 static int fill_route(struct sk_buff *skb, struct net_device *dev, u8 dst,
164                         u32 pid, u32 seq, int event)
165 {
166         struct rtmsg *rtm;
167         struct nlmsghdr *nlh;
168
169         nlh = nlmsg_put(skb, pid, seq, event, sizeof(*rtm), 0);
170         if (nlh == NULL)
171                 return -EMSGSIZE;
172
173         rtm = nlmsg_data(nlh);
174         rtm->rtm_family = AF_PHONET;
175         rtm->rtm_dst_len = 6;
176         rtm->rtm_src_len = 0;
177         rtm->rtm_tos = 0;
178         rtm->rtm_table = RT_TABLE_MAIN;
179         rtm->rtm_protocol = RTPROT_STATIC;
180         rtm->rtm_scope = RT_SCOPE_UNIVERSE;
181         rtm->rtm_type = RTN_UNICAST;
182         rtm->rtm_flags = 0;
183         NLA_PUT_U8(skb, RTA_DST, dst);
184         NLA_PUT_U32(skb, RTA_OIF, dev->ifindex);
185         return nlmsg_end(skb, nlh);
186
187 nla_put_failure:
188         nlmsg_cancel(skb, nlh);
189         return -EMSGSIZE;
190 }
191
192 void rtm_phonet_notify(int event, struct net_device *dev, u8 dst)
193 {
194         struct sk_buff *skb;
195         int err = -ENOBUFS;
196
197         skb = nlmsg_new(NLMSG_ALIGN(sizeof(struct ifaddrmsg)) +
198                         nla_total_size(1) + nla_total_size(4), GFP_KERNEL);
199         if (skb == NULL)
200                 goto errout;
201         err = fill_route(skb, dev, dst, 0, 0, event);
202         if (err < 0) {
203                 WARN_ON(err == -EMSGSIZE);
204                 kfree_skb(skb);
205                 goto errout;
206         }
207         rtnl_notify(skb, dev_net(dev), 0,
208                           RTNLGRP_PHONET_ROUTE, NULL, GFP_KERNEL);
209         return;
210 errout:
211         rtnl_set_sk_err(dev_net(dev), RTNLGRP_PHONET_ROUTE, err);
212 }
213
214 static const struct nla_policy rtm_phonet_policy[RTA_MAX+1] = {
215         [RTA_DST] = { .type = NLA_U8 },
216         [RTA_OIF] = { .type = NLA_U32 },
217 };
218
219 static int route_doit(struct sk_buff *skb, struct nlmsghdr *nlh, void *attr)
220 {
221         struct net *net = sock_net(skb->sk);
222         struct nlattr *tb[RTA_MAX+1];
223         struct net_device *dev;
224         struct rtmsg *rtm;
225         int err;
226         u8 dst;
227
228         ASSERT_RTNL();
229
230         err = nlmsg_parse(nlh, sizeof(*rtm), tb, RTA_MAX, rtm_phonet_policy);
231         if (err < 0)
232                 return err;
233
234         rtm = nlmsg_data(nlh);
235         if (rtm->rtm_table != RT_TABLE_MAIN || rtm->rtm_type != RTN_UNICAST)
236                 return -EINVAL;
237         if (tb[RTA_DST] == NULL || tb[RTA_OIF] == NULL)
238                 return -EINVAL;
239         dst = nla_get_u8(tb[RTA_DST]);
240         if (dst & 3) /* Phonet addresses only have 6 high-order bits */
241                 return -EINVAL;
242
243         dev = __dev_get_by_index(net, nla_get_u32(tb[RTA_OIF]));
244         if (dev == NULL)
245                 return -ENODEV;
246
247         if (nlh->nlmsg_type == RTM_NEWROUTE)
248                 err = phonet_route_add(dev, dst);
249         else
250                 err = phonet_route_del(dev, dst);
251         if (!err)
252                 rtm_phonet_notify(nlh->nlmsg_type, dev, dst);
253         return err;
254 }
255
256 static int route_dumpit(struct sk_buff *skb, struct netlink_callback *cb)
257 {
258         struct net *net = sock_net(skb->sk);
259         u8 addr, addr_idx = 0, addr_start_idx = cb->args[0];
260
261         rcu_read_lock();
262         for (addr = 0; addr < 64; addr++) {
263                 struct net_device *dev;
264
265                 dev = phonet_route_get_rcu(net, addr << 2);
266                 if (!dev)
267                         continue;
268
269                 if (addr_idx++ < addr_start_idx)
270                         continue;
271                 if (fill_route(skb, dev, addr << 2, NETLINK_CB(cb->skb).pid,
272                                 cb->nlh->nlmsg_seq, RTM_NEWROUTE))
273                         goto out;
274         }
275
276 out:
277         rcu_read_unlock();
278         cb->args[0] = addr_idx;
279         cb->args[1] = 0;
280
281         return skb->len;
282 }
283
284 int __init phonet_netlink_register(void)
285 {
286         int err = __rtnl_register(PF_PHONET, RTM_NEWADDR, addr_doit,
287                                   NULL, NULL);
288         if (err)
289                 return err;
290
291         /* Further __rtnl_register() cannot fail */
292         __rtnl_register(PF_PHONET, RTM_DELADDR, addr_doit, NULL, NULL);
293         __rtnl_register(PF_PHONET, RTM_GETADDR, NULL, getaddr_dumpit, NULL);
294         __rtnl_register(PF_PHONET, RTM_NEWROUTE, route_doit, NULL, NULL);
295         __rtnl_register(PF_PHONET, RTM_DELROUTE, route_doit, NULL, NULL);
296         __rtnl_register(PF_PHONET, RTM_GETROUTE, NULL, route_dumpit, NULL);
297         return 0;
298 }