Subversion Repositories test_project

/*

   HCI USB driver for Linux Bluetooth protocol stack (BlueZ)

   Copyright (C) 2000-2001 Qualcomm Incorporated

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

   Copyright (C) 2003 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.

*/

/*

 * Bluetooth HCI USB driver.

 * Based on original USB Bluetooth driver for Linux kernel

 *    Copyright (c) 2000 Greg Kroah-Hartman        <greg@kroah.com>

 *    Copyright (c) 2000 Mark Douglas Corner       <mcorner@umich.edu>

 *

 */

#include <linux/module.h>

#include <linux/kernel.h>

#include <linux/init.h>

#include <linux/unistd.h>

#include <linux/types.h>

#include <linux/interrupt.h>

#include <linux/moduleparam.h>

#include <linux/slab.h>

#include <linux/errno.h>

#include <linux/string.h>

#include <linux/skbuff.h>

#include <linux/usb.h>

#include <net/bluetooth/bluetooth.h>

#include <net/bluetooth/hci_core.h>

#include "hci_usb.h"

#ifndef CONFIG_BT_HCIUSB_DEBUG

#undef  BT_DBG

#define BT_DBG(D...)

#endif

#ifndef CONFIG_BT_HCIUSB_ZERO_PACKET

#undef  URB_ZERO_PACKET

#define URB_ZERO_PACKET 0

#endif

static int ignore = 0;

static int ignore_dga = 0;

static int ignore_csr = 0;

static int ignore_sniffer = 0;

static int disable_scofix = 0;

static int force_scofix = 0;

static int reset = 0;

#ifdef CONFIG_BT_HCIUSB_SCO

static int isoc = 2;

#endif

#define VERSION "2.9"

static struct usb_driver hci_usb_driver;

static struct usb_device_id bluetooth_ids[] = {

        /* Generic Bluetooth USB device */

        { USB_DEVICE_INFO(HCI_DEV_CLASS, HCI_DEV_SUBCLASS, HCI_DEV_PROTOCOL) },

        /* AVM BlueFRITZ! USB v2.0 */

        { USB_DEVICE(0x057c, 0x3800) },

        /* Bluetooth Ultraport Module from IBM */

        { USB_DEVICE(0x04bf, 0x030a) },

        /* ALPS Modules with non-standard id */

        { USB_DEVICE(0x044e, 0x3001) },

        { USB_DEVICE(0x044e, 0x3002) },

        /* Ericsson with non-standard id */

        { USB_DEVICE(0x0bdb, 0x1002) },

        /* Canyon CN-BTU1 with HID interfaces */

        { USB_DEVICE(0x0c10, 0x0000), .driver_info = HCI_RESET },

        { }     /* Terminating entry */

};

MODULE_DEVICE_TABLE (usb, bluetooth_ids);

static struct usb_device_id blacklist_ids[] = {

        /* CSR BlueCore devices */

        { USB_DEVICE(0x0a12, 0x0001), .driver_info = HCI_CSR },

        /* Broadcom BCM2033 without firmware */

        { USB_DEVICE(0x0a5c, 0x2033), .driver_info = HCI_IGNORE },

        /* Broadcom BCM2035 */

        { USB_DEVICE(0x0a5c, 0x200a), .driver_info = HCI_RESET | HCI_WRONG_SCO_MTU },

        { USB_DEVICE(0x0a5c, 0x2009), .driver_info = HCI_BCM92035 },

        /* Broadcom BCM2045 */

        { USB_DEVICE(0x0a5c, 0x2101), .driver_info = HCI_RESET | HCI_WRONG_SCO_MTU },

        /* IBM/Lenovo ThinkPad with Broadcom chip */

        { USB_DEVICE(0x0a5c, 0x201e), .driver_info = HCI_RESET | HCI_WRONG_SCO_MTU },

        { USB_DEVICE(0x0a5c, 0x2110), .driver_info = HCI_RESET | HCI_WRONG_SCO_MTU },

        /* Targus ACB10US */

        { USB_DEVICE(0x0a5c, 0x2100), .driver_info = HCI_RESET },

        /* ANYCOM Bluetooth USB-200 and USB-250 */

        { USB_DEVICE(0x0a5c, 0x2111), .driver_info = HCI_RESET },

        /* HP laptop with Broadcom chip */

        { USB_DEVICE(0x03f0, 0x171d), .driver_info = HCI_RESET | HCI_WRONG_SCO_MTU },

        /* Dell laptop with Broadcom chip */

        { USB_DEVICE(0x413c, 0x8126), .driver_info = HCI_RESET | HCI_WRONG_SCO_MTU },

        /* Microsoft Wireless Transceiver for Bluetooth 2.0 */

        { USB_DEVICE(0x045e, 0x009c), .driver_info = HCI_RESET },

        /* Kensington Bluetooth USB adapter */

        { USB_DEVICE(0x047d, 0x105d), .driver_info = HCI_RESET },

        { USB_DEVICE(0x047d, 0x105e), .driver_info = HCI_RESET | HCI_WRONG_SCO_MTU },

        /* ISSC Bluetooth Adapter v3.1 */

        { USB_DEVICE(0x1131, 0x1001), .driver_info = HCI_RESET },

        /* RTX Telecom based adapters with buggy SCO support */

        { USB_DEVICE(0x0400, 0x0807), .driver_info = HCI_BROKEN_ISOC },

        { USB_DEVICE(0x0400, 0x080a), .driver_info = HCI_BROKEN_ISOC },

        /* Belkin F8T012 and F8T013 devices */

        { USB_DEVICE(0x050d, 0x0012), .driver_info = HCI_RESET | HCI_WRONG_SCO_MTU },

        { USB_DEVICE(0x050d, 0x0013), .driver_info = HCI_RESET | HCI_WRONG_SCO_MTU },

        /* Digianswer devices */

        { USB_DEVICE(0x08fd, 0x0001), .driver_info = HCI_DIGIANSWER },

        { USB_DEVICE(0x08fd, 0x0002), .driver_info = HCI_IGNORE },

        /* CSR BlueCore Bluetooth Sniffer */

        { USB_DEVICE(0x0a12, 0x0002), .driver_info = HCI_SNIFFER },

        /* Frontline ComProbe Bluetooth Sniffer */

        { USB_DEVICE(0x16d3, 0x0002), .driver_info = HCI_SNIFFER },

        { }     /* Terminating entry */

};

static struct _urb *_urb_alloc(int isoc, gfp_t gfp)

{

        struct _urb *_urb = kmalloc(sizeof(struct _urb) +

                                sizeof(struct usb_iso_packet_descriptor) * isoc, gfp);

        if (_urb) {

                memset(_urb, 0, sizeof(*_urb));

                usb_init_urb(&_urb->urb);

        }

        return _urb;

}

static struct _urb *_urb_dequeue(struct _urb_queue *q)

{

        struct _urb *_urb = NULL;

        unsigned long flags;

        spin_lock_irqsave(&q->lock, flags);

        {

                struct list_head *head = &q->head;

                struct list_head *next = head->next;

                if (next != head) {

                        _urb = list_entry(next, struct _urb, list);

                        list_del(next); _urb->queue = NULL;

                }

        }

        spin_unlock_irqrestore(&q->lock, flags);

        return _urb;

}

static void hci_usb_rx_complete(struct urb *urb);

static void hci_usb_tx_complete(struct urb *urb);

#define __pending_tx(husb, type)  (&husb->pending_tx[type-1])

#define __pending_q(husb, type)   (&husb->pending_q[type-1])

#define __completed_q(husb, type) (&husb->completed_q[type-1])

#define __transmit_q(husb, type)  (&husb->transmit_q[type-1])

static inline struct _urb *__get_completed(struct hci_usb *husb, int type)

{

        return _urb_dequeue(__completed_q(husb, type));

}

#ifdef CONFIG_BT_HCIUSB_SCO

static void __fill_isoc_desc(struct urb *urb, int len, int mtu)

{

        int offset = 0, i;

        BT_DBG("len %d mtu %d", len, mtu);

        for (i=0; i < HCI_MAX_ISOC_FRAMES && len >= mtu; i++, offset += mtu, len -= mtu) {

                urb->iso_frame_desc[i].offset = offset;

                urb->iso_frame_desc[i].length = mtu;

                BT_DBG("desc %d offset %d len %d", i, offset, mtu);

        }

        if (len && i < HCI_MAX_ISOC_FRAMES) {

                urb->iso_frame_desc[i].offset = offset;

                urb->iso_frame_desc[i].length = len;

                BT_DBG("desc %d offset %d len %d", i, offset, len);

                i++;

        }

        urb->number_of_packets = i;

}

#endif

static int hci_usb_intr_rx_submit(struct hci_usb *husb)

{

        struct _urb *_urb;

        struct urb *urb;

        int err, pipe, interval, size;

        void *buf;

        BT_DBG("%s", husb->hdev->name);

        size = le16_to_cpu(husb->intr_in_ep->desc.wMaxPacketSize);

        buf = kmalloc(size, GFP_ATOMIC);

        if (!buf)

                return -ENOMEM;

        _urb = _urb_alloc(0, GFP_ATOMIC);

        if (!_urb) {

                kfree(buf);

                return -ENOMEM;

        }

        _urb->type = HCI_EVENT_PKT;

        _urb_queue_tail(__pending_q(husb, _urb->type), _urb);

        urb = &_urb->urb;

        pipe     = usb_rcvintpipe(husb->udev, husb->intr_in_ep->desc.bEndpointAddress);

        interval = husb->intr_in_ep->desc.bInterval;

        usb_fill_int_urb(urb, husb->udev, pipe, buf, size, hci_usb_rx_complete, husb, interval);

        err = usb_submit_urb(urb, GFP_ATOMIC);

        if (err) {

                BT_ERR("%s intr rx submit failed urb %p err %d",

                                husb->hdev->name, urb, err);

                _urb_unlink(_urb);

                _urb_free(_urb);

                kfree(buf);

        }

        return err;

}

static int hci_usb_bulk_rx_submit(struct hci_usb *husb)

{

        struct _urb *_urb;

        struct urb *urb;

        int err, pipe, size = HCI_MAX_FRAME_SIZE;

        void *buf;

        buf = kmalloc(size, GFP_ATOMIC);

        if (!buf)

                return -ENOMEM;

        _urb = _urb_alloc(0, GFP_ATOMIC);

        if (!_urb) {

                kfree(buf);

                return -ENOMEM;

        }

        _urb->type = HCI_ACLDATA_PKT;

        _urb_queue_tail(__pending_q(husb, _urb->type), _urb);

        urb  = &_urb->urb;

        pipe = usb_rcvbulkpipe(husb->udev, husb->bulk_in_ep->desc.bEndpointAddress);

        usb_fill_bulk_urb(urb, husb->udev, pipe, buf, size, hci_usb_rx_complete, husb);

        urb->transfer_flags = 0;

        BT_DBG("%s urb %p", husb->hdev->name, urb);

        err = usb_submit_urb(urb, GFP_ATOMIC);

        if (err) {

                BT_ERR("%s bulk rx submit failed urb %p err %d",

                                husb->hdev->name, urb, err);

                _urb_unlink(_urb);

                _urb_free(_urb);

                kfree(buf);

        }

        return err;

}

#ifdef CONFIG_BT_HCIUSB_SCO

static int hci_usb_isoc_rx_submit(struct hci_usb *husb)

{

        struct _urb *_urb;

        struct urb *urb;

        int err, mtu, size;

        void *buf;

        mtu  = le16_to_cpu(husb->isoc_in_ep->desc.wMaxPacketSize);

        size = mtu * HCI_MAX_ISOC_FRAMES;

        buf = kmalloc(size, GFP_ATOMIC);

        if (!buf)

                return -ENOMEM;

        _urb = _urb_alloc(HCI_MAX_ISOC_FRAMES, GFP_ATOMIC);

        if (!_urb) {

                kfree(buf);

                return -ENOMEM;

        }

        _urb->type = HCI_SCODATA_PKT;

        _urb_queue_tail(__pending_q(husb, _urb->type), _urb);

        urb = &_urb->urb;

        urb->context  = husb;

        urb->dev      = husb->udev;

        urb->pipe     = usb_rcvisocpipe(husb->udev, husb->isoc_in_ep->desc.bEndpointAddress);

        urb->complete = hci_usb_rx_complete;

        urb->interval = husb->isoc_in_ep->desc.bInterval;

        urb->transfer_buffer_length = size;

        urb->transfer_buffer = buf;

        urb->transfer_flags  = URB_ISO_ASAP;

        __fill_isoc_desc(urb, size, mtu);

        BT_DBG("%s urb %p", husb->hdev->name, urb);

        err = usb_submit_urb(urb, GFP_ATOMIC);

        if (err) {

                BT_ERR("%s isoc rx submit failed urb %p err %d",

                                husb->hdev->name, urb, err);

                _urb_unlink(_urb);

                _urb_free(_urb);

                kfree(buf);

        }

        return err;

}

#endif

/* Initialize device */

static int hci_usb_open(struct hci_dev *hdev)

{

        struct hci_usb *husb = (struct hci_usb *) hdev->driver_data;

        int i, err;

        unsigned long flags;

        BT_DBG("%s", hdev->name);

        if (test_and_set_bit(HCI_RUNNING, &hdev->flags))

                return 0;

        write_lock_irqsave(&husb->completion_lock, flags);

        err = hci_usb_intr_rx_submit(husb);

        if (!err) {

                for (i = 0; i < HCI_MAX_BULK_RX; i++)

                        hci_usb_bulk_rx_submit(husb);

#ifdef CONFIG_BT_HCIUSB_SCO

                if (husb->isoc_iface)

                        for (i = 0; i < HCI_MAX_ISOC_RX; i++)

                                hci_usb_isoc_rx_submit(husb);

#endif

        } else {

                clear_bit(HCI_RUNNING, &hdev->flags);

        }

        write_unlock_irqrestore(&husb->completion_lock, flags);

        return err;

}

/* Reset device */

static int hci_usb_flush(struct hci_dev *hdev)

{

        struct hci_usb *husb = (struct hci_usb *) hdev->driver_data;

        int i;

        BT_DBG("%s", hdev->name);

        for (i = 0; i < 4; i++)

                skb_queue_purge(&husb->transmit_q[i]);

        return 0;

}

static void hci_usb_unlink_urbs(struct hci_usb *husb)

{

        int i;

        BT_DBG("%s", husb->hdev->name);

        for (i = 0; i < 4; i++) {

                struct _urb *_urb;

                struct urb *urb;

                /* Kill pending requests */

                while ((_urb = _urb_dequeue(&husb->pending_q[i]))) {

                        urb = &_urb->urb;

                        BT_DBG("%s unlinking _urb %p type %d urb %p",

                                        husb->hdev->name, _urb, _urb->type, urb);

                        usb_kill_urb(urb);

                        _urb_queue_tail(__completed_q(husb, _urb->type), _urb);

                }

                /* Release completed requests */

                while ((_urb = _urb_dequeue(&husb->completed_q[i]))) {

                        urb = &_urb->urb;

                        BT_DBG("%s freeing _urb %p type %d urb %p",

                                        husb->hdev->name, _urb, _urb->type, urb);

                        kfree(urb->setup_packet);

                        kfree(urb->transfer_buffer);

                        _urb_free(_urb);

                }

        }

}

/* Close device */

static int hci_usb_close(struct hci_dev *hdev)

{

        struct hci_usb *husb = (struct hci_usb *) hdev->driver_data;

        unsigned long flags;

        if (!test_and_clear_bit(HCI_RUNNING, &hdev->flags))

                return 0;

        BT_DBG("%s", hdev->name);

        /* Synchronize with completion handlers */

        write_lock_irqsave(&husb->completion_lock, flags);

        write_unlock_irqrestore(&husb->completion_lock, flags);

        hci_usb_unlink_urbs(husb);

        hci_usb_flush(hdev);

        return 0;

}

static int __tx_submit(struct hci_usb *husb, struct _urb *_urb)

{

        struct urb *urb = &_urb->urb;

        int err;

        BT_DBG("%s urb %p type %d", husb->hdev->name, urb, _urb->type);

        _urb_queue_tail(__pending_q(husb, _urb->type), _urb);

        err = usb_submit_urb(urb, GFP_ATOMIC);

        if (err) {

                BT_ERR("%s tx submit failed urb %p type %d err %d",

                                husb->hdev->name, urb, _urb->type, err);

                _urb_unlink(_urb);

                _urb_queue_tail(__completed_q(husb, _urb->type), _urb);

        } else

                atomic_inc(__pending_tx(husb, _urb->type));

        return err;

}

static inline int hci_usb_send_ctrl(struct hci_usb *husb, struct sk_buff *skb)

{

        struct _urb *_urb = __get_completed(husb, bt_cb(skb)->pkt_type);

        struct usb_ctrlrequest *dr;

        struct urb *urb;

        if (!_urb) {

                _urb = _urb_alloc(0, GFP_ATOMIC);

                if (!_urb)

                        return -ENOMEM;

                _urb->type = bt_cb(skb)->pkt_type;

                dr = kmalloc(sizeof(*dr), GFP_ATOMIC);

                if (!dr) {

                        _urb_free(_urb);

                        return -ENOMEM;

                }

        } else

                dr = (void *) _urb->urb.setup_packet;

        dr->bRequestType = husb->ctrl_req;

        dr->bRequest = 0;

        dr->wIndex   = 0;

        dr->wValue   = 0;

        dr->wLength  = __cpu_to_le16(skb->len);

        urb = &_urb->urb;

        usb_fill_control_urb(urb, husb->udev, usb_sndctrlpipe(husb->udev, 0),

                (void *) dr, skb->data, skb->len, hci_usb_tx_complete, husb);

        BT_DBG("%s skb %p len %d", husb->hdev->name, skb, skb->len);

        _urb->priv = skb;

        return __tx_submit(husb, _urb);

}

static inline int hci_usb_send_bulk(struct hci_usb *husb, struct sk_buff *skb)

{

        struct _urb *_urb = __get_completed(husb, bt_cb(skb)->pkt_type);

        struct urb *urb;

        int pipe;

        if (!_urb) {

                _urb = _urb_alloc(0, GFP_ATOMIC);

                if (!_urb)

                        return -ENOMEM;

                _urb->type = bt_cb(skb)->pkt_type;

        }

        urb  = &_urb->urb;

        pipe = usb_sndbulkpipe(husb->udev, husb->bulk_out_ep->desc.bEndpointAddress);

        usb_fill_bulk_urb(urb, husb->udev, pipe, skb->data, skb->len,

                        hci_usb_tx_complete, husb);

        urb->transfer_flags = URB_ZERO_PACKET;

        BT_DBG("%s skb %p len %d", husb->hdev->name, skb, skb->len);

        _urb->priv = skb;

        return __tx_submit(husb, _urb);

}

#ifdef CONFIG_BT_HCIUSB_SCO

static inline int hci_usb_send_isoc(struct hci_usb *husb, struct sk_buff *skb)

{

        struct _urb *_urb = __get_completed(husb, bt_cb(skb)->pkt_type);

        struct urb *urb;

        if (!_urb) {

                _urb = _urb_alloc(HCI_MAX_ISOC_FRAMES, GFP_ATOMIC);

                if (!_urb)

                        return -ENOMEM;

                _urb->type = bt_cb(skb)->pkt_type;

        }

        BT_DBG("%s skb %p len %d", husb->hdev->name, skb, skb->len);

        urb = &_urb->urb;

        urb->context  = husb;

        urb->dev      = husb->udev;

        urb->pipe     = usb_sndisocpipe(husb->udev, husb->isoc_out_ep->desc.bEndpointAddress);

        urb->complete = hci_usb_tx_complete;

        urb->transfer_flags = URB_ISO_ASAP;

        urb->interval = husb->isoc_out_ep->desc.bInterval;

        urb->transfer_buffer = skb->data;

        urb->transfer_buffer_length = skb->len;

        __fill_isoc_desc(urb, skb->len, le16_to_cpu(husb->isoc_out_ep->desc.wMaxPacketSize));

        _urb->priv = skb;

        return __tx_submit(husb, _urb);

}

#endif

static void hci_usb_tx_process(struct hci_usb *husb)

{

        struct sk_buff_head *q;

        struct sk_buff *skb;

        BT_DBG("%s", husb->hdev->name);

        do {

                clear_bit(HCI_USB_TX_WAKEUP, &husb->state);

                /* Process command queue */

                q = __transmit_q(husb, HCI_COMMAND_PKT);

                if (!atomic_read(__pending_tx(husb, HCI_COMMAND_PKT)) &&

                                (skb = skb_dequeue(q))) {

                        if (hci_usb_send_ctrl(husb, skb) < 0)

                                skb_queue_head(q, skb);

                }

#ifdef CONFIG_BT_HCIUSB_SCO

                /* Process SCO queue */

                q = __transmit_q(husb, HCI_SCODATA_PKT);

                if (atomic_read(__pending_tx(husb, HCI_SCODATA_PKT)) < HCI_MAX_ISOC_TX &&

                                (skb = skb_dequeue(q))) {

                        if (hci_usb_send_isoc(husb, skb) < 0)

                                skb_queue_head(q, skb);

                }

#endif

                /* Process ACL queue */

                q = __transmit_q(husb, HCI_ACLDATA_PKT);

                while (atomic_read(__pending_tx(husb, HCI_ACLDATA_PKT)) < HCI_MAX_BULK_TX &&

                                (skb = skb_dequeue(q))) {

                        if (hci_usb_send_bulk(husb, skb) < 0) {

                                skb_queue_head(q, skb);

                                break;

                        }

                }

        } while(test_bit(HCI_USB_TX_WAKEUP, &husb->state));

}

static inline void hci_usb_tx_wakeup(struct hci_usb *husb)

{

        /* Serialize TX queue processing to avoid data reordering */

        if (!test_and_set_bit(HCI_USB_TX_PROCESS, &husb->state)) {

                hci_usb_tx_process(husb);

                clear_bit(HCI_USB_TX_PROCESS, &husb->state);

        } else

                set_bit(HCI_USB_TX_WAKEUP, &husb->state);

}

/* Send frames from HCI layer */

static int hci_usb_send_frame(struct sk_buff *skb)

{

        struct hci_dev *hdev = (struct hci_dev *) skb->dev;

        struct hci_usb *husb;

        if (!hdev) {

                BT_ERR("frame for uknown device (hdev=NULL)");

                return -ENODEV;

        }

        if (!test_bit(HCI_RUNNING, &hdev->flags))

                return -EBUSY;

        BT_DBG("%s type %d len %d", hdev->name, bt_cb(skb)->pkt_type, skb->len);