/*      $NetBSD: netbsd32_futex.c,v 1.1 2020/04/26 18:53:33 thorpej Exp $       */

/*-
* Copyright (c) 2019 The NetBSD Foundation.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by Taylor R. Campbell and Jason R. Thorpe.
*
* 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_futex.c,v 1.1 2020/04/26 18:53:33 thorpej Exp $");

#include <sys/types.h>
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/proc.h>
#include <sys/lwp.h>
#include <sys/syscallargs.h>
#include <sys/futex.h>

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

/* Sycalls conversion */

int
netbsd32___futex(struct lwp *l, const struct netbsd32___futex_args *uap,
   register_t *retval)
{
       /* {
               syscallarg(netbsd32_intp) uaddr;
               syscallarg(int) op;
               syscallarg(int) val;
               syscallarg(netbsd32_timespecp_t) timeout;
               syscallarg(netbsd32_intp) uaddr2;
               syscallarg(int) val2;
               syscallarg(int) val3;
       } */
       struct netbsd32_timespec ts32;
       struct timespec ts, *tsp;
       int error;

       /*
        * Copy in the timeout argument, if specified.
        */
       if (SCARG_P32(uap, timeout)) {
               error = copyin(SCARG_P32(uap, timeout), &ts32, sizeof(ts32));
               if (error)
                       return error;
               netbsd32_to_timespec(&ts32, &ts);
               tsp = &ts;
       } else {
               tsp = NULL;
       }

       return do_futex(SCARG_P32(uap, uaddr), SCARG(uap, op),
           SCARG(uap, val), tsp, SCARG_P32(uap, uaddr2), SCARG(uap, val2),
           SCARG(uap, val3), retval);
}

int
netbsd32___futex_set_robust_list(struct lwp *l,
   const struct netbsd32___futex_set_robust_list_args *uap, register_t *retval)
{
       /* {
               syscallarg(netbsd32_voidp) head;
               syscallarg(netbsd32_size_t) len;
       } */
       void *head = SCARG_P32(uap, head);

       if (SCARG(uap, len) != _FUTEX_ROBUST_HEAD_SIZE32)
               return EINVAL;
       if ((uintptr_t)head % sizeof(uint32_t))
               return EINVAL;

       l->l_robust_head = (uintptr_t)head;

       return 0;
}

int
netbsd32___futex_get_robust_list(struct lwp *l,
   const struct netbsd32___futex_get_robust_list_args *uap, register_t *retval)
{
       /* {
               syscallarg(lwpid_t) lwpid;
               syscallarg(netbsd32_voidp) headp;
               syscallarg(netbsd32_size_tp) lenp;
       } */
       void *head;
       const netbsd32_size_t len = _FUTEX_ROBUST_HEAD_SIZE32;
       netbsd32_voidp head32;
       int error;

       error = futex_robust_head_lookup(l, SCARG(uap, lwpid), &head);
       if (error)
               return error;

       head32.i32 = (uintptr_t)head;
       if (NETBSD32PTR64(head32) != head)
               return EFAULT;

       /* Copy out the head pointer and the head structure length. */
       /* (N.B.: "headp" is actually a "void **". */
       error = copyout(&head32, SCARG_P32(uap, headp), sizeof(head32));
       if (__predict_true(error == 0)) {
               error = copyout(&len, SCARG_P32(uap, lenp), sizeof(len));
       }

       return error;
}