xen: suppress known wrmsrs
[linux-2.6/linux-acpi-2.6/ibm-acpi-2.6.git] / net / bluetooth / hci_sock.c
blobd62579b67959cd935f1f20c8c128dcabd9436f37
1 /*
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>
43 #include <net/sock.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
53 #undef BT_DBG
54 #define BT_DBG(D...)
55 #endif
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));
64 /* Security filter */
65 static struct hci_sec_filter hci_sec_filter = {
66 /* Packet types */
67 0x10,
68 /* Events */
69 { 0x1000d9fe, 0x0000b00c },
70 /* Commands */
72 { 0x0 },
73 /* OGF_LINK_CTL */
74 { 0xbe000006, 0x00000001, 0x00000000, 0x00 },
75 /* OGF_LINK_POLICY */
76 { 0x00005200, 0x00000000, 0x00000000, 0x00 },
77 /* OGF_HOST_CTL */
78 { 0xaab00200, 0x2b402aaa, 0x05220154, 0x00 },
79 /* OGF_INFO_PARAM */
80 { 0x000002be, 0x00000000, 0x00000000, 0x00 },
81 /* OGF_STATUS_PARAM */
82 { 0x000000ea, 0x00000000, 0x00000000, 0x00 }
86 static struct bt_sock_list hci_sk_list = {
87 .lock = __RW_LOCK_UNLOCKED(hci_sk_list.lock)
90 /* Send frame to RAW socket */
91 void hci_send_to_sock(struct hci_dev *hdev, struct sk_buff *skb)
93 struct sock *sk;
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)
104 continue;
106 /* Don't send frame to the socket it came from */
107 if (skb->sk == sk)
108 continue;
110 /* Apply filter */
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))
115 continue;
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))
121 continue;
123 if (flt->opcode &&
124 ((evt == HCI_EV_CMD_COMPLETE &&
125 flt->opcode !=
126 get_unaligned((__le16 *)(skb->data + 3))) ||
127 (evt == HCI_EV_CMD_STATUS &&
128 flt->opcode !=
129 get_unaligned((__le16 *)(skb->data + 4)))))
130 continue;
133 if (!(nskb = skb_clone(skb, GFP_ATOMIC)))
134 continue;
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))
140 kfree_skb(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);
152 if (!sk)
153 return 0;
155 hdev = hci_pi(sk)->hdev;
157 bt_sock_unlink(&hci_sk_list, sk);
159 if (hdev) {
160 atomic_dec(&hdev->promisc);
161 hci_dev_put(hdev);
164 sock_orphan(sk);
166 skb_queue_purge(&sk->sk_receive_queue);
167 skb_queue_purge(&sk->sk_write_queue);
169 sock_put(sk);
170 return 0;
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;
178 if (!hdev)
179 return -EBADFD;
181 switch (cmd) {
182 case HCISETRAW:
183 if (!capable(CAP_NET_ADMIN))
184 return -EACCES;
186 if (test_bit(HCI_QUIRK_RAW_DEVICE, &hdev->quirks))
187 return -EPERM;
189 if (arg)
190 set_bit(HCI_RAW, &hdev->flags);
191 else
192 clear_bit(HCI_RAW, &hdev->flags);
194 return 0;
196 case HCIGETCONNINFO:
197 return hci_get_conn_info(hdev, (void __user *) arg);
199 case HCIGETAUTHINFO:
200 return hci_get_auth_info(hdev, (void __user *) arg);
202 default:
203 if (hdev->ioctl)
204 return hdev->ioctl(hdev, cmd, arg);
205 return -EINVAL;
209 static int hci_sock_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
211 struct sock *sk = sock->sk;
212 void __user *argp = (void __user *) arg;
213 int err;
215 BT_DBG("cmd %x arg %lx", cmd, arg);
217 switch (cmd) {
218 case HCIGETDEVLIST:
219 return hci_get_dev_list(argp);
221 case HCIGETDEVINFO:
222 return hci_get_dev_info(argp);
224 case HCIGETCONNLIST:
225 return hci_get_conn_list(argp);
227 case HCIDEVUP:
228 if (!capable(CAP_NET_ADMIN))
229 return -EACCES;
230 return hci_dev_open(arg);
232 case HCIDEVDOWN:
233 if (!capable(CAP_NET_ADMIN))
234 return -EACCES;
235 return hci_dev_close(arg);
237 case HCIDEVRESET:
238 if (!capable(CAP_NET_ADMIN))
239 return -EACCES;
240 return hci_dev_reset(arg);
242 case HCIDEVRESTAT:
243 if (!capable(CAP_NET_ADMIN))
244 return -EACCES;
245 return hci_dev_reset_stat(arg);
247 case HCISETSCAN:
248 case HCISETAUTH:
249 case HCISETENCRYPT:
250 case HCISETPTYPE:
251 case HCISETLINKPOL:
252 case HCISETLINKMODE:
253 case HCISETACLMTU:
254 case HCISETSCOMTU:
255 if (!capable(CAP_NET_ADMIN))
256 return -EACCES;
257 return hci_dev_cmd(cmd, argp);
259 case HCIINQUIRY:
260 return hci_inquiry(argp);
262 default:
263 lock_sock(sk);
264 err = hci_sock_bound_ioctl(sk, cmd, arg);
265 release_sock(sk);
266 return err;
270 static int hci_sock_bind(struct socket *sock, struct sockaddr *addr, int addr_len)
272 struct sockaddr_hci *haddr = (struct sockaddr_hci *) addr;
273 struct sock *sk = sock->sk;
274 struct hci_dev *hdev = NULL;
275 int err = 0;
277 BT_DBG("sock %p sk %p", sock, sk);
279 if (!haddr || haddr->hci_family != AF_BLUETOOTH)
280 return -EINVAL;
282 lock_sock(sk);
284 if (hci_pi(sk)->hdev) {
285 err = -EALREADY;
286 goto done;
289 if (haddr->hci_dev != HCI_DEV_NONE) {
290 if (!(hdev = hci_dev_get(haddr->hci_dev))) {
291 err = -ENODEV;
292 goto done;
295 atomic_inc(&hdev->promisc);
298 hci_pi(sk)->hdev = hdev;
299 sk->sk_state = BT_BOUND;
301 done:
302 release_sock(sk);
303 return err;
306 static int hci_sock_getname(struct socket *sock, struct sockaddr *addr, int *addr_len, int peer)
308 struct sockaddr_hci *haddr = (struct sockaddr_hci *) addr;
309 struct sock *sk = sock->sk;
310 struct hci_dev *hdev = hci_pi(sk)->hdev;
312 BT_DBG("sock %p sk %p", sock, sk);
314 if (!hdev)
315 return -EBADFD;
317 lock_sock(sk);
319 *addr_len = sizeof(*haddr);
320 haddr->hci_family = AF_BLUETOOTH;
321 haddr->hci_dev = hdev->id;
323 release_sock(sk);
324 return 0;
327 static inline void hci_sock_cmsg(struct sock *sk, struct msghdr *msg, struct sk_buff *skb)
329 __u32 mask = hci_pi(sk)->cmsg_mask;
331 if (mask & HCI_CMSG_DIR) {
332 int incoming = bt_cb(skb)->incoming;
333 put_cmsg(msg, SOL_HCI, HCI_CMSG_DIR, sizeof(incoming), &incoming);
336 if (mask & HCI_CMSG_TSTAMP) {
337 struct timeval tv;
338 void *data;
339 int len;
341 skb_get_timestamp(skb, &tv);
343 data = &tv;
344 len = sizeof(tv);
345 #ifdef CONFIG_COMPAT
346 if (msg->msg_flags & MSG_CMSG_COMPAT) {
347 struct compat_timeval ctv;
348 ctv.tv_sec = tv.tv_sec;
349 ctv.tv_usec = tv.tv_usec;
350 data = &ctv;
351 len = sizeof(ctv);
353 #endif
355 put_cmsg(msg, SOL_HCI, HCI_CMSG_TSTAMP, len, data);
359 static int hci_sock_recvmsg(struct kiocb *iocb, struct socket *sock,
360 struct msghdr *msg, size_t len, int flags)
362 int noblock = flags & MSG_DONTWAIT;
363 struct sock *sk = sock->sk;
364 struct sk_buff *skb;
365 int copied, err;
367 BT_DBG("sock %p, sk %p", sock, sk);
369 if (flags & (MSG_OOB))
370 return -EOPNOTSUPP;
372 if (sk->sk_state == BT_CLOSED)
373 return 0;
375 if (!(skb = skb_recv_datagram(sk, flags, noblock, &err)))
376 return err;
378 msg->msg_namelen = 0;
380 copied = skb->len;
381 if (len < copied) {
382 msg->msg_flags |= MSG_TRUNC;
383 copied = len;
386 skb_reset_transport_header(skb);
387 err = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
389 hci_sock_cmsg(sk, msg, skb);
391 skb_free_datagram(sk, skb);
393 return err ? : copied;
396 static int hci_sock_sendmsg(struct kiocb *iocb, struct socket *sock,
397 struct msghdr *msg, size_t len)
399 struct sock *sk = sock->sk;
400 struct hci_dev *hdev;
401 struct sk_buff *skb;
402 int err;
404 BT_DBG("sock %p sk %p", sock, sk);
406 if (msg->msg_flags & MSG_OOB)
407 return -EOPNOTSUPP;
409 if (msg->msg_flags & ~(MSG_DONTWAIT|MSG_NOSIGNAL|MSG_ERRQUEUE))
410 return -EINVAL;
412 if (len < 4 || len > HCI_MAX_FRAME_SIZE)
413 return -EINVAL;
415 lock_sock(sk);
417 if (!(hdev = hci_pi(sk)->hdev)) {
418 err = -EBADFD;
419 goto done;
422 if (!(skb = bt_skb_send_alloc(sk, len, msg->msg_flags & MSG_DONTWAIT, &err)))
423 goto done;
425 if (memcpy_fromiovec(skb_put(skb, len), msg->msg_iov, len)) {
426 err = -EFAULT;
427 goto drop;
430 bt_cb(skb)->pkt_type = *((unsigned char *) skb->data);
431 skb_pull(skb, 1);
432 skb->dev = (void *) hdev;
434 if (bt_cb(skb)->pkt_type == HCI_COMMAND_PKT) {
435 u16 opcode = get_unaligned_le16(skb->data);
436 u16 ogf = hci_opcode_ogf(opcode);
437 u16 ocf = hci_opcode_ocf(opcode);
439 if (((ogf > HCI_SFLT_MAX_OGF) ||
440 !hci_test_bit(ocf & HCI_FLT_OCF_BITS, &hci_sec_filter.ocf_mask[ogf])) &&
441 !capable(CAP_NET_RAW)) {
442 err = -EPERM;
443 goto drop;
446 if (test_bit(HCI_RAW, &hdev->flags) || (ogf == 0x3f)) {
447 skb_queue_tail(&hdev->raw_q, skb);
448 hci_sched_tx(hdev);
449 } else {
450 skb_queue_tail(&hdev->cmd_q, skb);
451 hci_sched_cmd(hdev);
453 } else {
454 if (!capable(CAP_NET_RAW)) {
455 err = -EPERM;
456 goto drop;
459 skb_queue_tail(&hdev->raw_q, skb);
460 hci_sched_tx(hdev);
463 err = len;
465 done:
466 release_sock(sk);
467 return err;
469 drop:
470 kfree_skb(skb);
471 goto done;
474 static int hci_sock_setsockopt(struct socket *sock, int level, int optname, char __user *optval, int len)
476 struct hci_ufilter uf = { .opcode = 0 };
477 struct sock *sk = sock->sk;
478 int err = 0, opt = 0;
480 BT_DBG("sk %p, opt %d", sk, optname);
482 lock_sock(sk);
484 switch (optname) {
485 case HCI_DATA_DIR:
486 if (get_user(opt, (int __user *)optval)) {
487 err = -EFAULT;
488 break;
491 if (opt)
492 hci_pi(sk)->cmsg_mask |= HCI_CMSG_DIR;
493 else
494 hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_DIR;
495 break;
497 case HCI_TIME_STAMP:
498 if (get_user(opt, (int __user *)optval)) {
499 err = -EFAULT;
500 break;
503 if (opt)
504 hci_pi(sk)->cmsg_mask |= HCI_CMSG_TSTAMP;
505 else
506 hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_TSTAMP;
507 break;
509 case HCI_FILTER:
511 struct hci_filter *f = &hci_pi(sk)->filter;
513 uf.type_mask = f->type_mask;
514 uf.opcode = f->opcode;
515 uf.event_mask[0] = *((u32 *) f->event_mask + 0);
516 uf.event_mask[1] = *((u32 *) f->event_mask + 1);
519 len = min_t(unsigned int, len, sizeof(uf));
520 if (copy_from_user(&uf, optval, len)) {
521 err = -EFAULT;
522 break;
525 if (!capable(CAP_NET_RAW)) {
526 uf.type_mask &= hci_sec_filter.type_mask;
527 uf.event_mask[0] &= *((u32 *) hci_sec_filter.event_mask + 0);
528 uf.event_mask[1] &= *((u32 *) hci_sec_filter.event_mask + 1);
532 struct hci_filter *f = &hci_pi(sk)->filter;
534 f->type_mask = uf.type_mask;
535 f->opcode = uf.opcode;
536 *((u32 *) f->event_mask + 0) = uf.event_mask[0];
537 *((u32 *) f->event_mask + 1) = uf.event_mask[1];
539 break;
541 default:
542 err = -ENOPROTOOPT;
543 break;
546 release_sock(sk);
547 return err;
550 static int hci_sock_getsockopt(struct socket *sock, int level, int optname, char __user *optval, int __user *optlen)
552 struct hci_ufilter uf;
553 struct sock *sk = sock->sk;
554 int len, opt;
556 if (get_user(len, optlen))
557 return -EFAULT;
559 switch (optname) {
560 case HCI_DATA_DIR:
561 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_DIR)
562 opt = 1;
563 else
564 opt = 0;
566 if (put_user(opt, optval))
567 return -EFAULT;
568 break;
570 case HCI_TIME_STAMP:
571 if (hci_pi(sk)->cmsg_mask & HCI_CMSG_TSTAMP)
572 opt = 1;
573 else
574 opt = 0;
576 if (put_user(opt, optval))
577 return -EFAULT;
578 break;
580 case HCI_FILTER:
582 struct hci_filter *f = &hci_pi(sk)->filter;
584 uf.type_mask = f->type_mask;
585 uf.opcode = f->opcode;
586 uf.event_mask[0] = *((u32 *) f->event_mask + 0);
587 uf.event_mask[1] = *((u32 *) f->event_mask + 1);
590 len = min_t(unsigned int, len, sizeof(uf));
591 if (copy_to_user(optval, &uf, len))
592 return -EFAULT;
593 break;
595 default:
596 return -ENOPROTOOPT;
597 break;
600 return 0;
603 static const struct proto_ops hci_sock_ops = {
604 .family = PF_BLUETOOTH,
605 .owner = THIS_MODULE,
606 .release = hci_sock_release,
607 .bind = hci_sock_bind,
608 .getname = hci_sock_getname,
609 .sendmsg = hci_sock_sendmsg,
610 .recvmsg = hci_sock_recvmsg,
611 .ioctl = hci_sock_ioctl,
612 .poll = datagram_poll,
613 .listen = sock_no_listen,
614 .shutdown = sock_no_shutdown,
615 .setsockopt = hci_sock_setsockopt,
616 .getsockopt = hci_sock_getsockopt,
617 .connect = sock_no_connect,
618 .socketpair = sock_no_socketpair,
619 .accept = sock_no_accept,
620 .mmap = sock_no_mmap
623 static struct proto hci_sk_proto = {
624 .name = "HCI",
625 .owner = THIS_MODULE,
626 .obj_size = sizeof(struct hci_pinfo)
629 static int hci_sock_create(struct net *net, struct socket *sock, int protocol)
631 struct sock *sk;
633 BT_DBG("sock %p", sock);
635 if (sock->type != SOCK_RAW)
636 return -ESOCKTNOSUPPORT;
638 sock->ops = &hci_sock_ops;
640 sk = sk_alloc(net, PF_BLUETOOTH, GFP_ATOMIC, &hci_sk_proto);
641 if (!sk)
642 return -ENOMEM;
644 sock_init_data(sock, sk);
646 sock_reset_flag(sk, SOCK_ZAPPED);
648 sk->sk_protocol = protocol;
650 sock->state = SS_UNCONNECTED;
651 sk->sk_state = BT_OPEN;
653 bt_sock_link(&hci_sk_list, sk);
654 return 0;
657 static int hci_sock_dev_event(struct notifier_block *this, unsigned long event, void *ptr)
659 struct hci_dev *hdev = (struct hci_dev *) ptr;
660 struct hci_ev_si_device ev;
662 BT_DBG("hdev %s event %ld", hdev->name, event);
664 /* Send event to sockets */
665 ev.event = event;
666 ev.dev_id = hdev->id;
667 hci_si_event(NULL, HCI_EV_SI_DEVICE, sizeof(ev), &ev);
669 if (event == HCI_DEV_UNREG) {
670 struct sock *sk;
671 struct hlist_node *node;
673 /* Detach sockets from device */
674 read_lock(&hci_sk_list.lock);
675 sk_for_each(sk, node, &hci_sk_list.head) {
676 local_bh_disable();
677 bh_lock_sock_nested(sk);
678 if (hci_pi(sk)->hdev == hdev) {
679 hci_pi(sk)->hdev = NULL;
680 sk->sk_err = EPIPE;
681 sk->sk_state = BT_OPEN;
682 sk->sk_state_change(sk);
684 hci_dev_put(hdev);
686 bh_unlock_sock(sk);
687 local_bh_enable();
689 read_unlock(&hci_sk_list.lock);
692 return NOTIFY_DONE;
695 static struct net_proto_family hci_sock_family_ops = {
696 .family = PF_BLUETOOTH,
697 .owner = THIS_MODULE,
698 .create = hci_sock_create,
701 static struct notifier_block hci_sock_nblock = {
702 .notifier_call = hci_sock_dev_event
705 int __init hci_sock_init(void)
707 int err;
709 err = proto_register(&hci_sk_proto, 0);
710 if (err < 0)
711 return err;
713 err = bt_sock_register(BTPROTO_HCI, &hci_sock_family_ops);
714 if (err < 0)
715 goto error;
717 hci_register_notifier(&hci_sock_nblock);
719 BT_INFO("HCI socket layer initialized");
721 return 0;
723 error:
724 BT_ERR("HCI socket registration failed");
725 proto_unregister(&hci_sk_proto);
726 return err;
729 void __exit hci_sock_cleanup(void)
731 if (bt_sock_unregister(BTPROTO_HCI) < 0)
732 BT_ERR("HCI socket unregistration failed");
734 hci_unregister_notifier(&hci_sock_nblock);
736 proto_unregister(&hci_sk_proto);