ng_btsocket_l2cap_raw.c

Go to the documentation of this file.

/*
 * ng_btsocket_l2cap_raw.c
 */
 
/*-
 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
 *
 * Copyright (c) 2001-2002 Maksim Yevmenkin <m_evmenkin@yahoo.com>
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 * $Id: ng_btsocket_l2cap_raw.c,v 1.12 2003/09/14 23:29:06 max Exp $
 * $FreeBSD$
 */
 
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/bitstring.h>
#include <sys/domain.h>
#include <sys/errno.h>
#include <sys/filedesc.h>
#include <sys/ioccom.h>
#include <sys/kernel.h>
#include <sys/lock.h>
#include <sys/malloc.h>
#include <sys/mbuf.h>
#include <sys/mutex.h>
#include <sys/priv.h>
#include <sys/protosw.h>
#include <sys/queue.h>
#include <sys/socket.h>
#include <sys/socketvar.h>
#include <sys/sysctl.h>
#include <sys/taskqueue.h>
 
#include <net/vnet.h>
 
#include <netgraph/ng_message.h>
#include <netgraph/netgraph.h>
#include <netgraph/bluetooth/include/ng_bluetooth.h>
#include <netgraph/bluetooth/include/ng_hci.h>
#include <netgraph/bluetooth/include/ng_l2cap.h>
#include <netgraph/bluetooth/include/ng_btsocket.h>
#include <netgraph/bluetooth/include/ng_btsocket_l2cap.h>
 
/* MALLOC define */
#ifdef NG_SEPARATE_MALLOC
static MALLOC_DEFINE(M_NETGRAPH_BTSOCKET_L2CAP_RAW,
    "netgraph_btsocks_l2cap_raw", "Netgraph Bluetooth raw L2CAP sockets");
#else
#define M_NETGRAPH_BTSOCKET_L2CAP_RAW M_NETGRAPH
#endif /* NG_SEPARATE_MALLOC */
 
/* Netgraph node methods */
static ng_constructor_t ng_btsocket_l2cap_raw_node_constructor;
static ng_rcvmsg_t      ng_btsocket_l2cap_raw_node_rcvmsg;
static ng_shutdown_t    ng_btsocket_l2cap_raw_node_shutdown;
static ng_newhook_t     ng_btsocket_l2cap_raw_node_newhook;
static ng_connect_t     ng_btsocket_l2cap_raw_node_connect;
static ng_rcvdata_t     ng_btsocket_l2cap_raw_node_rcvdata;
static ng_disconnect_t  ng_btsocket_l2cap_raw_node_disconnect;
 
static void             ng_btsocket_l2cap_raw_input     (void *, int);
static void             ng_btsocket_l2cap_raw_rtclean   (void *, int);
static void             ng_btsocket_l2cap_raw_get_token (u_int32_t *);
 
static int              ng_btsocket_l2cap_raw_send_ngmsg
                                (hook_p, int, void *, int);
static int              ng_btsocket_l2cap_raw_send_sync_ngmsg
                                (ng_btsocket_l2cap_raw_pcb_p, int, void *, int);
 
#define ng_btsocket_l2cap_raw_wakeup_input_task() \
        taskqueue_enqueue(taskqueue_swi, &ng_btsocket_l2cap_raw_queue_task)
 
#define ng_btsocket_l2cap_raw_wakeup_route_task() \
        taskqueue_enqueue(taskqueue_swi, &ng_btsocket_l2cap_raw_rt_task)
 
/* Netgraph type descriptor */
static struct ng_type   typestruct = {
        .version =      NG_ABI_VERSION,
        .name =         NG_BTSOCKET_L2CAP_RAW_NODE_TYPE,
        .constructor =  ng_btsocket_l2cap_raw_node_constructor,
        .rcvmsg =       ng_btsocket_l2cap_raw_node_rcvmsg,
        .shutdown =     ng_btsocket_l2cap_raw_node_shutdown,
        .newhook =      ng_btsocket_l2cap_raw_node_newhook,
        .connect =      ng_btsocket_l2cap_raw_node_connect,
        .rcvdata =      ng_btsocket_l2cap_raw_node_rcvdata,
        .disconnect =   ng_btsocket_l2cap_raw_node_disconnect,
};
 
/* Globals */
extern int                                      ifqmaxlen;
static u_int32_t                                ng_btsocket_l2cap_raw_debug_level;
static u_int32_t                                ng_btsocket_l2cap_raw_ioctl_timeout;
static node_p                                   ng_btsocket_l2cap_raw_node;
static struct ng_bt_itemq                       ng_btsocket_l2cap_raw_queue;
static struct mtx                               ng_btsocket_l2cap_raw_queue_mtx;
static struct task                              ng_btsocket_l2cap_raw_queue_task;
static LIST_HEAD(, ng_btsocket_l2cap_raw_pcb)   ng_btsocket_l2cap_raw_sockets;
static struct mtx                               ng_btsocket_l2cap_raw_sockets_mtx;
static u_int32_t                                ng_btsocket_l2cap_raw_token;
static struct mtx                               ng_btsocket_l2cap_raw_token_mtx;
static LIST_HEAD(, ng_btsocket_l2cap_rtentry)   ng_btsocket_l2cap_raw_rt;
static struct mtx                               ng_btsocket_l2cap_raw_rt_mtx;
static struct task                              ng_btsocket_l2cap_raw_rt_task;
static struct timeval                           ng_btsocket_l2cap_raw_lasttime;
static int                                      ng_btsocket_l2cap_raw_curpps;
 
/* Sysctl tree */
SYSCTL_DECL(_net_bluetooth_l2cap_sockets);
static SYSCTL_NODE(_net_bluetooth_l2cap_sockets, OID_AUTO, raw,
    CTLFLAG_RW | CTLFLAG_MPSAFE, 0,
    "Bluetooth raw L2CAP sockets family");
SYSCTL_UINT(_net_bluetooth_l2cap_sockets_raw, OID_AUTO, debug_level,
        CTLFLAG_RW,
        &ng_btsocket_l2cap_raw_debug_level, NG_BTSOCKET_WARN_LEVEL,
        "Bluetooth raw L2CAP sockets debug level");
SYSCTL_UINT(_net_bluetooth_l2cap_sockets_raw, OID_AUTO, ioctl_timeout,
        CTLFLAG_RW,
        &ng_btsocket_l2cap_raw_ioctl_timeout, 5,
        "Bluetooth raw L2CAP sockets ioctl timeout");
SYSCTL_UINT(_net_bluetooth_l2cap_sockets_raw, OID_AUTO, queue_len,
        CTLFLAG_RD,
        &ng_btsocket_l2cap_raw_queue.len, 0,
        "Bluetooth raw L2CAP sockets input queue length");
SYSCTL_UINT(_net_bluetooth_l2cap_sockets_raw, OID_AUTO, queue_maxlen,
        CTLFLAG_RD,
        &ng_btsocket_l2cap_raw_queue.maxlen, 0,
        "Bluetooth raw L2CAP sockets input queue max. length");
SYSCTL_UINT(_net_bluetooth_l2cap_sockets_raw, OID_AUTO, queue_drops,
        CTLFLAG_RD,
        &ng_btsocket_l2cap_raw_queue.drops, 0,
        "Bluetooth raw L2CAP sockets input queue drops");
 
/* Debug */
#define NG_BTSOCKET_L2CAP_RAW_INFO \
        if (ng_btsocket_l2cap_raw_debug_level >= NG_BTSOCKET_INFO_LEVEL && \
            ppsratecheck(&ng_btsocket_l2cap_raw_lasttime, &ng_btsocket_l2cap_raw_curpps, 1)) \
                printf
 
#define NG_BTSOCKET_L2CAP_RAW_WARN \
        if (ng_btsocket_l2cap_raw_debug_level >= NG_BTSOCKET_WARN_LEVEL && \
            ppsratecheck(&ng_btsocket_l2cap_raw_lasttime, &ng_btsocket_l2cap_raw_curpps, 1)) \
                printf
 
#define NG_BTSOCKET_L2CAP_RAW_ERR \
        if (ng_btsocket_l2cap_raw_debug_level >= NG_BTSOCKET_ERR_LEVEL && \
            ppsratecheck(&ng_btsocket_l2cap_raw_lasttime, &ng_btsocket_l2cap_raw_curpps, 1)) \
                printf
 
#define NG_BTSOCKET_L2CAP_RAW_ALERT \
        if (ng_btsocket_l2cap_raw_debug_level >= NG_BTSOCKET_ALERT_LEVEL && \
            ppsratecheck(&ng_btsocket_l2cap_raw_lasttime, &ng_btsocket_l2cap_raw_curpps, 1)) \
                printf
 
/*****************************************************************************
 *****************************************************************************
 **                        Netgraph node interface
 *****************************************************************************
 *****************************************************************************/
 
/*
 * Netgraph node constructor. Do not allow to create node of this type.
 */
 
static int
ng_btsocket_l2cap_raw_node_constructor(node_p node)
{
        return (EINVAL);
} /* ng_btsocket_l2cap_raw_node_constructor */
 
/*
 * Do local shutdown processing. Let old node go and create new fresh one.
 */
 
static int
ng_btsocket_l2cap_raw_node_shutdown(node_p node)
{
        int     error = 0;
 
        NG_NODE_UNREF(node);
 
        /* Create new node */
        error = ng_make_node_common(&typestruct, &ng_btsocket_l2cap_raw_node);
        if (error != 0) {
                NG_BTSOCKET_L2CAP_RAW_ALERT(
"%s: Could not create Netgraph node, error=%d\n", __func__, error);
 
                ng_btsocket_l2cap_raw_node = NULL;
 
                return (error);
        }
 
        error = ng_name_node(ng_btsocket_l2cap_raw_node,
                                NG_BTSOCKET_L2CAP_RAW_NODE_TYPE);
        if (error != 0) {
                NG_BTSOCKET_L2CAP_RAW_ALERT(
"%s: Could not name Netgraph node, error=%d\n", __func__, error);
 
                NG_NODE_UNREF(ng_btsocket_l2cap_raw_node);
                ng_btsocket_l2cap_raw_node = NULL;
 
                return (error);
        }
                
        return (0);
} /* ng_btsocket_l2cap_raw_node_shutdown */
 
/*
 * We allow any hook to be connected to the node.
 */
 
static int
ng_btsocket_l2cap_raw_node_newhook(node_p node, hook_p hook, char const *name)
{
        return (0);
} /* ng_btsocket_l2cap_raw_node_newhook */
 
/* 
 * Just say "YEP, that's OK by me!"
 */
 
static int
ng_btsocket_l2cap_raw_node_connect(hook_p hook)
{
        NG_HOOK_SET_PRIVATE(hook, NULL);
        NG_HOOK_REF(hook); /* Keep extra reference to the hook */
 
        return (0);
} /* ng_btsocket_l2cap_raw_node_connect */
 
/*
 * Hook disconnection. Schedule route cleanup task
 */
 
static int
ng_btsocket_l2cap_raw_node_disconnect(hook_p hook)
{
        /*
         * If hook has private information than we must have this hook in
         * the routing table and must schedule cleaning for the routing table.
         * Otherwise hook was connected but we never got "hook_info" message,
         * so we have never added this hook to the routing table and it save
         * to just delete it.
         */
 
        if (NG_HOOK_PRIVATE(hook) != NULL)
                return (ng_btsocket_l2cap_raw_wakeup_route_task());
 
        NG_HOOK_UNREF(hook); /* Remove extra reference */
 
        return (0);
} /* ng_btsocket_l2cap_raw_node_disconnect */
 
/*
 * Process incoming messages 
 */
 
static int
ng_btsocket_l2cap_raw_node_rcvmsg(node_p node, item_p item, hook_p hook)
{
        struct ng_mesg  *msg = NGI_MSG(item); /* item still has message */
        int              error = 0;
 
        if (msg != NULL && msg->header.typecookie == NGM_L2CAP_COOKIE) {
                /*
                 * NGM_L2CAP_NODE_HOOK_INFO is special message initiated by
                 * L2CAP layer. Ignore all other messages if they are not
                 * replies or token is zero 
                 */
 
                if (msg->header.cmd != NGM_L2CAP_NODE_HOOK_INFO) {
                        if (msg->header.token == 0 ||
                            !(msg->header.flags & NGF_RESP)) {
                                NG_FREE_ITEM(item);
                                return (0);
                        }
                }
 
                mtx_lock(&ng_btsocket_l2cap_raw_queue_mtx);
                if (NG_BT_ITEMQ_FULL(&ng_btsocket_l2cap_raw_queue)) {
                        NG_BTSOCKET_L2CAP_RAW_ERR(
"%s: Input queue is full\n", __func__);
 
                        NG_BT_ITEMQ_DROP(&ng_btsocket_l2cap_raw_queue);
                        NG_FREE_ITEM(item);
                        error = ENOBUFS;
                } else {
                        if (hook != NULL) {
                                NG_HOOK_REF(hook);
                                NGI_SET_HOOK(item, hook);
                        }
 
                        NG_BT_ITEMQ_ENQUEUE(&ng_btsocket_l2cap_raw_queue, item);
                        error = ng_btsocket_l2cap_raw_wakeup_input_task();
                }
                mtx_unlock(&ng_btsocket_l2cap_raw_queue_mtx);
        } else {
                NG_FREE_ITEM(item);
                error = EINVAL;
        }
 
        return (error);
} /* ng_btsocket_l2cap_raw_node_rcvmsg */
 
/*
 * Receive data on a hook
 */
 
static int
ng_btsocket_l2cap_raw_node_rcvdata(hook_p hook, item_p item)
{
        NG_FREE_ITEM(item);
 
        return (EINVAL);
} /* ng_btsocket_l2cap_raw_node_rcvdata */
 
/*****************************************************************************
 *****************************************************************************
 **                              Socket interface
 *****************************************************************************
 *****************************************************************************/
 
/*
 * L2CAP sockets input routine
 */
 
static void
ng_btsocket_l2cap_raw_input(void *context, int pending)
{
        item_p           item = NULL;
        hook_p           hook = NULL;
        struct ng_mesg  *msg = NULL;
 
        for (;;) {
                mtx_lock(&ng_btsocket_l2cap_raw_queue_mtx);
                NG_BT_ITEMQ_DEQUEUE(&ng_btsocket_l2cap_raw_queue, item);
                mtx_unlock(&ng_btsocket_l2cap_raw_queue_mtx);
 
                if (item == NULL)
                        break;
 
                KASSERT((item->el_flags & NGQF_TYPE) == NGQF_MESG,
("%s: invalid item type=%ld\n", __func__, (item->el_flags & NGQF_TYPE)));
 
                NGI_GET_MSG(item, msg);
                NGI_GET_HOOK(item, hook);
                NG_FREE_ITEM(item);
 
                switch (msg->header.cmd) {
                case NGM_L2CAP_NODE_HOOK_INFO: {
                        ng_btsocket_l2cap_rtentry_t     *rt = NULL;
 
                        if (hook == NULL || NG_HOOK_NOT_VALID(hook) ||
                            msg->header.arglen != sizeof(bdaddr_t))
                                break;
 
                        if (bcmp(msg->data, NG_HCI_BDADDR_ANY,
                                        sizeof(bdaddr_t)) == 0)
                                break;
 
                        rt = (ng_btsocket_l2cap_rtentry_t *) 
                                NG_HOOK_PRIVATE(hook);
                        if (rt == NULL) {
                                rt = malloc(sizeof(*rt),
                                        M_NETGRAPH_BTSOCKET_L2CAP_RAW,
                                        M_NOWAIT|M_ZERO);
                                if (rt == NULL)
                                        break;
 
                                NG_HOOK_SET_PRIVATE(hook, rt);
 
                                mtx_lock(&ng_btsocket_l2cap_raw_rt_mtx);
 
                                LIST_INSERT_HEAD(&ng_btsocket_l2cap_raw_rt, 
                                        rt, next);
                        } else
                                mtx_lock(&ng_btsocket_l2cap_raw_rt_mtx);
                
                        bcopy(msg->data, &rt->src, sizeof(rt->src));
                        rt->hook = hook;
 
                        NG_BTSOCKET_L2CAP_RAW_INFO(
"%s: Updating hook \"%s\", src bdaddr=%x:%x:%x:%x:%x:%x\n",
                                __func__, NG_HOOK_NAME(hook), 
                                rt->src.b[5], rt->src.b[4], rt->src.b[3],
                                rt->src.b[2], rt->src.b[1], rt->src.b[0]);
 
                        mtx_unlock(&ng_btsocket_l2cap_raw_rt_mtx);
                        } break;
 
                case NGM_L2CAP_NODE_GET_FLAGS:
                case NGM_L2CAP_NODE_GET_DEBUG:
                case NGM_L2CAP_NODE_GET_CON_LIST:
                case NGM_L2CAP_NODE_GET_CHAN_LIST:
                case NGM_L2CAP_NODE_GET_AUTO_DISCON_TIMO:
                case NGM_L2CAP_L2CA_PING:
                case NGM_L2CAP_L2CA_GET_INFO: {
                        ng_btsocket_l2cap_raw_pcb_p     pcb = NULL;
 
                        mtx_lock(&ng_btsocket_l2cap_raw_sockets_mtx);
 
                        LIST_FOREACH(pcb,&ng_btsocket_l2cap_raw_sockets,next) {
                                mtx_lock(&pcb->pcb_mtx);
 
                                if (pcb->token == msg->header.token) {
                                        pcb->msg = msg;
                                        msg = NULL;
                                        wakeup(&pcb->msg);
                                        mtx_unlock(&pcb->pcb_mtx);
                                        break;
                                }
 
                                mtx_unlock(&pcb->pcb_mtx);
                        }
 
                        mtx_unlock(&ng_btsocket_l2cap_raw_sockets_mtx);
                        } break;
 
                default:
                        NG_BTSOCKET_L2CAP_RAW_WARN(
"%s: Unknown message, cmd=%d\n", __func__, msg->header.cmd);
                        break;
                }
 
                if (hook != NULL)
                        NG_HOOK_UNREF(hook); /* remove extra reference */
 
                NG_FREE_MSG(msg); /* Checks for msg != NULL */
        }
} /* ng_btsocket_l2cap_raw_input */
 
/*
 * Route cleanup task. Gets scheduled when hook is disconnected. Here we 
 * will find all sockets that use "invalid" hook and disconnect them.
 */
 
static void
ng_btsocket_l2cap_raw_rtclean(void *context, int pending)
{
        ng_btsocket_l2cap_raw_pcb_p     pcb = NULL;
        ng_btsocket_l2cap_rtentry_p     rt = NULL;
 
        /*
         * First disconnect all sockets that use "invalid" hook
         */
 
        mtx_lock(&ng_btsocket_l2cap_raw_sockets_mtx);
 
        LIST_FOREACH(pcb, &ng_btsocket_l2cap_raw_sockets, next) {
                mtx_lock(&pcb->pcb_mtx);
 
                if (pcb->rt != NULL &&
                    pcb->rt->hook != NULL && NG_HOOK_NOT_VALID(pcb->rt->hook)) {
                        if (pcb->so != NULL &&
                            pcb->so->so_state & SS_ISCONNECTED)
                                soisdisconnected(pcb->so);
 
                        pcb->rt = NULL;
                }
 
                mtx_unlock(&pcb->pcb_mtx);
        }
 
        mtx_unlock(&ng_btsocket_l2cap_raw_sockets_mtx);
 
        /*
         * Now cleanup routing table
         */
 
        mtx_lock(&ng_btsocket_l2cap_raw_rt_mtx);
 
        for (rt = LIST_FIRST(&ng_btsocket_l2cap_raw_rt); rt != NULL; ) {
                ng_btsocket_l2cap_rtentry_p     rt_next = LIST_NEXT(rt, next);
 
                if (rt->hook != NULL && NG_HOOK_NOT_VALID(rt->hook)) {
                        LIST_REMOVE(rt, next);
 
                        NG_HOOK_SET_PRIVATE(rt->hook, NULL);
                        NG_HOOK_UNREF(rt->hook); /* Remove extra reference */
 
                        bzero(rt, sizeof(*rt));
                        free(rt, M_NETGRAPH_BTSOCKET_L2CAP_RAW);
                }
 
                rt = rt_next;
        }
 
        mtx_unlock(&ng_btsocket_l2cap_raw_rt_mtx);
} /* ng_btsocket_l2cap_raw_rtclean */
 
/*
 * Initialize everything
 */
 
static void
ng_btsocket_l2cap_raw_init(void *arg __unused)
{
        int     error = 0;
 
        ng_btsocket_l2cap_raw_node = NULL;
        ng_btsocket_l2cap_raw_debug_level = NG_BTSOCKET_WARN_LEVEL;
        ng_btsocket_l2cap_raw_ioctl_timeout = 5;
 
        /* Register Netgraph node type */
        error = ng_newtype(&typestruct);
        if (error != 0) {
                NG_BTSOCKET_L2CAP_RAW_ALERT(
"%s: Could not register Netgraph node type, error=%d\n", __func__, error);
 
                return;
        }
 
        /* Create Netgrapg node */
        error = ng_make_node_common(&typestruct, &ng_btsocket_l2cap_raw_node);
        if (error != 0) {
                NG_BTSOCKET_L2CAP_RAW_ALERT(
"%s: Could not create Netgraph node, error=%d\n", __func__, error);
 
                ng_btsocket_l2cap_raw_node = NULL;
 
                return;
        }
 
        error = ng_name_node(ng_btsocket_l2cap_raw_node,
                                NG_BTSOCKET_L2CAP_RAW_NODE_TYPE);
        if (error != 0) {
                NG_BTSOCKET_L2CAP_RAW_ALERT(
"%s: Could not name Netgraph node, error=%d\n", __func__, error);
 
                NG_NODE_UNREF(ng_btsocket_l2cap_raw_node);
                ng_btsocket_l2cap_raw_node = NULL;
 
                return;
        }
 
        /* Create input queue */
        NG_BT_ITEMQ_INIT(&ng_btsocket_l2cap_raw_queue, ifqmaxlen);
        mtx_init(&ng_btsocket_l2cap_raw_queue_mtx,
                "btsocks_l2cap_raw_queue_mtx", NULL, MTX_DEF);
        TASK_INIT(&ng_btsocket_l2cap_raw_queue_task, 0,
                ng_btsocket_l2cap_raw_input, NULL);
 
        /* Create list of sockets */
        LIST_INIT(&ng_btsocket_l2cap_raw_sockets);
        mtx_init(&ng_btsocket_l2cap_raw_sockets_mtx,
                "btsocks_l2cap_raw_sockets_mtx", NULL, MTX_DEF);
 
        /* Tokens */
        ng_btsocket_l2cap_raw_token = 0;
        mtx_init(&ng_btsocket_l2cap_raw_token_mtx,
                "btsocks_l2cap_raw_token_mtx", NULL, MTX_DEF);
 
        /* Routing table */
        LIST_INIT(&ng_btsocket_l2cap_raw_rt);
        mtx_init(&ng_btsocket_l2cap_raw_rt_mtx,
                "btsocks_l2cap_raw_rt_mtx", NULL, MTX_DEF);
        TASK_INIT(&ng_btsocket_l2cap_raw_rt_task, 0,
                ng_btsocket_l2cap_raw_rtclean, NULL);
} /* ng_btsocket_l2cap_raw_init */
SYSINIT(ng_btsocket_l2cap_raw_init, SI_SUB_PROTO_DOMAIN, SI_ORDER_THIRD,
    ng_btsocket_l2cap_raw_init, NULL);
 
/*
 * Abort connection on socket
 */
 
void
ng_btsocket_l2cap_raw_abort(struct socket *so)
{
 
        (void)ng_btsocket_l2cap_raw_disconnect(so);
} /* ng_btsocket_l2cap_raw_abort */
 
void
ng_btsocket_l2cap_raw_close(struct socket *so)
{
 
        (void)ng_btsocket_l2cap_raw_disconnect(so);
} /* ng_btsocket_l2cap_raw_close */
 
/*
 * Create and attach new socket
 */
 
int
ng_btsocket_l2cap_raw_attach(struct socket *so, int proto, struct thread *td)
{
        ng_btsocket_l2cap_raw_pcb_p     pcb = so2l2cap_raw_pcb(so);
        int                             error;
 
        if (pcb != NULL)
                return (EISCONN);
 
        if (ng_btsocket_l2cap_raw_node == NULL) 
                return (EPROTONOSUPPORT);
        if (so->so_type != SOCK_RAW)
                return (ESOCKTNOSUPPORT);
 
        /* Reserve send and receive space if it is not reserved yet */
        error = soreserve(so, NG_BTSOCKET_L2CAP_RAW_SENDSPACE,
                        NG_BTSOCKET_L2CAP_RAW_RECVSPACE);
        if (error != 0)
                return (error);
 
        /* Allocate the PCB */
        pcb = malloc(sizeof(*pcb),
                M_NETGRAPH_BTSOCKET_L2CAP_RAW, M_NOWAIT|M_ZERO);
        if (pcb == NULL)
                return (ENOMEM);
 
        /* Link the PCB and the socket */
        so->so_pcb = (caddr_t) pcb;
        pcb->so = so;
 
        if (priv_check(td, PRIV_NETBLUETOOTH_RAW) == 0)
                pcb->flags |= NG_BTSOCKET_L2CAP_RAW_PRIVILEGED;
 
        mtx_init(&pcb->pcb_mtx, "btsocks_l2cap_raw_pcb_mtx", NULL, MTX_DEF);
 
        /* Add the PCB to the list */
        mtx_lock(&ng_btsocket_l2cap_raw_sockets_mtx);
        LIST_INSERT_HEAD(&ng_btsocket_l2cap_raw_sockets, pcb, next);
        mtx_unlock(&ng_btsocket_l2cap_raw_sockets_mtx);
 
        return (0);
} /* ng_btsocket_l2cap_raw_attach */
 
/*
 * Bind socket
 */
 
int
ng_btsocket_l2cap_raw_bind(struct socket *so, struct sockaddr *nam, 
                struct thread *td)
{
        ng_btsocket_l2cap_raw_pcb_t     *pcb = so2l2cap_raw_pcb(so);
        struct sockaddr_l2cap           *sa = (struct sockaddr_l2cap *) nam;
        ng_btsocket_l2cap_rtentry_t     *rt = NULL;
 
        if (pcb == NULL)
                return (EINVAL);
        if (ng_btsocket_l2cap_raw_node == NULL) 
                return (EINVAL);
 
        if (sa == NULL)
                return (EINVAL);
        if (sa->l2cap_family != AF_BLUETOOTH)
                return (EAFNOSUPPORT);
        if((sa->l2cap_len != sizeof(*sa))&&
           (sa->l2cap_len != sizeof(struct sockaddr_l2cap_compat)))
                return (EINVAL);
 
        if (bcmp(&sa->l2cap_bdaddr, NG_HCI_BDADDR_ANY,
                                sizeof(sa->l2cap_bdaddr)) != 0) {
                mtx_lock(&ng_btsocket_l2cap_raw_rt_mtx);
 
                LIST_FOREACH(rt, &ng_btsocket_l2cap_raw_rt, next) {
                        if (rt->hook == NULL || NG_HOOK_NOT_VALID(rt->hook))
                                continue;
 
                        if (bcmp(&sa->l2cap_bdaddr, &rt->src,
                                        sizeof(rt->src)) == 0)
                                break;
                }
 
                mtx_unlock(&ng_btsocket_l2cap_raw_rt_mtx);
 
                if (rt == NULL)
                        return (ENETDOWN);
        } else
                rt = NULL;
 
        mtx_lock(&pcb->pcb_mtx);
        bcopy(&sa->l2cap_bdaddr, &pcb->src, sizeof(pcb->src));
        pcb->rt = rt;
        mtx_unlock(&pcb->pcb_mtx);
 
        return (0);
} /* ng_btsocket_l2cap_raw_bind */
 
/*
 * Connect socket
 */
 
int
ng_btsocket_l2cap_raw_connect(struct socket *so, struct sockaddr *nam, 
                struct thread *td)
{
        ng_btsocket_l2cap_raw_pcb_t     *pcb = so2l2cap_raw_pcb(so);
        struct sockaddr_l2cap           *sa = (struct sockaddr_l2cap *) nam;
        ng_btsocket_l2cap_rtentry_t     *rt = NULL;
        int                              error;
 
        if (pcb == NULL)
                return (EINVAL);
        if (ng_btsocket_l2cap_raw_node == NULL) 
                return (EINVAL);
 
        if (sa == NULL)
                return (EINVAL);
        if (sa->l2cap_family != AF_BLUETOOTH)
                return (EAFNOSUPPORT);
        if((sa->l2cap_len != sizeof(*sa))&&
           (sa->l2cap_len != sizeof(struct sockaddr_l2cap_compat)))
                return (EINVAL);
 
        if (bcmp(&sa->l2cap_bdaddr, NG_HCI_BDADDR_ANY, sizeof(bdaddr_t)) == 0)
                return (EINVAL);
 
        mtx_lock(&pcb->pcb_mtx);
 
        bcopy(&sa->l2cap_bdaddr, &pcb->dst, sizeof(pcb->dst));
 
        if (bcmp(&pcb->src, &pcb->dst, sizeof(pcb->src)) == 0) {
                mtx_unlock(&pcb->pcb_mtx);
 
                return (EADDRNOTAVAIL);
        }
 
        /*
         * If there is route already - use it
         */
 
        if (pcb->rt != NULL) {
                soisconnected(so);
                mtx_unlock(&pcb->pcb_mtx);
 
                return (0);
        }
 
        /*
         * Find the first hook that does not match specified destination address
         */
 
        mtx_lock(&ng_btsocket_l2cap_raw_rt_mtx);
 
        LIST_FOREACH(rt, &ng_btsocket_l2cap_raw_rt, next) {
                if (rt->hook == NULL || NG_HOOK_NOT_VALID(rt->hook))
                        continue;
 
                if (bcmp(&pcb->dst, &rt->src, sizeof(rt->src)) != 0)
                        break;
        }
 
        if (rt != NULL) {
                soisconnected(so);
 
                pcb->rt = rt;
                bcopy(&rt->src, &pcb->src, sizeof(pcb->src));
 
                error = 0;
        } else
                error = ENETDOWN;
 
        mtx_unlock(&ng_btsocket_l2cap_raw_rt_mtx);
        mtx_unlock(&pcb->pcb_mtx);
 
        return  (error);
} /* ng_btsocket_l2cap_raw_connect */
 
/*
 * Process ioctl's calls on socket
 */
 
int
ng_btsocket_l2cap_raw_control(struct socket *so, u_long cmd, caddr_t data,
                struct ifnet *ifp, struct thread *td)
{
        ng_btsocket_l2cap_raw_pcb_p      pcb = so2l2cap_raw_pcb(so);
        struct ng_mesg                  *msg = NULL;
        int                              error = 0;
 
        if (pcb == NULL)
                return (EINVAL);
        if (ng_btsocket_l2cap_raw_node == NULL)
                return (EINVAL);
 
        mtx_lock(&pcb->pcb_mtx);
 
        /* Check if we route info */
        if (pcb->rt == NULL) {
                mtx_unlock(&pcb->pcb_mtx);
                return (EHOSTUNREACH);
        }
 
        /* Check if we have pending ioctl() */
        if (pcb->token != 0) {
                mtx_unlock(&pcb->pcb_mtx);
                return (EBUSY);
        }  
 
        switch (cmd) {
        case SIOC_L2CAP_NODE_GET_FLAGS: {
                struct ng_btsocket_l2cap_raw_node_flags *p =
                        (struct ng_btsocket_l2cap_raw_node_flags *) data;
 
                error = ng_btsocket_l2cap_raw_send_sync_ngmsg(pcb,
                                NGM_L2CAP_NODE_GET_FLAGS,
                                &p->flags, sizeof(p->flags));
                } break;
 
        case SIOC_L2CAP_NODE_GET_DEBUG: {
                struct ng_btsocket_l2cap_raw_node_debug *p =
                        (struct ng_btsocket_l2cap_raw_node_debug *) data;
 
                error = ng_btsocket_l2cap_raw_send_sync_ngmsg(pcb,
                                NGM_L2CAP_NODE_GET_DEBUG,
                                &p->debug, sizeof(p->debug));
                } break;
 
        case SIOC_L2CAP_NODE_SET_DEBUG: {
                struct ng_btsocket_l2cap_raw_node_debug *p = 
                        (struct ng_btsocket_l2cap_raw_node_debug *) data;
 
                if (pcb->flags & NG_BTSOCKET_L2CAP_RAW_PRIVILEGED)
                        error = ng_btsocket_l2cap_raw_send_ngmsg(pcb->rt->hook,
                                        NGM_L2CAP_NODE_SET_DEBUG,
                                        &p->debug, sizeof(p->debug));
                else
                        error = EPERM;
                } break;
 
        case SIOC_L2CAP_NODE_GET_CON_LIST: {
                struct ng_btsocket_l2cap_raw_con_list   *p =
                        (struct ng_btsocket_l2cap_raw_con_list *) data;
                ng_l2cap_node_con_list_ep               *p1 = NULL;
                ng_l2cap_node_con_ep                    *p2 = NULL;
 
                if (p->num_connections == 0 ||
                    p->num_connections > NG_L2CAP_MAX_CON_NUM ||
                    p->connections == NULL) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (EINVAL);
                }
 
                NG_MKMESSAGE(msg, NGM_L2CAP_COOKIE, NGM_L2CAP_NODE_GET_CON_LIST,
                        0, M_NOWAIT);
                if (msg == NULL) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (ENOMEM);
                }
                ng_btsocket_l2cap_raw_get_token(&msg->header.token);
                pcb->token = msg->header.token;
                pcb->msg = NULL;
 
                NG_SEND_MSG_HOOK(error, ng_btsocket_l2cap_raw_node, msg,
                        pcb->rt->hook, 0);
                if (error != 0) {
                        pcb->token = 0;
                        mtx_unlock(&pcb->pcb_mtx);
                        return (error);
                }
 
                error = msleep(&pcb->msg, &pcb->pcb_mtx, PZERO|PCATCH, "l2ctl",
                                ng_btsocket_l2cap_raw_ioctl_timeout * hz);
                pcb->token = 0;
 
                if (error != 0) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (error);
                }
 
                msg = pcb->msg;
                pcb->msg = NULL;
 
                mtx_unlock(&pcb->pcb_mtx);
 
                if (msg != NULL &&
                    msg->header.cmd == NGM_L2CAP_NODE_GET_CON_LIST) {
                        /* Return data back to user space */
                        p1 = (ng_l2cap_node_con_list_ep *)(msg->data);
                        p2 = (ng_l2cap_node_con_ep *)(p1 + 1);
 
                        p->num_connections = min(p->num_connections,
                                                p1->num_connections);
                        if (p->num_connections > 0)
                                error = copyout((caddr_t) p2, 
                                        (caddr_t) p->connections,
                                        p->num_connections * sizeof(*p2));
                } else
                        error = EINVAL;
 
                NG_FREE_MSG(msg); /* checks for != NULL */
                return (error);
                } /* NOTREACHED */
 
        case SIOC_L2CAP_NODE_GET_CHAN_LIST: {
                struct ng_btsocket_l2cap_raw_chan_list  *p =
                        (struct ng_btsocket_l2cap_raw_chan_list *) data;
                ng_l2cap_node_chan_list_ep              *p1 = NULL;
                ng_l2cap_node_chan_ep                   *p2 = NULL;
 
                if (p->num_channels == 0 ||
                    p->num_channels > NG_L2CAP_MAX_CHAN_NUM ||
                    p->channels == NULL) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (EINVAL);
                }
 
                NG_MKMESSAGE(msg, NGM_L2CAP_COOKIE,
                        NGM_L2CAP_NODE_GET_CHAN_LIST, 0, M_NOWAIT);
                if (msg == NULL) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (ENOMEM);
                }
                ng_btsocket_l2cap_raw_get_token(&msg->header.token);
                pcb->token = msg->header.token;
                pcb->msg = NULL;
 
                NG_SEND_MSG_HOOK(error, ng_btsocket_l2cap_raw_node, msg,
                        pcb->rt->hook, 0);
                if (error != 0) {
                        pcb->token = 0;
                        mtx_unlock(&pcb->pcb_mtx);
                        return (error);
                }
 
                error = msleep(&pcb->msg, &pcb->pcb_mtx, PZERO|PCATCH, "l2ctl",
                                ng_btsocket_l2cap_raw_ioctl_timeout * hz);
                pcb->token = 0;
 
                if (error != 0) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (error);
                }
 
                msg = pcb->msg;
                pcb->msg = NULL;
 
                mtx_unlock(&pcb->pcb_mtx);
 
                if (msg != NULL &&
                    msg->header.cmd == NGM_L2CAP_NODE_GET_CHAN_LIST) {
                        /* Return data back to user space */
                        p1 = (ng_l2cap_node_chan_list_ep *)(msg->data);
                        p2 = (ng_l2cap_node_chan_ep *)(p1 + 1);
 
                        p->num_channels = min(p->num_channels, 
                                                p1->num_channels);
                        if (p->num_channels > 0)
                                error = copyout((caddr_t) p2, 
                                                (caddr_t) p->channels,
                                                p->num_channels * sizeof(*p2));
                } else
                        error = EINVAL;
 
                NG_FREE_MSG(msg); /* checks for != NULL */
                return (error);
                } /* NOTREACHED */
 
        case SIOC_L2CAP_L2CA_PING: {
                struct ng_btsocket_l2cap_raw_ping       *p = 
                        (struct ng_btsocket_l2cap_raw_ping *) data;
                ng_l2cap_l2ca_ping_ip                   *ip = NULL;
                ng_l2cap_l2ca_ping_op                   *op = NULL;
 
                if ((p->echo_size != 0 && p->echo_data == NULL) ||
                     p->echo_size > NG_L2CAP_MAX_ECHO_SIZE) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (EINVAL);
                }
 
                NG_MKMESSAGE(msg, NGM_L2CAP_COOKIE,
                        NGM_L2CAP_L2CA_PING, sizeof(*ip) + p->echo_size,
                        M_NOWAIT);
                if (msg == NULL) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (ENOMEM);
                }
                ng_btsocket_l2cap_raw_get_token(&msg->header.token);
                pcb->token = msg->header.token;
                pcb->msg = NULL;
 
                ip = (ng_l2cap_l2ca_ping_ip *)(msg->data);
                bcopy(&pcb->dst, &ip->bdaddr, sizeof(ip->bdaddr));
                ip->echo_size = p->echo_size;
 
                if (ip->echo_size > 0) {
                        mtx_unlock(&pcb->pcb_mtx);
                        error = copyin(p->echo_data, ip + 1, p->echo_size);
                        mtx_lock(&pcb->pcb_mtx);
 
                        if (error != 0) {
                                NG_FREE_MSG(msg);
                                pcb->token = 0;
                                mtx_unlock(&pcb->pcb_mtx);
                                return (error);
                        }
                }
 
                NG_SEND_MSG_HOOK(error, ng_btsocket_l2cap_raw_node, msg,
                        pcb->rt->hook, 0);
                if (error != 0) {
                        pcb->token = 0;
                        mtx_unlock(&pcb->pcb_mtx);
                        return (error);
                }
 
                error = msleep(&pcb->msg, &pcb->pcb_mtx, PZERO|PCATCH, "l2ctl",
                                bluetooth_l2cap_rtx_timeout());
                pcb->token = 0;
 
                if (error != 0) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (error);
                }
 
                msg = pcb->msg;
                pcb->msg = NULL;
 
                mtx_unlock(&pcb->pcb_mtx);
 
                if (msg != NULL &&
                    msg->header.cmd == NGM_L2CAP_L2CA_PING) {
                        /* Return data back to the user space */
                        op = (ng_l2cap_l2ca_ping_op *)(msg->data);
                        p->result = op->result;
                        p->echo_size = min(p->echo_size, op->echo_size);
 
                        if (p->echo_size > 0)
                                error = copyout(op + 1, p->echo_data, 
                                                p->echo_size);
                } else
                        error = EINVAL;
 
                NG_FREE_MSG(msg); /* checks for != NULL */
                return (error);
                } /* NOTREACHED */
 
        case SIOC_L2CAP_L2CA_GET_INFO: {
                struct ng_btsocket_l2cap_raw_get_info   *p = 
                        (struct ng_btsocket_l2cap_raw_get_info *) data;
                ng_l2cap_l2ca_get_info_ip               *ip = NULL;
                ng_l2cap_l2ca_get_info_op               *op = NULL;
 
                if (!(pcb->flags & NG_BTSOCKET_L2CAP_RAW_PRIVILEGED)) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (EPERM);
                }
 
                if (p->info_size != 0 && p->info_data == NULL) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (EINVAL);
                }
 
                NG_MKMESSAGE(msg, NGM_L2CAP_COOKIE,
                        NGM_L2CAP_L2CA_GET_INFO, sizeof(*ip) + p->info_size,
                        M_NOWAIT);
                if (msg == NULL) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (ENOMEM);
                }
                ng_btsocket_l2cap_raw_get_token(&msg->header.token);
                pcb->token = msg->header.token;
                pcb->msg = NULL;
 
                ip = (ng_l2cap_l2ca_get_info_ip *)(msg->data);
                bcopy(&pcb->dst, &ip->bdaddr, sizeof(ip->bdaddr));
                ip->info_type = p->info_type;
 
                NG_SEND_MSG_HOOK(error, ng_btsocket_l2cap_raw_node, msg,
                        pcb->rt->hook, 0);
                if (error != 0) {
                        pcb->token = 0;
                        mtx_unlock(&pcb->pcb_mtx);
                        return (error);
                }
 
                error = msleep(&pcb->msg, &pcb->pcb_mtx, PZERO|PCATCH, "l2ctl",
                                bluetooth_l2cap_rtx_timeout());
                pcb->token = 0;
 
                if (error != 0) {
                        mtx_unlock(&pcb->pcb_mtx);
                        return (error);
                }
 
                msg = pcb->msg;
                pcb->msg = NULL;
 
                mtx_unlock(&pcb->pcb_mtx);
 
                if (msg != NULL &&
                    msg->header.cmd == NGM_L2CAP_L2CA_GET_INFO) {
                        /* Return data back to the user space */
                        op = (ng_l2cap_l2ca_get_info_op *)(msg->data);
                        p->result = op->result;
                        p->info_size = min(p->info_size, op->info_size);
 
                        if (p->info_size > 0)
                                error = copyout(op + 1, p->info_data, 
                                                p->info_size);
                } else
                        error = EINVAL;
 
                NG_FREE_MSG(msg); /* checks for != NULL */
                return (error);
                } /* NOTREACHED */
 
        case SIOC_L2CAP_NODE_GET_AUTO_DISCON_TIMO: {
                struct ng_btsocket_l2cap_raw_auto_discon_timo   *p =
                        (struct ng_btsocket_l2cap_raw_auto_discon_timo *) data;
 
                error = ng_btsocket_l2cap_raw_send_sync_ngmsg(pcb,
                                NGM_L2CAP_NODE_GET_AUTO_DISCON_TIMO,
                                &p->timeout, sizeof(p->timeout));
                } break;
 
        case SIOC_L2CAP_NODE_SET_AUTO_DISCON_TIMO: {
                struct ng_btsocket_l2cap_raw_auto_discon_timo   *p =
                        (struct ng_btsocket_l2cap_raw_auto_discon_timo *) data;
 
                if (pcb->flags & NG_BTSOCKET_L2CAP_RAW_PRIVILEGED)
                        error = ng_btsocket_l2cap_raw_send_ngmsg(pcb->rt->hook,
                                        NGM_L2CAP_NODE_SET_AUTO_DISCON_TIMO,
                                        &p->timeout, sizeof(p->timeout));
                else
                        error = EPERM;
                } break;
 
        default:
                error = EINVAL;
                break;
        }
 
        mtx_unlock(&pcb->pcb_mtx);
 
        return (error);
} /* ng_btsocket_l2cap_raw_control */
 
/*
 * Detach and destroy socket
 */
 
void
ng_btsocket_l2cap_raw_detach(struct socket *so)
{
        ng_btsocket_l2cap_raw_pcb_p     pcb = so2l2cap_raw_pcb(so);
 
        KASSERT(pcb != NULL, ("nt_btsocket_l2cap_raw_detach: pcb == NULL"));
        if (ng_btsocket_l2cap_raw_node == NULL) 
                return;
 
        mtx_lock(&ng_btsocket_l2cap_raw_sockets_mtx);
        mtx_lock(&pcb->pcb_mtx);
 
        LIST_REMOVE(pcb, next);
 
        mtx_unlock(&pcb->pcb_mtx);
        mtx_unlock(&ng_btsocket_l2cap_raw_sockets_mtx);
 
        mtx_destroy(&pcb->pcb_mtx);
 
        bzero(pcb, sizeof(*pcb));
        free(pcb, M_NETGRAPH_BTSOCKET_L2CAP_RAW);
 
        so->so_pcb = NULL;
} /* ng_btsocket_l2cap_raw_detach */
 
/*
 * Disconnect socket
 */
 
int
ng_btsocket_l2cap_raw_disconnect(struct socket *so)
{
        ng_btsocket_l2cap_raw_pcb_p     pcb = so2l2cap_raw_pcb(so);
 
        if (pcb == NULL)
                return (EINVAL);
        if (ng_btsocket_l2cap_raw_node == NULL)
                return (EINVAL);
 
        mtx_lock(&pcb->pcb_mtx);
        pcb->rt = NULL;
        soisdisconnected(so);
        mtx_unlock(&pcb->pcb_mtx);
 
        return (0);
} /* ng_btsocket_l2cap_raw_disconnect */
 
/*
 * Get peer address
 */
 
int
ng_btsocket_l2cap_raw_peeraddr(struct socket *so, struct sockaddr **nam)
{
        ng_btsocket_l2cap_raw_pcb_p     pcb = so2l2cap_raw_pcb(so);
        struct sockaddr_l2cap           sa;
 
        if (pcb == NULL)
                return (EINVAL);
        if (ng_btsocket_l2cap_raw_node == NULL) 
                return (EINVAL);
 
        mtx_lock(&pcb->pcb_mtx);
        bcopy(&pcb->dst, &sa.l2cap_bdaddr, sizeof(sa.l2cap_bdaddr));
        mtx_unlock(&pcb->pcb_mtx);
 
        sa.l2cap_psm = 0;
        sa.l2cap_len = sizeof(sa);
        sa.l2cap_family = AF_BLUETOOTH;
        sa.l2cap_cid = 0;
        sa.l2cap_bdaddr_type = BDADDR_BREDR;
 
        *nam = sodupsockaddr((struct sockaddr *) &sa, M_NOWAIT);
 
        return ((*nam == NULL)? ENOMEM : 0);
} /* ng_btsocket_l2cap_raw_peeraddr */
 
/*
 * Send data to socket
 */
 
int
ng_btsocket_l2cap_raw_send(struct socket *so, int flags, struct mbuf *m,
                struct sockaddr *nam, struct mbuf *control, struct thread *td)
{
        NG_FREE_M(m); /* Checks for m != NULL */
        NG_FREE_M(control);
 
        return (EOPNOTSUPP);
} /* ng_btsocket_l2cap_raw_send */
 
/*
 * Get socket address
 */
 
int
ng_btsocket_l2cap_raw_sockaddr(struct socket *so, struct sockaddr **nam)
{
        ng_btsocket_l2cap_raw_pcb_p     pcb = so2l2cap_raw_pcb(so);
        struct sockaddr_l2cap           sa;
 
        if (pcb == NULL)
                return (EINVAL);
        if (ng_btsocket_l2cap_raw_node == NULL) 
                return (EINVAL);
 
        mtx_lock(&pcb->pcb_mtx);
        bcopy(&pcb->src, &sa.l2cap_bdaddr, sizeof(sa.l2cap_bdaddr));
        mtx_unlock(&pcb->pcb_mtx);
 
        sa.l2cap_psm = 0;
        sa.l2cap_len = sizeof(sa);
        sa.l2cap_family = AF_BLUETOOTH;
        sa.l2cap_cid = 0;
        sa.l2cap_bdaddr_type = BDADDR_BREDR;
        *nam = sodupsockaddr((struct sockaddr *) &sa, M_NOWAIT);
 
        return ((*nam == NULL)? ENOMEM : 0);
} /* ng_btsocket_l2cap_raw_sockaddr */
 
/*
 * Get next token
 */
 
static void
ng_btsocket_l2cap_raw_get_token(u_int32_t *token)
{
        mtx_lock(&ng_btsocket_l2cap_raw_token_mtx);
  
        if (++ ng_btsocket_l2cap_raw_token == 0)
                ng_btsocket_l2cap_raw_token = 1;
 
        *token = ng_btsocket_l2cap_raw_token;
 
        mtx_unlock(&ng_btsocket_l2cap_raw_token_mtx);
} /* ng_btsocket_l2cap_raw_get_token */
 
/*
 * Send Netgraph message to the node - do not expect reply
 */
 
static int
ng_btsocket_l2cap_raw_send_ngmsg(hook_p hook, int cmd, void *arg, int arglen)
{
        struct ng_mesg  *msg = NULL;
        int              error = 0;
 
        NG_MKMESSAGE(msg, NGM_L2CAP_COOKIE, cmd, arglen, M_NOWAIT);
        if (msg == NULL)
                return (ENOMEM);
 
        if (arg != NULL && arglen > 0)
                bcopy(arg, msg->data, arglen);
 
        NG_SEND_MSG_HOOK(error, ng_btsocket_l2cap_raw_node, msg, hook, 0);
 
        return (error);
} /* ng_btsocket_l2cap_raw_send_ngmsg */
 
/*
 * Send Netgraph message to the node (no data) and wait for reply
 */
 
static int
ng_btsocket_l2cap_raw_send_sync_ngmsg(ng_btsocket_l2cap_raw_pcb_p pcb,
                int cmd, void *rsp, int rsplen)
{
        struct ng_mesg  *msg = NULL;
        int              error = 0;
 
        mtx_assert(&pcb->pcb_mtx, MA_OWNED);
 
        NG_MKMESSAGE(msg, NGM_L2CAP_COOKIE, cmd, 0, M_NOWAIT);
        if (msg == NULL)
                return (ENOMEM);
 
        ng_btsocket_l2cap_raw_get_token(&msg->header.token);
        pcb->token = msg->header.token;
        pcb->msg = NULL;
 
        NG_SEND_MSG_HOOK(error, ng_btsocket_l2cap_raw_node, msg,
                pcb->rt->hook, 0);
        if (error != 0) {
                pcb->token = 0;
                return (error);
        }
 
        error = msleep(&pcb->msg, &pcb->pcb_mtx, PZERO|PCATCH, "l2ctl",
                        ng_btsocket_l2cap_raw_ioctl_timeout * hz);
        pcb->token = 0;
 
        if (error != 0)
                return (error);
 
        if (pcb->msg != NULL && pcb->msg->header.cmd == cmd)
                bcopy(pcb->msg->data, rsp, rsplen);
        else
                error = EINVAL;
 
        NG_FREE_MSG(pcb->msg); /* checks for != NULL */
 
        return (0);
} /* ng_btsocket_l2cap_raw_send_sync_ngmsg */