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                     !hci_dev_test_flag(hdev, HCI_UNREGISTER)) {
 874                         /* When releasing a user channel exclusive access,
 875                          * call hci_dev_do_close directly instead of calling
 876                          * hci_dev_close to ensure the exclusive access will
 877                          * be released and the controller brought back down.
 878                          *
 879                          * The checking of HCI_AUTO_OFF is not needed in this
 880                          * case since it will have been cleared already when
 881                          * opening the user channel.
 882                          *
 883                          * Make sure to also check that we haven't already
 884                          * unregistered since all the cleanup will have already
 885                          * been complete and hdev will get released when we put
 886                          * below.
 887                          */
 888                         hci_dev_do_close(hdev);
 889                         hci_dev_clear_flag(hdev, HCI_USER_CHANNEL);
 890                         hci_register_suspend_notifier(hdev);
 891                         mgmt_index_added(hdev);
 892                 }
 893
 894                 atomic_dec(&hdev->promisc);
 895                 hci_dev_put(hdev);
 896         }
 897
 898         sock_orphan(sk);
 899         release_sock(sk);
 900         sock_put(sk);
 901         return 0;
 902 }
 903
 904 static int hci_sock_reject_list_add(struct hci_dev *hdev, void __user *arg)
 905 {
 906         bdaddr_t bdaddr;
 907         int err;
 908
 909         if (copy_from_user(&bdaddr, arg, sizeof(bdaddr)))
 910                 return -EFAULT;
 911
 912         hci_dev_lock(hdev);
 913
 914         err = hci_bdaddr_list_add(&hdev->reject_list, &bdaddr, BDADDR_BREDR);
 915
 916         hci_dev_unlock(hdev);
 917
 918         return err;
 919 }
 920
 921 static int hci_sock_reject_list_del(struct hci_dev *hdev, void __user *arg)
 922 {
 923         bdaddr_t bdaddr;
 924         int err;
 925
 926         if (copy_from_user(&bdaddr, arg, sizeof(bdaddr)))
 927                 return -EFAULT;
 928
 929         hci_dev_lock(hdev);
 930
 931         err = hci_bdaddr_list_del(&hdev->reject_list, &bdaddr, BDADDR_BREDR);
 932
 933         hci_dev_unlock(hdev);
 934
 935         return err;
 936 }
 937
 938 /* Ioctls that require bound socket */
 939 static int hci_sock_bound_ioctl(struct sock *sk, unsigned int cmd,
 940                                 unsigned long arg)
 941 {
 942         struct hci_dev *hdev = hci_hdev_from_sock(sk);
 943
 944         if (IS_ERR(hdev))
 945                 return PTR_ERR(hdev);
 946
 947         if (hci_dev_test_flag(hdev, HCI_USER_CHANNEL))
 948                 return -EBUSY;
 949
 950         if (hci_dev_test_flag(hdev, HCI_UNCONFIGURED))
 951                 return -EOPNOTSUPP;
 952
 953         if (hdev->dev_type != HCI_PRIMARY)
 954                 return -EOPNOTSUPP;
 955
 956         switch (cmd) {
 957         case HCISETRAW:
 958                 if (!capable(CAP_NET_ADMIN))
 959                         return -EPERM;
 960                 return -EOPNOTSUPP;
 961
 962         case HCIGETCONNINFO:
 963                 return hci_get_conn_info(hdev, (void __user *)arg);
 964
 965         case HCIGETAUTHINFO:
 966                 return hci_get_auth_info(hdev, (void __user *)arg);
 967
 968         case HCIBLOCKADDR:
 969                 if (!capable(CAP_NET_ADMIN))
 970                         return -EPERM;
 971                 return hci_sock_reject_list_add(hdev, (void __user *)arg);
 972
 973         case HCIUNBLOCKADDR:
 974                 if (!capable(CAP_NET_ADMIN))
 975                         return -EPERM;
 976                 return hci_sock_reject_list_del(hdev, (void __user *)arg);
 977         }
 978
 979         return -ENOIOCTLCMD;
 980 }
 981
 982 static int hci_sock_ioctl(struct socket *sock, unsigned int cmd,
 983                           unsigned long arg)
 984 {
 985         void __user *argp = (void __user *)arg;
 986         struct sock *sk = sock->sk;
 987         int err;
 988
 989         BT_DBG("cmd %x arg %lx", cmd, arg);
 990
 991         lock_sock(sk);
 992
 993         if (hci_pi(sk)->channel != HCI_CHANNEL_RAW) {
 994                 err = -EBADFD;
 995                 goto done;
 996         }
 997
 998         /* When calling an ioctl on an unbound raw socket, then ensure
 999          * that the monitor gets informed. Ensure that the resulting event
1000          * is only send once by checking if the cookie exists or not. The
1001          * socket cookie will be only ever generated once for the lifetime
1002          * of a given socket.
1003          */
1004         if (hci_sock_gen_cookie(sk)) {
1005                 struct sk_buff *skb;
1006
1007                 if (capable(CAP_NET_ADMIN))
1008                         hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1009
1010                 /* Send event to monitor */
1011                 skb = create_monitor_ctrl_open(sk);
1012                 if (skb) {
1013                         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1014                                             HCI_SOCK_TRUSTED, NULL);
1015                         kfree_skb(skb);
1016                 }
1017         }
1018
1019         release_sock(sk);
1020
1021         switch (cmd) {
1022         case HCIGETDEVLIST:
1023                 return hci_get_dev_list(argp);
1024
1025         case HCIGETDEVINFO:
1026                 return hci_get_dev_info(argp);
1027
1028         case HCIGETCONNLIST:
1029                 return hci_get_conn_list(argp);
1030
1031         case HCIDEVUP:
1032                 if (!capable(CAP_NET_ADMIN))
1033                         return -EPERM;
1034                 return hci_dev_open(arg);
1035
1036         case HCIDEVDOWN:
1037                 if (!capable(CAP_NET_ADMIN))
1038                         return -EPERM;
1039                 return hci_dev_close(arg);
1040
1041         case HCIDEVRESET:
1042                 if (!capable(CAP_NET_ADMIN))
1043                         return -EPERM;
1044                 return hci_dev_reset(arg);
1045
1046         case HCIDEVRESTAT:
1047                 if (!capable(CAP_NET_ADMIN))
1048                         return -EPERM;
1049                 return hci_dev_reset_stat(arg);
1050
1051         case HCISETSCAN:
1052         case HCISETAUTH:
1053         case HCISETENCRYPT:
1054         case HCISETPTYPE:
1055         case HCISETLINKPOL:
1056         case HCISETLINKMODE:
1057         case HCISETACLMTU:
1058         case HCISETSCOMTU:
1059                 if (!capable(CAP_NET_ADMIN))
1060                         return -EPERM;
1061                 return hci_dev_cmd(cmd, argp);
1062
1063         case HCIINQUIRY:
1064                 return hci_inquiry(argp);
1065         }
1066
1067         lock_sock(sk);
1068
1069         err = hci_sock_bound_ioctl(sk, cmd, arg);
1070
1071 done:
1072         release_sock(sk);
1073         return err;
1074 }
1075
1076 #ifdef CONFIG_COMPAT
1077 static int hci_sock_compat_ioctl(struct socket *sock, unsigned int cmd,
1078                                  unsigned long arg)
1079 {
1080         switch (cmd) {
1081         case HCIDEVUP:
1082         case HCIDEVDOWN:
1083         case HCIDEVRESET:
1084         case HCIDEVRESTAT:
1085                 return hci_sock_ioctl(sock, cmd, arg);
1086         }
1087
1088         return hci_sock_ioctl(sock, cmd, (unsigned long)compat_ptr(arg));
1089 }
1090 #endif
1091
1092 static int hci_sock_bind(struct socket *sock, struct sockaddr *addr,
1093                          int addr_len)
1094 {
1095         struct sockaddr_hci haddr;
1096         struct sock *sk = sock->sk;
1097         struct hci_dev *hdev = NULL;
1098         struct sk_buff *skb;
1099         int len, err = 0;
1100
1101         BT_DBG("sock %p sk %p", sock, sk);
1102
1103         if (!addr)
1104                 return -EINVAL;
1105
1106         memset(&haddr, 0, sizeof(haddr));
1107         len = min_t(unsigned int, sizeof(haddr), addr_len);
1108         memcpy(&haddr, addr, len);
1109
1110         if (haddr.hci_family != AF_BLUETOOTH)
1111                 return -EINVAL;
1112
1113         lock_sock(sk);
1114
1115         /* Allow detaching from dead device and attaching to alive device, if
1116          * the caller wants to re-bind (instead of close) this socket in
1117          * response to hci_sock_dev_event(HCI_DEV_UNREG) notification.
1118          */
1119         hdev = hci_pi(sk)->hdev;
1120         if (hdev && hci_dev_test_flag(hdev, HCI_UNREGISTER)) {
1121                 hci_pi(sk)->hdev = NULL;
1122                 sk->sk_state = BT_OPEN;
1123                 hci_dev_put(hdev);
1124         }
1125         hdev = NULL;
1126
1127         if (sk->sk_state == BT_BOUND) {
1128                 err = -EALREADY;
1129                 goto done;
1130         }
1131
1132         switch (haddr.hci_channel) {
1133         case HCI_CHANNEL_RAW:
1134                 if (hci_pi(sk)->hdev) {
1135                         err = -EALREADY;
1136                         goto done;
1137                 }
1138
1139                 if (haddr.hci_dev != HCI_DEV_NONE) {
1140                         hdev = hci_dev_get(haddr.hci_dev);
1141                         if (!hdev) {
1142                                 err = -ENODEV;
1143                                 goto done;
1144                         }
1145
1146                         atomic_inc(&hdev->promisc);
1147                 }
1148
1149                 hci_pi(sk)->channel = haddr.hci_channel;
1150
1151                 if (!hci_sock_gen_cookie(sk)) {
1152                         /* In the case when a cookie has already been assigned,
1153                          * then there has been already an ioctl issued against
1154                          * an unbound socket and with that triggered an open
1155                          * notification. Send a close notification first to
1156                          * allow the state transition to bounded.
1157                          */
1158                         skb = create_monitor_ctrl_close(sk);
1159                         if (skb) {
1160                                 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1161                                                     HCI_SOCK_TRUSTED, NULL);
1162                                 kfree_skb(skb);
1163                         }
1164                 }
1165
1166                 if (capable(CAP_NET_ADMIN))
1167                         hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1168
1169                 hci_pi(sk)->hdev = hdev;
1170
1171                 /* Send event to monitor */
1172                 skb = create_monitor_ctrl_open(sk);
1173                 if (skb) {
1174                         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1175                                             HCI_SOCK_TRUSTED, NULL);
1176                         kfree_skb(skb);
1177                 }
1178                 break;
1179
1180         case HCI_CHANNEL_USER:
1181                 if (hci_pi(sk)->hdev) {
1182                         err = -EALREADY;
1183                         goto done;
1184                 }
1185
1186                 if (haddr.hci_dev == HCI_DEV_NONE) {
1187                         err = -EINVAL;
1188                         goto done;
1189                 }
1190
1191                 if (!capable(CAP_NET_ADMIN)) {
1192                         err = -EPERM;
1193                         goto done;
1194                 }
1195
1196                 hdev = hci_dev_get(haddr.hci_dev);
1197                 if (!hdev) {
1198                         err = -ENODEV;
1199                         goto done;
1200                 }
1201
1202                 if (test_bit(HCI_INIT, &hdev->flags) ||
1203                     hci_dev_test_flag(hdev, HCI_SETUP) ||
1204                     hci_dev_test_flag(hdev, HCI_CONFIG) ||
1205                     (!hci_dev_test_flag(hdev, HCI_AUTO_OFF) &&
1206                      test_bit(HCI_UP, &hdev->flags))) {
1207                         err = -EBUSY;
1208                         hci_dev_put(hdev);
1209                         goto done;
1210                 }
1211
1212                 if (hci_dev_test_and_set_flag(hdev, HCI_USER_CHANNEL)) {
1213                         err = -EUSERS;
1214                         hci_dev_put(hdev);
1215                         goto done;
1216                 }
1217
1218                 mgmt_index_removed(hdev);
1219                 hci_unregister_suspend_notifier(hdev);
1220
1221                 err = hci_dev_open(hdev->id);
1222                 if (err) {
1223                         if (err == -EALREADY) {
1224                                 /* In case the transport is already up and
1225                                  * running, clear the error here.
1226                                  *
1227                                  * This can happen when opening a user
1228                                  * channel and HCI_AUTO_OFF grace period
1229                                  * is still active.
1230                                  */
1231                                 err = 0;
1232                         } else {
1233                                 hci_dev_clear_flag(hdev, HCI_USER_CHANNEL);
1234                                 hci_register_suspend_notifier(hdev);
1235                                 mgmt_index_added(hdev);
1236                                 hci_dev_put(hdev);
1237                                 goto done;
1238                         }
1239                 }
1240
1241                 hci_pi(sk)->channel = haddr.hci_channel;
1242
1243                 if (!hci_sock_gen_cookie(sk)) {
1244                         /* In the case when a cookie has already been assigned,
1245                          * this socket will transition from a raw socket into
1246                          * a user channel socket. For a clean transition, send
1247                          * the close notification first.
1248                          */
1249                         skb = create_monitor_ctrl_close(sk);
1250                         if (skb) {
1251                                 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1252                                                     HCI_SOCK_TRUSTED, NULL);
1253                                 kfree_skb(skb);
1254                         }
1255                 }
1256
1257                 /* The user channel is restricted to CAP_NET_ADMIN
1258                  * capabilities and with that implicitly trusted.
1259                  */
1260                 hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1261
1262                 hci_pi(sk)->hdev = hdev;
1263
1264                 /* Send event to monitor */
1265                 skb = create_monitor_ctrl_open(sk);
1266                 if (skb) {
1267                         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1268                                             HCI_SOCK_TRUSTED, NULL);
1269                         kfree_skb(skb);
1270                 }
1271
1272                 atomic_inc(&hdev->promisc);
1273                 break;
1274
1275         case HCI_CHANNEL_MONITOR:
1276                 if (haddr.hci_dev != HCI_DEV_NONE) {
1277                         err = -EINVAL;
1278                         goto done;
1279                 }
1280
1281                 if (!capable(CAP_NET_RAW)) {
1282                         err = -EPERM;
1283                         goto done;
1284                 }
1285
1286                 hci_pi(sk)->channel = haddr.hci_channel;
1287
1288                 /* The monitor interface is restricted to CAP_NET_RAW
1289                  * capabilities and with that implicitly trusted.
1290                  */
1291                 hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1292
1293                 send_monitor_note(sk, "Linux version %s (%s)",
1294                                   init_utsname()->release,
1295                                   init_utsname()->machine);
1296                 send_monitor_note(sk, "Bluetooth subsystem version %u.%u",
1297                                   BT_SUBSYS_VERSION, BT_SUBSYS_REVISION);
1298                 send_monitor_replay(sk);
1299                 send_monitor_control_replay(sk);
1300
1301                 atomic_inc(&monitor_promisc);
1302                 break;
1303
1304         case HCI_CHANNEL_LOGGING:
1305                 if (haddr.hci_dev != HCI_DEV_NONE) {
1306                         err = -EINVAL;
1307                         goto done;
1308                 }
1309
1310                 if (!capable(CAP_NET_ADMIN)) {
1311                         err = -EPERM;
1312                         goto done;
1313                 }
1314
1315                 hci_pi(sk)->channel = haddr.hci_channel;
1316                 break;
1317
1318         default:
1319                 if (!hci_mgmt_chan_find(haddr.hci_channel)) {
1320                         err = -EINVAL;
1321                         goto done;
1322                 }
1323
1324                 if (haddr.hci_dev != HCI_DEV_NONE) {
1325                         err = -EINVAL;
1326                         goto done;
1327                 }
1328
1329                 /* Users with CAP_NET_ADMIN capabilities are allowed
1330                  * access to all management commands and events. For
1331                  * untrusted users the interface is restricted and
1332                  * also only untrusted events are sent.
1333                  */
1334                 if (capable(CAP_NET_ADMIN))
1335                         hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1336
1337                 hci_pi(sk)->channel = haddr.hci_channel;
1338
1339                 /* At the moment the index and unconfigured index events
1340                  * are enabled unconditionally. Setting them on each
1341                  * socket when binding keeps this functionality. They
1342                  * however might be cleared later and then sending of these
1343                  * events will be disabled, but that is then intentional.
1344                  *
1345                  * This also enables generic events that are safe to be
1346                  * received by untrusted users. Example for such events
1347                  * are changes to settings, class of device, name etc.
1348                  */
1349                 if (hci_pi(sk)->channel == HCI_CHANNEL_CONTROL) {
1350                         if (!hci_sock_gen_cookie(sk)) {
1351                                 /* In the case when a cookie has already been
1352                                  * assigned, this socket will transition from
1353                                  * a raw socket into a control socket. To
1354                                  * allow for a clean transition, send the
1355                                  * close notification first.
1356                                  */
1357                                 skb = create_monitor_ctrl_close(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
1365                         /* Send event to monitor */
1366                         skb = create_monitor_ctrl_open(sk);
1367                         if (skb) {
1368                                 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1369                                                     HCI_SOCK_TRUSTED, NULL);
1370                                 kfree_skb(skb);
1371                         }
1372
1373                         hci_sock_set_flag(sk, HCI_MGMT_INDEX_EVENTS);
1374                         hci_sock_set_flag(sk, HCI_MGMT_UNCONF_INDEX_EVENTS);
1375                         hci_sock_set_flag(sk, HCI_MGMT_OPTION_EVENTS);
1376                         hci_sock_set_flag(sk, HCI_MGMT_SETTING_EVENTS);
1377                         hci_sock_set_flag(sk, HCI_MGMT_DEV_CLASS_EVENTS);
1378                         hci_sock_set_flag(sk, HCI_MGMT_LOCAL_NAME_EVENTS);
1379                 }
1380                 break;
1381         }
1382
1383         /* Default MTU to HCI_MAX_FRAME_SIZE if not set */
1384         if (!hci_pi(sk)->mtu)
1385                 hci_pi(sk)->mtu = HCI_MAX_FRAME_SIZE;
1386
1387         sk->sk_state = BT_BOUND;
1388
1389 done:
1390         release_sock(sk);
1391         return err;
1392 }
1393
1394 static int hci_sock_getname(struct socket *sock, struct sockaddr *addr,
1395                             int peer)
1396 {
1397         struct sockaddr_hci *haddr = (struct sockaddr_hci *)addr;
1398         struct sock *sk = sock->sk;
1399         struct hci_dev *hdev;
1400         int err = 0;
1401
1402         BT_DBG("sock %p sk %p", sock, sk);
1403
1404         if (peer)
1405                 return -EOPNOTSUPP;
1406
1407         lock_sock(sk);
1408
1409         hdev = hci_hdev_from_sock(sk);
1410         if (IS_ERR(hdev)) {
1411                 err = PTR_ERR(hdev);
1412                 goto done;
1413         }
1414
1415         haddr->hci_family = AF_BLUETOOTH;
1416         haddr->hci_dev    = hdev->id;
1417         haddr->hci_channel= hci_pi(sk)->channel;
1418         err = sizeof(*haddr);
1419
1420 done:
1421         release_sock(sk);
1422         return err;
1423 }
1424
1425 static void hci_sock_cmsg(struct sock *sk, struct msghdr *msg,
1426                           struct sk_buff *skb)
1427 {
1428         __u8 mask = hci_pi(sk)->cmsg_mask;
1429
1430         if (mask & HCI_CMSG_DIR) {
1431                 int incoming = bt_cb(skb)->incoming;
1432                 put_cmsg(msg, SOL_HCI, HCI_CMSG_DIR, sizeof(incoming),
1433                          &incoming);
1434         }
1435
1436         if (mask & HCI_CMSG_TSTAMP) {
1437 #ifdef CONFIG_COMPAT
1438                 struct old_timeval32 ctv;
1439 #endif
1440                 struct __kernel_old_timeval tv;
1441                 void *data;
1442                 int len;
1443
1444                 skb_get_timestamp(skb, &tv);
1445
1446                 data = &tv;
1447                 len = sizeof(tv);
1448 #ifdef CONFIG_COMPAT
1449                 if (!COMPAT_USE_64BIT_TIME &&
1450                     (msg->msg_flags & MSG_CMSG_COMPAT)) {
1451                         ctv.tv_sec = tv.tv_sec;
1452                         ctv.tv_usec = tv.tv_usec;
1453                         data = &ctv;
1454                         len = sizeof(ctv);
1455                 }
1456 #endif
1457
1458                 put_cmsg(msg, SOL_HCI, HCI_CMSG_TSTAMP, len, data);
1459         }
1460 }
1461
1462 static int hci_sock_recvmsg(struct socket *sock, struct msghdr *msg,
1463                             size_t len, int flags)
1464 {
1465         struct sock *sk = sock->sk;
1466         struct sk_buff *skb;
1467         int copied, err;
1468         unsigned int skblen;
1469
1470         BT_DBG("sock %p, sk %p", sock, sk);
1471
1472         if (flags & MSG_OOB)
1473                 return -EOPNOTSUPP;
1474
1475         if (hci_pi(sk)->channel == HCI_CHANNEL_LOGGING)
1476                 return -EOPNOTSUPP;
1477
1478         if (sk->sk_state == BT_CLOSED)
1479                 return 0;
1480
1481         skb = skb_recv_datagram(sk, flags, &err);
1482         if (!skb)
1483                 return err;
1484
1485         skblen = skb->len;
1486         copied = skb->len;
1487         if (len < copied) {
1488                 msg->msg_flags |= MSG_TRUNC;
1489                 copied = len;
1490         }
1491
1492         skb_reset_transport_header(skb);
1493         err = skb_copy_datagram_msg(skb, 0, msg, copied);
1494
1495         switch (hci_pi(sk)->channel) {
1496         case HCI_CHANNEL_RAW:
1497                 hci_sock_cmsg(sk, msg, skb);
1498                 break;
1499         case HCI_CHANNEL_USER:
1500         case HCI_CHANNEL_MONITOR:
1501                 sock_recv_timestamp(msg, sk, skb);
1502                 break;
1503         default:
1504                 if (hci_mgmt_chan_find(hci_pi(sk)->channel))
1505                         sock_recv_timestamp(msg, sk, skb);
1506                 break;
1507         }
1508
1509         skb_free_datagram(sk, skb);
1510
1511         if (flags & MSG_TRUNC)
1512                 copied = skblen;
1513
1514         return err ? : copied;
1515 }
1516
1517 static int hci_mgmt_cmd(struct hci_mgmt_chan *chan, struct sock *sk,
1518                         struct sk_buff *skb)
1519 {
1520         u8 *cp;
1521         struct mgmt_hdr *hdr;
1522         u16 opcode, index, len;
1523         struct hci_dev *hdev = NULL;
1524         const struct hci_mgmt_handler *handler;
1525         bool var_len, no_hdev;
1526         int err;
1527
1528         BT_DBG("got %d bytes", skb->len);
1529
1530         if (skb->len < sizeof(*hdr))
1531                 return -EINVAL;
1532
1533         hdr = (void *)skb->data;
1534         opcode = __le16_to_cpu(hdr->opcode);
1535         index = __le16_to_cpu(hdr->index);
1536         len = __le16_to_cpu(hdr->len);
1537
1538         if (len != skb->len - sizeof(*hdr)) {
1539                 err = -EINVAL;
1540                 goto done;
1541         }
1542
1543         if (chan->channel == HCI_CHANNEL_CONTROL) {
1544                 struct sk_buff *cmd;
1545
1546                 /* Send event to monitor */
1547                 cmd = create_monitor_ctrl_command(sk, index, opcode, len,
1548                                                   skb->data + sizeof(*hdr));
1549                 if (cmd) {
1550                         hci_send_to_channel(HCI_CHANNEL_MONITOR, cmd,
1551                                             HCI_SOCK_TRUSTED, NULL);
1552                         kfree_skb(cmd);
1553                 }
1554         }
1555
1556         if (opcode >= chan->handler_count ||
1557             chan->handlers[opcode].func == NULL) {
1558                 BT_DBG("Unknown op %u", opcode);
1559                 err = mgmt_cmd_status(sk, index, opcode,
1560                                       MGMT_STATUS_UNKNOWN_COMMAND);
1561                 goto done;
1562         }
1563
1564         handler = &chan->handlers[opcode];
1565
1566         if (!hci_sock_test_flag(sk, HCI_SOCK_TRUSTED) &&
1567             !(handler->flags & HCI_MGMT_UNTRUSTED)) {
1568                 err = mgmt_cmd_status(sk, index, opcode,
1569                                       MGMT_STATUS_PERMISSION_DENIED);
1570                 goto done;
1571         }
1572
1573         if (index != MGMT_INDEX_NONE) {
1574                 hdev = hci_dev_get(index);
1575                 if (!hdev) {
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_SETUP) ||
1582                     hci_dev_test_flag(hdev, HCI_CONFIG) ||
1583                     hci_dev_test_flag(hdev, HCI_USER_CHANNEL)) {
1584                         err = mgmt_cmd_status(sk, index, opcode,
1585                                               MGMT_STATUS_INVALID_INDEX);
1586                         goto done;
1587                 }
1588
1589                 if (hci_dev_test_flag(hdev, HCI_UNCONFIGURED) &&
1590                     !(handler->flags & HCI_MGMT_UNCONFIGURED)) {
1591                         err = mgmt_cmd_status(sk, index, opcode,
1592                                               MGMT_STATUS_INVALID_INDEX);
1593                         goto done;
1594                 }
1595         }
1596
1597         if (!(handler->flags & HCI_MGMT_HDEV_OPTIONAL)) {
1598                 no_hdev = (handler->flags & HCI_MGMT_NO_HDEV);
1599                 if (no_hdev != !hdev) {
1600                         err = mgmt_cmd_status(sk, index, opcode,
1601                                               MGMT_STATUS_INVALID_INDEX);
1602                         goto done;
1603                 }
1604         }
1605
1606         var_len = (handler->flags & HCI_MGMT_VAR_LEN);
1607         if ((var_len && len < handler->data_len) ||
1608             (!var_len && len != handler->data_len)) {
1609                 err = mgmt_cmd_status(sk, index, opcode,
1610                                       MGMT_STATUS_INVALID_PARAMS);
1611                 goto done;
1612         }
1613
1614         if (hdev && chan->hdev_init)
1615                 chan->hdev_init(sk, hdev);
1616
1617         cp = skb->data + sizeof(*hdr);
1618
1619         err = handler->func(sk, hdev, cp, len);
1620         if (err < 0)
1621                 goto done;
1622
1623         err = skb->len;
1624
1625 done:
1626         if (hdev)
1627                 hci_dev_put(hdev);
1628
1629         return err;
1630 }
1631
1632 static int hci_logging_frame(struct sock *sk, struct sk_buff *skb,
1633                              unsigned int flags)
1634 {
1635         struct hci_mon_hdr *hdr;
1636         struct hci_dev *hdev;
1637         u16 index;
1638         int err;
1639
1640         /* The logging frame consists at minimum of the standard header,
1641          * the priority byte, the ident length byte and at least one string
1642          * terminator NUL byte. Anything shorter are invalid packets.
1643          */
1644         if (skb->len < sizeof(*hdr) + 3)
1645                 return -EINVAL;
1646
1647         hdr = (void *)skb->data;
1648
1649         if (__le16_to_cpu(hdr->len) != skb->len - sizeof(*hdr))
1650                 return -EINVAL;
1651
1652         if (__le16_to_cpu(hdr->opcode) == 0x0000) {
1653                 __u8 priority = skb->data[sizeof(*hdr)];
1654                 __u8 ident_len = skb->data[sizeof(*hdr) + 1];
1655
1656                 /* Only the priorities 0-7 are valid and with that any other
1657                  * value results in an invalid packet.
1658                  *
1659                  * The priority byte is followed by an ident length byte and
1660                  * the NUL terminated ident string. Check that the ident
1661                  * length is not overflowing the packet and also that the
1662                  * ident string itself is NUL terminated. In case the ident
1663                  * length is zero, the length value actually doubles as NUL
1664                  * terminator identifier.
1665                  *
1666                  * The message follows the ident string (if present) and
1667                  * must be NUL terminated. Otherwise it is not a valid packet.
1668                  */
1669                 if (priority > 7 || skb->data[skb->len - 1] != 0x00 ||
1670                     ident_len > skb->len - sizeof(*hdr) - 3 ||
1671                     skb->data[sizeof(*hdr) + ident_len + 1] != 0x00)
1672                         return -EINVAL;
1673         } else {
1674                 return -EINVAL;
1675         }
1676
1677         index = __le16_to_cpu(hdr->index);
1678
1679         if (index != MGMT_INDEX_NONE) {
1680                 hdev = hci_dev_get(index);
1681                 if (!hdev)
1682                         return -ENODEV;
1683         } else {
1684                 hdev = NULL;
1685         }
1686
1687         hdr->opcode = cpu_to_le16(HCI_MON_USER_LOGGING);
1688
1689         hci_send_to_channel(HCI_CHANNEL_MONITOR, skb, HCI_SOCK_TRUSTED, NULL);
1690         err = skb->len;
1691
1692         if (hdev)
1693                 hci_dev_put(hdev);
1694
1695         return err;
1696 }
1697
1698 static int hci_sock_sendmsg(struct socket *sock, struct msghdr *msg,
1699                             size_t len)
1700 {
1701         struct sock *sk = sock->sk;
1702         struct hci_mgmt_chan *chan;
1703         struct hci_dev *hdev;
1704         struct sk_buff *skb;
1705         int err;
1706         const unsigned int flags = msg->msg_flags;
1707
1708         BT_DBG("sock %p sk %p", sock, sk);
1709
1710         if (flags & MSG_OOB)
1711                 return -EOPNOTSUPP;
1712
1713         if (flags & ~(MSG_DONTWAIT | MSG_NOSIGNAL | MSG_ERRQUEUE | MSG_CMSG_COMPAT))
1714                 return -EINVAL;
1715
1716         if (len < 4 || len > hci_pi(sk)->mtu)
1717                 return -EINVAL;
1718
1719         skb = bt_skb_sendmsg(sk, msg, len, len, 0, 0);
1720         if (IS_ERR(skb))
1721                 return PTR_ERR(skb);
1722
1723         lock_sock(sk);
1724
1725         switch (hci_pi(sk)->channel) {
1726         case HCI_CHANNEL_RAW:
1727         case HCI_CHANNEL_USER:
1728                 break;
1729         case HCI_CHANNEL_MONITOR:
1730                 err = -EOPNOTSUPP;
1731                 goto drop;
1732         case HCI_CHANNEL_LOGGING:
1733                 err = hci_logging_frame(sk, skb, flags);
1734                 goto drop;
1735         default:
1736                 mutex_lock(&mgmt_chan_list_lock);
1737                 chan = __hci_mgmt_chan_find(hci_pi(sk)->channel);
1738                 if (chan)
1739                         err = hci_mgmt_cmd(chan, sk, skb);
1740                 else
1741                         err = -EINVAL;
1742
1743                 mutex_unlock(&mgmt_chan_list_lock);
1744                 goto drop;
1745         }
1746
1747         hdev = hci_hdev_from_sock(sk);
1748         if (IS_ERR(hdev)) {
1749                 err = PTR_ERR(hdev);
1750                 goto drop;
1751         }
1752
1753         if (!test_bit(HCI_UP, &hdev->flags)) {
1754                 err = -ENETDOWN;
1755                 goto drop;
1756         }
1757
1758         hci_skb_pkt_type(skb) = skb->data[0];
1759         skb_pull(skb, 1);
1760
1761         if (hci_pi(sk)->channel == HCI_CHANNEL_USER) {
1762                 /* No permission check is needed for user channel
1763                  * since that gets enforced when binding the socket.
1764                  *
1765                  * However check that the packet type is valid.
1766                  */
1767                 if (hci_skb_pkt_type(skb) != HCI_COMMAND_PKT &&
1768                     hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
1769                     hci_skb_pkt_type(skb) != HCI_SCODATA_PKT &&
1770                     hci_skb_pkt_type(skb) != HCI_ISODATA_PKT) {
1771                         err = -EINVAL;
1772                         goto drop;
1773                 }
1774
1775                 skb_queue_tail(&hdev->raw_q, skb);
1776                 queue_work(hdev->workqueue, &hdev->tx_work);
1777         } else if (hci_skb_pkt_type(skb) == HCI_COMMAND_PKT) {
1778                 u16 opcode = get_unaligned_le16(skb->data);
1779                 u16 ogf = hci_opcode_ogf(opcode);
1780                 u16 ocf = hci_opcode_ocf(opcode);
1781
1782                 if (((ogf > HCI_SFLT_MAX_OGF) ||
1783                      !hci_test_bit(ocf & HCI_FLT_OCF_BITS,
1784                                    &hci_sec_filter.ocf_mask[ogf])) &&
1785                     !capable(CAP_NET_RAW)) {
1786                         err = -EPERM;
1787                         goto drop;
1788                 }
1789
1790                 /* Since the opcode has already been extracted here, store
1791                  * a copy of the value for later use by the drivers.
1792                  */
1793                 hci_skb_opcode(skb) = opcode;
1794
1795                 if (ogf == 0x3f) {
1796                         skb_queue_tail(&hdev->raw_q, skb);
1797                         queue_work(hdev->workqueue, &hdev->tx_work);
1798                 } else {
1799                         /* Stand-alone HCI commands must be flagged as
1800                          * single-command requests.
1801                          */
1802                         bt_cb(skb)->hci.req_flags |= HCI_REQ_START;
1803
1804                         skb_queue_tail(&hdev->cmd_q, skb);
1805                         queue_work(hdev->workqueue, &hdev->cmd_work);
1806                 }
1807         } else {
1808                 if (!capable(CAP_NET_RAW)) {
1809                         err = -EPERM;
1810                         goto drop;
1811                 }
1812
1813                 if (hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
1814                     hci_skb_pkt_type(skb) != HCI_SCODATA_PKT &&
1815                     hci_skb_pkt_type(skb) != HCI_ISODATA_PKT) {
1816                         err = -EINVAL;
1817                         goto drop;
1818                 }
1819
1820                 skb_queue_tail(&hdev->raw_q, skb);
1821                 queue_work(hdev->workqueue, &hdev->tx_work);
1822         }
1823
1824         err = len;
1825
1826 done:
1827         release_sock(sk);
1828         return err;
1829
1830 drop:
1831         kfree_skb(skb);
1832         goto done;
1833 }
1834
1835 static int hci_sock_setsockopt_old(struct socket *sock, int level, int optname,
1836                                    sockptr_t optval, unsigned int len)
1837 {
1838         struct hci_ufilter uf = { .opcode = 0 };
1839         struct sock *sk = sock->sk;
1840         int err = 0, opt = 0;
1841
1842         BT_DBG("sk %p, opt %d", sk, optname);
1843
1844         lock_sock(sk);
1845
1846         if (hci_pi(sk)->channel != HCI_CHANNEL_RAW) {
1847                 err = -EBADFD;
1848                 goto done;
1849         }
1850
1851         switch (optname) {
1852         case HCI_DATA_DIR:
1853                 if (copy_from_sockptr(&opt, optval, sizeof(opt))) {
1854                         err = -EFAULT;
1855                         break;
1856                 }
1857
1858                 if (opt)
1859                         hci_pi(sk)->cmsg_mask |= HCI_CMSG_DIR;
1860                 else
1861                         hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_DIR;
1862                 break;
1863
1864         case HCI_TIME_STAMP:
1865                 if (copy_from_sockptr(&opt, optval, sizeof(opt))) {
1866                         err = -EFAULT;
1867                         break;
1868                 }
1869
1870                 if (opt)
1871                         hci_pi(sk)->cmsg_mask |= HCI_CMSG_TSTAMP;
1872                 else
1873                         hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_TSTAMP;
1874                 break;
1875
1876         case HCI_FILTER:
1877                 {
1878                         struct hci_filter *f = &hci_pi(sk)->filter;
1879
1880                         uf.type_mask = f->type_mask;
1881                         uf.opcode    = f->opcode;
1882                         uf.event_mask[0] = *((u32 *) f->event_mask + 0);
1883                         uf.event_mask[1] = *((u32 *) f->event_mask + 1);
1884                 }
1885
1886                 len = min_t(unsigned int, len, sizeof(uf));
1887                 if (copy_from_sockptr(&uf, optval, len)) {
1888                         err = -EFAULT;
1889                         break;
1890                 }
1891
1892                 if (!capable(CAP_NET_RAW)) {
1893                         uf.type_mask &= hci_sec_filter.type_mask;
1894                         uf.event_mask[0] &= *((u32 *) hci_sec_filter.event_mask + 0);
1895                         uf.event_mask[1] &= *((u32 *) hci_sec_filter.event_mask + 1);
1896                 }
1897
1898                 {
1899                         struct hci_filter *f = &hci_pi(sk)->filter;
1900
1901                         f->type_mask = uf.type_mask;
1902                         f->opcode    = uf.opcode;
1903                         *((u32 *) f->event_mask + 0) = uf.event_mask[0];
1904                         *((u32 *) f->event_mask + 1) = uf.event_mask[1];
1905                 }
1906                 break;
1907
1908         default:
1909                 err = -ENOPROTOOPT;
1910                 break;
1911         }
1912
1913 done:
1914         release_sock(sk);
1915         return err;
1916 }
1917
1918 static int hci_sock_setsockopt(struct socket *sock, int level, int optname,
1919                                sockptr_t optval, unsigned int len)
1920 {
1921         struct sock *sk = sock->sk;
1922         int err = 0;
1923         u16 opt;
1924
1925         BT_DBG("sk %p, opt %d", sk, optname);
1926
1927         if (level == SOL_HCI)
1928                 return hci_sock_setsockopt_old(sock, level, optname, optval,
1929                                                len);
1930
1931         if (level != SOL_BLUETOOTH)
1932                 return -ENOPROTOOPT;
1933
1934         lock_sock(sk);
1935
1936         switch (optname) {
1937         case BT_SNDMTU:
1938         case BT_RCVMTU:
1939                 switch (hci_pi(sk)->channel) {
1940                 /* Don't allow changing MTU for channels that are meant for HCI
1941                  * traffic only.
1942                  */
1943                 case HCI_CHANNEL_RAW:
1944                 case HCI_CHANNEL_USER:
1945                         err = -ENOPROTOOPT;
1946                         goto done;
1947                 }
1948
1949                 if (copy_from_sockptr(&opt, optval, sizeof(opt))) {
1950                         err = -EFAULT;
1951                         break;
1952                 }
1953
1954                 hci_pi(sk)->mtu = opt;
1955                 break;
1956
1957         default:
1958                 err = -ENOPROTOOPT;
1959                 break;
1960         }
1961
1962 done:
1963         release_sock(sk);
1964         return err;
1965 }
1966
1967 static int hci_sock_getsockopt_old(struct socket *sock, int level, int optname,
1968                                    char __user *optval, int __user *optlen)
1969 {
1970         struct hci_ufilter uf;
1971         struct sock *sk = sock->sk;
1972         int len, opt, err = 0;
1973
1974         BT_DBG("sk %p, opt %d", sk, optname);
1975
1976         if (get_user(len, optlen))
1977                 return -EFAULT;
1978
1979         lock_sock(sk);
1980
1981         if (hci_pi(sk)->channel != HCI_CHANNEL_RAW) {
1982                 err = -EBADFD;
1983                 goto done;
1984         }
1985
1986         switch (optname) {
1987         case HCI_DATA_DIR:
1988                 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_DIR)
1989                         opt = 1;
1990                 else
1991                         opt = 0;
1992
1993                 if (put_user(opt, optval))
1994                         err = -EFAULT;
1995                 break;
1996
1997         case HCI_TIME_STAMP:
1998                 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_TSTAMP)
1999                         opt = 1;
2000                 else
2001                         opt = 0;
2002
2003                 if (put_user(opt, optval))
2004                         err = -EFAULT;
2005                 break;
2006
2007         case HCI_FILTER:
2008                 {
2009                         struct hci_filter *f = &hci_pi(sk)->filter;
2010
2011                         memset(&uf, 0, sizeof(uf));
2012                         uf.type_mask = f->type_mask;
2013                         uf.opcode    = f->opcode;
2014                         uf.event_mask[0] = *((u32 *) f->event_mask + 0);
2015                         uf.event_mask[1] = *((u32 *) f->event_mask + 1);
2016                 }
2017
2018                 len = min_t(unsigned int, len, sizeof(uf));
2019                 if (copy_to_user(optval, &uf, len))
2020                         err = -EFAULT;
2021                 break;
2022
2023         default:
2024                 err = -ENOPROTOOPT;
2025                 break;
2026         }
2027
2028 done:
2029         release_sock(sk);
2030         return err;
2031 }
2032
2033 static int hci_sock_getsockopt(struct socket *sock, int level, int optname,
2034                                char __user *optval, int __user *optlen)
2035 {
2036         struct sock *sk = sock->sk;
2037         int err = 0;
2038
2039         BT_DBG("sk %p, opt %d", sk, optname);
2040
2041         if (level == SOL_HCI)
2042                 return hci_sock_getsockopt_old(sock, level, optname, optval,
2043                                                optlen);
2044
2045         if (level != SOL_BLUETOOTH)
2046                 return -ENOPROTOOPT;
2047
2048         lock_sock(sk);
2049
2050         switch (optname) {
2051         case BT_SNDMTU:
2052         case BT_RCVMTU:
2053                 if (put_user(hci_pi(sk)->mtu, (u16 __user *)optval))
2054                         err = -EFAULT;
2055                 break;
2056
2057         default:
2058                 err = -ENOPROTOOPT;
2059                 break;
2060         }
2061
2062         release_sock(sk);
2063         return err;
2064 }
2065
2066 static void hci_sock_destruct(struct sock *sk)
2067 {
2068         skb_queue_purge(&sk->sk_receive_queue);
2069         skb_queue_purge(&sk->sk_write_queue);
2070 }
2071
2072 static const struct proto_ops hci_sock_ops = {
2073         .family         = PF_BLUETOOTH,
2074         .owner          = THIS_MODULE,
2075         .release        = hci_sock_release,
2076         .bind           = hci_sock_bind,
2077         .getname        = hci_sock_getname,
2078         .sendmsg        = hci_sock_sendmsg,
2079         .recvmsg        = hci_sock_recvmsg,
2080         .ioctl          = hci_sock_ioctl,
2081 #ifdef CONFIG_COMPAT
2082         .compat_ioctl   = hci_sock_compat_ioctl,
2083 #endif
2084         .poll           = datagram_poll,
2085         .listen         = sock_no_listen,
2086         .shutdown       = sock_no_shutdown,
2087         .setsockopt     = hci_sock_setsockopt,
2088         .getsockopt     = hci_sock_getsockopt,
2089         .connect        = sock_no_connect,
2090         .socketpair     = sock_no_socketpair,
2091         .accept         = sock_no_accept,
2092         .mmap           = sock_no_mmap
2093 };
2094
2095 static struct proto hci_sk_proto = {
2096         .name           = "HCI",
2097         .owner          = THIS_MODULE,
2098         .obj_size       = sizeof(struct hci_pinfo)
2099 };
2100
2101 static int hci_sock_create(struct net *net, struct socket *sock, int protocol,
2102                            int kern)
2103 {
2104         struct sock *sk;
2105
2106         BT_DBG("sock %p", sock);
2107
2108         if (sock->type != SOCK_RAW)
2109                 return -ESOCKTNOSUPPORT;
2110
2111         sock->ops = &hci_sock_ops;
2112
2113         sk = sk_alloc(net, PF_BLUETOOTH, GFP_ATOMIC, &hci_sk_proto, kern);
2114         if (!sk)
2115                 return -ENOMEM;
2116
2117         sock_init_data(sock, sk);
2118
2119         sock_reset_flag(sk, SOCK_ZAPPED);
2120
2121         sk->sk_protocol = protocol;
2122
2123         sock->state = SS_UNCONNECTED;
2124         sk->sk_state = BT_OPEN;
2125         sk->sk_destruct = hci_sock_destruct;
2126
2127         bt_sock_link(&hci_sk_list, sk);
2128         return 0;
2129 }
2130
2131 static const struct net_proto_family hci_sock_family_ops = {
2132         .family = PF_BLUETOOTH,
2133         .owner  = THIS_MODULE,
2134         .create = hci_sock_create,
2135 };
2136
2137 int __init hci_sock_init(void)
2138 {
2139         int err;
2140
2141         BUILD_BUG_ON(sizeof(struct sockaddr_hci) > sizeof(struct sockaddr));
2142
2143         err = proto_register(&hci_sk_proto, 0);
2144         if (err < 0)
2145                 return err;
2146
2147         err = bt_sock_register(BTPROTO_HCI, &hci_sock_family_ops);
2148         if (err < 0) {
2149                 BT_ERR("HCI socket registration failed");
2150                 goto error;
2151         }
2152
2153         err = bt_procfs_init(&init_net, "hci", &hci_sk_list, NULL);
2154         if (err < 0) {
2155                 BT_ERR("Failed to create HCI proc file");
2156                 bt_sock_unregister(BTPROTO_HCI);
2157                 goto error;
2158         }
2159
2160         BT_INFO("HCI socket layer initialized");
2161
2162         return 0;
2163
2164 error:
2165         proto_unregister(&hci_sk_proto);
2166         return err;
2167 }
2168
2169 void hci_sock_cleanup(void)
2170 {
2171         bt_procfs_cleanup(&init_net, "hci");
2172         bt_sock_unregister(BTPROTO_HCI);
2173         proto_unregister(&hci_sk_proto);
2174 }