1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26#include <linux/module.h>
27
28#include <linux/kernel.h>
29#include <linux/init.h>
30#include <linux/types.h>
31#include <linux/fcntl.h>
32#include <linux/interrupt.h>
33#include <linux/ptrace.h>
34#include <linux/poll.h>
35
36#include <linux/slab.h>
37#include <linux/tty.h>
38#include <linux/errno.h>
39#include <linux/string.h>
40#include <linux/signal.h>
41#include <linux/ioctl.h>
42#include <linux/skbuff.h>
43
44#include <net/bluetooth/bluetooth.h>
45#include <net/bluetooth/hci_core.h>
46
47#include "hci_uart.h"
48
49#define VERSION "2.2"
50
51static struct hci_uart_proto *hup[HCI_UART_MAX_PROTO];
52
53int hci_uart_register_proto(struct hci_uart_proto *p)
54{
55 if (p->id >= HCI_UART_MAX_PROTO)
56 return -EINVAL;
57
58 if (hup[p->id])
59 return -EEXIST;
60
61 hup[p->id] = p;
62
63 return 0;
64}
65
66int hci_uart_unregister_proto(struct hci_uart_proto *p)
67{
68 if (p->id >= HCI_UART_MAX_PROTO)
69 return -EINVAL;
70
71 if (!hup[p->id])
72 return -EINVAL;
73
74 hup[p->id] = NULL;
75
76 return 0;
77}
78
79static struct hci_uart_proto *hci_uart_get_proto(unsigned int id)
80{
81 if (id >= HCI_UART_MAX_PROTO)
82 return NULL;
83
84 return hup[id];
85}
86
87static inline void hci_uart_tx_complete(struct hci_uart *hu, int pkt_type)
88{
89 struct hci_dev *hdev = hu->hdev;
90
91
92 switch (pkt_type) {
93 case HCI_COMMAND_PKT:
94 hdev->stat.cmd_tx++;
95 break;
96
97 case HCI_ACLDATA_PKT:
98 hdev->stat.acl_tx++;
99 break;
100
101 case HCI_SCODATA_PKT:
102 hdev->stat.sco_tx++;
103 break;
104 }
105}
106
107static inline struct sk_buff *hci_uart_dequeue(struct hci_uart *hu)
108{
109 struct sk_buff *skb = hu->tx_skb;
110
111 if (!skb)
112 skb = hu->proto->dequeue(hu);
113 else
114 hu->tx_skb = NULL;
115
116 return skb;
117}
118
119int hci_uart_tx_wakeup(struct hci_uart *hu)
120{
121 struct tty_struct *tty = hu->tty;
122 struct hci_dev *hdev = hu->hdev;
123 struct sk_buff *skb;
124
125 if (test_and_set_bit(HCI_UART_SENDING, &hu->tx_state)) {
126 set_bit(HCI_UART_TX_WAKEUP, &hu->tx_state);
127 return 0;
128 }
129
130 BT_DBG("");
131
132restart:
133 clear_bit(HCI_UART_TX_WAKEUP, &hu->tx_state);
134
135 while ((skb = hci_uart_dequeue(hu))) {
136 int len;
137
138 set_bit(TTY_DO_WRITE_WAKEUP, &tty->flags);
139 len = tty->ops->write(tty, skb->data, skb->len);
140 hdev->stat.byte_tx += len;
141
142 skb_pull(skb, len);
143 if (skb->len) {
144 hu->tx_skb = skb;
145 break;
146 }
147
148 hci_uart_tx_complete(hu, bt_cb(skb)->pkt_type);
149 kfree_skb(skb);
150 }
151
152 if (test_bit(HCI_UART_TX_WAKEUP, &hu->tx_state))
153 goto restart;
154
155 clear_bit(HCI_UART_SENDING, &hu->tx_state);
156 return 0;
157}
158
159static void hci_uart_init_work(struct work_struct *work)
160{
161 struct hci_uart *hu = container_of(work, struct hci_uart, init_ready);
162 int err;
163
164 if (!test_and_clear_bit(HCI_UART_INIT_PENDING, &hu->hdev_flags))
165 return;
166
167 err = hci_register_dev(hu->hdev);
168 if (err < 0) {
169 BT_ERR("Can't register HCI device");
170 hci_free_dev(hu->hdev);
171 hu->hdev = NULL;
172 hu->proto->close(hu);
173 }
174
175 set_bit(HCI_UART_REGISTERED, &hu->flags);
176}
177
178int hci_uart_init_ready(struct hci_uart *hu)
179{
180 if (!test_bit(HCI_UART_INIT_PENDING, &hu->hdev_flags))
181 return -EALREADY;
182
183 schedule_work(&hu->init_ready);
184
185 return 0;
186}
187
188
189
190static int hci_uart_open(struct hci_dev *hdev)
191{
192 BT_DBG("%s %p", hdev->name, hdev);
193
194
195
196 set_bit(HCI_RUNNING, &hdev->flags);
197
198 return 0;
199}
200
201
202static int hci_uart_flush(struct hci_dev *hdev)
203{
204 struct hci_uart *hu = hci_get_drvdata(hdev);
205 struct tty_struct *tty = hu->tty;
206
207 BT_DBG("hdev %p tty %p", hdev, tty);
208
209 if (hu->tx_skb) {
210 kfree_skb(hu->tx_skb); hu->tx_skb = NULL;
211 }
212
213
214 tty_ldisc_flush(tty);
215 tty_driver_flush_buffer(tty);
216
217 if (test_bit(HCI_UART_PROTO_SET, &hu->flags))
218 hu->proto->flush(hu);
219
220 return 0;
221}
222
223
224static int hci_uart_close(struct hci_dev *hdev)
225{
226 BT_DBG("hdev %p", hdev);
227
228 if (!test_and_clear_bit(HCI_RUNNING, &hdev->flags))
229 return 0;
230
231 hci_uart_flush(hdev);
232 hdev->flush = NULL;
233 return 0;
234}
235
236
237static int hci_uart_send_frame(struct sk_buff *skb)
238{
239 struct hci_dev* hdev = (struct hci_dev *) skb->dev;
240 struct hci_uart *hu;
241
242 if (!hdev) {
243 BT_ERR("Frame for unknown device (hdev=NULL)");
244 return -ENODEV;
245 }
246
247 if (!test_bit(HCI_RUNNING, &hdev->flags))
248 return -EBUSY;
249
250 hu = hci_get_drvdata(hdev);
251
252 BT_DBG("%s: type %d len %d", hdev->name, bt_cb(skb)->pkt_type, skb->len);
253
254 hu->proto->enqueue(hu, skb);
255
256 hci_uart_tx_wakeup(hu);
257
258 return 0;
259}
260
261
262
263
264
265
266
267
268
269
270
271static int hci_uart_tty_open(struct tty_struct *tty)
272{
273 struct hci_uart *hu;
274
275 BT_DBG("tty %p", tty);
276
277
278
279 if (tty->ops->write == NULL)
280 return -EOPNOTSUPP;
281
282 if (!(hu = kzalloc(sizeof(struct hci_uart), GFP_KERNEL))) {
283 BT_ERR("Can't allocate control structure");
284 return -ENFILE;
285 }
286
287 tty->disc_data = hu;
288 hu->tty = tty;
289 tty->receive_room = 65536;
290
291 INIT_WORK(&hu->init_ready, hci_uart_init_work);
292
293 spin_lock_init(&hu->rx_lock);
294
295
296
297
298
299
300 if (tty->ldisc->ops->flush_buffer)
301 tty->ldisc->ops->flush_buffer(tty);
302 tty_driver_flush_buffer(tty);
303
304 return 0;
305}
306
307
308
309
310
311
312static void hci_uart_tty_close(struct tty_struct *tty)
313{
314 struct hci_uart *hu = (void *)tty->disc_data;
315 struct hci_dev *hdev;
316
317 BT_DBG("tty %p", tty);
318
319
320 tty->disc_data = NULL;
321
322 if (!hu)
323 return;
324
325 hdev = hu->hdev;
326 if (hdev)
327 hci_uart_close(hdev);
328
329 if (test_and_clear_bit(HCI_UART_PROTO_SET, &hu->flags)) {
330 if (hdev) {
331 if (test_bit(HCI_UART_REGISTERED, &hu->flags))
332 hci_unregister_dev(hdev);
333 hci_free_dev(hdev);
334 }
335 hu->proto->close(hu);
336 }
337
338 kfree(hu);
339}
340
341
342
343
344
345
346
347
348
349static void hci_uart_tty_wakeup(struct tty_struct *tty)
350{
351 struct hci_uart *hu = (void *)tty->disc_data;
352
353 BT_DBG("");
354
355 if (!hu)
356 return;
357
358 clear_bit(TTY_DO_WRITE_WAKEUP, &tty->flags);
359
360 if (tty != hu->tty)
361 return;
362
363 if (test_bit(HCI_UART_PROTO_SET, &hu->flags))
364 hci_uart_tx_wakeup(hu);
365}
366
367
368
369
370
371
372
373
374
375
376
377
378
379static void hci_uart_tty_receive(struct tty_struct *tty, const u8 *data, char *flags, int count)
380{
381 struct hci_uart *hu = (void *)tty->disc_data;
382
383 if (!hu || tty != hu->tty)
384 return;
385
386 if (!test_bit(HCI_UART_PROTO_SET, &hu->flags))
387 return;
388
389 spin_lock(&hu->rx_lock);
390 hu->proto->recv(hu, (void *) data, count);
391
392 if (hu->hdev)
393 hu->hdev->stat.byte_rx += count;
394
395 spin_unlock(&hu->rx_lock);
396
397 tty_unthrottle(tty);
398}
399
400static int hci_uart_register_dev(struct hci_uart *hu)
401{
402 struct hci_dev *hdev;
403
404 BT_DBG("");
405
406
407 hdev = hci_alloc_dev();
408 if (!hdev) {
409 BT_ERR("Can't allocate HCI device");
410 return -ENOMEM;
411 }
412
413 hu->hdev = hdev;
414
415 hdev->bus = HCI_UART;
416 hci_set_drvdata(hdev, hu);
417
418 hdev->open = hci_uart_open;
419 hdev->close = hci_uart_close;
420 hdev->flush = hci_uart_flush;
421 hdev->send = hci_uart_send_frame;
422 SET_HCIDEV_DEV(hdev, hu->tty->dev);
423
424 if (test_bit(HCI_UART_RAW_DEVICE, &hu->hdev_flags))
425 set_bit(HCI_QUIRK_RAW_DEVICE, &hdev->quirks);
426
427 if (!test_bit(HCI_UART_RESET_ON_INIT, &hu->hdev_flags))
428 set_bit(HCI_QUIRK_RESET_ON_CLOSE, &hdev->quirks);
429
430 if (test_bit(HCI_UART_CREATE_AMP, &hu->hdev_flags))
431 hdev->dev_type = HCI_AMP;
432 else
433 hdev->dev_type = HCI_BREDR;
434
435 if (test_bit(HCI_UART_INIT_PENDING, &hu->hdev_flags))
436 return 0;
437
438 if (hci_register_dev(hdev) < 0) {
439 BT_ERR("Can't register HCI device");
440 hci_free_dev(hdev);
441 return -ENODEV;
442 }
443
444 set_bit(HCI_UART_REGISTERED, &hu->flags);
445
446 return 0;
447}
448
449static int hci_uart_set_proto(struct hci_uart *hu, int id)
450{
451 struct hci_uart_proto *p;
452 int err;
453
454 p = hci_uart_get_proto(id);
455 if (!p)
456 return -EPROTONOSUPPORT;
457
458 err = p->open(hu);
459 if (err)
460 return err;
461
462 hu->proto = p;
463
464 err = hci_uart_register_dev(hu);
465 if (err) {
466 p->close(hu);
467 return err;
468 }
469
470 return 0;
471}
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486static int hci_uart_tty_ioctl(struct tty_struct *tty, struct file * file,
487 unsigned int cmd, unsigned long arg)
488{
489 struct hci_uart *hu = (void *)tty->disc_data;
490 int err = 0;
491
492 BT_DBG("");
493
494
495 if (!hu)
496 return -EBADF;
497
498 switch (cmd) {
499 case HCIUARTSETPROTO:
500 if (!test_and_set_bit(HCI_UART_PROTO_SET, &hu->flags)) {
501 err = hci_uart_set_proto(hu, arg);
502 if (err) {
503 clear_bit(HCI_UART_PROTO_SET, &hu->flags);
504 return err;
505 }
506 } else
507 return -EBUSY;
508 break;
509
510 case HCIUARTGETPROTO:
511 if (test_bit(HCI_UART_PROTO_SET, &hu->flags))
512 return hu->proto->id;
513 return -EUNATCH;
514
515 case HCIUARTGETDEVICE:
516 if (test_bit(HCI_UART_PROTO_SET, &hu->flags))
517 return hu->hdev->id;
518 return -EUNATCH;
519
520 case HCIUARTSETFLAGS:
521 if (test_bit(HCI_UART_PROTO_SET, &hu->flags))
522 return -EBUSY;
523 hu->hdev_flags = arg;
524 break;
525
526 case HCIUARTGETFLAGS:
527 return hu->hdev_flags;
528
529 default:
530 err = n_tty_ioctl_helper(tty, file, cmd, arg);
531 break;
532 }
533
534 return err;
535}
536
537
538
539
540static ssize_t hci_uart_tty_read(struct tty_struct *tty, struct file *file,
541 unsigned char __user *buf, size_t nr)
542{
543 return 0;
544}
545
546static ssize_t hci_uart_tty_write(struct tty_struct *tty, struct file *file,
547 const unsigned char *data, size_t count)
548{
549 return 0;
550}
551
552static unsigned int hci_uart_tty_poll(struct tty_struct *tty,
553 struct file *filp, poll_table *wait)
554{
555 return 0;
556}
557
558static int __init hci_uart_init(void)
559{
560 static struct tty_ldisc_ops hci_uart_ldisc;
561 int err;
562
563 BT_INFO("HCI UART driver ver %s", VERSION);
564
565
566
567 memset(&hci_uart_ldisc, 0, sizeof (hci_uart_ldisc));
568 hci_uart_ldisc.magic = TTY_LDISC_MAGIC;
569 hci_uart_ldisc.name = "n_hci";
570 hci_uart_ldisc.open = hci_uart_tty_open;
571 hci_uart_ldisc.close = hci_uart_tty_close;
572 hci_uart_ldisc.read = hci_uart_tty_read;
573 hci_uart_ldisc.write = hci_uart_tty_write;
574 hci_uart_ldisc.ioctl = hci_uart_tty_ioctl;
575 hci_uart_ldisc.poll = hci_uart_tty_poll;
576 hci_uart_ldisc.receive_buf = hci_uart_tty_receive;
577 hci_uart_ldisc.write_wakeup = hci_uart_tty_wakeup;
578 hci_uart_ldisc.owner = THIS_MODULE;
579
580 if ((err = tty_register_ldisc(N_HCI, &hci_uart_ldisc))) {
581 BT_ERR("HCI line discipline registration failed. (%d)", err);
582 return err;
583 }
584
585#ifdef CONFIG_BT_HCIUART_H4
586 h4_init();
587#endif
588#ifdef CONFIG_BT_HCIUART_BCSP
589 bcsp_init();
590#endif
591#ifdef CONFIG_BT_HCIUART_LL
592 ll_init();
593#endif
594#ifdef CONFIG_BT_HCIUART_ATH3K
595 ath_init();
596#endif
597#ifdef CONFIG_BT_HCIUART_3WIRE
598 h5_init();
599#endif
600
601 return 0;
602}
603
604static void __exit hci_uart_exit(void)
605{
606 int err;
607
608#ifdef CONFIG_BT_HCIUART_H4
609 h4_deinit();
610#endif
611#ifdef CONFIG_BT_HCIUART_BCSP
612 bcsp_deinit();
613#endif
614#ifdef CONFIG_BT_HCIUART_LL
615 ll_deinit();
616#endif
617#ifdef CONFIG_BT_HCIUART_ATH3K
618 ath_deinit();
619#endif
620#ifdef CONFIG_BT_HCIUART_3WIRE
621 h5_deinit();
622#endif
623
624
625 if ((err = tty_unregister_ldisc(N_HCI)))
626 BT_ERR("Can't unregister HCI line discipline (%d)", err);
627}
628
629module_init(hci_uart_init);
630module_exit(hci_uart_exit);
631
632MODULE_AUTHOR("Marcel Holtmann <marcel@holtmann.org>");
633MODULE_DESCRIPTION("Bluetooth HCI UART driver ver " VERSION);
634MODULE_VERSION(VERSION);
635MODULE_LICENSE("GPL");
636MODULE_ALIAS_LDISC(N_HCI);
637