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/config.h>
28 #include <linux/module.h>
30 #include <linux/types.h>
31 #include <linux/capability.h>
32 #include <linux/errno.h>
33 #include <linux/kernel.h>
34 #include <linux/sched.h>
35 #include <linux/slab.h>
36 #include <linux/poll.h>
37 #include <linux/fcntl.h>
38 #include <linux/init.h>
39 #include <linux/skbuff.h>
40 #include <linux/workqueue.h>
41 #include <linux/interrupt.h>
42 #include <linux/socket.h>
43 #include <linux/ioctl.h>
46 #include <asm/system.h>
47 #include <asm/uaccess.h>
48 #include <asm/unaligned.h>
50 #include <net/bluetooth/bluetooth.h>
51 #include <net/bluetooth/hci_core.h>
53 #ifndef CONFIG_BT_HCI_SOCK_DEBUG
58 /* ----- HCI socket interface ----- */
60 static inline int hci_test_bit(int nr
, void *addr
)
62 return *((__u32
*) addr
+ (nr
>> 5)) & ((__u32
) 1 << (nr
& 31));
66 static struct hci_sec_filter hci_sec_filter
= {
70 { 0x1000d9fe, 0x0000b00c },
75 { 0xbe000006, 0x00000001, 0x000000, 0x00 },
77 { 0x00005200, 0x00000000, 0x000000, 0x00 },
79 { 0xaab00200, 0x2b402aaa, 0x020154, 0x00 },
81 { 0x000002be, 0x00000000, 0x000000, 0x00 },
82 /* OGF_STATUS_PARAM */
83 { 0x000000ea, 0x00000000, 0x000000, 0x00 }
87 static struct bt_sock_list hci_sk_list
= {
88 .lock
= RW_LOCK_UNLOCKED
91 /* Send frame to RAW socket */
92 void hci_send_to_sock(struct hci_dev
*hdev
, struct sk_buff
*skb
)
95 struct hlist_node
*node
;
97 BT_DBG("hdev %p len %d", hdev
, skb
->len
);
99 read_lock(&hci_sk_list
.lock
);
100 sk_for_each(sk
, node
, &hci_sk_list
.head
) {
101 struct hci_filter
*flt
;
102 struct sk_buff
*nskb
;
104 if (sk
->sk_state
!= BT_BOUND
|| hci_pi(sk
)->hdev
!= hdev
)
107 /* Don't send frame to the socket it came from */
112 flt
= &hci_pi(sk
)->filter
;
114 if (!test_bit((bt_cb(skb
)->pkt_type
== HCI_VENDOR_PKT
) ?
115 0 : (bt_cb(skb
)->pkt_type
& HCI_FLT_TYPE_BITS
), &flt
->type_mask
))
118 if (bt_cb(skb
)->pkt_type
== HCI_EVENT_PKT
) {
119 register int evt
= (*(__u8
*)skb
->data
& HCI_FLT_EVENT_BITS
);
121 if (!hci_test_bit(evt
, &flt
->event_mask
))
125 ((evt
== HCI_EV_CMD_COMPLETE
&&
127 get_unaligned((__u16
*)(skb
->data
+ 3))) ||
128 (evt
== HCI_EV_CMD_STATUS
&&
130 get_unaligned((__u16
*)(skb
->data
+ 4)))))
134 if (!(nskb
= skb_clone(skb
, GFP_ATOMIC
)))
137 /* Put type byte before the data */
138 memcpy(skb_push(nskb
, 1), &bt_cb(nskb
)->pkt_type
, 1);
140 if (sock_queue_rcv_skb(sk
, nskb
))
143 read_unlock(&hci_sk_list
.lock
);
146 static int hci_sock_release(struct socket
*sock
)
148 struct sock
*sk
= sock
->sk
;
149 struct hci_dev
*hdev
;
151 BT_DBG("sock %p sk %p", sock
, sk
);
156 hdev
= hci_pi(sk
)->hdev
;
158 bt_sock_unlink(&hci_sk_list
, sk
);
161 atomic_dec(&hdev
->promisc
);
167 skb_queue_purge(&sk
->sk_receive_queue
);
168 skb_queue_purge(&sk
->sk_write_queue
);
174 /* Ioctls that require bound socket */
175 static inline int hci_sock_bound_ioctl(struct sock
*sk
, unsigned int cmd
, unsigned long arg
)
177 struct hci_dev
*hdev
= hci_pi(sk
)->hdev
;
184 if (!capable(CAP_NET_ADMIN
))
187 if (test_bit(HCI_QUIRK_RAW_DEVICE
, &hdev
->quirks
))
191 set_bit(HCI_RAW
, &hdev
->flags
);
193 clear_bit(HCI_RAW
, &hdev
->flags
);
198 if (!capable(CAP_NET_ADMIN
))
202 set_bit(HCI_SECMGR
, &hdev
->flags
);
204 clear_bit(HCI_SECMGR
, &hdev
->flags
);
209 return hci_get_conn_info(hdev
, (void __user
*)arg
);
213 return hdev
->ioctl(hdev
, cmd
, arg
);
218 static int hci_sock_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
220 struct sock
*sk
= sock
->sk
;
221 void __user
*argp
= (void __user
*)arg
;
224 BT_DBG("cmd %x arg %lx", cmd
, arg
);
228 return hci_get_dev_list(argp
);
231 return hci_get_dev_info(argp
);
234 return hci_get_conn_list(argp
);
237 if (!capable(CAP_NET_ADMIN
))
239 return hci_dev_open(arg
);
242 if (!capable(CAP_NET_ADMIN
))
244 return hci_dev_close(arg
);
247 if (!capable(CAP_NET_ADMIN
))
249 return hci_dev_reset(arg
);
252 if (!capable(CAP_NET_ADMIN
))
254 return hci_dev_reset_stat(arg
);
264 if (!capable(CAP_NET_ADMIN
))
266 return hci_dev_cmd(cmd
, argp
);
269 return hci_inquiry(argp
);
273 err
= hci_sock_bound_ioctl(sk
, cmd
, arg
);
279 static int hci_sock_bind(struct socket
*sock
, struct sockaddr
*addr
, int addr_len
)
281 struct sockaddr_hci
*haddr
= (struct sockaddr_hci
*) addr
;
282 struct sock
*sk
= sock
->sk
;
283 struct hci_dev
*hdev
= NULL
;
286 BT_DBG("sock %p sk %p", sock
, sk
);
288 if (!haddr
|| haddr
->hci_family
!= AF_BLUETOOTH
)
293 if (hci_pi(sk
)->hdev
) {
298 if (haddr
->hci_dev
!= HCI_DEV_NONE
) {
299 if (!(hdev
= hci_dev_get(haddr
->hci_dev
))) {
304 atomic_inc(&hdev
->promisc
);
307 hci_pi(sk
)->hdev
= hdev
;
308 sk
->sk_state
= BT_BOUND
;
315 static int hci_sock_getname(struct socket
*sock
, struct sockaddr
*addr
, int *addr_len
, int peer
)
317 struct sockaddr_hci
*haddr
= (struct sockaddr_hci
*) addr
;
318 struct sock
*sk
= sock
->sk
;
319 struct hci_dev
*hdev
= hci_pi(sk
)->hdev
;
321 BT_DBG("sock %p sk %p", sock
, sk
);
328 *addr_len
= sizeof(*haddr
);
329 haddr
->hci_family
= AF_BLUETOOTH
;
330 haddr
->hci_dev
= hdev
->id
;
336 static inline void hci_sock_cmsg(struct sock
*sk
, struct msghdr
*msg
, struct sk_buff
*skb
)
338 __u32 mask
= hci_pi(sk
)->cmsg_mask
;
340 if (mask
& HCI_CMSG_DIR
) {
341 int incoming
= bt_cb(skb
)->incoming
;
342 put_cmsg(msg
, SOL_HCI
, HCI_CMSG_DIR
, sizeof(incoming
), &incoming
);
345 if (mask
& HCI_CMSG_TSTAMP
) {
348 skb_get_timestamp(skb
, &tv
);
349 put_cmsg(msg
, SOL_HCI
, HCI_CMSG_TSTAMP
, sizeof(tv
), &tv
);
353 static int hci_sock_recvmsg(struct kiocb
*iocb
, struct socket
*sock
,
354 struct msghdr
*msg
, size_t len
, int flags
)
356 int noblock
= flags
& MSG_DONTWAIT
;
357 struct sock
*sk
= sock
->sk
;
361 BT_DBG("sock %p, sk %p", sock
, sk
);
363 if (flags
& (MSG_OOB
))
366 if (sk
->sk_state
== BT_CLOSED
)
369 if (!(skb
= skb_recv_datagram(sk
, flags
, noblock
, &err
)))
372 msg
->msg_namelen
= 0;
376 msg
->msg_flags
|= MSG_TRUNC
;
380 skb
->h
.raw
= skb
->data
;
381 err
= skb_copy_datagram_iovec(skb
, 0, msg
->msg_iov
, copied
);
383 hci_sock_cmsg(sk
, msg
, skb
);
385 skb_free_datagram(sk
, skb
);
387 return err
? : copied
;
390 static int hci_sock_sendmsg(struct kiocb
*iocb
, struct socket
*sock
,
391 struct msghdr
*msg
, size_t len
)
393 struct sock
*sk
= sock
->sk
;
394 struct hci_dev
*hdev
;
398 BT_DBG("sock %p sk %p", sock
, sk
);
400 if (msg
->msg_flags
& MSG_OOB
)
403 if (msg
->msg_flags
& ~(MSG_DONTWAIT
|MSG_NOSIGNAL
|MSG_ERRQUEUE
))
406 if (len
< 4 || len
> HCI_MAX_FRAME_SIZE
)
411 if (!(hdev
= hci_pi(sk
)->hdev
)) {
416 if (!(skb
= bt_skb_send_alloc(sk
, len
, msg
->msg_flags
& MSG_DONTWAIT
, &err
)))
419 if (memcpy_fromiovec(skb_put(skb
, len
), msg
->msg_iov
, len
)) {
424 bt_cb(skb
)->pkt_type
= *((unsigned char *) skb
->data
);
426 skb
->dev
= (void *) hdev
;
428 if (bt_cb(skb
)->pkt_type
== HCI_COMMAND_PKT
) {
429 u16 opcode
= __le16_to_cpu(get_unaligned((__le16
*) skb
->data
));
430 u16 ogf
= hci_opcode_ogf(opcode
);
431 u16 ocf
= hci_opcode_ocf(opcode
);
433 if (((ogf
> HCI_SFLT_MAX_OGF
) ||
434 !hci_test_bit(ocf
& HCI_FLT_OCF_BITS
, &hci_sec_filter
.ocf_mask
[ogf
])) &&
435 !capable(CAP_NET_RAW
)) {
440 if (test_bit(HCI_RAW
, &hdev
->flags
) || (ogf
== OGF_VENDOR_CMD
)) {
441 skb_queue_tail(&hdev
->raw_q
, skb
);
444 skb_queue_tail(&hdev
->cmd_q
, skb
);
448 if (!capable(CAP_NET_RAW
)) {
453 skb_queue_tail(&hdev
->raw_q
, skb
);
468 static int hci_sock_setsockopt(struct socket
*sock
, int level
, int optname
, char __user
*optval
, int len
)
470 struct hci_ufilter uf
= { .opcode
= 0 };
471 struct sock
*sk
= sock
->sk
;
472 int err
= 0, opt
= 0;
474 BT_DBG("sk %p, opt %d", sk
, optname
);
480 if (get_user(opt
, (int __user
*)optval
)) {
486 hci_pi(sk
)->cmsg_mask
|= HCI_CMSG_DIR
;
488 hci_pi(sk
)->cmsg_mask
&= ~HCI_CMSG_DIR
;
492 if (get_user(opt
, (int __user
*)optval
)) {
498 hci_pi(sk
)->cmsg_mask
|= HCI_CMSG_TSTAMP
;
500 hci_pi(sk
)->cmsg_mask
&= ~HCI_CMSG_TSTAMP
;
504 len
= min_t(unsigned int, len
, sizeof(uf
));
505 if (copy_from_user(&uf
, optval
, len
)) {
510 if (!capable(CAP_NET_RAW
)) {
511 uf
.type_mask
&= hci_sec_filter
.type_mask
;
512 uf
.event_mask
[0] &= *((u32
*) hci_sec_filter
.event_mask
+ 0);
513 uf
.event_mask
[1] &= *((u32
*) hci_sec_filter
.event_mask
+ 1);
517 struct hci_filter
*f
= &hci_pi(sk
)->filter
;
519 f
->type_mask
= uf
.type_mask
;
520 f
->opcode
= uf
.opcode
;
521 *((u32
*) f
->event_mask
+ 0) = uf
.event_mask
[0];
522 *((u32
*) f
->event_mask
+ 1) = uf
.event_mask
[1];
535 static int hci_sock_getsockopt(struct socket
*sock
, int level
, int optname
, char __user
*optval
, int __user
*optlen
)
537 struct hci_ufilter uf
;
538 struct sock
*sk
= sock
->sk
;
541 if (get_user(len
, optlen
))
546 if (hci_pi(sk
)->cmsg_mask
& HCI_CMSG_DIR
)
551 if (put_user(opt
, optval
))
556 if (hci_pi(sk
)->cmsg_mask
& HCI_CMSG_TSTAMP
)
561 if (put_user(opt
, optval
))
567 struct hci_filter
*f
= &hci_pi(sk
)->filter
;
569 uf
.type_mask
= f
->type_mask
;
570 uf
.opcode
= f
->opcode
;
571 uf
.event_mask
[0] = *((u32
*) f
->event_mask
+ 0);
572 uf
.event_mask
[1] = *((u32
*) f
->event_mask
+ 1);
575 len
= min_t(unsigned int, len
, sizeof(uf
));
576 if (copy_to_user(optval
, &uf
, len
))
588 static const struct proto_ops hci_sock_ops
= {
589 .family
= PF_BLUETOOTH
,
590 .owner
= THIS_MODULE
,
591 .release
= hci_sock_release
,
592 .bind
= hci_sock_bind
,
593 .getname
= hci_sock_getname
,
594 .sendmsg
= hci_sock_sendmsg
,
595 .recvmsg
= hci_sock_recvmsg
,
596 .ioctl
= hci_sock_ioctl
,
597 .poll
= datagram_poll
,
598 .listen
= sock_no_listen
,
599 .shutdown
= sock_no_shutdown
,
600 .setsockopt
= hci_sock_setsockopt
,
601 .getsockopt
= hci_sock_getsockopt
,
602 .connect
= sock_no_connect
,
603 .socketpair
= sock_no_socketpair
,
604 .accept
= sock_no_accept
,
608 static struct proto hci_sk_proto
= {
610 .owner
= THIS_MODULE
,
611 .obj_size
= sizeof(struct hci_pinfo
)
614 static int hci_sock_create(struct socket
*sock
, int protocol
)
618 BT_DBG("sock %p", sock
);
620 if (sock
->type
!= SOCK_RAW
)
621 return -ESOCKTNOSUPPORT
;
623 sock
->ops
= &hci_sock_ops
;
625 sk
= sk_alloc(PF_BLUETOOTH
, GFP_ATOMIC
, &hci_sk_proto
, 1);
629 sock_init_data(sock
, sk
);
631 sock_reset_flag(sk
, SOCK_ZAPPED
);
633 sk
->sk_protocol
= protocol
;
635 sock
->state
= SS_UNCONNECTED
;
636 sk
->sk_state
= BT_OPEN
;
638 bt_sock_link(&hci_sk_list
, sk
);
642 static int hci_sock_dev_event(struct notifier_block
*this, unsigned long event
, void *ptr
)
644 struct hci_dev
*hdev
= (struct hci_dev
*) ptr
;
645 struct hci_ev_si_device ev
;
647 BT_DBG("hdev %s event %ld", hdev
->name
, event
);
649 /* Send event to sockets */
651 ev
.dev_id
= hdev
->id
;
652 hci_si_event(NULL
, HCI_EV_SI_DEVICE
, sizeof(ev
), &ev
);
654 if (event
== HCI_DEV_UNREG
) {
656 struct hlist_node
*node
;
658 /* Detach sockets from device */
659 read_lock(&hci_sk_list
.lock
);
660 sk_for_each(sk
, node
, &hci_sk_list
.head
) {
662 if (hci_pi(sk
)->hdev
== hdev
) {
663 hci_pi(sk
)->hdev
= NULL
;
665 sk
->sk_state
= BT_OPEN
;
666 sk
->sk_state_change(sk
);
672 read_unlock(&hci_sk_list
.lock
);
678 static struct net_proto_family hci_sock_family_ops
= {
679 .family
= PF_BLUETOOTH
,
680 .owner
= THIS_MODULE
,
681 .create
= hci_sock_create
,
684 static struct notifier_block hci_sock_nblock
= {
685 .notifier_call
= hci_sock_dev_event
688 int __init
hci_sock_init(void)
692 err
= proto_register(&hci_sk_proto
, 0);
696 err
= bt_sock_register(BTPROTO_HCI
, &hci_sock_family_ops
);
700 hci_register_notifier(&hci_sock_nblock
);
702 BT_INFO("HCI socket layer initialized");
707 BT_ERR("HCI socket registration failed");
708 proto_unregister(&hci_sk_proto
);
712 int __exit
hci_sock_cleanup(void)
714 if (bt_sock_unregister(BTPROTO_HCI
) < 0)
715 BT_ERR("HCI socket unregistration failed");
717 hci_unregister_notifier(&hci_sock_nblock
);
719 proto_unregister(&hci_sk_proto
);