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/sched.h>
34 #include <linux/slab.h>
35 #include <linux/poll.h>
36 #include <linux/fcntl.h>
37 #include <linux/init.h>
38 #include <linux/skbuff.h>
39 #include <linux/workqueue.h>
40 #include <linux/interrupt.h>
41 #include <linux/socket.h>
42 #include <linux/ioctl.h>
45 #include <asm/system.h>
46 #include <asm/uaccess.h>
47 #include <asm/unaligned.h>
49 #include <net/bluetooth/bluetooth.h>
50 #include <net/bluetooth/hci_core.h>
52 #ifndef CONFIG_BT_HCI_SOCK_DEBUG
57 /* ----- HCI socket interface ----- */
59 static inline int hci_test_bit(int nr
, void *addr
)
61 return *((__u32
*) addr
+ (nr
>> 5)) & ((__u32
) 1 << (nr
& 31));
65 static struct hci_sec_filter hci_sec_filter
= {
69 { 0x1000d9fe, 0x0000b00c },
74 { 0xbe000006, 0x00000001, 0x000000, 0x00 },
76 { 0x00005200, 0x00000000, 0x000000, 0x00 },
78 { 0xaab00200, 0x2b402aaa, 0x020154, 0x00 },
80 { 0x000002be, 0x00000000, 0x000000, 0x00 },
81 /* OGF_STATUS_PARAM */
82 { 0x000000ea, 0x00000000, 0x000000, 0x00 }
86 static struct bt_sock_list hci_sk_list
= {
87 .lock
= RW_LOCK_UNLOCKED
90 /* Send frame to RAW socket */
91 void hci_send_to_sock(struct hci_dev
*hdev
, struct sk_buff
*skb
)
94 struct hlist_node
*node
;
96 BT_DBG("hdev %p len %d", hdev
, skb
->len
);
98 read_lock(&hci_sk_list
.lock
);
99 sk_for_each(sk
, node
, &hci_sk_list
.head
) {
100 struct hci_filter
*flt
;
101 struct sk_buff
*nskb
;
103 if (sk
->sk_state
!= BT_BOUND
|| hci_pi(sk
)->hdev
!= hdev
)
106 /* Don't send frame to the socket it came from */
111 flt
= &hci_pi(sk
)->filter
;
113 if (!test_bit((bt_cb(skb
)->pkt_type
== HCI_VENDOR_PKT
) ?
114 0 : (bt_cb(skb
)->pkt_type
& HCI_FLT_TYPE_BITS
), &flt
->type_mask
))
117 if (bt_cb(skb
)->pkt_type
== HCI_EVENT_PKT
) {
118 register int evt
= (*(__u8
*)skb
->data
& HCI_FLT_EVENT_BITS
);
120 if (!hci_test_bit(evt
, &flt
->event_mask
))
124 ((evt
== HCI_EV_CMD_COMPLETE
&&
126 get_unaligned((__u16
*)(skb
->data
+ 3))) ||
127 (evt
== HCI_EV_CMD_STATUS
&&
129 get_unaligned((__u16
*)(skb
->data
+ 4)))))
133 if (!(nskb
= skb_clone(skb
, GFP_ATOMIC
)))
136 /* Put type byte before the data */
137 memcpy(skb_push(nskb
, 1), &bt_cb(nskb
)->pkt_type
, 1);
139 if (sock_queue_rcv_skb(sk
, nskb
))
142 read_unlock(&hci_sk_list
.lock
);
145 static int hci_sock_release(struct socket
*sock
)
147 struct sock
*sk
= sock
->sk
;
148 struct hci_dev
*hdev
;
150 BT_DBG("sock %p sk %p", sock
, sk
);
155 hdev
= hci_pi(sk
)->hdev
;
157 bt_sock_unlink(&hci_sk_list
, sk
);
160 atomic_dec(&hdev
->promisc
);
166 skb_queue_purge(&sk
->sk_receive_queue
);
167 skb_queue_purge(&sk
->sk_write_queue
);
173 /* Ioctls that require bound socket */
174 static inline int hci_sock_bound_ioctl(struct sock
*sk
, unsigned int cmd
, unsigned long arg
)
176 struct hci_dev
*hdev
= hci_pi(sk
)->hdev
;
183 if (!capable(CAP_NET_ADMIN
))
186 if (test_bit(HCI_QUIRK_RAW_DEVICE
, &hdev
->quirks
))
190 set_bit(HCI_RAW
, &hdev
->flags
);
192 clear_bit(HCI_RAW
, &hdev
->flags
);
197 if (!capable(CAP_NET_ADMIN
))
201 set_bit(HCI_SECMGR
, &hdev
->flags
);
203 clear_bit(HCI_SECMGR
, &hdev
->flags
);
208 return hci_get_conn_info(hdev
, (void __user
*)arg
);
212 return hdev
->ioctl(hdev
, cmd
, arg
);
217 static int hci_sock_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
219 struct sock
*sk
= sock
->sk
;
220 void __user
*argp
= (void __user
*)arg
;
223 BT_DBG("cmd %x arg %lx", cmd
, arg
);
227 return hci_get_dev_list(argp
);
230 return hci_get_dev_info(argp
);
233 return hci_get_conn_list(argp
);
236 if (!capable(CAP_NET_ADMIN
))
238 return hci_dev_open(arg
);
241 if (!capable(CAP_NET_ADMIN
))
243 return hci_dev_close(arg
);
246 if (!capable(CAP_NET_ADMIN
))
248 return hci_dev_reset(arg
);
251 if (!capable(CAP_NET_ADMIN
))
253 return hci_dev_reset_stat(arg
);
263 if (!capable(CAP_NET_ADMIN
))
265 return hci_dev_cmd(cmd
, argp
);
268 return hci_inquiry(argp
);
272 err
= hci_sock_bound_ioctl(sk
, cmd
, arg
);
278 static int hci_sock_bind(struct socket
*sock
, struct sockaddr
*addr
, int addr_len
)
280 struct sockaddr_hci
*haddr
= (struct sockaddr_hci
*) addr
;
281 struct sock
*sk
= sock
->sk
;
282 struct hci_dev
*hdev
= NULL
;
285 BT_DBG("sock %p sk %p", sock
, sk
);
287 if (!haddr
|| haddr
->hci_family
!= AF_BLUETOOTH
)
292 if (hci_pi(sk
)->hdev
) {
297 if (haddr
->hci_dev
!= HCI_DEV_NONE
) {
298 if (!(hdev
= hci_dev_get(haddr
->hci_dev
))) {
303 atomic_inc(&hdev
->promisc
);
306 hci_pi(sk
)->hdev
= hdev
;
307 sk
->sk_state
= BT_BOUND
;
314 static int hci_sock_getname(struct socket
*sock
, struct sockaddr
*addr
, int *addr_len
, int peer
)
316 struct sockaddr_hci
*haddr
= (struct sockaddr_hci
*) addr
;
317 struct sock
*sk
= sock
->sk
;
318 struct hci_dev
*hdev
= hci_pi(sk
)->hdev
;
320 BT_DBG("sock %p sk %p", sock
, sk
);
327 *addr_len
= sizeof(*haddr
);
328 haddr
->hci_family
= AF_BLUETOOTH
;
329 haddr
->hci_dev
= hdev
->id
;
335 static inline void hci_sock_cmsg(struct sock
*sk
, struct msghdr
*msg
, struct sk_buff
*skb
)
337 __u32 mask
= hci_pi(sk
)->cmsg_mask
;
339 if (mask
& HCI_CMSG_DIR
) {
340 int incoming
= bt_cb(skb
)->incoming
;
341 put_cmsg(msg
, SOL_HCI
, HCI_CMSG_DIR
, sizeof(incoming
), &incoming
);
344 if (mask
& HCI_CMSG_TSTAMP
) {
347 skb_get_timestamp(skb
, &tv
);
348 put_cmsg(msg
, SOL_HCI
, HCI_CMSG_TSTAMP
, sizeof(tv
), &tv
);
352 static int hci_sock_recvmsg(struct kiocb
*iocb
, struct socket
*sock
,
353 struct msghdr
*msg
, size_t len
, int flags
)
355 int noblock
= flags
& MSG_DONTWAIT
;
356 struct sock
*sk
= sock
->sk
;
360 BT_DBG("sock %p, sk %p", sock
, sk
);
362 if (flags
& (MSG_OOB
))
365 if (sk
->sk_state
== BT_CLOSED
)
368 if (!(skb
= skb_recv_datagram(sk
, flags
, noblock
, &err
)))
371 msg
->msg_namelen
= 0;
375 msg
->msg_flags
|= MSG_TRUNC
;
379 skb
->h
.raw
= skb
->data
;
380 err
= skb_copy_datagram_iovec(skb
, 0, msg
->msg_iov
, copied
);
382 hci_sock_cmsg(sk
, msg
, skb
);
384 skb_free_datagram(sk
, skb
);
386 return err
? : copied
;
389 static int hci_sock_sendmsg(struct kiocb
*iocb
, struct socket
*sock
,
390 struct msghdr
*msg
, size_t len
)
392 struct sock
*sk
= sock
->sk
;
393 struct hci_dev
*hdev
;
397 BT_DBG("sock %p sk %p", sock
, sk
);
399 if (msg
->msg_flags
& MSG_OOB
)
402 if (msg
->msg_flags
& ~(MSG_DONTWAIT
|MSG_NOSIGNAL
|MSG_ERRQUEUE
))
405 if (len
< 4 || len
> HCI_MAX_FRAME_SIZE
)
410 if (!(hdev
= hci_pi(sk
)->hdev
)) {
415 if (!(skb
= bt_skb_send_alloc(sk
, len
, msg
->msg_flags
& MSG_DONTWAIT
, &err
)))
418 if (memcpy_fromiovec(skb_put(skb
, len
), msg
->msg_iov
, len
)) {
423 bt_cb(skb
)->pkt_type
= *((unsigned char *) skb
->data
);
425 skb
->dev
= (void *) hdev
;
427 if (bt_cb(skb
)->pkt_type
== HCI_COMMAND_PKT
) {
428 u16 opcode
= __le16_to_cpu(get_unaligned((__le16
*) skb
->data
));
429 u16 ogf
= hci_opcode_ogf(opcode
);
430 u16 ocf
= hci_opcode_ocf(opcode
);
432 if (((ogf
> HCI_SFLT_MAX_OGF
) ||
433 !hci_test_bit(ocf
& HCI_FLT_OCF_BITS
, &hci_sec_filter
.ocf_mask
[ogf
])) &&
434 !capable(CAP_NET_RAW
)) {
439 if (test_bit(HCI_RAW
, &hdev
->flags
) || (ogf
== OGF_VENDOR_CMD
)) {
440 skb_queue_tail(&hdev
->raw_q
, skb
);
443 skb_queue_tail(&hdev
->cmd_q
, skb
);
447 if (!capable(CAP_NET_RAW
)) {
452 skb_queue_tail(&hdev
->raw_q
, skb
);
467 static int hci_sock_setsockopt(struct socket
*sock
, int level
, int optname
, char __user
*optval
, int len
)
469 struct hci_ufilter uf
= { .opcode
= 0 };
470 struct sock
*sk
= sock
->sk
;
471 int err
= 0, opt
= 0;
473 BT_DBG("sk %p, opt %d", sk
, optname
);
479 if (get_user(opt
, (int __user
*)optval
)) {
485 hci_pi(sk
)->cmsg_mask
|= HCI_CMSG_DIR
;
487 hci_pi(sk
)->cmsg_mask
&= ~HCI_CMSG_DIR
;
491 if (get_user(opt
, (int __user
*)optval
)) {
497 hci_pi(sk
)->cmsg_mask
|= HCI_CMSG_TSTAMP
;
499 hci_pi(sk
)->cmsg_mask
&= ~HCI_CMSG_TSTAMP
;
503 len
= min_t(unsigned int, len
, sizeof(uf
));
504 if (copy_from_user(&uf
, optval
, len
)) {
509 if (!capable(CAP_NET_RAW
)) {
510 uf
.type_mask
&= hci_sec_filter
.type_mask
;
511 uf
.event_mask
[0] &= *((u32
*) hci_sec_filter
.event_mask
+ 0);
512 uf
.event_mask
[1] &= *((u32
*) hci_sec_filter
.event_mask
+ 1);
516 struct hci_filter
*f
= &hci_pi(sk
)->filter
;
518 f
->type_mask
= uf
.type_mask
;
519 f
->opcode
= uf
.opcode
;
520 *((u32
*) f
->event_mask
+ 0) = uf
.event_mask
[0];
521 *((u32
*) f
->event_mask
+ 1) = uf
.event_mask
[1];
534 static int hci_sock_getsockopt(struct socket
*sock
, int level
, int optname
, char __user
*optval
, int __user
*optlen
)
536 struct hci_ufilter uf
;
537 struct sock
*sk
= sock
->sk
;
540 if (get_user(len
, optlen
))
545 if (hci_pi(sk
)->cmsg_mask
& HCI_CMSG_DIR
)
550 if (put_user(opt
, optval
))
555 if (hci_pi(sk
)->cmsg_mask
& HCI_CMSG_TSTAMP
)
560 if (put_user(opt
, optval
))
566 struct hci_filter
*f
= &hci_pi(sk
)->filter
;
568 uf
.type_mask
= f
->type_mask
;
569 uf
.opcode
= f
->opcode
;
570 uf
.event_mask
[0] = *((u32
*) f
->event_mask
+ 0);
571 uf
.event_mask
[1] = *((u32
*) f
->event_mask
+ 1);
574 len
= min_t(unsigned int, len
, sizeof(uf
));
575 if (copy_to_user(optval
, &uf
, len
))
587 static const struct proto_ops hci_sock_ops
= {
588 .family
= PF_BLUETOOTH
,
589 .owner
= THIS_MODULE
,
590 .release
= hci_sock_release
,
591 .bind
= hci_sock_bind
,
592 .getname
= hci_sock_getname
,
593 .sendmsg
= hci_sock_sendmsg
,
594 .recvmsg
= hci_sock_recvmsg
,
595 .ioctl
= hci_sock_ioctl
,
596 .poll
= datagram_poll
,
597 .listen
= sock_no_listen
,
598 .shutdown
= sock_no_shutdown
,
599 .setsockopt
= hci_sock_setsockopt
,
600 .getsockopt
= hci_sock_getsockopt
,
601 .connect
= sock_no_connect
,
602 .socketpair
= sock_no_socketpair
,
603 .accept
= sock_no_accept
,
607 static struct proto hci_sk_proto
= {
609 .owner
= THIS_MODULE
,
610 .obj_size
= sizeof(struct hci_pinfo
)
613 static int hci_sock_create(struct socket
*sock
, int protocol
)
617 BT_DBG("sock %p", sock
);
619 if (sock
->type
!= SOCK_RAW
)
620 return -ESOCKTNOSUPPORT
;
622 sock
->ops
= &hci_sock_ops
;
624 sk
= sk_alloc(PF_BLUETOOTH
, GFP_ATOMIC
, &hci_sk_proto
, 1);
628 sock_init_data(sock
, sk
);
630 sock_reset_flag(sk
, SOCK_ZAPPED
);
632 sk
->sk_protocol
= protocol
;
634 sock
->state
= SS_UNCONNECTED
;
635 sk
->sk_state
= BT_OPEN
;
637 bt_sock_link(&hci_sk_list
, sk
);
641 static int hci_sock_dev_event(struct notifier_block
*this, unsigned long event
, void *ptr
)
643 struct hci_dev
*hdev
= (struct hci_dev
*) ptr
;
644 struct hci_ev_si_device ev
;
646 BT_DBG("hdev %s event %ld", hdev
->name
, event
);
648 /* Send event to sockets */
650 ev
.dev_id
= hdev
->id
;
651 hci_si_event(NULL
, HCI_EV_SI_DEVICE
, sizeof(ev
), &ev
);
653 if (event
== HCI_DEV_UNREG
) {
655 struct hlist_node
*node
;
657 /* Detach sockets from device */
658 read_lock(&hci_sk_list
.lock
);
659 sk_for_each(sk
, node
, &hci_sk_list
.head
) {
661 if (hci_pi(sk
)->hdev
== hdev
) {
662 hci_pi(sk
)->hdev
= NULL
;
664 sk
->sk_state
= BT_OPEN
;
665 sk
->sk_state_change(sk
);
671 read_unlock(&hci_sk_list
.lock
);
677 static struct net_proto_family hci_sock_family_ops
= {
678 .family
= PF_BLUETOOTH
,
679 .owner
= THIS_MODULE
,
680 .create
= hci_sock_create
,
683 static struct notifier_block hci_sock_nblock
= {
684 .notifier_call
= hci_sock_dev_event
687 int __init
hci_sock_init(void)
691 err
= proto_register(&hci_sk_proto
, 0);
695 err
= bt_sock_register(BTPROTO_HCI
, &hci_sock_family_ops
);
699 hci_register_notifier(&hci_sock_nblock
);
701 BT_INFO("HCI socket layer initialized");
706 BT_ERR("HCI socket registration failed");
707 proto_unregister(&hci_sk_proto
);
711 int __exit
hci_sock_cleanup(void)
713 if (bt_sock_unregister(BTPROTO_HCI
) < 0)
714 BT_ERR("HCI socket unregistration failed");
716 hci_unregister_notifier(&hci_sock_nblock
);
718 proto_unregister(&hci_sk_proto
);