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
39zoneid_t
40zone_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
66int
67zone_boot(zoneid_t zoneid)
68{
69	return (syscall(SYS_zone, ZONE_BOOT, zoneid));
70}
71
72int
73zone_shutdown(zoneid_t zoneid)
74{
75	return (syscall(SYS_zone, ZONE_SHUTDOWN, zoneid));
76}
77
78int
79zone_destroy(zoneid_t zoneid)
80{
81	return (syscall(SYS_zone, ZONE_DESTROY, zoneid));
82}
83
84ssize_t
85zone_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
97int
98zone_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
103int
104zone_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
120typedef	int (*zone_get_id_t)(const char *, zoneid_t *);
121static zone_get_id_t real_zone_get_id = NULL;
122
123int
124zone_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
182int
183zone_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 */
191static zoneid_t
192zone_lookup(const char *name)
193{
194	return ((zoneid_t)syscall(SYS_zone, ZONE_LOOKUP, name));
195}
196
197zoneid_t
198getzoneid(void)
199{
200	return (zone_lookup(NULL));
201}
202
203zoneid_t
204getzoneidbyname(const char *zonename)
205{
206	return (zone_lookup(zonename));
207}
208
209ssize_t
210getzonenamebyid(zoneid_t zoneid, char *buf, size_t buflen)
211{
212	return (zone_getattr(zoneid, ZONE_ATTR_NAME, buf, buflen));
213}
214
215int
216zone_version(int *version)
217{
218	return (syscall(SYS_zone, ZONE_VERSION, version));
219}
220
221int
222zone_add_datalink(zoneid_t zoneid, datalink_id_t linkid)
223{
224	return (syscall(SYS_zone, ZONE_ADD_DATALINK, zoneid, linkid));
225}
226
227int
228zone_remove_datalink(zoneid_t zoneid, datalink_id_t linkid)
229{
230	return (syscall(SYS_zone, ZONE_DEL_DATALINK, zoneid, linkid));
231}
232
233int
234zone_check_datalink(zoneid_t *zoneidp, datalink_id_t linkid)
235{
236	return (syscall(SYS_zone, ZONE_CHECK_DATALINK, zoneidp, linkid));
237}
238
239int
240zone_list_datalink(zoneid_t zoneid, int *dlnump, datalink_id_t *linkids)
241{
242	return (syscall(SYS_zone, ZONE_LIST_DATALINK, zoneid, dlnump, linkids));
243}
244