/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */

/*
 * Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#include "mdns_common.h"

/*
 * gethostby* functions for the ipnodes database. The ipnodes
 * database stores both IPv4 and IPv6 address information.
 * mDNS query functions to perform the host lookup are
 * in mdns/common/mdns_common.c file.
 * _nss_mdns_ipnodes_constr is called to initialize
 * the nsswitch backend data structures.
 */

static nss_status_t
getbyname(be, a)
        mdns_backend_ptr_t      be;
        void                    *a;
{
        nss_XbyY_args_t         *argp = (nss_XbyY_args_t *)a;
        int                     af = argp->key.ipnode.af_family;
        char                    *hname = (char *)argp->key.ipnode.name;
        struct mdns_querydata   qdata;

        (void) memset(&qdata, 0, sizeof (struct mdns_querydata));
        qdata.argp = argp;

        _nss_mdns_updatecfg(be);
        return (_nss_mdns_querybyname(be, hname, af, &qdata));
}

static nss_status_t
getbyaddr(be, a)
        mdns_backend_ptr_t      be;
        void                    *a;
{
        int i;
        char ch;
        char *chptr;
        uint8_t *p;
        struct in6_addr *addr;
        struct mdns_querydata qdata;
        char addrqryname[ sizeof ("f.f.f.f.f.f.f.f.f.f.f.f.f.f.f.f") + \
                sizeof (".f.f.f.f.f.f.f.f.f.f.f.f.f.f.f.f.ip6.arpa.")];
        nss_XbyY_args_t *argp = (nss_XbyY_args_t *)a;

        (void) memset(&qdata, 0, sizeof (struct mdns_querydata));
        qdata.argp = argp;
        argp->h_errno = 0;

        if ((argp->key.hostaddr.type != AF_INET6) ||
            (argp->key.hostaddr.len != sizeof (*addr)))
                return (NSS_NOTFOUND);

        /* LINTED E_BAD_PTR_CAST_ALIGN */
        addr = (struct in6_addr *)(argp->key.hostaddr.addr);

        if (IN6_IS_ADDR_V4MAPPED(addr)) {
                struct in_addr ipv4addr;

                IN6_V4MAPPED_TO_INADDR(addr, &ipv4addr);
                if (inet_ntop(AF_INET, (void *) &ipv4addr.s_addr,
                (void *)qdata.paddrbuf, sizeof (qdata.paddrbuf)) == NULL)
                                return (NSS_NOTFOUND);
                qdata.af = AF_INET;
                p = (uint8_t *)&ipv4addr.s_addr;
                (void) snprintf(addrqryname, sizeof (addrqryname),
                        "%u.%u.%u.%u.in-addr.arpa.", p[3], p[2], p[1], p[0]);
        } else {
                if (inet_ntop(AF_INET6, (void *)addr,
                        (void *)qdata.paddrbuf,
                        sizeof (qdata.paddrbuf)) == NULL)
                        return (NSS_NOTFOUND);
                qdata.af = AF_INET6;
                chptr = addrqryname;
                for (i = 0; i < 16; i++)
                {
                        ch = ((char *)addr)[15-i];
                        chptr += snprintf(chptr, sizeof (addrqryname)-i*4,
                                        "%X.%X.", ch&0x0f, (ch>>4)&0x0f);
                }
                (void) strlcpy(chptr, "ip6.arpa.", sizeof (addrqryname)-64);
        }

        _nss_mdns_updatecfg(be);
        return (_nss_mdns_querybyaddr(be, addrqryname, qdata.af, &qdata));
}

/*ARGSUSED*/
static nss_status_t
_nss_mdns_getent(be, args)
        mdns_backend_ptr_t      be;
        void                    *args;
{
        return (NSS_UNAVAIL);
}

/*ARGSUSED*/
static nss_status_t
_nss_mdns_setent(be, dummy)
        mdns_backend_ptr_t      be;
        void                    *dummy;
{
        return (NSS_UNAVAIL);
}

/*ARGSUSED*/
static nss_status_t
_nss_mdns_endent(be, dummy)
        mdns_backend_ptr_t      be;
        void                    *dummy;
{
        return (NSS_UNAVAIL);
}

/*ARGSUSED*/
static nss_status_t
_nss_mdns_ipnodes_destr(be, dummy)
        mdns_backend_ptr_t      be;
        void                    *dummy;
{
        _nss_mdns_destr(be);
        return (NSS_SUCCESS);
}

static mdns_backend_op_t ipnodes_ops[] = {
        _nss_mdns_ipnodes_destr,
        _nss_mdns_endent,
        _nss_mdns_setent,
        _nss_mdns_getent,
        getbyname,
        getbyaddr,
};

/*ARGSUSED*/
nss_backend_t *
_nss_mdns_ipnodes_constr(dummy1, dummy2, dummy3)
        const char      *dummy1, *dummy2, *dummy3;
{
        return (_nss_mdns_constr(ipnodes_ops,
                sizeof (ipnodes_ops) / sizeof (ipnodes_ops[0])));
}

/*ARGSUSED*/
nss_status_t
_nss_get_mdns_ipnodes_name(mdns_backend_ptr_t *be, void **bufp, size_t *sizep)
{
        return (_nss_mdns_gethost_withttl(*bufp, *sizep, 1));
}