sunos32_misc.c revision 1.79.4.1 1 1.79.4.1 martin /* $NetBSD: sunos32_misc.c,v 1.79.4.1 2022/08/03 11:11:33 martin Exp $ */
2 1.1 mrg /* from :NetBSD: sunos_misc.c,v 1.107 2000/12/01 19:25:10 jdolecek Exp */
3 1.1 mrg
4 1.1 mrg /*
5 1.1 mrg * Copyright (c) 2001 Matthew R. Green
6 1.1 mrg * All rights reserved.
7 1.1 mrg *
8 1.1 mrg * Redistribution and use in source and binary forms, with or without
9 1.1 mrg * modification, are permitted provided that the following conditions
10 1.1 mrg * are met:
11 1.1 mrg * 1. Redistributions of source code must retain the above copyright
12 1.1 mrg * notice, this list of conditions and the following disclaimer.
13 1.1 mrg * 2. Redistributions in binary form must reproduce the above copyright
14 1.1 mrg * notice, this list of conditions and the following disclaimer in the
15 1.1 mrg * documentation and/or other materials provided with the distribution.
16 1.1 mrg *
17 1.1 mrg * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 1.1 mrg * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 1.1 mrg * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 1.1 mrg * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 1.1 mrg * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
22 1.1 mrg * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
23 1.1 mrg * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
24 1.1 mrg * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
25 1.1 mrg * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 1.1 mrg * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 1.1 mrg * SUCH DAMAGE.
28 1.1 mrg */
29 1.1 mrg
30 1.1 mrg /*
31 1.1 mrg * Copyright (c) 1992, 1993
32 1.1 mrg * The Regents of the University of California. All rights reserved.
33 1.1 mrg *
34 1.1 mrg * This software was developed by the Computer Systems Engineering group
35 1.1 mrg * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
36 1.1 mrg * contributed to Berkeley.
37 1.1 mrg *
38 1.1 mrg * All advertising materials mentioning features or use of this software
39 1.1 mrg * must display the following acknowledgement:
40 1.1 mrg * This product includes software developed by the University of
41 1.1 mrg * California, Lawrence Berkeley Laboratory.
42 1.1 mrg *
43 1.1 mrg * Redistribution and use in source and binary forms, with or without
44 1.1 mrg * modification, are permitted provided that the following conditions
45 1.1 mrg * are met:
46 1.1 mrg * 1. Redistributions of source code must retain the above copyright
47 1.1 mrg * notice, this list of conditions and the following disclaimer.
48 1.1 mrg * 2. Redistributions in binary form must reproduce the above copyright
49 1.1 mrg * notice, this list of conditions and the following disclaimer in the
50 1.1 mrg * documentation and/or other materials provided with the distribution.
51 1.23 agc * 3. Neither the name of the University nor the names of its contributors
52 1.1 mrg * may be used to endorse or promote products derived from this software
53 1.1 mrg * without specific prior written permission.
54 1.1 mrg *
55 1.1 mrg * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
56 1.1 mrg * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
57 1.1 mrg * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
58 1.1 mrg * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
59 1.1 mrg * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
60 1.1 mrg * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
61 1.1 mrg * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
62 1.1 mrg * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
63 1.1 mrg * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
64 1.1 mrg * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
65 1.1 mrg * SUCH DAMAGE.
66 1.1 mrg *
67 1.1 mrg * @(#)sunos_misc.c 8.1 (Berkeley) 6/18/93
68 1.1 mrg *
69 1.29 perry * Header: sunos_misc.c,v 1.16 93/04/07 02:46:27 torek Exp
70 1.1 mrg */
71 1.1 mrg
72 1.1 mrg /*
73 1.1 mrg * SunOS compatibility module, 64-bit kernel version
74 1.1 mrg *
75 1.1 mrg * SunOS system calls that are implemented differently in BSD are
76 1.1 mrg * handled here.
77 1.1 mrg */
78 1.10 lukem
79 1.10 lukem #include <sys/cdefs.h>
80 1.79.4.1 martin __KERNEL_RCSID(0, "$NetBSD: sunos32_misc.c,v 1.79.4.1 2022/08/03 11:11:33 martin Exp $");
81 1.1 mrg
82 1.1 mrg #define COMPAT_SUNOS 1
83 1.1 mrg
84 1.8 mrg #if defined(_KERNEL_OPT)
85 1.1 mrg #include "opt_compat_43.h"
86 1.1 mrg #include "opt_compat_netbsd.h"
87 1.1 mrg #endif
88 1.1 mrg
89 1.1 mrg #include <sys/param.h>
90 1.1 mrg #include <sys/systm.h>
91 1.1 mrg #include <sys/namei.h>
92 1.1 mrg #include <sys/proc.h>
93 1.1 mrg #include <sys/dirent.h>
94 1.1 mrg #include <sys/file.h>
95 1.1 mrg #include <sys/stat.h>
96 1.1 mrg #include <sys/filedesc.h>
97 1.1 mrg #include <sys/ioctl.h>
98 1.1 mrg #include <sys/kernel.h>
99 1.1 mrg #include <sys/reboot.h>
100 1.1 mrg #include <sys/malloc.h>
101 1.1 mrg #include <sys/mbuf.h>
102 1.1 mrg #include <sys/mman.h>
103 1.1 mrg #include <sys/mount.h>
104 1.1 mrg #include <sys/ptrace.h>
105 1.1 mrg #include <sys/resource.h>
106 1.1 mrg #include <sys/resourcevar.h>
107 1.1 mrg #include <sys/signal.h>
108 1.1 mrg #include <sys/signalvar.h>
109 1.1 mrg #include <sys/socket.h>
110 1.1 mrg #include <sys/tty.h>
111 1.1 mrg #include <sys/vnode.h>
112 1.1 mrg #include <sys/uio.h>
113 1.1 mrg #include <sys/wait.h>
114 1.1 mrg #include <sys/utsname.h>
115 1.1 mrg #include <sys/unistd.h>
116 1.41 matt #include <sys/syscall.h>
117 1.1 mrg #include <sys/syscallargs.h>
118 1.1 mrg #include <sys/conf.h>
119 1.1 mrg #include <sys/socketvar.h>
120 1.1 mrg #include <sys/exec.h>
121 1.1 mrg #include <sys/swap.h>
122 1.37 elad #include <sys/kauth.h>
123 1.46 dsl #include <sys/vfs_syscalls.h>
124 1.1 mrg
125 1.1 mrg #include <compat/netbsd32/netbsd32.h>
126 1.1 mrg #include <compat/netbsd32/netbsd32_syscallargs.h>
127 1.1 mrg #include <compat/sunos32/sunos32.h>
128 1.6 mrg #include <compat/sunos32/sunos32_dirent.h>
129 1.1 mrg #include <compat/sunos32/sunos32_syscallargs.h>
130 1.1 mrg #include <compat/common/compat_util.h>
131 1.51 christos #include <compat/sys/mount.h>
132 1.1 mrg
133 1.1 mrg #include <netinet/in.h>
134 1.1 mrg
135 1.1 mrg #include <miscfs/specfs/specdev.h>
136 1.1 mrg
137 1.1 mrg #include <nfs/rpcv2.h>
138 1.1 mrg #include <nfs/nfsproto.h>
139 1.1 mrg #include <nfs/nfs.h>
140 1.1 mrg #include <nfs/nfsmount.h>
141 1.1 mrg
142 1.4 mrg static void sunos32_sigvec_to_sigaction(const struct netbsd32_sigvec *, struct sigaction *);
143 1.4 mrg static void sunos32_sigvec_from_sigaction(struct netbsd32_sigvec *, const struct sigaction *);
144 1.4 mrg
145 1.53 dsl static int sunstatfs(struct statvfs *, void *);
146 1.1 mrg
147 1.4 mrg static void
148 1.54 dsl sunos32_sigvec_to_sigaction(const struct netbsd32_sigvec *sv, struct sigaction *sa)
149 1.4 mrg {
150 1.53 dsl /*XXX*/ extern void compat_43_sigmask_to_sigset(const int *, sigset_t *);
151 1.29 perry
152 1.47 dsl sa->sa_handler = NETBSD32PTR64(sv->sv_handler);
153 1.4 mrg compat_43_sigmask_to_sigset(&sv->sv_mask, &sa->sa_mask);
154 1.4 mrg sa->sa_flags = sv->sv_flags ^ SA_RESTART;
155 1.4 mrg }
156 1.4 mrg
157 1.74 matt static void
158 1.74 matt sunos32_sigvec_from_sigaction(
159 1.74 matt struct netbsd32_sigvec *sv,
160 1.74 matt const struct sigaction *sa)
161 1.4 mrg {
162 1.53 dsl /*XXX*/ extern void compat_43_sigset_to_sigmask(const sigset_t *, int *);
163 1.4 mrg
164 1.79.4.1 martin memset(sv, 0, sizeof(*sv));
165 1.47 dsl NETBSD32PTR32(sv->sv_handler, sa->sa_handler);
166 1.4 mrg compat_43_sigset_to_sigmask(&sa->sa_mask, &sv->sv_mask);
167 1.4 mrg sv->sv_flags = sa->sa_flags ^ SA_RESTART;
168 1.4 mrg }
169 1.4 mrg
170 1.1 mrg int
171 1.56 dsl sunos32_sys_stime(struct lwp *l, const struct sunos32_sys_stime_args *uap, register_t *retval)
172 1.1 mrg {
173 1.56 dsl /* {
174 1.4 mrg syscallarg(sunos32_time_tp) tp;
175 1.56 dsl } */
176 1.4 mrg struct netbsd32_timeval ntv;
177 1.49 dsl struct timeval tv;
178 1.1 mrg int error;
179 1.1 mrg
180 1.49 dsl error = copyin(SCARG_P32(uap, tp), &ntv.tv_sec, sizeof(ntv.tv_sec));
181 1.1 mrg if (error)
182 1.1 mrg return error;
183 1.4 mrg tv.tv_sec = ntv.tv_sec;
184 1.1 mrg tv.tv_usec = 0;
185 1.1 mrg
186 1.49 dsl return settimeofday1(&tv, false, NULL, l, true);
187 1.1 mrg }
188 1.1 mrg
189 1.1 mrg int
190 1.56 dsl sunos32_sys_wait4(struct lwp *l, const struct sunos32_sys_wait4_args *uap, register_t *retval)
191 1.1 mrg {
192 1.56 dsl /* {
193 1.4 mrg syscallarg(int) pid;
194 1.4 mrg syscallarg(netbsd32_intp) status;
195 1.4 mrg syscallarg(int) options;
196 1.4 mrg syscallarg(netbsd32_rusagep_t) rusage;
197 1.56 dsl } */
198 1.1 mrg
199 1.65 nakayama struct compat_50_netbsd32_wait4_args bsd_ua;
200 1.56 dsl
201 1.56 dsl SCARG(&bsd_ua, pid) = SCARG(uap, pid) == 0 ? WAIT_ANY : SCARG(uap, pid);
202 1.56 dsl SCARG(&bsd_ua, status) = SCARG(uap, status);
203 1.56 dsl SCARG(&bsd_ua, options) = SCARG(uap, options);
204 1.56 dsl SCARG(&bsd_ua, rusage) = SCARG(uap, rusage);
205 1.56 dsl
206 1.65 nakayama return compat_50_netbsd32_wait4(l, &bsd_ua, retval);
207 1.1 mrg }
208 1.1 mrg
209 1.1 mrg int
210 1.56 dsl sunos32_sys_creat(struct lwp *l, const struct sunos32_sys_creat_args *uap, register_t *retval)
211 1.1 mrg {
212 1.56 dsl /* {
213 1.4 mrg syscallarg(const netbsd32_charp) path;
214 1.4 mrg syscallarg(int) mode;
215 1.56 dsl } */
216 1.1 mrg struct sys_open_args ua;
217 1.1 mrg
218 1.1 mrg SUNOS32TOP_UAP(path, const char);
219 1.1 mrg SCARG(&ua, flags) = O_WRONLY | O_CREAT | O_TRUNC;
220 1.1 mrg SUNOS32TO64_UAP(mode);
221 1.7 mrg
222 1.15 thorpej return (sys_open(l, &ua, retval));
223 1.1 mrg }
224 1.1 mrg
225 1.1 mrg int
226 1.56 dsl sunos32_sys_access(struct lwp *l, const struct sunos32_sys_access_args *uap, register_t *retval)
227 1.1 mrg {
228 1.56 dsl /* {
229 1.4 mrg syscallarg(const netbsd32_charp) path;
230 1.4 mrg syscallarg(int) flags;
231 1.56 dsl } */
232 1.1 mrg struct sys_access_args ua;
233 1.1 mrg
234 1.1 mrg SUNOS32TOP_UAP(path, const char);
235 1.1 mrg SUNOS32TO64_UAP(flags);
236 1.1 mrg
237 1.15 thorpej return (sys_access(l, &ua, retval));
238 1.1 mrg }
239 1.1 mrg
240 1.53 dsl static inline void sunos32_from___stat13(struct stat *, struct netbsd32_stat43 *);
241 1.2 mrg
242 1.34 perry static inline void
243 1.54 dsl sunos32_from___stat13(struct stat *sbp, struct netbsd32_stat43 *sb32p)
244 1.2 mrg {
245 1.2 mrg sb32p->st_dev = sbp->st_dev;
246 1.2 mrg sb32p->st_ino = sbp->st_ino;
247 1.2 mrg sb32p->st_mode = sbp->st_mode;
248 1.2 mrg sb32p->st_nlink = sbp->st_nlink;
249 1.2 mrg sb32p->st_uid = sbp->st_uid;
250 1.2 mrg sb32p->st_gid = sbp->st_gid;
251 1.2 mrg sb32p->st_rdev = sbp->st_rdev;
252 1.2 mrg if (sbp->st_size < (quad_t)1 << 32)
253 1.2 mrg sb32p->st_size = sbp->st_size;
254 1.2 mrg else
255 1.2 mrg sb32p->st_size = -2;
256 1.2 mrg sb32p->st_atimespec.tv_sec = (netbsd32_time_t)sbp->st_atimespec.tv_sec;
257 1.2 mrg sb32p->st_atimespec.tv_nsec = (netbsd32_long)sbp->st_atimespec.tv_nsec;
258 1.2 mrg sb32p->st_mtimespec.tv_sec = (netbsd32_time_t)sbp->st_mtimespec.tv_sec;
259 1.2 mrg sb32p->st_mtimespec.tv_nsec = (netbsd32_long)sbp->st_mtimespec.tv_nsec;
260 1.2 mrg sb32p->st_ctimespec.tv_sec = (netbsd32_time_t)sbp->st_ctimespec.tv_sec;
261 1.2 mrg sb32p->st_ctimespec.tv_nsec = (netbsd32_long)sbp->st_ctimespec.tv_nsec;
262 1.2 mrg sb32p->st_blksize = sbp->st_blksize;
263 1.2 mrg sb32p->st_blocks = sbp->st_blocks;
264 1.2 mrg sb32p->st_flags = sbp->st_flags;
265 1.2 mrg sb32p->st_gen = sbp->st_gen;
266 1.2 mrg }
267 1.2 mrg
268 1.2 mrg
269 1.1 mrg int
270 1.56 dsl sunos32_sys_stat(struct lwp *l, const struct sunos32_sys_stat_args *uap, register_t *retval)
271 1.1 mrg {
272 1.56 dsl /* {
273 1.4 mrg syscallarg(const netbsd32_charp) path;
274 1.4 mrg syscallarg(netbsd32_stat43p_t) ub;
275 1.56 dsl } */
276 1.5 mrg struct netbsd32_stat43 sb32;
277 1.2 mrg struct stat sb;
278 1.2 mrg const char *path;
279 1.2 mrg int error;
280 1.1 mrg
281 1.47 dsl path = SCARG_P32(uap, path);
282 1.1 mrg
283 1.59 ad error = do_sys_stat(path, FOLLOW, &sb);
284 1.2 mrg if (error)
285 1.2 mrg return (error);
286 1.2 mrg sunos32_from___stat13(&sb, &sb32);
287 1.47 dsl error = copyout(&sb32, SCARG_P32(uap, ub), sizeof (sb32));
288 1.2 mrg return (error);
289 1.1 mrg }
290 1.1 mrg
291 1.1 mrg int
292 1.56 dsl sunos32_sys_lstat(struct lwp *l, const struct sunos32_sys_lstat_args *uap, register_t *retval)
293 1.1 mrg {
294 1.56 dsl /* {
295 1.4 mrg syscallarg(const netbsd32_charp) path;
296 1.4 mrg syscallarg(netbsd32_stat43p_t) ub;
297 1.56 dsl } */
298 1.2 mrg struct vnode *vp, *dvp;
299 1.2 mrg struct stat sb, sb1;
300 1.5 mrg struct netbsd32_stat43 sb32;
301 1.2 mrg int error;
302 1.73 dholland struct pathbuf *pb;
303 1.2 mrg struct nameidata nd;
304 1.2 mrg int ndflags;
305 1.2 mrg const char *path;
306 1.1 mrg
307 1.47 dsl path = SCARG_P32(uap, path);
308 1.1 mrg
309 1.48 dsl ndflags = NOFOLLOW | LOCKLEAF | LOCKPARENT | TRYEMULROOT;
310 1.2 mrg again:
311 1.73 dholland error = pathbuf_copyin(path, &pb);
312 1.73 dholland if (error) {
313 1.73 dholland return error;
314 1.73 dholland }
315 1.73 dholland
316 1.73 dholland NDINIT(&nd, LOOKUP, ndflags, pb);
317 1.2 mrg if ((error = namei(&nd))) {
318 1.73 dholland pathbuf_destroy(pb);
319 1.2 mrg if (error == EISDIR && (ndflags & LOCKPARENT) != 0) {
320 1.2 mrg /*
321 1.2 mrg * Should only happen on '/'. Retry without LOCKPARENT;
322 1.2 mrg * this is safe since the vnode won't be a VLNK.
323 1.2 mrg */
324 1.2 mrg ndflags &= ~LOCKPARENT;
325 1.2 mrg goto again;
326 1.2 mrg }
327 1.2 mrg return (error);
328 1.2 mrg }
329 1.2 mrg /*
330 1.2 mrg * For symbolic links, always return the attributes of its
331 1.2 mrg * containing directory, except for mode, size, and links.
332 1.2 mrg */
333 1.2 mrg vp = nd.ni_vp;
334 1.2 mrg dvp = nd.ni_dvp;
335 1.73 dholland pathbuf_destroy(pb);
336 1.2 mrg if (vp->v_type != VLNK) {
337 1.2 mrg if ((ndflags & LOCKPARENT) != 0) {
338 1.2 mrg if (dvp == vp)
339 1.2 mrg vrele(dvp);
340 1.2 mrg else
341 1.2 mrg vput(dvp);
342 1.2 mrg }
343 1.59 ad error = vn_stat(vp, &sb);
344 1.2 mrg vput(vp);
345 1.2 mrg if (error)
346 1.2 mrg return (error);
347 1.2 mrg } else {
348 1.59 ad error = vn_stat(dvp, &sb);
349 1.2 mrg vput(dvp);
350 1.2 mrg if (error) {
351 1.2 mrg vput(vp);
352 1.2 mrg return (error);
353 1.2 mrg }
354 1.59 ad error = vn_stat(vp, &sb1);
355 1.2 mrg vput(vp);
356 1.2 mrg if (error)
357 1.2 mrg return (error);
358 1.2 mrg sb.st_mode &= ~S_IFDIR;
359 1.2 mrg sb.st_mode |= S_IFLNK;
360 1.2 mrg sb.st_nlink = sb1.st_nlink;
361 1.2 mrg sb.st_size = sb1.st_size;
362 1.2 mrg sb.st_blocks = sb1.st_blocks;
363 1.2 mrg }
364 1.2 mrg sunos32_from___stat13(&sb, &sb32);
365 1.47 dsl error = copyout((void *)&sb32, SCARG_P32(uap, ub), sizeof (sb32));
366 1.2 mrg return (error);
367 1.1 mrg }
368 1.1 mrg
369 1.32 cube static int
370 1.32 cube sunos32_execve_fetch_element(char * const *array, size_t index, char **value)
371 1.32 cube {
372 1.32 cube int error;
373 1.32 cube netbsd32_charp const *a32 = (void const *)array;
374 1.32 cube netbsd32_charp e;
375 1.32 cube
376 1.32 cube error = copyin(a32 + index, &e, sizeof(e));
377 1.32 cube if (error)
378 1.32 cube return error;
379 1.47 dsl *value = NETBSD32PTR64(e);
380 1.32 cube return 0;
381 1.32 cube }
382 1.32 cube
383 1.1 mrg int
384 1.56 dsl sunos32_sys_execv(struct lwp *l, const struct sunos32_sys_execv_args *uap, register_t *retval)
385 1.1 mrg {
386 1.56 dsl /* {
387 1.1 mrg syscallarg(const char *) path;
388 1.1 mrg syscallarg(char **) argv;
389 1.56 dsl } */
390 1.47 dsl const char *path = SCARG_P32(uap, path);
391 1.1 mrg
392 1.47 dsl return execve1(l, path, SCARG_P32(uap, argp), NULL,
393 1.32 cube sunos32_execve_fetch_element);
394 1.1 mrg }
395 1.1 mrg
396 1.1 mrg int
397 1.56 dsl sunos32_sys_execve(struct lwp *l, const struct sunos32_sys_execve_args *uap, register_t *retval)
398 1.1 mrg {
399 1.56 dsl /* {
400 1.1 mrg syscallarg(const char *) path;
401 1.1 mrg syscallarg(char **) argv;
402 1.1 mrg syscallarg(char **) envp;
403 1.56 dsl } */
404 1.47 dsl const char *path = SCARG_P32(uap, path);
405 1.1 mrg
406 1.47 dsl return execve1(l, path, SCARG_P32(uap, argp),
407 1.47 dsl SCARG_P32(uap, envp),
408 1.32 cube sunos32_execve_fetch_element);
409 1.1 mrg }
410 1.1 mrg
411 1.1 mrg int
412 1.56 dsl sunos32_sys_omsync(struct lwp *l, const struct sunos32_sys_omsync_args *uap, register_t *retval)
413 1.1 mrg {
414 1.56 dsl /* {
415 1.45 christos syscallarg(netbsd32_caddr_t) addr;
416 1.4 mrg syscallarg(netbsd32_size_t) len;
417 1.4 mrg syscallarg(int) flags;
418 1.56 dsl } */
419 1.1 mrg struct netbsd32___msync13_args ouap;
420 1.1 mrg
421 1.1 mrg SCARG(&ouap, addr) = SCARG(uap, addr);
422 1.1 mrg SCARG(&ouap, len) = SCARG(uap, len);
423 1.1 mrg SCARG(&ouap, flags) = SCARG(uap, flags);
424 1.1 mrg
425 1.15 thorpej return (netbsd32___msync13(l, &ouap, retval));
426 1.1 mrg }
427 1.1 mrg
428 1.1 mrg int
429 1.56 dsl sunos32_sys_unmount(struct lwp *l, const struct sunos32_sys_unmount_args *uap, register_t *retval)
430 1.1 mrg {
431 1.56 dsl /* {
432 1.4 mrg syscallarg(netbsd32_charp) path;
433 1.56 dsl } */
434 1.1 mrg struct sys_unmount_args ua;
435 1.1 mrg
436 1.1 mrg SUNOS32TOP_UAP(path, const char);
437 1.1 mrg SCARG(&ua, flags) = 0;
438 1.1 mrg
439 1.15 thorpej return (sys_unmount(l, &ua, retval));
440 1.1 mrg }
441 1.1 mrg
442 1.1 mrg /*
443 1.1 mrg * Conversion table for SunOS NFS mount flags.
444 1.1 mrg */
445 1.1 mrg static struct {
446 1.1 mrg int sun_flg;
447 1.1 mrg int bsd_flg;
448 1.1 mrg } sunnfs_flgtab[] = {
449 1.1 mrg { SUNNFS_SOFT, NFSMNT_SOFT },
450 1.1 mrg { SUNNFS_WSIZE, NFSMNT_WSIZE },
451 1.1 mrg { SUNNFS_RSIZE, NFSMNT_RSIZE },
452 1.1 mrg { SUNNFS_TIMEO, NFSMNT_TIMEO },
453 1.1 mrg { SUNNFS_RETRANS, NFSMNT_RETRANS },
454 1.1 mrg { SUNNFS_HOSTNAME, 0 }, /* Ignored */
455 1.1 mrg { SUNNFS_INT, NFSMNT_INT },
456 1.1 mrg { SUNNFS_NOAC, 0 }, /* Ignored */
457 1.1 mrg { SUNNFS_ACREGMIN, 0 }, /* Ignored */
458 1.1 mrg { SUNNFS_ACREGMAX, 0 }, /* Ignored */
459 1.1 mrg { SUNNFS_ACDIRMIN, 0 }, /* Ignored */
460 1.1 mrg { SUNNFS_ACDIRMAX, 0 }, /* Ignored */
461 1.1 mrg { SUNNFS_SECURE, 0 }, /* Ignored */
462 1.1 mrg { SUNNFS_NOCTO, 0 }, /* Ignored */
463 1.1 mrg { SUNNFS_POSIX, 0 } /* Ignored */
464 1.1 mrg };
465 1.1 mrg
466 1.1 mrg int
467 1.56 dsl sunos32_sys_mount(struct lwp *l, const struct sunos32_sys_mount_args *uap, register_t *retval)
468 1.1 mrg {
469 1.56 dsl /* {
470 1.4 mrg syscallarg(netbsd32_charp) type;
471 1.4 mrg syscallarg(netbsd32_charp) path;
472 1.4 mrg syscallarg(int) flags;
473 1.45 christos syscallarg(netbsd32_caddr_t) data;
474 1.56 dsl } */
475 1.1 mrg int oflags = SCARG(uap, flags), nflags, error;
476 1.1 mrg char fsname[MFSNAMELEN];
477 1.50 dsl register_t dummy;
478 1.1 mrg
479 1.1 mrg if (oflags & (SUNM_NOSUB | SUNM_SYS5))
480 1.1 mrg return (EINVAL);
481 1.1 mrg if ((oflags & SUNM_NEWTYPE) == 0)
482 1.1 mrg return (EINVAL);
483 1.1 mrg nflags = 0;
484 1.1 mrg if (oflags & SUNM_RDONLY)
485 1.1 mrg nflags |= MNT_RDONLY;
486 1.1 mrg if (oflags & SUNM_NOSUID)
487 1.1 mrg nflags |= MNT_NOSUID;
488 1.1 mrg if (oflags & SUNM_REMOUNT)
489 1.1 mrg nflags |= MNT_UPDATE;
490 1.1 mrg
491 1.50 dsl error = copyinstr(SCARG_P32(uap, type), fsname, sizeof fsname, NULL);
492 1.1 mrg if (error)
493 1.1 mrg return (error);
494 1.1 mrg
495 1.50 dsl if (strncmp(fsname, "nfs", sizeof fsname) == 0) {
496 1.1 mrg struct sunos_nfs_args sna;
497 1.1 mrg struct nfs_args na; /* XXX */
498 1.1 mrg int n;
499 1.1 mrg
500 1.47 dsl error = copyin(SCARG_P32(uap, data), &sna, sizeof sna);
501 1.1 mrg if (error)
502 1.1 mrg return (error);
503 1.50 dsl /* sa.sa_len = sizeof(sain); */
504 1.1 mrg na.version = NFS_ARGSVERSION;
505 1.50 dsl na.addr = (void *)sna.addr;
506 1.1 mrg na.addrlen = sizeof(struct sockaddr);
507 1.1 mrg na.sotype = SOCK_DGRAM;
508 1.1 mrg na.proto = IPPROTO_UDP;
509 1.50 dsl na.fh = sna.fh;
510 1.1 mrg na.fhsize = NFSX_V2FH;
511 1.1 mrg na.flags = 0;
512 1.1 mrg n = sizeof(sunnfs_flgtab) / sizeof(sunnfs_flgtab[0]);
513 1.1 mrg while (--n >= 0)
514 1.1 mrg if (sna.flags & sunnfs_flgtab[n].sun_flg)
515 1.1 mrg na.flags |= sunnfs_flgtab[n].bsd_flg;
516 1.1 mrg na.wsize = sna.wsize;
517 1.1 mrg na.rsize = sna.rsize;
518 1.1 mrg if (na.flags & NFSMNT_RSIZE) {
519 1.1 mrg na.flags |= NFSMNT_READDIRSIZE;
520 1.1 mrg na.readdirsize = na.rsize;
521 1.1 mrg }
522 1.1 mrg na.timeo = sna.timeo;
523 1.1 mrg na.retrans = sna.retrans;
524 1.1 mrg na.hostname = (char *)(u_long)sna.hostname;
525 1.1 mrg
526 1.76 maxv return do_sys_mount(l, "nfs", UIO_SYSSPACE,
527 1.50 dsl SCARG_P32(uap, path), nflags, &na, UIO_SYSSPACE, sizeof na,
528 1.50 dsl &dummy);
529 1.1 mrg }
530 1.50 dsl
531 1.50 dsl if (strcmp(fsname, "4.2") == 0)
532 1.50 dsl strcpy(fsname, "ffs");
533 1.50 dsl
534 1.76 maxv return do_sys_mount(l, fsname, UIO_SYSSPACE,
535 1.50 dsl SCARG_P32(uap, path), nflags, SCARG_P32(uap, data), UIO_USERSPACE,
536 1.50 dsl 0, &dummy);
537 1.1 mrg }
538 1.1 mrg
539 1.53 dsl void native_to_sunos_sigset(const sigset_t *, int *);
540 1.53 dsl void sunos_to_native_sigset(const int, sigset_t *);
541 1.1 mrg
542 1.35 perry inline void
543 1.54 dsl native_to_sunos_sigset(const sigset_t *ss, int *mask)
544 1.1 mrg {
545 1.79.4.1 martin
546 1.1 mrg *mask = ss->__bits[0];
547 1.1 mrg }
548 1.1 mrg
549 1.35 perry inline void
550 1.54 dsl sunos_to_native_sigset(const int mask, sigset_t *ss)
551 1.1 mrg {
552 1.1 mrg
553 1.79.4.1 martin memset(ss, 0, sizeof(*ss));
554 1.1 mrg ss->__bits[0] = mask;
555 1.1 mrg ss->__bits[1] = 0;
556 1.1 mrg ss->__bits[2] = 0;
557 1.1 mrg ss->__bits[3] = 0;
558 1.1 mrg }
559 1.1 mrg
560 1.1 mrg int
561 1.56 dsl sunos32_sys_sigpending(struct lwp *l, const struct sunos32_sys_sigpending_args *uap, register_t *retval)
562 1.1 mrg {
563 1.56 dsl /* {
564 1.4 mrg syscallarg(netbsd32_intp) mask;
565 1.56 dsl } */
566 1.1 mrg sigset_t ss;
567 1.1 mrg int mask;
568 1.1 mrg
569 1.43 ad sigpending1(l, &ss);
570 1.1 mrg native_to_sunos_sigset(&ss, &mask);
571 1.1 mrg
572 1.47 dsl return (copyout((void *)(u_long)&mask, SCARG_P32(uap, mask), sizeof(int)));
573 1.1 mrg }
574 1.1 mrg
575 1.29 perry int
576 1.56 dsl sunos32_sys_sigsuspend(struct lwp *l, const struct sunos32_sys_sigsuspend_args *uap, register_t *retval)
577 1.1 mrg {
578 1.56 dsl /* {
579 1.1 mrg syscallarg(int) mask;
580 1.56 dsl } */
581 1.1 mrg int mask;
582 1.1 mrg sigset_t ss;
583 1.29 perry
584 1.1 mrg mask = SCARG(uap, mask);
585 1.1 mrg sunos_to_native_sigset(mask, &ss);
586 1.43 ad return (sigsuspend1(l, &ss));
587 1.1 mrg }
588 1.1 mrg
589 1.1 mrg /*
590 1.1 mrg * Read Sun-style directory entries. We suck them into kernel space so
591 1.1 mrg * that they can be massaged before being copied out to user code. Like
592 1.1 mrg * SunOS, we squish out `empty' entries.
593 1.1 mrg *
594 1.1 mrg * This is quite ugly, but what do you expect from compatibility code?
595 1.1 mrg */
596 1.1 mrg int
597 1.56 dsl sunos32_sys_getdents(struct lwp *l, const struct sunos32_sys_getdents_args *uap, register_t *retval)
598 1.1 mrg {
599 1.56 dsl /* {
600 1.4 mrg syscallarg(int) fd;
601 1.4 mrg syscallarg(netbsd32_charp) buf;
602 1.4 mrg syscallarg(int) nbytes;
603 1.56 dsl } */
604 1.1 mrg struct dirent *bdp;
605 1.1 mrg struct vnode *vp;
606 1.45 christos char *inp, *sbuf; /* BSD-format */
607 1.1 mrg int len, reclen; /* BSD-format */
608 1.45 christos char *outp; /* Sun-format */
609 1.1 mrg int resid, sunos_reclen;/* Sun-format */
610 1.1 mrg struct file *fp;
611 1.1 mrg struct uio auio;
612 1.1 mrg struct iovec aiov;
613 1.6 mrg struct sunos32_dirent idb;
614 1.1 mrg off_t off; /* true file offset */
615 1.1 mrg int buflen, error, eofflag;
616 1.1 mrg off_t *cookiebuf, *cookie;
617 1.1 mrg int ncookies;
618 1.1 mrg
619 1.61 ad /* fd_getvnode() will use the descriptor for us */
620 1.59 ad if ((error = fd_getvnode(SCARG(uap, fd), &fp)) != 0)
621 1.1 mrg return (error);
622 1.1 mrg
623 1.1 mrg if ((fp->f_flag & FREAD) == 0) {
624 1.1 mrg error = EBADF;
625 1.1 mrg goto out1;
626 1.1 mrg }
627 1.1 mrg
628 1.75 matt vp = fp->f_vnode;
629 1.1 mrg if (vp->v_type != VDIR) {
630 1.1 mrg error = EINVAL;
631 1.1 mrg goto out1;
632 1.1 mrg }
633 1.1 mrg
634 1.79 riastrad buflen = uimin(MAXBSIZE, SCARG(uap, nbytes));
635 1.31 christos sbuf = malloc(buflen, M_TEMP, M_WAITOK);
636 1.1 mrg vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
637 1.1 mrg off = fp->f_offset;
638 1.1 mrg again:
639 1.31 christos aiov.iov_base = sbuf;
640 1.1 mrg aiov.iov_len = buflen;
641 1.1 mrg auio.uio_iov = &aiov;
642 1.1 mrg auio.uio_iovcnt = 1;
643 1.1 mrg auio.uio_rw = UIO_READ;
644 1.1 mrg auio.uio_resid = buflen;
645 1.1 mrg auio.uio_offset = off;
646 1.36 yamt UIO_SETUP_SYSSPACE(&auio);
647 1.1 mrg /*
648 1.1 mrg * First we read into the malloc'ed buffer, then
649 1.1 mrg * we massage it into user space, one record at a time.
650 1.1 mrg */
651 1.1 mrg error = VOP_READDIR(vp, &auio, fp->f_cred, &eofflag, &cookiebuf,
652 1.1 mrg &ncookies);
653 1.1 mrg if (error)
654 1.1 mrg goto out;
655 1.1 mrg
656 1.31 christos inp = sbuf;
657 1.47 dsl outp = SCARG_P32(uap, buf);
658 1.1 mrg resid = SCARG(uap, nbytes);
659 1.1 mrg if ((len = buflen - auio.uio_resid) == 0)
660 1.1 mrg goto eof;
661 1.1 mrg
662 1.1 mrg for (cookie = cookiebuf; len > 0; len -= reclen) {
663 1.1 mrg bdp = (struct dirent *)inp;
664 1.1 mrg reclen = bdp->d_reclen;
665 1.78 riastrad if (reclen & 3) {
666 1.78 riastrad error = EIO;
667 1.78 riastrad goto out;
668 1.78 riastrad }
669 1.30 christos if (cookie && (*cookie >> 32) != 0) {
670 1.1 mrg compat_offseterr(vp, "sunos_getdents");
671 1.1 mrg error = EINVAL;
672 1.1 mrg goto out;
673 1.1 mrg }
674 1.1 mrg if (bdp->d_fileno == 0) {
675 1.1 mrg inp += reclen; /* it is a hole; squish it out */
676 1.30 christos if (cookie)
677 1.30 christos off = *cookie++;
678 1.30 christos else
679 1.30 christos off += reclen;
680 1.1 mrg continue;
681 1.1 mrg }
682 1.79.4.1 martin memset(&idb, 0, sizeof(idb));
683 1.6 mrg sunos_reclen = SUNOS32_RECLEN(&idb, bdp->d_namlen);
684 1.1 mrg if (reclen > len || resid < sunos_reclen) {
685 1.1 mrg /* entry too big for buffer, so just stop */
686 1.1 mrg outp++;
687 1.1 mrg break;
688 1.1 mrg }
689 1.30 christos if (cookie)
690 1.30 christos off = *cookie++; /* each entry points to next */
691 1.30 christos else
692 1.30 christos off += reclen;
693 1.1 mrg /*
694 1.1 mrg * Massage in place to make a Sun-shaped dirent (otherwise
695 1.1 mrg * we have to worry about touching user memory outside of
696 1.1 mrg * the copyout() call).
697 1.1 mrg */
698 1.1 mrg idb.d_fileno = bdp->d_fileno;
699 1.1 mrg idb.d_off = off;
700 1.1 mrg idb.d_reclen = sunos_reclen;
701 1.1 mrg idb.d_namlen = bdp->d_namlen;
702 1.18 itojun strlcpy(idb.d_name, bdp->d_name, sizeof(idb.d_name));
703 1.44 christos if ((error = copyout((void *)&idb, outp, sunos_reclen)) != 0)
704 1.1 mrg goto out;
705 1.1 mrg /* advance past this real entry */
706 1.1 mrg inp += reclen;
707 1.1 mrg /* advance output past Sun-shaped entry */
708 1.1 mrg outp += sunos_reclen;
709 1.1 mrg resid -= sunos_reclen;
710 1.1 mrg }
711 1.1 mrg
712 1.1 mrg /* if we squished out the whole block, try again */
713 1.69 he if (outp == SCARG_P32(uap, buf)) {
714 1.69 he if (cookiebuf)
715 1.69 he free(cookiebuf, M_TEMP);
716 1.69 he cookiebuf = NULL;
717 1.1 mrg goto again;
718 1.69 he }
719 1.1 mrg fp->f_offset = off; /* update the vnode offset */
720 1.1 mrg
721 1.1 mrg eof:
722 1.1 mrg *retval = SCARG(uap, nbytes) - resid;
723 1.1 mrg out:
724 1.72 hannken VOP_UNLOCK(vp);
725 1.1 mrg free(cookiebuf, M_TEMP);
726 1.31 christos free(sbuf, M_TEMP);
727 1.1 mrg out1:
728 1.59 ad fd_putfile(SCARG(uap, fd));
729 1.1 mrg return (error);
730 1.1 mrg }
731 1.1 mrg
732 1.6 mrg #define SUNOS32__MAP_NEW 0x80000000 /* if not, old mmap & cannot handle */
733 1.1 mrg
734 1.1 mrg int
735 1.56 dsl sunos32_sys_mmap(struct lwp *l, const struct sunos32_sys_mmap_args *uap, register_t *retval)
736 1.1 mrg {
737 1.56 dsl /* {
738 1.4 mrg syscallarg(netbsd32_voidp) addr;
739 1.4 mrg syscallarg(netbsd32_size_t) len;
740 1.4 mrg syscallarg(int) prot;
741 1.4 mrg syscallarg(int) flags;
742 1.4 mrg syscallarg(int) fd;
743 1.4 mrg syscallarg(netbsd32_long) pos;
744 1.56 dsl } */
745 1.1 mrg struct sys_mmap_args ua;
746 1.3 mrg int error;
747 1.1 mrg
748 1.1 mrg /*
749 1.1 mrg * Verify the arguments.
750 1.1 mrg */
751 1.1 mrg if (SCARG(uap, prot) & ~(PROT_READ|PROT_WRITE|PROT_EXEC))
752 1.1 mrg return (EINVAL); /* XXX still needed? */
753 1.1 mrg
754 1.6 mrg if ((SCARG(uap, flags) & SUNOS32__MAP_NEW) == 0)
755 1.1 mrg return (EINVAL);
756 1.1 mrg
757 1.3 mrg SUNOS32TOP_UAP(addr, void);
758 1.3 mrg SUNOS32TOX_UAP(len, size_t);
759 1.3 mrg SUNOS32TO64_UAP(prot);
760 1.6 mrg SCARG(&ua, flags) = SCARG(uap, flags) & ~SUNOS32__MAP_NEW;
761 1.3 mrg SUNOS32TO64_UAP(fd);
762 1.66 nakayama SCARG(&ua, PAD) = 0;
763 1.3 mrg SUNOS32TOX_UAP(pos, off_t);
764 1.1 mrg
765 1.19 nakayama error = sys_mmap(l, &ua, retval);
766 1.19 nakayama if ((u_long)*retval > (u_long)UINT_MAX) {
767 1.77 khorben printf("sunos32_mmap: retval out of range: 0x%lx\n",
768 1.19 nakayama (u_long)*retval);
769 1.19 nakayama /* Should try to recover and return an error here. */
770 1.19 nakayama }
771 1.3 mrg return (error);
772 1.1 mrg }
773 1.1 mrg
774 1.1 mrg #define MC_SYNC 1
775 1.1 mrg #define MC_LOCK 2
776 1.1 mrg #define MC_UNLOCK 3
777 1.1 mrg #define MC_ADVISE 4
778 1.1 mrg #define MC_LOCKAS 5
779 1.1 mrg #define MC_UNLOCKAS 6
780 1.1 mrg
781 1.1 mrg int
782 1.56 dsl sunos32_sys_mctl(struct lwp *l, const struct sunos32_sys_mctl_args *uap, register_t *retval)
783 1.1 mrg {
784 1.56 dsl /* {
785 1.4 mrg syscallarg(netbsd32_voidp) addr;
786 1.4 mrg syscallarg(int) len;
787 1.4 mrg syscallarg(int) func;
788 1.4 mrg syscallarg(netbsd32_voidp) arg;
789 1.56 dsl } */
790 1.1 mrg
791 1.1 mrg switch (SCARG(uap, func)) {
792 1.1 mrg case MC_ADVISE: /* ignore for now */
793 1.1 mrg return (0);
794 1.1 mrg case MC_SYNC: /* translate to msync */
795 1.56 dsl return (netbsd32___msync13(l, (const void *)uap, retval));
796 1.1 mrg default:
797 1.1 mrg return (EINVAL);
798 1.1 mrg }
799 1.1 mrg }
800 1.1 mrg
801 1.1 mrg int
802 1.56 dsl sunos32_sys_setsockopt(struct lwp *l, const struct sunos32_sys_setsockopt_args *uap, register_t *retval)
803 1.1 mrg {
804 1.56 dsl /* {
805 1.4 mrg syscallarg(int) s;
806 1.4 mrg syscallarg(int) level;
807 1.4 mrg syscallarg(int) name;
808 1.45 christos syscallarg(netbsd32_caddr_t) val;
809 1.4 mrg syscallarg(int) valsize;
810 1.56 dsl } */
811 1.62 plunky struct sockopt sopt;
812 1.59 ad struct socket *so;
813 1.56 dsl int name = SCARG(uap, name);
814 1.1 mrg int error;
815 1.1 mrg
816 1.61 ad /* fd_getsock() will use the descriptor for us */
817 1.59 ad if ((error = fd_getsock(SCARG(uap, s), &so)) != 0)
818 1.1 mrg return (error);
819 1.1 mrg #define SO_DONTLINGER (~SO_LINGER)
820 1.56 dsl if (name == SO_DONTLINGER) {
821 1.62 plunky struct linger lg;
822 1.62 plunky
823 1.62 plunky lg.l_onoff = 0;
824 1.62 plunky error = so_setsockopt(l, so, SCARG(uap, level), SO_LINGER,
825 1.62 plunky &lg, sizeof(lg));
826 1.1 mrg goto out;
827 1.1 mrg }
828 1.1 mrg if (SCARG(uap, level) == IPPROTO_IP) {
829 1.1 mrg #define SUNOS_IP_MULTICAST_IF 2
830 1.1 mrg #define SUNOS_IP_MULTICAST_TTL 3
831 1.1 mrg #define SUNOS_IP_MULTICAST_LOOP 4
832 1.1 mrg #define SUNOS_IP_ADD_MEMBERSHIP 5
833 1.1 mrg #define SUNOS_IP_DROP_MEMBERSHIP 6
834 1.27 matt static const int ipoptxlat[] = {
835 1.1 mrg IP_MULTICAST_IF,
836 1.1 mrg IP_MULTICAST_TTL,
837 1.1 mrg IP_MULTICAST_LOOP,
838 1.1 mrg IP_ADD_MEMBERSHIP,
839 1.1 mrg IP_DROP_MEMBERSHIP
840 1.1 mrg };
841 1.56 dsl if (name >= SUNOS_IP_MULTICAST_IF &&
842 1.56 dsl name <= SUNOS_IP_DROP_MEMBERSHIP) {
843 1.56 dsl name = ipoptxlat[name - SUNOS_IP_MULTICAST_IF];
844 1.1 mrg }
845 1.1 mrg }
846 1.1 mrg if (SCARG(uap, valsize) > MLEN) {
847 1.1 mrg error = EINVAL;
848 1.1 mrg goto out;
849 1.1 mrg }
850 1.62 plunky sockopt_init(&sopt, SCARG(uap, level), name, SCARG(uap, valsize));
851 1.47 dsl if (SCARG_P32(uap, val)) {
852 1.62 plunky error = copyin(SCARG_P32(uap, val), sopt.sopt_data,
853 1.1 mrg (u_int)SCARG(uap, valsize));
854 1.1 mrg }
855 1.62 plunky if (error == 0)
856 1.62 plunky error = sosetopt(so, &sopt);
857 1.62 plunky sockopt_destroy(&sopt);
858 1.1 mrg out:
859 1.59 ad fd_putfile(SCARG(uap, s));
860 1.1 mrg return (error);
861 1.1 mrg }
862 1.11 mrg
863 1.35 perry static inline int sunos32_sys_socket_common(struct lwp *, register_t *,
864 1.11 mrg int type);
865 1.35 perry static inline int
866 1.54 dsl sunos32_sys_socket_common(struct lwp *l, register_t *retval, int type)
867 1.11 mrg {
868 1.11 mrg struct socket *so;
869 1.11 mrg int error, fd;
870 1.11 mrg
871 1.61 ad /* fd_getsock() will use the descriptor for us */
872 1.11 mrg fd = (int)*retval;
873 1.59 ad if ((error = fd_getsock(fd, &so)) == 0) {
874 1.11 mrg if (type == SOCK_DGRAM)
875 1.11 mrg so->so_options |= SO_BROADCAST;
876 1.59 ad fd_putfile(fd);
877 1.11 mrg }
878 1.11 mrg return (error);
879 1.11 mrg }
880 1.11 mrg
881 1.11 mrg int
882 1.56 dsl sunos32_sys_socket(struct lwp *l, const struct sunos32_sys_socket_args *uap, register_t *retval)
883 1.11 mrg {
884 1.56 dsl /* {
885 1.11 mrg syscallarg(int) domain;
886 1.11 mrg syscallarg(int) type;
887 1.11 mrg syscallarg(int) protocol;
888 1.56 dsl } */
889 1.11 mrg int error;
890 1.11 mrg
891 1.65 nakayama error = netbsd32___socket30(l, (const void *)uap, retval);
892 1.11 mrg if (error)
893 1.11 mrg return (error);
894 1.15 thorpej return sunos32_sys_socket_common(l, retval, SCARG(uap, type));
895 1.11 mrg }
896 1.11 mrg
897 1.11 mrg int
898 1.56 dsl sunos32_sys_socketpair(struct lwp *l, const struct sunos32_sys_socketpair_args *uap, register_t *retval)
899 1.11 mrg {
900 1.56 dsl /* {
901 1.11 mrg syscallarg(int) domain;
902 1.11 mrg syscallarg(int) type;
903 1.11 mrg syscallarg(int) protocol;
904 1.11 mrg syscallarg(int *) rsv;
905 1.56 dsl } */
906 1.11 mrg int error;
907 1.11 mrg
908 1.56 dsl error = netbsd32_socketpair(l, (const void *)uap, retval);
909 1.11 mrg if (error)
910 1.11 mrg return (error);
911 1.15 thorpej return sunos32_sys_socket_common(l, retval, SCARG(uap, type));
912 1.11 mrg }
913 1.11 mrg
914 1.1 mrg
915 1.1 mrg /*
916 1.1 mrg * XXX: This needs cleaning up.
917 1.1 mrg */
918 1.1 mrg int
919 1.56 dsl sunos32_sys_auditsys(struct lwp *l, const struct sunos32_sys_auditsys_args *uap, register_t *retval)
920 1.1 mrg {
921 1.1 mrg return 0;
922 1.1 mrg }
923 1.1 mrg
924 1.1 mrg int
925 1.56 dsl sunos32_sys_uname(struct lwp *l, const struct sunos32_sys_uname_args *uap, register_t *retval)
926 1.1 mrg {
927 1.56 dsl /* {
928 1.4 mrg syscallarg(sunos32_utsnamep_t) name;
929 1.56 dsl } */
930 1.1 mrg struct sunos_utsname sut;
931 1.1 mrg
932 1.1 mrg memset(&sut, 0, sizeof(sut));
933 1.1 mrg
934 1.1 mrg memcpy(sut.sysname, ostype, sizeof(sut.sysname) - 1);
935 1.1 mrg memcpy(sut.nodename, hostname, sizeof(sut.nodename));
936 1.1 mrg sut.nodename[sizeof(sut.nodename)-1] = '\0';
937 1.1 mrg memcpy(sut.release, osrelease, sizeof(sut.release) - 1);
938 1.1 mrg memcpy(sut.version, "1", sizeof(sut.version) - 1);
939 1.1 mrg memcpy(sut.machine, machine, sizeof(sut.machine) - 1);
940 1.1 mrg
941 1.47 dsl return copyout((void *)&sut, SCARG_P32(uap, name),
942 1.1 mrg sizeof(struct sunos_utsname));
943 1.1 mrg }
944 1.1 mrg
945 1.1 mrg int
946 1.56 dsl sunos32_sys_setpgrp(struct lwp *l, const struct sunos32_sys_setpgrp_args *uap, register_t *retval)
947 1.1 mrg {
948 1.56 dsl /* {
949 1.4 mrg syscallarg(int) pid;
950 1.4 mrg syscallarg(int) pgid;
951 1.56 dsl } */
952 1.15 thorpej struct proc *p = l->l_proc;
953 1.1 mrg
954 1.1 mrg /*
955 1.1 mrg * difference to our setpgid call is to include backwards
956 1.1 mrg * compatibility to pre-setsid() binaries. Do setsid()
957 1.1 mrg * instead of setpgid() in those cases where the process
958 1.1 mrg * tries to create a new session the old way.
959 1.1 mrg */
960 1.1 mrg if (!SCARG(uap, pgid) &&
961 1.1 mrg (!SCARG(uap, pid) || SCARG(uap, pid) == p->p_pid))
962 1.56 dsl return sys_setsid(l, NULL, retval);
963 1.1 mrg else
964 1.56 dsl return netbsd32_setpgid(l, (const void *)uap, retval);
965 1.1 mrg }
966 1.1 mrg
967 1.1 mrg int
968 1.56 dsl sunos32_sys_open(struct lwp *l, const struct sunos32_sys_open_args *uap, register_t *retval)
969 1.1 mrg {
970 1.56 dsl /* {
971 1.4 mrg syscallarg(const netbsd32_charp) path;
972 1.4 mrg syscallarg(int) flags;
973 1.4 mrg syscallarg(int) mode;
974 1.56 dsl } */
975 1.15 thorpej struct proc *p = l->l_proc;
976 1.1 mrg struct sys_open_args ua;
977 1.15 thorpej int lf, r;
978 1.1 mrg int noctty;
979 1.1 mrg int ret;
980 1.1 mrg
981 1.1 mrg /* convert mode into NetBSD mode */
982 1.15 thorpej lf = SCARG(uap, flags);
983 1.15 thorpej noctty = lf & 0x8000;
984 1.15 thorpej r = (lf & (0x0001 | 0x0002 | 0x0008 | 0x0040 | 0x0200 | 0x0400 | 0x0800));
985 1.15 thorpej r |= ((lf & (0x0004 | 0x1000 | 0x4000)) ? O_NONBLOCK : 0);
986 1.15 thorpej r |= ((lf & 0x0080) ? O_SHLOCK : 0);
987 1.15 thorpej r |= ((lf & 0x0100) ? O_EXLOCK : 0);
988 1.15 thorpej r |= ((lf & 0x2000) ? O_FSYNC : 0);
989 1.1 mrg
990 1.1 mrg SUNOS32TOP_UAP(path, const char);
991 1.1 mrg SCARG(&ua, flags) = r;
992 1.1 mrg SUNOS32TO64_UAP(mode);
993 1.1 mrg
994 1.15 thorpej ret = sys_open(l, &ua, retval);
995 1.1 mrg
996 1.43 ad /* XXXSMP unlocked */
997 1.43 ad if (!ret && !noctty && SESS_LEADER(p) && !(p->p_lflag & PL_CONTROLT)) {
998 1.59 ad file_t *fp;
999 1.59 ad int fd;
1000 1.9 thorpej
1001 1.59 ad fd = (int)*retval;
1002 1.59 ad fp = fd_getfile(fd);
1003 1.1 mrg
1004 1.1 mrg /* ignore any error, just give it a try */
1005 1.58 dsl if (fp != NULL) {
1006 1.58 dsl if (fp->f_type == DTYPE_VNODE)
1007 1.59 ad (fp->f_ops->fo_ioctl)(fp, TIOCSCTTY, NULL);
1008 1.59 ad fd_putfile(fd);
1009 1.58 dsl }
1010 1.1 mrg }
1011 1.1 mrg return ret;
1012 1.1 mrg }
1013 1.1 mrg
1014 1.1 mrg int
1015 1.56 dsl sunos32_sys_ustat(struct lwp *l, const struct sunos32_sys_ustat_args *uap, register_t *retval)
1016 1.1 mrg {
1017 1.56 dsl /* {
1018 1.4 mrg syscallarg(int) dev;
1019 1.4 mrg syscallarg(sunos32_ustatp_t) buf;
1020 1.56 dsl } */
1021 1.1 mrg struct sunos_ustat us;
1022 1.1 mrg int error;
1023 1.1 mrg
1024 1.1 mrg memset(&us, 0, sizeof us);
1025 1.1 mrg
1026 1.1 mrg /*
1027 1.1 mrg * XXX: should set f_tfree and f_tinode at least
1028 1.1 mrg * How do we translate dev -> fstat? (and then to sunos_ustat)
1029 1.1 mrg */
1030 1.1 mrg
1031 1.47 dsl if ((error = copyout(&us, SCARG_P32(uap, buf), sizeof us)) != 0)
1032 1.1 mrg return (error);
1033 1.1 mrg return 0;
1034 1.1 mrg }
1035 1.1 mrg
1036 1.1 mrg int
1037 1.56 dsl sunos32_sys_quotactl(struct lwp *l, const struct sunos32_sys_quotactl_args *uap, register_t *retval)
1038 1.1 mrg {
1039 1.1 mrg
1040 1.1 mrg return EINVAL;
1041 1.1 mrg }
1042 1.1 mrg
1043 1.1 mrg int
1044 1.56 dsl sunos32_sys_vhangup(struct lwp *l, const void *v, register_t *retval)
1045 1.1 mrg {
1046 1.15 thorpej struct proc *p = l->l_proc;
1047 1.1 mrg struct session *sp = p->p_session;
1048 1.1 mrg
1049 1.1 mrg if (sp->s_ttyvp == 0)
1050 1.1 mrg return 0;
1051 1.1 mrg
1052 1.1 mrg if (sp->s_ttyp && sp->s_ttyp->t_session == sp && sp->s_ttyp->t_pgrp)
1053 1.1 mrg pgsignal(sp->s_ttyp->t_pgrp, SIGHUP, 1);
1054 1.1 mrg
1055 1.1 mrg (void) ttywait(sp->s_ttyp);
1056 1.1 mrg if (sp->s_ttyvp)
1057 1.1 mrg VOP_REVOKE(sp->s_ttyvp, REVOKEALL);
1058 1.1 mrg if (sp->s_ttyvp)
1059 1.1 mrg vrele(sp->s_ttyvp);
1060 1.1 mrg sp->s_ttyvp = NULL;
1061 1.1 mrg
1062 1.1 mrg return 0;
1063 1.1 mrg }
1064 1.1 mrg
1065 1.1 mrg static int
1066 1.54 dsl sunstatfs(struct statvfs *sp, void *sbuf)
1067 1.1 mrg {
1068 1.1 mrg struct sunos_statfs ssfs;
1069 1.1 mrg
1070 1.1 mrg memset(&ssfs, 0, sizeof ssfs);
1071 1.1 mrg ssfs.f_type = 0;
1072 1.1 mrg ssfs.f_bsize = sp->f_bsize;
1073 1.1 mrg ssfs.f_blocks = sp->f_blocks;
1074 1.1 mrg ssfs.f_bfree = sp->f_bfree;
1075 1.1 mrg ssfs.f_bavail = sp->f_bavail;
1076 1.1 mrg ssfs.f_files = sp->f_files;
1077 1.1 mrg ssfs.f_ffree = sp->f_ffree;
1078 1.25 christos ssfs.f_fsid = sp->f_fsidx;
1079 1.44 christos return copyout((void *)&ssfs, sbuf, sizeof ssfs);
1080 1.29 perry }
1081 1.1 mrg
1082 1.1 mrg int
1083 1.56 dsl sunos32_sys_statfs(struct lwp *l, const struct sunos32_sys_statfs_args *uap, register_t *retval)
1084 1.1 mrg {
1085 1.56 dsl /* {
1086 1.4 mrg syscallarg(const netbsd32_charp) path;
1087 1.4 mrg syscallarg(sunos32_statfsp_t) buf;
1088 1.56 dsl } */
1089 1.1 mrg struct mount *mp;
1090 1.26 hannken struct statvfs *sp;
1091 1.1 mrg int error;
1092 1.67 dholland struct vnode *vp;
1093 1.31 christos struct sys_statvfs1_args ua;
1094 1.1 mrg
1095 1.31 christos SUNOS32TOP_UAP(path, const char);
1096 1.1 mrg
1097 1.67 dholland error = namei_simple_user(SCARG(&ua, path),
1098 1.67 dholland NSM_FOLLOW_TRYEMULROOT, &vp);
1099 1.67 dholland if (error != 0)
1100 1.1 mrg return (error);
1101 1.67 dholland mp = vp->v_mount;
1102 1.1 mrg sp = &mp->mnt_stat;
1103 1.67 dholland vrele(vp);
1104 1.52 dogcow if ((error = VFS_STATVFS(mp, sp)) != 0)
1105 1.1 mrg return (error);
1106 1.26 hannken sp->f_flag = mp->mnt_flag & MNT_VISFLAGMASK;
1107 1.49 dsl return sunstatfs(sp, SCARG_P32(uap, buf));
1108 1.1 mrg }
1109 1.1 mrg
1110 1.1 mrg int
1111 1.56 dsl sunos32_sys_fstatfs(struct lwp *l, const struct sunos32_sys_fstatfs_args *uap, register_t *retval)
1112 1.1 mrg {
1113 1.56 dsl /* {
1114 1.4 mrg syscallarg(int) fd;
1115 1.4 mrg syscallarg(sunos32_statfsp_t) buf;
1116 1.56 dsl } */
1117 1.59 ad file_t *fp;
1118 1.1 mrg struct mount *mp;
1119 1.26 hannken struct statvfs *sp;
1120 1.1 mrg int error;
1121 1.1 mrg
1122 1.61 ad /* fd_getvnode() will use the descriptor for us */
1123 1.59 ad if ((error = fd_getvnode(SCARG(uap, fd), &fp)) != 0)
1124 1.1 mrg return (error);
1125 1.75 matt mp = fp->f_vnode->v_mount;
1126 1.1 mrg sp = &mp->mnt_stat;
1127 1.52 dogcow if ((error = VFS_STATVFS(mp, sp)) != 0)
1128 1.1 mrg goto out;
1129 1.26 hannken sp->f_flag = mp->mnt_flag & MNT_VISFLAGMASK;
1130 1.49 dsl error = sunstatfs(sp, SCARG_P32(uap, buf));
1131 1.1 mrg out:
1132 1.59 ad fd_putfile(SCARG(uap, fd));
1133 1.1 mrg return (error);
1134 1.1 mrg }
1135 1.1 mrg
1136 1.1 mrg int
1137 1.56 dsl sunos32_sys_exportfs(struct lwp *l, const struct sunos32_sys_exportfs_args *uap, register_t *retval)
1138 1.1 mrg {
1139 1.1 mrg /*
1140 1.1 mrg * XXX: should perhaps translate into a mount(2)
1141 1.1 mrg * with MOUNT_EXPORT?
1142 1.1 mrg */
1143 1.1 mrg return 0;
1144 1.1 mrg }
1145 1.1 mrg
1146 1.1 mrg int
1147 1.56 dsl sunos32_sys_mknod(struct lwp *l, const struct sunos32_sys_mknod_args *uap, register_t *retval)
1148 1.1 mrg {
1149 1.56 dsl /* {
1150 1.4 mrg syscallarg(const netbsd32_charp) path;
1151 1.4 mrg syscallarg(int) mode;
1152 1.4 mrg syscallarg(int) dev;
1153 1.56 dsl } */
1154 1.1 mrg
1155 1.1 mrg if (S_ISFIFO(SCARG(uap, mode)))
1156 1.56 dsl return netbsd32_mkfifo(l, (const struct netbsd32_mkfifo_args *)uap, retval);
1157 1.1 mrg
1158 1.65 nakayama return compat_50_netbsd32_mknod(l, (const struct compat_50_netbsd32_mknod_args *)uap, retval);
1159 1.1 mrg }
1160 1.1 mrg
1161 1.1 mrg #define SUNOS_SC_ARG_MAX 1
1162 1.1 mrg #define SUNOS_SC_CHILD_MAX 2
1163 1.1 mrg #define SUNOS_SC_CLK_TCK 3
1164 1.1 mrg #define SUNOS_SC_NGROUPS_MAX 4
1165 1.1 mrg #define SUNOS_SC_OPEN_MAX 5
1166 1.1 mrg #define SUNOS_SC_JOB_CONTROL 6
1167 1.1 mrg #define SUNOS_SC_SAVED_IDS 7
1168 1.1 mrg #define SUNOS_SC_VERSION 8
1169 1.1 mrg
1170 1.1 mrg int
1171 1.56 dsl sunos32_sys_sysconf(struct lwp *l, const struct sunos32_sys_sysconf_args *uap, register_t *retval)
1172 1.1 mrg {
1173 1.56 dsl /* {
1174 1.4 mrg syscallarg(int) name;
1175 1.56 dsl } */
1176 1.57 hannken extern u_int maxfiles;
1177 1.1 mrg
1178 1.1 mrg switch(SCARG(uap, name)) {
1179 1.1 mrg case SUNOS_SC_ARG_MAX:
1180 1.1 mrg *retval = ARG_MAX;
1181 1.1 mrg break;
1182 1.1 mrg case SUNOS_SC_CHILD_MAX:
1183 1.1 mrg *retval = maxproc;
1184 1.1 mrg break;
1185 1.1 mrg case SUNOS_SC_CLK_TCK:
1186 1.1 mrg *retval = 60; /* should this be `hz', ie. 100? */
1187 1.1 mrg break;
1188 1.1 mrg case SUNOS_SC_NGROUPS_MAX:
1189 1.1 mrg *retval = NGROUPS_MAX;
1190 1.1 mrg break;
1191 1.1 mrg case SUNOS_SC_OPEN_MAX:
1192 1.1 mrg *retval = maxfiles;
1193 1.1 mrg break;
1194 1.1 mrg case SUNOS_SC_JOB_CONTROL:
1195 1.1 mrg *retval = 1;
1196 1.1 mrg break;
1197 1.1 mrg case SUNOS_SC_SAVED_IDS:
1198 1.1 mrg #ifdef _POSIX_SAVED_IDS
1199 1.1 mrg *retval = 1;
1200 1.1 mrg #else
1201 1.1 mrg *retval = 0;
1202 1.1 mrg #endif
1203 1.1 mrg break;
1204 1.1 mrg case SUNOS_SC_VERSION:
1205 1.1 mrg *retval = 198808;
1206 1.1 mrg break;
1207 1.1 mrg default:
1208 1.1 mrg return EINVAL;
1209 1.1 mrg }
1210 1.1 mrg return 0;
1211 1.1 mrg }
1212 1.1 mrg
1213 1.1 mrg #define SUNOS_RLIMIT_NOFILE 6 /* Other RLIMIT_* are the same */
1214 1.1 mrg #define SUNOS_RLIM_NLIMITS 7
1215 1.1 mrg
1216 1.1 mrg int
1217 1.56 dsl sunos32_sys_getrlimit(struct lwp *l, const struct sunos32_sys_getrlimit_args *uap, register_t *retval)
1218 1.1 mrg {
1219 1.56 dsl /* {
1220 1.4 mrg syscallarg(u_int) which;
1221 1.4 mrg syscallarg(netbsd32_orlimitp_t) rlp;
1222 1.56 dsl } */
1223 1.56 dsl struct compat_43_netbsd32_ogetrlimit_args ua_43;
1224 1.1 mrg
1225 1.1 mrg if (SCARG(uap, which) >= SUNOS_RLIM_NLIMITS)
1226 1.1 mrg return EINVAL;
1227 1.1 mrg
1228 1.56 dsl SCARG(&ua_43, which) = SCARG(uap, which) == SUNOS_RLIMIT_NOFILE ? RLIMIT_NOFILE : SCARG(uap, which);
1229 1.56 dsl SCARG(&ua_43, rlp) = SCARG(uap, rlp);
1230 1.1 mrg
1231 1.56 dsl return compat_43_netbsd32_ogetrlimit(l, &ua_43, retval);
1232 1.1 mrg }
1233 1.1 mrg
1234 1.1 mrg int
1235 1.56 dsl sunos32_sys_setrlimit(struct lwp *l, const struct sunos32_sys_setrlimit_args *uap, register_t *retval)
1236 1.1 mrg {
1237 1.56 dsl /* {
1238 1.4 mrg syscallarg(u_int) which;
1239 1.4 mrg syscallarg(netbsd32_orlimitp_t) rlp;
1240 1.56 dsl } */
1241 1.56 dsl struct compat_43_netbsd32_osetrlimit_args ua_43;
1242 1.1 mrg
1243 1.1 mrg if (SCARG(uap, which) >= SUNOS_RLIM_NLIMITS)
1244 1.1 mrg return EINVAL;
1245 1.1 mrg
1246 1.56 dsl SCARG(&ua_43, which) = SCARG(uap, which) == SUNOS_RLIMIT_NOFILE ? RLIMIT_NOFILE : SCARG(uap, which);
1247 1.56 dsl SCARG(&ua_43, rlp) = SCARG(uap, rlp);
1248 1.1 mrg
1249 1.56 dsl return compat_43_netbsd32_osetrlimit(l, &ua_43, retval);
1250 1.1 mrg }
1251 1.1 mrg
1252 1.1 mrg /* for the m68k machines */
1253 1.1 mrg #ifndef PT_GETFPREGS
1254 1.1 mrg #define PT_GETFPREGS -1
1255 1.1 mrg #endif
1256 1.1 mrg #ifndef PT_SETFPREGS
1257 1.1 mrg #define PT_SETFPREGS -1
1258 1.1 mrg #endif
1259 1.1 mrg
1260 1.27 matt static const int sreq2breq[] = {
1261 1.1 mrg PT_TRACE_ME, PT_READ_I, PT_READ_D, -1,
1262 1.1 mrg PT_WRITE_I, PT_WRITE_D, -1, PT_CONTINUE,
1263 1.1 mrg PT_KILL, -1, PT_ATTACH, PT_DETACH,
1264 1.1 mrg PT_GETREGS, PT_SETREGS, PT_GETFPREGS, PT_SETFPREGS
1265 1.1 mrg };
1266 1.27 matt static const int nreqs = sizeof(sreq2breq) / sizeof(sreq2breq[0]);
1267 1.1 mrg
1268 1.1 mrg int
1269 1.56 dsl sunos32_sys_ptrace(struct lwp *l, const struct sunos32_sys_ptrace_args *uap, register_t *retval)
1270 1.1 mrg {
1271 1.56 dsl /* {
1272 1.4 mrg syscallarg(int) req;
1273 1.4 mrg syscallarg(pid_t) pid;
1274 1.45 christos syscallarg(netbsd32_caddr_t) addr;
1275 1.4 mrg syscallarg(int) data;
1276 1.4 mrg syscallarg(netbsd32_charp) addr2;
1277 1.56 dsl } */
1278 1.1 mrg struct netbsd32_ptrace_args pa;
1279 1.1 mrg int req;
1280 1.1 mrg
1281 1.41 matt #define sys_ptrace sysent[SYS_ptrace].sy_call
1282 1.41 matt if (sys_ptrace == sys_nosys)
1283 1.41 matt return ENOSYS;
1284 1.41 matt
1285 1.1 mrg req = SCARG(uap, req);
1286 1.41 matt if ((unsigned int)req >= nreqs)
1287 1.1 mrg return (EINVAL);
1288 1.1 mrg
1289 1.1 mrg req = sreq2breq[req];
1290 1.1 mrg if (req == -1)
1291 1.1 mrg return (EINVAL);
1292 1.1 mrg
1293 1.1 mrg SCARG(&pa, req) = req;
1294 1.1 mrg SCARG(&pa, pid) = (pid_t)SCARG(uap, pid);
1295 1.1 mrg SCARG(&pa, addr) = SCARG(uap, addr);
1296 1.1 mrg SCARG(&pa, data) = SCARG(uap, data);
1297 1.1 mrg
1298 1.15 thorpej return netbsd32_ptrace(l, &pa, retval);
1299 1.1 mrg }
1300 1.1 mrg
1301 1.1 mrg /*
1302 1.1 mrg * SunOS reboot system call (for compatibility).
1303 1.1 mrg * Sun lets you pass in a boot string which the PROM
1304 1.1 mrg * saves and provides to the next boot program.
1305 1.1 mrg */
1306 1.1 mrg
1307 1.1 mrg #define SUNOS_RB_ASKNAME 0x001
1308 1.1 mrg #define SUNOS_RB_SINGLE 0x002
1309 1.1 mrg #define SUNOS_RB_NOSYNC 0x004
1310 1.1 mrg #define SUNOS_RB_HALT 0x008
1311 1.1 mrg #define SUNOS_RB_DUMP 0x080
1312 1.1 mrg #define SUNOS_RB_STRING 0x200
1313 1.1 mrg
1314 1.1 mrg static struct sunos_howto_conv {
1315 1.1 mrg int sun_howto;
1316 1.1 mrg int bsd_howto;
1317 1.1 mrg } sunos_howto_conv[] = {
1318 1.1 mrg { SUNOS_RB_ASKNAME, RB_ASKNAME },
1319 1.1 mrg { SUNOS_RB_SINGLE, RB_SINGLE },
1320 1.1 mrg { SUNOS_RB_NOSYNC, RB_NOSYNC },
1321 1.1 mrg { SUNOS_RB_HALT, RB_HALT },
1322 1.1 mrg { SUNOS_RB_DUMP, RB_DUMP },
1323 1.1 mrg { SUNOS_RB_STRING, RB_STRING },
1324 1.1 mrg { 0x000, 0 },
1325 1.1 mrg };
1326 1.1 mrg
1327 1.1 mrg int
1328 1.56 dsl sunos32_sys_reboot(struct lwp *l, const struct sunos32_sys_reboot_args *uap, register_t *retval)
1329 1.1 mrg {
1330 1.56 dsl /* {
1331 1.4 mrg syscallarg(int) howto;
1332 1.4 mrg syscallarg(netbsd32_charp) bootstr;
1333 1.56 dsl } */
1334 1.1 mrg struct sys_reboot_args ua;
1335 1.1 mrg struct sunos_howto_conv *convp;
1336 1.1 mrg int error, bsd_howto, sun_howto;
1337 1.1 mrg char *bootstr;
1338 1.1 mrg
1339 1.42 elad if ((error = kauth_authorize_system(l->l_cred,
1340 1.42 elad KAUTH_SYSTEM_REBOOT, 0, NULL, NULL, NULL)) != 0)
1341 1.1 mrg return (error);
1342 1.1 mrg
1343 1.1 mrg /*
1344 1.1 mrg * Convert howto bits to BSD format.
1345 1.1 mrg */
1346 1.1 mrg sun_howto = SCARG(uap, howto);
1347 1.1 mrg bsd_howto = 0;
1348 1.1 mrg convp = sunos_howto_conv;
1349 1.1 mrg while (convp->sun_howto) {
1350 1.1 mrg if (sun_howto & convp->sun_howto)
1351 1.1 mrg bsd_howto |= convp->bsd_howto;
1352 1.1 mrg convp++;
1353 1.1 mrg }
1354 1.1 mrg
1355 1.1 mrg /*
1356 1.1 mrg * Sun RB_STRING (Get user supplied bootstring.)
1357 1.1 mrg * If the machine supports passing a string to the
1358 1.1 mrg * next booted kernel.
1359 1.1 mrg */
1360 1.1 mrg if (sun_howto & SUNOS_RB_STRING)
1361 1.47 dsl bootstr = SCARG_P32(uap, bootstr);
1362 1.1 mrg else
1363 1.1 mrg bootstr = NULL;
1364 1.1 mrg
1365 1.1 mrg SCARG(&ua, opt) = bsd_howto;
1366 1.1 mrg SCARG(&ua, bootstr) = bootstr;
1367 1.15 thorpej return (sys_reboot(l, &ua, retval));
1368 1.1 mrg }
1369 1.1 mrg
1370 1.1 mrg /*
1371 1.1 mrg * Generalized interface signal handler, 4.3-compatible.
1372 1.1 mrg */
1373 1.1 mrg /* ARGSUSED */
1374 1.1 mrg int
1375 1.56 dsl sunos32_sys_sigvec(struct lwp *l, const struct sunos32_sys_sigvec_args *uap, register_t *retval)
1376 1.1 mrg {
1377 1.56 dsl /* {
1378 1.1 mrg syscallarg(int) signum;
1379 1.1 mrg syscallarg(struct sigvec *) nsv;
1380 1.1 mrg syscallarg(struct sigvec *) osv;
1381 1.56 dsl } */
1382 1.4 mrg struct netbsd32_sigvec sv;
1383 1.1 mrg struct sigaction nsa, osa;
1384 1.1 mrg int error;
1385 1.1 mrg
1386 1.47 dsl if (SCARG_P32(uap, nsv)) {
1387 1.47 dsl error = copyin(SCARG_P32(uap, nsv), &sv, sizeof(sv));
1388 1.1 mrg if (error != 0)
1389 1.1 mrg return (error);
1390 1.1 mrg
1391 1.1 mrg /*
1392 1.1 mrg * SunOS uses the mask 0x0004 as SV_RESETHAND
1393 1.1 mrg * meaning: `reset to SIG_DFL on delivery'.
1394 1.1 mrg * We support only the bits in: 0xF
1395 1.1 mrg * (those bits are the same as ours)
1396 1.1 mrg */
1397 1.4 mrg if (sv.sv_flags & ~0xF)
1398 1.1 mrg return (EINVAL);
1399 1.1 mrg
1400 1.4 mrg sunos32_sigvec_to_sigaction(&sv, &nsa);
1401 1.1 mrg }
1402 1.43 ad error = sigaction1(l, SCARG(uap, signum),
1403 1.47 dsl SCARG_P32(uap, nsv) ? &nsa : 0,
1404 1.47 dsl SCARG_P32(uap, osv) ? &osa : 0,
1405 1.13 thorpej NULL, 0);
1406 1.1 mrg if (error != 0)
1407 1.1 mrg return (error);
1408 1.1 mrg
1409 1.47 dsl if (SCARG_P32(uap, osv)) {
1410 1.4 mrg sunos32_sigvec_from_sigaction(&sv, &osa);
1411 1.47 dsl error = copyout(&sv, SCARG_P32(uap, osv), sizeof(sv));
1412 1.1 mrg if (error != 0)
1413 1.1 mrg return (error);
1414 1.1 mrg }
1415 1.1 mrg
1416 1.1 mrg return (0);
1417 1.1 mrg }
1418