bridge: Allow tail-call on br_pass_frame_up
[linux-2.6.git] / net / ieee802154 / dgram.c
1 /*
2  * ZigBee socket interface
3  *
4  * Copyright 2007, 2008 Siemens AG
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License along
16  * with this program; if not, write to the Free Software Foundation, Inc.,
17  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18  *
19  * Written by:
20  * Sergey Lapin <slapin@ossfans.org>
21  * Dmitry Eremin-Solenikov <dbaryshkov@gmail.com>
22  */
23
24 #include <linux/net.h>
25 #include <linux/module.h>
26 #include <linux/if_arp.h>
27 #include <linux/list.h>
28 #include <net/sock.h>
29 #include <net/af_ieee802154.h>
30 #include <net/ieee802154.h>
31 #include <net/ieee802154_netdev.h>
32
33 #include <asm/ioctls.h>
34
35 #include "af802154.h"
36
37 static HLIST_HEAD(dgram_head);
38 static DEFINE_RWLOCK(dgram_lock);
39
40 struct dgram_sock {
41         struct sock sk;
42
43         struct ieee802154_addr src_addr;
44         struct ieee802154_addr dst_addr;
45
46         unsigned bound:1;
47         unsigned want_ack:1;
48 };
49
50 static inline struct dgram_sock *dgram_sk(const struct sock *sk)
51 {
52         return container_of(sk, struct dgram_sock, sk);
53 }
54
55 static void dgram_hash(struct sock *sk)
56 {
57         write_lock_bh(&dgram_lock);
58         sk_add_node(sk, &dgram_head);
59         sock_prot_inuse_add(sock_net(sk), sk->sk_prot, 1);
60         write_unlock_bh(&dgram_lock);
61 }
62
63 static void dgram_unhash(struct sock *sk)
64 {
65         write_lock_bh(&dgram_lock);
66         if (sk_del_node_init(sk))
67                 sock_prot_inuse_add(sock_net(sk), sk->sk_prot, -1);
68         write_unlock_bh(&dgram_lock);
69 }
70
71 static int dgram_init(struct sock *sk)
72 {
73         struct dgram_sock *ro = dgram_sk(sk);
74
75         ro->dst_addr.addr_type = IEEE802154_ADDR_LONG;
76         ro->dst_addr.pan_id = 0xffff;
77         ro->want_ack = 1;
78         memset(&ro->dst_addr.hwaddr, 0xff, sizeof(ro->dst_addr.hwaddr));
79         return 0;
80 }
81
82 static void dgram_close(struct sock *sk, long timeout)
83 {
84         sk_common_release(sk);
85 }
86
87 static int dgram_bind(struct sock *sk, struct sockaddr *uaddr, int len)
88 {
89         struct sockaddr_ieee802154 *addr = (struct sockaddr_ieee802154 *)uaddr;
90         struct dgram_sock *ro = dgram_sk(sk);
91         int err = -EINVAL;
92         struct net_device *dev;
93
94         lock_sock(sk);
95
96         ro->bound = 0;
97
98         if (len < sizeof(*addr))
99                 goto out;
100
101         if (addr->family != AF_IEEE802154)
102                 goto out;
103
104         dev = ieee802154_get_dev(sock_net(sk), &addr->addr);
105         if (!dev) {
106                 err = -ENODEV;
107                 goto out;
108         }
109
110         if (dev->type != ARPHRD_IEEE802154) {
111                 err = -ENODEV;
112                 goto out_put;
113         }
114
115         memcpy(&ro->src_addr, &addr->addr, sizeof(struct ieee802154_addr));
116
117         ro->bound = 1;
118         err = 0;
119 out_put:
120         dev_put(dev);
121 out:
122         release_sock(sk);
123
124         return err;
125 }
126
127 static int dgram_ioctl(struct sock *sk, int cmd, unsigned long arg)
128 {
129         switch (cmd) {
130         case SIOCOUTQ:
131         {
132                 int amount = sk_wmem_alloc_get(sk);
133
134                 return put_user(amount, (int __user *)arg);
135         }
136
137         case SIOCINQ:
138         {
139                 struct sk_buff *skb;
140                 unsigned long amount;
141
142                 amount = 0;
143                 spin_lock_bh(&sk->sk_receive_queue.lock);
144                 skb = skb_peek(&sk->sk_receive_queue);
145                 if (skb != NULL) {
146                         /*
147                          * We will only return the amount
148                          * of this packet since that is all
149                          * that will be read.
150                          */
151                         /* FIXME: parse the header for more correct value */
152                         amount = skb->len - (3+8+8);
153                 }
154                 spin_unlock_bh(&sk->sk_receive_queue.lock);
155                 return put_user(amount, (int __user *)arg);
156         }
157
158         }
159         return -ENOIOCTLCMD;
160 }
161
162 /* FIXME: autobind */
163 static int dgram_connect(struct sock *sk, struct sockaddr *uaddr,
164                         int len)
165 {
166         struct sockaddr_ieee802154 *addr = (struct sockaddr_ieee802154 *)uaddr;
167         struct dgram_sock *ro = dgram_sk(sk);
168         int err = 0;
169
170         if (len < sizeof(*addr))
171                 return -EINVAL;
172
173         if (addr->family != AF_IEEE802154)
174                 return -EINVAL;
175
176         lock_sock(sk);
177
178         if (!ro->bound) {
179                 err = -ENETUNREACH;
180                 goto out;
181         }
182
183         memcpy(&ro->dst_addr, &addr->addr, sizeof(struct ieee802154_addr));
184
185 out:
186         release_sock(sk);
187         return err;
188 }
189
190 static int dgram_disconnect(struct sock *sk, int flags)
191 {
192         struct dgram_sock *ro = dgram_sk(sk);
193
194         lock_sock(sk);
195
196         ro->dst_addr.addr_type = IEEE802154_ADDR_LONG;
197         memset(&ro->dst_addr.hwaddr, 0xff, sizeof(ro->dst_addr.hwaddr));
198
199         release_sock(sk);
200
201         return 0;
202 }
203
204 static int dgram_sendmsg(struct kiocb *iocb, struct sock *sk,
205                 struct msghdr *msg, size_t size)
206 {
207         struct net_device *dev;
208         unsigned mtu;
209         struct sk_buff *skb;
210         struct dgram_sock *ro = dgram_sk(sk);
211         int err;
212
213         if (msg->msg_flags & MSG_OOB) {
214                 pr_debug("msg->msg_flags = 0x%x\n", msg->msg_flags);
215                 return -EOPNOTSUPP;
216         }
217
218         if (!ro->bound)
219                 dev = dev_getfirstbyhwtype(sock_net(sk), ARPHRD_IEEE802154);
220         else
221                 dev = ieee802154_get_dev(sock_net(sk), &ro->src_addr);
222
223         if (!dev) {
224                 pr_debug("no dev\n");
225                 err = -ENXIO;
226                 goto out;
227         }
228         mtu = dev->mtu;
229         pr_debug("name = %s, mtu = %u\n", dev->name, mtu);
230
231         skb = sock_alloc_send_skb(sk, LL_ALLOCATED_SPACE(dev) + size,
232                         msg->msg_flags & MSG_DONTWAIT,
233                         &err);
234         if (!skb)
235                 goto out_dev;
236
237         skb_reserve(skb, LL_RESERVED_SPACE(dev));
238
239         skb_reset_network_header(skb);
240
241         mac_cb(skb)->flags = IEEE802154_FC_TYPE_DATA;
242         if (ro->want_ack)
243                 mac_cb(skb)->flags |= MAC_CB_FLAG_ACKREQ;
244
245         mac_cb(skb)->seq = ieee802154_mlme_ops(dev)->get_dsn(dev);
246         err = dev_hard_header(skb, dev, ETH_P_IEEE802154, &ro->dst_addr,
247                         ro->bound ? &ro->src_addr : NULL, size);
248         if (err < 0)
249                 goto out_skb;
250
251         skb_reset_mac_header(skb);
252
253         err = memcpy_fromiovec(skb_put(skb, size), msg->msg_iov, size);
254         if (err < 0)
255                 goto out_skb;
256
257         if (size > mtu) {
258                 pr_debug("size = %Zu, mtu = %u\n", size, mtu);
259                 err = -EINVAL;
260                 goto out_skb;
261         }
262
263         skb->dev = dev;
264         skb->sk  = sk;
265         skb->protocol = htons(ETH_P_IEEE802154);
266
267         dev_put(dev);
268
269         err = dev_queue_xmit(skb);
270         if (err > 0)
271                 err = net_xmit_errno(err);
272
273         return err ?: size;
274
275 out_skb:
276         kfree_skb(skb);
277 out_dev:
278         dev_put(dev);
279 out:
280         return err;
281 }
282
283 static int dgram_recvmsg(struct kiocb *iocb, struct sock *sk,
284                 struct msghdr *msg, size_t len, int noblock, int flags,
285                 int *addr_len)
286 {
287         size_t copied = 0;
288         int err = -EOPNOTSUPP;
289         struct sk_buff *skb;
290
291         skb = skb_recv_datagram(sk, flags, noblock, &err);
292         if (!skb)
293                 goto out;
294
295         copied = skb->len;
296         if (len < copied) {
297                 msg->msg_flags |= MSG_TRUNC;
298                 copied = len;
299         }
300
301         /* FIXME: skip headers if necessary ?! */
302         err = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
303         if (err)
304                 goto done;
305
306         sock_recv_ts_and_drops(msg, sk, skb);
307
308         if (flags & MSG_TRUNC)
309                 copied = skb->len;
310 done:
311         skb_free_datagram(sk, skb);
312 out:
313         if (err)
314                 return err;
315         return copied;
316 }
317
318 static int dgram_rcv_skb(struct sock *sk, struct sk_buff *skb)
319 {
320         if (sock_queue_rcv_skb(sk, skb) < 0) {
321                 kfree_skb(skb);
322                 return NET_RX_DROP;
323         }
324
325         return NET_RX_SUCCESS;
326 }
327
328 static inline int ieee802154_match_sock(u8 *hw_addr, u16 pan_id,
329                 u16 short_addr, struct dgram_sock *ro)
330 {
331         if (!ro->bound)
332                 return 1;
333
334         if (ro->src_addr.addr_type == IEEE802154_ADDR_LONG &&
335             !memcmp(ro->src_addr.hwaddr, hw_addr, IEEE802154_ADDR_LEN))
336                 return 1;
337
338         if (ro->src_addr.addr_type == IEEE802154_ADDR_SHORT &&
339                      pan_id == ro->src_addr.pan_id &&
340                      short_addr == ro->src_addr.short_addr)
341                 return 1;
342
343         return 0;
344 }
345
346 int ieee802154_dgram_deliver(struct net_device *dev, struct sk_buff *skb)
347 {
348         struct sock *sk, *prev = NULL;
349         struct hlist_node *node;
350         int ret = NET_RX_SUCCESS;
351         u16 pan_id, short_addr;
352
353         /* Data frame processing */
354         BUG_ON(dev->type != ARPHRD_IEEE802154);
355
356         pan_id = ieee802154_mlme_ops(dev)->get_pan_id(dev);
357         short_addr = ieee802154_mlme_ops(dev)->get_short_addr(dev);
358
359         read_lock(&dgram_lock);
360         sk_for_each(sk, node, &dgram_head) {
361                 if (ieee802154_match_sock(dev->dev_addr, pan_id, short_addr,
362                                         dgram_sk(sk))) {
363                         if (prev) {
364                                 struct sk_buff *clone;
365                                 clone = skb_clone(skb, GFP_ATOMIC);
366                                 if (clone)
367                                         dgram_rcv_skb(prev, clone);
368                         }
369
370                         prev = sk;
371                 }
372         }
373
374         if (prev)
375                 dgram_rcv_skb(prev, skb);
376         else {
377                 kfree_skb(skb);
378                 ret = NET_RX_DROP;
379         }
380         read_unlock(&dgram_lock);
381
382         return ret;
383 }
384
385 static int dgram_getsockopt(struct sock *sk, int level, int optname,
386                     char __user *optval, int __user *optlen)
387 {
388         struct dgram_sock *ro = dgram_sk(sk);
389
390         int val, len;
391
392         if (level != SOL_IEEE802154)
393                 return -EOPNOTSUPP;
394
395         if (get_user(len, optlen))
396                 return -EFAULT;
397
398         len = min_t(unsigned int, len, sizeof(int));
399
400         switch (optname) {
401         case WPAN_WANTACK:
402                 val = ro->want_ack;
403                 break;
404         default:
405                 return -ENOPROTOOPT;
406         }
407
408         if (put_user(len, optlen))
409                 return -EFAULT;
410         if (copy_to_user(optval, &val, len))
411                 return -EFAULT;
412         return 0;
413 }
414
415 static int dgram_setsockopt(struct sock *sk, int level, int optname,
416                     char __user *optval, unsigned int optlen)
417 {
418         struct dgram_sock *ro = dgram_sk(sk);
419         int val;
420         int err = 0;
421
422         if (optlen < sizeof(int))
423                 return -EINVAL;
424
425         if (get_user(val, (int __user *)optval))
426                 return -EFAULT;
427
428         lock_sock(sk);
429
430         switch (optname) {
431         case WPAN_WANTACK:
432                 ro->want_ack = !!val;
433                 break;
434         default:
435                 err = -ENOPROTOOPT;
436                 break;
437         }
438
439         release_sock(sk);
440         return err;
441 }
442
443 struct proto ieee802154_dgram_prot = {
444         .name           = "IEEE-802.15.4-MAC",
445         .owner          = THIS_MODULE,
446         .obj_size       = sizeof(struct dgram_sock),
447         .init           = dgram_init,
448         .close          = dgram_close,
449         .bind           = dgram_bind,
450         .sendmsg        = dgram_sendmsg,
451         .recvmsg        = dgram_recvmsg,
452         .hash           = dgram_hash,
453         .unhash         = dgram_unhash,
454         .connect        = dgram_connect,
455         .disconnect     = dgram_disconnect,
456         .ioctl          = dgram_ioctl,
457         .getsockopt     = dgram_getsockopt,
458         .setsockopt     = dgram_setsockopt,
459 };
460