Home | History | Annotate | Line # | Download | only in sunos
sunos_misc.c revision 1.67
      1  1.67       mrg /*	$NetBSD: sunos_misc.c,v 1.67 1996/08/09 10:30:23 mrg Exp $	*/
      2  1.30       cgd 
      3   1.1   deraadt /*
      4   1.1   deraadt  * Copyright (c) 1992, 1993
      5   1.1   deraadt  *	The Regents of the University of California.  All rights reserved.
      6   1.1   deraadt  *
      7   1.1   deraadt  * This software was developed by the Computer Systems Engineering group
      8   1.1   deraadt  * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
      9   1.1   deraadt  * contributed to Berkeley.
     10   1.1   deraadt  *
     11   1.1   deraadt  * All advertising materials mentioning features or use of this software
     12   1.1   deraadt  * must display the following acknowledgement:
     13   1.1   deraadt  *	This product includes software developed by the University of
     14   1.1   deraadt  *	California, Lawrence Berkeley Laboratory.
     15   1.1   deraadt  *
     16   1.1   deraadt  * Redistribution and use in source and binary forms, with or without
     17   1.1   deraadt  * modification, are permitted provided that the following conditions
     18   1.1   deraadt  * are met:
     19   1.1   deraadt  * 1. Redistributions of source code must retain the above copyright
     20   1.1   deraadt  *    notice, this list of conditions and the following disclaimer.
     21   1.1   deraadt  * 2. Redistributions in binary form must reproduce the above copyright
     22   1.1   deraadt  *    notice, this list of conditions and the following disclaimer in the
     23   1.1   deraadt  *    documentation and/or other materials provided with the distribution.
     24   1.1   deraadt  * 3. All advertising materials mentioning features or use of this software
     25   1.1   deraadt  *    must display the following acknowledgement:
     26   1.1   deraadt  *	This product includes software developed by the University of
     27   1.1   deraadt  *	California, Berkeley and its contributors.
     28   1.1   deraadt  * 4. Neither the name of the University nor the names of its contributors
     29   1.1   deraadt  *    may be used to endorse or promote products derived from this software
     30   1.1   deraadt  *    without specific prior written permission.
     31   1.1   deraadt  *
     32   1.1   deraadt  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     33   1.1   deraadt  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     34   1.1   deraadt  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     35   1.1   deraadt  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     36   1.1   deraadt  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     37   1.1   deraadt  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     38   1.1   deraadt  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     39   1.1   deraadt  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     40   1.1   deraadt  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     41   1.1   deraadt  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     42   1.1   deraadt  * SUCH DAMAGE.
     43   1.1   deraadt  *
     44  1.33   deraadt  *	@(#)sunos_misc.c	8.1 (Berkeley) 6/18/93
     45   1.1   deraadt  *
     46  1.33   deraadt  *	Header: sunos_misc.c,v 1.16 93/04/07 02:46:27 torek Exp
     47   1.1   deraadt  */
     48   1.1   deraadt 
     49   1.1   deraadt /*
     50   1.1   deraadt  * SunOS compatibility module.
     51   1.1   deraadt  *
     52   1.1   deraadt  * SunOS system calls that are implemented differently in BSD are
     53   1.1   deraadt  * handled here.
     54   1.1   deraadt  */
     55   1.1   deraadt 
     56   1.1   deraadt #include <sys/param.h>
     57   1.1   deraadt #include <sys/systm.h>
     58  1.10   deraadt #include <sys/namei.h>
     59   1.1   deraadt #include <sys/proc.h>
     60  1.63       gwr #include <sys/dirent.h>
     61   1.1   deraadt #include <sys/file.h>
     62  1.10   deraadt #include <sys/stat.h>
     63   1.1   deraadt #include <sys/filedesc.h>
     64   1.1   deraadt #include <sys/ioctl.h>
     65   1.8   deraadt #include <sys/kernel.h>
     66  1.44  christos #include <sys/reboot.h>
     67   1.1   deraadt #include <sys/malloc.h>
     68   1.1   deraadt #include <sys/mbuf.h>
     69   1.1   deraadt #include <sys/mman.h>
     70   1.1   deraadt #include <sys/mount.h>
     71  1.35   deraadt #include <sys/ptrace.h>
     72   1.1   deraadt #include <sys/resource.h>
     73   1.1   deraadt #include <sys/resourcevar.h>
     74   1.1   deraadt #include <sys/signal.h>
     75   1.1   deraadt #include <sys/signalvar.h>
     76   1.1   deraadt #include <sys/socket.h>
     77  1.60        pk #include <sys/tty.h>
     78   1.1   deraadt #include <sys/vnode.h>
     79   1.1   deraadt #include <sys/uio.h>
     80   1.1   deraadt #include <sys/wait.h>
     81   1.8   deraadt #include <sys/utsname.h>
     82  1.12   deraadt #include <sys/unistd.h>
     83  1.33   deraadt #include <sys/syscallargs.h>
     84  1.64  christos #include <sys/conf.h>
     85  1.64  christos #include <sys/socketvar.h>
     86  1.55   mycroft 
     87  1.33   deraadt #include <compat/sunos/sunos.h>
     88  1.33   deraadt #include <compat/sunos/sunos_syscallargs.h>
     89  1.48        pk #include <compat/sunos/sunos_util.h>
     90  1.56   mycroft #include <compat/sunos/sunos_dirent.h>
     91   1.1   deraadt 
     92  1.10   deraadt #include <netinet/in.h>
     93  1.10   deraadt 
     94   1.7   deraadt #include <miscfs/specfs/specdev.h>
     95   1.1   deraadt 
     96  1.27        pk #include <nfs/rpcv2.h>
     97  1.61        pk #include <nfs/nfsproto.h>
     98  1.27        pk #include <nfs/nfs.h>
     99  1.27        pk 
    100   1.1   deraadt #include <vm/vm.h>
    101   1.1   deraadt 
    102  1.64  christos static int sunstatfs __P((struct statfs *, caddr_t));
    103  1.64  christos static void sunos_pollscan __P((struct proc *, struct sunos_pollfd *,
    104  1.64  christos 				int, register_t *));
    105  1.33   deraadt int
    106  1.55   mycroft sunos_sys_wait4(p, v, retval)
    107   1.1   deraadt 	struct proc *p;
    108  1.54   thorpej 	void *v;
    109  1.32       cgd 	register_t *retval;
    110   1.1   deraadt {
    111  1.55   mycroft 	struct sunos_sys_wait4_args *uap = v;
    112  1.33   deraadt 	if (SCARG(uap, pid) == 0)
    113  1.33   deraadt 		SCARG(uap, pid) = WAIT_ANY;
    114  1.55   mycroft 	return (sys_wait4(p, uap, retval));
    115   1.1   deraadt }
    116   1.1   deraadt 
    117  1.33   deraadt int
    118  1.55   mycroft sunos_sys_creat(p, v, retval)
    119   1.1   deraadt 	struct proc *p;
    120  1.54   thorpej 	void *v;
    121  1.32       cgd 	register_t *retval;
    122   1.1   deraadt {
    123  1.55   mycroft 	struct sunos_sys_creat_args *uap = v;
    124  1.55   mycroft 	struct sys_open_args ouap;
    125   1.1   deraadt 
    126  1.50  christos 	caddr_t sg = stackgap_init(p->p_emul);
    127  1.50  christos 	SUNOS_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
    128  1.48        pk 
    129  1.33   deraadt 	SCARG(&ouap, path) = SCARG(uap, path);
    130  1.33   deraadt 	SCARG(&ouap, flags) = O_WRONLY | O_CREAT | O_TRUNC;
    131  1.33   deraadt 	SCARG(&ouap, mode) = SCARG(uap, mode);
    132  1.55   mycroft 
    133  1.55   mycroft 	return (sys_open(p, &ouap, retval));
    134   1.1   deraadt }
    135   1.1   deraadt 
    136  1.33   deraadt int
    137  1.55   mycroft sunos_sys_access(p, v, retval)
    138  1.48        pk 	struct proc *p;
    139  1.54   thorpej 	void *v;
    140  1.48        pk 	register_t *retval;
    141  1.48        pk {
    142  1.55   mycroft 	struct sunos_sys_access_args *uap = v;
    143  1.50  christos 	caddr_t sg = stackgap_init(p->p_emul);
    144  1.50  christos 	SUNOS_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
    145  1.48        pk 
    146  1.55   mycroft 	return (sys_access(p, uap, retval));
    147  1.48        pk }
    148  1.48        pk 
    149  1.48        pk int
    150  1.55   mycroft sunos_sys_stat(p, v, retval)
    151  1.48        pk 	struct proc *p;
    152  1.54   thorpej 	void *v;
    153  1.48        pk 	register_t *retval;
    154  1.48        pk {
    155  1.55   mycroft 	struct sunos_sys_stat_args *uap = v;
    156  1.50  christos 	caddr_t sg = stackgap_init(p->p_emul);
    157  1.50  christos 	SUNOS_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
    158  1.48        pk 
    159  1.55   mycroft 	return (compat_43_sys_stat(p, uap, retval));
    160  1.48        pk }
    161  1.48        pk 
    162  1.48        pk int
    163  1.55   mycroft sunos_sys_lstat(p, v, retval)
    164  1.48        pk 	struct proc *p;
    165  1.54   thorpej 	void *v;
    166  1.48        pk 	register_t *retval;
    167  1.48        pk {
    168  1.55   mycroft 	struct sunos_sys_lstat_args *uap = v;
    169  1.50  christos 	caddr_t sg = stackgap_init(p->p_emul);
    170  1.50  christos 	SUNOS_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
    171  1.48        pk 
    172  1.55   mycroft 	return (compat_43_sys_lstat(p, uap, retval));
    173  1.48        pk }
    174  1.48        pk 
    175  1.48        pk int
    176  1.55   mycroft sunos_sys_execv(p, v, retval)
    177   1.1   deraadt 	struct proc *p;
    178  1.54   thorpej 	void *v;
    179  1.32       cgd 	register_t *retval;
    180   1.1   deraadt {
    181  1.55   mycroft 	struct sunos_sys_execv_args *uap = v;
    182  1.55   mycroft 	struct sys_execve_args ouap;
    183   1.1   deraadt 
    184  1.50  christos 	caddr_t sg = stackgap_init(p->p_emul);
    185  1.50  christos 	SUNOS_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
    186  1.48        pk 
    187  1.33   deraadt 	SCARG(&ouap, path) = SCARG(uap, path);
    188  1.33   deraadt 	SCARG(&ouap, argp) = SCARG(uap, argp);
    189  1.33   deraadt 	SCARG(&ouap, envp) = NULL;
    190  1.55   mycroft 
    191  1.55   mycroft 	return (sys_execve(p, &ouap, retval));
    192   1.1   deraadt }
    193   1.1   deraadt 
    194  1.33   deraadt int
    195  1.55   mycroft sunos_sys_omsync(p, v, retval)
    196   1.1   deraadt 	struct proc *p;
    197  1.54   thorpej 	void *v;
    198  1.32       cgd 	register_t *retval;
    199   1.1   deraadt {
    200  1.55   mycroft 	struct sunos_sys_omsync_args *uap = v;
    201  1.55   mycroft 	struct sys_msync_args ouap;
    202   1.1   deraadt 
    203  1.33   deraadt 	if (SCARG(uap, flags))
    204   1.1   deraadt 		return (EINVAL);
    205  1.33   deraadt 	SCARG(&ouap, addr) = SCARG(uap, addr);
    206  1.33   deraadt 	SCARG(&ouap, len) = SCARG(uap, len);
    207  1.55   mycroft 
    208  1.55   mycroft 	return (sys_msync(p, &ouap, retval));
    209   1.1   deraadt }
    210   1.1   deraadt 
    211  1.33   deraadt int
    212  1.55   mycroft sunos_sys_unmount(p, v, retval)
    213  1.33   deraadt 	struct proc *p;
    214  1.54   thorpej 	void *v;
    215  1.32       cgd 	register_t *retval;
    216   1.1   deraadt {
    217  1.55   mycroft 	struct sunos_sys_unmount_args *uap = v;
    218  1.55   mycroft 	struct sys_unmount_args ouap;
    219  1.54   thorpej 
    220  1.55   mycroft 	SCARG(&ouap, path) = SCARG(uap, path);
    221  1.55   mycroft 	SCARG(&ouap, flags) = 0;
    222  1.55   mycroft 
    223  1.55   mycroft 	return (sys_unmount(p, &ouap, retval));
    224  1.33   deraadt }
    225   1.1   deraadt 
    226  1.61        pk /*
    227  1.61        pk  * Conversion table for SunOS NFS mount flags.
    228  1.61        pk  */
    229  1.61        pk static struct {
    230  1.61        pk 	int	sun_flg;
    231  1.61        pk 	int	bsd_flg;
    232  1.61        pk } sunnfs_flgtab[] = {
    233  1.61        pk 	{ SUNNFS_SOFT,		NFSMNT_SOFT },
    234  1.61        pk 	{ SUNNFS_WSIZE,		NFSMNT_WSIZE },
    235  1.61        pk 	{ SUNNFS_RSIZE,		NFSMNT_RSIZE },
    236  1.61        pk 	{ SUNNFS_TIMEO,		NFSMNT_TIMEO },
    237  1.61        pk 	{ SUNNFS_RETRANS,	NFSMNT_RETRANS },
    238  1.61        pk 	{ SUNNFS_HOSTNAME,	0 },			/* Ignored */
    239  1.61        pk 	{ SUNNFS_INT,		NFSMNT_INT },
    240  1.61        pk 	{ SUNNFS_NOAC,		0 },			/* Ignored */
    241  1.61        pk 	{ SUNNFS_ACREGMIN,	0 },			/* Ignored */
    242  1.61        pk 	{ SUNNFS_ACREGMAX,	0 },			/* Ignored */
    243  1.61        pk 	{ SUNNFS_ACDIRMIN,	0 },			/* Ignored */
    244  1.61        pk 	{ SUNNFS_ACDIRMAX,	0 },			/* Ignored */
    245  1.61        pk 	{ SUNNFS_SECURE,	0 },			/* Ignored */
    246  1.61        pk 	{ SUNNFS_NOCTO,		0 },			/* Ignored */
    247  1.61        pk 	{ SUNNFS_POSIX,		0 }			/* Ignored */
    248  1.61        pk };
    249  1.61        pk 
    250  1.33   deraadt int
    251  1.55   mycroft sunos_sys_mount(p, v, retval)
    252   1.1   deraadt 	struct proc *p;
    253  1.54   thorpej 	void *v;
    254  1.32       cgd 	register_t *retval;
    255   1.1   deraadt {
    256  1.55   mycroft 	struct sunos_sys_mount_args *uap = v;
    257  1.51    briggs 	struct emul *e = p->p_emul;
    258  1.33   deraadt 	int oflags = SCARG(uap, flags), nflags, error;
    259  1.16   deraadt 	char fsname[MFSNAMELEN];
    260  1.16   deraadt 
    261   1.1   deraadt 	if (oflags & (SUNM_NOSUB | SUNM_SYS5))
    262   1.1   deraadt 		return (EINVAL);
    263  1.16   deraadt 	if ((oflags & SUNM_NEWTYPE) == 0)
    264  1.16   deraadt 		return (EINVAL);
    265   1.1   deraadt 	nflags = 0;
    266   1.1   deraadt 	if (oflags & SUNM_RDONLY)
    267   1.1   deraadt 		nflags |= MNT_RDONLY;
    268   1.1   deraadt 	if (oflags & SUNM_NOSUID)
    269   1.1   deraadt 		nflags |= MNT_NOSUID;
    270   1.1   deraadt 	if (oflags & SUNM_REMOUNT)
    271   1.1   deraadt 		nflags |= MNT_UPDATE;
    272  1.33   deraadt 	SCARG(uap, flags) = nflags;
    273  1.10   deraadt 
    274  1.64  christos 	error = copyinstr((caddr_t)SCARG(uap, type), fsname,
    275  1.64  christos 	    sizeof fsname, (size_t *)0);
    276  1.64  christos 	if (error)
    277  1.16   deraadt 		return (error);
    278  1.16   deraadt 
    279  1.49       cgd 	if (strncmp(fsname, "4.2", sizeof fsname) == 0) {
    280  1.33   deraadt 		SCARG(uap, type) = STACKGAPBASE;
    281  1.64  christos 		error = copyout("ffs", SCARG(uap, type), sizeof("ffs"));
    282  1.64  christos 		if (error)
    283  1.16   deraadt 			return (error);
    284  1.49       cgd 	} else if (strncmp(fsname, "nfs", sizeof fsname) == 0) {
    285  1.33   deraadt 		struct sunos_nfs_args sna;
    286  1.10   deraadt 		struct sockaddr_in sain;
    287  1.10   deraadt 		struct nfs_args na;
    288  1.10   deraadt 		struct sockaddr sa;
    289  1.61        pk 		int n;
    290  1.10   deraadt 
    291  1.64  christos 		error = copyin(SCARG(uap, data), &sna, sizeof sna);
    292  1.64  christos 		if (error)
    293  1.10   deraadt 			return (error);
    294  1.64  christos 		error = copyin(sna.addr, &sain, sizeof sain);
    295  1.64  christos 		if (error)
    296  1.10   deraadt 			return (error);
    297  1.10   deraadt 		bcopy(&sain, &sa, sizeof sa);
    298  1.10   deraadt 		sa.sa_len = sizeof(sain);
    299  1.33   deraadt 		SCARG(uap, data) = STACKGAPBASE;
    300  1.61        pk 		na.version = NFS_ARGSVERSION;
    301  1.61        pk 		na.addr = (struct sockaddr *)
    302  1.61        pk 			  ((int)SCARG(uap, data) + sizeof na);
    303  1.29        pk 		na.addrlen = sizeof(struct sockaddr);
    304  1.10   deraadt 		na.sotype = SOCK_DGRAM;
    305  1.10   deraadt 		na.proto = IPPROTO_UDP;
    306  1.61        pk 		na.fh = (void *)sna.fh;
    307  1.61        pk 		na.fhsize = NFSX_V2FH;
    308  1.61        pk 		na.flags = 0;
    309  1.61        pk 		n = sizeof(sunnfs_flgtab) / sizeof(sunnfs_flgtab[0]);
    310  1.61        pk 		while (--n >= 0)
    311  1.61        pk 			if (sna.flags & sunnfs_flgtab[n].sun_flg)
    312  1.61        pk 				na.flags |= sunnfs_flgtab[n].bsd_flg;
    313  1.10   deraadt 		na.wsize = sna.wsize;
    314  1.10   deraadt 		na.rsize = sna.rsize;
    315  1.62        pk 		if (na.flags & NFSMNT_RSIZE) {
    316  1.62        pk 			na.flags |= NFSMNT_READDIRSIZE;
    317  1.62        pk 			na.readdirsize = na.rsize;
    318  1.62        pk 		}
    319  1.10   deraadt 		na.timeo = sna.timeo;
    320  1.10   deraadt 		na.retrans = sna.retrans;
    321  1.10   deraadt 		na.hostname = sna.hostname;
    322  1.10   deraadt 
    323  1.64  christos 		error = copyout(&sa, na.addr, sizeof sa);
    324  1.64  christos 		if (error)
    325  1.10   deraadt 			return (error);
    326  1.64  christos 		error = copyout(&na, SCARG(uap, data), sizeof na);
    327  1.64  christos 		if (error)
    328  1.10   deraadt 			return (error);
    329  1.10   deraadt 	}
    330  1.55   mycroft 	return (sys_mount(p, (struct sys_mount_args *)uap, retval));
    331   1.1   deraadt }
    332   1.1   deraadt 
    333  1.28   deraadt #if defined(NFSCLIENT)
    334  1.33   deraadt int
    335  1.55   mycroft async_daemon(p, v, retval)
    336  1.27        pk 	struct proc *p;
    337  1.55   mycroft 	void *v;
    338  1.32       cgd 	register_t *retval;
    339  1.27        pk {
    340  1.55   mycroft 	struct sys_nfssvc_args ouap;
    341  1.27        pk 
    342  1.33   deraadt 	SCARG(&ouap, flag) = NFSSVC_BIOD;
    343  1.33   deraadt 	SCARG(&ouap, argp) = NULL;
    344  1.55   mycroft 
    345  1.55   mycroft 	return (sys_nfssvc(p, &ouap, retval));
    346  1.27        pk }
    347  1.28   deraadt #endif /* NFSCLIENT */
    348  1.27        pk 
    349  1.33   deraadt int
    350  1.55   mycroft sunos_sys_sigpending(p, v, retval)
    351   1.1   deraadt 	struct proc *p;
    352  1.54   thorpej 	void *v;
    353  1.32       cgd 	register_t *retval;
    354   1.1   deraadt {
    355  1.55   mycroft 	struct sunos_sys_sigpending_args *uap = v;
    356  1.21   deraadt 	int mask = p->p_siglist & p->p_sigmask;
    357   1.1   deraadt 
    358  1.33   deraadt 	return (copyout((caddr_t)&mask, (caddr_t)SCARG(uap, mask), sizeof(int)));
    359   1.1   deraadt }
    360   1.1   deraadt 
    361   1.1   deraadt /*
    362   1.1   deraadt  * Read Sun-style directory entries.  We suck them into kernel space so
    363   1.1   deraadt  * that they can be massaged before being copied out to user code.  Like
    364   1.1   deraadt  * SunOS, we squish out `empty' entries.
    365   1.1   deraadt  *
    366   1.1   deraadt  * This is quite ugly, but what do you expect from compatibility code?
    367   1.1   deraadt  */
    368  1.33   deraadt int
    369  1.55   mycroft sunos_sys_getdents(p, v, retval)
    370   1.1   deraadt 	struct proc *p;
    371  1.54   thorpej 	void *v;
    372  1.32       cgd 	register_t *retval;
    373   1.1   deraadt {
    374  1.56   mycroft 	struct sunos_sys_getdents_args *uap = v;
    375  1.56   mycroft 	struct dirent *bdp;
    376  1.56   mycroft 	struct vnode *vp;
    377  1.56   mycroft 	caddr_t inp, buf;	/* BSD-format */
    378  1.56   mycroft 	int len, reclen;	/* BSD-format */
    379  1.56   mycroft 	caddr_t outp;		/* Sun-format */
    380  1.56   mycroft 	int resid, sunos_reclen;/* Sun-format */
    381   1.1   deraadt 	struct file *fp;
    382   1.1   deraadt 	struct uio auio;
    383   1.1   deraadt 	struct iovec aiov;
    384  1.56   mycroft 	struct sunos_dirent idb;
    385   1.1   deraadt 	off_t off;			/* true file offset */
    386   1.1   deraadt 	int buflen, error, eofflag;
    387  1.56   mycroft 	u_long *cookiebuf, *cookie;
    388  1.56   mycroft 	int ncookies;
    389   1.1   deraadt 
    390  1.33   deraadt 	if ((error = getvnode(p->p_fd, SCARG(uap, fd), &fp)) != 0)
    391   1.1   deraadt 		return (error);
    392  1.56   mycroft 
    393   1.1   deraadt 	if ((fp->f_flag & FREAD) == 0)
    394   1.1   deraadt 		return (EBADF);
    395  1.56   mycroft 
    396   1.1   deraadt 	vp = (struct vnode *)fp->f_data;
    397  1.56   mycroft 
    398   1.1   deraadt 	if (vp->v_type != VDIR)	/* XXX  vnode readdir op should do this */
    399   1.1   deraadt 		return (EINVAL);
    400  1.56   mycroft 
    401  1.33   deraadt 	buflen = min(MAXBSIZE, SCARG(uap, nbytes));
    402   1.1   deraadt 	buf = malloc(buflen, M_TEMP, M_WAITOK);
    403  1.56   mycroft 	ncookies = buflen / 16;
    404  1.56   mycroft 	cookiebuf = malloc(ncookies * sizeof(*cookiebuf), M_TEMP, M_WAITOK);
    405   1.1   deraadt 	VOP_LOCK(vp);
    406   1.1   deraadt 	off = fp->f_offset;
    407   1.1   deraadt again:
    408   1.1   deraadt 	aiov.iov_base = buf;
    409   1.1   deraadt 	aiov.iov_len = buflen;
    410   1.1   deraadt 	auio.uio_iov = &aiov;
    411   1.1   deraadt 	auio.uio_iovcnt = 1;
    412   1.1   deraadt 	auio.uio_rw = UIO_READ;
    413   1.1   deraadt 	auio.uio_segflg = UIO_SYSSPACE;
    414   1.1   deraadt 	auio.uio_procp = p;
    415   1.1   deraadt 	auio.uio_resid = buflen;
    416   1.1   deraadt 	auio.uio_offset = off;
    417   1.1   deraadt 	/*
    418   1.1   deraadt 	 * First we read into the malloc'ed buffer, then
    419   1.1   deraadt 	 * we massage it into user space, one record at a time.
    420   1.1   deraadt 	 */
    421  1.56   mycroft 	error = VOP_READDIR(vp, &auio, fp->f_cred, &eofflag, cookiebuf,
    422  1.56   mycroft 	    ncookies);
    423  1.59   ghudson 	if (error)
    424  1.59   ghudson 		goto out;
    425  1.56   mycroft 
    426   1.1   deraadt 	inp = buf;
    427  1.33   deraadt 	outp = SCARG(uap, buf);
    428  1.33   deraadt 	resid = SCARG(uap, nbytes);
    429   1.1   deraadt 	if ((len = buflen - auio.uio_resid) == 0)
    430   1.1   deraadt 		goto eof;
    431  1.56   mycroft 
    432  1.56   mycroft 	for (cookie = cookiebuf; len > 0; len -= reclen) {
    433  1.56   mycroft 		bdp = (struct dirent *)inp;
    434  1.56   mycroft 		reclen = bdp->d_reclen;
    435   1.1   deraadt 		if (reclen & 3)
    436  1.33   deraadt 			panic("sunos_getdents");
    437  1.56   mycroft 		off = *cookie++;	/* each entry points to next */
    438  1.56   mycroft 		if (bdp->d_fileno == 0) {
    439   1.1   deraadt 			inp += reclen;	/* it is a hole; squish it out */
    440   1.1   deraadt 			continue;
    441   1.1   deraadt 		}
    442  1.56   mycroft 		sunos_reclen = SUNOS_RECLEN(&idb, bdp->d_namlen);
    443  1.56   mycroft 		if (reclen > len || resid < sunos_reclen) {
    444   1.1   deraadt 			/* entry too big for buffer, so just stop */
    445   1.1   deraadt 			outp++;
    446   1.1   deraadt 			break;
    447   1.1   deraadt 		}
    448   1.1   deraadt 		/*
    449   1.1   deraadt 		 * Massage in place to make a Sun-shaped dirent (otherwise
    450   1.1   deraadt 		 * we have to worry about touching user memory outside of
    451   1.1   deraadt 		 * the copyout() call).
    452   1.1   deraadt 		 */
    453  1.56   mycroft 		idb.d_fileno = bdp->d_fileno;
    454  1.56   mycroft 		idb.d_off = off;
    455  1.56   mycroft 		idb.d_reclen = sunos_reclen;
    456  1.56   mycroft 		idb.d_namlen = bdp->d_namlen;
    457  1.56   mycroft 		strcpy(idb.d_name, bdp->d_name);
    458  1.56   mycroft 		if ((error = copyout((caddr_t)&idb, outp, sunos_reclen)) != 0)
    459   1.1   deraadt 			goto out;
    460   1.1   deraadt 		/* advance past this real entry */
    461   1.1   deraadt 		inp += reclen;
    462   1.1   deraadt 		/* advance output past Sun-shaped entry */
    463  1.56   mycroft 		outp += sunos_reclen;
    464  1.56   mycroft 		resid -= sunos_reclen;
    465   1.1   deraadt 	}
    466  1.56   mycroft 
    467   1.1   deraadt 	/* if we squished out the whole block, try again */
    468  1.33   deraadt 	if (outp == SCARG(uap, buf))
    469   1.1   deraadt 		goto again;
    470   1.1   deraadt 	fp->f_offset = off;		/* update the vnode offset */
    471  1.56   mycroft 
    472   1.1   deraadt eof:
    473  1.33   deraadt 	*retval = SCARG(uap, nbytes) - resid;
    474   1.1   deraadt out:
    475   1.1   deraadt 	VOP_UNLOCK(vp);
    476  1.56   mycroft 	free(cookiebuf, M_TEMP);
    477   1.1   deraadt 	free(buf, M_TEMP);
    478   1.1   deraadt 	return (error);
    479   1.1   deraadt }
    480   1.1   deraadt 
    481  1.33   deraadt #define	SUNOS__MAP_NEW	0x80000000	/* if not, old mmap & cannot handle */
    482   1.4   deraadt 
    483  1.33   deraadt int
    484  1.55   mycroft sunos_sys_mmap(p, v, retval)
    485   1.1   deraadt 	register struct proc *p;
    486  1.54   thorpej 	void *v;
    487  1.32       cgd 	register_t *retval;
    488   1.1   deraadt {
    489  1.55   mycroft 	register struct sunos_sys_mmap_args *uap = v;
    490  1.55   mycroft 	struct sys_mmap_args ouap;
    491   1.1   deraadt 	register struct filedesc *fdp;
    492   1.1   deraadt 	register struct file *fp;
    493   1.1   deraadt 	register struct vnode *vp;
    494   1.1   deraadt 
    495   1.1   deraadt 	/*
    496  1.14       cgd 	 * Verify the arguments.
    497   1.1   deraadt 	 */
    498  1.33   deraadt 	if (SCARG(uap, prot) & ~(PROT_READ|PROT_WRITE|PROT_EXEC))
    499  1.14       cgd 		return (EINVAL);			/* XXX still needed? */
    500   1.4   deraadt 
    501  1.33   deraadt 	if ((SCARG(uap, flags) & SUNOS__MAP_NEW) == 0)
    502   1.1   deraadt 		return (EINVAL);
    503   1.1   deraadt 
    504  1.34   deraadt 	SCARG(&ouap, flags) = SCARG(uap, flags) & ~SUNOS__MAP_NEW;
    505  1.34   deraadt 	SCARG(&ouap, addr) = SCARG(uap, addr);
    506  1.34   deraadt 
    507  1.34   deraadt 	if ((SCARG(&ouap, flags) & MAP_FIXED) == 0 &&
    508  1.34   deraadt 	    SCARG(&ouap, addr) != 0 &&
    509  1.34   deraadt 	    SCARG(&ouap, addr) < (caddr_t)round_page(p->p_vmspace->vm_daddr+MAXDSIZ))
    510  1.34   deraadt 		SCARG(&ouap, addr) = (caddr_t)round_page(p->p_vmspace->vm_daddr+MAXDSIZ);
    511  1.34   deraadt 
    512  1.34   deraadt 	SCARG(&ouap, len) = SCARG(uap, len);
    513  1.34   deraadt 	SCARG(&ouap, prot) = SCARG(uap, prot);
    514  1.34   deraadt 	SCARG(&ouap, fd) = SCARG(uap, fd);
    515  1.34   deraadt 	SCARG(&ouap, pos) = SCARG(uap, pos);
    516  1.10   deraadt 
    517   1.1   deraadt 	/*
    518   1.1   deraadt 	 * Special case: if fd refers to /dev/zero, map as MAP_ANON.  (XXX)
    519   1.1   deraadt 	 */
    520   1.1   deraadt 	fdp = p->p_fd;
    521  1.34   deraadt 	if ((unsigned)SCARG(&ouap, fd) < fdp->fd_nfiles &&		/*XXX*/
    522  1.34   deraadt 	    (fp = fdp->fd_ofiles[SCARG(&ouap, fd)]) != NULL &&		/*XXX*/
    523   1.1   deraadt 	    fp->f_type == DTYPE_VNODE &&				/*XXX*/
    524   1.1   deraadt 	    (vp = (struct vnode *)fp->f_data)->v_type == VCHR &&	/*XXX*/
    525  1.23   deraadt 	    iszerodev(vp->v_rdev)) {					/*XXX*/
    526  1.34   deraadt 		SCARG(&ouap, flags) |= MAP_ANON;
    527  1.34   deraadt 		SCARG(&ouap, fd) = -1;
    528  1.14       cgd 	}
    529   1.4   deraadt 
    530  1.55   mycroft 	return (sys_mmap(p, &ouap, retval));
    531   1.1   deraadt }
    532   1.1   deraadt 
    533   1.1   deraadt #define	MC_SYNC		1
    534   1.1   deraadt #define	MC_LOCK		2
    535   1.1   deraadt #define	MC_UNLOCK	3
    536   1.1   deraadt #define	MC_ADVISE	4
    537   1.1   deraadt #define	MC_LOCKAS	5
    538   1.1   deraadt #define	MC_UNLOCKAS	6
    539   1.1   deraadt 
    540  1.33   deraadt int
    541  1.55   mycroft sunos_sys_mctl(p, v, retval)
    542   1.1   deraadt 	register struct proc *p;
    543  1.54   thorpej 	void *v;
    544  1.32       cgd 	register_t *retval;
    545   1.1   deraadt {
    546  1.55   mycroft 	register struct sunos_sys_mctl_args *uap = v;
    547   1.1   deraadt 
    548  1.33   deraadt 	switch (SCARG(uap, func)) {
    549   1.1   deraadt 	case MC_ADVISE:		/* ignore for now */
    550   1.1   deraadt 		return (0);
    551   1.1   deraadt 	case MC_SYNC:		/* translate to msync */
    552  1.55   mycroft 		return (sys_msync(p, uap, retval));
    553   1.1   deraadt 	default:
    554   1.1   deraadt 		return (EINVAL);
    555   1.1   deraadt 	}
    556   1.1   deraadt }
    557   1.1   deraadt 
    558  1.33   deraadt int
    559  1.55   mycroft sunos_sys_setsockopt(p, v, retval)
    560   1.1   deraadt 	struct proc *p;
    561  1.54   thorpej 	void *v;
    562  1.32       cgd 	register_t *retval;
    563   1.1   deraadt {
    564  1.55   mycroft 	register struct sunos_sys_setsockopt_args *uap = v;
    565   1.1   deraadt 	struct file *fp;
    566   1.1   deraadt 	struct mbuf *m = NULL;
    567   1.1   deraadt 	int error;
    568   1.1   deraadt 
    569  1.64  christos 	if ((error = getsock(p->p_fd, SCARG(uap, s), &fp)) != 0)
    570   1.1   deraadt 		return (error);
    571   1.1   deraadt #define	SO_DONTLINGER (~SO_LINGER)
    572  1.33   deraadt 	if (SCARG(uap, name) == SO_DONTLINGER) {
    573   1.1   deraadt 		m = m_get(M_WAIT, MT_SOOPTS);
    574   1.1   deraadt 		mtod(m, struct linger *)->l_onoff = 0;
    575   1.1   deraadt 		m->m_len = sizeof(struct linger);
    576  1.33   deraadt 		return (sosetopt((struct socket *)fp->f_data, SCARG(uap, level),
    577   1.1   deraadt 		    SO_LINGER, m));
    578   1.1   deraadt 	}
    579  1.37        pk 	if (SCARG(uap, level) == IPPROTO_IP) {
    580  1.37        pk #define		SUNOS_IP_MULTICAST_IF		2
    581  1.37        pk #define		SUNOS_IP_MULTICAST_TTL		3
    582  1.37        pk #define		SUNOS_IP_MULTICAST_LOOP		4
    583  1.37        pk #define		SUNOS_IP_ADD_MEMBERSHIP		5
    584  1.37        pk #define		SUNOS_IP_DROP_MEMBERSHIP	6
    585  1.37        pk 		static int ipoptxlat[] = {
    586  1.37        pk 			IP_MULTICAST_IF,
    587  1.37        pk 			IP_MULTICAST_TTL,
    588  1.37        pk 			IP_MULTICAST_LOOP,
    589  1.37        pk 			IP_ADD_MEMBERSHIP,
    590  1.37        pk 			IP_DROP_MEMBERSHIP
    591  1.37        pk 		};
    592  1.37        pk 		if (SCARG(uap, name) >= SUNOS_IP_MULTICAST_IF &&
    593  1.37        pk 		    SCARG(uap, name) <= SUNOS_IP_DROP_MEMBERSHIP) {
    594  1.37        pk 			SCARG(uap, name) =
    595  1.37        pk 			    ipoptxlat[SCARG(uap, name) - SUNOS_IP_MULTICAST_IF];
    596  1.37        pk 		}
    597  1.37        pk 	}
    598  1.33   deraadt 	if (SCARG(uap, valsize) > MLEN)
    599   1.1   deraadt 		return (EINVAL);
    600  1.33   deraadt 	if (SCARG(uap, val)) {
    601   1.1   deraadt 		m = m_get(M_WAIT, MT_SOOPTS);
    602  1.64  christos 		error = copyin(SCARG(uap, val), mtod(m, caddr_t),
    603  1.64  christos 		    (u_int)SCARG(uap, valsize));
    604  1.64  christos 		if (error) {
    605   1.1   deraadt 			(void) m_free(m);
    606   1.1   deraadt 			return (error);
    607   1.1   deraadt 		}
    608  1.33   deraadt 		m->m_len = SCARG(uap, valsize);
    609   1.1   deraadt 	}
    610  1.33   deraadt 	return (sosetopt((struct socket *)fp->f_data, SCARG(uap, level),
    611  1.33   deraadt 	    SCARG(uap, name), m));
    612   1.1   deraadt }
    613   1.1   deraadt 
    614  1.33   deraadt int
    615  1.55   mycroft sunos_sys_fchroot(p, v, retval)
    616   1.1   deraadt 	register struct proc *p;
    617  1.54   thorpej 	void *v;
    618  1.32       cgd 	register_t *retval;
    619   1.1   deraadt {
    620  1.55   mycroft 	register struct sunos_sys_fchroot_args *uap = v;
    621   1.1   deraadt 	register struct filedesc *fdp = p->p_fd;
    622   1.1   deraadt 	register struct vnode *vp;
    623   1.1   deraadt 	struct file *fp;
    624   1.1   deraadt 	int error;
    625   1.1   deraadt 
    626   1.1   deraadt 	if ((error = suser(p->p_ucred, &p->p_acflag)) != 0)
    627   1.1   deraadt 		return (error);
    628  1.33   deraadt 	if ((error = getvnode(fdp, SCARG(uap, fd), &fp)) != 0)
    629   1.1   deraadt 		return (error);
    630   1.1   deraadt 	vp = (struct vnode *)fp->f_data;
    631   1.1   deraadt 	VOP_LOCK(vp);
    632   1.1   deraadt 	if (vp->v_type != VDIR)
    633   1.1   deraadt 		error = ENOTDIR;
    634   1.1   deraadt 	else
    635   1.1   deraadt 		error = VOP_ACCESS(vp, VEXEC, p->p_ucred, p);
    636   1.1   deraadt 	VOP_UNLOCK(vp);
    637   1.1   deraadt 	if (error)
    638   1.1   deraadt 		return (error);
    639   1.1   deraadt 	VREF(vp);
    640   1.1   deraadt 	if (fdp->fd_rdir != NULL)
    641   1.1   deraadt 		vrele(fdp->fd_rdir);
    642   1.1   deraadt 	fdp->fd_rdir = vp;
    643   1.1   deraadt 	return (0);
    644   1.3   deraadt }
    645   1.3   deraadt 
    646   1.3   deraadt /*
    647   1.3   deraadt  * XXX: This needs cleaning up.
    648   1.3   deraadt  */
    649  1.33   deraadt int
    650  1.55   mycroft sunos_sys_auditsys(p, v, retval)
    651  1.40   deraadt 	struct proc *p;
    652  1.55   mycroft 	void *v;
    653  1.40   deraadt 	register_t *retval;
    654   1.3   deraadt {
    655   1.3   deraadt 	return 0;
    656   1.8   deraadt }
    657   1.8   deraadt 
    658  1.33   deraadt int
    659  1.55   mycroft sunos_sys_uname(p, v, retval)
    660   1.8   deraadt 	struct proc *p;
    661  1.54   thorpej 	void *v;
    662  1.32       cgd 	register_t *retval;
    663   1.8   deraadt {
    664  1.55   mycroft 	struct sunos_sys_uname_args *uap = v;
    665  1.33   deraadt 	struct sunos_utsname sut;
    666  1.22   deraadt 	extern char ostype[], machine[], osrelease[];
    667   1.8   deraadt 
    668  1.22   deraadt 	bzero(&sut, sizeof(sut));
    669   1.8   deraadt 
    670  1.22   deraadt 	bcopy(ostype, sut.sysname, sizeof(sut.sysname) - 1);
    671  1.22   deraadt 	bcopy(hostname, sut.nodename, sizeof(sut.nodename));
    672  1.22   deraadt 	sut.nodename[sizeof(sut.nodename)-1] = '\0';
    673  1.22   deraadt 	bcopy(osrelease, sut.release, sizeof(sut.release) - 1);
    674  1.22   deraadt 	bcopy("1", sut.version, sizeof(sut.version) - 1);
    675  1.22   deraadt 	bcopy(machine, sut.machine, sizeof(sut.machine) - 1);
    676   1.8   deraadt 
    677  1.33   deraadt 	return copyout((caddr_t)&sut, (caddr_t)SCARG(uap, name),
    678  1.33   deraadt 	    sizeof(struct sunos_utsname));
    679   1.8   deraadt }
    680   1.8   deraadt 
    681   1.8   deraadt int
    682  1.55   mycroft sunos_sys_setpgrp(p, v, retval)
    683   1.8   deraadt 	struct proc *p;
    684  1.54   thorpej 	void *v;
    685  1.32       cgd 	register_t *retval;
    686   1.8   deraadt {
    687  1.55   mycroft 	struct sunos_sys_setpgrp_args *uap = v;
    688  1.54   thorpej 
    689   1.8   deraadt 	/*
    690   1.8   deraadt 	 * difference to our setpgid call is to include backwards
    691   1.8   deraadt 	 * compatibility to pre-setsid() binaries. Do setsid()
    692   1.8   deraadt 	 * instead of setpgid() in those cases where the process
    693   1.8   deraadt 	 * tries to create a new session the old way.
    694   1.8   deraadt 	 */
    695  1.55   mycroft 	if (!SCARG(uap, pgid) &&
    696  1.55   mycroft 	    (!SCARG(uap, pid) || SCARG(uap, pid) == p->p_pid))
    697  1.55   mycroft 		return sys_setsid(p, uap, retval);
    698   1.8   deraadt 	else
    699  1.55   mycroft 		return sys_setpgid(p, uap, retval);
    700   1.8   deraadt }
    701   1.8   deraadt 
    702  1.33   deraadt int
    703  1.55   mycroft sunos_sys_open(p, v, retval)
    704   1.8   deraadt 	struct proc *p;
    705  1.54   thorpej 	void *v;
    706  1.32       cgd 	register_t *retval;
    707   1.8   deraadt {
    708  1.55   mycroft 	struct sunos_sys_open_args *uap = v;
    709   1.8   deraadt 	int l, r;
    710  1.39        pk 	int noctty;
    711   1.8   deraadt 	int ret;
    712   1.8   deraadt 
    713  1.50  christos 	caddr_t sg = stackgap_init(p->p_emul);
    714  1.50  christos 	SUNOS_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
    715  1.48        pk 
    716   1.8   deraadt 	/* convert mode into NetBSD mode */
    717  1.39        pk 	l = SCARG(uap, flags);
    718  1.39        pk 	noctty = l & 0x8000;
    719   1.8   deraadt 	r =	(l & (0x0001 | 0x0002 | 0x0008 | 0x0040 | 0x0200 | 0x0400 | 0x0800));
    720   1.8   deraadt 	r |=	((l & (0x0004 | 0x1000 | 0x4000)) ? O_NONBLOCK : 0);
    721   1.8   deraadt 	r |=	((l & 0x0080) ? O_SHLOCK : 0);
    722   1.8   deraadt 	r |=	((l & 0x0100) ? O_EXLOCK : 0);
    723   1.8   deraadt 	r |=	((l & 0x2000) ? O_FSYNC : 0);
    724   1.8   deraadt 
    725  1.39        pk 	SCARG(uap, flags) = r;
    726  1.55   mycroft 	ret = sys_open(p, (struct sys_open_args *)uap, retval);
    727   1.8   deraadt 
    728  1.20       cgd 	if (!ret && !noctty && SESS_LEADER(p) && !(p->p_flag & P_CONTROLT)) {
    729   1.8   deraadt 		struct filedesc *fdp = p->p_fd;
    730   1.8   deraadt 		struct file *fp = fdp->fd_ofiles[*retval];
    731   1.8   deraadt 
    732   1.8   deraadt 		/* ignore any error, just give it a try */
    733   1.8   deraadt 		if (fp->f_type == DTYPE_VNODE)
    734  1.55   mycroft 			(fp->f_ops->fo_ioctl)(fp, TIOCSCTTY, (caddr_t)0, p);
    735   1.8   deraadt 	}
    736   1.8   deraadt 	return ret;
    737  1.10   deraadt }
    738  1.10   deraadt 
    739  1.11    chopps #if defined (NFSSERVER)
    740  1.33   deraadt int
    741  1.55   mycroft sunos_sys_nfssvc(p, v, retval)
    742  1.10   deraadt 	struct proc *p;
    743  1.54   thorpej 	void *v;
    744  1.32       cgd 	register_t *retval;
    745  1.10   deraadt {
    746  1.64  christos #if 0
    747  1.55   mycroft 	struct sunos_sys_nfssvc_args *uap = v;
    748  1.51    briggs 	struct emul *e = p->p_emul;
    749  1.55   mycroft 	struct sys_nfssvc_args outuap;
    750  1.10   deraadt 	struct sockaddr sa;
    751  1.10   deraadt 	int error;
    752  1.10   deraadt 
    753  1.10   deraadt 	bzero(&outuap, sizeof outuap);
    754  1.33   deraadt 	SCARG(&outuap, fd) = SCARG(uap, fd);
    755  1.33   deraadt 	SCARG(&outuap, mskval) = STACKGAPBASE;
    756  1.33   deraadt 	SCARG(&outuap, msklen) = sizeof sa;
    757  1.33   deraadt 	SCARG(&outuap, mtchval) = SCARG(&outuap, mskval) + sizeof sa;
    758  1.33   deraadt 	SCARG(&outuap, mtchlen) = sizeof sa;
    759  1.10   deraadt 
    760  1.10   deraadt 	bzero(&sa, sizeof sa);
    761  1.33   deraadt 	if (error = copyout(&sa, SCARG(&outuap, mskval), SCARG(&outuap, msklen)))
    762  1.10   deraadt 		return (error);
    763  1.33   deraadt 	if (error = copyout(&sa, SCARG(&outuap, mtchval), SCARG(&outuap, mtchlen)))
    764  1.10   deraadt 		return (error);
    765  1.10   deraadt 
    766  1.10   deraadt 	return nfssvc(p, &outuap, retval);
    767  1.33   deraadt #else
    768  1.33   deraadt 	return (ENOSYS);
    769  1.33   deraadt #endif
    770  1.10   deraadt }
    771  1.11    chopps #endif /* NFSSERVER */
    772  1.10   deraadt 
    773  1.33   deraadt int
    774  1.55   mycroft sunos_sys_ustat(p, v, retval)
    775  1.10   deraadt 	struct proc *p;
    776  1.54   thorpej 	void *v;
    777  1.32       cgd 	register_t *retval;
    778  1.10   deraadt {
    779  1.55   mycroft 	struct sunos_sys_ustat_args *uap = v;
    780  1.33   deraadt 	struct sunos_ustat us;
    781  1.10   deraadt 	int error;
    782  1.10   deraadt 
    783  1.10   deraadt 	bzero(&us, sizeof us);
    784  1.10   deraadt 
    785  1.10   deraadt 	/*
    786  1.10   deraadt 	 * XXX: should set f_tfree and f_tinode at least
    787  1.33   deraadt 	 * How do we translate dev -> fstat? (and then to sunos_ustat)
    788  1.10   deraadt 	 */
    789  1.10   deraadt 
    790  1.64  christos 	if ((error = copyout(&us, SCARG(uap, buf), sizeof us)) != 0)
    791  1.10   deraadt 		return (error);
    792  1.10   deraadt 	return 0;
    793  1.10   deraadt }
    794  1.10   deraadt 
    795  1.33   deraadt int
    796  1.55   mycroft sunos_sys_quotactl(p, v, retval)
    797  1.10   deraadt 	struct proc *p;
    798  1.54   thorpej 	void *v;
    799  1.32       cgd 	register_t *retval;
    800  1.10   deraadt {
    801  1.54   thorpej 
    802  1.10   deraadt 	return EINVAL;
    803  1.10   deraadt }
    804  1.10   deraadt 
    805  1.33   deraadt int
    806  1.55   mycroft sunos_sys_vhangup(p, v, retval)
    807  1.10   deraadt 	struct proc *p;
    808  1.55   mycroft 	void *v;
    809  1.32       cgd 	register_t *retval;
    810  1.10   deraadt {
    811  1.60        pk 	struct session *sp = p->p_session;
    812  1.60        pk 
    813  1.60        pk 	if (sp->s_ttyvp == 0)
    814  1.60        pk 		return 0;
    815  1.60        pk 
    816  1.60        pk 	if (sp->s_ttyp && sp->s_ttyp->t_session == sp && sp->s_ttyp->t_pgrp)
    817  1.60        pk 		pgsignal(sp->s_ttyp->t_pgrp, SIGHUP, 1);
    818  1.60        pk 
    819  1.60        pk 	(void) ttywait(sp->s_ttyp);
    820  1.60        pk 	if (sp->s_ttyvp)
    821  1.60        pk 		vgoneall(sp->s_ttyvp);
    822  1.60        pk 	if (sp->s_ttyvp)
    823  1.60        pk 		vrele(sp->s_ttyvp);
    824  1.60        pk 	sp->s_ttyvp = NULL;
    825  1.55   mycroft 
    826  1.10   deraadt 	return 0;
    827  1.10   deraadt }
    828  1.10   deraadt 
    829  1.64  christos static int
    830  1.10   deraadt sunstatfs(sp, buf)
    831  1.10   deraadt 	struct statfs *sp;
    832  1.10   deraadt 	caddr_t buf;
    833  1.10   deraadt {
    834  1.33   deraadt 	struct sunos_statfs ssfs;
    835  1.10   deraadt 
    836  1.10   deraadt 	bzero(&ssfs, sizeof ssfs);
    837  1.10   deraadt 	ssfs.f_type = 0;
    838  1.16   deraadt 	ssfs.f_bsize = sp->f_bsize;
    839  1.10   deraadt 	ssfs.f_blocks = sp->f_blocks;
    840  1.10   deraadt 	ssfs.f_bfree = sp->f_bfree;
    841  1.10   deraadt 	ssfs.f_bavail = sp->f_bavail;
    842  1.10   deraadt 	ssfs.f_files = sp->f_files;
    843  1.10   deraadt 	ssfs.f_ffree = sp->f_ffree;
    844  1.10   deraadt 	ssfs.f_fsid = sp->f_fsid;
    845  1.10   deraadt 	return copyout((caddr_t)&ssfs, buf, sizeof ssfs);
    846  1.10   deraadt }
    847  1.10   deraadt 
    848  1.33   deraadt int
    849  1.55   mycroft sunos_sys_statfs(p, v, retval)
    850  1.10   deraadt 	struct proc *p;
    851  1.54   thorpej 	void *v;
    852  1.32       cgd 	register_t *retval;
    853  1.10   deraadt {
    854  1.55   mycroft 	struct sunos_sys_statfs_args *uap = v;
    855  1.10   deraadt 	register struct mount *mp;
    856  1.10   deraadt 	register struct statfs *sp;
    857  1.10   deraadt 	int error;
    858  1.10   deraadt 	struct nameidata nd;
    859  1.10   deraadt 
    860  1.50  christos 	caddr_t sg = stackgap_init(p->p_emul);
    861  1.50  christos 	SUNOS_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
    862  1.48        pk 
    863  1.33   deraadt 	NDINIT(&nd, LOOKUP, FOLLOW, UIO_USERSPACE, SCARG(uap, path), p);
    864  1.64  christos 	if ((error = namei(&nd)) != 0)
    865  1.10   deraadt 		return (error);
    866  1.27        pk 	mp = nd.ni_vp->v_mount;
    867  1.10   deraadt 	sp = &mp->mnt_stat;
    868  1.27        pk 	vrele(nd.ni_vp);
    869  1.64  christos 	if ((error = VFS_STATFS(mp, sp, p)) != 0)
    870  1.10   deraadt 		return (error);
    871  1.10   deraadt 	sp->f_flags = mp->mnt_flag & MNT_VISFLAGMASK;
    872  1.33   deraadt 	return sunstatfs(sp, (caddr_t)SCARG(uap, buf));
    873  1.10   deraadt }
    874  1.10   deraadt 
    875  1.33   deraadt int
    876  1.55   mycroft sunos_sys_fstatfs(p, v, retval)
    877  1.10   deraadt 	struct proc *p;
    878  1.54   thorpej 	void *v;
    879  1.32       cgd 	register_t *retval;
    880  1.10   deraadt {
    881  1.55   mycroft 	struct sunos_sys_fstatfs_args *uap = v;
    882  1.10   deraadt 	struct file *fp;
    883  1.10   deraadt 	struct mount *mp;
    884  1.10   deraadt 	register struct statfs *sp;
    885  1.10   deraadt 	int error;
    886  1.10   deraadt 
    887  1.64  christos 	if ((error = getvnode(p->p_fd, SCARG(uap, fd), &fp)) != 0)
    888  1.10   deraadt 		return (error);
    889  1.10   deraadt 	mp = ((struct vnode *)fp->f_data)->v_mount;
    890  1.10   deraadt 	sp = &mp->mnt_stat;
    891  1.64  christos 	if ((error = VFS_STATFS(mp, sp, p)) != 0)
    892  1.10   deraadt 		return (error);
    893  1.10   deraadt 	sp->f_flags = mp->mnt_flag & MNT_VISFLAGMASK;
    894  1.33   deraadt 	return sunstatfs(sp, (caddr_t)SCARG(uap, buf));
    895  1.10   deraadt }
    896  1.10   deraadt 
    897  1.33   deraadt int
    898  1.55   mycroft sunos_sys_exportfs(p, v, retval)
    899  1.10   deraadt 	struct proc *p;
    900  1.54   thorpej 	void *v;
    901  1.32       cgd 	register_t *retval;
    902  1.10   deraadt {
    903  1.10   deraadt 	/*
    904  1.10   deraadt 	 * XXX: should perhaps translate into a mount(2)
    905  1.10   deraadt 	 * with MOUNT_EXPORT?
    906  1.10   deraadt 	 */
    907  1.10   deraadt 	return 0;
    908  1.10   deraadt }
    909  1.10   deraadt 
    910  1.33   deraadt int
    911  1.55   mycroft sunos_sys_mknod(p, v, retval)
    912  1.10   deraadt 	struct proc *p;
    913  1.54   thorpej 	void *v;
    914  1.32       cgd 	register_t *retval;
    915  1.10   deraadt {
    916  1.55   mycroft 	struct sunos_sys_mknod_args *uap = v;
    917  1.55   mycroft 
    918  1.50  christos 	caddr_t sg = stackgap_init(p->p_emul);
    919  1.50  christos 	SUNOS_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
    920  1.48        pk 
    921  1.33   deraadt 	if (S_ISFIFO(SCARG(uap, mode)))
    922  1.55   mycroft 		return sys_mkfifo(p, uap, retval);
    923  1.10   deraadt 
    924  1.55   mycroft 	return sys_mknod(p, (struct sys_mknod_args *)uap, retval);
    925  1.12   deraadt }
    926  1.12   deraadt 
    927  1.33   deraadt #define SUNOS_SC_ARG_MAX	1
    928  1.33   deraadt #define SUNOS_SC_CHILD_MAX	2
    929  1.33   deraadt #define SUNOS_SC_CLK_TCK	3
    930  1.33   deraadt #define SUNOS_SC_NGROUPS_MAX	4
    931  1.33   deraadt #define SUNOS_SC_OPEN_MAX	5
    932  1.33   deraadt #define SUNOS_SC_JOB_CONTROL	6
    933  1.33   deraadt #define SUNOS_SC_SAVED_IDS	7
    934  1.33   deraadt #define SUNOS_SC_VERSION	8
    935  1.12   deraadt 
    936  1.33   deraadt int
    937  1.55   mycroft sunos_sys_sysconf(p, v, retval)
    938  1.12   deraadt 	struct proc *p;
    939  1.54   thorpej 	void *v;
    940  1.32       cgd 	register_t *retval;
    941  1.12   deraadt {
    942  1.55   mycroft 	struct sunos_sys_sysconf_args *uap = v;
    943  1.24   deraadt 	extern int maxfiles;
    944  1.12   deraadt 
    945  1.33   deraadt 	switch(SCARG(uap, name)) {
    946  1.33   deraadt 	case SUNOS_SC_ARG_MAX:
    947  1.12   deraadt 		*retval = ARG_MAX;
    948  1.13   deraadt 		break;
    949  1.33   deraadt 	case SUNOS_SC_CHILD_MAX:
    950  1.12   deraadt 		*retval = maxproc;
    951  1.13   deraadt 		break;
    952  1.33   deraadt 	case SUNOS_SC_CLK_TCK:
    953  1.12   deraadt 		*retval = 60;		/* should this be `hz', ie. 100? */
    954  1.13   deraadt 		break;
    955  1.33   deraadt 	case SUNOS_SC_NGROUPS_MAX:
    956  1.12   deraadt 		*retval = NGROUPS_MAX;
    957  1.13   deraadt 		break;
    958  1.33   deraadt 	case SUNOS_SC_OPEN_MAX:
    959  1.24   deraadt 		*retval = maxfiles;
    960  1.13   deraadt 		break;
    961  1.33   deraadt 	case SUNOS_SC_JOB_CONTROL:
    962  1.12   deraadt 		*retval = 1;
    963  1.13   deraadt 		break;
    964  1.33   deraadt 	case SUNOS_SC_SAVED_IDS:
    965  1.12   deraadt #ifdef _POSIX_SAVED_IDS
    966  1.12   deraadt 		*retval = 1;
    967  1.12   deraadt #else
    968  1.12   deraadt 		*retval = 0;
    969  1.12   deraadt #endif
    970  1.13   deraadt 		break;
    971  1.33   deraadt 	case SUNOS_SC_VERSION:
    972  1.12   deraadt 		*retval = 198808;
    973  1.13   deraadt 		break;
    974  1.12   deraadt 	default:
    975  1.12   deraadt 		return EINVAL;
    976  1.12   deraadt 	}
    977  1.12   deraadt 	return 0;
    978  1.17        pk }
    979  1.17        pk 
    980  1.33   deraadt #define SUNOS_RLIMIT_NOFILE	6	/* Other RLIMIT_* are the same */
    981  1.33   deraadt #define SUNOS_RLIM_NLIMITS	7
    982  1.17        pk 
    983  1.33   deraadt int
    984  1.55   mycroft sunos_sys_getrlimit(p, v, retval)
    985  1.17        pk 	struct proc *p;
    986  1.54   thorpej 	void *v;
    987  1.32       cgd 	register_t *retval;
    988  1.17        pk {
    989  1.55   mycroft 	struct sunos_sys_getrlimit_args *uap = v;
    990  1.54   thorpej 
    991  1.33   deraadt 	if (SCARG(uap, which) >= SUNOS_RLIM_NLIMITS)
    992  1.17        pk 		return EINVAL;
    993  1.17        pk 
    994  1.33   deraadt 	if (SCARG(uap, which) == SUNOS_RLIMIT_NOFILE)
    995  1.33   deraadt 		SCARG(uap, which) = RLIMIT_NOFILE;
    996  1.17        pk 
    997  1.55   mycroft 	return compat_43_sys_getrlimit(p, uap, retval);
    998  1.17        pk }
    999  1.17        pk 
   1000  1.33   deraadt int
   1001  1.55   mycroft sunos_sys_setrlimit(p, v, retval)
   1002  1.17        pk 	struct proc *p;
   1003  1.54   thorpej 	void *v;
   1004  1.32       cgd 	register_t *retval;
   1005  1.17        pk {
   1006  1.55   mycroft 	struct sunos_sys_getrlimit_args *uap = v;
   1007  1.54   thorpej 
   1008  1.33   deraadt 	if (SCARG(uap, which) >= SUNOS_RLIM_NLIMITS)
   1009  1.17        pk 		return EINVAL;
   1010  1.17        pk 
   1011  1.33   deraadt 	if (SCARG(uap, which) == SUNOS_RLIMIT_NOFILE)
   1012  1.33   deraadt 		SCARG(uap, which) = RLIMIT_NOFILE;
   1013  1.17        pk 
   1014  1.55   mycroft 	return compat_43_sys_setrlimit(p, uap, retval);
   1015  1.35   deraadt }
   1016  1.36   deraadt 
   1017  1.36   deraadt /* for the m68k machines */
   1018  1.36   deraadt #ifndef PT_GETFPREGS
   1019  1.36   deraadt #define PT_GETFPREGS -1
   1020  1.36   deraadt #endif
   1021  1.36   deraadt #ifndef PT_SETFPREGS
   1022  1.36   deraadt #define PT_SETFPREGS -1
   1023  1.36   deraadt #endif
   1024  1.35   deraadt 
   1025  1.35   deraadt static int sreq2breq[] = {
   1026  1.35   deraadt 	PT_TRACE_ME,    PT_READ_I,      PT_READ_D,      -1,
   1027  1.35   deraadt 	PT_WRITE_I,     PT_WRITE_D,     -1,             PT_CONTINUE,
   1028  1.35   deraadt 	PT_KILL,        -1,             PT_ATTACH,      PT_DETACH,
   1029  1.35   deraadt 	PT_GETREGS,     PT_SETREGS,     PT_GETFPREGS,   PT_SETFPREGS
   1030  1.35   deraadt };
   1031  1.35   deraadt static int nreqs = sizeof(sreq2breq) / sizeof(sreq2breq[0]);
   1032  1.35   deraadt 
   1033  1.64  christos int
   1034  1.55   mycroft sunos_sys_ptrace(p, v, retval)
   1035  1.35   deraadt 	struct proc *p;
   1036  1.54   thorpej 	void *v;
   1037  1.55   mycroft 	register_t *retval;
   1038  1.35   deraadt {
   1039  1.55   mycroft 	struct sunos_sys_ptrace_args *uap = v;
   1040  1.55   mycroft 	struct sys_ptrace_args pa;
   1041  1.35   deraadt 	int req;
   1042  1.35   deraadt 
   1043  1.35   deraadt 	req = SCARG(uap, req);
   1044  1.35   deraadt 
   1045  1.35   deraadt 	if (req < 0 || req >= nreqs)
   1046  1.35   deraadt 		return (EINVAL);
   1047  1.35   deraadt 
   1048  1.35   deraadt 	req = sreq2breq[req];
   1049  1.35   deraadt 	if (req == -1)
   1050  1.35   deraadt 		return (EINVAL);
   1051  1.35   deraadt 
   1052  1.35   deraadt 	SCARG(&pa, req) = req;
   1053  1.35   deraadt 	SCARG(&pa, pid) = (pid_t)SCARG(uap, pid);
   1054  1.35   deraadt 	SCARG(&pa, addr) = (caddr_t)SCARG(uap, addr);
   1055  1.35   deraadt 	SCARG(&pa, data) = SCARG(uap, data);
   1056  1.35   deraadt 
   1057  1.55   mycroft 	return sys_ptrace(p, &pa, retval);
   1058  1.35   deraadt }
   1059  1.35   deraadt 
   1060  1.35   deraadt static void
   1061  1.35   deraadt sunos_pollscan(p, pl, nfd, retval)
   1062  1.35   deraadt 	struct proc *p;
   1063  1.35   deraadt 	struct sunos_pollfd *pl;
   1064  1.35   deraadt 	int nfd;
   1065  1.35   deraadt 	register_t *retval;
   1066  1.35   deraadt {
   1067  1.35   deraadt 	register struct filedesc *fdp = p->p_fd;
   1068  1.35   deraadt 	register int msk, i;
   1069  1.35   deraadt 	struct file *fp;
   1070  1.35   deraadt 	int n = 0;
   1071  1.35   deraadt 	static int flag[3] = { FREAD, FWRITE, 0 };
   1072  1.35   deraadt 	static int pflag[3] = { SUNOS_POLLIN|SUNOS_POLLRDNORM,
   1073  1.35   deraadt 				SUNOS_POLLOUT, SUNOS_POLLERR };
   1074  1.35   deraadt 
   1075  1.35   deraadt 	/*
   1076  1.35   deraadt 	 * XXX: We need to implement the rest of the flags.
   1077  1.35   deraadt 	 */
   1078  1.35   deraadt 	for (i = 0; i < nfd; i++) {
   1079  1.35   deraadt 		fp = fdp->fd_ofiles[pl[i].fd];
   1080  1.35   deraadt 		if (fp == NULL) {
   1081  1.35   deraadt 			if (pl[i].events & SUNOS_POLLNVAL) {
   1082  1.35   deraadt 				pl[i].revents |= SUNOS_POLLNVAL;
   1083  1.35   deraadt 				n++;
   1084  1.35   deraadt 			}
   1085  1.35   deraadt 			continue;
   1086  1.35   deraadt 		}
   1087  1.35   deraadt 		for (msk = 0; msk < 3; msk++) {
   1088  1.35   deraadt 			if (pl[i].events & pflag[msk]) {
   1089  1.35   deraadt 				if ((*fp->f_ops->fo_select)(fp, flag[msk], p)) {
   1090  1.35   deraadt 					pl[i].revents |=
   1091  1.35   deraadt 					    pflag[msk] & pl[i].events;
   1092  1.35   deraadt 					n++;
   1093  1.35   deraadt 				}
   1094  1.35   deraadt 			}
   1095  1.35   deraadt 		}
   1096  1.35   deraadt 	}
   1097  1.35   deraadt 	*retval = n;
   1098  1.35   deraadt }
   1099  1.35   deraadt 
   1100  1.35   deraadt 
   1101  1.35   deraadt /*
   1102  1.35   deraadt  * We are using the same mechanism as select only we encode/decode args
   1103  1.35   deraadt  * differently.
   1104  1.35   deraadt  */
   1105  1.35   deraadt int
   1106  1.55   mycroft sunos_sys_poll(p, v, retval)
   1107  1.35   deraadt 	struct proc *p;
   1108  1.54   thorpej 	void *v;
   1109  1.35   deraadt 	register_t *retval;
   1110  1.35   deraadt {
   1111  1.55   mycroft 	struct sunos_sys_poll_args *uap = v;
   1112  1.35   deraadt 	int i, s;
   1113  1.35   deraadt 	int error, error2;
   1114  1.35   deraadt 	size_t sz = sizeof(struct sunos_pollfd) * SCARG(uap, nfds);
   1115  1.35   deraadt 	struct sunos_pollfd *pl;
   1116  1.35   deraadt 	int msec = SCARG(uap, timeout);
   1117  1.35   deraadt 	struct timeval atv;
   1118  1.35   deraadt 	int timo;
   1119  1.35   deraadt 	int ncoll;
   1120  1.35   deraadt 	extern int nselcoll, selwait;
   1121  1.35   deraadt 
   1122  1.35   deraadt 	pl = (struct sunos_pollfd *) malloc(sz, M_TEMP, M_WAITOK);
   1123  1.35   deraadt 
   1124  1.64  christos 	if ((error = copyin(SCARG(uap, fds), pl, sz)) != 0)
   1125  1.35   deraadt 		goto bad;
   1126  1.35   deraadt 
   1127  1.35   deraadt 	for (i = 0; i < SCARG(uap, nfds); i++)
   1128  1.35   deraadt 		pl[i].revents = 0;
   1129  1.35   deraadt 
   1130  1.35   deraadt 	if (msec != -1) {
   1131  1.35   deraadt 		atv.tv_sec = msec / 1000;
   1132  1.35   deraadt 		atv.tv_usec = (msec - (atv.tv_sec * 1000)) * 1000;
   1133  1.35   deraadt 
   1134  1.35   deraadt 		if (itimerfix(&atv)) {
   1135  1.35   deraadt 			error = EINVAL;
   1136  1.35   deraadt 			goto done;
   1137  1.35   deraadt 		}
   1138  1.35   deraadt 		s = splclock();
   1139  1.43   mycroft 		timeradd(&atv, &time, &atv);
   1140  1.35   deraadt 		timo = hzto(&atv);
   1141  1.35   deraadt 		/*
   1142  1.35   deraadt 		 * Avoid inadvertently sleeping forever.
   1143  1.35   deraadt 		 */
   1144  1.35   deraadt 		if (timo == 0)
   1145  1.35   deraadt 			timo = 1;
   1146  1.35   deraadt 		splx(s);
   1147  1.35   deraadt 	} else
   1148  1.35   deraadt 		timo = 0;
   1149  1.35   deraadt 
   1150  1.35   deraadt retry:
   1151  1.35   deraadt 	ncoll = nselcoll;
   1152  1.35   deraadt 	p->p_flag |= P_SELECT;
   1153  1.35   deraadt 	sunos_pollscan(p, pl, SCARG(uap, nfds), retval);
   1154  1.35   deraadt 	if (*retval)
   1155  1.35   deraadt 		goto done;
   1156  1.35   deraadt 	s = splhigh();
   1157  1.35   deraadt 	if (timo && timercmp(&time, &atv, >=)) {
   1158  1.35   deraadt 		splx(s);
   1159  1.35   deraadt 		goto done;
   1160  1.35   deraadt 	}
   1161  1.35   deraadt 	if ((p->p_flag & P_SELECT) == 0 || nselcoll != ncoll) {
   1162  1.35   deraadt 		splx(s);
   1163  1.35   deraadt 		goto retry;
   1164  1.35   deraadt 	}
   1165  1.35   deraadt 	p->p_flag &= ~P_SELECT;
   1166  1.35   deraadt 	error = tsleep((caddr_t)&selwait, PSOCK | PCATCH, "sunos_poll", timo);
   1167  1.35   deraadt 	splx(s);
   1168  1.35   deraadt 	if (error == 0)
   1169  1.35   deraadt 		goto retry;
   1170  1.35   deraadt 
   1171  1.35   deraadt done:
   1172  1.35   deraadt 	p->p_flag &= ~P_SELECT;
   1173  1.35   deraadt 	/* poll is not restarted after signals... */
   1174  1.35   deraadt 	if (error == ERESTART)
   1175  1.35   deraadt 		error = EINTR;
   1176  1.35   deraadt 	if (error == EWOULDBLOCK)
   1177  1.35   deraadt 		error = 0;
   1178  1.35   deraadt 
   1179  1.64  christos 	if ((error2 = copyout(pl, SCARG(uap, fds), sz)) != 0)
   1180  1.35   deraadt 		error = error2;
   1181  1.35   deraadt 
   1182  1.35   deraadt bad:
   1183  1.35   deraadt 	free((char *) pl, M_TEMP);
   1184  1.35   deraadt 
   1185  1.35   deraadt 	return (error);
   1186  1.44  christos }
   1187  1.44  christos 
   1188  1.44  christos /*
   1189  1.44  christos  * SunOS reboot system call (for compatibility).
   1190  1.44  christos  * Sun lets you pass in a boot string which the PROM
   1191  1.44  christos  * saves and provides to the next boot program.
   1192  1.44  christos  */
   1193  1.44  christos static struct sunos_howto_conv {
   1194  1.46       gwr 	int sun_howto;
   1195  1.44  christos 	int bsd_howto;
   1196  1.44  christos } sunos_howto_conv[] = {
   1197  1.44  christos 	{ 0x001,	RB_ASKNAME },
   1198  1.44  christos 	{ 0x002,	RB_SINGLE },
   1199  1.44  christos 	{ 0x004,	RB_NOSYNC },
   1200  1.44  christos 	{ 0x008,	RB_HALT },
   1201  1.44  christos 	{ 0x080,	RB_DUMP },
   1202  1.44  christos 	{ 0x000,	0 },
   1203  1.44  christos };
   1204  1.46       gwr #define	SUNOS_RB_STRING	0x200
   1205  1.44  christos 
   1206  1.46       gwr int
   1207  1.55   mycroft sunos_sys_reboot(p, v, retval)
   1208  1.44  christos 	struct proc *p;
   1209  1.54   thorpej 	void *v;
   1210  1.46       gwr 	register_t *retval;
   1211  1.44  christos {
   1212  1.55   mycroft 	struct sunos_sys_reboot_args *uap = v;
   1213  1.44  christos 	struct sunos_howto_conv *convp;
   1214  1.46       gwr 	int error, bsd_howto, sun_howto;
   1215  1.44  christos 
   1216  1.67       mrg 	if ((error = suser(p->p_ucred, &p->p_acflag)) != 0) {
   1217  1.44  christos 		return (error);
   1218  1.44  christos 
   1219  1.44  christos 	/*
   1220  1.44  christos 	 * Convert howto bits to BSD format.
   1221  1.44  christos 	 */
   1222  1.46       gwr 	sun_howto = SCARG(uap, howto);
   1223  1.44  christos 	bsd_howto = 0;
   1224  1.44  christos 	convp = sunos_howto_conv;
   1225  1.46       gwr 	while (convp->sun_howto) {
   1226  1.46       gwr 		if (sun_howto &  convp->sun_howto)
   1227  1.44  christos 			bsd_howto |= convp->bsd_howto;
   1228  1.44  christos 		convp++;
   1229  1.44  christos 	}
   1230  1.44  christos 
   1231  1.44  christos 	/*
   1232  1.44  christos 	 * Sun RB_STRING (Get user supplied bootstring.)
   1233  1.46       gwr 	 * If the machine supports passing a string to the
   1234  1.67       mrg 	 * next booted kernel.
   1235  1.44  christos 	 */
   1236  1.46       gwr 	if (sun_howto & SUNOS_RB_STRING) {
   1237  1.46       gwr 		char bs[128];
   1238  1.46       gwr 
   1239  1.47  christos 		error = copyinstr(SCARG(uap, bootstr), bs, sizeof(bs), 0);
   1240  1.67       mrg 
   1241  1.67       mrg 		if (error) {
   1242  1.67       mrg #if 0
   1243  1.47  christos 			return error;
   1244  1.67       mrg #endif
   1245  1.67       mrg 			bs = NULL:
   1246  1.67       mrg 		}
   1247  1.67       mrg 	} else
   1248  1.67       mrg 		bs = NULL;
   1249  1.46       gwr 
   1250  1.67       mrg 	boot(bsd_howto, bs);
   1251  1.44  christos 
   1252  1.64  christos 	return 0;
   1253  1.50  christos }
   1254  1.50  christos 
   1255  1.50  christos /*
   1256  1.50  christos  * Generalized interface signal handler, 4.3-compatible.
   1257  1.50  christos  */
   1258  1.50  christos /* ARGSUSED */
   1259  1.50  christos int
   1260  1.55   mycroft sunos_sys_sigvec(p, v, retval)
   1261  1.50  christos 	struct proc *p;
   1262  1.54   thorpej 	void *v;
   1263  1.54   thorpej 	register_t *retval;
   1264  1.54   thorpej {
   1265  1.55   mycroft 	register struct sunos_sys_sigvec_args /* {
   1266  1.50  christos 		syscallarg(int) signum;
   1267  1.50  christos 		syscallarg(struct sigvec *) nsv;
   1268  1.50  christos 		syscallarg(struct sigvec *) osv;
   1269  1.54   thorpej 	} */ *uap = v;
   1270  1.50  christos 	struct sigvec vec;
   1271  1.50  christos 	register struct sigacts *ps = p->p_sigacts;
   1272  1.50  christos 	register struct sigvec *sv;
   1273  1.50  christos 	register int signum;
   1274  1.50  christos 	int bit, error;
   1275  1.50  christos 
   1276  1.50  christos 	signum = SCARG(uap, signum);
   1277  1.50  christos 	if (signum <= 0 || signum >= NSIG ||
   1278  1.50  christos 	    signum == SIGKILL || signum == SIGSTOP)
   1279  1.50  christos 		return (EINVAL);
   1280  1.50  christos 	sv = &vec;
   1281  1.50  christos 	if (SCARG(uap, osv)) {
   1282  1.50  christos 		*(sig_t *)&sv->sv_handler = ps->ps_sigact[signum];
   1283  1.50  christos 		sv->sv_mask = ps->ps_catchmask[signum];
   1284  1.50  christos 		bit = sigmask(signum);
   1285  1.50  christos 		sv->sv_flags = 0;
   1286  1.50  christos 		if ((ps->ps_sigonstack & bit) != 0)
   1287  1.50  christos 			sv->sv_flags |= SV_ONSTACK;
   1288  1.50  christos 		if ((ps->ps_sigintr & bit) != 0)
   1289  1.50  christos 			sv->sv_flags |= SV_INTERRUPT;
   1290  1.55   mycroft 		if ((ps->ps_sigreset & bit) != 0)
   1291  1.55   mycroft 			sv->sv_flags |= SA_RESETHAND;
   1292  1.55   mycroft 		sv->sv_mask &= ~bit;
   1293  1.64  christos 		error = copyout((caddr_t)sv, (caddr_t)SCARG(uap, osv),
   1294  1.64  christos 		    sizeof (vec));
   1295  1.64  christos 		if (error)
   1296  1.50  christos 			return (error);
   1297  1.50  christos 	}
   1298  1.50  christos 	if (SCARG(uap, nsv)) {
   1299  1.64  christos 		error = copyin((caddr_t)SCARG(uap, nsv), (caddr_t)sv,
   1300  1.64  christos 		    sizeof (vec));
   1301  1.64  christos 		if (error)
   1302  1.50  christos 			return (error);
   1303  1.50  christos 		/*
   1304  1.53       gwr 		 * SunOS uses the mask 0x0004 as SV_RESETHAND
   1305  1.53       gwr 		 * meaning: `reset to SIG_DFL on delivery'.
   1306  1.53       gwr 		 * We support only the bits in: 0xF
   1307  1.53       gwr 		 * (those bits are the same as ours)
   1308  1.50  christos 		 */
   1309  1.53       gwr 		if (sv->sv_flags & ~0xF)
   1310  1.53       gwr 			return (EINVAL);
   1311  1.53       gwr 		/* SunOS binaries have a user-mode trampoline. */
   1312  1.53       gwr 		sv->sv_flags |= SA_USERTRAMP;
   1313  1.53       gwr 		/* Convert sigvec:SV_INTERRUPT to sigaction:SA_RESTART */
   1314  1.53       gwr 		sv->sv_flags ^= SA_RESTART;	/* same bit, inverted */
   1315  1.50  christos 		setsigvec(p, signum, (struct sigaction *)sv);
   1316  1.50  christos 	}
   1317  1.50  christos 	return (0);
   1318   1.1   deraadt }
   1319