Home | History | Annotate | Line # | Download | only in common
kern_ipc_10.c revision 1.12.2.5
      1  1.12.2.5   nathanw /*	$NetBSD: kern_ipc_10.c,v 1.12.2.5 2002/07/12 01:39:57 nathanw Exp $	*/
      2       1.1  christos 
      3       1.1  christos /*
      4       1.7   mycroft  * Copyright (c) 1994 Adam Glass and Charles M. Hannum.  All rights reserved.
      5       1.1  christos  *
      6       1.1  christos  * Redistribution and use in source and binary forms, with or without
      7       1.1  christos  * modification, are permitted provided that the following conditions
      8       1.1  christos  * are met:
      9       1.1  christos  * 1. Redistributions of source code must retain the above copyright
     10       1.1  christos  *    notice, this list of conditions and the following disclaimer.
     11       1.1  christos  * 2. Redistributions in binary form must reproduce the above copyright
     12       1.1  christos  *    notice, this list of conditions and the following disclaimer in the
     13       1.1  christos  *    documentation and/or other materials provided with the distribution.
     14       1.1  christos  * 3. All advertising materials mentioning features or use of this software
     15       1.1  christos  *    must display the following acknowledgement:
     16       1.7   mycroft  *	This product includes software developed by Adam Glass and Charles M.
     17       1.1  christos  *	Hannum.
     18       1.1  christos  * 4. The names of the authors may not be used to endorse or promote products
     19       1.1  christos  *    derived from this software without specific prior written permission.
     20       1.1  christos  *
     21       1.1  christos  * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
     22       1.1  christos  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     23       1.1  christos  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     24       1.1  christos  * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT,
     25       1.1  christos  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     26       1.1  christos  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     27       1.1  christos  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     28       1.1  christos  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     29       1.1  christos  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     30       1.1  christos  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     31       1.1  christos  */
     32  1.12.2.2   nathanw 
     33  1.12.2.2   nathanw #include <sys/cdefs.h>
     34  1.12.2.5   nathanw __KERNEL_RCSID(0, "$NetBSD: kern_ipc_10.c,v 1.12.2.5 2002/07/12 01:39:57 nathanw Exp $");
     35       1.8      tron 
     36       1.8      tron #include "opt_sysv.h"
     37       1.1  christos 
     38       1.1  christos #include <sys/param.h>
     39       1.1  christos #include <sys/systm.h>
     40       1.1  christos #include <sys/kernel.h>
     41       1.1  christos #include <sys/proc.h>
     42       1.1  christos #include <sys/sem.h>
     43       1.1  christos #include <sys/malloc.h>
     44       1.1  christos 
     45       1.1  christos #include <sys/mount.h>
     46  1.12.2.4   nathanw #include <sys/sa.h>
     47       1.1  christos #include <sys/syscallargs.h>
     48       1.1  christos 
     49       1.6    scottb #include <compat/common/compat_util.h>
     50       1.1  christos 
     51       1.2   mycroft #ifdef SYSVSEM
     52       1.1  christos int
     53  1.12.2.1   nathanw compat_10_sys_semsys(l, v, retval)
     54  1.12.2.1   nathanw 	struct lwp *l;
     55       1.3   thorpej 	void *v;
     56       1.3   thorpej 	register_t *retval;
     57       1.3   thorpej {
     58       1.4   mycroft 	struct compat_10_sys_semsys_args /* {
     59       1.1  christos 		syscallarg(int) which;
     60       1.1  christos 		syscallarg(int) a2;
     61       1.1  christos 		syscallarg(int) a3;
     62       1.1  christos 		syscallarg(int) a4;
     63       1.1  christos 		syscallarg(int) a5;
     64       1.3   thorpej 	} */ *uap = v;
     65       1.9   thorpej 	struct compat_14_sys___semctl_args /* {
     66       1.1  christos 		syscallarg(int) semid;
     67       1.1  christos 		syscallarg(int) semnum;
     68       1.1  christos 		syscallarg(int) cmd;
     69       1.9   thorpej 		syscallarg(union __semun *) arg;
     70       1.1  christos 	} */ __semctl_args;
     71       1.4   mycroft 	struct sys_semget_args /* {
     72       1.1  christos 		syscallarg(key_t) key;
     73       1.1  christos 		syscallarg(int) nsems;
     74       1.1  christos 		syscallarg(int) semflg;
     75       1.1  christos 	} */ semget_args;
     76       1.4   mycroft 	struct sys_semop_args /* {
     77       1.1  christos 		syscallarg(int) semid;
     78       1.1  christos 		syscallarg(struct sembuf *) sops;
     79       1.1  christos 		syscallarg(u_int) nsops;
     80       1.1  christos 	} */ semop_args;
     81       1.4   mycroft 	struct sys_semconfig_args /* {
     82       1.1  christos 		syscallarg(int) flag;
     83       1.1  christos 	} */ semconfig_args;
     84  1.12.2.1   nathanw 	struct proc *p = l->l_proc;
     85  1.12.2.3   nathanw 	caddr_t sg = stackgap_init(p, 0);
     86       1.1  christos 
     87       1.1  christos 	switch (SCARG(uap, which)) {
     88       1.1  christos 	case 0:						/* __semctl() */
     89       1.1  christos 		SCARG(&__semctl_args, semid) = SCARG(uap, a2);
     90       1.1  christos 		SCARG(&__semctl_args, semnum) = SCARG(uap, a3);
     91       1.1  christos 		SCARG(&__semctl_args, cmd) = SCARG(uap, a4);
     92  1.12.2.3   nathanw 		SCARG(&__semctl_args, arg) = stackgap_alloc(p, &sg,
     93       1.6    scottb 			sizeof(union semun *));
     94       1.6    scottb 		copyout(&SCARG(uap, a5), SCARG(&__semctl_args, arg),
     95       1.9   thorpej 			sizeof(union __semun));
     96  1.12.2.1   nathanw 		return (compat_14_sys___semctl(l, &__semctl_args, retval));
     97       1.1  christos 
     98       1.1  christos 	case 1:						/* semget() */
     99       1.1  christos 		SCARG(&semget_args, key) = SCARG(uap, a2);
    100       1.1  christos 		SCARG(&semget_args, nsems) = SCARG(uap, a3);
    101       1.1  christos 		SCARG(&semget_args, semflg) = SCARG(uap, a4);
    102  1.12.2.1   nathanw 		return (sys_semget(l, &semget_args, retval));
    103       1.1  christos 
    104       1.1  christos 	case 2:						/* semop() */
    105       1.1  christos 		SCARG(&semop_args, semid) = SCARG(uap, a2);
    106      1.12       mrg 		SCARG(&semop_args, sops) =
    107      1.12       mrg 		    (struct sembuf *)(u_long)SCARG(uap, a3);
    108       1.1  christos 		SCARG(&semop_args, nsops) = SCARG(uap, a4);
    109  1.12.2.1   nathanw 		return (sys_semop(l, &semop_args, retval));
    110       1.1  christos 
    111       1.1  christos 	case 3:						/* semconfig() */
    112       1.1  christos 		SCARG(&semconfig_args, flag) = SCARG(uap, a2);
    113  1.12.2.1   nathanw 		return (sys_semconfig(l, &semconfig_args, retval));
    114       1.1  christos 
    115       1.1  christos 	default:
    116       1.1  christos 		return (EINVAL);
    117       1.1  christos 	}
    118       1.1  christos }
    119       1.2   mycroft #endif
    120       1.1  christos 
    121       1.2   mycroft #ifdef SYSVSHM
    122       1.1  christos int
    123  1.12.2.1   nathanw compat_10_sys_shmsys(l, v, retval)
    124  1.12.2.1   nathanw 	struct lwp *l;
    125       1.3   thorpej 	void *v;
    126       1.3   thorpej 	register_t *retval;
    127       1.3   thorpej {
    128       1.4   mycroft 	struct compat_10_sys_shmsys_args /* {
    129       1.1  christos 		syscallarg(int) which;
    130       1.1  christos 		syscallarg(int) a2;
    131       1.1  christos 		syscallarg(int) a3;
    132       1.1  christos 		syscallarg(int) a4;
    133       1.3   thorpej 	} */ *uap = v;
    134       1.4   mycroft 	struct sys_shmat_args /* {
    135       1.1  christos 		syscallarg(int) shmid;
    136       1.1  christos 		syscallarg(void *) shmaddr;
    137       1.1  christos 		syscallarg(int) shmflg;
    138       1.1  christos 	} */ shmat_args;
    139       1.9   thorpej 	struct compat_14_sys_shmctl_args /* {
    140       1.1  christos 		syscallarg(int) shmid;
    141       1.1  christos 		syscallarg(int) cmd;
    142       1.9   thorpej 		syscallarg(struct shmid14_ds *) buf;
    143       1.1  christos 	} */ shmctl_args;
    144       1.4   mycroft 	struct sys_shmdt_args /* {
    145       1.1  christos 		syscallarg(void *) shmaddr;
    146       1.1  christos 	} */ shmdt_args;
    147       1.4   mycroft 	struct sys_shmget_args /* {
    148       1.1  christos 		syscallarg(key_t) key;
    149       1.1  christos 		syscallarg(int) size;
    150       1.1  christos 		syscallarg(int) shmflg;
    151       1.1  christos 	} */ shmget_args;
    152       1.1  christos 
    153       1.1  christos 	switch (SCARG(uap, which)) {
    154       1.1  christos 	case 0:						/* shmat() */
    155       1.1  christos 		SCARG(&shmat_args, shmid) = SCARG(uap, a2);
    156      1.12       mrg 		SCARG(&shmat_args, shmaddr) =
    157      1.12       mrg 		    (void *)(u_long)SCARG(uap, a3);
    158       1.1  christos 		SCARG(&shmat_args, shmflg) = SCARG(uap, a4);
    159  1.12.2.1   nathanw 		return (sys_shmat(l, &shmat_args, retval));
    160       1.1  christos 
    161       1.1  christos 	case 1:						/* shmctl() */
    162       1.1  christos 		SCARG(&shmctl_args, shmid) = SCARG(uap, a2);
    163       1.1  christos 		SCARG(&shmctl_args, cmd) = SCARG(uap, a3);
    164      1.12       mrg 		SCARG(&shmctl_args, buf) =
    165      1.12       mrg 		    (struct shmid_ds14 *)(u_long)SCARG(uap, a4);
    166  1.12.2.1   nathanw 		return (compat_14_sys_shmctl(l, &shmctl_args, retval));
    167       1.1  christos 
    168       1.1  christos 	case 2:						/* shmdt() */
    169      1.12       mrg 		SCARG(&shmdt_args, shmaddr) =
    170      1.12       mrg 		    (void *)(u_long)SCARG(uap, a2);
    171  1.12.2.1   nathanw 		return (sys_shmdt(l, &shmdt_args, retval));
    172       1.1  christos 
    173       1.1  christos 	case 3:						/* shmget() */
    174       1.1  christos 		SCARG(&shmget_args, key) = SCARG(uap, a2);
    175       1.1  christos 		SCARG(&shmget_args, size) = SCARG(uap, a3);
    176       1.1  christos 		SCARG(&shmget_args, shmflg) = SCARG(uap, a4);
    177  1.12.2.1   nathanw 		return (sys_shmget(l, &shmget_args, retval));
    178       1.1  christos 
    179       1.1  christos 	default:
    180       1.1  christos 		return (EINVAL);
    181       1.1  christos 	}
    182       1.1  christos }
    183       1.2   mycroft #endif
    184       1.1  christos 
    185       1.2   mycroft #ifdef SYSVMSG
    186       1.1  christos int
    187  1.12.2.1   nathanw compat_10_sys_msgsys(l, v, retval)
    188  1.12.2.1   nathanw 	struct lwp *l;
    189       1.3   thorpej 	void *v;
    190       1.3   thorpej 	register_t *retval;
    191       1.3   thorpej {
    192       1.4   mycroft 	struct compat_10_sys_msgsys_args /* {
    193       1.1  christos 		syscallarg(int) which;
    194       1.1  christos 		syscallarg(int) a2;
    195       1.1  christos 		syscallarg(int) a3;
    196       1.1  christos 		syscallarg(int) a4;
    197       1.1  christos 		syscallarg(int) a5;
    198       1.1  christos 		syscallarg(int) a6;
    199       1.3   thorpej 	} */ *uap = v;
    200       1.9   thorpej 	struct compat_14_sys_msgctl_args /* {
    201       1.1  christos 		syscallarg(int) msqid;
    202       1.1  christos 		syscallarg(int) cmd;
    203       1.9   thorpej 		syscallarg(struct msqid14_ds *) buf;
    204       1.1  christos 	} */ msgctl_args;
    205       1.4   mycroft 	struct sys_msgget_args /* {
    206       1.1  christos 		syscallarg(key_t) key;
    207       1.1  christos 		syscallarg(int) msgflg;
    208       1.1  christos 	} */ msgget_args;
    209       1.4   mycroft 	struct sys_msgsnd_args /* {
    210       1.1  christos 		syscallarg(int) msqid;
    211       1.1  christos 		syscallarg(void *) msgp;
    212       1.1  christos 		syscallarg(size_t) msgsz;
    213       1.1  christos 		syscallarg(int) msgflg;
    214       1.1  christos 	} */ msgsnd_args;
    215       1.4   mycroft 	struct sys_msgrcv_args /* {
    216       1.1  christos 		syscallarg(int) msqid;
    217       1.1  christos 		syscallarg(void *) msgp;
    218       1.1  christos 		syscallarg(size_t) msgsz;
    219       1.1  christos 		syscallarg(long) msgtyp;
    220       1.1  christos 		syscallarg(int) msgflg;
    221       1.1  christos 	} */ msgrcv_args;
    222       1.1  christos 
    223       1.1  christos 	switch (SCARG(uap, which)) {
    224       1.1  christos 	case 0:					/* msgctl()*/
    225       1.1  christos 		SCARG(&msgctl_args, msqid) = SCARG(uap, a2);
    226       1.1  christos 		SCARG(&msgctl_args, cmd) = SCARG(uap, a3);
    227       1.1  christos 		SCARG(&msgctl_args, buf) =
    228      1.12       mrg 		    (struct msqid_ds14 *)(u_long)SCARG(uap, a4);
    229  1.12.2.1   nathanw 		return (compat_14_sys_msgctl(l, &msgctl_args, retval));
    230       1.1  christos 
    231       1.1  christos 	case 1:					/* msgget() */
    232       1.1  christos 		SCARG(&msgget_args, key) = SCARG(uap, a2);
    233       1.1  christos 		SCARG(&msgget_args, msgflg) = SCARG(uap, a3);
    234  1.12.2.1   nathanw 		return (sys_msgget(l, &msgget_args, retval));
    235       1.1  christos 
    236       1.1  christos 	case 2:					/* msgsnd() */
    237       1.1  christos 		SCARG(&msgsnd_args, msqid) = SCARG(uap, a2);
    238      1.12       mrg 		SCARG(&msgsnd_args, msgp) =
    239      1.12       mrg 		    (void *)(u_long)SCARG(uap, a3);
    240       1.1  christos 		SCARG(&msgsnd_args, msgsz) = SCARG(uap, a4);
    241       1.1  christos 		SCARG(&msgsnd_args, msgflg) = SCARG(uap, a5);
    242  1.12.2.1   nathanw 		return (sys_msgsnd(l, &msgsnd_args, retval));
    243       1.1  christos 
    244       1.1  christos 	case 3:					/* msgrcv() */
    245       1.1  christos 		SCARG(&msgrcv_args, msqid) = SCARG(uap, a2);
    246      1.12       mrg 		SCARG(&msgrcv_args, msgp) =
    247      1.12       mrg 		    (void *)(u_long)SCARG(uap, a3);
    248       1.1  christos 		SCARG(&msgrcv_args, msgsz) = SCARG(uap, a4);
    249       1.1  christos 		SCARG(&msgrcv_args, msgtyp) = SCARG(uap, a5);
    250       1.1  christos 		SCARG(&msgrcv_args, msgflg) = SCARG(uap, a6);
    251  1.12.2.1   nathanw 		return (sys_msgrcv(l, &msgrcv_args, retval));
    252       1.1  christos 
    253       1.1  christos 	default:
    254       1.1  christos 		return (EINVAL);
    255       1.1  christos 	}
    256       1.1  christos }
    257       1.2   mycroft #endif
    258