kern_ipc_10.c revision 1.18.22.1 1 1.18.22.1 ad /* $NetBSD: kern_ipc_10.c,v 1.18.22.1 2007/01/30 13:51:30 ad 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.18.22.1 ad __KERNEL_RCSID(0, "$NetBSD: kern_ipc_10.c,v 1.18.22.1 2007/01/30 13:51:30 ad 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
44 1.1 christos #include <sys/mount.h>
45 1.1 christos #include <sys/syscallargs.h>
46 1.1 christos
47 1.6 scottb #include <compat/common/compat_util.h>
48 1.18 christos #include <compat/sys/shm.h>
49 1.1 christos
50 1.15 scw #if defined(SYSVSEM) && !defined(_LP64)
51 1.1 christos int
52 1.16 thorpej compat_10_sys_semsys(l, v, retval)
53 1.16 thorpej struct lwp *l;
54 1.3 thorpej void *v;
55 1.3 thorpej register_t *retval;
56 1.3 thorpej {
57 1.4 mycroft struct compat_10_sys_semsys_args /* {
58 1.1 christos syscallarg(int) which;
59 1.1 christos syscallarg(int) a2;
60 1.1 christos syscallarg(int) a3;
61 1.1 christos syscallarg(int) a4;
62 1.1 christos syscallarg(int) a5;
63 1.3 thorpej } */ *uap = v;
64 1.9 thorpej struct compat_14_sys___semctl_args /* {
65 1.1 christos syscallarg(int) semid;
66 1.1 christos syscallarg(int) semnum;
67 1.1 christos syscallarg(int) cmd;
68 1.9 thorpej syscallarg(union __semun *) arg;
69 1.1 christos } */ __semctl_args;
70 1.4 mycroft struct sys_semget_args /* {
71 1.1 christos syscallarg(key_t) key;
72 1.1 christos syscallarg(int) nsems;
73 1.1 christos syscallarg(int) semflg;
74 1.1 christos } */ semget_args;
75 1.4 mycroft struct sys_semop_args /* {
76 1.1 christos syscallarg(int) semid;
77 1.1 christos syscallarg(struct sembuf *) sops;
78 1.1 christos syscallarg(u_int) nsops;
79 1.1 christos } */ semop_args;
80 1.4 mycroft struct sys_semconfig_args /* {
81 1.1 christos syscallarg(int) flag;
82 1.1 christos } */ semconfig_args;
83 1.16 thorpej struct proc *p = l->l_proc;
84 1.14 christos caddr_t sg = stackgap_init(p, 0);
85 1.1 christos
86 1.1 christos switch (SCARG(uap, which)) {
87 1.1 christos case 0: /* __semctl() */
88 1.1 christos SCARG(&__semctl_args, semid) = SCARG(uap, a2);
89 1.1 christos SCARG(&__semctl_args, semnum) = SCARG(uap, a3);
90 1.1 christos SCARG(&__semctl_args, cmd) = SCARG(uap, a4);
91 1.14 christos SCARG(&__semctl_args, arg) = stackgap_alloc(p, &sg,
92 1.6 scottb sizeof(union semun *));
93 1.6 scottb copyout(&SCARG(uap, a5), SCARG(&__semctl_args, arg),
94 1.9 thorpej sizeof(union __semun));
95 1.16 thorpej return (compat_14_sys___semctl(l, &__semctl_args, retval));
96 1.1 christos
97 1.1 christos case 1: /* semget() */
98 1.1 christos SCARG(&semget_args, key) = SCARG(uap, a2);
99 1.1 christos SCARG(&semget_args, nsems) = SCARG(uap, a3);
100 1.1 christos SCARG(&semget_args, semflg) = SCARG(uap, a4);
101 1.16 thorpej return (sys_semget(l, &semget_args, retval));
102 1.1 christos
103 1.1 christos case 2: /* semop() */
104 1.1 christos SCARG(&semop_args, semid) = SCARG(uap, a2);
105 1.12 mrg SCARG(&semop_args, sops) =
106 1.12 mrg (struct sembuf *)(u_long)SCARG(uap, a3);
107 1.1 christos SCARG(&semop_args, nsops) = SCARG(uap, a4);
108 1.16 thorpej return (sys_semop(l, &semop_args, retval));
109 1.1 christos
110 1.1 christos case 3: /* semconfig() */
111 1.1 christos SCARG(&semconfig_args, flag) = SCARG(uap, a2);
112 1.16 thorpej return (sys_semconfig(l, &semconfig_args, retval));
113 1.1 christos
114 1.1 christos default:
115 1.1 christos return (EINVAL);
116 1.1 christos }
117 1.1 christos }
118 1.2 mycroft #endif
119 1.1 christos
120 1.15 scw #if defined(SYSVSHM) && !defined(_LP64)
121 1.1 christos int
122 1.16 thorpej compat_10_sys_shmsys(l, v, retval)
123 1.16 thorpej struct lwp *l;
124 1.3 thorpej void *v;
125 1.3 thorpej register_t *retval;
126 1.3 thorpej {
127 1.4 mycroft struct compat_10_sys_shmsys_args /* {
128 1.1 christos syscallarg(int) which;
129 1.1 christos syscallarg(int) a2;
130 1.1 christos syscallarg(int) a3;
131 1.1 christos syscallarg(int) a4;
132 1.3 thorpej } */ *uap = v;
133 1.4 mycroft struct sys_shmat_args /* {
134 1.1 christos syscallarg(int) shmid;
135 1.1 christos syscallarg(void *) shmaddr;
136 1.1 christos syscallarg(int) shmflg;
137 1.1 christos } */ shmat_args;
138 1.9 thorpej struct compat_14_sys_shmctl_args /* {
139 1.1 christos syscallarg(int) shmid;
140 1.1 christos syscallarg(int) cmd;
141 1.9 thorpej syscallarg(struct shmid14_ds *) buf;
142 1.1 christos } */ shmctl_args;
143 1.4 mycroft struct sys_shmdt_args /* {
144 1.1 christos syscallarg(void *) shmaddr;
145 1.1 christos } */ shmdt_args;
146 1.4 mycroft struct sys_shmget_args /* {
147 1.1 christos syscallarg(key_t) key;
148 1.1 christos syscallarg(int) size;
149 1.1 christos syscallarg(int) shmflg;
150 1.1 christos } */ shmget_args;
151 1.1 christos
152 1.1 christos switch (SCARG(uap, which)) {
153 1.1 christos case 0: /* shmat() */
154 1.1 christos SCARG(&shmat_args, shmid) = SCARG(uap, a2);
155 1.12 mrg SCARG(&shmat_args, shmaddr) =
156 1.12 mrg (void *)(u_long)SCARG(uap, a3);
157 1.1 christos SCARG(&shmat_args, shmflg) = SCARG(uap, a4);
158 1.16 thorpej return (sys_shmat(l, &shmat_args, retval));
159 1.1 christos
160 1.1 christos case 1: /* shmctl() */
161 1.1 christos SCARG(&shmctl_args, shmid) = SCARG(uap, a2);
162 1.1 christos SCARG(&shmctl_args, cmd) = SCARG(uap, a3);
163 1.12 mrg SCARG(&shmctl_args, buf) =
164 1.12 mrg (struct shmid_ds14 *)(u_long)SCARG(uap, a4);
165 1.16 thorpej return (compat_14_sys_shmctl(l, &shmctl_args, retval));
166 1.1 christos
167 1.1 christos case 2: /* shmdt() */
168 1.12 mrg SCARG(&shmdt_args, shmaddr) =
169 1.12 mrg (void *)(u_long)SCARG(uap, a2);
170 1.16 thorpej return (sys_shmdt(l, &shmdt_args, retval));
171 1.1 christos
172 1.1 christos case 3: /* shmget() */
173 1.1 christos SCARG(&shmget_args, key) = SCARG(uap, a2);
174 1.1 christos SCARG(&shmget_args, size) = SCARG(uap, a3);
175 1.1 christos SCARG(&shmget_args, shmflg) = SCARG(uap, a4);
176 1.16 thorpej return (sys_shmget(l, &shmget_args, retval));
177 1.1 christos
178 1.1 christos default:
179 1.1 christos return (EINVAL);
180 1.1 christos }
181 1.1 christos }
182 1.2 mycroft #endif
183 1.1 christos
184 1.15 scw #if defined(SYSVMSG) && !defined(_LP64)
185 1.1 christos int
186 1.16 thorpej compat_10_sys_msgsys(l, v, retval)
187 1.16 thorpej struct lwp *l;
188 1.3 thorpej void *v;
189 1.3 thorpej register_t *retval;
190 1.3 thorpej {
191 1.4 mycroft struct compat_10_sys_msgsys_args /* {
192 1.1 christos syscallarg(int) which;
193 1.1 christos syscallarg(int) a2;
194 1.1 christos syscallarg(int) a3;
195 1.1 christos syscallarg(int) a4;
196 1.1 christos syscallarg(int) a5;
197 1.1 christos syscallarg(int) a6;
198 1.3 thorpej } */ *uap = v;
199 1.9 thorpej struct compat_14_sys_msgctl_args /* {
200 1.1 christos syscallarg(int) msqid;
201 1.1 christos syscallarg(int) cmd;
202 1.9 thorpej syscallarg(struct msqid14_ds *) buf;
203 1.1 christos } */ msgctl_args;
204 1.4 mycroft struct sys_msgget_args /* {
205 1.1 christos syscallarg(key_t) key;
206 1.1 christos syscallarg(int) msgflg;
207 1.1 christos } */ msgget_args;
208 1.4 mycroft struct sys_msgsnd_args /* {
209 1.1 christos syscallarg(int) msqid;
210 1.1 christos syscallarg(void *) msgp;
211 1.1 christos syscallarg(size_t) msgsz;
212 1.1 christos syscallarg(int) msgflg;
213 1.1 christos } */ msgsnd_args;
214 1.4 mycroft struct sys_msgrcv_args /* {
215 1.1 christos syscallarg(int) msqid;
216 1.1 christos syscallarg(void *) msgp;
217 1.1 christos syscallarg(size_t) msgsz;
218 1.1 christos syscallarg(long) msgtyp;
219 1.1 christos syscallarg(int) msgflg;
220 1.1 christos } */ msgrcv_args;
221 1.1 christos
222 1.1 christos switch (SCARG(uap, which)) {
223 1.1 christos case 0: /* msgctl()*/
224 1.1 christos SCARG(&msgctl_args, msqid) = SCARG(uap, a2);
225 1.1 christos SCARG(&msgctl_args, cmd) = SCARG(uap, a3);
226 1.1 christos SCARG(&msgctl_args, buf) =
227 1.12 mrg (struct msqid_ds14 *)(u_long)SCARG(uap, a4);
228 1.16 thorpej return (compat_14_sys_msgctl(l, &msgctl_args, retval));
229 1.1 christos
230 1.1 christos case 1: /* msgget() */
231 1.1 christos SCARG(&msgget_args, key) = SCARG(uap, a2);
232 1.1 christos SCARG(&msgget_args, msgflg) = SCARG(uap, a3);
233 1.16 thorpej return (sys_msgget(l, &msgget_args, retval));
234 1.1 christos
235 1.1 christos case 2: /* msgsnd() */
236 1.1 christos SCARG(&msgsnd_args, msqid) = SCARG(uap, a2);
237 1.12 mrg SCARG(&msgsnd_args, msgp) =
238 1.12 mrg (void *)(u_long)SCARG(uap, a3);
239 1.1 christos SCARG(&msgsnd_args, msgsz) = SCARG(uap, a4);
240 1.1 christos SCARG(&msgsnd_args, msgflg) = SCARG(uap, a5);
241 1.16 thorpej return (sys_msgsnd(l, &msgsnd_args, retval));
242 1.1 christos
243 1.1 christos case 3: /* msgrcv() */
244 1.1 christos SCARG(&msgrcv_args, msqid) = SCARG(uap, a2);
245 1.12 mrg SCARG(&msgrcv_args, msgp) =
246 1.12 mrg (void *)(u_long)SCARG(uap, a3);
247 1.1 christos SCARG(&msgrcv_args, msgsz) = SCARG(uap, a4);
248 1.1 christos SCARG(&msgrcv_args, msgtyp) = SCARG(uap, a5);
249 1.1 christos SCARG(&msgrcv_args, msgflg) = SCARG(uap, a6);
250 1.16 thorpej return (sys_msgrcv(l, &msgrcv_args, retval));
251 1.1 christos
252 1.1 christos default:
253 1.1 christos return (EINVAL);
254 1.1 christos }
255 1.1 christos }
256 1.2 mycroft #endif
257