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 address family and sockets. */
27 #include <linux/module.h>
28 #include <linux/debugfs.h>
29 #include <linux/stringify.h>
30 #include <linux/sched/signal.h>
32 #include <asm/ioctls.h>
34 #include <net/bluetooth/bluetooth.h>
35 #include <linux/proc_fs.h>
40 /* Bluetooth sockets */
41 #define BT_MAX_PROTO 8
42 static const struct net_proto_family
*bt_proto
[BT_MAX_PROTO
];
43 static DEFINE_RWLOCK(bt_proto_lock
);
45 static struct lock_class_key bt_lock_key
[BT_MAX_PROTO
];
46 static const char *const bt_key_strings
[BT_MAX_PROTO
] = {
47 "sk_lock-AF_BLUETOOTH-BTPROTO_L2CAP",
48 "sk_lock-AF_BLUETOOTH-BTPROTO_HCI",
49 "sk_lock-AF_BLUETOOTH-BTPROTO_SCO",
50 "sk_lock-AF_BLUETOOTH-BTPROTO_RFCOMM",
51 "sk_lock-AF_BLUETOOTH-BTPROTO_BNEP",
52 "sk_lock-AF_BLUETOOTH-BTPROTO_CMTP",
53 "sk_lock-AF_BLUETOOTH-BTPROTO_HIDP",
54 "sk_lock-AF_BLUETOOTH-BTPROTO_AVDTP",
57 static struct lock_class_key bt_slock_key
[BT_MAX_PROTO
];
58 static const char *const bt_slock_key_strings
[BT_MAX_PROTO
] = {
59 "slock-AF_BLUETOOTH-BTPROTO_L2CAP",
60 "slock-AF_BLUETOOTH-BTPROTO_HCI",
61 "slock-AF_BLUETOOTH-BTPROTO_SCO",
62 "slock-AF_BLUETOOTH-BTPROTO_RFCOMM",
63 "slock-AF_BLUETOOTH-BTPROTO_BNEP",
64 "slock-AF_BLUETOOTH-BTPROTO_CMTP",
65 "slock-AF_BLUETOOTH-BTPROTO_HIDP",
66 "slock-AF_BLUETOOTH-BTPROTO_AVDTP",
69 void bt_sock_reclassify_lock(struct sock
*sk
, int proto
)
72 BUG_ON(!sock_allow_reclassification(sk
));
74 sock_lock_init_class_and_name(sk
,
75 bt_slock_key_strings
[proto
], &bt_slock_key
[proto
],
76 bt_key_strings
[proto
], &bt_lock_key
[proto
]);
78 EXPORT_SYMBOL(bt_sock_reclassify_lock
);
80 int bt_sock_register(int proto
, const struct net_proto_family
*ops
)
84 if (proto
< 0 || proto
>= BT_MAX_PROTO
)
87 write_lock(&bt_proto_lock
);
92 bt_proto
[proto
] = ops
;
94 write_unlock(&bt_proto_lock
);
98 EXPORT_SYMBOL(bt_sock_register
);
100 void bt_sock_unregister(int proto
)
102 if (proto
< 0 || proto
>= BT_MAX_PROTO
)
105 write_lock(&bt_proto_lock
);
106 bt_proto
[proto
] = NULL
;
107 write_unlock(&bt_proto_lock
);
109 EXPORT_SYMBOL(bt_sock_unregister
);
111 static int bt_sock_create(struct net
*net
, struct socket
*sock
, int proto
,
116 if (net
!= &init_net
)
117 return -EAFNOSUPPORT
;
119 if (proto
< 0 || proto
>= BT_MAX_PROTO
)
122 if (!bt_proto
[proto
])
123 request_module("bt-proto-%d", proto
);
125 err
= -EPROTONOSUPPORT
;
127 read_lock(&bt_proto_lock
);
129 if (bt_proto
[proto
] && try_module_get(bt_proto
[proto
]->owner
)) {
130 err
= bt_proto
[proto
]->create(net
, sock
, proto
, kern
);
132 bt_sock_reclassify_lock(sock
->sk
, proto
);
133 module_put(bt_proto
[proto
]->owner
);
136 read_unlock(&bt_proto_lock
);
141 void bt_sock_link(struct bt_sock_list
*l
, struct sock
*sk
)
143 write_lock(&l
->lock
);
144 sk_add_node(sk
, &l
->head
);
145 write_unlock(&l
->lock
);
147 EXPORT_SYMBOL(bt_sock_link
);
149 void bt_sock_unlink(struct bt_sock_list
*l
, struct sock
*sk
)
151 write_lock(&l
->lock
);
152 sk_del_node_init(sk
);
153 write_unlock(&l
->lock
);
155 EXPORT_SYMBOL(bt_sock_unlink
);
157 void bt_accept_enqueue(struct sock
*parent
, struct sock
*sk
, bool bh
)
159 BT_DBG("parent %p, sk %p", parent
, sk
);
164 bh_lock_sock_nested(sk
);
166 lock_sock_nested(sk
, SINGLE_DEPTH_NESTING
);
168 list_add_tail(&bt_sk(sk
)->accept_q
, &bt_sk(parent
)->accept_q
);
169 bt_sk(sk
)->parent
= parent
;
176 parent
->sk_ack_backlog
++;
178 EXPORT_SYMBOL(bt_accept_enqueue
);
180 /* Calling function must hold the sk lock.
181 * bt_sk(sk)->parent must be non-NULL meaning sk is in the parent list.
183 void bt_accept_unlink(struct sock
*sk
)
185 BT_DBG("sk %p state %d", sk
, sk
->sk_state
);
187 list_del_init(&bt_sk(sk
)->accept_q
);
188 bt_sk(sk
)->parent
->sk_ack_backlog
--;
189 bt_sk(sk
)->parent
= NULL
;
192 EXPORT_SYMBOL(bt_accept_unlink
);
194 struct sock
*bt_accept_dequeue(struct sock
*parent
, struct socket
*newsock
)
196 struct bt_sock
*s
, *n
;
199 BT_DBG("parent %p", parent
);
202 list_for_each_entry_safe(s
, n
, &bt_sk(parent
)->accept_q
, accept_q
) {
203 sk
= (struct sock
*)s
;
205 /* Prevent early freeing of sk due to unlink and sock_kill */
209 /* Check sk has not already been unlinked via
210 * bt_accept_unlink() due to serialisation caused by sk locking
212 if (!bt_sk(sk
)->parent
) {
213 BT_DBG("sk %p, already unlinked", sk
);
217 /* Restart the loop as sk is no longer in the list
218 * and also avoid a potential infinite loop because
219 * list_for_each_entry_safe() is not thread safe.
224 /* sk is safely in the parent list so reduce reference count */
227 /* FIXME: Is this check still needed */
228 if (sk
->sk_state
== BT_CLOSED
) {
229 bt_accept_unlink(sk
);
234 if (sk
->sk_state
== BT_CONNECTED
|| !newsock
||
235 test_bit(BT_SK_DEFER_SETUP
, &bt_sk(parent
)->flags
)) {
236 bt_accept_unlink(sk
);
238 sock_graft(sk
, newsock
);
249 EXPORT_SYMBOL(bt_accept_dequeue
);
251 int bt_sock_recvmsg(struct socket
*sock
, struct msghdr
*msg
, size_t len
,
254 int noblock
= flags
& MSG_DONTWAIT
;
255 struct sock
*sk
= sock
->sk
;
261 BT_DBG("sock %p sk %p len %zu", sock
, sk
, len
);
266 skb
= skb_recv_datagram(sk
, flags
, noblock
, &err
);
268 if (sk
->sk_shutdown
& RCV_SHUTDOWN
)
277 msg
->msg_flags
|= MSG_TRUNC
;
281 skb_reset_transport_header(skb
);
282 err
= skb_copy_datagram_msg(skb
, 0, msg
, copied
);
284 sock_recv_ts_and_drops(msg
, sk
, skb
);
286 if (msg
->msg_name
&& bt_sk(sk
)->skb_msg_name
)
287 bt_sk(sk
)->skb_msg_name(skb
, msg
->msg_name
,
291 skb_free_datagram(sk
, skb
);
293 if (flags
& MSG_TRUNC
)
296 return err
? : copied
;
298 EXPORT_SYMBOL(bt_sock_recvmsg
);
300 static long bt_sock_data_wait(struct sock
*sk
, long timeo
)
302 DECLARE_WAITQUEUE(wait
, current
);
304 add_wait_queue(sk_sleep(sk
), &wait
);
306 set_current_state(TASK_INTERRUPTIBLE
);
308 if (!skb_queue_empty(&sk
->sk_receive_queue
))
311 if (sk
->sk_err
|| (sk
->sk_shutdown
& RCV_SHUTDOWN
))
314 if (signal_pending(current
) || !timeo
)
317 sk_set_bit(SOCKWQ_ASYNC_WAITDATA
, sk
);
319 timeo
= schedule_timeout(timeo
);
321 sk_clear_bit(SOCKWQ_ASYNC_WAITDATA
, sk
);
324 __set_current_state(TASK_RUNNING
);
325 remove_wait_queue(sk_sleep(sk
), &wait
);
329 int bt_sock_stream_recvmsg(struct socket
*sock
, struct msghdr
*msg
,
330 size_t size
, int flags
)
332 struct sock
*sk
= sock
->sk
;
334 size_t target
, copied
= 0;
340 BT_DBG("sk %p size %zu", sk
, size
);
344 target
= sock_rcvlowat(sk
, flags
& MSG_WAITALL
, size
);
345 timeo
= sock_rcvtimeo(sk
, flags
& MSG_DONTWAIT
);
351 skb
= skb_dequeue(&sk
->sk_receive_queue
);
353 if (copied
>= target
)
356 err
= sock_error(sk
);
359 if (sk
->sk_shutdown
& RCV_SHUTDOWN
)
366 timeo
= bt_sock_data_wait(sk
, timeo
);
368 if (signal_pending(current
)) {
369 err
= sock_intr_errno(timeo
);
375 chunk
= min_t(unsigned int, skb
->len
, size
);
376 if (skb_copy_datagram_msg(skb
, 0, msg
, chunk
)) {
377 skb_queue_head(&sk
->sk_receive_queue
, skb
);
385 sock_recv_ts_and_drops(msg
, sk
, skb
);
387 if (!(flags
& MSG_PEEK
)) {
388 int skb_len
= skb_headlen(skb
);
390 if (chunk
<= skb_len
) {
391 __skb_pull(skb
, chunk
);
393 struct sk_buff
*frag
;
395 __skb_pull(skb
, skb_len
);
398 skb_walk_frags(skb
, frag
) {
399 if (chunk
<= frag
->len
) {
400 /* Pulling partial data */
402 skb
->data_len
-= chunk
;
403 __skb_pull(frag
, chunk
);
405 } else if (frag
->len
) {
406 /* Pulling all frag data */
408 skb
->len
-= frag
->len
;
409 skb
->data_len
-= frag
->len
;
410 __skb_pull(frag
, frag
->len
);
416 skb_queue_head(&sk
->sk_receive_queue
, skb
);
422 /* put message back and return */
423 skb_queue_head(&sk
->sk_receive_queue
, skb
);
430 return copied
? : err
;
432 EXPORT_SYMBOL(bt_sock_stream_recvmsg
);
434 static inline unsigned int bt_accept_poll(struct sock
*parent
)
436 struct bt_sock
*s
, *n
;
439 list_for_each_entry_safe(s
, n
, &bt_sk(parent
)->accept_q
, accept_q
) {
440 sk
= (struct sock
*)s
;
441 if (sk
->sk_state
== BT_CONNECTED
||
442 (test_bit(BT_SK_DEFER_SETUP
, &bt_sk(parent
)->flags
) &&
443 sk
->sk_state
== BT_CONNECT2
))
444 return POLLIN
| POLLRDNORM
;
450 unsigned int bt_sock_poll(struct file
*file
, struct socket
*sock
,
453 struct sock
*sk
= sock
->sk
;
454 unsigned int mask
= 0;
456 BT_DBG("sock %p, sk %p", sock
, sk
);
458 poll_wait(file
, sk_sleep(sk
), wait
);
460 if (sk
->sk_state
== BT_LISTEN
)
461 return bt_accept_poll(sk
);
463 if (sk
->sk_err
|| !skb_queue_empty(&sk
->sk_error_queue
))
465 (sock_flag(sk
, SOCK_SELECT_ERR_QUEUE
) ? POLLPRI
: 0);
467 if (sk
->sk_shutdown
& RCV_SHUTDOWN
)
468 mask
|= POLLRDHUP
| POLLIN
| POLLRDNORM
;
470 if (sk
->sk_shutdown
== SHUTDOWN_MASK
)
473 if (!skb_queue_empty(&sk
->sk_receive_queue
))
474 mask
|= POLLIN
| POLLRDNORM
;
476 if (sk
->sk_state
== BT_CLOSED
)
479 if (sk
->sk_state
== BT_CONNECT
||
480 sk
->sk_state
== BT_CONNECT2
||
481 sk
->sk_state
== BT_CONFIG
)
484 if (!test_bit(BT_SK_SUSPEND
, &bt_sk(sk
)->flags
) && sock_writeable(sk
))
485 mask
|= POLLOUT
| POLLWRNORM
| POLLWRBAND
;
487 sk_set_bit(SOCKWQ_ASYNC_NOSPACE
, sk
);
491 EXPORT_SYMBOL(bt_sock_poll
);
493 int bt_sock_ioctl(struct socket
*sock
, unsigned int cmd
, unsigned long arg
)
495 struct sock
*sk
= sock
->sk
;
500 BT_DBG("sk %p cmd %x arg %lx", sk
, cmd
, arg
);
504 if (sk
->sk_state
== BT_LISTEN
)
507 amount
= sk
->sk_sndbuf
- sk_wmem_alloc_get(sk
);
510 err
= put_user(amount
, (int __user
*) arg
);
514 if (sk
->sk_state
== BT_LISTEN
)
518 skb
= skb_peek(&sk
->sk_receive_queue
);
519 amount
= skb
? skb
->len
: 0;
521 err
= put_user(amount
, (int __user
*) arg
);
525 err
= sock_get_timestamp(sk
, (struct timeval __user
*) arg
);
529 err
= sock_get_timestampns(sk
, (struct timespec __user
*) arg
);
539 EXPORT_SYMBOL(bt_sock_ioctl
);
541 /* This function expects the sk lock to be held when called */
542 int bt_sock_wait_state(struct sock
*sk
, int state
, unsigned long timeo
)
544 DECLARE_WAITQUEUE(wait
, current
);
549 add_wait_queue(sk_sleep(sk
), &wait
);
550 set_current_state(TASK_INTERRUPTIBLE
);
551 while (sk
->sk_state
!= state
) {
557 if (signal_pending(current
)) {
558 err
= sock_intr_errno(timeo
);
563 timeo
= schedule_timeout(timeo
);
565 set_current_state(TASK_INTERRUPTIBLE
);
567 err
= sock_error(sk
);
571 __set_current_state(TASK_RUNNING
);
572 remove_wait_queue(sk_sleep(sk
), &wait
);
575 EXPORT_SYMBOL(bt_sock_wait_state
);
577 /* This function expects the sk lock to be held when called */
578 int bt_sock_wait_ready(struct sock
*sk
, unsigned long flags
)
580 DECLARE_WAITQUEUE(wait
, current
);
586 timeo
= sock_sndtimeo(sk
, flags
& O_NONBLOCK
);
588 add_wait_queue(sk_sleep(sk
), &wait
);
589 set_current_state(TASK_INTERRUPTIBLE
);
590 while (test_bit(BT_SK_SUSPEND
, &bt_sk(sk
)->flags
)) {
596 if (signal_pending(current
)) {
597 err
= sock_intr_errno(timeo
);
602 timeo
= schedule_timeout(timeo
);
604 set_current_state(TASK_INTERRUPTIBLE
);
606 err
= sock_error(sk
);
610 __set_current_state(TASK_RUNNING
);
611 remove_wait_queue(sk_sleep(sk
), &wait
);
615 EXPORT_SYMBOL(bt_sock_wait_ready
);
617 #ifdef CONFIG_PROC_FS
618 struct bt_seq_state
{
619 struct bt_sock_list
*l
;
622 static void *bt_seq_start(struct seq_file
*seq
, loff_t
*pos
)
623 __acquires(seq
->private->l
->lock
)
625 struct bt_seq_state
*s
= seq
->private;
626 struct bt_sock_list
*l
= s
->l
;
629 return seq_hlist_start_head(&l
->head
, *pos
);
632 static void *bt_seq_next(struct seq_file
*seq
, void *v
, loff_t
*pos
)
634 struct bt_seq_state
*s
= seq
->private;
635 struct bt_sock_list
*l
= s
->l
;
637 return seq_hlist_next(v
, &l
->head
, pos
);
640 static void bt_seq_stop(struct seq_file
*seq
, void *v
)
641 __releases(seq
->private->l
->lock
)
643 struct bt_seq_state
*s
= seq
->private;
644 struct bt_sock_list
*l
= s
->l
;
646 read_unlock(&l
->lock
);
649 static int bt_seq_show(struct seq_file
*seq
, void *v
)
651 struct bt_seq_state
*s
= seq
->private;
652 struct bt_sock_list
*l
= s
->l
;
654 if (v
== SEQ_START_TOKEN
) {
655 seq_puts(seq
,"sk RefCnt Rmem Wmem User Inode Parent");
657 if (l
->custom_seq_show
) {
659 l
->custom_seq_show(seq
, v
);
664 struct sock
*sk
= sk_entry(v
);
665 struct bt_sock
*bt
= bt_sk(sk
);
668 "%pK %-6d %-6u %-6u %-6u %-6lu %-6lu",
670 refcount_read(&sk
->sk_refcnt
),
671 sk_rmem_alloc_get(sk
),
672 sk_wmem_alloc_get(sk
),
673 from_kuid(seq_user_ns(seq
), sock_i_uid(sk
)),
675 bt
->parent
? sock_i_ino(bt
->parent
): 0LU);
677 if (l
->custom_seq_show
) {
679 l
->custom_seq_show(seq
, v
);
687 static const struct seq_operations bt_seq_ops
= {
688 .start
= bt_seq_start
,
694 static int bt_seq_open(struct inode
*inode
, struct file
*file
)
696 struct bt_sock_list
*sk_list
;
697 struct bt_seq_state
*s
;
699 sk_list
= PDE_DATA(inode
);
700 s
= __seq_open_private(file
, &bt_seq_ops
,
701 sizeof(struct bt_seq_state
));
709 static const struct file_operations bt_fops
= {
713 .release
= seq_release_private
716 int bt_procfs_init(struct net
*net
, const char *name
,
717 struct bt_sock_list
*sk_list
,
718 int (* seq_show
)(struct seq_file
*, void *))
720 sk_list
->custom_seq_show
= seq_show
;
722 if (!proc_create_data(name
, 0, net
->proc_net
, &bt_fops
, sk_list
))
727 void bt_procfs_cleanup(struct net
*net
, const char *name
)
729 remove_proc_entry(name
, net
->proc_net
);
732 int bt_procfs_init(struct net
*net
, const char *name
,
733 struct bt_sock_list
*sk_list
,
734 int (* seq_show
)(struct seq_file
*, void *))
739 void bt_procfs_cleanup(struct net
*net
, const char *name
)
743 EXPORT_SYMBOL(bt_procfs_init
);
744 EXPORT_SYMBOL(bt_procfs_cleanup
);
746 static const struct net_proto_family bt_sock_family_ops
= {
747 .owner
= THIS_MODULE
,
748 .family
= PF_BLUETOOTH
,
749 .create
= bt_sock_create
,
752 struct dentry
*bt_debugfs
;
753 EXPORT_SYMBOL_GPL(bt_debugfs
);
755 #define VERSION __stringify(BT_SUBSYS_VERSION) "." \
756 __stringify(BT_SUBSYS_REVISION)
758 static int __init
bt_init(void)
762 sock_skb_cb_check_size(sizeof(struct bt_skb_cb
));
764 BT_INFO("Core ver %s", VERSION
);
770 bt_debugfs
= debugfs_create_dir("bluetooth", NULL
);
774 err
= bt_sysfs_init();
778 err
= sock_register(&bt_sock_family_ops
);
784 BT_INFO("HCI device and connection manager initialized");
786 err
= hci_sock_init();
813 sock_unregister(PF_BLUETOOTH
);
819 static void __exit
bt_exit(void)
829 sock_unregister(PF_BLUETOOTH
);
835 debugfs_remove_recursive(bt_debugfs
);
838 subsys_initcall(bt_init
);
839 module_exit(bt_exit
);
841 MODULE_AUTHOR("Marcel Holtmann <marcel@holtmann.org>");
842 MODULE_DESCRIPTION("Bluetooth Core ver " VERSION
);
843 MODULE_VERSION(VERSION
);
844 MODULE_LICENSE("GPL");
845 MODULE_ALIAS_NETPROTO(PF_BLUETOOTH
);