/*
 * 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));
}