pcmcia: re-work pcmcia_request_irq()
[linux-2.6/linux-acpi-2.6/ibm-acpi-2.6.git] / drivers / bluetooth / btuart_cs.c
blob1073d660d6252afed050e54bd6cedace95ffa5c0
1 /*
3 * Driver for Bluetooth PCMCIA cards with HCI UART interface
5 * Copyright (C) 2001-2002 Marcel Holtmann <marcel@holtmann.org>
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License version 2 as
10 * published by the Free Software Foundation;
12 * Software distributed under the License is distributed on an "AS
13 * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
14 * implied. See the License for the specific language governing
15 * rights and limitations under the License.
17 * The initial developer of the original code is David A. Hinds
18 * <dahinds@users.sourceforge.net>. Portions created by David A. Hinds
19 * are Copyright (C) 1999 David A. Hinds. All Rights Reserved.
23 #include <linux/module.h>
25 #include <linux/kernel.h>
26 #include <linux/init.h>
27 #include <linux/slab.h>
28 #include <linux/types.h>
29 #include <linux/delay.h>
30 #include <linux/errno.h>
31 #include <linux/ptrace.h>
32 #include <linux/ioport.h>
33 #include <linux/spinlock.h>
34 #include <linux/moduleparam.h>
36 #include <linux/skbuff.h>
37 #include <linux/string.h>
38 #include <linux/serial.h>
39 #include <linux/serial_reg.h>
40 #include <linux/bitops.h>
41 #include <asm/system.h>
42 #include <asm/io.h>
44 #include <pcmcia/cs_types.h>
45 #include <pcmcia/cs.h>
46 #include <pcmcia/cistpl.h>
47 #include <pcmcia/ciscode.h>
48 #include <pcmcia/ds.h>
49 #include <pcmcia/cisreg.h>
51 #include <net/bluetooth/bluetooth.h>
52 #include <net/bluetooth/hci_core.h>
56 /* ======================== Module parameters ======================== */
59 MODULE_AUTHOR("Marcel Holtmann <marcel@holtmann.org>");
60 MODULE_DESCRIPTION("Bluetooth driver for Bluetooth PCMCIA cards with HCI UART interface");
61 MODULE_LICENSE("GPL");
65 /* ======================== Local structures ======================== */
68 typedef struct btuart_info_t {
69 struct pcmcia_device *p_dev;
70 dev_node_t node;
72 struct hci_dev *hdev;
74 spinlock_t lock; /* For serializing operations */
76 struct sk_buff_head txq;
77 unsigned long tx_state;
79 unsigned long rx_state;
80 unsigned long rx_count;
81 struct sk_buff *rx_skb;
82 } btuart_info_t;
85 static int btuart_config(struct pcmcia_device *link);
86 static void btuart_release(struct pcmcia_device *link);
88 static void btuart_detach(struct pcmcia_device *p_dev);
91 /* Maximum baud rate */
92 #define SPEED_MAX 115200
94 /* Default baud rate: 57600, 115200, 230400 or 460800 */
95 #define DEFAULT_BAUD_RATE 115200
98 /* Transmit states */
99 #define XMIT_SENDING 1
100 #define XMIT_WAKEUP 2
101 #define XMIT_WAITING 8
103 /* Receiver states */
104 #define RECV_WAIT_PACKET_TYPE 0
105 #define RECV_WAIT_EVENT_HEADER 1
106 #define RECV_WAIT_ACL_HEADER 2
107 #define RECV_WAIT_SCO_HEADER 3
108 #define RECV_WAIT_DATA 4
112 /* ======================== Interrupt handling ======================== */
115 static int btuart_write(unsigned int iobase, int fifo_size, __u8 *buf, int len)
117 int actual = 0;
119 /* Tx FIFO should be empty */
120 if (!(inb(iobase + UART_LSR) & UART_LSR_THRE))
121 return 0;
123 /* Fill FIFO with current frame */
124 while ((fifo_size-- > 0) && (actual < len)) {
125 /* Transmit next byte */
126 outb(buf[actual], iobase + UART_TX);
127 actual++;
130 return actual;
134 static void btuart_write_wakeup(btuart_info_t *info)
136 if (!info) {
137 BT_ERR("Unknown device");
138 return;
141 if (test_and_set_bit(XMIT_SENDING, &(info->tx_state))) {
142 set_bit(XMIT_WAKEUP, &(info->tx_state));
143 return;
146 do {
147 register unsigned int iobase = info->p_dev->io.BasePort1;
148 register struct sk_buff *skb;
149 register int len;
151 clear_bit(XMIT_WAKEUP, &(info->tx_state));
153 if (!pcmcia_dev_present(info->p_dev))
154 return;
156 if (!(skb = skb_dequeue(&(info->txq))))
157 break;
159 /* Send frame */
160 len = btuart_write(iobase, 16, skb->data, skb->len);
161 set_bit(XMIT_WAKEUP, &(info->tx_state));
163 if (len == skb->len) {
164 kfree_skb(skb);
165 } else {
166 skb_pull(skb, len);
167 skb_queue_head(&(info->txq), skb);
170 info->hdev->stat.byte_tx += len;
172 } while (test_bit(XMIT_WAKEUP, &(info->tx_state)));
174 clear_bit(XMIT_SENDING, &(info->tx_state));
178 static void btuart_receive(btuart_info_t *info)
180 unsigned int iobase;
181 int boguscount = 0;
183 if (!info) {
184 BT_ERR("Unknown device");
185 return;
188 iobase = info->p_dev->io.BasePort1;
190 do {
191 info->hdev->stat.byte_rx++;
193 /* Allocate packet */
194 if (info->rx_skb == NULL) {
195 info->rx_state = RECV_WAIT_PACKET_TYPE;
196 info->rx_count = 0;
197 if (!(info->rx_skb = bt_skb_alloc(HCI_MAX_FRAME_SIZE, GFP_ATOMIC))) {
198 BT_ERR("Can't allocate mem for new packet");
199 return;
203 if (info->rx_state == RECV_WAIT_PACKET_TYPE) {
205 info->rx_skb->dev = (void *) info->hdev;
206 bt_cb(info->rx_skb)->pkt_type = inb(iobase + UART_RX);
208 switch (bt_cb(info->rx_skb)->pkt_type) {
210 case HCI_EVENT_PKT:
211 info->rx_state = RECV_WAIT_EVENT_HEADER;
212 info->rx_count = HCI_EVENT_HDR_SIZE;
213 break;
215 case HCI_ACLDATA_PKT:
216 info->rx_state = RECV_WAIT_ACL_HEADER;
217 info->rx_count = HCI_ACL_HDR_SIZE;
218 break;
220 case HCI_SCODATA_PKT:
221 info->rx_state = RECV_WAIT_SCO_HEADER;
222 info->rx_count = HCI_SCO_HDR_SIZE;
223 break;
225 default:
226 /* Unknown packet */
227 BT_ERR("Unknown HCI packet with type 0x%02x received", bt_cb(info->rx_skb)->pkt_type);
228 info->hdev->stat.err_rx++;
229 clear_bit(HCI_RUNNING, &(info->hdev->flags));
231 kfree_skb(info->rx_skb);
232 info->rx_skb = NULL;
233 break;
237 } else {
239 *skb_put(info->rx_skb, 1) = inb(iobase + UART_RX);
240 info->rx_count--;
242 if (info->rx_count == 0) {
244 int dlen;
245 struct hci_event_hdr *eh;
246 struct hci_acl_hdr *ah;
247 struct hci_sco_hdr *sh;
250 switch (info->rx_state) {
252 case RECV_WAIT_EVENT_HEADER:
253 eh = hci_event_hdr(info->rx_skb);
254 info->rx_state = RECV_WAIT_DATA;
255 info->rx_count = eh->plen;
256 break;
258 case RECV_WAIT_ACL_HEADER:
259 ah = hci_acl_hdr(info->rx_skb);
260 dlen = __le16_to_cpu(ah->dlen);
261 info->rx_state = RECV_WAIT_DATA;
262 info->rx_count = dlen;
263 break;
265 case RECV_WAIT_SCO_HEADER:
266 sh = hci_sco_hdr(info->rx_skb);
267 info->rx_state = RECV_WAIT_DATA;
268 info->rx_count = sh->dlen;
269 break;
271 case RECV_WAIT_DATA:
272 hci_recv_frame(info->rx_skb);
273 info->rx_skb = NULL;
274 break;
282 /* Make sure we don't stay here too long */
283 if (boguscount++ > 16)
284 break;
286 } while (inb(iobase + UART_LSR) & UART_LSR_DR);
290 static irqreturn_t btuart_interrupt(int irq, void *dev_inst)
292 btuart_info_t *info = dev_inst;
293 unsigned int iobase;
294 int boguscount = 0;
295 int iir, lsr;
296 irqreturn_t r = IRQ_NONE;
298 if (!info || !info->hdev)
299 /* our irq handler is shared */
300 return IRQ_NONE;
302 iobase = info->p_dev->io.BasePort1;
304 spin_lock(&(info->lock));
306 iir = inb(iobase + UART_IIR) & UART_IIR_ID;
307 while (iir) {
308 r = IRQ_HANDLED;
310 /* Clear interrupt */
311 lsr = inb(iobase + UART_LSR);
313 switch (iir) {
314 case UART_IIR_RLSI:
315 BT_ERR("RLSI");
316 break;
317 case UART_IIR_RDI:
318 /* Receive interrupt */
319 btuart_receive(info);
320 break;
321 case UART_IIR_THRI:
322 if (lsr & UART_LSR_THRE) {
323 /* Transmitter ready for data */
324 btuart_write_wakeup(info);
326 break;
327 default:
328 BT_ERR("Unhandled IIR=%#x", iir);
329 break;
332 /* Make sure we don't stay here too long */
333 if (boguscount++ > 100)
334 break;
336 iir = inb(iobase + UART_IIR) & UART_IIR_ID;
340 spin_unlock(&(info->lock));
342 return r;
346 static void btuart_change_speed(btuart_info_t *info, unsigned int speed)
348 unsigned long flags;
349 unsigned int iobase;
350 int fcr; /* FIFO control reg */
351 int lcr; /* Line control reg */
352 int divisor;
354 if (!info) {
355 BT_ERR("Unknown device");
356 return;
359 iobase = info->p_dev->io.BasePort1;
361 spin_lock_irqsave(&(info->lock), flags);
363 /* Turn off interrupts */
364 outb(0, iobase + UART_IER);
366 divisor = SPEED_MAX / speed;
368 fcr = UART_FCR_ENABLE_FIFO | UART_FCR_CLEAR_RCVR | UART_FCR_CLEAR_XMIT;
371 * Use trigger level 1 to avoid 3 ms. timeout delay at 9600 bps, and
372 * almost 1,7 ms at 19200 bps. At speeds above that we can just forget
373 * about this timeout since it will always be fast enough.
376 if (speed < 38400)
377 fcr |= UART_FCR_TRIGGER_1;
378 else
379 fcr |= UART_FCR_TRIGGER_14;
381 /* Bluetooth cards use 8N1 */
382 lcr = UART_LCR_WLEN8;
384 outb(UART_LCR_DLAB | lcr, iobase + UART_LCR); /* Set DLAB */
385 outb(divisor & 0xff, iobase + UART_DLL); /* Set speed */
386 outb(divisor >> 8, iobase + UART_DLM);
387 outb(lcr, iobase + UART_LCR); /* Set 8N1 */
388 outb(fcr, iobase + UART_FCR); /* Enable FIFO's */
390 /* Turn on interrupts */
391 outb(UART_IER_RLSI | UART_IER_RDI | UART_IER_THRI, iobase + UART_IER);
393 spin_unlock_irqrestore(&(info->lock), flags);
398 /* ======================== HCI interface ======================== */
401 static int btuart_hci_flush(struct hci_dev *hdev)
403 btuart_info_t *info = (btuart_info_t *)(hdev->driver_data);
405 /* Drop TX queue */
406 skb_queue_purge(&(info->txq));
408 return 0;
412 static int btuart_hci_open(struct hci_dev *hdev)
414 set_bit(HCI_RUNNING, &(hdev->flags));
416 return 0;
420 static int btuart_hci_close(struct hci_dev *hdev)
422 if (!test_and_clear_bit(HCI_RUNNING, &(hdev->flags)))
423 return 0;
425 btuart_hci_flush(hdev);
427 return 0;
431 static int btuart_hci_send_frame(struct sk_buff *skb)
433 btuart_info_t *info;
434 struct hci_dev *hdev = (struct hci_dev *)(skb->dev);
436 if (!hdev) {
437 BT_ERR("Frame for unknown HCI device (hdev=NULL)");
438 return -ENODEV;
441 info = (btuart_info_t *)(hdev->driver_data);
443 switch (bt_cb(skb)->pkt_type) {
444 case HCI_COMMAND_PKT:
445 hdev->stat.cmd_tx++;
446 break;
447 case HCI_ACLDATA_PKT:
448 hdev->stat.acl_tx++;
449 break;
450 case HCI_SCODATA_PKT:
451 hdev->stat.sco_tx++;
452 break;
455 /* Prepend skb with frame type */
456 memcpy(skb_push(skb, 1), &bt_cb(skb)->pkt_type, 1);
457 skb_queue_tail(&(info->txq), skb);
459 btuart_write_wakeup(info);
461 return 0;
465 static void btuart_hci_destruct(struct hci_dev *hdev)
470 static int btuart_hci_ioctl(struct hci_dev *hdev, unsigned int cmd, unsigned long arg)
472 return -ENOIOCTLCMD;
477 /* ======================== Card services HCI interaction ======================== */
480 static int btuart_open(btuart_info_t *info)
482 unsigned long flags;
483 unsigned int iobase = info->p_dev->io.BasePort1;
484 struct hci_dev *hdev;
486 spin_lock_init(&(info->lock));
488 skb_queue_head_init(&(info->txq));
490 info->rx_state = RECV_WAIT_PACKET_TYPE;
491 info->rx_count = 0;
492 info->rx_skb = NULL;
494 /* Initialize HCI device */
495 hdev = hci_alloc_dev();
496 if (!hdev) {
497 BT_ERR("Can't allocate HCI device");
498 return -ENOMEM;
501 info->hdev = hdev;
503 hdev->bus = HCI_PCCARD;
504 hdev->driver_data = info;
505 SET_HCIDEV_DEV(hdev, &info->p_dev->dev);
507 hdev->open = btuart_hci_open;
508 hdev->close = btuart_hci_close;
509 hdev->flush = btuart_hci_flush;
510 hdev->send = btuart_hci_send_frame;
511 hdev->destruct = btuart_hci_destruct;
512 hdev->ioctl = btuart_hci_ioctl;
514 hdev->owner = THIS_MODULE;
516 spin_lock_irqsave(&(info->lock), flags);
518 /* Reset UART */
519 outb(0, iobase + UART_MCR);
521 /* Turn off interrupts */
522 outb(0, iobase + UART_IER);
524 /* Initialize UART */
525 outb(UART_LCR_WLEN8, iobase + UART_LCR); /* Reset DLAB */
526 outb((UART_MCR_DTR | UART_MCR_RTS | UART_MCR_OUT2), iobase + UART_MCR);
528 /* Turn on interrupts */
529 // outb(UART_IER_RLSI | UART_IER_RDI | UART_IER_THRI, iobase + UART_IER);
531 spin_unlock_irqrestore(&(info->lock), flags);
533 btuart_change_speed(info, DEFAULT_BAUD_RATE);
535 /* Timeout before it is safe to send the first HCI packet */
536 msleep(1000);
538 /* Register HCI device */
539 if (hci_register_dev(hdev) < 0) {
540 BT_ERR("Can't register HCI device");
541 info->hdev = NULL;
542 hci_free_dev(hdev);
543 return -ENODEV;
546 return 0;
550 static int btuart_close(btuart_info_t *info)
552 unsigned long flags;
553 unsigned int iobase = info->p_dev->io.BasePort1;
554 struct hci_dev *hdev = info->hdev;
556 if (!hdev)
557 return -ENODEV;
559 btuart_hci_close(hdev);
561 spin_lock_irqsave(&(info->lock), flags);
563 /* Reset UART */
564 outb(0, iobase + UART_MCR);
566 /* Turn off interrupts */
567 outb(0, iobase + UART_IER);
569 spin_unlock_irqrestore(&(info->lock), flags);
571 if (hci_unregister_dev(hdev) < 0)
572 BT_ERR("Can't unregister HCI device %s", hdev->name);
574 hci_free_dev(hdev);
576 return 0;
579 static int btuart_probe(struct pcmcia_device *link)
581 btuart_info_t *info;
583 /* Create new info device */
584 info = kzalloc(sizeof(*info), GFP_KERNEL);
585 if (!info)
586 return -ENOMEM;
588 info->p_dev = link;
589 link->priv = info;
591 link->io.Attributes1 = IO_DATA_PATH_WIDTH_8;
592 link->io.NumPorts1 = 8;
594 link->conf.Attributes = CONF_ENABLE_IRQ;
595 link->conf.IntType = INT_MEMORY_AND_IO;
597 return btuart_config(link);
601 static void btuart_detach(struct pcmcia_device *link)
603 btuart_info_t *info = link->priv;
605 btuart_release(link);
606 kfree(info);
609 static int btuart_check_config(struct pcmcia_device *p_dev,
610 cistpl_cftable_entry_t *cf,
611 cistpl_cftable_entry_t *dflt,
612 unsigned int vcc,
613 void *priv_data)
615 int *try = priv_data;
617 if (cf->vpp1.present & (1 << CISTPL_POWER_VNOM))
618 p_dev->conf.Vpp = cf->vpp1.param[CISTPL_POWER_VNOM] / 10000;
619 if ((cf->io.nwin > 0) && (cf->io.win[0].len == 8) &&
620 (cf->io.win[0].base != 0)) {
621 p_dev->io.BasePort1 = cf->io.win[0].base;
622 p_dev->io.IOAddrLines = (*try == 0) ? 16 :
623 cf->io.flags & CISTPL_IO_LINES_MASK;
624 if (!pcmcia_request_io(p_dev, &p_dev->io))
625 return 0;
627 return -ENODEV;
630 static int btuart_check_config_notpicky(struct pcmcia_device *p_dev,
631 cistpl_cftable_entry_t *cf,
632 cistpl_cftable_entry_t *dflt,
633 unsigned int vcc,
634 void *priv_data)
636 static unsigned int base[5] = { 0x3f8, 0x2f8, 0x3e8, 0x2e8, 0x0 };
637 int j;
639 if ((cf->io.nwin > 0) && ((cf->io.flags & CISTPL_IO_LINES_MASK) <= 3)) {
640 for (j = 0; j < 5; j++) {
641 p_dev->io.BasePort1 = base[j];
642 p_dev->io.IOAddrLines = base[j] ? 16 : 3;
643 if (!pcmcia_request_io(p_dev, &p_dev->io))
644 return 0;
647 return -ENODEV;
650 static int btuart_config(struct pcmcia_device *link)
652 btuart_info_t *info = link->priv;
653 int i;
654 int try;
656 /* First pass: look for a config entry that looks normal.
657 Two tries: without IO aliases, then with aliases */
658 for (try = 0; try < 2; try++)
659 if (!pcmcia_loop_config(link, btuart_check_config, &try))
660 goto found_port;
662 /* Second pass: try to find an entry that isn't picky about
663 its base address, then try to grab any standard serial port
664 address, and finally try to get any free port. */
665 if (!pcmcia_loop_config(link, btuart_check_config_notpicky, NULL))
666 goto found_port;
668 BT_ERR("No usable port range found");
669 goto failed;
671 found_port:
672 i = pcmcia_request_irq(link, btuart_interrupt);
673 if (i != 0)
674 goto failed;
676 i = pcmcia_request_configuration(link, &link->conf);
677 if (i != 0)
678 goto failed;
680 if (btuart_open(info) != 0)
681 goto failed;
683 strcpy(info->node.dev_name, info->hdev->name);
684 link->dev_node = &info->node;
686 return 0;
688 failed:
689 btuart_release(link);
690 return -ENODEV;
694 static void btuart_release(struct pcmcia_device *link)
696 btuart_info_t *info = link->priv;
698 btuart_close(info);
700 pcmcia_disable_device(link);
703 static struct pcmcia_device_id btuart_ids[] = {
704 /* don't use this driver. Use serial_cs + hci_uart instead */
705 PCMCIA_DEVICE_NULL
707 MODULE_DEVICE_TABLE(pcmcia, btuart_ids);
709 static struct pcmcia_driver btuart_driver = {
710 .owner = THIS_MODULE,
711 .drv = {
712 .name = "btuart_cs",
714 .probe = btuart_probe,
715 .remove = btuart_detach,
716 .id_table = btuart_ids,
719 static int __init init_btuart_cs(void)
721 return pcmcia_register_driver(&btuart_driver);
725 static void __exit exit_btuart_cs(void)
727 pcmcia_unregister_driver(&btuart_driver);
730 module_init(init_btuart_cs);
731 module_exit(exit_btuart_cs);