putcfile.c revision 4656d4747c8743290bfbe910c64cd75eb4e4af8d
/*
* 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 2009 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 <string.h>
#include <limits.h>
#include <sys/types.h>
#include "pkgstrct.h"
#include "pkglib.h"
/*
* Name: putcfile
* Description: Write contents file entry to specified FILE
* Arguments: struct cfent a_ept - data for contents file entry
* FILE *a_fp - FP of file to write contents file entry to
* Notes: This is identical to putcvfpfile() but this function takes a
* stdio FILE* file to write to instead of a VFP_T file. It is
* MUCH slower than putcvfpfile().
*/
int
putcfile(struct cfent *a_ept, FILE *a_fp)
{
struct pinfo *pinfo;
if (a_ept->ftype == 'i') {
return (0); /* no ifiles stored in contents DB */
}
if (a_ept->path == NULL) {
return (-1); /* no path name - no entry to write */
}
if (fputs(a_ept->path, a_fp) == EOF) {
return (-1);
}
if (a_ept->ainfo.local) {
if (putc('=', a_fp) == EOF) {
return (-1);
}
if (fputs(a_ept->ainfo.local, a_fp) == EOF)
return (-1);
}
if (a_ept->volno) {
if (fprintf(a_fp, " %d", a_ept->volno) < 0) {
return (-1);
}
}
if (putc(' ', a_fp) == EOF) {
return (-1);
}
if (putc(a_ept->ftype, a_fp) == EOF) {
return (-1);
}
if (putc(' ', a_fp) == EOF) {
return (-1);
}
if (fputs(a_ept->pkg_class, a_fp) == EOF) {
return (-1);
}
if ((a_ept->ftype == 'c') || (a_ept->ftype == 'b')) {
if (a_ept->ainfo.major == BADMAJOR) {
if (putc(' ', a_fp) == EOF) {
return (-1);
}
if (putc('?', a_fp) == EOF) {
return (-1);
}
} else {
if (fprintf(a_fp, " %ld", a_ept->ainfo.major) < 0)
return (-1);
}
if (a_ept->ainfo.minor == BADMINOR) {
if (putc(' ', a_fp) == EOF) {
return (-1);
}
if (putc('?', a_fp) == EOF) {
return (-1);
}
} else {
if (fprintf(a_fp, " %ld", a_ept->ainfo.minor) < 0)
return (-1);
}
}
if ((a_ept->ftype == 'd') || (a_ept->ftype == 'x') ||
(a_ept->ftype == 'c') || (a_ept->ftype == 'b') ||
(a_ept->ftype == 'p') || (a_ept->ftype == 'f') ||
(a_ept->ftype == 'v') || (a_ept->ftype == 'e')) {
if (fprintf(a_fp,
((a_ept->ainfo.mode == BADMODE) ? " ?" : " %04o"),
a_ept->ainfo.mode) < 0)
return (-1);
if (putc(' ', a_fp) == EOF) {
return (-1);
}
if (fputs(a_ept->ainfo.owner, a_fp) == EOF) {
return (-1);
}
if (putc(' ', a_fp) == EOF) {
return (-1);
}
if (fputs(a_ept->ainfo.group, a_fp) == EOF) {
return (-1);
}
}
if ((a_ept->ftype == 'f') || (a_ept->ftype == 'v') ||
(a_ept->ftype == 'e')) {
if (fprintf(a_fp,
((a_ept->cinfo.size == BADCONT) ? " ?" : " %llu"),
a_ept->cinfo.size) < 0)
return (-1);
if (fprintf(a_fp,
((a_ept->cinfo.cksum == BADCONT) ? " ?" : " %ld"),
a_ept->cinfo.cksum) < 0)
return (-1);
if (fprintf(a_fp,
((a_ept->cinfo.modtime == BADCONT) ? " ?" : " %ld"),
a_ept->cinfo.modtime) < 0)
return (-1);
}
pinfo = a_ept->pinfo;
while (pinfo) {
if (putc(' ', a_fp) == EOF) {
return (-1);
}
if (pinfo->status) {
if (fputc(pinfo->status, a_fp) == EOF) {
return (-1);
}
}
if (fputs(pinfo->pkg, a_fp) == EOF) {
return (-1);
}
if (pinfo->editflag) {
if (putc('\\', a_fp) == EOF) {
return (-1);
}
}
if (pinfo->aclass[0]) {
if (putc(':', a_fp) == EOF) {
return (-1);
}
if (fputs(pinfo->aclass, a_fp) == EOF) {
return (-1);
}
}
pinfo = pinfo->next;
}
if (putc('\n', a_fp) == EOF) {
return (-1);
}
return (0);
}
/*
* Name: putcvfpfile
* Description: Write contents file entry to specified VFP
* Arguments: struct cfent a_ept - data for contents file entry
* VFP_T *a_vfp - VFP of file to write contents file entry to
* Notes: This is identical to putcfile() but this function takes a
* VFP_T file to write to instead of a stdio FILE file. It is
* MUCH faster tha putcfile().
*/
int
putcvfpfile(struct cfent *a_ept, VFP_T *a_vfp)
{
struct pinfo *pinfo;
/* contents file does not maintain any 'i' file entries */
if (a_ept->ftype == 'i') {
return (0);
}
/* cannot create an entry if it has no file name */
if (a_ept->path == NULL) {
return (-1);
}
/*
* Format of contents file line could be one of:
* /file=./dir/file s class SUNWxxx
* /file=../dir/file l class SUNWxxx
* /dir d class mode owner group SUNWxxx SUNWyyy
* /devices/name c class major minor mode owner group SUNWxxx
* /file f class mode owner group size cksum modtime SUNWxxx
* /file x class mode owner group SUNWppro
* /file v class mode owner group size cksum modtime SUNWxxx
* /file e class mode owner group size cksum modtime SUNWxxx
* The package name could be prefixed by one of the following
* status indicators: +-*!%@#~
*/
/*
* Adding an entry to the specified VFP. During normal processing the
* contents file is copied to a temporary contents file and entries are
* added as appropriate. When this processing is completed, a decision
* is made on whether or not to overwrite the real contents file with
* the contents of the temporary contents file. If the temporary
* contents file is just a copy of the real contents file then there is
* no need to overwrite the real contents file with the contents of the
* temporary contents file. This decision is made in part on whether
* or not any new or modified entries have been added to the temporary
* contents file. Set the "data is modified" indication associated
* with this VFP so that the real contents file is overwritten when
* processing is done.
*/
(void) vfpSetModified(a_vfp);
/* write initial path [all entries] */
vfpPuts(a_vfp, a_ept->path);
/* if link, write out '=' portion */
if (a_ept->ainfo.local) {
vfpPutc(a_vfp, '=');
vfpPuts(a_vfp, a_ept->ainfo.local);
}
/* if volume, write it out */
if (a_ept->volno) {
vfpPutc(a_vfp, ' ');
vfpPutInteger(a_vfp, a_ept->volno);
}
/* write out <space><entry type><space>class> */
vfpPutc(a_vfp, ' ');
vfpPutc(a_vfp, a_ept->ftype);
vfpPutc(a_vfp, ' ');
vfpPuts(a_vfp, a_ept->pkg_class);
/* if char/block device, write out major/minor numbers */
if ((a_ept->ftype == 'c') || (a_ept->ftype == 'b')) {
/* major device number */
if (a_ept->ainfo.major == BADMAJOR) {
vfpPutc(a_vfp, ' ');
vfpPutc(a_vfp, '?');
} else {
vfpPutc(a_vfp, ' ');
vfpPutInteger(a_vfp, a_ept->ainfo.major);
}
/* minor device number */
if (a_ept->ainfo.minor == BADMINOR) {
vfpPutc(a_vfp, ' ');
vfpPutc(a_vfp, '?');
} else {
vfpPutc(a_vfp, ' ');
vfpPutInteger(a_vfp, a_ept->ainfo.minor);
}
}
/* if dxcbpfve, write out mode, owner, group */
if ((a_ept->ftype == 'd') || (a_ept->ftype == 'x') ||
(a_ept->ftype == 'c') || (a_ept->ftype == 'b') ||
(a_ept->ftype == 'p') || (a_ept->ftype == 'f') ||
(a_ept->ftype == 'v') || (a_ept->ftype == 'e')) {
/* mode */
vfpPutFormat(a_vfp,
((a_ept->ainfo.mode == BADMODE) ? " ?" : " %04o"),
a_ept->ainfo.mode);
/* owner */
vfpPutc(a_vfp, ' ');
vfpPuts(a_vfp, a_ept->ainfo.owner);
/* group */
vfpPutc(a_vfp, ' ');
vfpPuts(a_vfp, a_ept->ainfo.group);
}
/* if f/v/e, write out size, cksum, modtime */
if ((a_ept->ftype == 'f') || (a_ept->ftype == 'v') ||
(a_ept->ftype == 'e')) {
/* size */
vfpPutFormat(a_vfp,
((a_ept->cinfo.size == BADCONT) ? " ?" : " %llu"),
a_ept->cinfo.size);
/* cksum */
vfpPutFormat(a_vfp,
((a_ept->cinfo.cksum == BADCONT) ? " ?" : " %ld"),
a_ept->cinfo.cksum);
/* modtime */
vfpPutFormat(a_vfp,
((a_ept->cinfo.modtime == BADCONT) ? " ?" : " %ld"),
a_ept->cinfo.modtime);
}
/* write out list of all packages referencing this entry */
pinfo = a_ept->pinfo;
while (pinfo) {
vfpPutc(a_vfp, ' ');
if (pinfo->status) {
vfpPutc(a_vfp, pinfo->status);
}
vfpPuts(a_vfp, pinfo->pkg);
if (pinfo->editflag) {
vfpPutc(a_vfp, '\\');
}
if (pinfo->aclass[0]) {
vfpPutc(a_vfp, ':');
vfpPuts(a_vfp, pinfo->aclass);
}
pinfo = pinfo->next;
}
vfpPutc(a_vfp, '\n');
return (0);
}