#include "prx/libScePad/include/Pad.hpp"
#include "prx/libScePad/include/PadInputTypes.hpp"
#include "prx/libScePad/include/PadState.hpp"
#include "prx/libScePad/include/InputCommandFile.hpp"
#include "prx/libc/include/general/VabiMacros.hpp"
#include <array>
#include <chrono>
#include <cstdlib>
#include <cstdio>
#include <cstring>
#include <filesystem>
#include <fstream>
#include <string>
#include <thread>
#include <utility>

static void Require(bool value) { if (!value) std::abort(); }

static void CheckInputCommands() {
    const auto path = std::filesystem::temp_directory_path() / ("anyps5-pad-" + std::to_string(std::chrono::steady_clock::now().time_since_epoch().count()));
    struct Cleanup {
        std::filesystem::path path;
        ~Cleanup() { std::error_code error; std::filesystem::remove(path, error); }
    } cleanup{path};
    const auto write = [&](const char* command) { std::ofstream(path) << command << '\n'; };
    write("1 16384 200");
    Pad::InputCommandFile commands(path);
    Require(commands.Buttons(1000) == 0);
    write("2 16384 200");
    Require(commands.Buttons(101000) == 0x4000);
    Require(commands.Buttons(300999) == 0x4000);
    Require(commands.Buttons(301000) == 0);
    Require(commands.Buttons(401000) == 0);
    write("3 8192 5001");
    Require(commands.Buttons(501000) == 0);
    write("-3 8192 300");
    Require(commands.Buttons(601000) == 0);
    write("3 1 300");
    Require(commands.Buttons(701000) == 0);
    write("3 8192 300 trailing");
    Require(commands.Buttons(801000) == 0);
    write("3 8192 300");
    Require(commands.Buttons(901000) == 0x2000);
    write("4 0 1");
    Require(commands.Buttons(1001000) == 0);
    write("2 16384 200");
    Require(commands.Buttons(1101000) == 0);
    write("5 0 300 0 128 255 64");
    const auto tilted = commands.Poll(1201000);
    Require(tilted.buttons == 0 && tilted.hasSticks);
    Require(tilted.sticks[0] == 0 && tilted.sticks[1] == 128 && tilted.sticks[2] == 255 && tilted.sticks[3] == 64);
    Require(!commands.Poll(1501000).hasSticks);
    write("6 16384 300");
    const auto pressed = commands.Poll(1601000);
    Require(pressed.buttons == 0x4000 && !pressed.hasSticks);
    const Pad::InputCommandFile::Input none;
    write("7 16384 300 128 128");
    Require(commands.Poll(1901000) == none);
    write("7 16384 300 128 128 128 256");
    Require(commands.Poll(2001000) == none);
    write("7 16384 300 128 128 128 128 128");
    Require(commands.Poll(2101000) == none);
    write("7 16384 300 128 128 128 up");
    Require(commands.Poll(2201000) == none);
    write("7 16384 300 +");
    Require(commands.Poll(2301000) == none);
    write("7 16384 300 4294967296");
    Require(commands.Poll(2401000) == none);
    write("7 16384 300 128 128 128 128x");
    Require(commands.Poll(2501000) == none);
    write("7 8192 300 1 2 3 4");
    const auto accepted = commands.Poll(2601000);
    Require(accepted.buttons == 0x2000 && accepted.hasSticks && accepted.sticks[3] == 4);
    write("8 2097152 300");
    const auto left = commands.Poll(3001000);
    Require(left.buttons == 0 && left.touchLeft && !left.touchRight && !left.hasSticks);
    write("9 4210688 300");
    const auto right = commands.Poll(3401000);
    Require(right.buttons == 0x4000 && !right.touchLeft && right.touchRight);
    write("10 8388608 300");
    Require(commands.Poll(3801000) == none);
    std::filesystem::remove(path);
    Require(commands.Buttons(4201000) == 0);
    Pad::InputCommandFile disabled(std::filesystem::path{});
    Require(disabled.Buttons(0) == 0);
}

static float SettleOrientationW() {
    float w = 1.0f;
    for (int i = 0; i < 10; ++i) {
        std::this_thread::sleep_for(std::chrono::milliseconds(10));
        w = Pad::ReadState().orientation_w;
    }
    return w;
}

static void CheckTiltCorrection(int handle) {
    PadInputState tilted;
    tilted.hasMotion = true;
    tilted.accel = {9.80665f, 0.0f, 0.0f};
    PadPublishInput_nid_postfix(tilted);
    Require(scePadSetTiltCorrectionState(handle + 1, false) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadSetTiltCorrectionState(handle, false) == PAD_OK);
    Require(scePadResetOrientation(handle) == PAD_OK);
    Require(SettleOrientationW() == 1.0f);
    Require(scePadSetTiltCorrectionState(handle, true) == PAD_OK);
    Require(SettleOrientationW() < 0.999f);
    PadPublishInput_nid_postfix(PadInputState{});
}

static void CheckAngularVelocityDeadband(int handle) {
    PadInputState moving;
    moving.hasMotion = true;
    moving.accel = {0.0f, 9.80665f, 0.0f};
    moving.gyro = {0.01f, 0.0175f, -0.017f};
    PadPublishInput_nid_postfix(moving);
    PadData data{};
    Require(scePadReadState(handle, &data) == PAD_OK);
    Require(data.angular_velocity_x == 0.01f && data.angular_velocity_y == 0.0175f && data.angular_velocity_z == -0.017f);
    Require(scePadSetAngularVelocityDeadbandState(handle, true) == PAD_OK);
    Require(scePadReadState(handle, &data) == PAD_OK);
    Require(data.angular_velocity_x == 0.0f && data.angular_velocity_y == 0.0175f && data.angular_velocity_z == 0.0f);
    Require(scePadSetAngularVelocityDeadbandState(handle, false) == PAD_OK);
    Require(scePadReadState(handle, &data) == PAD_OK);
    Require(data.angular_velocity_x == 0.01f && data.angular_velocity_z == -0.017f);
    PadPublishInput_nid_postfix(PadInputState{});
}

static void CheckStickDeadZones(int handle) {
    PadControllerInformation info{};
    Require(scePadGetControllerInformation(handle, &info) == PAD_OK);
    Require(info.stickInfo.deadZoneLeft == 13 && info.stickInfo.deadZoneRight == 13);
    std::array<std::uint8_t, 0x2c> extended{};
    Require(scePadGetExtControllerInformation(handle, extended.data()) == PAD_OK);
    PadControllerInformation base{};
    std::memcpy(&base, extended.data(), sizeof(base));
    Require(base.stickInfo.deadZoneLeft == 13 && base.stickInfo.deadZoneRight == 13);
}

static void CheckTouchContact() {
    PadInputState touch;
    touch.buttons = static_cast<std::uint32_t>(Pad::PadButton::TouchPad);
    touch.touch[0] = {true, 960, 471, 0};
    PadPublishInput_nid_postfix(touch);
    const auto data = Pad::ReadState();
    Require((data.buttons & static_cast<std::uint32_t>(Pad::PadButton::TouchPad)) != 0);
    Require(data.touch_data_touch_num == 1);
    Require(data.touch_data_touch0_x == 960);
    Require(data.touch_data_touch0_y == 471);
    PadPublishInput_nid_postfix(PadInputState{});
    Pad::ReadState();
}

static void CheckTouchPadInformation(int handle) {
    PadControllerInformation info;
    std::memset(&info, 0x5a, sizeof(info));
    Require(scePadGetControllerInformation(handle, &info) == PAD_OK);
    Require(info.touchPadInfo.resolution.x == kTouchPadWidth);
    Require(info.touchPadInfo.resolution.y == kTouchPadHeight);
    Require(info.touchPadInfo.pixelDensity == 44.86f);
    Require(scePadGetControllerInformation(handle + 1, &info) == PAD_ERROR_INVALID_HANDLE);

    std::array<std::uint8_t, 0x2c> extended{};
    extended.fill(0x5a);
    Require(scePadGetExtControllerInformation(handle, extended.data()) == PAD_OK);
    PadControllerInformation base{};
    std::memcpy(&base, extended.data(), sizeof(base));
    Require(base.touchPadInfo.resolution.x == kTouchPadWidth);
    Require(base.touchPadInfo.resolution.y == kTouchPadHeight);
    Require(base.touchPadInfo.pixelDensity == 44.86f);
}

static void CheckVirtualTouchContact() {
    PadInputState left;
    left.touchLeft = true;
    PadPublishInput_nid_postfix(left);
    const auto leftData = Pad::ReadState();
    Require(leftData.touch_data_touch_num == 1);
    Require(leftData.touch_data_touch0_x == kTouchPadWidth / 4);
    Require(leftData.touch_data_touch0_y == kTouchPadHeight / 2);

    PadInputState right;
    right.touchRight = true;
    PadPublishInput_nid_postfix(right);
    const auto rightData = Pad::ReadState();
    Require(rightData.touch_data_touch_num == 1);
    Require(rightData.touch_data_touch0_x == kTouchPadWidth * 3 / 4);
    Require(rightData.touch_data_touch0_y == kTouchPadHeight / 2);

    PadPublishInput_nid_postfix(PadInputState{});
    Pad::ReadState();
}

static void CheckPartialTrigger() {
    PadInputState partial;
    partial.buttons = static_cast<std::uint32_t>(Pad::PadButton::L2) | static_cast<std::uint32_t>(Pad::PadButton::R2);
    partial.analogButtonsL2 = 1;
    partial.analogButtonsR2 = 73;
    PadPublishInput_nid_postfix(partial);
    const auto data = Pad::ReadState();
    Require(data.buttons == partial.buttons);
    Require(data.analog_buttons_l2 == 1 && data.analog_buttons_r2 == 73);
    PadInputState digital;
    digital.buttons = static_cast<std::uint32_t>(Pad::PadButton::L2);
    PadPublishInput_nid_postfix(digital);
    Require(Pad::ReadState().analog_buttons_l2 == 255);
    PadPublishInput_nid_postfix(PadInputState{});
    Pad::ReadState();
}

static void CheckReadQueue(int handle) {
    PadData drained[64]{};
    scePadRead_nid_postfix(handle, drained, 64);
    PadInputState pressed;
    pressed.buttons = static_cast<std::uint32_t>(Pad::PadButton::Cross);
    PadPublishInput_nid_postfix(pressed);
    PadPublishInput_nid_postfix(PadInputState{});
    PadData data[4]{};
    Require(scePadRead_nid_postfix(handle, data, 4) == 2);
    Require((data[0].buttons & pressed.buttons) != 0);
    Require((data[1].buttons & pressed.buttons) == 0);
    Require(data[0].timestamp <= data[1].timestamp);
    Require(scePadRead_nid_postfix(handle, data, 4) == 1);
    Require(data[0].buttons == 0);
}

static void CheckTapBetweenReads() {
    const auto cross = static_cast<std::uint32_t>(Pad::PadButton::Cross);
    PadPublishInput_nid_postfix(PadInputState{});
    Pad::ReadState();
    PadInputState pressed;
    pressed.buttons = cross;
    PadPublishInput_nid_postfix(pressed);
    PadPublishInput_nid_postfix(PadInputState{});
    Require((Pad::ReadState().buttons & cross) != 0);
    Require((Pad::ReadState().buttons & cross) == 0);
    PadPublishInput_nid_postfix(pressed);
    Require((Pad::ReadState().buttons & cross) != 0);
    Require((Pad::ReadState().buttons & cross) != 0);
    PadPublishInput_nid_postfix(PadInputState{});
    Require((Pad::ReadState().buttons & cross) == 0);
}

static void CheckLatchedPressLifetime(int handle) {
    const auto cross = static_cast<std::uint32_t>(Pad::PadButton::Cross);
    const auto circle = static_cast<std::uint32_t>(Pad::PadButton::Circle);
    PadInputState pressed;
    PadData data{};
    PadData drained[64]{};
    scePadRead_nid_postfix(handle, drained, 64);
    pressed.buttons = cross;
    PadPublishInput_nid_postfix(pressed);
    PadPublishInput_nid_postfix(PadInputState{});
    Require(scePadRead_nid_postfix(handle, drained, 64) >= 1);
    Require(scePadReadState(handle, &data) == PAD_OK);
    Require((data.buttons & cross) == 0);
    pressed.buttons = cross;
    PadPublishInput_nid_postfix(pressed);
    PadPublishInput_nid_postfix(PadInputState{});
    std::this_thread::sleep_for(std::chrono::milliseconds(150));
    Require(scePadReadState(handle, &data) == PAD_OK);
    Require((data.buttons & cross) == 0);
    pressed.buttons = cross;
    PadPublishInput_nid_postfix(pressed);
    PadPublishInput_nid_postfix(PadInputState{});
    std::this_thread::sleep_for(std::chrono::milliseconds(150));
    pressed.buttons = circle;
    PadPublishInput_nid_postfix(pressed);
    PadPublishInput_nid_postfix(PadInputState{});
    Require(scePadReadState(handle, &data) == PAD_OK);
    Require((data.buttons & cross) == 0);
    Require((data.buttons & circle) != 0);
}

static void CheckReadStateHandle(int handle) {
    PadData data{};
    Require(scePadReadState(0, &data) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadReadState(handle + 1, &data) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadRead_nid_postfix(0, &data, 1) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadReadState(handle, &data) == PAD_OK);
    Require(scePadRead_nid_postfix(handle, nullptr, 1) == PAD_ERROR_INVALID_ARG);
    Require(scePadRead_nid_postfix(handle, &data, 0) == PAD_ERROR_INVALID_ARG);
    Require(scePadRead_nid_postfix(handle, &data, -1) == PAD_ERROR_INVALID_ARG);
    Require(scePadReadState(handle, nullptr) == PAD_ERROR_INVALID_ARG);
}

static void CheckSpecialPort(int user, int handle) {
    constexpr int noHandle = static_cast<int>(0x80920008);
    constexpr int alreadyOpened = static_cast<int>(0x80920004);
    const int special = scePadOpen_nid_postfix(user, PAD_PORT_TYPE_SPECIAL, 0, nullptr);
    Require(special > 0 && special != handle);
    Require(scePadOpen_nid_postfix(user, PAD_PORT_TYPE_SPECIAL, 0, nullptr) == alreadyOpened);
    Require(scePadGetHandle(user, PAD_PORT_TYPE_SPECIAL, 0) == special);
    Require(scePadGetHandle(user, 0, 0) == handle);
    PadData data[2];
    std::memset(data, 0xff, sizeof(data));
    Require(scePadRead_nid_postfix(special, nullptr, 1) == PAD_ERROR_INVALID_ARG);
    Require(scePadRead_nid_postfix(special, data, 0) == PAD_ERROR_INVALID_ARG);
    Require(scePadRead_nid_postfix(special, data, 2) == 1);
    Require(!data[0].connected && data[0].connected_count == 0 && data[0].buttons == 0 && data[0].timestamp == 0);
    Require(data[0].left_stick_x == 0x80 && data[0].left_stick_y == 0x80 && data[0].right_stick_x == 0x80 && data[0].right_stick_y == 0x80);
    Require(data[0].analog_buttons_l2 == 0 && data[0].orientation_x == 0.0f && data[0].orientation_w == 1.0f);
    Require(data[0].acceleration_x == 0.0f && data[0].acceleration_y == 1.0f && data[0].acceleration_z == 0.0f && data[0].touch_data_touch_num == 0);
    Require(data[1].buttons == 0xffffffff);
    std::memset(data, 0xff, sizeof(data[0]));
    Require(scePadReadState(special, nullptr) == PAD_ERROR_INVALID_ARG);
    Require(scePadReadState(special, data) == PAD_OK);
    Require(!data[0].connected && data[0].connected_count == 0 && data[0].buttons == 0);
    Require(data[0].left_stick_x == 0x80 && data[0].orientation_w == 1.0f && data[0].acceleration_y == 1.0f);
    PadControllerInformation info;
    std::memset(&info, 0xff, sizeof(info));
    Require(scePadGetControllerInformation(special, nullptr) == PAD_ERROR_INVALID_ARG);
    Require(scePadGetControllerInformation(special, &info) == PAD_OK);
    Require(!info.connected && info.connectedCount == 0 && info.deviceClass == 0);
    PadDeviceClassData classData;
    std::memset(&classData, 0xff, sizeof(classData));
    Require(scePadDeviceClassParseData(special, data, &classData) == PAD_OK);
    Require(!classData.dataValid && classData.deviceClass == 0);
    PadDeviceClassExtendedInformation extended;
    std::memset(&extended, 0xff, sizeof(extended));
    Require(scePadDeviceClassGetExtendedInformation(special, &extended) == PAD_OK);
    Require(extended.deviceClass == -1 && extended.reserved[0] == 0);
    Require(scePadDeviceClassGetExtendedInformation(handle, &extended) == PAD_OK);
    Require(extended.deviceClass == 0);
    std::int32_t specialType = -1;
    Require(scePadGetControllerType(special, &specialType) == PAD_OK);
    Require(specialType == PAD_CONTROLLER_TYPE_UNKNOWN);
    const PadVibrationParam vibration{0, 0};
    const PadLightBarParam lightBar{0, 0, 255};
    Require(scePadSetVibration(special, nullptr) == PAD_ERROR_INVALID_ARG);
    Require(scePadSetVibration(special, &vibration) == PAD_OK);
    Require(scePadSetLightBar(special, &lightBar) == PAD_OK);
    Require(scePadResetLightBar(special) == PAD_OK);
    Require(scePadSetMotionSensorState(special, true) == PAD_OK);
    Require(scePadResetOrientation(special) == PAD_OK);
    Require(scePadReadState(handle, data) == PAD_OK);
    Require(data[0].connected);
    Require(scePadGetControllerInformation(handle, &info) == PAD_OK);
    Require(info.connected && info.connectedCount == 1);
    Require(scePadClose_nid_postfix(special) == PAD_OK);
    Require(scePadGetHandle(user, PAD_PORT_TYPE_SPECIAL, 0) == noHandle);
    Require(scePadClose_nid_postfix(special) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadRead_nid_postfix(special, data, 1) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadReadState(special, data) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadGetControllerInformation(special, &info) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadGetHandle(user, 0, 0) == handle);
    Require(scePadReadState(handle, data) == PAD_OK);
    const int other = user + 1;
    const int first = scePadOpen_nid_postfix(user, PAD_PORT_TYPE_SPECIAL, 0, nullptr);
    const int second = scePadOpen_nid_postfix(other, PAD_PORT_TYPE_SPECIAL, 0, nullptr);
    Require(first > 0 && second > 0 && first != second && second != handle);
    Require(scePadGetHandle(user, PAD_PORT_TYPE_SPECIAL, 0) == first);
    Require(scePadGetHandle(other, PAD_PORT_TYPE_SPECIAL, 0) == second);
    Require(scePadOpen_nid_postfix(other, PAD_PORT_TYPE_SPECIAL, 0, nullptr) == alreadyOpened);
    Require(scePadClose_nid_postfix(first) == PAD_OK);
    Require(scePadGetHandle(user, PAD_PORT_TYPE_SPECIAL, 0) == noHandle);
    Require(scePadGetHandle(other, PAD_PORT_TYPE_SPECIAL, 0) == second);
    Require(scePadRead_nid_postfix(first, data, 1) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadRead_nid_postfix(second, data, 1) == 1);
    Require(!data[0].connected);
    const int again = scePadOpen_nid_postfix(user, PAD_PORT_TYPE_SPECIAL, 0, nullptr);
    Require(again > 0 && again != second);
    Require(scePadGetHandle(user, PAD_PORT_TYPE_SPECIAL, 0) == again);
    Require(scePadClose_nid_postfix(again) == PAD_OK);
    Require(scePadClose_nid_postfix(second) == PAD_OK);
    Require(scePadGetHandle(other, PAD_PORT_TYPE_SPECIAL, 0) == noHandle);
    std::array<int, 16> handles{};
    for (int i = 0; i < 16; ++i) {
        handles[i] = scePadOpen_nid_postfix(user + i, PAD_PORT_TYPE_SPECIAL, 0, nullptr);
        Require(handles[i] > 0 && handles[i] != handle && (i == 0 || handles[i] != handles[i - 1]));
    }
    Require(scePadOpen_nid_postfix(user + 16, PAD_PORT_TYPE_SPECIAL, 0, nullptr) == static_cast<int>(0x809b0081));
    Require(scePadGetHandle(user + 16, PAD_PORT_TYPE_SPECIAL, 0) == noHandle);
    Require(scePadGetHandle(user + 15, PAD_PORT_TYPE_SPECIAL, 0) == handles[15]);
    for (int i = 0; i < 16; ++i) Require(scePadClose_nid_postfix(handles[i]) == PAD_OK);
    Require(scePadGetHandle(user + 15, PAD_PORT_TYPE_SPECIAL, 0) == noHandle);
    Require(scePadGetHandle(user, 0, 0) == handle);
}

static void CheckRemoteController(int handle) {
    bool remote = true;
    Require(scePadIsRemoteController(handle + 1, &remote) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadIsRemoteController(handle, nullptr) == PAD_ERROR_INVALID_ARG);
    Require(remote);
    Require(scePadIsRemoteController(handle, &remote) == PAD_OK);
    Require(!remote);
}

static void CheckTrackerDevices(int handle) {
    for (const int candidate : {handle, handle + 1}) {
        Require(!scePadIsDS4Connected(candidate));
        Require(!scePadIsBlasterConnected(candidate));
        Require(!scePadIsMoveConnected(candidate));
    }
}

static void CheckSystemRemote(int handle) {
    constexpr int noHandle = static_cast<int>(0x80920008);
    Require(scePadGetHandle(PAD_USER_ID_SYSTEM, PAD_PORT_TYPE_REMOTE, 0) == noHandle);
    const int remote = scePadOpen_nid_postfix(PAD_USER_ID_SYSTEM, PAD_PORT_TYPE_REMOTE, 0, nullptr);
    Require(remote > 0 && remote != handle);
    Require(scePadGetHandle(PAD_USER_ID_SYSTEM, PAD_PORT_TYPE_REMOTE, 0) == remote);
    Require(scePadGetHandle(PAD_USER_ID_SYSTEM, PAD_PORT_TYPE_REMOTE, 1) == noHandle);
    PadData drained[64]{};
    scePadRead_nid_postfix(handle, drained, 64);
    PadInputState pressed;
    pressed.buttons = static_cast<std::uint32_t>(Pad::PadButton::Cross);
    PadPublishInput_nid_postfix(pressed);
    PadData data{};
    data.buttons = ~0u;
    data.connected = true;
    Require(scePadReadState(remote, &data) == PAD_OK);
    Require(data.buttons == 0 && !data.connected);
    Require(scePadReadState(remote, nullptr) == PAD_ERROR_INVALID_ARG);
    PadData queued[4]{};
    queued[0].connected = true;
    Require(scePadRead_nid_postfix(remote, queued, 4) == 1);
    Require(queued[0].buttons == 0 && !queued[0].connected);
    PadLightBarParam lightBar{1, 2, 3};
    Require(scePadSetLightBar(remote, &lightBar) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadReadState(handle, &data) == PAD_OK);
    Require((data.buttons & pressed.buttons) != 0 && data.connected);
    PadPublishInput_nid_postfix(PadInputState{});
    scePadRead_nid_postfix(handle, drained, 64);
    Require(scePadClose_nid_postfix(remote) == PAD_OK);
    Require(scePadGetHandle(PAD_USER_ID_SYSTEM, PAD_PORT_TYPE_REMOTE, 0) == noHandle);
    Require(scePadReadState(remote, &data) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadReadState(handle, &data) == PAD_OK);
}

static void CheckAccessibilityControllerState(int handle) {
    std::uint32_t state = 7;
    Require(scePadGetAccessibilityControllerState(handle + 1, nullptr) == PAD_ERROR_INVALID_ARG);
    Require(scePadGetAccessibilityControllerState(handle + 1, &state) == PAD_ERROR_INVALID_HANDLE);
    Require(state == 7);
    Require(scePadGetAccessibilityControllerState(handle, &state) == PAD_OK);
    Require(state == 0);
}

static void CheckControllerType(int handle) {
    std::int32_t type = -1;
    Require(scePadGetControllerType(handle + 1, nullptr) == PAD_ERROR_INVALID_ARG);
    Require(scePadGetControllerType(handle + 1, &type) == PAD_ERROR_INVALID_HANDLE);
    Require(type == -1);
    Require(scePadGetControllerType(handle, &type) == PAD_OK);
    Require(type == PAD_CONTROLLER_TYPE_DUAL_SENSE);
}

static void CheckInjectedState(const std::filesystem::path& path) {
    PadInputState physical;
    physical.buttons = 0x2000;
    physical.analogButtonsR2 = 73;
    physical.sticks[0] = 42;
    PadPublishInput_nid_postfix(physical);
    const auto before = Pad::ReadState();
    std::ofstream(path) << "1 16640 300\n";
    PadData pressed{};
    const auto deadline = std::chrono::steady_clock::now() + std::chrono::seconds(2);
    do {
        pressed = Pad::ReadState();
        if ((pressed.buttons & 0x4000) != 0) break;
        std::this_thread::sleep_for(std::chrono::milliseconds(10));
    } while (std::chrono::steady_clock::now() < deadline);
    Require(pressed.buttons == (0x2000 | 0x4000 | 0x100));
    Require(pressed.analog_buttons_l2 == 255 && pressed.analog_buttons_r2 == 73);
    Require(pressed.left_stick_x == 42 && pressed.timestamp > before.timestamp);
    std::this_thread::sleep_for(std::chrono::milliseconds(310));
    const auto released = Pad::ReadState();
    Require(released.buttons == 0x2000 && released.analog_buttons_l2 == 0);
    Require(released.timestamp > pressed.timestamp);
    physical.sticks[3] = 17;
    PadPublishInput_nid_postfix(physical);
    const auto still = Pad::ReadState();
    std::ofstream(path) << "2 0 300 200 0 128 128\n";
    PadData moved{};
    const auto stickDeadline = std::chrono::steady_clock::now() + std::chrono::seconds(2);
    do {
        moved = Pad::ReadState();
        if (moved.left_stick_x == 200) break;
        std::this_thread::sleep_for(std::chrono::milliseconds(10));
    } while (std::chrono::steady_clock::now() < stickDeadline);
    Require(moved.left_stick_x == 200 && moved.left_stick_y == 0);
    Require(moved.right_stick_x == 128 && moved.right_stick_y == 128);
    Require(moved.buttons == 0x2000 && moved.timestamp > still.timestamp);
    std::this_thread::sleep_for(std::chrono::milliseconds(310));
    const auto centred = Pad::ReadState();
    Require(centred.left_stick_x == 42 && centred.right_stick_y == 17);
    Require(centred.timestamp > moved.timestamp);
    for (const auto& [command, x] : {std::pair{"3 2097152 300\n", kTouchPadWidth / 4}, std::pair{"4 4194304 300\n", kTouchPadWidth * 3 / 4}}) {
        std::ofstream(path) << command;
        PadData touched{};
        const auto touchDeadline = std::chrono::steady_clock::now() + std::chrono::seconds(2);
        do {
            touched = Pad::ReadState();
            if (touched.touch_data_touch_num != 0) break;
            std::this_thread::sleep_for(std::chrono::milliseconds(10));
        } while (std::chrono::steady_clock::now() < touchDeadline);
        Require(touched.touch_data_touch_num == 1 && touched.touch_data_touch0_x == x && touched.touch_data_touch0_y == kTouchPadHeight / 2);
        Require(touched.buttons == (0x2000 | 0x100000));
        std::this_thread::sleep_for(std::chrono::milliseconds(310));
        const auto lifted = Pad::ReadState();
        Require(lifted.touch_data_touch_num == 0 && lifted.buttons == 0x2000);
    }
    PadPublishInput_nid_postfix(PadInputState{});
}

static void CheckInjectedQueueTimes(const std::filesystem::path& path) {
    PadData drained[64]{};
    Pad::Read(drained, 64);
    PadInputState physical;
    physical.buttons = 0x2000;
    PadPublishInput_nid_postfix(physical);
    const auto before = Pad::ReadState();
    std::ofstream(path) << "5 16384 300\n";
    PadData pressed{};
    const auto deadline = std::chrono::steady_clock::now() + std::chrono::seconds(2);
    do {
        pressed = Pad::ReadState();
        if ((pressed.buttons & 0x4000) != 0) break;
        std::this_thread::sleep_for(std::chrono::milliseconds(10));
    } while (std::chrono::steady_clock::now() < deadline);
    Require(pressed.buttons == 0x6000 && pressed.timestamp > before.timestamp);
    PadData queued{};
    Require(Pad::Read(&queued, 1) == 1);
    Require(queued.buttons == pressed.buttons);
    if (queued.timestamp < pressed.timestamp) {
        std::fputs("queued input predates its injected button press\n", stderr);
        std::abort();
    }
    physical.sticks[0] = 130;
    PadPublishInput_nid_postfix(physical);
    std::this_thread::sleep_for(std::chrono::milliseconds(310));
    const auto released = Pad::ReadState();
    Require(released.buttons == 0x2000 && released.timestamp > pressed.timestamp);
    Require(Pad::Read(&queued, 1) == 1);
    Require(queued.buttons == released.buttons && queued.left_stick_x == 130);
    if (queued.timestamp < released.timestamp) {
        std::fputs("queued input predates its injected button release\n", stderr);
        std::abort();
    }
    PadPublishInput_nid_postfix(PadInputState{});
}

int main() {
    CheckInputCommands();
    std::uint32_t accessibilityState = 7;
    Require(scePadGetAccessibilityControllerState(PAD_HANDLE, nullptr) == PAD_ERROR_NOT_INITIALIZED);
    Require(scePadGetAccessibilityControllerState(PAD_HANDLE, &accessibilityState) == PAD_ERROR_NOT_INITIALIZED);
    Require(accessibilityState == 7);
    std::int32_t controllerType = -1;
    Require(scePadGetControllerType(PAD_HANDLE, nullptr) == PAD_ERROR_NOT_INITIALIZED);
    Require(scePadGetControllerType(PAD_HANDLE, &controllerType) == PAD_ERROR_NOT_INITIALIZED);
    Require(controllerType == -1);
    Require(scePadUnknown_n3kSX62fgNo() == static_cast<int>(0x80920005));
    const auto path = std::filesystem::temp_directory_path() / ("anyps5-pad-state-" + std::to_string(std::chrono::steady_clock::now().time_since_epoch().count()));
    struct Cleanup {
        std::filesystem::path path;
        ~Cleanup() { std::error_code error; std::filesystem::remove(path, error); }
    };
    auto commandPath = path;
    commandPath += std::filesystem::path(u8"-žluťoučký-漢字");
    Cleanup cleanup{commandPath};
#ifdef _WIN32
    Require(_wputenv_s(L"APS5_PAD_INPUT_FILE", commandPath.c_str()) == 0);
#else
    Require(setenv("APS5_PAD_INPUT_FILE", commandPath.string().c_str(), 1) == 0);
#endif
    {
        std::uint32_t sequence = 0;
        PadOutputState snapshot;
        Pad::SetVibration(12, 34);
        PadSubmitAudioHaptics_nid_postfix(100, 150);
        Require(PadFetchOutput_nid_postfix(&sequence, &snapshot));
        Require(snapshot.audioVibrationLarge == 100 && snapshot.audioVibrationSmall == 150);
        Require(snapshot.vibrationLarge == 12 && snapshot.vibrationSmall == 34);
        PadQueueLegacyAudioHaptics_nid_postfix(1, 0, ~std::uint64_t{0}, 200, 20);
        Require(PadFetchOutput_nid_postfix(&sequence, &snapshot));
        Require(snapshot.audioVibrationLarge == 200 && snapshot.audioVibrationSmall == 150);
        PadClearLegacyAudioHaptics_nid_postfix(1);
        Require(PadFetchOutput_nid_postfix(&sequence, &snapshot));
        Require(snapshot.audioVibrationLarge == 100 && snapshot.audioVibrationSmall == 150);
        Require(snapshot.vibrationLarge == 12 && snapshot.vibrationSmall == 34);
        PadSubmitAudioHaptics_nid_postfix(0, 0);
        std::this_thread::sleep_for(std::chrono::milliseconds(100));
        Require(PadFetchOutput_nid_postfix(&sequence, &snapshot));
        Require(snapshot.audioVibrationLarge == 0 && snapshot.audioVibrationSmall == 0);
        Require(snapshot.vibrationLarge == 12 && snapshot.vibrationSmall == 34);
        Pad::SetVibration(0, 0);
    }
    constexpr int noHandle = static_cast<int>(0x80920008);
    constexpr int user = 0x10000000;

    Require(scePadGetHandle(user, 0, 0) == noHandle);
    Require(scePadOpen_nid_postfix(user, 1, 0, nullptr) == PAD_ERROR_INVALID_ARG);
    Require(scePadOpen_nid_postfix(user, 0, 1, nullptr) == static_cast<int>(0x809b0003));
    for (const int type : {0, 2, 3, 4}) Require(scePadOpen_nid_postfix(-1, type, 0, nullptr) == static_cast<int>(0x809b0001));
    Require(scePadOpen_nid_postfix(-1, 0, 1, nullptr) == static_cast<int>(0x809b0001));
    Require(scePadOpen_nid_postfix(-1, 1, 0, nullptr) == PAD_ERROR_INVALID_ARG);
    for (const int type : {5, 6, 16, 0xff, -1}) Require(scePadOpen_nid_postfix(user, type, 0, nullptr) == PAD_ERROR_INVALID_ARG);
    Require(scePadGetHandle(user, 0, 0) == noHandle);
    const unsigned char wheel[16]{0xb7, 0x0e, 0x04, 0x0e, 0x08, 0x6e, 0x01};
    Require(scePadOpenExt(user, PAD_PORT_TYPE_SPECIAL, 0, wheel) == static_cast<int>(0x80920007));
    Require(scePadOpenExt(user, PAD_PORT_TYPE_SPECIAL, 1, wheel) == PAD_ERROR_INVALID_ARG);
    Require(scePadOpenExt(user, PAD_PORT_TYPE_SPECIAL, 0, nullptr) == PAD_ERROR_INVALID_ARG);
    Require(scePadGetHandle(user, 0, 0) == noHandle);
    const int earlySpecial = scePadOpen_nid_postfix(user, PAD_PORT_TYPE_SPECIAL, 0, nullptr);
    Require(earlySpecial > 0);
    Require(scePadGetHandle(user, 0, 0) == noHandle);
    Require(scePadGetHandle(user, PAD_PORT_TYPE_SPECIAL, 0) == earlySpecial);
    Require(scePadClose_nid_postfix(earlySpecial) == PAD_OK);
    Require(scePadGetHandle(user, PAD_PORT_TYPE_SPECIAL, 0) == noHandle);
    PadSetPortConnected_nid_postfix(1, true);
    Require(scePadInit_nid_postfix() == 0);
    PadInfo initInfo{};
    Require(scePadGetInfo_nid_postfix(&initInfo) == PAD_OK);
    Require(initInfo.connectedCount[0] == 2);
    Require(initInfo.padTypeInfo[0].connectPort == 0);
    Require(initInfo.padTypeInfo[1].connectPort == 1);
    PadSetPortConnected_nid_postfix(1, false);
    Require(scePadUnknown_n3kSX62fgNo() == PAD_OK);
    const int handle = scePadOpen_nid_postfix(user, 0, 0, nullptr);
    Require(handle > 0);
    Require(scePadUnknown_n3kSX62fgNo() == PAD_OK);
    Require(scePadGetHandle(user, 0, 0) == handle);
    CheckSpecialPort(user, handle);
    CheckTiltCorrection(handle);
    CheckAngularVelocityDeadband(handle);
    CheckTouchContact();
    CheckVirtualTouchContact();
    CheckTouchPadInformation(handle);
    CheckStickDeadZones(handle);
    CheckPartialTrigger();
    CheckReadQueue(handle);
    CheckTapBetweenReads();
    CheckLatchedPressLifetime(handle);
    CheckReadStateHandle(handle);
    CheckRemoteController(handle);
    CheckTrackerDevices(handle);
    CheckAccessibilityControllerState(handle);
    CheckControllerType(handle);
    CheckInjectedState(commandPath);
    CheckInjectedQueueTimes(commandPath);
    PadLightBarParam lightBar{255, 128, 64};
    Require(scePadSetLightBar(handle, &lightBar) == PAD_OK);
    Require(scePadSetLightBar(handle, nullptr) == PAD_ERROR_INVALID_ARG);
    Require(scePadSetLightBar(handle + 1, &lightBar) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadResetLightBar(handle) == PAD_OK);
    Require(scePadResetLightBar(handle + 1) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadSetMotionSensorState(handle, true) == PAD_OK);
    Require(scePadSetMotionSensorState(handle, false) == PAD_OK);
    Require(scePadSetMotionSensorState(handle + 1, true) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadSetVibrationMode(handle, 1) == 0);
    Require(scePadSetVibrationMode(handle, 2) == 0);
    Require(scePadSetVibrationMode(handle, 3) == 0);
    Require(scePadSetVibrationMode(handle, 4) == PAD_ERROR_INVALID_ARG);
    Require(scePadSetVibrationMode(handle, 5) == 0);
    Require(scePadSetVibrationMode(handle, 6) == PAD_ERROR_INVALID_ARG);
    Require(scePadSetVibrationMode(handle, -1) == PAD_ERROR_INVALID_ARG);
    CheckSystemRemote(handle);
    Require(scePadGetHandle(user, 16, 0) == noHandle);
    Require(scePadGetHandle(user, 0, 1) == noHandle);
    Require(scePadClose_nid_postfix(handle) == 0);
    Require(scePadGetHandle(user, 0, 0) == noHandle);
    Require(scePadUnknown_n3kSX62fgNo() == PAD_OK);
    Require(scePadSetVibrationTriggerEffectWeakWhileEmbeddedMicInUse(true) == 0);
    Require(scePadSetAngularVelocityDeadbandState(handle, false) == 0);
    Require(scePadSetAngularVelocityDeadbandState(handle + 1, false) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadSetAngularVelocityDeadbandState(handle + 1, true) == PAD_ERROR_INVALID_HANDLE);
    Require(scePadSetAngularVelocityBiasCorrectionState(handle, false) == PAD_OK);
    Require(scePadSetAngularVelocityBiasCorrectionState(handle + 1, false) == PAD_ERROR_INVALID_HANDLE);
    PadInfo info{};
    Require(scePadGetInfo_nid_postfix(&info) == PAD_OK);
    Require(info.maxConnectCount == PAD_MAX_CONTROLLERS);
    Require(info.connectedCount[0] == 1);
    Require(info.padTypeInfo[0].connectPort == 0);

    const int user2 = 0x10000001;
    Require(scePadGetHandle(user2, 0, 0) == noHandle);
    const int handle2 = scePadOpen_nid_postfix(user2, 0, 0, nullptr);
    Require(handle2 == PAD_HANDLE_BASE + 1);
    Require(scePadGetHandle(user2, 0, 0) == handle2);

    PadInputState p2Input{};
    p2Input.buttons = static_cast<std::uint32_t>(Pad::PadButton::Triangle);
    PadPublishInputForPort_nid_postfix(1, p2Input);
    PadData p2Data{};
    Require(scePadReadState(handle2, &p2Data) == 0);
    Require((p2Data.buttons & static_cast<std::uint32_t>(Pad::PadButton::Triangle)) != 0);

    Require(scePadSetVibrationMode(handle2, 1) == 0);
    std::uint32_t p2AccessState = 7;
    Require(scePadGetAccessibilityControllerState(handle2, &p2AccessState) == PAD_OK);
    Require(p2AccessState == 0);
    std::int32_t p2Type = -1;
    Require(scePadGetControllerType(handle2, &p2Type) == PAD_OK);
    Require(p2Type == PAD_CONTROLLER_TYPE_DUAL_SENSE);

    PadSetPortConnected_nid_postfix(1, true);
    Require(scePadGetInfo_nid_postfix(&info) == PAD_OK);
    Require(info.connectedCount[0] == 2);
    Require(info.padTypeInfo[0].connectPort == 0);
    Require(info.padTypeInfo[1].connectPort == 1);
    PadSetPortConnected_nid_postfix(1, false);
    Require(scePadGetInfo_nid_postfix(&info) == PAD_OK);
    Require(info.connectedCount[0] == 1);
    Require(info.padTypeInfo[0].connectPort == 0);

    Require(scePadClose_nid_postfix(handle2) == 0);
    Require(scePadGetHandle(user2, 0, 0) == noHandle);
    Require(scePadSetAngularVelocityDeadbandState(handle2, false) == PAD_OK);
    Require(scePadSetAngularVelocityDeadbandState(handle2 + 1, false) == PAD_ERROR_INVALID_HANDLE);
}