net/bluetooth/iso.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  * BlueZ - Bluetooth protocol stack for Linux
   4  *
   5  * Copyright (C) 2022 Intel Corporation
   6  */
   7
   8 #include <linux/module.h>
   9 #include <linux/debugfs.h>
  10 #include <linux/seq_file.h>
  11 #include <linux/sched/signal.h>
  12
  13 #include <net/bluetooth/bluetooth.h>
  14 #include <net/bluetooth/hci_core.h>
  15 #include <net/bluetooth/iso.h>
  16
  17 static const struct proto_ops iso_sock_ops;
  18
  19 static struct bt_sock_list iso_sk_list = {
  20         .lock = __RW_LOCK_UNLOCKED(iso_sk_list.lock)
  21 };
  22
  23 /* ---- ISO connections ---- */
  24 struct iso_conn {
  25         struct hci_conn *hcon;
  26
  27         /* @lock: spinlock protecting changes to iso_conn fields */
  28         spinlock_t      lock;
  29         struct sock     *sk;
  30
  31         struct delayed_work     timeout_work;
  32
  33         struct sk_buff  *rx_skb;
  34         __u32           rx_len;
  35         __u16           tx_sn;
  36 };
  37
  38 #define iso_conn_lock(c)        spin_lock(&(c)->lock)
  39 #define iso_conn_unlock(c)      spin_unlock(&(c)->lock)
  40
  41 static void iso_sock_close(struct sock *sk);
  42 static void iso_sock_kill(struct sock *sk);
  43
  44 /* ----- ISO socket info ----- */
  45 #define iso_pi(sk) ((struct iso_pinfo *)sk)
  46
  47 #define EIR_SERVICE_DATA_LENGTH 4
  48 #define BASE_MAX_LENGTH (HCI_MAX_PER_AD_LENGTH - EIR_SERVICE_DATA_LENGTH)
  49
  50 struct iso_pinfo {
  51         struct bt_sock          bt;
  52         bdaddr_t                src;
  53         __u8                    src_type;
  54         bdaddr_t                dst;
  55         __u8                    dst_type;
  56         __u8                    bc_sid;
  57         __u8                    bc_num_bis;
  58         __u8                    bc_bis[ISO_MAX_NUM_BIS];
  59         __u16                   sync_handle;
  60         __u32                   flags;
  61         struct bt_iso_qos       qos;
  62         __u8                    base_len;
  63         __u8                    base[BASE_MAX_LENGTH];
  64         struct iso_conn         *conn;
  65 };
  66
  67 /* ---- ISO timers ---- */
  68 #define ISO_CONN_TIMEOUT        (HZ * 40)
  69 #define ISO_DISCONN_TIMEOUT     (HZ * 2)
  70
  71 static void iso_sock_timeout(struct work_struct *work)
  72 {
  73         struct iso_conn *conn = container_of(work, struct iso_conn,
  74                                              timeout_work.work);
  75         struct sock *sk;
  76
  77         iso_conn_lock(conn);
  78         sk = conn->sk;
  79         if (sk)
  80                 sock_hold(sk);
  81         iso_conn_unlock(conn);
  82
  83         if (!sk)
  84                 return;
  85
  86         BT_DBG("sock %p state %d", sk, sk->sk_state);
  87
  88         lock_sock(sk);
  89         sk->sk_err = ETIMEDOUT;
  90         sk->sk_state_change(sk);
  91         release_sock(sk);
  92         sock_put(sk);
  93 }
  94
  95 static void iso_sock_set_timer(struct sock *sk, long timeout)
  96 {
  97         if (!iso_pi(sk)->conn)
  98                 return;
  99
 100         BT_DBG("sock %p state %d timeout %ld", sk, sk->sk_state, timeout);
 101         cancel_delayed_work(&iso_pi(sk)->conn->timeout_work);
 102         schedule_delayed_work(&iso_pi(sk)->conn->timeout_work, timeout);
 103 }
 104
 105 static void iso_sock_clear_timer(struct sock *sk)
 106 {
 107         if (!iso_pi(sk)->conn)
 108                 return;
 109
 110         BT_DBG("sock %p state %d", sk, sk->sk_state);
 111         cancel_delayed_work(&iso_pi(sk)->conn->timeout_work);
 112 }
 113
 114 /* ---- ISO connections ---- */
 115 static struct iso_conn *iso_conn_add(struct hci_conn *hcon)
 116 {
 117         struct iso_conn *conn = hcon->iso_data;
 118
 119         if (conn) {
 120                 if (!conn->hcon)
 121                         conn->hcon = hcon;
 122                 return conn;
 123         }
 124
 125         conn = kzalloc(sizeof(*conn), GFP_KERNEL);
 126         if (!conn)
 127                 return NULL;
 128
 129         spin_lock_init(&conn->lock);
 130         INIT_DELAYED_WORK(&conn->timeout_work, iso_sock_timeout);
 131
 132         hcon->iso_data = conn;
 133         conn->hcon = hcon;
 134         conn->tx_sn = 0;
 135
 136         BT_DBG("hcon %p conn %p", hcon, conn);
 137
 138         return conn;
 139 }
 140
 141 /* Delete channel. Must be called on the locked socket. */
 142 static void iso_chan_del(struct sock *sk, int err)
 143 {
 144         struct iso_conn *conn;
 145         struct sock *parent;
 146
 147         conn = iso_pi(sk)->conn;
 148
 149         BT_DBG("sk %p, conn %p, err %d", sk, conn, err);
 150
 151         if (conn) {
 152                 iso_conn_lock(conn);
 153                 conn->sk = NULL;
 154                 iso_pi(sk)->conn = NULL;
 155                 iso_conn_unlock(conn);
 156
 157                 if (conn->hcon)
 158                         hci_conn_drop(conn->hcon);
 159         }
 160
 161         sk->sk_state = BT_CLOSED;
 162         sk->sk_err   = err;
 163
 164         parent = bt_sk(sk)->parent;
 165         if (parent) {
 166                 bt_accept_unlink(sk);
 167                 parent->sk_data_ready(parent);
 168         } else {
 169                 sk->sk_state_change(sk);
 170         }
 171
 172         sock_set_flag(sk, SOCK_ZAPPED);
 173 }
 174
 175 static void iso_conn_del(struct hci_conn *hcon, int err)
 176 {
 177         struct iso_conn *conn = hcon->iso_data;
 178         struct sock *sk;
 179
 180         if (!conn)
 181                 return;
 182
 183         BT_DBG("hcon %p conn %p, err %d", hcon, conn, err);
 184
 185         /* Kill socket */
 186         iso_conn_lock(conn);
 187         sk = conn->sk;
 188         if (sk)
 189                 sock_hold(sk);
 190         iso_conn_unlock(conn);
 191
 192         if (sk) {
 193                 lock_sock(sk);
 194                 iso_sock_clear_timer(sk);
 195                 iso_chan_del(sk, err);
 196                 release_sock(sk);
 197                 sock_put(sk);
 198         }
 199
 200         /* Ensure no more work items will run before freeing conn. */
 201         cancel_delayed_work_sync(&conn->timeout_work);
 202
 203         hcon->iso_data = NULL;
 204         kfree(conn);
 205 }
 206
 207 static int __iso_chan_add(struct iso_conn *conn, struct sock *sk,
 208                           struct sock *parent)
 209 {
 210         BT_DBG("conn %p", conn);
 211
 212         if (iso_pi(sk)->conn == conn && conn->sk == sk)
 213                 return 0;
 214
 215         if (conn->sk) {
 216                 BT_ERR("conn->sk already set");
 217                 return -EBUSY;
 218         }
 219
 220         iso_pi(sk)->conn = conn;
 221         conn->sk = sk;
 222
 223         if (parent)
 224                 bt_accept_enqueue(parent, sk, true);
 225
 226         return 0;
 227 }
 228
 229 static int iso_chan_add(struct iso_conn *conn, struct sock *sk,
 230                         struct sock *parent)
 231 {
 232         int err;
 233
 234         iso_conn_lock(conn);
 235         err = __iso_chan_add(conn, sk, parent);
 236         iso_conn_unlock(conn);
 237
 238         return err;
 239 }
 240
 241 static inline u8 le_addr_type(u8 bdaddr_type)
 242 {
 243         if (bdaddr_type == BDADDR_LE_PUBLIC)
 244                 return ADDR_LE_DEV_PUBLIC;
 245         else
 246                 return ADDR_LE_DEV_RANDOM;
 247 }
 248
 249 static int iso_connect_bis(struct sock *sk)
 250 {
 251         struct iso_conn *conn;
 252         struct hci_conn *hcon;
 253         struct hci_dev  *hdev;
 254         int err;
 255
 256         BT_DBG("%pMR", &iso_pi(sk)->src);
 257
 258         hdev = hci_get_route(&iso_pi(sk)->dst, &iso_pi(sk)->src,
 259                              iso_pi(sk)->src_type);
 260         if (!hdev)
 261                 return -EHOSTUNREACH;
 262
 263         hci_dev_lock(hdev);
 264
 265         if (!bis_capable(hdev)) {
 266                 err = -EOPNOTSUPP;
 267                 goto unlock;
 268         }
 269
 270         /* Fail if out PHYs are marked as disabled */
 271         if (!iso_pi(sk)->qos.out.phy) {
 272                 err = -EINVAL;
 273                 goto unlock;
 274         }
 275
 276         hcon = hci_connect_bis(hdev, &iso_pi(sk)->dst, iso_pi(sk)->dst_type,
 277                                &iso_pi(sk)->qos, iso_pi(sk)->base_len,
 278                                iso_pi(sk)->base);
 279         if (IS_ERR(hcon)) {
 280                 err = PTR_ERR(hcon);
 281                 goto unlock;
 282         }
 283
 284         conn = iso_conn_add(hcon);
 285         if (!conn) {
 286                 hci_conn_drop(hcon);
 287                 err = -ENOMEM;
 288                 goto unlock;
 289         }
 290
 291         lock_sock(sk);
 292
 293         err = iso_chan_add(conn, sk, NULL);
 294         if (err) {
 295                 release_sock(sk);
 296                 goto unlock;
 297         }
 298
 299         /* Update source addr of the socket */
 300         bacpy(&iso_pi(sk)->src, &hcon->src);
 301
 302         if (hcon->state == BT_CONNECTED) {
 303                 iso_sock_clear_timer(sk);
 304                 sk->sk_state = BT_CONNECTED;
 305         } else {
 306                 sk->sk_state = BT_CONNECT;
 307                 iso_sock_set_timer(sk, sk->sk_sndtimeo);
 308         }
 309
 310         release_sock(sk);
 311
 312 unlock:
 313         hci_dev_unlock(hdev);
 314         hci_dev_put(hdev);
 315         return err;
 316 }
 317
 318 static int iso_connect_cis(struct sock *sk)
 319 {
 320         struct iso_conn *conn;
 321         struct hci_conn *hcon;
 322         struct hci_dev  *hdev;
 323         int err;
 324
 325         BT_DBG("%pMR -> %pMR", &iso_pi(sk)->src, &iso_pi(sk)->dst);
 326
 327         hdev = hci_get_route(&iso_pi(sk)->dst, &iso_pi(sk)->src,
 328                              iso_pi(sk)->src_type);
 329         if (!hdev)
 330                 return -EHOSTUNREACH;
 331
 332         hci_dev_lock(hdev);
 333
 334         if (!cis_central_capable(hdev)) {
 335                 err = -EOPNOTSUPP;
 336                 goto unlock;
 337         }
 338
 339         /* Fail if either PHYs are marked as disabled */
 340         if (!iso_pi(sk)->qos.in.phy && !iso_pi(sk)->qos.out.phy) {
 341                 err = -EINVAL;
 342                 goto unlock;
 343         }
 344
 345         /* Just bind if DEFER_SETUP has been set */
 346         if (test_bit(BT_SK_DEFER_SETUP, &bt_sk(sk)->flags)) {
 347                 hcon = hci_bind_cis(hdev, &iso_pi(sk)->dst,
 348                                     le_addr_type(iso_pi(sk)->dst_type),
 349                                     &iso_pi(sk)->qos);
 350                 if (IS_ERR(hcon)) {
 351                         err = PTR_ERR(hcon);
 352                         goto unlock;
 353                 }
 354         } else {
 355                 hcon = hci_connect_cis(hdev, &iso_pi(sk)->dst,
 356                                        le_addr_type(iso_pi(sk)->dst_type),
 357                                        &iso_pi(sk)->qos);
 358                 if (IS_ERR(hcon)) {
 359                         err = PTR_ERR(hcon);
 360                         goto unlock;
 361                 }
 362         }
 363
 364         conn = iso_conn_add(hcon);
 365         if (!conn) {
 366                 hci_conn_drop(hcon);
 367                 err = -ENOMEM;
 368                 goto unlock;
 369         }
 370
 371         lock_sock(sk);
 372
 373         err = iso_chan_add(conn, sk, NULL);
 374         if (err) {
 375                 release_sock(sk);
 376                 goto unlock;
 377         }
 378
 379         /* Update source addr of the socket */
 380         bacpy(&iso_pi(sk)->src, &hcon->src);
 381
 382         if (hcon->state == BT_CONNECTED) {
 383                 iso_sock_clear_timer(sk);
 384                 sk->sk_state = BT_CONNECTED;
 385         } else if (test_bit(BT_SK_DEFER_SETUP, &bt_sk(sk)->flags)) {
 386                 iso_sock_clear_timer(sk);
 387                 sk->sk_state = BT_CONNECT;
 388         } else {
 389                 sk->sk_state = BT_CONNECT;
 390                 iso_sock_set_timer(sk, sk->sk_sndtimeo);
 391         }
 392
 393         release_sock(sk);
 394
 395 unlock:
 396         hci_dev_unlock(hdev);
 397         hci_dev_put(hdev);
 398         return err;
 399 }
 400
 401 static struct bt_iso_qos *iso_sock_get_qos(struct sock *sk)
 402 {
 403         if (sk->sk_state == BT_CONNECTED || sk->sk_state == BT_CONNECT2)
 404                 return &iso_pi(sk)->conn->hcon->iso_qos;
 405
 406         return &iso_pi(sk)->qos;
 407 }
 408
 409 static int iso_send_frame(struct sock *sk, struct sk_buff *skb)
 410 {
 411         struct iso_conn *conn = iso_pi(sk)->conn;
 412         struct bt_iso_qos *qos = iso_sock_get_qos(sk);
 413         struct hci_iso_data_hdr *hdr;
 414         int len = 0;
 415
 416         BT_DBG("sk %p len %d", sk, skb->len);
 417
 418         if (skb->len > qos->out.sdu)
 419                 return -EMSGSIZE;
 420
 421         len = skb->len;
 422
 423         /* Push ISO data header */
 424         hdr = skb_push(skb, HCI_ISO_DATA_HDR_SIZE);
 425         hdr->sn = cpu_to_le16(conn->tx_sn++);
 426         hdr->slen = cpu_to_le16(hci_iso_data_len_pack(len,
 427                                                       HCI_ISO_STATUS_VALID));
 428
 429         if (sk->sk_state == BT_CONNECTED)
 430                 hci_send_iso(conn->hcon, skb);
 431         else
 432                 len = -ENOTCONN;
 433
 434         return len;
 435 }
 436
 437 static void iso_recv_frame(struct iso_conn *conn, struct sk_buff *skb)
 438 {
 439         struct sock *sk;
 440
 441         iso_conn_lock(conn);
 442         sk = conn->sk;
 443         iso_conn_unlock(conn);
 444
 445         if (!sk)
 446                 goto drop;
 447
 448         BT_DBG("sk %p len %d", sk, skb->len);
 449
 450         if (sk->sk_state != BT_CONNECTED)
 451                 goto drop;
 452
 453         if (!sock_queue_rcv_skb(sk, skb))
 454                 return;
 455
 456 drop:
 457         kfree_skb(skb);
 458 }
 459
 460 /* -------- Socket interface ---------- */
 461 static struct sock *__iso_get_sock_listen_by_addr(bdaddr_t *src, bdaddr_t *dst)
 462 {
 463         struct sock *sk;
 464
 465         sk_for_each(sk, &iso_sk_list.head) {
 466                 if (sk->sk_state != BT_LISTEN)
 467                         continue;
 468
 469                 if (bacmp(&iso_pi(sk)->dst, dst))
 470                         continue;
 471
 472                 if (!bacmp(&iso_pi(sk)->src, src))
 473                         return sk;
 474         }
 475
 476         return NULL;
 477 }
 478
 479 static struct sock *__iso_get_sock_listen_by_sid(bdaddr_t *ba, bdaddr_t *bc,
 480                                                  __u8 sid)
 481 {
 482         struct sock *sk;
 483
 484         sk_for_each(sk, &iso_sk_list.head) {
 485                 if (sk->sk_state != BT_LISTEN)
 486                         continue;
 487
 488                 if (bacmp(&iso_pi(sk)->src, ba))
 489                         continue;
 490
 491                 if (bacmp(&iso_pi(sk)->dst, bc))
 492                         continue;
 493
 494                 if (iso_pi(sk)->bc_sid == sid)
 495                         return sk;
 496         }
 497
 498         return NULL;
 499 }
 500
 501 typedef bool (*iso_sock_match_t)(struct sock *sk, void *data);
 502
 503 /* Find socket listening:
 504  * source bdaddr (Unicast)
 505  * destination bdaddr (Broadcast only)
 506  * match func - pass NULL to ignore
 507  * match func data - pass -1 to ignore
 508  * Returns closest match.
 509  */
 510 static struct sock *iso_get_sock_listen(bdaddr_t *src, bdaddr_t *dst,
 511                                         iso_sock_match_t match, void *data)
 512 {
 513         struct sock *sk = NULL, *sk1 = NULL;
 514
 515         read_lock(&iso_sk_list.lock);
 516
 517         sk_for_each(sk, &iso_sk_list.head) {
 518                 if (sk->sk_state != BT_LISTEN)
 519                         continue;
 520
 521                 /* Match Broadcast destination */
 522                 if (bacmp(dst, BDADDR_ANY) && bacmp(&iso_pi(sk)->dst, dst))
 523                         continue;
 524
 525                 /* Use Match function if provided */
 526                 if (match && !match(sk, data))
 527                         continue;
 528
 529                 /* Exact match. */
 530                 if (!bacmp(&iso_pi(sk)->src, src))
 531                         break;
 532
 533                 /* Closest match */
 534                 if (!bacmp(&iso_pi(sk)->src, BDADDR_ANY))
 535                         sk1 = sk;
 536         }
 537
 538         read_unlock(&iso_sk_list.lock);
 539
 540         return sk ? sk : sk1;
 541 }
 542
 543 static void iso_sock_destruct(struct sock *sk)
 544 {
 545         BT_DBG("sk %p", sk);
 546
 547         skb_queue_purge(&sk->sk_receive_queue);
 548         skb_queue_purge(&sk->sk_write_queue);
 549 }
 550
 551 static void iso_sock_cleanup_listen(struct sock *parent)
 552 {
 553         struct sock *sk;
 554
 555         BT_DBG("parent %p", parent);
 556
 557         /* Close not yet accepted channels */
 558         while ((sk = bt_accept_dequeue(parent, NULL))) {
 559                 iso_sock_close(sk);
 560                 iso_sock_kill(sk);
 561         }
 562
 563         parent->sk_state  = BT_CLOSED;
 564         sock_set_flag(parent, SOCK_ZAPPED);
 565 }
 566
 567 /* Kill socket (only if zapped and orphan)
 568  * Must be called on unlocked socket.
 569  */
 570 static void iso_sock_kill(struct sock *sk)
 571 {
 572         if (!sock_flag(sk, SOCK_ZAPPED) || sk->sk_socket ||
 573             sock_flag(sk, SOCK_DEAD))
 574                 return;
 575
 576         BT_DBG("sk %p state %d", sk, sk->sk_state);
 577
 578         /* Kill poor orphan */
 579         bt_sock_unlink(&iso_sk_list, sk);
 580         sock_set_flag(sk, SOCK_DEAD);
 581         sock_put(sk);
 582 }
 583
 584 static void iso_conn_defer_reject(struct hci_conn *conn)
 585 {
 586         struct hci_cp_le_reject_cis cp;
 587
 588         BT_DBG("conn %p", conn);
 589
 590         memset(&cp, 0, sizeof(cp));
 591         cp.handle = cpu_to_le16(conn->handle);
 592         cp.reason = HCI_ERROR_REJ_BAD_ADDR;
 593         hci_send_cmd(conn->hdev, HCI_OP_LE_REJECT_CIS, sizeof(cp), &cp);
 594 }
 595
 596 static void __iso_sock_close(struct sock *sk)
 597 {
 598         BT_DBG("sk %p state %d socket %p", sk, sk->sk_state, sk->sk_socket);
 599
 600         switch (sk->sk_state) {
 601         case BT_LISTEN:
 602                 iso_sock_cleanup_listen(sk);
 603                 break;
 604
 605         case BT_CONNECTED:
 606         case BT_CONFIG:
 607                 if (iso_pi(sk)->conn->hcon) {
 608                         sk->sk_state = BT_DISCONN;
 609                         iso_sock_set_timer(sk, ISO_DISCONN_TIMEOUT);
 610                         iso_conn_lock(iso_pi(sk)->conn);
 611                         hci_conn_drop(iso_pi(sk)->conn->hcon);
 612                         iso_pi(sk)->conn->hcon = NULL;
 613                         iso_conn_unlock(iso_pi(sk)->conn);
 614                 } else {
 615                         iso_chan_del(sk, ECONNRESET);
 616                 }
 617                 break;
 618
 619         case BT_CONNECT2:
 620                 if (iso_pi(sk)->conn->hcon)
 621                         iso_conn_defer_reject(iso_pi(sk)->conn->hcon);
 622                 iso_chan_del(sk, ECONNRESET);
 623                 break;
 624         case BT_CONNECT:
 625                 /* In case of DEFER_SETUP the hcon would be bound to CIG which
 626                  * needs to be removed so just call hci_conn_del so the cleanup
 627                  * callback do what is needed.
 628                  */
 629                 if (test_bit(BT_SK_DEFER_SETUP, &bt_sk(sk)->flags) &&
 630                     iso_pi(sk)->conn->hcon) {
 631                         hci_conn_del(iso_pi(sk)->conn->hcon);
 632                         iso_pi(sk)->conn->hcon = NULL;
 633                 }
 634
 635                 iso_chan_del(sk, ECONNRESET);
 636                 break;
 637         case BT_DISCONN:
 638                 iso_chan_del(sk, ECONNRESET);
 639                 break;
 640
 641         default:
 642                 sock_set_flag(sk, SOCK_ZAPPED);
 643                 break;
 644         }
 645 }
 646
 647 /* Must be called on unlocked socket. */
 648 static void iso_sock_close(struct sock *sk)
 649 {
 650         iso_sock_clear_timer(sk);
 651         lock_sock(sk);
 652         __iso_sock_close(sk);
 653         release_sock(sk);
 654         iso_sock_kill(sk);
 655 }
 656
 657 static void iso_sock_init(struct sock *sk, struct sock *parent)
 658 {
 659         BT_DBG("sk %p", sk);
 660
 661         if (parent) {
 662                 sk->sk_type = parent->sk_type;
 663                 bt_sk(sk)->flags = bt_sk(parent)->flags;
 664                 security_sk_clone(parent, sk);
 665         }
 666 }
 667
 668 static struct proto iso_proto = {
 669         .name           = "ISO",
 670         .owner          = THIS_MODULE,
 671         .obj_size       = sizeof(struct iso_pinfo)
 672 };
 673
 674 #define DEFAULT_IO_QOS \
 675 { \
 676         .interval       = 10000u, \
 677         .latency        = 10u, \
 678         .sdu            = 40u, \
 679         .phy            = BT_ISO_PHY_2M, \
 680         .rtn            = 2u, \
 681 }
 682
 683 static struct bt_iso_qos default_qos = {
 684         .cig            = BT_ISO_QOS_CIG_UNSET,
 685         .cis            = BT_ISO_QOS_CIS_UNSET,
 686         .sca            = 0x00,
 687         .packing        = 0x00,
 688         .framing        = 0x00,
 689         .in             = DEFAULT_IO_QOS,
 690         .out            = DEFAULT_IO_QOS,
 691 };
 692
 693 static struct sock *iso_sock_alloc(struct net *net, struct socket *sock,
 694                                    int proto, gfp_t prio, int kern)
 695 {
 696         struct sock *sk;
 697
 698         sk = sk_alloc(net, PF_BLUETOOTH, prio, &iso_proto, kern);
 699         if (!sk)
 700                 return NULL;
 701
 702         sock_init_data(sock, sk);
 703         INIT_LIST_HEAD(&bt_sk(sk)->accept_q);
 704
 705         sk->sk_destruct = iso_sock_destruct;
 706         sk->sk_sndtimeo = ISO_CONN_TIMEOUT;
 707
 708         sock_reset_flag(sk, SOCK_ZAPPED);
 709
 710         sk->sk_protocol = proto;
 711         sk->sk_state    = BT_OPEN;
 712
 713         /* Set address type as public as default src address is BDADDR_ANY */
 714         iso_pi(sk)->src_type = BDADDR_LE_PUBLIC;
 715
 716         iso_pi(sk)->qos = default_qos;
 717
 718         bt_sock_link(&iso_sk_list, sk);
 719         return sk;
 720 }
 721
 722 static int iso_sock_create(struct net *net, struct socket *sock, int protocol,
 723                            int kern)
 724 {
 725         struct sock *sk;
 726
 727         BT_DBG("sock %p", sock);
 728
 729         sock->state = SS_UNCONNECTED;
 730
 731         if (sock->type != SOCK_SEQPACKET)
 732                 return -ESOCKTNOSUPPORT;
 733
 734         sock->ops = &iso_sock_ops;
 735
 736         sk = iso_sock_alloc(net, sock, protocol, GFP_ATOMIC, kern);
 737         if (!sk)
 738                 return -ENOMEM;
 739
 740         iso_sock_init(sk, NULL);
 741         return 0;
 742 }
 743
 744 static int iso_sock_bind_bc(struct socket *sock, struct sockaddr *addr,
 745                             int addr_len)
 746 {
 747         struct sockaddr_iso *sa = (struct sockaddr_iso *)addr;
 748         struct sock *sk = sock->sk;
 749         int i;
 750
 751         BT_DBG("sk %p bc_sid %u bc_num_bis %u", sk, sa->iso_bc->bc_sid,
 752                sa->iso_bc->bc_num_bis);
 753
 754         if (addr_len > sizeof(*sa) + sizeof(*sa->iso_bc) ||
 755             sa->iso_bc->bc_num_bis < 0x01 || sa->iso_bc->bc_num_bis > 0x1f)
 756                 return -EINVAL;
 757
 758         bacpy(&iso_pi(sk)->dst, &sa->iso_bc->bc_bdaddr);
 759         iso_pi(sk)->dst_type = sa->iso_bc->bc_bdaddr_type;
 760         iso_pi(sk)->sync_handle = -1;
 761         iso_pi(sk)->bc_sid = sa->iso_bc->bc_sid;
 762         iso_pi(sk)->bc_num_bis = sa->iso_bc->bc_num_bis;
 763
 764         for (i = 0; i < iso_pi(sk)->bc_num_bis; i++) {
 765                 if (sa->iso_bc->bc_bis[i] < 0x01 ||
 766                     sa->iso_bc->bc_bis[i] > 0x1f)
 767                         return -EINVAL;
 768
 769                 memcpy(iso_pi(sk)->bc_bis, sa->iso_bc->bc_bis,
 770                        iso_pi(sk)->bc_num_bis);
 771         }
 772
 773         return 0;
 774 }
 775
 776 static int iso_sock_bind(struct socket *sock, struct sockaddr *addr,
 777                          int addr_len)
 778 {
 779         struct sockaddr_iso *sa = (struct sockaddr_iso *)addr;
 780         struct sock *sk = sock->sk;
 781         int err = 0;
 782
 783         BT_DBG("sk %p %pMR type %u", sk, &sa->iso_bdaddr, sa->iso_bdaddr_type);
 784
 785         if (!addr || addr_len < sizeof(struct sockaddr_iso) ||
 786             addr->sa_family != AF_BLUETOOTH)
 787                 return -EINVAL;
 788
 789         lock_sock(sk);
 790
 791         if (sk->sk_state != BT_OPEN) {
 792                 err = -EBADFD;
 793                 goto done;
 794         }
 795
 796         if (sk->sk_type != SOCK_SEQPACKET) {
 797                 err = -EINVAL;
 798                 goto done;
 799         }
 800
 801         /* Check if the address type is of LE type */
 802         if (!bdaddr_type_is_le(sa->iso_bdaddr_type)) {
 803                 err = -EINVAL;
 804                 goto done;
 805         }
 806
 807         bacpy(&iso_pi(sk)->src, &sa->iso_bdaddr);
 808         iso_pi(sk)->src_type = sa->iso_bdaddr_type;
 809
 810         /* Check for Broadcast address */
 811         if (addr_len > sizeof(*sa)) {
 812                 err = iso_sock_bind_bc(sock, addr, addr_len);
 813                 if (err)
 814                         goto done;
 815         }
 816
 817         sk->sk_state = BT_BOUND;
 818
 819 done:
 820         release_sock(sk);
 821         return err;
 822 }
 823
 824 static int iso_sock_connect(struct socket *sock, struct sockaddr *addr,
 825                             int alen, int flags)
 826 {
 827         struct sockaddr_iso *sa = (struct sockaddr_iso *)addr;
 828         struct sock *sk = sock->sk;
 829         int err;
 830
 831         BT_DBG("sk %p", sk);
 832
 833         if (alen < sizeof(struct sockaddr_iso) ||
 834             addr->sa_family != AF_BLUETOOTH)
 835                 return -EINVAL;
 836
 837         if (sk->sk_state != BT_OPEN && sk->sk_state != BT_BOUND)
 838                 return -EBADFD;
 839
 840         if (sk->sk_type != SOCK_SEQPACKET)
 841                 return -EINVAL;
 842
 843         /* Check if the address type is of LE type */
 844         if (!bdaddr_type_is_le(sa->iso_bdaddr_type))
 845                 return -EINVAL;
 846
 847         lock_sock(sk);
 848
 849         bacpy(&iso_pi(sk)->dst, &sa->iso_bdaddr);
 850         iso_pi(sk)->dst_type = sa->iso_bdaddr_type;
 851
 852         release_sock(sk);
 853
 854         if (bacmp(&iso_pi(sk)->dst, BDADDR_ANY))
 855                 err = iso_connect_cis(sk);
 856         else
 857                 err = iso_connect_bis(sk);
 858
 859         if (err)
 860                 return err;
 861
 862         lock_sock(sk);
 863
 864         if (!test_bit(BT_SK_DEFER_SETUP, &bt_sk(sk)->flags)) {
 865                 err = bt_sock_wait_state(sk, BT_CONNECTED,
 866                                          sock_sndtimeo(sk, flags & O_NONBLOCK));
 867         }
 868
 869         release_sock(sk);
 870         return err;
 871 }
 872
 873 static int iso_listen_bis(struct sock *sk)
 874 {
 875         struct hci_dev *hdev;
 876         int err = 0;
 877
 878         BT_DBG("%pMR -> %pMR (SID 0x%2.2x)", &iso_pi(sk)->src,
 879                &iso_pi(sk)->dst, iso_pi(sk)->bc_sid);
 880
 881         write_lock(&iso_sk_list.lock);
 882
 883         if (__iso_get_sock_listen_by_sid(&iso_pi(sk)->src, &iso_pi(sk)->dst,
 884                                          iso_pi(sk)->bc_sid))
 885                 err = -EADDRINUSE;
 886
 887         write_unlock(&iso_sk_list.lock);
 888
 889         if (err)
 890                 return err;
 891
 892         hdev = hci_get_route(&iso_pi(sk)->dst, &iso_pi(sk)->src,
 893                              iso_pi(sk)->src_type);
 894         if (!hdev)
 895                 return -EHOSTUNREACH;
 896
 897         hci_dev_lock(hdev);
 898
 899         err = hci_pa_create_sync(hdev, &iso_pi(sk)->dst, iso_pi(sk)->dst_type,
 900                                  iso_pi(sk)->bc_sid);
 901
 902         hci_dev_unlock(hdev);
 903         hci_dev_put(hdev);
 904
 905         return err;
 906 }
 907
 908 static int iso_listen_cis(struct sock *sk)
 909 {
 910         int err = 0;
 911
 912         BT_DBG("%pMR", &iso_pi(sk)->src);
 913
 914         write_lock(&iso_sk_list.lock);
 915
 916         if (__iso_get_sock_listen_by_addr(&iso_pi(sk)->src, &iso_pi(sk)->dst))
 917                 err = -EADDRINUSE;
 918
 919         write_unlock(&iso_sk_list.lock);
 920
 921         return err;
 922 }
 923
 924 static int iso_sock_listen(struct socket *sock, int backlog)
 925 {
 926         struct sock *sk = sock->sk;
 927         int err = 0;
 928
 929         BT_DBG("sk %p backlog %d", sk, backlog);
 930
 931         lock_sock(sk);
 932
 933         if (sk->sk_state != BT_BOUND) {
 934                 err = -EBADFD;
 935                 goto done;
 936         }
 937
 938         if (sk->sk_type != SOCK_SEQPACKET) {
 939                 err = -EINVAL;
 940                 goto done;
 941         }
 942
 943         if (!bacmp(&iso_pi(sk)->dst, BDADDR_ANY))
 944                 err = iso_listen_cis(sk);
 945         else
 946                 err = iso_listen_bis(sk);
 947
 948         if (err)
 949                 goto done;
 950
 951         sk->sk_max_ack_backlog = backlog;
 952         sk->sk_ack_backlog = 0;
 953
 954         sk->sk_state = BT_LISTEN;
 955
 956 done:
 957         release_sock(sk);
 958         return err;
 959 }
 960
 961 static int iso_sock_accept(struct socket *sock, struct socket *newsock,
 962                            int flags, bool kern)
 963 {
 964         DEFINE_WAIT_FUNC(wait, woken_wake_function);
 965         struct sock *sk = sock->sk, *ch;
 966         long timeo;
 967         int err = 0;
 968
 969         lock_sock(sk);
 970
 971         timeo = sock_rcvtimeo(sk, flags & O_NONBLOCK);
 972
 973         BT_DBG("sk %p timeo %ld", sk, timeo);
 974
 975         /* Wait for an incoming connection. (wake-one). */
 976         add_wait_queue_exclusive(sk_sleep(sk), &wait);
 977         while (1) {
 978                 if (sk->sk_state != BT_LISTEN) {
 979                         err = -EBADFD;
 980                         break;
 981                 }
 982
 983                 ch = bt_accept_dequeue(sk, newsock);
 984                 if (ch)
 985                         break;
 986
 987                 if (!timeo) {
 988                         err = -EAGAIN;
 989                         break;
 990                 }
 991
 992                 if (signal_pending(current)) {
 993                         err = sock_intr_errno(timeo);
 994                         break;
 995                 }
 996
 997                 release_sock(sk);
 998
 999                 timeo = wait_woken(&wait, TASK_INTERRUPTIBLE, timeo);
1000                 lock_sock(sk);
1001         }
1002         remove_wait_queue(sk_sleep(sk), &wait);
1003
1004         if (err)
1005                 goto done;
1006
1007         newsock->state = SS_CONNECTED;
1008
1009         BT_DBG("new socket %p", ch);
1010
1011 done:
1012         release_sock(sk);
1013         return err;
1014 }
1015
1016 static int iso_sock_getname(struct socket *sock, struct sockaddr *addr,
1017                             int peer)
1018 {
1019         struct sockaddr_iso *sa = (struct sockaddr_iso *)addr;
1020         struct sock *sk = sock->sk;
1021
1022         BT_DBG("sock %p, sk %p", sock, sk);
1023
1024         addr->sa_family = AF_BLUETOOTH;
1025
1026         if (peer) {
1027                 bacpy(&sa->iso_bdaddr, &iso_pi(sk)->dst);
1028                 sa->iso_bdaddr_type = iso_pi(sk)->dst_type;
1029         } else {
1030                 bacpy(&sa->iso_bdaddr, &iso_pi(sk)->src);
1031                 sa->iso_bdaddr_type = iso_pi(sk)->src_type;
1032         }
1033
1034         return sizeof(struct sockaddr_iso);
1035 }
1036
1037 static int iso_sock_sendmsg(struct socket *sock, struct msghdr *msg,
1038                             size_t len)
1039 {
1040         struct sock *sk = sock->sk;
1041         struct sk_buff *skb, **frag;
1042         size_t mtu;
1043         int err;
1044
1045         BT_DBG("sock %p, sk %p", sock, sk);
1046
1047         err = sock_error(sk);
1048         if (err)
1049                 return err;
1050
1051         if (msg->msg_flags & MSG_OOB)
1052                 return -EOPNOTSUPP;
1053
1054         lock_sock(sk);
1055
1056         if (sk->sk_state != BT_CONNECTED) {
1057                 release_sock(sk);
1058                 return -ENOTCONN;
1059         }
1060
1061         mtu = iso_pi(sk)->conn->hcon->hdev->iso_mtu;
1062
1063         release_sock(sk);
1064
1065         skb = bt_skb_sendmsg(sk, msg, len, mtu, HCI_ISO_DATA_HDR_SIZE, 0);
1066         if (IS_ERR(skb))
1067                 return PTR_ERR(skb);
1068
1069         len -= skb->len;
1070
1071         BT_DBG("skb %p len %d", sk, skb->len);
1072
1073         /* Continuation fragments */
1074         frag = &skb_shinfo(skb)->frag_list;
1075         while (len) {
1076                 struct sk_buff *tmp;
1077
1078                 tmp = bt_skb_sendmsg(sk, msg, len, mtu, 0, 0);
1079                 if (IS_ERR(tmp)) {
1080                         kfree_skb(skb);
1081                         return PTR_ERR(tmp);
1082                 }
1083
1084                 *frag = tmp;
1085
1086                 len  -= tmp->len;
1087
1088                 skb->len += tmp->len;
1089                 skb->data_len += tmp->len;
1090
1091                 BT_DBG("frag %p len %d", *frag, tmp->len);
1092
1093                 frag = &(*frag)->next;
1094         }
1095
1096         lock_sock(sk);
1097
1098         if (sk->sk_state == BT_CONNECTED)
1099                 err = iso_send_frame(sk, skb);
1100         else
1101                 err = -ENOTCONN;
1102
1103         release_sock(sk);
1104
1105         if (err < 0)
1106                 kfree_skb(skb);
1107         return err;
1108 }
1109
1110 static void iso_conn_defer_accept(struct hci_conn *conn)
1111 {
1112         struct hci_cp_le_accept_cis cp;
1113         struct hci_dev *hdev = conn->hdev;
1114
1115         BT_DBG("conn %p", conn);
1116
1117         conn->state = BT_CONFIG;
1118
1119         cp.handle = cpu_to_le16(conn->handle);
1120
1121         hci_send_cmd(hdev, HCI_OP_LE_ACCEPT_CIS, sizeof(cp), &cp);
1122 }
1123
1124 static int iso_sock_recvmsg(struct socket *sock, struct msghdr *msg,
1125                             size_t len, int flags)
1126 {
1127         struct sock *sk = sock->sk;
1128         struct iso_pinfo *pi = iso_pi(sk);
1129
1130         BT_DBG("sk %p", sk);
1131
1132         if (test_and_clear_bit(BT_SK_DEFER_SETUP, &bt_sk(sk)->flags)) {
1133                 lock_sock(sk);
1134                 switch (sk->sk_state) {
1135                 case BT_CONNECT2:
1136                         iso_conn_defer_accept(pi->conn->hcon);
1137                         sk->sk_state = BT_CONFIG;
1138                         release_sock(sk);
1139                         return 0;
1140                 case BT_CONNECT:
1141                         release_sock(sk);
1142                         return iso_connect_cis(sk);
1143                 default:
1144                         release_sock(sk);
1145                         break;
1146                 }
1147         }
1148
1149         return bt_sock_recvmsg(sock, msg, len, flags);
1150 }
1151
1152 static bool check_io_qos(struct bt_iso_io_qos *qos)
1153 {
1154         /* If no PHY is enable SDU must be 0 */
1155         if (!qos->phy && qos->sdu)
1156                 return false;
1157
1158         if (qos->interval && (qos->interval < 0xff || qos->interval > 0xfffff))
1159                 return false;
1160
1161         if (qos->latency && (qos->latency < 0x05 || qos->latency > 0xfa0))
1162                 return false;
1163
1164         if (qos->phy > BT_ISO_PHY_ANY)
1165                 return false;
1166
1167         return true;
1168 }
1169
1170 static bool check_qos(struct bt_iso_qos *qos)
1171 {
1172         if (qos->sca > 0x07)
1173                 return false;
1174
1175         if (qos->packing > 0x01)
1176                 return false;
1177
1178         if (qos->framing > 0x01)
1179                 return false;
1180
1181         if (!check_io_qos(&qos->in))
1182                 return false;
1183
1184         if (!check_io_qos(&qos->out))
1185                 return false;
1186
1187         return true;
1188 }
1189
1190 static int iso_sock_setsockopt(struct socket *sock, int level, int optname,
1191                                sockptr_t optval, unsigned int optlen)
1192 {
1193         struct sock *sk = sock->sk;
1194         int len, err = 0;
1195         struct bt_iso_qos qos;
1196         u32 opt;
1197
1198         BT_DBG("sk %p", sk);
1199
1200         lock_sock(sk);
1201
1202         switch (optname) {
1203         case BT_DEFER_SETUP:
1204                 if (sk->sk_state != BT_BOUND && sk->sk_state != BT_LISTEN) {
1205                         err = -EINVAL;
1206                         break;
1207                 }
1208
1209                 if (copy_from_sockptr(&opt, optval, sizeof(u32))) {
1210                         err = -EFAULT;
1211                         break;
1212                 }
1213
1214                 if (opt)
1215                         set_bit(BT_SK_DEFER_SETUP, &bt_sk(sk)->flags);
1216                 else
1217                         clear_bit(BT_SK_DEFER_SETUP, &bt_sk(sk)->flags);
1218                 break;
1219
1220         case BT_ISO_QOS:
1221                 if (sk->sk_state != BT_OPEN && sk->sk_state != BT_BOUND &&
1222                     sk->sk_state != BT_CONNECT2) {
1223                         err = -EINVAL;
1224                         break;
1225                 }
1226
1227                 len = min_t(unsigned int, sizeof(qos), optlen);
1228                 if (len != sizeof(qos)) {
1229                         err = -EINVAL;
1230                         break;
1231                 }
1232
1233                 memset(&qos, 0, sizeof(qos));
1234
1235                 if (copy_from_sockptr(&qos, optval, len)) {
1236                         err = -EFAULT;
1237                         break;
1238                 }
1239
1240                 if (!check_qos(&qos)) {
1241                         err = -EINVAL;
1242                         break;
1243                 }
1244
1245                 iso_pi(sk)->qos = qos;
1246
1247                 break;
1248
1249         case BT_ISO_BASE:
1250                 if (sk->sk_state != BT_OPEN && sk->sk_state != BT_BOUND &&
1251                     sk->sk_state != BT_CONNECT2) {
1252                         err = -EINVAL;
1253                         break;
1254                 }
1255
1256                 if (optlen > sizeof(iso_pi(sk)->base)) {
1257                         err = -EOVERFLOW;
1258                         break;
1259                 }
1260
1261                 len = min_t(unsigned int, sizeof(iso_pi(sk)->base), optlen);
1262
1263                 if (copy_from_sockptr(iso_pi(sk)->base, optval, len)) {
1264                         err = -EFAULT;
1265                         break;
1266                 }
1267
1268                 iso_pi(sk)->base_len = len;
1269
1270                 break;
1271
1272         default:
1273                 err = -ENOPROTOOPT;
1274                 break;
1275         }
1276
1277         release_sock(sk);
1278         return err;
1279 }
1280
1281 static int iso_sock_getsockopt(struct socket *sock, int level, int optname,
1282                                char __user *optval, int __user *optlen)
1283 {
1284         struct sock *sk = sock->sk;
1285         int len, err = 0;
1286         struct bt_iso_qos *qos;
1287         u8 base_len;
1288         u8 *base;
1289
1290         BT_DBG("sk %p", sk);
1291
1292         if (get_user(len, optlen))
1293                 return -EFAULT;
1294
1295         lock_sock(sk);
1296
1297         switch (optname) {
1298         case BT_DEFER_SETUP:
1299                 if (sk->sk_state == BT_CONNECTED) {
1300                         err = -EINVAL;
1301                         break;
1302                 }
1303
1304                 if (put_user(test_bit(BT_SK_DEFER_SETUP, &bt_sk(sk)->flags),
1305                              (u32 __user *)optval))
1306                         err = -EFAULT;
1307
1308                 break;
1309
1310         case BT_ISO_QOS:
1311                 qos = iso_sock_get_qos(sk);
1312
1313                 len = min_t(unsigned int, len, sizeof(*qos));
1314                 if (copy_to_user(optval, qos, len))
1315                         err = -EFAULT;
1316
1317                 break;
1318
1319         case BT_ISO_BASE:
1320                 if (sk->sk_state == BT_CONNECTED) {
1321                         base_len = iso_pi(sk)->conn->hcon->le_per_adv_data_len;
1322                         base = iso_pi(sk)->conn->hcon->le_per_adv_data;
1323                 } else {
1324                         base_len = iso_pi(sk)->base_len;
1325                         base = iso_pi(sk)->base;
1326                 }
1327
1328                 len = min_t(unsigned int, len, base_len);
1329                 if (copy_to_user(optval, base, len))
1330                         err = -EFAULT;
1331
1332                 break;
1333
1334         default:
1335                 err = -ENOPROTOOPT;
1336                 break;
1337         }
1338
1339         release_sock(sk);
1340         return err;
1341 }
1342
1343 static int iso_sock_shutdown(struct socket *sock, int how)
1344 {
1345         struct sock *sk = sock->sk;
1346         int err = 0;
1347
1348         BT_DBG("sock %p, sk %p, how %d", sock, sk, how);
1349
1350         if (!sk)
1351                 return 0;
1352
1353         sock_hold(sk);
1354         lock_sock(sk);
1355
1356         switch (how) {
1357         case SHUT_RD:
1358                 if (sk->sk_shutdown & RCV_SHUTDOWN)
1359                         goto unlock;
1360                 sk->sk_shutdown |= RCV_SHUTDOWN;
1361                 break;
1362         case SHUT_WR:
1363                 if (sk->sk_shutdown & SEND_SHUTDOWN)
1364                         goto unlock;
1365                 sk->sk_shutdown |= SEND_SHUTDOWN;
1366                 break;
1367         case SHUT_RDWR:
1368                 if (sk->sk_shutdown & SHUTDOWN_MASK)
1369                         goto unlock;
1370                 sk->sk_shutdown |= SHUTDOWN_MASK;
1371                 break;
1372         }
1373
1374         iso_sock_clear_timer(sk);
1375         __iso_sock_close(sk);
1376
1377         if (sock_flag(sk, SOCK_LINGER) && sk->sk_lingertime &&
1378             !(current->flags & PF_EXITING))
1379                 err = bt_sock_wait_state(sk, BT_CLOSED, sk->sk_lingertime);
1380
1381 unlock:
1382         release_sock(sk);
1383         sock_put(sk);
1384
1385         return err;
1386 }
1387
1388 static int iso_sock_release(struct socket *sock)
1389 {
1390         struct sock *sk = sock->sk;
1391         int err = 0;
1392
1393         BT_DBG("sock %p, sk %p", sock, sk);
1394
1395         if (!sk)
1396                 return 0;
1397
1398         iso_sock_close(sk);
1399
1400         if (sock_flag(sk, SOCK_LINGER) && READ_ONCE(sk->sk_lingertime) &&
1401             !(current->flags & PF_EXITING)) {
1402                 lock_sock(sk);
1403                 err = bt_sock_wait_state(sk, BT_CLOSED, sk->sk_lingertime);
1404                 release_sock(sk);
1405         }
1406
1407         sock_orphan(sk);
1408         iso_sock_kill(sk);
1409         return err;
1410 }
1411
1412 static void iso_sock_ready(struct sock *sk)
1413 {
1414         BT_DBG("sk %p", sk);
1415
1416         if (!sk)
1417                 return;
1418
1419         lock_sock(sk);
1420         iso_sock_clear_timer(sk);
1421         sk->sk_state = BT_CONNECTED;
1422         sk->sk_state_change(sk);
1423         release_sock(sk);
1424 }
1425
1426 struct iso_list_data {
1427         struct hci_conn *hcon;
1428         int count;
1429 };
1430
1431 static bool iso_match_big(struct sock *sk, void *data)
1432 {
1433         struct hci_evt_le_big_sync_estabilished *ev = data;
1434
1435         return ev->handle == iso_pi(sk)->qos.big;
1436 }
1437
1438 static void iso_conn_ready(struct iso_conn *conn)
1439 {
1440         struct sock *parent;
1441         struct sock *sk = conn->sk;
1442         struct hci_ev_le_big_sync_estabilished *ev;
1443         struct hci_conn *hcon;
1444
1445         BT_DBG("conn %p", conn);
1446
1447         if (sk) {
1448                 iso_sock_ready(conn->sk);
1449         } else {
1450                 hcon = conn->hcon;
1451                 if (!hcon)
1452                         return;
1453
1454                 ev = hci_recv_event_data(hcon->hdev,
1455                                          HCI_EVT_LE_BIG_SYNC_ESTABILISHED);
1456                 if (ev)
1457                         parent = iso_get_sock_listen(&hcon->src,
1458                                                      &hcon->dst,
1459                                                      iso_match_big, ev);
1460                 else
1461                         parent = iso_get_sock_listen(&hcon->src,
1462                                                      BDADDR_ANY, NULL, NULL);
1463
1464                 if (!parent)
1465                         return;
1466
1467                 lock_sock(parent);
1468
1469                 sk = iso_sock_alloc(sock_net(parent), NULL,
1470                                     BTPROTO_ISO, GFP_ATOMIC, 0);
1471                 if (!sk) {
1472                         release_sock(parent);
1473                         return;
1474                 }
1475
1476                 iso_sock_init(sk, parent);
1477
1478                 bacpy(&iso_pi(sk)->src, &hcon->src);
1479                 iso_pi(sk)->src_type = hcon->src_type;
1480
1481                 /* If hcon has no destination address (BDADDR_ANY) it means it
1482                  * was created by HCI_EV_LE_BIG_SYNC_ESTABILISHED so we need to
1483                  * initialize using the parent socket destination address.
1484                  */
1485                 if (!bacmp(&hcon->dst, BDADDR_ANY)) {
1486                         bacpy(&hcon->dst, &iso_pi(parent)->dst);
1487                         hcon->dst_type = iso_pi(parent)->dst_type;
1488                         hcon->sync_handle = iso_pi(parent)->sync_handle;
1489                 }
1490
1491                 bacpy(&iso_pi(sk)->dst, &hcon->dst);
1492                 iso_pi(sk)->dst_type = hcon->dst_type;
1493
1494                 hci_conn_hold(hcon);
1495                 iso_chan_add(conn, sk, parent);
1496
1497                 if (test_bit(BT_SK_DEFER_SETUP, &bt_sk(parent)->flags))
1498                         sk->sk_state = BT_CONNECT2;
1499                 else
1500                         sk->sk_state = BT_CONNECTED;
1501
1502                 /* Wake up parent */
1503                 parent->sk_data_ready(parent);
1504
1505                 release_sock(parent);
1506         }
1507 }
1508
1509 static bool iso_match_sid(struct sock *sk, void *data)
1510 {
1511         struct hci_ev_le_pa_sync_established *ev = data;
1512
1513         return ev->sid == iso_pi(sk)->bc_sid;
1514 }
1515
1516 static bool iso_match_sync_handle(struct sock *sk, void *data)
1517 {
1518         struct hci_evt_le_big_info_adv_report *ev = data;
1519
1520         return le16_to_cpu(ev->sync_handle) == iso_pi(sk)->sync_handle;
1521 }
1522
1523 /* ----- ISO interface with lower layer (HCI) ----- */
1524
1525 int iso_connect_ind(struct hci_dev *hdev, bdaddr_t *bdaddr, __u8 *flags)
1526 {
1527         struct hci_ev_le_pa_sync_established *ev1;
1528         struct hci_evt_le_big_info_adv_report *ev2;
1529         struct sock *sk;
1530         int lm = 0;
1531
1532         bt_dev_dbg(hdev, "bdaddr %pMR", bdaddr);
1533
1534         /* Broadcast receiver requires handling of some events before it can
1535          * proceed to establishing a BIG sync:
1536          *
1537          * 1. HCI_EV_LE_PA_SYNC_ESTABLISHED: The socket may specify a specific
1538          * SID to listen to and once sync is estabilished its handle needs to
1539          * be stored in iso_pi(sk)->sync_handle so it can be matched once
1540          * receiving the BIG Info.
1541          * 2. HCI_EVT_LE_BIG_INFO_ADV_REPORT: When connect_ind is triggered by a
1542          * a BIG Info it attempts to check if there any listening socket with
1543          * the same sync_handle and if it does then attempt to create a sync.
1544          */
1545         ev1 = hci_recv_event_data(hdev, HCI_EV_LE_PA_SYNC_ESTABLISHED);
1546         if (ev1) {
1547                 sk = iso_get_sock_listen(&hdev->bdaddr, bdaddr, iso_match_sid,
1548                                          ev1);
1549                 if (sk)
1550                         iso_pi(sk)->sync_handle = le16_to_cpu(ev1->handle);
1551
1552                 goto done;
1553         }
1554
1555         ev2 = hci_recv_event_data(hdev, HCI_EVT_LE_BIG_INFO_ADV_REPORT);
1556         if (ev2) {
1557                 sk = iso_get_sock_listen(&hdev->bdaddr, bdaddr,
1558                                          iso_match_sync_handle, ev2);
1559                 if (sk) {
1560                         int err;
1561
1562                         if (ev2->num_bis < iso_pi(sk)->bc_num_bis)
1563                                 iso_pi(sk)->bc_num_bis = ev2->num_bis;
1564
1565                         err = hci_le_big_create_sync(hdev,
1566                                                      &iso_pi(sk)->qos,
1567                                                      iso_pi(sk)->sync_handle,
1568                                                      iso_pi(sk)->bc_num_bis,
1569                                                      iso_pi(sk)->bc_bis);
1570                         if (err) {
1571                                 bt_dev_err(hdev, "hci_le_big_create_sync: %d",
1572                                            err);
1573                                 sk = NULL;
1574                         }
1575                 }
1576         } else {
1577                 sk = iso_get_sock_listen(&hdev->bdaddr, BDADDR_ANY, NULL, NULL);
1578         }
1579
1580 done:
1581         if (!sk)
1582                 return lm;
1583
1584         lm |= HCI_LM_ACCEPT;
1585
1586         if (test_bit(BT_SK_DEFER_SETUP, &bt_sk(sk)->flags))
1587                 *flags |= HCI_PROTO_DEFER;
1588
1589         return lm;
1590 }
1591
1592 static void iso_connect_cfm(struct hci_conn *hcon, __u8 status)
1593 {
1594         if (hcon->type != ISO_LINK) {
1595                 if (hcon->type != LE_LINK)
1596                         return;
1597
1598                 /* Check if LE link has failed */
1599                 if (status) {
1600                         if (hcon->link)
1601                                 iso_conn_del(hcon->link, bt_to_errno(status));
1602                         return;
1603                 }
1604
1605                 /* Create CIS if pending */
1606                 hci_le_create_cis(hcon);
1607                 return;
1608         }
1609
1610         BT_DBG("hcon %p bdaddr %pMR status %d", hcon, &hcon->dst, status);
1611
1612         if (!status) {
1613                 struct iso_conn *conn;
1614
1615                 conn = iso_conn_add(hcon);
1616                 if (conn)
1617                         iso_conn_ready(conn);
1618         } else {
1619                 iso_conn_del(hcon, bt_to_errno(status));
1620         }
1621 }
1622
1623 static void iso_disconn_cfm(struct hci_conn *hcon, __u8 reason)
1624 {
1625         if (hcon->type != ISO_LINK)
1626                 return;
1627
1628         BT_DBG("hcon %p reason %d", hcon, reason);
1629
1630         iso_conn_del(hcon, bt_to_errno(reason));
1631 }
1632
1633 void iso_recv(struct hci_conn *hcon, struct sk_buff *skb, u16 flags)
1634 {
1635         struct iso_conn *conn = hcon->iso_data;
1636         __u16 pb, ts, len;
1637
1638         if (!conn)
1639                 goto drop;
1640
1641         pb     = hci_iso_flags_pb(flags);
1642         ts     = hci_iso_flags_ts(flags);
1643
1644         BT_DBG("conn %p len %d pb 0x%x ts 0x%x", conn, skb->len, pb, ts);
1645
1646         switch (pb) {
1647         case ISO_START:
1648         case ISO_SINGLE:
1649                 if (conn->rx_len) {
1650                         BT_ERR("Unexpected start frame (len %d)", skb->len);
1651                         kfree_skb(conn->rx_skb);
1652                         conn->rx_skb = NULL;
1653                         conn->rx_len = 0;
1654                 }
1655
1656                 if (ts) {
1657                         struct hci_iso_ts_data_hdr *hdr;
1658
1659                         /* TODO: add timestamp to the packet? */
1660                         hdr = skb_pull_data(skb, HCI_ISO_TS_DATA_HDR_SIZE);
1661                         if (!hdr) {
1662                                 BT_ERR("Frame is too short (len %d)", skb->len);
1663                                 goto drop;
1664                         }
1665
1666                         len = __le16_to_cpu(hdr->slen);
1667                 } else {
1668                         struct hci_iso_data_hdr *hdr;
1669
1670                         hdr = skb_pull_data(skb, HCI_ISO_DATA_HDR_SIZE);
1671                         if (!hdr) {
1672                                 BT_ERR("Frame is too short (len %d)", skb->len);
1673                                 goto drop;
1674                         }
1675
1676                         len = __le16_to_cpu(hdr->slen);
1677                 }
1678
1679                 flags  = hci_iso_data_flags(len);
1680                 len    = hci_iso_data_len(len);
1681
1682                 BT_DBG("Start: total len %d, frag len %d flags 0x%4.4x", len,
1683                        skb->len, flags);
1684
1685                 if (len == skb->len) {
1686                         /* Complete frame received */
1687                         iso_recv_frame(conn, skb);
1688                         return;
1689                 }
1690
1691                 if (pb == ISO_SINGLE) {
1692                         BT_ERR("Frame malformed (len %d, expected len %d)",
1693                                skb->len, len);
1694                         goto drop;
1695                 }
1696
1697                 if (skb->len > len) {
1698                         BT_ERR("Frame is too long (len %d, expected len %d)",
1699                                skb->len, len);
1700                         goto drop;
1701                 }
1702
1703                 /* Allocate skb for the complete frame (with header) */
1704                 conn->rx_skb = bt_skb_alloc(len, GFP_KERNEL);
1705                 if (!conn->rx_skb)
1706                         goto drop;
1707
1708                 skb_copy_from_linear_data(skb, skb_put(conn->rx_skb, skb->len),
1709                                           skb->len);
1710                 conn->rx_len = len - skb->len;
1711                 break;
1712
1713         case ISO_CONT:
1714                 BT_DBG("Cont: frag len %d (expecting %d)", skb->len,
1715                        conn->rx_len);
1716
1717                 if (!conn->rx_len) {
1718                         BT_ERR("Unexpected continuation frame (len %d)",
1719                                skb->len);
1720                         goto drop;
1721                 }
1722
1723                 if (skb->len > conn->rx_len) {
1724                         BT_ERR("Fragment is too long (len %d, expected %d)",
1725                                skb->len, conn->rx_len);
1726                         kfree_skb(conn->rx_skb);
1727                         conn->rx_skb = NULL;
1728                         conn->rx_len = 0;
1729                         goto drop;
1730                 }
1731
1732                 skb_copy_from_linear_data(skb, skb_put(conn->rx_skb, skb->len),
1733                                           skb->len);
1734                 conn->rx_len -= skb->len;
1735                 return;
1736
1737         case ISO_END:
1738                 skb_copy_from_linear_data(skb, skb_put(conn->rx_skb, skb->len),
1739                                           skb->len);
1740                 conn->rx_len -= skb->len;
1741
1742                 if (!conn->rx_len) {
1743                         struct sk_buff *rx_skb = conn->rx_skb;
1744
1745                         /* Complete frame received. iso_recv_frame
1746                          * takes ownership of the skb so set the global
1747                          * rx_skb pointer to NULL first.
1748                          */
1749                         conn->rx_skb = NULL;
1750                         iso_recv_frame(conn, rx_skb);
1751                 }
1752                 break;
1753         }
1754
1755 drop:
1756         kfree_skb(skb);
1757 }
1758
1759 static struct hci_cb iso_cb = {
1760         .name           = "ISO",
1761         .connect_cfm    = iso_connect_cfm,
1762         .disconn_cfm    = iso_disconn_cfm,
1763 };
1764
1765 static int iso_debugfs_show(struct seq_file *f, void *p)
1766 {
1767         struct sock *sk;
1768
1769         read_lock(&iso_sk_list.lock);
1770
1771         sk_for_each(sk, &iso_sk_list.head) {
1772                 seq_printf(f, "%pMR %pMR %d\n", &iso_pi(sk)->src,
1773                            &iso_pi(sk)->dst, sk->sk_state);
1774         }
1775
1776         read_unlock(&iso_sk_list.lock);
1777
1778         return 0;
1779 }
1780
1781 DEFINE_SHOW_ATTRIBUTE(iso_debugfs);
1782
1783 static struct dentry *iso_debugfs;
1784
1785 static const struct proto_ops iso_sock_ops = {
1786         .family         = PF_BLUETOOTH,
1787         .owner          = THIS_MODULE,
1788         .release        = iso_sock_release,
1789         .bind           = iso_sock_bind,
1790         .connect        = iso_sock_connect,
1791         .listen         = iso_sock_listen,
1792         .accept         = iso_sock_accept,
1793         .getname        = iso_sock_getname,
1794         .sendmsg        = iso_sock_sendmsg,
1795         .recvmsg        = iso_sock_recvmsg,
1796         .poll           = bt_sock_poll,
1797         .ioctl          = bt_sock_ioctl,
1798         .mmap           = sock_no_mmap,
1799         .socketpair     = sock_no_socketpair,
1800         .shutdown       = iso_sock_shutdown,
1801         .setsockopt     = iso_sock_setsockopt,
1802         .getsockopt     = iso_sock_getsockopt
1803 };
1804
1805 static const struct net_proto_family iso_sock_family_ops = {
1806         .family = PF_BLUETOOTH,
1807         .owner  = THIS_MODULE,
1808         .create = iso_sock_create,
1809 };
1810
1811 static bool iso_inited;
1812
1813 bool iso_enabled(void)
1814 {
1815         return iso_inited;
1816 }
1817
1818 int iso_init(void)
1819 {
1820         int err;
1821
1822         BUILD_BUG_ON(sizeof(struct sockaddr_iso) > sizeof(struct sockaddr));
1823
1824         if (iso_inited)
1825                 return -EALREADY;
1826
1827         err = proto_register(&iso_proto, 0);
1828         if (err < 0)
1829                 return err;
1830
1831         err = bt_sock_register(BTPROTO_ISO, &iso_sock_family_ops);
1832         if (err < 0) {
1833                 BT_ERR("ISO socket registration failed");
1834                 goto error;
1835         }
1836
1837         err = bt_procfs_init(&init_net, "iso", &iso_sk_list, NULL);
1838         if (err < 0) {
1839                 BT_ERR("Failed to create ISO proc file");
1840                 bt_sock_unregister(BTPROTO_ISO);
1841                 goto error;
1842         }
1843
1844         BT_INFO("ISO socket layer initialized");
1845
1846         hci_register_cb(&iso_cb);
1847
1848         if (IS_ERR_OR_NULL(bt_debugfs))
1849                 return 0;
1850
1851         if (!iso_debugfs) {
1852                 iso_debugfs = debugfs_create_file("iso", 0444, bt_debugfs,
1853                                                   NULL, &iso_debugfs_fops);
1854         }
1855
1856         iso_inited = true;
1857
1858         return 0;
1859
1860 error:
1861         proto_unregister(&iso_proto);
1862         return err;
1863 }
1864
1865 int iso_exit(void)
1866 {
1867         if (!iso_inited)
1868                 return -EALREADY;
1869
1870         bt_procfs_cleanup(&init_net, "iso");
1871
1872         debugfs_remove(iso_debugfs);
1873         iso_debugfs = NULL;
1874
1875         hci_unregister_cb(&iso_cb);
1876
1877         bt_sock_unregister(BTPROTO_ISO);
1878
1879         proto_unregister(&iso_proto);
1880
1881         iso_inited = false;
1882
1883         return 0;
1884 }