svr4pkg/libinst/eptstat.c

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