/*
 * 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 2006 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#include "mt.h"
#include <stdio.h>
#include <stdlib.h>
#include <limits.h>
#include <sys/types.h>
#include <nss_dbdefs.h>
#include <string.h>
#include <user_attr.h>

/* externs from libc */
extern void _nss_XbyY_fgets(FILE *, nss_XbyY_args_t *);
/* externs from parse.c */
extern char *_strtok_escape(char *, char *, char **);


static int userattr_stayopen;

/*
 * Unsynchronized, but it affects only
 * efficiency, not correctness
 */

static DEFINE_NSS_DB_ROOT(db_root);
static DEFINE_NSS_GETENT(context);


void
_nss_initf_userattr(nss_db_params_t *p)
{
        p->name = NSS_DBNAM_USERATTR;
        p->config_name    = NSS_DBNAM_PASSWD; /* use config for "passwd" */
        p->default_config = NSS_DEFCONF_USERATTR;
}


/*
 * Return values: 0 = success, 1 = parse error, 2 = erange ...
 * The structure pointer passed in is a structure in the caller's space
 * wherein the field pointers would be set to areas in the buffer if
 * need be. instring and buffer should be separate areas.
 */
int
str2userattr(const char *instr, int lenstr, void *ent, char *buffer, int buflen)
{
        char            *last = NULL;
        char            *sep = KV_TOKEN_DELIMIT;
        userstr_t       *user = (userstr_t *)ent;

        if (lenstr >= buflen)
                return (NSS_STR_PARSE_ERANGE);

        if (instr != buffer)
                (void) strncpy(buffer, instr, buflen);

        /*
         * Remove newline that nis (yp_match) puts at the
         * end of the entry it retrieves from the map.
         */
        if (buffer[lenstr] == '\n') {
                buffer[lenstr] = '\0';
        }

        /* quick exit do not entry fill if not needed */
        if (ent == (void *)NULL)
                return (NSS_STR_PARSE_SUCCESS);

        user->name = _strtok_escape(buffer, sep, &last);
        user->qualifier = _strtok_escape(NULL, sep, &last);
        user->res1 = _strtok_escape(NULL, sep, &last);
        user->res2 = _strtok_escape(NULL, sep, &last);
        user->attr = _strtok_escape(NULL, sep, &last);

        return (0);
}


void
_setuserattr(void)
{
        userattr_stayopen = 0;
        nss_setent(&db_root, _nss_initf_userattr, &context);
}


void
_enduserattr(void)
{
        userattr_stayopen = 0;
        nss_endent(&db_root, _nss_initf_userattr, &context);
        nss_delete(&db_root);
}


userstr_t *
_getuserattr(userstr_t *result, char *buffer, int buflen, int *h_errnop)
{
        nss_XbyY_args_t arg;
        nss_status_t    res;

        NSS_XbyY_INIT(&arg, result, buffer, buflen, str2userattr);
        res = nss_getent(&db_root, _nss_initf_userattr, &context, &arg);
        arg.status = res;
        *h_errnop = arg.h_errno;
        return ((userstr_t *)NSS_XbyY_FINI(&arg));
}


userstr_t *
_fgetuserattr(FILE *f, userstr_t *result, char *buffer, int buflen)
{
        nss_XbyY_args_t arg;

        NSS_XbyY_INIT(&arg, result, buffer, buflen, str2userattr);
        _nss_XbyY_fgets(f, &arg);
        return ((userstr_t *)NSS_XbyY_FINI(&arg));
}



userstr_t *
_getusernam(const char *name, userstr_t *result, char *buffer, int buflen,
    int *errnop)
{
        nss_XbyY_args_t arg;
        nss_status_t    res;

        NSS_XbyY_INIT(&arg, result, buffer, buflen, str2userattr);
        arg.key.name = name;
        arg.stayopen = userattr_stayopen;
        res = nss_search(&db_root, _nss_initf_userattr,
            NSS_DBOP_USERATTR_BYNAME, &arg);
        arg.status = res;
        *errnop = arg.h_errno;
        return ((userstr_t *)NSS_XbyY_FINI(&arg));
}