/*      $NetBSD: netbsd32_wait.c,v 1.26 2021/12/05 08:13:12 msaitoh 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_wait.c,v 1.26 2021/12/05 08:13:12 msaitoh Exp $");

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/mount.h>
#include <sys/time.h>
#include <sys/wait.h>
#include <sys/ptrace.h>
#include <sys/resourcevar.h>
#include <sys/vnode.h>
#include <sys/pool.h>
#include <sys/proc.h>
#include <sys/dirent.h>

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

int
netbsd32___wait450(struct lwp *l, const struct netbsd32___wait450_args *uap,
   register_t *retval)
{
       /* {
               syscallarg(int) pid;
               syscallarg(netbsd32_intp) status;
               syscallarg(int) options;
               syscallarg(netbsd32_rusagep_t) rusage;
       } */
       int error, status, pid = SCARG(uap, pid);
       struct netbsd32_rusage ru32;
       struct rusage ru;

       error = do_sys_wait(&pid, &status, SCARG(uap, options),
           SCARG_P32(uap, rusage) != NULL ? &ru : NULL);

       retval[0] = pid;
       if (pid == 0)
               return error;

       if (SCARG_P32(uap, status))
               error = copyout(&status, SCARG_P32(uap, status),
                   sizeof(status));

       if (SCARG_P32(uap, rusage) && error == 0) {
               netbsd32_from_rusage(&ru, &ru32);
               error = copyout(&ru32, SCARG_P32(uap, rusage), sizeof(ru32));
       }

       return error;
}

int
netbsd32_wait6(struct lwp *l, const struct netbsd32_wait6_args *uap,
   register_t *retval)
{
       /* {
               syscallarg(idtype_t) idtype;
               syscallarg(id_t) id;
               syscallarg(netbsd32_intp) status;
               syscallarg(int) options;
               syscallarg(netbsd32_wrusagep_t) wru;
               syscallarg(netbsd32_siginfop_t) info;
       } */
       idtype_t idtype = SCARG(uap, idtype);
       id_t id = SCARG(uap, id);
       struct wrusage wru, *wrup;
       siginfo_t si, *sip;
       int status;
       int pid;

       if (SCARG_P32(uap, wru) != NULL)
               wrup = &wru;
       else
               wrup = NULL;

       if (SCARG_P32(uap, info) != NULL)
               sip = &si;
       else
               sip = NULL;

       /*
        *  We expect all callers of wait6() to know about WEXITED and
        *  WTRAPPED.
        */
       int error = do_sys_waitid(idtype, id, &pid, &status,
           SCARG(uap, options), wrup, sip);

       retval[0] = pid;        /* tell userland who it was */

#if 0
       /*
        * should we copyout if there was no process, hence no useful data?
        * We don't for an old style wait4() (etc) but I believe
        * FreeBSD does for wait6(), so a tossup...  Go with FreeBSD for now.
        */
       if (pid == 0)
               return error;
#endif


       if (error == 0 && SCARG_P32(uap, status))
               error = copyout(&status, SCARG_P32(uap, status),
                   sizeof(status));
       if (wrup != NULL && error == 0) {
               struct netbsd32_wrusage wru32;

               memset(&wru32, 0, sizeof(wru32));
               netbsd32_from_rusage(&wrup->wru_self, &wru32.wru_self);
               netbsd32_from_rusage(&wrup->wru_children, &wru32.wru_children);
               error = copyout(&wru32, SCARG_P32(uap, wru), sizeof(wru32));
       }
       if (sip != NULL && error == 0) {
               siginfo32_t si32;

               netbsd32_si_to_si32(&si32, sip);
               error = copyout(&si32, SCARG_P32(uap, info), sizeof(si32));
       }

       return error;
}

int
netbsd32___getrusage50(struct lwp *l,
   const struct netbsd32___getrusage50_args *uap, register_t *retval)
{
       /* {
               syscallarg(int) who;
               syscallarg(netbsd32_rusagep_t) rusage;
       } */
       int error;
       struct proc *p = l->l_proc;
       struct rusage ru;
       struct netbsd32_rusage ru32;

       error = getrusage1(p, SCARG(uap, who), &ru);
       if (error != 0)
               return error;

       netbsd32_from_rusage(&ru, &ru32);
       return copyout(&ru32, SCARG_P32(uap, rusage), sizeof(ru32));
}