#if !defined(lint) && !defined(LINT)
static char rcsid[] = "$Header: /cvsroot/src/libexec/crond/Attic/user.c,v 1.1.1.1 1993/03/21 09:45:37 cgd Exp $";
#endif

/* vix 26jan87 [log is in RCS file]
 */

/* Copyright 1988,1990 by Paul Vixie
 * All rights reserved
 *
 * Distribute freely, except: don't remove my name from the source or
 * documentation (don't take credit for my work), mark your changes (don't
 * get me blamed for your possible bugs), don't alter or remove this
 * notice.  May be sold if buildable source is provided to buyer.  No
 * warrantee of any kind, express or implied, is included with this
 * software; use at your own risk, responsibility for damages (if any) to
 * anyone resulting from the use of this software rests entirely with the
 * user.
 *
 * Send bug reports, bug fixes, enhancements, requests, flames, etc., and
 * I'll try to keep a version up to date.  I can be reached as follows:
 * Paul Vixie, 329 Noe Street, San Francisco, CA, 94114, (415) 864-7013,
 * paul@vixie.sf.ca.us || {hoptoad,pacbell,decwrl,crash}!vixie!paul
 */


#include "cron.h"


void
free_user(u)
	user	*u;
{
	void	free_entry();
	int	free();
	entry	*e;
	char	**env;

	for (e = u->crontab;  e != NULL;  e = e->next)
		free_entry(e);
	for (env = u->envp;  *env;  env++)
		(void) free(*env);
	(void) free(u->envp);
	(void) free(u);
}


user *
load_user(crontab_fd, name, uid, gid, dir, shell)
	int	crontab_fd;
	char	*name;
	int	uid;
	int	gid;
	char	*dir;
	char	*shell;
{
	char	*malloc(), *sprintf(), **env_init(), **env_set();
	int	load_env();
	entry	*load_entry();

	char	envstr[MAX_ENVSTR];
	FILE	*file;
	user	*u;
	entry	*e;
	int	status;

	if (!(file = fdopen(crontab_fd, "r")))
	{
		perror("fdopen on crontab_fd in load_user");
		return NULL;
	}

	Debug(DPARS, ("load_user()\n"))

	/* file is open.  build user entry, then read the crontab file.
	 */
	u = (user *) malloc(sizeof(user));
	u->uid     = uid;
	u->gid     = gid;
	u->envp    = env_init();
	u->crontab = NULL;

	/*
	 * do auto env settings that the user could reset in the cron tab
	 */
	sprintf(envstr, "SHELL=%s", (*shell) ?shell :"/bin/sh");
	u->envp = env_set(u->envp, envstr);

	sprintf(envstr, "HOME=%s", dir);
	u->envp = env_set(u->envp, envstr);

	/* load the crontab
	 */
	while ((status = load_env(envstr, file)) >= OK)
	{
		if (status == TRUE)
		{
			u->envp = env_set(u->envp, envstr);
		}
		else
		{
			if (NULL != (e = load_entry(file, NULL)))
			{
				e->next = u->crontab;
				u->crontab = e;
			}
		}
	}

	/*
	 * do automatic env settings that should have precedence over any
	 * set in the cron tab.
	 */
	(void) sprintf(envstr, "%s=%s", USERENV, name);
	u->envp = env_set(u->envp, envstr);

	/*
	 * done. close file, return pointer to 'user' structure
	 */
	fclose(file);

	Debug(DPARS, ("...load_user() done\n"))

	return u;
}