net/ieee802154/dgram.c

   1 /*
   2  * IEEE 802.15.4 dgram 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/capability.h>
  25 #include <linux/net.h>
  26 #include <linux/module.h>
  27 #include <linux/if_arp.h>
  28 #include <linux/list.h>
  29 #include <linux/slab.h>
  30 #include <net/sock.h>
  31 #include <net/af_ieee802154.h>
  32 #include <net/ieee802154.h>
  33 #include <net/ieee802154_netdev.h>
  34
  35 #include <asm/ioctls.h>
  36
  37 #include "af802154.h"
  38
  39 static HLIST_HEAD(dgram_head);
  40 static DEFINE_RWLOCK(dgram_lock);
  41
  42 struct dgram_sock {
  43         struct sock sk;
  44
  45         struct ieee802154_addr src_addr;
  46         struct ieee802154_addr dst_addr;
  47
  48         unsigned int bound:1;
  49         unsigned int connected:1;
  50         unsigned int want_ack:1;
  51         unsigned int secen:1;
  52         unsigned int secen_override:1;
  53         unsigned int seclevel:3;
  54         unsigned int seclevel_override:1;
  55 };
  56
  57 static inline struct dgram_sock *dgram_sk(const struct sock *sk)
  58 {
  59         return container_of(sk, struct dgram_sock, sk);
  60 }
  61
  62 static void dgram_hash(struct sock *sk)
  63 {
  64         write_lock_bh(&dgram_lock);
  65         sk_add_node(sk, &dgram_head);
  66         sock_prot_inuse_add(sock_net(sk), sk->sk_prot, 1);
  67         write_unlock_bh(&dgram_lock);
  68 }
  69
  70 static void dgram_unhash(struct sock *sk)
  71 {
  72         write_lock_bh(&dgram_lock);
  73         if (sk_del_node_init(sk))
  74                 sock_prot_inuse_add(sock_net(sk), sk->sk_prot, -1);
  75         write_unlock_bh(&dgram_lock);
  76 }
  77
  78 static int dgram_init(struct sock *sk)
  79 {
  80         struct dgram_sock *ro = dgram_sk(sk);
  81
  82         ro->want_ack = 1;
  83         return 0;
  84 }
  85
  86 static void dgram_close(struct sock *sk, long timeout)
  87 {
  88         sk_common_release(sk);
  89 }
  90
  91 static int dgram_bind(struct sock *sk, struct sockaddr *uaddr, int len)
  92 {
  93         struct sockaddr_ieee802154 *addr = (struct sockaddr_ieee802154 *)uaddr;
  94         struct ieee802154_addr haddr;
  95         struct dgram_sock *ro = dgram_sk(sk);
  96         int err = -EINVAL;
  97         struct net_device *dev;
  98
  99         lock_sock(sk);
 100
 101         ro->bound = 0;
 102
 103         if (len < sizeof(*addr))
 104                 goto out;
 105
 106         if (addr->family != AF_IEEE802154)
 107                 goto out;
 108
 109         ieee802154_addr_from_sa(&haddr, &addr->addr);
 110         dev = ieee802154_get_dev(sock_net(sk), &haddr);
 111         if (!dev) {
 112                 err = -ENODEV;
 113                 goto out;
 114         }
 115
 116         if (dev->type != ARPHRD_IEEE802154) {
 117                 err = -ENODEV;
 118                 goto out_put;
 119         }
 120
 121         ro->src_addr = haddr;
 122
 123         ro->bound = 1;
 124         err = 0;
 125 out_put:
 126         dev_put(dev);
 127 out:
 128         release_sock(sk);
 129
 130         return err;
 131 }
 132
 133 static int dgram_ioctl(struct sock *sk, int cmd, unsigned long arg)
 134 {
 135         switch (cmd) {
 136         case SIOCOUTQ:
 137         {
 138                 int amount = sk_wmem_alloc_get(sk);
 139
 140                 return put_user(amount, (int __user *)arg);
 141         }
 142
 143         case SIOCINQ:
 144         {
 145                 struct sk_buff *skb;
 146                 unsigned long amount;
 147
 148                 amount = 0;
 149                 spin_lock_bh(&sk->sk_receive_queue.lock);
 150                 skb = skb_peek(&sk->sk_receive_queue);
 151                 if (skb != NULL) {
 152                         /* We will only return the amount
 153                          * of this packet since that is all
 154                          * that will be read.
 155                          */
 156                         amount = skb->len - ieee802154_hdr_length(skb);
 157                 }
 158                 spin_unlock_bh(&sk->sk_receive_queue.lock);
 159                 return put_user(amount, (int __user *)arg);
 160         }
 161
 162         }
 163
 164         return -ENOIOCTLCMD;
 165 }
 166
 167 /* FIXME: autobind */
 168 static int dgram_connect(struct sock *sk, struct sockaddr *uaddr,
 169                          int len)
 170 {
 171         struct sockaddr_ieee802154 *addr = (struct sockaddr_ieee802154 *)uaddr;
 172         struct dgram_sock *ro = dgram_sk(sk);
 173         int err = 0;
 174
 175         if (len < sizeof(*addr))
 176                 return -EINVAL;
 177
 178         if (addr->family != AF_IEEE802154)
 179                 return -EINVAL;
 180
 181         lock_sock(sk);
 182
 183         if (!ro->bound) {
 184                 err = -ENETUNREACH;
 185                 goto out;
 186         }
 187
 188         ieee802154_addr_from_sa(&ro->dst_addr, &addr->addr);
 189         ro->connected = 1;
 190
 191 out:
 192         release_sock(sk);
 193         return err;
 194 }
 195
 196 static int dgram_disconnect(struct sock *sk, int flags)
 197 {
 198         struct dgram_sock *ro = dgram_sk(sk);
 199
 200         lock_sock(sk);
 201         ro->connected = 0;
 202         release_sock(sk);
 203
 204         return 0;
 205 }
 206
 207 static int dgram_sendmsg(struct kiocb *iocb, struct sock *sk,
 208                          struct msghdr *msg, size_t size)
 209 {
 210         struct net_device *dev;
 211         unsigned int mtu;
 212         struct sk_buff *skb;
 213         struct ieee802154_mac_cb *cb;
 214         struct dgram_sock *ro = dgram_sk(sk);
 215         struct ieee802154_addr dst_addr;
 216         int hlen, tlen;
 217         int err;
 218
 219         if (msg->msg_flags & MSG_OOB) {
 220                 pr_debug("msg->msg_flags = 0x%x\n", msg->msg_flags);
 221                 return -EOPNOTSUPP;
 222         }
 223
 224         if (!ro->connected && !msg->msg_name)
 225                 return -EDESTADDRREQ;
 226         else if (ro->connected && msg->msg_name)
 227                 return -EISCONN;
 228
 229         if (!ro->bound)
 230                 dev = dev_getfirstbyhwtype(sock_net(sk), ARPHRD_IEEE802154);
 231         else
 232                 dev = ieee802154_get_dev(sock_net(sk), &ro->src_addr);
 233
 234         if (!dev) {
 235                 pr_debug("no dev\n");
 236                 err = -ENXIO;
 237                 goto out;
 238         }
 239         mtu = dev->mtu;
 240         pr_debug("name = %s, mtu = %u\n", dev->name, mtu);
 241
 242         if (size > mtu) {
 243                 pr_debug("size = %Zu, mtu = %u\n", size, mtu);
 244                 err = -EMSGSIZE;
 245                 goto out_dev;
 246         }
 247
 248         hlen = LL_RESERVED_SPACE(dev);
 249         tlen = dev->needed_tailroom;
 250         skb = sock_alloc_send_skb(sk, hlen + tlen + size,
 251                                   msg->msg_flags & MSG_DONTWAIT,
 252                                   &err);
 253         if (!skb)
 254                 goto out_dev;
 255
 256         skb_reserve(skb, hlen);
 257
 258         skb_reset_network_header(skb);
 259
 260         cb = mac_cb_init(skb);
 261         cb->type = IEEE802154_FC_TYPE_DATA;
 262         cb->ackreq = ro->want_ack;
 263
 264         if (msg->msg_name) {
 265                 DECLARE_SOCKADDR(struct sockaddr_ieee802154*,
 266                                  daddr, msg->msg_name);
 267
 268                 ieee802154_addr_from_sa(&dst_addr, &daddr->addr);
 269         } else {
 270                 dst_addr = ro->dst_addr;
 271         }
 272
 273         cb->secen = ro->secen;
 274         cb->secen_override = ro->secen_override;
 275         cb->seclevel = ro->seclevel;
 276         cb->seclevel_override = ro->seclevel_override;
 277
 278         err = dev_hard_header(skb, dev, ETH_P_IEEE802154, &dst_addr,
 279                               ro->bound ? &ro->src_addr : NULL, size);
 280         if (err < 0)
 281                 goto out_skb;
 282
 283         err = memcpy_fromiovec(skb_put(skb, size), msg->msg_iov, size);
 284         if (err < 0)
 285                 goto out_skb;
 286
 287         skb->dev = dev;
 288         skb->sk  = sk;
 289         skb->protocol = htons(ETH_P_IEEE802154);
 290
 291         dev_put(dev);
 292
 293         err = dev_queue_xmit(skb);
 294         if (err > 0)
 295                 err = net_xmit_errno(err);
 296
 297         return err ?: size;
 298
 299 out_skb:
 300         kfree_skb(skb);
 301 out_dev:
 302         dev_put(dev);
 303 out:
 304         return err;
 305 }
 306
 307 static int dgram_recvmsg(struct kiocb *iocb, struct sock *sk,
 308                          struct msghdr *msg, size_t len, int noblock,
 309                          int flags, int *addr_len)
 310 {
 311         size_t copied = 0;
 312         int err = -EOPNOTSUPP;
 313         struct sk_buff *skb;
 314         DECLARE_SOCKADDR(struct sockaddr_ieee802154 *, saddr, msg->msg_name);
 315
 316         skb = skb_recv_datagram(sk, flags, noblock, &err);
 317         if (!skb)
 318                 goto out;
 319
 320         copied = skb->len;
 321         if (len < copied) {
 322                 msg->msg_flags |= MSG_TRUNC;
 323                 copied = len;
 324         }
 325
 326         /* FIXME: skip headers if necessary ?! */
 327         err = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
 328         if (err)
 329                 goto done;
 330
 331         sock_recv_ts_and_drops(msg, sk, skb);
 332
 333         if (saddr) {
 334                 saddr->family = AF_IEEE802154;
 335                 ieee802154_addr_to_sa(&saddr->addr, &mac_cb(skb)->source);
 336                 *addr_len = sizeof(*saddr);
 337         }
 338
 339         if (flags & MSG_TRUNC)
 340                 copied = skb->len;
 341 done:
 342         skb_free_datagram(sk, skb);
 343 out:
 344         if (err)
 345                 return err;
 346         return copied;
 347 }
 348
 349 static int dgram_rcv_skb(struct sock *sk, struct sk_buff *skb)
 350 {
 351         skb = skb_share_check(skb, GFP_ATOMIC);
 352         if (!skb)
 353                 return NET_RX_DROP;
 354
 355         if (sock_queue_rcv_skb(sk, skb) < 0) {
 356                 kfree_skb(skb);
 357                 return NET_RX_DROP;
 358         }
 359
 360         return NET_RX_SUCCESS;
 361 }
 362
 363 static inline bool
 364 ieee802154_match_sock(__le64 hw_addr, __le16 pan_id, __le16 short_addr,
 365                       struct dgram_sock *ro)
 366 {
 367         if (!ro->bound)
 368                 return true;
 369
 370         if (ro->src_addr.mode == IEEE802154_ADDR_LONG &&
 371             hw_addr == ro->src_addr.extended_addr)
 372                 return true;
 373
 374         if (ro->src_addr.mode == IEEE802154_ADDR_SHORT &&
 375             pan_id == ro->src_addr.pan_id &&
 376             short_addr == ro->src_addr.short_addr)
 377                 return true;
 378
 379         return false;
 380 }
 381
 382 int ieee802154_dgram_deliver(struct net_device *dev, struct sk_buff *skb)
 383 {
 384         struct sock *sk, *prev = NULL;
 385         int ret = NET_RX_SUCCESS;
 386         __le16 pan_id, short_addr;
 387         __le64 hw_addr;
 388
 389         /* Data frame processing */
 390         BUG_ON(dev->type != ARPHRD_IEEE802154);
 391
 392         pan_id = ieee802154_mlme_ops(dev)->get_pan_id(dev);
 393         short_addr = ieee802154_mlme_ops(dev)->get_short_addr(dev);
 394         hw_addr = ieee802154_devaddr_from_raw(dev->dev_addr);
 395
 396         read_lock(&dgram_lock);
 397         sk_for_each(sk, &dgram_head) {
 398                 if (ieee802154_match_sock(hw_addr, pan_id, short_addr,
 399                                           dgram_sk(sk))) {
 400                         if (prev) {
 401                                 struct sk_buff *clone;
 402
 403                                 clone = skb_clone(skb, GFP_ATOMIC);
 404                                 if (clone)
 405                                         dgram_rcv_skb(prev, clone);
 406                         }
 407
 408                         prev = sk;
 409                 }
 410         }
 411
 412         if (prev) {
 413                 dgram_rcv_skb(prev, skb);
 414         } else {
 415                 kfree_skb(skb);
 416                 ret = NET_RX_DROP;
 417         }
 418         read_unlock(&dgram_lock);
 419
 420         return ret;
 421 }
 422
 423 static int dgram_getsockopt(struct sock *sk, int level, int optname,
 424                             char __user *optval, int __user *optlen)
 425 {
 426         struct dgram_sock *ro = dgram_sk(sk);
 427
 428         int val, len;
 429
 430         if (level != SOL_IEEE802154)
 431                 return -EOPNOTSUPP;
 432
 433         if (get_user(len, optlen))
 434                 return -EFAULT;
 435
 436         len = min_t(unsigned int, len, sizeof(int));
 437
 438         switch (optname) {
 439         case WPAN_WANTACK:
 440                 val = ro->want_ack;
 441                 break;
 442         case WPAN_SECURITY:
 443                 if (!ro->secen_override)
 444                         val = WPAN_SECURITY_DEFAULT;
 445                 else if (ro->secen)
 446                         val = WPAN_SECURITY_ON;
 447                 else
 448                         val = WPAN_SECURITY_OFF;
 449                 break;
 450         case WPAN_SECURITY_LEVEL:
 451                 if (!ro->seclevel_override)
 452                         val = WPAN_SECURITY_LEVEL_DEFAULT;
 453                 else
 454                         val = ro->seclevel;
 455                 break;
 456         default:
 457                 return -ENOPROTOOPT;
 458         }
 459
 460         if (put_user(len, optlen))
 461                 return -EFAULT;
 462         if (copy_to_user(optval, &val, len))
 463                 return -EFAULT;
 464         return 0;
 465 }
 466
 467 static int dgram_setsockopt(struct sock *sk, int level, int optname,
 468                             char __user *optval, unsigned int optlen)
 469 {
 470         struct dgram_sock *ro = dgram_sk(sk);
 471         struct net *net = sock_net(sk);
 472         int val;
 473         int err = 0;
 474
 475         if (optlen < sizeof(int))
 476                 return -EINVAL;
 477
 478         if (get_user(val, (int __user *)optval))
 479                 return -EFAULT;
 480
 481         lock_sock(sk);
 482
 483         switch (optname) {
 484         case WPAN_WANTACK:
 485                 ro->want_ack = !!val;
 486                 break;
 487         case WPAN_SECURITY:
 488                 if (!ns_capable(net->user_ns, CAP_NET_ADMIN) &&
 489                     !ns_capable(net->user_ns, CAP_NET_RAW)) {
 490                         err = -EPERM;
 491                         break;
 492                 }
 493
 494                 switch (val) {
 495                 case WPAN_SECURITY_DEFAULT:
 496                         ro->secen_override = 0;
 497                         break;
 498                 case WPAN_SECURITY_ON:
 499                         ro->secen_override = 1;
 500                         ro->secen = 1;
 501                         break;
 502                 case WPAN_SECURITY_OFF:
 503                         ro->secen_override = 1;
 504                         ro->secen = 0;
 505                         break;
 506                 default:
 507                         err = -EINVAL;
 508                         break;
 509                 }
 510                 break;
 511         case WPAN_SECURITY_LEVEL:
 512                 if (!ns_capable(net->user_ns, CAP_NET_ADMIN) &&
 513                     !ns_capable(net->user_ns, CAP_NET_RAW)) {
 514                         err = -EPERM;
 515                         break;
 516                 }
 517
 518                 if (val < WPAN_SECURITY_LEVEL_DEFAULT ||
 519                     val > IEEE802154_SCF_SECLEVEL_ENC_MIC128) {
 520                         err = -EINVAL;
 521                 } else if (val == WPAN_SECURITY_LEVEL_DEFAULT) {
 522                         ro->seclevel_override = 0;
 523                 } else {
 524                         ro->seclevel_override = 1;
 525                         ro->seclevel = val;
 526                 }
 527                 break;
 528         default:
 529                 err = -ENOPROTOOPT;
 530                 break;
 531         }
 532
 533         release_sock(sk);
 534         return err;
 535 }
 536
 537 struct proto ieee802154_dgram_prot = {
 538         .name           = "IEEE-802.15.4-MAC",
 539         .owner          = THIS_MODULE,
 540         .obj_size       = sizeof(struct dgram_sock),
 541         .init           = dgram_init,
 542         .close          = dgram_close,
 543         .bind           = dgram_bind,
 544         .sendmsg        = dgram_sendmsg,
 545         .recvmsg        = dgram_recvmsg,
 546         .hash           = dgram_hash,
 547         .unhash         = dgram_unhash,
 548         .connect        = dgram_connect,
 549         .disconnect     = dgram_disconnect,
 550         .ioctl          = dgram_ioctl,
 551         .getsockopt     = dgram_getsockopt,
 552         .setsockopt     = dgram_setsockopt,
 553 };
 554