* Copyright (c) 1990 The Regents of the University of California.
* This code is derived from software contributed to Berkeley by
* Hugh Smith at The University of Guelph.
* %sccs.include.redist.c%
static char sccsid
[] = "@(#)print.c 5.6 (Berkeley) %G%";
extern CHDR chdr
; /* converted header */
extern char *archive
; /* archive name */
* Prints archive members on stdout - if member names given only
* print those members, otherwise print all members.
afd
= open_archive(O_RDONLY
);
/* Read from an archive, write to stdout; pad on read. */
SETCF(afd
, archive
, STDOUT_FILENO
, "stdout", RPAD
);
for (all
= !*argv
; get_arobj(afd
);) {
else if (!(file
= files(argv
))) {
(void)printf("\n<%s>\n\n", file
);