1 /* $NetBSD: linux32_ipccall.c,v 1.4 2009/04/27 13:24:18 njoly Exp $ */ 2 3 /* 4 * Copyright (c) 2008 Nicolas Joly 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS 17 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 18 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 19 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 20 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 26 * POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 __KERNEL_RCSID(0, "$NetBSD: linux32_ipccall.c,v 1.4 2009/04/27 13:24:18 njoly Exp $"); 31 32 #if defined(_KERNEL_OPT) 33 #include "opt_sysv.h" 34 #endif 35 36 #include <sys/param.h> 37 #include <sys/vnode.h> 38 #include <sys/sem.h> 39 #include <sys/shm.h> 40 41 #include <sys/syscallargs.h> 42 43 #include <compat/netbsd32/netbsd32.h> 44 45 #include <compat/linux32/common/linux32_types.h> 46 #include <compat/linux32/common/linux32_signal.h> 47 #include <compat/linux32/linux32_syscallargs.h> 48 #include <compat/linux32/common/linux32_ipc.h> 49 #include <compat/linux32/common/linux32_sem.h> 50 #include <compat/linux32/common/linux32_shm.h> 51 52 #define LINUX32_IPC_semop 1 53 #define LINUX32_IPC_semget 2 54 #define LINUX32_IPC_semctl 3 55 #define LINUX32_IPC_msgsnd 11 56 #define LINUX32_IPC_msgrcv 12 57 #define LINUX32_IPC_msgget 13 58 #define LINUX32_IPC_msgctl 14 59 #define LINUX32_IPC_shmat 21 60 #define LINUX32_IPC_shmdt 22 61 #define LINUX32_IPC_shmget 23 62 #define LINUX32_IPC_shmctl 24 63 64 #ifdef SYSVSEM 65 static void 66 bsd_to_linux32_semid_ds(struct semid_ds *, struct linux32_semid_ds *); 67 static void 68 bsd_to_linux32_semid64_ds(struct semid_ds *, struct linux32_semid64_ds *); 69 static void 70 linux32_to_bsd_semid_ds(struct linux32_semid_ds *, struct semid_ds *); 71 static void 72 linux32_to_bsd_semid64_ds(struct linux32_semid64_ds *, struct semid_ds *); 73 74 static int 75 linux32_semop(struct lwp *, const struct linux32_sys_ipc_args *, register_t *); 76 static int 77 linux32_semget(struct lwp *, const struct linux32_sys_ipc_args *, register_t *); 78 static int 79 linux32_semctl(struct lwp *, const struct linux32_sys_ipc_args *, register_t *); 80 #endif /* SYSVSEM */ 81 82 #ifdef SYSVSHM 83 static void 84 bsd_to_linux32_shmid_ds(struct shmid_ds *, struct linux32_shmid_ds *); 85 static void 86 linux32_to_bsd_shmid_ds(struct linux32_shmid_ds *, struct shmid_ds *); 87 static void 88 bsd_to_linux32_shmid64_ds(struct shmid_ds *, struct linux32_shmid64_ds *); 89 static void 90 linux32_to_bsd_shmid64_ds(struct linux32_shmid64_ds *, struct shmid_ds *); 91 92 static int 93 linux32_shmat(struct lwp *, const struct linux32_sys_ipc_args *, register_t *); 94 static int 95 linux32_shmdt(struct lwp *, const struct linux32_sys_ipc_args *, register_t *); 96 static int 97 linux32_shmget(struct lwp *, const struct linux32_sys_ipc_args *, register_t *); 98 static int 99 linux32_shmctl(struct lwp *, const struct linux32_sys_ipc_args *, register_t *); 100 #endif /* SYSVSHM */ 101 102 int 103 linux32_sys_ipc(struct lwp *l, const struct linux32_sys_ipc_args *uap, 104 register_t *retval) 105 { 106 /* { 107 syscallarg(int) what; 108 syscallarg(int) a1; 109 syscallarg(int) a2; 110 syscallarg(int) a3; 111 syscallarg(netbsd32_voidp) ptr; 112 } */ 113 114 switch (SCARG(uap, what)) { 115 #ifdef SYSVSEM 116 case LINUX32_IPC_semop: 117 return linux32_semop(l, uap, retval);; 118 case LINUX32_IPC_semget: 119 return linux32_semget(l, uap, retval); 120 case LINUX32_IPC_semctl: 121 return linux32_semctl(l, uap, retval); 122 #endif /* SYSVSEM */ 123 #ifdef SYSVSHM 124 case LINUX32_IPC_shmat: 125 return linux32_shmat(l, uap, retval); 126 case LINUX32_IPC_shmdt: 127 return linux32_shmdt(l, uap, retval); 128 case LINUX32_IPC_shmget: 129 return linux32_shmget(l, uap, retval); 130 case LINUX32_IPC_shmctl: 131 return linux32_shmctl(l, uap, retval); 132 #endif /* SYSVSHM */ 133 default: 134 return ENOSYS; 135 } 136 137 } 138 139 static void 140 bsd_to_linux32_ipc_perm(struct ipc_perm *bpp, struct linux32_ipc_perm *lpp) 141 { 142 lpp->l_key = bpp->_key; 143 lpp->l_uid = bpp->uid; 144 lpp->l_gid = bpp->gid; 145 lpp->l_cuid = bpp->cuid; 146 lpp->l_cgid = bpp->cgid; 147 lpp->l_mode = bpp->mode; 148 lpp->l_seq = bpp->_seq; 149 } 150 151 static void 152 linux32_to_bsd_ipc_perm(struct linux32_ipc_perm *lpp, struct ipc_perm *bpp) 153 { 154 bpp->_key = lpp->l_key; 155 bpp->uid = lpp->l_uid; 156 bpp->gid = lpp->l_gid; 157 bpp->cuid = lpp->l_cuid; 158 bpp->cgid = lpp->l_cgid; 159 bpp->mode = lpp->l_mode; 160 bpp->_seq = lpp->l_seq; 161 } 162 163 static void 164 bsd_to_linux32_ipc64_perm(struct ipc_perm *bpp, struct linux32_ipc64_perm *lpp) 165 { 166 lpp->l_key = bpp->_key; 167 lpp->l_uid = bpp->uid; 168 lpp->l_gid = bpp->gid; 169 lpp->l_cuid = bpp->cuid; 170 lpp->l_cgid = bpp->cgid; 171 lpp->l_mode = bpp->mode; 172 lpp->l_seq = bpp->_seq; 173 } 174 175 static void 176 linux32_to_bsd_ipc64_perm(struct linux32_ipc64_perm *lpp, struct ipc_perm *bpp) 177 { 178 bpp->_key = lpp->l_key; 179 bpp->uid = lpp->l_uid; 180 bpp->gid = lpp->l_gid; 181 bpp->cuid = lpp->l_cuid; 182 bpp->cgid = lpp->l_cgid; 183 bpp->mode = lpp->l_mode; 184 bpp->_seq = lpp->l_seq; 185 } 186 187 #ifdef SYSVSEM 188 static void 189 bsd_to_linux32_semid_ds(struct semid_ds *bsp, struct linux32_semid_ds *lsp) 190 { 191 bsd_to_linux32_ipc_perm(&bsp->sem_perm, &lsp->l_sem_perm); 192 lsp->l_sem_otime = bsp->sem_otime; 193 lsp->l_sem_ctime = bsp->sem_ctime; 194 lsp->l_sem_nsems = bsp->sem_nsems; 195 NETBSD32PTR32(lsp->l_sem_base, bsp->_sem_base); 196 } 197 198 static void 199 bsd_to_linux32_semid64_ds(struct semid_ds *bsp, struct linux32_semid64_ds *lsp) 200 { 201 bsd_to_linux32_ipc64_perm(&bsp->sem_perm, &lsp->l_sem_perm); 202 lsp->l_sem_otime = bsp->sem_otime; 203 lsp->l_sem_ctime = bsp->sem_ctime; 204 lsp->l_sem_nsems = bsp->sem_nsems; 205 } 206 207 static void 208 linux32_to_bsd_semid_ds(struct linux32_semid_ds *lsp, struct semid_ds *bsp) 209 { 210 linux32_to_bsd_ipc_perm(&lsp->l_sem_perm, &bsp->sem_perm); 211 bsp->sem_otime = lsp->l_sem_otime; 212 bsp->sem_ctime = lsp->l_sem_ctime; 213 bsp->sem_nsems = lsp->l_sem_nsems; 214 bsp->_sem_base = NETBSD32PTR64(lsp->l_sem_base); 215 } 216 217 static void 218 linux32_to_bsd_semid64_ds(struct linux32_semid64_ds *lsp, struct semid_ds *bsp) 219 { 220 linux32_to_bsd_ipc64_perm(&lsp->l_sem_perm, &bsp->sem_perm); 221 bsp->sem_otime = lsp->l_sem_otime; 222 bsp->sem_ctime = lsp->l_sem_ctime; 223 bsp->sem_nsems = lsp->l_sem_nsems; 224 } 225 226 static int 227 linux32_semop(struct lwp *l, const struct linux32_sys_ipc_args *uap, 228 register_t *retval) 229 { 230 struct sys_semop_args ua; 231 232 SCARG(&ua, semid) = SCARG(uap, a1); 233 SCARG(&ua, sops) = SCARG_P32(uap, ptr); 234 SCARG(&ua, nsops) = SCARG(uap, a2); 235 236 return sys_semop(l, &ua, retval); 237 } 238 239 static int 240 linux32_semget(struct lwp *l, const struct linux32_sys_ipc_args *uap, 241 register_t *retval) 242 { 243 struct sys_semget_args ua; 244 245 SCARG(&ua, key) = SCARG(uap, a1); 246 SCARG(&ua, nsems) = SCARG(uap, a2); 247 SCARG(&ua, semflg) = SCARG(uap, a3); 248 249 return sys_semget(l, &ua, retval); 250 } 251 252 static int 253 linux32_semctl(struct lwp *l, const struct linux32_sys_ipc_args *uap, 254 register_t *retval) 255 { 256 int lcmd, cmd, error; 257 struct semid_ds bs; 258 struct linux32_semid_ds ls; 259 struct linux32_semid64_ds ls64; 260 union linux32_semun lsem; 261 union __semun bsem; 262 void *buf = NULL; 263 264 if ((error = copyin(SCARG_P32(uap, ptr), &lsem, sizeof lsem))) 265 return error; 266 267 lcmd = SCARG(uap, a3); 268 269 switch (lcmd & ~LINUX32_IPC_64) { 270 case LINUX32_IPC_RMID: 271 cmd = IPC_RMID; 272 break; 273 case LINUX32_IPC_STAT: 274 cmd = IPC_STAT; 275 buf = &bs; 276 break; 277 case LINUX32_IPC_SET: 278 if (lcmd & LINUX32_IPC_64) { 279 error = copyin(NETBSD32PTR64(lsem.l_buf), &ls64, 280 sizeof ls64); 281 linux32_to_bsd_semid64_ds(&ls64, &bs); 282 } else { 283 error = copyin(NETBSD32PTR64(lsem.l_buf), &ls, 284 sizeof ls); 285 linux32_to_bsd_semid_ds(&ls, &bs); 286 } 287 if (error) 288 return error; 289 cmd = IPC_SET; 290 buf = &bs; 291 break; 292 case LINUX32_GETVAL: 293 cmd = GETVAL; 294 break; 295 case LINUX32_SETVAL: 296 cmd = SETVAL; 297 bsem.val = lsem.l_val; 298 buf = &bsem; 299 break; 300 case LINUX32_GETPID: 301 cmd = GETPID; 302 break; 303 case LINUX32_GETNCNT: 304 cmd = GETNCNT; 305 break; 306 case LINUX32_GETZCNT: 307 cmd = GETZCNT; 308 break; 309 case LINUX32_GETALL: 310 cmd = GETALL; 311 bsem.array = NETBSD32PTR64(lsem.l_array); 312 buf = &bsem; 313 break; 314 case LINUX32_SETALL: 315 cmd = SETALL; 316 bsem.array = NETBSD32PTR64(lsem.l_array); 317 buf = &bsem; 318 break; 319 default: 320 return EINVAL; 321 } 322 323 error = semctl1(l, SCARG(uap, a1), SCARG(uap, a2), cmd, buf, retval); 324 if (error) 325 return error; 326 327 switch (lcmd) { 328 case LINUX32_IPC_STAT: 329 bsd_to_linux32_semid_ds(&bs, &ls); 330 error = copyout(&ls, NETBSD32PTR64(lsem.l_buf), sizeof ls); 331 break; 332 case LINUX32_IPC_STAT|LINUX32_IPC_64: 333 bsd_to_linux32_semid64_ds(&bs, &ls64); 334 error = copyout(&ls64, NETBSD32PTR64(lsem.l_buf), sizeof ls64); 335 break; 336 default: 337 break; 338 } 339 340 return error; 341 } 342 #endif /* SYSVSEM */ 343 344 #ifdef SYSVSHM 345 static void 346 bsd_to_linux32_shmid_ds(struct shmid_ds *bsp, struct linux32_shmid_ds *lsp) 347 { 348 bsd_to_linux32_ipc_perm(&bsp->shm_perm, &lsp->l_shm_perm); 349 lsp->l_shm_segsz = bsp->shm_segsz; 350 lsp->l_shm_atime = bsp->shm_atime; 351 lsp->l_shm_dtime = bsp->shm_dtime; 352 lsp->l_shm_ctime = bsp->shm_ctime; 353 lsp->l_shm_cpid = bsp->shm_cpid; 354 lsp->l_shm_lpid = bsp->shm_lpid; 355 lsp->l_shm_nattch = bsp->shm_nattch; 356 NETBSD32PTR32(lsp->l_private2, bsp->_shm_internal); 357 } 358 359 static void 360 linux32_to_bsd_shmid_ds(struct linux32_shmid_ds *lsp, struct shmid_ds *bsp) 361 { 362 linux32_to_bsd_ipc_perm(&lsp->l_shm_perm, &bsp->shm_perm); 363 bsp->shm_segsz = lsp->l_shm_segsz; 364 bsp->shm_atime = lsp->l_shm_atime; 365 bsp->shm_dtime = lsp->l_shm_dtime; 366 bsp->shm_ctime = lsp->l_shm_ctime; 367 bsp->shm_cpid = lsp->l_shm_cpid; 368 bsp->shm_lpid = lsp->l_shm_lpid; 369 bsp->shm_nattch = lsp->l_shm_nattch; 370 bsp->_shm_internal = NETBSD32PTR64(lsp->l_private2); 371 } 372 373 static void 374 bsd_to_linux32_shmid64_ds(struct shmid_ds *bsp, struct linux32_shmid64_ds *lsp) 375 { 376 bsd_to_linux32_ipc64_perm(&bsp->shm_perm, &lsp->l_shm_perm); 377 lsp->l_shm_segsz = bsp->shm_segsz; 378 lsp->l_shm_atime = bsp->shm_atime; 379 lsp->l_shm_dtime = bsp->shm_dtime; 380 lsp->l_shm_ctime = bsp->shm_ctime; 381 lsp->l_shm_cpid = bsp->shm_cpid; 382 lsp->l_shm_lpid = bsp->shm_lpid; 383 lsp->l_shm_nattch = bsp->shm_nattch; 384 lsp->l___unused5 = NETBSD32PTR32I(bsp->_shm_internal); 385 } 386 387 static void 388 linux32_to_bsd_shmid64_ds(struct linux32_shmid64_ds *lsp, struct shmid_ds *bsp) 389 { 390 linux32_to_bsd_ipc64_perm(&lsp->l_shm_perm, &bsp->shm_perm); 391 bsp->shm_segsz = lsp->l_shm_segsz; 392 bsp->shm_atime = lsp->l_shm_atime; 393 bsp->shm_dtime = lsp->l_shm_dtime; 394 bsp->shm_ctime = lsp->l_shm_ctime; 395 bsp->shm_cpid = lsp->l_shm_cpid; 396 bsp->shm_lpid = lsp->l_shm_lpid; 397 bsp->shm_nattch = lsp->l_shm_nattch; 398 bsp->_shm_internal = NETBSD32IPTR64(lsp->l___unused5); 399 } 400 401 static int 402 linux32_shmat(struct lwp *l, const struct linux32_sys_ipc_args *uap, 403 register_t *retval) 404 { 405 struct sys_shmat_args ua; 406 netbsd32_pointer_t addr32; 407 int error; 408 409 SCARG(&ua, shmid) = SCARG(uap, a1); 410 SCARG(&ua, shmaddr) = SCARG_P32(uap, ptr); 411 SCARG(&ua, shmflg) = SCARG(uap, a2); 412 413 if ((error = sys_shmat(l, &ua, retval))) 414 return error; 415 416 NETBSD32PTR32(addr32, (const void *)(uintptr_t)retval[0]); 417 418 error = copyout(&addr32, NETBSD32IPTR64(SCARG(uap, a3)), sizeof addr32); 419 if (error == 0) 420 retval[0] = 0; 421 422 return error; 423 } 424 425 static int 426 linux32_shmdt(struct lwp *l, const struct linux32_sys_ipc_args *uap, 427 register_t *retval) 428 { 429 struct sys_shmdt_args ua; 430 431 SCARG(&ua, shmaddr) = SCARG_P32(uap, ptr); 432 433 return sys_shmdt(l, &ua, retval); 434 } 435 436 static int 437 linux32_shmget(struct lwp *l, const struct linux32_sys_ipc_args *uap, 438 register_t *retval) 439 { 440 struct sys_shmget_args ua; 441 442 SCARG(&ua, key) = SCARG(uap, a1); 443 SCARG(&ua, size) = SCARG(uap, a2); 444 SCARG(&ua, shmflg) = SCARG(uap, a3) | _SHM_RMLINGER; 445 446 return sys_shmget(l, &ua, retval); 447 } 448 449 static int 450 linux32_shmctl(struct lwp *l, const struct linux32_sys_ipc_args *uap, 451 register_t *retval) 452 { 453 int shmid, cmd, error; 454 struct shmid_ds bs; 455 struct linux32_shmid_ds ls; 456 struct linux32_shmid64_ds ls64; 457 458 shmid = SCARG(uap, a1); 459 cmd = SCARG(uap, a2); 460 461 switch (cmd & ~LINUX32_IPC_64) { 462 463 case LINUX32_SHM_STAT: 464 return ENOSYS; 465 466 case LINUX32_IPC_STAT: 467 error = shmctl1(l, shmid, IPC_STAT, &bs); 468 if (error != 0) 469 return error; 470 if (cmd & LINUX32_IPC_64) { 471 bsd_to_linux32_shmid64_ds(&bs, &ls64); 472 error = copyout(&ls64, SCARG_P32(uap, ptr), sizeof ls64); 473 } else { 474 bsd_to_linux32_shmid_ds(&bs, &ls); 475 error = copyout(&ls, SCARG_P32(uap, ptr), sizeof ls); 476 } 477 return error; 478 479 case LINUX32_IPC_SET: 480 if (cmd & LINUX32_IPC_64) { 481 error = copyin(SCARG_P32(uap, ptr), &ls64, sizeof ls64); 482 linux32_to_bsd_shmid64_ds(&ls64, &bs); 483 } else { 484 error = copyin(SCARG_P32(uap, ptr), &ls, sizeof ls); 485 linux32_to_bsd_shmid_ds(&ls, &bs); 486 } 487 if (error != 0) 488 return error; 489 return shmctl1(l, shmid, IPC_SET, &bs); 490 491 case LINUX32_IPC_RMID: 492 return shmctl1(l, shmid, IPC_RMID, NULL); 493 494 case LINUX32_SHM_LOCK: 495 return shmctl1(l, shmid, SHM_LOCK, NULL); 496 497 case LINUX32_SHM_UNLOCK: 498 return shmctl1(l, shmid, SHM_UNLOCK, NULL); 499 500 case LINUX32_IPC_INFO: 501 case LINUX32_SHM_INFO: 502 return ENOSYS; 503 504 default: 505 return EINVAL; 506 } 507 } 508 #endif /* SYSVSHM */ 509