kernel/net/nfc/llcp_core.c

   1 /*
   2  * Copyright (C) 2011  Intel Corporation. All rights reserved.
   3  * Copyright (C) 2014 Marvell International Ltd.
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License as published by
   7  * the Free Software Foundation; either version 2 of the License, or
   8  * (at your option) any later version.
   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
  16  * along with this program; if not, see <http://www.gnu.org/licenses/>.
  17  */
  18
  19 #define pr_fmt(fmt) "llcp: %s: " fmt, __func__
  20
  21 #include <linux/init.h>
  22 #include <linux/kernel.h>
  23 #include <linux/list.h>
  24 #include <linux/nfc.h>
  25
  26 #include "nfc.h"
  27 #include "llcp.h"
  28
  29 static u8 llcp_magic[3] = {0x46, 0x66, 0x6d};
  30
  31 static LIST_HEAD(llcp_devices);
  32
  33 static void nfc_llcp_rx_skb(struct nfc_llcp_local *local, struct sk_buff *skb);
  34
  35 void nfc_llcp_sock_link(struct llcp_sock_list *l, struct sock *sk)
  36 {
  37         write_lock(&l->lock);
  38         sk_add_node(sk, &l->head);
  39         write_unlock(&l->lock);
  40 }
  41
  42 void nfc_llcp_sock_unlink(struct llcp_sock_list *l, struct sock *sk)
  43 {
  44         write_lock(&l->lock);
  45         sk_del_node_init(sk);
  46         write_unlock(&l->lock);
  47 }
  48
  49 void nfc_llcp_socket_remote_param_init(struct nfc_llcp_sock *sock)
  50 {
  51         sock->remote_rw = LLCP_DEFAULT_RW;
  52         sock->remote_miu = LLCP_MAX_MIU + 1;
  53 }
  54
  55 static void nfc_llcp_socket_purge(struct nfc_llcp_sock *sock)
  56 {
  57         struct nfc_llcp_local *local = sock->local;
  58         struct sk_buff *s, *tmp;
  59
  60         pr_debug("%p\n", &sock->sk);
  61
  62         skb_queue_purge(&sock->tx_queue);
  63         skb_queue_purge(&sock->tx_pending_queue);
  64
  65         if (local == NULL)
  66                 return;
  67
  68         /* Search for local pending SKBs that are related to this socket */
  69         skb_queue_walk_safe(&local->tx_queue, s, tmp) {
  70                 if (s->sk != &sock->sk)
  71                         continue;
  72
  73                 skb_unlink(s, &local->tx_queue);
  74                 kfree_skb(s);
  75         }
  76 }
  77
  78 static void nfc_llcp_socket_release(struct nfc_llcp_local *local, bool device,
  79                                     int err)
  80 {
  81         struct sock *sk;
  82         struct hlist_node *tmp;
  83         struct nfc_llcp_sock *llcp_sock;
  84
  85         skb_queue_purge(&local->tx_queue);
  86
  87         write_lock(&local->sockets.lock);
  88
  89         sk_for_each_safe(sk, tmp, &local->sockets.head) {
  90                 llcp_sock = nfc_llcp_sock(sk);
  91
  92                 bh_lock_sock(sk);
  93
  94                 nfc_llcp_socket_purge(llcp_sock);
  95
  96                 if (sk->sk_state == LLCP_CONNECTED)
  97                         nfc_put_device(llcp_sock->dev);
  98
  99                 if (sk->sk_state == LLCP_LISTEN) {
 100                         struct nfc_llcp_sock *lsk, *n;
 101                         struct sock *accept_sk;
 102
 103                         list_for_each_entry_safe(lsk, n,
 104                                                  &llcp_sock->accept_queue,
 105                                                  accept_queue) {
 106                                 accept_sk = &lsk->sk;
 107                                 bh_lock_sock(accept_sk);
 108
 109                                 nfc_llcp_accept_unlink(accept_sk);
 110
 111                                 if (err)
 112                                         accept_sk->sk_err = err;
 113                                 accept_sk->sk_state = LLCP_CLOSED;
 114                                 accept_sk->sk_state_change(sk);
 115
 116                                 bh_unlock_sock(accept_sk);
 117                         }
 118                 }
 119
 120                 if (err)
 121                         sk->sk_err = err;
 122                 sk->sk_state = LLCP_CLOSED;
 123                 sk->sk_state_change(sk);
 124
 125                 bh_unlock_sock(sk);
 126
 127                 sk_del_node_init(sk);
 128         }
 129
 130         write_unlock(&local->sockets.lock);
 131
 132         /* If we still have a device, we keep the RAW sockets alive */
 133         if (device == true)
 134                 return;
 135
 136         write_lock(&local->raw_sockets.lock);
 137
 138         sk_for_each_safe(sk, tmp, &local->raw_sockets.head) {
 139                 llcp_sock = nfc_llcp_sock(sk);
 140
 141                 bh_lock_sock(sk);
 142
 143                 nfc_llcp_socket_purge(llcp_sock);
 144
 145                 if (err)
 146                         sk->sk_err = err;
 147                 sk->sk_state = LLCP_CLOSED;
 148                 sk->sk_state_change(sk);
 149
 150                 bh_unlock_sock(sk);
 151
 152                 sk_del_node_init(sk);
 153         }
 154
 155         write_unlock(&local->raw_sockets.lock);
 156 }
 157
 158 struct nfc_llcp_local *nfc_llcp_local_get(struct nfc_llcp_local *local)
 159 {
 160         kref_get(&local->ref);
 161
 162         return local;
 163 }
 164
 165 static void local_cleanup(struct nfc_llcp_local *local)
 166 {
 167         nfc_llcp_socket_release(local, false, ENXIO);
 168         del_timer_sync(&local->link_timer);
 169         skb_queue_purge(&local->tx_queue);
 170         cancel_work_sync(&local->tx_work);
 171         cancel_work_sync(&local->rx_work);
 172         cancel_work_sync(&local->timeout_work);
 173         kfree_skb(local->rx_pending);
 174         del_timer_sync(&local->sdreq_timer);
 175         cancel_work_sync(&local->sdreq_timeout_work);
 176         nfc_llcp_free_sdp_tlv_list(&local->pending_sdreqs);
 177 }
 178
 179 static void local_release(struct kref *ref)
 180 {
 181         struct nfc_llcp_local *local;
 182
 183         local = container_of(ref, struct nfc_llcp_local, ref);
 184
 185         list_del(&local->list);
 186         local_cleanup(local);
 187         kfree(local);
 188 }
 189
 190 int nfc_llcp_local_put(struct nfc_llcp_local *local)
 191 {
 192         if (local == NULL)
 193                 return 0;
 194
 195         return kref_put(&local->ref, local_release);
 196 }
 197
 198 static struct nfc_llcp_sock *nfc_llcp_sock_get(struct nfc_llcp_local *local,
 199                                                u8 ssap, u8 dsap)
 200 {
 201         struct sock *sk;
 202         struct nfc_llcp_sock *llcp_sock, *tmp_sock;
 203
 204         pr_debug("ssap dsap %d %d\n", ssap, dsap);
 205
 206         if (ssap == 0 && dsap == 0)
 207                 return NULL;
 208
 209         read_lock(&local->sockets.lock);
 210
 211         llcp_sock = NULL;
 212
 213         sk_for_each(sk, &local->sockets.head) {
 214                 tmp_sock = nfc_llcp_sock(sk);
 215
 216                 if (tmp_sock->ssap == ssap && tmp_sock->dsap == dsap) {
 217                         llcp_sock = tmp_sock;
 218                         break;
 219                 }
 220         }
 221
 222         read_unlock(&local->sockets.lock);
 223
 224         if (llcp_sock == NULL)
 225                 return NULL;
 226
 227         sock_hold(&llcp_sock->sk);
 228
 229         return llcp_sock;
 230 }
 231
 232 static void nfc_llcp_sock_put(struct nfc_llcp_sock *sock)
 233 {
 234         sock_put(&sock->sk);
 235 }
 236
 237 static void nfc_llcp_timeout_work(struct work_struct *work)
 238 {
 239         struct nfc_llcp_local *local = container_of(work, struct nfc_llcp_local,
 240                                                     timeout_work);
 241
 242         nfc_dep_link_down(local->dev);
 243 }
 244
 245 static void nfc_llcp_symm_timer(unsigned long data)
 246 {
 247         struct nfc_llcp_local *local = (struct nfc_llcp_local *) data;
 248
 249         pr_err("SYMM timeout\n");
 250
 251         schedule_work(&local->timeout_work);
 252 }
 253
 254 static void nfc_llcp_sdreq_timeout_work(struct work_struct *work)
 255 {
 256         unsigned long time;
 257         HLIST_HEAD(nl_sdres_list);
 258         struct hlist_node *n;
 259         struct nfc_llcp_sdp_tlv *sdp;
 260         struct nfc_llcp_local *local = container_of(work, struct nfc_llcp_local,
 261                                                     sdreq_timeout_work);
 262
 263         mutex_lock(&local->sdreq_lock);
 264
 265         time = jiffies - msecs_to_jiffies(3 * local->remote_lto);
 266
 267         hlist_for_each_entry_safe(sdp, n, &local->pending_sdreqs, node) {
 268                 if (time_after(sdp->time, time))
 269                         continue;
 270
 271                 sdp->sap = LLCP_SDP_UNBOUND;
 272
 273                 hlist_del(&sdp->node);
 274
 275                 hlist_add_head(&sdp->node, &nl_sdres_list);
 276         }
 277
 278         if (!hlist_empty(&local->pending_sdreqs))
 279                 mod_timer(&local->sdreq_timer,
 280                           jiffies + msecs_to_jiffies(3 * local->remote_lto));
 281
 282         mutex_unlock(&local->sdreq_lock);
 283
 284         if (!hlist_empty(&nl_sdres_list))
 285                 nfc_genl_llc_send_sdres(local->dev, &nl_sdres_list);
 286 }
 287
 288 static void nfc_llcp_sdreq_timer(unsigned long data)
 289 {
 290         struct nfc_llcp_local *local = (struct nfc_llcp_local *) data;
 291
 292         schedule_work(&local->sdreq_timeout_work);
 293 }
 294
 295 struct nfc_llcp_local *nfc_llcp_find_local(struct nfc_dev *dev)
 296 {
 297         struct nfc_llcp_local *local;
 298
 299         list_for_each_entry(local, &llcp_devices, list)
 300                 if (local->dev == dev)
 301                         return local;
 302
 303         pr_debug("No device found\n");
 304
 305         return NULL;
 306 }
 307
 308 static char *wks[] = {
 309         NULL,
 310         NULL, /* SDP */
 311         "urn:nfc:sn:ip",
 312         "urn:nfc:sn:obex",
 313         "urn:nfc:sn:snep",
 314 };
 315
 316 static int nfc_llcp_wks_sap(char *service_name, size_t service_name_len)
 317 {
 318         int sap, num_wks;
 319
 320         pr_debug("%s\n", service_name);
 321
 322         if (service_name == NULL)
 323                 return -EINVAL;
 324
 325         num_wks = ARRAY_SIZE(wks);
 326
 327         for (sap = 0; sap < num_wks; sap++) {
 328                 if (wks[sap] == NULL)
 329                         continue;
 330
 331                 if (strncmp(wks[sap], service_name, service_name_len) == 0)
 332                         return sap;
 333         }
 334
 335         return -EINVAL;
 336 }
 337
 338 static
 339 struct nfc_llcp_sock *nfc_llcp_sock_from_sn(struct nfc_llcp_local *local,
 340                                             u8 *sn, size_t sn_len)
 341 {
 342         struct sock *sk;
 343         struct nfc_llcp_sock *llcp_sock, *tmp_sock;
 344
 345         pr_debug("sn %zd %p\n", sn_len, sn);
 346
 347         if (sn == NULL || sn_len == 0)
 348                 return NULL;
 349
 350         read_lock(&local->sockets.lock);
 351
 352         llcp_sock = NULL;
 353
 354         sk_for_each(sk, &local->sockets.head) {
 355                 tmp_sock = nfc_llcp_sock(sk);
 356
 357                 pr_debug("llcp sock %p\n", tmp_sock);
 358
 359                 if (tmp_sock->sk.sk_type == SOCK_STREAM &&
 360                     tmp_sock->sk.sk_state != LLCP_LISTEN)
 361                         continue;
 362
 363                 if (tmp_sock->sk.sk_type == SOCK_DGRAM &&
 364                     tmp_sock->sk.sk_state != LLCP_BOUND)
 365                         continue;
 366
 367                 if (tmp_sock->service_name == NULL ||
 368                     tmp_sock->service_name_len == 0)
 369                         continue;
 370
 371                 if (tmp_sock->service_name_len != sn_len)
 372                         continue;
 373
 374                 if (memcmp(sn, tmp_sock->service_name, sn_len) == 0) {
 375                         llcp_sock = tmp_sock;
 376                         break;
 377                 }
 378         }
 379
 380         read_unlock(&local->sockets.lock);
 381
 382         pr_debug("Found llcp sock %p\n", llcp_sock);
 383
 384         return llcp_sock;
 385 }
 386
 387 u8 nfc_llcp_get_sdp_ssap(struct nfc_llcp_local *local,
 388                          struct nfc_llcp_sock *sock)
 389 {
 390         mutex_lock(&local->sdp_lock);
 391
 392         if (sock->service_name != NULL && sock->service_name_len > 0) {
 393                 int ssap = nfc_llcp_wks_sap(sock->service_name,
 394                                             sock->service_name_len);
 395
 396                 if (ssap > 0) {
 397                         pr_debug("WKS %d\n", ssap);
 398
 399                         /* This is a WKS, let's check if it's free */
 400                         if (local->local_wks & BIT(ssap)) {
 401                                 mutex_unlock(&local->sdp_lock);
 402
 403                                 return LLCP_SAP_MAX;
 404                         }
 405
 406                         set_bit(ssap, &local->local_wks);
 407                         mutex_unlock(&local->sdp_lock);
 408
 409                         return ssap;
 410                 }
 411
 412                 /*
 413                  * Check if there already is a non WKS socket bound
 414                  * to this service name.
 415                  */
 416                 if (nfc_llcp_sock_from_sn(local, sock->service_name,
 417                                           sock->service_name_len) != NULL) {
 418                         mutex_unlock(&local->sdp_lock);
 419
 420                         return LLCP_SAP_MAX;
 421                 }
 422
 423                 mutex_unlock(&local->sdp_lock);
 424
 425                 return LLCP_SDP_UNBOUND;
 426
 427         } else if (sock->ssap != 0 && sock->ssap < LLCP_WKS_NUM_SAP) {
 428                 if (!test_bit(sock->ssap, &local->local_wks)) {
 429                         set_bit(sock->ssap, &local->local_wks);
 430                         mutex_unlock(&local->sdp_lock);
 431
 432                         return sock->ssap;
 433                 }
 434         }
 435
 436         mutex_unlock(&local->sdp_lock);
 437
 438         return LLCP_SAP_MAX;
 439 }
 440
 441 u8 nfc_llcp_get_local_ssap(struct nfc_llcp_local *local)
 442 {
 443         u8 local_ssap;
 444
 445         mutex_lock(&local->sdp_lock);
 446
 447         local_ssap = find_first_zero_bit(&local->local_sap, LLCP_LOCAL_NUM_SAP);
 448         if (local_ssap == LLCP_LOCAL_NUM_SAP) {
 449                 mutex_unlock(&local->sdp_lock);
 450                 return LLCP_SAP_MAX;
 451         }
 452
 453         set_bit(local_ssap, &local->local_sap);
 454
 455         mutex_unlock(&local->sdp_lock);
 456
 457         return local_ssap + LLCP_LOCAL_SAP_OFFSET;
 458 }
 459
 460 void nfc_llcp_put_ssap(struct nfc_llcp_local *local, u8 ssap)
 461 {
 462         u8 local_ssap;
 463         unsigned long *sdp;
 464
 465         if (ssap < LLCP_WKS_NUM_SAP) {
 466                 local_ssap = ssap;
 467                 sdp = &local->local_wks;
 468         } else if (ssap < LLCP_LOCAL_NUM_SAP) {
 469                 atomic_t *client_cnt;
 470
 471                 local_ssap = ssap - LLCP_WKS_NUM_SAP;
 472                 sdp = &local->local_sdp;
 473                 client_cnt = &local->local_sdp_cnt[local_ssap];
 474
 475                 pr_debug("%d clients\n", atomic_read(client_cnt));
 476
 477                 mutex_lock(&local->sdp_lock);
 478
 479                 if (atomic_dec_and_test(client_cnt)) {
 480                         struct nfc_llcp_sock *l_sock;
 481
 482                         pr_debug("No more clients for SAP %d\n", ssap);
 483
 484                         clear_bit(local_ssap, sdp);
 485
 486                         /* Find the listening sock and set it back to UNBOUND */
 487                         l_sock = nfc_llcp_sock_get(local, ssap, LLCP_SAP_SDP);
 488                         if (l_sock) {
 489                                 l_sock->ssap = LLCP_SDP_UNBOUND;
 490                                 nfc_llcp_sock_put(l_sock);
 491                         }
 492                 }
 493
 494                 mutex_unlock(&local->sdp_lock);
 495
 496                 return;
 497         } else if (ssap < LLCP_MAX_SAP) {
 498                 local_ssap = ssap - LLCP_LOCAL_NUM_SAP;
 499                 sdp = &local->local_sap;
 500         } else {
 501                 return;
 502         }
 503
 504         mutex_lock(&local->sdp_lock);
 505
 506         clear_bit(local_ssap, sdp);
 507
 508         mutex_unlock(&local->sdp_lock);
 509 }
 510
 511 static u8 nfc_llcp_reserve_sdp_ssap(struct nfc_llcp_local *local)
 512 {
 513         u8 ssap;
 514
 515         mutex_lock(&local->sdp_lock);
 516
 517         ssap = find_first_zero_bit(&local->local_sdp, LLCP_SDP_NUM_SAP);
 518         if (ssap == LLCP_SDP_NUM_SAP) {
 519                 mutex_unlock(&local->sdp_lock);
 520
 521                 return LLCP_SAP_MAX;
 522         }
 523
 524         pr_debug("SDP ssap %d\n", LLCP_WKS_NUM_SAP + ssap);
 525
 526         set_bit(ssap, &local->local_sdp);
 527
 528         mutex_unlock(&local->sdp_lock);
 529
 530         return LLCP_WKS_NUM_SAP + ssap;
 531 }
 532
 533 static int nfc_llcp_build_gb(struct nfc_llcp_local *local)
 534 {
 535         u8 *gb_cur, *version_tlv, version, version_length;
 536         u8 *lto_tlv, lto_length;
 537         u8 *wks_tlv, wks_length;
 538         u8 *miux_tlv, miux_length;
 539         __be16 wks = cpu_to_be16(local->local_wks);
 540         u8 gb_len = 0;
 541         int ret = 0;
 542
 543         version = LLCP_VERSION_11;
 544         version_tlv = nfc_llcp_build_tlv(LLCP_TLV_VERSION, &version,
 545                                          1, &version_length);
 546         gb_len += version_length;
 547
 548         lto_tlv = nfc_llcp_build_tlv(LLCP_TLV_LTO, &local->lto, 1, &lto_length);
 549         gb_len += lto_length;
 550
 551         pr_debug("Local wks 0x%lx\n", local->local_wks);
 552         wks_tlv = nfc_llcp_build_tlv(LLCP_TLV_WKS, (u8 *)&wks, 2, &wks_length);
 553         gb_len += wks_length;
 554
 555         miux_tlv = nfc_llcp_build_tlv(LLCP_TLV_MIUX, (u8 *)&local->miux, 0,
 556                                       &miux_length);
 557         gb_len += miux_length;
 558
 559         gb_len += ARRAY_SIZE(llcp_magic);
 560
 561         if (gb_len > NFC_MAX_GT_LEN) {
 562                 ret = -EINVAL;
 563                 goto out;
 564         }
 565
 566         gb_cur = local->gb;
 567
 568         memcpy(gb_cur, llcp_magic, ARRAY_SIZE(llcp_magic));
 569         gb_cur += ARRAY_SIZE(llcp_magic);
 570
 571         memcpy(gb_cur, version_tlv, version_length);
 572         gb_cur += version_length;
 573
 574         memcpy(gb_cur, lto_tlv, lto_length);
 575         gb_cur += lto_length;
 576
 577         memcpy(gb_cur, wks_tlv, wks_length);
 578         gb_cur += wks_length;
 579
 580         memcpy(gb_cur, miux_tlv, miux_length);
 581         gb_cur += miux_length;
 582
 583         local->gb_len = gb_len;
 584
 585 out:
 586         kfree(version_tlv);
 587         kfree(lto_tlv);
 588         kfree(wks_tlv);
 589         kfree(miux_tlv);
 590
 591         return ret;
 592 }
 593
 594 u8 *nfc_llcp_general_bytes(struct nfc_dev *dev, size_t *general_bytes_len)
 595 {
 596         struct nfc_llcp_local *local;
 597
 598         local = nfc_llcp_find_local(dev);
 599         if (local == NULL) {
 600                 *general_bytes_len = 0;
 601                 return NULL;
 602         }
 603
 604         nfc_llcp_build_gb(local);
 605
 606         *general_bytes_len = local->gb_len;
 607
 608         return local->gb;
 609 }
 610
 611 int nfc_llcp_set_remote_gb(struct nfc_dev *dev, u8 *gb, u8 gb_len)
 612 {
 613         struct nfc_llcp_local *local;
 614
 615         if (gb_len < 3 || gb_len > NFC_MAX_GT_LEN)
 616                 return -EINVAL;
 617
 618         local = nfc_llcp_find_local(dev);
 619         if (local == NULL) {
 620                 pr_err("No LLCP device\n");
 621                 return -ENODEV;
 622         }
 623
 624         memset(local->remote_gb, 0, NFC_MAX_GT_LEN);
 625         memcpy(local->remote_gb, gb, gb_len);
 626         local->remote_gb_len = gb_len;
 627
 628         if (memcmp(local->remote_gb, llcp_magic, 3)) {
 629                 pr_err("MAC does not support LLCP\n");
 630                 return -EINVAL;
 631         }
 632
 633         return nfc_llcp_parse_gb_tlv(local,
 634                                      &local->remote_gb[3],
 635                                      local->remote_gb_len - 3);
 636 }
 637
 638 static u8 nfc_llcp_dsap(struct sk_buff *pdu)
 639 {
 640         return (pdu->data[0] & 0xfc) >> 2;
 641 }
 642
 643 static u8 nfc_llcp_ptype(struct sk_buff *pdu)
 644 {
 645         return ((pdu->data[0] & 0x03) << 2) | ((pdu->data[1] & 0xc0) >> 6);
 646 }
 647
 648 static u8 nfc_llcp_ssap(struct sk_buff *pdu)
 649 {
 650         return pdu->data[1] & 0x3f;
 651 }
 652
 653 static u8 nfc_llcp_ns(struct sk_buff *pdu)
 654 {
 655         return pdu->data[2] >> 4;
 656 }
 657
 658 static u8 nfc_llcp_nr(struct sk_buff *pdu)
 659 {
 660         return pdu->data[2] & 0xf;
 661 }
 662
 663 static void nfc_llcp_set_nrns(struct nfc_llcp_sock *sock, struct sk_buff *pdu)
 664 {
 665         pdu->data[2] = (sock->send_n << 4) | (sock->recv_n);
 666         sock->send_n = (sock->send_n + 1) % 16;
 667         sock->recv_ack_n = (sock->recv_n - 1) % 16;
 668 }
 669
 670 void nfc_llcp_send_to_raw_sock(struct nfc_llcp_local *local,
 671                                struct sk_buff *skb, u8 direction)
 672 {
 673         struct sk_buff *skb_copy = NULL, *nskb;
 674         struct sock *sk;
 675         u8 *data;
 676
 677         read_lock(&local->raw_sockets.lock);
 678
 679         sk_for_each(sk, &local->raw_sockets.head) {
 680                 if (sk->sk_state != LLCP_BOUND)
 681                         continue;
 682
 683                 if (skb_copy == NULL) {
 684                         skb_copy = __pskb_copy_fclone(skb, NFC_RAW_HEADER_SIZE,
 685                                                       GFP_ATOMIC, true);
 686
 687                         if (skb_copy == NULL)
 688                                 continue;
 689
 690                         data = skb_push(skb_copy, NFC_RAW_HEADER_SIZE);
 691
 692                         data[0] = local->dev ? local->dev->idx : 0xFF;
 693                         data[1] = direction & 0x01;
 694                         data[1] |= (RAW_PAYLOAD_LLCP << 1);
 695                 }
 696
 697                 nskb = skb_clone(skb_copy, GFP_ATOMIC);
 698                 if (!nskb)
 699                         continue;
 700
 701                 if (sock_queue_rcv_skb(sk, nskb))
 702                         kfree_skb(nskb);
 703         }
 704
 705         read_unlock(&local->raw_sockets.lock);
 706
 707         kfree_skb(skb_copy);
 708 }
 709
 710 static void nfc_llcp_tx_work(struct work_struct *work)
 711 {
 712         struct nfc_llcp_local *local = container_of(work, struct nfc_llcp_local,
 713                                                     tx_work);
 714         struct sk_buff *skb;
 715         struct sock *sk;
 716         struct nfc_llcp_sock *llcp_sock;
 717
 718         skb = skb_dequeue(&local->tx_queue);
 719         if (skb != NULL) {
 720                 sk = skb->sk;
 721                 llcp_sock = nfc_llcp_sock(sk);
 722
 723                 if (llcp_sock == NULL && nfc_llcp_ptype(skb) == LLCP_PDU_I) {
 724                         kfree_skb(skb);
 725                         nfc_llcp_send_symm(local->dev);
 726                 } else if (llcp_sock && !llcp_sock->remote_ready) {
 727                         skb_queue_head(&local->tx_queue, skb);
 728                         nfc_llcp_send_symm(local->dev);
 729                 } else {
 730                         struct sk_buff *copy_skb = NULL;
 731                         u8 ptype = nfc_llcp_ptype(skb);
 732                         int ret;
 733
 734                         pr_debug("Sending pending skb\n");
 735                         print_hex_dump(KERN_DEBUG, "LLCP Tx: ",
 736                                        DUMP_PREFIX_OFFSET, 16, 1,
 737                                        skb->data, skb->len, true);
 738
 739                         if (ptype == LLCP_PDU_DISC && sk != NULL &&
 740                             sk->sk_state == LLCP_DISCONNECTING) {
 741                                 nfc_llcp_sock_unlink(&local->sockets, sk);
 742                                 sock_orphan(sk);
 743                                 sock_put(sk);
 744                         }
 745
 746                         if (ptype == LLCP_PDU_I)
 747                                 copy_skb = skb_copy(skb, GFP_ATOMIC);
 748
 749                         __net_timestamp(skb);
 750
 751                         nfc_llcp_send_to_raw_sock(local, skb,
 752                                                   NFC_DIRECTION_TX);
 753
 754                         ret = nfc_data_exchange(local->dev, local->target_idx,
 755                                                 skb, nfc_llcp_recv, local);
 756
 757                         if (ret) {
 758                                 kfree_skb(copy_skb);
 759                                 goto out;
 760                         }
 761
 762                         if (ptype == LLCP_PDU_I && copy_skb)
 763                                 skb_queue_tail(&llcp_sock->tx_pending_queue,
 764                                                copy_skb);
 765                 }
 766         } else {
 767                 nfc_llcp_send_symm(local->dev);
 768         }
 769
 770 out:
 771         mod_timer(&local->link_timer,
 772                   jiffies + msecs_to_jiffies(2 * local->remote_lto));
 773 }
 774
 775 static struct nfc_llcp_sock *nfc_llcp_connecting_sock_get(struct nfc_llcp_local *local,
 776                                                           u8 ssap)
 777 {
 778         struct sock *sk;
 779         struct nfc_llcp_sock *llcp_sock;
 780
 781         read_lock(&local->connecting_sockets.lock);
 782
 783         sk_for_each(sk, &local->connecting_sockets.head) {
 784                 llcp_sock = nfc_llcp_sock(sk);
 785
 786                 if (llcp_sock->ssap == ssap) {
 787                         sock_hold(&llcp_sock->sk);
 788                         goto out;
 789                 }
 790         }
 791
 792         llcp_sock = NULL;
 793
 794 out:
 795         read_unlock(&local->connecting_sockets.lock);
 796
 797         return llcp_sock;
 798 }
 799
 800 static struct nfc_llcp_sock *nfc_llcp_sock_get_sn(struct nfc_llcp_local *local,
 801                                                   u8 *sn, size_t sn_len)
 802 {
 803         struct nfc_llcp_sock *llcp_sock;
 804
 805         llcp_sock = nfc_llcp_sock_from_sn(local, sn, sn_len);
 806
 807         if (llcp_sock == NULL)
 808                 return NULL;
 809
 810         sock_hold(&llcp_sock->sk);
 811
 812         return llcp_sock;
 813 }
 814
 815 static u8 *nfc_llcp_connect_sn(struct sk_buff *skb, size_t *sn_len)
 816 {
 817         u8 *tlv = &skb->data[2], type, length;
 818         size_t tlv_array_len = skb->len - LLCP_HEADER_SIZE, offset = 0;
 819
 820         while (offset < tlv_array_len) {
 821                 type = tlv[0];
 822                 length = tlv[1];
 823
 824                 pr_debug("type 0x%x length %d\n", type, length);
 825
 826                 if (type == LLCP_TLV_SN) {
 827                         *sn_len = length;
 828                         return &tlv[2];
 829                 }
 830
 831                 offset += length + 2;
 832                 tlv += length + 2;
 833         }
 834
 835         return NULL;
 836 }
 837
 838 static void nfc_llcp_recv_ui(struct nfc_llcp_local *local,
 839                              struct sk_buff *skb)
 840 {
 841         struct nfc_llcp_sock *llcp_sock;
 842         struct nfc_llcp_ui_cb *ui_cb;
 843         u8 dsap, ssap;
 844
 845         dsap = nfc_llcp_dsap(skb);
 846         ssap = nfc_llcp_ssap(skb);
 847
 848         ui_cb = nfc_llcp_ui_skb_cb(skb);
 849         ui_cb->dsap = dsap;
 850         ui_cb->ssap = ssap;
 851
 852         pr_debug("%d %d\n", dsap, ssap);
 853
 854         /* We're looking for a bound socket, not a client one */
 855         llcp_sock = nfc_llcp_sock_get(local, dsap, LLCP_SAP_SDP);
 856         if (llcp_sock == NULL || llcp_sock->sk.sk_type != SOCK_DGRAM)
 857                 return;
 858
 859         /* There is no sequence with UI frames */
 860         skb_pull(skb, LLCP_HEADER_SIZE);
 861         if (!sock_queue_rcv_skb(&llcp_sock->sk, skb)) {
 862                 /*
 863                  * UI frames will be freed from the socket layer, so we
 864                  * need to keep them alive until someone receives them.
 865                  */
 866                 skb_get(skb);
 867         } else {
 868                 pr_err("Receive queue is full\n");
 869         }
 870
 871         nfc_llcp_sock_put(llcp_sock);
 872 }
 873
 874 static void nfc_llcp_recv_connect(struct nfc_llcp_local *local,
 875                                   struct sk_buff *skb)
 876 {
 877         struct sock *new_sk, *parent;
 878         struct nfc_llcp_sock *sock, *new_sock;
 879         u8 dsap, ssap, reason;
 880
 881         dsap = nfc_llcp_dsap(skb);
 882         ssap = nfc_llcp_ssap(skb);
 883
 884         pr_debug("%d %d\n", dsap, ssap);
 885
 886         if (dsap != LLCP_SAP_SDP) {
 887                 sock = nfc_llcp_sock_get(local, dsap, LLCP_SAP_SDP);
 888                 if (sock == NULL || sock->sk.sk_state != LLCP_LISTEN) {
 889                         reason = LLCP_DM_NOBOUND;
 890                         goto fail;
 891                 }
 892         } else {
 893                 u8 *sn;
 894                 size_t sn_len;
 895
 896                 sn = nfc_llcp_connect_sn(skb, &sn_len);
 897                 if (sn == NULL) {
 898                         reason = LLCP_DM_NOBOUND;
 899                         goto fail;
 900                 }
 901
 902                 pr_debug("Service name length %zu\n", sn_len);
 903
 904                 sock = nfc_llcp_sock_get_sn(local, sn, sn_len);
 905                 if (sock == NULL) {
 906                         reason = LLCP_DM_NOBOUND;
 907                         goto fail;
 908                 }
 909         }
 910
 911         lock_sock(&sock->sk);
 912
 913         parent = &sock->sk;
 914
 915         if (sk_acceptq_is_full(parent)) {
 916                 reason = LLCP_DM_REJ;
 917                 release_sock(&sock->sk);
 918                 sock_put(&sock->sk);
 919                 goto fail;
 920         }
 921
 922         if (sock->ssap == LLCP_SDP_UNBOUND) {
 923                 u8 ssap = nfc_llcp_reserve_sdp_ssap(local);
 924
 925                 pr_debug("First client, reserving %d\n", ssap);
 926
 927                 if (ssap == LLCP_SAP_MAX) {
 928                         reason = LLCP_DM_REJ;
 929                         release_sock(&sock->sk);
 930                         sock_put(&sock->sk);
 931                         goto fail;
 932                 }
 933
 934                 sock->ssap = ssap;
 935         }
 936
 937         new_sk = nfc_llcp_sock_alloc(NULL, parent->sk_type, GFP_ATOMIC);
 938         if (new_sk == NULL) {
 939                 reason = LLCP_DM_REJ;
 940                 release_sock(&sock->sk);
 941                 sock_put(&sock->sk);
 942                 goto fail;
 943         }
 944
 945         new_sock = nfc_llcp_sock(new_sk);
 946         new_sock->dev = local->dev;
 947         new_sock->local = nfc_llcp_local_get(local);
 948         new_sock->rw = sock->rw;
 949         new_sock->miux = sock->miux;
 950         new_sock->nfc_protocol = sock->nfc_protocol;
 951         new_sock->dsap = ssap;
 952         new_sock->target_idx = local->target_idx;
 953         new_sock->parent = parent;
 954         new_sock->ssap = sock->ssap;
 955         if (sock->ssap < LLCP_LOCAL_NUM_SAP && sock->ssap >= LLCP_WKS_NUM_SAP) {
 956                 atomic_t *client_count;
 957
 958                 pr_debug("reserved_ssap %d for %p\n", sock->ssap, new_sock);
 959
 960                 client_count =
 961                         &local->local_sdp_cnt[sock->ssap - LLCP_WKS_NUM_SAP];
 962
 963                 atomic_inc(client_count);
 964                 new_sock->reserved_ssap = sock->ssap;
 965         }
 966
 967         nfc_llcp_parse_connection_tlv(new_sock, &skb->data[LLCP_HEADER_SIZE],
 968                                       skb->len - LLCP_HEADER_SIZE);
 969
 970         pr_debug("new sock %p sk %p\n", new_sock, &new_sock->sk);
 971
 972         nfc_llcp_sock_link(&local->sockets, new_sk);
 973
 974         nfc_llcp_accept_enqueue(&sock->sk, new_sk);
 975
 976         nfc_get_device(local->dev->idx);
 977
 978         new_sk->sk_state = LLCP_CONNECTED;
 979
 980         /* Wake the listening processes */
 981         parent->sk_data_ready(parent);
 982
 983         /* Send CC */
 984         nfc_llcp_send_cc(new_sock);
 985
 986         release_sock(&sock->sk);
 987         sock_put(&sock->sk);
 988
 989         return;
 990
 991 fail:
 992         /* Send DM */
 993         nfc_llcp_send_dm(local, dsap, ssap, reason);
 994 }
 995
 996 int nfc_llcp_queue_i_frames(struct nfc_llcp_sock *sock)
 997 {
 998         int nr_frames = 0;
 999         struct nfc_llcp_local *local = sock->local;
1000
1001         pr_debug("Remote ready %d tx queue len %d remote rw %d",
1002                  sock->remote_ready, skb_queue_len(&sock->tx_pending_queue),
1003                  sock->remote_rw);
1004
1005         /* Try to queue some I frames for transmission */
1006         while (sock->remote_ready &&
1007                skb_queue_len(&sock->tx_pending_queue) < sock->remote_rw) {
1008                 struct sk_buff *pdu;
1009
1010                 pdu = skb_dequeue(&sock->tx_queue);
1011                 if (pdu == NULL)
1012                         break;
1013
1014                 /* Update N(S)/N(R) */
1015                 nfc_llcp_set_nrns(sock, pdu);
1016
1017                 skb_queue_tail(&local->tx_queue, pdu);
1018                 nr_frames++;
1019         }
1020
1021         return nr_frames;
1022 }
1023
1024 static void nfc_llcp_recv_hdlc(struct nfc_llcp_local *local,
1025                                struct sk_buff *skb)
1026 {
1027         struct nfc_llcp_sock *llcp_sock;
1028         struct sock *sk;
1029         u8 dsap, ssap, ptype, ns, nr;
1030
1031         ptype = nfc_llcp_ptype(skb);
1032         dsap = nfc_llcp_dsap(skb);
1033         ssap = nfc_llcp_ssap(skb);
1034         ns = nfc_llcp_ns(skb);
1035         nr = nfc_llcp_nr(skb);
1036
1037         pr_debug("%d %d R %d S %d\n", dsap, ssap, nr, ns);
1038
1039         llcp_sock = nfc_llcp_sock_get(local, dsap, ssap);
1040         if (llcp_sock == NULL) {
1041                 nfc_llcp_send_dm(local, dsap, ssap, LLCP_DM_NOCONN);
1042                 return;
1043         }
1044
1045         sk = &llcp_sock->sk;
1046         lock_sock(sk);
1047         if (sk->sk_state == LLCP_CLOSED) {
1048                 release_sock(sk);
1049                 nfc_llcp_sock_put(llcp_sock);
1050         }
1051
1052         /* Pass the payload upstream */
1053         if (ptype == LLCP_PDU_I) {
1054                 pr_debug("I frame, queueing on %p\n", &llcp_sock->sk);
1055
1056                 if (ns == llcp_sock->recv_n)
1057                         llcp_sock->recv_n = (llcp_sock->recv_n + 1) % 16;
1058                 else
1059                         pr_err("Received out of sequence I PDU\n");
1060
1061                 skb_pull(skb, LLCP_HEADER_SIZE + LLCP_SEQUENCE_SIZE);
1062                 if (!sock_queue_rcv_skb(&llcp_sock->sk, skb)) {
1063                         /*
1064                          * I frames will be freed from the socket layer, so we
1065                          * need to keep them alive until someone receives them.
1066                          */
1067                         skb_get(skb);
1068                 } else {
1069                         pr_err("Receive queue is full\n");
1070                 }
1071         }
1072
1073         /* Remove skbs from the pending queue */
1074         if (llcp_sock->send_ack_n != nr) {
1075                 struct sk_buff *s, *tmp;
1076                 u8 n;
1077
1078                 llcp_sock->send_ack_n = nr;
1079
1080                 /* Remove and free all skbs until ns == nr */
1081                 skb_queue_walk_safe(&llcp_sock->tx_pending_queue, s, tmp) {
1082                         n = nfc_llcp_ns(s);
1083
1084                         skb_unlink(s, &llcp_sock->tx_pending_queue);
1085                         kfree_skb(s);
1086
1087                         if (n == nr)
1088                                 break;
1089                 }
1090
1091                 /* Re-queue the remaining skbs for transmission */
1092                 skb_queue_reverse_walk_safe(&llcp_sock->tx_pending_queue,
1093                                             s, tmp) {
1094                         skb_unlink(s, &llcp_sock->tx_pending_queue);
1095                         skb_queue_head(&local->tx_queue, s);
1096                 }
1097         }
1098
1099         if (ptype == LLCP_PDU_RR)
1100                 llcp_sock->remote_ready = true;
1101         else if (ptype == LLCP_PDU_RNR)
1102                 llcp_sock->remote_ready = false;
1103
1104         if (nfc_llcp_queue_i_frames(llcp_sock) == 0 && ptype == LLCP_PDU_I)
1105                 nfc_llcp_send_rr(llcp_sock);
1106
1107         release_sock(sk);
1108         nfc_llcp_sock_put(llcp_sock);
1109 }
1110
1111 static void nfc_llcp_recv_disc(struct nfc_llcp_local *local,
1112                                struct sk_buff *skb)
1113 {
1114         struct nfc_llcp_sock *llcp_sock;
1115         struct sock *sk;
1116         u8 dsap, ssap;
1117
1118         dsap = nfc_llcp_dsap(skb);
1119         ssap = nfc_llcp_ssap(skb);
1120
1121         if ((dsap == 0) && (ssap == 0)) {
1122                 pr_debug("Connection termination");
1123                 nfc_dep_link_down(local->dev);
1124                 return;
1125         }
1126
1127         llcp_sock = nfc_llcp_sock_get(local, dsap, ssap);
1128         if (llcp_sock == NULL) {
1129                 nfc_llcp_send_dm(local, dsap, ssap, LLCP_DM_NOCONN);
1130                 return;
1131         }
1132
1133         sk = &llcp_sock->sk;
1134         lock_sock(sk);
1135
1136         nfc_llcp_socket_purge(llcp_sock);
1137
1138         if (sk->sk_state == LLCP_CLOSED) {
1139                 release_sock(sk);
1140                 nfc_llcp_sock_put(llcp_sock);
1141         }
1142
1143         if (sk->sk_state == LLCP_CONNECTED) {
1144                 nfc_put_device(local->dev);
1145                 sk->sk_state = LLCP_CLOSED;
1146                 sk->sk_state_change(sk);
1147         }
1148
1149         nfc_llcp_send_dm(local, dsap, ssap, LLCP_DM_DISC);
1150
1151         release_sock(sk);
1152         nfc_llcp_sock_put(llcp_sock);
1153 }
1154
1155 static void nfc_llcp_recv_cc(struct nfc_llcp_local *local, struct sk_buff *skb)
1156 {
1157         struct nfc_llcp_sock *llcp_sock;
1158         struct sock *sk;
1159         u8 dsap, ssap;
1160
1161         dsap = nfc_llcp_dsap(skb);
1162         ssap = nfc_llcp_ssap(skb);
1163
1164         llcp_sock = nfc_llcp_connecting_sock_get(local, dsap);
1165         if (llcp_sock == NULL) {
1166                 pr_err("Invalid CC\n");
1167                 nfc_llcp_send_dm(local, dsap, ssap, LLCP_DM_NOCONN);
1168
1169                 return;
1170         }
1171
1172         sk = &llcp_sock->sk;
1173
1174         /* Unlink from connecting and link to the client array */
1175         nfc_llcp_sock_unlink(&local->connecting_sockets, sk);
1176         nfc_llcp_sock_link(&local->sockets, sk);
1177         llcp_sock->dsap = ssap;
1178
1179         nfc_llcp_parse_connection_tlv(llcp_sock, &skb->data[LLCP_HEADER_SIZE],
1180                                       skb->len - LLCP_HEADER_SIZE);
1181
1182         sk->sk_state = LLCP_CONNECTED;
1183         sk->sk_state_change(sk);
1184
1185         nfc_llcp_sock_put(llcp_sock);
1186 }
1187
1188 static void nfc_llcp_recv_dm(struct nfc_llcp_local *local, struct sk_buff *skb)
1189 {
1190         struct nfc_llcp_sock *llcp_sock;
1191         struct sock *sk;
1192         u8 dsap, ssap, reason;
1193
1194         dsap = nfc_llcp_dsap(skb);
1195         ssap = nfc_llcp_ssap(skb);
1196         reason = skb->data[2];
1197
1198         pr_debug("%d %d reason %d\n", ssap, dsap, reason);
1199
1200         switch (reason) {
1201         case LLCP_DM_NOBOUND:
1202         case LLCP_DM_REJ:
1203                 llcp_sock = nfc_llcp_connecting_sock_get(local, dsap);
1204                 break;
1205
1206         default:
1207                 llcp_sock = nfc_llcp_sock_get(local, dsap, ssap);
1208                 break;
1209         }
1210
1211         if (llcp_sock == NULL) {
1212                 pr_debug("Already closed\n");
1213                 return;
1214         }
1215
1216         sk = &llcp_sock->sk;
1217
1218         sk->sk_err = ENXIO;
1219         sk->sk_state = LLCP_CLOSED;
1220         sk->sk_state_change(sk);
1221
1222         nfc_llcp_sock_put(llcp_sock);
1223 }
1224
1225 static void nfc_llcp_recv_snl(struct nfc_llcp_local *local,
1226                               struct sk_buff *skb)
1227 {
1228         struct nfc_llcp_sock *llcp_sock;
1229         u8 dsap, ssap, *tlv, type, length, tid, sap;
1230         u16 tlv_len, offset;
1231         char *service_name;
1232         size_t service_name_len;
1233         struct nfc_llcp_sdp_tlv *sdp;
1234         HLIST_HEAD(llc_sdres_list);
1235         size_t sdres_tlvs_len;
1236         HLIST_HEAD(nl_sdres_list);
1237
1238         dsap = nfc_llcp_dsap(skb);
1239         ssap = nfc_llcp_ssap(skb);
1240
1241         pr_debug("%d %d\n", dsap, ssap);
1242
1243         if (dsap != LLCP_SAP_SDP || ssap != LLCP_SAP_SDP) {
1244                 pr_err("Wrong SNL SAP\n");
1245                 return;
1246         }
1247
1248         tlv = &skb->data[LLCP_HEADER_SIZE];
1249         tlv_len = skb->len - LLCP_HEADER_SIZE;
1250         offset = 0;
1251         sdres_tlvs_len = 0;
1252
1253         while (offset < tlv_len) {
1254                 type = tlv[0];
1255                 length = tlv[1];
1256
1257                 switch (type) {
1258                 case LLCP_TLV_SDREQ:
1259                         tid = tlv[2];
1260                         service_name = (char *) &tlv[3];
1261                         service_name_len = length - 1;
1262
1263                         pr_debug("Looking for %.16s\n", service_name);
1264
1265                         if (service_name_len == strlen("urn:nfc:sn:sdp") &&
1266                             !strncmp(service_name, "urn:nfc:sn:sdp",
1267                                      service_name_len)) {
1268                                 sap = 1;
1269                                 goto add_snl;
1270                         }
1271
1272                         llcp_sock = nfc_llcp_sock_from_sn(local, service_name,
1273                                                           service_name_len);
1274                         if (!llcp_sock) {
1275                                 sap = 0;
1276                                 goto add_snl;
1277                         }
1278
1279                         /*
1280                          * We found a socket but its ssap has not been reserved
1281                          * yet. We need to assign it for good and send a reply.
1282                          * The ssap will be freed when the socket is closed.
1283                          */
1284                         if (llcp_sock->ssap == LLCP_SDP_UNBOUND) {
1285                                 atomic_t *client_count;
1286
1287                                 sap = nfc_llcp_reserve_sdp_ssap(local);
1288
1289                                 pr_debug("Reserving %d\n", sap);
1290
1291                                 if (sap == LLCP_SAP_MAX) {
1292                                         sap = 0;
1293                                         goto add_snl;
1294                                 }
1295
1296                                 client_count =
1297                                         &local->local_sdp_cnt[sap -
1298                                                               LLCP_WKS_NUM_SAP];
1299
1300                                 atomic_inc(client_count);
1301
1302                                 llcp_sock->ssap = sap;
1303                                 llcp_sock->reserved_ssap = sap;
1304                         } else {
1305                                 sap = llcp_sock->ssap;
1306                         }
1307
1308                         pr_debug("%p %d\n", llcp_sock, sap);
1309
1310 add_snl:
1311                         sdp = nfc_llcp_build_sdres_tlv(tid, sap);
1312                         if (sdp == NULL)
1313                                 goto exit;
1314
1315                         sdres_tlvs_len += sdp->tlv_len;
1316                         hlist_add_head(&sdp->node, &llc_sdres_list);
1317                         break;
1318
1319                 case LLCP_TLV_SDRES:
1320                         mutex_lock(&local->sdreq_lock);
1321
1322                         pr_debug("LLCP_TLV_SDRES: searching tid %d\n", tlv[2]);
1323
1324                         hlist_for_each_entry(sdp, &local->pending_sdreqs, node) {
1325                                 if (sdp->tid != tlv[2])
1326                                         continue;
1327
1328                                 sdp->sap = tlv[3];
1329
1330                                 pr_debug("Found: uri=%s, sap=%d\n",
1331                                          sdp->uri, sdp->sap);
1332
1333                                 hlist_del(&sdp->node);
1334
1335                                 hlist_add_head(&sdp->node, &nl_sdres_list);
1336
1337                                 break;
1338                         }
1339
1340                         mutex_unlock(&local->sdreq_lock);
1341                         break;
1342
1343                 default:
1344                         pr_err("Invalid SNL tlv value 0x%x\n", type);
1345                         break;
1346                 }
1347
1348                 offset += length + 2;
1349                 tlv += length + 2;
1350         }
1351
1352 exit:
1353         if (!hlist_empty(&nl_sdres_list))
1354                 nfc_genl_llc_send_sdres(local->dev, &nl_sdres_list);
1355
1356         if (!hlist_empty(&llc_sdres_list))
1357                 nfc_llcp_send_snl_sdres(local, &llc_sdres_list, sdres_tlvs_len);
1358 }
1359
1360 static void nfc_llcp_recv_agf(struct nfc_llcp_local *local, struct sk_buff *skb)
1361 {
1362         u8 ptype;
1363         u16 pdu_len;
1364         struct sk_buff *new_skb;
1365
1366         if (skb->len <= LLCP_HEADER_SIZE) {
1367                 pr_err("Malformed AGF PDU\n");
1368                 return;
1369         }
1370
1371         skb_pull(skb, LLCP_HEADER_SIZE);
1372
1373         while (skb->len > LLCP_AGF_PDU_HEADER_SIZE) {
1374                 pdu_len = skb->data[0] << 8 | skb->data[1];
1375
1376                 skb_pull(skb, LLCP_AGF_PDU_HEADER_SIZE);
1377
1378                 if (pdu_len < LLCP_HEADER_SIZE || pdu_len > skb->len) {
1379                         pr_err("Malformed AGF PDU\n");
1380                         return;
1381                 }
1382
1383                 ptype = nfc_llcp_ptype(skb);
1384
1385                 if (ptype == LLCP_PDU_SYMM || ptype == LLCP_PDU_AGF)
1386                         goto next;
1387
1388                 new_skb = nfc_alloc_recv_skb(pdu_len, GFP_KERNEL);
1389                 if (new_skb == NULL) {
1390                         pr_err("Could not allocate PDU\n");
1391                         return;
1392                 }
1393
1394                 memcpy(skb_put(new_skb, pdu_len), skb->data, pdu_len);
1395
1396                 nfc_llcp_rx_skb(local, new_skb);
1397
1398                 kfree_skb(new_skb);
1399 next:
1400                 skb_pull(skb, pdu_len);
1401         }
1402 }
1403
1404 static void nfc_llcp_rx_skb(struct nfc_llcp_local *local, struct sk_buff *skb)
1405 {
1406         u8 dsap, ssap, ptype;
1407
1408         ptype = nfc_llcp_ptype(skb);
1409         dsap = nfc_llcp_dsap(skb);
1410         ssap = nfc_llcp_ssap(skb);
1411
1412         pr_debug("ptype 0x%x dsap 0x%x ssap 0x%x\n", ptype, dsap, ssap);
1413
1414         if (ptype != LLCP_PDU_SYMM)
1415                 print_hex_dump(KERN_DEBUG, "LLCP Rx: ", DUMP_PREFIX_OFFSET,
1416                                16, 1, skb->data, skb->len, true);
1417
1418         switch (ptype) {
1419         case LLCP_PDU_SYMM:
1420                 pr_debug("SYMM\n");
1421                 break;
1422
1423         case LLCP_PDU_UI:
1424                 pr_debug("UI\n");
1425                 nfc_llcp_recv_ui(local, skb);
1426                 break;
1427
1428         case LLCP_PDU_CONNECT:
1429                 pr_debug("CONNECT\n");
1430                 nfc_llcp_recv_connect(local, skb);
1431                 break;
1432
1433         case LLCP_PDU_DISC:
1434                 pr_debug("DISC\n");
1435                 nfc_llcp_recv_disc(local, skb);
1436                 break;
1437
1438         case LLCP_PDU_CC:
1439                 pr_debug("CC\n");
1440                 nfc_llcp_recv_cc(local, skb);
1441                 break;
1442
1443         case LLCP_PDU_DM:
1444                 pr_debug("DM\n");
1445                 nfc_llcp_recv_dm(local, skb);
1446                 break;
1447
1448         case LLCP_PDU_SNL:
1449                 pr_debug("SNL\n");
1450                 nfc_llcp_recv_snl(local, skb);
1451                 break;
1452
1453         case LLCP_PDU_I:
1454         case LLCP_PDU_RR:
1455         case LLCP_PDU_RNR:
1456                 pr_debug("I frame\n");
1457                 nfc_llcp_recv_hdlc(local, skb);
1458                 break;
1459
1460         case LLCP_PDU_AGF:
1461                 pr_debug("AGF frame\n");
1462                 nfc_llcp_recv_agf(local, skb);
1463                 break;
1464         }
1465 }
1466
1467 static void nfc_llcp_rx_work(struct work_struct *work)
1468 {
1469         struct nfc_llcp_local *local = container_of(work, struct nfc_llcp_local,
1470                                                     rx_work);
1471         struct sk_buff *skb;
1472
1473         skb = local->rx_pending;
1474         if (skb == NULL) {
1475                 pr_debug("No pending SKB\n");
1476                 return;
1477         }
1478
1479         __net_timestamp(skb);
1480
1481         nfc_llcp_send_to_raw_sock(local, skb, NFC_DIRECTION_RX);
1482
1483         nfc_llcp_rx_skb(local, skb);
1484
1485         schedule_work(&local->tx_work);
1486         kfree_skb(local->rx_pending);
1487         local->rx_pending = NULL;
1488 }
1489
1490 static void __nfc_llcp_recv(struct nfc_llcp_local *local, struct sk_buff *skb)
1491 {
1492         local->rx_pending = skb;
1493         del_timer(&local->link_timer);
1494         schedule_work(&local->rx_work);
1495 }
1496
1497 void nfc_llcp_recv(void *data, struct sk_buff *skb, int err)
1498 {
1499         struct nfc_llcp_local *local = (struct nfc_llcp_local *) data;
1500
1501         pr_debug("Received an LLCP PDU\n");
1502         if (err < 0) {
1503                 pr_err("err %d\n", err);
1504                 return;
1505         }
1506
1507         __nfc_llcp_recv(local, skb);
1508 }
1509
1510 int nfc_llcp_data_received(struct nfc_dev *dev, struct sk_buff *skb)
1511 {
1512         struct nfc_llcp_local *local;
1513
1514         local = nfc_llcp_find_local(dev);
1515         if (local == NULL) {
1516                 kfree_skb(skb);
1517                 return -ENODEV;
1518         }
1519
1520         __nfc_llcp_recv(local, skb);
1521
1522         return 0;
1523 }
1524
1525 void nfc_llcp_mac_is_down(struct nfc_dev *dev)
1526 {
1527         struct nfc_llcp_local *local;
1528
1529         local = nfc_llcp_find_local(dev);
1530         if (local == NULL)
1531                 return;
1532
1533         local->remote_miu = LLCP_DEFAULT_MIU;
1534         local->remote_lto = LLCP_DEFAULT_LTO;
1535
1536         /* Close and purge all existing sockets */
1537         nfc_llcp_socket_release(local, true, 0);
1538 }
1539
1540 void nfc_llcp_mac_is_up(struct nfc_dev *dev, u32 target_idx,
1541                         u8 comm_mode, u8 rf_mode)
1542 {
1543         struct nfc_llcp_local *local;
1544
1545         pr_debug("rf mode %d\n", rf_mode);
1546
1547         local = nfc_llcp_find_local(dev);
1548         if (local == NULL)
1549                 return;
1550
1551         local->target_idx = target_idx;
1552         local->comm_mode = comm_mode;
1553         local->rf_mode = rf_mode;
1554
1555         if (rf_mode == NFC_RF_INITIATOR) {
1556                 pr_debug("Queueing Tx work\n");
1557
1558                 schedule_work(&local->tx_work);
1559         } else {
1560                 mod_timer(&local->link_timer,
1561                           jiffies + msecs_to_jiffies(local->remote_lto));
1562         }
1563 }
1564
1565 int nfc_llcp_register_device(struct nfc_dev *ndev)
1566 {
1567         struct nfc_llcp_local *local;
1568
1569         local = kzalloc(sizeof(struct nfc_llcp_local), GFP_KERNEL);
1570         if (local == NULL)
1571                 return -ENOMEM;
1572
1573         local->dev = ndev;
1574         INIT_LIST_HEAD(&local->list);
1575         kref_init(&local->ref);
1576         mutex_init(&local->sdp_lock);
1577         init_timer(&local->link_timer);
1578         local->link_timer.data = (unsigned long) local;
1579         local->link_timer.function = nfc_llcp_symm_timer;
1580
1581         skb_queue_head_init(&local->tx_queue);
1582         INIT_WORK(&local->tx_work, nfc_llcp_tx_work);
1583
1584         local->rx_pending = NULL;
1585         INIT_WORK(&local->rx_work, nfc_llcp_rx_work);
1586
1587         INIT_WORK(&local->timeout_work, nfc_llcp_timeout_work);
1588
1589         rwlock_init(&local->sockets.lock);
1590         rwlock_init(&local->connecting_sockets.lock);
1591         rwlock_init(&local->raw_sockets.lock);
1592
1593         local->lto = 150; /* 1500 ms */
1594         local->rw = LLCP_MAX_RW;
1595         local->miux = cpu_to_be16(LLCP_MAX_MIUX);
1596         local->local_wks = 0x1; /* LLC Link Management */
1597
1598         nfc_llcp_build_gb(local);
1599
1600         local->remote_miu = LLCP_DEFAULT_MIU;
1601         local->remote_lto = LLCP_DEFAULT_LTO;
1602
1603         mutex_init(&local->sdreq_lock);
1604         INIT_HLIST_HEAD(&local->pending_sdreqs);
1605         init_timer(&local->sdreq_timer);
1606         local->sdreq_timer.data = (unsigned long) local;
1607         local->sdreq_timer.function = nfc_llcp_sdreq_timer;
1608         INIT_WORK(&local->sdreq_timeout_work, nfc_llcp_sdreq_timeout_work);
1609
1610         list_add(&local->list, &llcp_devices);
1611
1612         return 0;
1613 }
1614
1615 void nfc_llcp_unregister_device(struct nfc_dev *dev)
1616 {
1617         struct nfc_llcp_local *local = nfc_llcp_find_local(dev);
1618
1619         if (local == NULL) {
1620                 pr_debug("No such device\n");
1621                 return;
1622         }
1623
1624         local_cleanup(local);
1625
1626         nfc_llcp_local_put(local);
1627 }
1628
1629 int __init nfc_llcp_init(void)
1630 {
1631         return nfc_llcp_sock_init();
1632 }
1633
1634 void nfc_llcp_exit(void)
1635 {
1636         nfc_llcp_sock_exit();
1637 }