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         struct sock *sk = sock->sk;
1457         struct sk_buff *skb;
1458         int copied, err;
1459         unsigned int skblen;
1460
1461         BT_DBG("sock %p, sk %p", sock, sk);
1462
1463         if (flags & MSG_OOB)
1464                 return -EOPNOTSUPP;
1465
1466         if (hci_pi(sk)->channel == HCI_CHANNEL_LOGGING)
1467                 return -EOPNOTSUPP;
1468
1469         if (sk->sk_state == BT_CLOSED)
1470                 return 0;
1471
1472         skb = skb_recv_datagram(sk, flags, &err);
1473         if (!skb)
1474                 return err;
1475
1476         skblen = skb->len;
1477         copied = skb->len;
1478         if (len < copied) {
1479                 msg->msg_flags |= MSG_TRUNC;
1480                 copied = len;
1481         }
1482
1483         skb_reset_transport_header(skb);
1484         err = skb_copy_datagram_msg(skb, 0, msg, copied);
1485
1486         switch (hci_pi(sk)->channel) {
1487         case HCI_CHANNEL_RAW:
1488                 hci_sock_cmsg(sk, msg, skb);
1489                 break;
1490         case HCI_CHANNEL_USER:
1491         case HCI_CHANNEL_MONITOR:
1492                 sock_recv_timestamp(msg, sk, skb);
1493                 break;
1494         default:
1495                 if (hci_mgmt_chan_find(hci_pi(sk)->channel))
1496                         sock_recv_timestamp(msg, sk, skb);
1497                 break;
1498         }
1499
1500         skb_free_datagram(sk, skb);
1501
1502         if (flags & MSG_TRUNC)
1503                 copied = skblen;
1504
1505         return err ? : copied;
1506 }
1507
1508 static int hci_mgmt_cmd(struct hci_mgmt_chan *chan, struct sock *sk,
1509                         struct sk_buff *skb)
1510 {
1511         u8 *cp;
1512         struct mgmt_hdr *hdr;
1513         u16 opcode, index, len;
1514         struct hci_dev *hdev = NULL;
1515         const struct hci_mgmt_handler *handler;
1516         bool var_len, no_hdev;
1517         int err;
1518
1519         BT_DBG("got %d bytes", skb->len);
1520
1521         if (skb->len < sizeof(*hdr))
1522                 return -EINVAL;
1523
1524         hdr = (void *)skb->data;
1525         opcode = __le16_to_cpu(hdr->opcode);
1526         index = __le16_to_cpu(hdr->index);
1527         len = __le16_to_cpu(hdr->len);
1528
1529         if (len != skb->len - sizeof(*hdr)) {
1530                 err = -EINVAL;
1531                 goto done;
1532         }
1533
1534         if (chan->channel == HCI_CHANNEL_CONTROL) {
1535                 struct sk_buff *cmd;
1536
1537                 /* Send event to monitor */
1538                 cmd = create_monitor_ctrl_command(sk, index, opcode, len,
1539                                                   skb->data + sizeof(*hdr));
1540                 if (cmd) {
1541                         hci_send_to_channel(HCI_CHANNEL_MONITOR, cmd,
1542                                             HCI_SOCK_TRUSTED, NULL);
1543                         kfree_skb(cmd);
1544                 }
1545         }
1546
1547         if (opcode >= chan->handler_count ||
1548             chan->handlers[opcode].func == NULL) {
1549                 BT_DBG("Unknown op %u", opcode);
1550                 err = mgmt_cmd_status(sk, index, opcode,
1551                                       MGMT_STATUS_UNKNOWN_COMMAND);
1552                 goto done;
1553         }
1554
1555         handler = &chan->handlers[opcode];
1556
1557         if (!hci_sock_test_flag(sk, HCI_SOCK_TRUSTED) &&
1558             !(handler->flags & HCI_MGMT_UNTRUSTED)) {
1559                 err = mgmt_cmd_status(sk, index, opcode,
1560                                       MGMT_STATUS_PERMISSION_DENIED);
1561                 goto done;
1562         }
1563
1564         if (index != MGMT_INDEX_NONE) {
1565                 hdev = hci_dev_get(index);
1566                 if (!hdev) {
1567                         err = mgmt_cmd_status(sk, index, opcode,
1568                                               MGMT_STATUS_INVALID_INDEX);
1569                         goto done;
1570                 }
1571
1572                 if (hci_dev_test_flag(hdev, HCI_SETUP) ||
1573                     hci_dev_test_flag(hdev, HCI_CONFIG) ||
1574                     hci_dev_test_flag(hdev, HCI_USER_CHANNEL)) {
1575                         err = mgmt_cmd_status(sk, index, opcode,
1576                                               MGMT_STATUS_INVALID_INDEX);
1577                         goto done;
1578                 }
1579
1580                 if (hci_dev_test_flag(hdev, HCI_UNCONFIGURED) &&
1581                     !(handler->flags & HCI_MGMT_UNCONFIGURED)) {
1582                         err = mgmt_cmd_status(sk, index, opcode,
1583                                               MGMT_STATUS_INVALID_INDEX);
1584                         goto done;
1585                 }
1586         }
1587
1588         if (!(handler->flags & HCI_MGMT_HDEV_OPTIONAL)) {
1589                 no_hdev = (handler->flags & HCI_MGMT_NO_HDEV);
1590                 if (no_hdev != !hdev) {
1591                         err = mgmt_cmd_status(sk, index, opcode,
1592                                               MGMT_STATUS_INVALID_INDEX);
1593                         goto done;
1594                 }
1595         }
1596
1597         var_len = (handler->flags & HCI_MGMT_VAR_LEN);
1598         if ((var_len && len < handler->data_len) ||
1599             (!var_len && len != handler->data_len)) {
1600                 err = mgmt_cmd_status(sk, index, opcode,
1601                                       MGMT_STATUS_INVALID_PARAMS);
1602                 goto done;
1603         }
1604
1605         if (hdev && chan->hdev_init)
1606                 chan->hdev_init(sk, hdev);
1607
1608         cp = skb->data + sizeof(*hdr);
1609
1610         err = handler->func(sk, hdev, cp, len);
1611         if (err < 0)
1612                 goto done;
1613
1614         err = skb->len;
1615
1616 done:
1617         if (hdev)
1618                 hci_dev_put(hdev);
1619
1620         return err;
1621 }
1622
1623 static int hci_logging_frame(struct sock *sk, struct sk_buff *skb,
1624                              unsigned int flags)
1625 {
1626         struct hci_mon_hdr *hdr;
1627         struct hci_dev *hdev;
1628         u16 index;
1629         int err;
1630
1631         /* The logging frame consists at minimum of the standard header,
1632          * the priority byte, the ident length byte and at least one string
1633          * terminator NUL byte. Anything shorter are invalid packets.
1634          */
1635         if (skb->len < sizeof(*hdr) + 3)
1636                 return -EINVAL;
1637
1638         hdr = (void *)skb->data;
1639
1640         if (__le16_to_cpu(hdr->len) != skb->len - sizeof(*hdr))
1641                 return -EINVAL;
1642
1643         if (__le16_to_cpu(hdr->opcode) == 0x0000) {
1644                 __u8 priority = skb->data[sizeof(*hdr)];
1645                 __u8 ident_len = skb->data[sizeof(*hdr) + 1];
1646
1647                 /* Only the priorities 0-7 are valid and with that any other
1648                  * value results in an invalid packet.
1649                  *
1650                  * The priority byte is followed by an ident length byte and
1651                  * the NUL terminated ident string. Check that the ident
1652                  * length is not overflowing the packet and also that the
1653                  * ident string itself is NUL terminated. In case the ident
1654                  * length is zero, the length value actually doubles as NUL
1655                  * terminator identifier.
1656                  *
1657                  * The message follows the ident string (if present) and
1658                  * must be NUL terminated. Otherwise it is not a valid packet.
1659                  */
1660                 if (priority > 7 || skb->data[skb->len - 1] != 0x00 ||
1661                     ident_len > skb->len - sizeof(*hdr) - 3 ||
1662                     skb->data[sizeof(*hdr) + ident_len + 1] != 0x00)
1663                         return -EINVAL;
1664         } else {
1665                 return -EINVAL;
1666         }
1667
1668         index = __le16_to_cpu(hdr->index);
1669
1670         if (index != MGMT_INDEX_NONE) {
1671                 hdev = hci_dev_get(index);
1672                 if (!hdev)
1673                         return -ENODEV;
1674         } else {
1675                 hdev = NULL;
1676         }
1677
1678         hdr->opcode = cpu_to_le16(HCI_MON_USER_LOGGING);
1679
1680         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb, HCI_SOCK_TRUSTED, NULL);
1681         err = skb->len;
1682
1683         if (hdev)
1684                 hci_dev_put(hdev);
1685
1686         return err;
1687 }
1688
1689 static int hci_sock_sendmsg(struct socket *sock, struct msghdr *msg,
1690                             size_t len)
1691 {
1692         struct sock *sk = sock->sk;
1693         struct hci_mgmt_chan *chan;
1694         struct hci_dev *hdev;
1695         struct sk_buff *skb;
1696         int err;
1697         const unsigned int flags = msg->msg_flags;
1698
1699         BT_DBG("sock %p sk %p", sock, sk);
1700
1701         if (flags & MSG_OOB)
1702                 return -EOPNOTSUPP;
1703
1704         if (flags & ~(MSG_DONTWAIT | MSG_NOSIGNAL | MSG_ERRQUEUE | MSG_CMSG_COMPAT))
1705                 return -EINVAL;
1706
1707         if (len < 4 || len > hci_pi(sk)->mtu)
1708                 return -EINVAL;
1709
1710         skb = bt_skb_sendmsg(sk, msg, len, len, 0, 0);
1711         if (IS_ERR(skb))
1712                 return PTR_ERR(skb);
1713
1714         lock_sock(sk);
1715
1716         switch (hci_pi(sk)->channel) {
1717         case HCI_CHANNEL_RAW:
1718         case HCI_CHANNEL_USER:
1719                 break;
1720         case HCI_CHANNEL_MONITOR:
1721                 err = -EOPNOTSUPP;
1722                 goto drop;
1723         case HCI_CHANNEL_LOGGING:
1724                 err = hci_logging_frame(sk, skb, flags);
1725                 goto drop;
1726         default:
1727                 mutex_lock(&mgmt_chan_list_lock);
1728                 chan = __hci_mgmt_chan_find(hci_pi(sk)->channel);
1729                 if (chan)
1730                         err = hci_mgmt_cmd(chan, sk, skb);
1731                 else
1732                         err = -EINVAL;
1733
1734                 mutex_unlock(&mgmt_chan_list_lock);
1735                 goto drop;
1736         }
1737
1738         hdev = hci_hdev_from_sock(sk);
1739         if (IS_ERR(hdev)) {
1740                 err = PTR_ERR(hdev);
1741                 goto drop;
1742         }
1743
1744         if (!test_bit(HCI_UP, &hdev->flags)) {
1745                 err = -ENETDOWN;
1746                 goto drop;
1747         }
1748
1749         hci_skb_pkt_type(skb) = skb->data[0];
1750         skb_pull(skb, 1);
1751
1752         if (hci_pi(sk)->channel == HCI_CHANNEL_USER) {
1753                 /* No permission check is needed for user channel
1754                  * since that gets enforced when binding the socket.
1755                  *
1756                  * However check that the packet type is valid.
1757                  */
1758                 if (hci_skb_pkt_type(skb) != HCI_COMMAND_PKT &&
1759                     hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
1760                     hci_skb_pkt_type(skb) != HCI_SCODATA_PKT &&
1761                     hci_skb_pkt_type(skb) != HCI_ISODATA_PKT) {
1762                         err = -EINVAL;
1763                         goto drop;
1764                 }
1765
1766                 skb_queue_tail(&hdev->raw_q, skb);
1767                 queue_work(hdev->workqueue, &hdev->tx_work);
1768         } else if (hci_skb_pkt_type(skb) == HCI_COMMAND_PKT) {
1769                 u16 opcode = get_unaligned_le16(skb->data);
1770                 u16 ogf = hci_opcode_ogf(opcode);
1771                 u16 ocf = hci_opcode_ocf(opcode);
1772
1773                 if (((ogf > HCI_SFLT_MAX_OGF) ||
1774                      !hci_test_bit(ocf & HCI_FLT_OCF_BITS,
1775                                    &hci_sec_filter.ocf_mask[ogf])) &&
1776                     !capable(CAP_NET_RAW)) {
1777                         err = -EPERM;
1778                         goto drop;
1779                 }
1780
1781                 /* Since the opcode has already been extracted here, store
1782                  * a copy of the value for later use by the drivers.
1783                  */
1784                 hci_skb_opcode(skb) = opcode;
1785
1786                 if (ogf == 0x3f) {
1787                         skb_queue_tail(&hdev->raw_q, skb);
1788                         queue_work(hdev->workqueue, &hdev->tx_work);
1789                 } else {
1790                         /* Stand-alone HCI commands must be flagged as
1791                          * single-command requests.
1792                          */
1793                         bt_cb(skb)->hci.req_flags |= HCI_REQ_START;
1794
1795                         skb_queue_tail(&hdev->cmd_q, skb);
1796                         queue_work(hdev->workqueue, &hdev->cmd_work);
1797                 }
1798         } else {
1799                 if (!capable(CAP_NET_RAW)) {
1800                         err = -EPERM;
1801                         goto drop;
1802                 }
1803
1804                 if (hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
1805                     hci_skb_pkt_type(skb) != HCI_SCODATA_PKT &&
1806                     hci_skb_pkt_type(skb) != HCI_ISODATA_PKT) {
1807                         err = -EINVAL;
1808                         goto drop;
1809                 }
1810
1811                 skb_queue_tail(&hdev->raw_q, skb);
1812                 queue_work(hdev->workqueue, &hdev->tx_work);
1813         }
1814
1815         err = len;
1816
1817 done:
1818         release_sock(sk);
1819         return err;
1820
1821 drop:
1822         kfree_skb(skb);
1823         goto done;
1824 }
1825
1826 static int hci_sock_setsockopt_old(struct socket *sock, int level, int optname,
1827                                    sockptr_t optval, unsigned int len)
1828 {
1829         struct hci_ufilter uf = { .opcode = 0 };
1830         struct sock *sk = sock->sk;
1831         int err = 0, opt = 0;
1832
1833         BT_DBG("sk %p, opt %d", sk, optname);
1834
1835         lock_sock(sk);
1836
1837         if (hci_pi(sk)->channel != HCI_CHANNEL_RAW) {
1838                 err = -EBADFD;
1839                 goto done;
1840         }
1841
1842         switch (optname) {
1843         case HCI_DATA_DIR:
1844                 if (copy_from_sockptr(&opt, optval, sizeof(opt))) {
1845                         err = -EFAULT;
1846                         break;
1847                 }
1848
1849                 if (opt)
1850                         hci_pi(sk)->cmsg_mask |= HCI_CMSG_DIR;
1851                 else
1852                         hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_DIR;
1853                 break;
1854
1855         case HCI_TIME_STAMP:
1856                 if (copy_from_sockptr(&opt, optval, sizeof(opt))) {
1857                         err = -EFAULT;
1858                         break;
1859                 }
1860
1861                 if (opt)
1862                         hci_pi(sk)->cmsg_mask |= HCI_CMSG_TSTAMP;
1863                 else
1864                         hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_TSTAMP;
1865                 break;
1866
1867         case HCI_FILTER:
1868                 {
1869                         struct hci_filter *f = &hci_pi(sk)->filter;
1870
1871                         uf.type_mask = f->type_mask;
1872                         uf.opcode    = f->opcode;
1873                         uf.event_mask[0] = *((u32 *) f->event_mask + 0);
1874                         uf.event_mask[1] = *((u32 *) f->event_mask + 1);
1875                 }
1876
1877                 len = min_t(unsigned int, len, sizeof(uf));
1878                 if (copy_from_sockptr(&uf, optval, len)) {
1879                         err = -EFAULT;
1880                         break;
1881                 }
1882
1883                 if (!capable(CAP_NET_RAW)) {
1884                         uf.type_mask &= hci_sec_filter.type_mask;
1885                         uf.event_mask[0] &= *((u32 *) hci_sec_filter.event_mask + 0);
1886                         uf.event_mask[1] &= *((u32 *) hci_sec_filter.event_mask + 1);
1887                 }
1888
1889                 {
1890                         struct hci_filter *f = &hci_pi(sk)->filter;
1891
1892                         f->type_mask = uf.type_mask;
1893                         f->opcode    = uf.opcode;
1894                         *((u32 *) f->event_mask + 0) = uf.event_mask[0];
1895                         *((u32 *) f->event_mask + 1) = uf.event_mask[1];
1896                 }
1897                 break;
1898
1899         default:
1900                 err = -ENOPROTOOPT;
1901                 break;
1902         }
1903
1904 done:
1905         release_sock(sk);
1906         return err;
1907 }
1908
1909 static int hci_sock_setsockopt(struct socket *sock, int level, int optname,
1910                                sockptr_t optval, unsigned int len)
1911 {
1912         struct sock *sk = sock->sk;
1913         int err = 0;
1914         u16 opt;
1915
1916         BT_DBG("sk %p, opt %d", sk, optname);
1917
1918         if (level == SOL_HCI)
1919                 return hci_sock_setsockopt_old(sock, level, optname, optval,
1920                                                len);
1921
1922         if (level != SOL_BLUETOOTH)
1923                 return -ENOPROTOOPT;
1924
1925         lock_sock(sk);
1926
1927         switch (optname) {
1928         case BT_SNDMTU:
1929         case BT_RCVMTU:
1930                 switch (hci_pi(sk)->channel) {
1931                 /* Don't allow changing MTU for channels that are meant for HCI
1932                  * traffic only.
1933                  */
1934                 case HCI_CHANNEL_RAW:
1935                 case HCI_CHANNEL_USER:
1936                         err = -ENOPROTOOPT;
1937                         goto done;
1938                 }
1939
1940                 if (copy_from_sockptr(&opt, optval, sizeof(opt))) {
1941                         err = -EFAULT;
1942                         break;
1943                 }
1944
1945                 hci_pi(sk)->mtu = opt;
1946                 break;
1947
1948         default:
1949                 err = -ENOPROTOOPT;
1950                 break;
1951         }
1952
1953 done:
1954         release_sock(sk);
1955         return err;
1956 }
1957
1958 static int hci_sock_getsockopt_old(struct socket *sock, int level, int optname,
1959                                    char __user *optval, int __user *optlen)
1960 {
1961         struct hci_ufilter uf;
1962         struct sock *sk = sock->sk;
1963         int len, opt, err = 0;
1964
1965         BT_DBG("sk %p, opt %d", sk, optname);
1966
1967         if (get_user(len, optlen))
1968                 return -EFAULT;
1969
1970         lock_sock(sk);
1971
1972         if (hci_pi(sk)->channel != HCI_CHANNEL_RAW) {
1973                 err = -EBADFD;
1974                 goto done;
1975         }
1976
1977         switch (optname) {
1978         case HCI_DATA_DIR:
1979                 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_DIR)
1980                         opt = 1;
1981                 else
1982                         opt = 0;
1983
1984                 if (put_user(opt, optval))
1985                         err = -EFAULT;
1986                 break;
1987
1988         case HCI_TIME_STAMP:
1989                 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_TSTAMP)
1990                         opt = 1;
1991                 else
1992                         opt = 0;
1993
1994                 if (put_user(opt, optval))
1995                         err = -EFAULT;
1996                 break;
1997
1998         case HCI_FILTER:
1999                 {
2000                         struct hci_filter *f = &hci_pi(sk)->filter;
2001
2002                         memset(&uf, 0, sizeof(uf));
2003                         uf.type_mask = f->type_mask;
2004                         uf.opcode    = f->opcode;
2005                         uf.event_mask[0] = *((u32 *) f->event_mask + 0);
2006                         uf.event_mask[1] = *((u32 *) f->event_mask + 1);
2007                 }
2008
2009                 len = min_t(unsigned int, len, sizeof(uf));
2010                 if (copy_to_user(optval, &uf, len))
2011                         err = -EFAULT;
2012                 break;
2013
2014         default:
2015                 err = -ENOPROTOOPT;
2016                 break;
2017         }
2018
2019 done:
2020         release_sock(sk);
2021         return err;
2022 }
2023
2024 static int hci_sock_getsockopt(struct socket *sock, int level, int optname,
2025                                char __user *optval, int __user *optlen)
2026 {
2027         struct sock *sk = sock->sk;
2028         int err = 0;
2029
2030         BT_DBG("sk %p, opt %d", sk, optname);
2031
2032         if (level == SOL_HCI)
2033                 return hci_sock_getsockopt_old(sock, level, optname, optval,
2034                                                optlen);
2035
2036         if (level != SOL_BLUETOOTH)
2037                 return -ENOPROTOOPT;
2038
2039         lock_sock(sk);
2040
2041         switch (optname) {
2042         case BT_SNDMTU:
2043         case BT_RCVMTU:
2044                 if (put_user(hci_pi(sk)->mtu, (u16 __user *)optval))
2045                         err = -EFAULT;
2046                 break;
2047
2048         default:
2049                 err = -ENOPROTOOPT;
2050                 break;
2051         }
2052
2053         release_sock(sk);
2054         return err;
2055 }
2056
2057 static void hci_sock_destruct(struct sock *sk)
2058 {
2059         skb_queue_purge(&sk->sk_receive_queue);
2060         skb_queue_purge(&sk->sk_write_queue);
2061 }
2062
2063 static const struct proto_ops hci_sock_ops = {
2064         .family         = PF_BLUETOOTH,
2065         .owner          = THIS_MODULE,
2066         .release        = hci_sock_release,
2067         .bind           = hci_sock_bind,
2068         .getname        = hci_sock_getname,
2069         .sendmsg        = hci_sock_sendmsg,
2070         .recvmsg        = hci_sock_recvmsg,
2071         .ioctl          = hci_sock_ioctl,
2072 #ifdef CONFIG_COMPAT
2073         .compat_ioctl   = hci_sock_compat_ioctl,
2074 #endif
2075         .poll           = datagram_poll,
2076         .listen         = sock_no_listen,
2077         .shutdown       = sock_no_shutdown,
2078         .setsockopt     = hci_sock_setsockopt,
2079         .getsockopt     = hci_sock_getsockopt,
2080         .connect        = sock_no_connect,
2081         .socketpair     = sock_no_socketpair,
2082         .accept         = sock_no_accept,
2083         .mmap           = sock_no_mmap
2084 };
2085
2086 static struct proto hci_sk_proto = {
2087         .name           = "HCI",
2088         .owner          = THIS_MODULE,
2089         .obj_size       = sizeof(struct hci_pinfo)
2090 };
2091
2092 static int hci_sock_create(struct net *net, struct socket *sock, int protocol,
2093                            int kern)
2094 {
2095         struct sock *sk;
2096
2097         BT_DBG("sock %p", sock);
2098
2099         if (sock->type != SOCK_RAW)
2100                 return -ESOCKTNOSUPPORT;
2101
2102         sock->ops = &hci_sock_ops;
2103
2104         sk = sk_alloc(net, PF_BLUETOOTH, GFP_ATOMIC, &hci_sk_proto, kern);
2105         if (!sk)
2106                 return -ENOMEM;
2107
2108         sock_init_data(sock, sk);
2109
2110         sock_reset_flag(sk, SOCK_ZAPPED);
2111
2112         sk->sk_protocol = protocol;
2113
2114         sock->state = SS_UNCONNECTED;
2115         sk->sk_state = BT_OPEN;
2116         sk->sk_destruct = hci_sock_destruct;
2117
2118         bt_sock_link(&hci_sk_list, sk);
2119         return 0;
2120 }
2121
2122 static const struct net_proto_family hci_sock_family_ops = {
2123         .family = PF_BLUETOOTH,
2124         .owner  = THIS_MODULE,
2125         .create = hci_sock_create,
2126 };
2127
2128 int __init hci_sock_init(void)
2129 {
2130         int err;
2131
2132         BUILD_BUG_ON(sizeof(struct sockaddr_hci) > sizeof(struct sockaddr));
2133
2134         err = proto_register(&hci_sk_proto, 0);
2135         if (err < 0)
2136                 return err;
2137
2138         err = bt_sock_register(BTPROTO_HCI, &hci_sock_family_ops);
2139         if (err < 0) {
2140                 BT_ERR("HCI socket registration failed");
2141                 goto error;
2142         }
2143
2144         err = bt_procfs_init(&init_net, "hci", &hci_sk_list, NULL);
2145         if (err < 0) {
2146                 BT_ERR("Failed to create HCI proc file");
2147                 bt_sock_unregister(BTPROTO_HCI);
2148                 goto error;
2149         }
2150
2151         BT_INFO("HCI socket layer initialized");
2152
2153         return 0;
2154
2155 error:
2156         proto_unregister(&hci_sk_proto);
2157         return err;
2158 }
2159
2160 void hci_sock_cleanup(void)
2161 {
2162         bt_procfs_cleanup(&init_net, "hci");
2163         bt_sock_unregister(BTPROTO_HCI);
2164         proto_unregister(&hci_sk_proto);
2165 }