/*      $NetBSD: linux32_stat.c,v 1.18 2021/11/25 02:27:08 ryo Exp $ */

/*-
* Copyright (c) 2006 Emmanuel Dreyfus, 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.
* 3. All advertising materials mentioning features or use of this software
*    must display the following acknowledgement:
*      This product includes software developed by Emmanuel Dreyfus
* 4. The name of the author may not be used to endorse or promote
*    products derived from this software without specific prior written
*    permission.
*
* THIS SOFTWARE IS PROVIDED BY THE THE AUTHOR 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 AUTHOR 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: linux32_stat.c,v 1.18 2021/11/25 02:27:08 ryo Exp $");

#include <sys/types.h>
#include <sys/param.h>
#include <sys/fstypes.h>
#include <sys/signal.h>
#include <sys/dirent.h>
#include <sys/kernel.h>
#include <sys/namei.h>
#include <sys/fcntl.h>
#include <sys/filedesc.h>
#include <sys/select.h>
#include <sys/proc.h>
#include <sys/ucred.h>
#include <sys/swap.h>
#include <sys/vfs_syscalls.h>

#include <machine/types.h>

#include <sys/syscallargs.h>

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

#include <compat/linux/common/linux_types.h>
#include <compat/linux/common/linux_signal.h>
#include <compat/linux/common/linux_machdep.h>
#include <compat/linux/common/linux_misc.h>
#include <compat/linux/common/linux_oldolduname.h>
#include <compat/linux/common/linux_ipc.h>
#include <compat/linux/common/linux_sem.h>
#include <compat/linux/common/linux_fcntl.h>
#include <compat/linux/linux_syscallargs.h>

#include <compat/linux32/common/linux32_types.h>
#include <compat/linux32/common/linux32_signal.h>
#include <compat/linux32/common/linux32_machdep.h>
#include <compat/linux32/common/linux32_sysctl.h>
#include <compat/linux32/common/linux32_socketcall.h>
#include <compat/linux32/linux32_syscall.h>
#include <compat/linux32/linux32_syscallargs.h>

static inline void bsd_to_linux32_stat(struct stat *, struct linux32_stat *);
static inline void bsd_to_linux32_stat64(struct stat *, struct linux32_stat64 *);

#define linux_fakedev(x,y) (x)

static inline void
bsd_to_linux32_stat(struct stat *st, struct linux32_stat *st32)
{
       memset(st32, 0, sizeof(*st32));
       st32->lst_dev = linux_fakedev(st->st_dev, 0);
       st32->lst_ino = st->st_ino;
       st32->lst_mode = st->st_mode;
       if (st->st_nlink >= (1 << 15))
               st32->lst_nlink = (1 << 15) - 1;
       else
               st32->lst_nlink = st->st_nlink;
       st32->lst_uid = st->st_uid;
       st32->lst_gid = st->st_gid;
       st32->lst_rdev = linux_fakedev(st->st_rdev, 0);
       st32->lst_size = st->st_size;
       st32->lst_blksize = st->st_blksize;
       st32->lst_blocks = st->st_blocks;
       st32->lst_atime = st->st_atime;
       st32->lst_mtime = st->st_mtime;
       st32->lst_ctime = st->st_ctime;
#ifdef LINUX32_STAT_HAS_NSEC
       st32->lst_atime_nsec = st->st_atimensec;
       st32->lst_mtime_nsec = st->st_mtimensec;
       st32->lst_ctime_nsec = st->st_ctimensec;
#endif
}

static inline void
bsd_to_linux32_stat64(struct stat *st, struct linux32_stat64 *st32)
{
       memset(st32, 0, sizeof(*st32));
       st32->lst_dev = linux_fakedev(st->st_dev, 0);
       st32->lst_ino = st->st_ino;
       st32->lst_mode = st->st_mode;
       if (st->st_nlink >= (1 << 15))
               st32->lst_nlink = (1 << 15) - 1;
       else
               st32->lst_nlink = st->st_nlink;
       st32->lst_uid = st->st_uid;
       st32->lst_gid = st->st_gid;
       st32->lst_rdev = linux_fakedev(st->st_rdev, 0);
       st32->lst_size = st->st_size;
       st32->lst_blksize = st->st_blksize;
       st32->lst_blocks = st->st_blocks;
       st32->lst_atime = st->st_atime;
       st32->lst_mtime = st->st_mtime;
       st32->lst_ctime = st->st_ctime;
#ifdef LINUX32_STAT64_HAS_NSEC
       st32->lst_atime_nsec = st->st_atimensec;
       st32->lst_mtime_nsec = st->st_mtimensec;
       st32->lst_ctime_nsec = st->st_ctimensec;
#endif
#ifdef LINUX32_STAT64_HAS_BROKEN_ST_INO
       st32->__lst_ino = st->st_ino;
#endif
}

int
linux32_sys_stat(struct lwp *l, const struct linux32_sys_stat_args *uap, register_t *retval)
{
       /* {
               syscallarg(netbsd32_charp) path;
               syscallarg(linux32_statp) sp;
       } */
       int error;
       struct stat st;
       struct linux32_stat st32;

       error = do_sys_stat(SCARG_P32(uap, path), FOLLOW, &st);
       if (error != 0)
               return error;

       bsd_to_linux32_stat(&st, &st32);
       return copyout(&st32, SCARG_P32(uap, sp), sizeof(st32));
}

int
linux32_sys_lstat(struct lwp *l, const struct linux32_sys_lstat_args *uap, register_t *retval)
{
       /* {
               syscallarg(netbsd32_charp) path;
               syscallarg(linux32_statp) sp;
       } */
       int error;
       struct stat st;
       struct linux32_stat st32;

       error = do_sys_stat(SCARG_P32(uap, path), NOFOLLOW, &st);
       if (error != 0)
               return error;

       bsd_to_linux32_stat(&st, &st32);
       return copyout(&st32, SCARG_P32(uap, sp), sizeof(st32));
}

int
linux32_sys_fstat(struct lwp *l, const struct linux32_sys_fstat_args *uap, register_t *retval)
{
       /* {
               syscallarg(int) fd;
               syscallarg(linux32_statp) sp;
       } */
       int error;
       struct stat st;
       struct linux32_stat st32;

       error = do_sys_fstat(SCARG(uap, fd), &st);
       if (error != 0)
               return error;

       bsd_to_linux32_stat(&st, &st32);
       return copyout(&st32, SCARG_P32(uap, sp), sizeof(st32));
}

int
linux32_sys_stat64(struct lwp *l, const struct linux32_sys_stat64_args *uap, register_t *retval)
{
       /* {
               syscallarg(netbsd32_charp) path;
               syscallarg(linux32_stat64p) sp;
       } */
       int error;
       struct stat st;
       struct linux32_stat64 st32;

       error = do_sys_stat(SCARG_P32(uap, path), FOLLOW, &st);
       if (error != 0)
               return error;

       bsd_to_linux32_stat64(&st, &st32);
       return copyout(&st32, SCARG_P32(uap, sp), sizeof(st32));
}

int
linux32_sys_lstat64(struct lwp *l, const struct linux32_sys_lstat64_args *uap, register_t *retval)
{
       /* {
               syscallarg(netbsd32_charp) path;
               syscallarg(linux32_stat64p) sp;
       } */
       int error;
       struct stat st;
       struct linux32_stat64 st32;

       error = do_sys_stat(SCARG_P32(uap, path), NOFOLLOW, &st);
       if (error != 0)
               return error;

       bsd_to_linux32_stat64(&st, &st32);
       return copyout(&st32, SCARG_P32(uap, sp), sizeof(st32));
}

int
linux32_sys_fstat64(struct lwp *l, const struct linux32_sys_fstat64_args *uap, register_t *retval)
{
       /* {
               syscallarg(int) fd;
               syscallarg(linux32_stat64p) sp;
       } */
       int error;
       struct stat st;
       struct linux32_stat64 st32;

       error = do_sys_fstat(SCARG(uap, fd), &st);
       if (error != 0)
               return error;

       bsd_to_linux32_stat64(&st, &st32);
       return copyout(&st32, SCARG_P32(uap, sp), sizeof(st32));
}

int
linux32_sys_fstatat64(struct lwp *l,
   const struct linux32_sys_fstatat64_args *uap, register_t *retval)
{
       /* {
               syscallarg(int) fd;
               syscallarg(netbsd32_charp) path;
               syscallarg(linux32_stat64p) sp;
               syscallarg(int) flag;
       } */
       struct linux32_stat64 st32;
       struct stat st;
       int error;

       error = linux_statat(l, SCARG(uap, fd), SCARG_P32(uap, path),
           SCARG(uap, flag), &st);
       if (error != 0)
               return error;

       bsd_to_linux32_stat64(&st, &st32);

       return copyout(&st32, SCARG_P32(uap, sp), sizeof st32);
}

#ifdef LINUX32_SYS_statx
int
linux32_sys_statx(struct lwp *l, const struct linux32_sys_statx_args *uap,
   register_t *retval)
{
       /* {
               syscallarg(int) fd;
               syscallarg(netbsd32_charp) path;
               syscallarg(int) flag;
               syscallarg(unsigned int) mask;
               syscallarg(linux32_statxp) sp;
       } */
       struct linux_statx stx;
       struct stat st;
       int error;

       error = linux_statat(l, SCARG(uap, fd), SCARG_P32(uap, path),
           SCARG(uap, flag), &st);
       if (error != 0)
               return error;

       /* struct statx has binary compatibilities between 32bit and 64bit */
       error = bsd_to_linux_statx(&st, &stx, SCARG(uap, mask));
       if (error != 0)
               return error;

       return copyout(&stx, SCARG_P32(uap, sp), sizeof stx);
}
#endif /* LINUX32_SYS_statx */