/*
  Simple DirectMedia Layer
  Copyright (C) 1997-2024 Sam Lantinga <slouken@libsdl.org>

  This software is provided 'as-is', without any express or implied
  warranty.  In no event will the authors be held liable for any damages
  arising from the use of this software.

  Permission is granted to anyone to use this software for any purpose,
  including commercial applications, and to alter it and redistribute it
  freely, subject to the following restrictions:

  1. The origin of this software must not be misrepresented; you must not
     claim that you wrote the original software. If you use this software
     in a product, an acknowledgment in the product documentation would be
     appreciated but is not required.
  2. Altered source versions must be plainly marked as such, and must not be
     misrepresented as being the original software.
  3. This notice may not be removed or altered from any source distribution.
*/
#include "SDL_internal.h"

#ifdef SDL_INPUT_LINUXEV

/* This is based on the linux joystick driver */
/* References: https://www.kernel.org/doc/Documentation/input/input.txt
 *             https://www.kernel.org/doc/Documentation/input/event-codes.txt
 *             /usr/include/linux/input.h
 *             The evtest application is also useful to debug the protocol
 */

#include "SDL_evdev.h"
#include "SDL_evdev_kbd.h"

#include <sys/stat.h>
#include <unistd.h>
#include <fcntl.h>
#include <sys/ioctl.h>
#include <linux/input.h>

#include "../../events/SDL_events_c.h"
#include "../../events/SDL_scancode_tables_c.h"
#include "../../core/linux/SDL_evdev_capabilities.h"
#include "../../core/linux/SDL_udev.h"

/* These are not defined in older Linux kernel headers */
#ifndef SYN_DROPPED
#define SYN_DROPPED 3
#endif
#ifndef ABS_MT_SLOT
#define ABS_MT_SLOT        0x2f
#define ABS_MT_POSITION_X  0x35
#define ABS_MT_POSITION_Y  0x36
#define ABS_MT_TRACKING_ID 0x39
#define ABS_MT_PRESSURE    0x3a
#endif
#ifndef REL_WHEEL_HI_RES
#define REL_WHEEL_HI_RES  0x0b
#define REL_HWHEEL_HI_RES 0x0c
#endif

/* The field to look up in struct input_event for integer seconds */
#ifndef input_event_sec
#define input_event_sec time.tv_sec
#endif

/* The field to look up in struct input_event for fractional seconds */
#ifndef input_event_usec
#define input_event_usec time.tv_usec
#endif

typedef struct SDL_evdevlist_item
{
    char *path;
    int fd;
    int udev_class;

    /* TODO: use this for every device, not just touchscreen */
    SDL_bool out_of_sync;

    /* TODO: expand on this to have data for every possible class (mouse,
       keyboard, touchpad, etc.). Also there's probably some things in here we
       can pull out to the SDL_evdevlist_item i.e. name */
    SDL_bool is_touchscreen;
    struct
    {
        char *name;

        int min_x, max_x, range_x;
        int min_y, max_y, range_y;
        int min_pressure, max_pressure, range_pressure;

        int max_slots;
        int current_slot;
        struct
        {
            enum
            {
                EVDEV_TOUCH_SLOTDELTA_NONE = 0,
                EVDEV_TOUCH_SLOTDELTA_DOWN,
                EVDEV_TOUCH_SLOTDELTA_UP,
                EVDEV_TOUCH_SLOTDELTA_MOVE
            } delta;
            int tracking_id;
            int x, y, pressure;
        } *slots;

    } *touchscreen_data;

    /* Mouse state */
    SDL_bool high_res_wheel;
    SDL_bool high_res_hwheel;
    SDL_bool relative_mouse;
    int mouse_x, mouse_y;
    int mouse_wheel, mouse_hwheel;
    int min_x, max_x, range_x;
    int min_y, max_y, range_y;

    struct SDL_evdevlist_item *next;
} SDL_evdevlist_item;

typedef struct SDL_EVDEV_PrivateData
{
    int ref_count;
    int num_devices;
    SDL_evdevlist_item *first;
    SDL_evdevlist_item *last;
    SDL_EVDEV_keyboard_state *kbd;
} SDL_EVDEV_PrivateData;

static SDL_EVDEV_PrivateData *_this = NULL;

static SDL_Scancode SDL_EVDEV_translate_keycode(int keycode);
static void SDL_EVDEV_sync_device(SDL_evdevlist_item *item);
static int SDL_EVDEV_device_removed(const char *dev_path);

static int SDL_EVDEV_device_added(const char *dev_path, int udev_class);
#ifdef SDL_USE_LIBUDEV
static void SDL_EVDEV_udev_callback(SDL_UDEV_deviceevent udev_event, int udev_class, const char *dev_path);
#endif /* SDL_USE_LIBUDEV */

static Uint8 EVDEV_MouseButtons[] = {
    SDL_BUTTON_LEFT,   /*  BTN_LEFT        0x110 */
    SDL_BUTTON_RIGHT,  /*  BTN_RIGHT       0x111 */
    SDL_BUTTON_MIDDLE, /*  BTN_MIDDLE      0x112 */
    SDL_BUTTON_X1,     /*  BTN_SIDE        0x113 */
    SDL_BUTTON_X2,     /*  BTN_EXTRA       0x114 */
    SDL_BUTTON_X2 + 1, /*  BTN_FORWARD     0x115 */
    SDL_BUTTON_X2 + 2, /*  BTN_BACK        0x116 */
    SDL_BUTTON_X2 + 3  /*  BTN_TASK        0x117 */
};

static int SDL_EVDEV_SetRelativeMouseMode(SDL_bool enabled)
{
    /* Mice already send relative events through this interface */
    return 0;
}

static void SDL_EVDEV_UpdateKeyboardMute(void)
{
    if (SDL_EVDEV_GetDeviceCount(SDL_UDEV_DEVICE_KEYBOARD) > 0) {
        SDL_EVDEV_kbd_set_muted(_this->kbd, SDL_TRUE);
    } else {
        SDL_EVDEV_kbd_set_muted(_this->kbd, SDL_FALSE);
    }
}

int SDL_EVDEV_Init(void)
{
    if (!_this) {
        _this = (SDL_EVDEV_PrivateData *)SDL_calloc(1, sizeof(*_this));
        if (!_this) {
            return -1;
        }

#ifdef SDL_USE_LIBUDEV
        if (SDL_UDEV_Init() < 0) {
            SDL_free(_this);
            _this = NULL;
            return -1;
        }

        /* Set up the udev callback */
        if (SDL_UDEV_AddCallback(SDL_EVDEV_udev_callback) < 0) {
            SDL_UDEV_Quit();
            SDL_free(_this);
            _this = NULL;
            return -1;
        }

        /* Force a scan to build the initial device list */
        SDL_UDEV_Scan();
#else
        {
            /* Allow the user to specify a list of devices explicitly of
               the form:
                  deviceclass:path[,deviceclass:path[,...]]
               where device class is an integer representing the
               SDL_UDEV_deviceclass and path is the full path to
               the event device. */
            const char *devices = SDL_getenv("SDL_EVDEV_DEVICES");
            if (devices) {
                /* Assume this is the old use of the env var and it is not in
                   ROM. */
                char *rest = (char *)devices;
                char *spec;
                while ((spec = SDL_strtok_r(rest, ",", &rest))) {
                    char *endofcls = 0;
                    long cls = SDL_strtol(spec, &endofcls, 0);
                    if (endofcls) {
                        SDL_EVDEV_device_added(endofcls + 1, cls);
                    }
                }
            } else {
                /* TODO: Scan the devices manually, like a caveman */
            }
        }
#endif /* SDL_USE_LIBUDEV */

        _this->kbd = SDL_EVDEV_kbd_init();

        SDL_EVDEV_UpdateKeyboardMute();
    }

    SDL_GetMouse()->SetRelativeMouseMode = SDL_EVDEV_SetRelativeMouseMode;

    _this->ref_count += 1;

    return 0;
}

void SDL_EVDEV_Quit(void)
{
    if (!_this) {
        return;
    }

    _this->ref_count -= 1;

    if (_this->ref_count < 1) {
#ifdef SDL_USE_LIBUDEV
        SDL_UDEV_DelCallback(SDL_EVDEV_udev_callback);
        SDL_UDEV_Quit();
#endif /* SDL_USE_LIBUDEV */

        /* Remove existing devices */
        while (_this->first) {
            SDL_EVDEV_device_removed(_this->first->path);
        }

        SDL_EVDEV_kbd_quit(_this->kbd);

        SDL_assert(_this->first == NULL);
        SDL_assert(_this->last == NULL);
        SDL_assert(_this->num_devices == 0);

        SDL_free(_this);
        _this = NULL;
    }
}

#ifdef SDL_USE_LIBUDEV
static void SDL_EVDEV_udev_callback(SDL_UDEV_deviceevent udev_event, int udev_class,
                                    const char *dev_path)
{
    if (!dev_path) {
        return;
    }

    switch (udev_event) {
    case SDL_UDEV_DEVICEADDED:
        if (!(udev_class & (SDL_UDEV_DEVICE_MOUSE | SDL_UDEV_DEVICE_HAS_KEYS | SDL_UDEV_DEVICE_TOUCHSCREEN | SDL_UDEV_DEVICE_TOUCHPAD))) {
            return;
        }

        if (udev_class & SDL_UDEV_DEVICE_JOYSTICK) {
            return;
        }

        SDL_EVDEV_device_added(dev_path, udev_class);
        break;
    case SDL_UDEV_DEVICEREMOVED:
        SDL_EVDEV_device_removed(dev_path);
        break;
    default:
        break;
    }
}
#endif /* SDL_USE_LIBUDEV */

void SDL_EVDEV_SetVTSwitchCallbacks(void (*release_callback)(void*), void *release_callback_data,
                                    void (*acquire_callback)(void*), void *acquire_callback_data)
{
    SDL_EVDEV_kbd_set_vt_switch_callbacks(_this->kbd,
                                          release_callback, release_callback_data,
                                          acquire_callback, acquire_callback_data);
}

int SDL_EVDEV_GetDeviceCount(int device_class)
{
    SDL_evdevlist_item *item;
    int count = 0;

    for (item = _this->first; item; item = item->next) {
        if ((item->udev_class & device_class) == device_class) {
            ++count;
        }
    }
    return count;
}

void SDL_EVDEV_Poll(void)
{
    struct input_event events[32];
    int i, j, len;
    SDL_evdevlist_item *item;
    SDL_Scancode scan_code;
    int mouse_button;
    SDL_Mouse *mouse;
    float norm_x, norm_y, norm_pressure;

    if (!_this) {
        return;
    }

#ifdef SDL_USE_LIBUDEV
    SDL_UDEV_Poll();
#endif

    SDL_EVDEV_kbd_update(_this->kbd);

    mouse = SDL_GetMouse();

    for (item = _this->first; item; item = item->next) {
        while ((len = read(item->fd, events, sizeof(events))) > 0) {
            len /= sizeof(events[0]);
            for (i = 0; i < len; ++i) {
                struct input_event *event = &events[i];

                /* special handling for touchscreen, that should eventually be
                   used for all devices */
                if (item->out_of_sync && item->is_touchscreen &&
                    event->type == EV_SYN && event->code != SYN_REPORT) {
                    break;
                }

                switch (event->type) {
                case EV_KEY:
                    if (event->code >= BTN_MOUSE && event->code < BTN_MOUSE + SDL_arraysize(EVDEV_MouseButtons)) {
                        mouse_button = event->code - BTN_MOUSE;
                        if (event->value == 0) {
                            SDL_SendMouseButton(SDL_EVDEV_GetEventTimestamp(event), mouse->focus, (SDL_MouseID)item->fd, SDL_RELEASED, EVDEV_MouseButtons[mouse_button]);
                        } else if (event->value == 1) {
                            SDL_SendMouseButton(SDL_EVDEV_GetEventTimestamp(event), mouse->focus, (SDL_MouseID)item->fd, SDL_PRESSED, EVDEV_MouseButtons[mouse_button]);
                        }
                        break;
                    }

                    /* BTN_TOUCH event value 1 indicates there is contact with
                       a touchscreen or trackpad (earlist finger's current
                       position is sent in EV_ABS ABS_X/ABS_Y, switching to
                       next finger after earlist is released) */
                    if (item->is_touchscreen && event->code == BTN_TOUCH) {
                        if (item->touchscreen_data->max_slots == 1) {
                            if (event->value) {
                                item->touchscreen_data->slots[0].delta = EVDEV_TOUCH_SLOTDELTA_DOWN;
                            } else {
                                item->touchscreen_data->slots[0].delta = EVDEV_TOUCH_SLOTDELTA_UP;
                            }
                        }
                        break;
                    }

                    /* Probably keyboard */
                    scan_code = SDL_EVDEV_translate_keycode(event->code);
                    if (scan_code != SDL_SCANCODE_UNKNOWN) {
                        if (event->value == 0) {
                            SDL_SendKeyboardKey(SDL_EVDEV_GetEventTimestamp(event), (SDL_KeyboardID)item->fd, SDL_RELEASED, scan_code);
                        } else if (event->value == 1 || event->value == 2 /* key repeated */) {
                            SDL_SendKeyboardKey(SDL_EVDEV_GetEventTimestamp(event), (SDL_KeyboardID)item->fd, SDL_PRESSED, scan_code);
                        }
                    }
                    SDL_EVDEV_kbd_keycode(_this->kbd, event->code, event->value);
                    break;
                case EV_ABS:
                    switch (event->code) {
                    case ABS_MT_SLOT:
                        if (!item->is_touchscreen) { /* FIXME: temp hack */
                            break;
                        }
                        item->touchscreen_data->current_slot = event->value;
                        break;
                    case ABS_MT_TRACKING_ID:
                        if (!item->is_touchscreen) { /* FIXME: temp hack */
                            break;
                        }
                        if (event->value >= 0) {
                            item->touchscreen_data->slots[item->touchscreen_data->current_slot].tracking_id = event->value + 1;
                            item->touchscreen_data->slots[item->touchscreen_data->current_slot].delta = EVDEV_TOUCH_SLOTDELTA_DOWN;
                        } else {
                            item->touchscreen_data->slots[item->touchscreen_data->current_slot].delta = EVDEV_TOUCH_SLOTDELTA_UP;
                        }
                        break;
                    case ABS_MT_POSITION_X:
                        if (!item->is_touchscreen) { /* FIXME: temp hack */
                            break;
                        }
                        item->touchscreen_data->slots[item->touchscreen_data->current_slot].x = event->value;
                        if (item->touchscreen_data->slots[item->touchscreen_data->current_slot].delta == EVDEV_TOUCH_SLOTDELTA_NONE) {
                            item->touchscreen_data->slots[item->touchscreen_data->current_slot].delta = EVDEV_TOUCH_SLOTDELTA_MOVE;
                        }
                        break;
                    case ABS_MT_POSITION_Y:
                        if (!item->is_touchscreen) { /* FIXME: temp hack */
                            break;
                        }
                        item->touchscreen_data->slots[item->touchscreen_data->current_slot].y = event->value;
                        if (item->touchscreen_data->slots[item->touchscreen_data->current_slot].delta == EVDEV_TOUCH_SLOTDELTA_NONE) {
                            item->touchscreen_data->slots[item->touchscreen_data->current_slot].delta = EVDEV_TOUCH_SLOTDELTA_MOVE;
                        }
                        break;
                    case ABS_MT_PRESSURE:
                        if (!item->is_touchscreen) { /* FIXME: temp hack */
                            break;
                        }
                        item->touchscreen_data->slots[item->touchscreen_data->current_slot].pressure = event->value;
                        if (item->touchscreen_data->slots[item->touchscreen_data->current_slot].delta == EVDEV_TOUCH_SLOTDELTA_NONE) {
                            item->touchscreen_data->slots[item->touchscreen_data->current_slot].delta = EVDEV_TOUCH_SLOTDELTA_MOVE;
                        }
                        break;
                    case ABS_X:
                        if (item->is_touchscreen) {
                            if (item->touchscreen_data->max_slots != 1) {
                                break;
                            }
                            item->touchscreen_data->slots[0].x = event->value;
                        } else if (!item->relative_mouse) {
                            item->mouse_x = event->value;
                        }
                        break;
                    case ABS_Y:
                        if (item->is_touchscreen) {
                            if (item->touchscreen_data->max_slots != 1) {
                                break;
                            }
                            item->touchscreen_data->slots[0].y = event->value;
                        } else if (!item->relative_mouse) {
                            item->mouse_y = event->value;
                        }
                        break;
                    default:
                        break;
                    }
                    break;
                case EV_REL:
                    switch (event->code) {
                    case REL_X:
                        if (item->relative_mouse) {
                            item->mouse_x += event->value;
                        }
                        break;
                    case REL_Y:
                        if (item->relative_mouse) {
                            item->mouse_y += event->value;
                        }
                        break;
                    case REL_WHEEL:
                        if (!item->high_res_wheel) {
                            item->mouse_wheel += event->value;
                        }
                        break;
                    case REL_WHEEL_HI_RES:
                        SDL_assert(item->high_res_wheel);
                        item->mouse_wheel += event->value;
                        break;
                    case REL_HWHEEL:
                        if (!item->high_res_hwheel) {
                            item->mouse_hwheel += event->value;
                        }
                        break;
                    case REL_HWHEEL_HI_RES:
                        SDL_assert(item->high_res_hwheel);
                        item->mouse_hwheel += event->value;
                        break;
                    default:
                        break;
                    }
                    break;
                case EV_SYN:
                    switch (event->code) {
                    case SYN_REPORT:
                        /* Send mouse axis changes together to ensure consistency and reduce event processing overhead */
                        if (item->relative_mouse) {
                            if (item->mouse_x != 0 || item->mouse_y != 0) {
                                SDL_SendMouseMotion(SDL_EVDEV_GetEventTimestamp(event), mouse->focus, (SDL_MouseID)item->fd, item->relative_mouse, (float)item->mouse_x, (float)item->mouse_y);
                                item->mouse_x = item->mouse_y = 0;
                            }
                        } else if (item->range_x > 0 && item->range_y > 0) {
                            int screen_w = 0, screen_h = 0;
                            const SDL_DisplayMode *mode = NULL;

                            if (mouse->focus) {
                                mode = SDL_GetCurrentDisplayMode(SDL_GetDisplayForWindow(mouse->focus));
                            }
                            if (!mode) {
                                mode = SDL_GetCurrentDisplayMode(SDL_GetPrimaryDisplay());
                            }
                            if (mode) {
                                screen_w = mode->w;
                                screen_h = mode->h;
                            }
                            SDL_SendMouseMotion(SDL_EVDEV_GetEventTimestamp(event), mouse->focus, (SDL_MouseID)item->fd, item->relative_mouse,
                                (float)(item->mouse_x - item->min_x) * screen_w / item->range_x,
                                (float)(item->mouse_y - item->min_y) * screen_h / item->range_y);
                        }

                        if (item->mouse_wheel != 0 || item->mouse_hwheel != 0) {
                            SDL_SendMouseWheel(SDL_EVDEV_GetEventTimestamp(event),
                                               mouse->focus, (SDL_MouseID)item->fd,
                                               item->mouse_hwheel / (item->high_res_hwheel ? 120.0f : 1.0f),
                                               item->mouse_wheel / (item->high_res_wheel ? 120.0f : 1.0f),
                                               SDL_MOUSEWHEEL_NORMAL);
                            item->mouse_wheel = item->mouse_hwheel = 0;
                        }

                        if (!item->is_touchscreen) { /* FIXME: temp hack */
                            break;
                        }

                        for (j = 0; j < item->touchscreen_data->max_slots; j++) {
                            norm_x = (float)(item->touchscreen_data->slots[j].x - item->touchscreen_data->min_x) /
                                     (float)item->touchscreen_data->range_x;
                            norm_y = (float)(item->touchscreen_data->slots[j].y - item->touchscreen_data->min_y) /
                                     (float)item->touchscreen_data->range_y;

                            if (item->touchscreen_data->range_pressure > 0) {
                                norm_pressure = (float)(item->touchscreen_data->slots[j].pressure - item->touchscreen_data->min_pressure) /
                                                (float)item->touchscreen_data->range_pressure;
                            } else {
                                /* This touchscreen does not support pressure */
                                norm_pressure = 1.0f;
                            }

                            /* FIXME: the touch's window shouldn't be null, but
                             * the coordinate space of touch positions needs to
                             * be window-relative in that case. */
                            switch (item->touchscreen_data->slots[j].delta) {
                            case EVDEV_TOUCH_SLOTDELTA_DOWN:
                                SDL_SendTouch(SDL_EVDEV_GetEventTimestamp(event), item->fd, item->touchscreen_data->slots[j].tracking_id, NULL, SDL_TRUE, norm_x, norm_y, norm_pressure);
                                item->touchscreen_data->slots[j].delta = EVDEV_TOUCH_SLOTDELTA_NONE;
                                break;
                            case EVDEV_TOUCH_SLOTDELTA_UP:
                                SDL_SendTouch(SDL_EVDEV_GetEventTimestamp(event), item->fd, item->touchscreen_data->slots[j].tracking_id, NULL, SDL_FALSE, norm_x, norm_y, norm_pressure);
                                item->touchscreen_data->slots[j].tracking_id = 0;
                                item->touchscreen_data->slots[j].delta = EVDEV_TOUCH_SLOTDELTA_NONE;
                                break;
                            case EVDEV_TOUCH_SLOTDELTA_MOVE:
                                SDL_SendTouchMotion(SDL_EVDEV_GetEventTimestamp(event), item->fd, item->touchscreen_data->slots[j].tracking_id, NULL, norm_x, norm_y, norm_pressure);
                                item->touchscreen_data->slots[j].delta = EVDEV_TOUCH_SLOTDELTA_NONE;
                                break;
                            default:
                                break;
                            }
                        }

                        if (item->out_of_sync) {
                            item->out_of_sync = SDL_FALSE;
                        }
                        break;
                    case SYN_DROPPED:
                        if (item->is_touchscreen) {
                            item->out_of_sync = SDL_TRUE;
                        }
                        SDL_EVDEV_sync_device(item);
                        break;
                    default:
                        break;
                    }
                    break;
                }
            }
        }
    }
}

static SDL_Scancode SDL_EVDEV_translate_keycode(int keycode)
{
    SDL_Scancode scancode = SDL_GetScancodeFromTable(SDL_SCANCODE_TABLE_LINUX, keycode);

#ifdef DEBUG_SCANCODES
    if (scancode == SDL_SCANCODE_UNKNOWN) {
        /* BTN_TOUCH is handled elsewhere, but we might still end up here if
           you get an unexpected BTN_TOUCH from something SDL believes is not
           a touch device. In this case, we'd rather not get a misleading
           SDL_Log message about an unknown key. */
        if (keycode != BTN_TOUCH) {
            SDL_Log("The key you just pressed is not recognized by SDL. To help "
                    "get this fixed, please report this to the SDL forums/mailing list "
                    "<https://discourse.libsdl.org/> EVDEV KeyCode %d",
                    keycode);
        }
    }
#endif /* DEBUG_SCANCODES */

    return scancode;
}

static int SDL_EVDEV_init_keyboard(SDL_evdevlist_item *item, int udev_class)
{
    char name[128];

    name[0] = '\0';
    ioctl(item->fd, EVIOCGNAME(sizeof(name)), name);

    SDL_AddKeyboard((SDL_KeyboardID)item->fd, name, SDL_TRUE);

    return 0;
}

static void SDL_EVDEV_destroy_keyboard(SDL_evdevlist_item *item)
{
    SDL_RemoveKeyboard((SDL_KeyboardID)item->fd);
}

static int SDL_EVDEV_init_mouse(SDL_evdevlist_item *item, int udev_class)
{
    char name[128];
    int ret;
    struct input_absinfo abs_info;

    name[0] = '\0';
    ioctl(item->fd, EVIOCGNAME(sizeof(name)), name);

    SDL_AddMouse((SDL_MouseID)item->fd, name, SDL_TRUE);

    ret = ioctl(item->fd, EVIOCGABS(ABS_X), &abs_info);
    if (ret < 0) {
        // no absolute mode info, continue
        return 0;
    }
    item->min_x = abs_info.minimum;
    item->max_x = abs_info.maximum;
    item->range_x = abs_info.maximum - abs_info.minimum;

    ret = ioctl(item->fd, EVIOCGABS(ABS_Y), &abs_info);
    if (ret < 0) {
        // no absolute mode info, continue
        return 0;
    }
    item->min_y = abs_info.minimum;
    item->max_y = abs_info.maximum;
    item->range_y = abs_info.maximum - abs_info.minimum;

    return 0;
}

static void SDL_EVDEV_destroy_mouse(SDL_evdevlist_item *item)
{
    SDL_RemoveMouse((SDL_MouseID)item->fd);
}

static int SDL_EVDEV_init_touchscreen(SDL_evdevlist_item *item, int udev_class)
{
    int ret;
    unsigned long xreq, yreq;
    char name[64];
    struct input_absinfo abs_info;

    if (!item->is_touchscreen) {
        return 0;
    }

    item->touchscreen_data = SDL_calloc(1, sizeof(*item->touchscreen_data));
    if (!item->touchscreen_data) {
        return -1;
    }

    ret = ioctl(item->fd, EVIOCGNAME(sizeof(name)), name);
    if (ret < 0) {
        SDL_free(item->touchscreen_data);
        return SDL_SetError("Failed to get evdev touchscreen name");
    }

    item->touchscreen_data->name = SDL_strdup(name);
    if (!item->touchscreen_data->name) {
        SDL_free(item->touchscreen_data);
        return -1;
    }

    ret = ioctl(item->fd, EVIOCGABS(ABS_MT_SLOT), &abs_info);
    if (ret < 0) {
        SDL_free(item->touchscreen_data->name);
        SDL_free(item->touchscreen_data);
        return SDL_SetError("Failed to get evdev touchscreen limits");
    }

    if (abs_info.maximum == 0) {
        item->touchscreen_data->max_slots = 1;
        xreq = EVIOCGABS(ABS_X);
        yreq = EVIOCGABS(ABS_Y);
    } else {
        item->touchscreen_data->max_slots = abs_info.maximum + 1;
        xreq = EVIOCGABS(ABS_MT_POSITION_X);
        yreq = EVIOCGABS(ABS_MT_POSITION_Y);
    }

    ret = ioctl(item->fd, xreq, &abs_info);
    if (ret < 0) {
        SDL_free(item->touchscreen_data->name);
        SDL_free(item->touchscreen_data);
        return SDL_SetError("Failed to get evdev touchscreen limits");
    }
    item->touchscreen_data->min_x = abs_info.minimum;
    item->touchscreen_data->max_x = abs_info.maximum;
    item->touchscreen_data->range_x = abs_info.maximum - abs_info.minimum;

    ret = ioctl(item->fd, yreq, &abs_info);
    if (ret < 0) {
        SDL_free(item->touchscreen_data->name);
        SDL_free(item->touchscreen_data);
        return SDL_SetError("Failed to get evdev touchscreen limits");
    }
    item->touchscreen_data->min_y = abs_info.minimum;
    item->touchscreen_data->max_y = abs_info.maximum;
    item->touchscreen_data->range_y = abs_info.maximum - abs_info.minimum;

    ret = ioctl(item->fd, EVIOCGABS(ABS_MT_PRESSURE), &abs_info);
    if (ret < 0) {
        SDL_free(item->touchscreen_data->name);
        SDL_free(item->touchscreen_data);
        return SDL_SetError("Failed to get evdev touchscreen limits");
    }
    item->touchscreen_data->min_pressure = abs_info.minimum;
    item->touchscreen_data->max_pressure = abs_info.maximum;
    item->touchscreen_data->range_pressure = abs_info.maximum - abs_info.minimum;

    item->touchscreen_data->slots = SDL_calloc(
        item->touchscreen_data->max_slots,
        sizeof(*item->touchscreen_data->slots));
    if (!item->touchscreen_data->slots) {
        SDL_free(item->touchscreen_data->name);
        SDL_free(item->touchscreen_data);
        return -1;
    }

    ret = SDL_AddTouch(item->fd, /* I guess our fd is unique enough */
                       (udev_class & SDL_UDEV_DEVICE_TOUCHPAD) ? SDL_TOUCH_DEVICE_INDIRECT_ABSOLUTE : SDL_TOUCH_DEVICE_DIRECT,
                       item->touchscreen_data->name);
    if (ret < 0) {
        SDL_free(item->touchscreen_data->slots);
        SDL_free(item->touchscreen_data->name);
        SDL_free(item->touchscreen_data);
        return ret;
    }

    return 0;
}

static void SDL_EVDEV_destroy_touchscreen(SDL_evdevlist_item *item)
{
    if (!item->is_touchscreen) {
        return;
    }

    SDL_DelTouch(item->fd);
    SDL_free(item->touchscreen_data->slots);
    SDL_free(item->touchscreen_data->name);
    SDL_free(item->touchscreen_data);
}

static void SDL_EVDEV_sync_device(SDL_evdevlist_item *item)
{
#ifdef EVIOCGMTSLOTS
    int i, ret;
    struct input_absinfo abs_info;
    /*
     * struct input_mt_request_layout {
     *     __u32 code;
     *     __s32 values[num_slots];
     * };
     *
     * this is the structure we're trying to emulate
     */
    Uint32 *mt_req_code;
    Sint32 *mt_req_values;
    size_t mt_req_size;

    /* TODO: sync devices other than touchscreen */
    if (!item->is_touchscreen) {
        return;
    }

    mt_req_size = sizeof(*mt_req_code) +
                  sizeof(*mt_req_values) * item->touchscreen_data->max_slots;

    mt_req_code = SDL_calloc(1, mt_req_size);
    if (!mt_req_code) {
        return;
    }

    mt_req_values = (Sint32 *)mt_req_code + 1;

    *mt_req_code = ABS_MT_TRACKING_ID;
    ret = ioctl(item->fd, EVIOCGMTSLOTS(mt_req_size), mt_req_code);
    if (ret < 0) {
        SDL_free(mt_req_code);
        return;
    }
    for (i = 0; i < item->touchscreen_data->max_slots; i++) {
        /*
         * This doesn't account for the very edge case of the user removing their
         * finger and replacing it on the screen during the time we're out of sync,
         * which'll mean that we're not going from down -> up or up -> down, we're
         * going from down -> down but with a different tracking id, meaning we'd
         * have to tell SDL of the two events, but since we wait till SYN_REPORT in
         * SDL_EVDEV_Poll to tell SDL, the current structure of this code doesn't
         * allow it. Lets just pray to God it doesn't happen.
         */
        if (item->touchscreen_data->slots[i].tracking_id == 0 &&
            mt_req_values[i] >= 0) {
            item->touchscreen_data->slots[i].tracking_id = mt_req_values[i] + 1;
            item->touchscreen_data->slots[i].delta = EVDEV_TOUCH_SLOTDELTA_DOWN;
        } else if (item->touchscreen_data->slots[i].tracking_id != 0 &&
                   mt_req_values[i] < 0) {
            item->touchscreen_data->slots[i].tracking_id = 0;
            item->touchscreen_data->slots[i].delta = EVDEV_TOUCH_SLOTDELTA_UP;
        }
    }

    *mt_req_code = ABS_MT_POSITION_X;
    ret = ioctl(item->fd, EVIOCGMTSLOTS(mt_req_size), mt_req_code);
    if (ret < 0) {
        SDL_free(mt_req_code);
        return;
    }
    for (i = 0; i < item->touchscreen_data->max_slots; i++) {
        if (item->touchscreen_data->slots[i].tracking_id != 0 &&
            item->touchscreen_data->slots[i].x != mt_req_values[i]) {
            item->touchscreen_data->slots[i].x = mt_req_values[i];
            if (item->touchscreen_data->slots[i].delta ==
                EVDEV_TOUCH_SLOTDELTA_NONE) {
                item->touchscreen_data->slots[i].delta =
                    EVDEV_TOUCH_SLOTDELTA_MOVE;
            }
        }
    }

    *mt_req_code = ABS_MT_POSITION_Y;
    ret = ioctl(item->fd, EVIOCGMTSLOTS(mt_req_size), mt_req_code);
    if (ret < 0) {
        SDL_free(mt_req_code);
        return;
    }
    for (i = 0; i < item->touchscreen_data->max_slots; i++) {
        if (item->touchscreen_data->slots[i].tracking_id != 0 &&
            item->touchscreen_data->slots[i].y != mt_req_values[i]) {
            item->touchscreen_data->slots[i].y = mt_req_values[i];
            if (item->touchscreen_data->slots[i].delta ==
                EVDEV_TOUCH_SLOTDELTA_NONE) {
                item->touchscreen_data->slots[i].delta =
                    EVDEV_TOUCH_SLOTDELTA_MOVE;
            }
        }
    }

    *mt_req_code = ABS_MT_PRESSURE;
    ret = ioctl(item->fd, EVIOCGMTSLOTS(mt_req_size), mt_req_code);
    if (ret < 0) {
        SDL_free(mt_req_code);
        return;
    }
    for (i = 0; i < item->touchscreen_data->max_slots; i++) {
        if (item->touchscreen_data->slots[i].tracking_id != 0 &&
            item->touchscreen_data->slots[i].pressure != mt_req_values[i]) {
            item->touchscreen_data->slots[i].pressure = mt_req_values[i];
            if (item->touchscreen_data->slots[i].delta ==
                EVDEV_TOUCH_SLOTDELTA_NONE) {
                item->touchscreen_data->slots[i].delta =
                    EVDEV_TOUCH_SLOTDELTA_MOVE;
            }
        }
    }

    ret = ioctl(item->fd, EVIOCGABS(ABS_MT_SLOT), &abs_info);
    if (ret < 0) {
        SDL_free(mt_req_code);
        return;
    }
    item->touchscreen_data->current_slot = abs_info.value;

    SDL_free(mt_req_code);

#endif /* EVIOCGMTSLOTS */
}

static int SDL_EVDEV_device_added(const char *dev_path, int udev_class)
{
    SDL_evdevlist_item *item;
    unsigned long relbit[NBITS(REL_MAX)] = { 0 };

    /* Check to make sure it's not already in list. */
    for (item = _this->first; item; item = item->next) {
        if (SDL_strcmp(dev_path, item->path) == 0) {
            return -1; /* already have this one */
        }
    }

    item = (SDL_evdevlist_item *)SDL_calloc(1, sizeof(SDL_evdevlist_item));
    if (!item) {
        return -1;
    }

    item->fd = open(dev_path, O_RDONLY | O_NONBLOCK | O_CLOEXEC);
    if (item->fd < 0) {
        SDL_free(item);
        return SDL_SetError("Unable to open %s", dev_path);
    }

    item->path = SDL_strdup(dev_path);
    if (!item->path) {
        close(item->fd);
        SDL_free(item);
        return -1;
    }

    item->udev_class = udev_class;

    if (ioctl(item->fd, EVIOCGBIT(EV_REL, sizeof(relbit)), relbit) >= 0) {
        item->relative_mouse = test_bit(REL_X, relbit) && test_bit(REL_Y, relbit);
        item->high_res_wheel = test_bit(REL_WHEEL_HI_RES, relbit);
        item->high_res_hwheel = test_bit(REL_HWHEEL_HI_RES, relbit);
    }

    /* For now, we just treat a touchpad like a touchscreen */
    if (udev_class & (SDL_UDEV_DEVICE_TOUCHSCREEN | SDL_UDEV_DEVICE_TOUCHPAD)) {
        int ret;
        item->is_touchscreen = SDL_TRUE;
        ret = SDL_EVDEV_init_touchscreen(item, udev_class);
        if (ret < 0) {
            close(item->fd);
            SDL_free(item->path);
            SDL_free(item);
            return ret;
        }
    } else if (udev_class & SDL_UDEV_DEVICE_MOUSE) {
        int ret = SDL_EVDEV_init_mouse(item, udev_class);
        if (ret < 0) {
            close(item->fd);
            SDL_free(item->path);
            SDL_free(item);
            return ret;
        }
    } else if (udev_class & SDL_UDEV_DEVICE_KEYBOARD) {
        int ret = SDL_EVDEV_init_keyboard(item, udev_class);
        if (ret < 0) {
            close(item->fd);
            SDL_free(item->path);
            SDL_free(item);
            return ret;
        }
    }

    if (!_this->last) {
        _this->first = _this->last = item;
    } else {
        _this->last->next = item;
        _this->last = item;
    }

    SDL_EVDEV_sync_device(item);

    SDL_EVDEV_UpdateKeyboardMute();

    return _this->num_devices++;
}

static int SDL_EVDEV_device_removed(const char *dev_path)
{
    SDL_evdevlist_item *item;
    SDL_evdevlist_item *prev = NULL;

    for (item = _this->first; item; item = item->next) {
        /* found it, remove it. */
        if (SDL_strcmp(dev_path, item->path) == 0) {
            if (prev) {
                prev->next = item->next;
            } else {
                SDL_assert(_this->first == item);
                _this->first = item->next;
            }
            if (item == _this->last) {
                _this->last = prev;
            }
            if (item->is_touchscreen) {
                SDL_EVDEV_destroy_touchscreen(item);
            } else if (item->udev_class & SDL_UDEV_DEVICE_MOUSE) {
                SDL_EVDEV_destroy_mouse(item);
            } else if (item->udev_class & SDL_UDEV_DEVICE_KEYBOARD) {
                SDL_EVDEV_destroy_keyboard(item);
            }
            close(item->fd);
            SDL_free(item->path);
            SDL_free(item);
            SDL_EVDEV_UpdateKeyboardMute();
            _this->num_devices--;
            return 0;
        }
        prev = item;
    }

    return -1;
}

Uint64 SDL_EVDEV_GetEventTimestamp(struct input_event *event)
{
    static Uint64 timestamp_offset;
    Uint64 timestamp;
    Uint64 now = SDL_GetTicksNS();

    /* The kernel internally has nanosecond timestamps, but converts it
       to microseconds when delivering the events */
    timestamp = event->input_event_sec;
    timestamp *= SDL_NS_PER_SECOND;
    timestamp += SDL_US_TO_NS(event->input_event_usec);

    if (!timestamp_offset) {
        timestamp_offset = (now - timestamp);
    }
    timestamp += timestamp_offset;

    if (timestamp > now) {
        timestamp_offset -= (timestamp - now);
        timestamp = now;
    }
    return timestamp;
}

#endif /* SDL_INPUT_LINUXEV */
