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 	dev_link_t link;
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 void bluecard_config(dev_link_t *link);
89 static void bluecard_release(dev_link_t *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->link.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->link.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->link.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 (!(info->link.state & DEV_PRESENT))
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->link.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->link.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->link.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->link.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->link.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->link.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_attach(struct pcmcia_device *p_dev)
860 {
861 	bluecard_info_t *info;
862 	dev_link_t *link;
863 
864 	/* Create new info device */
865 	info = kzalloc(sizeof(*info), GFP_KERNEL);
866 	if (!info)
867 		return -ENOMEM;
868 
869 	link = &info->link;
870 	link->priv = info;
871 
872 	link->io.Attributes1 = IO_DATA_PATH_WIDTH_8;
873 	link->io.NumPorts1 = 8;
874 	link->irq.Attributes = IRQ_TYPE_EXCLUSIVE | IRQ_HANDLE_PRESENT;
875 	link->irq.IRQInfo1 = IRQ_LEVEL_ID;
876 
877 	link->irq.Handler = bluecard_interrupt;
878 	link->irq.Instance = info;
879 
880 	link->conf.Attributes = CONF_ENABLE_IRQ;
881 	link->conf.Vcc = 50;
882 	link->conf.IntType = INT_MEMORY_AND_IO;
883 
884 	link->handle = p_dev;
885 	p_dev->instance = link;
886 
887 	link->state |= DEV_PRESENT | DEV_CONFIG_PENDING;
888 	bluecard_config(link);
889 
890 	return 0;
891 }
892 
893 
894 static void bluecard_detach(struct pcmcia_device *p_dev)
895 {
896 	dev_link_t *link = dev_to_instance(p_dev);
897 	bluecard_info_t *info = link->priv;
898 
899 	if (link->state & DEV_CONFIG)
900 		bluecard_release(link);
901 
902 	kfree(info);
903 }
904 
905 
906 static int first_tuple(client_handle_t handle, tuple_t *tuple, cisparse_t *parse)
907 {
908 	int i;
909 
910 	i = pcmcia_get_first_tuple(handle, tuple);
911 	if (i != CS_SUCCESS)
912 		return CS_NO_MORE_ITEMS;
913 
914 	i = pcmcia_get_tuple_data(handle, tuple);
915 	if (i != CS_SUCCESS)
916 		return i;
917 
918 	return pcmcia_parse_tuple(handle, tuple, parse);
919 }
920 
921 static void bluecard_config(dev_link_t *link)
922 {
923 	client_handle_t handle = link->handle;
924 	bluecard_info_t *info = link->priv;
925 	tuple_t tuple;
926 	u_short buf[256];
927 	cisparse_t parse;
928 	config_info_t config;
929 	int i, n, last_ret, last_fn;
930 
931 	tuple.TupleData = (cisdata_t *)buf;
932 	tuple.TupleOffset = 0;
933 	tuple.TupleDataMax = 255;
934 	tuple.Attributes = 0;
935 
936 	/* Get configuration register information */
937 	tuple.DesiredTuple = CISTPL_CONFIG;
938 	last_ret = first_tuple(handle, &tuple, &parse);
939 	if (last_ret != CS_SUCCESS) {
940 		last_fn = ParseTuple;
941 		goto cs_failed;
942 	}
943 	link->conf.ConfigBase = parse.config.base;
944 	link->conf.Present = parse.config.rmask[0];
945 
946 	/* Configure card */
947 	link->state |= DEV_CONFIG;
948 	i = pcmcia_get_configuration_info(handle, &config);
949 	link->conf.Vcc = config.Vcc;
950 
951 	link->conf.ConfigIndex = 0x20;
952 	link->io.NumPorts1 = 64;
953 	link->io.IOAddrLines = 6;
954 
955 	for (n = 0; n < 0x400; n += 0x40) {
956 		link->io.BasePort1 = n ^ 0x300;
957 		i = pcmcia_request_io(link->handle, &link->io);
958 		if (i == CS_SUCCESS)
959 			break;
960 	}
961 
962 	if (i != CS_SUCCESS) {
963 		cs_error(link->handle, RequestIO, i);
964 		goto failed;
965 	}
966 
967 	i = pcmcia_request_irq(link->handle, &link->irq);
968 	if (i != CS_SUCCESS) {
969 		cs_error(link->handle, RequestIRQ, i);
970 		link->irq.AssignedIRQ = 0;
971 	}
972 
973 	i = pcmcia_request_configuration(link->handle, &link->conf);
974 	if (i != CS_SUCCESS) {
975 		cs_error(link->handle, RequestConfiguration, i);
976 		goto failed;
977 	}
978 
979 	if (bluecard_open(info) != 0)
980 		goto failed;
981 
982 	strcpy(info->node.dev_name, info->hdev->name);
983 	link->dev = &info->node;
984 	link->state &= ~DEV_CONFIG_PENDING;
985 
986 	return;
987 
988 cs_failed:
989 	cs_error(link->handle, last_fn, last_ret);
990 
991 failed:
992 	bluecard_release(link);
993 }
994 
995 
996 static void bluecard_release(dev_link_t *link)
997 {
998 	bluecard_info_t *info = link->priv;
999 
1000 	if (link->state & DEV_PRESENT)
1001 		bluecard_close(info);
1002 
1003 	del_timer(&(info->timer));
1004 
1005 	link->dev = NULL;
1006 
1007 	pcmcia_release_configuration(link->handle);
1008 	pcmcia_release_io(link->handle, &link->io);
1009 	pcmcia_release_irq(link->handle, &link->irq);
1010 
1011 	link->state &= ~DEV_CONFIG;
1012 }
1013 
1014 static int bluecard_suspend(struct pcmcia_device *dev)
1015 {
1016 	dev_link_t *link = dev_to_instance(dev);
1017 
1018 	link->state |= DEV_SUSPEND;
1019 	if (link->state & DEV_CONFIG)
1020 		pcmcia_release_configuration(link->handle);
1021 
1022 	return 0;
1023 }
1024 
1025 static int bluecard_resume(struct pcmcia_device *dev)
1026 {
1027 	dev_link_t *link = dev_to_instance(dev);
1028 
1029 	link->state &= ~DEV_SUSPEND;
1030 	if (DEV_OK(link))
1031 		pcmcia_request_configuration(link->handle, &link->conf);
1032 
1033 	return 0;
1034 }
1035 
1036 static struct pcmcia_device_id bluecard_ids[] = {
1037 	PCMCIA_DEVICE_PROD_ID12("BlueCard", "LSE041", 0xbaf16fbf, 0x657cc15e),
1038 	PCMCIA_DEVICE_PROD_ID12("BTCFCARD", "LSE139", 0xe3987764, 0x2524b59c),
1039 	PCMCIA_DEVICE_PROD_ID12("WSS", "LSE039", 0x0a0736ec, 0x24e6dfab),
1040 	PCMCIA_DEVICE_NULL
1041 };
1042 MODULE_DEVICE_TABLE(pcmcia, bluecard_ids);
1043 
1044 static struct pcmcia_driver bluecard_driver = {
1045 	.owner		= THIS_MODULE,
1046 	.drv		= {
1047 		.name	= "bluecard_cs",
1048 	},
1049 	.probe		= bluecard_attach,
1050 	.remove		= bluecard_detach,
1051 	.id_table	= bluecard_ids,
1052 	.suspend	= bluecard_suspend,
1053 	.resume		= bluecard_resume,
1054 };
1055 
1056 static int __init init_bluecard_cs(void)
1057 {
1058 	return pcmcia_register_driver(&bluecard_driver);
1059 }
1060 
1061 
1062 static void __exit exit_bluecard_cs(void)
1063 {
1064 	pcmcia_unregister_driver(&bluecard_driver);
1065 }
1066 
1067 module_init(init_bluecard_cs);
1068 module_exit(exit_bluecard_cs);
1069