compat/netbsd32/netbsd32_sem.c

/*        $NetBSD: netbsd32_sem.c,v 1.12 2019/02/03 03:20:23 thorpej Exp $      */

/*
 *  Copyright (c) 2006 The NetBSD Foundation.
 *  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 NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 *  ``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 FOUNDATION OR CONTRIBUTORS
 *  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_sem.c,v 1.12 2019/02/03 03:20:23 thorpej Exp $");

#include <sys/types.h>
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/kernel.h>
#include <sys/dirent.h>
#include <sys/condvar.h>
#include <sys/ksem.h>
#include <sys/mount.h>
#include <sys/proc.h>
#include <sys/syscallargs.h>

#include <compat/netbsd32/netbsd32.h>
#include <compat/netbsd32/netbsd32_syscallargs.h>
#include <compat/netbsd32/netbsd32_conv.h>

static int
netbsd32_ksem_copyin(const void *src, void *dst, size_t size)
{
          intptr_t *argp = dst;
          netbsd32_intptr_t arg32;
          int error;

          KASSERT(size == sizeof(intptr_t));

          if ((error = copyin(src, &arg32, sizeof(arg32))) != 0)
                    return error;
          *argp = arg32;
          return 0;
}

static int
netbsd32_ksem_copyout(const void *src, void *dst, size_t size)
{
          const intptr_t *idp = src;
          netbsd32_intptr_t id32, *outidp = dst;

          KASSERT(size == sizeof(intptr_t));

          /* Returning a kernel pointer to userspace sucks badly :-( */
          /* (Luckily, it's not actually a pointer. --thorpej */
          id32 = (netbsd32_intptr_t)*idp;
          return copyout(&id32, outidp, sizeof(id32));
}

int
netbsd32__ksem_init(struct lwp *l, const struct netbsd32__ksem_init_args *uap, register_t *retval)
{
          /* {
                    syscallarg(unsigned int) value;
                    syscallarg(netbsd32_semidp_t) idp;
          } */

          return do_ksem_init(l, SCARG(uap, value),
              SCARG_P32(uap, idp), netbsd32_ksem_copyin, netbsd32_ksem_copyout);
}

int
netbsd32__ksem_open(struct lwp *l, const struct netbsd32__ksem_open_args *uap, register_t *retval)
{
          /* {
                    syscallarg(const netbsd32_charp) name;
                    syscallarg(int) oflag;
                    syscallarg(mode_t) mode;
                    syscallarg(unsigned int) value;
                    syscallarg(netbsd32_semidp_t) idp;
          } */

          return do_ksem_open(l, SCARG_P32(uap, name),
              SCARG(uap, oflag), SCARG(uap, mode), SCARG(uap, value),
              SCARG_P32(uap, idp), netbsd32_ksem_copyout);
}

int
netbsd32__ksem_unlink(struct lwp *l, const struct netbsd32__ksem_unlink_args *uap, register_t *retval)
{
          /* {
                    syscallarg(const netbsd32_charp) name;
          } */
          struct sys__ksem_unlink_args ua;

          NETBSD32TOP_UAP(name, const char);
          return sys__ksem_unlink(l, &ua, retval);
}

int
netbsd32__ksem_close(struct lwp *l, const struct netbsd32__ksem_close_args *uap, register_t *retval)
{
          /* {
                    syscallarg(netbsd32_intptr_t) id;
          } */
          struct sys__ksem_close_args ua;

          NETBSD32TOX_UAP(id, intptr_t);
          return sys__ksem_close(l, &ua, retval);
}

int
netbsd32__ksem_post(struct lwp *l, const struct netbsd32__ksem_post_args *uap, register_t *retval)
{
          /* {
                    syscallarg(netbsd32_intptr_t) id;
          } */
          struct sys__ksem_post_args ua;

          NETBSD32TOX_UAP(id, intptr_t);
          return sys__ksem_post(l, &ua, retval);
}

int
netbsd32__ksem_wait(struct lwp *l, const struct netbsd32__ksem_wait_args *uap, register_t *retval)
{
          /* {
                    syscallarg(netbsd32_intptr_t) id;
          } */

          return do_ksem_wait(l, SCARG(uap, id), false, NULL);
}

int
netbsd32__ksem_trywait(struct lwp *l, const struct netbsd32__ksem_trywait_args *uap, register_t *retval)
{
          /* {
                    syscallarg(netbsd32_intptr_t) id;
          } */

          return do_ksem_wait(l, SCARG(uap, id), true, NULL);
}

int
netbsd32__ksem_timedwait(struct lwp *l, const struct netbsd32__ksem_timedwait_args *uap,
    register_t *retval)
{
          /* {
                    intptr_t id;
                    const netbsd32_timespecp_t abstime;
          } */
          struct netbsd32_timespec ts32;
          struct timespec ts;
          intptr_t id;
          int error;

          id = SCARG(uap, id);

          error = copyin(SCARG_P32(uap, abstime), &ts32, sizeof(ts32));
          if (error != 0)
                    return error;
          netbsd32_to_timespec(&ts32, &ts);

          if (ts.tv_sec < 0 || ts.tv_nsec < 0 || ts.tv_nsec >= 1000000000)
                    return EINVAL;

          error = do_ksem_wait(l, id, false, &ts);
          if (error == EWOULDBLOCK)
                    error = ETIMEDOUT;
          return error;
}

int
netbsd32__ksem_destroy(struct lwp *l, const struct netbsd32__ksem_destroy_args *uap, register_t *retval)
{
          /* {
                    syscallarg(netbsd32_intptr_t) id;
          } */
          struct sys__ksem_destroy_args ua;

          NETBSD32TOX_UAP(id, intptr_t);
          return sys__ksem_destroy(l, &ua, retval);
}

int
netbsd32__ksem_getvalue(struct lwp *l, const struct netbsd32__ksem_getvalue_args *uap, register_t *retval)
{
          /* {
                    syscallarg(netbsd32_intptr_t) id;
                    syscallarg(netbsd32_intp) value;
          } */
          struct sys__ksem_getvalue_args ua;

          NETBSD32TOX_UAP(id, intptr_t);
          NETBSD32TOP_UAP(value, unsigned int);
          return sys__ksem_getvalue(l, &ua, retval);
}