linux_ipc.c revision 1.39 1 1.39 christos /* $NetBSD: linux_ipc.c,v 1.39 2007/03/04 06:01:23 christos Exp $ */
2 1.14 erh
3 1.14 erh /*-
4 1.16 fvdl * Copyright (c) 1995, 1998 The NetBSD Foundation, Inc.
5 1.14 erh * All rights reserved.
6 1.14 erh *
7 1.14 erh * This code is derived from software contributed to The NetBSD Foundation
8 1.16 fvdl * by Frank van der Linden and Eric Haszlakiewicz.
9 1.14 erh *
10 1.14 erh * Redistribution and use in source and binary forms, with or without
11 1.14 erh * modification, are permitted provided that the following conditions
12 1.14 erh * are met:
13 1.14 erh * 1. Redistributions of source code must retain the above copyright
14 1.14 erh * notice, this list of conditions and the following disclaimer.
15 1.14 erh * 2. Redistributions in binary form must reproduce the above copyright
16 1.14 erh * notice, this list of conditions and the following disclaimer in the
17 1.14 erh * documentation and/or other materials provided with the distribution.
18 1.14 erh * 3. All advertising materials mentioning features or use of this software
19 1.14 erh * must display the following acknowledgement:
20 1.14 erh * This product includes software developed by the NetBSD
21 1.14 erh * Foundation, Inc. and its contributors.
22 1.14 erh * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.14 erh * contributors may be used to endorse or promote products derived
24 1.14 erh * from this software without specific prior written permission.
25 1.14 erh *
26 1.14 erh * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.14 erh * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.14 erh * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.14 erh * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.14 erh * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.14 erh * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.14 erh * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.14 erh * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.14 erh * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.14 erh * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.14 erh * POSSIBILITY OF SUCH DAMAGE.
37 1.1 fvdl */
38 1.24 lukem
39 1.24 lukem #include <sys/cdefs.h>
40 1.39 christos __KERNEL_RCSID(0, "$NetBSD: linux_ipc.c,v 1.39 2007/03/04 06:01:23 christos Exp $");
41 1.19 erh
42 1.23 mrg #if defined(_KERNEL_OPT)
43 1.19 erh #include "opt_sysv.h"
44 1.22 jdolecek #endif
45 1.1 fvdl
46 1.1 fvdl #include <sys/param.h>
47 1.1 fvdl #include <sys/shm.h>
48 1.6 fvdl #include <sys/sem.h>
49 1.1 fvdl #include <sys/msg.h>
50 1.1 fvdl #include <sys/proc.h>
51 1.1 fvdl #include <sys/systm.h>
52 1.1 fvdl
53 1.1 fvdl #include <sys/mount.h>
54 1.1 fvdl #include <sys/syscallargs.h>
55 1.1 fvdl
56 1.15 christos #include <compat/linux/common/linux_types.h>
57 1.15 christos #include <compat/linux/common/linux_signal.h>
58 1.15 christos #include <compat/linux/common/linux_util.h>
59 1.15 christos #include <compat/linux/common/linux_ipc.h>
60 1.15 christos #include <compat/linux/common/linux_msg.h>
61 1.15 christos #include <compat/linux/common/linux_shm.h>
62 1.15 christos #include <compat/linux/common/linux_sem.h>
63 1.1 fvdl
64 1.33 manu #include <compat/linux/linux_syscallargs.h>
65 1.33 manu #include <compat/linux/linux_syscall.h>
66 1.33 manu
67 1.34 dogcow #include <compat/linux/common/linux_ipccall.h>
68 1.34 dogcow
69 1.1 fvdl /*
70 1.14 erh * Note: Not all linux architechtures have explicit versions
71 1.14 erh * of the SYSV* syscalls. On the ones that don't
72 1.14 erh * we pretend that they are defined anyway. *_args and
73 1.14 erh * prototypes are defined in individual headers;
74 1.14 erh * syscalls.master lists those syscalls as NOARGS.
75 1.1 fvdl *
76 1.14 erh * The functions in multiarch are the ones that just need
77 1.14 erh * the arguments shuffled around and then use the
78 1.14 erh * normal NetBSD syscall.
79 1.14 erh *
80 1.14 erh * Function in multiarch:
81 1.14 erh * linux_sys_ipc : linux_ipccall.c
82 1.14 erh * liunx_semop : linux_ipccall.c
83 1.14 erh * linux_semget : linux_ipccall.c
84 1.14 erh * linux_msgsnd : linux_ipccall.c
85 1.14 erh * linux_msgrcv : linux_ipccall.c
86 1.14 erh * linux_msgget : linux_ipccall.c
87 1.14 erh * linux_shmdt : linux_ipccall.c
88 1.14 erh * linux_shmget : linux_ipccall.c
89 1.1 fvdl */
90 1.1 fvdl
91 1.11 fvdl #if defined (SYSVSEM) || defined(SYSVSHM) || defined(SYSVMSG)
92 1.1 fvdl /*
93 1.1 fvdl * Convert between Linux and NetBSD ipc_perm structures. Only the
94 1.1 fvdl * order of the fields is different.
95 1.1 fvdl */
96 1.14 erh void
97 1.1 fvdl linux_to_bsd_ipc_perm(lpp, bpp)
98 1.1 fvdl struct linux_ipc_perm *lpp;
99 1.1 fvdl struct ipc_perm *bpp;
100 1.1 fvdl {
101 1.8 mycroft
102 1.21 thorpej bpp->_key = lpp->l_key;
103 1.1 fvdl bpp->uid = lpp->l_uid;
104 1.1 fvdl bpp->gid = lpp->l_gid;
105 1.1 fvdl bpp->cuid = lpp->l_cuid;
106 1.1 fvdl bpp->cgid = lpp->l_cgid;
107 1.1 fvdl bpp->mode = lpp->l_mode;
108 1.21 thorpej bpp->_seq = lpp->l_seq;
109 1.1 fvdl }
110 1.1 fvdl
111 1.14 erh void
112 1.32 christos linux_to_bsd_ipc64_perm(lpp, bpp)
113 1.32 christos struct linux_ipc64_perm *lpp;
114 1.32 christos struct ipc_perm *bpp;
115 1.32 christos {
116 1.32 christos bpp->_key = lpp->l_key;
117 1.32 christos bpp->uid = lpp->l_uid;
118 1.32 christos bpp->gid = lpp->l_gid;
119 1.32 christos bpp->cuid = lpp->l_cuid;
120 1.32 christos bpp->cgid = lpp->l_cgid;
121 1.32 christos bpp->mode = lpp->l_mode;
122 1.32 christos bpp->_seq = lpp->l_seq;
123 1.32 christos }
124 1.32 christos
125 1.32 christos void
126 1.1 fvdl bsd_to_linux_ipc_perm(bpp, lpp)
127 1.1 fvdl struct ipc_perm *bpp;
128 1.1 fvdl struct linux_ipc_perm *lpp;
129 1.1 fvdl {
130 1.8 mycroft
131 1.21 thorpej lpp->l_key = bpp->_key;
132 1.1 fvdl lpp->l_uid = bpp->uid;
133 1.1 fvdl lpp->l_gid = bpp->gid;
134 1.1 fvdl lpp->l_cuid = bpp->cuid;
135 1.1 fvdl lpp->l_cgid = bpp->cgid;
136 1.1 fvdl lpp->l_mode = bpp->mode;
137 1.21 thorpej lpp->l_seq = bpp->_seq;
138 1.1 fvdl }
139 1.32 christos
140 1.32 christos void
141 1.32 christos bsd_to_linux_ipc64_perm(bpp, lpp)
142 1.32 christos struct ipc_perm *bpp;
143 1.32 christos struct linux_ipc64_perm *lpp;
144 1.32 christos {
145 1.32 christos lpp->l_key = bpp->_key;
146 1.32 christos lpp->l_uid = bpp->uid;
147 1.32 christos lpp->l_gid = bpp->gid;
148 1.32 christos lpp->l_cuid = bpp->cuid;
149 1.32 christos lpp->l_cgid = bpp->cgid;
150 1.32 christos lpp->l_mode = bpp->mode;
151 1.32 christos lpp->l_seq = bpp->_seq;
152 1.32 christos }
153 1.32 christos
154 1.11 fvdl #endif
155 1.1 fvdl
156 1.1 fvdl #ifdef SYSVSEM
157 1.1 fvdl /*
158 1.6 fvdl * Semaphore operations. Most constants and structures are the same on
159 1.6 fvdl * both systems. Only semctl() needs some extra work.
160 1.1 fvdl */
161 1.6 fvdl
162 1.6 fvdl /*
163 1.6 fvdl * Convert between Linux and NetBSD semid_ds structures.
164 1.6 fvdl */
165 1.14 erh void
166 1.6 fvdl bsd_to_linux_semid_ds(bs, ls)
167 1.6 fvdl struct semid_ds *bs;
168 1.6 fvdl struct linux_semid_ds *ls;
169 1.6 fvdl {
170 1.8 mycroft
171 1.6 fvdl bsd_to_linux_ipc_perm(&bs->sem_perm, &ls->l_sem_perm);
172 1.6 fvdl ls->l_sem_otime = bs->sem_otime;
173 1.6 fvdl ls->l_sem_ctime = bs->sem_ctime;
174 1.6 fvdl ls->l_sem_nsems = bs->sem_nsems;
175 1.21 thorpej ls->l_sem_base = bs->_sem_base;
176 1.6 fvdl }
177 1.6 fvdl
178 1.14 erh void
179 1.6 fvdl linux_to_bsd_semid_ds(ls, bs)
180 1.6 fvdl struct linux_semid_ds *ls;
181 1.6 fvdl struct semid_ds *bs;
182 1.6 fvdl {
183 1.8 mycroft
184 1.6 fvdl linux_to_bsd_ipc_perm(&ls->l_sem_perm, &bs->sem_perm);
185 1.6 fvdl bs->sem_otime = ls->l_sem_otime;
186 1.6 fvdl bs->sem_ctime = ls->l_sem_ctime;
187 1.6 fvdl bs->sem_nsems = ls->l_sem_nsems;
188 1.21 thorpej bs->_sem_base = ls->l_sem_base;
189 1.6 fvdl }
190 1.6 fvdl
191 1.6 fvdl /*
192 1.21 thorpej * Most of this can be handled by directly passing the arguments on; we
193 1.21 thorpej * just need to frob the `cmd' and convert the semid_ds and semun.
194 1.6 fvdl */
195 1.1 fvdl int
196 1.28 thorpej linux_sys_semctl(l, v, retval)
197 1.28 thorpej struct lwp *l;
198 1.14 erh void *v;
199 1.1 fvdl register_t *retval;
200 1.1 fvdl {
201 1.14 erh struct linux_sys_semctl_args /* {
202 1.14 erh syscallarg(int) semid;
203 1.14 erh syscallarg(int) semnum;
204 1.14 erh syscallarg(int) cmd;
205 1.14 erh syscallarg(union linux_semun) arg;
206 1.14 erh } */ *uap = v;
207 1.21 thorpej struct semid_ds sembuf;
208 1.21 thorpej struct linux_semid_ds lsembuf;
209 1.21 thorpej union __semun semun;
210 1.21 thorpej int cmd, error;
211 1.21 thorpej void *pass_arg = NULL;
212 1.21 thorpej
213 1.21 thorpej cmd = SCARG(uap, cmd);
214 1.21 thorpej
215 1.21 thorpej switch (cmd) {
216 1.21 thorpej case LINUX_IPC_SET:
217 1.21 thorpej pass_arg = &sembuf;
218 1.21 thorpej cmd = IPC_SET;
219 1.21 thorpej break;
220 1.6 fvdl
221 1.13 mycroft case LINUX_IPC_STAT:
222 1.21 thorpej pass_arg = &sembuf;
223 1.21 thorpej cmd = IPC_STAT;
224 1.14 erh break;
225 1.21 thorpej
226 1.13 mycroft case LINUX_IPC_RMID:
227 1.21 thorpej cmd = IPC_RMID;
228 1.13 mycroft break;
229 1.21 thorpej
230 1.6 fvdl case LINUX_GETVAL:
231 1.21 thorpej cmd = GETVAL;
232 1.6 fvdl break;
233 1.21 thorpej
234 1.6 fvdl case LINUX_GETPID:
235 1.21 thorpej cmd = GETPID;
236 1.6 fvdl break;
237 1.21 thorpej
238 1.6 fvdl case LINUX_GETNCNT:
239 1.21 thorpej cmd = GETNCNT;
240 1.6 fvdl break;
241 1.21 thorpej
242 1.6 fvdl case LINUX_GETZCNT:
243 1.21 thorpej cmd = GETZCNT;
244 1.6 fvdl break;
245 1.21 thorpej
246 1.21 thorpej case LINUX_GETALL:
247 1.21 thorpej pass_arg = &semun;
248 1.21 thorpej semun.array = SCARG(uap, arg).l_array;
249 1.21 thorpej cmd = GETALL;
250 1.21 thorpej break;
251 1.21 thorpej
252 1.6 fvdl case LINUX_SETVAL:
253 1.21 thorpej pass_arg = &semun;
254 1.21 thorpej semun.val = SCARG(uap, arg).l_val;
255 1.21 thorpej cmd = SETVAL;
256 1.20 tron break;
257 1.21 thorpej
258 1.20 tron case LINUX_SETALL:
259 1.21 thorpej pass_arg = &semun;
260 1.21 thorpej semun.array = SCARG(uap, arg).l_array;
261 1.21 thorpej cmd = SETALL;
262 1.6 fvdl break;
263 1.21 thorpej
264 1.6 fvdl default:
265 1.21 thorpej return (EINVAL);
266 1.21 thorpej }
267 1.21 thorpej
268 1.21 thorpej if (cmd == IPC_SET) {
269 1.21 thorpej error = copyin(SCARG(uap, arg).l_buf, &lsembuf,
270 1.21 thorpej sizeof(lsembuf));
271 1.21 thorpej if (error)
272 1.21 thorpej return (error);
273 1.21 thorpej linux_to_bsd_semid_ds(&lsembuf, &sembuf);
274 1.21 thorpej }
275 1.21 thorpej
276 1.35 ad error = semctl1(l, SCARG(uap, semid), SCARG(uap, semnum), cmd,
277 1.21 thorpej pass_arg, retval);
278 1.21 thorpej
279 1.21 thorpej if (error == 0 && cmd == IPC_STAT) {
280 1.21 thorpej bsd_to_linux_semid_ds(&sembuf, &lsembuf);
281 1.21 thorpej error = copyout(&lsembuf, SCARG(uap, arg).l_buf,
282 1.21 thorpej sizeof(lsembuf));
283 1.6 fvdl }
284 1.21 thorpej
285 1.21 thorpej return (error);
286 1.1 fvdl }
287 1.1 fvdl #endif /* SYSVSEM */
288 1.1 fvdl
289 1.1 fvdl #ifdef SYSVMSG
290 1.6 fvdl
291 1.14 erh void
292 1.6 fvdl linux_to_bsd_msqid_ds(lmp, bmp)
293 1.6 fvdl struct linux_msqid_ds *lmp;
294 1.6 fvdl struct msqid_ds *bmp;
295 1.6 fvdl {
296 1.8 mycroft
297 1.6 fvdl linux_to_bsd_ipc_perm(&lmp->l_msg_perm, &bmp->msg_perm);
298 1.21 thorpej bmp->_msg_first = lmp->l_msg_first;
299 1.21 thorpej bmp->_msg_last = lmp->l_msg_last;
300 1.21 thorpej bmp->_msg_cbytes = lmp->l_msg_cbytes;
301 1.6 fvdl bmp->msg_qnum = lmp->l_msg_qnum;
302 1.6 fvdl bmp->msg_qbytes = lmp->l_msg_qbytes;
303 1.6 fvdl bmp->msg_lspid = lmp->l_msg_lspid;
304 1.6 fvdl bmp->msg_lrpid = lmp->l_msg_lrpid;
305 1.6 fvdl bmp->msg_stime = lmp->l_msg_stime;
306 1.6 fvdl bmp->msg_rtime = lmp->l_msg_rtime;
307 1.6 fvdl bmp->msg_ctime = lmp->l_msg_ctime;
308 1.6 fvdl }
309 1.6 fvdl
310 1.14 erh void
311 1.6 fvdl bsd_to_linux_msqid_ds(bmp, lmp)
312 1.6 fvdl struct msqid_ds *bmp;
313 1.6 fvdl struct linux_msqid_ds *lmp;
314 1.6 fvdl {
315 1.8 mycroft
316 1.6 fvdl bsd_to_linux_ipc_perm(&bmp->msg_perm, &lmp->l_msg_perm);
317 1.21 thorpej lmp->l_msg_first = bmp->_msg_first;
318 1.21 thorpej lmp->l_msg_last = bmp->_msg_last;
319 1.21 thorpej lmp->l_msg_cbytes = bmp->_msg_cbytes;
320 1.6 fvdl lmp->l_msg_qnum = bmp->msg_qnum;
321 1.6 fvdl lmp->l_msg_qbytes = bmp->msg_qbytes;
322 1.6 fvdl lmp->l_msg_lspid = bmp->msg_lspid;
323 1.6 fvdl lmp->l_msg_lrpid = bmp->msg_lrpid;
324 1.6 fvdl lmp->l_msg_stime = bmp->msg_stime;
325 1.6 fvdl lmp->l_msg_rtime = bmp->msg_rtime;
326 1.6 fvdl lmp->l_msg_ctime = bmp->msg_ctime;
327 1.6 fvdl }
328 1.6 fvdl
329 1.14 erh int
330 1.28 thorpej linux_sys_msgctl(l, v, retval)
331 1.28 thorpej struct lwp *l;
332 1.14 erh void *v;
333 1.1 fvdl register_t *retval;
334 1.1 fvdl {
335 1.14 erh struct linux_sys_msgctl_args /* {
336 1.14 erh syscallarg(int) msqid;
337 1.14 erh syscallarg(int) cmd;
338 1.14 erh syscallarg(struct linux_msqid_ds *) buf;
339 1.14 erh } */ *uap = v;
340 1.28 thorpej struct proc *p = l->l_proc;
341 1.39 christos void *sg;
342 1.21 thorpej struct sys___msgctl13_args nua;
343 1.13 mycroft struct msqid_ds *bmp, bm;
344 1.6 fvdl struct linux_msqid_ds lm;
345 1.6 fvdl int error;
346 1.6 fvdl
347 1.14 erh SCARG(&nua, msqid) = SCARG(uap, msqid);
348 1.14 erh switch (SCARG(uap, cmd)) {
349 1.13 mycroft case LINUX_IPC_STAT:
350 1.26 christos sg = stackgap_init(p, 0);
351 1.26 christos bmp = stackgap_alloc(p, &sg, sizeof (struct msqid_ds));
352 1.13 mycroft SCARG(&nua, cmd) = IPC_STAT;
353 1.13 mycroft SCARG(&nua, buf) = bmp;
354 1.28 thorpej if ((error = sys___msgctl13(l, &nua, retval)))
355 1.13 mycroft return error;
356 1.13 mycroft if ((error = copyin(bmp, &bm, sizeof bm)))
357 1.13 mycroft return error;
358 1.13 mycroft bsd_to_linux_msqid_ds(&bm, &lm);
359 1.14 erh return copyout(&lm, SCARG(uap, buf), sizeof lm);
360 1.6 fvdl case LINUX_IPC_SET:
361 1.14 erh if ((error = copyin(SCARG(uap, buf), &lm, sizeof lm)))
362 1.6 fvdl return error;
363 1.6 fvdl linux_to_bsd_msqid_ds(&lm, &bm);
364 1.26 christos sg = stackgap_init(p, 0);
365 1.26 christos bmp = stackgap_alloc(p, &sg, sizeof bm);
366 1.13 mycroft if ((error = copyout(&bm, bmp, sizeof bm)))
367 1.6 fvdl return error;
368 1.13 mycroft SCARG(&nua, cmd) = IPC_SET;
369 1.13 mycroft SCARG(&nua, buf) = bmp;
370 1.14 erh break;
371 1.13 mycroft case LINUX_IPC_RMID:
372 1.13 mycroft SCARG(&nua, cmd) = IPC_RMID;
373 1.13 mycroft SCARG(&nua, buf) = NULL;
374 1.13 mycroft break;
375 1.13 mycroft default:
376 1.13 mycroft return EINVAL;
377 1.6 fvdl }
378 1.28 thorpej return sys___msgctl13(l, &nua, retval);
379 1.1 fvdl }
380 1.1 fvdl #endif /* SYSVMSG */
381 1.1 fvdl
382 1.1 fvdl #ifdef SYSVSHM
383 1.1 fvdl /*
384 1.30 jdolecek * shmget(2). Just make sure the Linux-compatible shmat() semantics
385 1.30 jdolecek * is enabled for the segment, so that shmat() succeeds even when
386 1.30 jdolecek * the segment would be removed.
387 1.30 jdolecek */
388 1.30 jdolecek int
389 1.30 jdolecek linux_sys_shmget(l, v, retval)
390 1.30 jdolecek struct lwp *l;
391 1.30 jdolecek void *v;
392 1.30 jdolecek register_t *retval;
393 1.30 jdolecek {
394 1.30 jdolecek struct sys_shmget_args /* {
395 1.30 jdolecek syscallarg(key_t) key;
396 1.30 jdolecek syscallarg(size_t) size;
397 1.30 jdolecek syscallarg(int) shmflg;
398 1.30 jdolecek } */ *uap = v;
399 1.30 jdolecek
400 1.30 jdolecek SCARG(uap, shmflg) |= _SHM_RMLINGER;
401 1.30 jdolecek return sys_shmget(l, uap, retval);
402 1.30 jdolecek }
403 1.30 jdolecek
404 1.30 jdolecek /*
405 1.1 fvdl * shmat(2). Very straightforward, except that Linux passes a pointer
406 1.1 fvdl * in which the return value is to be passed. This is subsequently
407 1.1 fvdl * handled by libc, apparently.
408 1.1 fvdl */
409 1.36 manu #ifndef __amd64__
410 1.14 erh int
411 1.28 thorpej linux_sys_shmat(l, v, retval)
412 1.28 thorpej struct lwp *l;
413 1.14 erh void *v;
414 1.1 fvdl register_t *retval;
415 1.1 fvdl {
416 1.14 erh struct linux_sys_shmat_args /* {
417 1.14 erh syscallarg(int) shmid;
418 1.14 erh syscallarg(void *) shmaddr;
419 1.14 erh syscallarg(int) shmflg;
420 1.14 erh syscallarg(u_long *) raddr;
421 1.14 erh } */ *uap = v;
422 1.1 fvdl int error;
423 1.1 fvdl
424 1.29 jdolecek if ((error = sys_shmat(l, uap, retval)))
425 1.1 fvdl return error;
426 1.1 fvdl
427 1.37 manu #ifndef __amd64__
428 1.39 christos if ((error = copyout(&retval[0], (void *) SCARG(uap, raddr),
429 1.1 fvdl sizeof retval[0])))
430 1.1 fvdl return error;
431 1.31 perry
432 1.1 fvdl retval[0] = 0;
433 1.37 manu #endif
434 1.1 fvdl return 0;
435 1.1 fvdl }
436 1.36 manu #endif /* __amd64__ */
437 1.1 fvdl
438 1.1 fvdl /*
439 1.1 fvdl * Convert between Linux and NetBSD shmid_ds structures.
440 1.1 fvdl * The order of the fields is once again the difference, and
441 1.1 fvdl * we also need a place to store the internal data pointer
442 1.1 fvdl * in, which is unfortunately stored in this structure.
443 1.1 fvdl *
444 1.1 fvdl * We abuse a Linux internal field for that.
445 1.1 fvdl */
446 1.14 erh void
447 1.1 fvdl linux_to_bsd_shmid_ds(lsp, bsp)
448 1.1 fvdl struct linux_shmid_ds *lsp;
449 1.1 fvdl struct shmid_ds *bsp;
450 1.1 fvdl {
451 1.8 mycroft
452 1.1 fvdl linux_to_bsd_ipc_perm(&lsp->l_shm_perm, &bsp->shm_perm);
453 1.1 fvdl bsp->shm_segsz = lsp->l_shm_segsz;
454 1.1 fvdl bsp->shm_lpid = lsp->l_shm_lpid;
455 1.1 fvdl bsp->shm_cpid = lsp->l_shm_cpid;
456 1.1 fvdl bsp->shm_nattch = lsp->l_shm_nattch;
457 1.1 fvdl bsp->shm_atime = lsp->l_shm_atime;
458 1.1 fvdl bsp->shm_dtime = lsp->l_shm_dtime;
459 1.1 fvdl bsp->shm_ctime = lsp->l_shm_ctime;
460 1.21 thorpej bsp->_shm_internal = lsp->l_private2; /* XXX Oh well. */
461 1.1 fvdl }
462 1.1 fvdl
463 1.14 erh void
464 1.32 christos linux_to_bsd_shmid64_ds(lsp, bsp)
465 1.32 christos struct linux_shmid64_ds *lsp;
466 1.32 christos struct shmid_ds *bsp;
467 1.32 christos {
468 1.32 christos
469 1.32 christos linux_to_bsd_ipc64_perm(&lsp->l_shm_perm, &bsp->shm_perm);
470 1.32 christos bsp->shm_segsz = lsp->l_shm_segsz;
471 1.32 christos bsp->shm_lpid = lsp->l_shm_lpid;
472 1.32 christos bsp->shm_cpid = lsp->l_shm_cpid;
473 1.32 christos bsp->shm_nattch = lsp->l_shm_nattch;
474 1.32 christos bsp->shm_atime = lsp->l_shm_atime;
475 1.32 christos bsp->shm_dtime = lsp->l_shm_dtime;
476 1.32 christos bsp->shm_ctime = lsp->l_shm_ctime;
477 1.32 christos bsp->_shm_internal = (void*)lsp->l___unused5; /* XXX Oh well. */
478 1.32 christos }
479 1.32 christos
480 1.32 christos void
481 1.1 fvdl bsd_to_linux_shmid_ds(bsp, lsp)
482 1.1 fvdl struct shmid_ds *bsp;
483 1.1 fvdl struct linux_shmid_ds *lsp;
484 1.1 fvdl {
485 1.8 mycroft
486 1.1 fvdl bsd_to_linux_ipc_perm(&bsp->shm_perm, &lsp->l_shm_perm);
487 1.1 fvdl lsp->l_shm_segsz = bsp->shm_segsz;
488 1.1 fvdl lsp->l_shm_lpid = bsp->shm_lpid;
489 1.1 fvdl lsp->l_shm_cpid = bsp->shm_cpid;
490 1.1 fvdl lsp->l_shm_nattch = bsp->shm_nattch;
491 1.1 fvdl lsp->l_shm_atime = bsp->shm_atime;
492 1.1 fvdl lsp->l_shm_dtime = bsp->shm_dtime;
493 1.1 fvdl lsp->l_shm_ctime = bsp->shm_ctime;
494 1.21 thorpej lsp->l_private2 = bsp->_shm_internal; /* XXX */
495 1.1 fvdl }
496 1.1 fvdl
497 1.32 christos void
498 1.32 christos bsd_to_linux_shmid64_ds(bsp, lsp)
499 1.32 christos struct shmid_ds *bsp;
500 1.32 christos struct linux_shmid64_ds *lsp;
501 1.32 christos {
502 1.32 christos bsd_to_linux_ipc64_perm(&bsp->shm_perm, &lsp->l_shm_perm);
503 1.32 christos lsp->l_shm_segsz = bsp->shm_segsz;
504 1.32 christos lsp->l_shm_lpid = bsp->shm_lpid;
505 1.32 christos lsp->l_shm_cpid = bsp->shm_cpid;
506 1.32 christos lsp->l_shm_nattch = bsp->shm_nattch;
507 1.32 christos lsp->l_shm_atime = bsp->shm_atime;
508 1.32 christos lsp->l_shm_dtime = bsp->shm_dtime;
509 1.32 christos lsp->l_shm_ctime = bsp->shm_ctime;
510 1.32 christos lsp->l___unused5 = (u_long)bsp->_shm_internal; /* XXX */
511 1.32 christos }
512 1.32 christos
513 1.1 fvdl /*
514 1.32 christos * shmctl.SHM_LOCK and SHM_UNLOCK are passed on, but currently not implemented
515 1.1 fvdl * by NetBSD itself.
516 1.1 fvdl *
517 1.1 fvdl * The usual structure conversion and massaging is done.
518 1.1 fvdl */
519 1.14 erh int
520 1.28 thorpej linux_sys_shmctl(l, v, retval)
521 1.28 thorpej struct lwp *l;
522 1.14 erh void *v;
523 1.1 fvdl register_t *retval;
524 1.1 fvdl {
525 1.14 erh struct linux_sys_shmctl_args /* {
526 1.14 erh syscallarg(int) shmid;
527 1.14 erh syscallarg(int) cmd;
528 1.14 erh syscallarg(struct linux_shmid_ds *) buf;
529 1.14 erh } */ *uap = v;
530 1.28 thorpej struct proc *p = l->l_proc;
531 1.39 christos void *sg;
532 1.21 thorpej struct sys___shmctl13_args nua;
533 1.1 fvdl struct shmid_ds *bsp, bs;
534 1.13 mycroft struct linux_shmid_ds ls;
535 1.32 christos struct linux_shmid64_ds ls64;
536 1.32 christos struct linux_shminfo64 lsi64;
537 1.32 christos struct linux_shm_info lsi;
538 1.32 christos int error, i, cmd;
539 1.1 fvdl
540 1.14 erh SCARG(&nua, shmid) = SCARG(uap, shmid);
541 1.32 christos cmd = SCARG(uap, cmd);
542 1.32 christos switch (cmd) {
543 1.1 fvdl case LINUX_IPC_STAT:
544 1.32 christos case LINUX_SHM_STAT:
545 1.26 christos sg = stackgap_init(p, 0);
546 1.26 christos bsp = stackgap_alloc(p, &sg, sizeof(struct shmid_ds));
547 1.13 mycroft SCARG(&nua, cmd) = IPC_STAT;
548 1.13 mycroft SCARG(&nua, buf) = bsp;
549 1.28 thorpej if ((error = sys___shmctl13(l, &nua, retval)))
550 1.1 fvdl return error;
551 1.14 erh if ((error = copyin(SCARG(&nua, buf), &bs, sizeof bs)))
552 1.1 fvdl return error;
553 1.13 mycroft bsd_to_linux_shmid_ds(&bs, &ls);
554 1.32 christos if (cmd == LINUX_SHM_STAT)
555 1.32 christos retval[0] = IXSEQ_TO_IPCID(bs.shm_perm._key,
556 1.32 christos bs.shm_perm);
557 1.14 erh return copyout(&ls, SCARG(uap, buf), sizeof ls);
558 1.32 christos
559 1.32 christos case LINUX_IPC_STAT|LINUX_IPC_64:
560 1.32 christos case LINUX_SHM_STAT|LINUX_IPC_64:
561 1.32 christos sg = stackgap_init(p,0);
562 1.32 christos bsp = stackgap_alloc(p, &sg, sizeof(struct linux_shmid64_ds));
563 1.32 christos SCARG(&nua, cmd) = IPC_STAT;
564 1.32 christos SCARG(&nua, buf) = bsp;
565 1.32 christos if ((error = sys___shmctl13(l, &nua, retval)))
566 1.32 christos return error;
567 1.32 christos if ((error = copyin(SCARG(&nua, buf), &bs, sizeof bs)))
568 1.32 christos return error;
569 1.32 christos bsd_to_linux_shmid64_ds(&bs, &ls64);
570 1.32 christos if (cmd == (LINUX_SHM_STAT|LINUX_IPC_64)) {
571 1.32 christos retval[0] = IXSEQ_TO_IPCID(bs.shm_perm._key,
572 1.32 christos bs.shm_perm);
573 1.32 christos }
574 1.32 christos return copyout(&ls64, SCARG(uap, buf), sizeof ls64);
575 1.32 christos
576 1.1 fvdl case LINUX_IPC_SET:
577 1.14 erh if ((error = copyin(SCARG(uap, buf), &ls, sizeof ls)))
578 1.1 fvdl return error;
579 1.13 mycroft linux_to_bsd_shmid_ds(&ls, &bs);
580 1.26 christos sg = stackgap_init(p, 0);
581 1.26 christos bsp = stackgap_alloc(p, &sg, sizeof bs);
582 1.13 mycroft if ((error = copyout(&bs, bsp, sizeof bs)))
583 1.1 fvdl return error;
584 1.13 mycroft SCARG(&nua, cmd) = IPC_SET;
585 1.13 mycroft SCARG(&nua, buf) = bsp;
586 1.14 erh break;
587 1.32 christos
588 1.1 fvdl case LINUX_IPC_RMID:
589 1.13 mycroft SCARG(&nua, cmd) = IPC_RMID;
590 1.13 mycroft SCARG(&nua, buf) = NULL;
591 1.13 mycroft break;
592 1.32 christos
593 1.1 fvdl case LINUX_SHM_LOCK:
594 1.13 mycroft SCARG(&nua, cmd) = SHM_LOCK;
595 1.13 mycroft SCARG(&nua, buf) = NULL;
596 1.13 mycroft break;
597 1.32 christos
598 1.1 fvdl case LINUX_SHM_UNLOCK:
599 1.13 mycroft SCARG(&nua, cmd) = SHM_UNLOCK;
600 1.13 mycroft SCARG(&nua, buf) = NULL;
601 1.13 mycroft break;
602 1.32 christos
603 1.1 fvdl case LINUX_IPC_INFO:
604 1.32 christos memset(&lsi64, 0, sizeof lsi64);
605 1.32 christos lsi64.l_shmmax = shminfo.shmmax;
606 1.32 christos lsi64.l_shmmin = shminfo.shmmin;
607 1.32 christos lsi64.l_shmmni = shminfo.shmmni;
608 1.32 christos lsi64.l_shmseg = shminfo.shmseg;
609 1.32 christos lsi64.l_shmall = shminfo.shmall;
610 1.32 christos return copyout(&lsi64, SCARG(uap, buf), sizeof lsi64);
611 1.32 christos
612 1.1 fvdl case LINUX_SHM_INFO:
613 1.32 christos (void)memset(&lsi, 0, sizeof lsi);
614 1.32 christos lsi.l_used_ids = shm_nused;
615 1.32 christos for (i = 0; i < shminfo.shmmni; i++)
616 1.32 christos if (shmsegs[i].shm_perm.mode & SHMSEG_ALLOCATED)
617 1.32 christos lsi.l_shm_tot += shmsegs[i].shm_segsz;
618 1.32 christos lsi.l_shm_rss = 0;
619 1.32 christos lsi.l_shm_swp = 0;
620 1.32 christos lsi.l_swap_attempts = 0;
621 1.32 christos lsi.l_swap_successes = 0;
622 1.32 christos return copyout(&lsi, SCARG(uap, buf), sizeof lsi);
623 1.32 christos
624 1.1 fvdl default:
625 1.32 christos #ifdef DEBUG
626 1.32 christos printf("linux_sys_shmctl cmd %d\n", SCARG(uap, cmd));
627 1.32 christos #endif
628 1.1 fvdl return EINVAL;
629 1.1 fvdl }
630 1.28 thorpej return sys___shmctl13(l, &nua, retval);
631 1.1 fvdl }
632 1.1 fvdl #endif /* SYSVSHM */
633