2 * FreeBSD install - a package for the installation and maintainance
3 * of non-core utilities.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
17 * Various display routines for the info module.
19 * $FreeBSD: src/usr.sbin/pkg_install/info/show.c,v 1.14.2.14 2003/06/09 16:59:43 lioux Exp $
20 * $DragonFly: src/usr.sbin/pkg_install/info/Attic/show.c,v 1.2 2003/06/17 04:29:59 dillon Exp $
27 #include <sys/types.h>
32 show_file(const char *title, const char *fname)
39 printf("%s%s", InfoPrefix, title);
40 fp = fopen(fname, "r");
41 if (fp == (FILE *) NULL)
42 printf("ERROR: show_file: Can't open '%s' for reading!\n", fname);
45 while ((n = fread(line, 1, 1024, fp)) != 0)
46 fwrite(line, 1, n, stdout);
48 append_nl = (line[n - 1] != '\n'); /* Do we have a trailing \n ? */
52 printf("\n"); /* just in case */
56 show_index(const char *title, const char *fname)
59 char line[MAXINDEXSIZE+2];
61 strlcpy(line, "???\n", sizeof(line));
64 printf("%s%s", InfoPrefix, title);
65 fp = fopen(fname, "r");
66 if (fp == (FILE *) NULL) {
67 warnx("show_file: can't open '%s' for reading", fname);
69 if(fgets(line, MAXINDEXSIZE + 1, fp)) {
70 size_t line_length = strlen(line);
72 if (line[line_length - 1] != '\n') { /* Do we have a trailing \n ? */
73 line[line_length] = '\n'; /* Add a trailing \n */
74 line[line_length + 1] = '\0'; /* Terminate string */
82 /* Show a packing list item type. If showall is TRUE, show all */
84 show_plist(const char *title, Package *plist, plist_t type, Boolean showall)
90 printf("%s%s", InfoPrefix, title);
93 if (p->type != type && showall != TRUE) {
100 printf(Quiet ? "%s\n" : "File: %s (ignored)\n", p->name);
104 printf(Quiet ? "%s\n" : "File: %s\n", p->name);
108 printf(Quiet ? "@cwd %s\n" : "\tCWD to %s\n", p->name);
112 printf(Quiet ? "@srcdir %s\n" : "\tSRCDIR to %s\n", p->name);
116 printf(Quiet ? "@exec %s\n" : "\tEXEC '%s'\n", p->name);
120 printf(Quiet ? "@unexec %s\n" : "\tUNEXEC '%s'\n", p->name);
124 printf(Quiet ? "@chmod %s\n" : "\tCHMOD to %s\n",
125 p->name ? p->name : "(clear default)");
129 printf(Quiet ? "@chown %s\n" : "\tCHOWN to %s\n",
130 p->name ? p->name : "(clear default)");
134 printf(Quiet ? "@chgrp %s\n" : "\tCHGRP to %s\n",
135 p->name ? p->name : "(clear default)");
139 printf(Quiet ? "@comment %s\n" : "\tComment: %s\n", p->name);
146 case PLIST_IGNORE_INST:
147 printf(Quiet ? "@ignore_inst ??? doesn't belong here.\n" :
148 "\tIgnore next file installation directive (doesn't belong)\n");
153 printf(Quiet ? "@name %s\n" : "\tPackage name: %s\n", p->name);
157 printf(Quiet ? "@display %s\n" : "\tInstall message file: %s\n", p->name);
161 printf(Quiet ? "@pkgdep %s\n" : "Dependency: %s\n", p->name);
164 case PLIST_DEPORIGIN:
165 printf(Quiet ? "@comment DEPORIGIN:%s\n" :
166 "\tdependency origin: %s\n", p->name);
170 printf(Quiet ? "@mtree %s\n" : "\tPackage mtree file: %s\n", p->name);
174 printf(Quiet ? "@dirrm %s\n" : "\tDeinstall directory remove: %s\n", p->name);
178 printf(Quiet ? "@option %s\n" :
179 "\tOption \"%s\" controlling package installation behaviour\n",
184 printf(Quiet ? "@comment ORIGIN:%s\n" :
185 "\tPackage origin: %s\n", p->name);
190 errx(2, "%s: unknown command type %d (%s)",
191 __func__, p->type, p->name);
198 /* Show all files in the packing list (except ignored ones) */
200 show_files(const char *title, Package *plist)
204 const char *dir = ".";
207 printf("%s%s", InfoPrefix, title);
213 printf("%s/%s\n", dir, p->name);
225 /* Silence GCC in the -Wall mode */
233 /* Calculate and show size of all installed package files (except ignored ones) */
235 show_size(const char *title, Package *plist)
239 const char *dir = ".";
241 char tmp[FILENAME_MAX];
242 unsigned long size = 0;
247 descr = getbsize(&headerlen, &blksize);
249 printf("%s%s", InfoPrefix, title);
250 for (p = plist->head; p != NULL; p = p->next) {
254 snprintf(tmp, FILENAME_MAX, "%s/%s", dir, p->name);
255 if (!lstat(tmp, &sb)) {
258 printf("%lu\t%s\n", (unsigned long) howmany(sb.st_size, blksize), tmp);
272 /* Silence GCC in the -Wall mode */
278 printf("%lu\t(%s)\n", howmany(size, blksize), descr);
280 printf("%lu\n", size);
283 /* Show files that don't match the recorded checksum */
285 show_cksum(const char *title, Package *plist)
288 const char *dir = ".";
289 char tmp[FILENAME_MAX];
292 printf("%s%s", InfoPrefix, title);
294 for (p = plist->head; p != NULL; p = p->next)
295 if (p->type == PLIST_CWD)
297 else if (p->type == PLIST_FILE) {
298 snprintf(tmp, FILENAME_MAX, "%s/%s", dir, p->name);
300 warnx("%s doesn't exist\n", tmp);
301 else if (p->next && p->next->type == PLIST_COMMENT &&
302 (strncmp(p->next->name, "MD5:", 4) == 0)) {
303 char *cp = NULL, buf[33];
306 * For packing lists whose version is 1.1 or greater, the md5
307 * hash for a symlink is calculated on the string returned
310 if (issymlink(tmp) && verscmp(plist, 1, 0) > 0) {
312 char linkbuf[FILENAME_MAX];
314 if ((len = readlink(tmp, linkbuf, FILENAME_MAX)) > 0)
315 cp = MD5Data((unsigned char *)linkbuf, len, buf);
316 } else if (isfile(tmp) || verscmp(plist, 1, 1) < 0)
317 cp = MD5File(tmp, buf);
321 if (strcmp(cp, p->next->name + 4))
322 printf("%s fails the original MD5 checksum\n", tmp);
324 printf("%s matched the original MD5 checksum\n", tmp);
330 /* Show an "origin" path (usually category/portname) */
332 show_origin(const char *title, Package *plist)
336 printf("%s%s", InfoPrefix, title);
337 printf("%s\n", plist->origin != NULL ? plist->origin : "");
340 /* Show revision number of the packing list */
342 show_fmtrev(const char *title, Package *plist)
346 printf("%s%s", InfoPrefix, title);
347 printf("%d.%d\n", plist->fmtver_maj, plist->fmtver_mnr);