hci_sock.c
上传用户:jlfgdled
上传日期:2013-04-10
资源大小:33168k
文件大小:13k
- /*
- 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
- 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
- OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
- ALL LIABILITY, INCLUDING LIABILITY FOR INFRINGEMENT OF ANY PATENTS,
- COPYRIGHTS, TRADEMARKS OR OTHER RIGHTS, RELATING TO USE OF THIS
- SOFTWARE IS DISCLAIMED.
- */
- /*
- * BlueZ HCI socket layer.
- *
- * $Id: hci_sock.c,v 1.5 2002/07/22 20:32:54 maxk Exp $
- */
- #include <linux/config.h>
- #include <linux/module.h>
- #include <linux/types.h>
- #include <linux/errno.h>
- #include <linux/kernel.h>
- #include <linux/major.h>
- #include <linux/sched.h>
- #include <linux/slab.h>
- #include <linux/poll.h>
- #include <linux/fcntl.h>
- #include <linux/init.h>
- #include <linux/skbuff.h>
- #include <linux/tqueue.h>
- #include <linux/interrupt.h>
- #include <linux/socket.h>
- #include <linux/ioctl.h>
- #include <net/sock.h>
- #include <asm/system.h>
- #include <asm/uaccess.h>
- #include <net/bluetooth/bluetooth.h>
- #include <net/bluetooth/hci_core.h>
- #ifndef HCI_SOCK_DEBUG
- #undef BT_DBG
- #define BT_DBG( A... )
- #endif
- /* ----- HCI socket interface ----- */
- /* Security filter */
- static struct hci_sec_filter hci_sec_filter = {
- /* Packet types */
- 0x10,
- /* Events */
- { 0xd9fe, 0x0 },
- /* Commands */
- {
- /* OGF_LINK_CTL */
- { 0x2a000002, 0x0, 0x0, 0x0 },
- /* OGF_LINK_POLICY */
- { 0x1200, 0x0, 0x0, 0x0 },
- /* OGF_HOST_CTL */
- { 0x80100000, 0xa, 0x0, 0x0 },
- /* OGF_INFO_PARAM */
- { 0x22a, 0x0, 0x0, 0x0 }
- }
- };
- static struct bluez_sock_list hci_sk_list = {
- lock: RW_LOCK_UNLOCKED
- };
- /* Send frame to RAW socket */
- void hci_send_to_sock(struct hci_dev *hdev, struct sk_buff *skb)
- {
- struct sock * sk;
- BT_DBG("hdev %p len %d", hdev, skb->len);
- read_lock(&hci_sk_list.lock);
- for (sk = hci_sk_list.head; sk; sk = sk->next) {
- struct hci_filter *flt;
- struct sk_buff *nskb;
- if (sk->state != BT_BOUND || hci_pi(sk)->hdev != hdev)
- continue;
- /* Don't send frame to the socket it came from */
- if (skb->sk == sk)
- continue;
- /* Apply filter */
- flt = &hci_pi(sk)->filter;
- if (!hci_test_bit((skb->pkt_type & HCI_FLT_TYPE_BITS), &flt->type_mask))
- continue;
- if (skb->pkt_type == HCI_EVENT_PKT) {
- register int evt = (*(__u8 *)skb->data & HCI_FLT_EVENT_BITS);
-
- if (!hci_test_bit(evt, &flt->event_mask))
- continue;
- if (flt->opcode && ((evt == EVT_CMD_COMPLETE &&
- flt->opcode != *(__u16 *)(skb->data + 3)) ||
- (evt == EVT_CMD_STATUS &&
- flt->opcode != *(__u16 *)(skb->data + 4))))
- continue;
- }
- if (!(nskb = skb_clone(skb, GFP_ATOMIC)))
- continue;
- /* Put type byte before the data */
- memcpy(skb_push(nskb, 1), &nskb->pkt_type, 1);
- if (sock_queue_rcv_skb(sk, nskb))
- kfree_skb(nskb);
- }
- read_unlock(&hci_sk_list.lock);
- }
- static int hci_sock_release(struct socket *sock)
- {
- struct sock *sk = sock->sk;
- struct hci_dev *hdev = hci_pi(sk)->hdev;
- BT_DBG("sock %p sk %p", sock, sk);
- if (!sk)
- return 0;
- bluez_sock_unlink(&hci_sk_list, sk);
- if (hdev) {
- atomic_dec(&hdev->promisc);
- hci_dev_put(hdev);
- }
- sock_orphan(sk);
- skb_queue_purge(&sk->receive_queue);
- skb_queue_purge(&sk->write_queue);
- sock_put(sk);
- MOD_DEC_USE_COUNT;
- return 0;
- }
- /* Ioctls that require bound socket */
- static inline int hci_sock_bound_ioctl(struct sock *sk, unsigned int cmd, unsigned long arg)
- {
- struct hci_dev *hdev = hci_pi(sk)->hdev;
- if (!hdev)
- return -EBADFD;
- switch (cmd) {
- case HCISETRAW:
- if (!capable(CAP_NET_ADMIN))
- return -EACCES;
- if (arg)
- set_bit(HCI_RAW, &hdev->flags);
- else
- clear_bit(HCI_RAW, &hdev->flags);
- return 0;
- case HCIGETCONNINFO:
- return hci_get_conn_info(hdev, arg);
- default:
- if (hdev->ioctl)
- return hdev->ioctl(hdev, cmd, arg);
- return -EINVAL;
- }
- }
- static int hci_sock_ioctl(struct socket *sock, unsigned int cmd, unsigned long arg)
- {
- struct sock *sk = sock->sk;
- int err;
- BT_DBG("cmd %x arg %lx", cmd, arg);
- switch (cmd) {
- case HCIGETDEVLIST:
- return hci_get_dev_list(arg);
- case HCIGETDEVINFO:
- return hci_get_dev_info(arg);
- case HCIGETCONNLIST:
- return hci_get_conn_list(arg);
- case HCIDEVUP:
- if (!capable(CAP_NET_ADMIN))
- return -EACCES;
- return hci_dev_open(arg);
- case HCIDEVDOWN:
- if (!capable(CAP_NET_ADMIN))
- return -EACCES;
- return hci_dev_close(arg);
- case HCIDEVRESET:
- if (!capable(CAP_NET_ADMIN))
- return -EACCES;
- return hci_dev_reset(arg);
- case HCIDEVRESTAT:
- if (!capable(CAP_NET_ADMIN))
- return -EACCES;
- return hci_dev_reset_stat(arg);
- case HCISETSCAN:
- case HCISETAUTH:
- case HCISETENCRYPT:
- case HCISETPTYPE:
- case HCISETLINKPOL:
- case HCISETLINKMODE:
- case HCISETACLMTU:
- case HCISETSCOMTU:
- if (!capable(CAP_NET_ADMIN))
- return -EACCES;
- return hci_dev_cmd(cmd, arg);
- case HCIINQUIRY:
- return hci_inquiry(arg);
- default:
- lock_sock(sk);
- err = hci_sock_bound_ioctl(sk, cmd, arg);
- release_sock(sk);
- return err;
- };
- }
- static int hci_sock_bind(struct socket *sock, struct sockaddr *addr, int addr_len)
- {
- struct sockaddr_hci *haddr = (struct sockaddr_hci *) addr;
- struct sock *sk = sock->sk;
- struct hci_dev *hdev = NULL;
- int err = 0;
- BT_DBG("sock %p sk %p", sock, sk);
- if (!haddr || haddr->hci_family != AF_BLUETOOTH)
- return -EINVAL;
- lock_sock(sk);
- if (hci_pi(sk)->hdev) {
- err = -EALREADY;
- goto done;
- }
- if (haddr->hci_dev != HCI_DEV_NONE) {
- if (!(hdev = hci_dev_get(haddr->hci_dev))) {
- err = -ENODEV;
- goto done;
- }
- atomic_inc(&hdev->promisc);
- }
- hci_pi(sk)->hdev = hdev;
- sk->state = BT_BOUND;
- done:
- release_sock(sk);
- return err;
- }
- static int hci_sock_getname(struct socket *sock, struct sockaddr *addr, int *addr_len, int peer)
- {
- struct sockaddr_hci *haddr = (struct sockaddr_hci *) addr;
- struct sock *sk = sock->sk;
- BT_DBG("sock %p sk %p", sock, sk);
- lock_sock(sk);
- *addr_len = sizeof(*haddr);
- haddr->hci_family = AF_BLUETOOTH;
- haddr->hci_dev = hci_pi(sk)->hdev->id;
- release_sock(sk);
- return 0;
- }
- static inline void hci_sock_cmsg(struct sock *sk, struct msghdr *msg, struct sk_buff *skb)
- {
- __u32 mask = hci_pi(sk)->cmsg_mask;
- if (mask & HCI_CMSG_DIR)
- put_cmsg(msg, SOL_HCI, HCI_CMSG_DIR, sizeof(int), &bluez_cb(skb)->incomming);
- if (mask & HCI_CMSG_TSTAMP)
- put_cmsg(msg, SOL_HCI, HCI_CMSG_TSTAMP, sizeof(skb->stamp), &skb->stamp);
- }
-
- static int hci_sock_recvmsg(struct socket *sock, struct msghdr *msg, int len, int flags, struct scm_cookie *scm)
- {
- int noblock = flags & MSG_DONTWAIT;
- struct sock *sk = sock->sk;
- struct sk_buff *skb;
- int copied, err;
- BT_DBG("sock %p, sk %p", sock, sk);
- if (flags & (MSG_OOB))
- return -EOPNOTSUPP;
- if (sk->state == BT_CLOSED)
- return 0;
- if (!(skb = skb_recv_datagram(sk, flags, noblock, &err)))
- return err;
- msg->msg_namelen = 0;
- copied = skb->len;
- if (len < copied) {
- msg->msg_flags |= MSG_TRUNC;
- copied = len;
- }
- skb->h.raw = skb->data;
- err = skb_copy_datagram_iovec(skb, 0, msg->msg_iov, copied);
- hci_sock_cmsg(sk, msg, skb);
-
- skb_free_datagram(sk, skb);
- return err ? : copied;
- }
- static int hci_sock_sendmsg(struct socket *sock, struct msghdr *msg, int len,
- struct scm_cookie *scm)
- {
- struct sock *sk = sock->sk;
- struct hci_dev *hdev;
- struct sk_buff *skb;
- int err;
- BT_DBG("sock %p sk %p", sock, sk);
- if (msg->msg_flags & MSG_OOB)
- return -EOPNOTSUPP;
- if (msg->msg_flags & ~(MSG_DONTWAIT|MSG_NOSIGNAL|MSG_ERRQUEUE))
- return -EINVAL;
- if (len < 4)
- return -EINVAL;
-
- lock_sock(sk);
- if (!(hdev = hci_pi(sk)->hdev)) {
- err = -EBADFD;
- goto done;
- }
- if (!(skb = bluez_skb_send_alloc(sk, len, msg->msg_flags & MSG_DONTWAIT, &err)))
- goto done;
- if (memcpy_fromiovec(skb_put(skb, len), msg->msg_iov, len)) {
- err = -EFAULT;
- goto drop;
- }
- skb->pkt_type = *((unsigned char *) skb->data);
- skb_pull(skb, 1);
- if (!capable(CAP_NET_RAW)) {
- err = -EPERM;
- if (skb->pkt_type == HCI_COMMAND_PKT) {
- __u16 opcode = __le16_to_cpu(*(__u16 *)skb->data);
- __u16 ogf = cmd_opcode_ogf(opcode) - 1;
- __u16 ocf = cmd_opcode_ocf(opcode) & HCI_FLT_OCF_BITS;
- if (ogf > HCI_SFLT_MAX_OGF ||
- !hci_test_bit(ocf, &hci_sec_filter.ocf_mask[ogf]))
- goto drop;
- } else
- goto drop;
- }
-
- /* Send frame to HCI core */
- skb->dev = (void *) hdev;
- hci_send_raw(skb);
- err = len;
- done:
- release_sock(sk);
- return err;
- drop:
- kfree_skb(skb);
- goto done;
- }
- int hci_sock_setsockopt(struct socket *sock, int level, int optname, char *optval, int len)
- {
- struct sock *sk = sock->sk;
- struct hci_filter flt = { opcode: 0 };
- int err = 0, opt = 0;
- BT_DBG("sk %p, opt %d", sk, optname);
- lock_sock(sk);
- switch (optname) {
- case HCI_DATA_DIR:
- if (get_user(opt, (int *)optval)) {
- err = -EFAULT;
- break;
- }
- if (opt)
- hci_pi(sk)->cmsg_mask |= HCI_CMSG_DIR;
- else
- hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_DIR;
- break;
- case HCI_TIME_STAMP:
- if (get_user(opt, (int *)optval)) {
- err = -EFAULT;
- break;
- }
- if (opt)
- hci_pi(sk)->cmsg_mask |= HCI_CMSG_TSTAMP;
- else
- hci_pi(sk)->cmsg_mask &= ~HCI_CMSG_TSTAMP;
- break;
- case HCI_FILTER:
- len = MIN(len, sizeof(struct hci_filter));
- if (copy_from_user(&flt, optval, len)) {
- err = -EFAULT;
- break;
- }
- if (!capable(CAP_NET_RAW)) {
- flt.type_mask &= hci_sec_filter.type_mask;
- flt.event_mask[0] &= hci_sec_filter.event_mask[0];
- flt.event_mask[1] &= hci_sec_filter.event_mask[1];
- }
-
- memcpy(&hci_pi(sk)->filter, &flt, len);
- break;
- default:
- err = -ENOPROTOOPT;
- break;
- };
- release_sock(sk);
- return err;
- }
- int hci_sock_getsockopt(struct socket *sock, int level, int optname, char *optval, int *optlen)
- {
- struct sock *sk = sock->sk;
- int len, opt;
- if (get_user(len, optlen))
- return -EFAULT;
- switch (optname) {
- case HCI_DATA_DIR:
- if (hci_pi(sk)->cmsg_mask & HCI_CMSG_DIR)
- opt = 1;
- else
- opt = 0;
- if (put_user(opt, optval))
- return -EFAULT;
- break;
- case HCI_TIME_STAMP:
- if (hci_pi(sk)->cmsg_mask & HCI_CMSG_TSTAMP)
- opt = 1;
- else
- opt = 0;
- if (put_user(opt, optval))
- return -EFAULT;
- break;
- case HCI_FILTER:
- len = MIN(len, sizeof(struct hci_filter));
- if (copy_to_user(optval, &hci_pi(sk)->filter, len))
- return -EFAULT;
- break;
- default:
- return -ENOPROTOOPT;
- break;
- };
- return 0;
- }
- struct proto_ops hci_sock_ops = {
- family: PF_BLUETOOTH,
- release: hci_sock_release,
- bind: hci_sock_bind,
- getname: hci_sock_getname,
- sendmsg: hci_sock_sendmsg,
- recvmsg: hci_sock_recvmsg,
- ioctl: hci_sock_ioctl,
- poll: datagram_poll,
- listen: sock_no_listen,
- shutdown: sock_no_shutdown,
- setsockopt: hci_sock_setsockopt,
- getsockopt: hci_sock_getsockopt,
- connect: sock_no_connect,
- socketpair: sock_no_socketpair,
- accept: sock_no_accept,
- mmap: sock_no_mmap
- };
- static int hci_sock_create(struct socket *sock, int protocol)
- {
- struct sock *sk;
- BT_DBG("sock %p", sock);
- if (sock->type != SOCK_RAW)
- return -ESOCKTNOSUPPORT;
- sock->ops = &hci_sock_ops;
- if (!(sk = sk_alloc(PF_BLUETOOTH, GFP_KERNEL, 1)))
- return -ENOMEM;
- sock->state = SS_UNCONNECTED;
- sock_init_data(sock, sk);
- memset(&sk->protinfo, 0, sizeof(struct hci_pinfo));
- sk->destruct = NULL;
- sk->protocol = protocol;
- sk->state = BT_OPEN;
- bluez_sock_link(&hci_sk_list, sk);
- MOD_INC_USE_COUNT;
- return 0;
- }
- static int hci_sock_dev_event(struct notifier_block *this, unsigned long event, void *ptr)
- {
- struct hci_dev *hdev = (struct hci_dev *) ptr;
- evt_si_device sd;
-
- BT_DBG("hdev %s event %ld", hdev->name, event);
- /* Send event to sockets */
- sd.event = event;
- sd.dev_id = hdev->id;
- hci_si_event(NULL, EVT_SI_DEVICE, EVT_SI_DEVICE_SIZE, &sd);
-
- if (event == HCI_DEV_UNREG) {
- struct sock *sk;
- /* Detach sockets from device */
- read_lock(&hci_sk_list.lock);
- for (sk = hci_sk_list.head; sk; sk = sk->next) {
- bh_lock_sock(sk);
- if (hci_pi(sk)->hdev == hdev) {
- hci_pi(sk)->hdev = NULL;
- sk->err = EPIPE;
- sk->state = BT_OPEN;
- sk->state_change(sk);
- hci_dev_put(hdev);
- }
- bh_unlock_sock(sk);
- }
- read_unlock(&hci_sk_list.lock);
- }
- return NOTIFY_DONE;
- }
- struct net_proto_family hci_sock_family_ops = {
- family: PF_BLUETOOTH,
- create: hci_sock_create
- };
- struct notifier_block hci_sock_nblock = {
- notifier_call: hci_sock_dev_event
- };
- int hci_sock_init(void)
- {
- if (bluez_sock_register(BTPROTO_HCI, &hci_sock_family_ops)) {
- BT_ERR("Can't register HCI socket");
- return -EPROTO;
- }
- hci_register_notifier(&hci_sock_nblock);
- return 0;
- }
- int hci_sock_cleanup(void)
- {
- if (bluez_sock_unregister(BTPROTO_HCI))
- BT_ERR("Can't unregister HCI socket");
- hci_unregister_notifier(&hci_sock_nblock);
- return 0;
- }