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

#include <project.h>
#include "ldap_common.h"

/* Project attributes filters */
#define	_PROJ_NAME	"SolarisProjectName"
#define	_PROJ_PROJID	"SolarisProjectID"
#define	_PROJ_DESCR	"description"
#define	_PROJ_USERS	"memberUid"
#define	_PROJ_GROUPS	"memberGid"
#define	_PROJ_ATTR	"SolarisProjectAttr"

#define	_F_GETPROJNAME	"(&(objectClass=SolarisProject)(SolarisProjectName=%s))"
#define	_F_GETPROJID	"(&(objectClass=SolarisProject)(SolarisProjectID=%ld))"

static const char *project_attrs[] = {
	_PROJ_NAME,
	_PROJ_PROJID,
	_PROJ_DESCR,
	_PROJ_USERS,
	_PROJ_GROUPS,
	_PROJ_ATTR,
	(char *)NULL
};

/*
 * _nss_ldap_proj2str is the data marshalling method for the project getXbyY
 * (getprojbyname, getprojbyid, getprojent) backend processes. This method
 * is called after a successful ldap search has been performed. This method
 * will parse the ldap search values into the file format.
 * e.g.
 *
 * system:0:System:::
 *
 * beatles:100:The Beatles:john,paul,george,ringo::task.max-lwps=
 * 	(privileged,100,signal=SIGTERM),(privileged,110,deny)
 *
 * (All in one line)
 */
static int
_nss_ldap_proj2str(ldap_backend_ptr be, nss_XbyY_args_t *argp)
{
	int			i;
	int			nss_result;
	int			buflen = 0, len;
	int			firsttime;
	char			*buffer, *comment, *attr_str;
	ns_ldap_result_t	*result = be->result;
	char			**name, **id, **descr, **attr;
	ns_ldap_attr_t		*users, *groups;

	if (result == NULL)
		return (NSS_STR_PARSE_PARSE);
	buflen = argp->buf.buflen;

	if (argp->buf.result != NULL) {
		/* In all cases it must be deallocated by caller */
		if ((be->buffer = calloc(1, buflen)) == NULL) {
			nss_result = NSS_STR_PARSE_PARSE;
			goto result_proj2str;
		}
		buffer = be->buffer;
	} else
		buffer = argp->buf.buffer;

	nss_result = NSS_STR_PARSE_SUCCESS;
	(void) memset(buffer, 0, buflen);

	name = __ns_ldap_getAttr(result->entry, _PROJ_NAME);
	if (name == NULL || name[0] == NULL || (strlen(name[0]) < 1)) {
		nss_result = NSS_STR_PARSE_PARSE;
		goto result_proj2str;
	}
	id = __ns_ldap_getAttr(result->entry, _PROJ_PROJID);
	if (id == NULL || id[0] == NULL || (strlen(id[0]) < 1)) {
		nss_result = NSS_STR_PARSE_PARSE;
		goto result_proj2str;
	}
	descr = __ns_ldap_getAttr(result->entry, _PROJ_DESCR);
	if (descr == NULL || descr[0] == NULL || (strlen(descr[0]) < 1))
		comment = _NO_VALUE;
	else
		comment = descr[0];
	len = snprintf(buffer, buflen, "%s:%s:%s:", name[0], id[0],
	    comment);
	TEST_AND_ADJUST(len, buffer, buflen, result_proj2str);

	users = __ns_ldap_getAttrStruct(result->entry, _PROJ_USERS);
	if (!(users == NULL || users->attrvalue == NULL)) {
		firsttime = 1;
		for (i = 0; i < users->value_count; i++) {
			if (users->attrvalue[i] == NULL) {
				nss_result = NSS_STR_PARSE_PARSE;
				goto result_proj2str;
			}
			if (firsttime) {
				len = snprintf(buffer, buflen, "%s",
				    users->attrvalue[i]);
				firsttime = 0;
			} else {
				len = snprintf(buffer, buflen, ",%s",
				    users->attrvalue[i]);
			}
			TEST_AND_ADJUST(len, buffer, buflen, result_proj2str);
		}
	}
	len = snprintf(buffer, buflen, ":");
	TEST_AND_ADJUST(len, buffer, buflen, result_proj2str);

	groups = __ns_ldap_getAttrStruct(result->entry, _PROJ_GROUPS);
	if (!(groups == NULL || groups->attrvalue == NULL)) {
		firsttime = 1;
		for (i = 0; i < groups->value_count; i++) {
			if (groups->attrvalue[i] == NULL) {
				nss_result = NSS_STR_PARSE_PARSE;
				goto result_proj2str;
			}
			if (firsttime) {
				len = snprintf(buffer, buflen, "%s",
				    groups->attrvalue[i]);
				firsttime = 0;
			} else {
				len = snprintf(buffer, buflen, ",%s",
				    groups->attrvalue[i]);
			}
			TEST_AND_ADJUST(len, buffer, buflen, result_proj2str);
		}
	}

	attr = __ns_ldap_getAttr(result->entry, _PROJ_ATTR);
	if (attr == NULL || attr[0] == NULL || (strlen(attr[0]) < 1))
		attr_str = _NO_VALUE;

	else
		attr_str = attr[0];
	len = snprintf(buffer, buflen, ":%s", attr_str);
	TEST_AND_ADJUST(len, buffer, buflen, result_proj2str);

	/* The front end marshaller doesn't need the trailing nulls */
	if (argp->buf.result != NULL)
		be->buflen = strlen(be->buffer);
result_proj2str:
	(void) __ns_ldap_freeResult(&be->result);
	return ((int)nss_result);
}


/*
 * getbyname gets a project entry by name. This function constructs an ldap
 * search filter using the name invocation parameter and the getprojname search
 * filter defined. Once the filter is constructed, we search for a matching
 * entry and marshal the data results into struct project for the frontend
 * process. The function _nss_ldap_proj2ent performs the data marshaling.
 */
static nss_status_t
getbyname(ldap_backend_ptr be, void *a)
{
	nss_XbyY_args_t	*argp = (nss_XbyY_args_t *)a;
	char searchfilter[SEARCHFILTERLEN];

	if (snprintf(searchfilter, SEARCHFILTERLEN,
	    _F_GETPROJNAME, argp->key.name) < 0)
		return (NSS_NOTFOUND);
	return (_nss_ldap_lookup(be, argp, _PROJECT, searchfilter, NULL, NULL,
	    NULL));
}


/*
 * getbyprojid gets a project entry by number. This function constructs an ldap
 * search filter using the name invocation parameter and the getprojid search
 * filter defined. Once the filter is constructed, we search for a matching
 * entry and marshal the data results into struct project for the frontend
 * process. The function _nss_ldap_proj2ent performs the data marshaling.
 */
static nss_status_t
getbyprojid(ldap_backend_ptr be, void *a)
{
	nss_XbyY_args_t	*argp = (nss_XbyY_args_t *)a;
	char searchfilter[SEARCHFILTERLEN];

	if (snprintf(searchfilter, SEARCHFILTERLEN, _F_GETPROJID,
	    (long)argp->key.projid) < 0)
		return (NSS_NOTFOUND);
	return (_nss_ldap_lookup(be, argp, _PROJECT, searchfilter, NULL, NULL,
	    NULL));
}

static ldap_backend_op_t project_ops[] = {
	_nss_ldap_destr,
	_nss_ldap_endent,
	_nss_ldap_setent,
	_nss_ldap_getent,
	getbyname,
	getbyprojid
};


/*ARGSUSED0*/
nss_backend_t *
_nss_ldap_project_constr(const char *dummy1, const char *dummy2,
    const char *dummy3)
{
	return (_nss_ldap_constr(project_ops,
	    sizeof (project_ops) / sizeof (project_ops[0]),
	    _PROJECT, project_attrs, _nss_ldap_proj2str));
}