1 | // SPDX-License-Identifier: GPL-2.0-or-later |
2 | /* |
3 | * Atheros Communication Bluetooth HCIATH3K UART protocol |
4 | * |
5 | * HCIATH3K (HCI Atheros AR300x Protocol) is a Atheros Communication's |
6 | * power management protocol extension to H4 to support AR300x Bluetooth Chip. |
7 | * |
8 | * Copyright (c) 2009-2010 Atheros Communications Inc. |
9 | * |
10 | * Acknowledgements: |
11 | * This file is based on hci_h4.c, which was written |
12 | * by Maxim Krasnyansky and Marcel Holtmann. |
13 | */ |
14 | |
15 | #include <linux/module.h> |
16 | #include <linux/kernel.h> |
17 | |
18 | #include <linux/init.h> |
19 | #include <linux/slab.h> |
20 | #include <linux/tty.h> |
21 | #include <linux/errno.h> |
22 | #include <linux/ioctl.h> |
23 | #include <linux/skbuff.h> |
24 | |
25 | #include <net/bluetooth/bluetooth.h> |
26 | #include <net/bluetooth/hci_core.h> |
27 | |
28 | #include "hci_uart.h" |
29 | |
30 | struct ath_struct { |
31 | struct hci_uart *hu; |
32 | unsigned int cur_sleep; |
33 | |
34 | struct sk_buff *rx_skb; |
35 | struct sk_buff_head txq; |
36 | struct work_struct ctxtsw; |
37 | }; |
38 | |
39 | #define OP_WRITE_TAG 0x01 |
40 | |
41 | #define INDEX_BDADDR 0x01 |
42 | |
43 | struct ath_vendor_cmd { |
44 | __u8 opcode; |
45 | __le16 index; |
46 | __u8 len; |
47 | __u8 data[251]; |
48 | } __packed; |
49 | |
50 | static int ath_wakeup_ar3k(struct tty_struct *tty) |
51 | { |
52 | int status = tty->driver->ops->tiocmget(tty); |
53 | |
54 | if (status & TIOCM_CTS) |
55 | return status; |
56 | |
57 | /* Clear RTS first */ |
58 | tty->driver->ops->tiocmget(tty); |
59 | tty->driver->ops->tiocmset(tty, 0x00, TIOCM_RTS); |
60 | msleep(msecs: 20); |
61 | |
62 | /* Set RTS, wake up board */ |
63 | tty->driver->ops->tiocmget(tty); |
64 | tty->driver->ops->tiocmset(tty, TIOCM_RTS, 0x00); |
65 | msleep(msecs: 20); |
66 | |
67 | status = tty->driver->ops->tiocmget(tty); |
68 | return status; |
69 | } |
70 | |
71 | static void ath_hci_uart_work(struct work_struct *work) |
72 | { |
73 | int status; |
74 | struct ath_struct *ath; |
75 | struct hci_uart *hu; |
76 | struct tty_struct *tty; |
77 | |
78 | ath = container_of(work, struct ath_struct, ctxtsw); |
79 | |
80 | hu = ath->hu; |
81 | tty = hu->tty; |
82 | |
83 | /* verify and wake up controller */ |
84 | if (ath->cur_sleep) { |
85 | status = ath_wakeup_ar3k(tty); |
86 | if (!(status & TIOCM_CTS)) |
87 | return; |
88 | } |
89 | |
90 | /* Ready to send Data */ |
91 | clear_bit(HCI_UART_SENDING, addr: &hu->tx_state); |
92 | hci_uart_tx_wakeup(hu); |
93 | } |
94 | |
95 | static int ath_open(struct hci_uart *hu) |
96 | { |
97 | struct ath_struct *ath; |
98 | |
99 | BT_DBG("hu %p" , hu); |
100 | |
101 | if (!hci_uart_has_flow_control(hu)) |
102 | return -EOPNOTSUPP; |
103 | |
104 | ath = kzalloc(size: sizeof(*ath), GFP_KERNEL); |
105 | if (!ath) |
106 | return -ENOMEM; |
107 | |
108 | skb_queue_head_init(list: &ath->txq); |
109 | |
110 | hu->priv = ath; |
111 | ath->hu = hu; |
112 | |
113 | INIT_WORK(&ath->ctxtsw, ath_hci_uart_work); |
114 | |
115 | return 0; |
116 | } |
117 | |
118 | static int ath_close(struct hci_uart *hu) |
119 | { |
120 | struct ath_struct *ath = hu->priv; |
121 | |
122 | BT_DBG("hu %p" , hu); |
123 | |
124 | skb_queue_purge(list: &ath->txq); |
125 | |
126 | kfree_skb(skb: ath->rx_skb); |
127 | |
128 | cancel_work_sync(work: &ath->ctxtsw); |
129 | |
130 | hu->priv = NULL; |
131 | kfree(objp: ath); |
132 | |
133 | return 0; |
134 | } |
135 | |
136 | static int ath_flush(struct hci_uart *hu) |
137 | { |
138 | struct ath_struct *ath = hu->priv; |
139 | |
140 | BT_DBG("hu %p" , hu); |
141 | |
142 | skb_queue_purge(list: &ath->txq); |
143 | |
144 | return 0; |
145 | } |
146 | |
147 | static int ath_vendor_cmd(struct hci_dev *hdev, uint8_t opcode, uint16_t index, |
148 | const void *data, size_t dlen) |
149 | { |
150 | struct sk_buff *skb; |
151 | struct ath_vendor_cmd cmd; |
152 | |
153 | if (dlen > sizeof(cmd.data)) |
154 | return -EINVAL; |
155 | |
156 | cmd.opcode = opcode; |
157 | cmd.index = cpu_to_le16(index); |
158 | cmd.len = dlen; |
159 | memcpy(cmd.data, data, dlen); |
160 | |
161 | skb = __hci_cmd_sync(hdev, opcode: 0xfc0b, plen: dlen + 4, param: &cmd, HCI_INIT_TIMEOUT); |
162 | if (IS_ERR(ptr: skb)) |
163 | return PTR_ERR(ptr: skb); |
164 | kfree_skb(skb); |
165 | |
166 | return 0; |
167 | } |
168 | |
169 | static int ath_set_bdaddr(struct hci_dev *hdev, const bdaddr_t *bdaddr) |
170 | { |
171 | return ath_vendor_cmd(hdev, OP_WRITE_TAG, INDEX_BDADDR, data: bdaddr, |
172 | dlen: sizeof(*bdaddr)); |
173 | } |
174 | |
175 | static int ath_setup(struct hci_uart *hu) |
176 | { |
177 | BT_DBG("hu %p" , hu); |
178 | |
179 | hu->hdev->set_bdaddr = ath_set_bdaddr; |
180 | |
181 | return 0; |
182 | } |
183 | |
184 | static const struct h4_recv_pkt ath_recv_pkts[] = { |
185 | { H4_RECV_ACL, .recv = hci_recv_frame }, |
186 | { H4_RECV_SCO, .recv = hci_recv_frame }, |
187 | { H4_RECV_EVENT, .recv = hci_recv_frame }, |
188 | }; |
189 | |
190 | static int ath_recv(struct hci_uart *hu, const void *data, int count) |
191 | { |
192 | struct ath_struct *ath = hu->priv; |
193 | |
194 | ath->rx_skb = h4_recv_buf(hdev: hu->hdev, skb: ath->rx_skb, buffer: data, count, |
195 | pkts: ath_recv_pkts, ARRAY_SIZE(ath_recv_pkts)); |
196 | if (IS_ERR(ptr: ath->rx_skb)) { |
197 | int err = PTR_ERR(ptr: ath->rx_skb); |
198 | bt_dev_err(hu->hdev, "Frame reassembly failed (%d)" , err); |
199 | ath->rx_skb = NULL; |
200 | return err; |
201 | } |
202 | |
203 | return count; |
204 | } |
205 | |
206 | #define HCI_OP_ATH_SLEEP 0xFC04 |
207 | |
208 | static int ath_enqueue(struct hci_uart *hu, struct sk_buff *skb) |
209 | { |
210 | struct ath_struct *ath = hu->priv; |
211 | |
212 | if (hci_skb_pkt_type(skb) == HCI_SCODATA_PKT) { |
213 | kfree_skb(skb); |
214 | return 0; |
215 | } |
216 | |
217 | /* Update power management enable flag with parameters of |
218 | * HCI sleep enable vendor specific HCI command. |
219 | */ |
220 | if (hci_skb_pkt_type(skb) == HCI_COMMAND_PKT) { |
221 | struct hci_command_hdr *hdr = (void *)skb->data; |
222 | |
223 | if (__le16_to_cpu(hdr->opcode) == HCI_OP_ATH_SLEEP) |
224 | ath->cur_sleep = skb->data[HCI_COMMAND_HDR_SIZE]; |
225 | } |
226 | |
227 | BT_DBG("hu %p skb %p" , hu, skb); |
228 | |
229 | /* Prepend skb with frame type */ |
230 | memcpy(skb_push(skb, 1), &hci_skb_pkt_type(skb), 1); |
231 | |
232 | skb_queue_tail(list: &ath->txq, newsk: skb); |
233 | set_bit(HCI_UART_SENDING, addr: &hu->tx_state); |
234 | |
235 | schedule_work(work: &ath->ctxtsw); |
236 | |
237 | return 0; |
238 | } |
239 | |
240 | static struct sk_buff *ath_dequeue(struct hci_uart *hu) |
241 | { |
242 | struct ath_struct *ath = hu->priv; |
243 | |
244 | return skb_dequeue(list: &ath->txq); |
245 | } |
246 | |
247 | static const struct hci_uart_proto athp = { |
248 | .id = HCI_UART_ATH3K, |
249 | .name = "ATH3K" , |
250 | .manufacturer = 69, |
251 | .open = ath_open, |
252 | .close = ath_close, |
253 | .flush = ath_flush, |
254 | .setup = ath_setup, |
255 | .recv = ath_recv, |
256 | .enqueue = ath_enqueue, |
257 | .dequeue = ath_dequeue, |
258 | }; |
259 | |
260 | int __init ath_init(void) |
261 | { |
262 | return hci_uart_register_proto(p: &athp); |
263 | } |
264 | |
265 | int __exit ath_deinit(void) |
266 | { |
267 | return hci_uart_unregister_proto(p: &athp); |
268 | } |
269 | |