hci_core.c 73.3 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>
L
Linus Torvalds 已提交
30

31
#include <linux/rfkill.h>
L
Linus Torvalds 已提交
32 33 34 35

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

36
static void hci_rx_work(struct work_struct *work);
37
static void hci_cmd_work(struct work_struct *work);
38
static void hci_tx_work(struct work_struct *work);
L
Linus Torvalds 已提交
39 40 41 42 43 44 45 46 47

/* 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);

48 49 50
/* HCI ID Numbering */
static DEFINE_IDA(hci_index_ida);

L
Linus Torvalds 已提交
51 52
/* ---- HCI notifications ---- */

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

/* ---- HCI requests ---- */

60
static void hci_req_sync_complete(struct hci_dev *hdev, u8 result)
L
Linus Torvalds 已提交
61
{
62
	BT_DBG("%s result 0x%2.2x", hdev->name, result);
L
Linus Torvalds 已提交
63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82

	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);
	}
}

/* Execute request and wait for completion. */
83
static int __hci_req_sync(struct hci_dev *hdev,
84 85
			  void (*func)(struct hci_request *req,
				      unsigned long opt),
86
			  unsigned long opt, __u32 timeout)
L
Linus Torvalds 已提交
87
{
88
	struct hci_request req;
L
Linus Torvalds 已提交
89 90 91 92 93
	DECLARE_WAITQUEUE(wait, current);
	int err = 0;

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

94 95
	hci_req_init(&req, hdev);

L
Linus Torvalds 已提交
96 97 98 99 100
	hdev->req_status = HCI_REQ_PEND;

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

101
	func(&req, opt);
102

103 104
	err = hci_req_run(&req, hci_req_sync_complete);
	if (err < 0) {
105 106
		hdev->req_status = 0;
		remove_wait_queue(&hdev->req_wait_q, &wait);
107 108 109 110 111 112 113
		/* req_run will fail if the request did not add any
		 * commands to the queue, something that 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.
		 */
		return 0;
114 115
	}

L
Linus Torvalds 已提交
116 117 118 119 120 121 122 123 124
	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:
125
		err = -bt_to_errno(hdev->req_result);
L
Linus Torvalds 已提交
126 127 128 129 130 131 132 133 134
		break;

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

	default:
		err = -ETIMEDOUT;
		break;
135
	}
L
Linus Torvalds 已提交
136

137
	hdev->req_status = hdev->req_result = 0;
L
Linus Torvalds 已提交
138 139 140 141 142 143

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

	return err;
}

144
static int hci_req_sync(struct hci_dev *hdev,
145 146
			void (*req)(struct hci_request *req,
				    unsigned long opt),
147
			unsigned long opt, __u32 timeout)
L
Linus Torvalds 已提交
148 149 150
{
	int ret;

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

L
Linus Torvalds 已提交
154 155
	/* Serialize all requests */
	hci_req_lock(hdev);
156
	ret = __hci_req_sync(hdev, req, opt, timeout);
L
Linus Torvalds 已提交
157 158 159 160 161
	hci_req_unlock(hdev);

	return ret;
}

162
static void hci_reset_req(struct hci_request *req, unsigned long opt)
L
Linus Torvalds 已提交
163
{
164
	BT_DBG("%s %ld", req->hdev->name, opt);
L
Linus Torvalds 已提交
165 166

	/* Reset device */
167 168
	set_bit(HCI_RESET, &req->hdev->flags);
	hci_req_add(req, HCI_OP_RESET, 0, NULL);
L
Linus Torvalds 已提交
169 170
}

171
static void bredr_init(struct hci_request *req)
L
Linus Torvalds 已提交
172
{
173
	req->hdev->flow_ctl_mode = HCI_FLOW_CTL_MODE_PACKET_BASED;
174

L
Linus Torvalds 已提交
175
	/* Read Local Supported Features */
176
	hci_req_add(req, HCI_OP_READ_LOCAL_FEATURES, 0, NULL);
L
Linus Torvalds 已提交
177

178
	/* Read Local Version */
179
	hci_req_add(req, HCI_OP_READ_LOCAL_VERSION, 0, NULL);
180 181

	/* Read BD Address */
182
	hci_req_add(req, HCI_OP_READ_BD_ADDR, 0, NULL);
L
Linus Torvalds 已提交
183 184
}

185
static void amp_init(struct hci_request *req)
186
{
187
	req->hdev->flow_ctl_mode = HCI_FLOW_CTL_MODE_BLOCK_BASED;
188

189
	/* Read Local Version */
190
	hci_req_add(req, HCI_OP_READ_LOCAL_VERSION, 0, NULL);
191 192

	/* Read Local AMP Info */
193
	hci_req_add(req, HCI_OP_READ_LOCAL_AMP_INFO, 0, NULL);
194 195

	/* Read Data Blk size */
196
	hci_req_add(req, HCI_OP_READ_DATA_BLOCK_SIZE, 0, NULL);
197 198
}

199
static void hci_init1_req(struct hci_request *req, unsigned long opt)
200
{
201 202
	struct hci_dev *hdev = req->hdev;
	struct hci_request init_req;
203 204 205 206 207 208
	struct sk_buff *skb;

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

	/* Driver initialization */

209 210
	hci_req_init(&init_req, hdev);

211 212 213 214 215
	/* Special commands */
	while ((skb = skb_dequeue(&hdev->driver_init))) {
		bt_cb(skb)->pkt_type = HCI_COMMAND_PKT;
		skb->dev = (void *) hdev;

216 217 218 219
		if (skb_queue_empty(&init_req.cmd_q))
			bt_cb(skb)->req.start = true;

		skb_queue_tail(&init_req.cmd_q, skb);
220 221 222
	}
	skb_queue_purge(&hdev->driver_init);

223 224
	hci_req_run(&init_req, NULL);

225 226
	/* Reset */
	if (!test_bit(HCI_QUIRK_RESET_ON_CLOSE, &hdev->quirks))
227
		hci_reset_req(req, 0);
228

229 230
	switch (hdev->dev_type) {
	case HCI_BREDR:
231
		bredr_init(req);
232 233 234
		break;

	case HCI_AMP:
235
		amp_init(req);
236 237 238 239 240 241 242 243
		break;

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

244
static void bredr_setup(struct hci_request *req)
245 246 247 248 249 250
{
	struct hci_cp_delete_stored_link_key cp;
	__le16 param;
	__u8 flt_type;

	/* Read Buffer Size (ACL mtu, max pkt, etc.) */
251
	hci_req_add(req, HCI_OP_READ_BUFFER_SIZE, 0, NULL);
252 253

	/* Read Class of Device */
254
	hci_req_add(req, HCI_OP_READ_CLASS_OF_DEV, 0, NULL);
255 256

	/* Read Local Name */
257
	hci_req_add(req, HCI_OP_READ_LOCAL_NAME, 0, NULL);
258 259

	/* Read Voice Setting */
260
	hci_req_add(req, HCI_OP_READ_VOICE_SETTING, 0, NULL);
261 262 263

	/* Clear Event Filters */
	flt_type = HCI_FLT_CLEAR_ALL;
264
	hci_req_add(req, HCI_OP_SET_EVENT_FLT, 1, &flt_type);
265 266 267

	/* Connection accept timeout ~20 secs */
	param = __constant_cpu_to_le16(0x7d00);
268
	hci_req_add(req, HCI_OP_WRITE_CA_TIMEOUT, 2, &param);
269 270 271

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

275
static void le_setup(struct hci_request *req)
276 277
{
	/* Read LE Buffer Size */
278
	hci_req_add(req, HCI_OP_LE_READ_BUFFER_SIZE, 0, NULL);
279 280

	/* Read LE Local Supported Features */
281
	hci_req_add(req, HCI_OP_LE_READ_LOCAL_FEATURES, 0, NULL);
282 283

	/* Read LE Advertising Channel TX Power */
284
	hci_req_add(req, HCI_OP_LE_READ_ADV_TX_POWER, 0, NULL);
285 286

	/* Read LE White List Size */
287
	hci_req_add(req, HCI_OP_LE_READ_WHITE_LIST_SIZE, 0, NULL);
288 289

	/* Read LE Supported States */
290
	hci_req_add(req, HCI_OP_LE_READ_SUPPORTED_STATES, 0, NULL);
291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320
}

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;
}

321
static void hci_setup_inquiry_mode(struct hci_request *req)
322 323 324
{
	u8 mode;

325
	mode = hci_get_inquiry_mode(req->hdev);
326

327
	hci_req_add(req, HCI_OP_WRITE_INQUIRY_MODE, 1, &mode);
328 329
}

330
static void hci_setup_event_mask(struct hci_request *req)
331
{
332 333
	struct hci_dev *hdev = req->hdev;

334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 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
	/* 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 */
	}

	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 */

389
	hci_req_add(req, HCI_OP_SET_EVENT_MASK, sizeof(events), events);
390 391 392 393

	if (lmp_le_capable(hdev)) {
		memset(events, 0, sizeof(events));
		events[0] = 0x1f;
394 395
		hci_req_add(req, HCI_OP_LE_SET_EVENT_MASK,
			    sizeof(events), events);
396 397 398
	}
}

399
static void hci_init2_req(struct hci_request *req, unsigned long opt)
400
{
401 402
	struct hci_dev *hdev = req->hdev;

403
	if (lmp_bredr_capable(hdev))
404
		bredr_setup(req);
405 406

	if (lmp_le_capable(hdev))
407
		le_setup(req);
408

409
	hci_setup_event_mask(req);
410 411

	if (hdev->hci_ver > BLUETOOTH_VER_1_1)
412
		hci_req_add(req, HCI_OP_READ_LOCAL_COMMANDS, 0, NULL);
413 414 415 416

	if (lmp_ssp_capable(hdev)) {
		if (test_bit(HCI_SSP_ENABLED, &hdev->dev_flags)) {
			u8 mode = 0x01;
417 418
			hci_req_add(req, HCI_OP_WRITE_SSP_MODE,
				    sizeof(mode), &mode);
419 420 421 422 423 424
		} else {
			struct hci_cp_write_eir cp;

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

425
			hci_req_add(req, HCI_OP_WRITE_EIR, sizeof(cp), &cp);
426 427 428 429
		}
	}

	if (lmp_inq_rssi_capable(hdev))
430
		hci_setup_inquiry_mode(req);
431 432

	if (lmp_inq_tx_pwr_capable(hdev))
433
		hci_req_add(req, HCI_OP_READ_INQ_RSP_TX_POWER, 0, NULL);
434 435 436 437 438

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

		cp.page = 0x01;
439 440
		hci_req_add(req, HCI_OP_READ_LOCAL_EXT_FEATURES,
			    sizeof(cp), &cp);
441 442 443 444
	}

	if (test_bit(HCI_LINK_SECURITY, &hdev->dev_flags)) {
		u8 enable = 1;
445 446
		hci_req_add(req, HCI_OP_WRITE_AUTH_ENABLE, sizeof(enable),
			    &enable);
447 448 449
	}
}

450
static void hci_setup_link_policy(struct hci_request *req)
451
{
452
	struct hci_dev *hdev = req->hdev;
453 454 455 456 457 458 459 460 461 462 463 464 465
	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);
466
	hci_req_add(req, HCI_OP_WRITE_DEF_LINK_POLICY, sizeof(cp), &cp);
467 468
}

469
static void hci_set_le_support(struct hci_request *req)
470
{
471
	struct hci_dev *hdev = req->hdev;
472 473 474 475 476 477 478 479 480 481
	struct hci_cp_write_le_host_supported cp;

	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))
482 483
		hci_req_add(req, HCI_OP_WRITE_LE_HOST_SUPPORTED, sizeof(cp),
			    &cp);
484 485
}

486
static void hci_init3_req(struct hci_request *req, unsigned long opt)
487
{
488 489
	struct hci_dev *hdev = req->hdev;

490
	if (hdev->commands[5] & 0x10)
491
		hci_setup_link_policy(req);
492 493

	if (lmp_le_capable(hdev))
494
		hci_set_le_support(req);
495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518
}

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;

	/* 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;

	return __hci_req_sync(hdev, hci_init3_req, 0, HCI_INIT_TIMEOUT);
}

519
static void hci_scan_req(struct hci_request *req, unsigned long opt)
L
Linus Torvalds 已提交
520 521 522
{
	__u8 scan = opt;

523
	BT_DBG("%s %x", req->hdev->name, scan);
L
Linus Torvalds 已提交
524 525

	/* Inquiry and Page scans */
526
	hci_req_add(req, HCI_OP_WRITE_SCAN_ENABLE, 1, &scan);
L
Linus Torvalds 已提交
527 528
}

529
static void hci_auth_req(struct hci_request *req, unsigned long opt)
L
Linus Torvalds 已提交
530 531 532
{
	__u8 auth = opt;

533
	BT_DBG("%s %x", req->hdev->name, auth);
L
Linus Torvalds 已提交
534 535

	/* Authentication */
536
	hci_req_add(req, HCI_OP_WRITE_AUTH_ENABLE, 1, &auth);
L
Linus Torvalds 已提交
537 538
}

539
static void hci_encrypt_req(struct hci_request *req, unsigned long opt)
L
Linus Torvalds 已提交
540 541 542
{
	__u8 encrypt = opt;

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

545
	/* Encryption */
546
	hci_req_add(req, HCI_OP_WRITE_ENCRYPT_MODE, 1, &encrypt);
L
Linus Torvalds 已提交
547 548
}

549
static void hci_linkpol_req(struct hci_request *req, unsigned long opt)
550 551 552
{
	__le16 policy = cpu_to_le16(opt);

553
	BT_DBG("%s %x", req->hdev->name, policy);
554 555

	/* Default link policy */
556
	hci_req_add(req, HCI_OP_WRITE_DEF_LINK_POLICY, 2, &policy);
557 558
}

559
/* Get HCI device by index.
L
Linus Torvalds 已提交
560 561 562
 * Device is held on return. */
struct hci_dev *hci_dev_get(int index)
{
563
	struct hci_dev *hdev = NULL, *d;
L
Linus Torvalds 已提交
564 565 566 567 568 569 570

	BT_DBG("%d", index);

	if (index < 0)
		return NULL;

	read_lock(&hci_dev_list_lock);
571
	list_for_each_entry(d, &hci_dev_list, list) {
L
Linus Torvalds 已提交
572 573 574 575 576 577 578 579 580 581
		if (d->id == index) {
			hdev = hci_dev_hold(d);
			break;
		}
	}
	read_unlock(&hci_dev_list_lock);
	return hdev;
}

/* ---- Inquiry support ---- */
582

583 584 585 586
bool hci_discovery_active(struct hci_dev *hdev)
{
	struct discovery_state *discov = &hdev->discovery;

A
Andre Guedes 已提交
587
	switch (discov->state) {
588
	case DISCOVERY_FINDING:
A
Andre Guedes 已提交
589
	case DISCOVERY_RESOLVING:
590 591
		return true;

A
Andre Guedes 已提交
592 593 594
	default:
		return false;
	}
595 596
}

597 598 599 600 601 602 603 604 605
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:
606 607
		if (hdev->discovery.state != DISCOVERY_STARTING)
			mgmt_discovering(hdev, 0);
608 609 610
		break;
	case DISCOVERY_STARTING:
		break;
611
	case DISCOVERY_FINDING:
612 613
		mgmt_discovering(hdev, 1);
		break;
614 615
	case DISCOVERY_RESOLVING:
		break;
616 617 618 619 620 621 622
	case DISCOVERY_STOPPING:
		break;
	}

	hdev->discovery.state = state;
}

L
Linus Torvalds 已提交
623 624
static void inquiry_cache_flush(struct hci_dev *hdev)
{
625
	struct discovery_state *cache = &hdev->discovery;
626
	struct inquiry_entry *p, *n;
L
Linus Torvalds 已提交
627

628 629
	list_for_each_entry_safe(p, n, &cache->all, all) {
		list_del(&p->all);
630
		kfree(p);
L
Linus Torvalds 已提交
631
	}
632 633 634

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

637 638
struct inquiry_entry *hci_inquiry_cache_lookup(struct hci_dev *hdev,
					       bdaddr_t *bdaddr)
L
Linus Torvalds 已提交
639
{
640
	struct discovery_state *cache = &hdev->discovery;
L
Linus Torvalds 已提交
641 642
	struct inquiry_entry *e;

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

645 646 647 648 649 650 651 652 653
	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,
654
						       bdaddr_t *bdaddr)
655
{
656
	struct discovery_state *cache = &hdev->discovery;
657 658
	struct inquiry_entry *e;

659
	BT_DBG("cache %p, %pMR", cache, bdaddr);
660 661

	list_for_each_entry(e, &cache->unknown, list) {
L
Linus Torvalds 已提交
662
		if (!bacmp(&e->data.bdaddr, bdaddr))
663 664 665 666
			return e;
	}

	return NULL;
L
Linus Torvalds 已提交
667 668
}

669
struct inquiry_entry *hci_inquiry_cache_lookup_resolve(struct hci_dev *hdev,
670 671
						       bdaddr_t *bdaddr,
						       int state)
672 673 674 675
{
	struct discovery_state *cache = &hdev->discovery;
	struct inquiry_entry *e;

676
	BT_DBG("cache %p bdaddr %pMR state %d", cache, bdaddr, state);
677 678 679 680 681 682 683 684 685 686 687

	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;
}

688
void hci_inquiry_cache_update_resolve(struct hci_dev *hdev,
689
				      struct inquiry_entry *ie)
690 691 692 693 694 695 696 697 698
{
	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 &&
699
		    abs(p->data.rssi) >= abs(ie->data.rssi))
700 701 702 703 704 705 706
			break;
		pos = &p->list;
	}

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

707
bool hci_inquiry_cache_update(struct hci_dev *hdev, struct inquiry_data *data,
708
			      bool name_known, bool *ssp)
L
Linus Torvalds 已提交
709
{
710
	struct discovery_state *cache = &hdev->discovery;
A
Andrei Emeltchenko 已提交
711
	struct inquiry_entry *ie;
L
Linus Torvalds 已提交
712

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

715 716
	hci_remove_remote_oob_data(hdev, &data->bdaddr);

717 718 719
	if (ssp)
		*ssp = data->ssp_mode;

A
Andrei Emeltchenko 已提交
720
	ie = hci_inquiry_cache_lookup(hdev, &data->bdaddr);
721
	if (ie) {
722 723 724
		if (ie->data.ssp_mode && ssp)
			*ssp = true;

725
		if (ie->name_state == NAME_NEEDED &&
726
		    data->rssi != ie->data.rssi) {
727 728 729 730
			ie->data.rssi = data->rssi;
			hci_inquiry_cache_update_resolve(hdev, ie);
		}

731
		goto update;
732
	}
733 734 735 736

	/* Entry not in the cache. Add new one. */
	ie = kzalloc(sizeof(struct inquiry_entry), GFP_ATOMIC);
	if (!ie)
737
		return false;
738 739 740 741 742 743 744 745 746

	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 已提交
747

748 749
update:
	if (name_known && ie->name_state != NAME_KNOWN &&
750
	    ie->name_state != NAME_PENDING) {
751 752
		ie->name_state = NAME_KNOWN;
		list_del(&ie->list);
L
Linus Torvalds 已提交
753 754
	}

A
Andrei Emeltchenko 已提交
755 756
	memcpy(&ie->data, data, sizeof(*data));
	ie->timestamp = jiffies;
L
Linus Torvalds 已提交
757
	cache->timestamp = jiffies;
758 759 760 761 762

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

	return true;
L
Linus Torvalds 已提交
763 764 765 766
}

static int inquiry_cache_dump(struct hci_dev *hdev, int num, __u8 *buf)
{
767
	struct discovery_state *cache = &hdev->discovery;
L
Linus Torvalds 已提交
768 769 770 771
	struct inquiry_info *info = (struct inquiry_info *) buf;
	struct inquiry_entry *e;
	int copied = 0;

772
	list_for_each_entry(e, &cache->all, all) {
L
Linus Torvalds 已提交
773
		struct inquiry_data *data = &e->data;
774 775 776 777

		if (copied >= num)
			break;

L
Linus Torvalds 已提交
778 779 780 781 782 783
		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;
784

L
Linus Torvalds 已提交
785
		info++;
786
		copied++;
L
Linus Torvalds 已提交
787 788 789 790 791 792
	}

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

793
static void hci_inq_req(struct hci_request *req, unsigned long opt)
L
Linus Torvalds 已提交
794 795
{
	struct hci_inquiry_req *ir = (struct hci_inquiry_req *) opt;
796
	struct hci_dev *hdev = req->hdev;
L
Linus Torvalds 已提交
797 798 799 800 801 802 803 804 805 806 807
	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;
808
	hci_req_add(req, HCI_OP_INQUIRY, sizeof(cp), &cp);
L
Linus Torvalds 已提交
809 810 811 812 813 814 815 816 817 818 819 820 821 822
}

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;

823 824
	hdev = hci_dev_get(ir.dev_id);
	if (!hdev)
L
Linus Torvalds 已提交
825 826
		return -ENODEV;

827
	hci_dev_lock(hdev);
828
	if (inquiry_cache_age(hdev) > INQUIRY_CACHE_AGE_MAX ||
829
	    inquiry_cache_empty(hdev) || ir.flags & IREQ_CACHE_FLUSH) {
L
Linus Torvalds 已提交
830 831 832
		inquiry_cache_flush(hdev);
		do_inquiry = 1;
	}
833
	hci_dev_unlock(hdev);
L
Linus Torvalds 已提交
834

835
	timeo = ir.length * msecs_to_jiffies(2000);
A
Andrei Emeltchenko 已提交
836 837

	if (do_inquiry) {
838 839
		err = hci_req_sync(hdev, hci_inq_req, (unsigned long) &ir,
				   timeo);
A
Andrei Emeltchenko 已提交
840 841 842
		if (err < 0)
			goto done;
	}
L
Linus Torvalds 已提交
843

844 845 846
	/* for unlimited number of responses we will use buffer with
	 * 255 entries
	 */
L
Linus Torvalds 已提交
847 848 849 850 851
	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.
	 */
852
	buf = kmalloc(sizeof(struct inquiry_info) * max_rsp, GFP_KERNEL);
A
Andrei Emeltchenko 已提交
853
	if (!buf) {
L
Linus Torvalds 已提交
854 855 856 857
		err = -ENOMEM;
		goto done;
	}

858
	hci_dev_lock(hdev);
L
Linus Torvalds 已提交
859
	ir.num_rsp = inquiry_cache_dump(hdev, max_rsp, buf);
860
	hci_dev_unlock(hdev);
L
Linus Torvalds 已提交
861 862 863 864 865 866

	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) *
867
				 ir.num_rsp))
L
Linus Torvalds 已提交
868
			err = -EFAULT;
869
	} else
L
Linus Torvalds 已提交
870 871 872 873 874 875 876 877 878
		err = -EFAULT;

	kfree(buf);

done:
	hci_dev_put(hdev);
	return err;
}

879 880 881 882 883 884 885 886 887 888 889 890 891 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
static u8 create_ad(struct hci_dev *hdev, u8 *ptr)
{
	u8 ad_len = 0, flags = 0;
	size_t name_len;

	if (test_bit(HCI_LE_PERIPHERAL, &hdev->dev_flags))
		flags |= LE_AD_GENERAL;

	if (!lmp_bredr_capable(hdev))
		flags |= LE_AD_NO_BREDR;

	if (lmp_le_br_capable(hdev))
		flags |= LE_AD_SIM_LE_BREDR_CTRL;

	if (lmp_host_le_br_capable(hdev))
		flags |= LE_AD_SIM_LE_BREDR_HOST;

	if (flags) {
		BT_DBG("adv flags 0x%02x", flags);

		ptr[0] = 2;
		ptr[1] = EIR_FLAGS;
		ptr[2] = flags;

		ad_len += 3;
		ptr += 3;
	}

	if (hdev->adv_tx_power != HCI_TX_POWER_INVALID) {
		ptr[0] = 2;
		ptr[1] = EIR_TX_POWER;
		ptr[2] = (u8) hdev->adv_tx_power;

		ad_len += 3;
		ptr += 3;
	}

	name_len = strlen(hdev->dev_name);
	if (name_len > 0) {
		size_t max_len = HCI_MAX_AD_LENGTH - ad_len - 2;

		if (name_len > max_len) {
			name_len = max_len;
			ptr[1] = EIR_NAME_SHORT;
		} else
			ptr[1] = EIR_NAME_COMPLETE;

		ptr[0] = name_len + 1;

		memcpy(ptr + 2, hdev->dev_name, name_len);

		ad_len += (name_len + 2);
		ptr += (name_len + 2);
	}

	return ad_len;
}

int hci_update_ad(struct hci_dev *hdev)
{
	struct hci_cp_le_set_adv_data cp;
	u8 len;
	int err;

	hci_dev_lock(hdev);

	if (!lmp_le_capable(hdev)) {
		err = -EINVAL;
		goto unlock;
	}

	memset(&cp, 0, sizeof(cp));

	len = create_ad(hdev, cp.data);

	if (hdev->adv_data_len == len &&
	    memcmp(cp.data, hdev->adv_data, len) == 0) {
		err = 0;
		goto unlock;
	}

	memcpy(hdev->adv_data, cp.data, sizeof(cp.data));
	hdev->adv_data_len = len;

	cp.length = len;
	err = hci_send_cmd(hdev, HCI_OP_LE_SET_ADV_DATA, sizeof(cp), &cp);

unlock:
	hci_dev_unlock(hdev);

	return err;
}

L
Linus Torvalds 已提交
972 973 974 975 976 977 978
/* ---- HCI ioctl helpers ---- */

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

979 980
	hdev = hci_dev_get(dev);
	if (!hdev)
L
Linus Torvalds 已提交
981 982 983 984 985 986
		return -ENODEV;

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

	hci_req_lock(hdev);

987 988 989 990 991
	if (test_bit(HCI_UNREGISTER, &hdev->dev_flags)) {
		ret = -ENODEV;
		goto done;
	}

992 993 994 995 996
	if (hdev->rfkill && rfkill_blocked(hdev->rfkill)) {
		ret = -ERFKILL;
		goto done;
	}

L
Linus Torvalds 已提交
997 998 999 1000 1001 1002 1003 1004
	if (test_bit(HCI_UP, &hdev->flags)) {
		ret = -EALREADY;
		goto done;
	}

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

1005 1006 1007
	/* Treat all non BR/EDR controllers as raw devices if
	   enable_hs is not set */
	if (hdev->dev_type != HCI_BREDR && !enable_hs)
1008 1009
		set_bit(HCI_RAW, &hdev->flags);

L
Linus Torvalds 已提交
1010 1011 1012 1013 1014 1015 1016 1017
	if (hdev->open(hdev)) {
		ret = -EIO;
		goto done;
	}

	if (!test_bit(HCI_RAW, &hdev->flags)) {
		atomic_set(&hdev->cmd_cnt, 1);
		set_bit(HCI_INIT, &hdev->flags);
1018
		ret = __hci_init(hdev);
L
Linus Torvalds 已提交
1019 1020 1021 1022 1023 1024 1025
		clear_bit(HCI_INIT, &hdev->flags);
	}

	if (!ret) {
		hci_dev_hold(hdev);
		set_bit(HCI_UP, &hdev->flags);
		hci_notify(hdev, HCI_DEV_UP);
1026
		hci_update_ad(hdev);
1027 1028
		if (!test_bit(HCI_SETUP, &hdev->dev_flags) &&
		    mgmt_valid_hdev(hdev)) {
1029
			hci_dev_lock(hdev);
1030
			mgmt_powered(hdev, 1);
1031
			hci_dev_unlock(hdev);
1032
		}
1033
	} else {
L
Linus Torvalds 已提交
1034
		/* Init failed, cleanup */
1035
		flush_work(&hdev->tx_work);
1036
		flush_work(&hdev->cmd_work);
1037
		flush_work(&hdev->rx_work);
L
Linus Torvalds 已提交
1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063

		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);
	hci_dev_put(hdev);
	return ret;
}

static int hci_dev_do_close(struct hci_dev *hdev)
{
	BT_DBG("%s %p", hdev->name, hdev);

A
Andre Guedes 已提交
1064 1065
	cancel_work_sync(&hdev->le_scan);

1066 1067
	cancel_delayed_work(&hdev->power_off);

L
Linus Torvalds 已提交
1068 1069 1070 1071
	hci_req_cancel(hdev, ENODEV);
	hci_req_lock(hdev);

	if (!test_and_clear_bit(HCI_UP, &hdev->flags)) {
1072
		del_timer_sync(&hdev->cmd_timer);
L
Linus Torvalds 已提交
1073 1074 1075 1076
		hci_req_unlock(hdev);
		return 0;
	}

1077 1078
	/* Flush RX and TX works */
	flush_work(&hdev->tx_work);
1079
	flush_work(&hdev->rx_work);
L
Linus Torvalds 已提交
1080

1081
	if (hdev->discov_timeout > 0) {
1082
		cancel_delayed_work(&hdev->discov_off);
1083
		hdev->discov_timeout = 0;
1084
		clear_bit(HCI_DISCOVERABLE, &hdev->dev_flags);
1085 1086
	}

1087
	if (test_and_clear_bit(HCI_SERVICE_CACHE, &hdev->dev_flags))
1088 1089
		cancel_delayed_work(&hdev->service_cache);

A
Andre Guedes 已提交
1090 1091
	cancel_delayed_work_sync(&hdev->le_scan_disable);

1092
	hci_dev_lock(hdev);
L
Linus Torvalds 已提交
1093 1094
	inquiry_cache_flush(hdev);
	hci_conn_hash_flush(hdev);
1095
	hci_dev_unlock(hdev);
L
Linus Torvalds 已提交
1096 1097 1098 1099 1100 1101 1102 1103 1104

	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);
1105
	if (!test_bit(HCI_RAW, &hdev->flags) &&
1106
	    test_bit(HCI_QUIRK_RESET_ON_CLOSE, &hdev->quirks)) {
L
Linus Torvalds 已提交
1107
		set_bit(HCI_INIT, &hdev->flags);
1108
		__hci_req_sync(hdev, hci_reset_req, 0, HCI_CMD_TIMEOUT);
L
Linus Torvalds 已提交
1109 1110 1111
		clear_bit(HCI_INIT, &hdev->flags);
	}

1112 1113
	/* flush cmd  work */
	flush_work(&hdev->cmd_work);
L
Linus Torvalds 已提交
1114 1115 1116 1117 1118 1119 1120 1121

	/* 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) {
1122
		del_timer_sync(&hdev->cmd_timer);
L
Linus Torvalds 已提交
1123 1124 1125 1126 1127 1128 1129 1130
		kfree_skb(hdev->sent_cmd);
		hdev->sent_cmd = NULL;
	}

	/* After this point our queues are empty
	 * and no tasks are scheduled. */
	hdev->close(hdev);

1131 1132
	if (!test_and_clear_bit(HCI_AUTO_OFF, &hdev->dev_flags) &&
	    mgmt_valid_hdev(hdev)) {
1133 1134 1135 1136
		hci_dev_lock(hdev);
		mgmt_powered(hdev, 0);
		hci_dev_unlock(hdev);
	}
1137

L
Linus Torvalds 已提交
1138 1139 1140
	/* Clear flags */
	hdev->flags = 0;

1141 1142 1143
	/* Controller radio is available but is currently powered down */
	hdev->amp_status = 0;

1144
	memset(hdev->eir, 0, sizeof(hdev->eir));
1145
	memset(hdev->dev_class, 0, sizeof(hdev->dev_class));
1146

L
Linus Torvalds 已提交
1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157
	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 已提交
1158 1159
	hdev = hci_dev_get(dev);
	if (!hdev)
L
Linus Torvalds 已提交
1160
		return -ENODEV;
1161 1162 1163 1164

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

L
Linus Torvalds 已提交
1165
	err = hci_dev_do_close(hdev);
1166

L
Linus Torvalds 已提交
1167 1168 1169 1170 1171 1172 1173 1174 1175
	hci_dev_put(hdev);
	return err;
}

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

A
Andrei Emeltchenko 已提交
1176 1177
	hdev = hci_dev_get(dev);
	if (!hdev)
L
Linus Torvalds 已提交
1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188
		return -ENODEV;

	hci_req_lock(hdev);

	if (!test_bit(HCI_UP, &hdev->flags))
		goto done;

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

1189
	hci_dev_lock(hdev);
L
Linus Torvalds 已提交
1190 1191
	inquiry_cache_flush(hdev);
	hci_conn_hash_flush(hdev);
1192
	hci_dev_unlock(hdev);
L
Linus Torvalds 已提交
1193 1194 1195 1196

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

1197
	atomic_set(&hdev->cmd_cnt, 1);
1198
	hdev->acl_cnt = 0; hdev->sco_cnt = 0; hdev->le_cnt = 0;
L
Linus Torvalds 已提交
1199 1200

	if (!test_bit(HCI_RAW, &hdev->flags))
1201
		ret = __hci_req_sync(hdev, hci_reset_req, 0, HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
1202 1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213

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 已提交
1214 1215
	hdev = hci_dev_get(dev);
	if (!hdev)
L
Linus Torvalds 已提交
1216 1217 1218 1219 1220 1221 1222 1223 1224 1225 1226 1227 1228 1229 1230 1231 1232 1233
		return -ENODEV;

	memset(&hdev->stat, 0, sizeof(struct hci_dev_stats));

	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 已提交
1234 1235
	hdev = hci_dev_get(dr.dev_id);
	if (!hdev)
L
Linus Torvalds 已提交
1236 1237 1238 1239
		return -ENODEV;

	switch (cmd) {
	case HCISETAUTH:
1240 1241
		err = hci_req_sync(hdev, hci_auth_req, dr.dev_opt,
				   HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
1242 1243 1244 1245 1246 1247 1248 1249 1250 1251
		break;

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

		if (!test_bit(HCI_AUTH, &hdev->flags)) {
			/* Auth must be enabled first */
1252 1253
			err = hci_req_sync(hdev, hci_auth_req, dr.dev_opt,
					   HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
1254 1255 1256 1257
			if (err)
				break;
		}

1258 1259
		err = hci_req_sync(hdev, hci_encrypt_req, dr.dev_opt,
				   HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
1260 1261 1262
		break;

	case HCISETSCAN:
1263 1264
		err = hci_req_sync(hdev, hci_scan_req, dr.dev_opt,
				   HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
1265 1266 1267
		break;

	case HCISETLINKPOL:
1268 1269
		err = hci_req_sync(hdev, hci_linkpol_req, dr.dev_opt,
				   HCI_INIT_TIMEOUT);
L
Linus Torvalds 已提交
1270 1271 1272
		break;

	case HCISETLINKMODE:
1273 1274 1275 1276 1277 1278
		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 已提交
1279 1280 1281
		break;

	case HCISETACLMTU:
1282 1283
		hdev->acl_mtu  = *((__u16 *) &dr.dev_opt + 1);
		hdev->acl_pkts = *((__u16 *) &dr.dev_opt + 0);
L
Linus Torvalds 已提交
1284 1285 1286
		break;

	case HCISETSCOMTU:
1287 1288
		hdev->sco_mtu  = *((__u16 *) &dr.dev_opt + 1);
		hdev->sco_pkts = *((__u16 *) &dr.dev_opt + 0);
L
Linus Torvalds 已提交
1289 1290 1291 1292 1293 1294
		break;

	default:
		err = -EINVAL;
		break;
	}
1295

L
Linus Torvalds 已提交
1296 1297 1298 1299 1300 1301
	hci_dev_put(hdev);
	return err;
}

int hci_get_dev_list(void __user *arg)
{
1302
	struct hci_dev *hdev;
L
Linus Torvalds 已提交
1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315
	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 已提交
1316 1317
	dl = kzalloc(size, GFP_KERNEL);
	if (!dl)
L
Linus Torvalds 已提交
1318 1319 1320 1321
		return -ENOMEM;

	dr = dl->dev_req;

1322
	read_lock(&hci_dev_list_lock);
1323
	list_for_each_entry(hdev, &hci_dev_list, list) {
1324
		if (test_and_clear_bit(HCI_AUTO_OFF, &hdev->dev_flags))
1325
			cancel_delayed_work(&hdev->power_off);
1326

1327 1328
		if (!test_bit(HCI_MGMT, &hdev->dev_flags))
			set_bit(HCI_PAIRABLE, &hdev->dev_flags);
1329

L
Linus Torvalds 已提交
1330 1331
		(dr + n)->dev_id  = hdev->id;
		(dr + n)->dev_opt = hdev->flags;
1332

L
Linus Torvalds 已提交
1333 1334 1335
		if (++n >= dev_num)
			break;
	}
1336
	read_unlock(&hci_dev_list_lock);
L
Linus Torvalds 已提交
1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354 1355

	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 已提交
1356 1357
	hdev = hci_dev_get(di.dev_id);
	if (!hdev)
L
Linus Torvalds 已提交
1358 1359
		return -ENODEV;

1360
	if (test_and_clear_bit(HCI_AUTO_OFF, &hdev->dev_flags))
1361
		cancel_delayed_work_sync(&hdev->power_off);
1362

1363 1364
	if (!test_bit(HCI_MGMT, &hdev->dev_flags))
		set_bit(HCI_PAIRABLE, &hdev->dev_flags);
1365

L
Linus Torvalds 已提交
1366 1367
	strcpy(di.name, hdev->name);
	di.bdaddr   = hdev->bdaddr;
1368
	di.type     = (hdev->bus & 0x0f) | (hdev->dev_type << 4);
L
Linus Torvalds 已提交
1369 1370
	di.flags    = hdev->flags;
	di.pkt_type = hdev->pkt_type;
1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381
	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 已提交
1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397
	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 ---- */

1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415
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);

	if (!blocked)
		return 0;

	hci_dev_do_close(hdev);

	return 0;
}

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

1416 1417 1418 1419 1420 1421 1422 1423 1424
static void hci_power_on(struct work_struct *work)
{
	struct hci_dev *hdev = container_of(work, struct hci_dev, power_on);

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

	if (hci_dev_open(hdev->id) < 0)
		return;

1425
	if (test_bit(HCI_AUTO_OFF, &hdev->dev_flags))
1426 1427
		queue_delayed_work(hdev->req_workqueue, &hdev->power_off,
				   HCI_AUTO_OFF_TIMEOUT);
1428

1429
	if (test_and_clear_bit(HCI_SETUP, &hdev->dev_flags))
1430
		mgmt_index_added(hdev);
1431 1432 1433 1434
}

static void hci_power_off(struct work_struct *work)
{
1435
	struct hci_dev *hdev = container_of(work, struct hci_dev,
1436
					    power_off.work);
1437 1438 1439

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

1440
	hci_dev_do_close(hdev);
1441 1442
}

1443 1444 1445 1446 1447 1448 1449 1450 1451
static void hci_discov_off(struct work_struct *work)
{
	struct hci_dev *hdev;
	u8 scan = SCAN_PAGE;

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

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

1452
	hci_dev_lock(hdev);
1453 1454 1455 1456 1457

	hci_send_cmd(hdev, HCI_OP_WRITE_SCAN_ENABLE, sizeof(scan), &scan);

	hdev->discov_timeout = 0;

1458
	hci_dev_unlock(hdev);
1459 1460
}

1461 1462
int hci_uuids_clear(struct hci_dev *hdev)
{
1463
	struct bt_uuid *uuid, *tmp;
1464

1465 1466
	list_for_each_entry_safe(uuid, tmp, &hdev->uuids, list) {
		list_del(&uuid->list);
1467 1468 1469 1470 1471 1472
		kfree(uuid);
	}

	return 0;
}

1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488
int hci_link_keys_clear(struct hci_dev *hdev)
{
	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);
	}

	return 0;
}

1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500
int hci_smp_ltks_clear(struct hci_dev *hdev)
{
	struct smp_ltk *k, *tmp;

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

	return 0;
}

1501 1502
struct link_key *hci_find_link_key(struct hci_dev *hdev, bdaddr_t *bdaddr)
{
1503
	struct link_key *k;
1504

1505
	list_for_each_entry(k, &hdev->link_keys, list)
1506 1507 1508 1509 1510 1511
		if (bacmp(bdaddr, &k->bdaddr) == 0)
			return k;

	return NULL;
}

1512
static bool hci_persistent_key(struct hci_dev *hdev, struct hci_conn *conn,
1513
			       u8 key_type, u8 old_key_type)
1514 1515 1516
{
	/* Legacy key */
	if (key_type < 0x03)
1517
		return true;
1518 1519 1520

	/* Debug keys are insecure so don't store them persistently */
	if (key_type == HCI_LK_DEBUG_COMBINATION)
1521
		return false;
1522 1523 1524

	/* Changed combination key and there's no previous one */
	if (key_type == HCI_LK_CHANGED_COMBINATION && old_key_type == 0xff)
1525
		return false;
1526 1527 1528

	/* Security mode 3 case */
	if (!conn)
1529
		return true;
1530 1531 1532

	/* Neither local nor remote side had no-bonding as requirement */
	if (conn->auth_type > 0x01 && conn->remote_auth > 0x01)
1533
		return true;
1534 1535 1536

	/* Local side had dedicated bonding as requirement */
	if (conn->auth_type == 0x02 || conn->auth_type == 0x03)
1537
		return true;
1538 1539 1540

	/* Remote side had dedicated bonding as requirement */
	if (conn->remote_auth == 0x02 || conn->remote_auth == 0x03)
1541
		return true;
1542 1543 1544

	/* If none of the above criteria match, then don't store the key
	 * persistently */
1545
	return false;
1546 1547
}

1548
struct smp_ltk *hci_find_ltk(struct hci_dev *hdev, __le16 ediv, u8 rand[8])
1549
{
1550
	struct smp_ltk *k;
1551

1552 1553
	list_for_each_entry(k, &hdev->long_term_keys, list) {
		if (k->ediv != ediv ||
1554
		    memcmp(rand, k->rand, sizeof(k->rand)))
1555 1556
			continue;

1557
		return k;
1558 1559 1560 1561 1562
	}

	return NULL;
}

1563
struct smp_ltk *hci_find_ltk_by_addr(struct hci_dev *hdev, bdaddr_t *bdaddr,
1564
				     u8 addr_type)
1565
{
1566
	struct smp_ltk *k;
1567

1568 1569
	list_for_each_entry(k, &hdev->long_term_keys, list)
		if (addr_type == k->bdaddr_type &&
1570
		    bacmp(bdaddr, &k->bdaddr) == 0)
1571 1572 1573 1574 1575
			return k;

	return NULL;
}

1576
int hci_add_link_key(struct hci_dev *hdev, struct hci_conn *conn, int new_key,
1577
		     bdaddr_t *bdaddr, u8 *val, u8 type, u8 pin_len)
1578 1579
{
	struct link_key *key, *old_key;
1580 1581
	u8 old_key_type;
	bool persistent;
1582 1583 1584 1585 1586 1587

	old_key = hci_find_link_key(hdev, bdaddr);
	if (old_key) {
		old_key_type = old_key->type;
		key = old_key;
	} else {
1588
		old_key_type = conn ? conn->key_type : 0xff;
1589 1590 1591 1592 1593 1594
		key = kzalloc(sizeof(*key), GFP_ATOMIC);
		if (!key)
			return -ENOMEM;
		list_add(&key->list, &hdev->link_keys);
	}

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

1597 1598 1599 1600
	/* 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 &&
1601
	    (!conn || conn->remote_auth == 0xff) && old_key_type == 0xff) {
1602
		type = HCI_LK_COMBINATION;
1603 1604 1605
		if (conn)
			conn->key_type = type;
	}
1606

1607
	bacpy(&key->bdaddr, bdaddr);
1608
	memcpy(key->val, val, HCI_LINK_KEY_SIZE);
1609 1610
	key->pin_len = pin_len;

1611
	if (type == HCI_LK_CHANGED_COMBINATION)
1612
		key->type = old_key_type;
1613 1614 1615
	else
		key->type = type;

1616 1617 1618 1619 1620
	if (!new_key)
		return 0;

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

1621
	mgmt_new_link_key(hdev, key, persistent);
1622

1623 1624
	if (conn)
		conn->flush_key = !persistent;
1625 1626 1627 1628

	return 0;
}

1629
int hci_add_ltk(struct hci_dev *hdev, bdaddr_t *bdaddr, u8 addr_type, u8 type,
1630
		int new_key, u8 authenticated, u8 tk[16], u8 enc_size, __le16
1631
		ediv, u8 rand[8])
1632
{
1633
	struct smp_ltk *key, *old_key;
1634

1635 1636
	if (!(type & HCI_SMP_STK) && !(type & HCI_SMP_LTK))
		return 0;
1637

1638 1639
	old_key = hci_find_ltk_by_addr(hdev, bdaddr, addr_type);
	if (old_key)
1640
		key = old_key;
1641 1642
	else {
		key = kzalloc(sizeof(*key), GFP_ATOMIC);
1643 1644
		if (!key)
			return -ENOMEM;
1645
		list_add(&key->list, &hdev->long_term_keys);
1646 1647 1648
	}

	bacpy(&key->bdaddr, bdaddr);
1649 1650 1651 1652 1653 1654 1655
	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));
1656

1657 1658
	if (!new_key)
		return 0;
1659

1660 1661 1662
	if (type & HCI_SMP_LTK)
		mgmt_new_ltk(hdev, key, 1);

1663 1664 1665
	return 0;
}

1666 1667 1668 1669 1670 1671 1672 1673
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;

1674
	BT_DBG("%s removing %pMR", hdev->name, bdaddr);
1675 1676 1677 1678 1679 1680 1681

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

	return 0;
}

1682 1683 1684 1685 1686 1687 1688 1689
int hci_remove_ltk(struct hci_dev *hdev, bdaddr_t *bdaddr)
{
	struct smp_ltk *k, *tmp;

	list_for_each_entry_safe(k, tmp, &hdev->long_term_keys, list) {
		if (bacmp(bdaddr, &k->bdaddr))
			continue;

1690
		BT_DBG("%s removing %pMR", hdev->name, bdaddr);
1691 1692 1693 1694 1695 1696 1697 1698

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

	return 0;
}

1699
/* HCI command timer function */
1700
static void hci_cmd_timeout(unsigned long arg)
1701 1702 1703
{
	struct hci_dev *hdev = (void *) arg;

1704 1705 1706 1707 1708 1709 1710 1711 1712
	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);
	}

1713
	atomic_set(&hdev->cmd_cnt, 1);
1714
	queue_work(hdev->workqueue, &hdev->cmd_work);
1715 1716
}

1717
struct oob_data *hci_find_remote_oob_data(struct hci_dev *hdev,
1718
					  bdaddr_t *bdaddr)
1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736
{
	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;

1737
	BT_DBG("%s removing %pMR", hdev->name, bdaddr);
1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757

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

	return 0;
}

int hci_remote_oob_data_clear(struct hci_dev *hdev)
{
	struct oob_data *data, *n;

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

	return 0;
}

int hci_add_remote_oob_data(struct hci_dev *hdev, bdaddr_t *bdaddr, u8 *hash,
1758
			    u8 *randomizer)
1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775
{
	struct oob_data *data;

	data = hci_find_remote_oob_data(hdev, bdaddr);

	if (!data) {
		data = kmalloc(sizeof(*data), GFP_ATOMIC);
		if (!data)
			return -ENOMEM;

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

	memcpy(data->hash, hash, sizeof(data->hash));
	memcpy(data->randomizer, randomizer, sizeof(data->randomizer));

1776
	BT_DBG("%s for %pMR", hdev->name, bdaddr);
1777 1778 1779 1780

	return 0;
}

1781
struct bdaddr_list *hci_blacklist_lookup(struct hci_dev *hdev, bdaddr_t *bdaddr)
1782
{
1783
	struct bdaddr_list *b;
1784

1785
	list_for_each_entry(b, &hdev->blacklist, list)
1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807
		if (bacmp(bdaddr, &b->bdaddr) == 0)
			return b;

	return NULL;
}

int hci_blacklist_clear(struct hci_dev *hdev)
{
	struct list_head *p, *n;

	list_for_each_safe(p, n, &hdev->blacklist) {
		struct bdaddr_list *b;

		b = list_entry(p, struct bdaddr_list, list);

		list_del(p);
		kfree(b);
	}

	return 0;
}

1808
int hci_blacklist_add(struct hci_dev *hdev, bdaddr_t *bdaddr, u8 type)
1809 1810 1811 1812 1813 1814
{
	struct bdaddr_list *entry;

	if (bacmp(bdaddr, BDADDR_ANY) == 0)
		return -EBADF;

1815 1816
	if (hci_blacklist_lookup(hdev, bdaddr))
		return -EEXIST;
1817 1818

	entry = kzalloc(sizeof(struct bdaddr_list), GFP_KERNEL);
1819 1820
	if (!entry)
		return -ENOMEM;
1821 1822 1823 1824 1825

	bacpy(&entry->bdaddr, bdaddr);

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

1826
	return mgmt_device_blocked(hdev, bdaddr, type);
1827 1828
}

1829
int hci_blacklist_del(struct hci_dev *hdev, bdaddr_t *bdaddr, u8 type)
1830 1831 1832
{
	struct bdaddr_list *entry;

1833
	if (bacmp(bdaddr, BDADDR_ANY) == 0)
1834
		return hci_blacklist_clear(hdev);
1835 1836

	entry = hci_blacklist_lookup(hdev, bdaddr);
1837
	if (!entry)
1838
		return -ENOENT;
1839 1840 1841 1842

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

1843
	return mgmt_device_unblocked(hdev, bdaddr, type);
1844 1845
}

1846
static void le_scan_param_req(struct hci_request *req, unsigned long opt)
A
Andre Guedes 已提交
1847 1848 1849 1850 1851 1852 1853 1854 1855
{
	struct le_scan_params *param =  (struct le_scan_params *) opt;
	struct hci_cp_le_set_scan_param cp;

	memset(&cp, 0, sizeof(cp));
	cp.type = param->type;
	cp.interval = cpu_to_le16(param->interval);
	cp.window = cpu_to_le16(param->window);

1856
	hci_req_add(req, HCI_OP_LE_SET_SCAN_PARAM, sizeof(cp), &cp);
A
Andre Guedes 已提交
1857 1858
}

1859
static void le_scan_enable_req(struct hci_request *req, unsigned long opt)
A
Andre Guedes 已提交
1860 1861 1862 1863 1864
{
	struct hci_cp_le_set_scan_enable cp;

	memset(&cp, 0, sizeof(cp));
	cp.enable = 1;
1865
	cp.filter_dup = 1;
A
Andre Guedes 已提交
1866

1867
	hci_req_add(req, HCI_OP_LE_SET_SCAN_ENABLE, sizeof(cp), &cp);
A
Andre Guedes 已提交
1868 1869 1870
}

static int hci_do_le_scan(struct hci_dev *hdev, u8 type, u16 interval,
1871
			  u16 window, int timeout)
A
Andre Guedes 已提交
1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887
{
	long timeo = msecs_to_jiffies(3000);
	struct le_scan_params param;
	int err;

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

	if (test_bit(HCI_LE_SCAN, &hdev->dev_flags))
		return -EINPROGRESS;

	param.type = type;
	param.interval = interval;
	param.window = window;

	hci_req_lock(hdev);

1888 1889
	err = __hci_req_sync(hdev, le_scan_param_req, (unsigned long) &param,
			     timeo);
A
Andre Guedes 已提交
1890
	if (!err)
1891
		err = __hci_req_sync(hdev, le_scan_enable_req, 0, timeo);
A
Andre Guedes 已提交
1892 1893 1894 1895 1896 1897

	hci_req_unlock(hdev);

	if (err < 0)
		return err;

1898 1899
	queue_delayed_work(hdev->workqueue, &hdev->le_scan_disable,
			   msecs_to_jiffies(timeout));
A
Andre Guedes 已提交
1900 1901 1902 1903

	return 0;
}

1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921
int hci_cancel_le_scan(struct hci_dev *hdev)
{
	BT_DBG("%s", hdev->name);

	if (!test_bit(HCI_LE_SCAN, &hdev->dev_flags))
		return -EALREADY;

	if (cancel_delayed_work(&hdev->le_scan_disable)) {
		struct hci_cp_le_set_scan_enable cp;

		/* Send HCI command to disable LE Scan */
		memset(&cp, 0, sizeof(cp));
		hci_send_cmd(hdev, HCI_OP_LE_SET_SCAN_ENABLE, sizeof(cp), &cp);
	}

	return 0;
}

A
Andre Guedes 已提交
1922 1923 1924
static void le_scan_disable_work(struct work_struct *work)
{
	struct hci_dev *hdev = container_of(work, struct hci_dev,
1925
					    le_scan_disable.work);
A
Andre Guedes 已提交
1926 1927 1928 1929 1930 1931 1932 1933 1934
	struct hci_cp_le_set_scan_enable cp;

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

	memset(&cp, 0, sizeof(cp));

	hci_send_cmd(hdev, HCI_OP_LE_SET_SCAN_ENABLE, sizeof(cp), &cp);
}

A
Andre Guedes 已提交
1935 1936 1937 1938 1939 1940 1941
static void le_scan_work(struct work_struct *work)
{
	struct hci_dev *hdev = container_of(work, struct hci_dev, le_scan);
	struct le_scan_params *param = &hdev->le_scan_params;

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

1942 1943
	hci_do_le_scan(hdev, param->type, param->interval, param->window,
		       param->timeout);
A
Andre Guedes 已提交
1944 1945 1946
}

int hci_le_scan(struct hci_dev *hdev, u8 type, u16 interval, u16 window,
1947
		int timeout)
A
Andre Guedes 已提交
1948 1949 1950 1951 1952
{
	struct le_scan_params *param = &hdev->le_scan_params;

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

1953 1954 1955
	if (test_bit(HCI_LE_PERIPHERAL, &hdev->dev_flags))
		return -ENOTSUPP;

A
Andre Guedes 已提交
1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968
	if (work_busy(&hdev->le_scan))
		return -EINPROGRESS;

	param->type = type;
	param->interval = interval;
	param->window = window;
	param->timeout = timeout;

	queue_work(system_long_wq, &hdev->le_scan);

	return 0;
}

1969 1970 1971 1972 1973 1974 1975 1976 1977
/* 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;

1978 1979 1980 1981
	hdev->pkt_type  = (HCI_DM1 | HCI_DH1 | HCI_HV1);
	hdev->esco_type = (ESCO_HV1);
	hdev->link_mode = (HCI_LM_ACCEPT);
	hdev->io_capability = 0x03; /* No Input No Output */
1982 1983
	hdev->inq_tx_power = HCI_TX_POWER_INVALID;
	hdev->adv_tx_power = HCI_TX_POWER_INVALID;
1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996

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

	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);
	INIT_LIST_HEAD(&hdev->remote_oob_data);
1997
	INIT_LIST_HEAD(&hdev->conn_hash.list);
1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008

	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_WORK(&hdev->le_scan, le_scan_work);

	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);

2009
	skb_queue_head_init(&hdev->driver_init);
2010 2011 2012 2013 2014 2015
	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);

2016
	setup_timer(&hdev->cmd_timer, hci_cmd_timeout, (unsigned long) hdev);
2017 2018 2019

	hci_init_sysfs(hdev);
	discovery_init(hdev);
2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034

	return hdev;
}
EXPORT_SYMBOL(hci_alloc_dev);

/* Free HCI device */
void hci_free_dev(struct hci_dev *hdev)
{
	skb_queue_purge(&hdev->driver_init);

	/* will free via device release */
	put_device(&hdev->dev);
}
EXPORT_SYMBOL(hci_free_dev);

L
Linus Torvalds 已提交
2035 2036 2037
/* Register HCI device */
int hci_register_dev(struct hci_dev *hdev)
{
2038
	int id, error;
L
Linus Torvalds 已提交
2039

2040
	if (!hdev->open || !hdev->close)
L
Linus Torvalds 已提交
2041 2042
		return -EINVAL;

2043 2044 2045
	/* Do not allow HCI_AMP devices to register at index 0,
	 * so the index can be used as the AMP controller ID.
	 */
2046 2047 2048 2049 2050 2051 2052 2053 2054
	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 已提交
2055
	}
2056

2057 2058 2059
	if (id < 0)
		return id;

L
Linus Torvalds 已提交
2060 2061
	sprintf(hdev->name, "hci%d", id);
	hdev->id = id;
2062 2063 2064

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

2065 2066
	write_lock(&hci_dev_list_lock);
	list_add(&hdev->list, &hci_dev_list);
2067
	write_unlock(&hci_dev_list_lock);
L
Linus Torvalds 已提交
2068

2069
	hdev->workqueue = alloc_workqueue(hdev->name, WQ_HIGHPRI | WQ_UNBOUND |
2070
					  WQ_MEM_RECLAIM, 1);
2071 2072 2073 2074
	if (!hdev->workqueue) {
		error = -ENOMEM;
		goto err;
	}
2075

2076 2077 2078 2079 2080 2081 2082 2083 2084
	hdev->req_workqueue = alloc_workqueue(hdev->name,
					      WQ_HIGHPRI | WQ_UNBOUND |
					      WQ_MEM_RECLAIM, 1);
	if (!hdev->req_workqueue) {
		destroy_workqueue(hdev->workqueue);
		error = -ENOMEM;
		goto err;
	}

2085 2086 2087
	error = hci_add_sysfs(hdev);
	if (error < 0)
		goto err_wqueue;
L
Linus Torvalds 已提交
2088

2089
	hdev->rfkill = rfkill_alloc(hdev->name, &hdev->dev,
2090 2091
				    RFKILL_TYPE_BLUETOOTH, &hci_rfkill_ops,
				    hdev);
2092 2093 2094 2095 2096 2097 2098
	if (hdev->rfkill) {
		if (rfkill_register(hdev->rfkill) < 0) {
			rfkill_destroy(hdev->rfkill);
			hdev->rfkill = NULL;
		}
	}

2099
	set_bit(HCI_SETUP, &hdev->dev_flags);
2100 2101 2102 2103

	if (hdev->dev_type != HCI_AMP)
		set_bit(HCI_AUTO_OFF, &hdev->dev_flags);

L
Linus Torvalds 已提交
2104
	hci_notify(hdev, HCI_DEV_REG);
2105
	hci_dev_hold(hdev);
L
Linus Torvalds 已提交
2106

2107
	queue_work(hdev->req_workqueue, &hdev->power_on);
2108

L
Linus Torvalds 已提交
2109
	return id;
2110

2111 2112
err_wqueue:
	destroy_workqueue(hdev->workqueue);
2113
	destroy_workqueue(hdev->req_workqueue);
2114
err:
2115
	ida_simple_remove(&hci_index_ida, hdev->id);
2116
	write_lock(&hci_dev_list_lock);
2117
	list_del(&hdev->list);
2118
	write_unlock(&hci_dev_list_lock);
2119

2120
	return error;
L
Linus Torvalds 已提交
2121 2122 2123 2124
}
EXPORT_SYMBOL(hci_register_dev);

/* Unregister HCI device */
2125
void hci_unregister_dev(struct hci_dev *hdev)
L
Linus Torvalds 已提交
2126
{
2127
	int i, id;
2128

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

2131 2132
	set_bit(HCI_UNREGISTER, &hdev->dev_flags);

2133 2134
	id = hdev->id;

2135
	write_lock(&hci_dev_list_lock);
L
Linus Torvalds 已提交
2136
	list_del(&hdev->list);
2137
	write_unlock(&hci_dev_list_lock);
L
Linus Torvalds 已提交
2138 2139 2140

	hci_dev_do_close(hdev);

2141
	for (i = 0; i < NUM_REASSEMBLY; i++)
2142 2143
		kfree_skb(hdev->reassembly[i]);

2144 2145
	cancel_work_sync(&hdev->power_on);

2146
	if (!test_bit(HCI_INIT, &hdev->flags) &&
2147
	    !test_bit(HCI_SETUP, &hdev->dev_flags)) {
2148
		hci_dev_lock(hdev);
2149
		mgmt_index_removed(hdev);
2150
		hci_dev_unlock(hdev);
2151
	}
2152

2153 2154 2155 2156
	/* mgmt_index_removed should take care of emptying the
	 * pending list */
	BUG_ON(!list_empty(&hdev->mgmt_pending));

L
Linus Torvalds 已提交
2157 2158
	hci_notify(hdev, HCI_DEV_UNREG);

2159 2160 2161 2162 2163
	if (hdev->rfkill) {
		rfkill_unregister(hdev->rfkill);
		rfkill_destroy(hdev->rfkill);
	}

2164
	hci_del_sysfs(hdev);
2165

2166
	destroy_workqueue(hdev->workqueue);
2167
	destroy_workqueue(hdev->req_workqueue);
2168

2169
	hci_dev_lock(hdev);
2170
	hci_blacklist_clear(hdev);
2171
	hci_uuids_clear(hdev);
2172
	hci_link_keys_clear(hdev);
2173
	hci_smp_ltks_clear(hdev);
2174
	hci_remote_oob_data_clear(hdev);
2175
	hci_dev_unlock(hdev);
2176

2177
	hci_dev_put(hdev);
2178 2179

	ida_simple_remove(&hci_index_ida, id);
L
Linus Torvalds 已提交
2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195 2196 2197 2198
}
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);

2199 2200 2201 2202 2203
/* Receive frame from HCI drivers */
int hci_recv_frame(struct sk_buff *skb)
{
	struct hci_dev *hdev = (struct hci_dev *) skb->dev;
	if (!hdev || (!test_bit(HCI_UP, &hdev->flags)
2204
		      && !test_bit(HCI_INIT, &hdev->flags))) {
2205 2206 2207 2208
		kfree_skb(skb);
		return -ENXIO;
	}

2209
	/* Incoming skb */
2210 2211 2212 2213 2214 2215
	bt_cb(skb)->incoming = 1;

	/* Time stamp */
	__net_timestamp(skb);

	skb_queue_tail(&hdev->rx_q, skb);
2216
	queue_work(hdev->workqueue, &hdev->rx_work);
2217

2218 2219 2220 2221
	return 0;
}
EXPORT_SYMBOL(hci_recv_frame);

2222
static int hci_reassembly(struct hci_dev *hdev, int type, void *data,
2223
			  int count, __u8 index)
2224 2225 2226 2227 2228 2229 2230 2231
{
	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) ||
2232
	    index >= NUM_REASSEMBLY)
2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252
		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;
		}

2253
		skb = bt_skb_alloc(len, GFP_ATOMIC);
2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266
		if (!skb)
			return -ENOMEM;

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

		skb->dev = (void *) hdev;
		hdev->reassembly[index] = skb;
	}

	while (count) {
		scb = (void *) skb->cb;
2267
		len = min_t(uint, scb->expect, count);
2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299 2300 2301 2302 2303 2304 2305 2306 2307 2308 2309 2310 2311 2312 2313 2314 2315 2316 2317 2318 2319 2320 2321 2322 2323 2324 2325 2326 2327 2328 2329 2330

		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;
			hci_recv_frame(skb);

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

	return remain;
}

2331 2332
int hci_recv_fragment(struct hci_dev *hdev, int type, void *data, int count)
{
2333 2334
	int rem = 0;

2335 2336 2337
	if (type < HCI_ACLDATA_PKT || type > HCI_EVENT_PKT)
		return -EILSEQ;

2338
	while (count) {
2339
		rem = hci_reassembly(hdev, type, data, count, type - 1);
2340 2341
		if (rem < 0)
			return rem;
2342

2343 2344
		data += (count - rem);
		count = rem;
J
Joe Perches 已提交
2345
	}
2346

2347
	return rem;
2348 2349 2350
}
EXPORT_SYMBOL(hci_recv_fragment);

2351 2352 2353 2354 2355 2356 2357
#define STREAM_REASSEMBLY 0

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

2358
	while (count) {
2359 2360 2361 2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372
		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;

2373
		rem = hci_reassembly(hdev, type, data, count,
2374
				     STREAM_REASSEMBLY);
2375 2376 2377 2378 2379
		if (rem < 0)
			return rem;

		data += (count - rem);
		count = rem;
J
Joe Perches 已提交
2380
	}
2381 2382 2383 2384 2385

	return rem;
}
EXPORT_SYMBOL(hci_recv_stream_fragment);

L
Linus Torvalds 已提交
2386 2387 2388 2389 2390 2391
/* ---- Interface to upper protocols ---- */

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

2392
	write_lock(&hci_cb_list_lock);
L
Linus Torvalds 已提交
2393
	list_add(&cb->list, &hci_cb_list);
2394
	write_unlock(&hci_cb_list_lock);
L
Linus Torvalds 已提交
2395 2396 2397 2398 2399 2400 2401 2402 2403

	return 0;
}
EXPORT_SYMBOL(hci_register_cb);

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

2404
	write_lock(&hci_cb_list_lock);
L
Linus Torvalds 已提交
2405
	list_del(&cb->list);
2406
	write_unlock(&hci_cb_list_lock);
L
Linus Torvalds 已提交
2407 2408 2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420

	return 0;
}
EXPORT_SYMBOL(hci_unregister_cb);

static int hci_send_frame(struct sk_buff *skb)
{
	struct hci_dev *hdev = (struct hci_dev *) skb->dev;

	if (!hdev) {
		kfree_skb(skb);
		return -ENODEV;
	}

2421
	BT_DBG("%s type %d len %d", hdev->name, bt_cb(skb)->pkt_type, skb->len);
L
Linus Torvalds 已提交
2422

2423 2424
	/* Time stamp */
	__net_timestamp(skb);
L
Linus Torvalds 已提交
2425

2426 2427 2428 2429 2430
	/* Send copy to monitor */
	hci_send_to_monitor(hdev, skb);

	if (atomic_read(&hdev->promisc)) {
		/* Send copy to the sockets */
2431
		hci_send_to_sock(hdev, skb);
L
Linus Torvalds 已提交
2432 2433 2434 2435 2436 2437 2438 2439
	}

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

	return hdev->send(skb);
}

2440 2441 2442 2443 2444 2445 2446 2447 2448 2449 2450 2451 2452 2453 2454 2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469
void hci_req_init(struct hci_request *req, struct hci_dev *hdev)
{
	skb_queue_head_init(&req->cmd_q);
	req->hdev = hdev;
}

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));

	/* Do not allow empty requests */
	if (skb_queue_empty(&req->cmd_q))
		return -EINVAL;

	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;
}

2470 2471
static struct sk_buff *hci_prepare_cmd(struct hci_dev *hdev, u16 opcode,
				       u32 plen, void *param)
L
Linus Torvalds 已提交
2472 2473 2474 2475 2476 2477
{
	int len = HCI_COMMAND_HDR_SIZE + plen;
	struct hci_command_hdr *hdr;
	struct sk_buff *skb;

	skb = bt_skb_alloc(len, GFP_ATOMIC);
2478 2479
	if (!skb)
		return NULL;
L
Linus Torvalds 已提交
2480 2481

	hdr = (struct hci_command_hdr *) skb_put(skb, HCI_COMMAND_HDR_SIZE);
2482
	hdr->opcode = cpu_to_le16(opcode);
L
Linus Torvalds 已提交
2483 2484 2485 2486 2487 2488 2489
	hdr->plen   = plen;

	if (plen)
		memcpy(skb_put(skb, plen), param, plen);

	BT_DBG("skb len %d", skb->len);

2490
	bt_cb(skb)->pkt_type = HCI_COMMAND_PKT;
L
Linus Torvalds 已提交
2491
	skb->dev = (void *) hdev;
2492

2493 2494 2495 2496 2497 2498 2499 2500 2501 2502 2503 2504 2505 2506 2507 2508
	return skb;
}

/* Send HCI command */
int hci_send_cmd(struct hci_dev *hdev, __u16 opcode, __u32 plen, void *param)
{
	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;
	}

2509 2510 2511 2512 2513
	/* Stand-alone HCI commands must be flaged as
	 * single-command requests.
	 */
	bt_cb(skb)->req.start = true;

L
Linus Torvalds 已提交
2514
	skb_queue_tail(&hdev->cmd_q, skb);
2515
	queue_work(hdev->workqueue, &hdev->cmd_work);
L
Linus Torvalds 已提交
2516 2517 2518 2519

	return 0;
}

2520 2521 2522 2523 2524 2525 2526 2527 2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541
/* Queue a command to an asynchronous HCI request */
int hci_req_add(struct hci_request *req, u16 opcode, u32 plen, void *param)
{
	struct hci_dev *hdev = req->hdev;
	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;
	}

	if (skb_queue_empty(&req->cmd_q))
		bt_cb(skb)->req.start = true;

	skb_queue_tail(&req->cmd_q, skb);

	return 0;
}

L
Linus Torvalds 已提交
2542
/* Get data from the previously sent command */
2543
void *hci_sent_cmd_data(struct hci_dev *hdev, __u16 opcode)
L
Linus Torvalds 已提交
2544 2545 2546 2547 2548 2549 2550 2551
{
	struct hci_command_hdr *hdr;

	if (!hdev->sent_cmd)
		return NULL;

	hdr = (void *) hdev->sent_cmd->data;

2552
	if (hdr->opcode != cpu_to_le16(opcode))
L
Linus Torvalds 已提交
2553 2554
		return NULL;

2555
	BT_DBG("%s opcode 0x%4.4x", hdev->name, opcode);
L
Linus Torvalds 已提交
2556 2557 2558 2559 2560 2561 2562 2563 2564 2565

	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;

2566 2567
	skb_push(skb, HCI_ACL_HDR_SIZE);
	skb_reset_transport_header(skb);
2568
	hdr = (struct hci_acl_hdr *)skb_transport_header(skb);
2569 2570
	hdr->handle = cpu_to_le16(hci_handle_pack(handle, flags));
	hdr->dlen   = cpu_to_le16(len);
L
Linus Torvalds 已提交
2571 2572
}

2573
static void hci_queue_acl(struct hci_chan *chan, struct sk_buff_head *queue,
2574
			  struct sk_buff *skb, __u16 flags)
L
Linus Torvalds 已提交
2575
{
2576
	struct hci_conn *conn = chan->conn;
L
Linus Torvalds 已提交
2577 2578 2579
	struct hci_dev *hdev = conn->hdev;
	struct sk_buff *list;

2580 2581 2582 2583
	skb->len = skb_headlen(skb);
	skb->data_len = 0;

	bt_cb(skb)->pkt_type = HCI_ACLDATA_PKT;
2584 2585 2586 2587 2588 2589 2590 2591 2592 2593 2594 2595

	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;
	}
2596

A
Andrei Emeltchenko 已提交
2597 2598
	list = skb_shinfo(skb)->frag_list;
	if (!list) {
L
Linus Torvalds 已提交
2599 2600 2601
		/* Non fragmented */
		BT_DBG("%s nonfrag skb %p len %d", hdev->name, skb, skb->len);

2602
		skb_queue_tail(queue, skb);
L
Linus Torvalds 已提交
2603 2604 2605 2606 2607 2608 2609
	} else {
		/* Fragmented */
		BT_DBG("%s frag %p len %d", hdev->name, skb, skb->len);

		skb_shinfo(skb)->frag_list = NULL;

		/* Queue all fragments atomically */
2610
		spin_lock(&queue->lock);
L
Linus Torvalds 已提交
2611

2612
		__skb_queue_tail(queue, skb);
2613 2614 2615

		flags &= ~ACL_START;
		flags |= ACL_CONT;
L
Linus Torvalds 已提交
2616 2617
		do {
			skb = list; list = list->next;
2618

L
Linus Torvalds 已提交
2619
			skb->dev = (void *) hdev;
2620
			bt_cb(skb)->pkt_type = HCI_ACLDATA_PKT;
2621
			hci_add_acl_hdr(skb, conn->handle, flags);
L
Linus Torvalds 已提交
2622 2623 2624

			BT_DBG("%s frag %p len %d", hdev->name, skb, skb->len);

2625
			__skb_queue_tail(queue, skb);
L
Linus Torvalds 已提交
2626 2627
		} while (list);

2628
		spin_unlock(&queue->lock);
L
Linus Torvalds 已提交
2629
	}
2630 2631 2632 2633
}

void hci_send_acl(struct hci_chan *chan, struct sk_buff *skb, __u16 flags)
{
2634
	struct hci_dev *hdev = chan->conn->hdev;
2635

2636
	BT_DBG("%s chan %p flags 0x%4.4x", hdev->name, chan, flags);
2637 2638 2639

	skb->dev = (void *) hdev;

2640
	hci_queue_acl(chan, &chan->data_q, skb, flags);
L
Linus Torvalds 已提交
2641

2642
	queue_work(hdev->workqueue, &hdev->tx_work);
L
Linus Torvalds 已提交
2643 2644 2645
}

/* Send SCO data */
2646
void hci_send_sco(struct hci_conn *conn, struct sk_buff *skb)
L
Linus Torvalds 已提交
2647 2648 2649 2650 2651 2652
{
	struct hci_dev *hdev = conn->hdev;
	struct hci_sco_hdr hdr;

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

2653
	hdr.handle = cpu_to_le16(conn->handle);
L
Linus Torvalds 已提交
2654 2655
	hdr.dlen   = skb->len;

2656 2657
	skb_push(skb, HCI_SCO_HDR_SIZE);
	skb_reset_transport_header(skb);
2658
	memcpy(skb_transport_header(skb), &hdr, HCI_SCO_HDR_SIZE);
L
Linus Torvalds 已提交
2659 2660

	skb->dev = (void *) hdev;
2661
	bt_cb(skb)->pkt_type = HCI_SCODATA_PKT;
2662

L
Linus Torvalds 已提交
2663
	skb_queue_tail(&conn->data_q, skb);
2664
	queue_work(hdev->workqueue, &hdev->tx_work);
L
Linus Torvalds 已提交
2665 2666 2667 2668 2669
}

/* ---- HCI TX task (outgoing data) ---- */

/* HCI Connection scheduler */
2670 2671
static struct hci_conn *hci_low_sent(struct hci_dev *hdev, __u8 type,
				     int *quote)
L
Linus Torvalds 已提交
2672 2673
{
	struct hci_conn_hash *h = &hdev->conn_hash;
2674
	struct hci_conn *conn = NULL, *c;
2675
	unsigned int num = 0, min = ~0;
L
Linus Torvalds 已提交
2676

2677
	/* We don't have to lock device here. Connections are always
L
Linus Torvalds 已提交
2678
	 * added and removed with TX task disabled. */
2679 2680 2681 2682

	rcu_read_lock();

	list_for_each_entry_rcu(c, &h->list, list) {
2683
		if (c->type != type || skb_queue_empty(&c->data_q))
L
Linus Torvalds 已提交
2684
			continue;
2685 2686 2687 2688

		if (c->state != BT_CONNECTED && c->state != BT_CONFIG)
			continue;

L
Linus Torvalds 已提交
2689 2690 2691 2692 2693 2694
		num++;

		if (c->sent < min) {
			min  = c->sent;
			conn = c;
		}
2695 2696 2697

		if (hci_conn_num(hdev, type) == num)
			break;
L
Linus Torvalds 已提交
2698 2699
	}

2700 2701
	rcu_read_unlock();

L
Linus Torvalds 已提交
2702
	if (conn) {
2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718 2719 2720 2721
		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 已提交
2722 2723 2724 2725 2726 2727 2728 2729
		*quote = q ? q : 1;
	} else
		*quote = 0;

	BT_DBG("conn %p quote %d", conn, *quote);
	return conn;
}

2730
static void hci_link_tx_to(struct hci_dev *hdev, __u8 type)
L
Linus Torvalds 已提交
2731 2732
{
	struct hci_conn_hash *h = &hdev->conn_hash;
2733
	struct hci_conn *c;
L
Linus Torvalds 已提交
2734

2735
	BT_ERR("%s link tx timeout", hdev->name);
L
Linus Torvalds 已提交
2736

2737 2738
	rcu_read_lock();

L
Linus Torvalds 已提交
2739
	/* Kill stalled connections */
2740
	list_for_each_entry_rcu(c, &h->list, list) {
2741
		if (c->type == type && c->sent) {
2742 2743
			BT_ERR("%s killing stalled connection %pMR",
			       hdev->name, &c->dst);
A
Andre Guedes 已提交
2744
			hci_disconnect(c, HCI_ERROR_REMOTE_USER_TERM);
L
Linus Torvalds 已提交
2745 2746
		}
	}
2747 2748

	rcu_read_unlock();
L
Linus Torvalds 已提交
2749 2750
}

2751 2752
static struct hci_chan *hci_chan_sent(struct hci_dev *hdev, __u8 type,
				      int *quote)
L
Linus Torvalds 已提交
2753
{
2754 2755
	struct hci_conn_hash *h = &hdev->conn_hash;
	struct hci_chan *chan = NULL;
2756
	unsigned int num = 0, min = ~0, cur_prio = 0;
L
Linus Torvalds 已提交
2757
	struct hci_conn *conn;
2758 2759 2760 2761
	int cnt, q, conn_num = 0;

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

2762 2763 2764
	rcu_read_lock();

	list_for_each_entry_rcu(conn, &h->list, list) {
2765 2766 2767 2768 2769 2770 2771 2772 2773 2774
		struct hci_chan *tmp;

		if (conn->type != type)
			continue;

		if (conn->state != BT_CONNECTED && conn->state != BT_CONFIG)
			continue;

		conn_num++;

2775
		list_for_each_entry_rcu(tmp, &conn->chan_list, list) {
2776 2777 2778 2779 2780 2781 2782 2783 2784 2785 2786 2787 2788 2789 2790 2791 2792 2793 2794 2795 2796 2797 2798 2799 2800 2801 2802
			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;
	}

2803 2804
	rcu_read_unlock();

2805 2806 2807 2808 2809 2810 2811
	if (!chan)
		return NULL;

	switch (chan->conn->type) {
	case ACL_LINK:
		cnt = hdev->acl_cnt;
		break;
2812 2813 2814
	case AMP_LINK:
		cnt = hdev->block_cnt;
		break;
2815 2816 2817 2818 2819 2820 2821 2822 2823 2824 2825 2826 2827 2828 2829 2830 2831 2832
	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;
}

2833 2834 2835 2836 2837 2838 2839 2840
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);

2841 2842 2843
	rcu_read_lock();

	list_for_each_entry_rcu(conn, &h->list, list) {
2844 2845 2846 2847 2848 2849 2850 2851 2852 2853
		struct hci_chan *chan;

		if (conn->type != type)
			continue;

		if (conn->state != BT_CONNECTED && conn->state != BT_CONFIG)
			continue;

		num++;

2854
		list_for_each_entry_rcu(chan, &conn->chan_list, list) {
2855 2856 2857 2858 2859 2860 2861 2862 2863 2864 2865 2866 2867 2868 2869 2870 2871
			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,
2872
			       skb->priority);
2873 2874 2875 2876 2877
		}

		if (hci_conn_num(hdev, type) == num)
			break;
	}
2878 2879 2880

	rcu_read_unlock();

2881 2882
}

2883 2884 2885 2886 2887 2888
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);
}

2889
static void __check_timeout(struct hci_dev *hdev, unsigned int cnt)
2890
{
L
Linus Torvalds 已提交
2891 2892 2893
	if (!test_bit(HCI_RAW, &hdev->flags)) {
		/* ACL tx timeout must be longer than maximum
		 * link supervision timeout (40.9 seconds) */
2894
		if (!cnt && time_after(jiffies, hdev->acl_last_tx +
2895
				       HCI_ACL_TX_TIMEOUT))
2896
			hci_link_tx_to(hdev, ACL_LINK);
L
Linus Torvalds 已提交
2897
	}
2898
}
L
Linus Torvalds 已提交
2899

2900
static void hci_sched_acl_pkt(struct hci_dev *hdev)
2901 2902 2903 2904 2905 2906 2907
{
	unsigned int cnt = hdev->acl_cnt;
	struct hci_chan *chan;
	struct sk_buff *skb;
	int quote;

	__check_timeout(hdev, cnt);
2908

2909
	while (hdev->acl_cnt &&
2910
	       (chan = hci_chan_sent(hdev, ACL_LINK, &quote))) {
2911 2912
		u32 priority = (skb_peek(&chan->data_q))->priority;
		while (quote-- && (skb = skb_peek(&chan->data_q))) {
2913
			BT_DBG("chan %p skb %p len %d priority %u", chan, skb,
2914
			       skb->len, skb->priority);
2915

2916 2917 2918 2919 2920 2921
			/* Stop if priority has changed */
			if (skb->priority < priority)
				break;

			skb = skb_dequeue(&chan->data_q);

2922
			hci_conn_enter_active_mode(chan->conn,
2923
						   bt_cb(skb)->force_active);
2924

L
Linus Torvalds 已提交
2925 2926 2927 2928
			hci_send_frame(skb);
			hdev->acl_last_tx = jiffies;

			hdev->acl_cnt--;
2929 2930
			chan->sent++;
			chan->conn->sent++;
L
Linus Torvalds 已提交
2931 2932
		}
	}
2933 2934 2935

	if (cnt != hdev->acl_cnt)
		hci_prio_recalculate(hdev, ACL_LINK);
L
Linus Torvalds 已提交
2936 2937
}

2938
static void hci_sched_acl_blk(struct hci_dev *hdev)
2939
{
2940
	unsigned int cnt = hdev->block_cnt;
2941 2942 2943
	struct hci_chan *chan;
	struct sk_buff *skb;
	int quote;
2944
	u8 type;
2945

2946
	__check_timeout(hdev, cnt);
2947

2948 2949 2950 2951 2952 2953 2954
	BT_DBG("%s", hdev->name);

	if (hdev->dev_type == HCI_AMP)
		type = AMP_LINK;
	else
		type = ACL_LINK;

2955
	while (hdev->block_cnt > 0 &&
2956
	       (chan = hci_chan_sent(hdev, type, &quote))) {
2957 2958 2959 2960 2961
		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,
2962
			       skb->len, skb->priority);
2963 2964 2965 2966 2967 2968 2969 2970 2971 2972 2973 2974

			/* 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,
2975
						   bt_cb(skb)->force_active);
2976 2977 2978 2979 2980 2981 2982 2983 2984 2985 2986 2987 2988

			hci_send_frame(skb);
			hdev->acl_last_tx = jiffies;

			hdev->block_cnt -= blocks;
			quote -= blocks;

			chan->sent += blocks;
			chan->conn->sent += blocks;
		}
	}

	if (cnt != hdev->block_cnt)
2989
		hci_prio_recalculate(hdev, type);
2990 2991
}

2992
static void hci_sched_acl(struct hci_dev *hdev)
2993 2994 2995
{
	BT_DBG("%s", hdev->name);

2996 2997 2998 2999 3000 3001
	/* 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)
3002 3003 3004 3005 3006 3007 3008 3009 3010 3011 3012 3013 3014
		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 已提交
3015
/* Schedule SCO */
3016
static void hci_sched_sco(struct hci_dev *hdev)
L
Linus Torvalds 已提交
3017 3018 3019 3020 3021 3022 3023
{
	struct hci_conn *conn;
	struct sk_buff *skb;
	int quote;

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

3024 3025 3026
	if (!hci_conn_num(hdev, SCO_LINK))
		return;

L
Linus Torvalds 已提交
3027 3028 3029 3030 3031 3032 3033 3034 3035 3036 3037 3038
	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);
			hci_send_frame(skb);

			conn->sent++;
			if (conn->sent == ~0)
				conn->sent = 0;
		}
	}
}

3039
static void hci_sched_esco(struct hci_dev *hdev)
3040 3041 3042 3043 3044 3045 3046
{
	struct hci_conn *conn;
	struct sk_buff *skb;
	int quote;

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

3047 3048 3049
	if (!hci_conn_num(hdev, ESCO_LINK))
		return;

3050 3051
	while (hdev->sco_cnt && (conn = hci_low_sent(hdev, ESCO_LINK,
						     &quote))) {
3052 3053 3054 3055 3056 3057 3058 3059 3060 3061 3062
		while (quote-- && (skb = skb_dequeue(&conn->data_q))) {
			BT_DBG("skb %p len %d", skb, skb->len);
			hci_send_frame(skb);

			conn->sent++;
			if (conn->sent == ~0)
				conn->sent = 0;
		}
	}
}

3063
static void hci_sched_le(struct hci_dev *hdev)
3064
{
3065
	struct hci_chan *chan;
3066
	struct sk_buff *skb;
3067
	int quote, cnt, tmp;
3068 3069 3070

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

3071 3072 3073
	if (!hci_conn_num(hdev, LE_LINK))
		return;

3074 3075 3076
	if (!test_bit(HCI_RAW, &hdev->flags)) {
		/* LE tx timeout must be longer than maximum
		 * link supervision timeout (40.9 seconds) */
3077
		if (!hdev->le_cnt && hdev->le_pkts &&
3078
		    time_after(jiffies, hdev->le_last_tx + HZ * 45))
3079
			hci_link_tx_to(hdev, LE_LINK);
3080 3081 3082
	}

	cnt = hdev->le_pkts ? hdev->le_cnt : hdev->acl_cnt;
3083
	tmp = cnt;
3084
	while (cnt && (chan = hci_chan_sent(hdev, LE_LINK, &quote))) {
3085 3086
		u32 priority = (skb_peek(&chan->data_q))->priority;
		while (quote-- && (skb = skb_peek(&chan->data_q))) {
3087
			BT_DBG("chan %p skb %p len %d priority %u", chan, skb,
3088
			       skb->len, skb->priority);
3089

3090 3091 3092 3093 3094 3095
			/* Stop if priority has changed */
			if (skb->priority < priority)
				break;

			skb = skb_dequeue(&chan->data_q);

3096 3097 3098 3099
			hci_send_frame(skb);
			hdev->le_last_tx = jiffies;

			cnt--;
3100 3101
			chan->sent++;
			chan->conn->sent++;
3102 3103
		}
	}
3104

3105 3106 3107 3108
	if (hdev->le_pkts)
		hdev->le_cnt = cnt;
	else
		hdev->acl_cnt = cnt;
3109 3110 3111

	if (cnt != tmp)
		hci_prio_recalculate(hdev, LE_LINK);
3112 3113
}

3114
static void hci_tx_work(struct work_struct *work)
L
Linus Torvalds 已提交
3115
{
3116
	struct hci_dev *hdev = container_of(work, struct hci_dev, tx_work);
L
Linus Torvalds 已提交
3117 3118
	struct sk_buff *skb;

3119
	BT_DBG("%s acl %d sco %d le %d", hdev->name, hdev->acl_cnt,
3120
	       hdev->sco_cnt, hdev->le_cnt);
L
Linus Torvalds 已提交
3121 3122 3123 3124 3125 3126 3127

	/* Schedule queues and send stuff to HCI driver */

	hci_sched_acl(hdev);

	hci_sched_sco(hdev);

3128 3129
	hci_sched_esco(hdev);

3130 3131
	hci_sched_le(hdev);

L
Linus Torvalds 已提交
3132 3133 3134 3135 3136
	/* Send next queued raw (unknown type) packet */
	while ((skb = skb_dequeue(&hdev->raw_q)))
		hci_send_frame(skb);
}

L
Lucas De Marchi 已提交
3137
/* ----- HCI RX task (incoming data processing) ----- */
L
Linus Torvalds 已提交
3138 3139

/* ACL data packet */
3140
static void hci_acldata_packet(struct hci_dev *hdev, struct sk_buff *skb)
L
Linus Torvalds 已提交
3141 3142 3143 3144 3145 3146 3147 3148 3149 3150 3151
{
	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);

3152
	BT_DBG("%s len %d handle 0x%4.4x flags 0x%4.4x", hdev->name, skb->len,
3153
	       handle, flags);
L
Linus Torvalds 已提交
3154 3155 3156 3157 3158 3159

	hdev->stat.acl_rx++;

	hci_dev_lock(hdev);
	conn = hci_conn_hash_lookup_handle(hdev, handle);
	hci_dev_unlock(hdev);
3160

L
Linus Torvalds 已提交
3161
	if (conn) {
3162
		hci_conn_enter_active_mode(conn, BT_POWER_FORCE_ACTIVE_OFF);
3163

L
Linus Torvalds 已提交
3164
		/* Send to upper protocol */
3165 3166
		l2cap_recv_acldata(conn, skb, flags);
		return;
L
Linus Torvalds 已提交
3167
	} else {
3168
		BT_ERR("%s ACL packet for unknown connection handle %d",
3169
		       hdev->name, handle);
L
Linus Torvalds 已提交
3170 3171 3172 3173 3174 3175
	}

	kfree_skb(skb);
}

/* SCO data packet */
3176
static void hci_scodata_packet(struct hci_dev *hdev, struct sk_buff *skb)
L
Linus Torvalds 已提交
3177 3178 3179 3180 3181 3182 3183 3184 3185
{
	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);

3186
	BT_DBG("%s len %d handle 0x%4.4x", hdev->name, skb->len, handle);
L
Linus Torvalds 已提交
3187 3188 3189 3190 3191 3192 3193 3194 3195

	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 */
3196 3197
		sco_recv_scodata(conn, skb);
		return;
L
Linus Torvalds 已提交
3198
	} else {
3199
		BT_ERR("%s SCO packet for unknown connection handle %d",
3200
		       hdev->name, handle);
L
Linus Torvalds 已提交
3201 3202 3203 3204 3205
	}

	kfree_skb(skb);
}

3206 3207 3208 3209 3210 3211 3212 3213 3214 3215 3216
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;
}

3217 3218 3219 3220 3221 3222 3223 3224 3225 3226 3227 3228 3229 3230 3231 3232 3233 3234 3235 3236 3237 3238
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);
}

3239 3240 3241 3242 3243 3244 3245 3246
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);

3247 3248
	/* If the completed command doesn't match the last one that was
	 * sent we need to do special handling of it.
3249
	 */
3250 3251 3252 3253 3254 3255 3256 3257 3258 3259
	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);

3260
		return;
3261
	}
3262 3263 3264 3265 3266 3267 3268 3269 3270 3271 3272 3273 3274 3275 3276 3277 3278 3279 3280 3281 3282 3283 3284 3285 3286 3287 3288 3289 3290 3291 3292 3293 3294 3295 3296 3297 3298 3299 3300 3301 3302 3303 3304 3305 3306 3307 3308 3309 3310 3311 3312 3313 3314 3315 3316 3317 3318 3319 3320 3321 3322

	/* 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;
		if (req_complete)
			goto call_complete;
	}

	/* 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);
}

void hci_req_cmd_status(struct hci_dev *hdev, u16 opcode, u8 status)
{
	hci_req_complete_t req_complete = NULL;

	BT_DBG("opcode 0x%04x status 0x%02x", opcode, status);

	if (status) {
		hci_req_cmd_complete(hdev, opcode, status);
		return;
	}

	/* No need to handle success status if there are more commands */
	if (!hci_req_is_complete(hdev))
		return;

	if (hdev->sent_cmd)
		req_complete = bt_cb(hdev->sent_cmd)->req.complete;

	/* If the request doesn't have a complete callback or there
	 * are other commands/requests in the hdev queue we consider
	 * this request as completed.
	 */
	if (!req_complete || !skb_queue_empty(&hdev->cmd_q))
		hci_req_cmd_complete(hdev, opcode, status);
}

3323
static void hci_rx_work(struct work_struct *work)
L
Linus Torvalds 已提交
3324
{
3325
	struct hci_dev *hdev = container_of(work, struct hci_dev, rx_work);
L
Linus Torvalds 已提交
3326 3327 3328 3329 3330
	struct sk_buff *skb;

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

	while ((skb = skb_dequeue(&hdev->rx_q))) {
3331 3332 3333
		/* Send copy to monitor */
		hci_send_to_monitor(hdev, skb);

L
Linus Torvalds 已提交
3334 3335
		if (atomic_read(&hdev->promisc)) {
			/* Send copy to the sockets */
3336
			hci_send_to_sock(hdev, skb);
L
Linus Torvalds 已提交
3337 3338 3339 3340 3341 3342 3343 3344 3345
		}

		if (test_bit(HCI_RAW, &hdev->flags)) {
			kfree_skb(skb);
			continue;
		}

		if (test_bit(HCI_INIT, &hdev->flags)) {
			/* Don't process data packets in this states. */
3346
			switch (bt_cb(skb)->pkt_type) {
L
Linus Torvalds 已提交
3347 3348 3349 3350
			case HCI_ACLDATA_PKT:
			case HCI_SCODATA_PKT:
				kfree_skb(skb);
				continue;
3351
			}
L
Linus Torvalds 已提交
3352 3353 3354
		}

		/* Process frame */
3355
		switch (bt_cb(skb)->pkt_type) {
L
Linus Torvalds 已提交
3356
		case HCI_EVENT_PKT:
3357
			BT_DBG("%s Event packet", hdev->name);
L
Linus Torvalds 已提交
3358 3359 3360 3361 3362 3363 3364 3365 3366 3367 3368 3369 3370 3371 3372 3373 3374 3375 3376 3377
			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;
		}
	}
}

3378
static void hci_cmd_work(struct work_struct *work)
L
Linus Torvalds 已提交
3379
{
3380
	struct hci_dev *hdev = container_of(work, struct hci_dev, cmd_work);
L
Linus Torvalds 已提交
3381 3382
	struct sk_buff *skb;

3383 3384
	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 已提交
3385 3386

	/* Send queued commands */
3387 3388 3389 3390 3391
	if (atomic_read(&hdev->cmd_cnt)) {
		skb = skb_dequeue(&hdev->cmd_q);
		if (!skb)
			return;

3392
		kfree_skb(hdev->sent_cmd);
L
Linus Torvalds 已提交
3393

A
Andrei Emeltchenko 已提交
3394 3395
		hdev->sent_cmd = skb_clone(skb, GFP_ATOMIC);
		if (hdev->sent_cmd) {
L
Linus Torvalds 已提交
3396 3397
			atomic_dec(&hdev->cmd_cnt);
			hci_send_frame(skb);
3398 3399 3400 3401
			if (test_bit(HCI_RESET, &hdev->flags))
				del_timer(&hdev->cmd_timer);
			else
				mod_timer(&hdev->cmd_timer,
3402
					  jiffies + HCI_CMD_TIMEOUT);
L
Linus Torvalds 已提交
3403 3404
		} else {
			skb_queue_head(&hdev->cmd_q, skb);
3405
			queue_work(hdev->workqueue, &hdev->cmd_work);
L
Linus Torvalds 已提交
3406 3407 3408
		}
	}
}
A
Andre Guedes 已提交
3409 3410 3411 3412 3413 3414 3415 3416 3417 3418 3419 3420

int hci_do_inquiry(struct hci_dev *hdev, u8 length)
{
	/* General inquiry access code (GIAC) */
	u8 lap[3] = { 0x33, 0x8b, 0x9e };
	struct hci_cp_inquiry cp;

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

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

3421 3422
	inquiry_cache_flush(hdev);

A
Andre Guedes 已提交
3423 3424 3425 3426 3427 3428
	memset(&cp, 0, sizeof(cp));
	memcpy(&cp.lap, lap, sizeof(cp.lap));
	cp.length  = length;

	return hci_send_cmd(hdev, HCI_OP_INQUIRY, sizeof(cp), &cp);
}
3429 3430 3431 3432 3433 3434

int hci_cancel_inquiry(struct hci_dev *hdev)
{
	BT_DBG("%s", hdev->name);

	if (!test_bit(HCI_INQUIRY, &hdev->flags))
3435
		return -EALREADY;
3436 3437 3438

	return hci_send_cmd(hdev, HCI_OP_INQUIRY_CANCEL, 0, NULL);
}
3439 3440 3441 3442 3443 3444 3445 3446 3447 3448 3449 3450

u8 bdaddr_to_le(u8 bdaddr_type)
{
	switch (bdaddr_type) {
	case BDADDR_LE_PUBLIC:
		return ADDR_LE_DEV_PUBLIC;

	default:
		/* Fallback to LE Random address type */
		return ADDR_LE_DEV_RANDOM;
	}
}