1 /*
   2  * CDDL HEADER START
   3  *
   4  * The contents of this file are subject to the terms of the
   5  * Common Development and Distribution License (the "License").
   6  * You may not use this file except in compliance with the License.
   7  *
   8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
   9  * or http://www.opensolaris.org/os/licensing.
  10  * See the License for the specific language governing permissions
  11  * and limitations under the License.
  12  *
  13  * When distributing Covered Code, include this CDDL HEADER in each
  14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  15  * If applicable, add the following below this CDDL HEADER, with the
  16  * fields enclosed by brackets "[]" replaced with your own identifying
  17  * information: Portions Copyright [yyyy] [name of copyright owner]
  18  *
  19  * CDDL HEADER END
  20  */
  21 
  22 /*
  23  * Copyright 2009 Sun Microsystems, Inc.  All rights reserved.
  24  * Use is subject to license terms.
  25  */
  26 
  27 #include "lint.h"
  28 #include <sys/types.h>
  29 #include <sys/syscall.h>
  30 #include <sys/zone.h>
  31 #include <sys/priv.h>
  32 #include <priv_private.h>
  33 #include <zone.h>
  34 #include <sys/tsol/label.h>
  35 #include <dlfcn.h>
  36 #include <stdlib.h>
  37 #include <errno.h>
  38 
  39 zoneid_t
  40 zone_create(const char *name, const char *root, const struct priv_set *privs,
  41     const char *rctls, size_t rctlsz, const char *zfs, size_t zfssz,
  42     int *extended_error, int match, int doi, const bslabel_t *label, int flags)
  43 {
  44         zone_def  zd;
  45         priv_data_t *d;
  46 
  47         LOADPRIVDATA(d);
  48 
  49         zd.zone_name = name;
  50         zd.zone_root = root;
  51         zd.zone_privs = privs;
  52         zd.zone_privssz = d->pd_setsize;
  53         zd.rctlbuf = rctls;
  54         zd.rctlbufsz = rctlsz;
  55         zd.zfsbuf = zfs;
  56         zd.zfsbufsz = zfssz;
  57         zd.extended_error = extended_error;
  58         zd.match = match;
  59         zd.doi = doi;
  60         zd.label = label;
  61         zd.flags = flags;
  62 
  63         return ((zoneid_t)syscall(SYS_zone, ZONE_CREATE, &zd));
  64 }
  65 
  66 int
  67 zone_boot(zoneid_t zoneid)
  68 {
  69         return (syscall(SYS_zone, ZONE_BOOT, zoneid));
  70 }
  71 
  72 int
  73 zone_shutdown(zoneid_t zoneid)
  74 {
  75         return (syscall(SYS_zone, ZONE_SHUTDOWN, zoneid));
  76 }
  77 
  78 int
  79 zone_destroy(zoneid_t zoneid)
  80 {
  81         return (syscall(SYS_zone, ZONE_DESTROY, zoneid));
  82 }
  83 
  84 ssize_t
  85 zone_getattr(zoneid_t zoneid, int attr, void *valp, size_t size)
  86 {
  87         sysret_t rval;
  88         int error;
  89 
  90         error = __systemcall(&rval, SYS_zone, ZONE_GETATTR, zoneid,
  91             attr, valp, size);
  92         if (error)
  93                 (void) __set_errno(error);
  94         return ((ssize_t)rval.sys_rval1);
  95 }
  96 
  97 int
  98 zone_setattr(zoneid_t zoneid, int attr, void *valp, size_t size)
  99 {
 100         return (syscall(SYS_zone, ZONE_SETATTR, zoneid, attr, valp, size));
 101 }
 102 
 103 int
 104 zone_enter(zoneid_t zoneid)
 105 {
 106         return (syscall(SYS_zone, ZONE_ENTER, zoneid));
 107 }
 108 
 109 /*
 110  * Get id (if any) for specified zone.
 111  *
 112  * Call the real zone_get_id() in libzonecfg.so.1 if it can be found.
 113  * Otherwise, perform a stripped-down version of the function.
 114  * Any changes in one version should probably be reflected in the other.
 115  *
 116  * This stripped-down version of the function only checks for active
 117  * (booted) zones, by numeric id or name.
 118  */
 119 
 120 typedef int (*zone_get_id_t)(const char *, zoneid_t *);
 121 static zone_get_id_t real_zone_get_id = NULL;
 122 
 123 int
 124 zone_get_id(const char *str, zoneid_t *zip)
 125 {
 126         zoneid_t zoneid;
 127         char *cp;
 128 
 129         /*
 130          * The first time we are called, attempt to dlopen() libzonecfg.so.1
 131          * and get a pointer to the real zone_get_id().
 132          * If we fail, set our pointer to -1 so we won't try again.
 133          */
 134         if (real_zone_get_id == NULL) {
 135                 /*
 136                  * There's no harm in doing this more than once, even
 137                  * concurrently.  We will get the same result each time,
 138                  * and the dynamic linker will single-thread the dlopen()
 139                  * with its own internal lock.  The worst that can happen
 140                  * is that the handle gets a reference count greater than
 141                  * one, which doesn't matter since we never dlclose()
 142                  * the handle if we successfully find the symbol; the
 143                  * library just stays in the address space until exit().
 144                  */
 145                 void *dlhandle = dlopen("libzonecfg.so.1", RTLD_LAZY);
 146                 void *sym = (void *)(-1);
 147 
 148                 if (dlhandle != NULL &&
 149                     (sym = dlsym(dlhandle, "zone_get_id")) == NULL) {
 150                         sym = (void *)(-1);
 151                         (void) dlclose(dlhandle);
 152                 }
 153                 real_zone_get_id = (zone_get_id_t)sym;
 154         }
 155 
 156         /*
 157          * If we've successfully loaded it, call the real zone_get_id().
 158          * Otherwise, perform our stripped-down version of the code.
 159          */
 160         if (real_zone_get_id != (zone_get_id_t)(-1))
 161                 return (real_zone_get_id(str, zip));
 162 
 163         /* first try looking for active zone by id */
 164         errno = 0;
 165         zoneid = (zoneid_t)strtol(str, &cp, 0);
 166         if (errno == 0 && cp != str && *cp == '\0' &&
 167             getzonenamebyid(zoneid, NULL, 0) != -1) {
 168                 *zip = zoneid;
 169                 return (0);
 170         }
 171 
 172         /* then look for active zone by name */
 173         if ((zoneid = getzoneidbyname(str)) != -1) {
 174                 *zip = zoneid;
 175                 return (0);
 176         }
 177 
 178         /* not an active zone, return error */
 179         return (-1);
 180 }
 181 
 182 int
 183 zone_list(zoneid_t *zonelist, uint_t *numzones)
 184 {
 185         return (syscall(SYS_zone, ZONE_LIST, zonelist, numzones));
 186 }
 187 
 188 /*
 189  * Underlying implementation for getzoneid and getzoneidbyname.
 190  */
 191 static zoneid_t
 192 zone_lookup(const char *name)
 193 {
 194         return ((zoneid_t)syscall(SYS_zone, ZONE_LOOKUP, name));
 195 }
 196 
 197 zoneid_t
 198 getzoneid(void)
 199 {
 200         return (zone_lookup(NULL));
 201 }
 202 
 203 zoneid_t
 204 getzoneidbyname(const char *zonename)
 205 {
 206         return (zone_lookup(zonename));
 207 }
 208 
 209 ssize_t
 210 getzonenamebyid(zoneid_t zoneid, char *buf, size_t buflen)
 211 {
 212         return (zone_getattr(zoneid, ZONE_ATTR_NAME, buf, buflen));
 213 }
 214 
 215 int
 216 zone_version(int *version)
 217 {
 218         return (syscall(SYS_zone, ZONE_VERSION, version));
 219 }
 220 
 221 int
 222 zone_add_datalink(zoneid_t zoneid, datalink_id_t linkid)
 223 {
 224         return (syscall(SYS_zone, ZONE_ADD_DATALINK, zoneid, linkid));
 225 }
 226 
 227 int
 228 zone_remove_datalink(zoneid_t zoneid, datalink_id_t linkid)
 229 {
 230         return (syscall(SYS_zone, ZONE_DEL_DATALINK, zoneid, linkid));
 231 }
 232 
 233 int
 234 zone_check_datalink(zoneid_t *zoneidp, datalink_id_t linkid)
 235 {
 236         return (syscall(SYS_zone, ZONE_CHECK_DATALINK, zoneidp, linkid));
 237 }
 238 
 239 int
 240 zone_list_datalink(zoneid_t zoneid, int *dlnump, datalink_id_t *linkids)
 241 {
 242         return (syscall(SYS_zone, ZONE_LIST_DATALINK, zoneid, dlnump, linkids));
 243 }