/*
 * 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.
 */

/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/* All Rights Reserved */


#include <stdio.h>
#include <errno.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>
#include <malloc.h>
#include <assert.h>
#include <sys/stat.h>
#include <pkgstrct.h>
#include <pkginfo.h>
#include <locale.h>
#include <libintl.h>
#include <pkglib.h>
#include <install.h>
#include <libinst.h>
#include <libadm.h>

#define	PINFOALLOC	200

#define	ERR_MEMORY	"memory allocation failure, errno=%d"

int	otherstoo;
char	*useclass;

static int pinfo_handle = -1;

/* Free all allocated package info structures. */
void
pinfo_free(void)
{
	bl_free(pinfo_handle);
}

/*
 * This function manipulates the pinfo entry corresponding to the package
 * indicated on the command line.
 */
struct pinfo *
eptstat(struct cfent *entry, char *pkg, char c)
{
	struct pinfo *pinfo, *last, *me, *myparent;

	otherstoo = 0;
	useclass = entry->pkg_class;

	me = myparent = last = (struct pinfo *)0;

	if (pinfo_handle == -1) {
		pinfo_handle = bl_create(PINFOALLOC, sizeof (struct pinfo),
		    "package data");
	}

	for (pinfo = entry->pinfo; pinfo; pinfo = pinfo->next) {
		if (strcmp(pkg, pinfo->pkg) == 0) {
			if (*pinfo->aclass)
				useclass = pinfo->aclass;
			myparent = last;
			me = pinfo;
		} else
			otherstoo++;
		last = pinfo;
	}

	if (c) {
		/*
		 * use a delete/add strategy to keep package list
		 * ordered by modification time
		 */
		if (me) {
			/* remove from list first */
			if (myparent)
				myparent->next = me->next;
			else
				entry->pinfo = me->next;
			if (me == last)
				last = myparent;
			entry->npkgs--;
			/* leave 'me' around until later! */
		}
		if ((c != STAT_NEXT) && (me || (c != RM_RDY))) {
			/* need to add onto end */
			entry->npkgs++;
			if (me == NULL) {
				/* LINTED pointer cast may result in impro... */
				me = (struct pinfo *)
				    bl_next_avail(pinfo_handle);
				if (me == NULL) {
					progerr(gettext(ERR_MEMORY), errno);
					quit(99);
				}
			} else {
				me->next = (struct pinfo *)NULL;
				if (entry->npkgs == 1) {
					if (me->aclass[0])
						(void) strcpy(entry->pkg_class,
							me->aclass);
					useclass = entry->pkg_class;
				} else
					useclass = me->aclass;
			}
			(void) strncpy(me->pkg, pkg, PKGSIZ);

			/*
			 * Only change status for local objects.  Need
			 * to maintain "shared" status for objects that
			 * are provided from a server.
			 */
			if (me->status != SERVED_FILE)
				me->status = ((c == DUP_ENTRY) ? '\0' : c);

			if (last)
				last->next = me; /* add to end */
			else
				entry->pinfo = me; /* only item */
		} else {
			/* just wanted to remove this package from list */
			if (me) {
				free(me);
				me = (struct pinfo *)0;
			}
		}
	}
	return (me);
}