hci_core.c 118.1 KB
Newer Older
1
/*
L
Linus Torvalds 已提交
2 3
   BlueZ - Bluetooth protocol stack for Linux
   Copyright (C) 2000-2001 Qualcomm Incorporated
4
   Copyright (C) 2011 ProFUSION Embedded Systems
L
Linus Torvalds 已提交
5 6 7 8 9 10 11 12 13 14 15

   Written 2000,2001 by Maxim Krasnyansky <maxk@qualcomm.com>

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License version 2 as
   published by the Free Software Foundation;

   THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
   OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
   FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF THIRD PARTY RIGHTS.
   IN NO EVENT SHALL THE COPYRIGHT HOLDER(S) AND AUTHOR(S) BE LIABLE FOR ANY
16 17 18
   CLAIM, OR ANY SPECIAL INDIRECT OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES
   WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
   ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
L
Linus Torvalds 已提交
19 20
   OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.

21 22
   ALL LIABILITY, INCLUDING LIABILITY FOR INFRINGEMENT OF ANY PATENTS,
   COPYRIGHTS, TRADEMARKS OR OTHER RIGHTS, RELATING TO USE OF THIS
L
Linus Torvalds 已提交
23 24 25 26 27
   SOFTWARE IS DISCLAIMED.
*/

/* Bluetooth HCI core. */

28
#include <linux/export.h>
29
#include <linux/idr.h>
30
#include <linux/rfkill.h>
31
#include <linux/debugfs.h>
32
#include <linux/crypto.h>
33
#include <asm/unaligned.h>
L
Linus Torvalds 已提交
34 35 36 37

#include <net/bluetooth/bluetooth.h>
#include <net/bluetooth/hci_core.h>

38 39
#include "smp.h"

40
static void hci_rx_work(struct work_struct *work);
41
static void hci_cmd_work(struct work_struct *work);
42
static void hci_tx_work(struct work_struct *work);
L
Linus Torvalds 已提交
43 44 45 46 47 48 49 50 51

/* HCI device list */
LIST_HEAD(hci_dev_list);
DEFINE_RWLOCK(hci_dev_list_lock);

/* HCI callback list */
LIST_HEAD(hci_cb_list);
DEFINE_RWLOCK(hci_cb_list_lock);

52 53 54
/* HCI ID Numbering */
static DEFINE_IDA(hci_index_ida);

L
Linus Torvalds 已提交
55 56
/* ---- HCI notifications ---- */

57
static void hci_notify(struct hci_dev *hdev, int event)
L
Linus Torvalds 已提交
58
{
59
	hci_sock_dev_event(hdev, event);
L
Linus Torvalds 已提交
60 61
}

62 63
/* ---- HCI debugfs entries ---- */

64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128
static ssize_t dut_mode_read(struct file *file, char __user *user_buf,
			     size_t count, loff_t *ppos)
{
	struct hci_dev *hdev = file->private_data;
	char buf[3];

	buf[0] = test_bit(HCI_DUT_MODE, &hdev->dev_flags) ? 'Y': 'N';
	buf[1] = '\n';
	buf[2] = '\0';
	return simple_read_from_buffer(user_buf, count, ppos, buf, 2);
}

static ssize_t dut_mode_write(struct file *file, const char __user *user_buf,
			      size_t count, loff_t *ppos)
{
	struct hci_dev *hdev = file->private_data;
	struct sk_buff *skb;
	char buf[32];
	size_t buf_size = min(count, (sizeof(buf)-1));
	bool enable;
	int err;

	if (!test_bit(HCI_UP, &hdev->flags))
		return -ENETDOWN;

	if (copy_from_user(buf, user_buf, buf_size))
		return -EFAULT;

	buf[buf_size] = '\0';
	if (strtobool(buf, &enable))
		return -EINVAL;

	if (enable == test_bit(HCI_DUT_MODE, &hdev->dev_flags))
		return -EALREADY;

	hci_req_lock(hdev);
	if (enable)
		skb = __hci_cmd_sync(hdev, HCI_OP_ENABLE_DUT_MODE, 0, NULL,
				     HCI_CMD_TIMEOUT);
	else
		skb = __hci_cmd_sync(hdev, HCI_OP_RESET, 0, NULL,
				     HCI_CMD_TIMEOUT);
	hci_req_unlock(hdev);

	if (IS_ERR(skb))
		return PTR_ERR(skb);

	err = -bt_to_errno(skb->data[0]);
	kfree_skb(skb);

	if (err < 0)
		return err;

	change_bit(HCI_DUT_MODE, &hdev->dev_flags);

	return count;
}

static const struct file_operations dut_mode_fops = {
	.open		= simple_open,
	.read		= dut_mode_read,
	.write		= dut_mode_write,
	.llseek		= default_llseek,
};

129 130 131 132 133 134 135
static int features_show(struct seq_file *f, void *ptr)
{
	struct hci_dev *hdev = f->private;
	u8 p;

	hci_dev_lock(hdev);
	for (p = 0; p < HCI_MAX_PAGES && p <= hdev->max_page; p++) {
136
		seq_printf(f, "%2u: 0x%2.2x 0x%2.2x 0x%2.2x 0x%2.2x "
137 138 139 140 141 142
			   "0x%2.2x 0x%2.2x 0x%2.2x 0x%2.2x\n", p,
			   hdev->features[p][0], hdev->features[p][1],
			   hdev->features[p][2], hdev->features[p][3],
			   hdev->features[p][4], hdev->features[p][5],
			   hdev->features[p][6], hdev->features[p][7]);
	}
143 144 145 146 147 148 149
	if (lmp_le_capable(hdev))
		seq_printf(f, "LE: 0x%2.2x 0x%2.2x 0x%2.2x 0x%2.2x "
			   "0x%2.2x 0x%2.2x 0x%2.2x 0x%2.2x\n",
			   hdev->le_features[0], hdev->le_features[1],
			   hdev->le_features[2], hdev->le_features[3],
			   hdev->le_features[4], hdev->le_features[5],
			   hdev->le_features[6], hdev->le_features[7]);
150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166
	hci_dev_unlock(hdev);

	return 0;
}

static int features_open(struct inode *inode, struct file *file)
{
	return single_open(file, features_show, inode->i_private);
}

static const struct file_operations features_fops = {
	.open		= features_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

167 168 169 170 171 172 173
static int blacklist_show(struct seq_file *f, void *p)
{
	struct hci_dev *hdev = f->private;
	struct bdaddr_list *b;

	hci_dev_lock(hdev);
	list_for_each_entry(b, &hdev->blacklist, list)
174
		seq_printf(f, "%pMR (type %u)\n", &b->bdaddr, b->bdaddr_type);
175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191
	hci_dev_unlock(hdev);

	return 0;
}

static int blacklist_open(struct inode *inode, struct file *file)
{
	return single_open(file, blacklist_show, inode->i_private);
}

static const struct file_operations blacklist_fops = {
	.open		= blacklist_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

192 193 194 195 196 197 198
static int uuids_show(struct seq_file *f, void *p)
{
	struct hci_dev *hdev = f->private;
	struct bt_uuid *uuid;

	hci_dev_lock(hdev);
	list_for_each_entry(uuid, &hdev->uuids, list) {
199 200 201 202 203 204 205 206 207 208
		u8 i, val[16];

		/* The Bluetooth UUID values are stored in big endian,
		 * but with reversed byte order. So convert them into
		 * the right order for the %pUb modifier.
		 */
		for (i = 0; i < 16; i++)
			val[i] = uuid->uuid[15 - i];

		seq_printf(f, "%pUb\n", val);
209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226
	}
	hci_dev_unlock(hdev);

	return 0;
}

static int uuids_open(struct inode *inode, struct file *file)
{
	return single_open(file, uuids_show, inode->i_private);
}

static const struct file_operations uuids_fops = {
	.open		= uuids_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262
static int inquiry_cache_show(struct seq_file *f, void *p)
{
	struct hci_dev *hdev = f->private;
	struct discovery_state *cache = &hdev->discovery;
	struct inquiry_entry *e;

	hci_dev_lock(hdev);

	list_for_each_entry(e, &cache->all, all) {
		struct inquiry_data *data = &e->data;
		seq_printf(f, "%pMR %d %d %d 0x%.2x%.2x%.2x 0x%.4x %d %d %u\n",
			   &data->bdaddr,
			   data->pscan_rep_mode, data->pscan_period_mode,
			   data->pscan_mode, data->dev_class[2],
			   data->dev_class[1], data->dev_class[0],
			   __le16_to_cpu(data->clock_offset),
			   data->rssi, data->ssp_mode, e->timestamp);
	}

	hci_dev_unlock(hdev);

	return 0;
}

static int inquiry_cache_open(struct inode *inode, struct file *file)
{
	return single_open(file, inquiry_cache_show, inode->i_private);
}

static const struct file_operations inquiry_cache_fops = {
	.open		= inquiry_cache_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290
static int link_keys_show(struct seq_file *f, void *ptr)
{
	struct hci_dev *hdev = f->private;
	struct list_head *p, *n;

	hci_dev_lock(hdev);
	list_for_each_safe(p, n, &hdev->link_keys) {
		struct link_key *key = list_entry(p, struct link_key, list);
		seq_printf(f, "%pMR %u %*phN %u\n", &key->bdaddr, key->type,
			   HCI_LINK_KEY_SIZE, key->val, key->pin_len);
	}
	hci_dev_unlock(hdev);

	return 0;
}

static int link_keys_open(struct inode *inode, struct file *file)
{
	return single_open(file, link_keys_show, inode->i_private);
}

static const struct file_operations link_keys_fops = {
	.open		= link_keys_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314
static int dev_class_show(struct seq_file *f, void *ptr)
{
	struct hci_dev *hdev = f->private;

	hci_dev_lock(hdev);
	seq_printf(f, "0x%.2x%.2x%.2x\n", hdev->dev_class[2],
		   hdev->dev_class[1], hdev->dev_class[0]);
	hci_dev_unlock(hdev);

	return 0;
}

static int dev_class_open(struct inode *inode, struct file *file)
{
	return single_open(file, dev_class_show, inode->i_private);
}

static const struct file_operations dev_class_fops = {
	.open		= dev_class_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

315 316 317 318 319 320 321 322 323 324 325 326 327 328
static int voice_setting_get(void *data, u64 *val)
{
	struct hci_dev *hdev = data;

	hci_dev_lock(hdev);
	*val = hdev->voice_setting;
	hci_dev_unlock(hdev);

	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(voice_setting_fops, voice_setting_get,
			NULL, "0x%4.4llx\n");

329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353
static int auto_accept_delay_set(void *data, u64 val)
{
	struct hci_dev *hdev = data;

	hci_dev_lock(hdev);
	hdev->auto_accept_delay = val;
	hci_dev_unlock(hdev);

	return 0;
}

static int auto_accept_delay_get(void *data, u64 *val)
{
	struct hci_dev *hdev = data;

	hci_dev_lock(hdev);
	*val = hdev->auto_accept_delay;
	hci_dev_unlock(hdev);

	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(auto_accept_delay_fops, auto_accept_delay_get,
			auto_accept_delay_set, "%llu\n");

354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402
static int ssp_debug_mode_set(void *data, u64 val)
{
	struct hci_dev *hdev = data;
	struct sk_buff *skb;
	__u8 mode;
	int err;

	if (val != 0 && val != 1)
		return -EINVAL;

	if (!test_bit(HCI_UP, &hdev->flags))
		return -ENETDOWN;

	hci_req_lock(hdev);
	mode = val;
	skb = __hci_cmd_sync(hdev, HCI_OP_WRITE_SSP_DEBUG_MODE, sizeof(mode),
			     &mode, HCI_CMD_TIMEOUT);
	hci_req_unlock(hdev);

	if (IS_ERR(skb))
		return PTR_ERR(skb);

	err = -bt_to_errno(skb->data[0]);
	kfree_skb(skb);

	if (err < 0)
		return err;

	hci_dev_lock(hdev);
	hdev->ssp_debug_mode = val;
	hci_dev_unlock(hdev);

	return 0;
}

static int ssp_debug_mode_get(void *data, u64 *val)
{
	struct hci_dev *hdev = data;

	hci_dev_lock(hdev);
	*val = hdev->ssp_debug_mode;
	hci_dev_unlock(hdev);

	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(ssp_debug_mode_fops, ssp_debug_mode_get,
			ssp_debug_mode_set, "%llu\n");

403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446 447 448
static ssize_t force_sc_support_read(struct file *file, char __user *user_buf,
				     size_t count, loff_t *ppos)
{
	struct hci_dev *hdev = file->private_data;
	char buf[3];

	buf[0] = test_bit(HCI_FORCE_SC, &hdev->dev_flags) ? 'Y': 'N';
	buf[1] = '\n';
	buf[2] = '\0';
	return simple_read_from_buffer(user_buf, count, ppos, buf, 2);
}

static ssize_t force_sc_support_write(struct file *file,
				      const char __user *user_buf,
				      size_t count, loff_t *ppos)
{
	struct hci_dev *hdev = file->private_data;
	char buf[32];
	size_t buf_size = min(count, (sizeof(buf)-1));
	bool enable;

	if (test_bit(HCI_UP, &hdev->flags))
		return -EBUSY;

	if (copy_from_user(buf, user_buf, buf_size))
		return -EFAULT;

	buf[buf_size] = '\0';
	if (strtobool(buf, &enable))
		return -EINVAL;

	if (enable == test_bit(HCI_FORCE_SC, &hdev->dev_flags))
		return -EALREADY;

	change_bit(HCI_FORCE_SC, &hdev->dev_flags);

	return count;
}

static const struct file_operations force_sc_support_fops = {
	.open		= simple_open,
	.read		= force_sc_support_read,
	.write		= force_sc_support_write,
	.llseek		= default_llseek,
};

449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464 465 466
static ssize_t sc_only_mode_read(struct file *file, char __user *user_buf,
				 size_t count, loff_t *ppos)
{
	struct hci_dev *hdev = file->private_data;
	char buf[3];

	buf[0] = test_bit(HCI_SC_ONLY, &hdev->dev_flags) ? 'Y': 'N';
	buf[1] = '\n';
	buf[2] = '\0';
	return simple_read_from_buffer(user_buf, count, ppos, buf, 2);
}

static const struct file_operations sc_only_mode_fops = {
	.open		= simple_open,
	.read		= sc_only_mode_read,
	.llseek		= default_llseek,
};

467 468 469 470 471 472 473 474
static int idle_timeout_set(void *data, u64 val)
{
	struct hci_dev *hdev = data;

	if (val != 0 && (val < 500 || val > 3600000))
		return -EINVAL;

	hci_dev_lock(hdev);
475
	hdev->idle_timeout = val;
476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491 492 493 494
	hci_dev_unlock(hdev);

	return 0;
}

static int idle_timeout_get(void *data, u64 *val)
{
	struct hci_dev *hdev = data;

	hci_dev_lock(hdev);
	*val = hdev->idle_timeout;
	hci_dev_unlock(hdev);

	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(idle_timeout_fops, idle_timeout_get,
			idle_timeout_set, "%llu\n");

495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525
static int rpa_timeout_set(void *data, u64 val)
{
	struct hci_dev *hdev = data;

	/* Require the RPA timeout to be at least 30 seconds and at most
	 * 24 hours.
	 */
	if (val < 30 || val > (60 * 60 * 24))
		return -EINVAL;

	hci_dev_lock(hdev);
	hdev->rpa_timeout = val;
	hci_dev_unlock(hdev);

	return 0;
}

static int rpa_timeout_get(void *data, u64 *val)
{
	struct hci_dev *hdev = data;

	hci_dev_lock(hdev);
	*val = hdev->rpa_timeout;
	hci_dev_unlock(hdev);

	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(rpa_timeout_fops, rpa_timeout_get,
			rpa_timeout_set, "%llu\n");

526 527 528 529 530 531 532 533
static int sniff_min_interval_set(void *data, u64 val)
{
	struct hci_dev *hdev = data;

	if (val == 0 || val % 2 || val > hdev->sniff_max_interval)
		return -EINVAL;

	hci_dev_lock(hdev);
534
	hdev->sniff_min_interval = val;
535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561
	hci_dev_unlock(hdev);

	return 0;
}

static int sniff_min_interval_get(void *data, u64 *val)
{
	struct hci_dev *hdev = data;

	hci_dev_lock(hdev);
	*val = hdev->sniff_min_interval;
	hci_dev_unlock(hdev);

	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(sniff_min_interval_fops, sniff_min_interval_get,
			sniff_min_interval_set, "%llu\n");

static int sniff_max_interval_set(void *data, u64 val)
{
	struct hci_dev *hdev = data;

	if (val == 0 || val % 2 || val < hdev->sniff_min_interval)
		return -EINVAL;

	hci_dev_lock(hdev);
562
	hdev->sniff_max_interval = val;
563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581
	hci_dev_unlock(hdev);

	return 0;
}

static int sniff_max_interval_get(void *data, u64 *val)
{
	struct hci_dev *hdev = data;

	hci_dev_lock(hdev);
	*val = hdev->sniff_max_interval;
	hci_dev_unlock(hdev);

	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(sniff_max_interval_fops, sniff_max_interval_get,
			sniff_max_interval_set, "%llu\n");

582 583 584
static int identity_show(struct seq_file *f, void *p)
{
	struct hci_dev *hdev = f->private;
585
	bdaddr_t addr;
586 587 588 589
	u8 addr_type;

	hci_dev_lock(hdev);

590
	hci_copy_identity_address(hdev, &addr, &addr_type);
591

592
	seq_printf(f, "%pMR (type %u) %*phN %pMR\n", &addr, addr_type,
593
		   16, hdev->irk, &hdev->rpa);
594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611

	hci_dev_unlock(hdev);

	return 0;
}

static int identity_open(struct inode *inode, struct file *file)
{
	return single_open(file, identity_show, inode->i_private);
}

static const struct file_operations identity_fops = {
	.open		= identity_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634
static int random_address_show(struct seq_file *f, void *p)
{
	struct hci_dev *hdev = f->private;

	hci_dev_lock(hdev);
	seq_printf(f, "%pMR\n", &hdev->random_addr);
	hci_dev_unlock(hdev);

	return 0;
}

static int random_address_open(struct inode *inode, struct file *file)
{
	return single_open(file, random_address_show, inode->i_private);
}

static const struct file_operations random_address_fops = {
	.open		= random_address_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657
static int static_address_show(struct seq_file *f, void *p)
{
	struct hci_dev *hdev = f->private;

	hci_dev_lock(hdev);
	seq_printf(f, "%pMR\n", &hdev->static_addr);
	hci_dev_unlock(hdev);

	return 0;
}

static int static_address_open(struct inode *inode, struct file *file)
{
	return single_open(file, static_address_show, inode->i_private);
}

static const struct file_operations static_address_fops = {
	.open		= static_address_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

658 659 660
static ssize_t force_static_address_read(struct file *file,
					 char __user *user_buf,
					 size_t count, loff_t *ppos)
661
{
662 663
	struct hci_dev *hdev = file->private_data;
	char buf[3];
664

665 666 667 668
	buf[0] = test_bit(HCI_FORCE_STATIC_ADDR, &hdev->dev_flags) ? 'Y': 'N';
	buf[1] = '\n';
	buf[2] = '\0';
	return simple_read_from_buffer(user_buf, count, ppos, buf, 2);
669 670
}

671 672 673
static ssize_t force_static_address_write(struct file *file,
					  const char __user *user_buf,
					  size_t count, loff_t *ppos)
674
{
675 676 677 678
	struct hci_dev *hdev = file->private_data;
	char buf[32];
	size_t buf_size = min(count, (sizeof(buf)-1));
	bool enable;
679

680 681
	if (test_bit(HCI_UP, &hdev->flags))
		return -EBUSY;
682

683 684 685 686 687 688 689 690 691 692 693 694 695
	if (copy_from_user(buf, user_buf, buf_size))
		return -EFAULT;

	buf[buf_size] = '\0';
	if (strtobool(buf, &enable))
		return -EINVAL;

	if (enable == test_bit(HCI_FORCE_STATIC_ADDR, &hdev->dev_flags))
		return -EALREADY;

	change_bit(HCI_FORCE_STATIC_ADDR, &hdev->dev_flags);

	return count;
696 697
}

698 699 700 701 702 703
static const struct file_operations force_static_address_fops = {
	.open		= simple_open,
	.read		= force_static_address_read,
	.write		= force_static_address_write,
	.llseek		= default_llseek,
};
704

705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734
static int identity_resolving_keys_show(struct seq_file *f, void *ptr)
{
	struct hci_dev *hdev = f->private;
	struct list_head *p, *n;

	hci_dev_lock(hdev);
	list_for_each_safe(p, n, &hdev->identity_resolving_keys) {
		struct smp_irk *irk = list_entry(p, struct smp_irk, list);
		seq_printf(f, "%pMR (type %u) %*phN %pMR\n",
			   &irk->bdaddr, irk->addr_type,
			   16, irk->val, &irk->rpa);
	}
	hci_dev_unlock(hdev);

	return 0;
}

static int identity_resolving_keys_open(struct inode *inode, struct file *file)
{
	return single_open(file, identity_resolving_keys_show,
			   inode->i_private);
}

static const struct file_operations identity_resolving_keys_fops = {
	.open		= identity_resolving_keys_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

735 736 737 738 739 740
static int long_term_keys_show(struct seq_file *f, void *ptr)
{
	struct hci_dev *hdev = f->private;
	struct list_head *p, *n;

	hci_dev_lock(hdev);
741
	list_for_each_safe(p, n, &hdev->long_term_keys) {
742
		struct smp_ltk *ltk = list_entry(p, struct smp_ltk, list);
743
		seq_printf(f, "%pMR (type %u) %u 0x%02x %u %.4x %*phN %*phN\n",
744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764
			   &ltk->bdaddr, ltk->bdaddr_type, ltk->authenticated,
			   ltk->type, ltk->enc_size, __le16_to_cpu(ltk->ediv),
			   8, ltk->rand, 16, ltk->val);
	}
	hci_dev_unlock(hdev);

	return 0;
}

static int long_term_keys_open(struct inode *inode, struct file *file)
{
	return single_open(file, long_term_keys_show, inode->i_private);
}

static const struct file_operations long_term_keys_fops = {
	.open		= long_term_keys_open,
	.read		= seq_read,
	.llseek		= seq_lseek,
	.release	= single_release,
};

765 766 767 768 769 770 771 772
static int conn_min_interval_set(void *data, u64 val)
{
	struct hci_dev *hdev = data;

	if (val < 0x0006 || val > 0x0c80 || val > hdev->le_conn_max_interval)
		return -EINVAL;

	hci_dev_lock(hdev);
773
	hdev->le_conn_min_interval = val;
774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800
	hci_dev_unlock(hdev);

	return 0;
}

static int conn_min_interval_get(void *data, u64 *val)
{
	struct hci_dev *hdev = data;

	hci_dev_lock(hdev);
	*val = hdev->le_conn_min_interval;
	hci_dev_unlock(hdev);

	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(conn_min_interval_fops, conn_min_interval_get,
			conn_min_interval_set, "%llu\n");

static int conn_max_interval_set(void *data, u64 val)
{
	struct hci_dev *hdev = data;

	if (val < 0x0006 || val > 0x0c80 || val < hdev->le_conn_min_interval)
		return -EINVAL;

	hci_dev_lock(hdev);
801
	hdev->le_conn_max_interval = val;
802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820
	hci_dev_unlock(hdev);

	return 0;
}

static int conn_max_interval_get(void *data, u64 *val)
{
	struct hci_dev *hdev = data;

	hci_dev_lock(hdev);
	*val = hdev->le_conn_max_interval;
	hci_dev_unlock(hdev);

	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(conn_max_interval_fops, conn_max_interval_get,
			conn_max_interval_set, "%llu\n");

821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848
static int adv_channel_map_set(void *data, u64 val)
{
	struct hci_dev *hdev = data;

	if (val < 0x01 || val > 0x07)
		return -EINVAL;

	hci_dev_lock(hdev);
	hdev->le_adv_channel_map = val;
	hci_dev_unlock(hdev);

	return 0;
}

static int adv_channel_map_get(void *data, u64 *val)
{
	struct hci_dev *hdev = data;

	hci_dev_lock(hdev);
	*val = hdev->le_adv_channel_map;
	hci_dev_unlock(hdev);

	return 0;
}

DEFINE_SIMPLE_ATTRIBUTE(adv_channel_map_fops, adv_channel_map_get,
			adv_channel_map_set, "%llu\n");

849 850 851 852 853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891
static ssize_t lowpan_read(struct file *file, char __user *user_buf,
			   size_t count, loff_t *ppos)
{
	struct hci_dev *hdev = file->private_data;
	char buf[3];

	buf[0] = test_bit(HCI_6LOWPAN_ENABLED, &hdev->dev_flags) ? 'Y' : 'N';
	buf[1] = '\n';
	buf[2] = '\0';
	return simple_read_from_buffer(user_buf, count, ppos, buf, 2);
}

static ssize_t lowpan_write(struct file *fp, const char __user *user_buffer,
			    size_t count, loff_t *position)
{
	struct hci_dev *hdev = fp->private_data;
	bool enable;
	char buf[32];
	size_t buf_size = min(count, (sizeof(buf)-1));

	if (copy_from_user(buf, user_buffer, buf_size))
		return -EFAULT;

	buf[buf_size] = '\0';

	if (strtobool(buf, &enable) < 0)
		return -EINVAL;

	if (enable == test_bit(HCI_6LOWPAN_ENABLED, &hdev->dev_flags))
		return -EALREADY;

	change_bit(HCI_6LOWPAN_ENABLED, &hdev->dev_flags);

	return count;
}

static const struct file_operations lowpan_debugfs_fops = {
	.open		= simple_open,
	.read		= lowpan_read,
	.write		= lowpan_write,
	.llseek		= default_llseek,
};

892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994 995 996 997 998 999 1000
static int le_auto_conn_show(struct seq_file *sf, void *ptr)
{
	struct hci_dev *hdev = sf->private;
	struct hci_conn_params *p;

	hci_dev_lock(hdev);

	list_for_each_entry(p, &hdev->le_conn_params, list) {
		seq_printf(sf, "%pMR %u %u\n", &p->addr, p->addr_type,
			   p->auto_connect);
	}

	hci_dev_unlock(hdev);

	return 0;
}

static int le_auto_conn_open(struct inode *inode, struct file *file)
{
	return single_open(file, le_auto_conn_show, inode->i_private);
}

static ssize_t le_auto_conn_write(struct file *file, const char __user *data,
				  size_t count, loff_t *offset)
{
	struct seq_file *sf = file->private_data;
	struct hci_dev *hdev = sf->private;
	u8 auto_connect = 0;
	bdaddr_t addr;
	u8 addr_type;
	char *buf;
	int err = 0;
	int n;

	/* Don't allow partial write */
	if (*offset != 0)
		return -EINVAL;

	if (count < 3)
		return -EINVAL;

	buf = kzalloc(count, GFP_KERNEL);
	if (!buf)
		return -ENOMEM;

	if (copy_from_user(buf, data, count)) {
		err = -EFAULT;
		goto done;
	}

	if (memcmp(buf, "add", 3) == 0) {
		n = sscanf(&buf[4], "%hhx:%hhx:%hhx:%hhx:%hhx:%hhx %hhu %hhu",
			   &addr.b[5], &addr.b[4], &addr.b[3], &addr.b[2],
			   &addr.b[1], &addr.b[0], &addr_type,
			   &auto_connect);

		if (n < 7) {
			err = -EINVAL;
			goto done;
		}

		hci_dev_lock(hdev);
		err = hci_conn_params_add(hdev, &addr, addr_type, auto_connect,
					  hdev->le_conn_min_interval,
					  hdev->le_conn_max_interval);
		hci_dev_unlock(hdev);

		if (err)
			goto done;
	} else if (memcmp(buf, "del", 3) == 0) {
		n = sscanf(&buf[4], "%hhx:%hhx:%hhx:%hhx:%hhx:%hhx %hhu",
			   &addr.b[5], &addr.b[4], &addr.b[3], &addr.b[2],
			   &addr.b[1], &addr.b[0], &addr_type);

		if (n < 7) {
			err = -EINVAL;
			goto done;
		}

		hci_dev_lock(hdev);
		hci_conn_params_del(hdev, &addr, addr_type);
		hci_dev_unlock(hdev);
	} else if (memcmp(buf, "clr", 3) == 0) {
		hci_dev_lock(hdev);
		hci_conn_params_clear(hdev);
		hci_pend_le_conns_clear(hdev);
		hci_update_background_scan(hdev);
		hci_dev_unlock(hdev);
	} else {
		err = -EINVAL;
	}

done:
	kfree(buf);

	if (err)
		return err;
	else
		return count;
}

static const struct file_operations le_auto_conn_fops = {
	.open		= le_auto_conn_open,
	.read		= seq_read,
	.write		= le_auto_conn_write,
	.llseek		= seq_lseek,
	.release	= single_release,
};

L
Linus Torvalds 已提交
1001 1002
/* ---- HCI requests ---- */

1003
static void hci_req_sync_complete(struct hci_dev *hdev, u8 result)
L
Linus Torvalds 已提交
1004
{
1005
	BT_DBG("%s result 0x%2.2x", hdev->name, result);
L
Linus Torvalds 已提交
1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024

	if (hdev->req_status == HCI_REQ_PEND) {
		hdev->req_result = result;
		hdev->req_status = HCI_REQ_DONE;
		wake_up_interruptible(&hdev->req_wait_q);
	}
}

static void hci_req_cancel(struct hci_dev *hdev, int err)
{
	BT_DBG("%s err 0x%2.2x", hdev->name, err);

	if (hdev->req_status == HCI_REQ_PEND) {
		hdev->req_result = err;
		hdev->req_status = HCI_REQ_CANCELED;
		wake_up_interruptible(&hdev->req_wait_q);
	}
}

1025 1026
static struct sk_buff *hci_get_cmd_complete(struct hci_dev *hdev, u16 opcode,
					    u8 event)
1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049
{
	struct hci_ev_cmd_complete *ev;
	struct hci_event_hdr *hdr;
	struct sk_buff *skb;

	hci_dev_lock(hdev);

	skb = hdev->recv_evt;
	hdev->recv_evt = NULL;

	hci_dev_unlock(hdev);

	if (!skb)
		return ERR_PTR(-ENODATA);

	if (skb->len < sizeof(*hdr)) {
		BT_ERR("Too short HCI event");
		goto failed;
	}

	hdr = (void *) skb->data;
	skb_pull(skb, HCI_EVENT_HDR_SIZE);

1050 1051 1052 1053 1054 1055
	if (event) {
		if (hdr->evt != event)
			goto failed;
		return skb;
	}

1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079
	if (hdr->evt != HCI_EV_CMD_COMPLETE) {
		BT_DBG("Last event is not cmd complete (0x%2.2x)", hdr->evt);
		goto failed;
	}

	if (skb->len < sizeof(*ev)) {
		BT_ERR("Too short cmd_complete event");
		goto failed;
	}

	ev = (void *) skb->data;
	skb_pull(skb, sizeof(*ev));

	if (opcode == __le16_to_cpu(ev->opcode))
		return skb;

	BT_DBG("opcode doesn't match (0x%2.2x != 0x%2.2x)", opcode,
	       __le16_to_cpu(ev->opcode));

failed:
	kfree_skb(skb);
	return ERR_PTR(-ENODATA);
}

1080
struct sk_buff *__hci_cmd_sync_ev(struct hci_dev *hdev, u16 opcode, u32 plen,
1081
				  const void *param, u8 event, u32 timeout)
1082 1083 1084 1085 1086 1087 1088 1089 1090
{
	DECLARE_WAITQUEUE(wait, current);
	struct hci_request req;
	int err = 0;

	BT_DBG("%s", hdev->name);

	hci_req_init(&req, hdev);

1091
	hci_req_add_ev(&req, opcode, plen, param, event);
1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127 1128 1129

	hdev->req_status = HCI_REQ_PEND;

	err = hci_req_run(&req, hci_req_sync_complete);
	if (err < 0)
		return ERR_PTR(err);

	add_wait_queue(&hdev->req_wait_q, &wait);
	set_current_state(TASK_INTERRUPTIBLE);

	schedule_timeout(timeout);

	remove_wait_queue(&hdev->req_wait_q, &wait);

	if (signal_pending(current))
		return ERR_PTR(-EINTR);

	switch (hdev->req_status) {
	case HCI_REQ_DONE:
		err = -bt_to_errno(hdev->req_result);
		break;

	case HCI_REQ_CANCELED:
		err = -hdev->req_result;
		break;

	default:
		err = -ETIMEDOUT;
		break;
	}

	hdev->req_status = hdev->req_result = 0;

	BT_DBG("%s end: err %d", hdev->name, err);

	if (err < 0)
		return ERR_PTR(err);

1130 1131 1132 1133 1134
	return hci_get_cmd_complete(hdev, opcode, event);
}
EXPORT_SYMBOL(__hci_cmd_sync_ev);

struct sk_buff *__hci_cmd_sync(struct hci_dev *hdev, u16 opcode, u32 plen,
1135
			       const void *param, u32 timeout)
1136 1137
{
	return __hci_cmd_sync_ev(hdev, opcode, plen, param, 0, timeout);
1138 1139 1140
}
EXPORT_SYMBOL(__hci_cmd_sync);

L
Linus Torvalds 已提交
1141
/* Execute request and wait for completion. */
1142
static int __hci_req_sync(struct hci_dev *hdev,
1143 1144
			  void (*func)(struct hci_request *req,
				      unsigned long opt),
1145
			  unsigned long opt, __u32 timeout)
L
Linus Torvalds 已提交
1146
{
1147
	struct hci_request req;
L
Linus Torvalds 已提交
1148 1149 1150 1151 1152
	DECLARE_WAITQUEUE(wait, current);
	int err = 0;

	BT_DBG("%s start", hdev->name);

1153 1154
	hci_req_init(&req, hdev);

L
Linus Torvalds 已提交
1155 1156
	hdev->req_status = HCI_REQ_PEND;

1157
	func(&req, opt);
1158

1159 1160
	err = hci_req_run(&req, hci_req_sync_complete);
	if (err < 0) {
1161
		hdev->req_status = 0;
1162 1163 1164 1165 1166

		/* ENODATA means the HCI request command queue is empty.
		 * This can happen when a request with conditionals doesn't
		 * trigger any commands to be sent. This is normal behavior
		 * and should not trigger an error return.
1167
		 */
1168 1169 1170 1171
		if (err == -ENODATA)
			return 0;

		return err;
1172 1173
	}

A
Andre Guedes 已提交
1174 1175 1176
	add_wait_queue(&hdev->req_wait_q, &wait);
	set_current_state(TASK_INTERRUPTIBLE);

L
Linus Torvalds 已提交
1177 1178 1179 1180 1181 1182 1183 1184 1185
	schedule_timeout(timeout);

	remove_wait_queue(&hdev->req_wait_q, &wait);

	if (signal_pending(current))
		return -EINTR;

	switch (hdev->req_status) {
	case HCI_REQ_DONE:
1186
		err = -bt_to_errno(hdev->req_result);
L
Linus Torvalds 已提交
1187 1188 1189 1190 1191 1192 1193 1194 1195
		break;

	case HCI_REQ_CANCELED:
		err = -hdev->req_result;
		break;

	default:
		err = -ETIMEDOUT;
		break;
1196
	}
L
Linus Torvalds 已提交
1197

1198
	hdev->req_status = hdev->req_result = 0;
L
Linus Torvalds 已提交
1199 1200 1201 1202 1203 1204

	BT_DBG("%s end: err %d", hdev->name, err);

	return err;
}

1205
static int hci_req_sync(struct hci_dev *hdev,
1206 1207
			void (*req)(struct hci_request *req,
				    unsigned long opt),
1208
			unsigned long opt, __u32 timeout)
L
Linus Torvalds 已提交
1209 1210 1211
{
	int ret;

1212 1213 1214
	if (!test_bit(HCI_UP, &hdev->flags))
		return -ENETDOWN;

L
Linus Torvalds 已提交
1215 1216
	/* Serialize all requests */
	hci_req_lock(hdev);
1217
	ret = __hci_req_sync(hdev, req, opt, timeout);
L
Linus Torvalds 已提交
1218 1219 1220 1221 1222
	hci_req_unlock(hdev);

	return ret;
}

1223
static void hci_reset_req(struct hci_request *req, unsigned long opt)
L
Linus Torvalds 已提交
1224
{
1225
	BT_DBG("%s %ld", req->hdev->name, opt);
L
Linus Torvalds 已提交
1226 1227

	/* Reset device */
1228 1229
	set_bit(HCI_RESET, &req->hdev->flags);
	hci_req_add(req, HCI_OP_RESET, 0, NULL);
L
Linus Torvalds 已提交
1230 1231
}

1232
static void bredr_init(struct hci_request *req)
L
Linus Torvalds 已提交
1233
{
1234
	req->hdev->flow_ctl_mode = HCI_FLOW_CTL_MODE_PACKET_BASED;
1235

L
Linus Torvalds 已提交
1236
	/* Read Local Supported Features */
1237
	hci_req_add(req, HCI_OP_READ_LOCAL_FEATURES, 0, NULL);
L
Linus Torvalds 已提交
1238

1239
	/* Read Local Version */
1240
	hci_req_add(req, HCI_OP_READ_LOCAL_VERSION, 0, NULL);
1241 1242

	/* Read BD Address */
1243
	hci_req_add(req, HCI_OP_READ_BD_ADDR, 0, NULL);
L
Linus Torvalds 已提交
1244 1245
}

1246
static void amp_init(struct hci_request *req)
1247
{
1248
	req->hdev->flow_ctl_mode = HCI_FLOW_CTL_MODE_BLOCK_BASED;
1249

1250
	/* Read Local Version */
1251
	hci_req_add(req, HCI_OP_READ_LOCAL_VERSION, 0, NULL);
1252

1253 1254 1255 1256 1257 1258
	/* Read Local Supported Commands */
	hci_req_add(req, HCI_OP_READ_LOCAL_COMMANDS, 0, NULL);

	/* Read Local Supported Features */
	hci_req_add(req, HCI_OP_READ_LOCAL_FEATURES, 0, NULL);

1259
	/* Read Local AMP Info */
1260
	hci_req_add(req, HCI_OP_READ_LOCAL_AMP_INFO, 0, NULL);
1261 1262

	/* Read Data Blk size */
1263
	hci_req_add(req, HCI_OP_READ_DATA_BLOCK_SIZE, 0, NULL);
1264

1265 1266 1267
	/* Read Flow Control Mode */
	hci_req_add(req, HCI_OP_READ_FLOW_CONTROL_MODE, 0, NULL);

1268 1269
	/* Read Location Data */
	hci_req_add(req, HCI_OP_READ_LOCATION_DATA, 0, NULL);
1270 1271
}

1272
static void hci_init1_req(struct hci_request *req, unsigned long opt)
1273
{
1274
	struct hci_dev *hdev = req->hdev;
1275 1276 1277

	BT_DBG("%s %ld", hdev->name, opt);

1278 1279
	/* Reset */
	if (!test_bit(HCI_QUIRK_RESET_ON_CLOSE, &hdev->quirks))
1280
		hci_reset_req(req, 0);
1281

1282 1283
	switch (hdev->dev_type) {
	case HCI_BREDR:
1284
		bredr_init(req);
1285 1286 1287
		break;

	case HCI_AMP:
1288
		amp_init(req);
1289 1290 1291 1292 1293 1294 1295 1296
		break;

	default:
		BT_ERR("Unknown device type %d", hdev->dev_type);
		break;
	}
}

1297
static void bredr_setup(struct hci_request *req)
1298
{
1299 1300
	struct hci_dev *hdev = req->hdev;

1301 1302 1303 1304
	__le16 param;
	__u8 flt_type;

	/* Read Buffer Size (ACL mtu, max pkt, etc.) */
1305
	hci_req_add(req, HCI_OP_READ_BUFFER_SIZE, 0, NULL);
1306 1307

	/* Read Class of Device */
1308
	hci_req_add(req, HCI_OP_READ_CLASS_OF_DEV, 0, NULL);
1309 1310

	/* Read Local Name */
1311
	hci_req_add(req, HCI_OP_READ_LOCAL_NAME, 0, NULL);
1312 1313

	/* Read Voice Setting */
1314
	hci_req_add(req, HCI_OP_READ_VOICE_SETTING, 0, NULL);
1315

1316 1317 1318
	/* Read Number of Supported IAC */
	hci_req_add(req, HCI_OP_READ_NUM_SUPPORTED_IAC, 0, NULL);

1319 1320 1321
	/* Read Current IAC LAP */
	hci_req_add(req, HCI_OP_READ_CURRENT_IAC_LAP, 0, NULL);

1322 1323
	/* Clear Event Filters */
	flt_type = HCI_FLT_CLEAR_ALL;
1324
	hci_req_add(req, HCI_OP_SET_EVENT_FLT, 1, &flt_type);
1325 1326 1327

	/* Connection accept timeout ~20 secs */
	param = __constant_cpu_to_le16(0x7d00);
1328
	hci_req_add(req, HCI_OP_WRITE_CA_TIMEOUT, 2, &param);
1329

1330 1331 1332 1333
	/* AVM Berlin (31), aka "BlueFRITZ!", reports version 1.2,
	 * but it does not support page scan related HCI commands.
	 */
	if (hdev->manufacturer != 31 && hdev->hci_ver > BLUETOOTH_VER_1_1) {
1334 1335 1336
		hci_req_add(req, HCI_OP_READ_PAGE_SCAN_ACTIVITY, 0, NULL);
		hci_req_add(req, HCI_OP_READ_PAGE_SCAN_TYPE, 0, NULL);
	}
1337 1338
}

1339
static void le_setup(struct hci_request *req)
1340
{
1341 1342
	struct hci_dev *hdev = req->hdev;

1343
	/* Read LE Buffer Size */
1344
	hci_req_add(req, HCI_OP_LE_READ_BUFFER_SIZE, 0, NULL);
1345 1346

	/* Read LE Local Supported Features */
1347
	hci_req_add(req, HCI_OP_LE_READ_LOCAL_FEATURES, 0, NULL);
1348

1349 1350 1351
	/* Read LE Supported States */
	hci_req_add(req, HCI_OP_LE_READ_SUPPORTED_STATES, 0, NULL);

1352
	/* Read LE Advertising Channel TX Power */
1353
	hci_req_add(req, HCI_OP_LE_READ_ADV_TX_POWER, 0, NULL);
1354 1355

	/* Read LE White List Size */
1356
	hci_req_add(req, HCI_OP_LE_READ_WHITE_LIST_SIZE, 0, NULL);
1357

1358 1359
	/* Clear LE White List */
	hci_req_add(req, HCI_OP_LE_CLEAR_WHITE_LIST, 0, NULL);
1360 1361 1362 1363

	/* LE-only controllers have LE implicitly enabled */
	if (!lmp_bredr_capable(hdev))
		set_bit(HCI_LE_ENABLED, &hdev->dev_flags);
1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393
}

static u8 hci_get_inquiry_mode(struct hci_dev *hdev)
{
	if (lmp_ext_inq_capable(hdev))
		return 0x02;

	if (lmp_inq_rssi_capable(hdev))
		return 0x01;

	if (hdev->manufacturer == 11 && hdev->hci_rev == 0x00 &&
	    hdev->lmp_subver == 0x0757)
		return 0x01;

	if (hdev->manufacturer == 15) {
		if (hdev->hci_rev == 0x03 && hdev->lmp_subver == 0x6963)
			return 0x01;
		if (hdev->hci_rev == 0x09 && hdev->lmp_subver == 0x6963)
			return 0x01;
		if (hdev->hci_rev == 0x00 && hdev->lmp_subver == 0x6965)
			return 0x01;
	}

	if (hdev->manufacturer == 31 && hdev->hci_rev == 0x2005 &&
	    hdev->lmp_subver == 0x1805)
		return 0x01;

	return 0x00;
}

1394
static void hci_setup_inquiry_mode(struct hci_request *req)
1395 1396 1397
{
	u8 mode;

1398
	mode = hci_get_inquiry_mode(req->hdev);
1399

1400
	hci_req_add(req, HCI_OP_WRITE_INQUIRY_MODE, 1, &mode);
1401 1402
}

1403
static void hci_setup_event_mask(struct hci_request *req)
1404
{
1405 1406
	struct hci_dev *hdev = req->hdev;

1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424
	/* The second byte is 0xff instead of 0x9f (two reserved bits
	 * disabled) since a Broadcom 1.2 dongle doesn't respond to the
	 * command otherwise.
	 */
	u8 events[8] = { 0xff, 0xff, 0xfb, 0xff, 0x00, 0x00, 0x00, 0x00 };

	/* CSR 1.1 dongles does not accept any bitfield so don't try to set
	 * any event mask for pre 1.2 devices.
	 */
	if (hdev->hci_ver < BLUETOOTH_VER_1_2)
		return;

	if (lmp_bredr_capable(hdev)) {
		events[4] |= 0x01; /* Flow Specification Complete */
		events[4] |= 0x02; /* Inquiry Result with RSSI */
		events[4] |= 0x04; /* Read Remote Extended Features Complete */
		events[5] |= 0x08; /* Synchronous Connection Complete */
		events[5] |= 0x10; /* Synchronous Connection Changed */
1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436
	} else {
		/* Use a different default for LE-only devices */
		memset(events, 0, sizeof(events));
		events[0] |= 0x10; /* Disconnection Complete */
		events[0] |= 0x80; /* Encryption Change */
		events[1] |= 0x08; /* Read Remote Version Information Complete */
		events[1] |= 0x20; /* Command Complete */
		events[1] |= 0x40; /* Command Status */
		events[1] |= 0x80; /* Hardware Error */
		events[2] |= 0x04; /* Number of Completed Packets */
		events[3] |= 0x02; /* Data Buffer Overflow */
		events[5] |= 0x80; /* Encryption Key Refresh Complete */
1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473
	}

	if (lmp_inq_rssi_capable(hdev))
		events[4] |= 0x02; /* Inquiry Result with RSSI */

	if (lmp_sniffsubr_capable(hdev))
		events[5] |= 0x20; /* Sniff Subrating */

	if (lmp_pause_enc_capable(hdev))
		events[5] |= 0x80; /* Encryption Key Refresh Complete */

	if (lmp_ext_inq_capable(hdev))
		events[5] |= 0x40; /* Extended Inquiry Result */

	if (lmp_no_flush_capable(hdev))
		events[7] |= 0x01; /* Enhanced Flush Complete */

	if (lmp_lsto_capable(hdev))
		events[6] |= 0x80; /* Link Supervision Timeout Changed */

	if (lmp_ssp_capable(hdev)) {
		events[6] |= 0x01;	/* IO Capability Request */
		events[6] |= 0x02;	/* IO Capability Response */
		events[6] |= 0x04;	/* User Confirmation Request */
		events[6] |= 0x08;	/* User Passkey Request */
		events[6] |= 0x10;	/* Remote OOB Data Request */
		events[6] |= 0x20;	/* Simple Pairing Complete */
		events[7] |= 0x04;	/* User Passkey Notification */
		events[7] |= 0x08;	/* Keypress Notification */
		events[7] |= 0x10;	/* Remote Host Supported
					 * Features Notification
					 */
	}

	if (lmp_le_capable(hdev))
		events[7] |= 0x20;	/* LE Meta-Event */

1474
	hci_req_add(req, HCI_OP_SET_EVENT_MASK, sizeof(events), events);
1475 1476 1477 1478

	if (lmp_le_capable(hdev)) {
		memset(events, 0, sizeof(events));
		events[0] = 0x1f;
1479 1480
		hci_req_add(req, HCI_OP_LE_SET_EVENT_MASK,
			    sizeof(events), events);
1481 1482 1483
	}
}

1484
static void hci_init2_req(struct hci_request *req, unsigned long opt)
1485
{
1486 1487
	struct hci_dev *hdev = req->hdev;

1488
	if (lmp_bredr_capable(hdev))
1489
		bredr_setup(req);
1490 1491
	else
		clear_bit(HCI_BREDR_ENABLED, &hdev->dev_flags);
1492 1493

	if (lmp_le_capable(hdev))
1494
		le_setup(req);
1495

1496
	hci_setup_event_mask(req);
1497

1498 1499 1500 1501
	/* AVM Berlin (31), aka "BlueFRITZ!", doesn't support the read
	 * local supported commands HCI command.
	 */
	if (hdev->manufacturer != 31 && hdev->hci_ver > BLUETOOTH_VER_1_1)
1502
		hci_req_add(req, HCI_OP_READ_LOCAL_COMMANDS, 0, NULL);
1503 1504

	if (lmp_ssp_capable(hdev)) {
1505 1506 1507 1508 1509 1510 1511 1512
		/* When SSP is available, then the host features page
		 * should also be available as well. However some
		 * controllers list the max_page as 0 as long as SSP
		 * has not been enabled. To achieve proper debugging
		 * output, force the minimum max_page to 1 at least.
		 */
		hdev->max_page = 0x01;

1513 1514
		if (test_bit(HCI_SSP_ENABLED, &hdev->dev_flags)) {
			u8 mode = 0x01;
1515 1516
			hci_req_add(req, HCI_OP_WRITE_SSP_MODE,
				    sizeof(mode), &mode);
1517 1518 1519 1520 1521 1522
		} else {
			struct hci_cp_write_eir cp;

			memset(hdev->eir, 0, sizeof(hdev->eir));
			memset(&cp, 0, sizeof(cp));

1523
			hci_req_add(req, HCI_OP_WRITE_EIR, sizeof(cp), &cp);
1524 1525 1526 1527
		}
	}

	if (lmp_inq_rssi_capable(hdev))
1528
		hci_setup_inquiry_mode(req);
1529 1530

	if (lmp_inq_tx_pwr_capable(hdev))
1531
		hci_req_add(req, HCI_OP_READ_INQ_RSP_TX_POWER, 0, NULL);
1532 1533 1534 1535 1536

	if (lmp_ext_feat_capable(hdev)) {
		struct hci_cp_read_local_ext_features cp;

		cp.page = 0x01;
1537 1538
		hci_req_add(req, HCI_OP_READ_LOCAL_EXT_FEATURES,
			    sizeof(cp), &cp);
1539 1540 1541 1542
	}

	if (test_bit(HCI_LINK_SECURITY, &hdev->dev_flags)) {
		u8 enable = 1;
1543 1544
		hci_req_add(req, HCI_OP_WRITE_AUTH_ENABLE, sizeof(enable),
			    &enable);
1545 1546 1547
	}
}

1548
static void hci_setup_link_policy(struct hci_request *req)
1549
{
1550
	struct hci_dev *hdev = req->hdev;
1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563
	struct hci_cp_write_def_link_policy cp;
	u16 link_policy = 0;

	if (lmp_rswitch_capable(hdev))
		link_policy |= HCI_LP_RSWITCH;
	if (lmp_hold_capable(hdev))
		link_policy |= HCI_LP_HOLD;
	if (lmp_sniff_capable(hdev))
		link_policy |= HCI_LP_SNIFF;
	if (lmp_park_capable(hdev))
		link_policy |= HCI_LP_PARK;

	cp.policy = cpu_to_le16(link_policy);
1564
	hci_req_add(req, HCI_OP_WRITE_DEF_LINK_POLICY, sizeof(cp), &cp);
1565 1566
}

1567
static void hci_set_le_support(struct hci_request *req)
1568
{
1569
	struct hci_dev *hdev = req->hdev;
1570 1571
	struct hci_cp_write_le_host_supported cp;

1572 1573 1574 1575
	/* LE-only devices do not support explicit enablement */
	if (!lmp_bredr_capable(hdev))
		return;

1576 1577 1578 1579 1580 1581 1582 1583
	memset(&cp, 0, sizeof(cp));

	if (test_bit(HCI_LE_ENABLED, &hdev->dev_flags)) {
		cp.le = 0x01;
		cp.simul = lmp_le_br_capable(hdev);
	}

	if (cp.le != lmp_host_le_capable(hdev))
1584 1585
		hci_req_add(req, HCI_OP_WRITE_LE_HOST_SUPPORTED, sizeof(cp),
			    &cp);
1586 1587
}

1588 1589 1590 1591 1592 1593 1594 1595
static void hci_set_event_mask_page_2(struct hci_request *req)
{
	struct hci_dev *hdev = req->hdev;
	u8 events[8] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

	/* If Connectionless Slave Broadcast master role is supported
	 * enable all necessary events for it.
	 */
1596
	if (lmp_csb_master_capable(hdev)) {
1597 1598 1599 1600 1601 1602 1603 1604 1605
		events[1] |= 0x40;	/* Triggered Clock Capture */
		events[1] |= 0x80;	/* Synchronization Train Complete */
		events[2] |= 0x10;	/* Slave Page Response Timeout */
		events[2] |= 0x20;	/* CSB Channel Map Change */
	}

	/* If Connectionless Slave Broadcast slave role is supported
	 * enable all necessary events for it.
	 */
1606
	if (lmp_csb_slave_capable(hdev)) {
1607 1608 1609 1610 1611 1612
		events[2] |= 0x01;	/* Synchronization Train Received */
		events[2] |= 0x02;	/* CSB Receive */
		events[2] |= 0x04;	/* CSB Timeout */
		events[2] |= 0x08;	/* Truncated Page Complete */
	}

1613 1614 1615 1616
	/* Enable Authenticated Payload Timeout Expired event if supported */
	if (lmp_ping_capable(hdev))
		events[2] |= 0x80;

1617 1618 1619
	hci_req_add(req, HCI_OP_SET_EVENT_MASK_PAGE_2, sizeof(events), events);
}

1620
static void hci_init3_req(struct hci_request *req, unsigned long opt)
1621
{
1622
	struct hci_dev *hdev = req->hdev;
1623
	u8 p;
1624

1625 1626 1627 1628 1629 1630 1631 1632
	/* Some Broadcom based Bluetooth controllers do not support the
	 * Delete Stored Link Key command. They are clearly indicating its
	 * absence in the bit mask of supported commands.
	 *
	 * Check the supported commands and only if the the command is marked
	 * as supported send it. If not supported assume that the controller
	 * does not have actual support for stored link keys which makes this
	 * command redundant anyway.
1633 1634 1635 1636
	 *
	 * Some controllers indicate that they support handling deleting
	 * stored link keys, but they don't. The quirk lets a driver
	 * just disable this command.
1637
	 */
1638 1639
	if (hdev->commands[6] & 0x80 &&
	    !test_bit(HCI_QUIRK_BROKEN_STORED_LINK_KEY, &hdev->quirks)) {
1640 1641 1642 1643 1644 1645 1646 1647
		struct hci_cp_delete_stored_link_key cp;

		bacpy(&cp.bdaddr, BDADDR_ANY);
		cp.delete_all = 0x01;
		hci_req_add(req, HCI_OP_DELETE_STORED_LINK_KEY,
			    sizeof(cp), &cp);
	}

1648
	if (hdev->commands[5] & 0x10)
1649
		hci_setup_link_policy(req);
1650

1651
	if (lmp_le_capable(hdev))
1652
		hci_set_le_support(req);
1653 1654 1655 1656 1657 1658 1659 1660 1661

	/* Read features beyond page 1 if available */
	for (p = 2; p < HCI_MAX_PAGES && p <= hdev->max_page; p++) {
		struct hci_cp_read_local_ext_features cp;

		cp.page = p;
		hci_req_add(req, HCI_OP_READ_LOCAL_EXT_FEATURES,
			    sizeof(cp), &cp);
	}
1662 1663
}

1664 1665 1666 1667
static void hci_init4_req(struct hci_request *req, unsigned long opt)
{
	struct hci_dev *hdev = req->hdev;

1668 1669 1670 1671
	/* Set event mask page 2 if the HCI command for it is supported */
	if (hdev->commands[22] & 0x04)
		hci_set_event_mask_page_2(req);

1672
	/* Check for Synchronization Train support */
1673
	if (lmp_sync_train_capable(hdev))
1674
		hci_req_add(req, HCI_OP_READ_SYNC_TRAIN_PARAMS, 0, NULL);
1675 1676

	/* Enable Secure Connections if supported and configured */
1677 1678
	if ((lmp_sc_capable(hdev) ||
	     test_bit(HCI_FORCE_SC, &hdev->dev_flags)) &&
1679 1680 1681 1682 1683
	    test_bit(HCI_SC_ENABLED, &hdev->dev_flags)) {
		u8 support = 0x01;
		hci_req_add(req, HCI_OP_WRITE_SC_SUPPORT,
			    sizeof(support), &support);
	}
1684 1685
}

1686 1687 1688 1689 1690 1691 1692 1693
static int __hci_init(struct hci_dev *hdev)
{
	int err;

	err = __hci_req_sync(hdev, hci_init1_req, 0, HCI_INIT_TIMEOUT);
	if (err < 0)
		return err;

1694 1695 1696 1697 1698 1699 1700 1701
	/* The Device Under Test (DUT) mode is special and available for
	 * all controller types. So just create it early on.
	 */
	if (test_bit(HCI_SETUP, &hdev->dev_flags)) {
		debugfs_create_file("dut_mode", 0644, hdev->debugfs, hdev,
				    &dut_mode_fops);
	}

1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712
	/* HCI_BREDR covers both single-mode LE, BR/EDR and dual-mode
	 * BR/EDR/LE type controllers. AMP controllers only need the
	 * first stage init.
	 */
	if (hdev->dev_type != HCI_BREDR)
		return 0;

	err = __hci_req_sync(hdev, hci_init2_req, 0, HCI_INIT_TIMEOUT);
	if (err < 0)
		return err;

1713 1714 1715 1716
	err = __hci_req_sync(hdev, hci_init3_req, 0, HCI_INIT_TIMEOUT);
	if (err < 0)
		return err;

1717 1718 1719 1720 1721 1722 1723 1724 1725 1726
	err = __hci_req_sync(hdev, hci_init4_req, 0, HCI_INIT_TIMEOUT);
	if (err < 0)
		return err;

	/* Only create debugfs entries during the initial setup
	 * phase and not every time the controller gets powered on.
	 */
	if (!test_bit(HCI_SETUP, &hdev->dev_flags))
		return 0;

1727 1728
	debugfs_create_file("features", 0444, hdev->debugfs, hdev,
			    &features_fops);
1729 1730 1731 1732
	debugfs_create_u16("manufacturer", 0444, hdev->debugfs,
			   &hdev->manufacturer);
	debugfs_create_u8("hci_version", 0444, hdev->debugfs, &hdev->hci_ver);
	debugfs_create_u16("hci_revision", 0444, hdev->debugfs, &hdev->hci_rev);
1733 1734
	debugfs_create_file("blacklist", 0444, hdev->debugfs, hdev,
			    &blacklist_fops);
1735 1736
	debugfs_create_file("uuids", 0444, hdev->debugfs, hdev, &uuids_fops);

1737 1738 1739
	if (lmp_bredr_capable(hdev)) {
		debugfs_create_file("inquiry_cache", 0444, hdev->debugfs,
				    hdev, &inquiry_cache_fops);
1740 1741
		debugfs_create_file("link_keys", 0400, hdev->debugfs,
				    hdev, &link_keys_fops);
1742 1743
		debugfs_create_file("dev_class", 0444, hdev->debugfs,
				    hdev, &dev_class_fops);
1744 1745
		debugfs_create_file("voice_setting", 0444, hdev->debugfs,
				    hdev, &voice_setting_fops);
1746 1747
	}

1748
	if (lmp_ssp_capable(hdev)) {
1749 1750
		debugfs_create_file("auto_accept_delay", 0644, hdev->debugfs,
				    hdev, &auto_accept_delay_fops);
1751 1752
		debugfs_create_file("ssp_debug_mode", 0644, hdev->debugfs,
				    hdev, &ssp_debug_mode_fops);
1753 1754
		debugfs_create_file("force_sc_support", 0644, hdev->debugfs,
				    hdev, &force_sc_support_fops);
1755 1756
		debugfs_create_file("sc_only_mode", 0444, hdev->debugfs,
				    hdev, &sc_only_mode_fops);
1757
	}
1758

1759 1760 1761 1762 1763 1764 1765 1766 1767
	if (lmp_sniff_capable(hdev)) {
		debugfs_create_file("idle_timeout", 0644, hdev->debugfs,
				    hdev, &idle_timeout_fops);
		debugfs_create_file("sniff_min_interval", 0644, hdev->debugfs,
				    hdev, &sniff_min_interval_fops);
		debugfs_create_file("sniff_max_interval", 0644, hdev->debugfs,
				    hdev, &sniff_max_interval_fops);
	}

1768
	if (lmp_le_capable(hdev)) {
1769 1770 1771 1772
		debugfs_create_file("identity", 0400, hdev->debugfs,
				    hdev, &identity_fops);
		debugfs_create_file("rpa_timeout", 0644, hdev->debugfs,
				    hdev, &rpa_timeout_fops);
1773 1774
		debugfs_create_file("random_address", 0444, hdev->debugfs,
				    hdev, &random_address_fops);
1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786
		debugfs_create_file("static_address", 0444, hdev->debugfs,
				    hdev, &static_address_fops);

		/* For controllers with a public address, provide a debug
		 * option to force the usage of the configured static
		 * address. By default the public address is used.
		 */
		if (bacmp(&hdev->bdaddr, BDADDR_ANY))
			debugfs_create_file("force_static_address", 0644,
					    hdev->debugfs, hdev,
					    &force_static_address_fops);

1787 1788
		debugfs_create_u8("white_list_size", 0444, hdev->debugfs,
				  &hdev->le_white_list_size);
1789 1790 1791
		debugfs_create_file("identity_resolving_keys", 0400,
				    hdev->debugfs, hdev,
				    &identity_resolving_keys_fops);
1792 1793
		debugfs_create_file("long_term_keys", 0400, hdev->debugfs,
				    hdev, &long_term_keys_fops);
1794 1795 1796 1797
		debugfs_create_file("conn_min_interval", 0644, hdev->debugfs,
				    hdev, &conn_min_interval_fops);
		debugfs_create_file("conn_max_interval", 0644, hdev->debugfs,
				    hdev, &conn_max_interval_fops);
1798 1799
		debugfs_create_file("adv_channel_map", 0644, hdev->debugfs,
				    hdev, &adv_channel_map_fops);
1800 1801
		debugfs_create_file("6lowpan", 0644, hdev->debugfs, hdev,
				    &lowpan_debugfs_fops);
1802 1803
		debugfs_create_file("le_auto_conn", 0644, hdev->debugfs, hdev,
				    &le_auto_conn_fops);
1804
	}
1805

1806
	return 0;
1807 1808
}

1809
static void hci_scan_req(struct hci_request *req, unsigned long opt)
L
Linus Torvalds 已提交
1810 1811 1812
{
	__u8 scan = opt;

1813
	BT_DBG("%s %x", req->hdev->name, scan);
L
Linus Torvalds 已提交
1814 1815

	/* Inquiry and Page scans */
1816
	hci_req_add(req, HCI_OP_WRITE_SCAN_ENABLE, 1, &scan);
L
Linus Torvalds 已提交
1817 1818
}

1819
static void hci_auth_req(struct hci_request *req, unsigned long opt)
L
Linus Torvalds 已提交
1820 1821 1822
{
	__u8 auth = opt;

1823
	BT_DBG("%s %x", req->hdev->name, auth);
L
Linus Torvalds 已提交
1824 1825

	/* Authentication */
1826
	hci_req_add(req, HCI_OP_WRITE_AUTH_ENABLE, 1, &auth);
L
Linus Torvalds 已提交
1827 1828
}

1829
static void hci_encrypt_req(struct hci_request *req, unsigned long opt)
L
Linus Torvalds 已提交
1830 1831 1832
{
	__u8 encrypt = opt;

1833
	BT_DBG("%s %x", req->hdev->name, encrypt);
L
Linus Torvalds 已提交
1834

1835
	/* Encryption */
1836
	hci_req_add(req, HCI_OP_WRITE_ENCRYPT_MODE, 1, &encrypt);
L
Linus Torvalds 已提交
1837 1838
}

1839
static void hci_linkpol_req(struct hci_request *req, unsigned long opt)
1840 1841 1842
{
	__le16 policy = cpu_to_le16(opt);

1843
	BT_DBG("%s %x", req->hdev->name, policy);
1844 1845

	/* Default link policy */
1846
	hci_req_add(req, HCI_OP_WRITE_DEF_LINK_POLICY, 2, &policy);
1847 1848
}

1849
/* Get HCI device by index.
L
Linus Torvalds 已提交
1850 1851 1852
 * Device is held on return. */
struct hci_dev *hci_dev_get(int index)
{
1853
	struct hci_dev *hdev = NULL, *d;
L
Linus Torvalds 已提交
1854 1855 1856 1857 1858 1859 1860

	BT_DBG("%d", index);

	if (index < 0)
		return NULL;

	read_lock(&hci_dev_list_lock);
1861
	list_for_each_entry(d, &hci_dev_list, list) {
L
Linus Torvalds 已提交
1862 1863 1864 1865 1866 1867 1868 1869 1870 1871
		if (d->id == index) {
			hdev = hci_dev_hold(d);
			break;
		}
	}
	read_unlock(&hci_dev_list_lock);
	return hdev;
}

/* ---- Inquiry support ---- */
1872

1873 1874 1875 1876
bool hci_discovery_active(struct hci_dev *hdev)
{
	struct discovery_state *discov = &hdev->discovery;

A
Andre Guedes 已提交
1877
	switch (discov->state) {
1878
	case DISCOVERY_FINDING:
A
Andre Guedes 已提交
1879
	case DISCOVERY_RESOLVING:
1880 1881
		return true;

A
Andre Guedes 已提交
1882 1883 1884
	default:
		return false;
	}
1885 1886
}

1887 1888 1889 1890 1891 1892 1893 1894 1895
void hci_discovery_set_state(struct hci_dev *hdev, int state)
{
	BT_DBG("%s state %u -> %u", hdev->name, hdev->discovery.state, state);

	if (hdev->discovery.state == state)
		return;

	switch (state) {
	case DISCOVERY_STOPPED:
1896 1897
		hci_update_background_scan(hdev);

1898 1899
		if (hdev->discovery.state != DISCOVERY_STARTING)
			mgmt_discovering(hdev, 0);
1900 1901 1902
		break;
	case DISCOVERY_STARTING:
		break;
1903
	case DISCOVERY_FINDING:
1904 1905
		mgmt_discovering(hdev, 1);
		break;
1906 1907
	case DISCOVERY_RESOLVING:
		break;
1908 1909 1910 1911 1912 1913 1914
	case DISCOVERY_STOPPING:
		break;
	}

	hdev->discovery.state = state;
}

1915
void hci_inquiry_cache_flush(struct hci_dev *hdev)
L
Linus Torvalds 已提交
1916
{
1917
	struct discovery_state *cache = &hdev->discovery;
1918
	struct inquiry_entry *p, *n;
L
Linus Torvalds 已提交
1919

1920 1921
	list_for_each_entry_safe(p, n, &cache->all, all) {
		list_del(&p->all);
1922
		kfree(p);
L
Linus Torvalds 已提交
1923
	}
1924 1925 1926

	INIT_LIST_HEAD(&cache->unknown);
	INIT_LIST_HEAD(&cache->resolve);
L
Linus Torvalds 已提交
1927 1928
}

1929 1930
struct inquiry_entry *hci_inquiry_cache_lookup(struct hci_dev *hdev,
					       bdaddr_t *bdaddr)
L
Linus Torvalds 已提交
1931
{
1932
	struct discovery_state *cache = &hdev->discovery;
L
Linus Torvalds 已提交
1933 1934
	struct inquiry_entry *e;

1935
	BT_DBG("cache %p, %pMR", cache, bdaddr);
L
Linus Torvalds 已提交
1936

1937 1938 1939 1940 1941 1942 1943 1944 1945
	list_for_each_entry(e, &cache->all, all) {
		if (!bacmp(&e->data.bdaddr, bdaddr))
			return e;
	}

	return NULL;
}

struct inquiry_entry *hci_inquiry_cache_lookup_unknown(struct hci_dev *hdev,
1946
						       bdaddr_t *bdaddr)
1947
{
1948
	struct discovery_state *cache = &hdev->discovery;
1949 1950
	struct inquiry_entry *e;

1951
	BT_DBG("cache %p, %pMR", cache, bdaddr);
1952 1953

	list_for_each_entry(e, &cache->unknown, list) {
L
Linus Torvalds 已提交
1954
		if (!bacmp(&e->data.bdaddr, bdaddr))
1955 1956 1957 1958
			return e;
	}

	return NULL;
L
Linus Torvalds 已提交
1959 1960
}

1961
struct inquiry_entry *hci_inquiry_cache_lookup_resolve(struct hci_dev *hdev,
1962 1963
						       bdaddr_t *bdaddr,
						       int state)
1964 1965 1966 1967
{
	struct discovery_state *cache = &hdev->discovery;
	struct inquiry_entry *e;

1968
	BT_DBG("cache %p bdaddr %pMR state %d", cache, bdaddr, state);
1969 1970 1971 1972 1973 1974 1975 1976 1977 1978 1979

	list_for_each_entry(e, &cache->resolve, list) {
		if (!bacmp(bdaddr, BDADDR_ANY) && e->name_state == state)
			return e;
		if (!bacmp(&e->data.bdaddr, bdaddr))
			return e;
	}

	return NULL;
}

1980
void hci_inquiry_cache_update_resolve(struct hci_dev *hdev,
1981
				      struct inquiry_entry *ie)
1982 1983 1984 1985 1986 1987 1988 1989 1990
{
	struct discovery_state *cache = &hdev->discovery;
	struct list_head *pos = &cache->resolve;
	struct inquiry_entry *p;

	list_del(&ie->list);

	list_for_each_entry(p, &cache->resolve, list) {
		if (p->name_state != NAME_PENDING &&
1991
		    abs(p->data.rssi) >= abs(ie->data.rssi))
1992 1993 1994 1995 1996 1997 1998
			break;
		pos = &p->list;
	}

	list_add(&ie->list, pos);
}

1999
bool hci_inquiry_cache_update(struct hci_dev *hdev, struct inquiry_data *data,
2000
			      bool name_known, bool *ssp)
L
Linus Torvalds 已提交
2001
{
2002
	struct discovery_state *cache = &hdev->discovery;
A
Andrei Emeltchenko 已提交
2003
	struct inquiry_entry *ie;
L
Linus Torvalds 已提交
2004

2005
	BT_DBG("cache %p, %pMR", cache, &data->bdaddr);
L
Linus Torvalds 已提交
2006

2007 2008
	hci_remove_remote_oob_data(hdev, &data->bdaddr);

2009 2010 2011
	if (ssp)
		*ssp = data->ssp_mode;

A
Andrei Emeltchenko 已提交
2012
	ie = hci_inquiry_cache_lookup(hdev, &data->bdaddr);
2013
	if (ie) {
2014 2015 2016
		if (ie->data.ssp_mode && ssp)
			*ssp = true;

2017
		if (ie->name_state == NAME_NEEDED &&
2018
		    data->rssi != ie->data.rssi) {
2019 2020 2021 2022
			ie->data.rssi = data->rssi;
			hci_inquiry_cache_update_resolve(hdev, ie);
		}

2023
		goto update;
2024
	}
2025 2026 2027 2028

	/* Entry not in the cache. Add new one. */
	ie = kzalloc(sizeof(struct inquiry_entry), GFP_ATOMIC);
	if (!ie)
2029
		return false;
2030 2031 2032 2033 2034 2035 2036 2037 2038

	list_add(&ie->all, &cache->all);

	if (name_known) {
		ie->name_state = NAME_KNOWN;
	} else {
		ie->name_state = NAME_NOT_KNOWN;
		list_add(&ie->list, &cache->unknown);
	}
A
Andrei Emeltchenko 已提交
2039

2040 2041
update:
	if (name_known && ie->name_state != NAME_KNOWN &&
2042
	    ie->name_state != NAME_PENDING) {
2043 2044
		ie->name_state = NAME_KNOWN;
		list_del(&ie->list);
L
Linus Torvalds 已提交
2045 2046
	}

A
Andrei Emeltchenko 已提交
2047 2048
	memcpy(&ie->data, data, sizeof(*data));
	ie->timestamp = jiffies;
L
Linus Torvalds 已提交
2049
	cache->timestamp = jiffies;
2050 2051 2052 2053 2054

	if (ie->name_state == NAME_NOT_KNOWN)
		return false;

	return true;
L
Linus Torvalds 已提交
2055 2056 2057 2058
}

static int inquiry_cache_dump(struct hci_dev *hdev, int num, __u8 *buf)
{
2059
	struct discovery_state *cache = &hdev->discovery;
L
Linus Torvalds 已提交
2060 2061 2062 2063
	struct inquiry_info *info = (struct inquiry_info *) buf;
	struct inquiry_entry *e;
	int copied = 0;

2064
	list_for_each_entry(e, &cache->all, all) {
L
Linus Torvalds 已提交
2065
		struct inquiry_data *data = &e->data;
2066 2067 2068 2069

		if (copied >= num)
			break;

L
Linus Torvalds 已提交
2070 2071 2072 2073 2074 2075
		bacpy(&info->bdaddr, &data->bdaddr);
		info->pscan_rep_mode	= data->pscan_rep_mode;
		info->pscan_period_mode	= data->pscan_period_mode;
		info->pscan_mode	= data->pscan_mode;
		memcpy(info->dev_class, data->dev_class, 3);
		info->clock_offset	= data->clock_offset;
2076

L
Linus Torvalds 已提交
2077
		info++;
2078
		copied++;
L
Linus Torvalds 已提交
2079 2080 2081 2082 2083 2084
	}

	BT_DBG("cache %p, copied %d", cache, copied);
	return copied;
}

2085
static void hci_inq_req(struct hci_request *req, unsigned long opt)
L
Linus Torvalds 已提交
2086 2087
{
	struct hci_inquiry_req *ir = (struct hci_inquiry_req *) opt;
2088
	struct hci_dev *hdev = req->hdev;
L
Linus Torvalds 已提交
2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099
	struct hci_cp_inquiry cp;

	BT_DBG("%s", hdev->name);

	if (test_bit(HCI_INQUIRY, &hdev->flags))
		return;

	/* Start Inquiry */
	memcpy(&cp.lap, &ir->lap, 3);
	cp.length  = ir->length;
	cp.num_rsp = ir->num_rsp;
2100
	hci_req_add(req, HCI_OP_INQUIRY, sizeof(cp), &cp);
L
Linus Torvalds 已提交
2101 2102
}

2103 2104 2105 2106 2107 2108
static int wait_inquiry(void *word)
{
	schedule();
	return signal_pending(current);
}

L
Linus Torvalds 已提交
2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120
int hci_inquiry(void __user *arg)
{
	__u8 __user *ptr = arg;
	struct hci_inquiry_req ir;
	struct hci_dev *hdev;
	int err = 0, do_inquiry = 0, max_rsp;
	long timeo;
	__u8 *buf;

	if (copy_from_user(&ir, ptr, sizeof(ir)))
		return -EFAULT;

2121 2122
	hdev = hci_dev_get(ir.dev_id);
	if (!hdev)
L
Linus Torvalds 已提交
2123 2124
		return -ENODEV;

2125 2126 2127 2128 2129
	if (test_bit(HCI_USER_CHANNEL, &hdev->dev_flags)) {
		err = -EBUSY;
		goto done;
	}

2130 2131 2132 2133 2134
	if (hdev->dev_type != HCI_BREDR) {
		err = -EOPNOTSUPP;
		goto done;
	}

2135 2136 2137 2138 2139
	if (!test_bit(HCI_BREDR_ENABLED, &hdev->dev_flags)) {
		err = -EOPNOTSUPP;
		goto done;
	}

2140
	hci_dev_lock(hdev);
2141
	if (inquiry_cache_age(hdev) > INQUIRY_CACHE_AGE_MAX ||
2142
	    inquiry_cache_empty(hdev) || ir.flags & IREQ_CACHE_FLUSH) {
2143
		hci_inquiry_cache_flush(hdev);
L
Linus Torvalds 已提交
2144 2145
		do_inquiry = 1;
	}
2146
	hci_dev_unlock(hdev);
L
Linus Torvalds 已提交
2147

2148
	timeo = ir.length * msecs_to_jiffies(2000);
A
Andrei Emeltchenko 已提交
2149 2150

	if (do_inquiry) {
2151 2152
		err = hci_req_sync(hdev, hci_inq_req, (unsigned long) &ir,
				   timeo);
A
Andrei Emeltchenko 已提交
2153 2154
		if (err < 0)
			goto done;
2155 2156 2157 2158 2159 2160 2161

		/* Wait until Inquiry procedure finishes (HCI_INQUIRY flag is
		 * cleared). If it is interrupted by a signal, return -EINTR.
		 */
		if (wait_on_bit(&hdev->flags, HCI_INQUIRY, wait_inquiry,
				TASK_INTERRUPTIBLE))
			return -EINTR;
A
Andrei Emeltchenko 已提交
2162
	}
L
Linus Torvalds 已提交
2163

2164 2165 2166
	/* for unlimited number of responses we will use buffer with
	 * 255 entries
	 */
L
Linus Torvalds 已提交
2167 2168 2169 2170 2171
	max_rsp = (ir.num_rsp == 0) ? 255 : ir.num_rsp;

	/* cache_dump can't sleep. Therefore we allocate temp buffer and then
	 * copy it to the user space.
	 */
2172
	buf = kmalloc(sizeof(struct inquiry_info) * max_rsp, GFP_KERNEL);
A
Andrei Emeltchenko 已提交
2173
	if (!buf) {
L
Linus Torvalds 已提交
2174 2175 2176 2177
		err = -ENOMEM;
		goto done;
	}

2178
	hci_dev_lock(hdev);
L
Linus Torvalds 已提交
2179
	ir.num_rsp = inquiry_cache_dump(hdev, max_rsp, buf);
2180
	hci_dev_unlock(hdev);
L
Linus Torvalds 已提交
2181 2182 2183 2184 2185 2186

	BT_DBG("num_rsp %d", ir.num_rsp);

	if (!copy_to_user(ptr, &ir, sizeof(ir))) {
		ptr += sizeof(ir);
		if (copy_to_user(ptr, buf, sizeof(struct inquiry_info) *
2187
				 ir.num_rsp))
L
Linus Torvalds 已提交
2188
			err = -EFAULT;
2189
	} else
L
Linus Torvalds 已提交
2190 2191 2192 2193 2194 2195 2196 2197 2198
		err = -EFAULT;

	kfree(buf);

done:
	hci_dev_put(hdev);
	return err;
}

2199
static int hci_dev_do_open(struct hci_dev *hdev)
L
Linus Torvalds 已提交
2200 2201 2202 2203 2204 2205 2206
{
	int ret = 0;

	BT_DBG("%s %p", hdev->name, hdev);

	hci_req_lock(hdev);

2207 2208 2209 2210 2211
	if (test_bit(HCI_UNREGISTER, &hdev->dev_flags)) {
		ret = -ENODEV;
		goto done;
	}

2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225
	if (!test_bit(HCI_SETUP, &hdev->dev_flags)) {
		/* Check for rfkill but allow the HCI setup stage to
		 * proceed (which in itself doesn't cause any RF activity).
		 */
		if (test_bit(HCI_RFKILLED, &hdev->dev_flags)) {
			ret = -ERFKILL;
			goto done;
		}

		/* Check for valid public address or a configured static
		 * random adddress, but let the HCI setup proceed to
		 * be able to determine if there is a public address
		 * or not.
		 *
2226 2227 2228 2229
		 * In case of user channel usage, it is not important
		 * if a public address or static random address is
		 * available.
		 *
2230 2231 2232
		 * This check is only valid for BR/EDR controllers
		 * since AMP controllers do not have an address.
		 */
2233 2234
		if (!test_bit(HCI_USER_CHANNEL, &hdev->dev_flags) &&
		    hdev->dev_type == HCI_BREDR &&
2235 2236 2237 2238 2239
		    !bacmp(&hdev->bdaddr, BDADDR_ANY) &&
		    !bacmp(&hdev->static_addr, BDADDR_ANY)) {
			ret = -EADDRNOTAVAIL;
			goto done;
		}
2240 2241
	}

L
Linus Torvalds 已提交
2242 2243 2244 2245 2246 2247 2248 2249 2250 2251
	if (test_bit(HCI_UP, &hdev->flags)) {
		ret = -EALREADY;
		goto done;
	}

	if (hdev->open(hdev)) {
		ret = -EIO;
		goto done;
	}

2252 2253 2254 2255 2256 2257 2258 2259 2260 2261
	atomic_set(&hdev->cmd_cnt, 1);
	set_bit(HCI_INIT, &hdev->flags);

	if (hdev->setup && test_bit(HCI_SETUP, &hdev->dev_flags))
		ret = hdev->setup(hdev);

	if (!ret) {
		if (test_bit(HCI_QUIRK_RAW_DEVICE, &hdev->quirks))
			set_bit(HCI_RAW, &hdev->flags);

2262 2263
		if (!test_bit(HCI_RAW, &hdev->flags) &&
		    !test_bit(HCI_USER_CHANNEL, &hdev->dev_flags))
2264
			ret = __hci_init(hdev);
L
Linus Torvalds 已提交
2265 2266
	}

2267 2268
	clear_bit(HCI_INIT, &hdev->flags);

L
Linus Torvalds 已提交
2269 2270
	if (!ret) {
		hci_dev_hold(hdev);
2271
		set_bit(HCI_RPA_EXPIRED, &hdev->dev_flags);
L
Linus Torvalds 已提交
2272 2273
		set_bit(HCI_UP, &hdev->flags);
		hci_notify(hdev, HCI_DEV_UP);
2274
		if (!test_bit(HCI_SETUP, &hdev->dev_flags) &&
2275
		    !test_bit(HCI_USER_CHANNEL, &hdev->dev_flags) &&
2276
		    hdev->dev_type == HCI_BREDR) {
2277
			hci_dev_lock(hdev);
2278
			mgmt_powered(hdev, 1);
2279
			hci_dev_unlock(hdev);
2280
		}
2281
	} else {
L
Linus Torvalds 已提交
2282
		/* Init failed, cleanup */
2283
		flush_work(&hdev->tx_work);
2284
		flush_work(&hdev->cmd_work);
2285
		flush_work(&hdev->rx_work);
L
Linus Torvalds 已提交
2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299 2300 2301 2302 2303 2304 2305 2306

		skb_queue_purge(&hdev->cmd_q);
		skb_queue_purge(&hdev->rx_q);

		if (hdev->flush)
			hdev->flush(hdev);

		if (hdev->sent_cmd) {
			kfree_skb(hdev->sent_cmd);
			hdev->sent_cmd = NULL;
		}

		hdev->close(hdev);
		hdev->flags = 0;
	}

done:
	hci_req_unlock(hdev);
	return ret;
}

2307 2308 2309 2310 2311 2312 2313 2314 2315 2316 2317
/* ---- HCI ioctl helpers ---- */

int hci_dev_open(__u16 dev)
{
	struct hci_dev *hdev;
	int err;

	hdev = hci_dev_get(dev);
	if (!hdev)
		return -ENODEV;

2318 2319 2320 2321 2322 2323 2324 2325
	/* We need to ensure that no other power on/off work is pending
	 * before proceeding to call hci_dev_do_open. This is
	 * particularly important if the setup procedure has not yet
	 * completed.
	 */
	if (test_and_clear_bit(HCI_AUTO_OFF, &hdev->dev_flags))
		cancel_delayed_work(&hdev->power_off);

2326 2327 2328 2329
	/* After this call it is guaranteed that the setup procedure
	 * has finished. This means that error conditions like RFKILL
	 * or no valid public or static random address apply.
	 */
2330 2331
	flush_workqueue(hdev->req_workqueue);

2332 2333 2334 2335 2336 2337 2338
	err = hci_dev_do_open(hdev);

	hci_dev_put(hdev);

	return err;
}

L
Linus Torvalds 已提交
2339 2340 2341 2342
static int hci_dev_do_close(struct hci_dev *hdev)
{
	BT_DBG("%s %p", hdev->name, hdev);

2343 2344
	cancel_delayed_work(&hdev->power_off);

L
Linus Torvalds 已提交
2345 2346 2347 2348
	hci_req_cancel(hdev, ENODEV);
	hci_req_lock(hdev);

	if (!test_and_clear_bit(HCI_UP, &hdev->flags)) {
2349
		del_timer_sync(&hdev->cmd_timer);
L
Linus Torvalds 已提交
2350 2351 2352 2353
		hci_req_unlock(hdev);
		return 0;
	}

2354 2355
	/* Flush RX and TX works */
	flush_work(&hdev->tx_work);
2356
	flush_work(&hdev->rx_work);
L
Linus Torvalds 已提交
2357

2358
	if (hdev->discov_timeout > 0) {
2359
		cancel_delayed_work(&hdev->discov_off);
2360
		hdev->discov_timeout = 0;
2361
		clear_bit(HCI_DISCOVERABLE, &hdev->dev_flags);
2362
		clear_bit(HCI_LIMITED_DISCOVERABLE, &hdev->dev_flags);
2363 2364
	}

2365
	if (test_and_clear_bit(HCI_SERVICE_CACHE, &hdev->dev_flags))
2366 2367
		cancel_delayed_work(&hdev->service_cache);

A
Andre Guedes 已提交
2368
	cancel_delayed_work_sync(&hdev->le_scan_disable);
2369 2370 2371

	if (test_bit(HCI_MGMT, &hdev->dev_flags))
		cancel_delayed_work_sync(&hdev->rpa_expired);
A
Andre Guedes 已提交
2372

2373
	hci_dev_lock(hdev);
2374
	hci_inquiry_cache_flush(hdev);
L
Linus Torvalds 已提交
2375
	hci_conn_hash_flush(hdev);
2376
	hci_pend_le_conns_clear(hdev);
2377
	hci_dev_unlock(hdev);
L
Linus Torvalds 已提交
2378 2379 2380 2381 2382 2383 2384 2385 2386

	hci_notify(hdev, HCI_DEV_DOWN);

	if (hdev->flush)
		hdev->flush(hdev);

	/* Reset device */
	skb_queue_purge(&hdev->cmd_q);
	atomic_set(&hdev->cmd_cnt, 1);
2387
	if (!test_bit(HCI_RAW, &hdev->flags) &&
2388
	    !test_bit(HCI_AUTO_OFF, &hdev->dev_flags) &&
2389
	    test_bit(HCI_QUIRK_RESET_ON_CLOSE, &hdev->quirks)) {
L
Linus Torvalds 已提交
2390
		set_bit(HCI_INIT, &hdev->flags);
2391
		__hci_req_sync(hdev, hci_reset_req, 0, HCI_CMD_TIMEOUT);
L
Linus Torvalds 已提交
2392 2393 2394
		clear_bit(HCI_INIT, &hdev->flags);
	}

2395 2396
	/* flush cmd  work */
	flush_work(&hdev->cmd_work);
L
Linus Torvalds 已提交
2397 2398 2399 2400 2401 2402 2403 2404

	/* Drop queues */
	skb_queue_purge(&hdev->rx_q);
	skb_queue_purge(&hdev->cmd_q);
	skb_queue_purge(&hdev->raw_q);

	/* Drop last sent command */
	if (hdev->sent_cmd) {
2405
		del_timer_sync(&hdev->cmd_timer);
L
Linus Torvalds 已提交
2406 2407 2408 2409
		kfree_skb(hdev->sent_cmd);
		hdev->sent_cmd = NULL;
	}

2410 2411 2412
	kfree_skb(hdev->recv_evt);
	hdev->recv_evt = NULL;

L
Linus Torvalds 已提交
2413 2414 2415 2416
	/* After this point our queues are empty
	 * and no tasks are scheduled. */
	hdev->close(hdev);

2417 2418 2419 2420
	/* Clear flags */
	hdev->flags = 0;
	hdev->dev_flags &= ~HCI_PERSISTENT_MASK;

2421 2422 2423 2424 2425 2426
	if (!test_and_clear_bit(HCI_AUTO_OFF, &hdev->dev_flags)) {
		if (hdev->dev_type == HCI_BREDR) {
			hci_dev_lock(hdev);
			mgmt_powered(hdev, 0);
			hci_dev_unlock(hdev);
		}
2427
	}
2428

2429
	/* Controller radio is available but is currently powered down */
2430
	hdev->amp_status = AMP_STATUS_POWERED_DOWN;
2431

2432
	memset(hdev->eir, 0, sizeof(hdev->eir));
2433
	memset(hdev->dev_class, 0, sizeof(hdev->dev_class));
2434
	bacpy(&hdev->random_addr, BDADDR_ANY);
2435

L
Linus Torvalds 已提交
2436 2437 2438 2439 2440 2441 2442 2443 2444 2445 2446
	hci_req_unlock(hdev);

	hci_dev_put(hdev);
	return 0;
}

int hci_dev_close(__u16 dev)
{
	struct hci_dev *hdev;
	int err;

A
Andrei Emeltchenko 已提交
2447 2448
	hdev = hci_dev_get(dev);
	if (!hdev)
L
Linus Torvalds 已提交
2449
		return -ENODEV;
2450

2451 2452 2453 2454 2455
	if (test_bit(HCI_USER_CHANNEL, &hdev->dev_flags)) {
		err = -EBUSY;
		goto done;
	}

2456 2457 2458
	if (test_and_clear_bit(HCI_AUTO_OFF, &hdev->dev_flags))
		cancel_delayed_work(&hdev->power_off);

L
Linus Torvalds 已提交
2459
	err = hci_dev_do_close(hdev);
2460

2461
done:
L
Linus Torvalds 已提交
2462 2463 2464 2465 2466 2467 2468 2469 2470
	hci_dev_put(hdev);
	return err;
}

int hci_dev_reset(__u16 dev)
{
	struct hci_dev *hdev;
	int ret = 0;

A
Andrei Emeltchenko 已提交
2471 2472
	hdev = hci_dev_get(dev);
	if (!hdev)
L
Linus Torvalds 已提交
2473 2474 2475 2476
		return -ENODEV;

	hci_req_lock(hdev);

2477 2478
	if (!test_bit(HCI_UP, &hdev->flags)) {
		ret = -ENETDOWN;
L
Linus Torvalds 已提交
2479
		goto done;
2480
	}
L
Linus Torvalds 已提交
2481

2482 2483 2484 2485 2486
	if (test_bit(HCI_USER_CHANNEL, &hdev->dev_flags)) {
		ret = -EBUSY;
		goto done;
	}

L
Linus Torvalds 已提交
2487 2488 2489 2490
	/* Drop queues */
	skb_queue_purge(&hdev->rx_q);
	skb_queue_purge(&hdev->cmd_q);

2491
	hci_dev_lock(hdev);
2492
	hci_inquiry_cache_flush(hdev);
L
Linus Torvalds 已提交
2493
	hci_conn_hash_flush(hdev);
2494
	hci_dev_unlock(hdev);
L
Linus Torvalds 已提交
2495 2496 2497 2498

	if (hdev->flush)
		hdev->flush(hdev);

2499
	atomic_set(&hdev->cmd_cnt, 1);
2500
	hdev->acl_cnt = 0; hdev->sco_cnt = 0; hdev->le_cnt = 0;
L
Linus Torvalds 已提交
2501 2502

	if (!test_bit(HCI_RAW, &hdev->flags))
2503
		ret = __hci_req_sync(hdev, hci_reset_req, 0, HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515

done:
	hci_req_unlock(hdev);
	hci_dev_put(hdev);
	return ret;
}

int hci_dev_reset_stat(__u16 dev)
{
	struct hci_dev *hdev;
	int ret = 0;

A
Andrei Emeltchenko 已提交
2516 2517
	hdev = hci_dev_get(dev);
	if (!hdev)
L
Linus Torvalds 已提交
2518 2519
		return -ENODEV;

2520 2521 2522 2523 2524
	if (test_bit(HCI_USER_CHANNEL, &hdev->dev_flags)) {
		ret = -EBUSY;
		goto done;
	}

L
Linus Torvalds 已提交
2525 2526
	memset(&hdev->stat, 0, sizeof(struct hci_dev_stats));

2527
done:
L
Linus Torvalds 已提交
2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540
	hci_dev_put(hdev);
	return ret;
}

int hci_dev_cmd(unsigned int cmd, void __user *arg)
{
	struct hci_dev *hdev;
	struct hci_dev_req dr;
	int err = 0;

	if (copy_from_user(&dr, arg, sizeof(dr)))
		return -EFAULT;

A
Andrei Emeltchenko 已提交
2541 2542
	hdev = hci_dev_get(dr.dev_id);
	if (!hdev)
L
Linus Torvalds 已提交
2543 2544
		return -ENODEV;

2545 2546 2547 2548 2549
	if (test_bit(HCI_USER_CHANNEL, &hdev->dev_flags)) {
		err = -EBUSY;
		goto done;
	}

2550 2551 2552 2553 2554
	if (hdev->dev_type != HCI_BREDR) {
		err = -EOPNOTSUPP;
		goto done;
	}

2555 2556 2557 2558 2559
	if (!test_bit(HCI_BREDR_ENABLED, &hdev->dev_flags)) {
		err = -EOPNOTSUPP;
		goto done;
	}

L
Linus Torvalds 已提交
2560 2561
	switch (cmd) {
	case HCISETAUTH:
2562 2563
		err = hci_req_sync(hdev, hci_auth_req, dr.dev_opt,
				   HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
2564 2565 2566 2567 2568 2569 2570 2571 2572 2573
		break;

	case HCISETENCRYPT:
		if (!lmp_encrypt_capable(hdev)) {
			err = -EOPNOTSUPP;
			break;
		}

		if (!test_bit(HCI_AUTH, &hdev->flags)) {
			/* Auth must be enabled first */
2574 2575
			err = hci_req_sync(hdev, hci_auth_req, dr.dev_opt,
					   HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
2576 2577 2578 2579
			if (err)
				break;
		}

2580 2581
		err = hci_req_sync(hdev, hci_encrypt_req, dr.dev_opt,
				   HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
2582 2583 2584
		break;

	case HCISETSCAN:
2585 2586
		err = hci_req_sync(hdev, hci_scan_req, dr.dev_opt,
				   HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
2587 2588 2589
		break;

	case HCISETLINKPOL:
2590 2591
		err = hci_req_sync(hdev, hci_linkpol_req, dr.dev_opt,
				   HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
2592 2593 2594
		break;

	case HCISETLINKMODE:
2595 2596 2597 2598 2599 2600
		hdev->link_mode = ((__u16) dr.dev_opt) &
					(HCI_LM_MASTER | HCI_LM_ACCEPT);
		break;

	case HCISETPTYPE:
		hdev->pkt_type = (__u16) dr.dev_opt;
L
Linus Torvalds 已提交
2601 2602 2603
		break;

	case HCISETACLMTU:
2604 2605
		hdev->acl_mtu  = *((__u16 *) &dr.dev_opt + 1);
		hdev->acl_pkts = *((__u16 *) &dr.dev_opt + 0);
L
Linus Torvalds 已提交
2606 2607 2608
		break;

	case HCISETSCOMTU:
2609 2610
		hdev->sco_mtu  = *((__u16 *) &dr.dev_opt + 1);
		hdev->sco_pkts = *((__u16 *) &dr.dev_opt + 0);
L
Linus Torvalds 已提交
2611 2612 2613 2614 2615 2616
		break;

	default:
		err = -EINVAL;
		break;
	}
2617

2618
done:
L
Linus Torvalds 已提交
2619 2620 2621 2622 2623 2624
	hci_dev_put(hdev);
	return err;
}

int hci_get_dev_list(void __user *arg)
{
2625
	struct hci_dev *hdev;
L
Linus Torvalds 已提交
2626 2627 2628 2629 2630 2631 2632 2633 2634 2635 2636 2637 2638
	struct hci_dev_list_req *dl;
	struct hci_dev_req *dr;
	int n = 0, size, err;
	__u16 dev_num;

	if (get_user(dev_num, (__u16 __user *) arg))
		return -EFAULT;

	if (!dev_num || dev_num > (PAGE_SIZE * 2) / sizeof(*dr))
		return -EINVAL;

	size = sizeof(*dl) + dev_num * sizeof(*dr);

A
Andrei Emeltchenko 已提交
2639 2640
	dl = kzalloc(size, GFP_KERNEL);
	if (!dl)
L
Linus Torvalds 已提交
2641 2642 2643 2644
		return -ENOMEM;

	dr = dl->dev_req;

2645
	read_lock(&hci_dev_list_lock);
2646
	list_for_each_entry(hdev, &hci_dev_list, list) {
2647
		if (test_and_clear_bit(HCI_AUTO_OFF, &hdev->dev_flags))
2648
			cancel_delayed_work(&hdev->power_off);
2649

2650 2651
		if (!test_bit(HCI_MGMT, &hdev->dev_flags))
			set_bit(HCI_PAIRABLE, &hdev->dev_flags);
2652

L
Linus Torvalds 已提交
2653 2654
		(dr + n)->dev_id  = hdev->id;
		(dr + n)->dev_opt = hdev->flags;
2655

L
Linus Torvalds 已提交
2656 2657 2658
		if (++n >= dev_num)
			break;
	}
2659
	read_unlock(&hci_dev_list_lock);
L
Linus Torvalds 已提交
2660 2661 2662 2663 2664 2665 2666 2667 2668 2669 2670 2671 2672 2673 2674 2675 2676 2677 2678

	dl->dev_num = n;
	size = sizeof(*dl) + n * sizeof(*dr);

	err = copy_to_user(arg, dl, size);
	kfree(dl);

	return err ? -EFAULT : 0;
}

int hci_get_dev_info(void __user *arg)
{
	struct hci_dev *hdev;
	struct hci_dev_info di;
	int err = 0;

	if (copy_from_user(&di, arg, sizeof(di)))
		return -EFAULT;

A
Andrei Emeltchenko 已提交
2679 2680
	hdev = hci_dev_get(di.dev_id);
	if (!hdev)
L
Linus Torvalds 已提交
2681 2682
		return -ENODEV;

2683
	if (test_and_clear_bit(HCI_AUTO_OFF, &hdev->dev_flags))
2684
		cancel_delayed_work_sync(&hdev->power_off);
2685

2686 2687
	if (!test_bit(HCI_MGMT, &hdev->dev_flags))
		set_bit(HCI_PAIRABLE, &hdev->dev_flags);
2688

L
Linus Torvalds 已提交
2689 2690
	strcpy(di.name, hdev->name);
	di.bdaddr   = hdev->bdaddr;
2691
	di.type     = (hdev->bus & 0x0f) | ((hdev->dev_type & 0x03) << 4);
L
Linus Torvalds 已提交
2692 2693
	di.flags    = hdev->flags;
	di.pkt_type = hdev->pkt_type;
2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704
	if (lmp_bredr_capable(hdev)) {
		di.acl_mtu  = hdev->acl_mtu;
		di.acl_pkts = hdev->acl_pkts;
		di.sco_mtu  = hdev->sco_mtu;
		di.sco_pkts = hdev->sco_pkts;
	} else {
		di.acl_mtu  = hdev->le_mtu;
		di.acl_pkts = hdev->le_pkts;
		di.sco_mtu  = 0;
		di.sco_pkts = 0;
	}
L
Linus Torvalds 已提交
2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718 2719 2720
	di.link_policy = hdev->link_policy;
	di.link_mode   = hdev->link_mode;

	memcpy(&di.stat, &hdev->stat, sizeof(di.stat));
	memcpy(&di.features, &hdev->features, sizeof(di.features));

	if (copy_to_user(arg, &di, sizeof(di)))
		err = -EFAULT;

	hci_dev_put(hdev);

	return err;
}

/* ---- Interface to HCI drivers ---- */

2721 2722 2723 2724 2725 2726
static int hci_rfkill_set_block(void *data, bool blocked)
{
	struct hci_dev *hdev = data;

	BT_DBG("%p name %s blocked %d", hdev, hdev->name, blocked);

2727 2728 2729
	if (test_bit(HCI_USER_CHANNEL, &hdev->dev_flags))
		return -EBUSY;

2730 2731
	if (blocked) {
		set_bit(HCI_RFKILLED, &hdev->dev_flags);
2732 2733
		if (!test_bit(HCI_SETUP, &hdev->dev_flags))
			hci_dev_do_close(hdev);
2734 2735
	} else {
		clear_bit(HCI_RFKILLED, &hdev->dev_flags);
2736
	}
2737 2738 2739 2740 2741 2742 2743 2744

	return 0;
}

static const struct rfkill_ops hci_rfkill_ops = {
	.set_block = hci_rfkill_set_block,
};

2745 2746 2747
static void hci_power_on(struct work_struct *work)
{
	struct hci_dev *hdev = container_of(work, struct hci_dev, power_on);
2748
	int err;
2749 2750 2751

	BT_DBG("%s", hdev->name);

2752
	err = hci_dev_do_open(hdev);
2753 2754
	if (err < 0) {
		mgmt_set_powered_failed(hdev, err);
2755
		return;
2756
	}
2757

2758 2759 2760 2761 2762 2763 2764 2765
	/* During the HCI setup phase, a few error conditions are
	 * ignored and they need to be checked now. If they are still
	 * valid, it is important to turn the device back off.
	 */
	if (test_bit(HCI_RFKILLED, &hdev->dev_flags) ||
	    (hdev->dev_type == HCI_BREDR &&
	     !bacmp(&hdev->bdaddr, BDADDR_ANY) &&
	     !bacmp(&hdev->static_addr, BDADDR_ANY))) {
2766 2767 2768
		clear_bit(HCI_AUTO_OFF, &hdev->dev_flags);
		hci_dev_do_close(hdev);
	} else if (test_bit(HCI_AUTO_OFF, &hdev->dev_flags)) {
2769 2770
		queue_delayed_work(hdev->req_workqueue, &hdev->power_off,
				   HCI_AUTO_OFF_TIMEOUT);
2771
	}
2772

2773
	if (test_and_clear_bit(HCI_SETUP, &hdev->dev_flags))
2774
		mgmt_index_added(hdev);
2775 2776 2777 2778
}

static void hci_power_off(struct work_struct *work)
{
2779
	struct hci_dev *hdev = container_of(work, struct hci_dev,
2780
					    power_off.work);
2781 2782 2783

	BT_DBG("%s", hdev->name);

2784
	hci_dev_do_close(hdev);
2785 2786
}

2787 2788 2789 2790 2791 2792 2793 2794
static void hci_discov_off(struct work_struct *work)
{
	struct hci_dev *hdev;

	hdev = container_of(work, struct hci_dev, discov_off.work);

	BT_DBG("%s", hdev->name);

2795
	mgmt_discoverable_timeout(hdev);
2796 2797
}

2798
void hci_uuids_clear(struct hci_dev *hdev)
2799
{
2800
	struct bt_uuid *uuid, *tmp;
2801

2802 2803
	list_for_each_entry_safe(uuid, tmp, &hdev->uuids, list) {
		list_del(&uuid->list);
2804 2805 2806 2807
		kfree(uuid);
	}
}

2808
void hci_link_keys_clear(struct hci_dev *hdev)
2809 2810 2811 2812 2813 2814 2815 2816 2817 2818 2819 2820 2821
{
	struct list_head *p, *n;

	list_for_each_safe(p, n, &hdev->link_keys) {
		struct link_key *key;

		key = list_entry(p, struct link_key, list);

		list_del(p);
		kfree(key);
	}
}

2822
void hci_smp_ltks_clear(struct hci_dev *hdev)
2823 2824 2825 2826 2827 2828 2829 2830 2831
{
	struct smp_ltk *k, *tmp;

	list_for_each_entry_safe(k, tmp, &hdev->long_term_keys, list) {
		list_del(&k->list);
		kfree(k);
	}
}

2832 2833 2834 2835 2836 2837 2838 2839 2840 2841
void hci_smp_irks_clear(struct hci_dev *hdev)
{
	struct smp_irk *k, *tmp;

	list_for_each_entry_safe(k, tmp, &hdev->identity_resolving_keys, list) {
		list_del(&k->list);
		kfree(k);
	}
}

2842 2843
struct link_key *hci_find_link_key(struct hci_dev *hdev, bdaddr_t *bdaddr)
{
2844
	struct link_key *k;
2845

2846
	list_for_each_entry(k, &hdev->link_keys, list)
2847 2848 2849 2850 2851 2852
		if (bacmp(bdaddr, &k->bdaddr) == 0)
			return k;

	return NULL;
}

2853
static bool hci_persistent_key(struct hci_dev *hdev, struct hci_conn *conn,
2854
			       u8 key_type, u8 old_key_type)
2855 2856 2857
{
	/* Legacy key */
	if (key_type < 0x03)
2858
		return true;
2859 2860 2861

	/* Debug keys are insecure so don't store them persistently */
	if (key_type == HCI_LK_DEBUG_COMBINATION)
2862
		return false;
2863 2864 2865

	/* Changed combination key and there's no previous one */
	if (key_type == HCI_LK_CHANGED_COMBINATION && old_key_type == 0xff)
2866
		return false;
2867 2868 2869

	/* Security mode 3 case */
	if (!conn)
2870
		return true;
2871 2872 2873

	/* Neither local nor remote side had no-bonding as requirement */
	if (conn->auth_type > 0x01 && conn->remote_auth > 0x01)
2874
		return true;
2875 2876 2877

	/* Local side had dedicated bonding as requirement */
	if (conn->auth_type == 0x02 || conn->auth_type == 0x03)
2878
		return true;
2879 2880 2881

	/* Remote side had dedicated bonding as requirement */
	if (conn->remote_auth == 0x02 || conn->remote_auth == 0x03)
2882
		return true;
2883 2884 2885

	/* If none of the above criteria match, then don't store the key
	 * persistently */
2886
	return false;
2887 2888
}

2889 2890 2891 2892 2893 2894 2895 2896 2897 2898
static bool ltk_type_master(u8 type)
{
	if (type == HCI_SMP_STK || type == HCI_SMP_LTK)
		return true;

	return false;
}

struct smp_ltk *hci_find_ltk(struct hci_dev *hdev, __le16 ediv, u8 rand[8],
			     bool master)
2899
{
2900
	struct smp_ltk *k;
2901

2902 2903
	list_for_each_entry(k, &hdev->long_term_keys, list) {
		if (k->ediv != ediv ||
2904
		    memcmp(rand, k->rand, sizeof(k->rand)))
2905 2906
			continue;

2907 2908 2909
		if (ltk_type_master(k->type) != master)
			continue;

2910
		return k;
2911 2912 2913 2914 2915
	}

	return NULL;
}

2916
struct smp_ltk *hci_find_ltk_by_addr(struct hci_dev *hdev, bdaddr_t *bdaddr,
2917
				     u8 addr_type, bool master)
2918
{
2919
	struct smp_ltk *k;
2920

2921 2922
	list_for_each_entry(k, &hdev->long_term_keys, list)
		if (addr_type == k->bdaddr_type &&
2923 2924
		    bacmp(bdaddr, &k->bdaddr) == 0 &&
		    ltk_type_master(k->type) == master)
2925 2926 2927 2928 2929
			return k;

	return NULL;
}

2930 2931 2932 2933 2934 2935 2936 2937 2938 2939 2940 2941 2942 2943 2944 2945 2946 2947 2948 2949 2950 2951 2952 2953
struct smp_irk *hci_find_irk_by_rpa(struct hci_dev *hdev, bdaddr_t *rpa)
{
	struct smp_irk *irk;

	list_for_each_entry(irk, &hdev->identity_resolving_keys, list) {
		if (!bacmp(&irk->rpa, rpa))
			return irk;
	}

	list_for_each_entry(irk, &hdev->identity_resolving_keys, list) {
		if (smp_irk_matches(hdev->tfm_aes, irk->val, rpa)) {
			bacpy(&irk->rpa, rpa);
			return irk;
		}
	}

	return NULL;
}

struct smp_irk *hci_find_irk_by_addr(struct hci_dev *hdev, bdaddr_t *bdaddr,
				     u8 addr_type)
{
	struct smp_irk *irk;

2954 2955 2956 2957
	/* Identity Address must be public or static random */
	if (addr_type == ADDR_LE_DEV_RANDOM && (bdaddr->b[5] & 0xc0) != 0xc0)
		return NULL;

2958 2959 2960 2961 2962 2963 2964 2965 2966
	list_for_each_entry(irk, &hdev->identity_resolving_keys, list) {
		if (addr_type == irk->addr_type &&
		    bacmp(bdaddr, &irk->bdaddr) == 0)
			return irk;
	}

	return NULL;
}

2967
int hci_add_link_key(struct hci_dev *hdev, struct hci_conn *conn, int new_key,
2968
		     bdaddr_t *bdaddr, u8 *val, u8 type, u8 pin_len)
2969 2970
{
	struct link_key *key, *old_key;
2971 2972
	u8 old_key_type;
	bool persistent;
2973 2974 2975 2976 2977 2978

	old_key = hci_find_link_key(hdev, bdaddr);
	if (old_key) {
		old_key_type = old_key->type;
		key = old_key;
	} else {
2979
		old_key_type = conn ? conn->key_type : 0xff;
2980
		key = kzalloc(sizeof(*key), GFP_KERNEL);
2981 2982 2983 2984 2985
		if (!key)
			return -ENOMEM;
		list_add(&key->list, &hdev->link_keys);
	}

2986
	BT_DBG("%s key for %pMR type %u", hdev->name, bdaddr, type);
2987

2988 2989 2990 2991
	/* Some buggy controller combinations generate a changed
	 * combination key for legacy pairing even when there's no
	 * previous key */
	if (type == HCI_LK_CHANGED_COMBINATION &&
2992
	    (!conn || conn->remote_auth == 0xff) && old_key_type == 0xff) {
2993
		type = HCI_LK_COMBINATION;
2994 2995 2996
		if (conn)
			conn->key_type = type;
	}
2997

2998
	bacpy(&key->bdaddr, bdaddr);
2999
	memcpy(key->val, val, HCI_LINK_KEY_SIZE);
3000 3001
	key->pin_len = pin_len;

3002
	if (type == HCI_LK_CHANGED_COMBINATION)
3003
		key->type = old_key_type;
3004 3005 3006
	else
		key->type = type;

3007 3008 3009 3010 3011
	if (!new_key)
		return 0;

	persistent = hci_persistent_key(hdev, conn, type, old_key_type);

3012
	mgmt_new_link_key(hdev, key, persistent);
3013

3014 3015
	if (conn)
		conn->flush_key = !persistent;
3016 3017 3018 3019

	return 0;
}

3020
struct smp_ltk *hci_add_ltk(struct hci_dev *hdev, bdaddr_t *bdaddr,
3021 3022
			    u8 addr_type, u8 type, u8 authenticated,
			    u8 tk[16], u8 enc_size, __le16 ediv, u8 rand[8])
3023
{
3024
	struct smp_ltk *key, *old_key;
3025
	bool master = ltk_type_master(type);
3026

3027
	old_key = hci_find_ltk_by_addr(hdev, bdaddr, addr_type, master);
3028
	if (old_key)
3029
		key = old_key;
3030
	else {
3031
		key = kzalloc(sizeof(*key), GFP_KERNEL);
3032
		if (!key)
3033
			return NULL;
3034
		list_add(&key->list, &hdev->long_term_keys);
3035 3036 3037
	}

	bacpy(&key->bdaddr, bdaddr);
3038 3039 3040 3041 3042 3043 3044
	key->bdaddr_type = addr_type;
	memcpy(key->val, tk, sizeof(key->val));
	key->authenticated = authenticated;
	key->ediv = ediv;
	key->enc_size = enc_size;
	key->type = type;
	memcpy(key->rand, rand, sizeof(key->rand));
3045

3046
	return key;
3047 3048
}

3049 3050
struct smp_irk *hci_add_irk(struct hci_dev *hdev, bdaddr_t *bdaddr,
			    u8 addr_type, u8 val[16], bdaddr_t *rpa)
3051 3052 3053 3054 3055 3056 3057
{
	struct smp_irk *irk;

	irk = hci_find_irk_by_addr(hdev, bdaddr, addr_type);
	if (!irk) {
		irk = kzalloc(sizeof(*irk), GFP_KERNEL);
		if (!irk)
3058
			return NULL;
3059 3060 3061 3062 3063 3064 3065 3066 3067 3068

		bacpy(&irk->bdaddr, bdaddr);
		irk->addr_type = addr_type;

		list_add(&irk->list, &hdev->identity_resolving_keys);
	}

	memcpy(irk->val, val, 16);
	bacpy(&irk->rpa, rpa);

3069
	return irk;
3070 3071
}

3072 3073 3074 3075 3076 3077 3078 3079
int hci_remove_link_key(struct hci_dev *hdev, bdaddr_t *bdaddr)
{
	struct link_key *key;

	key = hci_find_link_key(hdev, bdaddr);
	if (!key)
		return -ENOENT;

3080
	BT_DBG("%s removing %pMR", hdev->name, bdaddr);
3081 3082 3083 3084 3085 3086 3087

	list_del(&key->list);
	kfree(key);

	return 0;
}

3088
int hci_remove_ltk(struct hci_dev *hdev, bdaddr_t *bdaddr, u8 bdaddr_type)
3089 3090
{
	struct smp_ltk *k, *tmp;
3091
	int removed = 0;
3092 3093

	list_for_each_entry_safe(k, tmp, &hdev->long_term_keys, list) {
3094
		if (bacmp(bdaddr, &k->bdaddr) || k->bdaddr_type != bdaddr_type)
3095 3096
			continue;

3097
		BT_DBG("%s removing %pMR", hdev->name, bdaddr);
3098 3099 3100

		list_del(&k->list);
		kfree(k);
3101
		removed++;
3102 3103
	}

3104
	return removed ? 0 : -ENOENT;
3105 3106
}

3107 3108 3109 3110
void hci_remove_irk(struct hci_dev *hdev, bdaddr_t *bdaddr, u8 addr_type)
{
	struct smp_irk *k, *tmp;

3111
	list_for_each_entry_safe(k, tmp, &hdev->identity_resolving_keys, list) {
3112 3113 3114 3115 3116 3117 3118 3119 3120 3121
		if (bacmp(bdaddr, &k->bdaddr) || k->addr_type != addr_type)
			continue;

		BT_DBG("%s removing %pMR", hdev->name, bdaddr);

		list_del(&k->list);
		kfree(k);
	}
}

3122
/* HCI command timer function */
3123
static void hci_cmd_timeout(unsigned long arg)
3124 3125 3126
{
	struct hci_dev *hdev = (void *) arg;

3127 3128 3129 3130 3131 3132 3133 3134 3135
	if (hdev->sent_cmd) {
		struct hci_command_hdr *sent = (void *) hdev->sent_cmd->data;
		u16 opcode = __le16_to_cpu(sent->opcode);

		BT_ERR("%s command 0x%4.4x tx timeout", hdev->name, opcode);
	} else {
		BT_ERR("%s command tx timeout", hdev->name);
	}

3136
	atomic_set(&hdev->cmd_cnt, 1);
3137
	queue_work(hdev->workqueue, &hdev->cmd_work);
3138 3139
}

3140
struct oob_data *hci_find_remote_oob_data(struct hci_dev *hdev,
3141
					  bdaddr_t *bdaddr)
3142 3143 3144 3145 3146 3147 3148 3149 3150 3151 3152 3153 3154 3155 3156 3157 3158 3159
{
	struct oob_data *data;

	list_for_each_entry(data, &hdev->remote_oob_data, list)
		if (bacmp(bdaddr, &data->bdaddr) == 0)
			return data;

	return NULL;
}

int hci_remove_remote_oob_data(struct hci_dev *hdev, bdaddr_t *bdaddr)
{
	struct oob_data *data;

	data = hci_find_remote_oob_data(hdev, bdaddr);
	if (!data)
		return -ENOENT;

3160
	BT_DBG("%s removing %pMR", hdev->name, bdaddr);
3161 3162 3163 3164 3165 3166 3167

	list_del(&data->list);
	kfree(data);

	return 0;
}

3168
void hci_remote_oob_data_clear(struct hci_dev *hdev)
3169 3170 3171 3172 3173 3174 3175 3176 3177
{
	struct oob_data *data, *n;

	list_for_each_entry_safe(data, n, &hdev->remote_oob_data, list) {
		list_del(&data->list);
		kfree(data);
	}
}

3178 3179
int hci_add_remote_oob_data(struct hci_dev *hdev, bdaddr_t *bdaddr,
			    u8 *hash, u8 *randomizer)
3180 3181 3182 3183 3184
{
	struct oob_data *data;

	data = hci_find_remote_oob_data(hdev, bdaddr);
	if (!data) {
3185
		data = kmalloc(sizeof(*data), GFP_KERNEL);
3186 3187 3188 3189 3190 3191 3192
		if (!data)
			return -ENOMEM;

		bacpy(&data->bdaddr, bdaddr);
		list_add(&data->list, &hdev->remote_oob_data);
	}

3193 3194
	memcpy(data->hash192, hash, sizeof(data->hash192));
	memcpy(data->randomizer192, randomizer, sizeof(data->randomizer192));
3195

3196 3197 3198 3199 3200 3201 3202 3203 3204 3205 3206 3207 3208 3209 3210 3211
	memset(data->hash256, 0, sizeof(data->hash256));
	memset(data->randomizer256, 0, sizeof(data->randomizer256));

	BT_DBG("%s for %pMR", hdev->name, bdaddr);

	return 0;
}

int hci_add_remote_oob_ext_data(struct hci_dev *hdev, bdaddr_t *bdaddr,
				u8 *hash192, u8 *randomizer192,
				u8 *hash256, u8 *randomizer256)
{
	struct oob_data *data;

	data = hci_find_remote_oob_data(hdev, bdaddr);
	if (!data) {
3212
		data = kmalloc(sizeof(*data), GFP_KERNEL);
3213 3214 3215 3216 3217 3218 3219 3220 3221 3222 3223 3224 3225
		if (!data)
			return -ENOMEM;

		bacpy(&data->bdaddr, bdaddr);
		list_add(&data->list, &hdev->remote_oob_data);
	}

	memcpy(data->hash192, hash192, sizeof(data->hash192));
	memcpy(data->randomizer192, randomizer192, sizeof(data->randomizer192));

	memcpy(data->hash256, hash256, sizeof(data->hash256));
	memcpy(data->randomizer256, randomizer256, sizeof(data->randomizer256));

3226
	BT_DBG("%s for %pMR", hdev->name, bdaddr);
3227 3228 3229 3230

	return 0;
}

3231 3232
struct bdaddr_list *hci_blacklist_lookup(struct hci_dev *hdev,
					 bdaddr_t *bdaddr, u8 type)
3233
{
3234
	struct bdaddr_list *b;
3235

3236 3237
	list_for_each_entry(b, &hdev->blacklist, list) {
		if (!bacmp(&b->bdaddr, bdaddr) && b->bdaddr_type == type)
3238
			return b;
3239
	}
3240 3241 3242 3243

	return NULL;
}

3244
static void hci_blacklist_clear(struct hci_dev *hdev)
3245 3246 3247 3248
{
	struct list_head *p, *n;

	list_for_each_safe(p, n, &hdev->blacklist) {
3249
		struct bdaddr_list *b = list_entry(p, struct bdaddr_list, list);
3250 3251 3252 3253 3254 3255

		list_del(p);
		kfree(b);
	}
}

3256
int hci_blacklist_add(struct hci_dev *hdev, bdaddr_t *bdaddr, u8 type)
3257 3258 3259
{
	struct bdaddr_list *entry;

3260
	if (!bacmp(bdaddr, BDADDR_ANY))
3261 3262
		return -EBADF;

3263
	if (hci_blacklist_lookup(hdev, bdaddr, type))
3264
		return -EEXIST;
3265 3266

	entry = kzalloc(sizeof(struct bdaddr_list), GFP_KERNEL);
3267 3268
	if (!entry)
		return -ENOMEM;
3269 3270

	bacpy(&entry->bdaddr, bdaddr);
3271
	entry->bdaddr_type = type;
3272 3273 3274

	list_add(&entry->list, &hdev->blacklist);

3275
	return mgmt_device_blocked(hdev, bdaddr, type);
3276 3277
}

3278
int hci_blacklist_del(struct hci_dev *hdev, bdaddr_t *bdaddr, u8 type)
3279 3280 3281
{
	struct bdaddr_list *entry;

3282 3283 3284 3285
	if (!bacmp(bdaddr, BDADDR_ANY)) {
		hci_blacklist_clear(hdev);
		return 0;
	}
3286

3287
	entry = hci_blacklist_lookup(hdev, bdaddr, type);
3288
	if (!entry)
3289
		return -ENOENT;
3290 3291 3292 3293

	list_del(&entry->list);
	kfree(entry);

3294
	return mgmt_device_unblocked(hdev, bdaddr, type);
3295 3296
}

3297 3298 3299 3300 3301 3302 3303 3304 3305 3306 3307 3308 3309 3310 3311 3312
/* This function requires the caller holds hdev->lock */
struct hci_conn_params *hci_conn_params_lookup(struct hci_dev *hdev,
					       bdaddr_t *addr, u8 addr_type)
{
	struct hci_conn_params *params;

	list_for_each_entry(params, &hdev->le_conn_params, list) {
		if (bacmp(&params->addr, addr) == 0 &&
		    params->addr_type == addr_type) {
			return params;
		}
	}

	return NULL;
}

3313 3314 3315 3316 3317 3318 3319 3320 3321 3322 3323 3324 3325 3326 3327 3328 3329
static bool is_connected(struct hci_dev *hdev, bdaddr_t *addr, u8 type)
{
	struct hci_conn *conn;

	conn = hci_conn_hash_lookup_ba(hdev, LE_LINK, addr);
	if (!conn)
		return false;

	if (conn->dst_type != type)
		return false;

	if (conn->state != BT_CONNECTED)
		return false;

	return true;
}

3330 3331 3332 3333 3334 3335 3336 3337 3338 3339 3340 3341
static bool is_identity_address(bdaddr_t *addr, u8 addr_type)
{
	if (addr_type == ADDR_LE_DEV_PUBLIC)
		return true;

	/* Check for Random Static address type */
	if ((addr->b[5] & 0xc0) == 0xc0)
		return true;

	return false;
}

3342
/* This function requires the caller holds hdev->lock */
3343 3344 3345
int hci_conn_params_add(struct hci_dev *hdev, bdaddr_t *addr, u8 addr_type,
			u8 auto_connect, u16 conn_min_interval,
			u16 conn_max_interval)
3346 3347 3348
{
	struct hci_conn_params *params;

3349 3350 3351
	if (!is_identity_address(addr, addr_type))
		return -EINVAL;

3352
	params = hci_conn_params_lookup(hdev, addr, addr_type);
3353 3354
	if (params)
		goto update;
3355 3356 3357 3358

	params = kzalloc(sizeof(*params), GFP_KERNEL);
	if (!params) {
		BT_ERR("Out of memory");
3359
		return -ENOMEM;
3360 3361 3362 3363
	}

	bacpy(&params->addr, addr);
	params->addr_type = addr_type;
3364 3365 3366 3367

	list_add(&params->list, &hdev->le_conn_params);

update:
3368 3369
	params->conn_min_interval = conn_min_interval;
	params->conn_max_interval = conn_max_interval;
3370
	params->auto_connect = auto_connect;
3371

3372 3373 3374 3375 3376 3377 3378 3379 3380 3381
	switch (auto_connect) {
	case HCI_AUTO_CONN_DISABLED:
	case HCI_AUTO_CONN_LINK_LOSS:
		hci_pend_le_conn_del(hdev, addr, addr_type);
		break;
	case HCI_AUTO_CONN_ALWAYS:
		if (!is_connected(hdev, addr, addr_type))
			hci_pend_le_conn_add(hdev, addr, addr_type);
		break;
	}
3382

3383 3384 3385
	BT_DBG("addr %pMR (type %u) auto_connect %u conn_min_interval 0x%.4x "
	       "conn_max_interval 0x%.4x", addr, addr_type, auto_connect,
	       conn_min_interval, conn_max_interval);
3386 3387

	return 0;
3388 3389 3390 3391 3392 3393 3394 3395 3396 3397 3398
}

/* This function requires the caller holds hdev->lock */
void hci_conn_params_del(struct hci_dev *hdev, bdaddr_t *addr, u8 addr_type)
{
	struct hci_conn_params *params;

	params = hci_conn_params_lookup(hdev, addr, addr_type);
	if (!params)
		return;

3399 3400
	hci_pend_le_conn_del(hdev, addr, addr_type);

3401 3402 3403 3404 3405 3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416 3417 3418 3419
	list_del(&params->list);
	kfree(params);

	BT_DBG("addr %pMR (type %u)", addr, addr_type);
}

/* This function requires the caller holds hdev->lock */
void hci_conn_params_clear(struct hci_dev *hdev)
{
	struct hci_conn_params *params, *tmp;

	list_for_each_entry_safe(params, tmp, &hdev->le_conn_params, list) {
		list_del(&params->list);
		kfree(params);
	}

	BT_DBG("All LE connection parameters were removed");
}

3420 3421 3422 3423 3424 3425 3426 3427 3428 3429 3430 3431 3432 3433 3434 3435 3436 3437 3438 3439 3440 3441
/* This function requires the caller holds hdev->lock */
struct bdaddr_list *hci_pend_le_conn_lookup(struct hci_dev *hdev,
					    bdaddr_t *addr, u8 addr_type)
{
	struct bdaddr_list *entry;

	list_for_each_entry(entry, &hdev->pend_le_conns, list) {
		if (bacmp(&entry->bdaddr, addr) == 0 &&
		    entry->bdaddr_type == addr_type)
			return entry;
	}

	return NULL;
}

/* This function requires the caller holds hdev->lock */
void hci_pend_le_conn_add(struct hci_dev *hdev, bdaddr_t *addr, u8 addr_type)
{
	struct bdaddr_list *entry;

	entry = hci_pend_le_conn_lookup(hdev, addr, addr_type);
	if (entry)
3442
		goto done;
3443 3444 3445 3446 3447 3448 3449 3450 3451 3452 3453 3454 3455

	entry = kzalloc(sizeof(*entry), GFP_KERNEL);
	if (!entry) {
		BT_ERR("Out of memory");
		return;
	}

	bacpy(&entry->bdaddr, addr);
	entry->bdaddr_type = addr_type;

	list_add(&entry->list, &hdev->pend_le_conns);

	BT_DBG("addr %pMR (type %u)", addr, addr_type);
3456 3457 3458

done:
	hci_update_background_scan(hdev);
3459 3460 3461 3462 3463 3464 3465 3466 3467
}

/* This function requires the caller holds hdev->lock */
void hci_pend_le_conn_del(struct hci_dev *hdev, bdaddr_t *addr, u8 addr_type)
{
	struct bdaddr_list *entry;

	entry = hci_pend_le_conn_lookup(hdev, addr, addr_type);
	if (!entry)
3468
		goto done;
3469 3470 3471 3472 3473

	list_del(&entry->list);
	kfree(entry);

	BT_DBG("addr %pMR (type %u)", addr, addr_type);
3474 3475 3476

done:
	hci_update_background_scan(hdev);
3477 3478 3479 3480 3481 3482 3483 3484 3485 3486 3487 3488 3489 3490 3491
}

/* This function requires the caller holds hdev->lock */
void hci_pend_le_conns_clear(struct hci_dev *hdev)
{
	struct bdaddr_list *entry, *tmp;

	list_for_each_entry_safe(entry, tmp, &hdev->pend_le_conns, list) {
		list_del(&entry->list);
		kfree(entry);
	}

	BT_DBG("All LE pending connections cleared");
}

3492
static void inquiry_complete(struct hci_dev *hdev, u8 status)
A
Andre Guedes 已提交
3493
{
3494 3495
	if (status) {
		BT_ERR("Failed to start inquiry: status %d", status);
A
Andre Guedes 已提交
3496

3497 3498 3499 3500 3501
		hci_dev_lock(hdev);
		hci_discovery_set_state(hdev, DISCOVERY_STOPPED);
		hci_dev_unlock(hdev);
		return;
	}
A
Andre Guedes 已提交
3502 3503
}

3504
static void le_scan_disable_work_complete(struct hci_dev *hdev, u8 status)
A
Andre Guedes 已提交
3505
{
3506 3507 3508 3509
	/* General inquiry access code (GIAC) */
	u8 lap[3] = { 0x33, 0x8b, 0x9e };
	struct hci_request req;
	struct hci_cp_inquiry cp;
A
Andre Guedes 已提交
3510 3511
	int err;

3512 3513 3514 3515
	if (status) {
		BT_ERR("Failed to disable LE scanning: status %d", status);
		return;
	}
A
Andre Guedes 已提交
3516

3517 3518 3519 3520 3521 3522
	switch (hdev->discovery.type) {
	case DISCOV_TYPE_LE:
		hci_dev_lock(hdev);
		hci_discovery_set_state(hdev, DISCOVERY_STOPPED);
		hci_dev_unlock(hdev);
		break;
A
Andre Guedes 已提交
3523

3524 3525
	case DISCOV_TYPE_INTERLEAVED:
		hci_req_init(&req, hdev);
A
Andre Guedes 已提交
3526

3527 3528 3529 3530
		memset(&cp, 0, sizeof(cp));
		memcpy(&cp.lap, lap, sizeof(cp.lap));
		cp.length = DISCOV_INTERLEAVED_INQUIRY_LEN;
		hci_req_add(&req, HCI_OP_INQUIRY, sizeof(cp), &cp);
A
Andre Guedes 已提交
3531

3532
		hci_dev_lock(hdev);
3533

3534
		hci_inquiry_cache_flush(hdev);
3535

3536 3537 3538 3539 3540
		err = hci_req_run(&req, inquiry_complete);
		if (err) {
			BT_ERR("Inquiry request failed: err %d", err);
			hci_discovery_set_state(hdev, DISCOVERY_STOPPED);
		}
3541

3542 3543
		hci_dev_unlock(hdev);
		break;
3544 3545 3546
	}
}

A
Andre Guedes 已提交
3547 3548 3549
static void le_scan_disable_work(struct work_struct *work)
{
	struct hci_dev *hdev = container_of(work, struct hci_dev,
3550
					    le_scan_disable.work);
3551 3552
	struct hci_request req;
	int err;
A
Andre Guedes 已提交
3553 3554 3555

	BT_DBG("%s", hdev->name);

3556
	hci_req_init(&req, hdev);
A
Andre Guedes 已提交
3557

3558
	hci_req_add_le_scan_disable(&req);
A
Andre Guedes 已提交
3559

3560 3561 3562
	err = hci_req_run(&req, le_scan_disable_work_complete);
	if (err)
		BT_ERR("Disable LE scanning request failed: err %d", err);
A
Andre Guedes 已提交
3563 3564
}

3565 3566
int hci_update_random_address(struct hci_request *req, bool require_privacy,
			      u8 *own_addr_type)
3567 3568 3569 3570 3571
{
	struct hci_dev *hdev = req->hdev;
	int err;

	/* If privacy is enabled use a resolvable private address. If
3572 3573
	 * current RPA has expired or there is something else than
	 * the current RPA in use, then generate a new one.
3574 3575 3576 3577 3578 3579 3580
	 */
	if (test_bit(HCI_PRIVACY, &hdev->dev_flags)) {
		int to;

		*own_addr_type = ADDR_LE_DEV_RANDOM;

		if (!test_and_clear_bit(HCI_RPA_EXPIRED, &hdev->dev_flags) &&
3581
		    !bacmp(&hdev->random_addr, &hdev->rpa))
3582 3583
			return 0;

3584
		err = smp_generate_rpa(hdev->tfm_aes, hdev->irk, &hdev->rpa);
3585 3586 3587 3588 3589
		if (err < 0) {
			BT_ERR("%s failed to generate new RPA", hdev->name);
			return err;
		}

3590
		hci_req_add(req, HCI_OP_LE_SET_RANDOM_ADDR, 6, &hdev->rpa);
3591 3592 3593 3594 3595

		to = msecs_to_jiffies(hdev->rpa_timeout * 1000);
		queue_delayed_work(hdev->workqueue, &hdev->rpa_expired, to);

		return 0;
3596 3597 3598 3599 3600 3601 3602 3603 3604 3605 3606 3607 3608 3609 3610
	}

	/* In case of required privacy without resolvable private address,
	 * use an unresolvable private address. This is useful for active
	 * scanning and non-connectable advertising.
	 */
	if (require_privacy) {
		bdaddr_t urpa;

		get_random_bytes(&urpa, 6);
		urpa.b[5] &= 0x3f;	/* Clear two most significant bits */

		*own_addr_type = ADDR_LE_DEV_RANDOM;
		hci_req_add(req, HCI_OP_LE_SET_RANDOM_ADDR, 6, &urpa);
		return 0;
3611 3612 3613 3614 3615 3616 3617 3618 3619 3620 3621 3622 3623 3624 3625 3626 3627 3628 3629 3630 3631 3632 3633 3634
	}

	/* If forcing static address is in use or there is no public
	 * address use the static address as random address (but skip
	 * the HCI command if the current random address is already the
	 * static one.
	 */
	if (test_bit(HCI_FORCE_STATIC_ADDR, &hdev->dev_flags) ||
	    !bacmp(&hdev->bdaddr, BDADDR_ANY)) {
		*own_addr_type = ADDR_LE_DEV_RANDOM;
		if (bacmp(&hdev->static_addr, &hdev->random_addr))
			hci_req_add(req, HCI_OP_LE_SET_RANDOM_ADDR, 6,
				    &hdev->static_addr);
		return 0;
	}

	/* Neither privacy nor static address is being used so use a
	 * public address.
	 */
	*own_addr_type = ADDR_LE_DEV_PUBLIC;

	return 0;
}

3635 3636 3637 3638 3639 3640 3641 3642 3643 3644 3645 3646 3647 3648 3649 3650 3651 3652 3653 3654 3655 3656
/* Copy the Identity Address of the controller.
 *
 * If the controller has a public BD_ADDR, then by default use that one.
 * If this is a LE only controller without a public address, default to
 * the static random address.
 *
 * For debugging purposes it is possible to force controllers with a
 * public address to use the static random address instead.
 */
void hci_copy_identity_address(struct hci_dev *hdev, bdaddr_t *bdaddr,
			       u8 *bdaddr_type)
{
	if (test_bit(HCI_FORCE_STATIC_ADDR, &hdev->dev_flags) ||
	    !bacmp(&hdev->bdaddr, BDADDR_ANY)) {
		bacpy(bdaddr, &hdev->static_addr);
		*bdaddr_type = ADDR_LE_DEV_RANDOM;
	} else {
		bacpy(bdaddr, &hdev->bdaddr);
		*bdaddr_type = ADDR_LE_DEV_PUBLIC;
	}
}

3657 3658 3659 3660 3661 3662 3663 3664 3665
/* Alloc HCI device */
struct hci_dev *hci_alloc_dev(void)
{
	struct hci_dev *hdev;

	hdev = kzalloc(sizeof(struct hci_dev), GFP_KERNEL);
	if (!hdev)
		return NULL;

3666 3667 3668
	hdev->pkt_type  = (HCI_DM1 | HCI_DH1 | HCI_HV1);
	hdev->esco_type = (ESCO_HV1);
	hdev->link_mode = (HCI_LM_ACCEPT);
3669 3670
	hdev->num_iac = 0x01;		/* One IAC support is mandatory */
	hdev->io_capability = 0x03;	/* No Input No Output */
3671 3672
	hdev->inq_tx_power = HCI_TX_POWER_INVALID;
	hdev->adv_tx_power = HCI_TX_POWER_INVALID;
3673 3674 3675 3676

	hdev->sniff_max_interval = 800;
	hdev->sniff_min_interval = 80;

3677
	hdev->le_adv_channel_map = 0x07;
3678 3679
	hdev->le_scan_interval = 0x0060;
	hdev->le_scan_window = 0x0030;
3680 3681
	hdev->le_conn_min_interval = 0x0028;
	hdev->le_conn_max_interval = 0x0038;
3682

3683 3684
	hdev->rpa_timeout = HCI_DEFAULT_RPA_TIMEOUT;

3685 3686 3687 3688 3689 3690 3691 3692
	mutex_init(&hdev->lock);
	mutex_init(&hdev->req_lock);

	INIT_LIST_HEAD(&hdev->mgmt_pending);
	INIT_LIST_HEAD(&hdev->blacklist);
	INIT_LIST_HEAD(&hdev->uuids);
	INIT_LIST_HEAD(&hdev->link_keys);
	INIT_LIST_HEAD(&hdev->long_term_keys);
3693
	INIT_LIST_HEAD(&hdev->identity_resolving_keys);
3694
	INIT_LIST_HEAD(&hdev->remote_oob_data);
3695
	INIT_LIST_HEAD(&hdev->le_conn_params);
3696
	INIT_LIST_HEAD(&hdev->pend_le_conns);
3697
	INIT_LIST_HEAD(&hdev->conn_hash.list);
3698 3699 3700 3701 3702 3703 3704 3705 3706 3707 3708 3709 3710 3711 3712 3713

	INIT_WORK(&hdev->rx_work, hci_rx_work);
	INIT_WORK(&hdev->cmd_work, hci_cmd_work);
	INIT_WORK(&hdev->tx_work, hci_tx_work);
	INIT_WORK(&hdev->power_on, hci_power_on);

	INIT_DELAYED_WORK(&hdev->power_off, hci_power_off);
	INIT_DELAYED_WORK(&hdev->discov_off, hci_discov_off);
	INIT_DELAYED_WORK(&hdev->le_scan_disable, le_scan_disable_work);

	skb_queue_head_init(&hdev->rx_q);
	skb_queue_head_init(&hdev->cmd_q);
	skb_queue_head_init(&hdev->raw_q);

	init_waitqueue_head(&hdev->req_wait_q);

3714
	setup_timer(&hdev->cmd_timer, hci_cmd_timeout, (unsigned long) hdev);
3715 3716 3717

	hci_init_sysfs(hdev);
	discovery_init(hdev);
3718 3719 3720 3721 3722 3723 3724 3725 3726 3727 3728 3729 3730

	return hdev;
}
EXPORT_SYMBOL(hci_alloc_dev);

/* Free HCI device */
void hci_free_dev(struct hci_dev *hdev)
{
	/* will free via device release */
	put_device(&hdev->dev);
}
EXPORT_SYMBOL(hci_free_dev);

L
Linus Torvalds 已提交
3731 3732 3733
/* Register HCI device */
int hci_register_dev(struct hci_dev *hdev)
{
3734
	int id, error;
L
Linus Torvalds 已提交
3735

3736
	if (!hdev->open || !hdev->close)
L
Linus Torvalds 已提交
3737 3738
		return -EINVAL;

3739 3740 3741
	/* Do not allow HCI_AMP devices to register at index 0,
	 * so the index can be used as the AMP controller ID.
	 */
3742 3743 3744 3745 3746 3747 3748 3749 3750
	switch (hdev->dev_type) {
	case HCI_BREDR:
		id = ida_simple_get(&hci_index_ida, 0, 0, GFP_KERNEL);
		break;
	case HCI_AMP:
		id = ida_simple_get(&hci_index_ida, 1, 0, GFP_KERNEL);
		break;
	default:
		return -EINVAL;
L
Linus Torvalds 已提交
3751
	}
3752

3753 3754 3755
	if (id < 0)
		return id;

L
Linus Torvalds 已提交
3756 3757
	sprintf(hdev->name, "hci%d", id);
	hdev->id = id;
3758 3759 3760

	BT_DBG("%p name %s bus %d", hdev, hdev->name, hdev->bus);

3761 3762
	hdev->workqueue = alloc_workqueue("%s", WQ_HIGHPRI | WQ_UNBOUND |
					  WQ_MEM_RECLAIM, 1, hdev->name);
3763 3764 3765 3766
	if (!hdev->workqueue) {
		error = -ENOMEM;
		goto err;
	}
3767

3768 3769
	hdev->req_workqueue = alloc_workqueue("%s", WQ_HIGHPRI | WQ_UNBOUND |
					      WQ_MEM_RECLAIM, 1, hdev->name);
3770 3771 3772 3773 3774 3775
	if (!hdev->req_workqueue) {
		destroy_workqueue(hdev->workqueue);
		error = -ENOMEM;
		goto err;
	}

3776 3777 3778
	if (!IS_ERR_OR_NULL(bt_debugfs))
		hdev->debugfs = debugfs_create_dir(hdev->name, bt_debugfs);

3779 3780
	dev_set_name(&hdev->dev, "%s", hdev->name);

3781 3782 3783 3784 3785 3786 3787 3788 3789
	hdev->tfm_aes = crypto_alloc_blkcipher("ecb(aes)", 0,
					       CRYPTO_ALG_ASYNC);
	if (IS_ERR(hdev->tfm_aes)) {
		BT_ERR("Unable to create crypto context");
		error = PTR_ERR(hdev->tfm_aes);
		hdev->tfm_aes = NULL;
		goto err_wqueue;
	}

3790
	error = device_add(&hdev->dev);
3791
	if (error < 0)
3792
		goto err_tfm;
L
Linus Torvalds 已提交
3793

3794
	hdev->rfkill = rfkill_alloc(hdev->name, &hdev->dev,
3795 3796
				    RFKILL_TYPE_BLUETOOTH, &hci_rfkill_ops,
				    hdev);
3797 3798 3799 3800 3801 3802 3803
	if (hdev->rfkill) {
		if (rfkill_register(hdev->rfkill) < 0) {
			rfkill_destroy(hdev->rfkill);
			hdev->rfkill = NULL;
		}
	}

3804 3805 3806
	if (hdev->rfkill && rfkill_blocked(hdev->rfkill))
		set_bit(HCI_RFKILLED, &hdev->dev_flags);

3807
	set_bit(HCI_SETUP, &hdev->dev_flags);
3808
	set_bit(HCI_AUTO_OFF, &hdev->dev_flags);
3809

3810
	if (hdev->dev_type == HCI_BREDR) {
3811 3812 3813 3814 3815
		/* Assume BR/EDR support until proven otherwise (such as
		 * through reading supported features during init.
		 */
		set_bit(HCI_BREDR_ENABLED, &hdev->dev_flags);
	}
3816

3817 3818 3819 3820
	write_lock(&hci_dev_list_lock);
	list_add(&hdev->list, &hci_dev_list);
	write_unlock(&hci_dev_list_lock);

L
Linus Torvalds 已提交
3821
	hci_notify(hdev, HCI_DEV_REG);
3822
	hci_dev_hold(hdev);
L
Linus Torvalds 已提交
3823

3824
	queue_work(hdev->req_workqueue, &hdev->power_on);
3825

L
Linus Torvalds 已提交
3826
	return id;
3827

3828 3829
err_tfm:
	crypto_free_blkcipher(hdev->tfm_aes);
3830 3831
err_wqueue:
	destroy_workqueue(hdev->workqueue);
3832
	destroy_workqueue(hdev->req_workqueue);
3833
err:
3834
	ida_simple_remove(&hci_index_ida, hdev->id);
3835

3836
	return error;
L
Linus Torvalds 已提交
3837 3838 3839 3840
}
EXPORT_SYMBOL(hci_register_dev);

/* Unregister HCI device */
3841
void hci_unregister_dev(struct hci_dev *hdev)
L
Linus Torvalds 已提交
3842
{
3843
	int i, id;
3844

3845
	BT_DBG("%p name %s bus %d", hdev, hdev->name, hdev->bus);
L
Linus Torvalds 已提交
3846

3847 3848
	set_bit(HCI_UNREGISTER, &hdev->dev_flags);

3849 3850
	id = hdev->id;

3851
	write_lock(&hci_dev_list_lock);
L
Linus Torvalds 已提交
3852
	list_del(&hdev->list);
3853
	write_unlock(&hci_dev_list_lock);
L
Linus Torvalds 已提交
3854 3855 3856

	hci_dev_do_close(hdev);

3857
	for (i = 0; i < NUM_REASSEMBLY; i++)
3858 3859
		kfree_skb(hdev->reassembly[i]);

3860 3861
	cancel_work_sync(&hdev->power_on);

3862
	if (!test_bit(HCI_INIT, &hdev->flags) &&
3863
	    !test_bit(HCI_SETUP, &hdev->dev_flags)) {
3864
		hci_dev_lock(hdev);
3865
		mgmt_index_removed(hdev);
3866
		hci_dev_unlock(hdev);
3867
	}
3868

3869 3870 3871 3872
	/* mgmt_index_removed should take care of emptying the
	 * pending list */
	BUG_ON(!list_empty(&hdev->mgmt_pending));

L
Linus Torvalds 已提交
3873 3874
	hci_notify(hdev, HCI_DEV_UNREG);

3875 3876 3877 3878 3879
	if (hdev->rfkill) {
		rfkill_unregister(hdev->rfkill);
		rfkill_destroy(hdev->rfkill);
	}

3880 3881 3882
	if (hdev->tfm_aes)
		crypto_free_blkcipher(hdev->tfm_aes);

3883
	device_del(&hdev->dev);
3884

3885 3886
	debugfs_remove_recursive(hdev->debugfs);

3887
	destroy_workqueue(hdev->workqueue);
3888
	destroy_workqueue(hdev->req_workqueue);
3889

3890
	hci_dev_lock(hdev);
3891
	hci_blacklist_clear(hdev);
3892
	hci_uuids_clear(hdev);
3893
	hci_link_keys_clear(hdev);
3894
	hci_smp_ltks_clear(hdev);
3895
	hci_smp_irks_clear(hdev);
3896
	hci_remote_oob_data_clear(hdev);
3897
	hci_conn_params_clear(hdev);
3898
	hci_pend_le_conns_clear(hdev);
3899
	hci_dev_unlock(hdev);
3900

3901
	hci_dev_put(hdev);
3902 3903

	ida_simple_remove(&hci_index_ida, id);
L
Linus Torvalds 已提交
3904 3905 3906 3907 3908 3909 3910 3911 3912 3913 3914 3915 3916 3917 3918 3919 3920 3921 3922
}
EXPORT_SYMBOL(hci_unregister_dev);

/* Suspend HCI device */
int hci_suspend_dev(struct hci_dev *hdev)
{
	hci_notify(hdev, HCI_DEV_SUSPEND);
	return 0;
}
EXPORT_SYMBOL(hci_suspend_dev);

/* Resume HCI device */
int hci_resume_dev(struct hci_dev *hdev)
{
	hci_notify(hdev, HCI_DEV_RESUME);
	return 0;
}
EXPORT_SYMBOL(hci_resume_dev);

3923
/* Receive frame from HCI drivers */
3924
int hci_recv_frame(struct hci_dev *hdev, struct sk_buff *skb)
3925 3926
{
	if (!hdev || (!test_bit(HCI_UP, &hdev->flags)
3927
		      && !test_bit(HCI_INIT, &hdev->flags))) {
3928 3929 3930 3931
		kfree_skb(skb);
		return -ENXIO;
	}

3932
	/* Incoming skb */
3933 3934 3935 3936 3937 3938
	bt_cb(skb)->incoming = 1;

	/* Time stamp */
	__net_timestamp(skb);

	skb_queue_tail(&hdev->rx_q, skb);
3939
	queue_work(hdev->workqueue, &hdev->rx_work);
3940

3941 3942 3943 3944
	return 0;
}
EXPORT_SYMBOL(hci_recv_frame);

3945
static int hci_reassembly(struct hci_dev *hdev, int type, void *data,
3946
			  int count, __u8 index)
3947 3948 3949 3950 3951 3952 3953 3954
{
	int len = 0;
	int hlen = 0;
	int remain = count;
	struct sk_buff *skb;
	struct bt_skb_cb *scb;

	if ((type < HCI_ACLDATA_PKT || type > HCI_EVENT_PKT) ||
3955
	    index >= NUM_REASSEMBLY)
3956 3957 3958 3959 3960 3961 3962 3963 3964 3965 3966 3967 3968 3969 3970 3971 3972 3973 3974 3975
		return -EILSEQ;

	skb = hdev->reassembly[index];

	if (!skb) {
		switch (type) {
		case HCI_ACLDATA_PKT:
			len = HCI_MAX_FRAME_SIZE;
			hlen = HCI_ACL_HDR_SIZE;
			break;
		case HCI_EVENT_PKT:
			len = HCI_MAX_EVENT_SIZE;
			hlen = HCI_EVENT_HDR_SIZE;
			break;
		case HCI_SCODATA_PKT:
			len = HCI_MAX_SCO_SIZE;
			hlen = HCI_SCO_HDR_SIZE;
			break;
		}

3976
		skb = bt_skb_alloc(len, GFP_ATOMIC);
3977 3978 3979 3980 3981 3982 3983 3984 3985 3986 3987 3988
		if (!skb)
			return -ENOMEM;

		scb = (void *) skb->cb;
		scb->expect = hlen;
		scb->pkt_type = type;

		hdev->reassembly[index] = skb;
	}

	while (count) {
		scb = (void *) skb->cb;
3989
		len = min_t(uint, scb->expect, count);
3990 3991 3992 3993 3994 3995 3996 3997 3998 3999 4000 4001 4002 4003 4004 4005 4006 4007 4008 4009 4010 4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029 4030 4031 4032 4033 4034 4035 4036 4037 4038 4039 4040 4041 4042

		memcpy(skb_put(skb, len), data, len);

		count -= len;
		data += len;
		scb->expect -= len;
		remain = count;

		switch (type) {
		case HCI_EVENT_PKT:
			if (skb->len == HCI_EVENT_HDR_SIZE) {
				struct hci_event_hdr *h = hci_event_hdr(skb);
				scb->expect = h->plen;

				if (skb_tailroom(skb) < scb->expect) {
					kfree_skb(skb);
					hdev->reassembly[index] = NULL;
					return -ENOMEM;
				}
			}
			break;

		case HCI_ACLDATA_PKT:
			if (skb->len  == HCI_ACL_HDR_SIZE) {
				struct hci_acl_hdr *h = hci_acl_hdr(skb);
				scb->expect = __le16_to_cpu(h->dlen);

				if (skb_tailroom(skb) < scb->expect) {
					kfree_skb(skb);
					hdev->reassembly[index] = NULL;
					return -ENOMEM;
				}
			}
			break;

		case HCI_SCODATA_PKT:
			if (skb->len == HCI_SCO_HDR_SIZE) {
				struct hci_sco_hdr *h = hci_sco_hdr(skb);
				scb->expect = h->dlen;

				if (skb_tailroom(skb) < scb->expect) {
					kfree_skb(skb);
					hdev->reassembly[index] = NULL;
					return -ENOMEM;
				}
			}
			break;
		}

		if (scb->expect == 0) {
			/* Complete frame */

			bt_cb(skb)->pkt_type = type;
4043
			hci_recv_frame(hdev, skb);
4044 4045 4046 4047 4048 4049 4050 4051 4052

			hdev->reassembly[index] = NULL;
			return remain;
		}
	}

	return remain;
}

4053 4054
int hci_recv_fragment(struct hci_dev *hdev, int type, void *data, int count)
{
4055 4056
	int rem = 0;

4057 4058 4059
	if (type < HCI_ACLDATA_PKT || type > HCI_EVENT_PKT)
		return -EILSEQ;

4060
	while (count) {
4061
		rem = hci_reassembly(hdev, type, data, count, type - 1);
4062 4063
		if (rem < 0)
			return rem;
4064

4065 4066
		data += (count - rem);
		count = rem;
J
Joe Perches 已提交
4067
	}
4068

4069
	return rem;
4070 4071 4072
}
EXPORT_SYMBOL(hci_recv_fragment);

4073 4074 4075 4076 4077 4078 4079
#define STREAM_REASSEMBLY 0

int hci_recv_stream_fragment(struct hci_dev *hdev, void *data, int count)
{
	int type;
	int rem = 0;

4080
	while (count) {
4081 4082 4083 4084 4085 4086 4087 4088 4089 4090 4091 4092 4093 4094
		struct sk_buff *skb = hdev->reassembly[STREAM_REASSEMBLY];

		if (!skb) {
			struct { char type; } *pkt;

			/* Start of the frame */
			pkt = data;
			type = pkt->type;

			data++;
			count--;
		} else
			type = bt_cb(skb)->pkt_type;

4095
		rem = hci_reassembly(hdev, type, data, count,
4096
				     STREAM_REASSEMBLY);
4097 4098 4099 4100 4101
		if (rem < 0)
			return rem;

		data += (count - rem);
		count = rem;
J
Joe Perches 已提交
4102
	}
4103 4104 4105 4106 4107

	return rem;
}
EXPORT_SYMBOL(hci_recv_stream_fragment);

L
Linus Torvalds 已提交
4108 4109 4110 4111 4112 4113
/* ---- Interface to upper protocols ---- */

int hci_register_cb(struct hci_cb *cb)
{
	BT_DBG("%p name %s", cb, cb->name);

4114
	write_lock(&hci_cb_list_lock);
L
Linus Torvalds 已提交
4115
	list_add(&cb->list, &hci_cb_list);
4116
	write_unlock(&hci_cb_list_lock);
L
Linus Torvalds 已提交
4117 4118 4119 4120 4121 4122 4123 4124 4125

	return 0;
}
EXPORT_SYMBOL(hci_register_cb);

int hci_unregister_cb(struct hci_cb *cb)
{
	BT_DBG("%p name %s", cb, cb->name);

4126
	write_lock(&hci_cb_list_lock);
L
Linus Torvalds 已提交
4127
	list_del(&cb->list);
4128
	write_unlock(&hci_cb_list_lock);
L
Linus Torvalds 已提交
4129 4130 4131 4132 4133

	return 0;
}
EXPORT_SYMBOL(hci_unregister_cb);

4134
static void hci_send_frame(struct hci_dev *hdev, struct sk_buff *skb)
L
Linus Torvalds 已提交
4135
{
4136
	BT_DBG("%s type %d len %d", hdev->name, bt_cb(skb)->pkt_type, skb->len);
L
Linus Torvalds 已提交
4137

4138 4139
	/* Time stamp */
	__net_timestamp(skb);
L
Linus Torvalds 已提交
4140

4141 4142 4143 4144 4145
	/* Send copy to monitor */
	hci_send_to_monitor(hdev, skb);

	if (atomic_read(&hdev->promisc)) {
		/* Send copy to the sockets */
4146
		hci_send_to_sock(hdev, skb);
L
Linus Torvalds 已提交
4147 4148 4149 4150 4151
	}

	/* Get rid of skb owner, prior to sending to the driver. */
	skb_orphan(skb);

4152
	if (hdev->send(hdev, skb) < 0)
4153
		BT_ERR("%s sending frame failed", hdev->name);
L
Linus Torvalds 已提交
4154 4155
}

4156 4157 4158 4159
void hci_req_init(struct hci_request *req, struct hci_dev *hdev)
{
	skb_queue_head_init(&req->cmd_q);
	req->hdev = hdev;
4160
	req->err = 0;
4161 4162 4163 4164 4165 4166 4167 4168 4169 4170
}

int hci_req_run(struct hci_request *req, hci_req_complete_t complete)
{
	struct hci_dev *hdev = req->hdev;
	struct sk_buff *skb;
	unsigned long flags;

	BT_DBG("length %u", skb_queue_len(&req->cmd_q));

4171 4172 4173 4174 4175 4176 4177 4178
	/* If an error occured during request building, remove all HCI
	 * commands queued on the HCI request queue.
	 */
	if (req->err) {
		skb_queue_purge(&req->cmd_q);
		return req->err;
	}

4179 4180
	/* Do not allow empty requests */
	if (skb_queue_empty(&req->cmd_q))
4181
		return -ENODATA;
4182 4183 4184 4185 4186 4187 4188 4189 4190 4191 4192 4193 4194

	skb = skb_peek_tail(&req->cmd_q);
	bt_cb(skb)->req.complete = complete;

	spin_lock_irqsave(&hdev->cmd_q.lock, flags);
	skb_queue_splice_tail(&req->cmd_q, &hdev->cmd_q);
	spin_unlock_irqrestore(&hdev->cmd_q.lock, flags);

	queue_work(hdev->workqueue, &hdev->cmd_work);

	return 0;
}

4195
static struct sk_buff *hci_prepare_cmd(struct hci_dev *hdev, u16 opcode,
4196
				       u32 plen, const void *param)
L
Linus Torvalds 已提交
4197 4198 4199 4200 4201 4202
{
	int len = HCI_COMMAND_HDR_SIZE + plen;
	struct hci_command_hdr *hdr;
	struct sk_buff *skb;

	skb = bt_skb_alloc(len, GFP_ATOMIC);
4203 4204
	if (!skb)
		return NULL;
L
Linus Torvalds 已提交
4205 4206

	hdr = (struct hci_command_hdr *) skb_put(skb, HCI_COMMAND_HDR_SIZE);
4207
	hdr->opcode = cpu_to_le16(opcode);
L
Linus Torvalds 已提交
4208 4209 4210 4211 4212 4213 4214
	hdr->plen   = plen;

	if (plen)
		memcpy(skb_put(skb, plen), param, plen);

	BT_DBG("skb len %d", skb->len);

4215
	bt_cb(skb)->pkt_type = HCI_COMMAND_PKT;
4216

4217 4218 4219 4220
	return skb;
}

/* Send HCI command */
4221 4222
int hci_send_cmd(struct hci_dev *hdev, __u16 opcode, __u32 plen,
		 const void *param)
4223 4224 4225 4226 4227 4228 4229 4230 4231 4232 4233
{
	struct sk_buff *skb;

	BT_DBG("%s opcode 0x%4.4x plen %d", hdev->name, opcode, plen);

	skb = hci_prepare_cmd(hdev, opcode, plen, param);
	if (!skb) {
		BT_ERR("%s no memory for command", hdev->name);
		return -ENOMEM;
	}

4234 4235 4236 4237 4238
	/* Stand-alone HCI commands must be flaged as
	 * single-command requests.
	 */
	bt_cb(skb)->req.start = true;

L
Linus Torvalds 已提交
4239
	skb_queue_tail(&hdev->cmd_q, skb);
4240
	queue_work(hdev->workqueue, &hdev->cmd_work);
L
Linus Torvalds 已提交
4241 4242 4243 4244

	return 0;
}

4245
/* Queue a command to an asynchronous HCI request */
4246 4247
void hci_req_add_ev(struct hci_request *req, u16 opcode, u32 plen,
		    const void *param, u8 event)
4248 4249 4250 4251 4252 4253
{
	struct hci_dev *hdev = req->hdev;
	struct sk_buff *skb;

	BT_DBG("%s opcode 0x%4.4x plen %d", hdev->name, opcode, plen);

4254 4255 4256 4257 4258 4259
	/* If an error occured during request building, there is no point in
	 * queueing the HCI command. We can simply return.
	 */
	if (req->err)
		return;

4260 4261
	skb = hci_prepare_cmd(hdev, opcode, plen, param);
	if (!skb) {
4262 4263 4264
		BT_ERR("%s no memory for command (opcode 0x%4.4x)",
		       hdev->name, opcode);
		req->err = -ENOMEM;
4265
		return;
4266 4267 4268 4269 4270
	}

	if (skb_queue_empty(&req->cmd_q))
		bt_cb(skb)->req.start = true;

4271 4272
	bt_cb(skb)->req.event = event;

4273 4274 4275
	skb_queue_tail(&req->cmd_q, skb);
}

4276 4277
void hci_req_add(struct hci_request *req, u16 opcode, u32 plen,
		 const void *param)
4278 4279 4280 4281
{
	hci_req_add_ev(req, opcode, plen, param, 0);
}

L
Linus Torvalds 已提交
4282
/* Get data from the previously sent command */
4283
void *hci_sent_cmd_data(struct hci_dev *hdev, __u16 opcode)
L
Linus Torvalds 已提交
4284 4285 4286 4287 4288 4289 4290 4291
{
	struct hci_command_hdr *hdr;

	if (!hdev->sent_cmd)
		return NULL;

	hdr = (void *) hdev->sent_cmd->data;

4292
	if (hdr->opcode != cpu_to_le16(opcode))
L
Linus Torvalds 已提交
4293 4294
		return NULL;

4295
	BT_DBG("%s opcode 0x%4.4x", hdev->name, opcode);
L
Linus Torvalds 已提交
4296 4297 4298 4299 4300 4301 4302 4303 4304 4305

	return hdev->sent_cmd->data + HCI_COMMAND_HDR_SIZE;
}

/* Send ACL data */
static void hci_add_acl_hdr(struct sk_buff *skb, __u16 handle, __u16 flags)
{
	struct hci_acl_hdr *hdr;
	int len = skb->len;

4306 4307
	skb_push(skb, HCI_ACL_HDR_SIZE);
	skb_reset_transport_header(skb);
4308
	hdr = (struct hci_acl_hdr *)skb_transport_header(skb);
4309 4310
	hdr->handle = cpu_to_le16(hci_handle_pack(handle, flags));
	hdr->dlen   = cpu_to_le16(len);
L
Linus Torvalds 已提交
4311 4312
}

4313
static void hci_queue_acl(struct hci_chan *chan, struct sk_buff_head *queue,
4314
			  struct sk_buff *skb, __u16 flags)
L
Linus Torvalds 已提交
4315
{
4316
	struct hci_conn *conn = chan->conn;
L
Linus Torvalds 已提交
4317 4318 4319
	struct hci_dev *hdev = conn->hdev;
	struct sk_buff *list;

4320 4321 4322 4323
	skb->len = skb_headlen(skb);
	skb->data_len = 0;

	bt_cb(skb)->pkt_type = HCI_ACLDATA_PKT;
4324 4325 4326 4327 4328 4329 4330 4331 4332 4333 4334 4335

	switch (hdev->dev_type) {
	case HCI_BREDR:
		hci_add_acl_hdr(skb, conn->handle, flags);
		break;
	case HCI_AMP:
		hci_add_acl_hdr(skb, chan->handle, flags);
		break;
	default:
		BT_ERR("%s unknown dev_type %d", hdev->name, hdev->dev_type);
		return;
	}
4336

A
Andrei Emeltchenko 已提交
4337 4338
	list = skb_shinfo(skb)->frag_list;
	if (!list) {
L
Linus Torvalds 已提交
4339 4340 4341
		/* Non fragmented */
		BT_DBG("%s nonfrag skb %p len %d", hdev->name, skb, skb->len);

4342
		skb_queue_tail(queue, skb);
L
Linus Torvalds 已提交
4343 4344 4345 4346 4347 4348 4349
	} else {
		/* Fragmented */
		BT_DBG("%s frag %p len %d", hdev->name, skb, skb->len);

		skb_shinfo(skb)->frag_list = NULL;

		/* Queue all fragments atomically */
4350
		spin_lock(&queue->lock);
L
Linus Torvalds 已提交
4351

4352
		__skb_queue_tail(queue, skb);
4353 4354 4355

		flags &= ~ACL_START;
		flags |= ACL_CONT;
L
Linus Torvalds 已提交
4356 4357
		do {
			skb = list; list = list->next;
4358

4359
			bt_cb(skb)->pkt_type = HCI_ACLDATA_PKT;
4360
			hci_add_acl_hdr(skb, conn->handle, flags);
L
Linus Torvalds 已提交
4361 4362 4363

			BT_DBG("%s frag %p len %d", hdev->name, skb, skb->len);

4364
			__skb_queue_tail(queue, skb);
L
Linus Torvalds 已提交
4365 4366
		} while (list);

4367
		spin_unlock(&queue->lock);
L
Linus Torvalds 已提交
4368
	}
4369 4370 4371 4372
}

void hci_send_acl(struct hci_chan *chan, struct sk_buff *skb, __u16 flags)
{
4373
	struct hci_dev *hdev = chan->conn->hdev;
4374

4375
	BT_DBG("%s chan %p flags 0x%4.4x", hdev->name, chan, flags);
4376

4377
	hci_queue_acl(chan, &chan->data_q, skb, flags);
L
Linus Torvalds 已提交
4378

4379
	queue_work(hdev->workqueue, &hdev->tx_work);
L
Linus Torvalds 已提交
4380 4381 4382
}

/* Send SCO data */
4383
void hci_send_sco(struct hci_conn *conn, struct sk_buff *skb)
L
Linus Torvalds 已提交
4384 4385 4386 4387 4388 4389
{
	struct hci_dev *hdev = conn->hdev;
	struct hci_sco_hdr hdr;

	BT_DBG("%s len %d", hdev->name, skb->len);

4390
	hdr.handle = cpu_to_le16(conn->handle);
L
Linus Torvalds 已提交
4391 4392
	hdr.dlen   = skb->len;

4393 4394
	skb_push(skb, HCI_SCO_HDR_SIZE);
	skb_reset_transport_header(skb);
4395
	memcpy(skb_transport_header(skb), &hdr, HCI_SCO_HDR_SIZE);
L
Linus Torvalds 已提交
4396

4397
	bt_cb(skb)->pkt_type = HCI_SCODATA_PKT;
4398

L
Linus Torvalds 已提交
4399
	skb_queue_tail(&conn->data_q, skb);
4400
	queue_work(hdev->workqueue, &hdev->tx_work);
L
Linus Torvalds 已提交
4401 4402 4403 4404 4405
}

/* ---- HCI TX task (outgoing data) ---- */

/* HCI Connection scheduler */
4406 4407
static struct hci_conn *hci_low_sent(struct hci_dev *hdev, __u8 type,
				     int *quote)
L
Linus Torvalds 已提交
4408 4409
{
	struct hci_conn_hash *h = &hdev->conn_hash;
4410
	struct hci_conn *conn = NULL, *c;
4411
	unsigned int num = 0, min = ~0;
L
Linus Torvalds 已提交
4412

4413
	/* We don't have to lock device here. Connections are always
L
Linus Torvalds 已提交
4414
	 * added and removed with TX task disabled. */
4415 4416 4417 4418

	rcu_read_lock();

	list_for_each_entry_rcu(c, &h->list, list) {
4419
		if (c->type != type || skb_queue_empty(&c->data_q))
L
Linus Torvalds 已提交
4420
			continue;
4421 4422 4423 4424

		if (c->state != BT_CONNECTED && c->state != BT_CONFIG)
			continue;

L
Linus Torvalds 已提交
4425 4426 4427 4428 4429 4430
		num++;

		if (c->sent < min) {
			min  = c->sent;
			conn = c;
		}
4431 4432 4433

		if (hci_conn_num(hdev, type) == num)
			break;
L
Linus Torvalds 已提交
4434 4435
	}

4436 4437
	rcu_read_unlock();

L
Linus Torvalds 已提交
4438
	if (conn) {
4439 4440 4441 4442 4443 4444 4445 4446 4447 4448 4449 4450 4451 4452 4453 4454 4455 4456 4457
		int cnt, q;

		switch (conn->type) {
		case ACL_LINK:
			cnt = hdev->acl_cnt;
			break;
		case SCO_LINK:
		case ESCO_LINK:
			cnt = hdev->sco_cnt;
			break;
		case LE_LINK:
			cnt = hdev->le_mtu ? hdev->le_cnt : hdev->acl_cnt;
			break;
		default:
			cnt = 0;
			BT_ERR("Unknown link type");
		}

		q = cnt / num;
L
Linus Torvalds 已提交
4458 4459 4460 4461 4462 4463 4464 4465
		*quote = q ? q : 1;
	} else
		*quote = 0;

	BT_DBG("conn %p quote %d", conn, *quote);
	return conn;
}

4466
static void hci_link_tx_to(struct hci_dev *hdev, __u8 type)
L
Linus Torvalds 已提交
4467 4468
{
	struct hci_conn_hash *h = &hdev->conn_hash;
4469
	struct hci_conn *c;
L
Linus Torvalds 已提交
4470

4471
	BT_ERR("%s link tx timeout", hdev->name);
L
Linus Torvalds 已提交
4472

4473 4474
	rcu_read_lock();

L
Linus Torvalds 已提交
4475
	/* Kill stalled connections */
4476
	list_for_each_entry_rcu(c, &h->list, list) {
4477
		if (c->type == type && c->sent) {
4478 4479
			BT_ERR("%s killing stalled connection %pMR",
			       hdev->name, &c->dst);
A
Andre Guedes 已提交
4480
			hci_disconnect(c, HCI_ERROR_REMOTE_USER_TERM);
L
Linus Torvalds 已提交
4481 4482
		}
	}
4483 4484

	rcu_read_unlock();
L
Linus Torvalds 已提交
4485 4486
}

4487 4488
static struct hci_chan *hci_chan_sent(struct hci_dev *hdev, __u8 type,
				      int *quote)
L
Linus Torvalds 已提交
4489
{
4490 4491
	struct hci_conn_hash *h = &hdev->conn_hash;
	struct hci_chan *chan = NULL;
4492
	unsigned int num = 0, min = ~0, cur_prio = 0;
L
Linus Torvalds 已提交
4493
	struct hci_conn *conn;
4494 4495 4496 4497
	int cnt, q, conn_num = 0;

	BT_DBG("%s", hdev->name);

4498 4499 4500
	rcu_read_lock();

	list_for_each_entry_rcu(conn, &h->list, list) {
4501 4502 4503 4504 4505 4506 4507 4508 4509 4510
		struct hci_chan *tmp;

		if (conn->type != type)
			continue;

		if (conn->state != BT_CONNECTED && conn->state != BT_CONFIG)
			continue;

		conn_num++;

4511
		list_for_each_entry_rcu(tmp, &conn->chan_list, list) {
4512 4513 4514 4515 4516 4517 4518 4519 4520 4521 4522 4523 4524 4525 4526 4527 4528 4529 4530 4531 4532 4533 4534 4535 4536 4537 4538
			struct sk_buff *skb;

			if (skb_queue_empty(&tmp->data_q))
				continue;

			skb = skb_peek(&tmp->data_q);
			if (skb->priority < cur_prio)
				continue;

			if (skb->priority > cur_prio) {
				num = 0;
				min = ~0;
				cur_prio = skb->priority;
			}

			num++;

			if (conn->sent < min) {
				min  = conn->sent;
				chan = tmp;
			}
		}

		if (hci_conn_num(hdev, type) == conn_num)
			break;
	}

4539 4540
	rcu_read_unlock();

4541 4542 4543 4544 4545 4546 4547
	if (!chan)
		return NULL;

	switch (chan->conn->type) {
	case ACL_LINK:
		cnt = hdev->acl_cnt;
		break;
4548 4549 4550
	case AMP_LINK:
		cnt = hdev->block_cnt;
		break;
4551 4552 4553 4554 4555 4556 4557 4558 4559 4560 4561 4562 4563 4564 4565 4566 4567 4568
	case SCO_LINK:
	case ESCO_LINK:
		cnt = hdev->sco_cnt;
		break;
	case LE_LINK:
		cnt = hdev->le_mtu ? hdev->le_cnt : hdev->acl_cnt;
		break;
	default:
		cnt = 0;
		BT_ERR("Unknown link type");
	}

	q = cnt / num;
	*quote = q ? q : 1;
	BT_DBG("chan %p quote %d", chan, *quote);
	return chan;
}

4569 4570 4571 4572 4573 4574 4575 4576
static void hci_prio_recalculate(struct hci_dev *hdev, __u8 type)
{
	struct hci_conn_hash *h = &hdev->conn_hash;
	struct hci_conn *conn;
	int num = 0;

	BT_DBG("%s", hdev->name);

4577 4578 4579
	rcu_read_lock();

	list_for_each_entry_rcu(conn, &h->list, list) {
4580 4581 4582 4583 4584 4585 4586 4587 4588 4589
		struct hci_chan *chan;

		if (conn->type != type)
			continue;

		if (conn->state != BT_CONNECTED && conn->state != BT_CONFIG)
			continue;

		num++;

4590
		list_for_each_entry_rcu(chan, &conn->chan_list, list) {
4591 4592 4593 4594 4595 4596 4597 4598 4599 4600 4601 4602 4603 4604 4605 4606 4607
			struct sk_buff *skb;

			if (chan->sent) {
				chan->sent = 0;
				continue;
			}

			if (skb_queue_empty(&chan->data_q))
				continue;

			skb = skb_peek(&chan->data_q);
			if (skb->priority >= HCI_PRIO_MAX - 1)
				continue;

			skb->priority = HCI_PRIO_MAX - 1;

			BT_DBG("chan %p skb %p promoted to %d", chan, skb,
4608
			       skb->priority);
4609 4610 4611 4612 4613
		}

		if (hci_conn_num(hdev, type) == num)
			break;
	}
4614 4615 4616

	rcu_read_unlock();

4617 4618
}

4619 4620 4621 4622 4623 4624
static inline int __get_blocks(struct hci_dev *hdev, struct sk_buff *skb)
{
	/* Calculate count of blocks used by this packet */
	return DIV_ROUND_UP(skb->len - HCI_ACL_HDR_SIZE, hdev->block_len);
}

4625
static void __check_timeout(struct hci_dev *hdev, unsigned int cnt)
4626
{
L
Linus Torvalds 已提交
4627 4628 4629
	if (!test_bit(HCI_RAW, &hdev->flags)) {
		/* ACL tx timeout must be longer than maximum
		 * link supervision timeout (40.9 seconds) */
4630
		if (!cnt && time_after(jiffies, hdev->acl_last_tx +
4631
				       HCI_ACL_TX_TIMEOUT))
4632
			hci_link_tx_to(hdev, ACL_LINK);
L
Linus Torvalds 已提交
4633
	}
4634
}
L
Linus Torvalds 已提交
4635

4636
static void hci_sched_acl_pkt(struct hci_dev *hdev)
4637 4638 4639 4640 4641 4642 4643
{
	unsigned int cnt = hdev->acl_cnt;
	struct hci_chan *chan;
	struct sk_buff *skb;
	int quote;

	__check_timeout(hdev, cnt);
4644

4645
	while (hdev->acl_cnt &&
4646
	       (chan = hci_chan_sent(hdev, ACL_LINK, &quote))) {
4647 4648
		u32 priority = (skb_peek(&chan->data_q))->priority;
		while (quote-- && (skb = skb_peek(&chan->data_q))) {
4649
			BT_DBG("chan %p skb %p len %d priority %u", chan, skb,
4650
			       skb->len, skb->priority);
4651

4652 4653 4654 4655 4656 4657
			/* Stop if priority has changed */
			if (skb->priority < priority)
				break;

			skb = skb_dequeue(&chan->data_q);

4658
			hci_conn_enter_active_mode(chan->conn,
4659
						   bt_cb(skb)->force_active);
4660

4661
			hci_send_frame(hdev, skb);
L
Linus Torvalds 已提交
4662 4663 4664
			hdev->acl_last_tx = jiffies;

			hdev->acl_cnt--;
4665 4666
			chan->sent++;
			chan->conn->sent++;
L
Linus Torvalds 已提交
4667 4668
		}
	}
4669 4670 4671

	if (cnt != hdev->acl_cnt)
		hci_prio_recalculate(hdev, ACL_LINK);
L
Linus Torvalds 已提交
4672 4673
}

4674
static void hci_sched_acl_blk(struct hci_dev *hdev)
4675
{
4676
	unsigned int cnt = hdev->block_cnt;
4677 4678 4679
	struct hci_chan *chan;
	struct sk_buff *skb;
	int quote;
4680
	u8 type;
4681

4682
	__check_timeout(hdev, cnt);
4683

4684 4685 4686 4687 4688 4689 4690
	BT_DBG("%s", hdev->name);

	if (hdev->dev_type == HCI_AMP)
		type = AMP_LINK;
	else
		type = ACL_LINK;

4691
	while (hdev->block_cnt > 0 &&
4692
	       (chan = hci_chan_sent(hdev, type, &quote))) {
4693 4694 4695 4696 4697
		u32 priority = (skb_peek(&chan->data_q))->priority;
		while (quote > 0 && (skb = skb_peek(&chan->data_q))) {
			int blocks;

			BT_DBG("chan %p skb %p len %d priority %u", chan, skb,
4698
			       skb->len, skb->priority);
4699 4700 4701 4702 4703 4704 4705 4706 4707 4708 4709 4710

			/* Stop if priority has changed */
			if (skb->priority < priority)
				break;

			skb = skb_dequeue(&chan->data_q);

			blocks = __get_blocks(hdev, skb);
			if (blocks > hdev->block_cnt)
				return;

			hci_conn_enter_active_mode(chan->conn,
4711
						   bt_cb(skb)->force_active);
4712

4713
			hci_send_frame(hdev, skb);
4714 4715 4716 4717 4718 4719 4720 4721 4722 4723 4724
			hdev->acl_last_tx = jiffies;

			hdev->block_cnt -= blocks;
			quote -= blocks;

			chan->sent += blocks;
			chan->conn->sent += blocks;
		}
	}

	if (cnt != hdev->block_cnt)
4725
		hci_prio_recalculate(hdev, type);
4726 4727
}

4728
static void hci_sched_acl(struct hci_dev *hdev)
4729 4730 4731
{
	BT_DBG("%s", hdev->name);

4732 4733 4734 4735 4736 4737
	/* No ACL link over BR/EDR controller */
	if (!hci_conn_num(hdev, ACL_LINK) && hdev->dev_type == HCI_BREDR)
		return;

	/* No AMP link over AMP controller */
	if (!hci_conn_num(hdev, AMP_LINK) && hdev->dev_type == HCI_AMP)
4738 4739 4740 4741 4742 4743 4744 4745 4746 4747 4748 4749 4750
		return;

	switch (hdev->flow_ctl_mode) {
	case HCI_FLOW_CTL_MODE_PACKET_BASED:
		hci_sched_acl_pkt(hdev);
		break;

	case HCI_FLOW_CTL_MODE_BLOCK_BASED:
		hci_sched_acl_blk(hdev);
		break;
	}
}

L
Linus Torvalds 已提交
4751
/* Schedule SCO */
4752
static void hci_sched_sco(struct hci_dev *hdev)
L
Linus Torvalds 已提交
4753 4754 4755 4756 4757 4758 4759
{
	struct hci_conn *conn;
	struct sk_buff *skb;
	int quote;

	BT_DBG("%s", hdev->name);

4760 4761 4762
	if (!hci_conn_num(hdev, SCO_LINK))
		return;

L
Linus Torvalds 已提交
4763 4764 4765
	while (hdev->sco_cnt && (conn = hci_low_sent(hdev, SCO_LINK, &quote))) {
		while (quote-- && (skb = skb_dequeue(&conn->data_q))) {
			BT_DBG("skb %p len %d", skb, skb->len);
4766
			hci_send_frame(hdev, skb);
L
Linus Torvalds 已提交
4767 4768 4769 4770 4771 4772 4773 4774

			conn->sent++;
			if (conn->sent == ~0)
				conn->sent = 0;
		}
	}
}

4775
static void hci_sched_esco(struct hci_dev *hdev)
4776 4777 4778 4779 4780 4781 4782
{
	struct hci_conn *conn;
	struct sk_buff *skb;
	int quote;

	BT_DBG("%s", hdev->name);

4783 4784 4785
	if (!hci_conn_num(hdev, ESCO_LINK))
		return;

4786 4787
	while (hdev->sco_cnt && (conn = hci_low_sent(hdev, ESCO_LINK,
						     &quote))) {
4788 4789
		while (quote-- && (skb = skb_dequeue(&conn->data_q))) {
			BT_DBG("skb %p len %d", skb, skb->len);
4790
			hci_send_frame(hdev, skb);
4791 4792 4793 4794 4795 4796 4797 4798

			conn->sent++;
			if (conn->sent == ~0)
				conn->sent = 0;
		}
	}
}

4799
static void hci_sched_le(struct hci_dev *hdev)
4800
{
4801
	struct hci_chan *chan;
4802
	struct sk_buff *skb;
4803
	int quote, cnt, tmp;
4804 4805 4806

	BT_DBG("%s", hdev->name);

4807 4808 4809
	if (!hci_conn_num(hdev, LE_LINK))
		return;

4810 4811 4812
	if (!test_bit(HCI_RAW, &hdev->flags)) {
		/* LE tx timeout must be longer than maximum
		 * link supervision timeout (40.9 seconds) */
4813
		if (!hdev->le_cnt && hdev->le_pkts &&
4814
		    time_after(jiffies, hdev->le_last_tx + HZ * 45))
4815
			hci_link_tx_to(hdev, LE_LINK);
4816 4817 4818
	}

	cnt = hdev->le_pkts ? hdev->le_cnt : hdev->acl_cnt;
4819
	tmp = cnt;
4820
	while (cnt && (chan = hci_chan_sent(hdev, LE_LINK, &quote))) {
4821 4822
		u32 priority = (skb_peek(&chan->data_q))->priority;
		while (quote-- && (skb = skb_peek(&chan->data_q))) {
4823
			BT_DBG("chan %p skb %p len %d priority %u", chan, skb,
4824
			       skb->len, skb->priority);
4825

4826 4827 4828 4829 4830 4831
			/* Stop if priority has changed */
			if (skb->priority < priority)
				break;

			skb = skb_dequeue(&chan->data_q);

4832
			hci_send_frame(hdev, skb);
4833 4834 4835
			hdev->le_last_tx = jiffies;

			cnt--;
4836 4837
			chan->sent++;
			chan->conn->sent++;
4838 4839
		}
	}
4840

4841 4842 4843 4844
	if (hdev->le_pkts)
		hdev->le_cnt = cnt;
	else
		hdev->acl_cnt = cnt;
4845 4846 4847

	if (cnt != tmp)
		hci_prio_recalculate(hdev, LE_LINK);
4848 4849
}

4850
static void hci_tx_work(struct work_struct *work)
L
Linus Torvalds 已提交
4851
{
4852
	struct hci_dev *hdev = container_of(work, struct hci_dev, tx_work);
L
Linus Torvalds 已提交
4853 4854
	struct sk_buff *skb;

4855
	BT_DBG("%s acl %d sco %d le %d", hdev->name, hdev->acl_cnt,
4856
	       hdev->sco_cnt, hdev->le_cnt);
L
Linus Torvalds 已提交
4857

4858 4859 4860 4861 4862 4863 4864
	if (!test_bit(HCI_USER_CHANNEL, &hdev->dev_flags)) {
		/* Schedule queues and send stuff to HCI driver */
		hci_sched_acl(hdev);
		hci_sched_sco(hdev);
		hci_sched_esco(hdev);
		hci_sched_le(hdev);
	}
4865

L
Linus Torvalds 已提交
4866 4867
	/* Send next queued raw (unknown type) packet */
	while ((skb = skb_dequeue(&hdev->raw_q)))
4868
		hci_send_frame(hdev, skb);
L
Linus Torvalds 已提交
4869 4870
}

L
Lucas De Marchi 已提交
4871
/* ----- HCI RX task (incoming data processing) ----- */
L
Linus Torvalds 已提交
4872 4873

/* ACL data packet */
4874
static void hci_acldata_packet(struct hci_dev *hdev, struct sk_buff *skb)
L
Linus Torvalds 已提交
4875 4876 4877 4878 4879 4880 4881 4882 4883 4884 4885
{
	struct hci_acl_hdr *hdr = (void *) skb->data;
	struct hci_conn *conn;
	__u16 handle, flags;

	skb_pull(skb, HCI_ACL_HDR_SIZE);

	handle = __le16_to_cpu(hdr->handle);
	flags  = hci_flags(handle);
	handle = hci_handle(handle);

4886
	BT_DBG("%s len %d handle 0x%4.4x flags 0x%4.4x", hdev->name, skb->len,
4887
	       handle, flags);
L
Linus Torvalds 已提交
4888 4889 4890 4891 4892 4893

	hdev->stat.acl_rx++;

	hci_dev_lock(hdev);
	conn = hci_conn_hash_lookup_handle(hdev, handle);
	hci_dev_unlock(hdev);
4894

L
Linus Torvalds 已提交
4895
	if (conn) {
4896
		hci_conn_enter_active_mode(conn, BT_POWER_FORCE_ACTIVE_OFF);
4897

L
Linus Torvalds 已提交
4898
		/* Send to upper protocol */
4899 4900
		l2cap_recv_acldata(conn, skb, flags);
		return;
L
Linus Torvalds 已提交
4901
	} else {
4902
		BT_ERR("%s ACL packet for unknown connection handle %d",
4903
		       hdev->name, handle);
L
Linus Torvalds 已提交
4904 4905 4906 4907 4908 4909
	}

	kfree_skb(skb);
}

/* SCO data packet */
4910
static void hci_scodata_packet(struct hci_dev *hdev, struct sk_buff *skb)
L
Linus Torvalds 已提交
4911 4912 4913 4914 4915 4916 4917 4918 4919
{
	struct hci_sco_hdr *hdr = (void *) skb->data;
	struct hci_conn *conn;
	__u16 handle;

	skb_pull(skb, HCI_SCO_HDR_SIZE);

	handle = __le16_to_cpu(hdr->handle);

4920
	BT_DBG("%s len %d handle 0x%4.4x", hdev->name, skb->len, handle);
L
Linus Torvalds 已提交
4921 4922 4923 4924 4925 4926 4927 4928 4929

	hdev->stat.sco_rx++;

	hci_dev_lock(hdev);
	conn = hci_conn_hash_lookup_handle(hdev, handle);
	hci_dev_unlock(hdev);

	if (conn) {
		/* Send to upper protocol */
4930 4931
		sco_recv_scodata(conn, skb);
		return;
L
Linus Torvalds 已提交
4932
	} else {
4933
		BT_ERR("%s SCO packet for unknown connection handle %d",
4934
		       hdev->name, handle);
L
Linus Torvalds 已提交
4935 4936 4937 4938 4939
	}

	kfree_skb(skb);
}

4940 4941 4942 4943 4944 4945 4946 4947 4948 4949 4950
static bool hci_req_is_complete(struct hci_dev *hdev)
{
	struct sk_buff *skb;

	skb = skb_peek(&hdev->cmd_q);
	if (!skb)
		return true;

	return bt_cb(skb)->req.start;
}

4951 4952 4953 4954 4955 4956 4957 4958 4959 4960 4961 4962 4963 4964 4965 4966 4967 4968 4969 4970 4971 4972
static void hci_resend_last(struct hci_dev *hdev)
{
	struct hci_command_hdr *sent;
	struct sk_buff *skb;
	u16 opcode;

	if (!hdev->sent_cmd)
		return;

	sent = (void *) hdev->sent_cmd->data;
	opcode = __le16_to_cpu(sent->opcode);
	if (opcode == HCI_OP_RESET)
		return;

	skb = skb_clone(hdev->sent_cmd, GFP_KERNEL);
	if (!skb)
		return;

	skb_queue_head(&hdev->cmd_q, skb);
	queue_work(hdev->workqueue, &hdev->cmd_work);
}

4973 4974 4975 4976 4977 4978 4979 4980
void hci_req_cmd_complete(struct hci_dev *hdev, u16 opcode, u8 status)
{
	hci_req_complete_t req_complete = NULL;
	struct sk_buff *skb;
	unsigned long flags;

	BT_DBG("opcode 0x%04x status 0x%02x", opcode, status);

4981 4982
	/* If the completed command doesn't match the last one that was
	 * sent we need to do special handling of it.
4983
	 */
4984 4985 4986 4987 4988 4989 4990 4991 4992 4993
	if (!hci_sent_cmd_data(hdev, opcode)) {
		/* Some CSR based controllers generate a spontaneous
		 * reset complete event during init and any pending
		 * command will never be completed. In such a case we
		 * need to resend whatever was the last sent
		 * command.
		 */
		if (test_bit(HCI_INIT, &hdev->flags) && opcode == HCI_OP_RESET)
			hci_resend_last(hdev);

4994
		return;
4995
	}
4996 4997 4998 4999 5000 5001 5002 5003 5004 5005 5006 5007 5008

	/* If the command succeeded and there's still more commands in
	 * this request the request is not yet complete.
	 */
	if (!status && !hci_req_is_complete(hdev))
		return;

	/* If this was the last command in a request the complete
	 * callback would be found in hdev->sent_cmd instead of the
	 * command queue (hdev->cmd_q).
	 */
	if (hdev->sent_cmd) {
		req_complete = bt_cb(hdev->sent_cmd)->req.complete;
5009 5010 5011 5012 5013 5014 5015 5016

		if (req_complete) {
			/* We must set the complete callback to NULL to
			 * avoid calling the callback more than once if
			 * this function gets called again.
			 */
			bt_cb(hdev->sent_cmd)->req.complete = NULL;

5017
			goto call_complete;
5018
		}
5019 5020 5021 5022 5023 5024 5025 5026 5027 5028 5029 5030 5031 5032 5033 5034 5035 5036 5037 5038
	}

	/* Remove all pending commands belonging to this request */
	spin_lock_irqsave(&hdev->cmd_q.lock, flags);
	while ((skb = __skb_dequeue(&hdev->cmd_q))) {
		if (bt_cb(skb)->req.start) {
			__skb_queue_head(&hdev->cmd_q, skb);
			break;
		}

		req_complete = bt_cb(skb)->req.complete;
		kfree_skb(skb);
	}
	spin_unlock_irqrestore(&hdev->cmd_q.lock, flags);

call_complete:
	if (req_complete)
		req_complete(hdev, status);
}

5039
static void hci_rx_work(struct work_struct *work)
L
Linus Torvalds 已提交
5040
{
5041
	struct hci_dev *hdev = container_of(work, struct hci_dev, rx_work);
L
Linus Torvalds 已提交
5042 5043 5044 5045 5046
	struct sk_buff *skb;

	BT_DBG("%s", hdev->name);

	while ((skb = skb_dequeue(&hdev->rx_q))) {
5047 5048 5049
		/* Send copy to monitor */
		hci_send_to_monitor(hdev, skb);

L
Linus Torvalds 已提交
5050 5051
		if (atomic_read(&hdev->promisc)) {
			/* Send copy to the sockets */
5052
			hci_send_to_sock(hdev, skb);
L
Linus Torvalds 已提交
5053 5054
		}

5055 5056
		if (test_bit(HCI_RAW, &hdev->flags) ||
		    test_bit(HCI_USER_CHANNEL, &hdev->dev_flags)) {
L
Linus Torvalds 已提交
5057 5058 5059 5060 5061 5062
			kfree_skb(skb);
			continue;
		}

		if (test_bit(HCI_INIT, &hdev->flags)) {
			/* Don't process data packets in this states. */
5063
			switch (bt_cb(skb)->pkt_type) {
L
Linus Torvalds 已提交
5064 5065 5066 5067
			case HCI_ACLDATA_PKT:
			case HCI_SCODATA_PKT:
				kfree_skb(skb);
				continue;
5068
			}
L
Linus Torvalds 已提交
5069 5070 5071
		}

		/* Process frame */
5072
		switch (bt_cb(skb)->pkt_type) {
L
Linus Torvalds 已提交
5073
		case HCI_EVENT_PKT:
5074
			BT_DBG("%s Event packet", hdev->name);
L
Linus Torvalds 已提交
5075 5076 5077 5078 5079 5080 5081 5082 5083 5084 5085 5086 5087 5088 5089 5090 5091 5092 5093 5094
			hci_event_packet(hdev, skb);
			break;

		case HCI_ACLDATA_PKT:
			BT_DBG("%s ACL data packet", hdev->name);
			hci_acldata_packet(hdev, skb);
			break;

		case HCI_SCODATA_PKT:
			BT_DBG("%s SCO data packet", hdev->name);
			hci_scodata_packet(hdev, skb);
			break;

		default:
			kfree_skb(skb);
			break;
		}
	}
}

5095
static void hci_cmd_work(struct work_struct *work)
L
Linus Torvalds 已提交
5096
{
5097
	struct hci_dev *hdev = container_of(work, struct hci_dev, cmd_work);
L
Linus Torvalds 已提交
5098 5099
	struct sk_buff *skb;

5100 5101
	BT_DBG("%s cmd_cnt %d cmd queued %d", hdev->name,
	       atomic_read(&hdev->cmd_cnt), skb_queue_len(&hdev->cmd_q));
L
Linus Torvalds 已提交
5102 5103

	/* Send queued commands */
5104 5105 5106 5107 5108
	if (atomic_read(&hdev->cmd_cnt)) {
		skb = skb_dequeue(&hdev->cmd_q);
		if (!skb)
			return;

5109
		kfree_skb(hdev->sent_cmd);
L
Linus Torvalds 已提交
5110

5111
		hdev->sent_cmd = skb_clone(skb, GFP_KERNEL);
A
Andrei Emeltchenko 已提交
5112
		if (hdev->sent_cmd) {
L
Linus Torvalds 已提交
5113
			atomic_dec(&hdev->cmd_cnt);
5114
			hci_send_frame(hdev, skb);
5115 5116 5117 5118
			if (test_bit(HCI_RESET, &hdev->flags))
				del_timer(&hdev->cmd_timer);
			else
				mod_timer(&hdev->cmd_timer,
5119
					  jiffies + HCI_CMD_TIMEOUT);
L
Linus Torvalds 已提交
5120 5121
		} else {
			skb_queue_head(&hdev->cmd_q, skb);
5122
			queue_work(hdev->workqueue, &hdev->cmd_work);
L
Linus Torvalds 已提交
5123 5124 5125
		}
	}
}
5126 5127 5128 5129 5130 5131 5132 5133 5134

void hci_req_add_le_scan_disable(struct hci_request *req)
{
	struct hci_cp_le_set_scan_enable cp;

	memset(&cp, 0, sizeof(cp));
	cp.enable = LE_SCAN_DISABLE;
	hci_req_add(req, HCI_OP_LE_SET_SCAN_ENABLE, sizeof(cp), &cp);
}
5135

5136 5137 5138 5139 5140 5141 5142 5143 5144 5145 5146 5147 5148 5149 5150 5151 5152 5153 5154 5155 5156 5157 5158 5159 5160 5161 5162 5163 5164 5165
void hci_req_add_le_passive_scan(struct hci_request *req)
{
	struct hci_cp_le_set_scan_param param_cp;
	struct hci_cp_le_set_scan_enable enable_cp;
	struct hci_dev *hdev = req->hdev;
	u8 own_addr_type;

	/* Set require_privacy to true to avoid identification from
	 * unknown peer devices. Since this is passive scanning, no
	 * SCAN_REQ using the local identity should be sent. Mandating
	 * privacy is just an extra precaution.
	 */
	if (hci_update_random_address(req, true, &own_addr_type))
		return;

	memset(&param_cp, 0, sizeof(param_cp));
	param_cp.type = LE_SCAN_PASSIVE;
	param_cp.interval = cpu_to_le16(hdev->le_scan_interval);
	param_cp.window = cpu_to_le16(hdev->le_scan_window);
	param_cp.own_address_type = own_addr_type;
	hci_req_add(req, HCI_OP_LE_SET_SCAN_PARAM, sizeof(param_cp),
		    &param_cp);

	memset(&enable_cp, 0, sizeof(enable_cp));
	enable_cp.enable = LE_SCAN_ENABLE;
	enable_cp.filter_dup = LE_SCAN_FILTER_DUP_DISABLE;
	hci_req_add(req, HCI_OP_LE_SET_SCAN_ENABLE, sizeof(enable_cp),
		    &enable_cp);
}

5166 5167 5168 5169 5170 5171 5172 5173 5174 5175 5176 5177 5178 5179 5180 5181 5182 5183 5184 5185 5186 5187 5188 5189 5190 5191 5192 5193 5194 5195 5196 5197 5198 5199 5200 5201 5202 5203 5204 5205 5206 5207 5208 5209 5210 5211 5212 5213 5214 5215
static void update_background_scan_complete(struct hci_dev *hdev, u8 status)
{
	if (status)
		BT_DBG("HCI request failed to update background scanning: "
		       "status 0x%2.2x", status);
}

/* This function controls the background scanning based on hdev->pend_le_conns
 * list. If there are pending LE connection we start the background scanning,
 * otherwise we stop it.
 *
 * This function requires the caller holds hdev->lock.
 */
void hci_update_background_scan(struct hci_dev *hdev)
{
	struct hci_request req;
	struct hci_conn *conn;
	int err;

	hci_req_init(&req, hdev);

	if (list_empty(&hdev->pend_le_conns)) {
		/* If there is no pending LE connections, we should stop
		 * the background scanning.
		 */

		/* If controller is not scanning we are done. */
		if (!test_bit(HCI_LE_SCAN, &hdev->dev_flags))
			return;

		hci_req_add_le_scan_disable(&req);

		BT_DBG("%s stopping background scanning", hdev->name);
	} else {
		/* If there is at least one pending LE connection, we should
		 * keep the background scan running.
		 */

		/* If controller is already scanning we are done. */
		if (test_bit(HCI_LE_SCAN, &hdev->dev_flags))
			return;

		/* If controller is connecting, we should not start scanning
		 * since some controllers are not able to scan and connect at
		 * the same time.
		 */
		conn = hci_conn_hash_lookup_state(hdev, LE_LINK, BT_CONNECT);
		if (conn)
			return;

5216
		hci_req_add_le_passive_scan(&req);
5217 5218 5219 5220 5221 5222 5223 5224

		BT_DBG("%s starting background scanning", hdev->name);
	}

	err = hci_req_run(&req, update_background_scan_complete);
	if (err)
		BT_ERR("Failed to run HCI request: err %d", err);
}