2 BlueZ - Bluetooth protocol stack for Linux
3 Copyright (C) 2000-2001 Qualcomm Incorporated
5 Written 2000,2001 by Maxim Krasnyansky <maxk@qualcomm.com>
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;
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.
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.
25 /* Bluetooth HCI sockets. */
27 #include <linux/module.h>
29 #include <linux/types.h>
30 #include <linux/capability.h>
31 #include <linux/errno.h>
32 #include <linux/kernel.h>
33 #include <linux/slab.h>
34 #include <linux/poll.h>
35 #include <linux/fcntl.h>
36 #include <linux/init.h>
37 #include <linux/skbuff.h>
38 #include <linux/workqueue.h>
39 #include <linux/interrupt.h>
40 #include <linux/compat.h>
41 #include <linux/socket.h>
42 #include <linux/ioctl.h>
45 #include <asm/system.h>
46 #include <linux/uaccess.h>
47 #include <asm/unaligned.h>
49 #include <net/bluetooth/bluetooth.h>
50 #include <net/bluetooth/hci_core.h>
52 /* ----- HCI socket interface ----- */
54 static inline int hci_test_bit(int nr, void *addr)
56 return *((__u32 *) addr + (nr >> 5)) & ((__u32) 1 << (nr & 31));
60 static struct hci_sec_filter hci_sec_filter = {
64 { 0x1000d9fe, 0x0000b00c },
69 { 0xbe000006, 0x00000001, 0x00000000, 0x00 },
71 { 0x00005200, 0x00000000, 0x00000000, 0x00 },
73 { 0xaab00200, 0x2b402aaa, 0x05220154, 0x00 },
75 { 0x000002be, 0x00000000, 0x00000000, 0x00 },
76 /* OGF_STATUS_PARAM */
77 { 0x000000ea, 0x00000000, 0x00000000, 0x00 }
81 static struct bt_sock_list hci_sk_list = {
82 .lock = __RW_LOCK_UNLOCKED(hci_sk_list.lock)
85 /* Send frame to RAW socket */
86 void hci_send_to_sock(struct hci_dev *hdev, struct sk_buff *skb)
89 struct hlist_node *node;
91 BT_DBG("hdev %p len %d", hdev, skb->len);
93 read_lock(&hci_sk_list.lock);
94 sk_for_each(sk, node, &hci_sk_list.head) {
95 struct hci_filter *flt;
98 if (sk->sk_state != BT_BOUND || hci_pi(sk)->hdev != hdev)
101 /* Don't send frame to the socket it came from */
106 flt = &hci_pi(sk)->filter;
108 if (!test_bit((bt_cb(skb)->pkt_type == HCI_VENDOR_PKT) ?
109 0 : (bt_cb(skb)->pkt_type & HCI_FLT_TYPE_BITS), &flt->type_mask))
112 if (bt_cb(skb)->pkt_type == HCI_EVENT_PKT) {
113 register int evt = (*(__u8 *)skb->data & HCI_FLT_EVENT_BITS);
115 if (!hci_test_bit(evt, &flt->event_mask))
119 ((evt == HCI_EV_CMD_COMPLETE &&
121 get_unaligned((__le16 *)(skb->data + 3))) ||
122 (evt == HCI_EV_CMD_STATUS &&
124 get_unaligned((__le16 *)(skb->data + 4)))))
128 nskb = skb_clone(skb, GFP_ATOMIC);
132 /* Put type byte before the data */
133 memcpy(skb_push(nskb, 1), &bt_cb(nskb)->pkt_type, 1);
135 if (sock_queue_rcv_skb(sk, nskb))
138 read_unlock(&hci_sk_list.lock);
141 static int hci_sock_release(struct socket *sock)
143 struct sock *sk = sock->sk;
144 struct hci_dev *hdev;
146 BT_DBG("sock %p sk %p", sock, sk);
151 hdev = hci_pi(sk)->hdev;
153 bt_sock_unlink(&hci_sk_list, sk);
156 atomic_dec(&hdev->promisc);
162 skb_queue_purge(&sk->sk_receive_queue);
163 skb_queue_purge(&sk->sk_write_queue);
169 struct bdaddr_list *hci_blacklist_lookup(struct hci_dev *hdev, bdaddr_t *bdaddr)
173 list_for_each(p, &hdev->blacklist) {
174 struct bdaddr_list *b;
176 b = list_entry(p, struct bdaddr_list, list);
178 if (bacmp(bdaddr, &b->bdaddr) == 0)
185 static int hci_blacklist_add(struct hci_dev *hdev, void __user *arg)
188 struct bdaddr_list *entry;
190 if (copy_from_user(&bdaddr, arg, sizeof(bdaddr)))
193 if (bacmp(&bdaddr, BDADDR_ANY) == 0)
196 if (hci_blacklist_lookup(hdev, &bdaddr))
199 entry = kzalloc(sizeof(struct bdaddr_list), GFP_KERNEL);
203 bacpy(&entry->bdaddr, &bdaddr);
205 list_add(&entry->list, &hdev->blacklist);
210 int hci_blacklist_clear(struct hci_dev *hdev)
212 struct list_head *p, *n;
214 list_for_each_safe(p, n, &hdev->blacklist) {
215 struct bdaddr_list *b;
217 b = list_entry(p, struct bdaddr_list, list);
226 static int hci_blacklist_del(struct hci_dev *hdev, void __user *arg)
229 struct bdaddr_list *entry;
231 if (copy_from_user(&bdaddr, arg, sizeof(bdaddr)))
234 if (bacmp(&bdaddr, BDADDR_ANY) == 0)
235 return hci_blacklist_clear(hdev);
237 entry = hci_blacklist_lookup(hdev, &bdaddr);
241 list_del(&entry->list);
247 /* Ioctls that require bound socket */
248 static inline int hci_sock_bound_ioctl(struct sock *sk, unsigned int cmd, unsigned long arg)
250 struct hci_dev *hdev = hci_pi(sk)->hdev;
257 if (!capable(CAP_NET_ADMIN))
260 if (test_bit(HCI_QUIRK_RAW_DEVICE, &hdev->quirks))
264 set_bit(HCI_RAW, &hdev->flags);
266 clear_bit(HCI_RAW, &hdev->flags);
271 return hci_get_conn_info(hdev, (void __user *) arg);
274 return hci_get_auth_info(hdev, (void __user *) arg);
277 if (!capable(CAP_NET_ADMIN))
279 return hci_blacklist_add(hdev, (void __user *) arg);
282 if (!capable(CAP_NET_ADMIN))
284 return hci_blacklist_del(hdev, (void __user *) arg);
288 return hdev->ioctl(hdev, cmd, arg);
293 static int hci_sock_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
295 struct sock *sk = sock->sk;
296 void __user *argp = (void __user *) arg;
299 BT_DBG("cmd %x arg %lx", cmd, arg);
303 return hci_get_dev_list(argp);
306 return hci_get_dev_info(argp);
309 return hci_get_conn_list(argp);
312 if (!capable(CAP_NET_ADMIN))
314 return hci_dev_open(arg);
317 if (!capable(CAP_NET_ADMIN))
319 return hci_dev_close(arg);
322 if (!capable(CAP_NET_ADMIN))
324 return hci_dev_reset(arg);
327 if (!capable(CAP_NET_ADMIN))
329 return hci_dev_reset_stat(arg);
339 if (!capable(CAP_NET_ADMIN))
341 return hci_dev_cmd(cmd, argp);
344 return hci_inquiry(argp);
348 err = hci_sock_bound_ioctl(sk, cmd, arg);
354 static int hci_sock_bind(struct socket *sock, struct sockaddr *addr, int addr_len)
356 struct sockaddr_hci *haddr = (struct sockaddr_hci *) addr;
357 struct sock *sk = sock->sk;
358 struct hci_dev *hdev = NULL;
361 BT_DBG("sock %p sk %p", sock, sk);
363 if (!haddr || haddr->hci_family != AF_BLUETOOTH)
368 if (hci_pi(sk)->hdev) {
373 if (haddr->hci_dev != HCI_DEV_NONE) {
374 hdev = hci_dev_get(haddr->hci_dev);
380 atomic_inc(&hdev->promisc);
383 hci_pi(sk)->hdev = hdev;
384 sk->sk_state = BT_BOUND;
391 static int hci_sock_getname(struct socket *sock, struct sockaddr *addr, int *addr_len, int peer)
393 struct sockaddr_hci *haddr = (struct sockaddr_hci *) addr;
394 struct sock *sk = sock->sk;
395 struct hci_dev *hdev = hci_pi(sk)->hdev;
397 BT_DBG("sock %p sk %p", sock, sk);
404 *addr_len = sizeof(*haddr);
405 haddr->hci_family = AF_BLUETOOTH;
406 haddr->hci_dev = hdev->id;
412 static inline void hci_sock_cmsg(struct sock *sk, struct msghdr *msg, struct sk_buff *skb)
414 __u32 mask = hci_pi(sk)->cmsg_mask;
416 if (mask & HCI_CMSG_DIR) {
417 int incoming = bt_cb(skb)->incoming;
418 put_cmsg(msg, SOL_HCI, HCI_CMSG_DIR, sizeof(incoming), &incoming);
421 if (mask & HCI_CMSG_TSTAMP) {
423 struct compat_timeval ctv;
429 skb_get_timestamp(skb, &tv);
434 if (msg->msg_flags & MSG_CMSG_COMPAT) {
435 ctv.tv_sec = tv.tv_sec;
436 ctv.tv_usec = tv.tv_usec;
442 put_cmsg(msg, SOL_HCI, HCI_CMSG_TSTAMP, len, data);
446 static int hci_sock_recvmsg(struct kiocb *iocb, struct socket *sock,
447 struct msghdr *msg, size_t len, int flags)
449 int noblock = flags & MSG_DONTWAIT;
450 struct sock *sk = sock->sk;
454 BT_DBG("sock %p, sk %p", sock, sk);
456 if (flags & (MSG_OOB))
459 if (sk->sk_state == BT_CLOSED)
462 skb = skb_recv_datagram(sk, flags, noblock, &err);
466 msg->msg_namelen = 0;
470 msg->msg_flags |= MSG_TRUNC;
474 skb_reset_transport_header(skb);
475 err = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
477 hci_sock_cmsg(sk, msg, skb);
479 skb_free_datagram(sk, skb);
481 return err ? : copied;
484 static int hci_sock_sendmsg(struct kiocb *iocb, struct socket *sock,
485 struct msghdr *msg, size_t len)
487 struct sock *sk = sock->sk;
488 struct hci_dev *hdev;
492 BT_DBG("sock %p sk %p", sock, sk);
494 if (msg->msg_flags & MSG_OOB)
497 if (msg->msg_flags & ~(MSG_DONTWAIT|MSG_NOSIGNAL|MSG_ERRQUEUE))
500 if (len < 4 || len > HCI_MAX_FRAME_SIZE)
505 hdev = hci_pi(sk)->hdev;
511 if (!test_bit(HCI_UP, &hdev->flags)) {
516 skb = bt_skb_send_alloc(sk, len, msg->msg_flags & MSG_DONTWAIT, &err);
520 if (memcpy_fromiovec(skb_put(skb, len), msg->msg_iov, len)) {
525 bt_cb(skb)->pkt_type = *((unsigned char *) skb->data);
527 skb->dev = (void *) hdev;
529 if (bt_cb(skb)->pkt_type == HCI_COMMAND_PKT) {
530 u16 opcode = get_unaligned_le16(skb->data);
531 u16 ogf = hci_opcode_ogf(opcode);
532 u16 ocf = hci_opcode_ocf(opcode);
534 if (((ogf > HCI_SFLT_MAX_OGF) ||
535 !hci_test_bit(ocf & HCI_FLT_OCF_BITS, &hci_sec_filter.ocf_mask[ogf])) &&
536 !capable(CAP_NET_RAW)) {
541 if (test_bit(HCI_RAW, &hdev->flags) || (ogf == 0x3f)) {
542 skb_queue_tail(&hdev->raw_q, skb);
543 tasklet_schedule(&hdev->tx_task);
545 skb_queue_tail(&hdev->cmd_q, skb);
546 tasklet_schedule(&hdev->cmd_task);
549 if (!capable(CAP_NET_RAW)) {
554 skb_queue_tail(&hdev->raw_q, skb);
555 tasklet_schedule(&hdev->tx_task);
569 static int hci_sock_setsockopt(struct socket *sock, int level, int optname, char __user *optval, unsigned int len)
571 struct hci_ufilter uf = { .opcode = 0 };
572 struct sock *sk = sock->sk;
573 int err = 0, opt = 0;
575 BT_DBG("sk %p, opt %d", sk, optname);
581 if (get_user(opt, (int __user *)optval)) {
587 hci_pi(sk)->cmsg_mask |= HCI_CMSG_DIR;
589 hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_DIR;
593 if (get_user(opt, (int __user *)optval)) {
599 hci_pi(sk)->cmsg_mask |= HCI_CMSG_TSTAMP;
601 hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_TSTAMP;
606 struct hci_filter *f = &hci_pi(sk)->filter;
608 uf.type_mask = f->type_mask;
609 uf.opcode = f->opcode;
610 uf.event_mask[0] = *((u32 *) f->event_mask + 0);
611 uf.event_mask[1] = *((u32 *) f->event_mask + 1);
614 len = min_t(unsigned int, len, sizeof(uf));
615 if (copy_from_user(&uf, optval, len)) {
620 if (!capable(CAP_NET_RAW)) {
621 uf.type_mask &= hci_sec_filter.type_mask;
622 uf.event_mask[0] &= *((u32 *) hci_sec_filter.event_mask + 0);
623 uf.event_mask[1] &= *((u32 *) hci_sec_filter.event_mask + 1);
627 struct hci_filter *f = &hci_pi(sk)->filter;
629 f->type_mask = uf.type_mask;
630 f->opcode = uf.opcode;
631 *((u32 *) f->event_mask + 0) = uf.event_mask[0];
632 *((u32 *) f->event_mask + 1) = uf.event_mask[1];
645 static int hci_sock_getsockopt(struct socket *sock, int level, int optname, char __user *optval, int __user *optlen)
647 struct hci_ufilter uf;
648 struct sock *sk = sock->sk;
651 if (get_user(len, optlen))
656 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_DIR)
661 if (put_user(opt, optval))
666 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_TSTAMP)
671 if (put_user(opt, optval))
677 struct hci_filter *f = &hci_pi(sk)->filter;
679 uf.type_mask = f->type_mask;
680 uf.opcode = f->opcode;
681 uf.event_mask[0] = *((u32 *) f->event_mask + 0);
682 uf.event_mask[1] = *((u32 *) f->event_mask + 1);
685 len = min_t(unsigned int, len, sizeof(uf));
686 if (copy_to_user(optval, &uf, len))
698 static const struct proto_ops hci_sock_ops = {
699 .family = PF_BLUETOOTH,
700 .owner = THIS_MODULE,
701 .release = hci_sock_release,
702 .bind = hci_sock_bind,
703 .getname = hci_sock_getname,
704 .sendmsg = hci_sock_sendmsg,
705 .recvmsg = hci_sock_recvmsg,
706 .ioctl = hci_sock_ioctl,
707 .poll = datagram_poll,
708 .listen = sock_no_listen,
709 .shutdown = sock_no_shutdown,
710 .setsockopt = hci_sock_setsockopt,
711 .getsockopt = hci_sock_getsockopt,
712 .connect = sock_no_connect,
713 .socketpair = sock_no_socketpair,
714 .accept = sock_no_accept,
718 static struct proto hci_sk_proto = {
720 .owner = THIS_MODULE,
721 .obj_size = sizeof(struct hci_pinfo)
724 static int hci_sock_create(struct net *net, struct socket *sock, int protocol,
729 BT_DBG("sock %p", sock);
731 if (sock->type != SOCK_RAW)
732 return -ESOCKTNOSUPPORT;
734 sock->ops = &hci_sock_ops;
736 sk = sk_alloc(net, PF_BLUETOOTH, GFP_ATOMIC, &hci_sk_proto);
740 sock_init_data(sock, sk);
742 sock_reset_flag(sk, SOCK_ZAPPED);
744 sk->sk_protocol = protocol;
746 sock->state = SS_UNCONNECTED;
747 sk->sk_state = BT_OPEN;
749 bt_sock_link(&hci_sk_list, sk);
753 static int hci_sock_dev_event(struct notifier_block *this, unsigned long event, void *ptr)
755 struct hci_dev *hdev = (struct hci_dev *) ptr;
756 struct hci_ev_si_device ev;
758 BT_DBG("hdev %s event %ld", hdev->name, event);
760 /* Send event to sockets */
762 ev.dev_id = hdev->id;
763 hci_si_event(NULL, HCI_EV_SI_DEVICE, sizeof(ev), &ev);
765 if (event == HCI_DEV_UNREG) {
767 struct hlist_node *node;
769 /* Detach sockets from device */
770 read_lock(&hci_sk_list.lock);
771 sk_for_each(sk, node, &hci_sk_list.head) {
773 bh_lock_sock_nested(sk);
774 if (hci_pi(sk)->hdev == hdev) {
775 hci_pi(sk)->hdev = NULL;
777 sk->sk_state = BT_OPEN;
778 sk->sk_state_change(sk);
785 read_unlock(&hci_sk_list.lock);
791 static const struct net_proto_family hci_sock_family_ops = {
792 .family = PF_BLUETOOTH,
793 .owner = THIS_MODULE,
794 .create = hci_sock_create,
797 static struct notifier_block hci_sock_nblock = {
798 .notifier_call = hci_sock_dev_event
801 int __init hci_sock_init(void)
805 err = proto_register(&hci_sk_proto, 0);
809 err = bt_sock_register(BTPROTO_HCI, &hci_sock_family_ops);
813 hci_register_notifier(&hci_sock_nblock);
815 BT_INFO("HCI socket layer initialized");
820 BT_ERR("HCI socket registration failed");
821 proto_unregister(&hci_sk_proto);
825 void __exit hci_sock_cleanup(void)
827 if (bt_sock_unregister(BTPROTO_HCI) < 0)
828 BT_ERR("HCI socket unregistration failed");
830 hci_unregister_notifier(&hci_sock_nblock);
832 proto_unregister(&hci_sk_proto);