/* $NetBSD: linux_mtio.c,v 1.9 2024/10/01 16:41:29 riastradh Exp $ */

/*
 * Copyright (c) 2005 Soren S. Jorvang.  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 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: linux_mtio.c,v 1.9 2024/10/01 16:41:29 riastradh Exp $");

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/ioctl.h>
#include <sys/file.h>
#include <sys/filedesc.h>
#include <sys/mount.h>
#include <sys/proc.h>

#include <sys/mtio.h>

#include <sys/syscallargs.h>

#include <compat/linux/common/linux_types.h>
#include <compat/linux/common/linux_ioctl.h>
#include <compat/linux/common/linux_signal.h>
#include <compat/linux/common/linux_mtio.h>
#include <compat/linux/common/linux_ipc.h>
#include <compat/linux/common/linux_sem.h>

#include <compat/linux/linux_syscallargs.h>

static const struct mtop_mapping {
        short   lop;
        short   op;
} mtop_map[] = {
        { LINUX_MTFSF,          MTFSF },
        { LINUX_MTBSF,          MTBSF },
        { LINUX_MTFSR,          MTFSR },
        { LINUX_MTBSR,          MTBSR },
        { LINUX_MTWEOF,         MTWEOF },
        { LINUX_MTREW,          MTREW },
        { LINUX_MTOFFL,         MTOFFL },
        { LINUX_MTNOP,          MTNOP },
        { LINUX_MTRETEN,        MTRETEN },
        { LINUX_MTEOM,          MTEOM },
        { LINUX_MTERASE,        MTERASE },
        { LINUX_MTSETBLK,       MTSETBSIZ },
        { LINUX_MTSETDENSITY,   MTSETDNSTY },
        { LINUX_MTCOMPRESSION,  MTCMPRESS },
        { -1, -1 }
};

int
linux_ioctl_mtio(struct lwp *l, const struct linux_sys_ioctl_args *uap,
    register_t *retval)
{
        file_t *fp;
        u_long com = SCARG(uap, com);
        int i, error = 0;
        int (*ioctlf)(file_t *, u_long, void *);
        struct linux_mtop lmtop;
        struct linux_mtget lmtget;
        struct mtop mt;

        if ((fp = fd_getfile(SCARG(uap, fd))) == NULL)
                return EBADF;

        ioctlf = fp->f_ops->fo_ioctl;

        *retval = 0;
        switch (com) {
        case LINUX_MTIOCTOP:
                error = copyin(SCARG(uap, data), &lmtop, sizeof lmtop);
                for (i = 0; mtop_map[i].lop >= 0; i++) {
                        if (mtop_map[i].lop == lmtop.mt_op)
                                break;
                }

                if (mtop_map[i].lop == -1) {
                        error = EINVAL;
                        break;
                }

                mt.mt_op = mtop_map[i].op;
                mt.mt_count = lmtop.mt_count;
                error = ioctlf(fp, MTIOCTOP, &mt);
                break;
        case LINUX_MTIOCGET:
                memset(&lmtget, 0, sizeof(lmtget));
                lmtget.mt_type = LINUX_MT_ISUNKNOWN;
                lmtget.mt_resid = 0;
                lmtget.mt_dsreg = 0;
                lmtget.mt_gstat = 0;
                lmtget.mt_erreg = 0;
                lmtget.mt_fileno = 0;
                lmtget.mt_blkno = 0;
                error = copyout(&lmtget, SCARG(uap, data), sizeof lmtget);
                break;
        case LINUX_MTIOCPOS:
        default:
                printf("linux_mtio unsupported ioctl 0x%lx\n", com);
                error = ENODEV;
                break;
        }

        fd_putfile(SCARG(uap, fd));

        return error;
}