diff options
Diffstat (limited to 'usr/src/cmd/zoneadm')
| -rw-r--r-- | usr/src/cmd/zoneadm/Makefile | 58 | ||||
| -rw-r--r-- | usr/src/cmd/zoneadm/svc-zones | 132 | ||||
| -rw-r--r-- | usr/src/cmd/zoneadm/zoneadm.c | 2288 | ||||
| -rw-r--r-- | usr/src/cmd/zoneadm/zones.xml | 90 |
4 files changed, 2568 insertions, 0 deletions
diff --git a/usr/src/cmd/zoneadm/Makefile b/usr/src/cmd/zoneadm/Makefile new file mode 100644 index 0000000000..cdf36e185e --- /dev/null +++ b/usr/src/cmd/zoneadm/Makefile @@ -0,0 +1,58 @@ +# +# CDDL HEADER START +# +# The contents of this file are subject to the terms of the +# Common Development and Distribution License, Version 1.0 only +# (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 2005 Sun Microsystems, Inc. All rights reserved. +# Use is subject to license terms. +# +# ident "%Z%%M% %I% %E% SMI" +# + +PROG= zoneadm +MANIFEST= zones.xml + +include ../Makefile.cmd + +ROOTMETHOD= $(ROOTLIBSVCMETHOD)/svc-zones +ROOTMANIFESTDIR= $(ROOTSVCSYSTEM) +$(ROOTMANIFEST) := FILEMODE= 444 + +$(ROOTMANIFESTDIR)/%: % + $(INS.file) + +LDLIBS += -lzonecfg -lsocket -lgen -lpool -lbsm + +lint := LINTFLAGS += -ux + +.KEEP_STATE: + +all: $(PROG) + +install: all $(ROOTUSRSBINPROG) $(ROOTMANIFEST) $(ROOTMETHOD) + +check: $(PROG).c $(CHKMANIFEST) + $(CSTYLE) -pP $(PROG).c + +clean: + +lint: lint_PROG + +include ../Makefile.targ diff --git a/usr/src/cmd/zoneadm/svc-zones b/usr/src/cmd/zoneadm/svc-zones new file mode 100644 index 0000000000..295d36c5a5 --- /dev/null +++ b/usr/src/cmd/zoneadm/svc-zones @@ -0,0 +1,132 @@ +#!/sbin/sh +# +# CDDL HEADER START +# +# The contents of this file are subject to the terms of the +# Common Development and Distribution License, Version 1.0 only +# (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 2004 Sun Microsystems, Inc. All rights reserved. +# Use is subject to license terms. + +# ident "%Z%%M% %I% %E% SMI" +# + +[ ! -x /usr/sbin/zoneadm ] && exit 0 # SUNWzoneu not installed + +# Make sure working directory is / to prevent unmounting problems. +cd / +PATH=/usr/sbin:/usr/bin; export PATH + +case "$1" in +'start') + egrep -vs '^#|^global:' /etc/zones/index || exit 0 # no local zones + ZONES="" + for zone in `zoneadm list -pi | nawk -F: '{ + if ($3 == "installed") { + print $2 + } + }'`; do + zonecfg -z $zone info autoboot | grep "true" >/dev/null 2>&1 + if [ $? -eq 0 ]; then + [ -z "$ZONES" ] && echo "Booting zones:\c" + ZONES=yes + echo " $zone\c" + # + # We don't (yet) support restart for zones, so + # we need to get all of the zones stuff off into + # a different contract. + # + ctrun -l none -i none zoneadm -z $zone boot & + fi + done + [ -n "$ZONES" ] && echo . + ;; + +'stop') + egrep -vs '^#|^global:' /etc/zones/index || exit 0 # no local zones + [ "`zoneadm list`" = "global" ] && exit 0 # no zones running + + MAXSHUT=60 # maximum time we'll wait for all zones to shutdown + MAXHALT=30 # maximum time we'll wait for all zones to halt + + echo "Shutting down running zones:\c" + + # First, try letting them run their shutdown scripts. + + SHUTDOWN=0 + for zone in `zoneadm list`; do + if [ "$zone" != "global" ]; then + echo " $zone\c" + zlogin -S $zone /sbin/init 0 < /dev/null >&0 2>&0 & + SHUTDOWN=1 + fi + done + [ $SHUTDOWN -eq 1 ] && echo "." + + # Allow time for zones to shutdown cleanly + + while [ $MAXSHUT -gt 0 -a "`zoneadm list`" != "global" ]; do + MAXSHUT=`expr $MAXSHUT - 1` + sleep 1 # wait a bit longer + done + + # Second, try halting them. + + WAITPIDS="" + for zone in `zoneadm list`; do + if [ "$zone" != "global" ]; then + [ -z "$WAITPIDS" ] && + echo "Zones failed to shutdown; trying to halt:\c" + echo " $zone\c" + zoneadm -z $zone halt & + WAITPIDS="$WAITPIDS $!" + fi + done + [ ! -z "$WAITPIDS" ] && echo . + + # Wait for the 'zoneadm halt' commands to complete. We will let this + # run forever, since the restart daemon will eventually kill us off + # anyway if the halts do not complete after a certain period of time. + wait $WAITPIDS + + # If the halts complete but a zone is still not shutdown, it might + # be in a state like 'shutting_down' or 'down'. So we give it some + # time to come all the way down. + while [ $MAXHALT -gt 0 -a "`zoneadm list`" != "global" ]; do + MAXHALT=`expr $MAXHALT - 1` + sleep 1 # wait a bit longer + done + + # + # Report on zones which failed to shutdown. + # + for zone in `zoneadm list`; do + if [ "$zone" != "global" ]; then + echo "Zone '$zone' failed to halt." + fi + done + [ "`zoneadm list`" != "global" ] && exit 1 # zones still running + ;; + +*) + echo "Usage: $0 { start | stop }" + exit 1 + ;; +esac +exit 0 diff --git a/usr/src/cmd/zoneadm/zoneadm.c b/usr/src/cmd/zoneadm/zoneadm.c new file mode 100644 index 0000000000..4c54ae5009 --- /dev/null +++ b/usr/src/cmd/zoneadm/zoneadm.c @@ -0,0 +1,2288 @@ +/* + * CDDL HEADER START + * + * The contents of this file are subject to the terms of the + * Common Development and Distribution License, Version 1.0 only + * (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 2005 Sun Microsystems, Inc. All rights reserved. + * Use is subject to license terms. + */ + +#pragma ident "%Z%%M% %I% %E% SMI" + +/* + * zoneadm is a command interpreter for zone administration. It is all in + * C (i.e., no lex/yacc), and all the argument passing is argc/argv based. + * main() calls parse_and_run() which calls cmd_match(), then invokes the + * appropriate command's handler function. The rest of the program is the + * handler functions and their helper functions. + * + * Some of the helper functions are used largely to simplify I18N: reducing + * the need for translation notes. This is particularly true of many of + * the zerror() calls: doing e.g. zerror(gettext("%s failed"), "foo") rather + * than zerror(gettext("foo failed")) with a translation note indicating + * that "foo" need not be translated. + */ + +#include <stdio.h> +#include <errno.h> +#include <unistd.h> +#include <signal.h> +#include <stdarg.h> +#include <ctype.h> +#include <stdlib.h> +#include <string.h> +#include <wait.h> +#include <zone.h> +#include <priv.h> +#include <locale.h> +#include <libintl.h> +#include <libzonecfg.h> +#include <bsm/adt.h> +#include <sys/utsname.h> +#include <sys/param.h> +#include <sys/types.h> +#include <sys/stat.h> +#include <sys/statvfs.h> +#include <assert.h> +#include <sys/sockio.h> +#include <sys/mntent.h> +#include <limits.h> + +#include <fcntl.h> +#include <door.h> +#include <macros.h> +#include <libgen.h> + +#include <pool.h> +#include <sys/pool.h> + +#define MAXARGS 8 + +/* Reflects kernel zone entries */ +typedef struct zone_entry { + zoneid_t zid; + char zname[ZONENAME_MAX]; + char *zstate_str; + zone_state_t zstate_num; + char zroot[MAXPATHLEN]; +} zone_entry_t; + +static zone_entry_t *zents; +static size_t nzents; + +#if !defined(TEXT_DOMAIN) /* should be defined by cc -D */ +#define TEXT_DOMAIN "SYS_TEST" /* Use this only if it wasn't */ +#endif + +#define Z_ERR 1 +#define Z_USAGE 2 + +/* 0755 is the default directory mode. */ +#define DEFAULT_DIR_MODE \ + (S_IRWXU | S_IRGRP | S_IXGRP | S_IROTH | S_IXOTH) + +#define CMD_HELP 0 +#define CMD_BOOT 1 +#define CMD_HALT 2 +#define CMD_READY 3 +#define CMD_REBOOT 4 +#define CMD_LIST 5 +#define CMD_VERIFY 6 +#define CMD_INSTALL 7 +#define CMD_UNINSTALL 8 + +#define CMD_MIN CMD_HELP +#define CMD_MAX CMD_UNINSTALL + +struct cmd { + uint_t cmd_num; /* command number */ + char *cmd_name; /* command name */ + char *short_usage; /* short form help */ + int (*handler)(int argc, char *argv[]); /* function to call */ + +}; + +#define SHELP_HELP "help" +#define SHELP_BOOT "boot [-s]" +#define SHELP_HALT "halt" +#define SHELP_READY "ready" +#define SHELP_REBOOT "reboot" +#define SHELP_LIST "list [-cipv]" +#define SHELP_VERIFY "verify" +#define SHELP_INSTALL "install" +#define SHELP_UNINSTALL "uninstall [-F]" + +static int help_func(int argc, char *argv[]); +static int ready_func(int argc, char *argv[]); +static int boot_func(int argc, char *argv[]); +static int halt_func(int argc, char *argv[]); +static int reboot_func(int argc, char *argv[]); +static int list_func(int argc, char *argv[]); +static int verify_func(int argc, char *argv[]); +static int install_func(int argc, char *argv[]); +static int uninstall_func(int argc, char *argv[]); +static int sanity_check(char *zone, int cmd_num, boolean_t running, + boolean_t unsafe_when_running); +static int cmd_match(char *cmd); +static int verify_details(int); + +static struct cmd cmdtab[] = { + { CMD_HELP, "help", SHELP_HELP, help_func }, + { CMD_BOOT, "boot", SHELP_BOOT, boot_func }, + { CMD_HALT, "halt", SHELP_HALT, halt_func }, + { CMD_READY, "ready", SHELP_READY, ready_func }, + { CMD_REBOOT, "reboot", SHELP_REBOOT, reboot_func }, + { CMD_LIST, "list", SHELP_LIST, list_func }, + { CMD_VERIFY, "verify", SHELP_VERIFY, verify_func }, + { CMD_INSTALL, "install", SHELP_INSTALL, install_func }, + { CMD_UNINSTALL, "uninstall", SHELP_UNINSTALL, + uninstall_func } +}; + +/* global variables */ + +/* set early in main(), never modified thereafter, used all over the place */ +static char *execname; +static char *target_zone; +static char *locale; + +/* used in do_subproc() and signal handler */ +static volatile boolean_t child_killed; + +static char * +cmd_to_str(int cmd_num) +{ + assert(cmd_num >= CMD_MIN && cmd_num <= CMD_MAX); + return (cmdtab[cmd_num].cmd_name); +} + +/* This is a separate function because of gettext() wrapping. */ +static char * +long_help(int cmd_num) +{ + if (cmd_num < CMD_MIN || cmd_num > CMD_MAX) + return (""); + switch (cmd_num) { + case CMD_HELP: + return (gettext("Print usage message.")); + case CMD_BOOT: + return (gettext("Activates (boots) specified zone. " + "The -s flag can be used\n\tto boot the zone in " + "the single-user state.")); + case CMD_HALT: + return (gettext("Halts specified zone, bypassing " + "shutdown scripts and removing runtime\n\t" + "resources of the zone.")); + case CMD_READY: + return (gettext("Prepares a zone for running " + "applications but does not start any user\n\t" + "processes in the zone.")); + case CMD_REBOOT: + return (gettext("Restarts the zone (equivalent to a " + "halt / boot sequence).\n\tFails if the zone is " + "not active.")); + case CMD_LIST: + return (gettext("Lists the current zones, or a " + "specific zone if indicated. By default,\n\tall " + "running zones are listed, though this can be " + "expanded to all\n\tinstalled zones with the -i " + "option or all configured zones with the\n\t-c " + "option. When used with the general -z <zone> " + "option, lists only the\n\tspecified zone, but " + "lists it regardless of its state, and the -i " + "and -c\n\toptions are disallowed. The -v option " + "can be used to display verbose\n\tinformation: " + "zone name, id, current state, root directory and " + "options.\n\tThe -p option can be used to request " + "machine-parsable output. The -v\n\tand -p " + "options are mutually exclusive. If neither -v " + "nor -p is used,\n\tjust the zone name is " + "listed.")); + case CMD_VERIFY: + return (gettext("Check to make sure the configuration " + "can safely be instantiated\n\ton the machine: " + "physical network interfaces exist, etc.")); + case CMD_INSTALL: + return (gettext("Install the configuration on to the " + "system.")); + case CMD_UNINSTALL: + return (gettext("Uninstall the configuration from the " + "system. The -F flag can be used\n\tto force the " + "action.")); + } + /* NOTREACHED */ +} + +/* + * Called with explicit B_TRUE when help is explicitly requested, B_FALSE for + * unexpected errors. + */ + +static int +usage(boolean_t explicit) +{ + int i; + FILE *fd = explicit ? stdout : stderr; + + (void) fprintf(fd, "%s:\t%s help\n", gettext("usage"), execname); + (void) fprintf(fd, "\t%s [-z <zone>] list\n", execname); + (void) fprintf(fd, "\t%s -z <zone> <%s>\n", execname, + gettext("subcommand")); + (void) fprintf(fd, "\n%s:\n\n", gettext("Subcommands")); + for (i = CMD_MIN; i <= CMD_MAX; i++) { + (void) fprintf(fd, "%s\n", cmdtab[i].short_usage); + if (explicit) + (void) fprintf(fd, "\t%s\n\n", long_help(i)); + } + if (!explicit) + (void) fputs("\n", fd); + return (Z_USAGE); +} + +static void +sub_usage(char *short_usage, int cmd_num) +{ + (void) fprintf(stderr, "%s:\t%s\n", gettext("usage"), short_usage); + (void) fprintf(stderr, "\t%s\n", long_help(cmd_num)); +} + +/* + * zperror() is like perror(3c) except that this also prints the executable + * name at the start of the message, and takes a boolean indicating whether + * to call libc'c strerror() or that from libzonecfg. + */ + +static void +zperror(const char *str, boolean_t zonecfg_error) +{ + (void) fprintf(stderr, "%s: %s: %s\n", execname, str, + zonecfg_error ? zonecfg_strerror(errno) : strerror(errno)); +} + +/* + * zperror2() is very similar to zperror() above, except it also prints a + * supplied zone name after the executable. + * + * All current consumers of this function want libzonecfg's strerror() rather + * than libc's; if this ever changes, this function can be made more generic + * like zperror() above. + */ + +static void +zperror2(const char *zone, const char *str) +{ + (void) fprintf(stderr, "%s: %s: %s: %s\n", execname, zone, str, + zonecfg_strerror(errno)); +} + +/* PRINTFLIKE1 */ +static void +zerror(const char *fmt, ...) +{ + va_list alist; + + va_start(alist, fmt); + (void) fprintf(stderr, "%s: ", execname); + if (target_zone != NULL) + (void) fprintf(stderr, "zone '%s': ", target_zone); + (void) vfprintf(stderr, fmt, alist); + (void) fprintf(stderr, "\n"); + va_end(alist); +} + +static void * +safe_calloc(size_t nelem, size_t elsize) +{ + void *r = calloc(nelem, elsize); + + if (r == NULL) { + zerror(gettext("failed to allocate %lu bytes: %s"), + (ulong_t)nelem * elsize, strerror(errno)); + exit(Z_ERR); + } + return (r); +} + +static void +zone_print(zone_entry_t *zent, boolean_t verbose, boolean_t parsable) +{ + static boolean_t firsttime = B_TRUE; + + assert(!(verbose && parsable)); + if (firsttime && verbose) { + firsttime = B_FALSE; + (void) printf("%*s %-16s %-14s %-30s\n", ZONEID_WIDTH, "ID", + "NAME", "STATUS", "PATH"); + } + if (!verbose) { + if (!parsable) { + (void) printf("%s\n", zent->zname); + return; + } + if (zent->zid == ZONE_ID_UNDEFINED) + (void) printf("-"); + else + (void) printf("%lu", zent->zid); + (void) printf(":%s:%s:%s\n", zent->zname, zent->zstate_str, + zent->zroot); + return; + } + if (zent->zstate_str != NULL) { + if (zent->zid == ZONE_ID_UNDEFINED) + (void) printf("%*s", ZONEID_WIDTH, "-"); + else + (void) printf("%*lu", ZONEID_WIDTH, zent->zid); + (void) printf(" %-16s %-14s %-30s\n", zent->zname, + zent->zstate_str, zent->zroot); + } +} + +static int +lookup_zone_info(char *zone_name, zone_entry_t *zent) +{ + char root[MAXPATHLEN]; + int err; + + (void) strlcpy(zent->zname, zone_name, sizeof (zent->zname)); + (void) strlcpy(zent->zroot, "???", sizeof (zent->zroot)); + zent->zstate_str = "???"; + + if ((zent->zid = getzoneidbyname(zone_name)) == -1) + zent->zid = ZONE_ID_UNDEFINED; + + if ((err = zone_get_zonepath(zent->zname, root, sizeof (root))) != + Z_OK) { + errno = err; + zperror2(zent->zname, gettext("could not get zone path")); + return (Z_ERR); + } + (void) strlcpy(zent->zroot, root, sizeof (zent->zroot)); + + if ((err = zone_get_state(zent->zname, &zent->zstate_num)) != Z_OK) { + errno = err; + zperror2(zent->zname, gettext("could not get state")); + return (Z_ERR); + } + zent->zstate_str = zone_state_str(zent->zstate_num); + + return (Z_OK); +} + +/* + * fetch_zents() calls zone_list(2) to find out how many zones are running + * (which is stored in the global nzents), then calls zone_list(2) again + * to fetch the list of running zones (stored in the global zents). This + * function may be called multiple times, so if zents is already set, we + * return immediately to save work. + */ + +static int +fetch_zents() +{ + zoneid_t *zids = NULL; + uint_t nzents_saved; + int i; + + if (nzents > 0) + return (Z_OK); + + if (zone_list(NULL, &nzents) != 0) { + zperror(gettext("failed to get zoneid list"), B_FALSE); + return (Z_ERR); + } + +again: + if (nzents == 0) + return (Z_OK); + + zids = safe_calloc(nzents, sizeof (zoneid_t)); + nzents_saved = nzents; + + if (zone_list(zids, &nzents) != 0) { + zperror(gettext("failed to get zone list"), B_FALSE); + free(zids); + return (Z_ERR); + } + if (nzents != nzents_saved) { + /* list changed, try again */ + free(zids); + goto again; + } + + zents = safe_calloc(nzents, sizeof (zone_entry_t)); + + for (i = 0; i < nzents; i++) { + char name[ZONENAME_MAX]; + + if (getzonenamebyid(zids[i], name, sizeof (name)) < 0) + zperror(gettext("failed to get zone name"), B_FALSE); + else if (lookup_zone_info(name, &zents[i]) != Z_OK) + zerror(gettext("failed to get zone list")); + } + + free(zids); + return (Z_OK); +} + +static void +zone_print_list(zone_state_t min_state, boolean_t verbose, boolean_t parsable) +{ + int i; + zone_entry_t zent; + FILE *cookie; + char *name; + + /* + * First get the list of running zones from the kernel and print them. + * If that is all we need, then return. + */ + if (fetch_zents() != Z_OK) { + /* + * No need for error messages; fetch_zents() has already taken + * care of this. + */ + return; + } + for (i = 0; i < nzents; i++) { + if (!verbose && !parsable) { + zone_print(&zents[i], verbose, parsable); + continue; + } + zone_print(&zents[i], verbose, parsable); + } + if (min_state >= ZONE_STATE_RUNNING) + return; + /* + * Next, get the full list of zones from the configuration, skipping + * any we have already printed. + */ + cookie = setzoneent(); + while ((name = getzoneent(cookie)) != NULL) { + for (i = 0; i < nzents; i++) { + if (strcmp(zents[i].zname, name) == 0) + break; + } + if (i < nzents) { + free(name); + continue; + } + if (lookup_zone_info(name, &zent) != Z_OK) { + free(name); + continue; + } + free(name); + if (zent.zstate_num >= min_state) + zone_print(&zent, verbose, parsable); + } + endzoneent(cookie); +} + +static zone_entry_t * +lookup_running_zone(char *str) +{ + zoneid_t zoneid; + char *cp; + int i; + + if (fetch_zents() != Z_OK) + return (NULL); + + for (i = 0; i < nzents; i++) { + if (strcmp(str, zents[i].zname) == 0) + return (&zents[i]); + } + errno = 0; + zoneid = strtol(str, &cp, 0); + if (zoneid < MIN_ZONEID || zoneid > MAX_ZONEID || + errno != 0 || *cp != '\0') + return (NULL); + for (i = 0; i < nzents; i++) { + if (zoneid == zents[i].zid) + return (&zents[i]); + } + return (NULL); +} + +/* + * Check a bit in a mode_t: if on is B_TRUE, that bit should be on; if + * B_FALSE, it should be off. Return B_TRUE if the mode is bad (incorrect). + */ +static boolean_t +bad_mode_bit(mode_t mode, mode_t bit, boolean_t on, char *file) +{ + char *str; + + assert(bit == S_IRUSR || bit == S_IWUSR || bit == S_IXUSR || + bit == S_IRGRP || bit == S_IWGRP || bit == S_IXGRP || + bit == S_IROTH || bit == S_IWOTH || bit == S_IXOTH); + /* + * TRANSLATION_NOTE + * The strings below will be used as part of a larger message, + * either: + * (file name) must be (owner|group|world) (read|writ|execut)able + * or + * (file name) must not be (owner|group|world) (read|writ|execut)able + */ + switch (bit) { + case S_IRUSR: + str = gettext("owner readable"); + break; + case S_IWUSR: + str = gettext("owner writable"); + break; + case S_IXUSR: + str = gettext("owner executable"); + break; + case S_IRGRP: + str = gettext("group readable"); + break; + case S_IWGRP: + str = gettext("group writable"); + break; + case S_IXGRP: + str = gettext("group executable"); + break; + case S_IROTH: + str = gettext("world readable"); + break; + case S_IWOTH: + str = gettext("world writable"); + break; + case S_IXOTH: + str = gettext("world executable"); + break; + } + if ((mode & bit) == (on ? 0 : bit)) { + /* + * TRANSLATION_NOTE + * The first parameter below is a file name; the second + * is one of the "(owner|group|world) (read|writ|execut)able" + * strings from above. + */ + /* + * The code below could be simplified but not in a way + * that would easily translate to non-English locales. + */ + if (on) { + (void) fprintf(stderr, gettext("%s must be %s.\n"), + file, str); + } else { + (void) fprintf(stderr, gettext("%s must not be %s.\n"), + file, str); + } + return (B_TRUE); + } + return (B_FALSE); +} + +/* + * We want to make sure that no zone has its zone path as a child node + * (in the directory sense) of any other. We do that by comparing this + * zone's path to the path of all other (non-global) zones. The comparison + * in each case is simple: add '/' to the end of the path, then do a + * strncmp() of the two paths, using the length of the shorter one. + */ + +static int +crosscheck_zonepaths(char *path) +{ + char rpath[MAXPATHLEN]; /* resolved path */ + char path_copy[MAXPATHLEN]; /* copy of original path */ + char rpath_copy[MAXPATHLEN]; /* copy of original rpath */ + struct zoneent *ze; + int res, err; + FILE *cookie; + + cookie = setzoneent(); + while ((ze = getzoneent_private(cookie)) != NULL) { + /* Skip zones which are not installed. */ + if (ze->zone_state < ZONE_STATE_INSTALLED) { + free(ze); + continue; + } + /* Skip the global zone and the current target zone. */ + if (strcmp(ze->zone_name, GLOBAL_ZONENAME) == 0 || + strcmp(ze->zone_name, target_zone) == 0) { + free(ze); + continue; + } + if (strlen(ze->zone_path) == 0) { + /* old index file without path, fall back */ + if ((err = zone_get_zonepath(ze->zone_name, + ze->zone_path, sizeof (ze->zone_path))) != Z_OK) { + errno = err; + zperror2(ze->zone_name, + gettext("could not get zone path")); + free(ze); + continue; + } + } + res = resolvepath(ze->zone_path, rpath, sizeof (rpath)); + if (res == -1) { + if (errno != ENOENT) { + zperror(ze->zone_path, B_FALSE); + free(ze); + return (Z_ERR); + } + (void) printf(gettext("WARNING: zone %s is installed, " + "but its %s %s does not exist.\n"), ze->zone_name, + "zonepath", ze->zone_path); + free(ze); + continue; + } + rpath[res] = '\0'; + (void) snprintf(path_copy, sizeof (path_copy), "%s/", path); + (void) snprintf(rpath_copy, sizeof (rpath_copy), "%s/", rpath); + if (strncmp(path_copy, rpath_copy, + min(strlen(path_copy), strlen(rpath_copy))) == 0) { + (void) fprintf(stderr, gettext("%s zonepath (%s) and " + "%s zonepath (%s) overlap.\n"), + target_zone, path, ze->zone_name, rpath); + free(ze); + return (Z_ERR); + } + free(ze); + } + endzoneent(cookie); + return (Z_OK); +} + +static int +validate_zonepath(char *path, int cmd_num) +{ + int res; /* result of last library/system call */ + boolean_t err = B_FALSE; /* have we run into an error? */ + struct stat stbuf; + struct statvfs vfsbuf; + char rpath[MAXPATHLEN]; /* resolved path */ + char ppath[MAXPATHLEN]; /* parent path */ + char rppath[MAXPATHLEN]; /* resolved parent path */ + char rootpath[MAXPATHLEN]; /* root path */ + zone_state_t state; + + if (path[0] != '/') { + (void) fprintf(stderr, + gettext("%s is not an absolute path.\n"), path); + return (Z_ERR); + } + if ((res = resolvepath(path, rpath, sizeof (rpath))) == -1) { + if ((errno != ENOENT) || + (cmd_num != CMD_VERIFY && cmd_num != CMD_INSTALL)) { + zperror(path, B_FALSE); + return (Z_ERR); + } + if (cmd_num == CMD_VERIFY) { + (void) fprintf(stderr, gettext("WARNING: %s does not " + "exist, so it cannot be verified.\nWhen 'zoneadm " + "%s' is run, '%s' will try to create\n%s, and '%s' " + "will be tried again,\nbut the '%s' may fail if:\n" + "the parent directory of %s is group- or other-" + "writable\nor\n%s overlaps with any other " + "installed zones.\n"), path, + cmd_to_str(CMD_INSTALL), cmd_to_str(CMD_INSTALL), + path, cmd_to_str(CMD_VERIFY), + cmd_to_str(CMD_VERIFY), path, path); + return (Z_OK); + } + /* + * The zonepath is supposed to be mode 700 but its + * parent(s) 755. So use 755 on the mkdirp() then + * chmod() the zonepath itself to 700. + */ + if (mkdirp(path, DEFAULT_DIR_MODE) < 0) { + zperror(path, B_FALSE); + return (Z_ERR); + } + /* + * If the chmod() fails, report the error, but might + * as well continue the verify procedure. + */ + if (chmod(path, S_IRWXU) != 0) + zperror(path, B_FALSE); + /* + * Since the mkdir() succeeded, we should not have to + * worry about a subsequent ENOENT, thus this should + * only recurse once. + */ + return (validate_zonepath(path, CMD_INSTALL)); + } + rpath[res] = '\0'; + if (strcmp(path, rpath) != 0) { + errno = Z_RESOLVED_PATH; + zperror(path, B_TRUE); + return (Z_ERR); + } + if ((res = stat(rpath, &stbuf)) != 0) { + zperror(rpath, B_FALSE); + return (Z_ERR); + } + if (!S_ISDIR(stbuf.st_mode)) { + (void) fprintf(stderr, gettext("%s is not a directory.\n"), + rpath); + return (Z_ERR); + } + if ((strcmp(stbuf.st_fstype, MNTTYPE_TMPFS) == 0) || + (strcmp(stbuf.st_fstype, MNTTYPE_XMEMFS) == 0)) { + (void) printf(gettext("WARNING: %s is on a temporary " + "file-system.\n"), rpath); + } + if (crosscheck_zonepaths(rpath) != Z_OK) + return (Z_ERR); + /* + * Try to collect and report as many minor errors as possible + * before returning, so the user can learn everything that needs + * to be fixed up front. + */ + if (stbuf.st_uid != 0) { + (void) fprintf(stderr, gettext("%s is not owned by root.\n"), + rpath); + err = B_TRUE; + } + err |= bad_mode_bit(stbuf.st_mode, S_IRUSR, B_TRUE, rpath); + err |= bad_mode_bit(stbuf.st_mode, S_IWUSR, B_TRUE, rpath); + err |= bad_mode_bit(stbuf.st_mode, S_IXUSR, B_TRUE, rpath); + err |= bad_mode_bit(stbuf.st_mode, S_IRGRP, B_FALSE, rpath); + err |= bad_mode_bit(stbuf.st_mode, S_IWGRP, B_FALSE, rpath); + err |= bad_mode_bit(stbuf.st_mode, S_IXGRP, B_FALSE, rpath); + err |= bad_mode_bit(stbuf.st_mode, S_IROTH, B_FALSE, rpath); + err |= bad_mode_bit(stbuf.st_mode, S_IWOTH, B_FALSE, rpath); + err |= bad_mode_bit(stbuf.st_mode, S_IXOTH, B_FALSE, rpath); + + (void) snprintf(ppath, sizeof (ppath), "%s/..", path); + if ((res = resolvepath(ppath, rppath, sizeof (rppath))) == -1) { + zperror(ppath, B_FALSE); + return (Z_ERR); + } + rppath[res] = '\0'; + if ((res = stat(rppath, &stbuf)) != 0) { + zperror(rppath, B_FALSE); + return (Z_ERR); + } + /* theoretically impossible */ + if (!S_ISDIR(stbuf.st_mode)) { + (void) fprintf(stderr, gettext("%s is not a directory.\n"), + rppath); + return (Z_ERR); + } + if (stbuf.st_uid != 0) { + (void) fprintf(stderr, gettext("%s is not owned by root.\n"), + rppath); + err = B_TRUE; + } + err |= bad_mode_bit(stbuf.st_mode, S_IRUSR, B_TRUE, rppath); + err |= bad_mode_bit(stbuf.st_mode, S_IWUSR, B_TRUE, rppath); + err |= bad_mode_bit(stbuf.st_mode, S_IXUSR, B_TRUE, rppath); + err |= bad_mode_bit(stbuf.st_mode, S_IWGRP, B_FALSE, rppath); + err |= bad_mode_bit(stbuf.st_mode, S_IWOTH, B_FALSE, rppath); + if (strcmp(rpath, rppath) == 0) { + (void) fprintf(stderr, gettext("%s is its own parent.\n"), + rppath); + err = B_TRUE; + } + + if (statvfs(rpath, &vfsbuf) != 0) { + zperror(rpath, B_FALSE); + return (Z_ERR); + } + if (strncmp(vfsbuf.f_basetype, "nfs", 3) == 0) { + (void) fprintf(stderr, gettext("Zonepath %s is over NFS, " + "which is not currently supported.\n"), rpath); + return (Z_ERR); + } + + if ((res = zone_get_state(target_zone, &state)) != Z_OK) { + errno = res; + zperror2(target_zone, gettext("could not get state")); + return (Z_ERR); + } + /* + * The existence of the root path is only bad in the configured state, + * as it is *supposed* to be there at the installed and later states. + * State/command mismatches are caught earlier in verify_details(). + */ + if (state == ZONE_STATE_CONFIGURED) { + if (snprintf(rootpath, sizeof (rootpath), "%s/root", rpath) >= + sizeof (rootpath)) { + (void) fprintf(stderr, + gettext("Zonepath %s is too long.\n"), rpath); + return (Z_ERR); + } + if ((res = stat(rootpath, &stbuf)) == 0) { + (void) fprintf(stderr, gettext("Rootpath %s exists; " + "remove or move aside prior to %s.\n"), rootpath, + cmd_to_str(CMD_INSTALL)); + return (Z_ERR); + } + } + + return (err ? Z_ERR : Z_OK); +} + +static void +release_lock_file(int lockfd) +{ + (void) close(lockfd); +} + +static int +grab_lock_file(const char *zone_name, int *lockfd) +{ + char pathbuf[PATH_MAX]; + struct flock flock; + + if (mkdir(ZONES_TMPDIR, S_IRWXU) < 0 && errno != EEXIST) { + zerror(gettext("could not mkdir %s: %s"), ZONES_TMPDIR, + strerror(errno)); + return (Z_ERR); + } + (void) chmod(ZONES_TMPDIR, S_IRWXU); + + /* + * One of these lock files is created for each zone (when needed). + * The lock files are not cleaned up (except on system reboot), + * but since there is only one per zone, there is no resource + * starvation issue. + */ + (void) snprintf(pathbuf, sizeof (pathbuf), "%s/%s.zoneadm.lock", + ZONES_TMPDIR, zone_name); + if ((*lockfd = open(pathbuf, O_RDWR|O_CREAT, S_IRUSR|S_IWUSR)) < 0) { + zerror(gettext("could not open %s: %s"), pathbuf, + strerror(errno)); + return (Z_ERR); + } + /* + * Lock the file to synchronize with other zoneadmds + */ + flock.l_type = F_WRLCK; + flock.l_whence = SEEK_SET; + flock.l_start = (off_t)0; + flock.l_len = (off_t)0; + if (fcntl(*lockfd, F_SETLKW, &flock) < 0) { + zerror(gettext("unable to lock %s: %s"), pathbuf, + strerror(errno)); + release_lock_file(*lockfd); + return (Z_ERR); + } + return (Z_OK); +} + +static void +get_doorname(const char *zone_name, char *buffer) +{ + (void) snprintf(buffer, PATH_MAX, ZONE_DOOR_PATH, zone_name); +} + +/* + * system daemons are not audited. For the global zone, this occurs + * "naturally" since init is started with the default audit + * characteristics. Since zoneadmd is a system daemon and it starts + * init for a zone, it is necessary to clear out the audit + * characteristics inherited from whomever started zoneadmd. This is + * indicated by the audit id, which is set from the ruid parameter of + * adt_set_user(), below. + */ + +static void +prepare_audit_context() +{ + adt_session_data_t *ah; + char *failure = gettext("audit failure: %s"); + + if (adt_start_session(&ah, NULL, 0)) { + zerror(failure, strerror(errno)); + return; + } + if (adt_set_user(ah, ADT_NO_AUDIT, ADT_NO_AUDIT, + ADT_NO_AUDIT, ADT_NO_AUDIT, NULL, ADT_NEW)) { + zerror(failure, strerror(errno)); + (void) adt_end_session(ah); + return; + } + if (adt_set_proc(ah)) + zerror(failure, strerror(errno)); + + (void) adt_end_session(ah); +} + +static int +start_zoneadmd(const char *zone_name) +{ + char doorpath[PATH_MAX]; + pid_t child_pid; + int error = Z_ERR; + int doorfd, lockfd; + struct door_info info; + + get_doorname(zone_name, doorpath); + + if (grab_lock_file(zone_name, &lockfd) != Z_OK) + return (Z_ERR); + + /* + * Now that we have the lock, re-confirm that the daemon is + * *not* up and working fine. If it is still down, we have a green + * light to start it. + */ + if ((doorfd = open(doorpath, O_RDONLY)) < 0) { + if (errno != ENOENT) { + zperror(doorpath, B_FALSE); + goto out; + } + } else { + if (door_info(doorfd, &info) == 0 && + ((info.di_attributes & DOOR_REVOKED) == 0)) { + error = Z_OK; + (void) close(doorfd); + goto out; + } + (void) close(doorfd); + } + + if ((child_pid = fork()) == -1) { + zperror(gettext("could not fork"), B_FALSE); + goto out; + } else if (child_pid == 0) { + /* child process */ + + prepare_audit_context(); + + (void) execl("/usr/lib/zones/zoneadmd", "zoneadmd", "-z", + zone_name, NULL); + zperror(gettext("could not exec zoneadmd"), B_FALSE); + _exit(Z_ERR); + } else { + /* parent process */ + pid_t retval; + int pstatus = 0; + + do { + retval = waitpid(child_pid, &pstatus, 0); + } while (retval != child_pid); + if (WIFSIGNALED(pstatus) || (WIFEXITED(pstatus) && + WEXITSTATUS(pstatus) != 0)) { + zerror(gettext("could not start %s"), "zoneadmd"); + goto out; + } + } + error = Z_OK; +out: + release_lock_file(lockfd); + return (error); +} + +static int +ping_zoneadmd(const char *zone_name) +{ + char doorpath[PATH_MAX]; + int doorfd; + struct door_info info; + + get_doorname(zone_name, doorpath); + + if ((doorfd = open(doorpath, O_RDONLY)) < 0) { + return (Z_ERR); + } + if (door_info(doorfd, &info) == 0 && + ((info.di_attributes & DOOR_REVOKED) == 0)) { + (void) close(doorfd); + return (Z_OK); + } + (void) close(doorfd); + return (Z_ERR); +} + +static int +call_zoneadmd(const char *zone_name, zone_cmd_arg_t *arg) +{ + char doorpath[PATH_MAX]; + int doorfd, result; + door_arg_t darg; + + zoneid_t zoneid; + uint64_t uniqid = 0; + + zone_cmd_rval_t *rvalp; + size_t rlen; + char *cp, *errbuf; + + rlen = getpagesize(); + if ((rvalp = malloc(rlen)) == NULL) { + zerror(gettext("failed to allocate %lu bytes: %s"), rlen, + strerror(errno)); + return (-1); + } + + if ((zoneid = getzoneidbyname(zone_name)) != ZONE_ID_UNDEFINED) { + (void) zone_getattr(zoneid, ZONE_ATTR_UNIQID, &uniqid, + sizeof (uniqid)); + } + arg->uniqid = uniqid; + (void) strlcpy(arg->locale, locale, sizeof (arg->locale)); + get_doorname(zone_name, doorpath); + + /* + * Loop trying to start zoneadmd; if something goes seriously + * wrong we break out and fail. + */ + for (;;) { + if (start_zoneadmd(zone_name) != Z_OK) + break; + + if ((doorfd = open(doorpath, O_RDONLY)) < 0) { + zperror(gettext("failed to open zone door"), B_FALSE); + break; + } + + darg.data_ptr = (char *)arg; + darg.data_size = sizeof (*arg); + darg.desc_ptr = NULL; + darg.desc_num = 0; + darg.rbuf = (char *)rvalp; + darg.rsize = rlen; + if (door_call(doorfd, &darg) != 0) { + (void) close(doorfd); + /* + * We'll get EBADF if the door has been revoked. + */ + if (errno != EBADF) { + zperror(gettext("door_call failed"), B_FALSE); + break; + } + continue; /* take another lap */ + } + (void) close(doorfd); + + if (darg.data_size == 0) { + /* Door server is going away; kick it again. */ + continue; + } + + errbuf = rvalp->errbuf; + while (*errbuf != '\0') { + /* + * Remove any newlines since zerror() + * will append one automatically. + */ + cp = strchr(errbuf, '\n'); + if (cp != NULL) + *cp = '\0'; + zerror("%s", errbuf); + if (cp == NULL) + break; + errbuf = cp + 1; + } + result = rvalp->rval == 0 ? 0 : -1; + free(rvalp); + return (result); + } + + free(rvalp); + return (-1); +} + +static int +ready_func(int argc, char *argv[]) +{ + zone_cmd_arg_t zarg; + int arg; + + optind = 0; + if ((arg = getopt(argc, argv, "?")) != EOF) { + switch (arg) { + case '?': + sub_usage(SHELP_READY, CMD_READY); + return (optopt == '?' ? Z_OK : Z_USAGE); + default: + sub_usage(SHELP_READY, CMD_READY); + return (Z_USAGE); + } + } + if (argc > optind) { + sub_usage(SHELP_READY, CMD_READY); + return (Z_USAGE); + } + if (sanity_check(target_zone, CMD_READY, B_FALSE, B_FALSE) != Z_OK) + return (Z_ERR); + if (verify_details(CMD_READY) != Z_OK) + return (Z_ERR); + + zarg.cmd = Z_READY; + if (call_zoneadmd(target_zone, &zarg) != 0) { + zerror(gettext("call to %s failed"), "zoneadmd"); + return (Z_ERR); + } + return (Z_OK); +} + +static int +boot_func(int argc, char *argv[]) +{ + zone_cmd_arg_t zarg; + int arg; + + zarg.bootbuf[0] = '\0'; + + /* + * At the current time, the only supported subargument to the + * "boot" subcommand is "-s" which specifies a single-user boot. + * In the future, other boot arguments should be supported + * including "-m" for specifying alternate smf(5) milestones. + */ + optind = 0; + if ((arg = getopt(argc, argv, "?s")) != EOF) { + switch (arg) { + case '?': + sub_usage(SHELP_BOOT, CMD_BOOT); + return (optopt == '?' ? Z_OK : Z_USAGE); + case 's': + (void) strlcpy(zarg.bootbuf, "-s", + sizeof (zarg.bootbuf)); + break; + default: + sub_usage(SHELP_BOOT, CMD_BOOT); + return (Z_USAGE); + } + } + if (argc > optind) { + sub_usage(SHELP_BOOT, CMD_BOOT); + return (Z_USAGE); + } + if (sanity_check(target_zone, CMD_BOOT, B_FALSE, B_FALSE) != Z_OK) + return (Z_ERR); + if (verify_details(CMD_BOOT) != Z_OK) + return (Z_ERR); + zarg.cmd = Z_BOOT; + if (call_zoneadmd(target_zone, &zarg) != 0) { + zerror(gettext("call to %s failed"), "zoneadmd"); + return (Z_ERR); + } + return (Z_OK); +} + +static void +fake_up_local_zone(zoneid_t zid, zone_entry_t *zeptr) +{ + ssize_t result; + + zeptr->zid = zid; + /* + * Since we're looking up our own (non-global) zone name, + * we can be assured that it will succeed. + */ + result = getzonenamebyid(zid, zeptr->zname, sizeof (zeptr->zname)); + assert(result >= 0); + (void) strlcpy(zeptr->zroot, "/", sizeof (zeptr->zroot)); + zeptr->zstate_str = "running"; +} + +static int +list_func(int argc, char *argv[]) +{ + zone_entry_t *zentp, zent; + int arg; + boolean_t output = B_FALSE, verbose = B_FALSE, parsable = B_FALSE; + zone_state_t min_state = ZONE_STATE_RUNNING; + zoneid_t zone_id = getzoneid(); + + if (target_zone == NULL) { + /* all zones: default view to running but allow override */ + optind = 0; + while ((arg = getopt(argc, argv, "?cipv")) != EOF) { + switch (arg) { + case '?': + sub_usage(SHELP_LIST, CMD_LIST); + return (optopt == '?' ? Z_OK : Z_USAGE); + case 'c': + min_state = ZONE_STATE_CONFIGURED; + break; + case 'i': + min_state = ZONE_STATE_INSTALLED; + break; + case 'p': + parsable = B_TRUE; + break; + case 'v': + verbose = B_TRUE; + break; + default: + sub_usage(SHELP_LIST, CMD_LIST); + return (Z_USAGE); + } + } + if (parsable && verbose) { + zerror(gettext("%s -p and -v are mutually exclusive."), + cmd_to_str(CMD_LIST)); + return (Z_ERR); + } + if (zone_id == GLOBAL_ZONEID) { + zone_print_list(min_state, verbose, parsable); + } else { + fake_up_local_zone(zone_id, &zent); + zone_print(&zent, verbose, parsable); + } + return (Z_OK); + } + + /* + * Specific target zone: disallow -i/-c suboptions. + */ + optind = 0; + while ((arg = getopt(argc, argv, "?pv")) != EOF) { + switch (arg) { + case '?': + sub_usage(SHELP_LIST, CMD_LIST); + return (optopt == '?' ? Z_OK : Z_USAGE); + case 'p': + parsable = B_TRUE; + break; + case 'v': + verbose = B_TRUE; + break; + default: + sub_usage(SHELP_LIST, CMD_LIST); + return (Z_USAGE); + } + } + if (parsable && verbose) { + zerror(gettext("%s -p and -v are mutually exclusive."), + cmd_to_str(CMD_LIST)); + return (Z_ERR); + } + if (argc > optind) { + sub_usage(SHELP_LIST, CMD_LIST); + return (Z_USAGE); + } + if (zone_id != GLOBAL_ZONEID) { + fake_up_local_zone(zone_id, &zent); + /* + * main() will issue a Z_NO_ZONE error if it cannot get an + * id for target_zone, which in a non-global zone should + * happen for any zone name except `zonename`. Thus we + * assert() that here but don't otherwise check. + */ + assert(strcmp(zent.zname, target_zone) == 0); + zone_print(&zent, verbose, parsable); + output = B_TRUE; + } else if ((zentp = lookup_running_zone(target_zone)) != NULL) { + zone_print(zentp, verbose, parsable); + output = B_TRUE; + } else if (lookup_zone_info(target_zone, &zent) == Z_OK) { + zone_print(&zent, verbose, parsable); + output = B_TRUE; + } + return (output ? Z_OK : Z_ERR); +} + +static void +sigterm(int sig) +{ + /* + * Ignore SIG{INT,TERM}, so we don't end up in an infinite loop, + * then propagate the signal to our process group. + */ + (void) sigset(SIGINT, SIG_IGN); + (void) sigset(SIGTERM, SIG_IGN); + (void) kill(0, sig); + child_killed = B_TRUE; +} + +static int +do_subproc(char *cmdbuf) +{ + char inbuf[1024]; /* arbitrary large amount */ + FILE *file; + + child_killed = B_FALSE; + /* + * We use popen(3c) to launch child processes for [un]install; + * this library call does not return a PID, so we have to kill + * the whole process group. To avoid killing our parent, we + * become a process group leader here. But doing so can wreak + * havoc with reading from stdin when launched by a non-job-control + * shell, so we close stdin and reopen it as /dev/null first. + */ + (void) close(STDIN_FILENO); + (void) open("/dev/null", O_RDONLY); + (void) setpgid(0, 0); + (void) sigset(SIGINT, sigterm); + (void) sigset(SIGTERM, sigterm); + file = popen(cmdbuf, "r"); + for (;;) { + if (child_killed || fgets(inbuf, sizeof (inbuf), file) == NULL) + break; + (void) fputs(inbuf, stdout); + } + (void) sigset(SIGINT, SIG_DFL); + (void) sigset(SIGTERM, SIG_DFL); + return (pclose(file)); +} + +static int +subproc_status(const char *cmd, int status) +{ + if (WIFEXITED(status)) { + int exit_code = WEXITSTATUS(status); + + if (exit_code == 0) + return (Z_OK); + zerror(gettext("'%s' failed with exit code %d."), cmd, + exit_code); + } else if (WIFSIGNALED(status)) { + int signal = WTERMSIG(status); + char sigstr[SIG2STR_MAX]; + + if (sig2str(signal, sigstr) == 0) { + zerror(gettext("'%s' terminated by signal SIG%s."), cmd, + sigstr); + } else { + zerror(gettext("'%s' terminated by an unknown signal."), + cmd); + } + } else { + zerror(gettext("'%s' failed for unknown reasons."), cmd); + } + return (Z_ERR); +} + +/* + * Various sanity checks; make sure: + * 1. We're in the global zone. + * 2. The calling user has sufficient privilege. + * 3. The target zone is neither the global zone nor anything starting with + * "SUNW". + * 4a. If we're looking for a 'not running' (i.e., configured or installed) + * zone, the name service knows about it. + * 4b. For some operations which expect a zone not to be running, that it is + * not already running (or ready). + */ +static int +sanity_check(char *zone, int cmd_num, boolean_t running, + boolean_t unsafe_when_running) +{ + zone_entry_t *zent; + priv_set_t *privset; + zone_state_t state; + + if (getzoneid() != GLOBAL_ZONEID) { + zerror(gettext("must be in the global zone to %s a zone."), + cmd_to_str(cmd_num)); + return (Z_ERR); + } + + if ((privset = priv_allocset()) == NULL) { + zerror(gettext("%s failed"), "priv_allocset"); + return (Z_ERR); + } + + if (getppriv(PRIV_EFFECTIVE, privset) != 0) { + zerror(gettext("%s failed"), "getppriv"); + priv_freeset(privset); + return (Z_ERR); + } + + if (priv_isfullset(privset) == B_FALSE) { + zerror(gettext("only a privileged user may %s a zone."), + cmd_to_str(cmd_num)); + priv_freeset(privset); + return (Z_ERR); + } + priv_freeset(privset); + + if (zone == NULL) { + zerror(gettext("no zone specified")); + return (Z_ERR); + } + + zent = lookup_running_zone(zone); + + if (strcmp(zone, GLOBAL_ZONENAME) == 0) { + assert((zent != NULL) && (zent->zid == GLOBAL_ZONEID)); + zerror(gettext("%s operation is invalid for the global zone."), + cmd_to_str(cmd_num)); + return (Z_ERR); + } + + if (strncmp(zone, "SUNW", 4) == 0) { + zerror(gettext("%s operation is invalid for zones starting " + "with SUNW."), cmd_to_str(cmd_num)); + return (Z_ERR); + } + + /* + * Look up from the kernel for 'running' zones. + */ + if (running) { + if (zent == NULL) { + zerror(gettext("not running")); + return (Z_ERR); + } + } else { + int err; + + if (unsafe_when_running && zent != NULL) { + /* check whether the zone is ready or running */ + if ((err = zone_get_state(zent->zname, + &zent->zstate_num)) != Z_OK) { + errno = err; + zperror2(zent->zname, + gettext("could not get state")); + /* can't tell, so hedge */ + zent->zstate_str = "ready/running"; + } else { + zent->zstate_str = + zone_state_str(zent->zstate_num); + } + zerror(gettext("%s operation is invalid for %s zones."), + cmd_to_str(cmd_num), zent->zstate_str); + return (Z_ERR); + } + if ((err = zone_get_state(zone, &state)) != Z_OK) { + errno = err; + zperror2(zone, gettext("could not get state")); + return (Z_ERR); + } + switch (cmd_num) { + case CMD_UNINSTALL: + if (state == ZONE_STATE_CONFIGURED) { + zerror(gettext("is already in state '%s'."), + zone_state_str(ZONE_STATE_CONFIGURED)); + return (Z_ERR); + } + break; + case CMD_INSTALL: + if (state == ZONE_STATE_INSTALLED) { + zerror(gettext("is already %s."), + zone_state_str(ZONE_STATE_INSTALLED)); + return (Z_ERR); + } else if (state == ZONE_STATE_INCOMPLETE) { + zerror(gettext("zone is %s; %s required."), + zone_state_str(ZONE_STATE_INCOMPLETE), + cmd_to_str(CMD_UNINSTALL)); + return (Z_ERR); + } + break; + case CMD_READY: + case CMD_BOOT: + if (state < ZONE_STATE_INSTALLED) { + zerror(gettext("must be %s before %s."), + zone_state_str(ZONE_STATE_INSTALLED), + cmd_to_str(cmd_num)); + return (Z_ERR); + } + break; + case CMD_VERIFY: + if (state == ZONE_STATE_INCOMPLETE) { + zerror(gettext("zone is %s; %s required."), + zone_state_str(ZONE_STATE_INCOMPLETE), + cmd_to_str(CMD_UNINSTALL)); + return (Z_ERR); + } + break; + } + } + return (Z_OK); +} + +static int +halt_func(int argc, char *argv[]) +{ + zone_cmd_arg_t zarg; + int arg; + + optind = 0; + if ((arg = getopt(argc, argv, "?")) != EOF) { + switch (arg) { + case '?': + sub_usage(SHELP_HALT, CMD_HALT); + return (optopt == '?' ? Z_OK : Z_USAGE); + default: + sub_usage(SHELP_HALT, CMD_HALT); + return (Z_USAGE); + } + } + if (argc > optind) { + sub_usage(SHELP_HALT, CMD_HALT); + return (Z_USAGE); + } + /* + * zoneadmd should be the one to decide whether or not to proceed, + * so even though it seems that the fourth parameter below should + * perhaps be B_TRUE, it really shouldn't be. + */ + if (sanity_check(target_zone, CMD_HALT, B_FALSE, B_FALSE) != Z_OK) + return (Z_ERR); + + zarg.cmd = Z_HALT; + return ((call_zoneadmd(target_zone, &zarg) == 0) ? Z_OK : Z_ERR); +} + +static int +reboot_func(int argc, char *argv[]) +{ + zone_cmd_arg_t zarg; + int arg; + + optind = 0; + if ((arg = getopt(argc, argv, "?")) != EOF) { + switch (arg) { + case '?': + sub_usage(SHELP_REBOOT, CMD_REBOOT); + return (optopt == '?' ? Z_OK : Z_USAGE); + default: + sub_usage(SHELP_REBOOT, CMD_REBOOT); + return (Z_USAGE); + } + } + if (argc > 0) { + sub_usage(SHELP_REBOOT, CMD_REBOOT); + return (Z_USAGE); + } + /* + * zoneadmd should be the one to decide whether or not to proceed, + * so even though it seems that the fourth parameter below should + * perhaps be B_TRUE, it really shouldn't be. + */ + if (sanity_check(target_zone, CMD_REBOOT, B_TRUE, B_FALSE) != Z_OK) + return (Z_ERR); + + zarg.cmd = Z_REBOOT; + return ((call_zoneadmd(target_zone, &zarg) == 0) ? Z_OK : Z_ERR); +} + +static int +verify_rctls(zone_dochandle_t handle) +{ + struct zone_rctltab rctltab; + size_t rbs = rctlblk_size(); + rctlblk_t *rctlblk; + int error = Z_INVAL; + + if ((rctlblk = malloc(rbs)) == NULL) { + zerror(gettext("failed to allocate %lu bytes: %s"), rbs, + strerror(errno)); + return (Z_NOMEM); + } + + if (zonecfg_setrctlent(handle) != Z_OK) { + zerror(gettext("zonecfg_setrctlent failed")); + free(rctlblk); + return (error); + } + + rctltab.zone_rctl_valptr = NULL; + while (zonecfg_getrctlent(handle, &rctltab) == Z_OK) { + struct zone_rctlvaltab *rctlval; + const char *name = rctltab.zone_rctl_name; + + if (!zonecfg_is_rctl(name)) { + zerror(gettext("WARNING: Ignoring unrecognized rctl " + "'%s'."), name); + zonecfg_free_rctl_value_list(rctltab.zone_rctl_valptr); + rctltab.zone_rctl_valptr = NULL; + continue; + } + + for (rctlval = rctltab.zone_rctl_valptr; rctlval != NULL; + rctlval = rctlval->zone_rctlval_next) { + if (zonecfg_construct_rctlblk(rctlval, rctlblk) + != Z_OK) { + zerror(gettext("invalid rctl value: " + "(priv=%s,limit=%s,action%s)"), + rctlval->zone_rctlval_priv, + rctlval->zone_rctlval_limit, + rctlval->zone_rctlval_action); + goto out; + } + if (!zonecfg_valid_rctl(name, rctlblk)) { + zerror(gettext("(priv=%s,limit=%s,action=%s) " + "is not a valid value for rctl '%s'"), + rctlval->zone_rctlval_priv, + rctlval->zone_rctlval_limit, + rctlval->zone_rctlval_action, + name); + goto out; + } + } + zonecfg_free_rctl_value_list(rctltab.zone_rctl_valptr); + } + rctltab.zone_rctl_valptr = NULL; + error = Z_OK; +out: + zonecfg_free_rctl_value_list(rctltab.zone_rctl_valptr); + (void) zonecfg_endrctlent(handle); + free(rctlblk); + return (error); +} + +static int +verify_pool(zone_dochandle_t handle) +{ + char poolname[MAXPATHLEN]; + pool_conf_t *poolconf; + pool_t *pool; + int status; + int error; + + /* + * This ends up being very similar to the check done in zoneadmd. + */ + error = zonecfg_get_pool(handle, poolname, sizeof (poolname)); + if (error == Z_NO_ENTRY || (error == Z_OK && strlen(poolname) == 0)) { + /* + * No pool specified. + */ + return (0); + } + if (error != Z_OK) { + zperror(gettext("Unable to retrieve pool name from " + "configuration"), B_TRUE); + return (error); + } + /* + * Don't do anything if pools aren't enabled. + */ + if (pool_get_status(&status) != PO_SUCCESS || status != POOL_ENABLED) { + zerror(gettext("WARNING: pools facility not active; " + "zone will not be bound to pool '%s'."), poolname); + return (Z_OK); + } + /* + * Try to provide a sane error message if the requested pool doesn't + * exist. It isn't clear that pools-related failures should + * necessarily translate to a failure to verify the zone configuration, + * hence they are not considered errors. + */ + if ((poolconf = pool_conf_alloc()) == NULL) { + zerror(gettext("WARNING: pool_conf_alloc failed; " + "using default pool")); + return (Z_OK); + } + if (pool_conf_open(poolconf, pool_dynamic_location(), PO_RDONLY) != + PO_SUCCESS) { + zerror(gettext("WARNING: pool_conf_open failed; " + "using default pool")); + pool_conf_free(poolconf); + return (Z_OK); + } + pool = pool_get_pool(poolconf, poolname); + (void) pool_conf_close(poolconf); + pool_conf_free(poolconf); + if (pool == NULL) { + zerror(gettext("WARNING: pool '%s' not found. " + "using default pool"), poolname); + } + + return (Z_OK); +} + +static int +verify_filesystems(zone_dochandle_t handle) +{ + int return_code = Z_OK; + struct zone_fstab fstab; + char cmdbuf[MAXPATHLEN]; + struct stat st; + + /* + * No need to verify inherit-pkg-dir fs types, as their type is + * implicitly lofs, which is known. Therefore, the types are only + * verified for regular filesystems below. + * + * Since the actual mount point is not known until the dependent mounts + * are performed, we don't attempt any path validation here: that will + * happen later when zoneadmd actually does the mounts. + */ + if (zonecfg_setfsent(handle) != Z_OK) { + (void) fprintf(stderr, gettext("cannot verify file-systems: " + "unable to enumerate mounts\n")); + return (Z_ERR); + } + while (zonecfg_getfsent(handle, &fstab) == Z_OK) { + if (!zonecfg_valid_fs_type(fstab.zone_fs_type)) { + (void) fprintf(stderr, gettext("cannot verify fs %s: " + "type %s is not allowed.\n"), fstab.zone_fs_dir, + fstab.zone_fs_type); + return_code = Z_ERR; + goto next_fs; + } + /* + * Verify /usr/lib/fs/<fstype>/mount exists. + */ + if (snprintf(cmdbuf, sizeof (cmdbuf), "/usr/lib/fs/%s/mount", + fstab.zone_fs_type) > sizeof (cmdbuf)) { + (void) fprintf(stderr, gettext("cannot verify fs %s: " + "type %s is too long.\n"), fstab.zone_fs_dir, + fstab.zone_fs_type); + return_code = Z_ERR; + goto next_fs; + } + if (stat(cmdbuf, &st) != 0) { + (void) fprintf(stderr, gettext("cannot verify fs %s: " + "can't access %s: %s\n"), fstab.zone_fs_dir, + cmdbuf, strerror(errno)); + return_code = Z_ERR; + goto next_fs; + } + if (!S_ISREG(st.st_mode)) { + (void) fprintf(stderr, gettext("cannot verify fs %s: " + "%s is not a regular file\n"), fstab.zone_fs_dir, + cmdbuf); + return_code = Z_ERR; + goto next_fs; + } + /* + * Verify /usr/lib/fs/<fstype>/fsck exists iff zone_fs_raw is + * set. + */ + if (snprintf(cmdbuf, sizeof (cmdbuf), "/usr/lib/fs/%s/fsck", + fstab.zone_fs_type) > sizeof (cmdbuf)) { + (void) fprintf(stderr, gettext("cannot verify fs %s: " + "type %s is too long.\n"), fstab.zone_fs_dir, + fstab.zone_fs_type); + return_code = Z_ERR; + goto next_fs; + } + if (fstab.zone_fs_raw[0] == '\0' && stat(cmdbuf, &st) == 0) { + (void) fprintf(stderr, gettext("cannot verify fs %s: " + "must specify 'raw' device for %s file-systems\n"), + fstab.zone_fs_dir, fstab.zone_fs_type); + return_code = Z_ERR; + goto next_fs; + } + if (fstab.zone_fs_raw[0] != '\0' && + (stat(cmdbuf, &st) != 0 || !S_ISREG(st.st_mode))) { + (void) fprintf(stderr, gettext("cannot verify fs %s: " + "'raw' device specified but " + "no fsck executable exists for %s\n"), + fstab.zone_fs_dir, fstab.zone_fs_type); + return_code = Z_ERR; + goto next_fs; + } +next_fs: + zonecfg_free_fs_option_list(fstab.zone_fs_options); + } + (void) zonecfg_endfsent(handle); + + return (return_code); +} + +static int +verify_details(int cmd_num) +{ + zone_dochandle_t handle; + struct zone_nwiftab nwiftab; + char zonepath[MAXPATHLEN], checkpath[MAXPATHLEN]; + int return_code = Z_OK; + int err; + + if ((handle = zonecfg_init_handle()) == NULL) { + zperror(cmd_to_str(cmd_num), B_TRUE); + return (Z_ERR); + } + if ((err = zonecfg_get_handle(target_zone, handle)) != Z_OK) { + errno = err; + zperror(cmd_to_str(cmd_num), B_TRUE); + zonecfg_fini_handle(handle); + return (Z_ERR); + } + if ((err = zonecfg_get_zonepath(handle, zonepath, sizeof (zonepath))) != + Z_OK) { + errno = err; + zperror(cmd_to_str(cmd_num), B_TRUE); + zonecfg_fini_handle(handle); + return (Z_ERR); + } + /* + * zonecfg_get_zonepath() gets its data from the XML repository. + * Verify this against the index file, which is checked first by + * zone_get_zonepath(). If they don't match, bail out. + */ + if ((err = zone_get_zonepath(target_zone, checkpath, + sizeof (checkpath))) != Z_OK) { + errno = err; + zperror2(target_zone, gettext("could not get zone path")); + return (Z_ERR); + } + if (strcmp(zonepath, checkpath) != 0) { + (void) fprintf(stderr, gettext("The XML repository has " + "zonepath '%s',\nbut the index file has zonepath '%s'.\n" + "These must match, so fix the incorrect entry.\n"), + zonepath, checkpath); + return (Z_ERR); + } + if (validate_zonepath(zonepath, cmd_num) != Z_OK) { + (void) fprintf(stderr, gettext("could not verify zonepath %s " + "because of the above errors.\n"), zonepath); + return_code = Z_ERR; + } + + if ((err = zonecfg_setnwifent(handle)) != Z_OK) { + errno = err; + zperror(cmd_to_str(cmd_num), B_TRUE); + zonecfg_fini_handle(handle); + return (Z_ERR); + } + while (zonecfg_getnwifent(handle, &nwiftab) == Z_OK) { + struct lifreq lifr; + sa_family_t af; + int so, res; + + /* skip any loopback interfaces */ + if (strcmp(nwiftab.zone_nwif_physical, "lo0") == 0) + continue; + if ((res = zonecfg_valid_net_address(nwiftab.zone_nwif_address, + &lifr)) != Z_OK) { + (void) fprintf(stderr, gettext("could not verify %s " + "%s=%s %s=%s: %s\n"), "net", "address", + nwiftab.zone_nwif_address, "physical", + nwiftab.zone_nwif_physical, zonecfg_strerror(res)); + return_code = Z_ERR; + continue; + } + af = lifr.lifr_addr.ss_family; + (void) memset(&lifr, 0, sizeof (lifr)); + (void) strlcpy(lifr.lifr_name, nwiftab.zone_nwif_physical, + sizeof (lifr.lifr_name)); + lifr.lifr_addr.ss_family = af; + if ((so = socket(af, SOCK_DGRAM, 0)) < 0) { + (void) fprintf(stderr, gettext("could not verify %s " + "%s=%s %s=%s: could not get socket: %s\n"), "net", + "address", nwiftab.zone_nwif_address, "physical", + nwiftab.zone_nwif_physical, strerror(errno)); + return_code = Z_ERR; + continue; + } + if (ioctl(so, SIOCGLIFFLAGS, (caddr_t)&lifr) < 0) { + (void) fprintf(stderr, + gettext("could not verify %s %s=%s %s=%s: %s\n"), + "net", "address", nwiftab.zone_nwif_address, + "physical", nwiftab.zone_nwif_physical, + strerror(errno)); + return_code = Z_ERR; + } + (void) close(so); + } + (void) zonecfg_endnwifent(handle); + + if (verify_filesystems(handle) != Z_OK) + return_code = Z_ERR; + if (verify_rctls(handle) != Z_OK) + return_code = Z_ERR; + if (verify_pool(handle) != Z_OK) + return_code = Z_ERR; + zonecfg_fini_handle(handle); + if (return_code == Z_ERR) + (void) fprintf(stderr, + gettext("%s: zone %s failed to verify\n"), + execname, target_zone); + return (return_code); +} + +static int +verify_func(int argc, char *argv[]) +{ + int arg; + + optind = 0; + if ((arg = getopt(argc, argv, "?")) != EOF) { + switch (arg) { + case '?': + sub_usage(SHELP_VERIFY, CMD_VERIFY); + return (optopt == '?' ? Z_OK : Z_USAGE); + default: + sub_usage(SHELP_VERIFY, CMD_VERIFY); + return (Z_USAGE); + } + } + if (argc > optind) { + sub_usage(SHELP_VERIFY, CMD_VERIFY); + return (Z_USAGE); + } + if (sanity_check(target_zone, CMD_VERIFY, B_FALSE, B_FALSE) != Z_OK) + return (Z_ERR); + return (verify_details(CMD_VERIFY)); +} + +#define LUCREATEZONE "/usr/lib/lu/lucreatezone" + +static int +install_func(int argc, char *argv[]) +{ + /* 9: "exec " and " -z " */ + char cmdbuf[sizeof (LUCREATEZONE) + ZONENAME_MAX + 9]; + int lockfd; + int err, arg; + char zonepath[MAXPATHLEN]; + int status; + + optind = 0; + if ((arg = getopt(argc, argv, "?")) != EOF) { + switch (arg) { + case '?': + sub_usage(SHELP_INSTALL, CMD_INSTALL); + return (optopt == '?' ? Z_OK : Z_USAGE); + default: + sub_usage(SHELP_INSTALL, CMD_INSTALL); + return (Z_USAGE); + } + } + if (argc > optind) { + sub_usage(SHELP_INSTALL, CMD_INSTALL); + return (Z_USAGE); + } + if (sanity_check(target_zone, CMD_INSTALL, B_FALSE, B_TRUE) != Z_OK) + return (Z_ERR); + if (verify_details(CMD_INSTALL) != Z_OK) + return (Z_ERR); + + if (grab_lock_file(target_zone, &lockfd) != Z_OK) { + zerror(gettext("another %s may have an operation in progress."), + "zoneadmd"); + return (Z_ERR); + } + err = zone_set_state(target_zone, ZONE_STATE_INCOMPLETE); + if (err != Z_OK) { + errno = err; + zperror2(target_zone, gettext("could not set state")); + goto done; + } + + /* + * According to the Application Packaging Developer's Guide, a + * "checkinstall" script when included in a package is executed as + * the user "install", if such a user exists, or by the user + * "nobody". In order to support this dubious behavior, the path + * to the zone being constructed is opened up during the life of + * the command laying down the zone's root file system. Once this + * has completed, regardless of whether it was successful, the + * path to the zone is again restricted. + */ + if ((err = zone_get_zonepath(target_zone, zonepath, + sizeof (zonepath))) != Z_OK) { + errno = err; + zperror2(target_zone, gettext("could not get zone path")); + goto done; + } + if (chmod(zonepath, DEFAULT_DIR_MODE) != 0) { + zperror(zonepath, B_FALSE); + err = Z_ERR; + goto done; + } + + /* + * "exec" the command so that the returned status is that of + * LUCREATEZONE and not the shell. + */ + (void) snprintf(cmdbuf, sizeof (cmdbuf), "exec " LUCREATEZONE " -z %s", + target_zone); + status = do_subproc(cmdbuf); + if (chmod(zonepath, S_IRWXU) != 0) { + zperror(zonepath, B_FALSE); + err = Z_ERR; + goto done; + } + if ((err = subproc_status(LUCREATEZONE, status)) != Z_OK) + goto done; + + if ((err = zone_set_state(target_zone, ZONE_STATE_INSTALLED)) != Z_OK) { + errno = err; + zperror2(target_zone, gettext("could not set state")); + goto done; + } + +done: + release_lock_file(lockfd); + return ((err == Z_OK) ? Z_OK : Z_ERR); +} + +/* + * On input, TRUE => yes, FALSE => no. + * On return, TRUE => 1, FALSE => 0, could not ask => -1. + */ + +static int +ask_yesno(boolean_t default_answer, const char *question) +{ + char line[64]; /* should be large enough to answer yes or no */ + + if (!isatty(STDIN_FILENO)) + return (-1); + for (;;) { + (void) printf("%s (%s)? ", question, + default_answer ? "[y]/n" : "y/[n]"); + if (fgets(line, sizeof (line), stdin) == NULL || + line[0] == '\n') + return (default_answer ? 1 : 0); + if (tolower(line[0]) == 'y') + return (1); + if (tolower(line[0]) == 'n') + return (0); + } +} + +#define RMCOMMAND "/usr/bin/rm -rf" + +/* ARGSUSED */ +int +zfm_print(const char *p, void *r) { + zerror(" %s\n", p); + return (0); +} + +static int +uninstall_func(int argc, char *argv[]) +{ + /* 6: "exec " and " " */ + char cmdbuf[sizeof (RMCOMMAND) + MAXPATHLEN + 6]; + char line[ZONENAME_MAX + 128]; /* Enough for "Are you sure ..." */ + char rootpath[MAXPATHLEN], devpath[MAXPATHLEN]; + boolean_t force = B_FALSE; + int lockfd, answer; + int err, arg; + int status; + + optind = 0; + while ((arg = getopt(argc, argv, "?F")) != EOF) { + switch (arg) { + case '?': + sub_usage(SHELP_UNINSTALL, CMD_UNINSTALL); + return (optopt == '?' ? Z_OK : Z_USAGE); + case 'F': + force = B_TRUE; + break; + default: + sub_usage(SHELP_UNINSTALL, CMD_UNINSTALL); + return (Z_USAGE); + } + } + if (argc > optind) { + sub_usage(SHELP_UNINSTALL, CMD_UNINSTALL); + return (Z_USAGE); + } + + if (sanity_check(target_zone, CMD_UNINSTALL, B_FALSE, B_TRUE) != Z_OK) + return (Z_ERR); + + if (!force) { + (void) snprintf(line, sizeof (line), + gettext("Are you sure you want to %s zone %s"), + cmd_to_str(CMD_UNINSTALL), target_zone); + if ((answer = ask_yesno(B_FALSE, line)) == 0) { + return (Z_OK); + } else if (answer == -1) { + zerror(gettext("Input not from terminal and -F " + "not specified: %s not done."), + cmd_to_str(CMD_UNINSTALL)); + return (Z_ERR); + } + } + + if ((err = zone_get_zonepath(target_zone, devpath, + sizeof (devpath))) != Z_OK) { + errno = err; + zperror2(target_zone, gettext("could not get zone path")); + return (Z_ERR); + } + (void) strlcat(devpath, "/dev", sizeof (devpath)); + if ((err = zone_get_rootpath(target_zone, rootpath, + sizeof (rootpath))) != Z_OK) { + errno = err; + zperror2(target_zone, gettext("could not get root path")); + return (Z_ERR); + } + + /* + * If there seems to be a zoneadmd running for this zone, call it + * to tell it that an uninstall is happening; if all goes well it + * will then shut itself down. + */ + if (ping_zoneadmd(target_zone) == Z_OK) { + zone_cmd_arg_t zarg; + zarg.cmd = Z_NOTE_UNINSTALLING; + /* we don't care too much if this fails... just plow on */ + (void) call_zoneadmd(target_zone, &zarg); + } + + if (grab_lock_file(target_zone, &lockfd) != Z_OK) { + zerror(gettext("another %s may have an operation in progress."), + "zoneadmd"); + return (Z_ERR); + } + + /* Don't uninstall the zone if anything is mounted there */ + err = zonecfg_find_mounts(rootpath, NULL, NULL); + if (err) { + zerror(gettext("These file-systems are mounted on " + "subdirectories of %s.\n"), rootpath); + (void) zonecfg_find_mounts(rootpath, zfm_print, NULL); + return (Z_ERR); + } + + err = zone_set_state(target_zone, ZONE_STATE_INCOMPLETE); + if (err != Z_OK) { + errno = err; + zperror2(target_zone, gettext("could not set state")); + goto bad; + } + + /* + * "exec" the command so that the returned status is that of + * RMCOMMAND and not the shell. + */ + (void) snprintf(cmdbuf, sizeof (cmdbuf), "exec " RMCOMMAND " %s", + devpath); + status = do_subproc(cmdbuf); + if ((err = subproc_status(RMCOMMAND, status)) != Z_OK) + goto bad; + (void) snprintf(cmdbuf, sizeof (cmdbuf), "exec " RMCOMMAND " %s", + rootpath); + status = do_subproc(cmdbuf); + if ((err = subproc_status(RMCOMMAND, status)) != Z_OK) + goto bad; + err = zone_set_state(target_zone, ZONE_STATE_CONFIGURED); + if (err != Z_OK) { + errno = err; + zperror2(target_zone, gettext("could not reset state")); + } +bad: + release_lock_file(lockfd); + return (err); +} + +static int +help_func(int argc, char *argv[]) +{ + int arg, cmd_num; + + if (argc == 0) { + (void) usage(B_TRUE); + return (Z_OK); + } + optind = 0; + if ((arg = getopt(argc, argv, "?")) != EOF) { + switch (arg) { + case '?': + sub_usage(SHELP_HELP, CMD_HELP); + return (optopt == '?' ? Z_OK : Z_USAGE); + default: + sub_usage(SHELP_HELP, CMD_HELP); + return (Z_USAGE); + } + } + while (optind < argc) { + if ((cmd_num = cmd_match(argv[optind])) < 0) { + sub_usage(SHELP_HELP, CMD_HELP); + return (Z_USAGE); + } + sub_usage(cmdtab[cmd_num].short_usage, cmd_num); + optind++; + } + return (Z_OK); +} + +/* + * Returns: CMD_MIN thru CMD_MAX on success, -1 on error + */ + +static int +cmd_match(char *cmd) +{ + int i; + + for (i = CMD_MIN; i <= CMD_MAX; i++) { + /* return only if there is an exact match */ + if (strcmp(cmd, cmdtab[i].cmd_name) == 0) + return (cmdtab[i].cmd_num); + } + return (-1); +} + +static int +parse_and_run(int argc, char *argv[]) +{ + int i = cmd_match(argv[0]); + + if (i < 0) + return (usage(B_FALSE)); + return (cmdtab[i].handler(argc - 1, &(argv[1]))); +} + +static char * +get_execbasename(char *execfullname) +{ + char *last_slash, *execbasename; + + /* guard against '/' at end of command invocation */ + for (;;) { + last_slash = strrchr(execfullname, '/'); + if (last_slash == NULL) { + execbasename = execfullname; + break; + } else { + execbasename = last_slash + 1; + if (*execbasename == '\0') { + *last_slash = '\0'; + continue; + } + break; + } + } + return (execbasename); +} + +int +main(int argc, char **argv) +{ + int arg; + zoneid_t zid; + + if ((locale = setlocale(LC_ALL, "")) == NULL) + locale = "C"; + (void) textdomain(TEXT_DOMAIN); + setbuf(stdout, NULL); + (void) sigset(SIGHUP, SIG_IGN); + execname = get_execbasename(argv[0]); + target_zone = NULL; + if (chdir("/") != 0) { + zerror(gettext("could not change directory to /.")); + exit(Z_ERR); + } + + while ((arg = getopt(argc, argv, "?z:")) != EOF) { + switch (arg) { + case '?': + return (usage(B_TRUE)); + case 'z': + target_zone = optarg; + break; + default: + return (usage(B_FALSE)); + } + } + + if (optind >= argc) + return (usage(B_FALSE)); + if (target_zone != NULL && zone_get_id(target_zone, &zid) != 0) { + errno = Z_NO_ZONE; + zperror(target_zone, B_TRUE); + exit(Z_ERR); + } + return (parse_and_run(argc - optind, &argv[optind])); +} diff --git a/usr/src/cmd/zoneadm/zones.xml b/usr/src/cmd/zoneadm/zones.xml new file mode 100644 index 0000000000..c14ec7ed79 --- /dev/null +++ b/usr/src/cmd/zoneadm/zones.xml @@ -0,0 +1,90 @@ +<?xml version="1.0"?> +<!DOCTYPE service_bundle SYSTEM "/usr/share/lib/xml/dtd/service_bundle.dtd.1"> +<!-- + Copyright 2005 Sun Microsystems, Inc. All rights reserved. + Use is subject to license terms. + + CDDL HEADER START + + The contents of this file are subject to the terms of the + Common Development and Distribution License, Version 1.0 only + (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 + + ident "%Z%%M% %I% %E% SMI" + + NOTE: This service manifest is not editable; its contents will + be overwritten by package or patch operations, including + operating system upgrade. Make customizations in a different + file. +--> + +<service_bundle type='manifest' name='SUNWzoner:zones'> + +<service + name='system/zones' + type='service' + version='1'> + + <create_default_instance enabled='false' /> + + <single_instance /> + + <dependency + name='multi-user-server' + type='service' + grouping='require_all' + restart_on='none'> + <service_fmri value='svc:/milestone/multi-user-server' /> + </dependency> + + <exec_method + type='method' + name='start' + exec='/lib/svc/method/svc-zones %m' + timeout_seconds='60'> + </exec_method> + + <exec_method + type='method' + name='stop' + exec='/lib/svc/method/svc-zones %m' + timeout_seconds='500'> + </exec_method> + + <property_group name='startd' type='framework'> + <propval name='duration' type='astring' value='transient' /> + </property_group> + + <stability value='Unstable' /> + + <template> + <common_name> + <loctext xml:lang='C'> + Solaris zones + </loctext> + </common_name> + <documentation> + <manpage title='zones' section='5' manpath='/usr/share/man' /> + <manpage + title='zoneadm' + section='1M' + manpath='/usr/share/man' /> + </documentation> + </template> +</service> + +</service_bundle> |
