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