Home | History | Annotate | Line # | Download | only in bluetooth
bthidev.c revision 1.1.6.4
      1 /*	$NetBSD: bthidev.c,v 1.1.6.4 2006/09/14 12:31:27 yamt Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2006 Itronix Inc.
      5  * All rights reserved.
      6  *
      7  * Written by Iain Hibbert for Itronix Inc.
      8  *
      9  * Redistribution and use in source and binary forms, with or without
     10  * modification, are permitted provided that the following conditions
     11  * are met:
     12  * 1. Redistributions of source code must retain the above copyright
     13  *    notice, this list of conditions and the following disclaimer.
     14  * 2. Redistributions in binary form must reproduce the above copyright
     15  *    notice, this list of conditions and the following disclaimer in the
     16  *    documentation and/or other materials provided with the distribution.
     17  * 3. The name of Itronix Inc. may not be used to endorse
     18  *    or promote products derived from this software without specific
     19  *    prior written permission.
     20  *
     21  * THIS SOFTWARE IS PROVIDED BY ITRONIX INC. ``AS IS'' AND
     22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     23  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     24  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL ITRONIX INC. BE LIABLE FOR ANY
     25  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
     26  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     27  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
     28  * ON ANY THEORY OF LIABILITY, WHETHER IN
     29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     31  * POSSIBILITY OF SUCH DAMAGE.
     32  */
     33 
     34 #include <sys/cdefs.h>
     35 __KERNEL_RCSID(0, "$NetBSD: bthidev.c,v 1.1.6.4 2006/09/14 12:31:27 yamt Exp $");
     36 
     37 #include <sys/param.h>
     38 #include <sys/conf.h>
     39 #include <sys/device.h>
     40 #include <sys/fcntl.h>
     41 #include <sys/kernel.h>
     42 #include <sys/queue.h>
     43 #include <sys/malloc.h>
     44 #include <sys/mbuf.h>
     45 #include <sys/proc.h>
     46 #include <sys/systm.h>
     47 
     48 #include <prop/proplib.h>
     49 
     50 #include <netbt/bluetooth.h>
     51 #include <netbt/l2cap.h>
     52 
     53 #include <dev/usb/hid.h>
     54 #include <dev/bluetooth/btdev.h>
     55 #include <dev/bluetooth/bthid.h>
     56 #include <dev/bluetooth/bthidev.h>
     57 
     58 #include "locators.h"
     59 
     60 /*****************************************************************************
     61  *
     62  *	Bluetooth HID device
     63  */
     64 
     65 #define MAX_DESCRIPTOR_LEN	1024		/* sanity check */
     66 
     67 /* bthidev softc */
     68 struct bthidev_softc {
     69 	struct btdev		sc_btdev;
     70 	uint16_t		sc_state;
     71 	uint16_t		sc_flags;
     72 
     73 	bdaddr_t		sc_laddr;	/* local address */
     74 	bdaddr_t		sc_raddr;	/* remote address */
     75 
     76 	uint16_t		sc_ctlpsm;	/* control PSM */
     77 	struct l2cap_channel	*sc_ctl;	/* control channel */
     78 	struct l2cap_channel	*sc_ctl_l;	/* control listen */
     79 
     80 	uint16_t		sc_intpsm;	/* interrupt PSM */
     81 	struct l2cap_channel	*sc_int;	/* interrupt channel */
     82 	struct l2cap_channel	*sc_int_l;	/* interrupt listen */
     83 
     84 	LIST_HEAD(,bthidev)	sc_list;	/* child list */
     85 
     86 	struct callout		sc_reconnect;
     87 	int			sc_attempts;	/* connection attempts */
     88 };
     89 
     90 /* sc_flags */
     91 #define BTHID_RECONNECT		(1 << 0)	/* reconnect on link loss */
     92 #define BTHID_CONNECTING	(1 << 1)	/* we are connecting */
     93 
     94 /* device state */
     95 #define BTHID_CLOSED		0
     96 #define BTHID_WAIT_CTL		1
     97 #define BTHID_WAIT_INT		2
     98 #define BTHID_OPEN		3
     99 #define BTHID_DETACHING		4
    100 
    101 #define	BTHID_RETRY_INTERVAL	5	/* seconds between connection attempts */
    102 
    103 /* bthidev internals */
    104 static void bthidev_timeout(void *);
    105 static int  bthidev_listen(struct bthidev_softc *);
    106 static int  bthidev_connect(struct bthidev_softc *);
    107 static int  bthidev_output(struct bthidev *, uint8_t *, int);
    108 static void bthidev_null(struct bthidev *, uint8_t *, int);
    109 
    110 /* autoconf(9) glue */
    111 static int  bthidev_match(struct device *, struct cfdata *, void *);
    112 static void bthidev_attach(struct device *, struct device *, void *);
    113 static int  bthidev_detach(struct device *, int);
    114 static int  bthidev_print(void *, const char *);
    115 
    116 CFATTACH_DECL(bthidev, sizeof(struct bthidev_softc),
    117     bthidev_match, bthidev_attach, bthidev_detach, NULL);
    118 
    119 /* btdev identity matcher */
    120 static int bthidev_identify(struct btdev *, prop_dictionary_t);
    121 
    122 /* bluetooth(9) protocol methods for L2CAP */
    123 static void  bthidev_connecting(void *);
    124 static void  bthidev_ctl_connected(void *);
    125 static void  bthidev_int_connected(void *);
    126 static void  bthidev_ctl_disconnected(void *, int);
    127 static void  bthidev_int_disconnected(void *, int);
    128 static void *bthidev_ctl_newconn(void *, struct sockaddr_bt *, struct sockaddr_bt *);
    129 static void *bthidev_int_newconn(void *, struct sockaddr_bt *, struct sockaddr_bt *);
    130 static void  bthidev_complete(void *, int);
    131 static void  bthidev_input(void *, struct mbuf *);
    132 
    133 static const struct btproto bthidev_ctl_proto = {
    134 	bthidev_connecting,
    135 	bthidev_ctl_connected,
    136 	bthidev_ctl_disconnected,
    137 	bthidev_ctl_newconn,
    138 	bthidev_complete,
    139 	bthidev_input,
    140 };
    141 
    142 static const struct btproto bthidev_int_proto = {
    143 	bthidev_connecting,
    144 	bthidev_int_connected,
    145 	bthidev_int_disconnected,
    146 	bthidev_int_newconn,
    147 	bthidev_complete,
    148 	bthidev_input,
    149 };
    150 
    151 /*****************************************************************************
    152  *
    153  *	bthidev autoconf(9) routines
    154  */
    155 
    156 static int
    157 bthidev_match(struct device *self, struct cfdata *cfdata, void *aux)
    158 {
    159 	prop_dictionary_t dict = aux;
    160 	prop_object_t obj;
    161 
    162 	obj = prop_dictionary_get(dict, BTDEVtype);
    163 	return prop_string_equals_cstring(obj, "bthidev");
    164 }
    165 
    166 static void
    167 bthidev_attach(struct device *parent, struct device *self, void *aux)
    168 {
    169 	struct bthidev_softc *sc = (struct bthidev_softc *)self;
    170 	prop_dictionary_t dict = aux;
    171 	prop_object_t obj;
    172 	struct bthidev_attach_args bha;
    173 	struct bthidev *dev;
    174 	struct hid_data *d;
    175 	struct hid_item h;
    176 	const void *desc;
    177 	int locs[BTHIDBUSCF_NLOCS];
    178 	int maxid, rep, s, dlen;
    179 
    180 	/*
    181 	 * Init softc
    182 	 */
    183 	LIST_INIT(&sc->sc_list);
    184 	callout_init(&sc->sc_reconnect);
    185 	callout_setfunc(&sc->sc_reconnect, bthidev_timeout, sc);
    186 	sc->sc_state = BTHID_CLOSED;
    187 	sc->sc_flags = BTHID_CONNECTING;
    188 	sc->sc_ctlpsm = L2CAP_PSM_HID_CNTL;
    189 	sc->sc_intpsm = L2CAP_PSM_HID_INTR;
    190 
    191 	sc->sc_btdev.sc_identify = bthidev_identify;
    192 
    193 	/*
    194 	 * extract config from proplist
    195 	 */
    196 	obj = prop_dictionary_get(dict, BTDEVladdr);
    197 	bdaddr_copy(&sc->sc_laddr, prop_data_data_nocopy(obj));
    198 
    199 	obj = prop_dictionary_get(dict, BTDEVraddr);
    200 	bdaddr_copy(&sc->sc_raddr, prop_data_data_nocopy(obj));
    201 
    202 	obj = prop_dictionary_get(dict, BTHIDEVcontrolpsm);
    203 	if (prop_object_type(obj) == PROP_TYPE_NUMBER) {
    204 		sc->sc_ctlpsm = prop_number_integer_value(obj);
    205 		if (L2CAP_PSM_INVALID(sc->sc_ctlpsm)) {
    206 			aprint_error(" invalid %s\n", BTHIDEVcontrolpsm);
    207 			return;
    208 		}
    209 	}
    210 
    211 	obj = prop_dictionary_get(dict, BTHIDEVinterruptpsm);
    212 	if (prop_object_type(obj) == PROP_TYPE_NUMBER) {
    213 		sc->sc_intpsm = prop_number_integer_value(obj);
    214 		if (L2CAP_PSM_INVALID(sc->sc_intpsm)) {
    215 			aprint_error(" invalid %s\n", BTHIDEVinterruptpsm);
    216 			return;
    217 		}
    218 	}
    219 
    220 	obj = prop_dictionary_get(dict, BTHIDEVdescriptor);
    221 	if (prop_object_type(obj) == PROP_TYPE_DATA) {
    222 		dlen = prop_data_size(obj);
    223 		desc = prop_data_data_nocopy(obj);
    224 	} else {
    225 		aprint_error(" no %s\n", BTHIDEVdescriptor);
    226 		return;
    227 	}
    228 
    229 	obj = prop_dictionary_get(dict, BTHIDEVreconnect);
    230 	if (prop_object_type(obj) == PROP_TYPE_BOOL
    231 	    && !prop_bool_true(obj))
    232 		sc->sc_flags |= BTHID_RECONNECT;
    233 
    234 	/*
    235 	 * Parse the descriptor and attach child devices, one per report.
    236 	 */
    237 	maxid = -1;
    238 	h.report_ID = 0;
    239 	d = hid_start_parse(desc, dlen, hid_none);
    240 	while (hid_get_item(d, &h)) {
    241 		if (h.report_ID > maxid)
    242 			maxid = h.report_ID;
    243 	}
    244 	hid_end_parse(d);
    245 
    246 	if (maxid < 0) {
    247 		aprint_error(" no reports found\n");
    248 		return;
    249 	}
    250 
    251 	aprint_normal("\n");
    252 
    253 	for (rep = 0 ; rep <= maxid ; rep++) {
    254 		if (hid_report_size(desc, dlen, hid_feature, rep) == 0
    255 		    && hid_report_size(desc, dlen, hid_input, rep) == 0
    256 		    && hid_report_size(desc, dlen, hid_output, rep) == 0)
    257 			continue;
    258 
    259 		bha.ba_desc = desc;
    260 		bha.ba_dlen = dlen;
    261 		bha.ba_input = bthidev_null;
    262 		bha.ba_feature = bthidev_null;
    263 		bha.ba_output = bthidev_output;
    264 		bha.ba_id = rep;
    265 
    266 		locs[BTHIDBUSCF_REPORTID] = rep;
    267 
    268 		dev = (struct bthidev *)config_found_sm_loc((struct device *)sc, "bthidbus",
    269 					locs, &bha, bthidev_print, config_stdsubmatch);
    270 		if (dev != NULL) {
    271 			dev->sc_parent = (struct device *)sc;
    272 			dev->sc_id = rep;
    273 			dev->sc_input = bha.ba_input;
    274 			dev->sc_feature = bha.ba_feature;
    275 			LIST_INSERT_HEAD(&sc->sc_list, dev, sc_next);
    276 		}
    277 	}
    278 
    279 	/*
    280 	 * start bluetooth connections
    281 	 */
    282 	s = splsoftnet();
    283 	if ((sc->sc_flags & BTHID_RECONNECT) == 0)
    284 		bthidev_listen(sc);
    285 
    286 	if (sc->sc_flags & BTHID_CONNECTING)
    287 		bthidev_connect(sc);
    288 	splx(s);
    289 }
    290 
    291 static int
    292 bthidev_detach(struct device *self, int flags)
    293 {
    294 	struct bthidev_softc *sc = (struct bthidev_softc *)self;
    295 	struct bthidev *dev;
    296 	int s;
    297 
    298 	s = splsoftnet();
    299 	sc->sc_flags = 0;	/* disable reconnecting */
    300 
    301 	/* release interrupt listen */
    302 	if (sc->sc_int_l != NULL) {
    303 		l2cap_detach(&sc->sc_int_l);
    304 		sc->sc_int_l = NULL;
    305 	}
    306 
    307 	/* release control listen */
    308 	if (sc->sc_ctl_l != NULL) {
    309 		l2cap_detach(&sc->sc_ctl_l);
    310 		sc->sc_ctl_l = NULL;
    311 	}
    312 
    313 	/* close interrupt channel */
    314 	if (sc->sc_int != NULL) {
    315 		l2cap_disconnect(sc->sc_int, 0);
    316 		l2cap_detach(&sc->sc_int);
    317 		sc->sc_int = NULL;
    318 	}
    319 
    320 	/* close control channel */
    321 	if (sc->sc_ctl != NULL) {
    322 		l2cap_disconnect(sc->sc_ctl, 0);
    323 		l2cap_detach(&sc->sc_ctl);
    324 		sc->sc_ctl = NULL;
    325 	}
    326 
    327 	/* remove callout */
    328 	sc->sc_state = BTHID_DETACHING;
    329 	callout_stop(&sc->sc_reconnect);
    330 	if (callout_invoking(&sc->sc_reconnect))
    331 		tsleep(sc, PWAIT, "bthidetach", 0);
    332 
    333 	splx(s);
    334 
    335 	/* detach children */
    336 	while ((dev = LIST_FIRST(&sc->sc_list)) != NULL) {
    337 		LIST_REMOVE(dev, sc_next);
    338 		config_detach((struct device *)dev, flags);
    339 	}
    340 
    341 	return 0;
    342 }
    343 
    344 /*
    345  * bthidev config print
    346  */
    347 static int
    348 bthidev_print(void *aux, const char *pnp)
    349 {
    350 	struct bthidev_attach_args *ba = aux;
    351 
    352 	if (pnp != NULL)
    353 		aprint_normal("%s:", pnp);
    354 
    355 	if (ba->ba_id > 0)
    356 		aprint_normal(" reportid %d", ba->ba_id);
    357 
    358 	return UNCONF;
    359 }
    360 
    361 /*
    362  * btdev identity matcher
    363  */
    364 static int
    365 bthidev_identify(struct btdev *dev, prop_dictionary_t dict)
    366 {
    367 	struct bthidev_softc *sc = (struct bthidev_softc *)dev;
    368 	prop_object_t obj;
    369 
    370 	obj = prop_dictionary_get(dict, BTDEVtype);
    371 	if (!prop_string_equals_cstring(obj, "bthidev"))
    372 		return 0;
    373 
    374 	obj = prop_dictionary_get(dict, BTDEVladdr);
    375 	if (!prop_data_equals_data(obj, &sc->sc_laddr, sizeof(bdaddr_t)))
    376 		return 0;
    377 
    378 	obj = prop_dictionary_get(dict, BTDEVraddr);
    379 	if (!prop_data_equals_data(obj, &sc->sc_raddr, sizeof(bdaddr_t)))
    380 		return 0;
    381 
    382 	obj = prop_dictionary_get(dict, BTHIDEVcontrolpsm);
    383 	if (!prop_number_equals_integer(obj, sc->sc_ctlpsm))
    384 		return 0;
    385 
    386 	obj = prop_dictionary_get(dict, BTHIDEVinterruptpsm);
    387 	if (!prop_number_equals_integer(obj, sc->sc_intpsm))
    388 		return 0;
    389 
    390 	return 1;
    391 }
    392 
    393 /*****************************************************************************
    394  *
    395  *	bluetooth(4) HID attach/detach routines
    396  */
    397 
    398 /*
    399  * callouts are scheduled after connections have been lost, in order
    400  * to clean up and reconnect.
    401  */
    402 static void
    403 bthidev_timeout(void *arg)
    404 {
    405 	struct bthidev_softc *sc = arg;
    406 	int s;
    407 
    408 	s = splsoftnet();
    409 	callout_ack(&sc->sc_reconnect);
    410 
    411 	switch (sc->sc_state) {
    412 	case BTHID_CLOSED:
    413 		if (sc->sc_int != NULL) {
    414 			l2cap_disconnect(sc->sc_int, 0);
    415 			break;
    416 		}
    417 
    418 		if (sc->sc_ctl != NULL) {
    419 			l2cap_disconnect(sc->sc_ctl, 0);
    420 			break;
    421 		}
    422 
    423 		if (sc->sc_flags & BTHID_RECONNECT) {
    424 			sc->sc_flags |= BTHID_CONNECTING;
    425 			bthidev_connect(sc);
    426 			break;
    427 		}
    428 
    429 		break;
    430 
    431 	case BTHID_WAIT_CTL:
    432 		break;
    433 
    434 	case BTHID_WAIT_INT:
    435 		break;
    436 
    437 	case BTHID_OPEN:
    438 		break;
    439 
    440 	case BTHID_DETACHING:
    441 		wakeup(sc);
    442 		break;
    443 
    444 	default:
    445 		break;
    446 	}
    447 	splx(s);
    448 }
    449 
    450 /*
    451  * listen for our device
    452  */
    453 static int
    454 bthidev_listen(struct bthidev_softc *sc)
    455 {
    456 	struct sockaddr_bt sa;
    457 	int err;
    458 
    459 	memset(&sa, 0, sizeof(sa));
    460 	sa.bt_len = sizeof(sa);
    461 	sa.bt_family = AF_BLUETOOTH;
    462 	bdaddr_copy(&sa.bt_bdaddr, &sc->sc_laddr);
    463 
    464 	/*
    465 	 * Listen on control PSM
    466 	 */
    467 	err = l2cap_attach(&sc->sc_ctl_l, &bthidev_ctl_proto, sc);
    468 	if (err)
    469 		return err;
    470 
    471 	sa.bt_psm = sc->sc_ctlpsm;
    472 	err = l2cap_bind(sc->sc_ctl_l, &sa);
    473 	if (err)
    474 		return err;
    475 
    476 	err = l2cap_listen(sc->sc_ctl_l);
    477 	if (err)
    478 		return err;
    479 
    480 	/*
    481 	 * Listen on interrupt PSM
    482 	 */
    483 	err = l2cap_attach(&sc->sc_int_l, &bthidev_int_proto, sc);
    484 	if (err)
    485 		return err;
    486 
    487 	sa.bt_psm = sc->sc_intpsm;
    488 	err = l2cap_bind(sc->sc_int_l, &sa);
    489 	if (err)
    490 		return err;
    491 
    492 	err = l2cap_listen(sc->sc_int_l);
    493 	if (err)
    494 		return err;
    495 
    496 	sc->sc_state = BTHID_WAIT_CTL;
    497 	return 0;
    498 }
    499 
    500 /*
    501  * start connecting to our device
    502  */
    503 static int
    504 bthidev_connect(struct bthidev_softc *sc)
    505 {
    506 	struct sockaddr_bt sa;
    507 	int err;
    508 
    509 	if (sc->sc_attempts++ > 0)
    510 		printf("%s: connect (#%d)\n",
    511 			device_xname((struct device *)sc), sc->sc_attempts);
    512 
    513 	memset(&sa, 0, sizeof(sa));
    514 	sa.bt_len = sizeof(sa);
    515 	sa.bt_family = AF_BLUETOOTH;
    516 
    517 	err = l2cap_attach(&sc->sc_ctl, &bthidev_ctl_proto, sc);
    518 	if (err) {
    519 		printf("%s: l2cap_attach failed (%d)\n",
    520 			device_xname((struct device *)sc), err);
    521 		return err;
    522 	}
    523 
    524 	bdaddr_copy(&sa.bt_bdaddr, &sc->sc_laddr);
    525 	err = l2cap_bind(sc->sc_ctl, &sa);
    526 	if (err) {
    527 		printf("%s: l2cap_bind failed (%d)\n",
    528 			device_xname((struct device *)sc), err);
    529 		return err;
    530 	}
    531 
    532 	sa.bt_psm = sc->sc_ctlpsm;
    533 	bdaddr_copy(&sa.bt_bdaddr, &sc->sc_raddr);
    534 	err = l2cap_connect(sc->sc_ctl, &sa);
    535 	if (err) {
    536 		printf("%s: l2cap_connect failed (%d)\n",
    537 			device_xname((struct device *)sc), err);
    538 		return err;
    539 	}
    540 
    541 	sc->sc_state = BTHID_WAIT_CTL;
    542 	return 0;
    543 }
    544 
    545 /*****************************************************************************
    546  *
    547  *	bluetooth(9) callback methods for L2CAP
    548  *
    549  *	All these are called from Bluetooth Protocol code, in a soft
    550  *	interrupt context at IPL_SOFTNET.
    551  */
    552 
    553 static void
    554 bthidev_connecting(void *arg)
    555 {
    556 
    557 	/* dont care */
    558 }
    559 
    560 static void
    561 bthidev_ctl_connected(void *arg)
    562 {
    563 	struct sockaddr_bt sa;
    564 	struct bthidev_softc *sc = arg;
    565 	int err;
    566 
    567 	if (sc->sc_state != BTHID_WAIT_CTL)
    568 		return;
    569 
    570 	KASSERT(sc->sc_ctl != NULL);
    571 	KASSERT(sc->sc_int == NULL);
    572 
    573 	if (sc->sc_flags & BTHID_CONNECTING) {
    574 		/* initiate connect on interrupt PSM */
    575 		err = l2cap_attach(&sc->sc_int, &bthidev_int_proto, sc);
    576 		if (err)
    577 			goto fail;
    578 
    579 		memset(&sa, 0, sizeof(sa));
    580 		sa.bt_len = sizeof(sa);
    581 		sa.bt_family = AF_BLUETOOTH;
    582 		bdaddr_copy(&sa.bt_bdaddr, &sc->sc_laddr);
    583 
    584 		err = l2cap_bind(sc->sc_int, &sa);
    585 		if (err)
    586 			goto fail;
    587 
    588 		sa.bt_psm = sc->sc_intpsm;
    589 		bdaddr_copy(&sa.bt_bdaddr, &sc->sc_raddr);
    590 		err = l2cap_connect(sc->sc_int, &sa);
    591 		if (err)
    592 			goto fail;
    593 	}
    594 
    595 	sc->sc_state = BTHID_WAIT_INT;
    596 	return;
    597 
    598 fail:
    599 	l2cap_detach(&sc->sc_ctl);
    600 	sc->sc_ctl = NULL;
    601 
    602 	printf("%s: connect failed (%d)\n",
    603 		device_xname((struct device *)sc), err);
    604 }
    605 
    606 static void
    607 bthidev_int_connected(void *arg)
    608 {
    609 	struct bthidev_softc *sc = arg;
    610 
    611 	if (sc->sc_state != BTHID_WAIT_INT)
    612 		return;
    613 
    614 	KASSERT(sc->sc_ctl != NULL);
    615 	KASSERT(sc->sc_int != NULL);
    616 
    617 	sc->sc_attempts = 0;
    618 	sc->sc_flags &= ~BTHID_CONNECTING;
    619 	sc->sc_state = BTHID_OPEN;
    620 
    621 	printf("%s: connected\n", device_xname((struct device *)sc));
    622 }
    623 
    624 /*
    625  * Disconnected
    626  *
    627  * Depending on our state, this could mean several things, but essentially
    628  * we are lost. If both channels are closed, and we are marked to reconnect,
    629  * schedule another try otherwise just give up. They will contact us.
    630  */
    631 static void
    632 bthidev_ctl_disconnected(void *arg, int err)
    633 {
    634 	struct bthidev_softc *sc = arg;
    635 
    636 	if (sc->sc_ctl != NULL) {
    637 		l2cap_detach(&sc->sc_ctl);
    638 		sc->sc_ctl = NULL;
    639 	}
    640 
    641 	sc->sc_state = BTHID_CLOSED;
    642 
    643 	if (sc->sc_int == NULL) {
    644 		printf("%s: disconnected\n",
    645 			device_xname((struct device *)sc));
    646 		sc->sc_flags &= ~BTHID_CONNECTING;
    647 
    648 		if (sc->sc_flags & BTHID_RECONNECT)
    649 			callout_schedule(&sc->sc_reconnect,
    650 					BTHID_RETRY_INTERVAL * hz);
    651 		else
    652 			sc->sc_state = BTHID_WAIT_CTL;
    653 	} else {
    654 		/*
    655 		 * The interrupt channel should have been closed first,
    656 		 * but its potentially unsafe to detach that from here.
    657 		 * Give them a second to do the right thing or let the
    658 		 * callout handle it.
    659 		 */
    660 		callout_schedule(&sc->sc_reconnect, hz);
    661 	}
    662 }
    663 
    664 static void
    665 bthidev_int_disconnected(void *arg, int err)
    666 {
    667 	struct bthidev_softc *sc = arg;
    668 
    669 	if (sc->sc_int != NULL) {
    670 		l2cap_detach(&sc->sc_int);
    671 		sc->sc_int = NULL;
    672 	}
    673 
    674 	sc->sc_state = BTHID_CLOSED;
    675 
    676 	if (sc->sc_ctl == NULL) {
    677 		printf("%s: disconnected\n",
    678 			device_xname((struct device *)sc));
    679 		sc->sc_flags &= ~BTHID_CONNECTING;
    680 
    681 		if (sc->sc_flags & BTHID_RECONNECT)
    682 			callout_schedule(&sc->sc_reconnect,
    683 					BTHID_RETRY_INTERVAL * hz);
    684 		else
    685 			sc->sc_state = BTHID_WAIT_CTL;
    686 	} else {
    687 		/*
    688 		 * The control channel should be closing also, allow
    689 		 * them a chance to do that before we force it.
    690 		 */
    691 		callout_schedule(&sc->sc_reconnect, hz);
    692 	}
    693 }
    694 
    695 /*
    696  * New Connections
    697  *
    698  * We give a new L2CAP handle back if this matches the BDADDR we are
    699  * listening for and we are in the right state. bthidev_connected will
    700  * be called when the connection is open, so nothing else to do here
    701  */
    702 static void *
    703 bthidev_ctl_newconn(void *arg, struct sockaddr_bt *laddr, struct sockaddr_bt *raddr)
    704 {
    705 	struct bthidev_softc *sc = arg;
    706 
    707 	if (bdaddr_same(&raddr->bt_bdaddr, &sc->sc_raddr) == 0
    708 	    || (sc->sc_flags & BTHID_CONNECTING)
    709 	    || sc->sc_state != BTHID_WAIT_CTL
    710 	    || sc->sc_ctl != NULL
    711 	    || sc->sc_int != NULL)
    712 		return NULL;
    713 
    714 	l2cap_attach(&sc->sc_ctl, &bthidev_ctl_proto, sc);
    715 	return sc->sc_ctl;
    716 }
    717 
    718 static void *
    719 bthidev_int_newconn(void *arg, struct sockaddr_bt *laddr, struct sockaddr_bt *raddr)
    720 {
    721 	struct bthidev_softc *sc = arg;
    722 
    723 	if (bdaddr_same(&raddr->bt_bdaddr, &sc->sc_raddr) == 0
    724 	    || (sc->sc_flags & BTHID_CONNECTING)
    725 	    || sc->sc_state != BTHID_WAIT_INT
    726 	    || sc->sc_ctl == NULL
    727 	    || sc->sc_int != NULL)
    728 		return NULL;
    729 
    730 	l2cap_attach(&sc->sc_int, &bthidev_int_proto, sc);
    731 	return sc->sc_int;
    732 }
    733 
    734 static void
    735 bthidev_complete(void *arg, int count)
    736 {
    737 
    738 	/* dont care */
    739 }
    740 
    741 /*
    742  * Receive reports from the protocol stack.
    743  */
    744 static void
    745 bthidev_input(void *arg, struct mbuf *m)
    746 {
    747 	struct bthidev_softc *sc = arg;
    748 	struct bthidev *dev;
    749 	uint8_t *data;
    750 	int len;
    751 
    752 	if (sc->sc_state != BTHID_OPEN)
    753 		goto release;
    754 
    755 	if (m->m_pkthdr.len > m->m_len)
    756 		printf("%s: truncating HID report\n",
    757 			device_xname((struct device *)sc));
    758 
    759 	len = m->m_len;
    760 	data = mtod(m, uint8_t *);
    761 
    762 	if (BTHID_TYPE(data[0]) == BTHID_DATA) {
    763 		/*
    764 		 * data[0] == type / parameter
    765 		 * data[1] == id
    766 		 * data[2..len] == report
    767 		 */
    768 		if (len < 3)
    769 			goto release;
    770 
    771 		LIST_FOREACH(dev, &sc->sc_list, sc_next) {
    772 			if (data[1] == dev->sc_id) {
    773 				switch (BTHID_DATA_PARAM(data[0])) {
    774 				case BTHID_DATA_INPUT:
    775 					(*dev->sc_input)(dev, data + 2, len - 2);
    776 					break;
    777 
    778 				case BTHID_DATA_FEATURE:
    779 					(*dev->sc_feature)(dev, data + 2, len - 2);
    780 					break;
    781 
    782 				default:
    783 					break;
    784 				}
    785 
    786 				goto release;
    787 			}
    788 		}
    789 		printf("%s: report id %d, len = %d ignored\n",
    790 			device_xname((struct device *)sc), data[1], len - 2);
    791 
    792 		goto release;
    793 	}
    794 
    795 	if (BTHID_TYPE(data[0]) == BTHID_CONTROL) {
    796 		if (len < 1)
    797 			goto release;
    798 
    799 		if (BTHID_DATA_PARAM(data[0]) == BTHID_CONTROL_UNPLUG) {
    800 			printf("%s: unplugged\n",
    801 				device_xname((struct device *)sc));
    802 
    803 			/* close interrupt channel */
    804 			if (sc->sc_int != NULL) {
    805 				l2cap_disconnect(sc->sc_int, 0);
    806 				l2cap_detach(&sc->sc_int);
    807 				sc->sc_int = NULL;
    808 			}
    809 
    810 			/* close control channel */
    811 			if (sc->sc_ctl != NULL) {
    812 				l2cap_disconnect(sc->sc_ctl, 0);
    813 				l2cap_detach(&sc->sc_ctl);
    814 				sc->sc_ctl = NULL;
    815 			}
    816 		}
    817 
    818 		goto release;
    819 	}
    820 
    821 release:
    822 	m_freem(m);
    823 }
    824 
    825 /*****************************************************************************
    826  *
    827  *	IO routines
    828  */
    829 
    830 static void
    831 bthidev_null(struct bthidev *dev, uint8_t *report, int len)
    832 {
    833 
    834 	/*
    835 	 * empty routine just in case the device
    836 	 * provided no method to handle this report
    837 	 */
    838 }
    839 
    840 static int
    841 bthidev_output(struct bthidev *dev, uint8_t *report, int rlen)
    842 {
    843 	struct bthidev_softc *sc = (struct bthidev_softc *)dev->sc_parent;
    844 	struct mbuf *m;
    845 	int s, err;
    846 
    847 	if (sc == NULL || sc->sc_state != BTHID_OPEN)
    848 		return ENOTCONN;
    849 
    850 	KASSERT(sc->sc_ctl != NULL);
    851 	KASSERT(sc->sc_int != NULL);
    852 
    853 	if (rlen == 0 || report == NULL)
    854 		return 0;
    855 
    856 	if (rlen > MHLEN - 2) {
    857 		printf("%s: output report too long (%d)!\n",
    858 				device_xname((struct device *)sc), rlen);
    859 
    860 		return EMSGSIZE;
    861 	}
    862 
    863 	m = m_gethdr(M_DONTWAIT, MT_DATA);
    864 	if (m == NULL)
    865 		return ENOMEM;
    866 
    867 	/*
    868 	 * data[0] = type / parameter
    869 	 * data[1] = id
    870 	 * data[2..N] = report
    871 	 */
    872 	mtod(m, uint8_t *)[0] = (uint8_t)((BTHID_DATA << 4) | BTHID_DATA_OUTPUT);
    873 	mtod(m, uint8_t *)[1] = dev->sc_id;
    874 	memcpy(mtod(m, uint8_t *) + 2, report, rlen);
    875 	m->m_pkthdr.len = m->m_len = rlen + 2;
    876 
    877 	s = splsoftnet();
    878 	err = l2cap_send(sc->sc_int, m);
    879 	splx(s);
    880 
    881 	return err;
    882 }
    883