Home | History | Annotate | Line # | Download | only in ultrix
ultrix_misc.c revision 1.38
      1 /*	$NetBSD: ultrix_misc.c,v 1.38 1997/10/19 00:15:31 jonathan Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1995, 1997 Jonathan Stone (hereinafter referred to as the author)
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. All advertising materials mentioning features or use of this software
     16  *    must display the following acknowledgement:
     17  *      This product includes software developed by Jonathan Stone for
     18  *      the NetBSD Project.
     19  * 4. The name of the author may not be used to endorse or promote products
     20  *    derived from this software without specific prior written permission.
     21  *
     22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND
     23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR BE LIABLE
     26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     32  * SUCH DAMAGE.
     33  */
     34 
     35 /*
     36  * Copyright (c) 1992, 1993
     37  *	The Regents of the University of California.  All rights reserved.
     38  *
     39  * This software was developed by the Computer Systems Engineering group
     40  * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
     41  * contributed to Berkeley.
     42  *
     43  * All advertising materials mentioning features or use of this software
     44  * must display the following acknowledgement:
     45  *	This product includes software developed by the University of
     46  *	California, Lawrence Berkeley Laboratory.
     47  *
     48  * Redistribution and use in source and binary forms, with or without
     49  * modification, are permitted provided that the following conditions
     50  * are met:
     51  * 1. Redistributions of source code must retain the above copyright
     52  *    notice, this list of conditions and the following disclaimer.
     53  * 2. Redistributions in binary form must reproduce the above copyright
     54  *    notice, this list of conditions and the following disclaimer in the
     55  *    documentation and/or other materials provided with the distribution.
     56  * 3. All advertising materials mentioning features or use of this software
     57  *    must display the following acknowledgement:
     58  *	This product includes software developed by the University of
     59  *	California, Berkeley and its contributors.
     60  * 4. Neither the name of the University nor the names of its contributors
     61  *    may be used to endorse or promote products derived from this software
     62  *    without specific prior written permission.
     63  *
     64  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     65  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     66  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     67  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     68  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     69  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     70  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     71  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     72  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     73  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     74  * SUCH DAMAGE.
     75  *
     76  *
     77  *	@(#)sun_misc.c	8.1 (Berkeley) 6/18/93
     78  *
     79  * from: Header: sun_misc.c,v 1.16 93/04/07 02:46:27 torek Exp
     80  */
     81 
     82 #include <sys/cdefs.h>			/* RCS ID & Copyright macro defns */
     83 
     84 __KERNEL_RCSID(0, "$NetBSD: ultrix_misc.c,v 1.38 1997/10/19 00:15:31 jonathan Exp $");
     85 
     86 /*
     87  * SunOS compatibility module.
     88  *
     89  * SunOS system calls that are implemented differently in BSD are
     90  * handled here.
     91  */
     92 
     93 #include <sys/param.h>
     94 #include <sys/systm.h>
     95 #include <sys/namei.h>
     96 #include <sys/dirent.h>
     97 #include <sys/proc.h>
     98 #include <sys/file.h>
     99 #include <sys/filedesc.h>
    100 /*#include <sys/stat.h>*/
    101 /*#include <sys/ioctl.h>*/
    102 #include <sys/kernel.h>
    103 #include <sys/exec.h>
    104 #include <sys/malloc.h>
    105 #include <sys/mbuf.h>
    106 #include <sys/mman.h>
    107 #include <sys/mount.h>
    108 #include <sys/resource.h>
    109 #include <sys/resourcevar.h>
    110 #include <sys/signal.h>
    111 #include <sys/signalvar.h>
    112 #include <sys/socket.h>
    113 #include <sys/vnode.h>
    114 #include <sys/uio.h>
    115 #include <sys/wait.h>
    116 #include <sys/utsname.h>
    117 #include <sys/unistd.h>
    118 #include <sys/ipc.h>
    119 
    120 #include <sys/syscallargs.h>
    121 
    122 #include <compat/ultrix/ultrix_syscall.h>
    123 #include <compat/ultrix/ultrix_syscallargs.h>
    124 #include <compat/common/compat_util.h>
    125 
    126 #include <netinet/in.h>
    127 
    128 #include <miscfs/specfs/specdev.h>
    129 
    130 #include <nfs/rpcv2.h>
    131 #include <nfs/nfsproto.h>
    132 #include <nfs/nfs.h>
    133 
    134 #include <vm/vm.h>					/* pmap declarations */
    135 
    136 #include <sys/conf.h>					/* iszerodev() */
    137 #include <sys/socketvar.h>				/* sosetopt() */
    138 
    139 
    140 extern struct sysent ultrix_sysent[];
    141 extern char *ultrix_syscallnames[];
    142 
    143 
    144 /*
    145  * Select the appropriate setregs callback for the target architecture.
    146  */
    147 #ifdef mips
    148 #include <machine/ecoff_machdep.h>
    149 #define ULTRIX_EXEC_SETREGS cpu_exec_ecoff_setregs
    150 #endif /* mips */
    151 
    152 #ifdef vax
    153 #define ULTRIX_EXEC_SETREGS setregs
    154 #endif /* mips */
    155 
    156 
    157 extern void ULTRIX_EXEC_SETREGS __P((struct proc *, struct exec_package *,
    158 					u_long));
    159 extern char sigcode[], esigcode[];
    160 
    161 struct emul emul_ultrix = {
    162 	"ultrix",
    163 	NULL,
    164 	sendsig,
    165 	ULTRIX_SYS_syscall,
    166 	ULTRIX_SYS_MAXSYSCALL,
    167 	ultrix_sysent,
    168 	ultrix_syscallnames,
    169 	0,
    170 	copyargs,
    171 	ULTRIX_EXEC_SETREGS,
    172 	sigcode,
    173 	esigcode,
    174 };
    175 
    176 #define GSI_PROG_ENV 1
    177 
    178 int
    179 ultrix_sys_getsysinfo(p, v, retval)
    180 	struct proc *p;
    181 	void *v;
    182 	register_t *retval;
    183 {
    184 	struct ultrix_sys_getsysinfo_args *uap = v;
    185 	static short progenv = 0;
    186 
    187 	switch (SCARG(uap, op)) {
    188 		/* operations implemented: */
    189 	case GSI_PROG_ENV:
    190 		if (SCARG(uap, nbytes) < sizeof(short))
    191 			return EINVAL;
    192 		*retval = 1;
    193 		return (copyout(&progenv, SCARG(uap, buffer), sizeof(short)));
    194 	default:
    195 		*retval = 0; /* info unavail */
    196 		return 0;
    197 	}
    198 }
    199 
    200 int
    201 ultrix_sys_setsysinfo(p, v, retval)
    202 	struct proc *p;
    203 	void *v;
    204 	register_t *retval;
    205 {
    206 
    207 #ifdef notyet
    208 	struct ultrix_sys_setsysinfo_args *uap = v;
    209 #endif
    210 
    211 	*retval = 0;
    212 	return 0;
    213 }
    214 
    215 int
    216 ultrix_sys_waitpid(p, v, retval)
    217 	struct proc *p;
    218 	void *v;
    219 	register_t *retval;
    220 {
    221 	struct ultrix_sys_waitpid_args *uap = v;
    222 	struct sys_wait4_args ua;
    223 
    224 	SCARG(&ua, pid) = SCARG(uap, pid);
    225 	SCARG(&ua, status) = SCARG(uap, status);
    226 	SCARG(&ua, options) = SCARG(uap, options);
    227 	SCARG(&ua, rusage) = 0;
    228 
    229 	return (sys_wait4(p, &ua, retval));
    230 }
    231 
    232 int
    233 ultrix_sys_wait3(p, v, retval)
    234 	struct proc *p;
    235 	void *v;
    236 	register_t *retval;
    237 {
    238 	struct ultrix_sys_wait3_args *uap = v;
    239 	struct sys_wait4_args ua;
    240 
    241 	SCARG(&ua, pid) = -1;
    242 	SCARG(&ua, status) = SCARG(uap, status);
    243 	SCARG(&ua, options) = SCARG(uap, options);
    244 	SCARG(&ua, rusage) = SCARG(uap, rusage);
    245 
    246 	return (sys_wait4(p, &ua, retval));
    247 }
    248 
    249 /*
    250  * Ultrix binaries pass in FD_MAX as the first arg to select().
    251  * On Ultrix, FD_MAX is 4096, which is more than the NetBSD sys_select()
    252  * can handle.
    253  * Since we can't have more than the (native) FD_MAX descriptors open,
    254  * limit nfds to at most FD_MAX.
    255  */
    256 int
    257 ultrix_sys_select(p, v, retval)
    258 	struct proc *p;
    259 	void *v;
    260 	register_t *retval;
    261 {
    262 	struct sys_select_args *uap = v;
    263 	struct timeval atv;
    264 	int error;
    265 
    266 	/* Limit number of FDs selected on to the native maximum */
    267 
    268 	if (SCARG(uap, nd) > FD_SETSIZE)
    269 		SCARG(uap, nd) = FD_SETSIZE;
    270 
    271 	/* Check for negative timeval */
    272 	if (SCARG(uap, tv)) {
    273 		error = copyin((caddr_t)SCARG(uap, tv), (caddr_t)&atv,
    274 			       sizeof(atv));
    275 		if (error)
    276 			goto done;
    277 #ifdef DEBUG
    278 		/* Ultrix clients sometimes give negative timeouts? */
    279 		if (atv.tv_sec < 0 || atv.tv_usec < 0)
    280 			printf("ultrix select( %ld, %ld): negative timeout\n",
    281 			    atv.tv_sec, atv.tv_usec);
    282 		/*tvp = (timeval *)STACKGAPBASE;*/
    283 #endif
    284 
    285 	}
    286 	error = sys_select(p, (void*) uap, retval);
    287 	if (error == EINVAL)
    288 		printf("ultrix select: bad args?\n");
    289 
    290 done:
    291 	return error;
    292 }
    293 
    294 #if defined(NFS)
    295 int
    296 async_daemon(p, v, retval)
    297 	struct proc *p;
    298 	void *v;
    299 	register_t *retval;
    300 {
    301 	struct sys_nfssvc_args ouap;
    302 
    303 	SCARG(&ouap, flag) = NFSSVC_BIOD;
    304 	SCARG(&ouap, argp) = NULL;
    305 
    306 	return (sys_nfssvc(p, &ouap, retval));
    307 }
    308 #endif /* NFS */
    309 
    310 
    311 #define	SUN__MAP_NEW	0x80000000	/* if not, old mmap & cannot handle */
    312 
    313 int
    314 ultrix_sys_mmap(p, v, retval)
    315 	register struct proc *p;
    316 	void *v;
    317 	register_t *retval;
    318 {
    319 	register struct ultrix_sys_mmap_args *uap = v;
    320 	struct sys_mmap_args ouap;
    321 	register struct filedesc *fdp;
    322 	register struct file *fp;
    323 	register struct vnode *vp;
    324 
    325 	/*
    326 	 * Verify the arguments.
    327 	 */
    328 	if (SCARG(uap, prot) & ~(PROT_READ|PROT_WRITE|PROT_EXEC))
    329 		return (EINVAL);			/* XXX still needed? */
    330 
    331 	if ((SCARG(uap, flags) & SUN__MAP_NEW) == 0)
    332 		return (EINVAL);
    333 
    334 	SCARG(&ouap, flags) = SCARG(uap, flags) & ~SUN__MAP_NEW;
    335 	SCARG(&ouap, addr) = SCARG(uap, addr);
    336 
    337 	if ((SCARG(&ouap, flags) & MAP_FIXED) == 0 &&
    338 	    SCARG(&ouap, addr) != 0 &&
    339 	    SCARG(&ouap, addr) < (void *)round_page(p->p_vmspace->vm_daddr+MAXDSIZ))
    340 		SCARG(&ouap, addr) = (void *)round_page(p->p_vmspace->vm_daddr+MAXDSIZ);
    341 
    342 	SCARG(&ouap, len) = SCARG(uap, len);
    343 	SCARG(&ouap, prot) = SCARG(uap, prot);
    344 	SCARG(&ouap, fd) = SCARG(uap, fd);
    345 	SCARG(&ouap, pos) = SCARG(uap, pos);
    346 
    347 	/*
    348 	 * Special case: if fd refers to /dev/zero, map as MAP_ANON.  (XXX)
    349 	 */
    350 	fdp = p->p_fd;
    351 	if ((unsigned)SCARG(&ouap, fd) < fdp->fd_nfiles &&		/*XXX*/
    352 	    (fp = fdp->fd_ofiles[SCARG(&ouap, fd)]) != NULL &&		/*XXX*/
    353 	    fp->f_type == DTYPE_VNODE &&				/*XXX*/
    354 	    (vp = (struct vnode *)fp->f_data)->v_type == VCHR &&	/*XXX*/
    355 	    iszerodev(vp->v_rdev)) {					/*XXX*/
    356 		SCARG(&ouap, flags) |= MAP_ANON;
    357 		SCARG(&ouap, fd) = -1;
    358 	}
    359 
    360 	return (sys_mmap(p, &ouap, retval));
    361 }
    362 
    363 int
    364 ultrix_sys_setsockopt(p, v, retval)
    365 	struct proc *p;
    366 	void *v;
    367 	register_t *retval;
    368 {
    369 	register struct ultrix_sys_setsockopt_args *uap = v;
    370 	struct file *fp;
    371 	struct mbuf *m = NULL;
    372 	int error;
    373 
    374 	if ((error = getsock(p->p_fd, SCARG(uap, s), &fp))  != 0)
    375 		return (error);
    376 #define	SO_DONTLINGER (~SO_LINGER)
    377 	if (SCARG(uap, name) == SO_DONTLINGER) {
    378 		m = m_get(M_WAIT, MT_SOOPTS);
    379 		mtod(m, struct linger *)->l_onoff = 0;
    380 		m->m_len = sizeof(struct linger);
    381 		return (sosetopt((struct socket *)fp->f_data, SCARG(uap, level),
    382 		    SO_LINGER, m));
    383 	}
    384 	if (SCARG(uap, level) == IPPROTO_IP) {
    385 #define		EMUL_IP_MULTICAST_IF		2
    386 #define		EMUL_IP_MULTICAST_TTL		3
    387 #define		EMUL_IP_MULTICAST_LOOP		4
    388 #define		EMUL_IP_ADD_MEMBERSHIP		5
    389 #define		EMUL_IP_DROP_MEMBERSHIP	6
    390 		static int ipoptxlat[] = {
    391 			IP_MULTICAST_IF,
    392 			IP_MULTICAST_TTL,
    393 			IP_MULTICAST_LOOP,
    394 			IP_ADD_MEMBERSHIP,
    395 			IP_DROP_MEMBERSHIP
    396 		};
    397 		if (SCARG(uap, name) >= EMUL_IP_MULTICAST_IF &&
    398 		    SCARG(uap, name) <= EMUL_IP_DROP_MEMBERSHIP) {
    399 			SCARG(uap, name) =
    400 			    ipoptxlat[SCARG(uap, name) - EMUL_IP_MULTICAST_IF];
    401 		}
    402 	}
    403 	if (SCARG(uap, valsize) > MLEN)
    404 		return (EINVAL);
    405 	if (SCARG(uap, val)) {
    406 		m = m_get(M_WAIT, MT_SOOPTS);
    407 		error = copyin(SCARG(uap, val), mtod(m, caddr_t),
    408 		    (u_int)SCARG(uap, valsize));
    409 		if (error) {
    410 			(void) m_free(m);
    411 			return (error);
    412 		}
    413 		m->m_len = SCARG(uap, valsize);
    414 	}
    415 	return (sosetopt((struct socket *)fp->f_data, SCARG(uap, level),
    416 	    SCARG(uap, name), m));
    417 }
    418 
    419 struct ultrix_utsname {
    420 	char    sysname[9];
    421 	char    nodename[9];
    422 	char    nodeext[65-9];
    423 	char    release[9];
    424 	char    version[9];
    425 	char    machine[9];
    426 };
    427 
    428 int
    429 ultrix_sys_uname(p, v, retval)
    430 	struct proc *p;
    431 	void *v;
    432 	register_t *retval;
    433 {
    434 	struct ultrix_sys_uname_args *uap = v;
    435 	struct ultrix_utsname sut;
    436 	extern char ostype[], machine[], osrelease[];
    437 
    438 	bzero(&sut, sizeof(sut));
    439 
    440 	bcopy(ostype, sut.sysname, sizeof(sut.sysname) - 1);
    441 	bcopy(hostname, sut.nodename, sizeof(sut.nodename));
    442 	sut.nodename[sizeof(sut.nodename)-1] = '\0';
    443 	bcopy(osrelease, sut.release, sizeof(sut.release) - 1);
    444 	bcopy("1", sut.version, sizeof(sut.version) - 1);
    445 	bcopy(machine, sut.machine, sizeof(sut.machine) - 1);
    446 
    447 	return copyout((caddr_t)&sut, (caddr_t)SCARG(uap, name),
    448 	    sizeof(struct ultrix_utsname));
    449 }
    450 
    451 int
    452 ultrix_sys_setpgrp(p, v, retval)
    453 	struct proc *p;
    454 	void *v;
    455 	register_t *retval;
    456 {
    457 	struct ultrix_sys_setpgrp_args *uap = v;
    458 
    459 	/*
    460 	 * difference to our setpgid call is to include backwards
    461 	 * compatibility to pre-setsid() binaries. Do setsid()
    462 	 * instead of setpgid() in those cases where the process
    463 	 * tries to create a new session the old way.
    464 	 */
    465 	if (!SCARG(uap, pgid) &&
    466 	    (!SCARG(uap, pid) || SCARG(uap, pid) == p->p_pid))
    467 		return sys_setsid(p, uap, retval);
    468 	else
    469 		return sys_setpgid(p, uap, retval);
    470 }
    471 
    472 #if defined (NFSSERVER)
    473 int
    474 ultrix_sys_nfssvc(p, v, retval)
    475 	struct proc *p;
    476 	void *v;
    477 	register_t *retval;
    478 {
    479 
    480 #if 0	/* XXX */
    481 	struct ultrix_sys_nfssvc_args *uap = v;
    482 	struct emul *e = p->p_emul;
    483 	struct sys_nfssvc_args outuap;
    484 	struct sockaddr sa;
    485 	int error;
    486 
    487 	bzero(&outuap, sizeof outuap);
    488 	SCARG(&outuap, fd) = SCARG(uap, fd);
    489 	SCARG(&outuap, mskval) = STACKGAPBASE;
    490 	SCARG(&outuap, msklen) = sizeof sa;
    491 	SCARG(&outuap, mtchval) = outuap.mskval + sizeof sa;
    492 	SCARG(&outuap, mtchlen) = sizeof sa;
    493 
    494 	bzero(&sa, sizeof sa);
    495 	if (error = copyout(&sa, SCARG(&outuap, mskval), SCARG(&outuap, msklen)))
    496 		return (error);
    497 	if (error = copyout(&sa, SCARG(&outuap, mtchval), SCARG(&outuap, mtchlen)))
    498 		return (error);
    499 
    500 	return nfssvc(p, &outuap, retval);
    501 #else
    502 	return (ENOSYS);
    503 #endif
    504 }
    505 #endif /* NFSSERVER */
    506 
    507 struct ultrix_ustat {
    508 	daddr_t	f_tfree;	/* total free */
    509 	ino_t	f_tinode;	/* total inodes free */
    510 	char	f_fname[6];	/* filsys name */
    511 	char	f_fpack[6];	/* filsys pack name */
    512 };
    513 
    514 int
    515 ultrix_sys_ustat(p, v, retval)
    516 	struct proc *p;
    517 	void *v;
    518 	register_t *retval;
    519 {
    520 	struct ultrix_sys_ustat_args *uap = v;
    521 	struct ultrix_ustat us;
    522 	int error;
    523 
    524 	bzero(&us, sizeof us);
    525 
    526 	/*
    527 	 * XXX: should set f_tfree and f_tinode at least
    528 	 * How do we translate dev -> fstat? (and then to ultrix_ustat)
    529 	 */
    530 
    531 	if ((error = copyout(&us, SCARG(uap, buf), sizeof us)) != 0)
    532 		return (error);
    533 	return 0;
    534 }
    535 
    536 int
    537 ultrix_sys_quotactl(p, v, retval)
    538 	struct proc *p;
    539 	void *v;
    540 	register_t *retval;
    541 {
    542 
    543 #ifdef notyet
    544 	struct ultrix_sys_quotactl_args *uap = v;
    545 #endif
    546 
    547 	return EINVAL;
    548 }
    549 
    550 int
    551 ultrix_sys_vhangup(p, v, retval)
    552 	struct proc *p;
    553 	void *v;
    554 	register_t *retval;
    555 {
    556 
    557 	return 0;
    558 }
    559 
    560 
    561 /*
    562  * RISC Ultrix cache control syscalls
    563  */
    564 #ifdef __mips
    565 int
    566 ultrix_sys_cacheflush(p, v, retval)
    567 	register struct proc *p;
    568 	void *v;
    569 	register_t *retval;
    570 {
    571 	register struct ultrix_sys_cacheflush_args /* {
    572 		syscallarg(void *) addr;
    573 		syscallarg(int) nbytes;
    574 		syscallarg(int) flag;
    575 	} */ *uap = v;
    576 	register vm_offset_t va  = (vm_offset_t)SCARG(uap, addr);
    577 	register int nbytes     = SCARG(uap, nbytes);
    578 	register int whichcache = SCARG(uap, whichcache);
    579 
    580 	return (mips_user_cacheflush(p, va, nbytes, whichcache));
    581 }
    582 
    583 
    584 int
    585 ultrix_sys_cachectl(p, v, retval)
    586 	register struct proc *p;
    587 	void *v;
    588 	register_t *retval;
    589 {
    590 	register struct ultrix_sys_cachectl_args /* {
    591 		syscallarg(void *) addr;
    592 		syscallarg(int) nbytes;
    593 		syscallarg(int) cacheop;
    594 	} */ *uap = v;
    595 	register vm_offset_t va  = (vm_offset_t)SCARG(uap, addr);
    596 	register int nbytes  = SCARG(uap, nbytes);
    597 	register int cacheop = SCARG(uap, cacheop);
    598 
    599 	return mips_user_cachectl(p, va, nbytes, cacheop);
    600 }
    601 
    602 #endif	/* __mips */
    603 
    604 
    605 int
    606 ultrix_sys_exportfs(p, v, retval)
    607 	struct proc *p;
    608 	void *v;
    609 	register_t *retval;
    610 {
    611 #ifdef notyet
    612 	struct ultrix_sys_exportfs_args *uap = v;
    613 #endif
    614 
    615 	/*
    616 	 * XXX: should perhaps translate into a mount(2)
    617 	 * with MOUNT_EXPORT?
    618 	 */
    619 	return 0;
    620 }
    621 
    622 int
    623 ultrix_sys_sigpending(p, v, retval)
    624 	struct proc *p;
    625 	void *v;
    626 	register_t *retval;
    627 {
    628 	struct ultrix_sys_sigpending_args *uap = v;
    629 	int mask = p->p_siglist & p->p_sigmask;
    630 
    631 	return (copyout((caddr_t)&mask, (caddr_t)SCARG(uap, mask), sizeof(int)));
    632 }
    633 
    634 int
    635 ultrix_sys_sigcleanup(p, v, retval)
    636 	struct proc *p;
    637 	void *v;
    638 	register_t *retval;
    639 {
    640 	struct ultrix_sys_sigcleanup_args *uap = v;
    641 
    642 	return sys_sigreturn(p, (struct sys_sigreturn_args *)uap, retval);
    643 }
    644 
    645 
    646 int
    647 ultrix_sys_shmsys(p, v, retval)
    648 	struct proc *p;
    649 	void *v;
    650 	register_t *retval;
    651 {
    652 
    653 #ifdef SYSVSHM
    654 
    655 	/* Ultrix SVSHM weirndess: */
    656 	struct ultrix_sys_shmsys_args *uap = v;
    657 	struct sys_shmat_args shmat_args;
    658 	struct sys_shmctl_args shmctl_args;
    659 	struct sys_shmdt_args shmdt_args;
    660 	struct sys_shmget_args shmget_args;
    661 
    662 
    663 	switch (SCARG(uap, shmop)) {
    664 	case 0:						/* Ultrix shmat() */
    665 		SCARG(&shmat_args, shmid) = SCARG(uap, a2);
    666 		SCARG(&shmat_args, shmaddr) = (void *)SCARG(uap, a3);
    667 		SCARG(&shmat_args, shmflg) = SCARG(uap, a4);
    668 		return (sys_shmat(p, &shmat_args, retval));
    669 
    670 	case 1:						/* Ultrix shmctl() */
    671 		SCARG(&shmctl_args, shmid) = SCARG(uap, a2);
    672 		SCARG(&shmctl_args, cmd) = SCARG(uap, a3);
    673 		SCARG(&shmctl_args, buf) = (struct shmid_ds *)SCARG(uap, a4);
    674 		return (sys_shmctl(p, &shmctl_args, retval));
    675 
    676 	case 2:						/* Ultrix shmdt() */
    677 		SCARG(&shmat_args, shmaddr) = (void *)SCARG(uap, a2);
    678 		return (sys_shmdt(p, &shmdt_args, retval));
    679 
    680 	case 3:						/* Ultrix shmget() */
    681 		SCARG(&shmget_args, key) = SCARG(uap, a2);
    682 		SCARG(&shmget_args, size) = SCARG(uap, a3);
    683 		SCARG(&shmget_args, shmflg) = SCARG(uap, a4)
    684 		    & (IPC_CREAT|IPC_EXCL|IPC_NOWAIT);
    685 		return (sys_shmget(p, &shmget_args, retval));
    686 
    687 	default:
    688 		return (EINVAL);
    689 	}
    690 #else
    691 	return (EOPNOTSUPP);
    692 #endif	/* SYSVSHM */
    693 }
    694