Linux Audio

Check our new training course

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