[deliverable/linux.git] / drivers / bluetooth / hci_h4.c

/*
 *
 *  Bluetooth HCI UART driver
 *
 *  Copyright (C) 2000-2001  Qualcomm Incorporated
 *  Copyright (C) 2002-2003  Maxim Krasnyansky <maxk@qualcomm.com>
 *  Copyright (C) 2004-2005  Marcel Holtmann <marcel@holtmann.org>
 *
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 */

#include <linux/module.h>

#include <linux/kernel.h>
#include <linux/init.h>
#include <linux/types.h>
#include <linux/fcntl.h>
#include <linux/interrupt.h>
#include <linux/ptrace.h>
#include <linux/poll.h>

#include <linux/slab.h>
#include <linux/tty.h>
#include <linux/errno.h>
#include <linux/string.h>
#include <linux/signal.h>
#include <linux/ioctl.h>
#include <linux/skbuff.h>

#include <net/bluetooth/bluetooth.h>
#include <net/bluetooth/hci_core.h>

#include "hci_uart.h"

#define VERSION "1.2"

struct h4_struct {
	unsigned long rx_state;
	unsigned long rx_count;
	struct sk_buff *rx_skb;
	struct sk_buff_head txq;
};

/* H4 receiver States */
#define H4_W4_PACKET_TYPE	0
#define H4_W4_EVENT_HDR		1
#define H4_W4_ACL_HDR		2
#define H4_W4_SCO_HDR		3
#define H4_W4_DATA		4

/* Initialize protocol */
static int h4_open(struct hci_uart *hu)
{
	struct h4_struct *h4;

	BT_DBG("hu %p", hu);

	h4 = kzalloc(sizeof(*h4), GFP_ATOMIC);
	if (!h4)
		return -ENOMEM;

	skb_queue_head_init(&h4->txq);

	hu->priv = h4;
	return 0;
}

/* Flush protocol data */
static int h4_flush(struct hci_uart *hu)
{
	struct h4_struct *h4 = hu->priv;

	BT_DBG("hu %p", hu);

	skb_queue_purge(&h4->txq);

	return 0;
}

/* Close protocol */
static int h4_close(struct hci_uart *hu)
{
	struct h4_struct *h4 = hu->priv;

	hu->priv = NULL;

	BT_DBG("hu %p", hu);

	skb_queue_purge(&h4->txq);

	kfree_skb(h4->rx_skb);

	hu->priv = NULL;
	kfree(h4);

	return 0;
}

/* Enqueue frame for transmittion (padding, crc, etc) */
static int h4_enqueue(struct hci_uart *hu, struct sk_buff *skb)
{
	struct h4_struct *h4 = hu->priv;

	BT_DBG("hu %p skb %p", hu, skb);

	/* Prepend skb with frame type */
	memcpy(skb_push(skb, 1), &bt_cb(skb)->pkt_type, 1);
	skb_queue_tail(&h4->txq, skb);

	return 0;
}

static inline int h4_check_data_len(struct h4_struct *h4, int len)
{
	register int room = skb_tailroom(h4->rx_skb);

	BT_DBG("len %d room %d", len, room);

	if (!len) {
		hci_recv_frame(h4->rx_skb);
	} else if (len > room) {
		BT_ERR("Data length is too large");
		kfree_skb(h4->rx_skb);
	} else {
		h4->rx_state = H4_W4_DATA;
		h4->rx_count = len;
		return len;
	}

	h4->rx_state = H4_W4_PACKET_TYPE;
	h4->rx_skb   = NULL;
	h4->rx_count = 0;

	return 0;
}

/* Recv data */
static int h4_recv(struct hci_uart *hu, void *data, int count)
{
	struct h4_struct *h4 = hu->priv;
	register char *ptr;
	struct hci_event_hdr *eh;
	struct hci_acl_hdr   *ah;
	struct hci_sco_hdr   *sh;
	register int len, type, dlen;

	BT_DBG("hu %p count %d rx_state %ld rx_count %ld", 
			hu, count, h4->rx_state, h4->rx_count);

	ptr = data;
	while (count) {
		if (h4->rx_count) {
			len = min_t(unsigned int, h4->rx_count, count);
			memcpy(skb_put(h4->rx_skb, len), ptr, len);
			h4->rx_count -= len; count -= len; ptr += len;

			if (h4->rx_count)
				continue;

			switch (h4->rx_state) {
			case H4_W4_DATA:
				BT_DBG("Complete data");

				hci_recv_frame(h4->rx_skb);

				h4->rx_state = H4_W4_PACKET_TYPE;
				h4->rx_skb = NULL;
				continue;

			case H4_W4_EVENT_HDR:
				eh = hci_event_hdr(h4->rx_skb);

				BT_DBG("Event header: evt 0x%2.2x plen %d", eh->evt, eh->plen);

				h4_check_data_len(h4, eh->plen);
				continue;

			case H4_W4_ACL_HDR:
				ah = hci_acl_hdr(h4->rx_skb);
				dlen = __le16_to_cpu(ah->dlen);

				BT_DBG("ACL header: dlen %d", dlen);

				h4_check_data_len(h4, dlen);
				continue;

			case H4_W4_SCO_HDR:
				sh = hci_sco_hdr(h4->rx_skb);

				BT_DBG("SCO header: dlen %d", sh->dlen);

				h4_check_data_len(h4, sh->dlen);
				continue;
			}
		}

		/* H4_W4_PACKET_TYPE */
		switch (*ptr) {
		case HCI_EVENT_PKT:
			BT_DBG("Event packet");
			h4->rx_state = H4_W4_EVENT_HDR;
			h4->rx_count = HCI_EVENT_HDR_SIZE;
			type = HCI_EVENT_PKT;
			break;

		case HCI_ACLDATA_PKT:
			BT_DBG("ACL packet");
			h4->rx_state = H4_W4_ACL_HDR;
			h4->rx_count = HCI_ACL_HDR_SIZE;
			type = HCI_ACLDATA_PKT;
			break;

		case HCI_SCODATA_PKT:
			BT_DBG("SCO packet");
			h4->rx_state = H4_W4_SCO_HDR;
			h4->rx_count = HCI_SCO_HDR_SIZE;
			type = HCI_SCODATA_PKT;
			break;

		default:
			BT_ERR("Unknown HCI packet type %2.2x", (__u8)*ptr);
			hu->hdev->stat.err_rx++;
			ptr++; count--;
			continue;
		};

		ptr++; count--;

		/* Allocate packet */
		h4->rx_skb = bt_skb_alloc(HCI_MAX_FRAME_SIZE, GFP_ATOMIC);
		if (!h4->rx_skb) {
			BT_ERR("Can't allocate mem for new packet");
			h4->rx_state = H4_W4_PACKET_TYPE;
			h4->rx_count = 0;
			return 0;
		}

		h4->rx_skb->dev = (void *) hu->hdev;
		bt_cb(h4->rx_skb)->pkt_type = type;
	}

	return count;
}

static struct sk_buff *h4_dequeue(struct hci_uart *hu)
{
	struct h4_struct *h4 = hu->priv;
	return skb_dequeue(&h4->txq);
}

static struct hci_uart_proto h4p = {
	.id		= HCI_UART_H4,
	.open		= h4_open,
	.close		= h4_close,
	.recv		= h4_recv,
	.enqueue	= h4_enqueue,
	.dequeue	= h4_dequeue,
	.flush		= h4_flush,
};

int h4_init(void)
{
	int err = hci_uart_register_proto(&h4p);

	if (!err)
		BT_INFO("HCI H4 protocol initialized");
	else
		BT_ERR("HCI H4 protocol registration failed");

	return err;
}

int h4_deinit(void)
{
	return hci_uart_unregister_proto(&h4p);
}
Commit	Line	Data
1da177e4	1	/*
1da177e4	2	*
0372a662 MH	3	* Bluetooth HCI UART driver
	4	*
	5	* Copyright (C) 2000-2001 Qualcomm Incorporated
	6	* Copyright (C) 2002-2003 Maxim Krasnyansky <maxk@qualcomm.com>
	7	* Copyright (C) 2004-2005 Marcel Holtmann <marcel@holtmann.org>
	8	*
	9	*
	10	* This program is free software; you can redistribute it and/or modify
	11	* it under the terms of the GNU General Public License as published by
	12	* the Free Software Foundation; either version 2 of the License, or
	13	* (at your option) any later version.
	14	*
	15	* This program is distributed in the hope that it will be useful,
	16	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	17	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	18	* GNU General Public License for more details.
	19	*
	20	* You should have received a copy of the GNU General Public License
	21	* along with this program; if not, write to the Free Software
	22	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	23	*
1da177e4	24	*/
1da177e4	25
1da177e4 LT	26	#include <linux/module.h>
	27
	28	#include <linux/kernel.h>
	29	#include <linux/init.h>
1da177e4 LT	30	#include <linux/types.h>
	31	#include <linux/fcntl.h>
	32	#include <linux/interrupt.h>
	33	#include <linux/ptrace.h>
	34	#include <linux/poll.h>
	35
	36	#include <linux/slab.h>
	37	#include <linux/tty.h>
	38	#include <linux/errno.h>
	39	#include <linux/string.h>
	40	#include <linux/signal.h>
	41	#include <linux/ioctl.h>
	42	#include <linux/skbuff.h>
	43
	44	#include <net/bluetooth/bluetooth.h>
	45	#include <net/bluetooth/hci_core.h>
0372a662	46
1da177e4	47	#include "hci_uart.h"
1da177e4	48
0372a662 MH	49	#define VERSION "1.2"
	50
	51	struct h4_struct {
	52	unsigned long rx_state;
	53	unsigned long rx_count;
	54	struct sk_buff *rx_skb;
	55	struct sk_buff_head txq;
	56	};
	57
	58	/* H4 receiver States */
	59	#define H4_W4_PACKET_TYPE 0
	60	#define H4_W4_EVENT_HDR 1
	61	#define H4_W4_ACL_HDR 2
	62	#define H4_W4_SCO_HDR 3
	63	#define H4_W4_DATA 4
	64
1da177e4 LT	65	/* Initialize protocol */
	66	static int h4_open(struct hci_uart *hu)
	67	{
	68	struct h4_struct *h4;
0372a662	69
1da177e4	70	BT_DBG("hu %p", hu);
0372a662	71
089b1dbb	72	h4 = kzalloc(sizeof(*h4), GFP_ATOMIC);
1da177e4 LT	73	if (!h4)
1da177e4 LT	74	return -ENOMEM;
0372a662	75
1da177e4 LT	76	skb_queue_head_init(&h4->txq);
	77
	78	hu->priv = h4;
	79	return 0;
	80	}
	81
	82	/* Flush protocol data */
	83	static int h4_flush(struct hci_uart *hu)
	84	{
	85	struct h4_struct *h4 = hu->priv;
	86
	87	BT_DBG("hu %p", hu);
0372a662	88
1da177e4	89	skb_queue_purge(&h4->txq);
0372a662	90
1da177e4 LT	91	return 0;
	92	}
	93
	94	/* Close protocol */
	95	static int h4_close(struct hci_uart *hu)
	96	{
	97	struct h4_struct *h4 = hu->priv;
0372a662	98
1da177e4 LT	99	hu->priv = NULL;
	100
	101	BT_DBG("hu %p", hu);
	102
	103	skb_queue_purge(&h4->txq);
0372a662	104
b1fb0683	105	kfree_skb(h4->rx_skb);
1da177e4 LT	106
	107	hu->priv = NULL;
	108	kfree(h4);
0372a662	109
1da177e4 LT	110	return 0;
	111	}
	112
	113	/* Enqueue frame for transmittion (padding, crc, etc) */
	114	static int h4_enqueue(struct hci_uart hu, struct sk_buff skb)
	115	{
	116	struct h4_struct *h4 = hu->priv;
	117
	118	BT_DBG("hu %p skb %p", hu, skb);
	119
	120	/* Prepend skb with frame type */
0d48d939	121	memcpy(skb_push(skb, 1), &bt_cb(skb)->pkt_type, 1);
1da177e4	122	skb_queue_tail(&h4->txq, skb);
0372a662	123
1da177e4 LT	124	return 0;
	125	}
	126
	127	static inline int h4_check_data_len(struct h4_struct *h4, int len)
	128	{
	129	register int room = skb_tailroom(h4->rx_skb);
	130
	131	BT_DBG("len %d room %d", len, room);
0372a662	132
1da177e4	133	if (!len) {
1da177e4 LT	134	hci_recv_frame(h4->rx_skb);
	135	} else if (len > room) {
	136	BT_ERR("Data length is too large");
	137	kfree_skb(h4->rx_skb);
	138	} else {
	139	h4->rx_state = H4_W4_DATA;
	140	h4->rx_count = len;
	141	return len;
	142	}
	143
	144	h4->rx_state = H4_W4_PACKET_TYPE;
	145	h4->rx_skb = NULL;
	146	h4->rx_count = 0;
0372a662	147
1da177e4 LT	148	return 0;
	149	}
	150
	151	/* Recv data */
	152	static int h4_recv(struct hci_uart hu, void data, int count)
	153	{
	154	struct h4_struct *h4 = hu->priv;
	155	register char *ptr;
	156	struct hci_event_hdr *eh;
	157	struct hci_acl_hdr *ah;
	158	struct hci_sco_hdr *sh;
	159	register int len, type, dlen;
	160
	161	BT_DBG("hu %p count %d rx_state %ld rx_count %ld",
	162	hu, count, h4->rx_state, h4->rx_count);
	163
	164	ptr = data;
	165	while (count) {
	166	if (h4->rx_count) {
	167	len = min_t(unsigned int, h4->rx_count, count);
	168	memcpy(skb_put(h4->rx_skb, len), ptr, len);
	169	h4->rx_count -= len; count -= len; ptr += len;
	170
	171	if (h4->rx_count)
	172	continue;
	173
	174	switch (h4->rx_state) {
	175	case H4_W4_DATA:
	176	BT_DBG("Complete data");
	177
1da177e4 LT	178	hci_recv_frame(h4->rx_skb);
	179
	180	h4->rx_state = H4_W4_PACKET_TYPE;
	181	h4->rx_skb = NULL;
	182	continue;
	183
	184	case H4_W4_EVENT_HDR:
2a123b86	185	eh = hci_event_hdr(h4->rx_skb);
1da177e4 LT	186
	187	BT_DBG("Event header: evt 0x%2.2x plen %d", eh->evt, eh->plen);
	188
	189	h4_check_data_len(h4, eh->plen);
	190	continue;
	191
	192	case H4_W4_ACL_HDR:
2a123b86	193	ah = hci_acl_hdr(h4->rx_skb);
1da177e4 LT	194	dlen = __le16_to_cpu(ah->dlen);
	195
	196	BT_DBG("ACL header: dlen %d", dlen);
	197
	198	h4_check_data_len(h4, dlen);
	199	continue;
	200
	201	case H4_W4_SCO_HDR:
2a123b86	202	sh = hci_sco_hdr(h4->rx_skb);
1da177e4 LT	203
	204	BT_DBG("SCO header: dlen %d", sh->dlen);
	205
	206	h4_check_data_len(h4, sh->dlen);
	207	continue;
	208	}
	209	}
	210
	211	/* H4_W4_PACKET_TYPE */
	212	switch (*ptr) {
	213	case HCI_EVENT_PKT:
	214	BT_DBG("Event packet");
	215	h4->rx_state = H4_W4_EVENT_HDR;
	216	h4->rx_count = HCI_EVENT_HDR_SIZE;
	217	type = HCI_EVENT_PKT;
	218	break;
	219
	220	case HCI_ACLDATA_PKT:
	221	BT_DBG("ACL packet");
	222	h4->rx_state = H4_W4_ACL_HDR;
	223	h4->rx_count = HCI_ACL_HDR_SIZE;
	224	type = HCI_ACLDATA_PKT;
	225	break;
	226
	227	case HCI_SCODATA_PKT:
	228	BT_DBG("SCO packet");
	229	h4->rx_state = H4_W4_SCO_HDR;
	230	h4->rx_count = HCI_SCO_HDR_SIZE;
	231	type = HCI_SCODATA_PKT;
	232	break;
	233
	234	default:
	235	BT_ERR("Unknown HCI packet type %2.2x", (__u8)*ptr);
	236	hu->hdev->stat.err_rx++;
	237	ptr++; count--;
	238	continue;
	239	};
0372a662	240
1da177e4 LT	241	ptr++; count--;
	242
	243	/* Allocate packet */
	244	h4->rx_skb = bt_skb_alloc(HCI_MAX_FRAME_SIZE, GFP_ATOMIC);
	245	if (!h4->rx_skb) {
	246	BT_ERR("Can't allocate mem for new packet");
	247	h4->rx_state = H4_W4_PACKET_TYPE;
	248	h4->rx_count = 0;
	249	return 0;
	250	}
0372a662	251
1da177e4	252	h4->rx_skb->dev = (void *) hu->hdev;
0d48d939	253	bt_cb(h4->rx_skb)->pkt_type = type;
1da177e4	254	}
0372a662	255
1da177e4 LT	256	return count;
	257	}
	258
	259	static struct sk_buff h4_dequeue(struct hci_uart hu)
	260	{
	261	struct h4_struct *h4 = hu->priv;
	262	return skb_dequeue(&h4->txq);
	263	}
	264
	265	static struct hci_uart_proto h4p = {
0372a662 MH	266	.id = HCI_UART_H4,
	267	.open = h4_open,
	268	.close = h4_close,
	269	.recv = h4_recv,
	270	.enqueue = h4_enqueue,
	271	.dequeue = h4_dequeue,
	272	.flush = h4_flush,
1da177e4	273	};
0372a662	274
1da177e4 LT	275	int h4_init(void)
	276	{
	277	int err = hci_uart_register_proto(&h4p);
0372a662	278
1da177e4 LT	279	if (!err)
	280	BT_INFO("HCI H4 protocol initialized");
	281	else
	282	BT_ERR("HCI H4 protocol registration failed");
0372a662	283
1da177e4 LT	284	return err;
	285	}
	286
	287	int h4_deinit(void)
	288	{
	289	return hci_uart_unregister_proto(&h4p);
	290	}