/*      $NetBSD: netbsd32_drm.c,v 1.4 2019/09/28 15:15:34 christos Exp $ */

/*
* Copyright (c) 2019 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code was written by Surya Shankar for GSoC 2019.
*
* 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_drm.c,v 1.4 2019/09/28 15:15:34 christos Exp $");

#include <compat/netbsd32/netbsd32.h>
#include <compat/netbsd32/netbsd32_ioctl.h>

#include <linux/types.h>
#include <drm/drmP.h>

#define DRM_IOCTL_VERSION32             DRM_IOWR(0x00, drm_version32_t)
#define DRM_IOCTL_GET_UNIQUE32          DRM_IOWR(0x01, drm_unique32_t)
#define DRM_IOCTL_GET_MAP32             DRM_IOWR(0x04, drm_map32_t)
#define DRM_IOCTL_GET_CLIENT32          DRM_IOWR(0x05, drm_client32_t)
#define DRM_IOCTL_GET_STATS32           DRM_IOR( 0x06, drm_stats32_t)

#define DRM_IOCTL_SET_UNIQUE32          DRM_IOW( 0x10, drm_unique32_t)
#define DRM_IOCTL_ADD_MAP32             DRM_IOWR(0x15, drm_map32_t)
#define DRM_IOCTL_ADD_BUFS32            DRM_IOWR(0x16, drm_buf_desc32_t)
#define DRM_IOCTL_MARK_BUFS32           DRM_IOW( 0x17, drm_buf_desc32_t)
#define DRM_IOCTL_INFO_BUFS32           DRM_IOWR(0x18, drm_buf_info32_t)
#define DRM_IOCTL_MAP_BUFS32            DRM_IOWR(0x19, drm_buf_map32_t)
#define DRM_IOCTL_FREE_BUFS32           DRM_IOW( 0x1a, drm_buf_free32_t)

#define DRM_IOCTL_RM_MAP32              DRM_IOW( 0x1b, drm_map32_t)

#define DRM_IOCTL_SET_SAREA_CTX32       DRM_IOW( 0x1c, drm_ctx_priv_map32_t)
#define DRM_IOCTL_GET_SAREA_CTX32       DRM_IOWR(0x1d, drm_ctx_priv_map32_t)

#define DRM_IOCTL_RES_CTX32             DRM_IOWR(0x26, drm_ctx_res32_t)
#define DRM_IOCTL_DMA32                 DRM_IOWR(0x29, drm_dma32_t)

#define DRM_IOCTL_AGP_ENABLE32          DRM_IOW( 0x32, drm_agp_mode32_t)
#define DRM_IOCTL_AGP_INFO32            DRM_IOR( 0x33, drm_agp_info32_t)
#define DRM_IOCTL_AGP_ALLOC32           DRM_IOWR(0x34, drm_agp_buffer32_t)
#define DRM_IOCTL_AGP_FREE32            DRM_IOW( 0x35, drm_agp_buffer32_t)
#define DRM_IOCTL_AGP_BIND32            DRM_IOW( 0x36, drm_agp_binding32_t)
#define DRM_IOCTL_AGP_UNBIND32          DRM_IOW( 0x37, drm_agp_binding32_t)

#define DRM_IOCTL_SG_ALLOC32            DRM_IOW( 0x38, drm_scatter_gather32_t)
#define DRM_IOCTL_SG_FREE32             DRM_IOW( 0x39, drm_scatter_gather32_t)

#define DRM_IOCTL_UPDATE_DRAW32         DRM_IOW( 0x3f, drm_update_draw32_t)

#define DRM_IOCTL_WAIT_VBLANK32         DRM_IOWR(0x3a, drm_wait_vblank32_t)

#define DRM_IOCTL_MODE_ADDFB232         DRM_IOWR(0xb8, drm_mode_fb_cmd232_t)

// Compat DRM Version Implementation

typedef struct {
       int version_major;              /**< Major version */
       int version_minor;              /**< Minor version */
       int version_patchlevel;         /**< Patch level */
       uint32_t name_len;              /**< Length of name buffer */
       netbsd32_pointer_t name;        /**< Name of driver */
       uint32_t date_len;              /**< Length of date buffer */
       netbsd32_pointer_t date;        /**< User-space buffer to hold date */
       uint32_t desc_len;              /**< Length of desc buffer */
       netbsd32_pointer_t desc;        /**< User-space buffer to hold desc */
} drm_version32_t;

static int
compat_drm_version(struct file *file, void *arg)
{
       drm_version32_t v32;
       struct drm_version v64;
       int error;

       if ((error = copyin(&v32, arg, sizeof(v32))) != 0)
               return error;

       v64.name_len = v32.name_len;
       v64.name = NETBSD32PTR64(v32.name);
       v64.date_len = v32.date_len;
       v64.date = NETBSD32PTR64(v32.date);
       v64.desc_len = v32.desc_len;
       v64.desc = NETBSD32PTR64(v32.desc);

       error = drm_ioctl(file, DRM_IOCTL_VERSION, &v64);
       if (error)
               return error;

       v32.version_major = v64.version_major;
       v32.version_minor = v64.version_minor;
       v32.version_patchlevel = v64.version_patchlevel;
       /* strings have already been copied in place */
       v32.name_len = v64.name_len;
       v32.date_len = v64.date_len;
       v32.desc_len = v64.desc_len;

       return copyout(arg, &v32, sizeof(v32));
}

typedef struct drm_unique32 {
       uint32_t unique_len;
       netbsd32_pointer_t unique;
} drm_unique32_t;

static int
compat_drm_getunique(struct file *file, void *arg)
{
       drm_unique32_t uq32;
       struct drm_unique uq64;
       int error;

       if ((error = copyin(&uq32, arg, sizeof(uq32))) != 0)
               return error;

       uq64.unique_len = uq32.unique_len;
       uq64.unique = NETBSD32PTR64(uq32.unique);

       error = drm_ioctl(file, DRM_IOCTL_GET_UNIQUE, &uq64);
       if (error)
               return error;

       //unique should already be copied
       uq32.unique_len = uq64.unique_len;

       if ((error = copyout(arg, &uq32, sizeof(uq32))) != 0)
               return error;

       return 0;
}

static int
compat_drm_setunique(struct file *file, void *arg)
{
       drm_unique32_t uq32;
       struct drm_unique uq64;
       int error;

       if ((error = copyin(&uq32, arg, sizeof(uq32))) != 0)
               return error;

       uq64.unique_len = uq32.unique_len;
       uq64.unique = NETBSD32PTR64(uq32.unique);

       error = drm_ioctl(file, DRM_IOCTL_SET_UNIQUE, &uq64);
       if (error)
               return error;

       // XXX: do we need copyout and copying the fields here?
       uq32.unique_len = uq64.unique_len;
       NETBSD32PTR32(uq32.unique, uq64.unique);

       return error;
}

typedef struct drm_map32 {
       uint32_t offset;          /**< Req. physical address (0 for SAREA) */
       uint32_t size;            /**< Requested physical size (bytes) */
       enum drm_map_type type;   /**< Type of memory to map */
       enum drm_map_flags flags; /**< Flags */
       netbsd32_pointer_t handle;/**< User-space: "Handle" to pass to mmap() */
       int mtrr;                 /**< MTRR slot used */
} drm_map32_t;

static void
map32to64(struct drm_map *m64, const drm_map32_t *m32)
{
       m64->offset = m32->offset;
       m64->size = m32->size;
       m64->type = m32->type;
       m64->flags = m32->flags;
       m64->handle = NETBSD32PTR64(m32->handle);
       m64->mtrr = m32->mtrr;
}

static void
map64to32(drm_map32_t *m32, const struct drm_map *m64)
{
       m32->offset = m64->offset;
       m32->size = m64->size;
       m32->type = m64->type;
       m32->flags = m64->flags;
       NETBSD32PTR32(m32->handle, m64->handle);
       m32->mtrr = m64->mtrr;
}

static int
compat_drm_getmap(struct file *file, void *arg)
{
       drm_map32_t m32;
       struct drm_map m64;
       int error;

       if ((error = copyin(&m32, arg, sizeof(m32))) != 0)
               return error;

       map32to64(&m64, &m32);

       error = drm_ioctl(file, DRM_IOCTL_GET_MAP, &m64);
       if (error)
               return error;

       map64to32(&m32, &m64);

       return copyout(arg, &m32, sizeof(m32));
}

static int
compat_drm_addmap(struct file *file, void *arg)
{
       drm_map32_t m32;
       struct drm_map m64;
       int error;

       if ((error = copyin(&m32, arg, sizeof(m32))) != 0)
               return error;

       map32to64(&m64, &m32);

       error = drm_ioctl(file, DRM_IOCTL_ADD_MAP, &m64);
       if (error)
               return error;

       map64to32(&m32, &m64);

       return copyout(arg, &m32, sizeof(m32));
}


static int
compat_drm_rmmap(struct file *file, void *arg)
{
       drm_map32_t m32;
       struct drm_map m64;
       int error;
       if ((error = copyin(&m32, arg, sizeof(m32))) != 0)
               return error;

       map32to64(&m64, &m32);

       error = drm_ioctl(file, DRM_IOCTL_RM_MAP, &m64);
       if (error)
               return error;

       map64to32(&m32, &m64);

       return copyout(arg, &m32, sizeof(m32));
}

typedef struct drm_client32 {
       int idx;        /**< Which client desired? */
       int auth;       /**< Is client authenticated? */
       uint32_t pid;   /**< Process ID */
       uint32_t uid;   /**< User ID */
       uint32_t magic; /**< Magic */
       uint32_t iocs;  /**< Ioctl count */
} drm_client32_t;

static void
client32to64(struct drm_client *c64, const drm_client32_t *c32)
{
       c64->idx = c32->idx;
       c64->auth = c32->auth;
       c64->pid = c32->pid;
       c64->uid = c32->uid;
       c64->iocs = c64->iocs;
}

static void
client64to32(drm_client32_t *c32, const struct drm_client *c64)
{
       c32->idx = c64->idx;
       c32->auth = c64->auth;
       c32->pid = c64->pid;
       c32->uid = c64->uid;
       c32->iocs = c64->iocs;
}
static int
compat_drm_getclient(struct file *file, void *arg)
{
       drm_client32_t c32;
       struct drm_client c64;
       int error;

       if ((error = copyin(&c32, arg, sizeof(c32))) != 0)
               return error;

       client32to64(&c64, &c32);

       error = drm_ioctl(file, DRM_IOCTL_GET_CLIENT, &c64);
       if (error)
               return error;

       client64to32(&c32, &c64);

       return copyout(arg, &c32, sizeof(c32));
}

typedef struct drm_stats32 {
       uint32_t count;
       struct {
               uint32_t value;
               enum drm_stat_type type;
       } data[15];
} drm_stats32_t;

static int
compat_drm_getstats(struct file *file, void *arg)
{
       drm_stats32_t st32;
       struct drm_stats st64;
       int error;

       if ((error = copyin(&st32, arg, sizeof(st32))) != 0)
               return error;

       st64.count = st32.count;
       if (st64.count > __arraycount(st64.data))
               return EINVAL;

       error = drm_ioctl(file, DRM_IOCTL_GET_STATS, &st64);
       if (error)
               return error;

       for (size_t i = 0; i < st64.count; ++i) {
               st32.data[i].value = st64.data[i].value;
               st32.data[i].type = st64.data[i].type;
       }
       st32.count = st64.count;

       return copyout(arg, &st32, sizeof(s32));
}

typedef struct drm_buf_desc32 {
       int count;               /**< Number of buffers of this size */
       int size;                /**< Size in bytes */
       int low_mark;            /**< Low water mark */
       int high_mark;           /**< High water mark */
       int flags;
       netbsd32_pointer_t agp_start;
                               /**< Start address in the AGP aperture */
} drm_buf_desc32_t;

static int
compat_drm_addbufs(struct file *file, void *arg)
{
       drm_buf_desc32_t buf32;
       struct drm_buf_desc buf64;
       int error;

       if ((error = copyin(&buf32, arg, sizeof(buf32))) != 0)
               return error;

       // XXX: assign 32->64
       buf64.agp_start = (unsigned long)NETBSD32PTR64(buf32.agp_start);

       error = drm_ioctl(file, DRM_IOCTL_ADD_BUFS, &buf64);
       if (error)
               return error;

       // XXX assign 64->32
       NETBSD32PTR32(buf32.agp_start, (void *)buf64.agp_start);

       return copyout(&buf32, arg, sizeof(buf32));
}

static int
compat_drm_markbufs(struct file *file, void *arg)
{
       drm_buf_desc32_t b32;
       struct drm_buf_desc b64;
       int error;

       if ((error = copyin(&b32, arg, sizeof(b32))) != 0)
               return error;

       b64.size = b32.size;
       b64.low_mark = b32.low_mark;
       b64.high_mark = b32.high_mark;
       //XXX: more stuff?

       return drm_ioctl(file, DRM_IOCTL_MARK_BUFS, &b64);
}

typedef struct drm_buf_info32 {
       int count;               /**< Entries in list */
       netbsd32_pointer_t list;
} drm_buf_info32_t;

typedef struct drm_buf_pub32 {
       int idx;                 /**< Index into the master buffer list */
       int total;               /**< Buffer size */
       int used;                /**< Amount of buffer in use (for DMA) */
       uint32_t address;        /**< Address of buffer */
} drm_buf_pub32_t;

typedef struct drm_buf_map32 {
       int count;               /**< Length of the buffer list */
       uint32_t virtual;        /**< Mmap'd area in user-virtual */
       netbsd32_pointer_t list; /**< Buffer information */
} drm_buf_map32_t;


typedef struct drm_buf_free32 {
       int count;
       netbsd32_pointer_t list;
} drm_buf_free32_t;

static int
compat_drm_freebufs(struct file *file, void *arg)
{
       drm_buf_free32_t req32;
       struct drm_buf_free req64;
       int error;

       if ((error = copyin(&req32, arg, sizeof(req32))) != 0)
               return error;

       req64.count = req32.count;
       req64.list = NETBSD32PTR64(req32.list);

       return drm_ioctl(file, DRM_IOCTL_FREE_BUFS, &req64);
}

typedef struct drm_ctx_priv_map32 {
       unsigned int ctx_id;             /**< Context requesting private mapping */
       netbsd32_pointer_t handle;       /**< Handle of map */
} drm_ctx_priv_map32_t;

static int
compat_drm_setsareactx(struct file *file, void *arg)
{
       drm_ctx_priv_map32_t req32;
       struct drm_ctx_priv_map req64;
       int error;

       if ((error = copyin(&req32, arg, sizeof(req32))) != 0)
               return error;

       req64.ctx_id = req32.ctx_id;
       req64.handle = NETBSD32PTR64(req32.handle);

       error = drm_ioctl(file, DRM_IOCTL_SET_SAREA_CTX, &req64);
       if(error)
               return error;

       req32.ctx_id = req64.ctx_id;
       NETBSD32PTR32(req32.handle, req64.handle);

       return 0;
}

static int
compat_drm_getsareactx(struct file *file, void *arg)
{
       struct drm_ctx_priv_map req64;
       drm_ctx_priv_map32_t req32;
       int error;

       if ((error = copyin(&req32, arg, sizeof(req32))) != 0)
               return error;

       req64.ctx_id = req32.ctx_id;

       error = drm_ioctl(file, DRM_IOCTL_GET_SAREA_CTX, &req64);
       if (error)
               return error;

       NETBSD32PTR32(req32.handle, req64.handle);
       // XXX: missing copyout?

       return copyout(arg, &req32, sizeof(req32));
}

typedef struct drm_ctx_res32 {
       int count;
       netbsd32_pointer_t contexts;
} drm_ctx_res32_t;

static int
compat_drm_resctx(struct file *file, void *arg)
{
       drm_ctx_res32_t res32;
       struct drm_ctx_res res64;
       int error;

       if ((error = copyin(&res32, arg, sizeof(res32))) != 0)
               return error;

       res64.count = res32.count;
       res64.contexts = NETBSD32PTR64(res32.contexts);

       error = drm_ioctl(file, DRM_IOCTL_RES_CTX, &res64);
       if (error)
               return error;

       res32.count = res64.count;
       NETBSD32PTR32(res32.contexts, res64.contexts);
       /* XXX: missing copyout */

       return copyout(arg, &res32, sizeof(res32));
}

typedef struct drm_dma32 {
       int context;                      /**< Context handle */
       int send_count;                   /**< Number of buffers to send */
       netbsd32_pointer_t send_indices;  /**< List of handles to buffers */
       netbsd32_pointer_t send_sizes;    /**< Lengths of data to send */
       enum drm_dma_flags flags;         /**< Flags */
       netbsd32_pointer_t request_count; /**< Number of buffers requested */
       int request_size;                 /**< Desired size for buffers */
       netbsd32_pointer_t request_indices; /**< Buffer information */
       netbsd32_pointer_t request_sizes;
       int granted_count;                /**< Number of buffers granted */
} drm_dma32_t;

static void
dma64to32(drm_dma32_t *d32, const struct drm_dma *d64)
{
       d32->send_count = d64->send_count;
       NETBSD32PTR32(d32->send_indices, d64->send_indices);
       NETBSD32PTR32(d32->send_sizes, d64->send_sizes);
       d32->flags = d64->flags;
       NETBSD32PTR32(d32->request_count, (void *)(long)d64->request_count);
       NETBSD32PTR32(d32->request_indices, d64->request_indices);
       NETBSD32PTR32(d32->request_sizes, d64->request_sizes);

}

static void
dma32to64(struct drm_dma *d64, const drm_dma32_t *d32)
{
       d64->request_size = d32->request_size;
       d64->granted_count = d32->granted_count;
}

static int
compat_drm_dma(struct file *file, void *arg)
{
       drm_dma32_t d32;
       struct drm_dma d64;
       int error;

       if ((error = copyin(&d32, arg, sizeof(d32))) != 0)
               return error;

       dma32to64(&d64, &d32);

       error = drm_ioctl(file, DRM_IOCTL_DMA, &d64);
       if (error)
               return error;

       dma64to32(&d32, &d64);

       return copyout(arg, &d32, sizeof(d32));
}

//XXX:i commented the below line for later use
#if IS_ENABLED(CONFIG_AGP)
typedef struct drm_agp_mode32 {
       uint32_t mode;  /**< AGP mode */
} drm_agp_mode32_t;

static int
compat_drm_agp_enable(struct file *file, void *arg)
{
       drm_agp_mode32_t m32;
       struct drm_agp_mode m64;
       int error;

       if ((error = copyin(&m32, arg, sizeof(m32))) != 0)
               return error;

       m64.mode = m32.mode;

       return drm_ioctl(file, DRM_IOCTL_AGP_ENABLE, &m64);
}

typedef struct drm_agp_info32 {
       int agp_version_major;
       int agp_version_minor;
       uint32_t mode;
       uint32_t aperture_base;         /* physical address */
       uint32_t aperture_size;         /* bytes */
       uint32_t memory_allowed;        /* bytes */
       uint32_t memory_used;

       /* PCI information */
       unsigned short id_vendor;
       unsigned short id_device;
} drm_agp_info32_t;

static void
info64to32(drm_agp_info32_t *i32, const struct drm_agp_info *i64)
{
       i32->agp_version_major = i64->agp_version_major;
       i32->agp_version_minor = i64->agp_version_minor;
       i32->mode = i64->mode;
       i32->aperture_base = i64->aperture_base;
       i32->aperture_size = i64->aperture_size;
       i32->memory_allowed = i64->memory_allowed;
       i32->memory_used = i64->memory_used;
       i32->id_vendor = i64->id_vendor;
       i32->id_device = i64->id_device;
}

static int
compat_drm_agp_info(struct file *file, void *arg)
{
       drm_agp_info32_t i32;
       struct drm_agp_info i64;
       int error;

       error = drm_ioctl(file, DRM_IOCTL_AGP_INFO, &i64);
       if (error)
               return error;

       info64to32(&i32, &i64);

       return copyout(arg, &i32, sizeof(i32));

}

typedef struct drm_agp_buffer32 {
       uint32_t size;          /**< In bytes -- will round to page boundary */
       uint32_t handle;        /**< Used for binding / unbinding */
       uint32_t type;          /**< Type of memory to allocate */
       uint32_t physical;      /**< Physical used by i810 */
} drm_agp_buffer32_t;

static int
compat_drm_agp_alloc(struct file *file, void *arg)
{
       drm_agp_buffer32_t req32;
       struct drm_agp_buffer req64;
       int error;

       if ((error = copyin(&req32, arg, sizeof(req32))) != 0)
               return error;

       req64.size = req32.size;
       req64.type = req32.type;

       error = drm_ioctl(file, DRM_IOCTL_AGP_ALLOC, &req64);
       if (error)
               return error;

       req32.handle = req64.handle;
       req32.physical = req64.physical;

       drm_ioctl(file, DRM_IOCTL_AGP_FREE, &req64);

       return copyout(arg, &req32, sizeof(req32));
}

static int
compat_drm_agp_free(struct file *file, void *arg)
{
       drm_agp_buffer32_t req32;
       struct drm_agp_buffer req64;
       int error;
       uint32_t handle;

       if ((error = copyin(&req32, arg, sizeof(req32))) != 0)
               return error;

       handle = req32.handle;
       req64.handle = handle;

       return drm_ioctl(file, DRM_IOCTL_AGP_FREE, &req64);
}

typedef struct drm_agp_binding32 {
       uint32_t handle;        /**< From drm_agp_buffer */
       uint32_t offset;        /**< In bytes -- will round to page boundary */
} drm_agp_binding32_t;

static int
compat_drm_agp_bind(struct file *file, void *arg)
{
       drm_agp_binding32_t req32;
       struct drm_agp_binding req64;
       int error;

       if ((error = copyin(&req32, arg, sizeof(req32))) !=0 )
               return error;

       req64.handle = req32.handle;
       req64.offset = req32.offset;

       return drm_ioctl(file, DRM_IOCTL_AGP_BIND, &req64);
}

static int
compat_drm_agp_unbind(struct file *file, void *arg)
{
       struct drm_agp_binding req64;
       drm_agp_binding32_t req32;
       uint32_t handle;
       int error;

       if ((error = copyin(&req32, arg, sizeof(req32))) != 0)
               return error;

       handle = req32.handle;
       req64.handle = handle;

       return drm_ioctl(file, DRM_IOCTL_AGP_UNBIND, &req64);
}
#endif /* CONFIG_AGP */

typedef struct drm_scatter_gather32 {
       uint32_t size;          /**< In bytes -- will round to page boundary */
       uint32_t handle;        /**< Used for mapping / unmapping */
} drm_scatter_gather32_t;

static int
compat_drm_sg_alloc(struct file *file, void *arg)
{
       struct drm_scatter_gather req64;
       drm_scatter_gather32_t req32;
       int error;

       if ((error = copyin(&req32, arg, sizeof(req32))) != 0)
               return error;

       req64.size = req32.size;

       error = drm_ioctl(file, DRM_IOCTL_SG_ALLOC, &req64);
       if (error)
               return error;

       /* XXX not sure about the handle conversion here... */
       req32.handle = req64.handle >> PAGE_SHIFT;

       return 0;
}

static int
compat_drm_sg_free(struct file *file, void *arg)
{
       struct drm_scatter_gather req64;
       unsigned long x;
       drm_scatter_gather32_t req32;
       int error;

       if((error = copyin(&req32, arg, sizeof(req32))) != 0)
               return error;

       x = req32.handle;
       req64.handle = x << PAGE_SHIFT;

       return drm_ioctl(file, DRM_IOCTL_SG_FREE, &req64);
}

#if defined(CONFIG_X86) || defined(CONFIG_IA64)
typedef struct drm_update_draw32 {
       drm_drawable_t handle;
       unsigned int type;
       unsigned int num;
       /* 64-bit version has a 32-bit pad here */
       uint64_t data;  /**< Pointer */
} __attribute__((__packed__)) drm_update_draw32_t;

static void
update32to64(struct drm_update_draw *req64, const drm_update_draw32_t *update32)
{
       req64->handle = update32->handle;
       req64->type = update32->type;
       req64->num = update32->num;
       req64->data = update32->data;
}
static int
compat_drm_update_draw(struct file *file, void *arg)
{
       drm_update_draw32_t update32;
       struct drm_update_draw req64;
       int error;

       if ((error = copyin(&update32, arg, sizeof(update32))) !=0)
               return error;

       update32to64(&req64, &update32);

       error = drm_ioctl(file, DRM_IOCTL_UPDATE_DRAW, &req64);
       return error;
}
#endif

struct drm_wait_vblank_request32 {
       enum drm_vblank_seq_type type;
       unsigned int sequence;
       uint32_t signal;
};

struct drm_wait_vblank_reply32 {
       enum drm_vblank_seq_type type;
       unsigned int sequence;
       s32 tval_sec;
       s32 tval_usec;
};

typedef union drm_wait_vblank32 {
       struct drm_wait_vblank_request32 request;
       struct drm_wait_vblank_reply32 reply;
} drm_wait_vblank32_t;

static void
req32to64(union drm_wait_vblank *req64, const drm_wait_vblank32_t *req32)
{
       req64->request.type = req32->request.type;
       req64->request.sequence = req32->request.sequence;
       req64->request.signal = req32->request.signal;
}

static void
req64to32(drm_wait_vblank32_t *req32, const union drm_wait_vblank *req64)
{
       req32->reply.sequence = req64->reply.sequence;
       req32->reply.tval_sec = req64->reply.tval_sec;
       req32->reply.tval_usec = req64->reply.tval_usec;
}

static int
compat_drm_wait_vblank(struct file *file, void *arg)
{
       drm_wait_vblank32_t req32;
       union drm_wait_vblank req64;
       int error;

       if ((error = copyin(&req32, arg, sizeof(req32))) != 0)
               return error;

       req32to64(&req64, &req32);

       error = drm_ioctl(file, DRM_IOCTL_WAIT_VBLANK, &req64);
       if (error)
               return error;

       req64to32(&req32, &req64);

       return copyout(arg, &req32, sizeof(req32));
}

#if defined(CONFIG_X86) || defined(CONFIG_IA64)
typedef struct drm_mode_fb_cmd232 {
       uint32_t fb_id;
       uint32_t width;
       uint32_t height;
       uint32_t pixel_format;
       uint32_t flags;
       uint32_t handles[4];
       uint32_t pitches[4];
       uint32_t offsets[4];
       uint64_t modifier[4];
} __attribute__((__packed__)) drm_mode_fb_cmd232_t;

static void
map_req32to64(struct drm_mode_fb_cmd2 *req64, struct drm_mode_fb_cmd232 *req32)
{
       req64->width = req32->width;
       req64->height = req32->height;
       req64->pixel_format = req32->pixel_format;
       req64->flags = req32->flags;
}

static int
compat_drm_mode_addfb2(struct file *file, void *arg)
{
       struct drm_mode_fb_cmd232 req32;
       struct drm_mode_fb_cmd2 req64;
       int error;

       if ((error = copyin(&req32, arg, sizeof(req32))) != 0)
               return error;

       map_req32to64(&req64, &req32);

       for (int i = 0; i < 4; i++){
               req64.handles[i] = req32.handles[i];
               req64.pitches[i] = req32.pitches[i];
               req64.offsets[i] = req32.offsets[i];
               req64.modifier[i] = req32.modifier[i];
       }

       error = drm_ioctl(file, DRM_IOCTL_MODE_ADDFB2, &req64);
       if (error)
               return error;

       req32.fb_id = req64.fb_id;

       return copyout(arg, &req32, sizeof(req32));
}
#endif

int
netbsd32_drm_ioctl(struct file *file, unsigned long cmd, void *arg,
   struct lwp *l)
{
       switch (cmd) {
       case DRM_IOCTL_VERSION32:
               return compat_drm_version(file, arg);
       case DRM_IOCTL_GET_UNIQUE32:
               return compat_drm_getunique(file, arg);
       case DRM_IOCTL_SET_UNIQUE32:
               return compat_drm_setunique(file, arg);
       case DRM_IOCTL_GET_MAP32:
               return compat_drm_getmap(file, arg);
       case DRM_IOCTL_ADD_MAP32:
               return compat_drm_addmap(file, arg);
       case DRM_IOCTL_RM_MAP32:
               return compat_drm_rmmap(file, arg);
       case DRM_IOCTL_GET_CLIENT32:
               return compat_drm_getclient(file, arg);
       case DRM_IOCTL_GET_STATS32:
               return compat_drm_getstats(file, arg);
       case DRM_IOCTL_ADD_BUFS32:
               return compat_drm_addbufs(file, arg);
       case DRM_IOCTL_MARK_BUFS32:
               return compat_drm_markbufs(file, arg);
       case DRM_IOCTL_FREE_BUFS32:
               return compat_drm_freebufs(file, arg);
       case DRM_IOCTL_SET_SAREA_CTX32:
               return compat_drm_setsareactx(file, arg);
       case DRM_IOCTL_GET_SAREA_CTX32:
               return compat_drm_getsareactx(file, arg);
       case DRM_IOCTL_RES_CTX32:
               return compat_drm_resctx(file, arg);
       case DRM_IOCTL_DMA32:
               return compat_drm_dma(file, arg);
       case  DRM_IOCTL_AGP_ENABLE32:
               return compat_drm_agp_enable(file, arg);
       case DRM_IOCTL_AGP_INFO32:
               return compat_drm_agp_info(file, arg);
       case DRM_IOCTL_AGP_ALLOC32:
               return compat_drm_agp_alloc(file,arg);
       case DRM_IOCTL_AGP_UNBIND32:
               return compat_drm_agp_unbind(file, arg);
       case DRM_IOCTL_AGP_BIND32:
               return compat_drm_agp_bind(file, arg);
       case DRM_IOCTL_AGP_FREE32:
               return compat_drm_agp_free(file, arg);
       case DRM_IOCTL_SG_ALLOC32:
               return compat_drm_sg_alloc(file, arg);
       case  DRM_IOCTL_MODE_ADDFB232:
               return compat_drm_mode_addfb2(file, arg);
       case DRM_IOCTL_WAIT_VBLANK32:
               return compat_drm_wait_vblank(file, arg);
       case DRM_IOCTL_UPDATE_DRAW32:
               return compat_drm_update_draw(file, arg);
       case DRM_IOCTL_SG_FREE32:
               return compat_drm_sg_free(file, arg);
       default:
               return EINVAL;
       }
}