Linux Audio

Check our new training course

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