net/nfc/llcp_sock.c

   1 /*
   2  * Copyright (C) 2011  Intel Corporation. All rights reserved.
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation; either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the
  16  * Free Software Foundation, Inc.,
  17  * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18  */
  19
  20 #define pr_fmt(fmt) "llcp: %s: " fmt, __func__
  21
  22 #include <linux/init.h>
  23 #include <linux/kernel.h>
  24 #include <linux/module.h>
  25 #include <linux/nfc.h>
  26
  27 #include "nfc.h"
  28 #include "llcp.h"
  29
  30 static int sock_wait_state(struct sock *sk, int state, unsigned long timeo)
  31 {
  32         DECLARE_WAITQUEUE(wait, current);
  33         int err = 0;
  34
  35         pr_debug("sk %p", sk);
  36
  37         add_wait_queue(sk_sleep(sk), &wait);
  38         set_current_state(TASK_INTERRUPTIBLE);
  39
  40         while (sk->sk_state != state) {
  41                 if (!timeo) {
  42                         err = -EINPROGRESS;
  43                         break;
  44                 }
  45
  46                 if (signal_pending(current)) {
  47                         err = sock_intr_errno(timeo);
  48                         break;
  49                 }
  50
  51                 release_sock(sk);
  52                 timeo = schedule_timeout(timeo);
  53                 lock_sock(sk);
  54                 set_current_state(TASK_INTERRUPTIBLE);
  55
  56                 err = sock_error(sk);
  57                 if (err)
  58                         break;
  59         }
  60
  61         __set_current_state(TASK_RUNNING);
  62         remove_wait_queue(sk_sleep(sk), &wait);
  63         return err;
  64 }
  65
  66 static struct proto llcp_sock_proto = {
  67         .name     = "NFC_LLCP",
  68         .owner    = THIS_MODULE,
  69         .obj_size = sizeof(struct nfc_llcp_sock),
  70 };
  71
  72 static int llcp_sock_bind(struct socket *sock, struct sockaddr *addr, int alen)
  73 {
  74         struct sock *sk = sock->sk;
  75         struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
  76         struct nfc_llcp_local *local;
  77         struct nfc_dev *dev;
  78         struct sockaddr_nfc_llcp llcp_addr;
  79         int len, ret = 0;
  80
  81         if (!addr || addr->sa_family != AF_NFC)
  82                 return -EINVAL;
  83
  84         pr_debug("sk %p addr %p family %d\n", sk, addr, addr->sa_family);
  85
  86         memset(&llcp_addr, 0, sizeof(llcp_addr));
  87         len = min_t(unsigned int, sizeof(llcp_addr), alen);
  88         memcpy(&llcp_addr, addr, len);
  89
  90         /* This is going to be a listening socket, dsap must be 0 */
  91         if (llcp_addr.dsap != 0)
  92                 return -EINVAL;
  93
  94         lock_sock(sk);
  95
  96         if (sk->sk_state != LLCP_CLOSED) {
  97                 ret = -EBADFD;
  98                 goto error;
  99         }
 100
 101         dev = nfc_get_device(llcp_addr.dev_idx);
 102         if (dev == NULL) {
 103                 ret = -ENODEV;
 104                 goto error;
 105         }
 106
 107         local = nfc_llcp_find_local(dev);
 108         if (local == NULL) {
 109                 ret = -ENODEV;
 110                 goto put_dev;
 111         }
 112
 113         llcp_sock->dev = dev;
 114         llcp_sock->local = nfc_llcp_local_get(local);
 115         llcp_sock->nfc_protocol = llcp_addr.nfc_protocol;
 116         llcp_sock->service_name_len = min_t(unsigned int,
 117                                             llcp_addr.service_name_len,
 118                                             NFC_LLCP_MAX_SERVICE_NAME);
 119         llcp_sock->service_name = kmemdup(llcp_addr.service_name,
 120                                           llcp_sock->service_name_len,
 121                                           GFP_KERNEL);
 122
 123         llcp_sock->ssap = nfc_llcp_get_sdp_ssap(local, llcp_sock);
 124         if (llcp_sock->ssap == LLCP_SAP_MAX) {
 125                 ret = -EADDRINUSE;
 126                 goto put_dev;
 127         }
 128
 129         llcp_sock->reserved_ssap = llcp_sock->ssap;
 130
 131         nfc_llcp_sock_link(&local->sockets, sk);
 132
 133         pr_debug("Socket bound to SAP %d\n", llcp_sock->ssap);
 134
 135         sk->sk_state = LLCP_BOUND;
 136
 137 put_dev:
 138         nfc_put_device(dev);
 139
 140 error:
 141         release_sock(sk);
 142         return ret;
 143 }
 144
 145 static int llcp_raw_sock_bind(struct socket *sock, struct sockaddr *addr,
 146                               int alen)
 147 {
 148         struct sock *sk = sock->sk;
 149         struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
 150         struct nfc_llcp_local *local;
 151         struct nfc_dev *dev;
 152         struct sockaddr_nfc_llcp llcp_addr;
 153         int len, ret = 0;
 154
 155         if (!addr || addr->sa_family != AF_NFC)
 156                 return -EINVAL;
 157
 158         pr_debug("sk %p addr %p family %d\n", sk, addr, addr->sa_family);
 159
 160         memset(&llcp_addr, 0, sizeof(llcp_addr));
 161         len = min_t(unsigned int, sizeof(llcp_addr), alen);
 162         memcpy(&llcp_addr, addr, len);
 163
 164         lock_sock(sk);
 165
 166         if (sk->sk_state != LLCP_CLOSED) {
 167                 ret = -EBADFD;
 168                 goto error;
 169         }
 170
 171         dev = nfc_get_device(llcp_addr.dev_idx);
 172         if (dev == NULL) {
 173                 ret = -ENODEV;
 174                 goto error;
 175         }
 176
 177         local = nfc_llcp_find_local(dev);
 178         if (local == NULL) {
 179                 ret = -ENODEV;
 180                 goto put_dev;
 181         }
 182
 183         llcp_sock->dev = dev;
 184         llcp_sock->local = nfc_llcp_local_get(local);
 185         llcp_sock->nfc_protocol = llcp_addr.nfc_protocol;
 186
 187         nfc_llcp_sock_link(&local->raw_sockets, sk);
 188
 189         sk->sk_state = LLCP_BOUND;
 190
 191 put_dev:
 192         nfc_put_device(dev);
 193
 194 error:
 195         release_sock(sk);
 196         return ret;
 197 }
 198
 199 static int llcp_sock_listen(struct socket *sock, int backlog)
 200 {
 201         struct sock *sk = sock->sk;
 202         int ret = 0;
 203
 204         pr_debug("sk %p backlog %d\n", sk, backlog);
 205
 206         lock_sock(sk);
 207
 208         if ((sock->type != SOCK_SEQPACKET && sock->type != SOCK_STREAM) ||
 209             sk->sk_state != LLCP_BOUND) {
 210                 ret = -EBADFD;
 211                 goto error;
 212         }
 213
 214         sk->sk_max_ack_backlog = backlog;
 215         sk->sk_ack_backlog = 0;
 216
 217         pr_debug("Socket listening\n");
 218         sk->sk_state = LLCP_LISTEN;
 219
 220 error:
 221         release_sock(sk);
 222
 223         return ret;
 224 }
 225
 226 static int nfc_llcp_setsockopt(struct socket *sock, int level, int optname,
 227                                char __user *optval, unsigned int optlen)
 228 {
 229         struct sock *sk = sock->sk;
 230         struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
 231         u32 opt;
 232         int err = 0;
 233
 234         pr_debug("%p optname %d\n", sk, optname);
 235
 236         if (level != SOL_NFC)
 237                 return -ENOPROTOOPT;
 238
 239         lock_sock(sk);
 240
 241         switch (optname) {
 242         case NFC_LLCP_RW:
 243                 if (sk->sk_state == LLCP_CONNECTED ||
 244                     sk->sk_state == LLCP_BOUND ||
 245                     sk->sk_state == LLCP_LISTEN) {
 246                         err = -EINVAL;
 247                         break;
 248                 }
 249
 250                 if (get_user(opt, (u32 __user *) optval)) {
 251                         err = -EFAULT;
 252                         break;
 253                 }
 254
 255                 if (opt > LLCP_MAX_RW) {
 256                         err = -EINVAL;
 257                         break;
 258                 }
 259
 260                 llcp_sock->rw = (u8) opt;
 261
 262                 break;
 263
 264         case NFC_LLCP_MIUX:
 265                 if (sk->sk_state == LLCP_CONNECTED ||
 266                     sk->sk_state == LLCP_BOUND ||
 267                     sk->sk_state == LLCP_LISTEN) {
 268                         err = -EINVAL;
 269                         break;
 270                 }
 271
 272                 if (get_user(opt, (u32 __user *) optval)) {
 273                         err = -EFAULT;
 274                         break;
 275                 }
 276
 277                 if (opt > LLCP_MAX_MIUX) {
 278                         err = -EINVAL;
 279                         break;
 280                 }
 281
 282                 llcp_sock->miux = cpu_to_be16((u16) opt);
 283
 284                 break;
 285
 286         default:
 287                 err = -ENOPROTOOPT;
 288                 break;
 289         }
 290
 291         release_sock(sk);
 292
 293         pr_debug("%p rw %d miux %d\n", llcp_sock,
 294                  llcp_sock->rw, llcp_sock->miux);
 295
 296         return err;
 297 }
 298
 299 static int nfc_llcp_getsockopt(struct socket *sock, int level, int optname,
 300                                char __user *optval, int __user *optlen)
 301 {
 302         struct nfc_llcp_local *local;
 303         struct sock *sk = sock->sk;
 304         struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
 305         int len, err = 0;
 306         u16 miux, remote_miu;
 307         u8 rw;
 308
 309         pr_debug("%p optname %d\n", sk, optname);
 310
 311         if (level != SOL_NFC)
 312                 return -ENOPROTOOPT;
 313
 314         if (get_user(len, optlen))
 315                 return -EFAULT;
 316
 317         local = llcp_sock->local;
 318         if (!local)
 319                 return -ENODEV;
 320
 321         len = min_t(u32, len, sizeof(u32));
 322
 323         lock_sock(sk);
 324
 325         switch (optname) {
 326         case NFC_LLCP_RW:
 327                 rw = llcp_sock->rw > LLCP_MAX_RW ? local->rw : llcp_sock->rw;
 328                 if (put_user(rw, (u32 __user *) optval))
 329                         err = -EFAULT;
 330
 331                 break;
 332
 333         case NFC_LLCP_MIUX:
 334                 miux = be16_to_cpu(llcp_sock->miux) > LLCP_MAX_MIUX ?
 335                         be16_to_cpu(local->miux) : be16_to_cpu(llcp_sock->miux);
 336
 337                 if (put_user(miux, (u32 __user *) optval))
 338                         err = -EFAULT;
 339
 340                 break;
 341
 342         case NFC_LLCP_REMOTE_MIU:
 343                 remote_miu = llcp_sock->remote_miu > LLCP_MAX_MIU ?
 344                                 local->remote_miu : llcp_sock->remote_miu;
 345
 346                 if (put_user(remote_miu, (u32 __user *) optval))
 347                         err = -EFAULT;
 348
 349                 break;
 350
 351         case NFC_LLCP_REMOTE_LTO:
 352                 if (put_user(local->remote_lto / 10, (u32 __user *) optval))
 353                         err = -EFAULT;
 354
 355                 break;
 356
 357         case NFC_LLCP_REMOTE_RW:
 358                 if (put_user(llcp_sock->remote_rw, (u32 __user *) optval))
 359                         err = -EFAULT;
 360
 361                 break;
 362
 363         default:
 364                 err = -ENOPROTOOPT;
 365                 break;
 366         }
 367
 368         release_sock(sk);
 369
 370         if (put_user(len, optlen))
 371                 return -EFAULT;
 372
 373         return err;
 374 }
 375
 376 void nfc_llcp_accept_unlink(struct sock *sk)
 377 {
 378         struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
 379
 380         pr_debug("state %d\n", sk->sk_state);
 381
 382         list_del_init(&llcp_sock->accept_queue);
 383         sk_acceptq_removed(llcp_sock->parent);
 384         llcp_sock->parent = NULL;
 385
 386         sock_put(sk);
 387 }
 388
 389 void nfc_llcp_accept_enqueue(struct sock *parent, struct sock *sk)
 390 {
 391         struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
 392         struct nfc_llcp_sock *llcp_sock_parent = nfc_llcp_sock(parent);
 393
 394         /* Lock will be free from unlink */
 395         sock_hold(sk);
 396
 397         list_add_tail(&llcp_sock->accept_queue,
 398                       &llcp_sock_parent->accept_queue);
 399         llcp_sock->parent = parent;
 400         sk_acceptq_added(parent);
 401 }
 402
 403 struct sock *nfc_llcp_accept_dequeue(struct sock *parent,
 404                                      struct socket *newsock)
 405 {
 406         struct nfc_llcp_sock *lsk, *n, *llcp_parent;
 407         struct sock *sk;
 408
 409         llcp_parent = nfc_llcp_sock(parent);
 410
 411         list_for_each_entry_safe(lsk, n, &llcp_parent->accept_queue,
 412                                  accept_queue) {
 413                 sk = &lsk->sk;
 414                 lock_sock(sk);
 415
 416                 if (sk->sk_state == LLCP_CLOSED) {
 417                         release_sock(sk);
 418                         nfc_llcp_accept_unlink(sk);
 419                         continue;
 420                 }
 421
 422                 if (sk->sk_state == LLCP_CONNECTED || !newsock) {
 423                         list_del_init(&lsk->accept_queue);
 424                         sock_put(sk);
 425
 426                         if (newsock)
 427                                 sock_graft(sk, newsock);
 428
 429                         release_sock(sk);
 430
 431                         pr_debug("Returning sk state %d\n", sk->sk_state);
 432
 433                         sk_acceptq_removed(parent);
 434
 435                         return sk;
 436                 }
 437
 438                 release_sock(sk);
 439         }
 440
 441         return NULL;
 442 }
 443
 444 static int llcp_sock_accept(struct socket *sock, struct socket *newsock,
 445                             int flags)
 446 {
 447         DECLARE_WAITQUEUE(wait, current);
 448         struct sock *sk = sock->sk, *new_sk;
 449         long timeo;
 450         int ret = 0;
 451
 452         pr_debug("parent %p\n", sk);
 453
 454         lock_sock_nested(sk, SINGLE_DEPTH_NESTING);
 455
 456         if (sk->sk_state != LLCP_LISTEN) {
 457                 ret = -EBADFD;
 458                 goto error;
 459         }
 460
 461         timeo = sock_rcvtimeo(sk, flags & O_NONBLOCK);
 462
 463         /* Wait for an incoming connection. */
 464         add_wait_queue_exclusive(sk_sleep(sk), &wait);
 465         while (!(new_sk = nfc_llcp_accept_dequeue(sk, newsock))) {
 466                 set_current_state(TASK_INTERRUPTIBLE);
 467
 468                 if (!timeo) {
 469                         ret = -EAGAIN;
 470                         break;
 471                 }
 472
 473                 if (signal_pending(current)) {
 474                         ret = sock_intr_errno(timeo);
 475                         break;
 476                 }
 477
 478                 release_sock(sk);
 479                 timeo = schedule_timeout(timeo);
 480                 lock_sock_nested(sk, SINGLE_DEPTH_NESTING);
 481         }
 482         __set_current_state(TASK_RUNNING);
 483         remove_wait_queue(sk_sleep(sk), &wait);
 484
 485         if (ret)
 486                 goto error;
 487
 488         newsock->state = SS_CONNECTED;
 489
 490         pr_debug("new socket %p\n", new_sk);
 491
 492 error:
 493         release_sock(sk);
 494
 495         return ret;
 496 }
 497
 498 static int llcp_sock_getname(struct socket *sock, struct sockaddr *uaddr,
 499                              int *len, int peer)
 500 {
 501         struct sock *sk = sock->sk;
 502         struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
 503         DECLARE_SOCKADDR(struct sockaddr_nfc_llcp *, llcp_addr, uaddr);
 504
 505         if (llcp_sock == NULL || llcp_sock->dev == NULL)
 506                 return -EBADFD;
 507
 508         pr_debug("%p %d %d %d\n", sk, llcp_sock->target_idx,
 509                  llcp_sock->dsap, llcp_sock->ssap);
 510
 511         uaddr->sa_family = AF_NFC;
 512
 513         *len = sizeof(struct sockaddr_nfc_llcp);
 514
 515         llcp_addr->dev_idx = llcp_sock->dev->idx;
 516         llcp_addr->target_idx = llcp_sock->target_idx;
 517         llcp_addr->dsap = llcp_sock->dsap;
 518         llcp_addr->ssap = llcp_sock->ssap;
 519         llcp_addr->service_name_len = llcp_sock->service_name_len;
 520         memcpy(llcp_addr->service_name, llcp_sock->service_name,
 521                llcp_addr->service_name_len);
 522
 523         return 0;
 524 }
 525
 526 static inline unsigned int llcp_accept_poll(struct sock *parent)
 527 {
 528         struct nfc_llcp_sock *llcp_sock, *n, *parent_sock;
 529         struct sock *sk;
 530
 531         parent_sock = nfc_llcp_sock(parent);
 532
 533         list_for_each_entry_safe(llcp_sock, n, &parent_sock->accept_queue,
 534                                  accept_queue) {
 535                 sk = &llcp_sock->sk;
 536
 537                 if (sk->sk_state == LLCP_CONNECTED)
 538                         return POLLIN | POLLRDNORM;
 539         }
 540
 541         return 0;
 542 }
 543
 544 static unsigned int llcp_sock_poll(struct file *file, struct socket *sock,
 545                                    poll_table *wait)
 546 {
 547         struct sock *sk = sock->sk;
 548         unsigned int mask = 0;
 549
 550         pr_debug("%p\n", sk);
 551
 552         sock_poll_wait(file, sk_sleep(sk), wait);
 553
 554         if (sk->sk_state == LLCP_LISTEN)
 555                 return llcp_accept_poll(sk);
 556
 557         if (sk->sk_err || !skb_queue_empty(&sk->sk_error_queue))
 558                 mask |= POLLERR;
 559
 560         if (!skb_queue_empty(&sk->sk_receive_queue))
 561                 mask |= POLLIN | POLLRDNORM;
 562
 563         if (sk->sk_state == LLCP_CLOSED)
 564                 mask |= POLLHUP;
 565
 566         if (sk->sk_shutdown & RCV_SHUTDOWN)
 567                 mask |= POLLRDHUP | POLLIN | POLLRDNORM;
 568
 569         if (sk->sk_shutdown == SHUTDOWN_MASK)
 570                 mask |= POLLHUP;
 571
 572         if (sock_writeable(sk))
 573                 mask |= POLLOUT | POLLWRNORM | POLLWRBAND;
 574         else
 575                 set_bit(SOCK_ASYNC_NOSPACE, &sk->sk_socket->flags);
 576
 577         pr_debug("mask 0x%x\n", mask);
 578
 579         return mask;
 580 }
 581
 582 static int llcp_sock_release(struct socket *sock)
 583 {
 584         struct sock *sk = sock->sk;
 585         struct nfc_llcp_local *local;
 586         struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
 587         int err = 0;
 588
 589         if (!sk)
 590                 return 0;
 591
 592         pr_debug("%p\n", sk);
 593
 594         local = llcp_sock->local;
 595         if (local == NULL) {
 596                 err = -ENODEV;
 597                 goto out;
 598         }
 599
 600         lock_sock(sk);
 601
 602         /* Send a DISC */
 603         if (sk->sk_state == LLCP_CONNECTED)
 604                 nfc_llcp_disconnect(llcp_sock);
 605
 606         if (sk->sk_state == LLCP_LISTEN) {
 607                 struct nfc_llcp_sock *lsk, *n;
 608                 struct sock *accept_sk;
 609
 610                 list_for_each_entry_safe(lsk, n, &llcp_sock->accept_queue,
 611                                          accept_queue) {
 612                         accept_sk = &lsk->sk;
 613                         lock_sock(accept_sk);
 614
 615                         nfc_llcp_disconnect(lsk);
 616                         nfc_llcp_accept_unlink(accept_sk);
 617
 618                         release_sock(accept_sk);
 619                 }
 620         }
 621
 622         if (llcp_sock->reserved_ssap < LLCP_SAP_MAX)
 623                 nfc_llcp_put_ssap(llcp_sock->local, llcp_sock->ssap);
 624
 625         release_sock(sk);
 626
 627         if (sock->type == SOCK_RAW)
 628                 nfc_llcp_sock_unlink(&local->raw_sockets, sk);
 629         else
 630                 nfc_llcp_sock_unlink(&local->sockets, sk);
 631
 632 out:
 633         sock_orphan(sk);
 634         sock_put(sk);
 635
 636         return err;
 637 }
 638
 639 static int llcp_sock_connect(struct socket *sock, struct sockaddr *_addr,
 640                              int len, int flags)
 641 {
 642         struct sock *sk = sock->sk;
 643         struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
 644         struct sockaddr_nfc_llcp *addr = (struct sockaddr_nfc_llcp *)_addr;
 645         struct nfc_dev *dev;
 646         struct nfc_llcp_local *local;
 647         int ret = 0;
 648
 649         pr_debug("sock %p sk %p flags 0x%x\n", sock, sk, flags);
 650
 651         if (!addr || len < sizeof(struct sockaddr_nfc) ||
 652             addr->sa_family != AF_NFC)
 653                 return -EINVAL;
 654
 655         if (addr->service_name_len == 0 && addr->dsap == 0)
 656                 return -EINVAL;
 657
 658         pr_debug("addr dev_idx=%u target_idx=%u protocol=%u\n", addr->dev_idx,
 659                  addr->target_idx, addr->nfc_protocol);
 660
 661         lock_sock(sk);
 662
 663         if (sk->sk_state == LLCP_CONNECTED) {
 664                 ret = -EISCONN;
 665                 goto error;
 666         }
 667
 668         dev = nfc_get_device(addr->dev_idx);
 669         if (dev == NULL) {
 670                 ret = -ENODEV;
 671                 goto error;
 672         }
 673
 674         local = nfc_llcp_find_local(dev);
 675         if (local == NULL) {
 676                 ret = -ENODEV;
 677                 goto put_dev;
 678         }
 679
 680         device_lock(&dev->dev);
 681         if (dev->dep_link_up == false) {
 682                 ret = -ENOLINK;
 683                 device_unlock(&dev->dev);
 684                 goto put_dev;
 685         }
 686         device_unlock(&dev->dev);
 687
 688         if (local->rf_mode == NFC_RF_INITIATOR &&
 689             addr->target_idx != local->target_idx) {
 690                 ret = -ENOLINK;
 691                 goto put_dev;
 692         }
 693
 694         llcp_sock->dev = dev;
 695         llcp_sock->local = nfc_llcp_local_get(local);
 696         llcp_sock->remote_miu = llcp_sock->local->remote_miu;
 697         llcp_sock->ssap = nfc_llcp_get_local_ssap(local);
 698         if (llcp_sock->ssap == LLCP_SAP_MAX) {
 699                 ret = -ENOMEM;
 700                 goto put_dev;
 701         }
 702
 703         llcp_sock->reserved_ssap = llcp_sock->ssap;
 704
 705         if (addr->service_name_len == 0)
 706                 llcp_sock->dsap = addr->dsap;
 707         else
 708                 llcp_sock->dsap = LLCP_SAP_SDP;
 709         llcp_sock->nfc_protocol = addr->nfc_protocol;
 710         llcp_sock->service_name_len = min_t(unsigned int,
 711                                             addr->service_name_len,
 712                                             NFC_LLCP_MAX_SERVICE_NAME);
 713         llcp_sock->service_name = kmemdup(addr->service_name,
 714                                           llcp_sock->service_name_len,
 715                                           GFP_KERNEL);
 716
 717         nfc_llcp_sock_link(&local->connecting_sockets, sk);
 718
 719         ret = nfc_llcp_send_connect(llcp_sock);
 720         if (ret)
 721                 goto sock_unlink;
 722
 723         ret = sock_wait_state(sk, LLCP_CONNECTED,
 724                               sock_sndtimeo(sk, flags & O_NONBLOCK));
 725         if (ret)
 726                 goto sock_unlink;
 727
 728         release_sock(sk);
 729
 730         return 0;
 731
 732 sock_unlink:
 733         nfc_llcp_put_ssap(local, llcp_sock->ssap);
 734
 735         nfc_llcp_sock_unlink(&local->connecting_sockets, sk);
 736
 737 put_dev:
 738         nfc_put_device(dev);
 739
 740 error:
 741         release_sock(sk);
 742         return ret;
 743 }
 744
 745 static int llcp_sock_sendmsg(struct kiocb *iocb, struct socket *sock,
 746                              struct msghdr *msg, size_t len)
 747 {
 748         struct sock *sk = sock->sk;
 749         struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
 750         int ret;
 751
 752         pr_debug("sock %p sk %p", sock, sk);
 753
 754         ret = sock_error(sk);
 755         if (ret)
 756                 return ret;
 757
 758         if (msg->msg_flags & MSG_OOB)
 759                 return -EOPNOTSUPP;
 760
 761         lock_sock(sk);
 762
 763         if (sk->sk_type == SOCK_DGRAM) {
 764                 struct sockaddr_nfc_llcp *addr =
 765                         (struct sockaddr_nfc_llcp *)msg->msg_name;
 766
 767                 if (msg->msg_namelen < sizeof(*addr)) {
 768                         release_sock(sk);
 769                         return -EINVAL;
 770                 }
 771
 772                 release_sock(sk);
 773
 774                 return nfc_llcp_send_ui_frame(llcp_sock, addr->dsap, addr->ssap,
 775                                               msg, len);
 776         }
 777
 778         if (sk->sk_state != LLCP_CONNECTED) {
 779                 release_sock(sk);
 780                 return -ENOTCONN;
 781         }
 782
 783         release_sock(sk);
 784
 785         return nfc_llcp_send_i_frame(llcp_sock, msg, len);
 786 }
 787
 788 static int llcp_sock_recvmsg(struct kiocb *iocb, struct socket *sock,
 789                              struct msghdr *msg, size_t len, int flags)
 790 {
 791         int noblock = flags & MSG_DONTWAIT;
 792         struct sock *sk = sock->sk;
 793         unsigned int copied, rlen;
 794         struct sk_buff *skb, *cskb;
 795         int err = 0;
 796
 797         pr_debug("%p %zu\n", sk, len);
 798
 799         lock_sock(sk);
 800
 801         if (sk->sk_state == LLCP_CLOSED &&
 802             skb_queue_empty(&sk->sk_receive_queue)) {
 803                 release_sock(sk);
 804                 return 0;
 805         }
 806
 807         release_sock(sk);
 808
 809         if (flags & (MSG_OOB))
 810                 return -EOPNOTSUPP;
 811
 812         skb = skb_recv_datagram(sk, flags, noblock, &err);
 813         if (!skb) {
 814                 pr_err("Recv datagram failed state %d %d %d",
 815                        sk->sk_state, err, sock_error(sk));
 816
 817                 if (sk->sk_shutdown & RCV_SHUTDOWN)
 818                         return 0;
 819
 820                 return err;
 821         }
 822
 823         rlen = skb->len;                /* real length of skb */
 824         copied = min_t(unsigned int, rlen, len);
 825
 826         cskb = skb;
 827         if (skb_copy_datagram_iovec(cskb, 0, msg->msg_iov, copied)) {
 828                 if (!(flags & MSG_PEEK))
 829                         skb_queue_head(&sk->sk_receive_queue, skb);
 830                 return -EFAULT;
 831         }
 832
 833         sock_recv_timestamp(msg, sk, skb);
 834
 835         if (sk->sk_type == SOCK_DGRAM && msg->msg_name) {
 836                 struct nfc_llcp_ui_cb *ui_cb = nfc_llcp_ui_skb_cb(skb);
 837                 struct sockaddr_nfc_llcp *sockaddr =
 838                         (struct sockaddr_nfc_llcp *) msg->msg_name;
 839
 840                 msg->msg_namelen = sizeof(struct sockaddr_nfc_llcp);
 841
 842                 pr_debug("Datagram socket %d %d\n", ui_cb->dsap, ui_cb->ssap);
 843
 844                 sockaddr->sa_family = AF_NFC;
 845                 sockaddr->nfc_protocol = NFC_PROTO_NFC_DEP;
 846                 sockaddr->dsap = ui_cb->dsap;
 847                 sockaddr->ssap = ui_cb->ssap;
 848         }
 849
 850         /* Mark read part of skb as used */
 851         if (!(flags & MSG_PEEK)) {
 852
 853                 /* SOCK_STREAM: re-queue skb if it contains unreceived data */
 854                 if (sk->sk_type == SOCK_STREAM ||
 855                     sk->sk_type == SOCK_DGRAM ||
 856                     sk->sk_type == SOCK_RAW) {
 857                         skb_pull(skb, copied);
 858                         if (skb->len) {
 859                                 skb_queue_head(&sk->sk_receive_queue, skb);
 860                                 goto done;
 861                         }
 862                 }
 863
 864                 kfree_skb(skb);
 865         }
 866
 867         /* XXX Queue backlogged skbs */
 868
 869 done:
 870         /* SOCK_SEQPACKET: return real length if MSG_TRUNC is set */
 871         if (sk->sk_type == SOCK_SEQPACKET && (flags & MSG_TRUNC))
 872                 copied = rlen;
 873
 874         return copied;
 875 }
 876
 877 static const struct proto_ops llcp_sock_ops = {
 878         .family         = PF_NFC,
 879         .owner          = THIS_MODULE,
 880         .bind           = llcp_sock_bind,
 881         .connect        = llcp_sock_connect,
 882         .release        = llcp_sock_release,
 883         .socketpair     = sock_no_socketpair,
 884         .accept         = llcp_sock_accept,
 885         .getname        = llcp_sock_getname,
 886         .poll           = llcp_sock_poll,
 887         .ioctl          = sock_no_ioctl,
 888         .listen         = llcp_sock_listen,
 889         .shutdown       = sock_no_shutdown,
 890         .setsockopt     = nfc_llcp_setsockopt,
 891         .getsockopt     = nfc_llcp_getsockopt,
 892         .sendmsg        = llcp_sock_sendmsg,
 893         .recvmsg        = llcp_sock_recvmsg,
 894         .mmap           = sock_no_mmap,
 895 };
 896
 897 static const struct proto_ops llcp_rawsock_ops = {
 898         .family         = PF_NFC,
 899         .owner          = THIS_MODULE,
 900         .bind           = llcp_raw_sock_bind,
 901         .connect        = sock_no_connect,
 902         .release        = llcp_sock_release,
 903         .socketpair     = sock_no_socketpair,
 904         .accept         = sock_no_accept,
 905         .getname        = llcp_sock_getname,
 906         .poll           = llcp_sock_poll,
 907         .ioctl          = sock_no_ioctl,
 908         .listen         = sock_no_listen,
 909         .shutdown       = sock_no_shutdown,
 910         .setsockopt     = sock_no_setsockopt,
 911         .getsockopt     = sock_no_getsockopt,
 912         .sendmsg        = sock_no_sendmsg,
 913         .recvmsg        = llcp_sock_recvmsg,
 914         .mmap           = sock_no_mmap,
 915 };
 916
 917 static void llcp_sock_destruct(struct sock *sk)
 918 {
 919         struct nfc_llcp_sock *llcp_sock = nfc_llcp_sock(sk);
 920
 921         pr_debug("%p\n", sk);
 922
 923         if (sk->sk_state == LLCP_CONNECTED)
 924                 nfc_put_device(llcp_sock->dev);
 925
 926         skb_queue_purge(&sk->sk_receive_queue);
 927
 928         nfc_llcp_sock_free(llcp_sock);
 929
 930         if (!sock_flag(sk, SOCK_DEAD)) {
 931                 pr_err("Freeing alive NFC LLCP socket %p\n", sk);
 932                 return;
 933         }
 934 }
 935
 936 struct sock *nfc_llcp_sock_alloc(struct socket *sock, int type, gfp_t gfp)
 937 {
 938         struct sock *sk;
 939         struct nfc_llcp_sock *llcp_sock;
 940
 941         sk = sk_alloc(&init_net, PF_NFC, gfp, &llcp_sock_proto);
 942         if (!sk)
 943                 return NULL;
 944
 945         llcp_sock = nfc_llcp_sock(sk);
 946
 947         sock_init_data(sock, sk);
 948         sk->sk_state = LLCP_CLOSED;
 949         sk->sk_protocol = NFC_SOCKPROTO_LLCP;
 950         sk->sk_type = type;
 951         sk->sk_destruct = llcp_sock_destruct;
 952
 953         llcp_sock->ssap = 0;
 954         llcp_sock->dsap = LLCP_SAP_SDP;
 955         llcp_sock->rw = LLCP_MAX_RW + 1;
 956         llcp_sock->miux = cpu_to_be16(LLCP_MAX_MIUX + 1);
 957         llcp_sock->send_n = llcp_sock->send_ack_n = 0;
 958         llcp_sock->recv_n = llcp_sock->recv_ack_n = 0;
 959         llcp_sock->remote_ready = 1;
 960         llcp_sock->reserved_ssap = LLCP_SAP_MAX;
 961         nfc_llcp_socket_remote_param_init(llcp_sock);
 962         skb_queue_head_init(&llcp_sock->tx_queue);
 963         skb_queue_head_init(&llcp_sock->tx_pending_queue);
 964         INIT_LIST_HEAD(&llcp_sock->accept_queue);
 965
 966         if (sock != NULL)
 967                 sock->state = SS_UNCONNECTED;
 968
 969         return sk;
 970 }
 971
 972 void nfc_llcp_sock_free(struct nfc_llcp_sock *sock)
 973 {
 974         kfree(sock->service_name);
 975
 976         skb_queue_purge(&sock->tx_queue);
 977         skb_queue_purge(&sock->tx_pending_queue);
 978
 979         list_del_init(&sock->accept_queue);
 980
 981         sock->parent = NULL;
 982
 983         nfc_llcp_local_put(sock->local);
 984 }
 985
 986 static int llcp_sock_create(struct net *net, struct socket *sock,
 987                             const struct nfc_protocol *nfc_proto)
 988 {
 989         struct sock *sk;
 990
 991         pr_debug("%p\n", sock);
 992
 993         if (sock->type != SOCK_STREAM &&
 994             sock->type != SOCK_DGRAM &&
 995             sock->type != SOCK_RAW)
 996                 return -ESOCKTNOSUPPORT;
 997
 998         if (sock->type == SOCK_RAW)
 999                 sock->ops = &llcp_rawsock_ops;
1000         else
1001                 sock->ops = &llcp_sock_ops;
1002
1003         sk = nfc_llcp_sock_alloc(sock, sock->type, GFP_ATOMIC);
1004         if (sk == NULL)
1005                 return -ENOMEM;
1006
1007         return 0;
1008 }
1009
1010 static const struct nfc_protocol llcp_nfc_proto = {
1011         .id       = NFC_SOCKPROTO_LLCP,
1012         .proto    = &llcp_sock_proto,
1013         .owner    = THIS_MODULE,
1014         .create   = llcp_sock_create
1015 };
1016
1017 int __init nfc_llcp_sock_init(void)
1018 {
1019         return nfc_proto_register(&llcp_nfc_proto);
1020 }
1021
1022 void nfc_llcp_sock_exit(void)
1023 {
1024         nfc_proto_unregister(&llcp_nfc_proto);
1025 }