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