drivers/bluetooth/hci_ath.c

   1 /*
   2  *  Atheros Communication Bluetooth HCIATH3K UART protocol
   3  *
   4  *  HCIATH3K (HCI Atheros AR300x Protocol) is a Atheros Communication's
   5  *  power management protocol extension to H4 to support AR300x Bluetooth Chip.
   6  *
   7  *  Copyright (c) 2009-2010 Atheros Communications Inc.
   8  *
   9  *  Acknowledgements:
  10  *  This file is based on hci_h4.c, which was written
  11  *  by Maxim Krasnyansky and Marcel Holtmann.
  12  *
  13  *  This program is free software; you can redistribute it and/or modify
  14  *  it under the terms of the GNU General Public License as published by
  15  *  the Free Software Foundation; either version 2 of the License, or
  16  *  (at your option) any later version.
  17  *
  18  *  This program is distributed in the hope that it will be useful,
  19  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  *  GNU General Public License for more details.
  22  *
  23  *  You should have received a copy of the GNU General Public License
  24  *  along with this program; if not, write to the Free Software
  25  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  26  *
  27  */
  28
  29 #include <linux/module.h>
  30 #include <linux/kernel.h>
  31
  32 #include <linux/init.h>
  33 #include <linux/slab.h>
  34 #include <linux/tty.h>
  35 #include <linux/errno.h>
  36 #include <linux/ioctl.h>
  37 #include <linux/skbuff.h>
  38
  39 #include <net/bluetooth/bluetooth.h>
  40 #include <net/bluetooth/hci_core.h>
  41
  42 #include "hci_uart.h"
  43
  44 struct ath_struct {
  45         struct hci_uart *hu;
  46         unsigned int cur_sleep;
  47
  48         struct sk_buff *rx_skb;
  49         struct sk_buff_head txq;
  50         struct work_struct ctxtsw;
  51 };
  52
  53 static int ath_wakeup_ar3k(struct tty_struct *tty)
  54 {
  55         int status = tty->driver->ops->tiocmget(tty);
  56
  57         if (status & TIOCM_CTS)
  58                 return status;
  59
  60         /* Clear RTS first */
  61         tty->driver->ops->tiocmget(tty);
  62         tty->driver->ops->tiocmset(tty, 0x00, TIOCM_RTS);
  63         mdelay(20);
  64
  65         /* Set RTS, wake up board */
  66         tty->driver->ops->tiocmget(tty);
  67         tty->driver->ops->tiocmset(tty, TIOCM_RTS, 0x00);
  68         mdelay(20);
  69
  70         status = tty->driver->ops->tiocmget(tty);
  71         return status;
  72 }
  73
  74 static void ath_hci_uart_work(struct work_struct *work)
  75 {
  76         int status;
  77         struct ath_struct *ath;
  78         struct hci_uart *hu;
  79         struct tty_struct *tty;
  80
  81         ath = container_of(work, struct ath_struct, ctxtsw);
  82
  83         hu = ath->hu;
  84         tty = hu->tty;
  85
  86         /* verify and wake up controller */
  87         if (ath->cur_sleep) {
  88                 status = ath_wakeup_ar3k(tty);
  89                 if (!(status & TIOCM_CTS))
  90                         return;
  91         }
  92
  93         /* Ready to send Data */
  94         clear_bit(HCI_UART_SENDING, &hu->tx_state);
  95         hci_uart_tx_wakeup(hu);
  96 }
  97
  98 static int ath_open(struct hci_uart *hu)
  99 {
 100         struct ath_struct *ath;
 101
 102         BT_DBG("hu %p", hu);
 103
 104         ath = kzalloc(sizeof(*ath), GFP_KERNEL);
 105         if (!ath)
 106                 return -ENOMEM;
 107
 108         skb_queue_head_init(&ath->txq);
 109
 110         hu->priv = ath;
 111         ath->hu = hu;
 112
 113         INIT_WORK(&ath->ctxtsw, ath_hci_uart_work);
 114
 115         return 0;
 116 }
 117
 118 static int ath_close(struct hci_uart *hu)
 119 {
 120         struct ath_struct *ath = hu->priv;
 121
 122         BT_DBG("hu %p", hu);
 123
 124         skb_queue_purge(&ath->txq);
 125
 126         kfree_skb(ath->rx_skb);
 127
 128         cancel_work_sync(&ath->ctxtsw);
 129
 130         hu->priv = NULL;
 131         kfree(ath);
 132
 133         return 0;
 134 }
 135
 136 static int ath_flush(struct hci_uart *hu)
 137 {
 138         struct ath_struct *ath = hu->priv;
 139
 140         BT_DBG("hu %p", hu);
 141
 142         skb_queue_purge(&ath->txq);
 143
 144         return 0;
 145 }
 146
 147 static int ath_set_bdaddr(struct hci_dev *hdev, const bdaddr_t *bdaddr)
 148 {
 149         struct sk_buff *skb;
 150         u8 buf[10];
 151         int err;
 152
 153         buf[0] = 0x01;
 154         buf[1] = 0x01;
 155         buf[2] = 0x00;
 156         buf[3] = sizeof(bdaddr_t);
 157         memcpy(buf + 4, bdaddr, sizeof(bdaddr_t));
 158
 159         skb = __hci_cmd_sync(hdev, 0xfc0b, sizeof(buf), buf, HCI_INIT_TIMEOUT);
 160         if (IS_ERR(skb)) {
 161                 err = PTR_ERR(skb);
 162                 BT_ERR("%s: Change address command failed (%d)",
 163                        hdev->name, err);
 164                 return err;
 165         }
 166         kfree_skb(skb);
 167
 168         return 0;
 169 }
 170
 171 static int ath_setup(struct hci_uart *hu)
 172 {
 173         BT_DBG("hu %p", hu);
 174
 175         hu->hdev->set_bdaddr = ath_set_bdaddr;
 176
 177         return 0;
 178 }
 179
 180 static const struct h4_recv_pkt ath_recv_pkts[] = {
 181         { H4_RECV_ACL,   .recv = hci_recv_frame },
 182         { H4_RECV_SCO,   .recv = hci_recv_frame },
 183         { H4_RECV_EVENT, .recv = hci_recv_frame },
 184 };
 185
 186 static int ath_recv(struct hci_uart *hu, const void *data, int count)
 187 {
 188         struct ath_struct *ath = hu->priv;
 189
 190         ath->rx_skb = h4_recv_buf(hu->hdev, ath->rx_skb, data, count,
 191                                   ath_recv_pkts, ARRAY_SIZE(ath_recv_pkts));
 192         if (IS_ERR(ath->rx_skb)) {
 193                 int err = PTR_ERR(ath->rx_skb);
 194                 BT_ERR("%s: Frame reassembly failed (%d)", hu->hdev->name, err);
 195                 ath->rx_skb = NULL;
 196                 return err;
 197         }
 198
 199         return count;
 200 }
 201
 202 #define HCI_OP_ATH_SLEEP 0xFC04
 203
 204 static int ath_enqueue(struct hci_uart *hu, struct sk_buff *skb)
 205 {
 206         struct ath_struct *ath = hu->priv;
 207
 208         if (bt_cb(skb)->pkt_type == HCI_SCODATA_PKT) {
 209                 kfree_skb(skb);
 210                 return 0;
 211         }
 212
 213         /* Update power management enable flag with parameters of
 214          * HCI sleep enable vendor specific HCI command.
 215          */
 216         if (bt_cb(skb)->pkt_type == HCI_COMMAND_PKT) {
 217                 struct hci_command_hdr *hdr = (void *)skb->data;
 218
 219                 if (__le16_to_cpu(hdr->opcode) == HCI_OP_ATH_SLEEP)
 220                         ath->cur_sleep = skb->data[HCI_COMMAND_HDR_SIZE];
 221         }
 222
 223         BT_DBG("hu %p skb %p", hu, skb);
 224
 225         /* Prepend skb with frame type */
 226         memcpy(skb_push(skb, 1), &bt_cb(skb)->pkt_type, 1);
 227
 228         skb_queue_tail(&ath->txq, skb);
 229         set_bit(HCI_UART_SENDING, &hu->tx_state);
 230
 231         schedule_work(&ath->ctxtsw);
 232
 233         return 0;
 234 }
 235
 236 static struct sk_buff *ath_dequeue(struct hci_uart *hu)
 237 {
 238         struct ath_struct *ath = hu->priv;
 239
 240         return skb_dequeue(&ath->txq);
 241 }
 242
 243 static const struct hci_uart_proto athp = {
 244         .id             = HCI_UART_ATH3K,
 245         .name           = "ATH3K",
 246         .open           = ath_open,
 247         .close          = ath_close,
 248         .flush          = ath_flush,
 249         .setup          = ath_setup,
 250         .recv           = ath_recv,
 251         .enqueue        = ath_enqueue,
 252         .dequeue        = ath_dequeue,
 253 };
 254
 255 int __init ath_init(void)
 256 {
 257         return hci_uart_register_proto(&athp);
 258 }
 259
 260 int __exit ath_deinit(void)
 261 {
 262         return hci_uart_unregister_proto(&athp);
 263 }