Home | History | Annotate | Line # | Download | only in common
kern_ipc_10.c revision 1.16
      1  1.16   thorpej /*	$NetBSD: kern_ipc_10.c,v 1.16 2003/01/18 07:28:34 thorpej 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.13     lukem 
     33  1.13     lukem #include <sys/cdefs.h>
     34  1.16   thorpej __KERNEL_RCSID(0, "$NetBSD: kern_ipc_10.c,v 1.16 2003/01/18 07:28:34 thorpej 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.16   thorpej #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.15       scw #if defined(SYSVSEM) && !defined(_LP64)
     52   1.1  christos int
     53  1.16   thorpej compat_10_sys_semsys(l, v, retval)
     54  1.16   thorpej 	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.16   thorpej 	struct proc *p = l->l_proc;
     85  1.14  christos 	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.14  christos 		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.16   thorpej 		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.16   thorpej 		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.16   thorpej 		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.16   thorpej 		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.15       scw #if defined(SYSVSHM) && !defined(_LP64)
    122   1.1  christos int
    123  1.16   thorpej compat_10_sys_shmsys(l, v, retval)
    124  1.16   thorpej 	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.16   thorpej 		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.16   thorpej 		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.16   thorpej 		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.16   thorpej 		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.15       scw #if defined(SYSVMSG) && !defined(_LP64)
    186   1.1  christos int
    187  1.16   thorpej compat_10_sys_msgsys(l, v, retval)
    188  1.16   thorpej 	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.16   thorpej 		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.16   thorpej 		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.16   thorpej 		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.16   thorpej 		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