summaryrefslogtreecommitdiff
path: root/usr/src/cmd/zoneadm
diff options
context:
space:
mode:
Diffstat (limited to 'usr/src/cmd/zoneadm')
-rw-r--r--usr/src/cmd/zoneadm/Makefile58
-rw-r--r--usr/src/cmd/zoneadm/svc-zones132
-rw-r--r--usr/src/cmd/zoneadm/zoneadm.c2288
-rw-r--r--usr/src/cmd/zoneadm/zones.xml90
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>