/*      $NetBSD: at_rmx.c,v 1.6 2006/08/17 17:11:28 christos Exp $      */

/*
 * Copyright 1994, 1995 Massachusetts Institute of Technology
 *
 * Permission to use, copy, modify, and distribute this software and
 * its documentation for any purpose and without fee is hereby
 * granted, provided that both the above copyright notice and this
 * permission notice appear in all copies, that both the above
 * copyright notice and this permission notice appear in all
 * supporting documentation, and that the name of M.I.T. not be used
 * in advertising or publicity pertaining to distribution of the
 * software without specific, written prior permission.  M.I.T. makes
 * no representations about the suitability of this software for any
 * purpose.  It is provided "as is" without express or implied
 * warranty.
 *
 * THIS SOFTWARE IS PROVIDED BY M.I.T. ``AS IS''.  M.I.T. DISCLAIMS
 * ALL EXPRESS OR IMPLIED WARRANTIES WITH REGARD TO THIS SOFTWARE,
 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT
 * SHALL M.I.T. 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.
 *
 * at_rmx.c,v 1.13 1995/05/30 08:09:31 rgrimes Exp
 */

/* This code generates debugging traces to the radix code */

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: at_rmx.c,v 1.6 2006/08/17 17:11:28 christos Exp $");

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/queue.h>
#include <sys/socket.h>
#include <sys/socketvar.h>
#include <sys/mbuf.h>
#include <sys/syslog.h>

#include <net/if.h>
#include <net/route.h>

#include <netatalk/at.h>
#include <netatalk/at_extern.h>

static char     hexbuf[256];

char           *
prsockaddr(const void *v)
{
        char           *bp = &hexbuf[0];
        u_char         *cp = __UNCONST(v);

        if (v) {
                int             len = *cp;
                u_char         *cplim = cp + len;

                /* return: "(len) hexdump" */

                bp += snprintf(bp, sizeof(hexbuf), "(%d)", len);
                for (cp++; cp < cplim && bp < hexbuf + 252; cp++) {
                        *bp++ = hexdigits[*cp / 16];
                        *bp++ = hexdigits[*cp % 16];
                }
        } else {
                bp += snprintf(bp, sizeof(hexbuf), "null");
        }
        *bp = '\0';

        return &hexbuf[0];
}

static struct radix_node *
at_addroute(const void *v_arg, const void *n_arg, struct radix_node_head * head,
            struct radix_node * treenodes)
{
        struct radix_node *rn;

        printf("at_addroute: v=%s\n", prsockaddr(v_arg));
        printf("at_addroute: n=%s\n", prsockaddr(n_arg));
        printf("at_addroute: head=%p treenodes=%p\n", head, treenodes);

        rn = rn_addroute(v_arg, n_arg, head, treenodes);

        printf("at_addroute: returns rn=%p\n", rn);

        return rn;
}

static struct radix_node *
at_matroute(const void *v_arg, struct radix_node_head * head)
{
        struct radix_node *rn;

        printf("at_matroute: v=%s\n", prsockaddr(v_arg));
        printf("at_matroute: head=%p\n", head);

        rn = rn_match(v_arg, head);

        printf("at_matroute: returns rn=%p\n", rn);

        return rn;
}

static struct radix_node *
at_lookup(const void *v_arg, const void *m_arg, struct radix_node_head * head)
{
        struct radix_node *rn;

        printf("at_lookup: v=%s\n", prsockaddr(v_arg));
        printf("at_lookup: n=%s\n", prsockaddr(m_arg));
        printf("at_lookup: head=%p\n", head);

        rn = rn_lookup(v_arg, m_arg, head);

        printf("at_lookup: returns rn=%p\n", rn);

        return rn;
}

static struct radix_node *
at_delroute(const void *v_arg, const void *netmask_arg, struct radix_node_head * head)
{
        struct radix_node *rn;

        printf("at_delroute: v=%s\n", prsockaddr(v_arg));
        printf("at_delroute: n=%s\n", prsockaddr(netmask_arg));
        printf("at_delroute: head=%p\n", head);

        rn = rn_delete(v_arg, netmask_arg, head);

        printf("at_delroute: returns rn=%p\n", rn);

        return rn;
}

/*
 * Initialize our routing tree with debugging hooks.
 */
int
at_inithead(void **head, int off)
{
        struct radix_node_head *rnh;

        if (!rn_inithead(head, off))
                return 0;

        rnh = *head;
        rnh->rnh_addaddr = at_addroute;
        rnh->rnh_deladdr = at_delroute;
        rnh->rnh_matchaddr = at_matroute;
        rnh->rnh_lookup = at_lookup;
        return 1;
}