net/bluetooth/sco.c

   1 /*
   2    BlueZ - Bluetooth protocol stack for Linux
   3    Copyright (C) 2000-2001 Qualcomm Incorporated
   4
   5    Written 2000,2001 by Maxim Krasnyansky <maxk@qualcomm.com>
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License version 2 as
   9    published by the Free Software Foundation;
  10
  11    THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
  12    OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  13    FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF THIRD PARTY RIGHTS.
  14    IN NO EVENT SHALL THE COPYRIGHT HOLDER(S) AND AUTHOR(S) BE LIABLE FOR ANY
  15    CLAIM, OR ANY SPECIAL INDIRECT OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES
  16    WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  17    ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  18    OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  19
  20    ALL LIABILITY, INCLUDING LIABILITY FOR INFRINGEMENT OF ANY PATENTS,
  21    COPYRIGHTS, TRADEMARKS OR OTHER RIGHTS, RELATING TO USE OF THIS
  22    SOFTWARE IS DISCLAIMED.
  23 */
  24
  25 /* Bluetooth SCO sockets. */
  26
  27 #include <linux/module.h>
  28
  29 #include <linux/types.h>
  30 #include <linux/errno.h>
  31 #include <linux/kernel.h>
  32 #include <linux/sched.h>
  33 #include <linux/slab.h>
  34 #include <linux/poll.h>
  35 #include <linux/fcntl.h>
  36 #include <linux/init.h>
  37 #include <linux/interrupt.h>
  38 #include <linux/socket.h>
  39 #include <linux/skbuff.h>
  40 #include <linux/device.h>
  41 #include <linux/list.h>
  42 #include <net/sock.h>
  43
  44 #include <asm/system.h>
  45 #include <asm/uaccess.h>
  46
  47 #include <net/bluetooth/bluetooth.h>
  48 #include <net/bluetooth/hci_core.h>
  49 #include <net/bluetooth/sco.h>
  50
  51 #ifndef CONFIG_BT_SCO_DEBUG
  52 #undef  BT_DBG
  53 #define BT_DBG(D...)
  54 #endif
  55
  56 #define VERSION "0.5"
  57
  58 static const struct proto_ops sco_sock_ops;
  59
  60 static struct bt_sock_list sco_sk_list = {
  61         .lock = RW_LOCK_UNLOCKED
  62 };
  63
  64 static void __sco_chan_add(struct sco_conn *conn, struct sock *sk, struct sock *parent);
  65 static void sco_chan_del(struct sock *sk, int err);
  66
  67 static int  sco_conn_del(struct hci_conn *conn, int err);
  68
  69 static void sco_sock_close(struct sock *sk);
  70 static void sco_sock_kill(struct sock *sk);
  71
  72 /* ---- SCO timers ---- */
  73 static void sco_sock_timeout(unsigned long arg)
  74 {
  75         struct sock *sk = (struct sock *) arg;
  76
  77         BT_DBG("sock %p state %d", sk, sk->sk_state);
  78
  79         bh_lock_sock(sk);
  80         sk->sk_err = ETIMEDOUT;
  81         sk->sk_state_change(sk);
  82         bh_unlock_sock(sk);
  83
  84         sco_sock_kill(sk);
  85         sock_put(sk);
  86 }
  87
  88 static void sco_sock_set_timer(struct sock *sk, long timeout)
  89 {
  90         BT_DBG("sock %p state %d timeout %ld", sk, sk->sk_state, timeout);
  91         sk_reset_timer(sk, &sk->sk_timer, jiffies + timeout);
  92 }
  93
  94 static void sco_sock_clear_timer(struct sock *sk)
  95 {
  96         BT_DBG("sock %p state %d", sk, sk->sk_state);
  97         sk_stop_timer(sk, &sk->sk_timer);
  98 }
  99
 100 static void sco_sock_init_timer(struct sock *sk)
 101 {
 102         init_timer(&sk->sk_timer);
 103         sk->sk_timer.function = sco_sock_timeout;
 104         sk->sk_timer.data = (unsigned long)sk;
 105 }
 106
 107 /* ---- SCO connections ---- */
 108 static struct sco_conn *sco_conn_add(struct hci_conn *hcon, __u8 status)
 109 {
 110         struct hci_dev *hdev = hcon->hdev;
 111         struct sco_conn *conn = hcon->sco_data;
 112
 113         if (conn || status)
 114                 return conn;
 115
 116         conn = kzalloc(sizeof(struct sco_conn), GFP_ATOMIC);
 117         if (!conn)
 118                 return NULL;
 119
 120         spin_lock_init(&conn->lock);
 121
 122         hcon->sco_data = conn;
 123         conn->hcon = hcon;
 124
 125         conn->src = &hdev->bdaddr;
 126         conn->dst = &hcon->dst;
 127
 128         if (hdev->sco_mtu > 0)
 129                 conn->mtu = hdev->sco_mtu;
 130         else
 131                 conn->mtu = 60;
 132
 133         BT_DBG("hcon %p conn %p", hcon, conn);
 134
 135         return conn;
 136 }
 137
 138 static inline struct sock *sco_chan_get(struct sco_conn *conn)
 139 {
 140         struct sock *sk = NULL;
 141         sco_conn_lock(conn);
 142         sk = conn->sk;
 143         sco_conn_unlock(conn);
 144         return sk;
 145 }
 146
 147 static int sco_conn_del(struct hci_conn *hcon, int err)
 148 {
 149         struct sco_conn *conn;
 150         struct sock *sk;
 151
 152         if (!(conn = hcon->sco_data))
 153                 return 0;
 154
 155         BT_DBG("hcon %p conn %p, err %d", hcon, conn, err);
 156
 157         /* Kill socket */
 158         if ((sk = sco_chan_get(conn))) {
 159                 bh_lock_sock(sk);
 160                 sco_sock_clear_timer(sk);
 161                 sco_chan_del(sk, err);
 162                 bh_unlock_sock(sk);
 163                 sco_sock_kill(sk);
 164         }
 165
 166         hcon->sco_data = NULL;
 167         kfree(conn);
 168         return 0;
 169 }
 170
 171 static inline int sco_chan_add(struct sco_conn *conn, struct sock *sk, struct sock *parent)
 172 {
 173         int err = 0;
 174
 175         sco_conn_lock(conn);
 176         if (conn->sk) {
 177                 err = -EBUSY;
 178         } else {
 179                 __sco_chan_add(conn, sk, parent);
 180         }
 181         sco_conn_unlock(conn);
 182         return err;
 183 }
 184
 185 static int sco_connect(struct sock *sk)
 186 {
 187         bdaddr_t *src = &bt_sk(sk)->src;
 188         bdaddr_t *dst = &bt_sk(sk)->dst;
 189         struct sco_conn *conn;
 190         struct hci_conn *hcon;
 191         struct hci_dev  *hdev;
 192         int err = 0;
 193
 194         BT_DBG("%s -> %s", batostr(src), batostr(dst));
 195
 196         if (!(hdev = hci_get_route(dst, src)))
 197                 return -EHOSTUNREACH;
 198
 199         hci_dev_lock_bh(hdev);
 200
 201         err = -ENOMEM;
 202
 203         hcon = hci_connect(hdev, SCO_LINK, dst);
 204         if (!hcon)
 205                 goto done;
 206
 207         conn = sco_conn_add(hcon, 0);
 208         if (!conn) {
 209                 hci_conn_put(hcon);
 210                 goto done;
 211         }
 212
 213         /* Update source addr of the socket */
 214         bacpy(src, conn->src);
 215
 216         err = sco_chan_add(conn, sk, NULL);
 217         if (err)
 218                 goto done;
 219
 220         if (hcon->state == BT_CONNECTED) {
 221                 sco_sock_clear_timer(sk);
 222                 sk->sk_state = BT_CONNECTED;
 223         } else {
 224                 sk->sk_state = BT_CONNECT;
 225                 sco_sock_set_timer(sk, sk->sk_sndtimeo);
 226         }
 227 done:
 228         hci_dev_unlock_bh(hdev);
 229         hci_dev_put(hdev);
 230         return err;
 231 }
 232
 233 static inline int sco_send_frame(struct sock *sk, struct msghdr *msg, int len)
 234 {
 235         struct sco_conn *conn = sco_pi(sk)->conn;
 236         struct sk_buff *skb;
 237         int err, count;
 238
 239         /* Check outgoing MTU */
 240         if (len > conn->mtu)
 241                 return -EINVAL;
 242
 243         BT_DBG("sk %p len %d", sk, len);
 244
 245         count = min_t(unsigned int, conn->mtu, len);
 246         if (!(skb = bt_skb_send_alloc(sk, count, msg->msg_flags & MSG_DONTWAIT, &err)))
 247                 return err;
 248
 249         if (memcpy_fromiovec(skb_put(skb, count), msg->msg_iov, count)) {
 250                 err = -EFAULT;
 251                 goto fail;
 252         }
 253
 254         if ((err = hci_send_sco(conn->hcon, skb)) < 0)
 255                 return err;
 256
 257         return count;
 258
 259 fail:
 260         kfree_skb(skb);
 261         return err;
 262 }
 263
 264 static inline void sco_recv_frame(struct sco_conn *conn, struct sk_buff *skb)
 265 {
 266         struct sock *sk = sco_chan_get(conn);
 267
 268         if (!sk)
 269                 goto drop;
 270
 271         BT_DBG("sk %p len %d", sk, skb->len);
 272
 273         if (sk->sk_state != BT_CONNECTED)
 274                 goto drop;
 275
 276         if (!sock_queue_rcv_skb(sk, skb))
 277                 return;
 278
 279 drop:
 280         kfree_skb(skb);
 281         return;
 282 }
 283
 284 /* -------- Socket interface ---------- */
 285 static struct sock *__sco_get_sock_by_addr(bdaddr_t *ba)
 286 {
 287         struct sock *sk;
 288         struct hlist_node *node;
 289
 290         sk_for_each(sk, node, &sco_sk_list.head)
 291                 if (!bacmp(&bt_sk(sk)->src, ba))
 292                         goto found;
 293         sk = NULL;
 294 found:
 295         return sk;
 296 }
 297
 298 /* Find socket listening on source bdaddr.
 299  * Returns closest match.
 300  */
 301 static struct sock *sco_get_sock_listen(bdaddr_t *src)
 302 {
 303         struct sock *sk = NULL, *sk1 = NULL;
 304         struct hlist_node *node;
 305
 306         read_lock(&sco_sk_list.lock);
 307
 308         sk_for_each(sk, node, &sco_sk_list.head) {
 309                 if (sk->sk_state != BT_LISTEN)
 310                         continue;
 311
 312                 /* Exact match. */
 313                 if (!bacmp(&bt_sk(sk)->src, src))
 314                         break;
 315
 316                 /* Closest match */
 317                 if (!bacmp(&bt_sk(sk)->src, BDADDR_ANY))
 318                         sk1 = sk;
 319         }
 320
 321         read_unlock(&sco_sk_list.lock);
 322
 323         return node ? sk : sk1;
 324 }
 325
 326 static void sco_sock_destruct(struct sock *sk)
 327 {
 328         BT_DBG("sk %p", sk);
 329
 330         skb_queue_purge(&sk->sk_receive_queue);
 331         skb_queue_purge(&sk->sk_write_queue);
 332 }
 333
 334 static void sco_sock_cleanup_listen(struct sock *parent)
 335 {
 336         struct sock *sk;
 337
 338         BT_DBG("parent %p", parent);
 339
 340         /* Close not yet accepted channels */
 341         while ((sk = bt_accept_dequeue(parent, NULL))) {
 342                 sco_sock_close(sk);
 343                 sco_sock_kill(sk);
 344         }
 345
 346         parent->sk_state  = BT_CLOSED;
 347         sock_set_flag(parent, SOCK_ZAPPED);
 348 }
 349
 350 /* Kill socket (only if zapped and orphan)
 351  * Must be called on unlocked socket.
 352  */
 353 static void sco_sock_kill(struct sock *sk)
 354 {
 355         if (!sock_flag(sk, SOCK_ZAPPED) || sk->sk_socket)
 356                 return;
 357
 358         BT_DBG("sk %p state %d", sk, sk->sk_state);
 359
 360         /* Kill poor orphan */
 361         bt_sock_unlink(&sco_sk_list, sk);
 362         sock_set_flag(sk, SOCK_DEAD);
 363         sock_put(sk);
 364 }
 365
 366 /* Close socket.
 367  * Must be called on unlocked socket.
 368  */
 369 static void sco_sock_close(struct sock *sk)
 370 {
 371         struct sco_conn *conn;
 372
 373         sco_sock_clear_timer(sk);
 374
 375         lock_sock(sk);
 376
 377         conn = sco_pi(sk)->conn;
 378
 379         BT_DBG("sk %p state %d conn %p socket %p", sk, sk->sk_state, conn, sk->sk_socket);
 380
 381         switch (sk->sk_state) {
 382         case BT_LISTEN:
 383                 sco_sock_cleanup_listen(sk);
 384                 break;
 385
 386         case BT_CONNECTED:
 387         case BT_CONFIG:
 388         case BT_CONNECT:
 389         case BT_DISCONN:
 390                 sco_chan_del(sk, ECONNRESET);
 391                 break;
 392
 393         default:
 394                 sock_set_flag(sk, SOCK_ZAPPED);
 395                 break;
 396         };
 397
 398         release_sock(sk);
 399
 400         sco_sock_kill(sk);
 401 }
 402
 403 static void sco_sock_init(struct sock *sk, struct sock *parent)
 404 {
 405         BT_DBG("sk %p", sk);
 406
 407         if (parent)
 408                 sk->sk_type = parent->sk_type;
 409 }
 410
 411 static struct proto sco_proto = {
 412         .name           = "SCO",
 413         .owner          = THIS_MODULE,
 414         .obj_size       = sizeof(struct sco_pinfo)
 415 };
 416
 417 static struct sock *sco_sock_alloc(struct socket *sock, int proto, gfp_t prio)
 418 {
 419         struct sock *sk;
 420
 421         sk = sk_alloc(PF_BLUETOOTH, prio, &sco_proto, 1);
 422         if (!sk)
 423                 return NULL;
 424
 425         sock_init_data(sock, sk);
 426         INIT_LIST_HEAD(&bt_sk(sk)->accept_q);
 427
 428         sk->sk_destruct = sco_sock_destruct;
 429         sk->sk_sndtimeo = SCO_CONN_TIMEOUT;
 430
 431         sock_reset_flag(sk, SOCK_ZAPPED);
 432
 433         sk->sk_protocol = proto;
 434         sk->sk_state    = BT_OPEN;
 435
 436         sco_sock_init_timer(sk);
 437
 438         bt_sock_link(&sco_sk_list, sk);
 439         return sk;
 440 }
 441
 442 static int sco_sock_create(struct socket *sock, int protocol)
 443 {
 444         struct sock *sk;
 445
 446         BT_DBG("sock %p", sock);
 447
 448         sock->state = SS_UNCONNECTED;
 449
 450         if (sock->type != SOCK_SEQPACKET)
 451                 return -ESOCKTNOSUPPORT;
 452
 453         sock->ops = &sco_sock_ops;
 454
 455         if (!(sk = sco_sock_alloc(sock, protocol, GFP_KERNEL)))
 456                 return -ENOMEM;
 457
 458         sco_sock_init(sk, NULL);
 459         return 0;
 460 }
 461
 462 static int sco_sock_bind(struct socket *sock, struct sockaddr *addr, int addr_len)
 463 {
 464         struct sockaddr_sco *sa = (struct sockaddr_sco *) addr;
 465         struct sock *sk = sock->sk;
 466         bdaddr_t *src = &sa->sco_bdaddr;
 467         int err = 0;
 468
 469         BT_DBG("sk %p %s", sk, batostr(&sa->sco_bdaddr));
 470
 471         if (!addr || addr->sa_family != AF_BLUETOOTH)
 472                 return -EINVAL;
 473
 474         lock_sock(sk);
 475
 476         if (sk->sk_state != BT_OPEN) {
 477                 err = -EBADFD;
 478                 goto done;
 479         }
 480
 481         write_lock_bh(&sco_sk_list.lock);
 482
 483         if (bacmp(src, BDADDR_ANY) && __sco_get_sock_by_addr(src)) {
 484                 err = -EADDRINUSE;
 485         } else {
 486                 /* Save source address */
 487                 bacpy(&bt_sk(sk)->src, &sa->sco_bdaddr);
 488                 sk->sk_state = BT_BOUND;
 489         }
 490
 491         write_unlock_bh(&sco_sk_list.lock);
 492
 493 done:
 494         release_sock(sk);
 495         return err;
 496 }
 497
 498 static int sco_sock_connect(struct socket *sock, struct sockaddr *addr, int alen, int flags)
 499 {
 500         struct sockaddr_sco *sa = (struct sockaddr_sco *) addr;
 501         struct sock *sk = sock->sk;
 502         int err = 0;
 503
 504
 505         BT_DBG("sk %p", sk);
 506
 507         if (addr->sa_family != AF_BLUETOOTH || alen < sizeof(struct sockaddr_sco))
 508                 return -EINVAL;
 509
 510         if (sk->sk_state != BT_OPEN && sk->sk_state != BT_BOUND)
 511                 return -EBADFD;
 512
 513         if (sk->sk_type != SOCK_SEQPACKET)
 514                 return -EINVAL;
 515
 516         lock_sock(sk);
 517
 518         /* Set destination address and psm */
 519         bacpy(&bt_sk(sk)->dst, &sa->sco_bdaddr);
 520
 521         if ((err = sco_connect(sk)))
 522                 goto done;
 523
 524         err = bt_sock_wait_state(sk, BT_CONNECTED,
 525                         sock_sndtimeo(sk, flags & O_NONBLOCK));
 526
 527 done:
 528         release_sock(sk);
 529         return err;
 530 }
 531
 532 static int sco_sock_listen(struct socket *sock, int backlog)
 533 {
 534         struct sock *sk = sock->sk;
 535         int err = 0;
 536
 537         BT_DBG("sk %p backlog %d", sk, backlog);
 538
 539         lock_sock(sk);
 540
 541         if (sk->sk_state != BT_BOUND || sock->type != SOCK_SEQPACKET) {
 542                 err = -EBADFD;
 543                 goto done;
 544         }
 545
 546         sk->sk_max_ack_backlog = backlog;
 547         sk->sk_ack_backlog = 0;
 548         sk->sk_state = BT_LISTEN;
 549
 550 done:
 551         release_sock(sk);
 552         return err;
 553 }
 554
 555 static int sco_sock_accept(struct socket *sock, struct socket *newsock, int flags)
 556 {
 557         DECLARE_WAITQUEUE(wait, current);
 558         struct sock *sk = sock->sk, *ch;
 559         long timeo;
 560         int err = 0;
 561
 562         lock_sock(sk);
 563
 564         if (sk->sk_state != BT_LISTEN) {
 565                 err = -EBADFD;
 566                 goto done;
 567         }
 568
 569         timeo = sock_rcvtimeo(sk, flags & O_NONBLOCK);
 570
 571         BT_DBG("sk %p timeo %ld", sk, timeo);
 572
 573         /* Wait for an incoming connection. (wake-one). */
 574         add_wait_queue_exclusive(sk->sk_sleep, &wait);
 575         while (!(ch = bt_accept_dequeue(sk, newsock))) {
 576                 set_current_state(TASK_INTERRUPTIBLE);
 577                 if (!timeo) {
 578                         err = -EAGAIN;
 579                         break;
 580                 }
 581
 582                 release_sock(sk);
 583                 timeo = schedule_timeout(timeo);
 584                 lock_sock(sk);
 585
 586                 if (sk->sk_state != BT_LISTEN) {
 587                         err = -EBADFD;
 588                         break;
 589                 }
 590
 591                 if (signal_pending(current)) {
 592                         err = sock_intr_errno(timeo);
 593                         break;
 594                 }
 595         }
 596         set_current_state(TASK_RUNNING);
 597         remove_wait_queue(sk->sk_sleep, &wait);
 598
 599         if (err)
 600                 goto done;
 601
 602         newsock->state = SS_CONNECTED;
 603
 604         BT_DBG("new socket %p", ch);
 605
 606 done:
 607         release_sock(sk);
 608         return err;
 609 }
 610
 611 static int sco_sock_getname(struct socket *sock, struct sockaddr *addr, int *len, int peer)
 612 {
 613         struct sockaddr_sco *sa = (struct sockaddr_sco *) addr;
 614         struct sock *sk = sock->sk;
 615
 616         BT_DBG("sock %p, sk %p", sock, sk);
 617
 618         addr->sa_family = AF_BLUETOOTH;
 619         *len = sizeof(struct sockaddr_sco);
 620
 621         if (peer)
 622                 bacpy(&sa->sco_bdaddr, &bt_sk(sk)->dst);
 623         else
 624                 bacpy(&sa->sco_bdaddr, &bt_sk(sk)->src);
 625
 626         return 0;
 627 }
 628
 629 static int sco_sock_sendmsg(struct kiocb *iocb, struct socket *sock,
 630                             struct msghdr *msg, size_t len)
 631 {
 632         struct sock *sk = sock->sk;
 633         int err = 0;
 634
 635         BT_DBG("sock %p, sk %p", sock, sk);
 636
 637         err = sock_error(sk);
 638         if (err)
 639                 return err;
 640
 641         if (msg->msg_flags & MSG_OOB)
 642                 return -EOPNOTSUPP;
 643
 644         lock_sock(sk);
 645
 646         if (sk->sk_state == BT_CONNECTED)
 647                 err = sco_send_frame(sk, msg, len);
 648         else
 649                 err = -ENOTCONN;
 650
 651         release_sock(sk);
 652         return err;
 653 }
 654
 655 static int sco_sock_setsockopt(struct socket *sock, int level, int optname, char __user *optval, int optlen)
 656 {
 657         struct sock *sk = sock->sk;
 658         int err = 0;
 659
 660         BT_DBG("sk %p", sk);
 661
 662         lock_sock(sk);
 663
 664         switch (optname) {
 665         default:
 666                 err = -ENOPROTOOPT;
 667                 break;
 668         }
 669
 670         release_sock(sk);
 671         return err;
 672 }
 673
 674 static int sco_sock_getsockopt(struct socket *sock, int level, int optname, char __user *optval, int __user *optlen)
 675 {
 676         struct sock *sk = sock->sk;
 677         struct sco_options opts;
 678         struct sco_conninfo cinfo;
 679         int len, err = 0;
 680
 681         BT_DBG("sk %p", sk);
 682
 683         if (get_user(len, optlen))
 684                 return -EFAULT;
 685
 686         lock_sock(sk);
 687
 688         switch (optname) {
 689         case SCO_OPTIONS:
 690                 if (sk->sk_state != BT_CONNECTED) {
 691                         err = -ENOTCONN;
 692                         break;
 693                 }
 694
 695                 opts.mtu = sco_pi(sk)->conn->mtu;
 696
 697                 BT_DBG("mtu %d", opts.mtu);
 698
 699                 len = min_t(unsigned int, len, sizeof(opts));
 700                 if (copy_to_user(optval, (char *)&opts, len))
 701                         err = -EFAULT;
 702
 703                 break;
 704
 705         case SCO_CONNINFO:
 706                 if (sk->sk_state != BT_CONNECTED) {
 707                         err = -ENOTCONN;
 708                         break;
 709                 }
 710
 711                 cinfo.hci_handle = sco_pi(sk)->conn->hcon->handle;
 712                 memcpy(cinfo.dev_class, sco_pi(sk)->conn->hcon->dev_class, 3);
 713
 714                 len = min_t(unsigned int, len, sizeof(cinfo));
 715                 if (copy_to_user(optval, (char *)&cinfo, len))
 716                         err = -EFAULT;
 717
 718                 break;
 719
 720         default:
 721                 err = -ENOPROTOOPT;
 722                 break;
 723         }
 724
 725         release_sock(sk);
 726         return err;
 727 }
 728
 729 static int sco_sock_release(struct socket *sock)
 730 {
 731         struct sock *sk = sock->sk;
 732         int err = 0;
 733
 734         BT_DBG("sock %p, sk %p", sock, sk);
 735
 736         if (!sk)
 737                 return 0;
 738
 739         sco_sock_close(sk);
 740
 741         if (sock_flag(sk, SOCK_LINGER) && sk->sk_lingertime) {
 742                 lock_sock(sk);
 743                 err = bt_sock_wait_state(sk, BT_CLOSED, sk->sk_lingertime);
 744                 release_sock(sk);
 745         }
 746
 747         sock_orphan(sk);
 748         sco_sock_kill(sk);
 749         return err;
 750 }
 751
 752 static void __sco_chan_add(struct sco_conn *conn, struct sock *sk, struct sock *parent)
 753 {
 754         BT_DBG("conn %p", conn);
 755
 756         sco_pi(sk)->conn = conn;
 757         conn->sk = sk;
 758
 759         if (parent)
 760                 bt_accept_enqueue(parent, sk);
 761 }
 762
 763 /* Delete channel.
 764  * Must be called on the locked socket. */
 765 static void sco_chan_del(struct sock *sk, int err)
 766 {
 767         struct sco_conn *conn;
 768
 769         conn = sco_pi(sk)->conn;
 770
 771         BT_DBG("sk %p, conn %p, err %d", sk, conn, err);
 772
 773         if (conn) {
 774                 sco_conn_lock(conn);
 775                 conn->sk = NULL;
 776                 sco_pi(sk)->conn = NULL;
 777                 sco_conn_unlock(conn);
 778                 hci_conn_put(conn->hcon);
 779         }
 780
 781         sk->sk_state = BT_CLOSED;
 782         sk->sk_err   = err;
 783         sk->sk_state_change(sk);
 784
 785         sock_set_flag(sk, SOCK_ZAPPED);
 786 }
 787
 788 static void sco_conn_ready(struct sco_conn *conn)
 789 {
 790         struct sock *parent, *sk;
 791
 792         BT_DBG("conn %p", conn);
 793
 794         sco_conn_lock(conn);
 795
 796         if ((sk = conn->sk)) {
 797                 sco_sock_clear_timer(sk);
 798                 bh_lock_sock(sk);
 799                 sk->sk_state = BT_CONNECTED;
 800                 sk->sk_state_change(sk);
 801                 bh_unlock_sock(sk);
 802         } else {
 803                 parent = sco_get_sock_listen(conn->src);
 804                 if (!parent)
 805                         goto done;
 806
 807                 bh_lock_sock(parent);
 808
 809                 sk = sco_sock_alloc(NULL, BTPROTO_SCO, GFP_ATOMIC);
 810                 if (!sk) {
 811                         bh_unlock_sock(parent);
 812                         goto done;
 813                 }
 814
 815                 sco_sock_init(sk, parent);
 816
 817                 bacpy(&bt_sk(sk)->src, conn->src);
 818                 bacpy(&bt_sk(sk)->dst, conn->dst);
 819
 820                 hci_conn_hold(conn->hcon);
 821                 __sco_chan_add(conn, sk, parent);
 822
 823                 sk->sk_state = BT_CONNECTED;
 824
 825                 /* Wake up parent */
 826                 parent->sk_data_ready(parent, 1);
 827
 828                 bh_unlock_sock(parent);
 829         }
 830
 831 done:
 832         sco_conn_unlock(conn);
 833 }
 834
 835 /* ----- SCO interface with lower layer (HCI) ----- */
 836 static int sco_connect_ind(struct hci_dev *hdev, bdaddr_t *bdaddr, __u8 type)
 837 {
 838         BT_DBG("hdev %s, bdaddr %s", hdev->name, batostr(bdaddr));
 839
 840         /* Always accept connection */
 841         return HCI_LM_ACCEPT;
 842 }
 843
 844 static int sco_connect_cfm(struct hci_conn *hcon, __u8 status)
 845 {
 846         BT_DBG("hcon %p bdaddr %s status %d", hcon, batostr(&hcon->dst), status);
 847
 848         if (hcon->type != SCO_LINK)
 849                 return 0;
 850
 851         if (!status) {
 852                 struct sco_conn *conn;
 853
 854                 conn = sco_conn_add(hcon, status);
 855                 if (conn)
 856                         sco_conn_ready(conn);
 857         } else
 858                 sco_conn_del(hcon, bt_err(status));
 859
 860         return 0;
 861 }
 862
 863 static int sco_disconn_ind(struct hci_conn *hcon, __u8 reason)
 864 {
 865         BT_DBG("hcon %p reason %d", hcon, reason);
 866
 867         if (hcon->type != SCO_LINK)
 868                 return 0;
 869
 870         sco_conn_del(hcon, bt_err(reason));
 871         return 0;
 872 }
 873
 874 static int sco_recv_scodata(struct hci_conn *hcon, struct sk_buff *skb)
 875 {
 876         struct sco_conn *conn = hcon->sco_data;
 877
 878         if (!conn)
 879                 goto drop;
 880
 881         BT_DBG("conn %p len %d", conn, skb->len);
 882
 883         if (skb->len) {
 884                 sco_recv_frame(conn, skb);
 885                 return 0;
 886         }
 887
 888 drop:
 889         kfree_skb(skb);
 890         return 0;
 891 }
 892
 893 static ssize_t sco_sysfs_show(struct class *dev, char *buf)
 894 {
 895         struct sock *sk;
 896         struct hlist_node *node;
 897         char *str = buf;
 898
 899         read_lock_bh(&sco_sk_list.lock);
 900
 901         sk_for_each(sk, node, &sco_sk_list.head) {
 902                 str += sprintf(str, "%s %s %d\n",
 903                                 batostr(&bt_sk(sk)->src), batostr(&bt_sk(sk)->dst),
 904                                 sk->sk_state);
 905         }
 906
 907         read_unlock_bh(&sco_sk_list.lock);
 908
 909         return (str - buf);
 910 }
 911
 912 static CLASS_ATTR(sco, S_IRUGO, sco_sysfs_show, NULL);
 913
 914 static const struct proto_ops sco_sock_ops = {
 915         .family         = PF_BLUETOOTH,
 916         .owner          = THIS_MODULE,
 917         .release        = sco_sock_release,
 918         .bind           = sco_sock_bind,
 919         .connect        = sco_sock_connect,
 920         .listen         = sco_sock_listen,
 921         .accept         = sco_sock_accept,
 922         .getname        = sco_sock_getname,
 923         .sendmsg        = sco_sock_sendmsg,
 924         .recvmsg        = bt_sock_recvmsg,
 925         .poll           = bt_sock_poll,
 926         .ioctl          = sock_no_ioctl,
 927         .mmap           = sock_no_mmap,
 928         .socketpair     = sock_no_socketpair,
 929         .shutdown       = sock_no_shutdown,
 930         .setsockopt     = sco_sock_setsockopt,
 931         .getsockopt     = sco_sock_getsockopt
 932 };
 933
 934 static struct net_proto_family sco_sock_family_ops = {
 935         .family = PF_BLUETOOTH,
 936         .owner  = THIS_MODULE,
 937         .create = sco_sock_create,
 938 };
 939
 940 static struct hci_proto sco_hci_proto = {
 941         .name           = "SCO",
 942         .id             = HCI_PROTO_SCO,
 943         .connect_ind    = sco_connect_ind,
 944         .connect_cfm    = sco_connect_cfm,
 945         .disconn_ind    = sco_disconn_ind,
 946         .recv_scodata   = sco_recv_scodata
 947 };
 948
 949 static int __init sco_init(void)
 950 {
 951         int err;
 952
 953         err = proto_register(&sco_proto, 0);
 954         if (err < 0)
 955                 return err;
 956
 957         err = bt_sock_register(BTPROTO_SCO, &sco_sock_family_ops);
 958         if (err < 0) {
 959                 BT_ERR("SCO socket registration failed");
 960                 goto error;
 961         }
 962
 963         err = hci_register_proto(&sco_hci_proto);
 964         if (err < 0) {
 965                 BT_ERR("SCO protocol registration failed");
 966                 bt_sock_unregister(BTPROTO_SCO);
 967                 goto error;
 968         }
 969
 970         class_create_file(bt_class, &class_attr_sco);
 971
 972         BT_INFO("SCO (Voice Link) ver %s", VERSION);
 973         BT_INFO("SCO socket layer initialized");
 974
 975         return 0;
 976
 977 error:
 978         proto_unregister(&sco_proto);
 979         return err;
 980 }
 981
 982 static void __exit sco_exit(void)
 983 {
 984         class_remove_file(bt_class, &class_attr_sco);
 985
 986         if (bt_sock_unregister(BTPROTO_SCO) < 0)
 987                 BT_ERR("SCO socket unregistration failed");
 988
 989         if (hci_unregister_proto(&sco_hci_proto) < 0)
 990                 BT_ERR("SCO protocol unregistration failed");
 991
 992         proto_unregister(&sco_proto);
 993 }
 994
 995 module_init(sco_init);
 996 module_exit(sco_exit);
 997
 998 MODULE_AUTHOR("Maxim Krasnyansky <maxk@qualcomm.com>, Marcel Holtmann <marcel@holtmann.org>");
 999 MODULE_DESCRIPTION("Bluetooth SCO ver " VERSION);
1000 MODULE_VERSION(VERSION);
1001 MODULE_LICENSE("GPL");
1002 MODULE_ALIAS("bt-proto-2");