?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Merge tag 'v5.3-rc4' into next
[linux/fpc-iii.git] / net / bluetooth / hci_sock.c
blobd32077b284337ff4086701b0fa5817a173e09d03
1 /*
2 BlueZ - Bluetooth protocol stack for Linux
3 Copyright (C) 2000-2001 Qualcomm Incorporated
4
5 Written 2000,2001 by Maxim Krasnyansky <maxk@qualcomm.com>
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License version 2 as
9 published by the Free Software Foundation;
10
11 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
12 OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
13 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF THIRD PARTY RIGHTS.
14 IN NO EVENT SHALL THE COPYRIGHT HOLDER(S) AND AUTHOR(S) BE LIABLE FOR ANY
15 CLAIM, OR ANY SPECIAL INDIRECT OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES
16 WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
17 ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
18 OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
19
20 ALL LIABILITY, INCLUDING LIABILITY FOR INFRINGEMENT OF ANY PATENTS,
21 COPYRIGHTS, TRADEMARKS OR OTHER RIGHTS, RELATING TO USE OF THIS
22 SOFTWARE IS DISCLAIMED.
23 */
24
25 /* Bluetooth HCI sockets. */
26
27 #include <linux/export.h>
28 #include <linux/utsname.h>
29 #include <linux/sched.h>
30 #include <asm/unaligned.h>
31
32 #include <net/bluetooth/bluetooth.h>
33 #include <net/bluetooth/hci_core.h>
34 #include <net/bluetooth/hci_mon.h>
35 #include <net/bluetooth/mgmt.h>
36
37 #include "mgmt_util.h"
38
39 static LIST_HEAD(mgmt_chan_list);
40 static DEFINE_MUTEX(mgmt_chan_list_lock);
41
42 static DEFINE_IDA(sock_cookie_ida);
43
44 static atomic_t monitor_promisc = ATOMIC_INIT(0);
45
46 /* ----- HCI socket interface ----- */
47
48 /* Socket info */
49 #define hci_pi(sk) ((struct hci_pinfo *) sk)
50
51 struct hci_pinfo {
52 struct bt_sock bt;
53 struct hci_dev *hdev;
54 struct hci_filter filter;
55 __u32 cmsg_mask;
56 unsigned short channel;
57 unsigned long flags;
58 __u32 cookie;
59 char comm[TASK_COMM_LEN];
60 };
61
62 void hci_sock_set_flag(struct sock *sk, int nr)
63 {
64 set_bit(nr, &hci_pi(sk)->flags);
65 }
66
67 void hci_sock_clear_flag(struct sock *sk, int nr)
68 {
69 clear_bit(nr, &hci_pi(sk)->flags);
70 }
71
72 int hci_sock_test_flag(struct sock *sk, int nr)
73 {
74 return test_bit(nr, &hci_pi(sk)->flags);
75 }
76
77 unsigned short hci_sock_get_channel(struct sock *sk)
78 {
79 return hci_pi(sk)->channel;
80 }
81
82 u32 hci_sock_get_cookie(struct sock *sk)
83 {
84 return hci_pi(sk)->cookie;
85 }
86
87 static bool hci_sock_gen_cookie(struct sock *sk)
88 {
89 int id = hci_pi(sk)->cookie;
90
91 if (!id) {
92 id = ida_simple_get(&sock_cookie_ida, 1, 0, GFP_KERNEL);
93 if (id < 0)
94 id = 0xffffffff;
95
96 hci_pi(sk)->cookie = id;
97 get_task_comm(hci_pi(sk)->comm, current);
98 return true;
99 }
100
101 return false;
102 }
103
104 static void hci_sock_free_cookie(struct sock *sk)
105 {
106 int id = hci_pi(sk)->cookie;
107
108 if (id) {
109 hci_pi(sk)->cookie = 0xffffffff;
110 ida_simple_remove(&sock_cookie_ida, id);
111 }
112 }
113
114 static inline int hci_test_bit(int nr, const void *addr)
115 {
116 return *((const __u32 *) addr + (nr >> 5)) & ((__u32) 1 << (nr & 31));
117 }
118
119 /* Security filter */
120 #define HCI_SFLT_MAX_OGF 5
121
122 struct hci_sec_filter {
123 __u32 type_mask;
124 __u32 event_mask[2];
125 __u32 ocf_mask[HCI_SFLT_MAX_OGF + 1][4];
126 };
127
128 static const struct hci_sec_filter hci_sec_filter = {
129 /* Packet types */
130 0x10,
131 /* Events */
132 { 0x1000d9fe, 0x0000b00c },
133 /* Commands */
134 {
135 { 0x0 },
136 /* OGF_LINK_CTL */
137 { 0xbe000006, 0x00000001, 0x00000000, 0x00 },
138 /* OGF_LINK_POLICY */
139 { 0x00005200, 0x00000000, 0x00000000, 0x00 },
140 /* OGF_HOST_CTL */
141 { 0xaab00200, 0x2b402aaa, 0x05220154, 0x00 },
142 /* OGF_INFO_PARAM */
143 { 0x000002be, 0x00000000, 0x00000000, 0x00 },
144 /* OGF_STATUS_PARAM */
145 { 0x000000ea, 0x00000000, 0x00000000, 0x00 }
146 }
147 };
148
149 static struct bt_sock_list hci_sk_list = {
150 .lock = __RW_LOCK_UNLOCKED(hci_sk_list.lock)
151 };
152
153 static bool is_filtered_packet(struct sock *sk, struct sk_buff *skb)
154 {
155 struct hci_filter *flt;
156 int flt_type, flt_event;
157
158 /* Apply filter */
159 flt = &hci_pi(sk)->filter;
160
161 flt_type = hci_skb_pkt_type(skb) & HCI_FLT_TYPE_BITS;
162
163 if (!test_bit(flt_type, &flt->type_mask))
164 return true;
165
166 /* Extra filter for event packets only */
167 if (hci_skb_pkt_type(skb) != HCI_EVENT_PKT)
168 return false;
169
170 flt_event = (*(__u8 *)skb->data & HCI_FLT_EVENT_BITS);
171
172 if (!hci_test_bit(flt_event, &flt->event_mask))
173 return true;
174
175 /* Check filter only when opcode is set */
176 if (!flt->opcode)
177 return false;
178
179 if (flt_event == HCI_EV_CMD_COMPLETE &&
180 flt->opcode != get_unaligned((__le16 *)(skb->data + 3)))
181 return true;
182
183 if (flt_event == HCI_EV_CMD_STATUS &&
184 flt->opcode != get_unaligned((__le16 *)(skb->data + 4)))
185 return true;
186
187 return false;
188 }
189
190 /* Send frame to RAW socket */
191 void hci_send_to_sock(struct hci_dev *hdev, struct sk_buff *skb)
192 {
193 struct sock *sk;
194 struct sk_buff *skb_copy = NULL;
195
196 BT_DBG("hdev %p len %d", hdev, skb->len);
197
198 read_lock(&hci_sk_list.lock);
199
200 sk_for_each(sk, &hci_sk_list.head) {
201 struct sk_buff *nskb;
202
203 if (sk->sk_state != BT_BOUND || hci_pi(sk)->hdev != hdev)
204 continue;
205
206 /* Don't send frame to the socket it came from */
207 if (skb->sk == sk)
208 continue;
209
210 if (hci_pi(sk)->channel == HCI_CHANNEL_RAW) {
211 if (hci_skb_pkt_type(skb) != HCI_COMMAND_PKT &&
212 hci_skb_pkt_type(skb) != HCI_EVENT_PKT &&
213 hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
214 hci_skb_pkt_type(skb) != HCI_SCODATA_PKT)
215 continue;
216 if (is_filtered_packet(sk, skb))
217 continue;
218 } else if (hci_pi(sk)->channel == HCI_CHANNEL_USER) {
219 if (!bt_cb(skb)->incoming)
220 continue;
221 if (hci_skb_pkt_type(skb) != HCI_EVENT_PKT &&
222 hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
223 hci_skb_pkt_type(skb) != HCI_SCODATA_PKT)
224 continue;
225 } else {
226 /* Don't send frame to other channel types */
227 continue;
228 }
229
230 if (!skb_copy) {
231 /* Create a private copy with headroom */
232 skb_copy = __pskb_copy_fclone(skb, 1, GFP_ATOMIC, true);
233 if (!skb_copy)
234 continue;
235
236 /* Put type byte before the data */
237 memcpy(skb_push(skb_copy, 1), &hci_skb_pkt_type(skb), 1);
238 }
239
240 nskb = skb_clone(skb_copy, GFP_ATOMIC);
241 if (!nskb)
242 continue;
243
244 if (sock_queue_rcv_skb(sk, nskb))
245 kfree_skb(nskb);
246 }
247
248 read_unlock(&hci_sk_list.lock);
249
250 kfree_skb(skb_copy);
251 }
252
253 /* Send frame to sockets with specific channel */
254 static void __hci_send_to_channel(unsigned short channel, struct sk_buff *skb,
255 int flag, struct sock *skip_sk)
256 {
257 struct sock *sk;
258
259 BT_DBG("channel %u len %d", channel, skb->len);
260
261 sk_for_each(sk, &hci_sk_list.head) {
262 struct sk_buff *nskb;
263
264 /* Ignore socket without the flag set */
265 if (!hci_sock_test_flag(sk, flag))
266 continue;
267
268 /* Skip the original socket */
269 if (sk == skip_sk)
270 continue;
271
272 if (sk->sk_state != BT_BOUND)
273 continue;
274
275 if (hci_pi(sk)->channel != channel)
276 continue;
277
278 nskb = skb_clone(skb, GFP_ATOMIC);
279 if (!nskb)
280 continue;
281
282 if (sock_queue_rcv_skb(sk, nskb))
283 kfree_skb(nskb);
284 }
285
286 }
287
288 void hci_send_to_channel(unsigned short channel, struct sk_buff *skb,
289 int flag, struct sock *skip_sk)
290 {
291 read_lock(&hci_sk_list.lock);
292 __hci_send_to_channel(channel, skb, flag, skip_sk);
293 read_unlock(&hci_sk_list.lock);
294 }
295
296 /* Send frame to monitor socket */
297 void hci_send_to_monitor(struct hci_dev *hdev, struct sk_buff *skb)
298 {
299 struct sk_buff *skb_copy = NULL;
300 struct hci_mon_hdr *hdr;
301 __le16 opcode;
302
303 if (!atomic_read(&monitor_promisc))
304 return;
305
306 BT_DBG("hdev %p len %d", hdev, skb->len);
307
308 switch (hci_skb_pkt_type(skb)) {
309 case HCI_COMMAND_PKT:
310 opcode = cpu_to_le16(HCI_MON_COMMAND_PKT);
311 break;
312 case HCI_EVENT_PKT:
313 opcode = cpu_to_le16(HCI_MON_EVENT_PKT);
314 break;
315 case HCI_ACLDATA_PKT:
316 if (bt_cb(skb)->incoming)
317 opcode = cpu_to_le16(HCI_MON_ACL_RX_PKT);
318 else
319 opcode = cpu_to_le16(HCI_MON_ACL_TX_PKT);
320 break;
321 case HCI_SCODATA_PKT:
322 if (bt_cb(skb)->incoming)
323 opcode = cpu_to_le16(HCI_MON_SCO_RX_PKT);
324 else
325 opcode = cpu_to_le16(HCI_MON_SCO_TX_PKT);
326 break;
327 case HCI_DIAG_PKT:
328 opcode = cpu_to_le16(HCI_MON_VENDOR_DIAG);
329 break;
330 default:
331 return;
332 }
333
334 /* Create a private copy with headroom */
335 skb_copy = __pskb_copy_fclone(skb, HCI_MON_HDR_SIZE, GFP_ATOMIC, true);
336 if (!skb_copy)
337 return;
338
339 /* Put header before the data */
340 hdr = skb_push(skb_copy, HCI_MON_HDR_SIZE);
341 hdr->opcode = opcode;
342 hdr->index = cpu_to_le16(hdev->id);
343 hdr->len = cpu_to_le16(skb->len);
344
345 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb_copy,
346 HCI_SOCK_TRUSTED, NULL);
347 kfree_skb(skb_copy);
348 }
349
350 void hci_send_monitor_ctrl_event(struct hci_dev *hdev, u16 event,
351 void *data, u16 data_len, ktime_t tstamp,
352 int flag, struct sock *skip_sk)
353 {
354 struct sock *sk;
355 __le16 index;
356
357 if (hdev)
358 index = cpu_to_le16(hdev->id);
359 else
360 index = cpu_to_le16(MGMT_INDEX_NONE);
361
362 read_lock(&hci_sk_list.lock);
363
364 sk_for_each(sk, &hci_sk_list.head) {
365 struct hci_mon_hdr *hdr;
366 struct sk_buff *skb;
367
368 if (hci_pi(sk)->channel != HCI_CHANNEL_CONTROL)
369 continue;
370
371 /* Ignore socket without the flag set */
372 if (!hci_sock_test_flag(sk, flag))
373 continue;
374
375 /* Skip the original socket */
376 if (sk == skip_sk)
377 continue;
378
379 skb = bt_skb_alloc(6 + data_len, GFP_ATOMIC);
380 if (!skb)
381 continue;
382
383 put_unaligned_le32(hci_pi(sk)->cookie, skb_put(skb, 4));
384 put_unaligned_le16(event, skb_put(skb, 2));
385
386 if (data)
387 skb_put_data(skb, data, data_len);
388
389 skb->tstamp = tstamp;
390
391 hdr = skb_push(skb, HCI_MON_HDR_SIZE);
392 hdr->opcode = cpu_to_le16(HCI_MON_CTRL_EVENT);
393 hdr->index = index;
394 hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
395
396 __hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
397 HCI_SOCK_TRUSTED, NULL);
398 kfree_skb(skb);
399 }
400
401 read_unlock(&hci_sk_list.lock);
402 }
403
404 static struct sk_buff *create_monitor_event(struct hci_dev *hdev, int event)
405 {
406 struct hci_mon_hdr *hdr;
407 struct hci_mon_new_index *ni;
408 struct hci_mon_index_info *ii;
409 struct sk_buff *skb;
410 __le16 opcode;
411
412 switch (event) {
413 case HCI_DEV_REG:
414 skb = bt_skb_alloc(HCI_MON_NEW_INDEX_SIZE, GFP_ATOMIC);
415 if (!skb)
416 return NULL;
417
418 ni = skb_put(skb, HCI_MON_NEW_INDEX_SIZE);
419 ni->type = hdev->dev_type;
420 ni->bus = hdev->bus;
421 bacpy(&ni->bdaddr, &hdev->bdaddr);
422 memcpy(ni->name, hdev->name, 8);
423
424 opcode = cpu_to_le16(HCI_MON_NEW_INDEX);
425 break;
426
427 case HCI_DEV_UNREG:
428 skb = bt_skb_alloc(0, GFP_ATOMIC);
429 if (!skb)
430 return NULL;
431
432 opcode = cpu_to_le16(HCI_MON_DEL_INDEX);
433 break;
434
435 case HCI_DEV_SETUP:
436 if (hdev->manufacturer == 0xffff)
437 return NULL;
438
439 /* fall through */
440
441 case HCI_DEV_UP:
442 skb = bt_skb_alloc(HCI_MON_INDEX_INFO_SIZE, GFP_ATOMIC);
443 if (!skb)
444 return NULL;
445
446 ii = skb_put(skb, HCI_MON_INDEX_INFO_SIZE);
447 bacpy(&ii->bdaddr, &hdev->bdaddr);
448 ii->manufacturer = cpu_to_le16(hdev->manufacturer);
449
450 opcode = cpu_to_le16(HCI_MON_INDEX_INFO);
451 break;
452
453 case HCI_DEV_OPEN:
454 skb = bt_skb_alloc(0, GFP_ATOMIC);
455 if (!skb)
456 return NULL;
457
458 opcode = cpu_to_le16(HCI_MON_OPEN_INDEX);
459 break;
460
461 case HCI_DEV_CLOSE:
462 skb = bt_skb_alloc(0, GFP_ATOMIC);
463 if (!skb)
464 return NULL;
465
466 opcode = cpu_to_le16(HCI_MON_CLOSE_INDEX);
467 break;
468
469 default:
470 return NULL;
471 }
472
473 __net_timestamp(skb);
474
475 hdr = skb_push(skb, HCI_MON_HDR_SIZE);
476 hdr->opcode = opcode;
477 hdr->index = cpu_to_le16(hdev->id);
478 hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
479
480 return skb;
481 }
482
483 static struct sk_buff *create_monitor_ctrl_open(struct sock *sk)
484 {
485 struct hci_mon_hdr *hdr;
486 struct sk_buff *skb;
487 u16 format;
488 u8 ver[3];
489 u32 flags;
490
491 /* No message needed when cookie is not present */
492 if (!hci_pi(sk)->cookie)
493 return NULL;
494
495 switch (hci_pi(sk)->channel) {
496 case HCI_CHANNEL_RAW:
497 format = 0x0000;
498 ver[0] = BT_SUBSYS_VERSION;
499 put_unaligned_le16(BT_SUBSYS_REVISION, ver + 1);
500 break;
501 case HCI_CHANNEL_USER:
502 format = 0x0001;
503 ver[0] = BT_SUBSYS_VERSION;
504 put_unaligned_le16(BT_SUBSYS_REVISION, ver + 1);
505 break;
506 case HCI_CHANNEL_CONTROL:
507 format = 0x0002;
508 mgmt_fill_version_info(ver);
509 break;
510 default:
511 /* No message for unsupported format */
512 return NULL;
513 }
514
515 skb = bt_skb_alloc(14 + TASK_COMM_LEN , GFP_ATOMIC);
516 if (!skb)
517 return NULL;
518
519 flags = hci_sock_test_flag(sk, HCI_SOCK_TRUSTED) ? 0x1 : 0x0;
520
521 put_unaligned_le32(hci_pi(sk)->cookie, skb_put(skb, 4));
522 put_unaligned_le16(format, skb_put(skb, 2));
523 skb_put_data(skb, ver, sizeof(ver));
524 put_unaligned_le32(flags, skb_put(skb, 4));
525 skb_put_u8(skb, TASK_COMM_LEN);
526 skb_put_data(skb, hci_pi(sk)->comm, TASK_COMM_LEN);
527
528 __net_timestamp(skb);
529
530 hdr = skb_push(skb, HCI_MON_HDR_SIZE);
531 hdr->opcode = cpu_to_le16(HCI_MON_CTRL_OPEN);
532 if (hci_pi(sk)->hdev)
533 hdr->index = cpu_to_le16(hci_pi(sk)->hdev->id);
534 else
535 hdr->index = cpu_to_le16(HCI_DEV_NONE);
536 hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
537
538 return skb;
539 }
540
541 static struct sk_buff *create_monitor_ctrl_close(struct sock *sk)
542 {
543 struct hci_mon_hdr *hdr;
544 struct sk_buff *skb;
545
546 /* No message needed when cookie is not present */
547 if (!hci_pi(sk)->cookie)
548 return NULL;
549
550 switch (hci_pi(sk)->channel) {
551 case HCI_CHANNEL_RAW:
552 case HCI_CHANNEL_USER:
553 case HCI_CHANNEL_CONTROL:
554 break;
555 default:
556 /* No message for unsupported format */
557 return NULL;
558 }
559
560 skb = bt_skb_alloc(4, GFP_ATOMIC);
561 if (!skb)
562 return NULL;
563
564 put_unaligned_le32(hci_pi(sk)->cookie, skb_put(skb, 4));
565
566 __net_timestamp(skb);
567
568 hdr = skb_push(skb, HCI_MON_HDR_SIZE);
569 hdr->opcode = cpu_to_le16(HCI_MON_CTRL_CLOSE);
570 if (hci_pi(sk)->hdev)
571 hdr->index = cpu_to_le16(hci_pi(sk)->hdev->id);
572 else
573 hdr->index = cpu_to_le16(HCI_DEV_NONE);
574 hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
575
576 return skb;
577 }
578
579 static struct sk_buff *create_monitor_ctrl_command(struct sock *sk, u16 index,
580 u16 opcode, u16 len,
581 const void *buf)
582 {
583 struct hci_mon_hdr *hdr;
584 struct sk_buff *skb;
585
586 skb = bt_skb_alloc(6 + len, GFP_ATOMIC);
587 if (!skb)
588 return NULL;
589
590 put_unaligned_le32(hci_pi(sk)->cookie, skb_put(skb, 4));
591 put_unaligned_le16(opcode, skb_put(skb, 2));
592
593 if (buf)
594 skb_put_data(skb, buf, len);
595
596 __net_timestamp(skb);
597
598 hdr = skb_push(skb, HCI_MON_HDR_SIZE);
599 hdr->opcode = cpu_to_le16(HCI_MON_CTRL_COMMAND);
600 hdr->index = cpu_to_le16(index);
601 hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
602
603 return skb;
604 }
605
606 static void __printf(2, 3)
607 send_monitor_note(struct sock *sk, const char *fmt, ...)
608 {
609 size_t len;
610 struct hci_mon_hdr *hdr;
611 struct sk_buff *skb;
612 va_list args;
613
614 va_start(args, fmt);
615 len = vsnprintf(NULL, 0, fmt, args);
616 va_end(args);
617
618 skb = bt_skb_alloc(len + 1, GFP_ATOMIC);
619 if (!skb)
620 return;
621
622 va_start(args, fmt);
623 vsprintf(skb_put(skb, len), fmt, args);
624 *(u8 *)skb_put(skb, 1) = 0;
625 va_end(args);
626
627 __net_timestamp(skb);
628
629 hdr = (void *)skb_push(skb, HCI_MON_HDR_SIZE);
630 hdr->opcode = cpu_to_le16(HCI_MON_SYSTEM_NOTE);
631 hdr->index = cpu_to_le16(HCI_DEV_NONE);
632 hdr->len = cpu_to_le16(skb->len - HCI_MON_HDR_SIZE);
633
634 if (sock_queue_rcv_skb(sk, skb))
635 kfree_skb(skb);
636 }
637
638 static void send_monitor_replay(struct sock *sk)
639 {
640 struct hci_dev *hdev;
641
642 read_lock(&hci_dev_list_lock);
643
644 list_for_each_entry(hdev, &hci_dev_list, list) {
645 struct sk_buff *skb;
646
647 skb = create_monitor_event(hdev, HCI_DEV_REG);
648 if (!skb)
649 continue;
650
651 if (sock_queue_rcv_skb(sk, skb))
652 kfree_skb(skb);
653
654 if (!test_bit(HCI_RUNNING, &hdev->flags))
655 continue;
656
657 skb = create_monitor_event(hdev, HCI_DEV_OPEN);
658 if (!skb)
659 continue;
660
661 if (sock_queue_rcv_skb(sk, skb))
662 kfree_skb(skb);
663
664 if (test_bit(HCI_UP, &hdev->flags))
665 skb = create_monitor_event(hdev, HCI_DEV_UP);
666 else if (hci_dev_test_flag(hdev, HCI_SETUP))
667 skb = create_monitor_event(hdev, HCI_DEV_SETUP);
668 else
669 skb = NULL;
670
671 if (skb) {
672 if (sock_queue_rcv_skb(sk, skb))
673 kfree_skb(skb);
674 }
675 }
676
677 read_unlock(&hci_dev_list_lock);
678 }
679
680 static void send_monitor_control_replay(struct sock *mon_sk)
681 {
682 struct sock *sk;
683
684 read_lock(&hci_sk_list.lock);
685
686 sk_for_each(sk, &hci_sk_list.head) {
687 struct sk_buff *skb;
688
689 skb = create_monitor_ctrl_open(sk);
690 if (!skb)
691 continue;
692
693 if (sock_queue_rcv_skb(mon_sk, skb))
694 kfree_skb(skb);
695 }
696
697 read_unlock(&hci_sk_list.lock);
698 }
699
700 /* Generate internal stack event */
701 static void hci_si_event(struct hci_dev *hdev, int type, int dlen, void *data)
702 {
703 struct hci_event_hdr *hdr;
704 struct hci_ev_stack_internal *ev;
705 struct sk_buff *skb;
706
707 skb = bt_skb_alloc(HCI_EVENT_HDR_SIZE + sizeof(*ev) + dlen, GFP_ATOMIC);
708 if (!skb)
709 return;
710
711 hdr = skb_put(skb, HCI_EVENT_HDR_SIZE);
712 hdr->evt = HCI_EV_STACK_INTERNAL;
713 hdr->plen = sizeof(*ev) + dlen;
714
715 ev = skb_put(skb, sizeof(*ev) + dlen);
716 ev->type = type;
717 memcpy(ev->data, data, dlen);
718
719 bt_cb(skb)->incoming = 1;
720 __net_timestamp(skb);
721
722 hci_skb_pkt_type(skb) = HCI_EVENT_PKT;
723 hci_send_to_sock(hdev, skb);
724 kfree_skb(skb);
725 }
726
727 void hci_sock_dev_event(struct hci_dev *hdev, int event)
728 {
729 BT_DBG("hdev %s event %d", hdev->name, event);
730
731 if (atomic_read(&monitor_promisc)) {
732 struct sk_buff *skb;
733
734 /* Send event to monitor */
735 skb = create_monitor_event(hdev, event);
736 if (skb) {
737 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
738 HCI_SOCK_TRUSTED, NULL);
739 kfree_skb(skb);
740 }
741 }
742
743 if (event <= HCI_DEV_DOWN) {
744 struct hci_ev_si_device ev;
745
746 /* Send event to sockets */
747 ev.event = event;
748 ev.dev_id = hdev->id;
749 hci_si_event(NULL, HCI_EV_SI_DEVICE, sizeof(ev), &ev);
750 }
751
752 if (event == HCI_DEV_UNREG) {
753 struct sock *sk;
754
755 /* Detach sockets from device */
756 read_lock(&hci_sk_list.lock);
757 sk_for_each(sk, &hci_sk_list.head) {
758 bh_lock_sock_nested(sk);
759 if (hci_pi(sk)->hdev == hdev) {
760 hci_pi(sk)->hdev = NULL;
761 sk->sk_err = EPIPE;
762 sk->sk_state = BT_OPEN;
763 sk->sk_state_change(sk);
764
765 hci_dev_put(hdev);
766 }
767 bh_unlock_sock(sk);
768 }
769 read_unlock(&hci_sk_list.lock);
770 }
771 }
772
773 static struct hci_mgmt_chan *__hci_mgmt_chan_find(unsigned short channel)
774 {
775 struct hci_mgmt_chan *c;
776
777 list_for_each_entry(c, &mgmt_chan_list, list) {
778 if (c->channel == channel)
779 return c;
780 }
781
782 return NULL;
783 }
784
785 static struct hci_mgmt_chan *hci_mgmt_chan_find(unsigned short channel)
786 {
787 struct hci_mgmt_chan *c;
788
789 mutex_lock(&mgmt_chan_list_lock);
790 c = __hci_mgmt_chan_find(channel);
791 mutex_unlock(&mgmt_chan_list_lock);
792
793 return c;
794 }
795
796 int hci_mgmt_chan_register(struct hci_mgmt_chan *c)
797 {
798 if (c->channel < HCI_CHANNEL_CONTROL)
799 return -EINVAL;
800
801 mutex_lock(&mgmt_chan_list_lock);
802 if (__hci_mgmt_chan_find(c->channel)) {
803 mutex_unlock(&mgmt_chan_list_lock);
804 return -EALREADY;
805 }
806
807 list_add_tail(&c->list, &mgmt_chan_list);
808
809 mutex_unlock(&mgmt_chan_list_lock);
810
811 return 0;
812 }
813 EXPORT_SYMBOL(hci_mgmt_chan_register);
814
815 void hci_mgmt_chan_unregister(struct hci_mgmt_chan *c)
816 {
817 mutex_lock(&mgmt_chan_list_lock);
818 list_del(&c->list);
819 mutex_unlock(&mgmt_chan_list_lock);
820 }
821 EXPORT_SYMBOL(hci_mgmt_chan_unregister);
822
823 static int hci_sock_release(struct socket *sock)
824 {
825 struct sock *sk = sock->sk;
826 struct hci_dev *hdev;
827 struct sk_buff *skb;
828
829 BT_DBG("sock %p sk %p", sock, sk);
830
831 if (!sk)
832 return 0;
833
834 switch (hci_pi(sk)->channel) {
835 case HCI_CHANNEL_MONITOR:
836 atomic_dec(&monitor_promisc);
837 break;
838 case HCI_CHANNEL_RAW:
839 case HCI_CHANNEL_USER:
840 case HCI_CHANNEL_CONTROL:
841 /* Send event to monitor */
842 skb = create_monitor_ctrl_close(sk);
843 if (skb) {
844 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
845 HCI_SOCK_TRUSTED, NULL);
846 kfree_skb(skb);
847 }
848
849 hci_sock_free_cookie(sk);
850 break;
851 }
852
853 bt_sock_unlink(&hci_sk_list, sk);
854
855 hdev = hci_pi(sk)->hdev;
856 if (hdev) {
857 if (hci_pi(sk)->channel == HCI_CHANNEL_USER) {
858 /* When releasing a user channel exclusive access,
859 * call hci_dev_do_close directly instead of calling
860 * hci_dev_close to ensure the exclusive access will
861 * be released and the controller brought back down.
862 *
863 * The checking of HCI_AUTO_OFF is not needed in this
864 * case since it will have been cleared already when
865 * opening the user channel.
866 */
867 hci_dev_do_close(hdev);
868 hci_dev_clear_flag(hdev, HCI_USER_CHANNEL);
869 mgmt_index_added(hdev);
870 }
871
872 atomic_dec(&hdev->promisc);
873 hci_dev_put(hdev);
874 }
875
876 sock_orphan(sk);
877
878 skb_queue_purge(&sk->sk_receive_queue);
879 skb_queue_purge(&sk->sk_write_queue);
880
881 sock_put(sk);
882 return 0;
883 }
884
885 static int hci_sock_blacklist_add(struct hci_dev *hdev, void __user *arg)
886 {
887 bdaddr_t bdaddr;
888 int err;
889
890 if (copy_from_user(&bdaddr, arg, sizeof(bdaddr)))
891 return -EFAULT;
892
893 hci_dev_lock(hdev);
894
895 err = hci_bdaddr_list_add(&hdev->blacklist, &bdaddr, BDADDR_BREDR);
896
897 hci_dev_unlock(hdev);
898
899 return err;
900 }
901
902 static int hci_sock_blacklist_del(struct hci_dev *hdev, void __user *arg)
903 {
904 bdaddr_t bdaddr;
905 int err;
906
907 if (copy_from_user(&bdaddr, arg, sizeof(bdaddr)))
908 return -EFAULT;
909
910 hci_dev_lock(hdev);
911
912 err = hci_bdaddr_list_del(&hdev->blacklist, &bdaddr, BDADDR_BREDR);
913
914 hci_dev_unlock(hdev);
915
916 return err;
917 }
918
919 /* Ioctls that require bound socket */
920 static int hci_sock_bound_ioctl(struct sock *sk, unsigned int cmd,
921 unsigned long arg)
922 {
923 struct hci_dev *hdev = hci_pi(sk)->hdev;
924
925 if (!hdev)
926 return -EBADFD;
927
928 if (hci_dev_test_flag(hdev, HCI_USER_CHANNEL))
929 return -EBUSY;
930
931 if (hci_dev_test_flag(hdev, HCI_UNCONFIGURED))
932 return -EOPNOTSUPP;
933
934 if (hdev->dev_type != HCI_PRIMARY)
935 return -EOPNOTSUPP;
936
937 switch (cmd) {
938 case HCISETRAW:
939 if (!capable(CAP_NET_ADMIN))
940 return -EPERM;
941 return -EOPNOTSUPP;
942
943 case HCIGETCONNINFO:
944 return hci_get_conn_info(hdev, (void __user *)arg);
945
946 case HCIGETAUTHINFO:
947 return hci_get_auth_info(hdev, (void __user *)arg);
948
949 case HCIBLOCKADDR:
950 if (!capable(CAP_NET_ADMIN))
951 return -EPERM;
952 return hci_sock_blacklist_add(hdev, (void __user *)arg);
953
954 case HCIUNBLOCKADDR:
955 if (!capable(CAP_NET_ADMIN))
956 return -EPERM;
957 return hci_sock_blacklist_del(hdev, (void __user *)arg);
958 }
959
960 return -ENOIOCTLCMD;
961 }
962
963 static int hci_sock_ioctl(struct socket *sock, unsigned int cmd,
964 unsigned long arg)
965 {
966 void __user *argp = (void __user *)arg;
967 struct sock *sk = sock->sk;
968 int err;
969
970 BT_DBG("cmd %x arg %lx", cmd, arg);
971
972 lock_sock(sk);
973
974 if (hci_pi(sk)->channel != HCI_CHANNEL_RAW) {
975 err = -EBADFD;
976 goto done;
977 }
978
979 /* When calling an ioctl on an unbound raw socket, then ensure
980 * that the monitor gets informed. Ensure that the resulting event
981 * is only send once by checking if the cookie exists or not. The
982 * socket cookie will be only ever generated once for the lifetime
983 * of a given socket.
984 */
985 if (hci_sock_gen_cookie(sk)) {
986 struct sk_buff *skb;
987
988 if (capable(CAP_NET_ADMIN))
989 hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
990
991 /* Send event to monitor */
992 skb = create_monitor_ctrl_open(sk);
993 if (skb) {
994 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
995 HCI_SOCK_TRUSTED, NULL);
996 kfree_skb(skb);
997 }
998 }
999
1000 release_sock(sk);
1001
1002 switch (cmd) {
1003 case HCIGETDEVLIST:
1004 return hci_get_dev_list(argp);
1005
1006 case HCIGETDEVINFO:
1007 return hci_get_dev_info(argp);
1008
1009 case HCIGETCONNLIST:
1010 return hci_get_conn_list(argp);
1011
1012 case HCIDEVUP:
1013 if (!capable(CAP_NET_ADMIN))
1014 return -EPERM;
1015 return hci_dev_open(arg);
1016
1017 case HCIDEVDOWN:
1018 if (!capable(CAP_NET_ADMIN))
1019 return -EPERM;
1020 return hci_dev_close(arg);
1021
1022 case HCIDEVRESET:
1023 if (!capable(CAP_NET_ADMIN))
1024 return -EPERM;
1025 return hci_dev_reset(arg);
1026
1027 case HCIDEVRESTAT:
1028 if (!capable(CAP_NET_ADMIN))
1029 return -EPERM;
1030 return hci_dev_reset_stat(arg);
1031
1032 case HCISETSCAN:
1033 case HCISETAUTH:
1034 case HCISETENCRYPT:
1035 case HCISETPTYPE:
1036 case HCISETLINKPOL:
1037 case HCISETLINKMODE:
1038 case HCISETACLMTU:
1039 case HCISETSCOMTU:
1040 if (!capable(CAP_NET_ADMIN))
1041 return -EPERM;
1042 return hci_dev_cmd(cmd, argp);
1043
1044 case HCIINQUIRY:
1045 return hci_inquiry(argp);
1046 }
1047
1048 lock_sock(sk);
1049
1050 err = hci_sock_bound_ioctl(sk, cmd, arg);
1051
1052 done:
1053 release_sock(sk);
1054 return err;
1055 }
1056
1057 static int hci_sock_bind(struct socket *sock, struct sockaddr *addr,
1058 int addr_len)
1059 {
1060 struct sockaddr_hci haddr;
1061 struct sock *sk = sock->sk;
1062 struct hci_dev *hdev = NULL;
1063 struct sk_buff *skb;
1064 int len, err = 0;
1065
1066 BT_DBG("sock %p sk %p", sock, sk);
1067
1068 if (!addr)
1069 return -EINVAL;
1070
1071 memset(&haddr, 0, sizeof(haddr));
1072 len = min_t(unsigned int, sizeof(haddr), addr_len);
1073 memcpy(&haddr, addr, len);
1074
1075 if (haddr.hci_family != AF_BLUETOOTH)
1076 return -EINVAL;
1077
1078 lock_sock(sk);
1079
1080 if (sk->sk_state == BT_BOUND) {
1081 err = -EALREADY;
1082 goto done;
1083 }
1084
1085 switch (haddr.hci_channel) {
1086 case HCI_CHANNEL_RAW:
1087 if (hci_pi(sk)->hdev) {
1088 err = -EALREADY;
1089 goto done;
1090 }
1091
1092 if (haddr.hci_dev != HCI_DEV_NONE) {
1093 hdev = hci_dev_get(haddr.hci_dev);
1094 if (!hdev) {
1095 err = -ENODEV;
1096 goto done;
1097 }
1098
1099 atomic_inc(&hdev->promisc);
1100 }
1101
1102 hci_pi(sk)->channel = haddr.hci_channel;
1103
1104 if (!hci_sock_gen_cookie(sk)) {
1105 /* In the case when a cookie has already been assigned,
1106 * then there has been already an ioctl issued against
1107 * an unbound socket and with that triggerd an open
1108 * notification. Send a close notification first to
1109 * allow the state transition to bounded.
1110 */
1111 skb = create_monitor_ctrl_close(sk);
1112 if (skb) {
1113 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1114 HCI_SOCK_TRUSTED, NULL);
1115 kfree_skb(skb);
1116 }
1117 }
1118
1119 if (capable(CAP_NET_ADMIN))
1120 hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1121
1122 hci_pi(sk)->hdev = hdev;
1123
1124 /* Send event to monitor */
1125 skb = create_monitor_ctrl_open(sk);
1126 if (skb) {
1127 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1128 HCI_SOCK_TRUSTED, NULL);
1129 kfree_skb(skb);
1130 }
1131 break;
1132
1133 case HCI_CHANNEL_USER:
1134 if (hci_pi(sk)->hdev) {
1135 err = -EALREADY;
1136 goto done;
1137 }
1138
1139 if (haddr.hci_dev == HCI_DEV_NONE) {
1140 err = -EINVAL;
1141 goto done;
1142 }
1143
1144 if (!capable(CAP_NET_ADMIN)) {
1145 err = -EPERM;
1146 goto done;
1147 }
1148
1149 hdev = hci_dev_get(haddr.hci_dev);
1150 if (!hdev) {
1151 err = -ENODEV;
1152 goto done;
1153 }
1154
1155 if (test_bit(HCI_INIT, &hdev->flags) ||
1156 hci_dev_test_flag(hdev, HCI_SETUP) ||
1157 hci_dev_test_flag(hdev, HCI_CONFIG) ||
1158 (!hci_dev_test_flag(hdev, HCI_AUTO_OFF) &&
1159 test_bit(HCI_UP, &hdev->flags))) {
1160 err = -EBUSY;
1161 hci_dev_put(hdev);
1162 goto done;
1163 }
1164
1165 if (hci_dev_test_and_set_flag(hdev, HCI_USER_CHANNEL)) {
1166 err = -EUSERS;
1167 hci_dev_put(hdev);
1168 goto done;
1169 }
1170
1171 mgmt_index_removed(hdev);
1172
1173 err = hci_dev_open(hdev->id);
1174 if (err) {
1175 if (err == -EALREADY) {
1176 /* In case the transport is already up and
1177 * running, clear the error here.
1178 *
1179 * This can happen when opening a user
1180 * channel and HCI_AUTO_OFF grace period
1181 * is still active.
1182 */
1183 err = 0;
1184 } else {
1185 hci_dev_clear_flag(hdev, HCI_USER_CHANNEL);
1186 mgmt_index_added(hdev);
1187 hci_dev_put(hdev);
1188 goto done;
1189 }
1190 }
1191
1192 hci_pi(sk)->channel = haddr.hci_channel;
1193
1194 if (!hci_sock_gen_cookie(sk)) {
1195 /* In the case when a cookie has already been assigned,
1196 * this socket will transition from a raw socket into
1197 * a user channel socket. For a clean transition, send
1198 * the close notification first.
1199 */
1200 skb = create_monitor_ctrl_close(sk);
1201 if (skb) {
1202 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1203 HCI_SOCK_TRUSTED, NULL);
1204 kfree_skb(skb);
1205 }
1206 }
1207
1208 /* The user channel is restricted to CAP_NET_ADMIN
1209 * capabilities and with that implicitly trusted.
1210 */
1211 hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1212
1213 hci_pi(sk)->hdev = hdev;
1214
1215 /* Send event to monitor */
1216 skb = create_monitor_ctrl_open(sk);
1217 if (skb) {
1218 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1219 HCI_SOCK_TRUSTED, NULL);
1220 kfree_skb(skb);
1221 }
1222
1223 atomic_inc(&hdev->promisc);
1224 break;
1225
1226 case HCI_CHANNEL_MONITOR:
1227 if (haddr.hci_dev != HCI_DEV_NONE) {
1228 err = -EINVAL;
1229 goto done;
1230 }
1231
1232 if (!capable(CAP_NET_RAW)) {
1233 err = -EPERM;
1234 goto done;
1235 }
1236
1237 hci_pi(sk)->channel = haddr.hci_channel;
1238
1239 /* The monitor interface is restricted to CAP_NET_RAW
1240 * capabilities and with that implicitly trusted.
1241 */
1242 hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1243
1244 send_monitor_note(sk, "Linux version %s (%s)",
1245 init_utsname()->release,
1246 init_utsname()->machine);
1247 send_monitor_note(sk, "Bluetooth subsystem version %u.%u",
1248 BT_SUBSYS_VERSION, BT_SUBSYS_REVISION);
1249 send_monitor_replay(sk);
1250 send_monitor_control_replay(sk);
1251
1252 atomic_inc(&monitor_promisc);
1253 break;
1254
1255 case HCI_CHANNEL_LOGGING:
1256 if (haddr.hci_dev != HCI_DEV_NONE) {
1257 err = -EINVAL;
1258 goto done;
1259 }
1260
1261 if (!capable(CAP_NET_ADMIN)) {
1262 err = -EPERM;
1263 goto done;
1264 }
1265
1266 hci_pi(sk)->channel = haddr.hci_channel;
1267 break;
1268
1269 default:
1270 if (!hci_mgmt_chan_find(haddr.hci_channel)) {
1271 err = -EINVAL;
1272 goto done;
1273 }
1274
1275 if (haddr.hci_dev != HCI_DEV_NONE) {
1276 err = -EINVAL;
1277 goto done;
1278 }
1279
1280 /* Users with CAP_NET_ADMIN capabilities are allowed
1281 * access to all management commands and events. For
1282 * untrusted users the interface is restricted and
1283 * also only untrusted events are sent.
1284 */
1285 if (capable(CAP_NET_ADMIN))
1286 hci_sock_set_flag(sk, HCI_SOCK_TRUSTED);
1287
1288 hci_pi(sk)->channel = haddr.hci_channel;
1289
1290 /* At the moment the index and unconfigured index events
1291 * are enabled unconditionally. Setting them on each
1292 * socket when binding keeps this functionality. They
1293 * however might be cleared later and then sending of these
1294 * events will be disabled, but that is then intentional.
1295 *
1296 * This also enables generic events that are safe to be
1297 * received by untrusted users. Example for such events
1298 * are changes to settings, class of device, name etc.
1299 */
1300 if (hci_pi(sk)->channel == HCI_CHANNEL_CONTROL) {
1301 if (!hci_sock_gen_cookie(sk)) {
1302 /* In the case when a cookie has already been
1303 * assigned, this socket will transtion from
1304 * a raw socket into a control socket. To
1305 * allow for a clean transtion, send the
1306 * close notification first.
1307 */
1308 skb = create_monitor_ctrl_close(sk);
1309 if (skb) {
1310 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1311 HCI_SOCK_TRUSTED, NULL);
1312 kfree_skb(skb);
1313 }
1314 }
1315
1316 /* Send event to monitor */
1317 skb = create_monitor_ctrl_open(sk);
1318 if (skb) {
1319 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1320 HCI_SOCK_TRUSTED, NULL);
1321 kfree_skb(skb);
1322 }
1323
1324 hci_sock_set_flag(sk, HCI_MGMT_INDEX_EVENTS);
1325 hci_sock_set_flag(sk, HCI_MGMT_UNCONF_INDEX_EVENTS);
1326 hci_sock_set_flag(sk, HCI_MGMT_OPTION_EVENTS);
1327 hci_sock_set_flag(sk, HCI_MGMT_SETTING_EVENTS);
1328 hci_sock_set_flag(sk, HCI_MGMT_DEV_CLASS_EVENTS);
1329 hci_sock_set_flag(sk, HCI_MGMT_LOCAL_NAME_EVENTS);
1330 }
1331 break;
1332 }
1333
1334 sk->sk_state = BT_BOUND;
1335
1336 done:
1337 release_sock(sk);
1338 return err;
1339 }
1340
1341 static int hci_sock_getname(struct socket *sock, struct sockaddr *addr,
1342 int peer)
1343 {
1344 struct sockaddr_hci *haddr = (struct sockaddr_hci *)addr;
1345 struct sock *sk = sock->sk;
1346 struct hci_dev *hdev;
1347 int err = 0;
1348
1349 BT_DBG("sock %p sk %p", sock, sk);
1350
1351 if (peer)
1352 return -EOPNOTSUPP;
1353
1354 lock_sock(sk);
1355
1356 hdev = hci_pi(sk)->hdev;
1357 if (!hdev) {
1358 err = -EBADFD;
1359 goto done;
1360 }
1361
1362 haddr->hci_family = AF_BLUETOOTH;
1363 haddr->hci_dev = hdev->id;
1364 haddr->hci_channel= hci_pi(sk)->channel;
1365 err = sizeof(*haddr);
1366
1367 done:
1368 release_sock(sk);
1369 return err;
1370 }
1371
1372 static void hci_sock_cmsg(struct sock *sk, struct msghdr *msg,
1373 struct sk_buff *skb)
1374 {
1375 __u32 mask = hci_pi(sk)->cmsg_mask;
1376
1377 if (mask & HCI_CMSG_DIR) {
1378 int incoming = bt_cb(skb)->incoming;
1379 put_cmsg(msg, SOL_HCI, HCI_CMSG_DIR, sizeof(incoming),
1380 &incoming);
1381 }
1382
1383 if (mask & HCI_CMSG_TSTAMP) {
1384 #ifdef CONFIG_COMPAT
1385 struct old_timeval32 ctv;
1386 #endif
1387 struct __kernel_old_timeval tv;
1388 void *data;
1389 int len;
1390
1391 skb_get_timestamp(skb, &tv);
1392
1393 data = &tv;
1394 len = sizeof(tv);
1395 #ifdef CONFIG_COMPAT
1396 if (!COMPAT_USE_64BIT_TIME &&
1397 (msg->msg_flags & MSG_CMSG_COMPAT)) {
1398 ctv.tv_sec = tv.tv_sec;
1399 ctv.tv_usec = tv.tv_usec;
1400 data = &ctv;
1401 len = sizeof(ctv);
1402 }
1403 #endif
1404
1405 put_cmsg(msg, SOL_HCI, HCI_CMSG_TSTAMP, len, data);
1406 }
1407 }
1408
1409 static int hci_sock_recvmsg(struct socket *sock, struct msghdr *msg,
1410 size_t len, int flags)
1411 {
1412 int noblock = flags & MSG_DONTWAIT;
1413 struct sock *sk = sock->sk;
1414 struct sk_buff *skb;
1415 int copied, err;
1416 unsigned int skblen;
1417
1418 BT_DBG("sock %p, sk %p", sock, sk);
1419
1420 if (flags & MSG_OOB)
1421 return -EOPNOTSUPP;
1422
1423 if (hci_pi(sk)->channel == HCI_CHANNEL_LOGGING)
1424 return -EOPNOTSUPP;
1425
1426 if (sk->sk_state == BT_CLOSED)
1427 return 0;
1428
1429 skb = skb_recv_datagram(sk, flags, noblock, &err);
1430 if (!skb)
1431 return err;
1432
1433 skblen = skb->len;
1434 copied = skb->len;
1435 if (len < copied) {
1436 msg->msg_flags |= MSG_TRUNC;
1437 copied = len;
1438 }
1439
1440 skb_reset_transport_header(skb);
1441 err = skb_copy_datagram_msg(skb, 0, msg, copied);
1442
1443 switch (hci_pi(sk)->channel) {
1444 case HCI_CHANNEL_RAW:
1445 hci_sock_cmsg(sk, msg, skb);
1446 break;
1447 case HCI_CHANNEL_USER:
1448 case HCI_CHANNEL_MONITOR:
1449 sock_recv_timestamp(msg, sk, skb);
1450 break;
1451 default:
1452 if (hci_mgmt_chan_find(hci_pi(sk)->channel))
1453 sock_recv_timestamp(msg, sk, skb);
1454 break;
1455 }
1456
1457 skb_free_datagram(sk, skb);
1458
1459 if (flags & MSG_TRUNC)
1460 copied = skblen;
1461
1462 return err ? : copied;
1463 }
1464
1465 static int hci_mgmt_cmd(struct hci_mgmt_chan *chan, struct sock *sk,
1466 struct msghdr *msg, size_t msglen)
1467 {
1468 void *buf;
1469 u8 *cp;
1470 struct mgmt_hdr *hdr;
1471 u16 opcode, index, len;
1472 struct hci_dev *hdev = NULL;
1473 const struct hci_mgmt_handler *handler;
1474 bool var_len, no_hdev;
1475 int err;
1476
1477 BT_DBG("got %zu bytes", msglen);
1478
1479 if (msglen < sizeof(*hdr))
1480 return -EINVAL;
1481
1482 buf = kmalloc(msglen, GFP_KERNEL);
1483 if (!buf)
1484 return -ENOMEM;
1485
1486 if (memcpy_from_msg(buf, msg, msglen)) {
1487 err = -EFAULT;
1488 goto done;
1489 }
1490
1491 hdr = buf;
1492 opcode = __le16_to_cpu(hdr->opcode);
1493 index = __le16_to_cpu(hdr->index);
1494 len = __le16_to_cpu(hdr->len);
1495
1496 if (len != msglen - sizeof(*hdr)) {
1497 err = -EINVAL;
1498 goto done;
1499 }
1500
1501 if (chan->channel == HCI_CHANNEL_CONTROL) {
1502 struct sk_buff *skb;
1503
1504 /* Send event to monitor */
1505 skb = create_monitor_ctrl_command(sk, index, opcode, len,
1506 buf + sizeof(*hdr));
1507 if (skb) {
1508 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb,
1509 HCI_SOCK_TRUSTED, NULL);
1510 kfree_skb(skb);
1511 }
1512 }
1513
1514 if (opcode >= chan->handler_count ||
1515 chan->handlers[opcode].func == NULL) {
1516 BT_DBG("Unknown op %u", opcode);
1517 err = mgmt_cmd_status(sk, index, opcode,
1518 MGMT_STATUS_UNKNOWN_COMMAND);
1519 goto done;
1520 }
1521
1522 handler = &chan->handlers[opcode];
1523
1524 if (!hci_sock_test_flag(sk, HCI_SOCK_TRUSTED) &&
1525 !(handler->flags & HCI_MGMT_UNTRUSTED)) {
1526 err = mgmt_cmd_status(sk, index, opcode,
1527 MGMT_STATUS_PERMISSION_DENIED);
1528 goto done;
1529 }
1530
1531 if (index != MGMT_INDEX_NONE) {
1532 hdev = hci_dev_get(index);
1533 if (!hdev) {
1534 err = mgmt_cmd_status(sk, index, opcode,
1535 MGMT_STATUS_INVALID_INDEX);
1536 goto done;
1537 }
1538
1539 if (hci_dev_test_flag(hdev, HCI_SETUP) ||
1540 hci_dev_test_flag(hdev, HCI_CONFIG) ||
1541 hci_dev_test_flag(hdev, HCI_USER_CHANNEL)) {
1542 err = mgmt_cmd_status(sk, index, opcode,
1543 MGMT_STATUS_INVALID_INDEX);
1544 goto done;
1545 }
1546
1547 if (hci_dev_test_flag(hdev, HCI_UNCONFIGURED) &&
1548 !(handler->flags & HCI_MGMT_UNCONFIGURED)) {
1549 err = mgmt_cmd_status(sk, index, opcode,
1550 MGMT_STATUS_INVALID_INDEX);
1551 goto done;
1552 }
1553 }
1554
1555 no_hdev = (handler->flags & HCI_MGMT_NO_HDEV);
1556 if (no_hdev != !hdev) {
1557 err = mgmt_cmd_status(sk, index, opcode,
1558 MGMT_STATUS_INVALID_INDEX);
1559 goto done;
1560 }
1561
1562 var_len = (handler->flags & HCI_MGMT_VAR_LEN);
1563 if ((var_len && len < handler->data_len) ||
1564 (!var_len && len != handler->data_len)) {
1565 err = mgmt_cmd_status(sk, index, opcode,
1566 MGMT_STATUS_INVALID_PARAMS);
1567 goto done;
1568 }
1569
1570 if (hdev && chan->hdev_init)
1571 chan->hdev_init(sk, hdev);
1572
1573 cp = buf + sizeof(*hdr);
1574
1575 err = handler->func(sk, hdev, cp, len);
1576 if (err < 0)
1577 goto done;
1578
1579 err = msglen;
1580
1581 done:
1582 if (hdev)
1583 hci_dev_put(hdev);
1584
1585 kfree(buf);
1586 return err;
1587 }
1588
1589 static int hci_logging_frame(struct sock *sk, struct msghdr *msg, int len)
1590 {
1591 struct hci_mon_hdr *hdr;
1592 struct sk_buff *skb;
1593 struct hci_dev *hdev;
1594 u16 index;
1595 int err;
1596
1597 /* The logging frame consists at minimum of the standard header,
1598 * the priority byte, the ident length byte and at least one string
1599 * terminator NUL byte. Anything shorter are invalid packets.
1600 */
1601 if (len < sizeof(*hdr) + 3)
1602 return -EINVAL;
1603
1604 skb = bt_skb_send_alloc(sk, len, msg->msg_flags & MSG_DONTWAIT, &err);
1605 if (!skb)
1606 return err;
1607
1608 if (memcpy_from_msg(skb_put(skb, len), msg, len)) {
1609 err = -EFAULT;
1610 goto drop;
1611 }
1612
1613 hdr = (void *)skb->data;
1614
1615 if (__le16_to_cpu(hdr->len) != len - sizeof(*hdr)) {
1616 err = -EINVAL;
1617 goto drop;
1618 }
1619
1620 if (__le16_to_cpu(hdr->opcode) == 0x0000) {
1621 __u8 priority = skb->data[sizeof(*hdr)];
1622 __u8 ident_len = skb->data[sizeof(*hdr) + 1];
1623
1624 /* Only the priorities 0-7 are valid and with that any other
1625 * value results in an invalid packet.
1626 *
1627 * The priority byte is followed by an ident length byte and
1628 * the NUL terminated ident string. Check that the ident
1629 * length is not overflowing the packet and also that the
1630 * ident string itself is NUL terminated. In case the ident
1631 * length is zero, the length value actually doubles as NUL
1632 * terminator identifier.
1633 *
1634 * The message follows the ident string (if present) and
1635 * must be NUL terminated. Otherwise it is not a valid packet.
1636 */
1637 if (priority > 7 || skb->data[len - 1] != 0x00 ||
1638 ident_len > len - sizeof(*hdr) - 3 ||
1639 skb->data[sizeof(*hdr) + ident_len + 1] != 0x00) {
1640 err = -EINVAL;
1641 goto drop;
1642 }
1643 } else {
1644 err = -EINVAL;
1645 goto drop;
1646 }
1647
1648 index = __le16_to_cpu(hdr->index);
1649
1650 if (index != MGMT_INDEX_NONE) {
1651 hdev = hci_dev_get(index);
1652 if (!hdev) {
1653 err = -ENODEV;
1654 goto drop;
1655 }
1656 } else {
1657 hdev = NULL;
1658 }
1659
1660 hdr->opcode = cpu_to_le16(HCI_MON_USER_LOGGING);
1661
1662 hci_send_to_channel(HCI_CHANNEL_MONITOR, skb, HCI_SOCK_TRUSTED, NULL);
1663 err = len;
1664
1665 if (hdev)
1666 hci_dev_put(hdev);
1667
1668 drop:
1669 kfree_skb(skb);
1670 return err;
1671 }
1672
1673 static int hci_sock_sendmsg(struct socket *sock, struct msghdr *msg,
1674 size_t len)
1675 {
1676 struct sock *sk = sock->sk;
1677 struct hci_mgmt_chan *chan;
1678 struct hci_dev *hdev;
1679 struct sk_buff *skb;
1680 int err;
1681
1682 BT_DBG("sock %p sk %p", sock, sk);
1683
1684 if (msg->msg_flags & MSG_OOB)
1685 return -EOPNOTSUPP;
1686
1687 if (msg->msg_flags & ~(MSG_DONTWAIT|MSG_NOSIGNAL|MSG_ERRQUEUE|
1688 MSG_CMSG_COMPAT))
1689 return -EINVAL;
1690
1691 if (len < 4 || len > HCI_MAX_FRAME_SIZE)
1692 return -EINVAL;
1693
1694 lock_sock(sk);
1695
1696 switch (hci_pi(sk)->channel) {
1697 case HCI_CHANNEL_RAW:
1698 case HCI_CHANNEL_USER:
1699 break;
1700 case HCI_CHANNEL_MONITOR:
1701 err = -EOPNOTSUPP;
1702 goto done;
1703 case HCI_CHANNEL_LOGGING:
1704 err = hci_logging_frame(sk, msg, len);
1705 goto done;
1706 default:
1707 mutex_lock(&mgmt_chan_list_lock);
1708 chan = __hci_mgmt_chan_find(hci_pi(sk)->channel);
1709 if (chan)
1710 err = hci_mgmt_cmd(chan, sk, msg, len);
1711 else
1712 err = -EINVAL;
1713
1714 mutex_unlock(&mgmt_chan_list_lock);
1715 goto done;
1716 }
1717
1718 hdev = hci_pi(sk)->hdev;
1719 if (!hdev) {
1720 err = -EBADFD;
1721 goto done;
1722 }
1723
1724 if (!test_bit(HCI_UP, &hdev->flags)) {
1725 err = -ENETDOWN;
1726 goto done;
1727 }
1728
1729 skb = bt_skb_send_alloc(sk, len, msg->msg_flags & MSG_DONTWAIT, &err);
1730 if (!skb)
1731 goto done;
1732
1733 if (memcpy_from_msg(skb_put(skb, len), msg, len)) {
1734 err = -EFAULT;
1735 goto drop;
1736 }
1737
1738 hci_skb_pkt_type(skb) = skb->data[0];
1739 skb_pull(skb, 1);
1740
1741 if (hci_pi(sk)->channel == HCI_CHANNEL_USER) {
1742 /* No permission check is needed for user channel
1743 * since that gets enforced when binding the socket.
1744 *
1745 * However check that the packet type is valid.
1746 */
1747 if (hci_skb_pkt_type(skb) != HCI_COMMAND_PKT &&
1748 hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
1749 hci_skb_pkt_type(skb) != HCI_SCODATA_PKT) {
1750 err = -EINVAL;
1751 goto drop;
1752 }
1753
1754 skb_queue_tail(&hdev->raw_q, skb);
1755 queue_work(hdev->workqueue, &hdev->tx_work);
1756 } else if (hci_skb_pkt_type(skb) == HCI_COMMAND_PKT) {
1757 u16 opcode = get_unaligned_le16(skb->data);
1758 u16 ogf = hci_opcode_ogf(opcode);
1759 u16 ocf = hci_opcode_ocf(opcode);
1760
1761 if (((ogf > HCI_SFLT_MAX_OGF) ||
1762 !hci_test_bit(ocf & HCI_FLT_OCF_BITS,
1763 &hci_sec_filter.ocf_mask[ogf])) &&
1764 !capable(CAP_NET_RAW)) {
1765 err = -EPERM;
1766 goto drop;
1767 }
1768
1769 /* Since the opcode has already been extracted here, store
1770 * a copy of the value for later use by the drivers.
1771 */
1772 hci_skb_opcode(skb) = opcode;
1773
1774 if (ogf == 0x3f) {
1775 skb_queue_tail(&hdev->raw_q, skb);
1776 queue_work(hdev->workqueue, &hdev->tx_work);
1777 } else {
1778 /* Stand-alone HCI commands must be flagged as
1779 * single-command requests.
1780 */
1781 bt_cb(skb)->hci.req_flags |= HCI_REQ_START;
1782
1783 skb_queue_tail(&hdev->cmd_q, skb);
1784 queue_work(hdev->workqueue, &hdev->cmd_work);
1785 }
1786 } else {
1787 if (!capable(CAP_NET_RAW)) {
1788 err = -EPERM;
1789 goto drop;
1790 }
1791
1792 if (hci_skb_pkt_type(skb) != HCI_ACLDATA_PKT &&
1793 hci_skb_pkt_type(skb) != HCI_SCODATA_PKT) {
1794 err = -EINVAL;
1795 goto drop;
1796 }
1797
1798 skb_queue_tail(&hdev->raw_q, skb);
1799 queue_work(hdev->workqueue, &hdev->tx_work);
1800 }
1801
1802 err = len;
1803
1804 done:
1805 release_sock(sk);
1806 return err;
1807
1808 drop:
1809 kfree_skb(skb);
1810 goto done;
1811 }
1812
1813 static int hci_sock_setsockopt(struct socket *sock, int level, int optname,
1814 char __user *optval, unsigned int len)
1815 {
1816 struct hci_ufilter uf = { .opcode = 0 };
1817 struct sock *sk = sock->sk;
1818 int err = 0, opt = 0;
1819
1820 BT_DBG("sk %p, opt %d", sk, optname);
1821
1822 if (level != SOL_HCI)
1823 return -ENOPROTOOPT;
1824
1825 lock_sock(sk);
1826
1827 if (hci_pi(sk)->channel != HCI_CHANNEL_RAW) {
1828 err = -EBADFD;
1829 goto done;
1830 }
1831
1832 switch (optname) {
1833 case HCI_DATA_DIR:
1834 if (get_user(opt, (int __user *)optval)) {
1835 err = -EFAULT;
1836 break;
1837 }
1838
1839 if (opt)
1840 hci_pi(sk)->cmsg_mask |= HCI_CMSG_DIR;
1841 else
1842 hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_DIR;
1843 break;
1844
1845 case HCI_TIME_STAMP:
1846 if (get_user(opt, (int __user *)optval)) {
1847 err = -EFAULT;
1848 break;
1849 }
1850
1851 if (opt)
1852 hci_pi(sk)->cmsg_mask |= HCI_CMSG_TSTAMP;
1853 else
1854 hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_TSTAMP;
1855 break;
1856
1857 case HCI_FILTER:
1858 {
1859 struct hci_filter *f = &hci_pi(sk)->filter;
1860
1861 uf.type_mask = f->type_mask;
1862 uf.opcode = f->opcode;
1863 uf.event_mask[0] = *((u32 *) f->event_mask + 0);
1864 uf.event_mask[1] = *((u32 *) f->event_mask + 1);
1865 }
1866
1867 len = min_t(unsigned int, len, sizeof(uf));
1868 if (copy_from_user(&uf, optval, len)) {
1869 err = -EFAULT;
1870 break;
1871 }
1872
1873 if (!capable(CAP_NET_RAW)) {
1874 uf.type_mask &= hci_sec_filter.type_mask;
1875 uf.event_mask[0] &= *((u32 *) hci_sec_filter.event_mask + 0);
1876 uf.event_mask[1] &= *((u32 *) hci_sec_filter.event_mask + 1);
1877 }
1878
1879 {
1880 struct hci_filter *f = &hci_pi(sk)->filter;
1881
1882 f->type_mask = uf.type_mask;
1883 f->opcode = uf.opcode;
1884 *((u32 *) f->event_mask + 0) = uf.event_mask[0];
1885 *((u32 *) f->event_mask + 1) = uf.event_mask[1];
1886 }
1887 break;
1888
1889 default:
1890 err = -ENOPROTOOPT;
1891 break;
1892 }
1893
1894 done:
1895 release_sock(sk);
1896 return err;
1897 }
1898
1899 static int hci_sock_getsockopt(struct socket *sock, int level, int optname,
1900 char __user *optval, int __user *optlen)
1901 {
1902 struct hci_ufilter uf;
1903 struct sock *sk = sock->sk;
1904 int len, opt, err = 0;
1905
1906 BT_DBG("sk %p, opt %d", sk, optname);
1907
1908 if (level != SOL_HCI)
1909 return -ENOPROTOOPT;
1910
1911 if (get_user(len, optlen))
1912 return -EFAULT;
1913
1914 lock_sock(sk);
1915
1916 if (hci_pi(sk)->channel != HCI_CHANNEL_RAW) {
1917 err = -EBADFD;
1918 goto done;
1919 }
1920
1921 switch (optname) {
1922 case HCI_DATA_DIR:
1923 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_DIR)
1924 opt = 1;
1925 else
1926 opt = 0;
1927
1928 if (put_user(opt, optval))
1929 err = -EFAULT;
1930 break;
1931
1932 case HCI_TIME_STAMP:
1933 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_TSTAMP)
1934 opt = 1;
1935 else
1936 opt = 0;
1937
1938 if (put_user(opt, optval))
1939 err = -EFAULT;
1940 break;
1941
1942 case HCI_FILTER:
1943 {
1944 struct hci_filter *f = &hci_pi(sk)->filter;
1945
1946 memset(&uf, 0, sizeof(uf));
1947 uf.type_mask = f->type_mask;
1948 uf.opcode = f->opcode;
1949 uf.event_mask[0] = *((u32 *) f->event_mask + 0);
1950 uf.event_mask[1] = *((u32 *) f->event_mask + 1);
1951 }
1952
1953 len = min_t(unsigned int, len, sizeof(uf));
1954 if (copy_to_user(optval, &uf, len))
1955 err = -EFAULT;
1956 break;
1957
1958 default:
1959 err = -ENOPROTOOPT;
1960 break;
1961 }
1962
1963 done:
1964 release_sock(sk);
1965 return err;
1966 }
1967
1968 static const struct proto_ops hci_sock_ops = {
1969 .family = PF_BLUETOOTH,
1970 .owner = THIS_MODULE,
1971 .release = hci_sock_release,
1972 .bind = hci_sock_bind,
1973 .getname = hci_sock_getname,
1974 .sendmsg = hci_sock_sendmsg,
1975 .recvmsg = hci_sock_recvmsg,
1976 .ioctl = hci_sock_ioctl,
1977 .poll = datagram_poll,
1978 .listen = sock_no_listen,
1979 .shutdown = sock_no_shutdown,
1980 .setsockopt = hci_sock_setsockopt,
1981 .getsockopt = hci_sock_getsockopt,
1982 .connect = sock_no_connect,
1983 .socketpair = sock_no_socketpair,
1984 .accept = sock_no_accept,
1985 .mmap = sock_no_mmap
1986 };
1987
1988 static struct proto hci_sk_proto = {
1989 .name = "HCI",
1990 .owner = THIS_MODULE,
1991 .obj_size = sizeof(struct hci_pinfo)
1992 };
1993
1994 static int hci_sock_create(struct net *net, struct socket *sock, int protocol,
1995 int kern)
1996 {
1997 struct sock *sk;
1998
1999 BT_DBG("sock %p", sock);
2000
2001 if (sock->type != SOCK_RAW)
2002 return -ESOCKTNOSUPPORT;
2003
2004 sock->ops = &hci_sock_ops;
2005
2006 sk = sk_alloc(net, PF_BLUETOOTH, GFP_ATOMIC, &hci_sk_proto, kern);
2007 if (!sk)
2008 return -ENOMEM;
2009
2010 sock_init_data(sock, sk);
2011
2012 sock_reset_flag(sk, SOCK_ZAPPED);
2013
2014 sk->sk_protocol = protocol;
2015
2016 sock->state = SS_UNCONNECTED;
2017 sk->sk_state = BT_OPEN;
2018
2019 bt_sock_link(&hci_sk_list, sk);
2020 return 0;
2021 }
2022
2023 static const struct net_proto_family hci_sock_family_ops = {
2024 .family = PF_BLUETOOTH,
2025 .owner = THIS_MODULE,
2026 .create = hci_sock_create,
2027 };
2028
2029 int __init hci_sock_init(void)
2030 {
2031 int err;
2032
2033 BUILD_BUG_ON(sizeof(struct sockaddr_hci) > sizeof(struct sockaddr));
2034
2035 err = proto_register(&hci_sk_proto, 0);
2036 if (err < 0)
2037 return err;
2038
2039 err = bt_sock_register(BTPROTO_HCI, &hci_sock_family_ops);
2040 if (err < 0) {
2041 BT_ERR("HCI socket registration failed");
2042 goto error;
2043 }
2044
2045 err = bt_procfs_init(&init_net, "hci", &hci_sk_list, NULL);
2046 if (err < 0) {
2047 BT_ERR("Failed to create HCI proc file");
2048 bt_sock_unregister(BTPROTO_HCI);
2049 goto error;
2050 }
2051
2052 BT_INFO("HCI socket layer initialized");
2053
2054 return 0;
2055
2056 error:
2057 proto_unregister(&hci_sk_proto);
2058 return err;
2059 }
2060
2061 void hci_sock_cleanup(void)
2062 {
2063 bt_procfs_cleanup(&init_net, "hci");
2064 bt_sock_unregister(BTPROTO_HCI);
2065 proto_unregister(&hci_sk_proto);
2066 }
Linux with added FPC-III support