Aren
/
NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
NetBSD/sys/compat/netbsd32/netbsd32_ipc.c

414 lines
9.5 KiB
C
Raw Blame History

/* $NetBSD: netbsd32_ipc.c,v 1.20 2021/01/19 03:20:13 simonb Exp $ */
/*
* Copyright (c) 1998, 2001 Matthew R. Green
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
* BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
* LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
* AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
* OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: netbsd32_ipc.c,v 1.20 2021/01/19 03:20:13 simonb Exp $");
#if defined(_KERNEL_OPT)
#include "opt_sysv.h"
#endif
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/ipc.h>
#include <sys/msg.h>
#include <sys/sem.h>
#include <sys/shm.h>
#include <sys/mount.h>
#include <sys/module.h>
#include <sys/dirent.h>
#include <sys/syscallvar.h>
#include <sys/syscallargs.h>
#include <sys/proc.h>
#include <compat/netbsd32/netbsd32.h>
#include <compat/netbsd32/netbsd32_syscall.h>
#include <compat/netbsd32/netbsd32_syscallargs.h>
#include <compat/netbsd32/netbsd32_conv.h>
#define _PKG_ENTRY(name) \
{ NETBSD32_SYS_ ## name, 0, (sy_call_t *)name }
#define _PKG_ENTRY2(code, name) \
{ NETBSD32_SYS_ ## code, 0, (sy_call_t *)name }
static const struct syscall_package compat_sysvipc_syscalls[] = {
#if defined(SYSVSEM)
_PKG_ENTRY(netbsd32_____semctl50),
_PKG_ENTRY(netbsd32_semget),
_PKG_ENTRY(netbsd32_semop),
_PKG_ENTRY(netbsd32_semconfig),
#endif /* SYSVSEM */
#if defined(SYSVSHM)
_PKG_ENTRY(netbsd32_shmat),
_PKG_ENTRY(netbsd32___shmctl50),
_PKG_ENTRY(netbsd32_shmdt),
_PKG_ENTRY(netbsd32_shmget),
#endif /* SYSVSHM */
#if defined(SYSVMSG)
_PKG_ENTRY(netbsd32___msgctl50),
_PKG_ENTRY(netbsd32_msgget),
_PKG_ENTRY(netbsd32_msgsnd),
_PKG_ENTRY(netbsd32_msgrcv),
#endif /* SYSVMSG */
{ 0, 0, NULL }
};
MODULE(MODULE_CLASS_EXEC, compat_netbsd32_sysvipc,
"compat_netbsd32,sysv_ipc");
static int
compat_netbsd32_sysvipc_modcmd(modcmd_t cmd, void *arg)
{
int error;
switch (cmd) {
case MODULE_CMD_INIT:
error = syscall_establish(&emul_netbsd32,
compat_sysvipc_syscalls);
break;
case MODULE_CMD_FINI:
error = syscall_disestablish(&emul_netbsd32,
compat_sysvipc_syscalls);
break;
default:
error = ENOTTY;
break;
}
return error;
}
#if defined(SYSVSEM)
int
netbsd32_____semctl50(struct lwp *l, const struct netbsd32_____semctl50_args *uap, register_t *retval)
{
/* {
syscallarg(int) semid;
syscallarg(int) semnum;
syscallarg(int) cmd;
syscallarg(netbsd32_semunp_t) arg;
} */
struct semid_ds sembuf;
struct netbsd32_semid_ds sembuf32;
int cmd, error;
void *pass_arg;
union __semun karg;
union netbsd32_semun karg32;
cmd = SCARG(uap, cmd);
switch (cmd) {
case IPC_SET:
case IPC_STAT:
pass_arg = &sembuf;
break;
case GETALL:
case SETVAL:
case SETALL:
pass_arg = &karg;
break;
default:
pass_arg = NULL;
break;
}
if (pass_arg) {
error = copyin(SCARG_P32(uap, arg), &karg32, sizeof(karg32));
if (error)
return error;
if (pass_arg == &karg) {
switch (cmd) {
case GETALL:
case SETALL:
karg.array = NETBSD32PTR64(karg32.array);
break;
case SETVAL:
karg.val = karg32.val;
break;
}
}
if (cmd == IPC_SET) {
error = copyin(NETBSD32PTR64(karg32.buf), &sembuf32,
sizeof(sembuf32));
if (error)
return error;
netbsd32_to_semid_ds(&sembuf32, &sembuf);
}
}
error = semctl1(l, SCARG(uap, semid), SCARG(uap, semnum), cmd,
pass_arg, retval);
if (error == 0 && cmd == IPC_STAT) {
netbsd32_from_semid_ds(&sembuf, &sembuf32);
error = copyout(&sembuf32, NETBSD32PTR64(karg32.buf),
sizeof(sembuf32));
}
return error;
}
int
netbsd32_semget(struct lwp *l, const struct netbsd32_semget_args *uap, register_t *retval)
{
/* {
syscallarg(netbsd32_key_t) key;
syscallarg(int) nsems;
syscallarg(int) semflg;
} */
struct sys_semget_args ua;
NETBSD32TOX_UAP(key, key_t);
NETBSD32TO64_UAP(nsems);
NETBSD32TO64_UAP(semflg);
return sys_semget(l, &ua, retval);
}
int
netbsd32_semop(struct lwp *l, const struct netbsd32_semop_args *uap, register_t *retval)
{
/* {
syscallarg(int) semid;
syscallarg(netbsd32_sembufp_t) sops;
syscallarg(netbsd32_size_t) nsops;
} */
struct sys_semop_args ua;
NETBSD32TO64_UAP(semid);
NETBSD32TOP_UAP(sops, struct sembuf);
NETBSD32TOX_UAP(nsops, size_t);
return sys_semop(l, &ua, retval);
}
int
netbsd32_semconfig(struct lwp *l, const struct netbsd32_semconfig_args *uap, register_t *retval)
{
/* {
syscallarg(int) flag;
} */
struct sys_semconfig_args ua;
NETBSD32TO64_UAP(flag);
return sys_semconfig(l, &ua, retval);
}
#endif /* SYSVSEM */
#if defined(SYSVMSG)
int
netbsd32___msgctl50(struct lwp *l, const struct netbsd32___msgctl50_args *uap,
register_t *retval)
{
/* {
syscallarg(int) msqid;
syscallarg(int) cmd;
syscallarg(netbsd32_msqid_dsp_t) buf;
} */
struct msqid_ds ds;
struct netbsd32_msqid_ds ds32;
int error, cmd;
cmd = SCARG(uap, cmd);
if (cmd == IPC_SET) {
error = copyin(SCARG_P32(uap, buf), &ds32, sizeof(ds32));
if (error)
return error;
netbsd32_to_msqid_ds(&ds32, &ds);
}
error = msgctl1(l, SCARG(uap, msqid), cmd,
(cmd == IPC_SET || cmd == IPC_STAT) ? &ds : NULL);
if (error == 0 && cmd == IPC_STAT) {
netbsd32_from_msqid_ds(&ds, &ds32);
error = copyout(&ds32, SCARG_P32(uap, buf), sizeof(ds32));
}
return error;
}
int
netbsd32_msgget(struct lwp *l, const struct netbsd32_msgget_args *uap, register_t *retval)
{
/* {
syscallarg(netbsd32_key_t) key;
syscallarg(int) msgflg;
} */
struct sys_msgget_args ua;
NETBSD32TOX_UAP(key, key_t);
NETBSD32TO64_UAP(msgflg);
return sys_msgget(l, &ua, retval);
}
static int
netbsd32_msgsnd_fetch_type(const void *src, void *dst, size_t size)
{
netbsd32_long l32;
long *l = dst;
int error;
KASSERT(size == sizeof(netbsd32_long));
error = copyin(src, &l32, sizeof(l32));
if (!error)
*l = l32;
return error;
}
int
netbsd32_msgsnd(struct lwp *l, const struct netbsd32_msgsnd_args *uap, register_t *retval)
{
/* {
syscallarg(int) msqid;
syscallarg(const netbsd32_voidp) msgp;
syscallarg(netbsd32_size_t) msgsz;
syscallarg(int) msgflg;
} */
return msgsnd1(l, SCARG(uap, msqid),
SCARG_P32(uap, msgp), SCARG(uap, msgsz),
SCARG(uap, msgflg), sizeof(netbsd32_long),
netbsd32_msgsnd_fetch_type);
}
static int
netbsd32_msgrcv_put_type(const void *src, void *dst, size_t size)
{
netbsd32_long l32;
const long *l = src;
KASSERT(size == sizeof(netbsd32_long));
l32 = (netbsd32_long)(*l);
return copyout(&l32, dst, sizeof(l32));
}
int
netbsd32_msgrcv(struct lwp *l, const struct netbsd32_msgrcv_args *uap, register_t *retval)
{
/* {
syscallarg(int) msqid;
syscallarg(netbsd32_voidp) msgp;
syscallarg(netbsd32_size_t) msgsz;
syscallarg(netbsd32_long) msgtyp;
syscallarg(int) msgflg;
} */
return msgrcv1(l, SCARG(uap, msqid),
SCARG_P32(uap, msgp), SCARG(uap, msgsz),
SCARG(uap, msgtyp), SCARG(uap, msgflg), sizeof(netbsd32_long),
netbsd32_msgrcv_put_type, retval);
}
#endif /* SYSVMSG */
#if defined(SYSVSHM)
int
netbsd32_shmat(struct lwp *l, const struct netbsd32_shmat_args *uap, register_t *retval)
{
/* {
syscallarg(int) shmid;
syscallarg(const netbsd32_voidp) shmaddr;
syscallarg(int) shmflg;
} */
struct sys_shmat_args ua;
NETBSD32TO64_UAP(shmid);
NETBSD32TOP_UAP(shmaddr, void);
NETBSD32TO64_UAP(shmflg);
return sys_shmat(l, &ua, retval);
}
int
netbsd32___shmctl50(struct lwp *l, const struct netbsd32___shmctl50_args *uap,
register_t *retval)
{
/* {
syscallarg(int) shmid;
syscallarg(int) cmd;
syscallarg(netbsd32_shmid_dsp_t) buf;
} */
struct shmid_ds ds;
struct netbsd32_shmid_ds ds32;
int error, cmd;
cmd = SCARG(uap, cmd);
if (cmd == IPC_SET) {
error = copyin(SCARG_P32(uap, buf), &ds32, sizeof(ds32));
if (error)
return error;
netbsd32_to_shmid_ds(&ds32, &ds);
}
error = shmctl1(l, SCARG(uap, shmid), cmd,
(cmd == IPC_SET || cmd == IPC_STAT) ? &ds : NULL);
if (error == 0 && cmd == IPC_STAT) {
netbsd32_from_shmid_ds(&ds, &ds32);
error = copyout(&ds32, SCARG_P32(uap, buf), sizeof(ds32));
}
return error;
}
int
netbsd32_shmdt(struct lwp *l, const struct netbsd32_shmdt_args *uap, register_t *retval)
{
/* {
syscallarg(const netbsd32_voidp) shmaddr;
} */
struct sys_shmdt_args ua;
NETBSD32TOP_UAP(shmaddr, const char);
return sys_shmdt(l, &ua, retval);
}
int
netbsd32_shmget(struct lwp *l, const struct netbsd32_shmget_args *uap, register_t *retval)
{
/* {
syscallarg(netbsd32_key_t) key;
syscallarg(netbsd32_size_t) size;
syscallarg(int) shmflg;
} */
struct sys_shmget_args ua;
NETBSD32TOX_UAP(key, key_t);
NETBSD32TOX_UAP(size, size_t);
NETBSD32TO64_UAP(shmflg);
return sys_shmget(l, &ua, retval);
}
#endif /* SYSVSHM */
Reference in New Issue View Git Blame Copy Permalink