/*
    KWin - the KDE window manager
    This file is part of the KDE project.

    SPDX-FileCopyrightText: 2014 Martin Gräßlin <mgraesslin@kde.org>

    SPDX-License-Identifier: GPL-2.0-or-later
*/
#include "context.h"
#include "events.h"
#include "libinput_logging.h"

#include "core/session.h"
#include "utils/udev.h"

#include <fcntl.h>
#include <unistd.h>

#include <cerrno>

namespace KWin
{
namespace LibInput
{

static void libinputLogHandler(libinput *libinput, libinput_log_priority priority, const char *format, va_list args)
{
    char buf[1024];
    if (std::vsnprintf(buf, 1023, format, args) <= 0) {
        return;
    }
    switch (priority) {
    case LIBINPUT_LOG_PRIORITY_DEBUG:
        qCDebug(KWIN_LIBINPUT) << "Libinput:" << buf;
        break;
    case LIBINPUT_LOG_PRIORITY_INFO:
        qCInfo(KWIN_LIBINPUT) << "Libinput:" << buf;
        break;
    case LIBINPUT_LOG_PRIORITY_ERROR:
    default:
        qCCritical(KWIN_LIBINPUT) << "Libinput:" << buf;
        break;
    }
}

Context::Context(Session *session, std::unique_ptr<Udev> &&udev)
    : m_session(session)
    , m_libinput(libinput_udev_create_context(&Context::s_interface, this, *udev.get()))
    , m_suspended(false)
    , m_udev(std::move(udev))
{
    libinput_log_set_priority(m_libinput, LIBINPUT_LOG_PRIORITY_DEBUG);
    libinput_log_set_handler(m_libinput, &libinputLogHandler);
}

Context::~Context()
{
    if (m_libinput) {
        libinput_unref(m_libinput);
    }
}

bool Context::initialize()
{
    if (!isValid()) {
        return false;
    }
    return libinput_udev_assign_seat(m_libinput, m_session->seat().toUtf8().constData()) == 0;
}

Session *Context::session() const
{
    return m_session;
}

int Context::fileDescriptor()
{
    if (!isValid()) {
        return -1;
    }
    return libinput_get_fd(m_libinput);
}

void Context::dispatch()
{
    libinput_dispatch(m_libinput);
}

const struct libinput_interface Context::s_interface = {
    Context::openRestrictedCallback,
    Context::closeRestrictedCallBack,
};

int Context::openRestrictedCallback(const char *path, int flags, void *user_data)
{
    return ((Context *)user_data)->openRestricted(path, flags);
}

void Context::closeRestrictedCallBack(int fd, void *user_data)
{
    ((Context *)user_data)->closeRestricted(fd);
}

int Context::openRestricted(const char *path, int flags)
{
    const QString filepath = QString::fromLatin1(path);
    int fd;

    // Ask for control over everything but sys devices, which do not need it and it wouldn't be accepted by backends like logind anyway.
    if (!filepath.startsWith(QLatin1String("/sys/"))) {
        fd = m_session->openRestricted(filepath).value_or(-1);
        if (fd < 0) {
            // failed
            return fd;
        }

        // adjust flags - based on Weston (logind-util.c)
        int fl = fcntl(fd, F_GETFL);
        auto errorHandling = [fd, this]() {
            closeRestricted(fd);
        };
        if (fl < 0) {
            errorHandling();
            return -1;
        }

        if (flags & O_NONBLOCK) {
            fl |= O_NONBLOCK;
        }

        if (fcntl(fd, F_SETFL, fl) < 0) {
            errorHandling();
            return -1;
        }

        fl = fcntl(fd, F_GETFD);
        if (fl < 0) {
            errorHandling();
            return -1;
        }

        if (!(flags & O_CLOEXEC)) {
            fl &= ~FD_CLOEXEC;
        }

        if (fcntl(fd, F_SETFD, fl) < 0) {
            errorHandling();
            return -1;
        }
    } else {
        fd = open(path, flags);
        if (fd < 0) {
            // failed
            return fd;
        }
        m_nonRestrictedFds.push_back(FileDescriptor(fd));
    }

    return fd;
}

void Context::closeRestricted(int fd)
{
    // Close it if it's an unrestricted fd, otherwise we need to inform the session to close it.
    if (std::erase_if(m_nonRestrictedFds, [fd](const auto &otherFd) {
        return otherFd.get() == fd;
    }) == 0) {
        m_session->closeRestricted(fd);
    }
}

std::unique_ptr<Event> Context::event()
{
    return Event::create(libinput_get_event(m_libinput));
}

void Context::suspend()
{
    if (m_suspended) {
        return;
    }
    libinput_suspend(m_libinput);
    m_suspended = true;
}

void Context::resume()
{
    if (!m_suspended) {
        return;
    }
    libinput_resume(m_libinput);
    m_suspended = false;
}

}
}
