1/*
2 * ng_btsocket_hci_raw.c
3 */
4
5/*-
6 * SPDX-License-Identifier: BSD-2-Clause
7 *
8 * Copyright (c) 2001-2002 Maksim Yevmenkin <m_evmenkin@yahoo.com>
9 * All rights reserved.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 *    notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 *    notice, this list of conditions and the following disclaimer in the
18 *    documentation and/or other materials provided with the distribution.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
24 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 * SUCH DAMAGE.
31 *
32 * $Id: ng_btsocket_hci_raw.c,v 1.14 2003/09/14 23:29:06 max Exp $
33 */
34
35#include <sys/param.h>
36#include <sys/systm.h>
37#include <sys/bitstring.h>
38#include <sys/domain.h>
39#include <sys/endian.h>
40#include <sys/errno.h>
41#include <sys/filedesc.h>
42#include <sys/ioccom.h>
43#include <sys/kernel.h>
44#include <sys/lock.h>
45#include <sys/malloc.h>
46#include <sys/mbuf.h>
47#include <sys/mutex.h>
48#include <sys/priv.h>
49#include <sys/protosw.h>
50#include <sys/queue.h>
51#include <sys/socket.h>
52#include <sys/socketvar.h>
53#include <sys/sysctl.h>
54#include <sys/taskqueue.h>
55
56#include <net/vnet.h>
57
58#include <netgraph/ng_message.h>
59#include <netgraph/netgraph.h>
60#include <netgraph/bluetooth/include/ng_bluetooth.h>
61#include <netgraph/bluetooth/include/ng_hci.h>
62#include <netgraph/bluetooth/include/ng_l2cap.h>
63#include <netgraph/bluetooth/include/ng_btsocket.h>
64#include <netgraph/bluetooth/include/ng_btsocket_hci_raw.h>
65
66/* MALLOC define */
67#ifdef NG_SEPARATE_MALLOC
68static MALLOC_DEFINE(M_NETGRAPH_BTSOCKET_HCI_RAW, "netgraph_btsocks_hci_raw",
69	"Netgraph Bluetooth raw HCI sockets");
70#else
71#define M_NETGRAPH_BTSOCKET_HCI_RAW M_NETGRAPH
72#endif /* NG_SEPARATE_MALLOC */
73
74/* Netgraph node methods */
75static ng_constructor_t	ng_btsocket_hci_raw_node_constructor;
76static ng_rcvmsg_t	ng_btsocket_hci_raw_node_rcvmsg;
77static ng_shutdown_t	ng_btsocket_hci_raw_node_shutdown;
78static ng_newhook_t	ng_btsocket_hci_raw_node_newhook;
79static ng_connect_t	ng_btsocket_hci_raw_node_connect;
80static ng_rcvdata_t	ng_btsocket_hci_raw_node_rcvdata;
81static ng_disconnect_t	ng_btsocket_hci_raw_node_disconnect;
82
83static void 		ng_btsocket_hci_raw_input (void *, int);
84static void 		ng_btsocket_hci_raw_output(node_p, hook_p, void *, int);
85static void		ng_btsocket_hci_raw_savctl(ng_btsocket_hci_raw_pcb_p,
86						   struct mbuf **,
87						   struct mbuf *);
88static int		ng_btsocket_hci_raw_filter(ng_btsocket_hci_raw_pcb_p,
89						   struct mbuf *, int);
90
91#define ng_btsocket_hci_raw_wakeup_input_task() \
92	taskqueue_enqueue(taskqueue_swi, &ng_btsocket_hci_raw_task)
93
94/* Security filter */
95struct ng_btsocket_hci_raw_sec_filter {
96	bitstr_t	bit_decl(events, 0xff);
97	bitstr_t	bit_decl(commands[0x3f], 0x3ff);
98};
99
100/* Netgraph type descriptor */
101static struct ng_type typestruct = {
102	.version =	NG_ABI_VERSION,
103	.name =		NG_BTSOCKET_HCI_RAW_NODE_TYPE,
104	.constructor =	ng_btsocket_hci_raw_node_constructor,
105	.rcvmsg =	ng_btsocket_hci_raw_node_rcvmsg,
106	.shutdown =	ng_btsocket_hci_raw_node_shutdown,
107	.newhook =	ng_btsocket_hci_raw_node_newhook,
108	.connect =	ng_btsocket_hci_raw_node_connect,
109	.rcvdata =	ng_btsocket_hci_raw_node_rcvdata,
110	.disconnect =	ng_btsocket_hci_raw_node_disconnect,
111};
112
113/* Globals */
114static u_int32_t				ng_btsocket_hci_raw_debug_level;
115static u_int32_t				ng_btsocket_hci_raw_ioctl_timeout;
116static node_p					ng_btsocket_hci_raw_node;
117static struct ng_bt_itemq			ng_btsocket_hci_raw_queue;
118static struct mtx				ng_btsocket_hci_raw_queue_mtx;
119static struct task				ng_btsocket_hci_raw_task;
120static LIST_HEAD(, ng_btsocket_hci_raw_pcb)	ng_btsocket_hci_raw_sockets;
121static struct mtx				ng_btsocket_hci_raw_sockets_mtx;
122static u_int32_t				ng_btsocket_hci_raw_token;
123static struct mtx				ng_btsocket_hci_raw_token_mtx;
124static struct ng_btsocket_hci_raw_sec_filter	*ng_btsocket_hci_raw_sec_filter;
125static struct timeval				ng_btsocket_hci_raw_lasttime;
126static int					ng_btsocket_hci_raw_curpps;
127
128/* Sysctl tree */
129SYSCTL_DECL(_net_bluetooth_hci_sockets);
130static SYSCTL_NODE(_net_bluetooth_hci_sockets, OID_AUTO, raw,
131    CTLFLAG_RW | CTLFLAG_MPSAFE, 0,
132    "Bluetooth raw HCI sockets family");
133SYSCTL_UINT(_net_bluetooth_hci_sockets_raw, OID_AUTO, debug_level, CTLFLAG_RW,
134        &ng_btsocket_hci_raw_debug_level, NG_BTSOCKET_WARN_LEVEL,
135	"Bluetooth raw HCI sockets debug level");
136SYSCTL_UINT(_net_bluetooth_hci_sockets_raw, OID_AUTO, ioctl_timeout, CTLFLAG_RW,
137        &ng_btsocket_hci_raw_ioctl_timeout, 5,
138	"Bluetooth raw HCI sockets ioctl timeout");
139SYSCTL_UINT(_net_bluetooth_hci_sockets_raw, OID_AUTO, queue_len, CTLFLAG_RD,
140        &ng_btsocket_hci_raw_queue.len, 0,
141        "Bluetooth raw HCI sockets input queue length");
142SYSCTL_UINT(_net_bluetooth_hci_sockets_raw, OID_AUTO, queue_maxlen, CTLFLAG_RD,
143        &ng_btsocket_hci_raw_queue.maxlen, 0,
144        "Bluetooth raw HCI sockets input queue max. length");
145SYSCTL_UINT(_net_bluetooth_hci_sockets_raw, OID_AUTO, queue_drops, CTLFLAG_RD,
146        &ng_btsocket_hci_raw_queue.drops, 0,
147        "Bluetooth raw HCI sockets input queue drops");
148
149/* Debug */
150#define NG_BTSOCKET_HCI_RAW_INFO \
151	if (ng_btsocket_hci_raw_debug_level >= NG_BTSOCKET_INFO_LEVEL && \
152	    ppsratecheck(&ng_btsocket_hci_raw_lasttime, &ng_btsocket_hci_raw_curpps, 1)) \
153		printf
154
155#define NG_BTSOCKET_HCI_RAW_WARN \
156	if (ng_btsocket_hci_raw_debug_level >= NG_BTSOCKET_WARN_LEVEL && \
157	    ppsratecheck(&ng_btsocket_hci_raw_lasttime, &ng_btsocket_hci_raw_curpps, 1)) \
158		printf
159
160#define NG_BTSOCKET_HCI_RAW_ERR \
161	if (ng_btsocket_hci_raw_debug_level >= NG_BTSOCKET_ERR_LEVEL && \
162	    ppsratecheck(&ng_btsocket_hci_raw_lasttime, &ng_btsocket_hci_raw_curpps, 1)) \
163		printf
164
165#define NG_BTSOCKET_HCI_RAW_ALERT \
166	if (ng_btsocket_hci_raw_debug_level >= NG_BTSOCKET_ALERT_LEVEL && \
167	    ppsratecheck(&ng_btsocket_hci_raw_lasttime, &ng_btsocket_hci_raw_curpps, 1)) \
168		printf
169
170/****************************************************************************
171 ****************************************************************************
172 **                          Netgraph specific
173 ****************************************************************************
174 ****************************************************************************/
175
176/*
177 * Netgraph node constructor. Do not allow to create node of this type.
178 */
179
180static int
181ng_btsocket_hci_raw_node_constructor(node_p node)
182{
183	return (EINVAL);
184} /* ng_btsocket_hci_raw_node_constructor */
185
186/*
187 * Netgraph node destructor. Just let old node go and create new fresh one.
188 */
189
190static int
191ng_btsocket_hci_raw_node_shutdown(node_p node)
192{
193	int	error = 0;
194
195	NG_NODE_UNREF(node);
196
197	error = ng_make_node_common(&typestruct, &ng_btsocket_hci_raw_node);
198	if (error  != 0) {
199		NG_BTSOCKET_HCI_RAW_ALERT(
200"%s: Could not create Netgraph node, error=%d\n", __func__, error);
201
202		ng_btsocket_hci_raw_node = NULL;
203
204		return (ENOMEM);
205        }
206
207	error = ng_name_node(ng_btsocket_hci_raw_node,
208				NG_BTSOCKET_HCI_RAW_NODE_TYPE);
209	if (error != 0) {
210		NG_BTSOCKET_HCI_RAW_ALERT(
211"%s: Could not name Netgraph node, error=%d\n", __func__, error);
212
213		NG_NODE_UNREF(ng_btsocket_hci_raw_node);
214		ng_btsocket_hci_raw_node = NULL;
215
216		return (EINVAL);
217	}
218
219	return (0);
220} /* ng_btsocket_hci_raw_node_shutdown */
221
222/*
223 * Create new hook. Just say "yes"
224 */
225
226static int
227ng_btsocket_hci_raw_node_newhook(node_p node, hook_p hook, char const *name)
228{
229	return (0);
230} /* ng_btsocket_hci_raw_node_newhook */
231
232/*
233 * Connect hook. Just say "yes"
234 */
235
236static int
237ng_btsocket_hci_raw_node_connect(hook_p hook)
238{
239	return (0);
240} /* ng_btsocket_hci_raw_node_connect */
241
242/*
243 * Disconnect hook
244 */
245
246static int
247ng_btsocket_hci_raw_node_disconnect(hook_p hook)
248{
249	return (0);
250} /* ng_btsocket_hci_raw_node_disconnect */
251
252/*
253 * Receive control message.
254 * Make sure it is a message from HCI node and it is a response.
255 * Enqueue item and schedule input task.
256 */
257
258static int
259ng_btsocket_hci_raw_node_rcvmsg(node_p node, item_p item, hook_p lasthook)
260{
261	struct ng_mesg	*msg = NGI_MSG(item); /* item still has message */
262	int		 error = 0;
263
264	/*
265	 * Check for empty sockets list creates LOR when both sender and
266	 * receiver device are connected to the same host, so remove it
267	 * for now
268	 */
269
270	if (msg != NULL &&
271	    (msg->header.typecookie == NGM_HCI_COOKIE ||
272	     msg->header.typecookie == NGM_GENERIC_COOKIE) &&
273	    msg->header.flags & NGF_RESP) {
274		if (msg->header.token == 0) {
275			NG_FREE_ITEM(item);
276			return (0);
277		}
278
279		mtx_lock(&ng_btsocket_hci_raw_queue_mtx);
280		if (NG_BT_ITEMQ_FULL(&ng_btsocket_hci_raw_queue)) {
281			NG_BTSOCKET_HCI_RAW_ERR(
282"%s: Input queue is full\n", __func__);
283
284			NG_BT_ITEMQ_DROP(&ng_btsocket_hci_raw_queue);
285			NG_FREE_ITEM(item);
286			error = ENOBUFS;
287		} else {
288			NG_BT_ITEMQ_ENQUEUE(&ng_btsocket_hci_raw_queue, item);
289			error = ng_btsocket_hci_raw_wakeup_input_task();
290		}
291		mtx_unlock(&ng_btsocket_hci_raw_queue_mtx);
292	} else {
293		NG_FREE_ITEM(item);
294		error = EINVAL;
295	}
296
297	return (error);
298} /* ng_btsocket_hci_raw_node_rcvmsg */
299
300/*
301 * Receive packet from the one of our hook.
302 * Prepend every packet with sockaddr_hci and record sender's node name.
303 * Enqueue item and schedule input task.
304 */
305
306static int
307ng_btsocket_hci_raw_node_rcvdata(hook_p hook, item_p item)
308{
309	struct mbuf	*nam = NULL;
310	int		 error;
311
312	/*
313	 * Check for empty sockets list creates LOR when both sender and
314	 * receiver device are connected to the same host, so remove it
315	 * for now
316	 */
317
318	MGET(nam, M_NOWAIT, MT_SONAME);
319	if (nam != NULL) {
320		struct sockaddr_hci	*sa = mtod(nam, struct sockaddr_hci *);
321
322		nam->m_len = sizeof(struct sockaddr_hci);
323
324		sa->hci_len = sizeof(*sa);
325		sa->hci_family = AF_BLUETOOTH;
326		strlcpy(sa->hci_node, NG_PEER_NODE_NAME(hook),
327			sizeof(sa->hci_node));
328
329		NGI_GET_M(item, nam->m_next);
330		NGI_M(item) = nam;
331
332		mtx_lock(&ng_btsocket_hci_raw_queue_mtx);
333		if (NG_BT_ITEMQ_FULL(&ng_btsocket_hci_raw_queue)) {
334			NG_BTSOCKET_HCI_RAW_ERR(
335"%s: Input queue is full\n", __func__);
336
337			NG_BT_ITEMQ_DROP(&ng_btsocket_hci_raw_queue);
338			NG_FREE_ITEM(item);
339			error = ENOBUFS;
340		} else {
341			NG_BT_ITEMQ_ENQUEUE(&ng_btsocket_hci_raw_queue, item);
342			error = ng_btsocket_hci_raw_wakeup_input_task();
343		}
344		mtx_unlock(&ng_btsocket_hci_raw_queue_mtx);
345	} else {
346		NG_BTSOCKET_HCI_RAW_ERR(
347"%s: Failed to allocate address mbuf\n", __func__);
348
349		NG_FREE_ITEM(item);
350		error = ENOBUFS;
351	}
352
353	return (error);
354} /* ng_btsocket_hci_raw_node_rcvdata */
355
356/****************************************************************************
357 ****************************************************************************
358 **                              Sockets specific
359 ****************************************************************************
360 ****************************************************************************/
361
362/*
363 * Get next token. We need token to avoid theoretical race where process
364 * submits ioctl() message then interrupts ioctl() and re-submits another
365 * ioctl() on the same socket *before* first ioctl() complete.
366 */
367
368static void
369ng_btsocket_hci_raw_get_token(u_int32_t *token)
370{
371	mtx_lock(&ng_btsocket_hci_raw_token_mtx);
372
373	if (++ ng_btsocket_hci_raw_token == 0)
374		ng_btsocket_hci_raw_token = 1;
375
376	*token = ng_btsocket_hci_raw_token;
377
378	mtx_unlock(&ng_btsocket_hci_raw_token_mtx);
379} /* ng_btsocket_hci_raw_get_token */
380
381/*
382 * Send Netgraph message to the node - do not expect reply
383 */
384
385static int
386ng_btsocket_hci_raw_send_ngmsg(char *path, int cmd, void *arg, int arglen)
387{
388	struct ng_mesg	*msg = NULL;
389	int		 error = 0;
390
391	NG_MKMESSAGE(msg, NGM_HCI_COOKIE, cmd, arglen, M_NOWAIT);
392	if (msg == NULL)
393		return (ENOMEM);
394
395	if (arg != NULL && arglen > 0)
396		bcopy(arg, msg->data, arglen);
397
398	NG_SEND_MSG_PATH(error, ng_btsocket_hci_raw_node, msg, path, 0);
399
400	return (error);
401} /* ng_btsocket_hci_raw_send_ngmsg */
402
403/*
404 * Send Netgraph message to the node (no data) and wait for reply
405 */
406
407static int
408ng_btsocket_hci_raw_send_sync_ngmsg(ng_btsocket_hci_raw_pcb_p pcb, char *path,
409		int cmd, void *rsp, int rsplen)
410{
411	struct ng_mesg	*msg = NULL;
412	int		 error = 0;
413
414	mtx_assert(&pcb->pcb_mtx, MA_OWNED);
415
416	NG_MKMESSAGE(msg, NGM_HCI_COOKIE, cmd, 0, M_NOWAIT);
417	if (msg == NULL)
418		return (ENOMEM);
419
420	ng_btsocket_hci_raw_get_token(&msg->header.token);
421	pcb->token = msg->header.token;
422	pcb->msg = NULL;
423
424	NG_SEND_MSG_PATH(error, ng_btsocket_hci_raw_node, msg, path, 0);
425	if (error != 0) {
426		pcb->token = 0;
427		return (error);
428	}
429
430	error = msleep(&pcb->msg, &pcb->pcb_mtx, PZERO|PCATCH, "hcictl",
431			ng_btsocket_hci_raw_ioctl_timeout * hz);
432	pcb->token = 0;
433
434	if (error != 0)
435		return (error);
436
437	if (pcb->msg != NULL && pcb->msg->header.cmd == cmd)
438		bcopy(pcb->msg->data, rsp, rsplen);
439	else
440		error = EINVAL;
441
442	NG_FREE_MSG(pcb->msg); /* checks for != NULL */
443
444	return (0);
445} /* ng_btsocket_hci_raw_send_sync_ngmsg */
446
447/*
448 * Create control information for the packet
449 */
450
451static void
452ng_btsocket_hci_raw_savctl(ng_btsocket_hci_raw_pcb_p pcb, struct mbuf **ctl,
453		struct mbuf *m)
454{
455	int		dir;
456	struct timeval	tv;
457
458	mtx_assert(&pcb->pcb_mtx, MA_OWNED);
459
460	if (pcb->flags & NG_BTSOCKET_HCI_RAW_DIRECTION) {
461		dir = (m->m_flags & M_PROTO1)? 1 : 0;
462		*ctl = sbcreatecontrol(&dir, sizeof(dir),
463		    SCM_HCI_RAW_DIRECTION, SOL_HCI_RAW, M_NOWAIT);
464		if (*ctl != NULL)
465			ctl = &((*ctl)->m_next);
466	}
467
468	if (pcb->so->so_options & SO_TIMESTAMP) {
469		microtime(&tv);
470		*ctl = sbcreatecontrol(&tv, sizeof(tv), SCM_TIMESTAMP,
471		    SOL_SOCKET, M_NOWAIT);
472		if (*ctl != NULL)
473			ctl = &((*ctl)->m_next);
474	}
475} /* ng_btsocket_hci_raw_savctl */
476
477/*
478 * Raw HCI sockets data input routine
479 */
480
481static void
482ng_btsocket_hci_raw_data_input(struct mbuf *nam)
483{
484	ng_btsocket_hci_raw_pcb_p	 pcb = NULL;
485	struct mbuf			*m0 = NULL, *m = NULL;
486	struct sockaddr_hci		*sa = NULL;
487
488	m0 = nam->m_next;
489	nam->m_next = NULL;
490
491	KASSERT((nam->m_type == MT_SONAME),
492		("%s: m_type=%d\n", __func__, nam->m_type));
493	KASSERT((m0->m_flags & M_PKTHDR),
494		("%s: m_flags=%#x\n", __func__, m0->m_flags));
495
496	sa = mtod(nam, struct sockaddr_hci *);
497
498	mtx_lock(&ng_btsocket_hci_raw_sockets_mtx);
499
500	LIST_FOREACH(pcb, &ng_btsocket_hci_raw_sockets, next) {
501		mtx_lock(&pcb->pcb_mtx);
502
503		/*
504		 * If socket was bound then check address and
505		 *  make sure it matches.
506		 */
507
508		if (pcb->addr.hci_node[0] != 0 &&
509		    strcmp(sa->hci_node, pcb->addr.hci_node) != 0)
510			goto next;
511
512		/*
513		 * Check packet against filters
514		 * XXX do we have to call m_pullup() here?
515		 */
516
517		if (ng_btsocket_hci_raw_filter(pcb, m0, 1) != 0)
518			goto next;
519
520		/*
521		 * Make a copy of the packet, append to the socket's
522		 * receive queue and wakeup socket. sbappendaddr()
523		 * will check if socket has enough buffer space.
524		 */
525
526		m = m_dup(m0, M_NOWAIT);
527		if (m != NULL) {
528			struct mbuf	*ctl = NULL;
529
530			ng_btsocket_hci_raw_savctl(pcb, &ctl, m);
531
532			if (sbappendaddr(&pcb->so->so_rcv,
533					(struct sockaddr *) sa, m, ctl))
534				sorwakeup(pcb->so);
535			else {
536				NG_BTSOCKET_HCI_RAW_INFO(
537"%s: sbappendaddr() failed\n", __func__);
538
539				NG_FREE_M(m);
540				NG_FREE_M(ctl);
541				soroverflow(pcb->so);
542			}
543		}
544next:
545		mtx_unlock(&pcb->pcb_mtx);
546	}
547
548	mtx_unlock(&ng_btsocket_hci_raw_sockets_mtx);
549
550	NG_FREE_M(nam);
551	NG_FREE_M(m0);
552} /* ng_btsocket_hci_raw_data_input */
553
554/*
555 * Raw HCI sockets message input routine
556 */
557
558static void
559ng_btsocket_hci_raw_msg_input(struct ng_mesg *msg)
560{
561	ng_btsocket_hci_raw_pcb_p	pcb = NULL;
562
563	mtx_lock(&ng_btsocket_hci_raw_sockets_mtx);
564
565	LIST_FOREACH(pcb, &ng_btsocket_hci_raw_sockets, next) {
566		mtx_lock(&pcb->pcb_mtx);
567
568		if (msg->header.token == pcb->token) {
569			pcb->msg = msg;
570			wakeup(&pcb->msg);
571
572			mtx_unlock(&pcb->pcb_mtx);
573			mtx_unlock(&ng_btsocket_hci_raw_sockets_mtx);
574
575			return;
576		}
577
578		mtx_unlock(&pcb->pcb_mtx);
579	}
580
581	mtx_unlock(&ng_btsocket_hci_raw_sockets_mtx);
582
583	NG_FREE_MSG(msg); /* checks for != NULL */
584} /* ng_btsocket_hci_raw_msg_input */
585
586/*
587 * Raw HCI sockets input routines
588 */
589
590static void
591ng_btsocket_hci_raw_input(void *context, int pending)
592{
593	item_p	item = NULL;
594
595	for (;;) {
596		mtx_lock(&ng_btsocket_hci_raw_queue_mtx);
597		NG_BT_ITEMQ_DEQUEUE(&ng_btsocket_hci_raw_queue, item);
598		mtx_unlock(&ng_btsocket_hci_raw_queue_mtx);
599
600		if (item == NULL)
601			break;
602
603		switch(item->el_flags & NGQF_TYPE) {
604		case NGQF_DATA: {
605			struct mbuf	*m = NULL;
606
607			NGI_GET_M(item, m);
608			ng_btsocket_hci_raw_data_input(m);
609			} break;
610
611		case NGQF_MESG: {
612			struct ng_mesg	*msg = NULL;
613
614			NGI_GET_MSG(item, msg);
615			ng_btsocket_hci_raw_msg_input(msg);
616			} break;
617
618		default:
619			KASSERT(0,
620("%s: invalid item type=%ld\n", __func__, (item->el_flags & NGQF_TYPE)));
621			break;
622		}
623
624		NG_FREE_ITEM(item);
625	}
626} /* ng_btsocket_hci_raw_input */
627
628/*
629 * Raw HCI sockets output routine
630 */
631
632static void
633ng_btsocket_hci_raw_output(node_p node, hook_p hook, void *arg1, int arg2)
634{
635	struct mbuf		*nam = (struct mbuf *) arg1, *m = NULL;
636	struct sockaddr_hci	*sa = NULL;
637	int			 error;
638
639	m = nam->m_next;
640	nam->m_next = NULL;
641
642	KASSERT((nam->m_type == MT_SONAME),
643		("%s: m_type=%d\n", __func__, nam->m_type));
644	KASSERT((m->m_flags & M_PKTHDR),
645		("%s: m_flags=%#x\n", __func__, m->m_flags));
646
647	sa = mtod(nam, struct sockaddr_hci *);
648
649	/*
650	 * Find downstream hook
651	 * XXX For now access node hook list directly. Should be safe because
652	 * we used ng_send_fn() and we should have exclusive lock on the node.
653	 */
654
655	LIST_FOREACH(hook, &node->nd_hooks, hk_hooks) {
656		if (hook == NULL || NG_HOOK_NOT_VALID(hook) ||
657		    NG_NODE_NOT_VALID(NG_PEER_NODE(hook)))
658			continue;
659
660		if (strcmp(sa->hci_node, NG_PEER_NODE_NAME(hook)) == 0) {
661			NG_SEND_DATA_ONLY(error, hook, m); /* sets m to NULL */
662			break;
663		}
664	}
665
666	NG_FREE_M(nam); /* check for != NULL */
667	NG_FREE_M(m);
668} /* ng_btsocket_hci_raw_output */
669
670/*
671 * Check frame against security and socket filters.
672 * d (direction bit) == 1 means incoming frame.
673 */
674
675static int
676ng_btsocket_hci_raw_filter(ng_btsocket_hci_raw_pcb_p pcb, struct mbuf *m, int d)
677{
678	int	type, event, opcode;
679
680	mtx_assert(&pcb->pcb_mtx, MA_OWNED);
681
682	switch ((type = *mtod(m, u_int8_t *))) {
683	case NG_HCI_CMD_PKT:
684		if (!(pcb->flags & NG_BTSOCKET_HCI_RAW_PRIVILEGED)) {
685			opcode = le16toh(mtod(m, ng_hci_cmd_pkt_t *)->opcode);
686
687			if (!bit_test(
688ng_btsocket_hci_raw_sec_filter->commands[NG_HCI_OGF(opcode) - 1],
689NG_HCI_OCF(opcode) - 1))
690				return (EPERM);
691		}
692
693		if (d && !bit_test(pcb->filter.packet_mask, NG_HCI_CMD_PKT - 1))
694			return (EPERM);
695		break;
696
697	case NG_HCI_ACL_DATA_PKT:
698	case NG_HCI_SCO_DATA_PKT:
699		if (!(pcb->flags & NG_BTSOCKET_HCI_RAW_PRIVILEGED) ||
700		    !bit_test(pcb->filter.packet_mask, type - 1) ||
701		    !d)
702			return (EPERM);
703		break;
704
705	case NG_HCI_EVENT_PKT:
706		if (!d)
707			return (EINVAL);
708
709		event = mtod(m, ng_hci_event_pkt_t *)->event - 1;
710
711		if (!(pcb->flags & NG_BTSOCKET_HCI_RAW_PRIVILEGED))
712			if (!bit_test(ng_btsocket_hci_raw_sec_filter->events, event))
713				return (EPERM);
714
715		if (!bit_test(pcb->filter.event_mask, event))
716			return (EPERM);
717		break;
718
719	default:
720		return (EINVAL);
721	}
722
723	return (0);
724} /* ng_btsocket_hci_raw_filter */
725
726/*
727 * Initialize everything
728 */
729
730static void
731ng_btsocket_hci_raw_init(void *arg __unused)
732{
733	bitstr_t	*f = NULL;
734	int		 error = 0;
735
736	ng_btsocket_hci_raw_node = NULL;
737	ng_btsocket_hci_raw_debug_level = NG_BTSOCKET_WARN_LEVEL;
738	ng_btsocket_hci_raw_ioctl_timeout = 5;
739
740	/* Register Netgraph node type */
741	error = ng_newtype(&typestruct);
742	if (error != 0) {
743		NG_BTSOCKET_HCI_RAW_ALERT(
744"%s: Could not register Netgraph node type, error=%d\n", __func__, error);
745
746		return;
747	}
748
749	/* Create Netgrapg node */
750	error = ng_make_node_common(&typestruct, &ng_btsocket_hci_raw_node);
751	if (error != 0) {
752		NG_BTSOCKET_HCI_RAW_ALERT(
753"%s: Could not create Netgraph node, error=%d\n", __func__, error);
754
755		ng_btsocket_hci_raw_node = NULL;
756
757		return;
758        }
759
760	error = ng_name_node(ng_btsocket_hci_raw_node,
761				NG_BTSOCKET_HCI_RAW_NODE_TYPE);
762	if (error != 0) {
763		NG_BTSOCKET_HCI_RAW_ALERT(
764"%s: Could not name Netgraph node, error=%d\n", __func__, error);
765
766		NG_NODE_UNREF(ng_btsocket_hci_raw_node);
767		ng_btsocket_hci_raw_node = NULL;
768
769		return;
770	}
771
772	/* Create input queue */
773	NG_BT_ITEMQ_INIT(&ng_btsocket_hci_raw_queue, 300);
774	mtx_init(&ng_btsocket_hci_raw_queue_mtx,
775		"btsocks_hci_raw_queue_mtx", NULL, MTX_DEF);
776	TASK_INIT(&ng_btsocket_hci_raw_task, 0,
777		ng_btsocket_hci_raw_input, NULL);
778
779	/* Create list of sockets */
780	LIST_INIT(&ng_btsocket_hci_raw_sockets);
781	mtx_init(&ng_btsocket_hci_raw_sockets_mtx,
782		"btsocks_hci_raw_sockets_mtx", NULL, MTX_DEF);
783
784	/* Tokens */
785	ng_btsocket_hci_raw_token = 0;
786	mtx_init(&ng_btsocket_hci_raw_token_mtx,
787		"btsocks_hci_raw_token_mtx", NULL, MTX_DEF);
788
789	/*
790	 * Security filter
791	 * XXX never free()ed
792	 */
793	ng_btsocket_hci_raw_sec_filter =
794	    malloc(sizeof(struct ng_btsocket_hci_raw_sec_filter),
795		M_NETGRAPH_BTSOCKET_HCI_RAW, M_NOWAIT|M_ZERO);
796	if (ng_btsocket_hci_raw_sec_filter == NULL) {
797		printf("%s: Could not allocate security filter!\n", __func__);
798		return;
799	}
800
801	/*
802	 * XXX How paranoid can we get?
803	 *
804	 * Initialize security filter. If bit is set in the mask then
805	 * unprivileged socket is allowed to send (receive) this command
806	 * (event).
807	 */
808
809	/* Enable all events */
810	memset(&ng_btsocket_hci_raw_sec_filter->events, 0xff,
811		sizeof(ng_btsocket_hci_raw_sec_filter->events)/
812			sizeof(ng_btsocket_hci_raw_sec_filter->events[0]));
813
814	/* Disable some critical events */
815	f = ng_btsocket_hci_raw_sec_filter->events;
816	bit_clear(f, NG_HCI_EVENT_RETURN_LINK_KEYS - 1);
817	bit_clear(f, NG_HCI_EVENT_LINK_KEY_NOTIFICATION - 1);
818	bit_clear(f, NG_HCI_EVENT_VENDOR - 1);
819
820	/* Commands - Link control */
821	f = ng_btsocket_hci_raw_sec_filter->commands[NG_HCI_OGF_LINK_CONTROL-1];
822	bit_set(f, NG_HCI_OCF_INQUIRY - 1);
823	bit_set(f, NG_HCI_OCF_INQUIRY_CANCEL - 1);
824	bit_set(f, NG_HCI_OCF_PERIODIC_INQUIRY - 1);
825	bit_set(f, NG_HCI_OCF_EXIT_PERIODIC_INQUIRY - 1);
826	bit_set(f, NG_HCI_OCF_REMOTE_NAME_REQ - 1);
827	bit_set(f, NG_HCI_OCF_READ_REMOTE_FEATURES - 1);
828	bit_set(f, NG_HCI_OCF_READ_REMOTE_VER_INFO - 1);
829	bit_set(f, NG_HCI_OCF_READ_CLOCK_OFFSET - 1);
830
831	/* Commands - Link policy */
832	f = ng_btsocket_hci_raw_sec_filter->commands[NG_HCI_OGF_LINK_POLICY-1];
833	bit_set(f, NG_HCI_OCF_ROLE_DISCOVERY - 1);
834	bit_set(f, NG_HCI_OCF_READ_LINK_POLICY_SETTINGS - 1);
835
836	/* Commands - Host controller and baseband */
837	f = ng_btsocket_hci_raw_sec_filter->commands[NG_HCI_OGF_HC_BASEBAND-1];
838	bit_set(f, NG_HCI_OCF_READ_PIN_TYPE - 1);
839	bit_set(f, NG_HCI_OCF_READ_LOCAL_NAME - 1);
840	bit_set(f, NG_HCI_OCF_READ_CON_ACCEPT_TIMO - 1);
841	bit_set(f, NG_HCI_OCF_READ_PAGE_TIMO - 1);
842	bit_set(f, NG_HCI_OCF_READ_SCAN_ENABLE - 1);
843	bit_set(f, NG_HCI_OCF_READ_PAGE_SCAN_ACTIVITY - 1);
844	bit_set(f, NG_HCI_OCF_READ_INQUIRY_SCAN_ACTIVITY - 1);
845	bit_set(f, NG_HCI_OCF_READ_AUTH_ENABLE - 1);
846	bit_set(f, NG_HCI_OCF_READ_ENCRYPTION_MODE - 1);
847	bit_set(f, NG_HCI_OCF_READ_UNIT_CLASS - 1);
848	bit_set(f, NG_HCI_OCF_READ_VOICE_SETTINGS - 1);
849	bit_set(f, NG_HCI_OCF_READ_AUTO_FLUSH_TIMO - 1);
850	bit_set(f, NG_HCI_OCF_READ_NUM_BROADCAST_RETRANS - 1);
851	bit_set(f, NG_HCI_OCF_READ_HOLD_MODE_ACTIVITY - 1);
852	bit_set(f, NG_HCI_OCF_READ_XMIT_LEVEL - 1);
853	bit_set(f, NG_HCI_OCF_READ_SCO_FLOW_CONTROL - 1);
854	bit_set(f, NG_HCI_OCF_READ_LINK_SUPERVISION_TIMO - 1);
855	bit_set(f, NG_HCI_OCF_READ_SUPPORTED_IAC_NUM - 1);
856	bit_set(f, NG_HCI_OCF_READ_IAC_LAP - 1);
857	bit_set(f, NG_HCI_OCF_READ_PAGE_SCAN_PERIOD - 1);
858	bit_set(f, NG_HCI_OCF_READ_PAGE_SCAN - 1);
859	bit_set(f, NG_HCI_OCF_READ_LE_HOST_SUPPORTED -1);
860
861	/* Commands - Informational */
862	f = ng_btsocket_hci_raw_sec_filter->commands[NG_HCI_OGF_INFO - 1];
863	bit_set(f, NG_HCI_OCF_READ_LOCAL_VER - 1);
864	bit_set(f, NG_HCI_OCF_READ_LOCAL_FEATURES - 1);
865	bit_set(f, NG_HCI_OCF_READ_BUFFER_SIZE - 1);
866	bit_set(f, NG_HCI_OCF_READ_COUNTRY_CODE - 1);
867	bit_set(f, NG_HCI_OCF_READ_BDADDR - 1);
868
869	/* Commands - Status */
870	f = ng_btsocket_hci_raw_sec_filter->commands[NG_HCI_OGF_STATUS - 1];
871	bit_set(f, NG_HCI_OCF_READ_FAILED_CONTACT_CNTR - 1);
872	bit_set(f, NG_HCI_OCF_GET_LINK_QUALITY - 1);
873	bit_set(f, NG_HCI_OCF_READ_RSSI - 1);
874
875	/* Commands - Testing */
876	f = ng_btsocket_hci_raw_sec_filter->commands[NG_HCI_OGF_TESTING - 1];
877	bit_set(f, NG_HCI_OCF_READ_LOOPBACK_MODE - 1);
878	/*Commands - LE*/
879	f = ng_btsocket_hci_raw_sec_filter->commands[NG_HCI_OGF_LE -1];
880	bit_set(f, NG_HCI_OCF_LE_SET_SCAN_ENABLE - 1);
881	bit_set(f, NG_HCI_OCF_LE_SET_SCAN_PARAMETERS - 1);
882	bit_set(f, NG_HCI_OCF_LE_READ_LOCAL_SUPPORTED_FEATURES - 1);
883	bit_set(f, NG_HCI_OCF_LE_READ_BUFFER_SIZE - 1);
884	bit_set(f, NG_HCI_OCF_LE_READ_WHITE_LIST_SIZE - 1);
885
886} /* ng_btsocket_hci_raw_init */
887SYSINIT(ng_btsocket_hci_raw_init, SI_SUB_PROTO_DOMAIN, SI_ORDER_THIRD,
888    ng_btsocket_hci_raw_init, NULL);
889
890/*
891 * Abort connection on socket
892 */
893
894void
895ng_btsocket_hci_raw_abort(struct socket *so)
896{
897} /* ng_btsocket_hci_raw_abort */
898
899void
900ng_btsocket_hci_raw_close(struct socket *so)
901{
902} /* ng_btsocket_hci_raw_close */
903
904/*
905 * Create new raw HCI socket
906 */
907
908int
909ng_btsocket_hci_raw_attach(struct socket *so, int proto, struct thread *td)
910{
911	ng_btsocket_hci_raw_pcb_p	pcb = so2hci_raw_pcb(so);
912	int				error = 0;
913
914	if (pcb != NULL)
915		return (EISCONN);
916
917	if (ng_btsocket_hci_raw_node == NULL)
918		return (EPROTONOSUPPORT);
919	if (proto != BLUETOOTH_PROTO_HCI)
920		return (EPROTONOSUPPORT);
921	if (so->so_type != SOCK_RAW)
922		return (ESOCKTNOSUPPORT);
923
924	error = soreserve(so, NG_BTSOCKET_HCI_RAW_SENDSPACE,
925				NG_BTSOCKET_HCI_RAW_RECVSPACE);
926	if (error != 0)
927		return (error);
928
929	pcb = malloc(sizeof(*pcb),
930		M_NETGRAPH_BTSOCKET_HCI_RAW, M_NOWAIT|M_ZERO);
931	if (pcb == NULL)
932		return (ENOMEM);
933
934	so->so_pcb = (caddr_t) pcb;
935	pcb->so = so;
936
937	if (priv_check(td, PRIV_NETBLUETOOTH_RAW) == 0)
938		pcb->flags |= NG_BTSOCKET_HCI_RAW_PRIVILEGED;
939
940	/*
941	 * Set default socket filter. By default socket only accepts HCI
942	 * Command_Complete and Command_Status event packets.
943	 */
944
945	bit_set(pcb->filter.event_mask, NG_HCI_EVENT_COMMAND_COMPL - 1);
946	bit_set(pcb->filter.event_mask, NG_HCI_EVENT_COMMAND_STATUS - 1);
947
948	mtx_init(&pcb->pcb_mtx, "btsocks_hci_raw_pcb_mtx", NULL, MTX_DEF);
949
950	mtx_lock(&ng_btsocket_hci_raw_sockets_mtx);
951	LIST_INSERT_HEAD(&ng_btsocket_hci_raw_sockets, pcb, next);
952	mtx_unlock(&ng_btsocket_hci_raw_sockets_mtx);
953
954	return (0);
955} /* ng_btsocket_hci_raw_attach */
956
957/*
958 * Bind raw HCI socket
959 */
960
961int
962ng_btsocket_hci_raw_bind(struct socket *so, struct sockaddr *nam,
963		struct thread *td)
964{
965	ng_btsocket_hci_raw_pcb_p	 pcb = so2hci_raw_pcb(so);
966	struct sockaddr_hci		*sa = (struct sockaddr_hci *) nam;
967
968	if (pcb == NULL)
969		return (EINVAL);
970	if (ng_btsocket_hci_raw_node == NULL)
971		return (EINVAL);
972
973	if (sa == NULL)
974		return (EINVAL);
975	if (sa->hci_family != AF_BLUETOOTH)
976		return (EAFNOSUPPORT);
977	if (sa->hci_len != sizeof(*sa))
978		return (EINVAL);
979	if (sa->hci_node[0] == 0)
980		return (EINVAL);
981
982	mtx_lock(&pcb->pcb_mtx);
983	bcopy(sa, &pcb->addr, sizeof(pcb->addr));
984	mtx_unlock(&pcb->pcb_mtx);
985
986	return (0);
987} /* ng_btsocket_hci_raw_bind */
988
989/*
990 * Connect raw HCI socket
991 */
992
993int
994ng_btsocket_hci_raw_connect(struct socket *so, struct sockaddr *nam,
995		struct thread *td)
996{
997	ng_btsocket_hci_raw_pcb_p	 pcb = so2hci_raw_pcb(so);
998	struct sockaddr_hci		*sa = (struct sockaddr_hci *) nam;
999
1000	if (pcb == NULL)
1001		return (EINVAL);
1002	if (ng_btsocket_hci_raw_node == NULL)
1003		return (EINVAL);
1004
1005	if (sa == NULL)
1006		return (EINVAL);
1007	if (sa->hci_family != AF_BLUETOOTH)
1008		return (EAFNOSUPPORT);
1009	if (sa->hci_len != sizeof(*sa))
1010		return (EINVAL);
1011	if (sa->hci_node[0] == 0)
1012		return (EDESTADDRREQ);
1013
1014	mtx_lock(&pcb->pcb_mtx);
1015
1016	if (bcmp(sa, &pcb->addr, sizeof(pcb->addr)) != 0) {
1017		mtx_unlock(&pcb->pcb_mtx);
1018		return (EADDRNOTAVAIL);
1019	}
1020
1021	soisconnected(so);
1022
1023	mtx_unlock(&pcb->pcb_mtx);
1024
1025	return (0);
1026} /* ng_btsocket_hci_raw_connect */
1027
1028/*
1029 * Process ioctl on socket
1030 */
1031
1032int
1033ng_btsocket_hci_raw_control(struct socket *so, u_long cmd, void *data,
1034		struct ifnet *ifp, struct thread *td)
1035{
1036	ng_btsocket_hci_raw_pcb_p	 pcb = so2hci_raw_pcb(so);
1037	char				 path[NG_NODESIZ + 1];
1038	struct ng_mesg			*msg = NULL;
1039	int				 error = 0;
1040
1041	if (pcb == NULL)
1042		return (EINVAL);
1043	if (ng_btsocket_hci_raw_node == NULL)
1044		return (EINVAL);
1045
1046	mtx_lock(&pcb->pcb_mtx);
1047
1048	/* Check if we have device name */
1049	if (pcb->addr.hci_node[0] == 0) {
1050		mtx_unlock(&pcb->pcb_mtx);
1051		return (EHOSTUNREACH);
1052	}
1053
1054	/* Check if we have pending ioctl() */
1055	if (pcb->token != 0) {
1056		mtx_unlock(&pcb->pcb_mtx);
1057		return (EBUSY);
1058	}
1059
1060	snprintf(path, sizeof(path), "%s:", pcb->addr.hci_node);
1061
1062	switch (cmd) {
1063	case SIOC_HCI_RAW_NODE_GET_STATE: {
1064		struct ng_btsocket_hci_raw_node_state	*p =
1065			(struct ng_btsocket_hci_raw_node_state *) data;
1066
1067		error = ng_btsocket_hci_raw_send_sync_ngmsg(pcb, path,
1068				NGM_HCI_NODE_GET_STATE,
1069				&p->state, sizeof(p->state));
1070		} break;
1071
1072	case SIOC_HCI_RAW_NODE_INIT:
1073		if (pcb->flags & NG_BTSOCKET_HCI_RAW_PRIVILEGED)
1074			error = ng_btsocket_hci_raw_send_ngmsg(path,
1075					NGM_HCI_NODE_INIT, NULL, 0);
1076		else
1077			error = EPERM;
1078		break;
1079
1080	case SIOC_HCI_RAW_NODE_GET_DEBUG: {
1081		struct ng_btsocket_hci_raw_node_debug	*p =
1082			(struct ng_btsocket_hci_raw_node_debug *) data;
1083
1084		error = ng_btsocket_hci_raw_send_sync_ngmsg(pcb, path,
1085				NGM_HCI_NODE_GET_DEBUG,
1086				&p->debug, sizeof(p->debug));
1087		} break;
1088
1089	case SIOC_HCI_RAW_NODE_SET_DEBUG: {
1090		struct ng_btsocket_hci_raw_node_debug	*p =
1091			(struct ng_btsocket_hci_raw_node_debug *) data;
1092
1093		if (pcb->flags & NG_BTSOCKET_HCI_RAW_PRIVILEGED)
1094			error = ng_btsocket_hci_raw_send_ngmsg(path,
1095					NGM_HCI_NODE_SET_DEBUG, &p->debug,
1096					sizeof(p->debug));
1097		else
1098			error = EPERM;
1099		} break;
1100
1101	case SIOC_HCI_RAW_NODE_GET_BUFFER: {
1102		struct ng_btsocket_hci_raw_node_buffer	*p =
1103			(struct ng_btsocket_hci_raw_node_buffer *) data;
1104
1105		error = ng_btsocket_hci_raw_send_sync_ngmsg(pcb, path,
1106				NGM_HCI_NODE_GET_BUFFER,
1107				&p->buffer, sizeof(p->buffer));
1108		} break;
1109
1110	case SIOC_HCI_RAW_NODE_GET_BDADDR: {
1111		struct ng_btsocket_hci_raw_node_bdaddr	*p =
1112			(struct ng_btsocket_hci_raw_node_bdaddr *) data;
1113
1114		error = ng_btsocket_hci_raw_send_sync_ngmsg(pcb, path,
1115				NGM_HCI_NODE_GET_BDADDR,
1116				&p->bdaddr, sizeof(p->bdaddr));
1117		} break;
1118
1119	case SIOC_HCI_RAW_NODE_GET_FEATURES: {
1120		struct ng_btsocket_hci_raw_node_features	*p =
1121			(struct ng_btsocket_hci_raw_node_features *) data;
1122
1123		error = ng_btsocket_hci_raw_send_sync_ngmsg(pcb, path,
1124				NGM_HCI_NODE_GET_FEATURES,
1125				&p->features, sizeof(p->features));
1126		} break;
1127
1128	case SIOC_HCI_RAW_NODE_GET_STAT: {
1129		struct ng_btsocket_hci_raw_node_stat	*p =
1130			(struct ng_btsocket_hci_raw_node_stat *) data;
1131
1132		error = ng_btsocket_hci_raw_send_sync_ngmsg(pcb, path,
1133				NGM_HCI_NODE_GET_STAT,
1134				&p->stat, sizeof(p->stat));
1135		} break;
1136
1137	case SIOC_HCI_RAW_NODE_RESET_STAT:
1138		if (pcb->flags & NG_BTSOCKET_HCI_RAW_PRIVILEGED)
1139			error = ng_btsocket_hci_raw_send_ngmsg(path,
1140					NGM_HCI_NODE_RESET_STAT, NULL, 0);
1141		else
1142			error = EPERM;
1143		break;
1144
1145	case SIOC_HCI_RAW_NODE_FLUSH_NEIGHBOR_CACHE:
1146		if (pcb->flags & NG_BTSOCKET_HCI_RAW_PRIVILEGED)
1147			error = ng_btsocket_hci_raw_send_ngmsg(path,
1148					NGM_HCI_NODE_FLUSH_NEIGHBOR_CACHE,
1149					NULL, 0);
1150		else
1151			error = EPERM;
1152		break;
1153
1154	case SIOC_HCI_RAW_NODE_GET_NEIGHBOR_CACHE:  {
1155		struct ng_btsocket_hci_raw_node_neighbor_cache	*p =
1156			(struct ng_btsocket_hci_raw_node_neighbor_cache *) data;
1157		ng_hci_node_get_neighbor_cache_ep		*p1 = NULL;
1158		ng_hci_node_neighbor_cache_entry_ep		*p2 = NULL;
1159
1160		if (p->num_entries <= 0 ||
1161		    p->num_entries > NG_HCI_MAX_NEIGHBOR_NUM ||
1162		    p->entries == NULL) {
1163			mtx_unlock(&pcb->pcb_mtx);
1164			return (EINVAL);
1165		}
1166
1167		NG_MKMESSAGE(msg, NGM_HCI_COOKIE,
1168			NGM_HCI_NODE_GET_NEIGHBOR_CACHE, 0, M_NOWAIT);
1169		if (msg == NULL) {
1170			mtx_unlock(&pcb->pcb_mtx);
1171			return (ENOMEM);
1172		}
1173		ng_btsocket_hci_raw_get_token(&msg->header.token);
1174		pcb->token = msg->header.token;
1175		pcb->msg = NULL;
1176
1177		NG_SEND_MSG_PATH(error, ng_btsocket_hci_raw_node, msg, path, 0);
1178		if (error != 0) {
1179			pcb->token = 0;
1180			mtx_unlock(&pcb->pcb_mtx);
1181			return (error);
1182		}
1183
1184		error = msleep(&pcb->msg, &pcb->pcb_mtx,
1185				PZERO|PCATCH, "hcictl",
1186				ng_btsocket_hci_raw_ioctl_timeout * hz);
1187		pcb->token = 0;
1188
1189		if (error != 0) {
1190			mtx_unlock(&pcb->pcb_mtx);
1191			return (error);
1192		}
1193
1194		msg = pcb->msg;
1195		pcb->msg = NULL;
1196
1197		mtx_unlock(&pcb->pcb_mtx);
1198
1199		if (msg != NULL &&
1200		    msg->header.cmd == NGM_HCI_NODE_GET_NEIGHBOR_CACHE) {
1201			/* Return data back to user space */
1202			p1 = (ng_hci_node_get_neighbor_cache_ep *)(msg->data);
1203			p2 = (ng_hci_node_neighbor_cache_entry_ep *)(p1 + 1);
1204
1205			p->num_entries = min(p->num_entries, p1->num_entries);
1206			if (p->num_entries > 0)
1207				error = copyout((caddr_t) p2,
1208						(caddr_t) p->entries,
1209						p->num_entries * sizeof(*p2));
1210		} else
1211			error = EINVAL;
1212
1213		NG_FREE_MSG(msg); /* checks for != NULL */
1214		return (error);
1215		} /* NOTREACHED */
1216
1217	case SIOC_HCI_RAW_NODE_GET_CON_LIST: {
1218		struct ng_btsocket_hci_raw_con_list	*p =
1219			(struct ng_btsocket_hci_raw_con_list *) data;
1220		ng_hci_node_con_list_ep			*p1 = NULL;
1221		ng_hci_node_con_ep			*p2 = NULL;
1222
1223		if (p->num_connections == 0 ||
1224		    p->num_connections > NG_HCI_MAX_CON_NUM ||
1225		    p->connections == NULL) {
1226			mtx_unlock(&pcb->pcb_mtx);
1227			return (EINVAL);
1228		}
1229
1230		NG_MKMESSAGE(msg, NGM_HCI_COOKIE, NGM_HCI_NODE_GET_CON_LIST,
1231			0, M_NOWAIT);
1232		if (msg == NULL) {
1233			mtx_unlock(&pcb->pcb_mtx);
1234			return (ENOMEM);
1235		}
1236		ng_btsocket_hci_raw_get_token(&msg->header.token);
1237		pcb->token = msg->header.token;
1238		pcb->msg = NULL;
1239
1240		NG_SEND_MSG_PATH(error, ng_btsocket_hci_raw_node, msg, path, 0);
1241		if (error != 0) {
1242			pcb->token = 0;
1243			mtx_unlock(&pcb->pcb_mtx);
1244			return (error);
1245		}
1246
1247		error = msleep(&pcb->msg, &pcb->pcb_mtx,
1248				PZERO|PCATCH, "hcictl",
1249				ng_btsocket_hci_raw_ioctl_timeout * hz);
1250		pcb->token = 0;
1251
1252		if (error != 0) {
1253			mtx_unlock(&pcb->pcb_mtx);
1254			return (error);
1255		}
1256
1257		msg = pcb->msg;
1258		pcb->msg = NULL;
1259
1260		mtx_unlock(&pcb->pcb_mtx);
1261
1262		if (msg != NULL &&
1263		    msg->header.cmd == NGM_HCI_NODE_GET_CON_LIST) {
1264			/* Return data back to user space */
1265			p1 = (ng_hci_node_con_list_ep *)(msg->data);
1266			p2 = (ng_hci_node_con_ep *)(p1 + 1);
1267
1268			p->num_connections = min(p->num_connections,
1269						p1->num_connections);
1270			if (p->num_connections > 0)
1271				error = copyout((caddr_t) p2,
1272					(caddr_t) p->connections,
1273					p->num_connections * sizeof(*p2));
1274		} else
1275			error = EINVAL;
1276
1277		NG_FREE_MSG(msg); /* checks for != NULL */
1278		return (error);
1279		} /* NOTREACHED */
1280
1281	case SIOC_HCI_RAW_NODE_GET_LINK_POLICY_MASK: {
1282		struct ng_btsocket_hci_raw_node_link_policy_mask	*p =
1283			(struct ng_btsocket_hci_raw_node_link_policy_mask *)
1284				data;
1285
1286		error = ng_btsocket_hci_raw_send_sync_ngmsg(pcb, path,
1287				NGM_HCI_NODE_GET_LINK_POLICY_SETTINGS_MASK,
1288				&p->policy_mask, sizeof(p->policy_mask));
1289		} break;
1290
1291	case SIOC_HCI_RAW_NODE_SET_LINK_POLICY_MASK: {
1292		struct ng_btsocket_hci_raw_node_link_policy_mask	*p =
1293			(struct ng_btsocket_hci_raw_node_link_policy_mask *)
1294				data;
1295
1296		if (pcb->flags & NG_BTSOCKET_HCI_RAW_PRIVILEGED)
1297			error = ng_btsocket_hci_raw_send_ngmsg(path,
1298					NGM_HCI_NODE_SET_LINK_POLICY_SETTINGS_MASK,
1299					&p->policy_mask,
1300					sizeof(p->policy_mask));
1301		else
1302			error = EPERM;
1303		} break;
1304
1305	case SIOC_HCI_RAW_NODE_GET_PACKET_MASK: {
1306		struct ng_btsocket_hci_raw_node_packet_mask	*p =
1307			(struct ng_btsocket_hci_raw_node_packet_mask *) data;
1308
1309		error = ng_btsocket_hci_raw_send_sync_ngmsg(pcb, path,
1310				NGM_HCI_NODE_GET_PACKET_MASK,
1311				&p->packet_mask, sizeof(p->packet_mask));
1312		} break;
1313
1314	case SIOC_HCI_RAW_NODE_SET_PACKET_MASK: {
1315		struct ng_btsocket_hci_raw_node_packet_mask	*p =
1316			(struct ng_btsocket_hci_raw_node_packet_mask *) data;
1317
1318		if (pcb->flags & NG_BTSOCKET_HCI_RAW_PRIVILEGED)
1319			error = ng_btsocket_hci_raw_send_ngmsg(path,
1320					NGM_HCI_NODE_SET_PACKET_MASK,
1321					&p->packet_mask,
1322					sizeof(p->packet_mask));
1323		else
1324			error = EPERM;
1325		} break;
1326
1327	case SIOC_HCI_RAW_NODE_GET_ROLE_SWITCH: {
1328		struct ng_btsocket_hci_raw_node_role_switch	*p =
1329			(struct ng_btsocket_hci_raw_node_role_switch *) data;
1330
1331		error = ng_btsocket_hci_raw_send_sync_ngmsg(pcb, path,
1332				NGM_HCI_NODE_GET_ROLE_SWITCH,
1333				&p->role_switch, sizeof(p->role_switch));
1334		} break;
1335
1336	case SIOC_HCI_RAW_NODE_SET_ROLE_SWITCH: {
1337		struct ng_btsocket_hci_raw_node_role_switch	*p =
1338			(struct ng_btsocket_hci_raw_node_role_switch *) data;
1339
1340		if (pcb->flags & NG_BTSOCKET_HCI_RAW_PRIVILEGED)
1341			error = ng_btsocket_hci_raw_send_ngmsg(path,
1342					NGM_HCI_NODE_SET_ROLE_SWITCH,
1343					&p->role_switch,
1344					sizeof(p->role_switch));
1345		else
1346			error = EPERM;
1347		} break;
1348
1349	case SIOC_HCI_RAW_NODE_LIST_NAMES: {
1350		struct ng_btsocket_hci_raw_node_list_names	*nl =
1351			(struct ng_btsocket_hci_raw_node_list_names *) data;
1352		struct nodeinfo					*ni = nl->names;
1353
1354		if (nl->num_names == 0) {
1355			mtx_unlock(&pcb->pcb_mtx);
1356			return (EINVAL);
1357		}
1358
1359		NG_MKMESSAGE(msg, NGM_GENERIC_COOKIE, NGM_LISTNAMES,
1360			0, M_NOWAIT);
1361		if (msg == NULL) {
1362			mtx_unlock(&pcb->pcb_mtx);
1363			return (ENOMEM);
1364		}
1365		ng_btsocket_hci_raw_get_token(&msg->header.token);
1366		pcb->token = msg->header.token;
1367		pcb->msg = NULL;
1368
1369		NG_SEND_MSG_PATH(error, ng_btsocket_hci_raw_node, msg, ".:", 0);
1370		if (error != 0) {
1371			pcb->token = 0;
1372			mtx_unlock(&pcb->pcb_mtx);
1373			return (error);
1374		}
1375
1376		error = msleep(&pcb->msg, &pcb->pcb_mtx,
1377				PZERO|PCATCH, "hcictl",
1378				ng_btsocket_hci_raw_ioctl_timeout * hz);
1379		pcb->token = 0;
1380
1381		if (error != 0) {
1382			mtx_unlock(&pcb->pcb_mtx);
1383			return (error);
1384		}
1385
1386		msg = pcb->msg;
1387		pcb->msg = NULL;
1388
1389		mtx_unlock(&pcb->pcb_mtx);
1390
1391		if (msg != NULL && msg->header.cmd == NGM_LISTNAMES) {
1392			/* Return data back to user space */
1393			struct namelist	*nl1 = (struct namelist *) msg->data;
1394			struct nodeinfo	*ni1 = &nl1->nodeinfo[0];
1395
1396			while (nl->num_names > 0 && nl1->numnames > 0) {
1397				if (strcmp(ni1->type, NG_HCI_NODE_TYPE) == 0) {
1398					error = copyout((caddr_t) ni1,
1399							(caddr_t) ni,
1400							sizeof(*ni));
1401					if (error != 0)
1402						break;
1403
1404					nl->num_names --;
1405					ni ++;
1406				}
1407
1408				nl1->numnames --;
1409				ni1 ++;
1410			}
1411
1412			nl->num_names = ni - nl->names;
1413		} else
1414			error = EINVAL;
1415
1416		NG_FREE_MSG(msg); /* checks for != NULL */
1417		return (error);
1418		} /* NOTREACHED */
1419
1420	default:
1421		error = EINVAL;
1422		break;
1423	}
1424
1425	mtx_unlock(&pcb->pcb_mtx);
1426
1427	return (error);
1428} /* ng_btsocket_hci_raw_control */
1429
1430/*
1431 * Process getsockopt/setsockopt system calls
1432 */
1433
1434int
1435ng_btsocket_hci_raw_ctloutput(struct socket *so, struct sockopt *sopt)
1436{
1437	ng_btsocket_hci_raw_pcb_p		pcb = so2hci_raw_pcb(so);
1438	struct ng_btsocket_hci_raw_filter	filter;
1439	int					error = 0, dir;
1440
1441	if (pcb == NULL)
1442		return (EINVAL);
1443	if (ng_btsocket_hci_raw_node == NULL)
1444		return (EINVAL);
1445
1446	if (sopt->sopt_level != SOL_HCI_RAW)
1447		return (0);
1448
1449	mtx_lock(&pcb->pcb_mtx);
1450
1451	switch (sopt->sopt_dir) {
1452	case SOPT_GET:
1453		switch (sopt->sopt_name) {
1454		case SO_HCI_RAW_FILTER:
1455			error = sooptcopyout(sopt, &pcb->filter,
1456						sizeof(pcb->filter));
1457			break;
1458
1459		case SO_HCI_RAW_DIRECTION:
1460			dir = (pcb->flags & NG_BTSOCKET_HCI_RAW_DIRECTION)?1:0;
1461			error = sooptcopyout(sopt, &dir, sizeof(dir));
1462			break;
1463
1464		default:
1465			error = EINVAL;
1466			break;
1467		}
1468		break;
1469
1470	case SOPT_SET:
1471		switch (sopt->sopt_name) {
1472		case SO_HCI_RAW_FILTER:
1473			error = sooptcopyin(sopt, &filter, sizeof(filter),
1474						sizeof(filter));
1475			if (error == 0)
1476				bcopy(&filter, &pcb->filter,
1477						sizeof(pcb->filter));
1478			break;
1479
1480		case SO_HCI_RAW_DIRECTION:
1481			error = sooptcopyin(sopt, &dir, sizeof(dir),
1482						sizeof(dir));
1483			if (error != 0)
1484				break;
1485
1486			if (dir)
1487				pcb->flags |= NG_BTSOCKET_HCI_RAW_DIRECTION;
1488			else
1489				pcb->flags &= ~NG_BTSOCKET_HCI_RAW_DIRECTION;
1490			break;
1491
1492		default:
1493			error = EINVAL;
1494			break;
1495		}
1496		break;
1497
1498	default:
1499		error = EINVAL;
1500		break;
1501	}
1502
1503	mtx_unlock(&pcb->pcb_mtx);
1504
1505	return (error);
1506} /* ng_btsocket_hci_raw_ctloutput */
1507
1508/*
1509 * Detach raw HCI socket
1510 */
1511
1512void
1513ng_btsocket_hci_raw_detach(struct socket *so)
1514{
1515	ng_btsocket_hci_raw_pcb_p	pcb = so2hci_raw_pcb(so);
1516
1517	KASSERT(pcb != NULL, ("ng_btsocket_hci_raw_detach: pcb == NULL"));
1518
1519	if (ng_btsocket_hci_raw_node == NULL)
1520		return;
1521
1522	mtx_lock(&ng_btsocket_hci_raw_sockets_mtx);
1523	mtx_lock(&pcb->pcb_mtx);
1524
1525	LIST_REMOVE(pcb, next);
1526
1527	mtx_unlock(&pcb->pcb_mtx);
1528	mtx_unlock(&ng_btsocket_hci_raw_sockets_mtx);
1529
1530	mtx_destroy(&pcb->pcb_mtx);
1531
1532	bzero(pcb, sizeof(*pcb));
1533	free(pcb, M_NETGRAPH_BTSOCKET_HCI_RAW);
1534
1535	so->so_pcb = NULL;
1536} /* ng_btsocket_hci_raw_detach */
1537
1538/*
1539 * Disconnect raw HCI socket
1540 */
1541
1542int
1543ng_btsocket_hci_raw_disconnect(struct socket *so)
1544{
1545	ng_btsocket_hci_raw_pcb_p	 pcb = so2hci_raw_pcb(so);
1546
1547	if (pcb == NULL)
1548		return (EINVAL);
1549	if (ng_btsocket_hci_raw_node == NULL)
1550		return (EINVAL);
1551
1552	mtx_lock(&pcb->pcb_mtx);
1553	soisdisconnected(so);
1554	mtx_unlock(&pcb->pcb_mtx);
1555
1556	return (0);
1557} /* ng_btsocket_hci_raw_disconnect */
1558
1559/*
1560 * Send data
1561 */
1562
1563int
1564ng_btsocket_hci_raw_send(struct socket *so, int flags, struct mbuf *m,
1565		struct sockaddr *sa, struct mbuf *control, struct thread *td)
1566{
1567	ng_btsocket_hci_raw_pcb_p	 pcb = so2hci_raw_pcb(so);
1568	struct mbuf			*nam = NULL;
1569	int				 error = 0;
1570
1571	if (ng_btsocket_hci_raw_node == NULL) {
1572		error = ENETDOWN;
1573		goto drop;
1574	}
1575	if (pcb == NULL) {
1576		error = EINVAL;
1577		goto drop;
1578	}
1579	if (control != NULL) {
1580		error = EINVAL;
1581		goto drop;
1582	}
1583
1584	if (m->m_pkthdr.len < sizeof(ng_hci_cmd_pkt_t) ||
1585	    m->m_pkthdr.len > sizeof(ng_hci_cmd_pkt_t) + NG_HCI_CMD_PKT_SIZE) {
1586		error = EMSGSIZE;
1587		goto drop;
1588	}
1589
1590	if (m->m_len < sizeof(ng_hci_cmd_pkt_t)) {
1591		if ((m = m_pullup(m, sizeof(ng_hci_cmd_pkt_t))) == NULL) {
1592			error = ENOBUFS;
1593			goto drop;
1594		}
1595	}
1596	if (*mtod(m, u_int8_t *) != NG_HCI_CMD_PKT) {
1597		error = ENOTSUP;
1598		goto drop;
1599	}
1600
1601	if (sa != NULL) {
1602		if (sa->sa_family != AF_BLUETOOTH) {
1603			error = EAFNOSUPPORT;
1604			goto drop;
1605		}
1606		if (sa->sa_len != sizeof(struct sockaddr_hci)) {
1607			error = EINVAL;
1608			goto drop;
1609		}
1610	}
1611
1612	mtx_lock(&pcb->pcb_mtx);
1613
1614	error = ng_btsocket_hci_raw_filter(pcb, m, 0);
1615	if (error != 0) {
1616		mtx_unlock(&pcb->pcb_mtx);
1617		goto drop;
1618	}
1619
1620	if (sa == NULL) {
1621		if (pcb->addr.hci_node[0] == 0) {
1622			mtx_unlock(&pcb->pcb_mtx);
1623			error = EDESTADDRREQ;
1624			goto drop;
1625		}
1626
1627		sa = (struct sockaddr *) &pcb->addr;
1628	}
1629
1630	MGET(nam, M_NOWAIT, MT_SONAME);
1631	if (nam == NULL) {
1632		mtx_unlock(&pcb->pcb_mtx);
1633		error = ENOBUFS;
1634		goto drop;
1635	}
1636
1637	nam->m_len = sizeof(struct sockaddr_hci);
1638	bcopy(sa,mtod(nam, struct sockaddr_hci *),sizeof(struct sockaddr_hci));
1639
1640	nam->m_next = m;
1641	m = NULL;
1642
1643	mtx_unlock(&pcb->pcb_mtx);
1644
1645	return (ng_send_fn(ng_btsocket_hci_raw_node, NULL,
1646				ng_btsocket_hci_raw_output, nam, 0));
1647drop:
1648	NG_FREE_M(control); /* NG_FREE_M checks for != NULL */
1649	NG_FREE_M(nam);
1650	NG_FREE_M(m);
1651
1652	return (error);
1653} /* ng_btsocket_hci_raw_send */
1654
1655/*
1656 * Get socket address
1657 */
1658
1659int
1660ng_btsocket_hci_raw_sockaddr(struct socket *so, struct sockaddr *sa)
1661{
1662	ng_btsocket_hci_raw_pcb_p	pcb = so2hci_raw_pcb(so);
1663	struct sockaddr_hci *hci = (struct sockaddr_hci *)sa;
1664
1665	if (pcb == NULL)
1666		return (EINVAL);
1667	if (ng_btsocket_hci_raw_node == NULL)
1668		return (EINVAL);
1669
1670	*hci = (struct sockaddr_hci ){
1671		.hci_len = sizeof(struct sockaddr_hci),
1672		.hci_family = AF_BLUETOOTH,
1673	};
1674
1675	mtx_lock(&pcb->pcb_mtx);
1676	strlcpy(hci->hci_node, pcb->addr.hci_node, sizeof(hci->hci_node));
1677	mtx_unlock(&pcb->pcb_mtx);
1678
1679	return (0);
1680}
1681