af_bluetooth.c 12.0 KB
Newer Older
1
/*
L
Linus Torvalds 已提交
2 3 4 5 6 7 8 9 10 11 12 13 14
   BlueZ - Bluetooth protocol stack for Linux
   Copyright (C) 2000-2001 Qualcomm Incorporated

   Written 2000,2001 by Maxim Krasnyansky <maxk@qualcomm.com>

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License version 2 as
   published by the Free Software Foundation;

   THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
   OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
   FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT OF THIRD PARTY RIGHTS.
   IN NO EVENT SHALL THE COPYRIGHT HOLDER(S) AND AUTHOR(S) BE LIABLE FOR ANY
15 16 17
   CLAIM, OR ANY SPECIAL INDIRECT OR CONSEQUENTIAL DAMAGES, OR ANY DAMAGES
   WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
   ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
L
Linus Torvalds 已提交
18 19
   OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.

20 21
   ALL LIABILITY, INCLUDING LIABILITY FOR INFRINGEMENT OF ANY PATENTS,
   COPYRIGHTS, TRADEMARKS OR OTHER RIGHTS, RELATING TO USE OF THIS
L
Linus Torvalds 已提交
22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37
   SOFTWARE IS DISCLAIMED.
*/

/* Bluetooth address family and sockets. */

#include <linux/module.h>

#include <linux/types.h>
#include <linux/list.h>
#include <linux/errno.h>
#include <linux/kernel.h>
#include <linux/sched.h>
#include <linux/skbuff.h>
#include <linux/init.h>
#include <linux/poll.h>
#include <net/sock.h>
38
#include <asm/ioctls.h>
L
Linus Torvalds 已提交
39 40 41 42
#include <linux/kmod.h>

#include <net/bluetooth/bluetooth.h>

43
#define VERSION "2.15"
L
Linus Torvalds 已提交
44 45 46

/* Bluetooth sockets */
#define BT_MAX_PROTO	8
47
static const struct net_proto_family *bt_proto[BT_MAX_PROTO];
48
static DEFINE_RWLOCK(bt_proto_lock);
49 50

static struct lock_class_key bt_lock_key[BT_MAX_PROTO];
51
static const char *const bt_key_strings[BT_MAX_PROTO] = {
52 53 54 55 56 57 58 59 60 61
	"sk_lock-AF_BLUETOOTH-BTPROTO_L2CAP",
	"sk_lock-AF_BLUETOOTH-BTPROTO_HCI",
	"sk_lock-AF_BLUETOOTH-BTPROTO_SCO",
	"sk_lock-AF_BLUETOOTH-BTPROTO_RFCOMM",
	"sk_lock-AF_BLUETOOTH-BTPROTO_BNEP",
	"sk_lock-AF_BLUETOOTH-BTPROTO_CMTP",
	"sk_lock-AF_BLUETOOTH-BTPROTO_HIDP",
	"sk_lock-AF_BLUETOOTH-BTPROTO_AVDTP",
};

62
static struct lock_class_key bt_slock_key[BT_MAX_PROTO];
63
static const char *const bt_slock_key_strings[BT_MAX_PROTO] = {
64 65 66 67 68 69 70 71 72
	"slock-AF_BLUETOOTH-BTPROTO_L2CAP",
	"slock-AF_BLUETOOTH-BTPROTO_HCI",
	"slock-AF_BLUETOOTH-BTPROTO_SCO",
	"slock-AF_BLUETOOTH-BTPROTO_RFCOMM",
	"slock-AF_BLUETOOTH-BTPROTO_BNEP",
	"slock-AF_BLUETOOTH-BTPROTO_CMTP",
	"slock-AF_BLUETOOTH-BTPROTO_HIDP",
	"slock-AF_BLUETOOTH-BTPROTO_AVDTP",
};
73 74 75 76 77 78 79 80 81 82 83 84 85 86

static inline void bt_sock_reclassify_lock(struct socket *sock, int proto)
{
	struct sock *sk = sock->sk;

	if (!sk)
		return;

	BUG_ON(sock_owned_by_user(sk));

	sock_lock_init_class_and_name(sk,
			bt_slock_key_strings[proto], &bt_slock_key[proto],
				bt_key_strings[proto], &bt_lock_key[proto]);
}
L
Linus Torvalds 已提交
87

88
int bt_sock_register(int proto, const struct net_proto_family *ops)
L
Linus Torvalds 已提交
89
{
90 91
	int err = 0;

L
Linus Torvalds 已提交
92 93 94
	if (proto < 0 || proto >= BT_MAX_PROTO)
		return -EINVAL;

95 96
	write_lock(&bt_proto_lock);

L
Linus Torvalds 已提交
97
	if (bt_proto[proto])
98 99 100 101 102
		err = -EEXIST;
	else
		bt_proto[proto] = ops;

	write_unlock(&bt_proto_lock);
L
Linus Torvalds 已提交
103

104
	return err;
L
Linus Torvalds 已提交
105 106 107 108 109
}
EXPORT_SYMBOL(bt_sock_register);

int bt_sock_unregister(int proto)
{
110 111
	int err = 0;

L
Linus Torvalds 已提交
112 113 114
	if (proto < 0 || proto >= BT_MAX_PROTO)
		return -EINVAL;

115 116
	write_lock(&bt_proto_lock);

L
Linus Torvalds 已提交
117
	if (!bt_proto[proto])
118 119 120
		err = -ENOENT;
	else
		bt_proto[proto] = NULL;
L
Linus Torvalds 已提交
121

122 123 124
	write_unlock(&bt_proto_lock);

	return err;
L
Linus Torvalds 已提交
125 126 127
}
EXPORT_SYMBOL(bt_sock_unregister);

128 129
static int bt_sock_create(struct net *net, struct socket *sock, int proto,
			  int kern)
L
Linus Torvalds 已提交
130
{
131
	int err;
L
Linus Torvalds 已提交
132

133 134 135
	if (net != &init_net)
		return -EAFNOSUPPORT;

L
Linus Torvalds 已提交
136 137 138
	if (proto < 0 || proto >= BT_MAX_PROTO)
		return -EINVAL;

139
	if (!bt_proto[proto])
L
Linus Torvalds 已提交
140
		request_module("bt-proto-%d", proto);
141

L
Linus Torvalds 已提交
142
	err = -EPROTONOSUPPORT;
143 144 145

	read_lock(&bt_proto_lock);

L
Linus Torvalds 已提交
146
	if (bt_proto[proto] && try_module_get(bt_proto[proto]->owner)) {
147
		err = bt_proto[proto]->create(net, sock, proto, kern);
148
		bt_sock_reclassify_lock(sock, proto);
L
Linus Torvalds 已提交
149 150
		module_put(bt_proto[proto]->owner);
	}
151 152 153

	read_unlock(&bt_proto_lock);

154
	return err;
L
Linus Torvalds 已提交
155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213
}

void bt_sock_link(struct bt_sock_list *l, struct sock *sk)
{
	write_lock_bh(&l->lock);
	sk_add_node(sk, &l->head);
	write_unlock_bh(&l->lock);
}
EXPORT_SYMBOL(bt_sock_link);

void bt_sock_unlink(struct bt_sock_list *l, struct sock *sk)
{
	write_lock_bh(&l->lock);
	sk_del_node_init(sk);
	write_unlock_bh(&l->lock);
}
EXPORT_SYMBOL(bt_sock_unlink);

void bt_accept_enqueue(struct sock *parent, struct sock *sk)
{
	BT_DBG("parent %p, sk %p", parent, sk);

	sock_hold(sk);
	list_add_tail(&bt_sk(sk)->accept_q, &bt_sk(parent)->accept_q);
	bt_sk(sk)->parent = parent;
	parent->sk_ack_backlog++;
}
EXPORT_SYMBOL(bt_accept_enqueue);

void bt_accept_unlink(struct sock *sk)
{
	BT_DBG("sk %p state %d", sk, sk->sk_state);

	list_del_init(&bt_sk(sk)->accept_q);
	bt_sk(sk)->parent->sk_ack_backlog--;
	bt_sk(sk)->parent = NULL;
	sock_put(sk);
}
EXPORT_SYMBOL(bt_accept_unlink);

struct sock *bt_accept_dequeue(struct sock *parent, struct socket *newsock)
{
	struct list_head *p, *n;
	struct sock *sk;

	BT_DBG("parent %p", parent);

	list_for_each_safe(p, n, &bt_sk(parent)->accept_q) {
		sk = (struct sock *) list_entry(p, struct bt_sock, accept_q);

		lock_sock(sk);

		/* FIXME: Is this check still needed */
		if (sk->sk_state == BT_CLOSED) {
			release_sock(sk);
			bt_accept_unlink(sk);
			continue;
		}

214 215
		if (sk->sk_state == BT_CONNECTED || !newsock ||
						bt_sk(parent)->defer_setup) {
L
Linus Torvalds 已提交
216 217 218 219 220 221 222 223 224 225 226 227 228 229
			bt_accept_unlink(sk);
			if (newsock)
				sock_graft(sk, newsock);
			release_sock(sk);
			return sk;
		}

		release_sock(sk);
	}
	return NULL;
}
EXPORT_SYMBOL(bt_accept_dequeue);

int bt_sock_recvmsg(struct kiocb *iocb, struct socket *sock,
230
				struct msghdr *msg, size_t len, int flags)
L
Linus Torvalds 已提交
231 232 233 234 235 236 237
{
	int noblock = flags & MSG_DONTWAIT;
	struct sock *sk = sock->sk;
	struct sk_buff *skb;
	size_t copied;
	int err;

238
	BT_DBG("sock %p sk %p len %zu", sock, sk, len);
L
Linus Torvalds 已提交
239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256

	if (flags & (MSG_OOB))
		return -EOPNOTSUPP;

	if (!(skb = skb_recv_datagram(sk, flags, noblock, &err))) {
		if (sk->sk_shutdown & RCV_SHUTDOWN)
			return 0;
		return err;
	}

	msg->msg_namelen = 0;

	copied = skb->len;
	if (len < copied) {
		msg->msg_flags |= MSG_TRUNC;
		copied = len;
	}

257
	skb_reset_transport_header(skb);
L
Linus Torvalds 已提交
258
	err = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
259
	if (err == 0)
260
		sock_recv_ts_and_drops(msg, sk, skb);
L
Linus Torvalds 已提交
261 262 263 264 265 266 267

	skb_free_datagram(sk, skb);

	return err ? : copied;
}
EXPORT_SYMBOL(bt_sock_recvmsg);

268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376
static long bt_sock_data_wait(struct sock *sk, long timeo)
{
	DECLARE_WAITQUEUE(wait, current);

	add_wait_queue(sk_sleep(sk), &wait);
	for (;;) {
		set_current_state(TASK_INTERRUPTIBLE);

		if (!skb_queue_empty(&sk->sk_receive_queue))
			break;

		if (sk->sk_err || (sk->sk_shutdown & RCV_SHUTDOWN))
			break;

		if (signal_pending(current) || !timeo)
			break;

		set_bit(SOCK_ASYNC_WAITDATA, &sk->sk_socket->flags);
		release_sock(sk);
		timeo = schedule_timeout(timeo);
		lock_sock(sk);
		clear_bit(SOCK_ASYNC_WAITDATA, &sk->sk_socket->flags);
	}

	__set_current_state(TASK_RUNNING);
	remove_wait_queue(sk_sleep(sk), &wait);
	return timeo;
}

int bt_sock_stream_recvmsg(struct kiocb *iocb, struct socket *sock,
			       struct msghdr *msg, size_t size, int flags)
{
	struct sock *sk = sock->sk;
	int err = 0;
	size_t target, copied = 0;
	long timeo;

	if (flags & MSG_OOB)
		return -EOPNOTSUPP;

	msg->msg_namelen = 0;

	BT_DBG("sk %p size %zu", sk, size);

	lock_sock(sk);

	target = sock_rcvlowat(sk, flags & MSG_WAITALL, size);
	timeo  = sock_rcvtimeo(sk, flags & MSG_DONTWAIT);

	do {
		struct sk_buff *skb;
		int chunk;

		skb = skb_dequeue(&sk->sk_receive_queue);
		if (!skb) {
			if (copied >= target)
				break;

			if ((err = sock_error(sk)) != 0)
				break;
			if (sk->sk_shutdown & RCV_SHUTDOWN)
				break;

			err = -EAGAIN;
			if (!timeo)
				break;

			timeo = bt_sock_data_wait(sk, timeo);

			if (signal_pending(current)) {
				err = sock_intr_errno(timeo);
				goto out;
			}
			continue;
		}

		chunk = min_t(unsigned int, skb->len, size);
		if (memcpy_toiovec(msg->msg_iov, skb->data, chunk)) {
			skb_queue_head(&sk->sk_receive_queue, skb);
			if (!copied)
				copied = -EFAULT;
			break;
		}
		copied += chunk;
		size   -= chunk;

		sock_recv_ts_and_drops(msg, sk, skb);

		if (!(flags & MSG_PEEK)) {
			skb_pull(skb, chunk);
			if (skb->len) {
				skb_queue_head(&sk->sk_receive_queue, skb);
				break;
			}
			kfree_skb(skb);

		} else {
			/* put message back and return */
			skb_queue_head(&sk->sk_receive_queue, skb);
			break;
		}
	} while (size);

out:
	release_sock(sk);
	return copied ? : err;
}
EXPORT_SYMBOL(bt_sock_stream_recvmsg);

L
Linus Torvalds 已提交
377 378 379 380 381 382 383
static inline unsigned int bt_accept_poll(struct sock *parent)
{
	struct list_head *p, *n;
	struct sock *sk;

	list_for_each_safe(p, n, &bt_sk(parent)->accept_q) {
		sk = (struct sock *) list_entry(p, struct bt_sock, accept_q);
384 385 386
		if (sk->sk_state == BT_CONNECTED ||
					(bt_sk(parent)->defer_setup &&
						sk->sk_state == BT_CONNECT2))
L
Linus Torvalds 已提交
387 388 389 390 391 392 393 394 395 396 397 398 399
			return POLLIN | POLLRDNORM;
	}

	return 0;
}

unsigned int bt_sock_poll(struct file * file, struct socket *sock, poll_table *wait)
{
	struct sock *sk = sock->sk;
	unsigned int mask = 0;

	BT_DBG("sock %p, sk %p", sock, sk);

E
Eric Dumazet 已提交
400
	poll_wait(file, sk_sleep(sk), wait);
L
Linus Torvalds 已提交
401 402 403 404 405 406 407

	if (sk->sk_state == BT_LISTEN)
		return bt_accept_poll(sk);

	if (sk->sk_err || !skb_queue_empty(&sk->sk_error_queue))
		mask |= POLLERR;

408
	if (sk->sk_shutdown & RCV_SHUTDOWN)
E
Eric Dumazet 已提交
409
		mask |= POLLRDHUP | POLLIN | POLLRDNORM;
410

L
Linus Torvalds 已提交
411 412 413
	if (sk->sk_shutdown == SHUTDOWN_MASK)
		mask |= POLLHUP;

E
Eric Dumazet 已提交
414
	if (!skb_queue_empty(&sk->sk_receive_queue))
L
Linus Torvalds 已提交
415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433
		mask |= POLLIN | POLLRDNORM;

	if (sk->sk_state == BT_CLOSED)
		mask |= POLLHUP;

	if (sk->sk_state == BT_CONNECT ||
			sk->sk_state == BT_CONNECT2 ||
			sk->sk_state == BT_CONFIG)
		return mask;

	if (sock_writeable(sk))
		mask |= POLLOUT | POLLWRNORM | POLLWRBAND;
	else
		set_bit(SOCK_ASYNC_NOSPACE, &sk->sk_socket->flags);

	return mask;
}
EXPORT_SYMBOL(bt_sock_poll);

434 435 436
int bt_sock_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
{
	struct sock *sk = sock->sk;
437 438
	struct sk_buff *skb;
	long amount;
439 440 441 442 443
	int err;

	BT_DBG("sk %p cmd %x arg %lx", sk, cmd, arg);

	switch (cmd) {
444 445 446 447
	case TIOCOUTQ:
		if (sk->sk_state == BT_LISTEN)
			return -EINVAL;

448
		amount = sk->sk_sndbuf - sk_wmem_alloc_get(sk);
449 450 451 452 453 454 455 456 457 458 459 460 461 462 463 464
		if (amount < 0)
			amount = 0;
		err = put_user(amount, (int __user *) arg);
		break;

	case TIOCINQ:
		if (sk->sk_state == BT_LISTEN)
			return -EINVAL;

		lock_sock(sk);
		skb = skb_peek(&sk->sk_receive_queue);
		amount = skb ? skb->len : 0;
		release_sock(sk);
		err = put_user(amount, (int __user *) arg);
		break;

465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481
	case SIOCGSTAMP:
		err = sock_get_timestamp(sk, (struct timeval __user *) arg);
		break;

	case SIOCGSTAMPNS:
		err = sock_get_timestampns(sk, (struct timespec __user *) arg);
		break;

	default:
		err = -ENOIOCTLCMD;
		break;
	}

	return err;
}
EXPORT_SYMBOL(bt_sock_ioctl);

L
Linus Torvalds 已提交
482 483 484 485 486 487 488
int bt_sock_wait_state(struct sock *sk, int state, unsigned long timeo)
{
	DECLARE_WAITQUEUE(wait, current);
	int err = 0;

	BT_DBG("sk %p", sk);

E
Eric Dumazet 已提交
489
	add_wait_queue(sk_sleep(sk), &wait);
L
Linus Torvalds 已提交
490 491 492 493
	while (sk->sk_state != state) {
		set_current_state(TASK_INTERRUPTIBLE);

		if (!timeo) {
494
			err = -EINPROGRESS;
L
Linus Torvalds 已提交
495 496 497 498 499 500 501 502 503 504 505 506
			break;
		}

		if (signal_pending(current)) {
			err = sock_intr_errno(timeo);
			break;
		}

		release_sock(sk);
		timeo = schedule_timeout(timeo);
		lock_sock(sk);

507 508
		err = sock_error(sk);
		if (err)
L
Linus Torvalds 已提交
509 510 511
			break;
	}
	set_current_state(TASK_RUNNING);
E
Eric Dumazet 已提交
512
	remove_wait_queue(sk_sleep(sk), &wait);
L
Linus Torvalds 已提交
513 514 515 516 517 518 519 520 521 522 523 524
	return err;
}
EXPORT_SYMBOL(bt_sock_wait_state);

static struct net_proto_family bt_sock_family_ops = {
	.owner	= THIS_MODULE,
	.family	= PF_BLUETOOTH,
	.create	= bt_sock_create,
};

static int __init bt_init(void)
{
525 526
	int err;

L
Linus Torvalds 已提交
527 528
	BT_INFO("Core ver %s", VERSION);

529 530 531
	err = bt_sysfs_init();
	if (err < 0)
		return err;
L
Linus Torvalds 已提交
532

533 534 535 536 537
	err = sock_register(&bt_sock_family_ops);
	if (err < 0) {
		bt_sysfs_cleanup();
		return err;
	}
L
Linus Torvalds 已提交
538

539
	BT_INFO("HCI device and connection manager initialized");
L
Linus Torvalds 已提交
540 541 542 543 544 545 546 547 548 549 550

	hci_sock_init();

	return 0;
}

static void __exit bt_exit(void)
{
	hci_sock_cleanup();

	sock_unregister(PF_BLUETOOTH);
551 552

	bt_sysfs_cleanup();
L
Linus Torvalds 已提交
553 554 555 556 557
}

subsys_initcall(bt_init);
module_exit(bt_exit);

558
MODULE_AUTHOR("Marcel Holtmann <marcel@holtmann.org>");
L
Linus Torvalds 已提交
559 560 561 562
MODULE_DESCRIPTION("Bluetooth Core ver " VERSION);
MODULE_VERSION(VERSION);
MODULE_LICENSE("GPL");
MODULE_ALIAS_NETPROTO(PF_BLUETOOTH);