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 (c) 2006, 2010, Oracle and/or its affiliates. All rights reserved.
24  */
25 
26 #include <sys/errno.h>
27 #include <sys/exec.h>
28 #include <sys/kmem.h>
29 #include <sys/modctl.h>
30 #include <sys/model.h>
31 #include <sys/proc.h>
32 #include <sys/syscall.h>
33 #include <sys/systm.h>
34 #include <sys/thread.h>
35 #include <sys/cmn_err.h>
36 #include <sys/archsystm.h>
37 #include <sys/pathname.h>
38 
39 #include <sys/machbrand.h>
40 #include <sys/brand.h>
41 #include "sn1_brand.h"
42 
43 char *sn1_emulation_table = NULL;
44 
45 void	sn1_init_brand_data(zone_t *);
46 void	sn1_free_brand_data(zone_t *);
47 void	sn1_setbrand(proc_t *);
48 int	sn1_getattr(zone_t *, int, void *, size_t *);
49 int	sn1_setattr(zone_t *, int, void *, size_t);
50 int	sn1_brandsys(int, int64_t *, uintptr_t, uintptr_t, uintptr_t,
51 		uintptr_t, uintptr_t, uintptr_t);
52 void	sn1_copy_procdata(proc_t *, proc_t *);
53 void	sn1_proc_exit(struct proc *, klwp_t *);
54 void	sn1_exec();
55 int	sn1_initlwp(klwp_t *);
56 void	sn1_forklwp(klwp_t *, klwp_t *);
57 void	sn1_freelwp(klwp_t *);
58 void	sn1_lwpexit(klwp_t *);
59 int	sn1_elfexec(vnode_t *, execa_t *, uarg_t *, intpdata_t *, int,
60 	long *, int, caddr_t, cred_t *, int);
61 
62 /* sn1 brand */
63 struct brand_ops sn1_brops = {
64 	sn1_init_brand_data,
65 	sn1_free_brand_data,
66 	sn1_brandsys,
67 	sn1_setbrand,
68 	sn1_getattr,
69 	sn1_setattr,
70 	sn1_copy_procdata,
71 	sn1_proc_exit,
72 	sn1_exec,
73 	lwp_setrval,
74 	sn1_initlwp,
75 	sn1_forklwp,
76 	sn1_freelwp,
77 	sn1_lwpexit,
78 	sn1_elfexec,
79 	NULL,
80 	NULL,
81 	NSIG,
82 };
83 
84 #ifdef	sparc
85 
86 struct brand_mach_ops sn1_mops = {
87 	sn1_brand_syscall_callback,
88 	sn1_brand_syscall32_callback
89 };
90 
91 #else	/* sparc */
92 
93 #ifdef	__amd64
94 
95 struct brand_mach_ops sn1_mops = {
96 	sn1_brand_sysenter_callback,
97 	sn1_brand_int91_callback,
98 	sn1_brand_syscall_callback,
99 	sn1_brand_syscall32_callback
100 };
101 
102 #else	/* ! __amd64 */
103 
104 struct brand_mach_ops sn1_mops = {
105 	sn1_brand_sysenter_callback,
106 	NULL,
107 	sn1_brand_syscall_callback,
108 	NULL
109 };
110 #endif	/* __amd64 */
111 
112 #endif	/* _sparc */
113 
114 struct brand	sn1_brand = {
115 	BRAND_VER_1,
116 	"sn1",
117 	&sn1_brops,
118 	&sn1_mops
119 };
120 
121 static struct modlbrand modlbrand = {
122 	&mod_brandops,		/* type of module */
123 	"Solaris N-1 Brand",	/* description of module */
124 	&sn1_brand		/* driver ops */
125 };
126 
127 static struct modlinkage modlinkage = {
128 	MODREV_1, (void *)&modlbrand, NULL
129 };
130 
131 void
sn1_setbrand(proc_t * p)132 sn1_setbrand(proc_t *p)
133 {
134 	brand_solaris_setbrand(p, &sn1_brand);
135 }
136 
137 /* ARGSUSED */
138 int
sn1_getattr(zone_t * zone,int attr,void * buf,size_t * bufsize)139 sn1_getattr(zone_t *zone, int attr, void *buf, size_t *bufsize)
140 {
141 	return (EINVAL);
142 }
143 
144 /* ARGSUSED */
145 int
sn1_setattr(zone_t * zone,int attr,void * buf,size_t bufsize)146 sn1_setattr(zone_t *zone, int attr, void *buf, size_t bufsize)
147 {
148 	return (EINVAL);
149 }
150 
151 /*ARGSUSED*/
152 int
sn1_brandsys(int cmd,int64_t * rval,uintptr_t arg1,uintptr_t arg2,uintptr_t arg3,uintptr_t arg4,uintptr_t arg5,uintptr_t arg6)153 sn1_brandsys(int cmd, int64_t *rval, uintptr_t arg1, uintptr_t arg2,
154     uintptr_t arg3, uintptr_t arg4, uintptr_t arg5, uintptr_t arg6)
155 {
156 	int	res;
157 
158 	*rval = 0;
159 
160 	res = brand_solaris_cmd(cmd, arg1, arg2, arg3, &sn1_brand, SN1_VERSION);
161 	if (res >= 0)
162 		return (res);
163 
164 	return (EINVAL);
165 }
166 
167 void
sn1_copy_procdata(proc_t * child,proc_t * parent)168 sn1_copy_procdata(proc_t *child, proc_t *parent)
169 {
170 	brand_solaris_copy_procdata(child, parent, &sn1_brand);
171 }
172 
173 void
sn1_proc_exit(struct proc * p,klwp_t * l)174 sn1_proc_exit(struct proc *p, klwp_t *l)
175 {
176 	brand_solaris_proc_exit(p, l, &sn1_brand);
177 }
178 
179 void
sn1_exec()180 sn1_exec()
181 {
182 	brand_solaris_exec(&sn1_brand);
183 }
184 
185 int
sn1_initlwp(klwp_t * l)186 sn1_initlwp(klwp_t *l)
187 {
188 	return (brand_solaris_initlwp(l, &sn1_brand));
189 }
190 
191 void
sn1_forklwp(klwp_t * p,klwp_t * c)192 sn1_forklwp(klwp_t *p, klwp_t *c)
193 {
194 	brand_solaris_forklwp(p, c, &sn1_brand);
195 }
196 
197 void
sn1_freelwp(klwp_t * l)198 sn1_freelwp(klwp_t *l)
199 {
200 	brand_solaris_freelwp(l, &sn1_brand);
201 }
202 
203 void
sn1_lwpexit(klwp_t * l)204 sn1_lwpexit(klwp_t *l)
205 {
206 	brand_solaris_lwpexit(l, &sn1_brand);
207 }
208 
209 /*ARGSUSED*/
210 void
sn1_free_brand_data(zone_t * zone)211 sn1_free_brand_data(zone_t *zone)
212 {
213 }
214 
215 /*ARGSUSED*/
216 void
sn1_init_brand_data(zone_t * zone)217 sn1_init_brand_data(zone_t *zone)
218 {
219 }
220 
221 int
sn1_elfexec(vnode_t * vp,execa_t * uap,uarg_t * args,intpdata_t * idatap,int level,long * execsz,int setid,caddr_t exec_file,cred_t * cred,int brand_action)222 sn1_elfexec(vnode_t *vp, execa_t *uap, uarg_t *args, intpdata_t *idatap,
223 	int level, long *execsz, int setid, caddr_t exec_file, cred_t *cred,
224 	int brand_action)
225 {
226 	return (brand_solaris_elfexec(vp, uap, args, idatap, level, execsz,
227 	    setid, exec_file, cred, brand_action, &sn1_brand, SN1_BRANDNAME,
228 	    SN1_LIB, SN1_LIB32, SN1_LINKER, SN1_LINKER32));
229 }
230 
231 int
_init(void)232 _init(void)
233 {
234 	int err;
235 
236 	/*
237 	 * Set up the table indicating which system calls we want to
238 	 * interpose on.  We should probably build this automatically from
239 	 * a list of system calls that is shared with the user-space
240 	 * library.
241 	 */
242 	sn1_emulation_table = kmem_zalloc(NSYSCALL, KM_SLEEP);
243 	sn1_emulation_table[SYS_read] = 1;			/*   3 */
244 	sn1_emulation_table[SYS_write] = 1;			/*   4 */
245 	sn1_emulation_table[SYS_time] = 1;			/*  13 */
246 	sn1_emulation_table[SYS_getpid] = 1;			/*  20 */
247 	sn1_emulation_table[SYS_mount] = 1;			/*  21 */
248 	sn1_emulation_table[SYS_getuid] = 1;			/*  24 */
249 	sn1_emulation_table[SYS_times] = 1;			/*  43 */
250 	sn1_emulation_table[SYS_getgid] = 1;			/*  47 */
251 	sn1_emulation_table[SYS_utssys] = 1;			/*  57 */
252 	sn1_emulation_table[SYS_waitid] = 1;			/* 107 */
253 	sn1_emulation_table[SYS_uname] = 1;			/* 135 */
254 
255 	err = mod_install(&modlinkage);
256 	if (err) {
257 		cmn_err(CE_WARN, "Couldn't install brand module");
258 		kmem_free(sn1_emulation_table, NSYSCALL);
259 	}
260 
261 	return (err);
262 }
263 
264 int
_info(struct modinfo * modinfop)265 _info(struct modinfo *modinfop)
266 {
267 	return (mod_info(&modlinkage, modinfop));
268 }
269 
270 int
_fini(void)271 _fini(void)
272 {
273 	return (brand_solaris_fini(&sn1_emulation_table, &modlinkage,
274 	    &sn1_brand));
275 }
276