net/bluetooth/hci_sock.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 HCI sockets. */
  26 #include <linux/compat.h>
  27 #include <linux/export.h>
  28 #include <linux/utsname.h>
  29 #include <linux/sched.h>
  30 #include <asm/unaligned.h>
  31
  32 #include <net/bluetooth/bluetooth.h>
  33 #include <net/bluetooth/hci_core.h>
  34 #include <net/bluetooth/hci_mon.h>
  35 #include <net/bluetooth/mgmt.h>
  36
  37 #include "mgmt_util.h"
  38
  39 static LIST_HEAD(mgmt_chan_list);
  40 static DEFINE_MUTEX(mgmt_chan_list_lock);
  41
  42 static DEFINE_IDA(sock_cookie_ida);
  43
  44 static atomic_t monitor_promisc = ATOMIC_INIT(0);
  45
  46 /* ----- HCI socket interface ----- */
  47
  48 /* Socket info */
  49 #define hci_pi(sk) ((struct hci_pinfo *) sk)
  50
  51 struct hci_pinfo {
  52         struct bt_sock    bt;
  53         struct hci_dev    *hdev;
  54         struct hci_filter filter;
  55         __u8              cmsg_mask;
  56         unsigned short    channel;
  57         unsigned long     flags;
  58         __u32             cookie;
  59         char              comm[TASK_COMM_LEN];
  60         __u16             mtu;
  61 };
  62
  63 static struct hci_dev *hci_hdev_from_sock(struct sock *sk)
  64 {
  65         struct hci_dev *hdev = hci_pi(sk)->hdev;
  66
  67         if (!hdev)
  68                 return ERR_PTR(-EBADFD);
  69         if (hci_dev_test_flag(hdev, HCI_UNREGISTER))
  70                 return ERR_PTR(-EPIPE);
  71         return hdev;
  72 }
  73
  74 void hci_sock_set_flag(struct sock *sk, int nr)
  75 {
  76         set_bit(nr, &hci_pi(sk)->flags);
  77 }
  78
  79 void hci_sock_clear_flag(struct sock *sk, int nr)
  80 {
  81         clear_bit(nr, &hci_pi(sk)->flags);
  82 }
  83
  84 int hci_sock_test_flag(struct sock *sk, int nr)
  85 {
  86         return test_bit(nr, &hci_pi(sk)->flags);
  87 }
  88
  89 unsigned short hci_sock_get_channel(struct sock *sk)
  90 {
  91         return hci_pi(sk)->channel;
  92 }
  93
  94 u32 hci_sock_get_cookie(struct sock *sk)
  95 {
  96         return hci_pi(sk)->cookie;
  97 }
  98
  99 static bool hci_sock_gen_cookie(struct sock *sk)
 100 {
 101         int id = hci_pi(sk)->cookie;
 102
 103         if (!id) {
 104                 id = ida_simple_get(&sock_cookie_ida, 1, 0, GFP_KERNEL);
 105                 if (id < 0)
 106                         id = 0xffffffff;
 107
 108                 hci_pi(sk)->cookie = id;
 109                 get_task_comm(hci_pi(sk)->comm, current);
 110                 return true;
 111         }
 112
 113         return false;
 114 }
 115
 116 static void hci_sock_free_cookie(struct sock *sk)
 117 {
 118         int id = hci_pi(sk)->cookie;
 119
 120         if (id) {
 121                 hci_pi(sk)->cookie = 0xffffffff;
 122                 ida_simple_remove(&sock_cookie_ida, id);
 123         }
 124 }
 125
 126 static inline int hci_test_bit(int nr, const void *addr)
 127 {
 128         return *((const __u32 *) addr + (nr >> 5)) & ((__u32) 1 << (nr & 31));
 129 }
 130
 131 /* Security filter */
 132 #define HCI_SFLT_MAX_OGF  5
 133
 134 struct hci_sec_filter {
 135         __u32 type_mask;
 136         __u32 event_mask[2];
 137         __u32 ocf_mask[HCI_SFLT_MAX_OGF + 1][4];
 138 };
 139
 140 static const struct hci_sec_filter hci_sec_filter = {
 141         /* Packet types */
 142         0x10,
 143         /* Events */
 144         { 0x1000d9fe, 0x0000b00c },
 145         /* Commands */
 146         {
 147                 { 0x0 },
 148                 /* OGF_LINK_CTL */
 149                 { 0xbe000006, 0x00000001, 0x00000000, 0x00 },
 150                 /* OGF_LINK_POLICY */
 151                 { 0x00005200, 0x00000000, 0x00000000, 0x00 },
 152                 /* OGF_HOST_CTL */
 153                 { 0xaab00200, 0x2b402aaa, 0x05220154, 0x00 },
 154                 /* OGF_INFO_PARAM */
 155                 { 0x000002be, 0x00000000, 0x00000000, 0x00 },
 156                 /* OGF_STATUS_PARAM */
 157                 { 0x000000ea, 0x00000000, 0x00000000, 0x00 }
 158         }
 159 };
 160
 161 static struct bt_sock_list hci_sk_list = {
 162         .lock = __RW_LOCK_UNLOCKED(hci_sk_list.lock)
 163 };
 164
 165 static bool is_filtered_packet(struct sock *sk, struct sk_buff *skb)
 166 {
 167         struct hci_filter *flt;
 168         int flt_type, flt_event;
 169
 170         /* Apply filter */
 171         flt = &hci_pi(sk)->filter;
 172
 173         flt_type = hci_skb_pkt_type(skb) & HCI_FLT_TYPE_BITS;
 174
 175         if (!test_bit(flt_type, &flt->type_mask))
 176                 return true;
 177
 178         /* Extra filter for event packets only */
 179         if (hci_skb_pkt_type(skb) != HCI_EVENT_PKT)
 180                 return false;
 181
 182         flt_event = (*(__u8 *)skb->data & HCI_FLT_EVENT_BITS);
 183
 184         if (!hci_test_bit(flt_event, &flt->event_mask))
 185                 return true;
 186
 187         /* Check filter only when opcode is set */
 188         if (!flt->opcode)
 189                 return false;
 190
 191         if (flt_event == HCI_EV_CMD_COMPLETE &&
 192             flt->opcode != get_unaligned((__le16 *)(skb->data + 3)))
 193                 return true;
 194
 195         if (flt_event == HCI_EV_CMD_STATUS &&
 196             flt->opcode != get_unaligned((__le16 *)(skb->data + 4)))
 197                 return true;
 198
 199         return false;
 200 }
 201
 202 /* Send frame to RAW socket */
 203 void hci_send_to_sock(struct hci_dev *hdev, struct sk_buff *skb)
 204 {
 205         struct sock *sk;
 206         struct sk_buff *skb_copy = NULL;
 207
 208         BT_DBG("hdev %p len %d", hdev, skb->len);
 209
 210         read_lock(&hci_sk_list.lock);
 211
 212         sk_for_each(sk, &hci_sk_list.head) {
 213                 struct sk_buff *nskb;
 214
 215                 if (sk->sk_state != BT_BOUND || hci_pi(sk)->hdev != hdev)
 216                         continue;
 217
 218                 /* Don't send frame to the socket it came from */
 219                 if (skb->sk == sk)
 220                         continue;
 221
 222                 if (hci_pi(sk)->channel == HCI_CHANNEL_RAW) {
 223                         if (hci_skb_pkt_type(skb) != HCI_COMMAND_PKT &&
 224                             hci_skb_pkt_type(skb) != HCI_EVENT_PKT &&
 225                             hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
 226                             hci_skb_pkt_type(skb) != HCI_SCODATA_PKT &&
 227                             hci_skb_pkt_type(skb) != HCI_ISODATA_PKT)
 228                                 continue;
 229                         if (is_filtered_packet(sk, skb))
 230                                 continue;
 231                 } else if (hci_pi(sk)->channel == HCI_CHANNEL_USER) {
 232                         if (!bt_cb(skb)->incoming)
 233                                 continue;
 234                         if (hci_skb_pkt_type(skb) != HCI_EVENT_PKT &&
 235                             hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
 236                             hci_skb_pkt_type(skb) != HCI_SCODATA_PKT &&
 237                             hci_skb_pkt_type(skb) != HCI_ISODATA_PKT)
 238                                 continue;
 239                 } else {
 240                         /* Don't send frame to other channel types */
 241                         continue;
 242                 }
 243
 244                 if (!skb_copy) {
 245                         /* Create a private copy with headroom */
 246                         skb_copy = __pskb_copy_fclone(skb, 1, GFP_ATOMIC, true);
 247                         if (!skb_copy)
 248                                 continue;
 249
 250                         /* Put type byte before the data */
 251                         memcpy(skb_push(skb_copy, 1), &hci_skb_pkt_type(skb), 1);
 252                 }
 253
 254                 nskb = skb_clone(skb_copy, GFP_ATOMIC);
 255                 if (!nskb)
 256                         continue;
 257
 258                 if (sock_queue_rcv_skb(sk, nskb))
 259                         kfree_skb(nskb);
 260         }
 261
 262         read_unlock(&hci_sk_list.lock);
 263
 264         kfree_skb(skb_copy);
 265 }
 266
 267 /* Send frame to sockets with specific channel */
 268 static void __hci_send_to_channel(unsigned short channel, struct sk_buff *skb,
 269                                   int flag, struct sock *skip_sk)
 270 {
 271         struct sock *sk;
 272
 273         BT_DBG("channel %u len %d", channel, skb->len);
 274
 275         sk_for_each(sk, &hci_sk_list.head) {
 276                 struct sk_buff *nskb;
 277
 278                 /* Ignore socket without the flag set */
 279                 if (!hci_sock_test_flag(sk, flag))
 280                         continue;
 281
 282                 /* Skip the original socket */
 283                 if (sk == skip_sk)
 284                         continue;
 285
 286                 if (sk->sk_state != BT_BOUND)
 287                         continue;
 288
 289                 if (hci_pi(sk)->channel != channel)
 290                         continue;
 291
 292                 nskb = skb_clone(skb, GFP_ATOMIC);
 293                 if (!nskb)
 294                         continue;
 295
 296                 if (sock_queue_rcv_skb(sk, nskb))
 297                         kfree_skb(nskb);
 298         }
 299
 300 }
 301
 302 void hci_send_to_channel(unsigned short channel, struct sk_buff *skb,
 303                          int flag, struct sock *skip_sk)
 304 {
 305         read_lock(&hci_sk_list.lock);
 306         __hci_send_to_channel(channel, skb, flag, skip_sk);
 307         read_unlock(&hci_sk_list.lock);
 308 }
 309
 310 /* Send frame to monitor socket */
 311 void hci_send_to_monitor(struct hci_dev *hdev, struct sk_buff *skb)
 312 {
 313         struct sk_buff *skb_copy = NULL;
 314         struct hci_mon_hdr *hdr;
 315         __le16 opcode;
 316
 317         if (!atomic_read(&monitor_promisc))
 318                 return;
 319
 320         BT_DBG("hdev %p len %d", hdev, skb->len);
 321
 322         switch (hci_skb_pkt_type(skb)) {
 323         case HCI_COMMAND_PKT:
 324                 opcode = cpu_to_le16(HCI_MON_COMMAND_PKT);
 325                 break;
 326         case HCI_EVENT_PKT:
 327                 opcode = cpu_to_le16(HCI_MON_EVENT_PKT);
 328                 break;
 329         case HCI_ACLDATA_PKT:
 330                 if (bt_cb(skb)->incoming)
 331                         opcode = cpu_to_le16(HCI_MON_ACL_RX_PKT);
 332                 else
 333                         opcode = cpu_to_le16(HCI_MON_ACL_TX_PKT);
 334                 break;
 335         case HCI_SCODATA_PKT:
 336                 if (bt_cb(skb)->incoming)
 337                         opcode = cpu_to_le16(HCI_MON_SCO_RX_PKT);
 338                 else
 339                         opcode = cpu_to_le16(HCI_MON_SCO_TX_PKT);
 340                 break;
 341         case HCI_ISODATA_PKT:
 342                 if (bt_cb(skb)->incoming)
 343                         opcode = cpu_to_le16(HCI_MON_ISO_RX_PKT);
 344                 else
 345                         opcode = cpu_to_le16(HCI_MON_ISO_TX_PKT);
 346                 break;
 347         case HCI_DIAG_PKT:
 348                 opcode = cpu_to_le16(HCI_MON_VENDOR_DIAG);
 349                 break;
 350         default:
 351                 return;
 352         }
 353
 354         /* Create a private copy with headroom */
 355         skb_copy = __pskb_copy_fclone(skb, HCI_MON_HDR_SIZE, GFP_ATOMIC, true);
 356         if (!skb_copy)
 357                 return;
 358
 359         /* Put header before the data */
 360         hdr = skb_push(skb_copy, HCI_MON_HDR_SIZE);
 361         hdr->opcode = opcode;
 362         hdr->index = cpu_to_le16(hdev->id);
 363         hdr->len = cpu_to_le16(skb->len);
 364
 365         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb_copy,
 366                             HCI_SOCK_TRUSTED, NULL);
 367         kfree_skb(skb_copy);
 368 }
 369
 370 void hci_send_monitor_ctrl_event(struct hci_dev *hdev, u16 event,
 371                                  void *data, u16 data_len, ktime_t tstamp,
 372                                  int flag, struct sock *skip_sk)
 373 {
 374         struct sock *sk;
 375         __le16 index;
 376
 377         if (hdev)
 378                 index = cpu_to_le16(hdev->id);
 379         else
 380                 index = cpu_to_le16(MGMT_INDEX_NONE);
 381
 382         read_lock(&hci_sk_list.lock);
 383
 384         sk_for_each(sk, &hci_sk_list.head) {
 385                 struct hci_mon_hdr *hdr;
 386                 struct sk_buff *skb;
 387
 388                 if (hci_pi(sk)->channel != HCI_CHANNEL_CONTROL)
 389                         continue;
 390
 391                 /* Ignore socket without the flag set */
 392                 if (!hci_sock_test_flag(sk, flag))
 393                         continue;
 394
 395                 /* Skip the original socket */
 396                 if (sk == skip_sk)
 397                         continue;
 398
 399                 skb = bt_skb_alloc(6 + data_len, GFP_ATOMIC);
 400                 if (!skb)
 401                         continue;
 402
 403                 put_unaligned_le32(hci_pi(sk)->cookie, skb_put(skb, 4));
 404                 put_unaligned_le16(event, skb_put(skb, 2));
 405
 406                 if (data)
 407                         skb_put_data(skb, data, data_len);
 408
 409                 skb->tstamp = tstamp;
 410
 411                 hdr = skb_push(skb, HCI_MON_HDR_SIZE);
 412                 hdr->opcode = cpu_to_le16(HCI_MON_CTRL_EVENT);
 413                 hdr->index = index;
 414                 hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
 415
 416                 __hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
 417                                       HCI_SOCK_TRUSTED, NULL);
 418                 kfree_skb(skb);
 419         }
 420
 421         read_unlock(&hci_sk_list.lock);
 422 }
 423
 424 static struct sk_buff *create_monitor_event(struct hci_dev *hdev, int event)
 425 {
 426         struct hci_mon_hdr *hdr;
 427         struct hci_mon_new_index *ni;
 428         struct hci_mon_index_info *ii;
 429         struct sk_buff *skb;
 430         __le16 opcode;
 431
 432         switch (event) {
 433         case HCI_DEV_REG:
 434                 skb = bt_skb_alloc(HCI_MON_NEW_INDEX_SIZE, GFP_ATOMIC);
 435                 if (!skb)
 436                         return NULL;
 437
 438                 ni = skb_put(skb, HCI_MON_NEW_INDEX_SIZE);
 439                 ni->type = hdev->dev_type;
 440                 ni->bus = hdev->bus;
 441                 bacpy(&ni->bdaddr, &hdev->bdaddr);
 442                 memcpy(ni->name, hdev->name, 8);
 443
 444                 opcode = cpu_to_le16(HCI_MON_NEW_INDEX);
 445                 break;
 446
 447         case HCI_DEV_UNREG:
 448                 skb = bt_skb_alloc(0, GFP_ATOMIC);
 449                 if (!skb)
 450                         return NULL;
 451
 452                 opcode = cpu_to_le16(HCI_MON_DEL_INDEX);
 453                 break;
 454
 455         case HCI_DEV_SETUP:
 456                 if (hdev->manufacturer == 0xffff)
 457                         return NULL;
 458                 fallthrough;
 459
 460         case HCI_DEV_UP:
 461                 skb = bt_skb_alloc(HCI_MON_INDEX_INFO_SIZE, GFP_ATOMIC);
 462                 if (!skb)
 463                         return NULL;
 464
 465                 ii = skb_put(skb, HCI_MON_INDEX_INFO_SIZE);
 466                 bacpy(&ii->bdaddr, &hdev->bdaddr);
 467                 ii->manufacturer = cpu_to_le16(hdev->manufacturer);
 468
 469                 opcode = cpu_to_le16(HCI_MON_INDEX_INFO);
 470                 break;
 471
 472         case HCI_DEV_OPEN:
 473                 skb = bt_skb_alloc(0, GFP_ATOMIC);
 474                 if (!skb)
 475                         return NULL;
 476
 477                 opcode = cpu_to_le16(HCI_MON_OPEN_INDEX);
 478                 break;
 479
 480         case HCI_DEV_CLOSE:
 481                 skb = bt_skb_alloc(0, GFP_ATOMIC);
 482                 if (!skb)
 483                         return NULL;
 484
 485                 opcode = cpu_to_le16(HCI_MON_CLOSE_INDEX);
 486                 break;
 487
 488         default:
 489                 return NULL;
 490         }
 491
 492         __net_timestamp(skb);
 493
 494         hdr = skb_push(skb, HCI_MON_HDR_SIZE);
 495         hdr->opcode = opcode;
 496         hdr->index = cpu_to_le16(hdev->id);
 497         hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
 498
 499         return skb;
 500 }
 501
 502 static struct sk_buff *create_monitor_ctrl_open(struct sock *sk)
 503 {
 504         struct hci_mon_hdr *hdr;
 505         struct sk_buff *skb;
 506         u16 format;
 507         u8 ver[3];
 508         u32 flags;
 509
 510         /* No message needed when cookie is not present */
 511         if (!hci_pi(sk)->cookie)
 512                 return NULL;
 513
 514         switch (hci_pi(sk)->channel) {
 515         case HCI_CHANNEL_RAW:
 516                 format = 0x0000;
 517                 ver[0] = BT_SUBSYS_VERSION;
 518                 put_unaligned_le16(BT_SUBSYS_REVISION, ver + 1);
 519                 break;
 520         case HCI_CHANNEL_USER:
 521                 format = 0x0001;
 522                 ver[0] = BT_SUBSYS_VERSION;
 523                 put_unaligned_le16(BT_SUBSYS_REVISION, ver + 1);
 524                 break;
 525         case HCI_CHANNEL_CONTROL:
 526                 format = 0x0002;
 527                 mgmt_fill_version_info(ver);
 528                 break;
 529         default:
 530                 /* No message for unsupported format */
 531                 return NULL;
 532         }
 533
 534         skb = bt_skb_alloc(14 + TASK_COMM_LEN , GFP_ATOMIC);
 535         if (!skb)
 536                 return NULL;
 537
 538         flags = hci_sock_test_flag(sk, HCI_SOCK_TRUSTED) ? 0x1 : 0x0;
 539
 540         put_unaligned_le32(hci_pi(sk)->cookie, skb_put(skb, 4));
 541         put_unaligned_le16(format, skb_put(skb, 2));
 542         skb_put_data(skb, ver, sizeof(ver));
 543         put_unaligned_le32(flags, skb_put(skb, 4));
 544         skb_put_u8(skb, TASK_COMM_LEN);
 545         skb_put_data(skb, hci_pi(sk)->comm, TASK_COMM_LEN);
 546
 547         __net_timestamp(skb);
 548
 549         hdr = skb_push(skb, HCI_MON_HDR_SIZE);
 550         hdr->opcode = cpu_to_le16(HCI_MON_CTRL_OPEN);
 551         if (hci_pi(sk)->hdev)
 552                 hdr->index = cpu_to_le16(hci_pi(sk)->hdev->id);
 553         else
 554                 hdr->index = cpu_to_le16(HCI_DEV_NONE);
 555         hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
 556
 557         return skb;
 558 }
 559
 560 static struct sk_buff *create_monitor_ctrl_close(struct sock *sk)
 561 {
 562         struct hci_mon_hdr *hdr;
 563         struct sk_buff *skb;
 564
 565         /* No message needed when cookie is not present */
 566         if (!hci_pi(sk)->cookie)
 567                 return NULL;
 568
 569         switch (hci_pi(sk)->channel) {
 570         case HCI_CHANNEL_RAW:
 571         case HCI_CHANNEL_USER:
 572         case HCI_CHANNEL_CONTROL:
 573                 break;
 574         default:
 575                 /* No message for unsupported format */
 576                 return NULL;
 577         }
 578
 579         skb = bt_skb_alloc(4, GFP_ATOMIC);
 580         if (!skb)
 581                 return NULL;
 582
 583         put_unaligned_le32(hci_pi(sk)->cookie, skb_put(skb, 4));
 584
 585         __net_timestamp(skb);
 586
 587         hdr = skb_push(skb, HCI_MON_HDR_SIZE);
 588         hdr->opcode = cpu_to_le16(HCI_MON_CTRL_CLOSE);
 589         if (hci_pi(sk)->hdev)
 590                 hdr->index = cpu_to_le16(hci_pi(sk)->hdev->id);
 591         else
 592                 hdr->index = cpu_to_le16(HCI_DEV_NONE);
 593         hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
 594
 595         return skb;
 596 }
 597
 598 static struct sk_buff *create_monitor_ctrl_command(struct sock *sk, u16 index,
 599                                                    u16 opcode, u16 len,
 600                                                    const void *buf)
 601 {
 602         struct hci_mon_hdr *hdr;
 603         struct sk_buff *skb;
 604
 605         skb = bt_skb_alloc(6 + len, GFP_ATOMIC);
 606         if (!skb)
 607                 return NULL;
 608
 609         put_unaligned_le32(hci_pi(sk)->cookie, skb_put(skb, 4));
 610         put_unaligned_le16(opcode, skb_put(skb, 2));
 611
 612         if (buf)
 613                 skb_put_data(skb, buf, len);
 614
 615         __net_timestamp(skb);
 616
 617         hdr = skb_push(skb, HCI_MON_HDR_SIZE);
 618         hdr->opcode = cpu_to_le16(HCI_MON_CTRL_COMMAND);
 619         hdr->index = cpu_to_le16(index);
 620         hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
 621
 622         return skb;
 623 }
 624
 625 static void __printf(2, 3)
 626 send_monitor_note(struct sock *sk, const char *fmt, ...)
 627 {
 628         size_t len;
 629         struct hci_mon_hdr *hdr;
 630         struct sk_buff *skb;
 631         va_list args;
 632
 633         va_start(args, fmt);
 634         len = vsnprintf(NULL, 0, fmt, args);
 635         va_end(args);
 636
 637         skb = bt_skb_alloc(len + 1, GFP_ATOMIC);
 638         if (!skb)
 639                 return;
 640
 641         va_start(args, fmt);
 642         vsprintf(skb_put(skb, len), fmt, args);
 643         *(u8 *)skb_put(skb, 1) = 0;
 644         va_end(args);
 645
 646         __net_timestamp(skb);
 647
 648         hdr = (void *)skb_push(skb, HCI_MON_HDR_SIZE);
 649         hdr->opcode = cpu_to_le16(HCI_MON_SYSTEM_NOTE);
 650         hdr->index = cpu_to_le16(HCI_DEV_NONE);
 651         hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
 652
 653         if (sock_queue_rcv_skb(sk, skb))
 654                 kfree_skb(skb);
 655 }
 656
 657 static void send_monitor_replay(struct sock *sk)
 658 {
 659         struct hci_dev *hdev;
 660
 661         read_lock(&hci_dev_list_lock);
 662
 663         list_for_each_entry(hdev, &hci_dev_list, list) {
 664                 struct sk_buff *skb;
 665
 666                 skb = create_monitor_event(hdev, HCI_DEV_REG);
 667                 if (!skb)
 668                         continue;
 669
 670                 if (sock_queue_rcv_skb(sk, skb))
 671                         kfree_skb(skb);
 672
 673                 if (!test_bit(HCI_RUNNING, &hdev->flags))
 674                         continue;
 675
 676                 skb = create_monitor_event(hdev, HCI_DEV_OPEN);
 677                 if (!skb)
 678                         continue;
 679
 680                 if (sock_queue_rcv_skb(sk, skb))
 681                         kfree_skb(skb);
 682
 683                 if (test_bit(HCI_UP, &hdev->flags))
 684                         skb = create_monitor_event(hdev, HCI_DEV_UP);
 685                 else if (hci_dev_test_flag(hdev, HCI_SETUP))
 686                         skb = create_monitor_event(hdev, HCI_DEV_SETUP);
 687                 else
 688                         skb = NULL;
 689
 690                 if (skb) {
 691                         if (sock_queue_rcv_skb(sk, skb))
 692                                 kfree_skb(skb);
 693                 }
 694         }
 695
 696         read_unlock(&hci_dev_list_lock);
 697 }
 698
 699 static void send_monitor_control_replay(struct sock *mon_sk)
 700 {
 701         struct sock *sk;
 702
 703         read_lock(&hci_sk_list.lock);
 704
 705         sk_for_each(sk, &hci_sk_list.head) {
 706                 struct sk_buff *skb;
 707
 708                 skb = create_monitor_ctrl_open(sk);
 709                 if (!skb)
 710                         continue;
 711
 712                 if (sock_queue_rcv_skb(mon_sk, skb))
 713                         kfree_skb(skb);
 714         }
 715
 716         read_unlock(&hci_sk_list.lock);
 717 }
 718
 719 /* Generate internal stack event */
 720 static void hci_si_event(struct hci_dev *hdev, int type, int dlen, void *data)
 721 {
 722         struct hci_event_hdr *hdr;
 723         struct hci_ev_stack_internal *ev;
 724         struct sk_buff *skb;
 725
 726         skb = bt_skb_alloc(HCI_EVENT_HDR_SIZE + sizeof(*ev) + dlen, GFP_ATOMIC);
 727         if (!skb)
 728                 return;
 729
 730         hdr = skb_put(skb, HCI_EVENT_HDR_SIZE);
 731         hdr->evt  = HCI_EV_STACK_INTERNAL;
 732         hdr->plen = sizeof(*ev) + dlen;
 733
 734         ev = skb_put(skb, sizeof(*ev) + dlen);
 735         ev->type = type;
 736         memcpy(ev->data, data, dlen);
 737
 738         bt_cb(skb)->incoming = 1;
 739         __net_timestamp(skb);
 740
 741         hci_skb_pkt_type(skb) = HCI_EVENT_PKT;
 742         hci_send_to_sock(hdev, skb);
 743         kfree_skb(skb);
 744 }
 745
 746 void hci_sock_dev_event(struct hci_dev *hdev, int event)
 747 {
 748         BT_DBG("hdev %s event %d", hdev->name, event);
 749
 750         if (atomic_read(&monitor_promisc)) {
 751                 struct sk_buff *skb;
 752
 753                 /* Send event to monitor */
 754                 skb = create_monitor_event(hdev, event);
 755                 if (skb) {
 756                         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
 757                                             HCI_SOCK_TRUSTED, NULL);
 758                         kfree_skb(skb);
 759                 }
 760         }
 761
 762         if (event <= HCI_DEV_DOWN) {
 763                 struct hci_ev_si_device ev;
 764
 765                 /* Send event to sockets */
 766                 ev.event  = event;
 767                 ev.dev_id = hdev->id;
 768                 hci_si_event(NULL, HCI_EV_SI_DEVICE, sizeof(ev), &ev);
 769         }
 770
 771         if (event == HCI_DEV_UNREG) {
 772                 struct sock *sk;
 773
 774                 /* Wake up sockets using this dead device */
 775                 read_lock(&hci_sk_list.lock);
 776                 sk_for_each(sk, &hci_sk_list.head) {
 777                         if (hci_pi(sk)->hdev == hdev) {
 778                                 sk->sk_err = EPIPE;
 779                                 sk->sk_state_change(sk);
 780                         }
 781                 }
 782                 read_unlock(&hci_sk_list.lock);
 783         }
 784 }
 785
 786 static struct hci_mgmt_chan *__hci_mgmt_chan_find(unsigned short channel)
 787 {
 788         struct hci_mgmt_chan *c;
 789
 790         list_for_each_entry(c, &mgmt_chan_list, list) {
 791                 if (c->channel == channel)
 792                         return c;
 793         }
 794
 795         return NULL;
 796 }
 797
 798 static struct hci_mgmt_chan *hci_mgmt_chan_find(unsigned short channel)
 799 {
 800         struct hci_mgmt_chan *c;
 801
 802         mutex_lock(&mgmt_chan_list_lock);
 803         c = __hci_mgmt_chan_find(channel);
 804         mutex_unlock(&mgmt_chan_list_lock);
 805
 806         return c;
 807 }
 808
 809 int hci_mgmt_chan_register(struct hci_mgmt_chan *c)
 810 {
 811         if (c->channel < HCI_CHANNEL_CONTROL)
 812                 return -EINVAL;
 813
 814         mutex_lock(&mgmt_chan_list_lock);
 815         if (__hci_mgmt_chan_find(c->channel)) {
 816                 mutex_unlock(&mgmt_chan_list_lock);
 817                 return -EALREADY;
 818         }
 819
 820         list_add_tail(&c->list, &mgmt_chan_list);
 821
 822         mutex_unlock(&mgmt_chan_list_lock);
 823
 824         return 0;
 825 }
 826 EXPORT_SYMBOL(hci_mgmt_chan_register);
 827
 828 void hci_mgmt_chan_unregister(struct hci_mgmt_chan *c)
 829 {
 830         mutex_lock(&mgmt_chan_list_lock);
 831         list_del(&c->list);
 832         mutex_unlock(&mgmt_chan_list_lock);
 833 }
 834 EXPORT_SYMBOL(hci_mgmt_chan_unregister);
 835
 836 static int hci_sock_release(struct socket *sock)
 837 {
 838         struct sock *sk = sock->sk;
 839         struct hci_dev *hdev;
 840         struct sk_buff *skb;
 841
 842         BT_DBG("sock %p sk %p", sock, sk);
 843
 844         if (!sk)
 845                 return 0;
 846
 847         lock_sock(sk);
 848
 849         switch (hci_pi(sk)->channel) {
 850         case HCI_CHANNEL_MONITOR:
 851                 atomic_dec(&monitor_promisc);
 852                 break;
 853         case HCI_CHANNEL_RAW:
 854         case HCI_CHANNEL_USER:
 855         case HCI_CHANNEL_CONTROL:
 856                 /* Send event to monitor */
 857                 skb = create_monitor_ctrl_close(sk);
 858                 if (skb) {
 859                         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
 860                                             HCI_SOCK_TRUSTED, NULL);
 861                         kfree_skb(skb);
 862                 }
 863
 864                 hci_sock_free_cookie(sk);
 865                 break;
 866         }
 867
 868         bt_sock_unlink(&hci_sk_list, sk);
 869
 870         hdev = hci_pi(sk)->hdev;
 871         if (hdev) {
 872                 if (hci_pi(sk)->channel == HCI_CHANNEL_USER) {
 873                         /* When releasing a user channel exclusive access,
 874                          * call hci_dev_do_close directly instead of calling
 875                          * hci_dev_close to ensure the exclusive access will
 876                          * be released and the controller brought back down.
 877                          *
 878                          * The checking of HCI_AUTO_OFF is not needed in this
 879                          * case since it will have been cleared already when
 880                          * opening the user channel.
 881                          */
 882                         hci_dev_do_close(hdev);
 883                         hci_dev_clear_flag(hdev, HCI_USER_CHANNEL);
 884                         mgmt_index_added(hdev);
 885                 }
 886
 887                 atomic_dec(&hdev->promisc);
 888                 hci_dev_put(hdev);
 889         }
 890
 891         sock_orphan(sk);
 892         release_sock(sk);
 893         sock_put(sk);
 894         return 0;
 895 }
 896
 897 static int hci_sock_reject_list_add(struct hci_dev *hdev, void __user *arg)
 898 {
 899         bdaddr_t bdaddr;
 900         int err;
 901
 902         if (copy_from_user(&bdaddr, arg, sizeof(bdaddr)))
 903                 return -EFAULT;
 904
 905         hci_dev_lock(hdev);
 906
 907         err = hci_bdaddr_list_add(&hdev->reject_list, &bdaddr, BDADDR_BREDR);
 908
 909         hci_dev_unlock(hdev);
 910
 911         return err;
 912 }
 913
 914 static int hci_sock_reject_list_del(struct hci_dev *hdev, void __user *arg)
 915 {
 916         bdaddr_t bdaddr;
 917         int err;
 918
 919         if (copy_from_user(&bdaddr, arg, sizeof(bdaddr)))
 920                 return -EFAULT;
 921
 922         hci_dev_lock(hdev);
 923
 924         err = hci_bdaddr_list_del(&hdev->reject_list, &bdaddr, BDADDR_BREDR);
 925
 926         hci_dev_unlock(hdev);
 927
 928         return err;
 929 }
 930
 931 /* Ioctls that require bound socket */
 932 static int hci_sock_bound_ioctl(struct sock *sk, unsigned int cmd,
 933                                 unsigned long arg)
 934 {
 935         struct hci_dev *hdev = hci_hdev_from_sock(sk);
 936
 937         if (IS_ERR(hdev))
 938                 return PTR_ERR(hdev);
 939
 940         if (hci_dev_test_flag(hdev, HCI_USER_CHANNEL))
 941                 return -EBUSY;
 942
 943         if (hci_dev_test_flag(hdev, HCI_UNCONFIGURED))
 944                 return -EOPNOTSUPP;
 945
 946         if (hdev->dev_type != HCI_PRIMARY)
 947                 return -EOPNOTSUPP;
 948
 949         switch (cmd) {
 950         case HCISETRAW:
 951                 if (!capable(CAP_NET_ADMIN))
 952                         return -EPERM;
 953                 return -EOPNOTSUPP;
 954
 955         case HCIGETCONNINFO:
 956                 return hci_get_conn_info(hdev, (void __user *)arg);
 957
 958         case HCIGETAUTHINFO:
 959                 return hci_get_auth_info(hdev, (void __user *)arg);
 960
 961         case HCIBLOCKADDR:
 962                 if (!capable(CAP_NET_ADMIN))
 963                         return -EPERM;
 964                 return hci_sock_reject_list_add(hdev, (void __user *)arg);
 965
 966         case HCIUNBLOCKADDR:
 967                 if (!capable(CAP_NET_ADMIN))
 968                         return -EPERM;
 969                 return hci_sock_reject_list_del(hdev, (void __user *)arg);
 970         }
 971
 972         return -ENOIOCTLCMD;
 973 }
 974
 975 static int hci_sock_ioctl(struct socket *sock, unsigned int cmd,
 976                           unsigned long arg)
 977 {
 978         void __user *argp = (void __user *)arg;
 979         struct sock *sk = sock->sk;
 980         int err;
 981
 982         BT_DBG("cmd %x arg %lx", cmd, arg);
 983
 984         lock_sock(sk);
 985
 986         if (hci_pi(sk)->channel != HCI_CHANNEL_RAW) {
 987                 err = -EBADFD;
 988                 goto done;
 989         }
 990
 991         /* When calling an ioctl on an unbound raw socket, then ensure
 992          * that the monitor gets informed. Ensure that the resulting event
 993          * is only send once by checking if the cookie exists or not. The
 994          * socket cookie will be only ever generated once for the lifetime
 995          * of a given socket.
 996          */
 997         if (hci_sock_gen_cookie(sk)) {
 998                 struct sk_buff *skb;
 999
1000                 if (capable(CAP_NET_ADMIN))
1001                         hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1002
1003                 /* Send event to monitor */
1004                 skb = create_monitor_ctrl_open(sk);
1005                 if (skb) {
1006                         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1007                                             HCI_SOCK_TRUSTED, NULL);
1008                         kfree_skb(skb);
1009                 }
1010         }
1011
1012         release_sock(sk);
1013
1014         switch (cmd) {
1015         case HCIGETDEVLIST:
1016                 return hci_get_dev_list(argp);
1017
1018         case HCIGETDEVINFO:
1019                 return hci_get_dev_info(argp);
1020
1021         case HCIGETCONNLIST:
1022                 return hci_get_conn_list(argp);
1023
1024         case HCIDEVUP:
1025                 if (!capable(CAP_NET_ADMIN))
1026                         return -EPERM;
1027                 return hci_dev_open(arg);
1028
1029         case HCIDEVDOWN:
1030                 if (!capable(CAP_NET_ADMIN))
1031                         return -EPERM;
1032                 return hci_dev_close(arg);
1033
1034         case HCIDEVRESET:
1035                 if (!capable(CAP_NET_ADMIN))
1036                         return -EPERM;
1037                 return hci_dev_reset(arg);
1038
1039         case HCIDEVRESTAT:
1040                 if (!capable(CAP_NET_ADMIN))
1041                         return -EPERM;
1042                 return hci_dev_reset_stat(arg);
1043
1044         case HCISETSCAN:
1045         case HCISETAUTH:
1046         case HCISETENCRYPT:
1047         case HCISETPTYPE:
1048         case HCISETLINKPOL:
1049         case HCISETLINKMODE:
1050         case HCISETACLMTU:
1051         case HCISETSCOMTU:
1052                 if (!capable(CAP_NET_ADMIN))
1053                         return -EPERM;
1054                 return hci_dev_cmd(cmd, argp);
1055
1056         case HCIINQUIRY:
1057                 return hci_inquiry(argp);
1058         }
1059
1060         lock_sock(sk);
1061
1062         err = hci_sock_bound_ioctl(sk, cmd, arg);
1063
1064 done:
1065         release_sock(sk);
1066         return err;
1067 }
1068
1069 #ifdef CONFIG_COMPAT
1070 static int hci_sock_compat_ioctl(struct socket *sock, unsigned int cmd,
1071                                  unsigned long arg)
1072 {
1073         switch (cmd) {
1074         case HCIDEVUP:
1075         case HCIDEVDOWN:
1076         case HCIDEVRESET:
1077         case HCIDEVRESTAT:
1078                 return hci_sock_ioctl(sock, cmd, arg);
1079         }
1080
1081         return hci_sock_ioctl(sock, cmd, (unsigned long)compat_ptr(arg));
1082 }
1083 #endif
1084
1085 static int hci_sock_bind(struct socket *sock, struct sockaddr *addr,
1086                          int addr_len)
1087 {
1088         struct sockaddr_hci haddr;
1089         struct sock *sk = sock->sk;
1090         struct hci_dev *hdev = NULL;
1091         struct sk_buff *skb;
1092         int len, err = 0;
1093
1094         BT_DBG("sock %p sk %p", sock, sk);
1095
1096         if (!addr)
1097                 return -EINVAL;
1098
1099         memset(&haddr, 0, sizeof(haddr));
1100         len = min_t(unsigned int, sizeof(haddr), addr_len);
1101         memcpy(&haddr, addr, len);
1102
1103         if (haddr.hci_family != AF_BLUETOOTH)
1104                 return -EINVAL;
1105
1106         lock_sock(sk);
1107
1108         /* Allow detaching from dead device and attaching to alive device, if
1109          * the caller wants to re-bind (instead of close) this socket in
1110          * response to hci_sock_dev_event(HCI_DEV_UNREG) notification.
1111          */
1112         hdev = hci_pi(sk)->hdev;
1113         if (hdev && hci_dev_test_flag(hdev, HCI_UNREGISTER)) {
1114                 hci_pi(sk)->hdev = NULL;
1115                 sk->sk_state = BT_OPEN;
1116                 hci_dev_put(hdev);
1117         }
1118         hdev = NULL;
1119
1120         if (sk->sk_state == BT_BOUND) {
1121                 err = -EALREADY;
1122                 goto done;
1123         }
1124
1125         switch (haddr.hci_channel) {
1126         case HCI_CHANNEL_RAW:
1127                 if (hci_pi(sk)->hdev) {
1128                         err = -EALREADY;
1129                         goto done;
1130                 }
1131
1132                 if (haddr.hci_dev != HCI_DEV_NONE) {
1133                         hdev = hci_dev_get(haddr.hci_dev);
1134                         if (!hdev) {
1135                                 err = -ENODEV;
1136                                 goto done;
1137                         }
1138
1139                         atomic_inc(&hdev->promisc);
1140                 }
1141
1142                 hci_pi(sk)->channel = haddr.hci_channel;
1143
1144                 if (!hci_sock_gen_cookie(sk)) {
1145                         /* In the case when a cookie has already been assigned,
1146                          * then there has been already an ioctl issued against
1147                          * an unbound socket and with that triggered an open
1148                          * notification. Send a close notification first to
1149                          * allow the state transition to bounded.
1150                          */
1151                         skb = create_monitor_ctrl_close(sk);
1152                         if (skb) {
1153                                 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1154                                                     HCI_SOCK_TRUSTED, NULL);
1155                                 kfree_skb(skb);
1156                         }
1157                 }
1158
1159                 if (capable(CAP_NET_ADMIN))
1160                         hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1161
1162                 hci_pi(sk)->hdev = hdev;
1163
1164                 /* Send event to monitor */
1165                 skb = create_monitor_ctrl_open(sk);
1166                 if (skb) {
1167                         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1168                                             HCI_SOCK_TRUSTED, NULL);
1169                         kfree_skb(skb);
1170                 }
1171                 break;
1172
1173         case HCI_CHANNEL_USER:
1174                 if (hci_pi(sk)->hdev) {
1175                         err = -EALREADY;
1176                         goto done;
1177                 }
1178
1179                 if (haddr.hci_dev == HCI_DEV_NONE) {
1180                         err = -EINVAL;
1181                         goto done;
1182                 }
1183
1184                 if (!capable(CAP_NET_ADMIN)) {
1185                         err = -EPERM;
1186                         goto done;
1187                 }
1188
1189                 hdev = hci_dev_get(haddr.hci_dev);
1190                 if (!hdev) {
1191                         err = -ENODEV;
1192                         goto done;
1193                 }
1194
1195                 if (test_bit(HCI_INIT, &hdev->flags) ||
1196                     hci_dev_test_flag(hdev, HCI_SETUP) ||
1197                     hci_dev_test_flag(hdev, HCI_CONFIG) ||
1198                     (!hci_dev_test_flag(hdev, HCI_AUTO_OFF) &&
1199                      test_bit(HCI_UP, &hdev->flags))) {
1200                         err = -EBUSY;
1201                         hci_dev_put(hdev);
1202                         goto done;
1203                 }
1204
1205                 if (hci_dev_test_and_set_flag(hdev, HCI_USER_CHANNEL)) {
1206                         err = -EUSERS;
1207                         hci_dev_put(hdev);
1208                         goto done;
1209                 }
1210
1211                 mgmt_index_removed(hdev);
1212
1213                 err = hci_dev_open(hdev->id);
1214                 if (err) {
1215                         if (err == -EALREADY) {
1216                                 /* In case the transport is already up and
1217                                  * running, clear the error here.
1218                                  *
1219                                  * This can happen when opening a user
1220                                  * channel and HCI_AUTO_OFF grace period
1221                                  * is still active.
1222                                  */
1223                                 err = 0;
1224                         } else {
1225                                 hci_dev_clear_flag(hdev, HCI_USER_CHANNEL);
1226                                 mgmt_index_added(hdev);
1227                                 hci_dev_put(hdev);
1228                                 goto done;
1229                         }
1230                 }
1231
1232                 hci_pi(sk)->channel = haddr.hci_channel;
1233
1234                 if (!hci_sock_gen_cookie(sk)) {
1235                         /* In the case when a cookie has already been assigned,
1236                          * this socket will transition from a raw socket into
1237                          * a user channel socket. For a clean transition, send
1238                          * the close notification first.
1239                          */
1240                         skb = create_monitor_ctrl_close(sk);
1241                         if (skb) {
1242                                 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1243                                                     HCI_SOCK_TRUSTED, NULL);
1244                                 kfree_skb(skb);
1245                         }
1246                 }
1247
1248                 /* The user channel is restricted to CAP_NET_ADMIN
1249                  * capabilities and with that implicitly trusted.
1250                  */
1251                 hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1252
1253                 hci_pi(sk)->hdev = hdev;
1254
1255                 /* Send event to monitor */
1256                 skb = create_monitor_ctrl_open(sk);
1257                 if (skb) {
1258                         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1259                                             HCI_SOCK_TRUSTED, NULL);
1260                         kfree_skb(skb);
1261                 }
1262
1263                 atomic_inc(&hdev->promisc);
1264                 break;
1265
1266         case HCI_CHANNEL_MONITOR:
1267                 if (haddr.hci_dev != HCI_DEV_NONE) {
1268                         err = -EINVAL;
1269                         goto done;
1270                 }
1271
1272                 if (!capable(CAP_NET_RAW)) {
1273                         err = -EPERM;
1274                         goto done;
1275                 }
1276
1277                 hci_pi(sk)->channel = haddr.hci_channel;
1278
1279                 /* The monitor interface is restricted to CAP_NET_RAW
1280                  * capabilities and with that implicitly trusted.
1281                  */
1282                 hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1283
1284                 send_monitor_note(sk, "Linux version %s (%s)",
1285                                   init_utsname()->release,
1286                                   init_utsname()->machine);
1287                 send_monitor_note(sk, "Bluetooth subsystem version %u.%u",
1288                                   BT_SUBSYS_VERSION, BT_SUBSYS_REVISION);
1289                 send_monitor_replay(sk);
1290                 send_monitor_control_replay(sk);
1291
1292                 atomic_inc(&monitor_promisc);
1293                 break;
1294
1295         case HCI_CHANNEL_LOGGING:
1296                 if (haddr.hci_dev != HCI_DEV_NONE) {
1297                         err = -EINVAL;
1298                         goto done;
1299                 }
1300
1301                 if (!capable(CAP_NET_ADMIN)) {
1302                         err = -EPERM;
1303                         goto done;
1304                 }
1305
1306                 hci_pi(sk)->channel = haddr.hci_channel;
1307                 break;
1308
1309         default:
1310                 if (!hci_mgmt_chan_find(haddr.hci_channel)) {
1311                         err = -EINVAL;
1312                         goto done;
1313                 }
1314
1315                 if (haddr.hci_dev != HCI_DEV_NONE) {
1316                         err = -EINVAL;
1317                         goto done;
1318                 }
1319
1320                 /* Users with CAP_NET_ADMIN capabilities are allowed
1321                  * access to all management commands and events. For
1322                  * untrusted users the interface is restricted and
1323                  * also only untrusted events are sent.
1324                  */
1325                 if (capable(CAP_NET_ADMIN))
1326                         hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1327
1328                 hci_pi(sk)->channel = haddr.hci_channel;
1329
1330                 /* At the moment the index and unconfigured index events
1331                  * are enabled unconditionally. Setting them on each
1332                  * socket when binding keeps this functionality. They
1333                  * however might be cleared later and then sending of these
1334                  * events will be disabled, but that is then intentional.
1335                  *
1336                  * This also enables generic events that are safe to be
1337                  * received by untrusted users. Example for such events
1338                  * are changes to settings, class of device, name etc.
1339                  */
1340                 if (hci_pi(sk)->channel == HCI_CHANNEL_CONTROL) {
1341                         if (!hci_sock_gen_cookie(sk)) {
1342                                 /* In the case when a cookie has already been
1343                                  * assigned, this socket will transition from
1344                                  * a raw socket into a control socket. To
1345                                  * allow for a clean transition, send the
1346                                  * close notification first.
1347                                  */
1348                                 skb = create_monitor_ctrl_close(sk);
1349                                 if (skb) {
1350                                         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1351                                                             HCI_SOCK_TRUSTED, NULL);
1352                                         kfree_skb(skb);
1353                                 }
1354                         }
1355
1356                         /* Send event to monitor */
1357                         skb = create_monitor_ctrl_open(sk);
1358                         if (skb) {
1359                                 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1360                                                     HCI_SOCK_TRUSTED, NULL);
1361                                 kfree_skb(skb);
1362                         }
1363
1364                         hci_sock_set_flag(sk, HCI_MGMT_INDEX_EVENTS);
1365                         hci_sock_set_flag(sk, HCI_MGMT_UNCONF_INDEX_EVENTS);
1366                         hci_sock_set_flag(sk, HCI_MGMT_OPTION_EVENTS);
1367                         hci_sock_set_flag(sk, HCI_MGMT_SETTING_EVENTS);
1368                         hci_sock_set_flag(sk, HCI_MGMT_DEV_CLASS_EVENTS);
1369                         hci_sock_set_flag(sk, HCI_MGMT_LOCAL_NAME_EVENTS);
1370                 }
1371                 break;
1372         }
1373
1374         /* Default MTU to HCI_MAX_FRAME_SIZE if not set */
1375         if (!hci_pi(sk)->mtu)
1376                 hci_pi(sk)->mtu = HCI_MAX_FRAME_SIZE;
1377
1378         sk->sk_state = BT_BOUND;
1379
1380 done:
1381         release_sock(sk);
1382         return err;
1383 }
1384
1385 static int hci_sock_getname(struct socket *sock, struct sockaddr *addr,
1386                             int peer)
1387 {
1388         struct sockaddr_hci *haddr = (struct sockaddr_hci *)addr;
1389         struct sock *sk = sock->sk;
1390         struct hci_dev *hdev;
1391         int err = 0;
1392
1393         BT_DBG("sock %p sk %p", sock, sk);
1394
1395         if (peer)
1396                 return -EOPNOTSUPP;
1397
1398         lock_sock(sk);
1399
1400         hdev = hci_hdev_from_sock(sk);
1401         if (IS_ERR(hdev)) {
1402                 err = PTR_ERR(hdev);
1403                 goto done;
1404         }
1405
1406         haddr->hci_family = AF_BLUETOOTH;
1407         haddr->hci_dev    = hdev->id;
1408         haddr->hci_channel= hci_pi(sk)->channel;
1409         err = sizeof(*haddr);
1410
1411 done:
1412         release_sock(sk);
1413         return err;
1414 }
1415
1416 static void hci_sock_cmsg(struct sock *sk, struct msghdr *msg,
1417                           struct sk_buff *skb)
1418 {
1419         __u8 mask = hci_pi(sk)->cmsg_mask;
1420
1421         if (mask & HCI_CMSG_DIR) {
1422                 int incoming = bt_cb(skb)->incoming;
1423                 put_cmsg(msg, SOL_HCI, HCI_CMSG_DIR, sizeof(incoming),
1424                          &incoming);
1425         }
1426
1427         if (mask & HCI_CMSG_TSTAMP) {
1428 #ifdef CONFIG_COMPAT
1429                 struct old_timeval32 ctv;
1430 #endif
1431                 struct __kernel_old_timeval tv;
1432                 void *data;
1433                 int len;
1434
1435                 skb_get_timestamp(skb, &tv);
1436
1437                 data = &tv;
1438                 len = sizeof(tv);
1439 #ifdef CONFIG_COMPAT
1440                 if (!COMPAT_USE_64BIT_TIME &&
1441                     (msg->msg_flags & MSG_CMSG_COMPAT)) {
1442                         ctv.tv_sec = tv.tv_sec;
1443                         ctv.tv_usec = tv.tv_usec;
1444                         data = &ctv;
1445                         len = sizeof(ctv);
1446                 }
1447 #endif
1448
1449                 put_cmsg(msg, SOL_HCI, HCI_CMSG_TSTAMP, len, data);
1450         }
1451 }
1452
1453 static int hci_sock_recvmsg(struct socket *sock, struct msghdr *msg,
1454                             size_t len, int flags)
1455 {
1456         int noblock = flags & MSG_DONTWAIT;
1457         struct sock *sk = sock->sk;
1458         struct sk_buff *skb;
1459         int copied, err;
1460         unsigned int skblen;
1461
1462         BT_DBG("sock %p, sk %p", sock, sk);
1463
1464         if (flags & MSG_OOB)
1465                 return -EOPNOTSUPP;
1466
1467         if (hci_pi(sk)->channel == HCI_CHANNEL_LOGGING)
1468                 return -EOPNOTSUPP;
1469
1470         if (sk->sk_state == BT_CLOSED)
1471                 return 0;
1472
1473         skb = skb_recv_datagram(sk, flags, noblock, &err);
1474         if (!skb)
1475                 return err;
1476
1477         skblen = skb->len;
1478         copied = skb->len;
1479         if (len < copied) {
1480                 msg->msg_flags |= MSG_TRUNC;
1481                 copied = len;
1482         }
1483
1484         skb_reset_transport_header(skb);
1485         err = skb_copy_datagram_msg(skb, 0, msg, copied);
1486
1487         switch (hci_pi(sk)->channel) {
1488         case HCI_CHANNEL_RAW:
1489                 hci_sock_cmsg(sk, msg, skb);
1490                 break;
1491         case HCI_CHANNEL_USER:
1492         case HCI_CHANNEL_MONITOR:
1493                 sock_recv_timestamp(msg, sk, skb);
1494                 break;
1495         default:
1496                 if (hci_mgmt_chan_find(hci_pi(sk)->channel))
1497                         sock_recv_timestamp(msg, sk, skb);
1498                 break;
1499         }
1500
1501         skb_free_datagram(sk, skb);
1502
1503         if (flags & MSG_TRUNC)
1504                 copied = skblen;
1505
1506         return err ? : copied;
1507 }
1508
1509 static int hci_mgmt_cmd(struct hci_mgmt_chan *chan, struct sock *sk,
1510                         struct sk_buff *skb)
1511 {
1512         u8 *cp;
1513         struct mgmt_hdr *hdr;
1514         u16 opcode, index, len;
1515         struct hci_dev *hdev = NULL;
1516         const struct hci_mgmt_handler *handler;
1517         bool var_len, no_hdev;
1518         int err;
1519
1520         BT_DBG("got %d bytes", skb->len);
1521
1522         if (skb->len < sizeof(*hdr))
1523                 return -EINVAL;
1524
1525         hdr = (void *)skb->data;
1526         opcode = __le16_to_cpu(hdr->opcode);
1527         index = __le16_to_cpu(hdr->index);
1528         len = __le16_to_cpu(hdr->len);
1529
1530         if (len != skb->len - sizeof(*hdr)) {
1531                 err = -EINVAL;
1532                 goto done;
1533         }
1534
1535         if (chan->channel == HCI_CHANNEL_CONTROL) {
1536                 struct sk_buff *cmd;
1537
1538                 /* Send event to monitor */
1539                 cmd = create_monitor_ctrl_command(sk, index, opcode, len,
1540                                                   skb->data + sizeof(*hdr));
1541                 if (cmd) {
1542                         hci_send_to_channel(HCI_CHANNEL_MONITOR, cmd,
1543                                             HCI_SOCK_TRUSTED, NULL);
1544                         kfree_skb(cmd);
1545                 }
1546         }
1547
1548         if (opcode >= chan->handler_count ||
1549             chan->handlers[opcode].func == NULL) {
1550                 BT_DBG("Unknown op %u", opcode);
1551                 err = mgmt_cmd_status(sk, index, opcode,
1552                                       MGMT_STATUS_UNKNOWN_COMMAND);
1553                 goto done;
1554         }
1555
1556         handler = &chan->handlers[opcode];
1557
1558         if (!hci_sock_test_flag(sk, HCI_SOCK_TRUSTED) &&
1559             !(handler->flags & HCI_MGMT_UNTRUSTED)) {
1560                 err = mgmt_cmd_status(sk, index, opcode,
1561                                       MGMT_STATUS_PERMISSION_DENIED);
1562                 goto done;
1563         }
1564
1565         if (index != MGMT_INDEX_NONE) {
1566                 hdev = hci_dev_get(index);
1567                 if (!hdev) {
1568                         err = mgmt_cmd_status(sk, index, opcode,
1569                                               MGMT_STATUS_INVALID_INDEX);
1570                         goto done;
1571                 }
1572
1573                 if (hci_dev_test_flag(hdev, HCI_SETUP) ||
1574                     hci_dev_test_flag(hdev, HCI_CONFIG) ||
1575                     hci_dev_test_flag(hdev, HCI_USER_CHANNEL)) {
1576                         err = mgmt_cmd_status(sk, index, opcode,
1577                                               MGMT_STATUS_INVALID_INDEX);
1578                         goto done;
1579                 }
1580
1581                 if (hci_dev_test_flag(hdev, HCI_UNCONFIGURED) &&
1582                     !(handler->flags & HCI_MGMT_UNCONFIGURED)) {
1583                         err = mgmt_cmd_status(sk, index, opcode,
1584                                               MGMT_STATUS_INVALID_INDEX);
1585                         goto done;
1586                 }
1587         }
1588
1589         if (!(handler->flags & HCI_MGMT_HDEV_OPTIONAL)) {
1590                 no_hdev = (handler->flags & HCI_MGMT_NO_HDEV);
1591                 if (no_hdev != !hdev) {
1592                         err = mgmt_cmd_status(sk, index, opcode,
1593                                               MGMT_STATUS_INVALID_INDEX);
1594                         goto done;
1595                 }
1596         }
1597
1598         var_len = (handler->flags & HCI_MGMT_VAR_LEN);
1599         if ((var_len && len < handler->data_len) ||
1600             (!var_len && len != handler->data_len)) {
1601                 err = mgmt_cmd_status(sk, index, opcode,
1602                                       MGMT_STATUS_INVALID_PARAMS);
1603                 goto done;
1604         }
1605
1606         if (hdev && chan->hdev_init)
1607                 chan->hdev_init(sk, hdev);
1608
1609         cp = skb->data + sizeof(*hdr);
1610
1611         err = handler->func(sk, hdev, cp, len);
1612         if (err < 0)
1613                 goto done;
1614
1615         err = skb->len;
1616
1617 done:
1618         if (hdev)
1619                 hci_dev_put(hdev);
1620
1621         return err;
1622 }
1623
1624 static int hci_logging_frame(struct sock *sk, struct sk_buff *skb,
1625                              unsigned int flags)
1626 {
1627         struct hci_mon_hdr *hdr;
1628         struct hci_dev *hdev;
1629         u16 index;
1630         int err;
1631
1632         /* The logging frame consists at minimum of the standard header,
1633          * the priority byte, the ident length byte and at least one string
1634          * terminator NUL byte. Anything shorter are invalid packets.
1635          */
1636         if (skb->len < sizeof(*hdr) + 3)
1637                 return -EINVAL;
1638
1639         hdr = (void *)skb->data;
1640
1641         if (__le16_to_cpu(hdr->len) != skb->len - sizeof(*hdr))
1642                 return -EINVAL;
1643
1644         if (__le16_to_cpu(hdr->opcode) == 0x0000) {
1645                 __u8 priority = skb->data[sizeof(*hdr)];
1646                 __u8 ident_len = skb->data[sizeof(*hdr) + 1];
1647
1648                 /* Only the priorities 0-7 are valid and with that any other
1649                  * value results in an invalid packet.
1650                  *
1651                  * The priority byte is followed by an ident length byte and
1652                  * the NUL terminated ident string. Check that the ident
1653                  * length is not overflowing the packet and also that the
1654                  * ident string itself is NUL terminated. In case the ident
1655                  * length is zero, the length value actually doubles as NUL
1656                  * terminator identifier.
1657                  *
1658                  * The message follows the ident string (if present) and
1659                  * must be NUL terminated. Otherwise it is not a valid packet.
1660                  */
1661                 if (priority > 7 || skb->data[skb->len - 1] != 0x00 ||
1662                     ident_len > skb->len - sizeof(*hdr) - 3 ||
1663                     skb->data[sizeof(*hdr) + ident_len + 1] != 0x00)
1664                         return -EINVAL;
1665         } else {
1666                 return -EINVAL;
1667         }
1668
1669         index = __le16_to_cpu(hdr->index);
1670
1671         if (index != MGMT_INDEX_NONE) {
1672                 hdev = hci_dev_get(index);
1673                 if (!hdev)
1674                         return -ENODEV;
1675         } else {
1676                 hdev = NULL;
1677         }
1678
1679         hdr->opcode = cpu_to_le16(HCI_MON_USER_LOGGING);
1680
1681         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb, HCI_SOCK_TRUSTED, NULL);
1682         err = skb->len;
1683
1684         if (hdev)
1685                 hci_dev_put(hdev);
1686
1687         return err;
1688 }
1689
1690 static int hci_sock_sendmsg(struct socket *sock, struct msghdr *msg,
1691                             size_t len)
1692 {
1693         struct sock *sk = sock->sk;
1694         struct hci_mgmt_chan *chan;
1695         struct hci_dev *hdev;
1696         struct sk_buff *skb;
1697         int err;
1698         const unsigned int flags = msg->msg_flags;
1699
1700         BT_DBG("sock %p sk %p", sock, sk);
1701
1702         if (flags & MSG_OOB)
1703                 return -EOPNOTSUPP;
1704
1705         if (flags & ~(MSG_DONTWAIT | MSG_NOSIGNAL | MSG_ERRQUEUE | MSG_CMSG_COMPAT))
1706                 return -EINVAL;
1707
1708         if (len < 4 || len > hci_pi(sk)->mtu)
1709                 return -EINVAL;
1710
1711         skb = bt_skb_sendmsg(sk, msg, len, len, 0, 0);
1712         if (IS_ERR(skb))
1713                 return PTR_ERR(skb);
1714
1715         lock_sock(sk);
1716
1717         switch (hci_pi(sk)->channel) {
1718         case HCI_CHANNEL_RAW:
1719         case HCI_CHANNEL_USER:
1720                 break;
1721         case HCI_CHANNEL_MONITOR:
1722                 err = -EOPNOTSUPP;
1723                 goto drop;
1724         case HCI_CHANNEL_LOGGING:
1725                 err = hci_logging_frame(sk, skb, flags);
1726                 goto drop;
1727         default:
1728                 mutex_lock(&mgmt_chan_list_lock);
1729                 chan = __hci_mgmt_chan_find(hci_pi(sk)->channel);
1730                 if (chan)
1731                         err = hci_mgmt_cmd(chan, sk, skb);
1732                 else
1733                         err = -EINVAL;
1734
1735                 mutex_unlock(&mgmt_chan_list_lock);
1736                 goto drop;
1737         }
1738
1739         hdev = hci_hdev_from_sock(sk);
1740         if (IS_ERR(hdev)) {
1741                 err = PTR_ERR(hdev);
1742                 goto drop;
1743         }
1744
1745         if (!test_bit(HCI_UP, &hdev->flags)) {
1746                 err = -ENETDOWN;
1747                 goto drop;
1748         }
1749
1750         hci_skb_pkt_type(skb) = skb->data[0];
1751         skb_pull(skb, 1);
1752
1753         if (hci_pi(sk)->channel == HCI_CHANNEL_USER) {
1754                 /* No permission check is needed for user channel
1755                  * since that gets enforced when binding the socket.
1756                  *
1757                  * However check that the packet type is valid.
1758                  */
1759                 if (hci_skb_pkt_type(skb) != HCI_COMMAND_PKT &&
1760                     hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
1761                     hci_skb_pkt_type(skb) != HCI_SCODATA_PKT &&
1762                     hci_skb_pkt_type(skb) != HCI_ISODATA_PKT) {
1763                         err = -EINVAL;
1764                         goto drop;
1765                 }
1766
1767                 skb_queue_tail(&hdev->raw_q, skb);
1768                 queue_work(hdev->workqueue, &hdev->tx_work);
1769         } else if (hci_skb_pkt_type(skb) == HCI_COMMAND_PKT) {
1770                 u16 opcode = get_unaligned_le16(skb->data);
1771                 u16 ogf = hci_opcode_ogf(opcode);
1772                 u16 ocf = hci_opcode_ocf(opcode);
1773
1774                 if (((ogf > HCI_SFLT_MAX_OGF) ||
1775                      !hci_test_bit(ocf & HCI_FLT_OCF_BITS,
1776                                    &hci_sec_filter.ocf_mask[ogf])) &&
1777                     !capable(CAP_NET_RAW)) {
1778                         err = -EPERM;
1779                         goto drop;
1780                 }
1781
1782                 /* Since the opcode has already been extracted here, store
1783                  * a copy of the value for later use by the drivers.
1784                  */
1785                 hci_skb_opcode(skb) = opcode;
1786
1787                 if (ogf == 0x3f) {
1788                         skb_queue_tail(&hdev->raw_q, skb);
1789                         queue_work(hdev->workqueue, &hdev->tx_work);
1790                 } else {
1791                         /* Stand-alone HCI commands must be flagged as
1792                          * single-command requests.
1793                          */
1794                         bt_cb(skb)->hci.req_flags |= HCI_REQ_START;
1795
1796                         skb_queue_tail(&hdev->cmd_q, skb);
1797                         queue_work(hdev->workqueue, &hdev->cmd_work);
1798                 }
1799         } else {
1800                 if (!capable(CAP_NET_RAW)) {
1801                         err = -EPERM;
1802                         goto drop;
1803                 }
1804
1805                 if (hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
1806                     hci_skb_pkt_type(skb) != HCI_SCODATA_PKT &&
1807                     hci_skb_pkt_type(skb) != HCI_ISODATA_PKT) {
1808                         err = -EINVAL;
1809                         goto drop;
1810                 }
1811
1812                 skb_queue_tail(&hdev->raw_q, skb);
1813                 queue_work(hdev->workqueue, &hdev->tx_work);
1814         }
1815
1816         err = len;
1817
1818 done:
1819         release_sock(sk);
1820         return err;
1821
1822 drop:
1823         kfree_skb(skb);
1824         goto done;
1825 }
1826
1827 static int hci_sock_setsockopt_old(struct socket *sock, int level, int optname,
1828                                    sockptr_t optval, unsigned int len)
1829 {
1830         struct hci_ufilter uf = { .opcode = 0 };
1831         struct sock *sk = sock->sk;
1832         int err = 0, opt = 0;
1833
1834         BT_DBG("sk %p, opt %d", sk, optname);
1835
1836         lock_sock(sk);
1837
1838         if (hci_pi(sk)->channel != HCI_CHANNEL_RAW) {
1839                 err = -EBADFD;
1840                 goto done;
1841         }
1842
1843         switch (optname) {
1844         case HCI_DATA_DIR:
1845                 if (copy_from_sockptr(&opt, optval, sizeof(opt))) {
1846                         err = -EFAULT;
1847                         break;
1848                 }
1849
1850                 if (opt)
1851                         hci_pi(sk)->cmsg_mask |= HCI_CMSG_DIR;
1852                 else
1853                         hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_DIR;
1854                 break;
1855
1856         case HCI_TIME_STAMP:
1857                 if (copy_from_sockptr(&opt, optval, sizeof(opt))) {
1858                         err = -EFAULT;
1859                         break;
1860                 }
1861
1862                 if (opt)
1863                         hci_pi(sk)->cmsg_mask |= HCI_CMSG_TSTAMP;
1864                 else
1865                         hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_TSTAMP;
1866                 break;
1867
1868         case HCI_FILTER:
1869                 {
1870                         struct hci_filter *f = &hci_pi(sk)->filter;
1871
1872                         uf.type_mask = f->type_mask;
1873                         uf.opcode    = f->opcode;
1874                         uf.event_mask[0] = *((u32 *) f->event_mask + 0);
1875                         uf.event_mask[1] = *((u32 *) f->event_mask + 1);
1876                 }
1877
1878                 len = min_t(unsigned int, len, sizeof(uf));
1879                 if (copy_from_sockptr(&uf, optval, len)) {
1880                         err = -EFAULT;
1881                         break;
1882                 }
1883
1884                 if (!capable(CAP_NET_RAW)) {
1885                         uf.type_mask &= hci_sec_filter.type_mask;
1886                         uf.event_mask[0] &= *((u32 *) hci_sec_filter.event_mask + 0);
1887                         uf.event_mask[1] &= *((u32 *) hci_sec_filter.event_mask + 1);
1888                 }
1889
1890                 {
1891                         struct hci_filter *f = &hci_pi(sk)->filter;
1892
1893                         f->type_mask = uf.type_mask;
1894                         f->opcode    = uf.opcode;
1895                         *((u32 *) f->event_mask + 0) = uf.event_mask[0];
1896                         *((u32 *) f->event_mask + 1) = uf.event_mask[1];
1897                 }
1898                 break;
1899
1900         default:
1901                 err = -ENOPROTOOPT;
1902                 break;
1903         }
1904
1905 done:
1906         release_sock(sk);
1907         return err;
1908 }
1909
1910 static int hci_sock_setsockopt(struct socket *sock, int level, int optname,
1911                                sockptr_t optval, unsigned int len)
1912 {
1913         struct sock *sk = sock->sk;
1914         int err = 0;
1915         u16 opt;
1916
1917         BT_DBG("sk %p, opt %d", sk, optname);
1918
1919         if (level == SOL_HCI)
1920                 return hci_sock_setsockopt_old(sock, level, optname, optval,
1921                                                len);
1922
1923         if (level != SOL_BLUETOOTH)
1924                 return -ENOPROTOOPT;
1925
1926         lock_sock(sk);
1927
1928         switch (optname) {
1929         case BT_SNDMTU:
1930         case BT_RCVMTU:
1931                 switch (hci_pi(sk)->channel) {
1932                 /* Don't allow changing MTU for channels that are meant for HCI
1933                  * traffic only.
1934                  */
1935                 case HCI_CHANNEL_RAW:
1936                 case HCI_CHANNEL_USER:
1937                         err = -ENOPROTOOPT;
1938                         goto done;
1939                 }
1940
1941                 if (copy_from_sockptr(&opt, optval, sizeof(opt))) {
1942                         err = -EFAULT;
1943                         break;
1944                 }
1945
1946                 hci_pi(sk)->mtu = opt;
1947                 break;
1948
1949         default:
1950                 err = -ENOPROTOOPT;
1951                 break;
1952         }
1953
1954 done:
1955         release_sock(sk);
1956         return err;
1957 }
1958
1959 static int hci_sock_getsockopt_old(struct socket *sock, int level, int optname,
1960                                    char __user *optval, int __user *optlen)
1961 {
1962         struct hci_ufilter uf;
1963         struct sock *sk = sock->sk;
1964         int len, opt, err = 0;
1965
1966         BT_DBG("sk %p, opt %d", sk, optname);
1967
1968         if (get_user(len, optlen))
1969                 return -EFAULT;
1970
1971         lock_sock(sk);
1972
1973         if (hci_pi(sk)->channel != HCI_CHANNEL_RAW) {
1974                 err = -EBADFD;
1975                 goto done;
1976         }
1977
1978         switch (optname) {
1979         case HCI_DATA_DIR:
1980                 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_DIR)
1981                         opt = 1;
1982                 else
1983                         opt = 0;
1984
1985                 if (put_user(opt, optval))
1986                         err = -EFAULT;
1987                 break;
1988
1989         case HCI_TIME_STAMP:
1990                 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_TSTAMP)
1991                         opt = 1;
1992                 else
1993                         opt = 0;
1994
1995                 if (put_user(opt, optval))
1996                         err = -EFAULT;
1997                 break;
1998
1999         case HCI_FILTER:
2000                 {
2001                         struct hci_filter *f = &hci_pi(sk)->filter;
2002
2003                         memset(&uf, 0, sizeof(uf));
2004                         uf.type_mask = f->type_mask;
2005                         uf.opcode    = f->opcode;
2006                         uf.event_mask[0] = *((u32 *) f->event_mask + 0);
2007                         uf.event_mask[1] = *((u32 *) f->event_mask + 1);
2008                 }
2009
2010                 len = min_t(unsigned int, len, sizeof(uf));
2011                 if (copy_to_user(optval, &uf, len))
2012                         err = -EFAULT;
2013                 break;
2014
2015         default:
2016                 err = -ENOPROTOOPT;
2017                 break;
2018         }
2019
2020 done:
2021         release_sock(sk);
2022         return err;
2023 }
2024
2025 static int hci_sock_getsockopt(struct socket *sock, int level, int optname,
2026                                char __user *optval, int __user *optlen)
2027 {
2028         struct sock *sk = sock->sk;
2029         int err = 0;
2030
2031         BT_DBG("sk %p, opt %d", sk, optname);
2032
2033         if (level == SOL_HCI)
2034                 return hci_sock_getsockopt_old(sock, level, optname, optval,
2035                                                optlen);
2036
2037         if (level != SOL_BLUETOOTH)
2038                 return -ENOPROTOOPT;
2039
2040         lock_sock(sk);
2041
2042         switch (optname) {
2043         case BT_SNDMTU:
2044         case BT_RCVMTU:
2045                 if (put_user(hci_pi(sk)->mtu, (u16 __user *)optval))
2046                         err = -EFAULT;
2047                 break;
2048
2049         default:
2050                 err = -ENOPROTOOPT;
2051                 break;
2052         }
2053
2054         release_sock(sk);
2055         return err;
2056 }
2057
2058 static void hci_sock_destruct(struct sock *sk)
2059 {
2060         skb_queue_purge(&sk->sk_receive_queue);
2061         skb_queue_purge(&sk->sk_write_queue);
2062 }
2063
2064 static const struct proto_ops hci_sock_ops = {
2065         .family         = PF_BLUETOOTH,
2066         .owner          = THIS_MODULE,
2067         .release        = hci_sock_release,
2068         .bind           = hci_sock_bind,
2069         .getname        = hci_sock_getname,
2070         .sendmsg        = hci_sock_sendmsg,
2071         .recvmsg        = hci_sock_recvmsg,
2072         .ioctl          = hci_sock_ioctl,
2073 #ifdef CONFIG_COMPAT
2074         .compat_ioctl   = hci_sock_compat_ioctl,
2075 #endif
2076         .poll           = datagram_poll,
2077         .listen         = sock_no_listen,
2078         .shutdown       = sock_no_shutdown,
2079         .setsockopt     = hci_sock_setsockopt,
2080         .getsockopt     = hci_sock_getsockopt,
2081         .connect        = sock_no_connect,
2082         .socketpair     = sock_no_socketpair,
2083         .accept         = sock_no_accept,
2084         .mmap           = sock_no_mmap
2085 };
2086
2087 static struct proto hci_sk_proto = {
2088         .name           = "HCI",
2089         .owner          = THIS_MODULE,
2090         .obj_size       = sizeof(struct hci_pinfo)
2091 };
2092
2093 static int hci_sock_create(struct net *net, struct socket *sock, int protocol,
2094                            int kern)
2095 {
2096         struct sock *sk;
2097
2098         BT_DBG("sock %p", sock);
2099
2100         if (sock->type != SOCK_RAW)
2101                 return -ESOCKTNOSUPPORT;
2102
2103         sock->ops = &hci_sock_ops;
2104
2105         sk = sk_alloc(net, PF_BLUETOOTH, GFP_ATOMIC, &hci_sk_proto, kern);
2106         if (!sk)
2107                 return -ENOMEM;
2108
2109         sock_init_data(sock, sk);
2110
2111         sock_reset_flag(sk, SOCK_ZAPPED);
2112
2113         sk->sk_protocol = protocol;
2114
2115         sock->state = SS_UNCONNECTED;
2116         sk->sk_state = BT_OPEN;
2117         sk->sk_destruct = hci_sock_destruct;
2118
2119         bt_sock_link(&hci_sk_list, sk);
2120         return 0;
2121 }
2122
2123 static const struct net_proto_family hci_sock_family_ops = {
2124         .family = PF_BLUETOOTH,
2125         .owner  = THIS_MODULE,
2126         .create = hci_sock_create,
2127 };
2128
2129 int __init hci_sock_init(void)
2130 {
2131         int err;
2132
2133         BUILD_BUG_ON(sizeof(struct sockaddr_hci) > sizeof(struct sockaddr));
2134
2135         err = proto_register(&hci_sk_proto, 0);
2136         if (err < 0)
2137                 return err;
2138
2139         err = bt_sock_register(BTPROTO_HCI, &hci_sock_family_ops);
2140         if (err < 0) {
2141                 BT_ERR("HCI socket registration failed");
2142                 goto error;
2143         }
2144
2145         err = bt_procfs_init(&init_net, "hci", &hci_sk_list, NULL);
2146         if (err < 0) {
2147                 BT_ERR("Failed to create HCI proc file");
2148                 bt_sock_unregister(BTPROTO_HCI);
2149                 goto error;
2150         }
2151
2152         BT_INFO("HCI socket layer initialized");
2153
2154         return 0;
2155
2156 error:
2157         proto_unregister(&hci_sk_proto);
2158         return err;
2159 }
2160
2161 void hci_sock_cleanup(void)
2162 {
2163         bt_procfs_cleanup(&init_net, "hci");
2164         bt_sock_unregister(BTPROTO_HCI);
2165         proto_unregister(&hci_sk_proto);
2166 }