Home | History | Annotate | Line # | Download | only in common
kern_ipc_10.c revision 1.2
      1  1.2   mycroft /*	$NetBSD: kern_ipc_10.c,v 1.2 1995/08/10 04:08:57 mycroft Exp $	*/
      2  1.1  christos 
      3  1.1  christos /*
      4  1.1  christos  * Copyright (c) 1994 Adam Glass and Charles 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.1  christos  *	This product includes software developed by Adam Glass and Charles
     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.1  christos 
     33  1.1  christos #include <sys/param.h>
     34  1.1  christos #include <sys/systm.h>
     35  1.1  christos #include <sys/kernel.h>
     36  1.1  christos #include <sys/proc.h>
     37  1.1  christos #include <sys/sem.h>
     38  1.1  christos #include <sys/malloc.h>
     39  1.1  christos 
     40  1.1  christos #include <sys/mount.h>
     41  1.1  christos #include <sys/syscallargs.h>
     42  1.1  christos 
     43  1.1  christos #include <vm/vm.h>
     44  1.1  christos #include <vm/vm_map.h>
     45  1.1  christos #include <vm/vm_map.h>
     46  1.1  christos #include <vm/vm_kern.h>
     47  1.1  christos 
     48  1.2   mycroft #ifdef SYSVSEM
     49  1.1  christos int
     50  1.1  christos compat_10_semsys(p, uap, retval)
     51  1.1  christos 	struct proc *p;
     52  1.1  christos 	struct compat_10_semsys_args /* {
     53  1.1  christos 		syscallarg(int) which;
     54  1.1  christos 		syscallarg(int) a2;
     55  1.1  christos 		syscallarg(int) a3;
     56  1.1  christos 		syscallarg(int) a4;
     57  1.1  christos 		syscallarg(int) a5;
     58  1.1  christos 	} */ *uap;
     59  1.1  christos 	register_t *retval;
     60  1.1  christos {
     61  1.1  christos 	struct __semctl_args /* {
     62  1.1  christos 		syscallarg(int) semid;
     63  1.1  christos 		syscallarg(int) semnum;
     64  1.1  christos 		syscallarg(int) cmd;
     65  1.1  christos 		syscallarg(union semun *) arg;
     66  1.1  christos 	} */ __semctl_args;
     67  1.1  christos 	struct semget_args /* {
     68  1.1  christos 		syscallarg(key_t) key;
     69  1.1  christos 		syscallarg(int) nsems;
     70  1.1  christos 		syscallarg(int) semflg;
     71  1.1  christos 	} */ semget_args;
     72  1.1  christos 	struct semop_args /* {
     73  1.1  christos 		syscallarg(int) semid;
     74  1.1  christos 		syscallarg(struct sembuf *) sops;
     75  1.1  christos 		syscallarg(u_int) nsops;
     76  1.1  christos 	} */ semop_args;
     77  1.1  christos 	struct semconfig_args /* {
     78  1.1  christos 		syscallarg(int) flag;
     79  1.1  christos 	} */ semconfig_args;
     80  1.1  christos 
     81  1.1  christos 	switch (SCARG(uap, which)) {
     82  1.1  christos 	case 0:						/* __semctl() */
     83  1.1  christos 		SCARG(&__semctl_args, semid) = SCARG(uap, a2);
     84  1.1  christos 		SCARG(&__semctl_args, semnum) = SCARG(uap, a3);
     85  1.1  christos 		SCARG(&__semctl_args, cmd) = SCARG(uap, a4);
     86  1.1  christos 		SCARG(&__semctl_args, arg) = (union semun *)SCARG(uap, a5);
     87  1.1  christos 		return (__semctl(p, &__semctl_args, retval));
     88  1.1  christos 
     89  1.1  christos 	case 1:						/* semget() */
     90  1.1  christos 		SCARG(&semget_args, key) = SCARG(uap, a2);
     91  1.1  christos 		SCARG(&semget_args, nsems) = SCARG(uap, a3);
     92  1.1  christos 		SCARG(&semget_args, semflg) = SCARG(uap, a4);
     93  1.1  christos 		return (semget(p, &semget_args, retval));
     94  1.1  christos 
     95  1.1  christos 	case 2:						/* semop() */
     96  1.1  christos 		SCARG(&semop_args, semid) = SCARG(uap, a2);
     97  1.1  christos 		SCARG(&semop_args, sops) = (struct sembuf *)SCARG(uap, a3);
     98  1.1  christos 		SCARG(&semop_args, nsops) = SCARG(uap, a4);
     99  1.1  christos 		return (semop(p, &semop_args, retval));
    100  1.1  christos 
    101  1.1  christos 	case 3:						/* semconfig() */
    102  1.1  christos 		SCARG(&semconfig_args, flag) = SCARG(uap, a2);
    103  1.1  christos 		return (semconfig(p, &semconfig_args, retval));
    104  1.1  christos 
    105  1.1  christos 	default:
    106  1.1  christos 		return (EINVAL);
    107  1.1  christos 	}
    108  1.1  christos }
    109  1.2   mycroft #endif
    110  1.1  christos 
    111  1.2   mycroft #ifdef SYSVSHM
    112  1.1  christos int
    113  1.1  christos compat_10_shmsys(p, uap, retval)
    114  1.1  christos 	struct proc *p;
    115  1.1  christos 	struct compat_10_shmsys_args /* {
    116  1.1  christos 		syscallarg(int) which;
    117  1.1  christos 		syscallarg(int) a2;
    118  1.1  christos 		syscallarg(int) a3;
    119  1.1  christos 		syscallarg(int) a4;
    120  1.1  christos 	} */ *uap;
    121  1.1  christos 	register_t *retval;
    122  1.1  christos {
    123  1.1  christos 	struct shmat_args /* {
    124  1.1  christos 		syscallarg(int) shmid;
    125  1.1  christos 		syscallarg(void *) shmaddr;
    126  1.1  christos 		syscallarg(int) shmflg;
    127  1.1  christos 	} */ shmat_args;
    128  1.1  christos 	struct shmctl_args /* {
    129  1.1  christos 		syscallarg(int) shmid;
    130  1.1  christos 		syscallarg(int) cmd;
    131  1.1  christos 		syscallarg(struct shmid_ds *) buf;
    132  1.1  christos 	} */ shmctl_args;
    133  1.1  christos 	struct shmdt_args /* {
    134  1.1  christos 		syscallarg(void *) shmaddr;
    135  1.1  christos 	} */ shmdt_args;
    136  1.1  christos 	struct shmget_args /* {
    137  1.1  christos 		syscallarg(key_t) key;
    138  1.1  christos 		syscallarg(int) size;
    139  1.1  christos 		syscallarg(int) shmflg;
    140  1.1  christos 	} */ shmget_args;
    141  1.1  christos 
    142  1.1  christos 	switch (SCARG(uap, which)) {
    143  1.1  christos 	case 0:						/* shmat() */
    144  1.1  christos 		SCARG(&shmat_args, shmid) = SCARG(uap, a2);
    145  1.1  christos 		SCARG(&shmat_args, shmaddr) = (void *)SCARG(uap, a3);
    146  1.1  christos 		SCARG(&shmat_args, shmflg) = SCARG(uap, a4);
    147  1.1  christos 		return (shmat(p, &shmat_args, retval));
    148  1.1  christos 
    149  1.1  christos 	case 1:						/* shmctl() */
    150  1.1  christos 		SCARG(&shmctl_args, shmid) = SCARG(uap, a2);
    151  1.1  christos 		SCARG(&shmctl_args, cmd) = SCARG(uap, a3);
    152  1.1  christos 		SCARG(&shmctl_args, buf) = (struct shmid_ds *)SCARG(uap, a4);
    153  1.1  christos 		return (shmctl(p, &shmctl_args, retval));
    154  1.1  christos 
    155  1.1  christos 	case 2:						/* shmdt() */
    156  1.1  christos 		SCARG(&shmat_args, shmaddr) = (void *)SCARG(uap, a2);
    157  1.1  christos 		return (shmdt(p, &shmdt_args, retval));
    158  1.1  christos 
    159  1.1  christos 	case 3:						/* shmget() */
    160  1.1  christos 		SCARG(&shmget_args, key) = SCARG(uap, a2);
    161  1.1  christos 		SCARG(&shmget_args, size) = SCARG(uap, a3);
    162  1.1  christos 		SCARG(&shmget_args, shmflg) = SCARG(uap, a4);
    163  1.1  christos 		return (shmget(p, &shmget_args, retval));
    164  1.1  christos 
    165  1.1  christos 	default:
    166  1.1  christos 		return (EINVAL);
    167  1.1  christos 	}
    168  1.1  christos }
    169  1.2   mycroft #endif
    170  1.1  christos 
    171  1.2   mycroft #ifdef SYSVMSG
    172  1.1  christos int
    173  1.1  christos compat_10_msgsys(p, uap, retval)
    174  1.1  christos 	struct caller *p;
    175  1.1  christos 	struct compat_10_msgsys_args /* {
    176  1.1  christos 		syscallarg(int) which;
    177  1.1  christos 		syscallarg(int) a2;
    178  1.1  christos 		syscallarg(int) a3;
    179  1.1  christos 		syscallarg(int) a4;
    180  1.1  christos 		syscallarg(int) a5;
    181  1.1  christos 		syscallarg(int) a6;
    182  1.1  christos 	} */ *uap;
    183  1.1  christos 	register_t *retval;
    184  1.1  christos {
    185  1.1  christos 	struct msgctl_args /* {
    186  1.1  christos 		syscallarg(int) msqid;
    187  1.1  christos 		syscallarg(int) cmd;
    188  1.1  christos 		syscallarg(struct msqid_ds *) buf;
    189  1.1  christos 	} */ msgctl_args;
    190  1.1  christos 	struct msgget_args /* {
    191  1.1  christos 		syscallarg(key_t) key;
    192  1.1  christos 		syscallarg(int) msgflg;
    193  1.1  christos 	} */ msgget_args;
    194  1.1  christos 	struct msgsnd_args /* {
    195  1.1  christos 		syscallarg(int) msqid;
    196  1.1  christos 		syscallarg(void *) msgp;
    197  1.1  christos 		syscallarg(size_t) msgsz;
    198  1.1  christos 		syscallarg(int) msgflg;
    199  1.1  christos 	} */ msgsnd_args;
    200  1.1  christos 	struct msgrcv_args /* {
    201  1.1  christos 		syscallarg(int) msqid;
    202  1.1  christos 		syscallarg(void *) msgp;
    203  1.1  christos 		syscallarg(size_t) msgsz;
    204  1.1  christos 		syscallarg(long) msgtyp;
    205  1.1  christos 		syscallarg(int) msgflg;
    206  1.1  christos 	} */ msgrcv_args;
    207  1.1  christos 
    208  1.1  christos 	switch (SCARG(uap, which)) {
    209  1.1  christos 	case 0:					/* msgctl()*/
    210  1.1  christos 		SCARG(&msgctl_args, msqid) = SCARG(uap, a2);
    211  1.1  christos 		SCARG(&msgctl_args, cmd) = SCARG(uap, a3);
    212  1.1  christos 		SCARG(&msgctl_args, buf) =
    213  1.1  christos 		    (struct msqid_ds *)SCARG(uap, a4);
    214  1.1  christos 		return (msgctl(p, &msgctl_args, retval));
    215  1.1  christos 
    216  1.1  christos 	case 1:					/* msgget() */
    217  1.1  christos 		SCARG(&msgget_args, key) = SCARG(uap, a2);
    218  1.1  christos 		SCARG(&msgget_args, msgflg) = SCARG(uap, a3);
    219  1.1  christos 		return (msgget(p, &msgget_args, retval));
    220  1.1  christos 
    221  1.1  christos 	case 2:					/* msgsnd() */
    222  1.1  christos 		SCARG(&msgsnd_args, msqid) = SCARG(uap, a2);
    223  1.1  christos 		SCARG(&msgsnd_args, msgp) = (void *)SCARG(uap, a3);
    224  1.1  christos 		SCARG(&msgsnd_args, msgsz) = SCARG(uap, a4);
    225  1.1  christos 		SCARG(&msgsnd_args, msgflg) = SCARG(uap, a5);
    226  1.1  christos 		return (msgsnd(p, &msgsnd_args, retval));
    227  1.1  christos 
    228  1.1  christos 	case 3:					/* msgrcv() */
    229  1.1  christos 		SCARG(&msgrcv_args, msqid) = SCARG(uap, a2);
    230  1.1  christos 		SCARG(&msgrcv_args, msgp) = (void *)SCARG(uap, a3);
    231  1.1  christos 		SCARG(&msgrcv_args, msgsz) = SCARG(uap, a4);
    232  1.1  christos 		SCARG(&msgrcv_args, msgtyp) = SCARG(uap, a5);
    233  1.1  christos 		SCARG(&msgrcv_args, msgflg) = SCARG(uap, a6);
    234  1.1  christos 		return (msgrcv(p, &msgrcv_args, retval));
    235  1.1  christos 
    236  1.1  christos 	default:
    237  1.1  christos 		return (EINVAL);
    238  1.1  christos 	}
    239  1.1  christos }
    240  1.2   mycroft #endif
    241