Home | History | Annotate | Line # | Download | only in netbsd32
      1 /*	$NetBSD: netbsd32_compat_14_sysv.c,v 1.4 2021/01/19 03:20:13 simonb Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1999 Eduardo E. Horvath
      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  * 3. The name of the author may not be used to endorse or promote products
     16  *    derived from this software without specific prior written permission.
     17  *
     18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
     23  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
     24  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
     25  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
     26  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     27  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     28  * SUCH DAMAGE.
     29  */
     30 
     31 #include <sys/cdefs.h>
     32 __KERNEL_RCSID(0, "$NetBSD: netbsd32_compat_14_sysv.c,v 1.4 2021/01/19 03:20:13 simonb Exp $");
     33 
     34 #ifdef _KERNEL_OPT
     35 #include "opt_sysv.h"
     36 #include "opt_compat_netbsd.h"
     37 #endif
     38 
     39 #include <sys/param.h>
     40 #include <sys/ipc.h>
     41 #include <sys/systm.h>
     42 #include <sys/module.h>
     43 #include <sys/signal.h>
     44 #include <sys/proc.h>
     45 #include <sys/mount.h>
     46 #include <sys/msg.h>
     47 #include <sys/sem.h>
     48 #include <sys/shm.h>
     49 
     50 #include <sys/syscallargs.h>
     51 #include <sys/syscallvar.h>
     52 
     53 #include <compat/netbsd32/netbsd32.h>
     54 #include <compat/netbsd32/netbsd32_syscall.h>
     55 #include <compat/netbsd32/netbsd32_syscallargs.h>
     56 #include <compat/sys/siginfo.h>
     57 #include <compat/sys/shm.h>
     58 
     59 #if defined(COMPAT_14)
     60 
     61 #if defined(SYSVMSG)
     62 static inline void
     63 netbsd32_ipc_perm14_to_native(struct netbsd32_ipc_perm14 *operm, struct ipc_perm *perm)
     64 {
     65 
     66 #define	CVT(x)	perm->x = operm->x
     67 	CVT(uid);
     68 	CVT(gid);
     69 	CVT(cuid);
     70 	CVT(cgid);
     71 	CVT(mode);
     72 #undef CVT
     73 }
     74 
     75 static inline void
     76 native_to_netbsd32_ipc_perm14(struct ipc_perm *perm, struct netbsd32_ipc_perm14 *operm)
     77 {
     78 
     79 	memset(operm, 0, sizeof *operm);
     80 #define	CVT(x)	operm->x = perm->x
     81 	CVT(uid);
     82 	CVT(gid);
     83 	CVT(cuid);
     84 	CVT(cgid);
     85 	CVT(mode);
     86 #undef CVT
     87 
     88 	/*
     89 	 * Not part of the API, but some programs might look at it.
     90 	 */
     91 	operm->seq = perm->_seq;
     92 	operm->key = (key_t)perm->_key;
     93 }
     94 
     95 static inline void
     96 netbsd32_msqid_ds14_to_native(struct netbsd32_msqid_ds14 *omsqbuf, struct msqid_ds *msqbuf)
     97 {
     98 
     99 	netbsd32_ipc_perm14_to_native(&omsqbuf->msg_perm, &msqbuf->msg_perm);
    100 
    101 #define	CVT(x)	msqbuf->x = omsqbuf->x
    102 	CVT(msg_qnum);
    103 	CVT(msg_qbytes);
    104 	CVT(msg_lspid);
    105 	CVT(msg_lrpid);
    106 	CVT(msg_stime);
    107 	CVT(msg_rtime);
    108 	CVT(msg_ctime);
    109 #undef CVT
    110 }
    111 
    112 static inline void
    113 native_to_netbsd32_msqid_ds14(struct msqid_ds *msqbuf, struct netbsd32_msqid_ds14 *omsqbuf)
    114 {
    115 
    116 	memset(omsqbuf, 0, sizeof *omsqbuf);
    117 	native_to_netbsd32_ipc_perm14(&msqbuf->msg_perm, &omsqbuf->msg_perm);
    118 
    119 #define	CVT(x)	omsqbuf->x = msqbuf->x
    120 	CVT(msg_qnum);
    121 	CVT(msg_qbytes);
    122 	CVT(msg_lspid);
    123 	CVT(msg_lrpid);
    124 	CVT(msg_stime);
    125 	CVT(msg_rtime);
    126 	CVT(msg_ctime);
    127 #undef CVT
    128 
    129 	/*
    130 	 * Not part of the API, but some programs might look at it.
    131 	 */
    132 	omsqbuf->msg_cbytes = msqbuf->_msg_cbytes;
    133 }
    134 #endif
    135 
    136 #if defined(SYSVSEM)
    137 static inline void
    138 netbsd32_semid_ds14_to_native(struct netbsd32_semid_ds14 *osembuf, struct semid_ds *sembuf)
    139 {
    140 
    141 	netbsd32_ipc_perm14_to_native(&osembuf->sem_perm, &sembuf->sem_perm);
    142 
    143 #define	CVT(x)	sembuf->x = osembuf->x
    144 	CVT(sem_nsems);
    145 	CVT(sem_otime);
    146 	CVT(sem_ctime);
    147 #undef CVT
    148 }
    149 
    150 static inline void
    151 native_to_netbsd32_semid_ds14(struct semid_ds *sembuf, struct netbsd32_semid_ds14 *osembuf)
    152 {
    153 
    154 	memset(osembuf, 0, sizeof *osembuf);
    155 	native_to_netbsd32_ipc_perm14(&sembuf->sem_perm, &osembuf->sem_perm);
    156 
    157 #define	CVT(x)	osembuf->x = sembuf->x
    158 	CVT(sem_nsems);
    159 	CVT(sem_otime);
    160 	CVT(sem_ctime);
    161 #undef CVT
    162 }
    163 
    164 static inline void
    165 netbsd32_shmid_ds14_to_native(struct netbsd32_shmid_ds14 *oshmbuf, struct shmid_ds *shmbuf)
    166 {
    167 
    168 	netbsd32_ipc_perm14_to_native(&oshmbuf->shm_perm, &shmbuf->shm_perm);
    169 
    170 #define	CVT(x)	shmbuf->x = oshmbuf->x
    171 	CVT(shm_segsz);
    172 	CVT(shm_lpid);
    173 	CVT(shm_cpid);
    174 	CVT(shm_nattch);
    175 	CVT(shm_atime);
    176 	CVT(shm_dtime);
    177 	CVT(shm_ctime);
    178 #undef CVT
    179 }
    180 
    181 static inline void
    182 native_to_netbsd32_shmid_ds14(struct shmid_ds *shmbuf, struct netbsd32_shmid_ds14 *oshmbuf)
    183 {
    184 
    185 	memset(oshmbuf, 0, sizeof *oshmbuf);
    186 	native_to_netbsd32_ipc_perm14(&shmbuf->shm_perm, &oshmbuf->shm_perm);
    187 
    188 #define	CVT(x)	oshmbuf->x = shmbuf->x
    189 	CVT(shm_segsz);
    190 	CVT(shm_lpid);
    191 	CVT(shm_cpid);
    192 	CVT(shm_nattch);
    193 	CVT(shm_atime);
    194 	CVT(shm_dtime);
    195 	CVT(shm_ctime);
    196 #undef CVT
    197 }
    198 
    199 /*
    200  * the compat_14 system calls
    201  */
    202 int
    203 compat_14_netbsd32_msgctl(struct lwp *l, const struct compat_14_netbsd32_msgctl_args *uap, register_t *retval)
    204 {
    205 	/* {
    206 		syscallarg(int) msqid;
    207 		syscallarg(int) cmd;
    208 		syscallarg(struct msqid_ds14 *) buf;
    209 	} */
    210 	struct msqid_ds msqbuf;
    211 	struct netbsd32_msqid_ds14 omsqbuf;
    212 	int cmd, error;
    213 
    214 	cmd = SCARG(uap, cmd);
    215 
    216 	if (cmd == IPC_SET) {
    217 		error = copyin(SCARG_P32(uap, buf),
    218 		    &omsqbuf, sizeof(omsqbuf));
    219 		if (error)
    220 			return error;
    221 		netbsd32_msqid_ds14_to_native(&omsqbuf, &msqbuf);
    222 	}
    223 
    224 	error = msgctl1(l, SCARG(uap, msqid), cmd,
    225 	    (cmd == IPC_SET || cmd == IPC_STAT) ? &msqbuf : NULL);
    226 
    227 	if (error == 0 && cmd == IPC_STAT) {
    228 		native_to_netbsd32_msqid_ds14(&msqbuf, &omsqbuf);
    229 		error = copyout(&omsqbuf,
    230 		    SCARG_P32(uap, buf), sizeof(omsqbuf));
    231 	}
    232 
    233 	return error;
    234 }
    235 #endif
    236 
    237 #if defined(SYSVSEM)
    238 int
    239 compat_14_netbsd32___semctl(struct lwp *l, const struct compat_14_netbsd32___semctl_args *uap, register_t *retval)
    240 {
    241 	/* {
    242 		syscallarg(int) semid;
    243 		syscallarg(int) semnum;
    244 		syscallarg(int) cmd;
    245 		syscallarg(union __semun *) arg;
    246 	} */
    247 	union __semun arg;
    248 	struct semid_ds sembuf;
    249 	struct netbsd32_semid_ds14 osembuf;
    250 	int cmd, error;
    251 	void *pass_arg = NULL;
    252 
    253 	cmd = SCARG(uap, cmd);
    254 
    255 	switch (cmd) {
    256 	case IPC_SET:
    257 	case IPC_STAT:
    258 		pass_arg = &sembuf;
    259 		break;
    260 
    261 	case GETALL:
    262 	case SETVAL:
    263 	case SETALL:
    264 		pass_arg = &arg;
    265 		break;
    266 	}
    267 
    268 	if (pass_arg != NULL) {
    269 		error = copyin(NETBSD32IPTR64(SCARG(uap, arg)), &arg,
    270 		    sizeof(arg));
    271 		if (error)
    272 			return error;
    273 		if (cmd == IPC_SET) {
    274 			error = copyin(arg.buf, &osembuf, sizeof(osembuf));
    275 			if (error)
    276 				return error;
    277 			netbsd32_semid_ds14_to_native(&osembuf, &sembuf);
    278 		}
    279 	}
    280 
    281 	error = semctl1(l, SCARG(uap, semid), SCARG(uap, semnum), cmd,
    282 	    pass_arg, retval);
    283 
    284 	if (error == 0 && cmd == IPC_STAT) {
    285 		native_to_netbsd32_semid_ds14(&sembuf, &osembuf);
    286 		error = copyout(&osembuf, arg.buf, sizeof(osembuf));
    287 	}
    288 
    289 	return error;
    290 }
    291 #endif
    292 
    293 #if defined(SYSVSHM)
    294 int
    295 compat_14_netbsd32_shmctl(struct lwp *l, const struct compat_14_netbsd32_shmctl_args *uap, register_t *retval)
    296 {
    297 	/* {
    298 		syscallarg(int) shmid;
    299 		syscallarg(int) cmd;
    300 		syscallarg(struct netbsd32_shmid_ds14 *) buf;
    301 	} */
    302 	struct shmid_ds shmbuf;
    303 	struct netbsd32_shmid_ds14 oshmbuf;
    304 	int cmd, error;
    305 
    306 	cmd = SCARG(uap, cmd);
    307 
    308 	if (cmd == IPC_SET) {
    309 		error = copyin(SCARG_P32(uap, buf), &oshmbuf, sizeof(oshmbuf));
    310 		if (error)
    311 			return error;
    312 		netbsd32_shmid_ds14_to_native(&oshmbuf, &shmbuf);
    313 	}
    314 
    315 	error = shmctl1(l, SCARG(uap, shmid), cmd,
    316 	    (cmd == IPC_SET || cmd == IPC_STAT) ? &shmbuf : NULL);
    317 
    318 	if (error == 0 && cmd == IPC_STAT) {
    319 		native_to_netbsd32_shmid_ds14(&shmbuf, &oshmbuf);
    320 		error = copyout(&oshmbuf, SCARG_P32(uap, buf), sizeof(oshmbuf));
    321 	}
    322 
    323 	return error;
    324 }
    325 #endif
    326 
    327 #define REQ1    "sysv_ipc,compat_sysv_14,"
    328 #define REQ2    "compat_netbsd32,compat_netbsd32_sysvipc,"
    329 #define REQ3    "compat_netbsd32_sysvipc_50"
    330 
    331 #define _PKG_ENTRY(name)        \
    332 	{ NETBSD32_SYS_ ## name, 0, (sy_call_t *)name }
    333 
    334 static const struct syscall_package compat_sysvipc_14_syscalls[] = {
    335 #if defined(SYSVSEM)
    336 	_PKG_ENTRY(compat_14_netbsd32___semctl),
    337 #endif
    338 #if defined(SYSVSHM)
    339 	_PKG_ENTRY(compat_14_netbsd32_shmctl),
    340 #endif
    341 #if defined(SYSVMSG)
    342 	_PKG_ENTRY(compat_14_netbsd32_msgctl),
    343 #endif
    344 	{ 0, 0, NULL }
    345 };
    346 
    347 #define REQ1    "sysv_ipc,compat_sysv_14,"
    348 #define REQ2    "compat_netbsd32,compat_netbsd32_sysvipc,"
    349 #define REQ3    "compat_netbsd32_sysvipc_50"
    350 
    351 MODULE(MODULE_CLASS_EXEC, compat_netbsd32_sysvipc_14, REQ1 REQ2 REQ3 );
    352 
    353 static int
    354 compat_netbsd32_sysvipc_14_modcmd(modcmd_t cmd, void *arg)
    355 {
    356 
    357 	switch (cmd) {
    358 	case MODULE_CMD_INIT:
    359 		return syscall_establish(&emul_netbsd32,
    360 		    compat_sysvipc_14_syscalls);
    361 
    362 	case MODULE_CMD_FINI:
    363 		return syscall_disestablish(&emul_netbsd32,
    364 		    compat_sysvipc_14_syscalls);
    365 
    366 	default:
    367 		return ENOTTY;
    368 	}
    369 }
    370 
    371 #endif /* COMPAT_14 */
    372