xref: /openbmc/linux/drivers/bluetooth/hci_intel.c (revision cd238eff)
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  *
4  *  Bluetooth HCI UART driver for Intel devices
5  *
6  *  Copyright (C) 2015  Intel Corporation
7  */
8 
9 #include <linux/kernel.h>
10 #include <linux/errno.h>
11 #include <linux/skbuff.h>
12 #include <linux/firmware.h>
13 #include <linux/module.h>
14 #include <linux/wait.h>
15 #include <linux/tty.h>
16 #include <linux/platform_device.h>
17 #include <linux/gpio/consumer.h>
18 #include <linux/acpi.h>
19 #include <linux/interrupt.h>
20 #include <linux/pm_runtime.h>
21 
22 #include <net/bluetooth/bluetooth.h>
23 #include <net/bluetooth/hci_core.h>
24 
25 #include "hci_uart.h"
26 #include "btintel.h"
27 
28 #define STATE_BOOTLOADER	0
29 #define STATE_DOWNLOADING	1
30 #define STATE_FIRMWARE_LOADED	2
31 #define STATE_FIRMWARE_FAILED	3
32 #define STATE_BOOTING		4
33 #define STATE_LPM_ENABLED	5
34 #define STATE_TX_ACTIVE		6
35 #define STATE_SUSPENDED		7
36 #define STATE_LPM_TRANSACTION	8
37 
38 #define HCI_LPM_WAKE_PKT 0xf0
39 #define HCI_LPM_PKT 0xf1
40 #define HCI_LPM_MAX_SIZE 10
41 #define HCI_LPM_HDR_SIZE HCI_EVENT_HDR_SIZE
42 
43 #define LPM_OP_TX_NOTIFY 0x00
44 #define LPM_OP_SUSPEND_ACK 0x02
45 #define LPM_OP_RESUME_ACK 0x03
46 
47 #define LPM_SUSPEND_DELAY_MS 1000
48 
49 struct hci_lpm_pkt {
50 	__u8 opcode;
51 	__u8 dlen;
52 	__u8 data[0];
53 } __packed;
54 
55 struct intel_device {
56 	struct list_head list;
57 	struct platform_device *pdev;
58 	struct gpio_desc *reset;
59 	struct hci_uart *hu;
60 	struct mutex hu_lock;
61 	int irq;
62 };
63 
64 static LIST_HEAD(intel_device_list);
65 static DEFINE_MUTEX(intel_device_list_lock);
66 
67 struct intel_data {
68 	struct sk_buff *rx_skb;
69 	struct sk_buff_head txq;
70 	struct work_struct busy_work;
71 	struct hci_uart *hu;
72 	unsigned long flags;
73 };
74 
75 static u8 intel_convert_speed(unsigned int speed)
76 {
77 	switch (speed) {
78 	case 9600:
79 		return 0x00;
80 	case 19200:
81 		return 0x01;
82 	case 38400:
83 		return 0x02;
84 	case 57600:
85 		return 0x03;
86 	case 115200:
87 		return 0x04;
88 	case 230400:
89 		return 0x05;
90 	case 460800:
91 		return 0x06;
92 	case 921600:
93 		return 0x07;
94 	case 1843200:
95 		return 0x08;
96 	case 3250000:
97 		return 0x09;
98 	case 2000000:
99 		return 0x0a;
100 	case 3000000:
101 		return 0x0b;
102 	default:
103 		return 0xff;
104 	}
105 }
106 
107 static int intel_wait_booting(struct hci_uart *hu)
108 {
109 	struct intel_data *intel = hu->priv;
110 	int err;
111 
112 	err = wait_on_bit_timeout(&intel->flags, STATE_BOOTING,
113 				  TASK_INTERRUPTIBLE,
114 				  msecs_to_jiffies(1000));
115 
116 	if (err == -EINTR) {
117 		bt_dev_err(hu->hdev, "Device boot interrupted");
118 		return -EINTR;
119 	}
120 
121 	if (err) {
122 		bt_dev_err(hu->hdev, "Device boot timeout");
123 		return -ETIMEDOUT;
124 	}
125 
126 	return err;
127 }
128 
129 #ifdef CONFIG_PM
130 static int intel_wait_lpm_transaction(struct hci_uart *hu)
131 {
132 	struct intel_data *intel = hu->priv;
133 	int err;
134 
135 	err = wait_on_bit_timeout(&intel->flags, STATE_LPM_TRANSACTION,
136 				  TASK_INTERRUPTIBLE,
137 				  msecs_to_jiffies(1000));
138 
139 	if (err == -EINTR) {
140 		bt_dev_err(hu->hdev, "LPM transaction interrupted");
141 		return -EINTR;
142 	}
143 
144 	if (err) {
145 		bt_dev_err(hu->hdev, "LPM transaction timeout");
146 		return -ETIMEDOUT;
147 	}
148 
149 	return err;
150 }
151 
152 static int intel_lpm_suspend(struct hci_uart *hu)
153 {
154 	static const u8 suspend[] = { 0x01, 0x01, 0x01 };
155 	struct intel_data *intel = hu->priv;
156 	struct sk_buff *skb;
157 
158 	if (!test_bit(STATE_LPM_ENABLED, &intel->flags) ||
159 	    test_bit(STATE_SUSPENDED, &intel->flags))
160 		return 0;
161 
162 	if (test_bit(STATE_TX_ACTIVE, &intel->flags))
163 		return -EAGAIN;
164 
165 	bt_dev_dbg(hu->hdev, "Suspending");
166 
167 	skb = bt_skb_alloc(sizeof(suspend), GFP_KERNEL);
168 	if (!skb) {
169 		bt_dev_err(hu->hdev, "Failed to alloc memory for LPM packet");
170 		return -ENOMEM;
171 	}
172 
173 	skb_put_data(skb, suspend, sizeof(suspend));
174 	hci_skb_pkt_type(skb) = HCI_LPM_PKT;
175 
176 	set_bit(STATE_LPM_TRANSACTION, &intel->flags);
177 
178 	/* LPM flow is a priority, enqueue packet at list head */
179 	skb_queue_head(&intel->txq, skb);
180 	hci_uart_tx_wakeup(hu);
181 
182 	intel_wait_lpm_transaction(hu);
183 	/* Even in case of failure, continue and test the suspended flag */
184 
185 	clear_bit(STATE_LPM_TRANSACTION, &intel->flags);
186 
187 	if (!test_bit(STATE_SUSPENDED, &intel->flags)) {
188 		bt_dev_err(hu->hdev, "Device suspend error");
189 		return -EINVAL;
190 	}
191 
192 	bt_dev_dbg(hu->hdev, "Suspended");
193 
194 	hci_uart_set_flow_control(hu, true);
195 
196 	return 0;
197 }
198 
199 static int intel_lpm_resume(struct hci_uart *hu)
200 {
201 	struct intel_data *intel = hu->priv;
202 	struct sk_buff *skb;
203 
204 	if (!test_bit(STATE_LPM_ENABLED, &intel->flags) ||
205 	    !test_bit(STATE_SUSPENDED, &intel->flags))
206 		return 0;
207 
208 	bt_dev_dbg(hu->hdev, "Resuming");
209 
210 	hci_uart_set_flow_control(hu, false);
211 
212 	skb = bt_skb_alloc(0, GFP_KERNEL);
213 	if (!skb) {
214 		bt_dev_err(hu->hdev, "Failed to alloc memory for LPM packet");
215 		return -ENOMEM;
216 	}
217 
218 	hci_skb_pkt_type(skb) = HCI_LPM_WAKE_PKT;
219 
220 	set_bit(STATE_LPM_TRANSACTION, &intel->flags);
221 
222 	/* LPM flow is a priority, enqueue packet at list head */
223 	skb_queue_head(&intel->txq, skb);
224 	hci_uart_tx_wakeup(hu);
225 
226 	intel_wait_lpm_transaction(hu);
227 	/* Even in case of failure, continue and test the suspended flag */
228 
229 	clear_bit(STATE_LPM_TRANSACTION, &intel->flags);
230 
231 	if (test_bit(STATE_SUSPENDED, &intel->flags)) {
232 		bt_dev_err(hu->hdev, "Device resume error");
233 		return -EINVAL;
234 	}
235 
236 	bt_dev_dbg(hu->hdev, "Resumed");
237 
238 	return 0;
239 }
240 #endif /* CONFIG_PM */
241 
242 static int intel_lpm_host_wake(struct hci_uart *hu)
243 {
244 	static const u8 lpm_resume_ack[] = { LPM_OP_RESUME_ACK, 0x00 };
245 	struct intel_data *intel = hu->priv;
246 	struct sk_buff *skb;
247 
248 	hci_uart_set_flow_control(hu, false);
249 
250 	clear_bit(STATE_SUSPENDED, &intel->flags);
251 
252 	skb = bt_skb_alloc(sizeof(lpm_resume_ack), GFP_KERNEL);
253 	if (!skb) {
254 		bt_dev_err(hu->hdev, "Failed to alloc memory for LPM packet");
255 		return -ENOMEM;
256 	}
257 
258 	skb_put_data(skb, lpm_resume_ack, sizeof(lpm_resume_ack));
259 	hci_skb_pkt_type(skb) = HCI_LPM_PKT;
260 
261 	/* LPM flow is a priority, enqueue packet at list head */
262 	skb_queue_head(&intel->txq, skb);
263 	hci_uart_tx_wakeup(hu);
264 
265 	bt_dev_dbg(hu->hdev, "Resumed by controller");
266 
267 	return 0;
268 }
269 
270 static irqreturn_t intel_irq(int irq, void *dev_id)
271 {
272 	struct intel_device *idev = dev_id;
273 
274 	dev_info(&idev->pdev->dev, "hci_intel irq\n");
275 
276 	mutex_lock(&idev->hu_lock);
277 	if (idev->hu)
278 		intel_lpm_host_wake(idev->hu);
279 	mutex_unlock(&idev->hu_lock);
280 
281 	/* Host/Controller are now LPM resumed, trigger a new delayed suspend */
282 	pm_runtime_get(&idev->pdev->dev);
283 	pm_runtime_mark_last_busy(&idev->pdev->dev);
284 	pm_runtime_put_autosuspend(&idev->pdev->dev);
285 
286 	return IRQ_HANDLED;
287 }
288 
289 static int intel_set_power(struct hci_uart *hu, bool powered)
290 {
291 	struct list_head *p;
292 	int err = -ENODEV;
293 
294 	if (!hu->tty->dev)
295 		return err;
296 
297 	mutex_lock(&intel_device_list_lock);
298 
299 	list_for_each(p, &intel_device_list) {
300 		struct intel_device *idev = list_entry(p, struct intel_device,
301 						       list);
302 
303 		/* tty device and pdev device should share the same parent
304 		 * which is the UART port.
305 		 */
306 		if (hu->tty->dev->parent != idev->pdev->dev.parent)
307 			continue;
308 
309 		if (!idev->reset) {
310 			err = -ENOTSUPP;
311 			break;
312 		}
313 
314 		BT_INFO("hu %p, Switching compatible pm device (%s) to %u",
315 			hu, dev_name(&idev->pdev->dev), powered);
316 
317 		gpiod_set_value(idev->reset, powered);
318 
319 		/* Provide to idev a hu reference which is used to run LPM
320 		 * transactions (lpm suspend/resume) from PM callbacks.
321 		 * hu needs to be protected against concurrent removing during
322 		 * these PM ops.
323 		 */
324 		mutex_lock(&idev->hu_lock);
325 		idev->hu = powered ? hu : NULL;
326 		mutex_unlock(&idev->hu_lock);
327 
328 		if (idev->irq < 0)
329 			break;
330 
331 		if (powered && device_can_wakeup(&idev->pdev->dev)) {
332 			err = devm_request_threaded_irq(&idev->pdev->dev,
333 							idev->irq, NULL,
334 							intel_irq,
335 							IRQF_ONESHOT,
336 							"bt-host-wake", idev);
337 			if (err) {
338 				BT_ERR("hu %p, unable to allocate irq-%d",
339 				       hu, idev->irq);
340 				break;
341 			}
342 
343 			device_wakeup_enable(&idev->pdev->dev);
344 
345 			pm_runtime_set_active(&idev->pdev->dev);
346 			pm_runtime_use_autosuspend(&idev->pdev->dev);
347 			pm_runtime_set_autosuspend_delay(&idev->pdev->dev,
348 							 LPM_SUSPEND_DELAY_MS);
349 			pm_runtime_enable(&idev->pdev->dev);
350 		} else if (!powered && device_may_wakeup(&idev->pdev->dev)) {
351 			devm_free_irq(&idev->pdev->dev, idev->irq, idev);
352 			device_wakeup_disable(&idev->pdev->dev);
353 
354 			pm_runtime_disable(&idev->pdev->dev);
355 		}
356 	}
357 
358 	mutex_unlock(&intel_device_list_lock);
359 
360 	return err;
361 }
362 
363 static void intel_busy_work(struct work_struct *work)
364 {
365 	struct list_head *p;
366 	struct intel_data *intel = container_of(work, struct intel_data,
367 						busy_work);
368 
369 	if (!intel->hu->tty->dev)
370 		return;
371 
372 	/* Link is busy, delay the suspend */
373 	mutex_lock(&intel_device_list_lock);
374 	list_for_each(p, &intel_device_list) {
375 		struct intel_device *idev = list_entry(p, struct intel_device,
376 						       list);
377 
378 		if (intel->hu->tty->dev->parent == idev->pdev->dev.parent) {
379 			pm_runtime_get(&idev->pdev->dev);
380 			pm_runtime_mark_last_busy(&idev->pdev->dev);
381 			pm_runtime_put_autosuspend(&idev->pdev->dev);
382 			break;
383 		}
384 	}
385 	mutex_unlock(&intel_device_list_lock);
386 }
387 
388 static int intel_open(struct hci_uart *hu)
389 {
390 	struct intel_data *intel;
391 
392 	BT_DBG("hu %p", hu);
393 
394 	intel = kzalloc(sizeof(*intel), GFP_KERNEL);
395 	if (!intel)
396 		return -ENOMEM;
397 
398 	skb_queue_head_init(&intel->txq);
399 	INIT_WORK(&intel->busy_work, intel_busy_work);
400 
401 	intel->hu = hu;
402 
403 	hu->priv = intel;
404 
405 	if (!intel_set_power(hu, true))
406 		set_bit(STATE_BOOTING, &intel->flags);
407 
408 	return 0;
409 }
410 
411 static int intel_close(struct hci_uart *hu)
412 {
413 	struct intel_data *intel = hu->priv;
414 
415 	BT_DBG("hu %p", hu);
416 
417 	cancel_work_sync(&intel->busy_work);
418 
419 	intel_set_power(hu, false);
420 
421 	skb_queue_purge(&intel->txq);
422 	kfree_skb(intel->rx_skb);
423 	kfree(intel);
424 
425 	hu->priv = NULL;
426 	return 0;
427 }
428 
429 static int intel_flush(struct hci_uart *hu)
430 {
431 	struct intel_data *intel = hu->priv;
432 
433 	BT_DBG("hu %p", hu);
434 
435 	skb_queue_purge(&intel->txq);
436 
437 	return 0;
438 }
439 
440 static int inject_cmd_complete(struct hci_dev *hdev, __u16 opcode)
441 {
442 	struct sk_buff *skb;
443 	struct hci_event_hdr *hdr;
444 	struct hci_ev_cmd_complete *evt;
445 
446 	skb = bt_skb_alloc(sizeof(*hdr) + sizeof(*evt) + 1, GFP_KERNEL);
447 	if (!skb)
448 		return -ENOMEM;
449 
450 	hdr = skb_put(skb, sizeof(*hdr));
451 	hdr->evt = HCI_EV_CMD_COMPLETE;
452 	hdr->plen = sizeof(*evt) + 1;
453 
454 	evt = skb_put(skb, sizeof(*evt));
455 	evt->ncmd = 0x01;
456 	evt->opcode = cpu_to_le16(opcode);
457 
458 	skb_put_u8(skb, 0x00);
459 
460 	hci_skb_pkt_type(skb) = HCI_EVENT_PKT;
461 
462 	return hci_recv_frame(hdev, skb);
463 }
464 
465 static int intel_set_baudrate(struct hci_uart *hu, unsigned int speed)
466 {
467 	struct intel_data *intel = hu->priv;
468 	struct hci_dev *hdev = hu->hdev;
469 	u8 speed_cmd[] = { 0x06, 0xfc, 0x01, 0x00 };
470 	struct sk_buff *skb;
471 	int err;
472 
473 	/* This can be the first command sent to the chip, check
474 	 * that the controller is ready.
475 	 */
476 	err = intel_wait_booting(hu);
477 
478 	clear_bit(STATE_BOOTING, &intel->flags);
479 
480 	/* In case of timeout, try to continue anyway */
481 	if (err && err != -ETIMEDOUT)
482 		return err;
483 
484 	bt_dev_info(hdev, "Change controller speed to %d", speed);
485 
486 	speed_cmd[3] = intel_convert_speed(speed);
487 	if (speed_cmd[3] == 0xff) {
488 		bt_dev_err(hdev, "Unsupported speed");
489 		return -EINVAL;
490 	}
491 
492 	/* Device will not accept speed change if Intel version has not been
493 	 * previously requested.
494 	 */
495 	skb = __hci_cmd_sync(hdev, 0xfc05, 0, NULL, HCI_CMD_TIMEOUT);
496 	if (IS_ERR(skb)) {
497 		bt_dev_err(hdev, "Reading Intel version information failed (%ld)",
498 			   PTR_ERR(skb));
499 		return PTR_ERR(skb);
500 	}
501 	kfree_skb(skb);
502 
503 	skb = bt_skb_alloc(sizeof(speed_cmd), GFP_KERNEL);
504 	if (!skb) {
505 		bt_dev_err(hdev, "Failed to alloc memory for baudrate packet");
506 		return -ENOMEM;
507 	}
508 
509 	skb_put_data(skb, speed_cmd, sizeof(speed_cmd));
510 	hci_skb_pkt_type(skb) = HCI_COMMAND_PKT;
511 
512 	hci_uart_set_flow_control(hu, true);
513 
514 	skb_queue_tail(&intel->txq, skb);
515 	hci_uart_tx_wakeup(hu);
516 
517 	/* wait 100ms to change baudrate on controller side */
518 	msleep(100);
519 
520 	hci_uart_set_baudrate(hu, speed);
521 	hci_uart_set_flow_control(hu, false);
522 
523 	return 0;
524 }
525 
526 static int intel_setup(struct hci_uart *hu)
527 {
528 	struct intel_data *intel = hu->priv;
529 	struct hci_dev *hdev = hu->hdev;
530 	struct sk_buff *skb;
531 	struct intel_version ver;
532 	struct intel_boot_params params;
533 	struct list_head *p;
534 	const struct firmware *fw;
535 	char fwname[64];
536 	u32 boot_param;
537 	ktime_t calltime, delta, rettime;
538 	unsigned long long duration;
539 	unsigned int init_speed, oper_speed;
540 	int speed_change = 0;
541 	int err;
542 
543 	bt_dev_dbg(hdev, "start intel_setup");
544 
545 	hu->hdev->set_diag = btintel_set_diag;
546 	hu->hdev->set_bdaddr = btintel_set_bdaddr;
547 
548 	/* Set the default boot parameter to 0x0 and it is updated to
549 	 * SKU specific boot parameter after reading Intel_Write_Boot_Params
550 	 * command while downloading the firmware.
551 	 */
552 	boot_param = 0x00000000;
553 
554 	calltime = ktime_get();
555 
556 	if (hu->init_speed)
557 		init_speed = hu->init_speed;
558 	else
559 		init_speed = hu->proto->init_speed;
560 
561 	if (hu->oper_speed)
562 		oper_speed = hu->oper_speed;
563 	else
564 		oper_speed = hu->proto->oper_speed;
565 
566 	if (oper_speed && init_speed && oper_speed != init_speed)
567 		speed_change = 1;
568 
569 	/* Check that the controller is ready */
570 	err = intel_wait_booting(hu);
571 
572 	clear_bit(STATE_BOOTING, &intel->flags);
573 
574 	/* In case of timeout, try to continue anyway */
575 	if (err && err != -ETIMEDOUT)
576 		return err;
577 
578 	set_bit(STATE_BOOTLOADER, &intel->flags);
579 
580 	/* Read the Intel version information to determine if the device
581 	 * is in bootloader mode or if it already has operational firmware
582 	 * loaded.
583 	 */
584 	err = btintel_read_version(hdev, &ver);
585 	if (err)
586 		return err;
587 
588 	/* The hardware platform number has a fixed value of 0x37 and
589 	 * for now only accept this single value.
590 	 */
591 	if (ver.hw_platform != 0x37) {
592 		bt_dev_err(hdev, "Unsupported Intel hardware platform (%u)",
593 			   ver.hw_platform);
594 		return -EINVAL;
595 	}
596 
597         /* Check for supported iBT hardware variants of this firmware
598          * loading method.
599          *
600          * This check has been put in place to ensure correct forward
601          * compatibility options when newer hardware variants come along.
602          */
603 	switch (ver.hw_variant) {
604 	case 0x0b:	/* LnP */
605 	case 0x0c:	/* WsP */
606 	case 0x12:	/* ThP */
607 		break;
608 	default:
609 		bt_dev_err(hdev, "Unsupported Intel hardware variant (%u)",
610 			   ver.hw_variant);
611 		return -EINVAL;
612 	}
613 
614 	btintel_version_info(hdev, &ver);
615 
616 	/* The firmware variant determines if the device is in bootloader
617 	 * mode or is running operational firmware. The value 0x06 identifies
618 	 * the bootloader and the value 0x23 identifies the operational
619 	 * firmware.
620 	 *
621 	 * When the operational firmware is already present, then only
622 	 * the check for valid Bluetooth device address is needed. This
623 	 * determines if the device will be added as configured or
624 	 * unconfigured controller.
625 	 *
626 	 * It is not possible to use the Secure Boot Parameters in this
627 	 * case since that command is only available in bootloader mode.
628 	 */
629 	if (ver.fw_variant == 0x23) {
630 		clear_bit(STATE_BOOTLOADER, &intel->flags);
631 		btintel_check_bdaddr(hdev);
632 		return 0;
633 	}
634 
635 	/* If the device is not in bootloader mode, then the only possible
636 	 * choice is to return an error and abort the device initialization.
637 	 */
638 	if (ver.fw_variant != 0x06) {
639 		bt_dev_err(hdev, "Unsupported Intel firmware variant (%u)",
640 			   ver.fw_variant);
641 		return -ENODEV;
642 	}
643 
644 	/* Read the secure boot parameters to identify the operating
645 	 * details of the bootloader.
646 	 */
647 	err = btintel_read_boot_params(hdev, &params);
648 	if (err)
649 		return err;
650 
651 	/* It is required that every single firmware fragment is acknowledged
652 	 * with a command complete event. If the boot parameters indicate
653 	 * that this bootloader does not send them, then abort the setup.
654 	 */
655 	if (params.limited_cce != 0x00) {
656 		bt_dev_err(hdev, "Unsupported Intel firmware loading method (%u)",
657 			   params.limited_cce);
658 		return -EINVAL;
659 	}
660 
661 	/* If the OTP has no valid Bluetooth device address, then there will
662 	 * also be no valid address for the operational firmware.
663 	 */
664 	if (!bacmp(&params.otp_bdaddr, BDADDR_ANY)) {
665 		bt_dev_info(hdev, "No device address configured");
666 		set_bit(HCI_QUIRK_INVALID_BDADDR, &hdev->quirks);
667 	}
668 
669 	/* With this Intel bootloader only the hardware variant and device
670 	 * revision information are used to select the right firmware for SfP
671 	 * and WsP.
672 	 *
673 	 * The firmware filename is ibt-<hw_variant>-<dev_revid>.sfi.
674 	 *
675 	 * Currently the supported hardware variants are:
676 	 *   11 (0x0b) for iBT 3.0 (LnP/SfP)
677 	 *   12 (0x0c) for iBT 3.5 (WsP)
678 	 *
679 	 * For ThP/JfP and for future SKU's, the FW name varies based on HW
680 	 * variant, HW revision and FW revision, as these are dependent on CNVi
681 	 * and RF Combination.
682 	 *
683 	 *   18 (0x12) for iBT3.5 (ThP/JfP)
684 	 *
685 	 * The firmware file name for these will be
686 	 * ibt-<hw_variant>-<hw_revision>-<fw_revision>.sfi.
687 	 *
688 	 */
689 	switch (ver.hw_variant) {
690 	case 0x0b:      /* SfP */
691 	case 0x0c:      /* WsP */
692 		snprintf(fwname, sizeof(fwname), "intel/ibt-%u-%u.sfi",
693 			 le16_to_cpu(ver.hw_variant),
694 			 le16_to_cpu(params.dev_revid));
695 		break;
696 	case 0x12:      /* ThP */
697 		snprintf(fwname, sizeof(fwname), "intel/ibt-%u-%u-%u.sfi",
698 			 le16_to_cpu(ver.hw_variant),
699 			 le16_to_cpu(ver.hw_revision),
700 			 le16_to_cpu(ver.fw_revision));
701 		break;
702 	default:
703 		bt_dev_err(hdev, "Unsupported Intel hardware variant (%u)",
704 			   ver.hw_variant);
705 		return -EINVAL;
706 	}
707 
708 	err = request_firmware(&fw, fwname, &hdev->dev);
709 	if (err < 0) {
710 		bt_dev_err(hdev, "Failed to load Intel firmware file (%d)",
711 			   err);
712 		return err;
713 	}
714 
715 	bt_dev_info(hdev, "Found device firmware: %s", fwname);
716 
717 	/* Save the DDC file name for later */
718 	switch (ver.hw_variant) {
719 	case 0x0b:      /* SfP */
720 	case 0x0c:      /* WsP */
721 		snprintf(fwname, sizeof(fwname), "intel/ibt-%u-%u.ddc",
722 			 le16_to_cpu(ver.hw_variant),
723 			 le16_to_cpu(params.dev_revid));
724 		break;
725 	case 0x12:      /* ThP */
726 		snprintf(fwname, sizeof(fwname), "intel/ibt-%u-%u-%u.ddc",
727 			 le16_to_cpu(ver.hw_variant),
728 			 le16_to_cpu(ver.hw_revision),
729 			 le16_to_cpu(ver.fw_revision));
730 		break;
731 	default:
732 		bt_dev_err(hdev, "Unsupported Intel hardware variant (%u)",
733 			   ver.hw_variant);
734 		return -EINVAL;
735 	}
736 
737 	if (fw->size < 644) {
738 		bt_dev_err(hdev, "Invalid size of firmware file (%zu)",
739 			   fw->size);
740 		err = -EBADF;
741 		goto done;
742 	}
743 
744 	set_bit(STATE_DOWNLOADING, &intel->flags);
745 
746 	/* Start firmware downloading and get boot parameter */
747 	err = btintel_download_firmware(hdev, fw, &boot_param);
748 	if (err < 0)
749 		goto done;
750 
751 	set_bit(STATE_FIRMWARE_LOADED, &intel->flags);
752 
753 	bt_dev_info(hdev, "Waiting for firmware download to complete");
754 
755 	/* Before switching the device into operational mode and with that
756 	 * booting the loaded firmware, wait for the bootloader notification
757 	 * that all fragments have been successfully received.
758 	 *
759 	 * When the event processing receives the notification, then the
760 	 * STATE_DOWNLOADING flag will be cleared.
761 	 *
762 	 * The firmware loading should not take longer than 5 seconds
763 	 * and thus just timeout if that happens and fail the setup
764 	 * of this device.
765 	 */
766 	err = wait_on_bit_timeout(&intel->flags, STATE_DOWNLOADING,
767 				  TASK_INTERRUPTIBLE,
768 				  msecs_to_jiffies(5000));
769 	if (err == -EINTR) {
770 		bt_dev_err(hdev, "Firmware loading interrupted");
771 		err = -EINTR;
772 		goto done;
773 	}
774 
775 	if (err) {
776 		bt_dev_err(hdev, "Firmware loading timeout");
777 		err = -ETIMEDOUT;
778 		goto done;
779 	}
780 
781 	if (test_bit(STATE_FIRMWARE_FAILED, &intel->flags)) {
782 		bt_dev_err(hdev, "Firmware loading failed");
783 		err = -ENOEXEC;
784 		goto done;
785 	}
786 
787 	rettime = ktime_get();
788 	delta = ktime_sub(rettime, calltime);
789 	duration = (unsigned long long) ktime_to_ns(delta) >> 10;
790 
791 	bt_dev_info(hdev, "Firmware loaded in %llu usecs", duration);
792 
793 done:
794 	release_firmware(fw);
795 
796 	if (err < 0)
797 		return err;
798 
799 	/* We need to restore the default speed before Intel reset */
800 	if (speed_change) {
801 		err = intel_set_baudrate(hu, init_speed);
802 		if (err)
803 			return err;
804 	}
805 
806 	calltime = ktime_get();
807 
808 	set_bit(STATE_BOOTING, &intel->flags);
809 
810 	err = btintel_send_intel_reset(hdev, boot_param);
811 	if (err)
812 		return err;
813 
814 	/* The bootloader will not indicate when the device is ready. This
815 	 * is done by the operational firmware sending bootup notification.
816 	 *
817 	 * Booting into operational firmware should not take longer than
818 	 * 1 second. However if that happens, then just fail the setup
819 	 * since something went wrong.
820 	 */
821 	bt_dev_info(hdev, "Waiting for device to boot");
822 
823 	err = intel_wait_booting(hu);
824 	if (err)
825 		return err;
826 
827 	clear_bit(STATE_BOOTING, &intel->flags);
828 
829 	rettime = ktime_get();
830 	delta = ktime_sub(rettime, calltime);
831 	duration = (unsigned long long) ktime_to_ns(delta) >> 10;
832 
833 	bt_dev_info(hdev, "Device booted in %llu usecs", duration);
834 
835 	/* Enable LPM if matching pdev with wakeup enabled, set TX active
836 	 * until further LPM TX notification.
837 	 */
838 	mutex_lock(&intel_device_list_lock);
839 	list_for_each(p, &intel_device_list) {
840 		struct intel_device *dev = list_entry(p, struct intel_device,
841 						      list);
842 		if (!hu->tty->dev)
843 			break;
844 		if (hu->tty->dev->parent == dev->pdev->dev.parent) {
845 			if (device_may_wakeup(&dev->pdev->dev)) {
846 				set_bit(STATE_LPM_ENABLED, &intel->flags);
847 				set_bit(STATE_TX_ACTIVE, &intel->flags);
848 			}
849 			break;
850 		}
851 	}
852 	mutex_unlock(&intel_device_list_lock);
853 
854 	/* Ignore errors, device can work without DDC parameters */
855 	btintel_load_ddc_config(hdev, fwname);
856 
857 	skb = __hci_cmd_sync(hdev, HCI_OP_RESET, 0, NULL, HCI_CMD_TIMEOUT);
858 	if (IS_ERR(skb))
859 		return PTR_ERR(skb);
860 	kfree_skb(skb);
861 
862 	if (speed_change) {
863 		err = intel_set_baudrate(hu, oper_speed);
864 		if (err)
865 			return err;
866 	}
867 
868 	bt_dev_info(hdev, "Setup complete");
869 
870 	clear_bit(STATE_BOOTLOADER, &intel->flags);
871 
872 	return 0;
873 }
874 
875 static int intel_recv_event(struct hci_dev *hdev, struct sk_buff *skb)
876 {
877 	struct hci_uart *hu = hci_get_drvdata(hdev);
878 	struct intel_data *intel = hu->priv;
879 	struct hci_event_hdr *hdr;
880 
881 	if (!test_bit(STATE_BOOTLOADER, &intel->flags) &&
882 	    !test_bit(STATE_BOOTING, &intel->flags))
883 		goto recv;
884 
885 	hdr = (void *)skb->data;
886 
887 	/* When the firmware loading completes the device sends
888 	 * out a vendor specific event indicating the result of
889 	 * the firmware loading.
890 	 */
891 	if (skb->len == 7 && hdr->evt == 0xff && hdr->plen == 0x05 &&
892 	    skb->data[2] == 0x06) {
893 		if (skb->data[3] != 0x00)
894 			set_bit(STATE_FIRMWARE_FAILED, &intel->flags);
895 
896 		if (test_and_clear_bit(STATE_DOWNLOADING, &intel->flags) &&
897 		    test_bit(STATE_FIRMWARE_LOADED, &intel->flags))
898 			wake_up_bit(&intel->flags, STATE_DOWNLOADING);
899 
900 	/* When switching to the operational firmware the device
901 	 * sends a vendor specific event indicating that the bootup
902 	 * completed.
903 	 */
904 	} else if (skb->len == 9 && hdr->evt == 0xff && hdr->plen == 0x07 &&
905 		   skb->data[2] == 0x02) {
906 		if (test_and_clear_bit(STATE_BOOTING, &intel->flags))
907 			wake_up_bit(&intel->flags, STATE_BOOTING);
908 	}
909 recv:
910 	return hci_recv_frame(hdev, skb);
911 }
912 
913 static void intel_recv_lpm_notify(struct hci_dev *hdev, int value)
914 {
915 	struct hci_uart *hu = hci_get_drvdata(hdev);
916 	struct intel_data *intel = hu->priv;
917 
918 	bt_dev_dbg(hdev, "TX idle notification (%d)", value);
919 
920 	if (value) {
921 		set_bit(STATE_TX_ACTIVE, &intel->flags);
922 		schedule_work(&intel->busy_work);
923 	} else {
924 		clear_bit(STATE_TX_ACTIVE, &intel->flags);
925 	}
926 }
927 
928 static int intel_recv_lpm(struct hci_dev *hdev, struct sk_buff *skb)
929 {
930 	struct hci_lpm_pkt *lpm = (void *)skb->data;
931 	struct hci_uart *hu = hci_get_drvdata(hdev);
932 	struct intel_data *intel = hu->priv;
933 
934 	switch (lpm->opcode) {
935 	case LPM_OP_TX_NOTIFY:
936 		if (lpm->dlen < 1) {
937 			bt_dev_err(hu->hdev, "Invalid LPM notification packet");
938 			break;
939 		}
940 		intel_recv_lpm_notify(hdev, lpm->data[0]);
941 		break;
942 	case LPM_OP_SUSPEND_ACK:
943 		set_bit(STATE_SUSPENDED, &intel->flags);
944 		if (test_and_clear_bit(STATE_LPM_TRANSACTION, &intel->flags))
945 			wake_up_bit(&intel->flags, STATE_LPM_TRANSACTION);
946 		break;
947 	case LPM_OP_RESUME_ACK:
948 		clear_bit(STATE_SUSPENDED, &intel->flags);
949 		if (test_and_clear_bit(STATE_LPM_TRANSACTION, &intel->flags))
950 			wake_up_bit(&intel->flags, STATE_LPM_TRANSACTION);
951 		break;
952 	default:
953 		bt_dev_err(hdev, "Unknown LPM opcode (%02x)", lpm->opcode);
954 		break;
955 	}
956 
957 	kfree_skb(skb);
958 
959 	return 0;
960 }
961 
962 #define INTEL_RECV_LPM \
963 	.type = HCI_LPM_PKT, \
964 	.hlen = HCI_LPM_HDR_SIZE, \
965 	.loff = 1, \
966 	.lsize = 1, \
967 	.maxlen = HCI_LPM_MAX_SIZE
968 
969 static const struct h4_recv_pkt intel_recv_pkts[] = {
970 	{ H4_RECV_ACL,    .recv = hci_recv_frame   },
971 	{ H4_RECV_SCO,    .recv = hci_recv_frame   },
972 	{ H4_RECV_EVENT,  .recv = intel_recv_event },
973 	{ INTEL_RECV_LPM, .recv = intel_recv_lpm   },
974 };
975 
976 static int intel_recv(struct hci_uart *hu, const void *data, int count)
977 {
978 	struct intel_data *intel = hu->priv;
979 
980 	if (!test_bit(HCI_UART_REGISTERED, &hu->flags))
981 		return -EUNATCH;
982 
983 	intel->rx_skb = h4_recv_buf(hu->hdev, intel->rx_skb, data, count,
984 				    intel_recv_pkts,
985 				    ARRAY_SIZE(intel_recv_pkts));
986 	if (IS_ERR(intel->rx_skb)) {
987 		int err = PTR_ERR(intel->rx_skb);
988 		bt_dev_err(hu->hdev, "Frame reassembly failed (%d)", err);
989 		intel->rx_skb = NULL;
990 		return err;
991 	}
992 
993 	return count;
994 }
995 
996 static int intel_enqueue(struct hci_uart *hu, struct sk_buff *skb)
997 {
998 	struct intel_data *intel = hu->priv;
999 	struct list_head *p;
1000 
1001 	BT_DBG("hu %p skb %p", hu, skb);
1002 
1003 	if (!hu->tty->dev)
1004 		goto out_enqueue;
1005 
1006 	/* Be sure our controller is resumed and potential LPM transaction
1007 	 * completed before enqueuing any packet.
1008 	 */
1009 	mutex_lock(&intel_device_list_lock);
1010 	list_for_each(p, &intel_device_list) {
1011 		struct intel_device *idev = list_entry(p, struct intel_device,
1012 						       list);
1013 
1014 		if (hu->tty->dev->parent == idev->pdev->dev.parent) {
1015 			pm_runtime_get_sync(&idev->pdev->dev);
1016 			pm_runtime_mark_last_busy(&idev->pdev->dev);
1017 			pm_runtime_put_autosuspend(&idev->pdev->dev);
1018 			break;
1019 		}
1020 	}
1021 	mutex_unlock(&intel_device_list_lock);
1022 out_enqueue:
1023 	skb_queue_tail(&intel->txq, skb);
1024 
1025 	return 0;
1026 }
1027 
1028 static struct sk_buff *intel_dequeue(struct hci_uart *hu)
1029 {
1030 	struct intel_data *intel = hu->priv;
1031 	struct sk_buff *skb;
1032 
1033 	skb = skb_dequeue(&intel->txq);
1034 	if (!skb)
1035 		return skb;
1036 
1037 	if (test_bit(STATE_BOOTLOADER, &intel->flags) &&
1038 	    (hci_skb_pkt_type(skb) == HCI_COMMAND_PKT)) {
1039 		struct hci_command_hdr *cmd = (void *)skb->data;
1040 		__u16 opcode = le16_to_cpu(cmd->opcode);
1041 
1042 		/* When the 0xfc01 command is issued to boot into
1043 		 * the operational firmware, it will actually not
1044 		 * send a command complete event. To keep the flow
1045 		 * control working inject that event here.
1046 		 */
1047 		if (opcode == 0xfc01)
1048 			inject_cmd_complete(hu->hdev, opcode);
1049 	}
1050 
1051 	/* Prepend skb with frame type */
1052 	memcpy(skb_push(skb, 1), &hci_skb_pkt_type(skb), 1);
1053 
1054 	return skb;
1055 }
1056 
1057 static const struct hci_uart_proto intel_proto = {
1058 	.id		= HCI_UART_INTEL,
1059 	.name		= "Intel",
1060 	.manufacturer	= 2,
1061 	.init_speed	= 115200,
1062 	.oper_speed	= 3000000,
1063 	.open		= intel_open,
1064 	.close		= intel_close,
1065 	.flush		= intel_flush,
1066 	.setup		= intel_setup,
1067 	.set_baudrate	= intel_set_baudrate,
1068 	.recv		= intel_recv,
1069 	.enqueue	= intel_enqueue,
1070 	.dequeue	= intel_dequeue,
1071 };
1072 
1073 #ifdef CONFIG_ACPI
1074 static const struct acpi_device_id intel_acpi_match[] = {
1075 	{ "INT33E1", 0 },
1076 	{ },
1077 };
1078 MODULE_DEVICE_TABLE(acpi, intel_acpi_match);
1079 #endif
1080 
1081 #ifdef CONFIG_PM
1082 static int intel_suspend_device(struct device *dev)
1083 {
1084 	struct intel_device *idev = dev_get_drvdata(dev);
1085 
1086 	mutex_lock(&idev->hu_lock);
1087 	if (idev->hu)
1088 		intel_lpm_suspend(idev->hu);
1089 	mutex_unlock(&idev->hu_lock);
1090 
1091 	return 0;
1092 }
1093 
1094 static int intel_resume_device(struct device *dev)
1095 {
1096 	struct intel_device *idev = dev_get_drvdata(dev);
1097 
1098 	mutex_lock(&idev->hu_lock);
1099 	if (idev->hu)
1100 		intel_lpm_resume(idev->hu);
1101 	mutex_unlock(&idev->hu_lock);
1102 
1103 	return 0;
1104 }
1105 #endif
1106 
1107 #ifdef CONFIG_PM_SLEEP
1108 static int intel_suspend(struct device *dev)
1109 {
1110 	struct intel_device *idev = dev_get_drvdata(dev);
1111 
1112 	if (device_may_wakeup(dev))
1113 		enable_irq_wake(idev->irq);
1114 
1115 	return intel_suspend_device(dev);
1116 }
1117 
1118 static int intel_resume(struct device *dev)
1119 {
1120 	struct intel_device *idev = dev_get_drvdata(dev);
1121 
1122 	if (device_may_wakeup(dev))
1123 		disable_irq_wake(idev->irq);
1124 
1125 	return intel_resume_device(dev);
1126 }
1127 #endif
1128 
1129 static const struct dev_pm_ops intel_pm_ops = {
1130 	SET_SYSTEM_SLEEP_PM_OPS(intel_suspend, intel_resume)
1131 	SET_RUNTIME_PM_OPS(intel_suspend_device, intel_resume_device, NULL)
1132 };
1133 
1134 static const struct acpi_gpio_params reset_gpios = { 0, 0, false };
1135 static const struct acpi_gpio_params host_wake_gpios = { 1, 0, false };
1136 
1137 static const struct acpi_gpio_mapping acpi_hci_intel_gpios[] = {
1138 	{ "reset-gpios", &reset_gpios, 1 },
1139 	{ "host-wake-gpios", &host_wake_gpios, 1 },
1140 	{ },
1141 };
1142 
1143 static int intel_probe(struct platform_device *pdev)
1144 {
1145 	struct intel_device *idev;
1146 	int ret;
1147 
1148 	idev = devm_kzalloc(&pdev->dev, sizeof(*idev), GFP_KERNEL);
1149 	if (!idev)
1150 		return -ENOMEM;
1151 
1152 	mutex_init(&idev->hu_lock);
1153 
1154 	idev->pdev = pdev;
1155 
1156 	ret = devm_acpi_dev_add_driver_gpios(&pdev->dev, acpi_hci_intel_gpios);
1157 	if (ret)
1158 		dev_dbg(&pdev->dev, "Unable to add GPIO mapping table\n");
1159 
1160 	idev->reset = devm_gpiod_get(&pdev->dev, "reset", GPIOD_OUT_LOW);
1161 	if (IS_ERR(idev->reset)) {
1162 		dev_err(&pdev->dev, "Unable to retrieve gpio\n");
1163 		return PTR_ERR(idev->reset);
1164 	}
1165 
1166 	idev->irq = platform_get_irq(pdev, 0);
1167 	if (idev->irq < 0) {
1168 		struct gpio_desc *host_wake;
1169 
1170 		dev_err(&pdev->dev, "No IRQ, falling back to gpio-irq\n");
1171 
1172 		host_wake = devm_gpiod_get(&pdev->dev, "host-wake", GPIOD_IN);
1173 		if (IS_ERR(host_wake)) {
1174 			dev_err(&pdev->dev, "Unable to retrieve IRQ\n");
1175 			goto no_irq;
1176 		}
1177 
1178 		idev->irq = gpiod_to_irq(host_wake);
1179 		if (idev->irq < 0) {
1180 			dev_err(&pdev->dev, "No corresponding irq for gpio\n");
1181 			goto no_irq;
1182 		}
1183 	}
1184 
1185 	/* Only enable wake-up/irq when controller is powered */
1186 	device_set_wakeup_capable(&pdev->dev, true);
1187 	device_wakeup_disable(&pdev->dev);
1188 
1189 no_irq:
1190 	platform_set_drvdata(pdev, idev);
1191 
1192 	/* Place this instance on the device list */
1193 	mutex_lock(&intel_device_list_lock);
1194 	list_add_tail(&idev->list, &intel_device_list);
1195 	mutex_unlock(&intel_device_list_lock);
1196 
1197 	dev_info(&pdev->dev, "registered, gpio(%d)/irq(%d).\n",
1198 		 desc_to_gpio(idev->reset), idev->irq);
1199 
1200 	return 0;
1201 }
1202 
1203 static int intel_remove(struct platform_device *pdev)
1204 {
1205 	struct intel_device *idev = platform_get_drvdata(pdev);
1206 
1207 	device_wakeup_disable(&pdev->dev);
1208 
1209 	mutex_lock(&intel_device_list_lock);
1210 	list_del(&idev->list);
1211 	mutex_unlock(&intel_device_list_lock);
1212 
1213 	dev_info(&pdev->dev, "unregistered.\n");
1214 
1215 	return 0;
1216 }
1217 
1218 static struct platform_driver intel_driver = {
1219 	.probe = intel_probe,
1220 	.remove = intel_remove,
1221 	.driver = {
1222 		.name = "hci_intel",
1223 		.acpi_match_table = ACPI_PTR(intel_acpi_match),
1224 		.pm = &intel_pm_ops,
1225 	},
1226 };
1227 
1228 int __init intel_init(void)
1229 {
1230 	platform_driver_register(&intel_driver);
1231 
1232 	return hci_uart_register_proto(&intel_proto);
1233 }
1234 
1235 int __exit intel_deinit(void)
1236 {
1237 	platform_driver_unregister(&intel_driver);
1238 
1239 	return hci_uart_unregister_proto(&intel_proto);
1240 }
1241