15c51f124SMoriah Waterland /* 25c51f124SMoriah Waterland * CDDL HEADER START 35c51f124SMoriah Waterland * 45c51f124SMoriah Waterland * The contents of this file are subject to the terms of the 55c51f124SMoriah Waterland * Common Development and Distribution License (the "License"). 65c51f124SMoriah Waterland * You may not use this file except in compliance with the License. 75c51f124SMoriah Waterland * 85c51f124SMoriah Waterland * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 95c51f124SMoriah Waterland * or http://www.opensolaris.org/os/licensing. 105c51f124SMoriah Waterland * See the License for the specific language governing permissions 115c51f124SMoriah Waterland * and limitations under the License. 125c51f124SMoriah Waterland * 135c51f124SMoriah Waterland * When distributing Covered Code, include this CDDL HEADER in each 145c51f124SMoriah Waterland * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 155c51f124SMoriah Waterland * If applicable, add the following below this CDDL HEADER, with the 165c51f124SMoriah Waterland * fields enclosed by brackets "[]" replaced with your own identifying 175c51f124SMoriah Waterland * information: Portions Copyright [yyyy] [name of copyright owner] 185c51f124SMoriah Waterland * 195c51f124SMoriah Waterland * CDDL HEADER END 205c51f124SMoriah Waterland */ 215c51f124SMoriah Waterland 22*32991bedSPeter Tribble /* 23*32991bedSPeter Tribble * Copyright (c) 2017 Peter Tribble. 24*32991bedSPeter Tribble */ 25*32991bedSPeter Tribble 265c51f124SMoriah Waterland /* 275c51f124SMoriah Waterland * Copyright 2009 Sun Microsystems, Inc. All rights reserved. 285c51f124SMoriah Waterland * Use is subject to license terms. 295c51f124SMoriah Waterland */ 305c51f124SMoriah Waterland 315c51f124SMoriah Waterland /* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */ 325c51f124SMoriah Waterland /* All Rights Reserved */ 335c51f124SMoriah Waterland 345c51f124SMoriah Waterland 355c51f124SMoriah Waterland #include <stdio.h> 365c51f124SMoriah Waterland #include <limits.h> 375c51f124SMoriah Waterland #include <unistd.h> 385c51f124SMoriah Waterland #include <stdlib.h> 395c51f124SMoriah Waterland #include <string.h> 405c51f124SMoriah Waterland #include <ctype.h> 415c51f124SMoriah Waterland #include <dirent.h> 425c51f124SMoriah Waterland #include <sys/stat.h> 435c51f124SMoriah Waterland #include <pkginfo.h> 445c51f124SMoriah Waterland #include <pkglocs.h> 455c51f124SMoriah Waterland #include <sys/types.h> 465c51f124SMoriah Waterland #include <pkgstrct.h> 475c51f124SMoriah Waterland #include <pkgtrans.h> 485c51f124SMoriah Waterland #include <locale.h> 495c51f124SMoriah Waterland #include <libintl.h> 505c51f124SMoriah Waterland #include <pkglib.h> 515c51f124SMoriah Waterland #include <libadm.h> 525c51f124SMoriah Waterland #include <libinst.h> 535c51f124SMoriah Waterland 545c51f124SMoriah Waterland #define MAXPATHS 1024 555c51f124SMoriah Waterland 565c51f124SMoriah Waterland #define MSG_CHK_STRM "Checking uninstalled stream format package " \ 575c51f124SMoriah Waterland "<%s> from <%s>\n" 585c51f124SMoriah Waterland #define MSG_CHK_DIR "Checking uninstalled directory format package " \ 595c51f124SMoriah Waterland "<%s> from <%s>\n" 605c51f124SMoriah Waterland #define MSG_NOTROOT "NOTE: \"root\" permission may be required to " \ 615c51f124SMoriah Waterland "validate all objects in the client filesystem." 625c51f124SMoriah Waterland #define MSG_CONT "Continuing." 635c51f124SMoriah Waterland 645c51f124SMoriah Waterland #define WRN_F_SPOOL "WARNING: %s is spooled. Ignoring \"f\" argument" 655c51f124SMoriah Waterland 665c51f124SMoriah Waterland #define ERR_ROOT_SET "Could not set install root from the environment." 675c51f124SMoriah Waterland #define ERR_ROOT_CMD "Command line install root contends with environment." 685c51f124SMoriah Waterland #define ERR_IOPEN "unable to open input file <%s>" 695c51f124SMoriah Waterland #define ERR_IEMPTY "no pathnames in file specified by -i option" 705c51f124SMoriah Waterland #define ERR_POPTION "no pathname included with -p option" 715c51f124SMoriah Waterland #define ERR_PARTIAL_POPTION "no pathname included with -P option" 725c51f124SMoriah Waterland #define ERR_MAXPATHS "too many pathnames in option list (limit is %d)" 735c51f124SMoriah Waterland #define ERR_NOTROOT "You must be \"root\" for \"%s -f\" to" \ 745c51f124SMoriah Waterland "execute properly." 755c51f124SMoriah Waterland #define ERR_SEL_PKG "No packages selected for verification." 765c51f124SMoriah Waterland #define ERR_CAT_LNGTH "The category argument exceeds the SVr4 ABI\n" \ 775c51f124SMoriah Waterland " defined maximum supported length of 16 characters." 785c51f124SMoriah Waterland #define ERR_CAT_FND "Category argument <%s> cannot be found." 795c51f124SMoriah Waterland #define ERR_CAT_INV "Category argument <%s> is invalid." 805c51f124SMoriah Waterland #define ERR_TOO_MANY "too many pathnames in list, limit is %d" 815c51f124SMoriah Waterland #define ERR_PATHS_INVALID "Pathnames in %s are not valid." 825c51f124SMoriah Waterland #define ERR_MKDIR "unable to make directory <%s>" 835c51f124SMoriah Waterland #define ERR_USAGE "usage:\n" \ 845c51f124SMoriah Waterland "\t%s [-l|vqacnxf] [-R rootdir] [-p path[, ...] | " \ 855c51f124SMoriah Waterland "-P path[, ...]]\n" \ 865c51f124SMoriah Waterland "\t\t[-i file] [options]\n" \ 875c51f124SMoriah Waterland "\t%s -d device [-f][-l|v] [-p path[, ...] | " \ 885c51f124SMoriah Waterland "-P path[, ...]]\n" \ 895c51f124SMoriah Waterland "\t\t[-V ...] [-M] [-i file] [-Y category[, ...] | " \ 905c51f124SMoriah Waterland "pkginst [...]]\n" \ 915c51f124SMoriah Waterland "\twhere options may include ONE of the " \ 925c51f124SMoriah Waterland "following:\n " \ 935c51f124SMoriah Waterland "\t\t-m pkgmap [-e envfile]\n" \ 945c51f124SMoriah Waterland "\t\tpkginst [...]\n" \ 955c51f124SMoriah Waterland "\t\t-Y category[, ...]\n" 965c51f124SMoriah Waterland 975c51f124SMoriah Waterland #define LINK 1 985c51f124SMoriah Waterland 995c51f124SMoriah Waterland char **pkg = NULL; 1005c51f124SMoriah Waterland int pkgcnt = 0; 1015c51f124SMoriah Waterland char *basedir; 1025c51f124SMoriah Waterland char *pathlist[MAXPATHS], *ppathlist[MAXPATHS], pkgspool[PATH_MAX]; 1035c51f124SMoriah Waterland short used[MAXPATHS]; 1045c51f124SMoriah Waterland short npaths; 1055c51f124SMoriah Waterland struct cfent **eptlist; 1065c51f124SMoriah Waterland 1075c51f124SMoriah Waterland int aflag = (-1); 1085c51f124SMoriah Waterland int cflag = (-1); 1095c51f124SMoriah Waterland int vflag = 0; 1105c51f124SMoriah Waterland int nflag = 0; 1115c51f124SMoriah Waterland int lflag = 0; 1125c51f124SMoriah Waterland int Lflag = 0; 1135c51f124SMoriah Waterland int fflag = 0; 1145c51f124SMoriah Waterland int xflag = 0; 1155c51f124SMoriah Waterland int qflag = 0; 1165c51f124SMoriah Waterland int Rflag = 0; 1175c51f124SMoriah Waterland int dflag = 0; 1185c51f124SMoriah Waterland char *device; 1195c51f124SMoriah Waterland 1205c51f124SMoriah Waterland char *uniTmp; 1215c51f124SMoriah Waterland 1225c51f124SMoriah Waterland static char *mapfile, 1235c51f124SMoriah Waterland *spooldir, 1245c51f124SMoriah Waterland *tmpdir, 1255c51f124SMoriah Waterland *envfile; 1265c51f124SMoriah Waterland static int errflg = 0; 1275c51f124SMoriah Waterland static int map_client = 1; 1285c51f124SMoriah Waterland 1295c51f124SMoriah Waterland void quit(int); 1305c51f124SMoriah Waterland static void setpathlist(char *); 1315c51f124SMoriah Waterland static void usage(void); 1325c51f124SMoriah Waterland 1335c51f124SMoriah Waterland extern char **environ; 1345c51f124SMoriah Waterland extern char *pkgdir; 1355c51f124SMoriah Waterland 1365c51f124SMoriah Waterland /* checkmap.c */ 1375c51f124SMoriah Waterland extern int checkmap(int, int, char *, char *, char *, char *, int); 1385c51f124SMoriah Waterland /* scriptvfy.c */ 1395c51f124SMoriah Waterland extern int checkscripts(char *inst_dir, int silent); 1405c51f124SMoriah Waterland 1415c51f124SMoriah Waterland int 1425c51f124SMoriah Waterland main(int argc, char *argv[]) 1435c51f124SMoriah Waterland { 1445c51f124SMoriah Waterland int pkgfmt = 0; /* Makes more sense as a pointer, but */ 1455c51f124SMoriah Waterland /* 18N is compromised. */ 1465c51f124SMoriah Waterland char file[PATH_MAX+1], 1475c51f124SMoriah Waterland *abi_sym_ptr, 1485c51f124SMoriah Waterland *vfstab_file = NULL; 1495c51f124SMoriah Waterland char *all_pkgs[4] = {"all", NULL}; 1505c51f124SMoriah Waterland char **category = NULL; 1515c51f124SMoriah Waterland char *catg_arg = NULL; 1525c51f124SMoriah Waterland int c; 1535c51f124SMoriah Waterland int n = 0; 1545c51f124SMoriah Waterland char *prog, 1555c51f124SMoriah Waterland *Rvalue, 1565c51f124SMoriah Waterland *dvalue; 1575c51f124SMoriah Waterland int dbcreate = 0; 1585c51f124SMoriah Waterland int pathtype; 1595c51f124SMoriah Waterland 1605c51f124SMoriah Waterland /* initialize locale mechanism */ 1615c51f124SMoriah Waterland 1625c51f124SMoriah Waterland (void) setlocale(LC_ALL, ""); 1635c51f124SMoriah Waterland 1645c51f124SMoriah Waterland #if !defined(TEXT_DOMAIN) /* Should be defined by cc -D */ 1655c51f124SMoriah Waterland #define TEXT_DOMAIN "SYS_TEST" 1665c51f124SMoriah Waterland #endif 1675c51f124SMoriah Waterland (void) textdomain(TEXT_DOMAIN); 1685c51f124SMoriah Waterland 1695c51f124SMoriah Waterland /* determine program name */ 1705c51f124SMoriah Waterland 1715c51f124SMoriah Waterland prog = set_prog_name(argv[0]); 1725c51f124SMoriah Waterland 1735c51f124SMoriah Waterland /* establish installation root directory */ 1745c51f124SMoriah Waterland 1755c51f124SMoriah Waterland if (!set_inst_root(getenv("PKG_INSTALL_ROOT"))) { 1765c51f124SMoriah Waterland progerr(gettext(ERR_ROOT_SET)); 1775c51f124SMoriah Waterland quit(1); 1785c51f124SMoriah Waterland } 1795c51f124SMoriah Waterland 1805c51f124SMoriah Waterland /* check if not ABI compliant mode */ 1815c51f124SMoriah Waterland abi_sym_ptr = getenv("PKG_NONABI_SYMLINKS"); 1825c51f124SMoriah Waterland if (abi_sym_ptr && strncasecmp(abi_sym_ptr, "TRUE", 4) == 0) { 1835c51f124SMoriah Waterland set_nonABI_symlinks(); 1845c51f124SMoriah Waterland } 1855c51f124SMoriah Waterland 1865c51f124SMoriah Waterland /* bugId 4012147 */ 1875c51f124SMoriah Waterland if ((uniTmp = getenv("PKG_NO_UNIFIED")) != NULL) 1885c51f124SMoriah Waterland map_client = 0; 1895c51f124SMoriah Waterland 1905c51f124SMoriah Waterland while ((c = getopt(argc, argv, "Y:R:e:p:d:nLli:vaV:Mm:cqxfQP:?")) 1915c51f124SMoriah Waterland != EOF) { 1925c51f124SMoriah Waterland switch (c) { 1935c51f124SMoriah Waterland case 'p': 1945c51f124SMoriah Waterland pathlist[npaths] = strtok(optarg, " , "); 1955c51f124SMoriah Waterland if (pathlist[npaths++] == NULL) { 1965c51f124SMoriah Waterland progerr(gettext(ERR_POPTION)); 1975c51f124SMoriah Waterland quit(1); 1985c51f124SMoriah Waterland } 1995c51f124SMoriah Waterland while (pathlist[npaths] = strtok(NULL, " , ")) { 2005c51f124SMoriah Waterland if (npaths++ >= MAXPATHS) { 2015c51f124SMoriah Waterland progerr(gettext(ERR_MAXPATHS), 2025c51f124SMoriah Waterland MAXPATHS); 2035c51f124SMoriah Waterland quit(1); 2045c51f124SMoriah Waterland } 2055c51f124SMoriah Waterland } 2065c51f124SMoriah Waterland break; 2075c51f124SMoriah Waterland 2085c51f124SMoriah Waterland case 'd': 2095c51f124SMoriah Waterland dvalue = optarg; 2105c51f124SMoriah Waterland dflag = 1; 2115c51f124SMoriah Waterland break; 2125c51f124SMoriah Waterland 2135c51f124SMoriah Waterland case 'n': 2145c51f124SMoriah Waterland nflag++; 2155c51f124SMoriah Waterland break; 2165c51f124SMoriah Waterland 2175c51f124SMoriah Waterland case 'M': 2185c51f124SMoriah Waterland map_client = 0; 2195c51f124SMoriah Waterland break; 2205c51f124SMoriah Waterland 2215c51f124SMoriah Waterland /* 2225c51f124SMoriah Waterland * Allow admin to establish the client filesystem using a 2235c51f124SMoriah Waterland * vfstab-like file of stable format. 2245c51f124SMoriah Waterland */ 2255c51f124SMoriah Waterland case 'V': 2265c51f124SMoriah Waterland vfstab_file = flex_device(optarg, 2); 2275c51f124SMoriah Waterland map_client = 1; 2285c51f124SMoriah Waterland break; 2295c51f124SMoriah Waterland 2305c51f124SMoriah Waterland case 'f': 2315c51f124SMoriah Waterland if (getuid()) { 2325c51f124SMoriah Waterland progerr(gettext(ERR_NOTROOT), prog); 2335c51f124SMoriah Waterland quit(1); 2345c51f124SMoriah Waterland } 2355c51f124SMoriah Waterland fflag++; 2365c51f124SMoriah Waterland break; 2375c51f124SMoriah Waterland 2385c51f124SMoriah Waterland case 'i': 2395c51f124SMoriah Waterland setpathlist(optarg); 2405c51f124SMoriah Waterland break; 2415c51f124SMoriah Waterland 2425c51f124SMoriah Waterland case 'v': 2435c51f124SMoriah Waterland vflag++; 2445c51f124SMoriah Waterland break; 2455c51f124SMoriah Waterland 2465c51f124SMoriah Waterland case 'l': 2475c51f124SMoriah Waterland lflag++; 2485c51f124SMoriah Waterland break; 2495c51f124SMoriah Waterland 2505c51f124SMoriah Waterland case 'L': 2515c51f124SMoriah Waterland Lflag++; 2525c51f124SMoriah Waterland break; 2535c51f124SMoriah Waterland 2545c51f124SMoriah Waterland case 'x': 2555c51f124SMoriah Waterland if (aflag < 0) 2565c51f124SMoriah Waterland aflag = 0; 2575c51f124SMoriah Waterland if (cflag < 0) 2585c51f124SMoriah Waterland cflag = 0; 2595c51f124SMoriah Waterland xflag++; 2605c51f124SMoriah Waterland break; 2615c51f124SMoriah Waterland 2625c51f124SMoriah Waterland case 'q': 2635c51f124SMoriah Waterland qflag++; 2645c51f124SMoriah Waterland break; 2655c51f124SMoriah Waterland 2665c51f124SMoriah Waterland case 'a': 2675c51f124SMoriah Waterland if (cflag < 0) 2685c51f124SMoriah Waterland cflag = 0; 2695c51f124SMoriah Waterland aflag = 1; 2705c51f124SMoriah Waterland break; 2715c51f124SMoriah Waterland 2725c51f124SMoriah Waterland case 'c': 2735c51f124SMoriah Waterland if (aflag < 0) 2745c51f124SMoriah Waterland aflag = 0; 2755c51f124SMoriah Waterland cflag = 1; 2765c51f124SMoriah Waterland break; 2775c51f124SMoriah Waterland 2785c51f124SMoriah Waterland case 'e': 2795c51f124SMoriah Waterland envfile = optarg; 2805c51f124SMoriah Waterland break; 2815c51f124SMoriah Waterland 2825c51f124SMoriah Waterland case 'm': 2835c51f124SMoriah Waterland mapfile = optarg; 2845c51f124SMoriah Waterland break; 2855c51f124SMoriah Waterland 2865c51f124SMoriah Waterland case 'R': 2875c51f124SMoriah Waterland Rvalue = optarg; 2885c51f124SMoriah Waterland Rflag = 1; 2895c51f124SMoriah Waterland break; 2905c51f124SMoriah Waterland 2915c51f124SMoriah Waterland case 'Y': 2925c51f124SMoriah Waterland catg_arg = strdup(optarg); 2935c51f124SMoriah Waterland 2945c51f124SMoriah Waterland if ((category = get_categories(catg_arg)) == NULL) { 2955c51f124SMoriah Waterland progerr(gettext(ERR_CAT_INV), catg_arg); 2965c51f124SMoriah Waterland quit(1); 2975c51f124SMoriah Waterland } else if (is_not_valid_length(category)) { 2985c51f124SMoriah Waterland progerr(gettext(ERR_CAT_LNGTH)); 2995c51f124SMoriah Waterland quit(1); 3005c51f124SMoriah Waterland } 3015c51f124SMoriah Waterland break; 3025c51f124SMoriah Waterland 3035c51f124SMoriah Waterland case 'Q': 3045c51f124SMoriah Waterland dbcreate++; 3055c51f124SMoriah Waterland break; 3065c51f124SMoriah Waterland 3075c51f124SMoriah Waterland case 'P': 3085c51f124SMoriah Waterland ppathlist[npaths] = strtok(optarg, " , "); 3095c51f124SMoriah Waterland if ((ppathlist[npaths] == NULL) || 3105c51f124SMoriah Waterland (ppathlist[npaths][0] == '-')) { 3115c51f124SMoriah Waterland progerr(gettext(ERR_PARTIAL_POPTION)); 3125c51f124SMoriah Waterland quit(1); 3135c51f124SMoriah Waterland } 3145c51f124SMoriah Waterland npaths++; 3155c51f124SMoriah Waterland while (ppathlist[npaths] = strtok(NULL, " , ")) { 3165c51f124SMoriah Waterland if (npaths++ >= MAXPATHS) { 3175c51f124SMoriah Waterland progerr(gettext(ERR_MAXPATHS), 3185c51f124SMoriah Waterland MAXPATHS); 3195c51f124SMoriah Waterland quit(1); 3205c51f124SMoriah Waterland } 3215c51f124SMoriah Waterland } 3225c51f124SMoriah Waterland break; 3235c51f124SMoriah Waterland 3245c51f124SMoriah Waterland default: 3255c51f124SMoriah Waterland usage(); 3265c51f124SMoriah Waterland /*NOTREACHED*/ 3275c51f124SMoriah Waterland /* 3285c51f124SMoriah Waterland * Although usage() calls a noreturn function, 3295c51f124SMoriah Waterland * needed to add return (1); so that main() would 3305c51f124SMoriah Waterland * pass compilation checks. The statement below 3315c51f124SMoriah Waterland * should never be executed. 3325c51f124SMoriah Waterland */ 3335c51f124SMoriah Waterland return (1); 3345c51f124SMoriah Waterland } 3355c51f124SMoriah Waterland } 3365c51f124SMoriah Waterland 3375c51f124SMoriah Waterland /* Check for incompatible options */ 3385c51f124SMoriah Waterland if (dflag && Rflag) 3395c51f124SMoriah Waterland usage(); 3405c51f124SMoriah Waterland 3415c51f124SMoriah Waterland /* Check for root dir and device dir if set */ 3425c51f124SMoriah Waterland if (Rflag) { 3435c51f124SMoriah Waterland if (!set_inst_root(Rvalue)) { 3445c51f124SMoriah Waterland progerr(gettext(ERR_ROOT_CMD)); 3455c51f124SMoriah Waterland quit(1); 3465c51f124SMoriah Waterland } 3475c51f124SMoriah Waterland } 3485c51f124SMoriah Waterland 3495c51f124SMoriah Waterland if (dflag) 3505c51f124SMoriah Waterland device = flex_device(dvalue, 1); 3515c51f124SMoriah Waterland 3525c51f124SMoriah Waterland if (lflag || Lflag) { 3535c51f124SMoriah Waterland /* we're only supposed to list information */ 3545c51f124SMoriah Waterland if ((cflag >= 0) || (aflag >= 0) || 3555c51f124SMoriah Waterland qflag || xflag || fflag || nflag || vflag) 3565c51f124SMoriah Waterland usage(); 3575c51f124SMoriah Waterland } 3585c51f124SMoriah Waterland 3595c51f124SMoriah Waterland set_PKGpaths(get_inst_root()); 3605c51f124SMoriah Waterland 3615c51f124SMoriah Waterland if (catg_arg != NULL && device == NULL) { 3625c51f124SMoriah Waterland if (argc - optind) { 3635c51f124SMoriah Waterland usage(); 3645c51f124SMoriah Waterland } 3655c51f124SMoriah Waterland pkg = gpkglist(pkgdir, all_pkgs, category); 3665c51f124SMoriah Waterland if (pkg == NULL) { 3675c51f124SMoriah Waterland progerr(gettext(ERR_CAT_FND), catg_arg); 3685c51f124SMoriah Waterland quit(1); 3695c51f124SMoriah Waterland } else { 3705c51f124SMoriah Waterland for (pkgcnt = 0; pkg[pkgcnt] != NULL; pkgcnt++); 3715c51f124SMoriah Waterland } 3725c51f124SMoriah Waterland } else if (catg_arg != NULL && optind < argc) { 3735c51f124SMoriah Waterland usage(); 3745c51f124SMoriah Waterland } else { 3755c51f124SMoriah Waterland pkg = &argv[optind]; 3765c51f124SMoriah Waterland pkgcnt = (argc - optind); 3775c51f124SMoriah Waterland } 3785c51f124SMoriah Waterland 37962224350SCasper H.S. Dik /* read the environment for the pkgserver */ 38062224350SCasper H.S. Dik pkgserversetmode(DEFAULTMODE); 38162224350SCasper H.S. Dik 3825c51f124SMoriah Waterland environ = NULL; /* Sever the parent environment. */ 3835c51f124SMoriah Waterland 3845c51f124SMoriah Waterland if (vcfile() == 0) { 3855c51f124SMoriah Waterland quit(99); 3865c51f124SMoriah Waterland } 3875c51f124SMoriah Waterland 3885c51f124SMoriah Waterland errflg = 0; 3895c51f124SMoriah Waterland if (mapfile) { 3905c51f124SMoriah Waterland /* check for incompatible options */ 3915c51f124SMoriah Waterland if (device || pkgcnt) 3925c51f124SMoriah Waterland usage(); 3935c51f124SMoriah Waterland put_path_params(); /* Restore what's needed. */ 3945c51f124SMoriah Waterland 3955c51f124SMoriah Waterland /* send pathtype if partial path */ 3965c51f124SMoriah Waterland pathtype = (ppathlist[0] != NULL) ? 1 : 0; 3975c51f124SMoriah Waterland if (checkmap(0, (device != NULL), mapfile, envfile, NULL, 3985c51f124SMoriah Waterland NULL, pathtype)) 3995c51f124SMoriah Waterland errflg++; 4005c51f124SMoriah Waterland } else if (device) { 4015c51f124SMoriah Waterland /* check for incompatible options */ 4025c51f124SMoriah Waterland if ((cflag >= 0) || (aflag >= 0)) 4035c51f124SMoriah Waterland usage(); 4045c51f124SMoriah Waterland if (qflag || xflag || nflag || envfile) 4055c51f124SMoriah Waterland usage(); 4065c51f124SMoriah Waterland tmpdir = NULL; 4075c51f124SMoriah Waterland if ((spooldir = devattr(device, "pathname")) == NULL) 4085c51f124SMoriah Waterland spooldir = device; 4095c51f124SMoriah Waterland if (isdir(spooldir)) { 4105c51f124SMoriah Waterland tmpdir = spooldir = qstrdup(tmpnam(NULL)); 4115c51f124SMoriah Waterland if (fflag) { 4125c51f124SMoriah Waterland logerr(gettext(WRN_F_SPOOL), *pkg); 4135c51f124SMoriah Waterland fflag = 0; 4145c51f124SMoriah Waterland } 4155c51f124SMoriah Waterland if (mkdir(spooldir, 0755)) { 4165c51f124SMoriah Waterland progerr(gettext(ERR_MKDIR), spooldir); 4175c51f124SMoriah Waterland quit(99); 4185c51f124SMoriah Waterland } 419*32991bedSPeter Tribble if (n = pkgtrans(device, spooldir, pkg, PT_SILENT)) 4205c51f124SMoriah Waterland quit(n); 4215c51f124SMoriah Waterland if (catg_arg != NULL) 4225c51f124SMoriah Waterland pkg = gpkglist(spooldir, all_pkgs, category); 4235c51f124SMoriah Waterland else 4245c51f124SMoriah Waterland pkg = gpkglist(spooldir, all_pkgs, NULL); 4255c51f124SMoriah Waterland pkgfmt = 0; 4265c51f124SMoriah Waterland } else { 4275c51f124SMoriah Waterland if (catg_arg != NULL) 4285c51f124SMoriah Waterland pkg = gpkglist(spooldir, 4295c51f124SMoriah Waterland pkgcnt ? pkg : all_pkgs, category); 4305c51f124SMoriah Waterland else 4315c51f124SMoriah Waterland pkg = gpkglist(spooldir, 4325c51f124SMoriah Waterland pkgcnt ? pkg : all_pkgs, NULL); 4335c51f124SMoriah Waterland pkgfmt = 1; 4345c51f124SMoriah Waterland } 4355c51f124SMoriah Waterland 4365c51f124SMoriah Waterland /* 4375c51f124SMoriah Waterland * At this point pkg[] is the list of packages to check. They 4385c51f124SMoriah Waterland * are in directory format in spooldir. 4395c51f124SMoriah Waterland */ 4405c51f124SMoriah Waterland if (pkg == NULL) { 4415c51f124SMoriah Waterland if (catg_arg != NULL) { 4425c51f124SMoriah Waterland progerr(gettext(ERR_CAT_FND), catg_arg); 4435c51f124SMoriah Waterland quit(1); 4445c51f124SMoriah Waterland } else { 4455c51f124SMoriah Waterland progerr(gettext(ERR_SEL_PKG)); 4465c51f124SMoriah Waterland quit(1); 4475c51f124SMoriah Waterland } 4485c51f124SMoriah Waterland } 4495c51f124SMoriah Waterland 4505c51f124SMoriah Waterland aflag = 0; 4515c51f124SMoriah Waterland 4525c51f124SMoriah Waterland for (n = 0; pkg[n]; n++) { 4535c51f124SMoriah Waterland char locenv[PATH_MAX]; 4545c51f124SMoriah Waterland 4555c51f124SMoriah Waterland if (pkgfmt) 4565c51f124SMoriah Waterland (void) printf( 4575c51f124SMoriah Waterland gettext(MSG_CHK_DIR), pkg[n], device); 4585c51f124SMoriah Waterland else 4595c51f124SMoriah Waterland (void) printf( 4605c51f124SMoriah Waterland gettext(MSG_CHK_STRM), pkg[n], device); 4615c51f124SMoriah Waterland 4625c51f124SMoriah Waterland (void) snprintf(pkgspool, sizeof (pkgspool), 4635c51f124SMoriah Waterland "%s/%s", spooldir, pkg[n]); 4645c51f124SMoriah Waterland (void) snprintf(file, sizeof (file), 4655c51f124SMoriah Waterland "%s/install", pkgspool); 4665c51f124SMoriah Waterland /* Here we check the install scripts. */ 4675c51f124SMoriah Waterland (void) printf( 4685c51f124SMoriah Waterland gettext("## Checking control scripts.\n")); 4695c51f124SMoriah Waterland (void) checkscripts(file, 0); 4705c51f124SMoriah Waterland /* Verify consistency with the pkgmap. */ 4715c51f124SMoriah Waterland (void) printf( 4725c51f124SMoriah Waterland gettext("## Checking package objects.\n")); 4735c51f124SMoriah Waterland (void) snprintf(file, sizeof (file), 4745c51f124SMoriah Waterland "%s/pkgmap", pkgspool); 4755c51f124SMoriah Waterland (void) snprintf(locenv, sizeof (locenv), 4765c51f124SMoriah Waterland "%s/pkginfo", pkgspool); 4775c51f124SMoriah Waterland envfile = locenv; 4785c51f124SMoriah Waterland 4795c51f124SMoriah Waterland /* 4805c51f124SMoriah Waterland * NOTE : checkmap() frees the environ data and 4815c51f124SMoriah Waterland * pointer when it's through with them. 4825c51f124SMoriah Waterland */ 4835c51f124SMoriah Waterland if (checkmap(0, (device != NULL), file, envfile, 4845c51f124SMoriah Waterland pkg[n], NULL, 0)) 4855c51f124SMoriah Waterland errflg++; 4865c51f124SMoriah Waterland (void) printf( 4875c51f124SMoriah Waterland gettext("## Checking is complete.\n")); 4885c51f124SMoriah Waterland } 4895c51f124SMoriah Waterland } else { 4905c51f124SMoriah Waterland if (envfile) 4915c51f124SMoriah Waterland usage(); 4925c51f124SMoriah Waterland 4935c51f124SMoriah Waterland put_path_params(); /* Restore what's needed. */ 4945c51f124SMoriah Waterland 4955c51f124SMoriah Waterland /* 4965c51f124SMoriah Waterland * If this is a check of a client of some sort, we'll need to 4975c51f124SMoriah Waterland * mount up the client's filesystems. If the caller isn't 4985c51f124SMoriah Waterland * root, this may not be possible. 4995c51f124SMoriah Waterland */ 5005c51f124SMoriah Waterland if (is_an_inst_root()) { 5015c51f124SMoriah Waterland if (getuid()) { 5025c51f124SMoriah Waterland logerr(gettext(MSG_NOTROOT)); 5035c51f124SMoriah Waterland logerr(gettext(MSG_CONT)); 5045c51f124SMoriah Waterland } else { 5055c51f124SMoriah Waterland if (get_mntinfo(map_client, vfstab_file)) 5065c51f124SMoriah Waterland map_client = 0; 5075c51f124SMoriah Waterland if (map_client) 5085c51f124SMoriah Waterland mount_client(); 5095c51f124SMoriah Waterland } 5105c51f124SMoriah Waterland } 5115c51f124SMoriah Waterland 5125c51f124SMoriah Waterland (void) snprintf(file, sizeof (file), 5135c51f124SMoriah Waterland "%s/contents", get_PKGADM()); 5145c51f124SMoriah Waterland if (ppathlist[0] != NULL) { 5155c51f124SMoriah Waterland for (n = 0; ppathlist[n]; n++) { 5165c51f124SMoriah Waterland if (checkmap(1, (device != NULL), file, NULL, 5175c51f124SMoriah Waterland NULL, ppathlist[n], 1)) 5185c51f124SMoriah Waterland errflg++; 5195c51f124SMoriah Waterland } 5205c51f124SMoriah Waterland } else if (pkg[0] != NULL) { 5215c51f124SMoriah Waterland if (checkmap(1, (device != NULL), file, NULL, 5225c51f124SMoriah Waterland pkg[0], NULL, 0)) { 5235c51f124SMoriah Waterland errflg++; 5245c51f124SMoriah Waterland } 5255c51f124SMoriah Waterland } else { 5265c51f124SMoriah Waterland if (checkmap(1, (device != NULL), file, NULL, 5275c51f124SMoriah Waterland NULL, NULL, 0)) { 5285c51f124SMoriah Waterland errflg++; 5295c51f124SMoriah Waterland } 5305c51f124SMoriah Waterland } 5315c51f124SMoriah Waterland 5325c51f124SMoriah Waterland if (map_client) { 5335c51f124SMoriah Waterland unmount_client(); 5345c51f124SMoriah Waterland } 5355c51f124SMoriah Waterland } 5365c51f124SMoriah Waterland quit(errflg ? 1 : 0); 5375c51f124SMoriah Waterland /* LINTED: no return */ 5385c51f124SMoriah Waterland } 5395c51f124SMoriah Waterland 5405c51f124SMoriah Waterland static void 5415c51f124SMoriah Waterland setpathlist(char *file) 5425c51f124SMoriah Waterland { 5435c51f124SMoriah Waterland int fd; 5445c51f124SMoriah Waterland struct stat st; 5455c51f124SMoriah Waterland FILE *fplist; 5465c51f124SMoriah Waterland char pathname[PATH_MAX]; 5475c51f124SMoriah Waterland /* 5485c51f124SMoriah Waterland * This trap laid to catch a mismatch between the declaration above and 5495c51f124SMoriah Waterland * the hard-coded constant in the fscanf below 5505c51f124SMoriah Waterland */ 5515c51f124SMoriah Waterland #if PATH_MAX != 1024 5525c51f124SMoriah Waterland #error "PATH_MAX changed, so we have a bug to fix" 5535c51f124SMoriah Waterland #endif 5545c51f124SMoriah Waterland 5555c51f124SMoriah Waterland if (strcmp(file, "-") == 0) { 5565c51f124SMoriah Waterland fplist = stdin; 5575c51f124SMoriah Waterland } else { 5585c51f124SMoriah Waterland if ((fd = open(file, O_RDONLY)) == -1) { 5595c51f124SMoriah Waterland progerr(gettext(ERR_IOPEN), file); 5605c51f124SMoriah Waterland quit(1); 5615c51f124SMoriah Waterland } 5625c51f124SMoriah Waterland if (fstat(fd, &st) == -1) { 5635c51f124SMoriah Waterland progerr(gettext(ERR_IOPEN), file); 5645c51f124SMoriah Waterland quit(1); 5655c51f124SMoriah Waterland } 5665c51f124SMoriah Waterland if (S_ISDIR(st.st_mode) || S_ISBLK(st.st_mode)) { 5675c51f124SMoriah Waterland progerr(gettext(ERR_PATHS_INVALID), file); 5685c51f124SMoriah Waterland quit(1); 5695c51f124SMoriah Waterland } 5705c51f124SMoriah Waterland if ((fplist = fdopen(fd, "r")) == NULL) { 5715c51f124SMoriah Waterland progerr(gettext(ERR_IOPEN), file); 5725c51f124SMoriah Waterland quit(1); 5735c51f124SMoriah Waterland } 5745c51f124SMoriah Waterland } 5755c51f124SMoriah Waterland while (fscanf(fplist, "%1024s", pathname) == 1) { 5765c51f124SMoriah Waterland if (*pathname == '\0') { 5775c51f124SMoriah Waterland progerr(gettext(ERR_PATHS_INVALID), file); 5785c51f124SMoriah Waterland quit(1); 5795c51f124SMoriah Waterland } 5805c51f124SMoriah Waterland pathlist[npaths] = qstrdup(pathname); 5815c51f124SMoriah Waterland if (npaths++ > MAXPATHS) { 5825c51f124SMoriah Waterland progerr(gettext(ERR_TOO_MANY), MAXPATHS); 5835c51f124SMoriah Waterland quit(1); 5845c51f124SMoriah Waterland } 5855c51f124SMoriah Waterland } 5865c51f124SMoriah Waterland if (npaths == 0) { 5875c51f124SMoriah Waterland progerr(gettext(ERR_IEMPTY)); 5885c51f124SMoriah Waterland quit(1); 5895c51f124SMoriah Waterland } 5905c51f124SMoriah Waterland (void) fclose(fplist); 5915c51f124SMoriah Waterland } 5925c51f124SMoriah Waterland 5935c51f124SMoriah Waterland void 5945c51f124SMoriah Waterland quit(int n) 5955c51f124SMoriah Waterland { 5965c51f124SMoriah Waterland /* cleanup any temporary directories */ 5975c51f124SMoriah Waterland (void) chdir("/"); 5985c51f124SMoriah Waterland if (tmpdir != NULL) { 5995c51f124SMoriah Waterland (void) rrmdir(tmpdir); 6005c51f124SMoriah Waterland free(tmpdir); 6015c51f124SMoriah Waterland tmpdir = NULL; 6025c51f124SMoriah Waterland } 6035c51f124SMoriah Waterland (void) pkghead(NULL); 6045c51f124SMoriah Waterland exit(n); 6055c51f124SMoriah Waterland /*NOTREACHED*/ 6065c51f124SMoriah Waterland } 6075c51f124SMoriah Waterland 6085c51f124SMoriah Waterland static void 6095c51f124SMoriah Waterland usage(void) 6105c51f124SMoriah Waterland { 6115c51f124SMoriah Waterland char *prog = get_prog_name(); 6125c51f124SMoriah Waterland 6135c51f124SMoriah Waterland (void) fprintf(stderr, gettext(ERR_USAGE), prog, prog); 6145c51f124SMoriah Waterland quit(1); 6155c51f124SMoriah Waterland /*NOTREACHED*/ 6165c51f124SMoriah Waterland } 617