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.
21 #include <sys/cdefs.h>
22 __FBSDID("$FreeBSD: src/usr.sbin/pkg_install/info/show.c,v 1.14.2.14 2003/06/09 16:59:43 lioux Exp $");
28 #include <sys/types.h>
33 show_file(const char *title, const char *fname)
40 printf("%s%s", InfoPrefix, title);
41 fp = fopen(fname, "r");
42 if (fp == (FILE *) NULL)
43 printf("ERROR: show_file: Can't open '%s' for reading!\n", fname);
46 while ((n = fread(line, 1, 1024, fp)) != 0)
47 fwrite(line, 1, n, stdout);
49 append_nl = (line[n - 1] != '\n'); /* Do we have a trailing \n ? */
53 printf("\n"); /* just in case */
57 show_index(const char *title, const char *fname)
60 char line[MAXINDEXSIZE+2];
62 strlcpy(line, "???\n", sizeof(line));
65 printf("%s%s", InfoPrefix, title);
66 fp = fopen(fname, "r");
67 if (fp == (FILE *) NULL) {
68 warnx("show_file: can't open '%s' for reading", fname);
70 if(fgets(line, MAXINDEXSIZE + 1, fp)) {
71 size_t line_length = strlen(line);
73 if (line[line_length - 1] != '\n') { /* Do we have a trailing \n ? */
74 line[line_length] = '\n'; /* Add a trailing \n */
75 line[line_length + 1] = '\0'; /* Terminate string */
83 /* Show a packing list item type. If showall is TRUE, show all */
85 show_plist(const char *title, Package *plist, plist_t type, Boolean showall)
91 printf("%s%s", InfoPrefix, title);
94 if (p->type != type && showall != TRUE) {
101 printf(Quiet ? "%s\n" : "File: %s (ignored)\n", p->name);
105 printf(Quiet ? "%s\n" : "File: %s\n", p->name);
109 printf(Quiet ? "@cwd %s\n" : "\tCWD to %s\n", p->name);
113 printf(Quiet ? "@srcdir %s\n" : "\tSRCDIR to %s\n", p->name);
117 printf(Quiet ? "@exec %s\n" : "\tEXEC '%s'\n", p->name);
121 printf(Quiet ? "@unexec %s\n" : "\tUNEXEC '%s'\n", p->name);
125 printf(Quiet ? "@chmod %s\n" : "\tCHMOD to %s\n",
126 p->name ? p->name : "(clear default)");
130 printf(Quiet ? "@chown %s\n" : "\tCHOWN to %s\n",
131 p->name ? p->name : "(clear default)");
135 printf(Quiet ? "@chgrp %s\n" : "\tCHGRP to %s\n",
136 p->name ? p->name : "(clear default)");
140 printf(Quiet ? "@comment %s\n" : "\tComment: %s\n", p->name);
147 case PLIST_IGNORE_INST:
148 printf(Quiet ? "@ignore_inst ??? doesn't belong here.\n" :
149 "\tIgnore next file installation directive (doesn't belong)\n");
154 printf(Quiet ? "@name %s\n" : "\tPackage name: %s\n", p->name);
158 printf(Quiet ? "@display %s\n" : "\tInstall message file: %s\n", p->name);
162 printf(Quiet ? "@pkgdep %s\n" : "Dependency: %s\n", p->name);
165 case PLIST_DEPORIGIN:
166 printf(Quiet ? "@comment DEPORIGIN:%s\n" :
167 "\tdependency origin: %s\n", p->name);
171 printf(Quiet ? "@mtree %s\n" : "\tPackage mtree file: %s\n", p->name);
175 printf(Quiet ? "@dirrm %s\n" : "\tDeinstall directory remove: %s\n", p->name);
179 printf(Quiet ? "@option %s\n" :
180 "\tOption \"%s\" controlling package installation behaviour\n",
185 printf(Quiet ? "@comment ORIGIN:%s\n" :
186 "\tPackage origin: %s\n", p->name);
191 errx(2, "%s: unknown command type %d (%s)",
192 __func__, p->type, p->name);
199 /* Show all files in the packing list (except ignored ones) */
201 show_files(const char *title, Package *plist)
205 const char *dir = ".";
208 printf("%s%s", InfoPrefix, title);
214 printf("%s/%s\n", dir, p->name);
226 /* Silence GCC in the -Wall mode */
234 /* Calculate and show size of all installed package files (except ignored ones) */
236 show_size(const char *title, Package *plist)
240 const char *dir = ".";
242 char tmp[FILENAME_MAX];
243 unsigned long size = 0;
248 descr = getbsize(&headerlen, &blksize);
250 printf("%s%s", InfoPrefix, title);
251 for (p = plist->head; p != NULL; p = p->next) {
255 snprintf(tmp, FILENAME_MAX, "%s/%s", dir, p->name);
256 if (!lstat(tmp, &sb)) {
259 printf("%lu\t%s\n", (unsigned long) howmany(sb.st_size, blksize), tmp);
273 /* Silence GCC in the -Wall mode */
279 printf("%lu\t(%s)\n", howmany(size, blksize), descr);
281 printf("%lu\n", size);
284 /* Show files that don't match the recorded checksum */
286 show_cksum(const char *title, Package *plist)
289 const char *dir = ".";
290 char tmp[FILENAME_MAX];
293 printf("%s%s", InfoPrefix, title);
295 for (p = plist->head; p != NULL; p = p->next)
296 if (p->type == PLIST_CWD)
298 else if (p->type == PLIST_FILE) {
299 snprintf(tmp, FILENAME_MAX, "%s/%s", dir, p->name);
301 warnx("%s doesn't exist\n", tmp);
302 else if (p->next && p->next->type == PLIST_COMMENT &&
303 (strncmp(p->next->name, "MD5:", 4) == 0)) {
304 char *cp = NULL, buf[33];
307 * For packing lists whose version is 1.1 or greater, the md5
308 * hash for a symlink is calculated on the string returned
311 if (issymlink(tmp) && verscmp(plist, 1, 0) > 0) {
313 char linkbuf[FILENAME_MAX];
315 if ((len = readlink(tmp, linkbuf, FILENAME_MAX)) > 0)
316 cp = MD5Data((unsigned char *)linkbuf, len, buf);
317 } else if (isfile(tmp) || verscmp(plist, 1, 1) < 0)
318 cp = MD5File(tmp, buf);
322 if (strcmp(cp, p->next->name + 4))
323 printf("%s fails the original MD5 checksum\n", tmp);
325 printf("%s matched the original MD5 checksum\n", tmp);
331 /* Show an "origin" path (usually category/portname) */
333 show_origin(const char *title, Package *plist)
337 printf("%s%s", InfoPrefix, title);
338 printf("%s\n", plist->origin != NULL ? plist->origin : "");
341 /* Show revision number of the packing list */
343 show_fmtrev(const char *title, Package *plist)
347 printf("%s%s", InfoPrefix, title);
348 printf("%d.%d\n", plist->fmtver_maj, plist->fmtver_mnr);