Pull bugzilla-5653 into release branch
[linux-2.6] / drivers / bluetooth / bluecard_cs.c
1 /*
2  *
3  *  Bluetooth driver for the Anycom BlueCard (LSE039/LSE041)
4  *
5  *  Copyright (C) 2001-2002  Marcel Holtmann <marcel@holtmann.org>
6  *
7  *
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;
11  *
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.
16  *
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.
20  *
21  */
22
23 #include <linux/config.h>
24 #include <linux/module.h>
25
26 #include <linux/kernel.h>
27 #include <linux/init.h>
28 #include <linux/slab.h>
29 #include <linux/types.h>
30 #include <linux/sched.h>
31 #include <linux/delay.h>
32 #include <linux/timer.h>
33 #include <linux/errno.h>
34 #include <linux/ptrace.h>
35 #include <linux/ioport.h>
36 #include <linux/spinlock.h>
37 #include <linux/moduleparam.h>
38 #include <linux/wait.h>
39
40 #include <linux/skbuff.h>
41 #include <asm/io.h>
42
43 #include <pcmcia/cs_types.h>
44 #include <pcmcia/cs.h>
45 #include <pcmcia/cistpl.h>
46 #include <pcmcia/ciscode.h>
47 #include <pcmcia/ds.h>
48 #include <pcmcia/cisreg.h>
49
50 #include <net/bluetooth/bluetooth.h>
51 #include <net/bluetooth/hci_core.h>
52
53
54
55 /* ======================== Module parameters ======================== */
56
57
58 MODULE_AUTHOR("Marcel Holtmann <marcel@holtmann.org>");
59 MODULE_DESCRIPTION("Bluetooth driver for the Anycom BlueCard (LSE039/LSE041)");
60 MODULE_LICENSE("GPL");
61
62
63
64 /* ======================== Local structures ======================== */
65
66
67 typedef struct bluecard_info_t {
68         struct pcmcia_device *p_dev;
69         dev_node_t node;
70
71         struct hci_dev *hdev;
72
73         spinlock_t lock;                /* For serializing operations */
74         struct timer_list timer;        /* For LED control */
75
76         struct sk_buff_head txq;
77         unsigned long tx_state;
78
79         unsigned long rx_state;
80         unsigned long rx_count;
81         struct sk_buff *rx_skb;
82
83         unsigned char ctrl_reg;
84         unsigned long hw_state;         /* Status of the hardware and LED control */
85 } bluecard_info_t;
86
87
88 static int bluecard_config(struct pcmcia_device *link);
89 static void bluecard_release(struct pcmcia_device *link);
90
91 static void bluecard_detach(struct pcmcia_device *p_dev);
92
93
94 /* Default baud rate: 57600, 115200, 230400 or 460800 */
95 #define DEFAULT_BAUD_RATE  230400
96
97
98 /* Hardware states */
99 #define CARD_READY             1
100 #define CARD_HAS_PCCARD_ID     4
101 #define CARD_HAS_POWER_LED     5
102 #define CARD_HAS_ACTIVITY_LED  6
103
104 /* Transmit states  */
105 #define XMIT_SENDING         1
106 #define XMIT_WAKEUP          2
107 #define XMIT_BUFFER_NUMBER   5  /* unset = buffer one, set = buffer two */
108 #define XMIT_BUF_ONE_READY   6
109 #define XMIT_BUF_TWO_READY   7
110 #define XMIT_SENDING_READY   8
111
112 /* Receiver states */
113 #define RECV_WAIT_PACKET_TYPE   0
114 #define RECV_WAIT_EVENT_HEADER  1
115 #define RECV_WAIT_ACL_HEADER    2
116 #define RECV_WAIT_SCO_HEADER    3
117 #define RECV_WAIT_DATA          4
118
119 /* Special packet types */
120 #define PKT_BAUD_RATE_57600   0x80
121 #define PKT_BAUD_RATE_115200  0x81
122 #define PKT_BAUD_RATE_230400  0x82
123 #define PKT_BAUD_RATE_460800  0x83
124
125
126 /* These are the register offsets */
127 #define REG_COMMAND     0x20
128 #define REG_INTERRUPT   0x21
129 #define REG_CONTROL     0x22
130 #define REG_RX_CONTROL  0x24
131 #define REG_CARD_RESET  0x30
132 #define REG_LED_CTRL    0x30
133
134 /* REG_COMMAND */
135 #define REG_COMMAND_TX_BUF_ONE  0x01
136 #define REG_COMMAND_TX_BUF_TWO  0x02
137 #define REG_COMMAND_RX_BUF_ONE  0x04
138 #define REG_COMMAND_RX_BUF_TWO  0x08
139 #define REG_COMMAND_RX_WIN_ONE  0x00
140 #define REG_COMMAND_RX_WIN_TWO  0x10
141
142 /* REG_CONTROL */
143 #define REG_CONTROL_BAUD_RATE_57600   0x00
144 #define REG_CONTROL_BAUD_RATE_115200  0x01
145 #define REG_CONTROL_BAUD_RATE_230400  0x02
146 #define REG_CONTROL_BAUD_RATE_460800  0x03
147 #define REG_CONTROL_RTS               0x04
148 #define REG_CONTROL_BT_ON             0x08
149 #define REG_CONTROL_BT_RESET          0x10
150 #define REG_CONTROL_BT_RES_PU         0x20
151 #define REG_CONTROL_INTERRUPT         0x40
152 #define REG_CONTROL_CARD_RESET        0x80
153
154 /* REG_RX_CONTROL */
155 #define RTS_LEVEL_SHIFT_BITS  0x02
156
157
158
159 /* ======================== LED handling routines ======================== */
160
161
162 static void bluecard_activity_led_timeout(u_long arg)
163 {
164         bluecard_info_t *info = (bluecard_info_t *)arg;
165         unsigned int iobase = info->p_dev->io.BasePort1;
166
167         if (!test_bit(CARD_HAS_PCCARD_ID, &(info->hw_state)))
168                 return;
169
170         if (test_bit(CARD_HAS_ACTIVITY_LED, &(info->hw_state))) {
171                 /* Disable activity LED */
172                 outb(0x08 | 0x20, iobase + 0x30);
173         } else {
174                 /* Disable power LED */
175                 outb(0x00, iobase + 0x30);
176         }
177 }
178
179
180 static void bluecard_enable_activity_led(bluecard_info_t *info)
181 {
182         unsigned int iobase = info->p_dev->io.BasePort1;
183
184         if (!test_bit(CARD_HAS_PCCARD_ID, &(info->hw_state)))
185                 return;
186
187         if (test_bit(CARD_HAS_ACTIVITY_LED, &(info->hw_state))) {
188                 /* Enable activity LED */
189                 outb(0x10 | 0x40, iobase + 0x30);
190
191                 /* Stop the LED after HZ/4 */
192                 mod_timer(&(info->timer), jiffies + HZ / 4);
193         } else {
194                 /* Enable power LED */
195                 outb(0x08 | 0x20, iobase + 0x30);
196
197                 /* Stop the LED after HZ/2 */
198                 mod_timer(&(info->timer), jiffies + HZ / 2);
199         }
200 }
201
202
203
204 /* ======================== Interrupt handling ======================== */
205
206
207 static int bluecard_write(unsigned int iobase, unsigned int offset, __u8 *buf, int len)
208 {
209         int i, actual;
210
211         actual = (len > 15) ? 15 : len;
212
213         outb_p(actual, iobase + offset);
214
215         for (i = 0; i < actual; i++)
216                 outb_p(buf[i], iobase + offset + i + 1);
217
218         return actual;
219 }
220
221
222 static void bluecard_write_wakeup(bluecard_info_t *info)
223 {
224         if (!info) {
225                 BT_ERR("Unknown device");
226                 return;
227         }
228
229         if (!test_bit(XMIT_SENDING_READY, &(info->tx_state)))
230                 return;
231
232         if (test_and_set_bit(XMIT_SENDING, &(info->tx_state))) {
233                 set_bit(XMIT_WAKEUP, &(info->tx_state));
234                 return;
235         }
236
237         do {
238                 register unsigned int iobase = info->p_dev->io.BasePort1;
239                 register unsigned int offset;
240                 register unsigned char command;
241                 register unsigned long ready_bit;
242                 register struct sk_buff *skb;
243                 register int len;
244
245                 clear_bit(XMIT_WAKEUP, &(info->tx_state));
246
247                 if (!pcmcia_dev_present(info->p_dev))
248                         return;
249
250                 if (test_bit(XMIT_BUFFER_NUMBER, &(info->tx_state))) {
251                         if (!test_bit(XMIT_BUF_TWO_READY, &(info->tx_state)))
252                                 break;
253                         offset = 0x10;
254                         command = REG_COMMAND_TX_BUF_TWO;
255                         ready_bit = XMIT_BUF_TWO_READY;
256                 } else {
257                         if (!test_bit(XMIT_BUF_ONE_READY, &(info->tx_state)))
258                                 break;
259                         offset = 0x00;
260                         command = REG_COMMAND_TX_BUF_ONE;
261                         ready_bit = XMIT_BUF_ONE_READY;
262                 }
263
264                 if (!(skb = skb_dequeue(&(info->txq))))
265                         break;
266
267                 if (bt_cb(skb)->pkt_type & 0x80) {
268                         /* Disable RTS */
269                         info->ctrl_reg |= REG_CONTROL_RTS;
270                         outb(info->ctrl_reg, iobase + REG_CONTROL);
271                 }
272
273                 /* Activate LED */
274                 bluecard_enable_activity_led(info);
275
276                 /* Send frame */
277                 len = bluecard_write(iobase, offset, skb->data, skb->len);
278
279                 /* Tell the FPGA to send the data */
280                 outb_p(command, iobase + REG_COMMAND);
281
282                 /* Mark the buffer as dirty */
283                 clear_bit(ready_bit, &(info->tx_state));
284
285                 if (bt_cb(skb)->pkt_type & 0x80) {
286                         DECLARE_WAIT_QUEUE_HEAD(wq);
287                         DEFINE_WAIT(wait);
288
289                         unsigned char baud_reg;
290
291                         switch (bt_cb(skb)->pkt_type) {
292                         case PKT_BAUD_RATE_460800:
293                                 baud_reg = REG_CONTROL_BAUD_RATE_460800;
294                                 break;
295                         case PKT_BAUD_RATE_230400:
296                                 baud_reg = REG_CONTROL_BAUD_RATE_230400;
297                                 break;
298                         case PKT_BAUD_RATE_115200:
299                                 baud_reg = REG_CONTROL_BAUD_RATE_115200;
300                                 break;
301                         case PKT_BAUD_RATE_57600:
302                                 /* Fall through... */
303                         default:
304                                 baud_reg = REG_CONTROL_BAUD_RATE_57600;
305                                 break;
306                         }
307
308                         /* Wait until the command reaches the baseband */
309                         prepare_to_wait(&wq, &wait, TASK_INTERRUPTIBLE);
310                         schedule_timeout(HZ/10);
311                         finish_wait(&wq, &wait);
312
313                         /* Set baud on baseband */
314                         info->ctrl_reg &= ~0x03;
315                         info->ctrl_reg |= baud_reg;
316                         outb(info->ctrl_reg, iobase + REG_CONTROL);
317
318                         /* Enable RTS */
319                         info->ctrl_reg &= ~REG_CONTROL_RTS;
320                         outb(info->ctrl_reg, iobase + REG_CONTROL);
321
322                         /* Wait before the next HCI packet can be send */
323                         prepare_to_wait(&wq, &wait, TASK_INTERRUPTIBLE);
324                         schedule_timeout(HZ);
325                         finish_wait(&wq, &wait);
326                 }
327
328                 if (len == skb->len) {
329                         kfree_skb(skb);
330                 } else {
331                         skb_pull(skb, len);
332                         skb_queue_head(&(info->txq), skb);
333                 }
334
335                 info->hdev->stat.byte_tx += len;
336
337                 /* Change buffer */
338                 change_bit(XMIT_BUFFER_NUMBER, &(info->tx_state));
339
340         } while (test_bit(XMIT_WAKEUP, &(info->tx_state)));
341
342         clear_bit(XMIT_SENDING, &(info->tx_state));
343 }
344
345
346 static int bluecard_read(unsigned int iobase, unsigned int offset, __u8 *buf, int size)
347 {
348         int i, n, len;
349
350         outb(REG_COMMAND_RX_WIN_ONE, iobase + REG_COMMAND);
351
352         len = inb(iobase + offset);
353         n = 0;
354         i = 1;
355
356         while (n < len) {
357
358                 if (i == 16) {
359                         outb(REG_COMMAND_RX_WIN_TWO, iobase + REG_COMMAND);
360                         i = 0;
361                 }
362
363                 buf[n] = inb(iobase + offset + i);
364
365                 n++;
366                 i++;
367
368         }
369
370         return len;
371 }
372
373
374 static void bluecard_receive(bluecard_info_t *info, unsigned int offset)
375 {
376         unsigned int iobase;
377         unsigned char buf[31];
378         int i, len;
379
380         if (!info) {
381                 BT_ERR("Unknown device");
382                 return;
383         }
384
385         iobase = info->p_dev->io.BasePort1;
386
387         if (test_bit(XMIT_SENDING_READY, &(info->tx_state)))
388                 bluecard_enable_activity_led(info);
389
390         len = bluecard_read(iobase, offset, buf, sizeof(buf));
391
392         for (i = 0; i < len; i++) {
393
394                 /* Allocate packet */
395                 if (info->rx_skb == NULL) {
396                         info->rx_state = RECV_WAIT_PACKET_TYPE;
397                         info->rx_count = 0;
398                         if (!(info->rx_skb = bt_skb_alloc(HCI_MAX_FRAME_SIZE, GFP_ATOMIC))) {
399                                 BT_ERR("Can't allocate mem for new packet");
400                                 return;
401                         }
402                 }
403
404                 if (info->rx_state == RECV_WAIT_PACKET_TYPE) {
405
406                         info->rx_skb->dev = (void *) info->hdev;
407                         bt_cb(info->rx_skb)->pkt_type = buf[i];
408
409                         switch (bt_cb(info->rx_skb)->pkt_type) {
410
411                         case 0x00:
412                                 /* init packet */
413                                 if (offset != 0x00) {
414                                         set_bit(XMIT_BUF_ONE_READY, &(info->tx_state));
415                                         set_bit(XMIT_BUF_TWO_READY, &(info->tx_state));
416                                         set_bit(XMIT_SENDING_READY, &(info->tx_state));
417                                         bluecard_write_wakeup(info);
418                                 }
419
420                                 kfree_skb(info->rx_skb);
421                                 info->rx_skb = NULL;
422                                 break;
423
424                         case HCI_EVENT_PKT:
425                                 info->rx_state = RECV_WAIT_EVENT_HEADER;
426                                 info->rx_count = HCI_EVENT_HDR_SIZE;
427                                 break;
428
429                         case HCI_ACLDATA_PKT:
430                                 info->rx_state = RECV_WAIT_ACL_HEADER;
431                                 info->rx_count = HCI_ACL_HDR_SIZE;
432                                 break;
433
434                         case HCI_SCODATA_PKT:
435                                 info->rx_state = RECV_WAIT_SCO_HEADER;
436                                 info->rx_count = HCI_SCO_HDR_SIZE;
437                                 break;
438
439                         default:
440                                 /* unknown packet */
441                                 BT_ERR("Unknown HCI packet with type 0x%02x received", bt_cb(info->rx_skb)->pkt_type);
442                                 info->hdev->stat.err_rx++;
443
444                                 kfree_skb(info->rx_skb);
445                                 info->rx_skb = NULL;
446                                 break;
447
448                         }
449
450                 } else {
451
452                         *skb_put(info->rx_skb, 1) = buf[i];
453                         info->rx_count--;
454
455                         if (info->rx_count == 0) {
456
457                                 int dlen;
458                                 struct hci_event_hdr *eh;
459                                 struct hci_acl_hdr *ah;
460                                 struct hci_sco_hdr *sh;
461
462                                 switch (info->rx_state) {
463
464                                 case RECV_WAIT_EVENT_HEADER:
465                                         eh = (struct hci_event_hdr *)(info->rx_skb->data);
466                                         info->rx_state = RECV_WAIT_DATA;
467                                         info->rx_count = eh->plen;
468                                         break;
469
470                                 case RECV_WAIT_ACL_HEADER:
471                                         ah = (struct hci_acl_hdr *)(info->rx_skb->data);
472                                         dlen = __le16_to_cpu(ah->dlen);
473                                         info->rx_state = RECV_WAIT_DATA;
474                                         info->rx_count = dlen;
475                                         break;
476
477                                 case RECV_WAIT_SCO_HEADER:
478                                         sh = (struct hci_sco_hdr *)(info->rx_skb->data);
479                                         info->rx_state = RECV_WAIT_DATA;
480                                         info->rx_count = sh->dlen;
481                                         break;
482
483                                 case RECV_WAIT_DATA:
484                                         hci_recv_frame(info->rx_skb);
485                                         info->rx_skb = NULL;
486                                         break;
487
488                                 }
489
490                         }
491
492                 }
493
494
495         }
496
497         info->hdev->stat.byte_rx += len;
498 }
499
500
501 static irqreturn_t bluecard_interrupt(int irq, void *dev_inst, struct pt_regs *regs)
502 {
503         bluecard_info_t *info = dev_inst;
504         unsigned int iobase;
505         unsigned char reg;
506
507         if (!info || !info->hdev) {
508                 BT_ERR("Call of irq %d for unknown device", irq);
509                 return IRQ_NONE;
510         }
511
512         if (!test_bit(CARD_READY, &(info->hw_state)))
513                 return IRQ_HANDLED;
514
515         iobase = info->p_dev->io.BasePort1;
516
517         spin_lock(&(info->lock));
518
519         /* Disable interrupt */
520         info->ctrl_reg &= ~REG_CONTROL_INTERRUPT;
521         outb(info->ctrl_reg, iobase + REG_CONTROL);
522
523         reg = inb(iobase + REG_INTERRUPT);
524
525         if ((reg != 0x00) && (reg != 0xff)) {
526
527                 if (reg & 0x04) {
528                         bluecard_receive(info, 0x00);
529                         outb(0x04, iobase + REG_INTERRUPT);
530                         outb(REG_COMMAND_RX_BUF_ONE, iobase + REG_COMMAND);
531                 }
532
533                 if (reg & 0x08) {
534                         bluecard_receive(info, 0x10);
535                         outb(0x08, iobase + REG_INTERRUPT);
536                         outb(REG_COMMAND_RX_BUF_TWO, iobase + REG_COMMAND);
537                 }
538
539                 if (reg & 0x01) {
540                         set_bit(XMIT_BUF_ONE_READY, &(info->tx_state));
541                         outb(0x01, iobase + REG_INTERRUPT);
542                         bluecard_write_wakeup(info);
543                 }
544
545                 if (reg & 0x02) {
546                         set_bit(XMIT_BUF_TWO_READY, &(info->tx_state));
547                         outb(0x02, iobase + REG_INTERRUPT);
548                         bluecard_write_wakeup(info);
549                 }
550
551         }
552
553         /* Enable interrupt */
554         info->ctrl_reg |= REG_CONTROL_INTERRUPT;
555         outb(info->ctrl_reg, iobase + REG_CONTROL);
556
557         spin_unlock(&(info->lock));
558
559         return IRQ_HANDLED;
560 }
561
562
563
564 /* ======================== Device specific HCI commands ======================== */
565
566
567 static int bluecard_hci_set_baud_rate(struct hci_dev *hdev, int baud)
568 {
569         bluecard_info_t *info = (bluecard_info_t *)(hdev->driver_data);
570         struct sk_buff *skb;
571
572         /* Ericsson baud rate command */
573         unsigned char cmd[] = { HCI_COMMAND_PKT, 0x09, 0xfc, 0x01, 0x03 };
574
575         if (!(skb = bt_skb_alloc(HCI_MAX_FRAME_SIZE, GFP_ATOMIC))) {
576                 BT_ERR("Can't allocate mem for new packet");
577                 return -1;
578         }
579
580         switch (baud) {
581         case 460800:
582                 cmd[4] = 0x00;
583                 bt_cb(skb)->pkt_type = PKT_BAUD_RATE_460800;
584                 break;
585         case 230400:
586                 cmd[4] = 0x01;
587                 bt_cb(skb)->pkt_type = PKT_BAUD_RATE_230400;
588                 break;
589         case 115200:
590                 cmd[4] = 0x02;
591                 bt_cb(skb)->pkt_type = PKT_BAUD_RATE_115200;
592                 break;
593         case 57600:
594                 /* Fall through... */
595         default:
596                 cmd[4] = 0x03;
597                 bt_cb(skb)->pkt_type = PKT_BAUD_RATE_57600;
598                 break;
599         }
600
601         memcpy(skb_put(skb, sizeof(cmd)), cmd, sizeof(cmd));
602
603         skb_queue_tail(&(info->txq), skb);
604
605         bluecard_write_wakeup(info);
606
607         return 0;
608 }
609
610
611
612 /* ======================== HCI interface ======================== */
613
614
615 static int bluecard_hci_flush(struct hci_dev *hdev)
616 {
617         bluecard_info_t *info = (bluecard_info_t *)(hdev->driver_data);
618
619         /* Drop TX queue */
620         skb_queue_purge(&(info->txq));
621
622         return 0;
623 }
624
625
626 static int bluecard_hci_open(struct hci_dev *hdev)
627 {
628         bluecard_info_t *info = (bluecard_info_t *)(hdev->driver_data);
629         unsigned int iobase = info->p_dev->io.BasePort1;
630
631         if (test_bit(CARD_HAS_PCCARD_ID, &(info->hw_state)))
632                 bluecard_hci_set_baud_rate(hdev, DEFAULT_BAUD_RATE);
633
634         if (test_and_set_bit(HCI_RUNNING, &(hdev->flags)))
635                 return 0;
636
637         if (test_bit(CARD_HAS_PCCARD_ID, &(info->hw_state))) {
638                 /* Enable LED */
639                 outb(0x08 | 0x20, iobase + 0x30);
640         }
641
642         return 0;
643 }
644
645
646 static int bluecard_hci_close(struct hci_dev *hdev)
647 {
648         bluecard_info_t *info = (bluecard_info_t *)(hdev->driver_data);
649         unsigned int iobase = info->p_dev->io.BasePort1;
650
651         if (!test_and_clear_bit(HCI_RUNNING, &(hdev->flags)))
652                 return 0;
653
654         bluecard_hci_flush(hdev);
655
656         if (test_bit(CARD_HAS_PCCARD_ID, &(info->hw_state))) {
657                 /* Disable LED */
658                 outb(0x00, iobase + 0x30);
659         }
660
661         return 0;
662 }
663
664
665 static int bluecard_hci_send_frame(struct sk_buff *skb)
666 {
667         bluecard_info_t *info;
668         struct hci_dev *hdev = (struct hci_dev *)(skb->dev);
669
670         if (!hdev) {
671                 BT_ERR("Frame for unknown HCI device (hdev=NULL)");
672                 return -ENODEV;
673         }
674
675         info = (bluecard_info_t *)(hdev->driver_data);
676
677         switch (bt_cb(skb)->pkt_type) {
678         case HCI_COMMAND_PKT:
679                 hdev->stat.cmd_tx++;
680                 break;
681         case HCI_ACLDATA_PKT:
682                 hdev->stat.acl_tx++;
683                 break;
684         case HCI_SCODATA_PKT:
685                 hdev->stat.sco_tx++;
686                 break;
687         };
688
689         /* Prepend skb with frame type */
690         memcpy(skb_push(skb, 1), &bt_cb(skb)->pkt_type, 1);
691         skb_queue_tail(&(info->txq), skb);
692
693         bluecard_write_wakeup(info);
694
695         return 0;
696 }
697
698
699 static void bluecard_hci_destruct(struct hci_dev *hdev)
700 {
701 }
702
703
704 static int bluecard_hci_ioctl(struct hci_dev *hdev, unsigned int cmd, unsigned long arg)
705 {
706         return -ENOIOCTLCMD;
707 }
708
709
710
711 /* ======================== Card services HCI interaction ======================== */
712
713
714 static int bluecard_open(bluecard_info_t *info)
715 {
716         unsigned int iobase = info->p_dev->io.BasePort1;
717         struct hci_dev *hdev;
718         unsigned char id;
719
720         spin_lock_init(&(info->lock));
721
722         init_timer(&(info->timer));
723         info->timer.function = &bluecard_activity_led_timeout;
724         info->timer.data = (u_long)info;
725
726         skb_queue_head_init(&(info->txq));
727
728         info->rx_state = RECV_WAIT_PACKET_TYPE;
729         info->rx_count = 0;
730         info->rx_skb = NULL;
731
732         /* Initialize HCI device */
733         hdev = hci_alloc_dev();
734         if (!hdev) {
735                 BT_ERR("Can't allocate HCI device");
736                 return -ENOMEM;
737         }
738
739         info->hdev = hdev;
740
741         hdev->type = HCI_PCCARD;
742         hdev->driver_data = info;
743
744         hdev->open     = bluecard_hci_open;
745         hdev->close    = bluecard_hci_close;
746         hdev->flush    = bluecard_hci_flush;
747         hdev->send     = bluecard_hci_send_frame;
748         hdev->destruct = bluecard_hci_destruct;
749         hdev->ioctl    = bluecard_hci_ioctl;
750
751         hdev->owner = THIS_MODULE;
752
753         id = inb(iobase + 0x30);
754
755         if ((id & 0x0f) == 0x02)
756                 set_bit(CARD_HAS_PCCARD_ID, &(info->hw_state));
757
758         if (id & 0x10)
759                 set_bit(CARD_HAS_POWER_LED, &(info->hw_state));
760
761         if (id & 0x20)
762                 set_bit(CARD_HAS_ACTIVITY_LED, &(info->hw_state));
763
764         /* Reset card */
765         info->ctrl_reg = REG_CONTROL_BT_RESET | REG_CONTROL_CARD_RESET;
766         outb(info->ctrl_reg, iobase + REG_CONTROL);
767
768         /* Turn FPGA off */
769         outb(0x80, iobase + 0x30);
770
771         /* Wait some time */
772         msleep(10);
773
774         /* Turn FPGA on */
775         outb(0x00, iobase + 0x30);
776
777         /* Activate card */
778         info->ctrl_reg = REG_CONTROL_BT_ON | REG_CONTROL_BT_RES_PU;
779         outb(info->ctrl_reg, iobase + REG_CONTROL);
780
781         /* Enable interrupt */
782         outb(0xff, iobase + REG_INTERRUPT);
783         info->ctrl_reg |= REG_CONTROL_INTERRUPT;
784         outb(info->ctrl_reg, iobase + REG_CONTROL);
785
786         if ((id & 0x0f) == 0x03) {
787                 /* Disable RTS */
788                 info->ctrl_reg |= REG_CONTROL_RTS;
789                 outb(info->ctrl_reg, iobase + REG_CONTROL);
790
791                 /* Set baud rate */
792                 info->ctrl_reg |= 0x03;
793                 outb(info->ctrl_reg, iobase + REG_CONTROL);
794
795                 /* Enable RTS */
796                 info->ctrl_reg &= ~REG_CONTROL_RTS;
797                 outb(info->ctrl_reg, iobase + REG_CONTROL);
798
799                 set_bit(XMIT_BUF_ONE_READY, &(info->tx_state));
800                 set_bit(XMIT_BUF_TWO_READY, &(info->tx_state));
801                 set_bit(XMIT_SENDING_READY, &(info->tx_state));
802         }
803
804         /* Start the RX buffers */
805         outb(REG_COMMAND_RX_BUF_ONE, iobase + REG_COMMAND);
806         outb(REG_COMMAND_RX_BUF_TWO, iobase + REG_COMMAND);
807
808         /* Signal that the hardware is ready */
809         set_bit(CARD_READY, &(info->hw_state));
810
811         /* Drop TX queue */
812         skb_queue_purge(&(info->txq));
813
814         /* Control the point at which RTS is enabled */
815         outb((0x0f << RTS_LEVEL_SHIFT_BITS) | 1, iobase + REG_RX_CONTROL);
816
817         /* Timeout before it is safe to send the first HCI packet */
818         msleep(1250);
819
820         /* Register HCI device */
821         if (hci_register_dev(hdev) < 0) {
822                 BT_ERR("Can't register HCI device");
823                 info->hdev = NULL;
824                 hci_free_dev(hdev);
825                 return -ENODEV;
826         }
827
828         return 0;
829 }
830
831
832 static int bluecard_close(bluecard_info_t *info)
833 {
834         unsigned int iobase = info->p_dev->io.BasePort1;
835         struct hci_dev *hdev = info->hdev;
836
837         if (!hdev)
838                 return -ENODEV;
839
840         bluecard_hci_close(hdev);
841
842         clear_bit(CARD_READY, &(info->hw_state));
843
844         /* Reset card */
845         info->ctrl_reg = REG_CONTROL_BT_RESET | REG_CONTROL_CARD_RESET;
846         outb(info->ctrl_reg, iobase + REG_CONTROL);
847
848         /* Turn FPGA off */
849         outb(0x80, iobase + 0x30);
850
851         if (hci_unregister_dev(hdev) < 0)
852                 BT_ERR("Can't unregister HCI device %s", hdev->name);
853
854         hci_free_dev(hdev);
855
856         return 0;
857 }
858
859 static int bluecard_probe(struct pcmcia_device *link)
860 {
861         bluecard_info_t *info;
862
863         /* Create new info device */
864         info = kzalloc(sizeof(*info), GFP_KERNEL);
865         if (!info)
866                 return -ENOMEM;
867
868         info->p_dev = link;
869         link->priv = info;
870
871         link->io.Attributes1 = IO_DATA_PATH_WIDTH_8;
872         link->io.NumPorts1 = 8;
873         link->irq.Attributes = IRQ_TYPE_EXCLUSIVE | IRQ_HANDLE_PRESENT;
874         link->irq.IRQInfo1 = IRQ_LEVEL_ID;
875
876         link->irq.Handler = bluecard_interrupt;
877         link->irq.Instance = info;
878
879         link->conf.Attributes = CONF_ENABLE_IRQ;
880         link->conf.IntType = INT_MEMORY_AND_IO;
881
882         return bluecard_config(link);
883 }
884
885
886 static void bluecard_detach(struct pcmcia_device *link)
887 {
888         bluecard_info_t *info = link->priv;
889
890         bluecard_release(link);
891         kfree(info);
892 }
893
894
895 static int first_tuple(struct pcmcia_device *handle, tuple_t *tuple, cisparse_t *parse)
896 {
897         int i;
898
899         i = pcmcia_get_first_tuple(handle, tuple);
900         if (i != CS_SUCCESS)
901                 return CS_NO_MORE_ITEMS;
902
903         i = pcmcia_get_tuple_data(handle, tuple);
904         if (i != CS_SUCCESS)
905                 return i;
906
907         return pcmcia_parse_tuple(handle, tuple, parse);
908 }
909
910 static int bluecard_config(struct pcmcia_device *link)
911 {
912         bluecard_info_t *info = link->priv;
913         tuple_t tuple;
914         u_short buf[256];
915         cisparse_t parse;
916         int i, n, last_ret, last_fn;
917
918         tuple.TupleData = (cisdata_t *)buf;
919         tuple.TupleOffset = 0;
920         tuple.TupleDataMax = 255;
921         tuple.Attributes = 0;
922
923         /* Get configuration register information */
924         tuple.DesiredTuple = CISTPL_CONFIG;
925         last_ret = first_tuple(link, &tuple, &parse);
926         if (last_ret != CS_SUCCESS) {
927                 last_fn = ParseTuple;
928                 goto cs_failed;
929         }
930         link->conf.ConfigBase = parse.config.base;
931         link->conf.Present = parse.config.rmask[0];
932
933         link->conf.ConfigIndex = 0x20;
934         link->io.NumPorts1 = 64;
935         link->io.IOAddrLines = 6;
936
937         for (n = 0; n < 0x400; n += 0x40) {
938                 link->io.BasePort1 = n ^ 0x300;
939                 i = pcmcia_request_io(link, &link->io);
940                 if (i == CS_SUCCESS)
941                         break;
942         }
943
944         if (i != CS_SUCCESS) {
945                 cs_error(link, RequestIO, i);
946                 goto failed;
947         }
948
949         i = pcmcia_request_irq(link, &link->irq);
950         if (i != CS_SUCCESS) {
951                 cs_error(link, RequestIRQ, i);
952                 link->irq.AssignedIRQ = 0;
953         }
954
955         i = pcmcia_request_configuration(link, &link->conf);
956         if (i != CS_SUCCESS) {
957                 cs_error(link, RequestConfiguration, i);
958                 goto failed;
959         }
960
961         if (bluecard_open(info) != 0)
962                 goto failed;
963
964         strcpy(info->node.dev_name, info->hdev->name);
965         link->dev_node = &info->node;
966
967         return 0;
968
969 cs_failed:
970         cs_error(link, last_fn, last_ret);
971
972 failed:
973         bluecard_release(link);
974         return -ENODEV;
975 }
976
977
978 static void bluecard_release(struct pcmcia_device *link)
979 {
980         bluecard_info_t *info = link->priv;
981
982         bluecard_close(info);
983
984         del_timer(&(info->timer));
985
986         pcmcia_disable_device(link);
987 }
988
989 static struct pcmcia_device_id bluecard_ids[] = {
990         PCMCIA_DEVICE_PROD_ID12("BlueCard", "LSE041", 0xbaf16fbf, 0x657cc15e),
991         PCMCIA_DEVICE_PROD_ID12("BTCFCARD", "LSE139", 0xe3987764, 0x2524b59c),
992         PCMCIA_DEVICE_PROD_ID12("WSS", "LSE039", 0x0a0736ec, 0x24e6dfab),
993         PCMCIA_DEVICE_NULL
994 };
995 MODULE_DEVICE_TABLE(pcmcia, bluecard_ids);
996
997 static struct pcmcia_driver bluecard_driver = {
998         .owner          = THIS_MODULE,
999         .drv            = {
1000                 .name   = "bluecard_cs",
1001         },
1002         .probe          = bluecard_probe,
1003         .remove         = bluecard_detach,
1004         .id_table       = bluecard_ids,
1005 };
1006
1007 static int __init init_bluecard_cs(void)
1008 {
1009         return pcmcia_register_driver(&bluecard_driver);
1010 }
1011
1012
1013 static void __exit exit_bluecard_cs(void)
1014 {
1015         pcmcia_unregister_driver(&bluecard_driver);
1016 }
1017
1018 module_init(init_bluecard_cs);
1019 module_exit(exit_bluecard_cs);