572 lines
12 KiB
C
572 lines
12 KiB
C
#include "input.h"
|
|
|
|
#include "ffi.h"
|
|
#include "font.h"
|
|
#include "log.h"
|
|
#include "script.h"
|
|
#include "stb_ds.h"
|
|
#include "time.h"
|
|
#include <stdio.h>
|
|
|
|
#include "stb_ds.h"
|
|
|
|
int32_t mouseWheelX = 0;
|
|
int32_t mouseWheelY = 0;
|
|
float deltaT = 0;
|
|
|
|
JSValue jsinput;
|
|
JSValue jsnum;
|
|
JSValue jsgamepadstr[15];
|
|
JSValue jsaxesstr[4];
|
|
JSValue jsinputstate[5];
|
|
JSValue jsaxis;
|
|
JSValue jsany;
|
|
JSValue jsmouse;
|
|
JSValue jspos;
|
|
|
|
cpVect mouse_pos = {0, 0};
|
|
cpVect mouse_delta = {0, 0};
|
|
|
|
struct joystick {
|
|
int id;
|
|
GLFWgamepadstate state;
|
|
};
|
|
|
|
static int *downkeys = NULL;
|
|
static struct joystick *joysticks = NULL;
|
|
|
|
static int mquit = 0;
|
|
|
|
static struct callee pawn_callee;
|
|
static struct callee gamepad_callee;
|
|
|
|
static struct {
|
|
char *key;
|
|
JSValue value;
|
|
} *jshash = NULL;
|
|
|
|
JSValue input2js(const char *input) {
|
|
int idx = shgeti(jshash, input);
|
|
if (idx != -1)
|
|
return jshash[idx].value;
|
|
|
|
if (shlen(jshash) == 0)
|
|
sh_new_arena(jshash);
|
|
|
|
JSValue n = str2js(input);
|
|
shput(jshash, input, str2js(input));
|
|
|
|
return n;
|
|
}
|
|
|
|
const char *gamepad2str(int btn) {
|
|
switch (btn) {
|
|
case GLFW_GAMEPAD_BUTTON_CROSS:
|
|
return "cross";
|
|
case GLFW_GAMEPAD_BUTTON_CIRCLE:
|
|
return "circle";
|
|
case GLFW_GAMEPAD_BUTTON_SQUARE:
|
|
return "square";
|
|
case GLFW_GAMEPAD_BUTTON_TRIANGLE:
|
|
return "triangle";
|
|
case GLFW_GAMEPAD_BUTTON_START:
|
|
return "start";
|
|
case GLFW_GAMEPAD_BUTTON_LEFT_BUMPER:
|
|
return "lbump";
|
|
case GLFW_GAMEPAD_BUTTON_RIGHT_BUMPER:
|
|
return "rbump";
|
|
case GLFW_GAMEPAD_BUTTON_GUIDE:
|
|
return "guide";
|
|
case GLFW_GAMEPAD_BUTTON_BACK:
|
|
return "back";
|
|
case GLFW_GAMEPAD_BUTTON_DPAD_UP:
|
|
return "dup";
|
|
case GLFW_GAMEPAD_BUTTON_DPAD_DOWN:
|
|
return "ddown";
|
|
case GLFW_GAMEPAD_BUTTON_DPAD_LEFT:
|
|
return "dleft";
|
|
case GLFW_GAMEPAD_BUTTON_DPAD_RIGHT:
|
|
return "dright";
|
|
case GLFW_GAMEPAD_BUTTON_LEFT_THUMB:
|
|
return "lthumb";
|
|
case GLFW_GAMEPAD_BUTTON_RIGHT_THUMB:
|
|
return "rthumb";
|
|
}
|
|
|
|
return "NOBTN";
|
|
}
|
|
|
|
void register_pawn(struct callee c) {
|
|
pawn_callee = c;
|
|
}
|
|
|
|
void register_gamepad(struct callee c) {
|
|
gamepad_callee = c;
|
|
}
|
|
|
|
void add_downkey(int key) {
|
|
for (int i = 0; i < arrlen(downkeys); i++)
|
|
if (downkeys[i] == key) return;
|
|
|
|
arrput(downkeys, key);
|
|
}
|
|
|
|
void rm_downkey(int key) {
|
|
for (int i = 0; i < arrlen(downkeys); i++)
|
|
if (downkeys[i] == key) {
|
|
arrdelswap(downkeys, i);
|
|
return;
|
|
}
|
|
}
|
|
|
|
static void cursor_pos_cb(GLFWwindow *w, double xpos, double ypos) {
|
|
mouse_delta.x = xpos - mouse_pos.x;
|
|
mouse_delta.y = ypos - mouse_pos.y;
|
|
|
|
mouse_pos.x = xpos;
|
|
mouse_pos.y = ypos;
|
|
|
|
JSValue argv[4];
|
|
argv[0] = jsinput;
|
|
argv[1] = jsmouse;
|
|
argv[2] = jspos;
|
|
argv[3] = vec2js(mouse_pos);
|
|
script_callee(pawn_callee, 4, argv);
|
|
JS_FreeValue(js, argv[3]);
|
|
}
|
|
|
|
static void pawn_call_keydown(int key) {
|
|
JSValue argv[4];
|
|
argv[0] = jsinput;
|
|
argv[1] = jsnum;
|
|
argv[2] = jsinputstate[2];
|
|
/* TODO: Could cache */
|
|
argv[3] = JS_NewInt32(js, key);
|
|
script_callee(pawn_callee, 4, argv);
|
|
JS_FreeValue(js, argv[3]);
|
|
}
|
|
|
|
static void scroll_cb(GLFWwindow *w, double xoffset, double yoffset) {
|
|
mouseWheelY = yoffset;
|
|
mouseWheelX = xoffset;
|
|
}
|
|
|
|
static void mb_cb(GLFWwindow *w, int button, int action, int mods) {
|
|
JSValue argv[3];
|
|
argv[0] = jsinput;
|
|
switch (action) {
|
|
case GLFW_PRESS:
|
|
argv[2] = jsinputstate[2];
|
|
add_downkey(button);
|
|
break;
|
|
|
|
case GLFW_RELEASE:
|
|
rm_downkey(button);
|
|
argv[2] = jsinputstate[0];
|
|
argv[1] = jsany;
|
|
script_callee(pawn_callee, 3, argv);
|
|
break;
|
|
|
|
case GLFW_REPEAT:
|
|
argv[2] = jsinputstate[1];
|
|
break;
|
|
}
|
|
|
|
argv[1] = input2js(keyname_extd(button, button));
|
|
script_callee(pawn_callee, 3, argv);
|
|
}
|
|
|
|
void set_mouse_mode(int mousemode) {
|
|
glfwSetInputMode(mainwin->window, GLFW_CURSOR, mousemode);
|
|
}
|
|
|
|
void char_cb(GLFWwindow *w, unsigned int codepoint) {
|
|
static char out[2] = {0};
|
|
static JSValue argv[2];
|
|
|
|
out[0] = (char)codepoint;
|
|
argv[0] = JS_NewString(js, "input_text");
|
|
argv[1] = JS_NewString(js, out);
|
|
script_callee(pawn_callee, 2, argv);
|
|
|
|
JS_FreeValue(js, argv[0]);
|
|
JS_FreeValue(js, argv[1]);
|
|
}
|
|
|
|
static GLFWcharfun nukechar;
|
|
|
|
void joystick_add(int id) {
|
|
struct joystick joy = {0};
|
|
joy.id = id;
|
|
arrpush(joysticks, joy);
|
|
}
|
|
|
|
void joystick_cb(int jid, int event) {
|
|
YughWarn("IN joystick cb");
|
|
if (event == GLFW_CONNECTED) {
|
|
for (int i = 0; i < arrlen(joysticks); i++)
|
|
if (joysticks[i].id == jid) return;
|
|
|
|
joystick_add(jid);
|
|
} else if (event == GLFW_DISCONNECTED) {
|
|
for (int i = 0; i < arrlen(joysticks); i++) {
|
|
if (joysticks[i].id == jid) {
|
|
arrdelswap(joysticks, i);
|
|
return;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
void input_init() {
|
|
glfwSetCursorPosCallback(mainwin->window, cursor_pos_cb);
|
|
glfwSetScrollCallback(mainwin->window, scroll_cb);
|
|
glfwSetMouseButtonCallback(mainwin->window, mb_cb);
|
|
glfwSetJoystickCallback(joystick_cb);
|
|
nukechar = glfwSetCharCallback(mainwin->window, char_cb);
|
|
|
|
char *paddb = slurp_text("data/gamecontrollerdb.txt");
|
|
glfwUpdateGamepadMappings(paddb);
|
|
free(paddb);
|
|
|
|
for (int b = 0; b < 15; b++)
|
|
jsgamepadstr[b] = str2js(gamepad2str(b));
|
|
|
|
jsaxesstr[0] = str2js("ljoy");
|
|
jsaxesstr[1] = str2js("rjoy");
|
|
jsaxesstr[2] = str2js("ltrigger");
|
|
jsaxesstr[3] = str2js("rtrigger");
|
|
jsaxis = str2js("axis");
|
|
|
|
/* Grab all joysticks initially present */
|
|
for (int i = 0; i < 16; i++)
|
|
if (glfwJoystickPresent(i)) joystick_add(i);
|
|
|
|
jsinputstate[0] = str2js("released");
|
|
jsinputstate[1] = str2js("rep");
|
|
jsinputstate[2] = str2js("pressed");
|
|
jsinputstate[3] = str2js("pressrep");
|
|
jsinputstate[4] = str2js("down");
|
|
jsinput = str2js("input");
|
|
jsnum = str2js("num");
|
|
jsany = str2js("any");
|
|
jsmouse = str2js("mouse");
|
|
jspos = str2js("pos");
|
|
}
|
|
|
|
void input_to_nuke() {
|
|
glfwSetCharCallback(mainwin->window, nukechar);
|
|
}
|
|
|
|
void input_to_game() {
|
|
glfwSetCharCallback(mainwin->window, char_cb);
|
|
}
|
|
|
|
void call_input_signal(char *signal) {
|
|
JSValue s = JS_NewString(js, signal);
|
|
JS_Call(js, pawn_callee.fn, pawn_callee.obj, 1, &s);
|
|
JS_FreeValue(js, s);
|
|
}
|
|
|
|
char keybuf[50];
|
|
|
|
const char *keyname_extd(int key, int scancode) {
|
|
const char *kkey = NULL;
|
|
|
|
if (key > 289 && key < 302) {
|
|
int num = key - 289;
|
|
sprintf(keybuf, "f%d", num);
|
|
return keybuf;
|
|
} else if (key >= 320 && key <= 329) {
|
|
int num = key - 320;
|
|
sprintf(keybuf, "kp%d", num);
|
|
return keybuf;
|
|
} else {
|
|
switch (key) {
|
|
case GLFW_KEY_ENTER:
|
|
kkey = "enter";
|
|
break;
|
|
|
|
case GLFW_KEY_ESCAPE:
|
|
kkey = "escape";
|
|
break;
|
|
|
|
case GLFW_KEY_DELETE:
|
|
kkey = "delete";
|
|
break;
|
|
|
|
case GLFW_KEY_INSERT:
|
|
kkey = "insert";
|
|
break;
|
|
|
|
case GLFW_KEY_TAB:
|
|
kkey = "tab";
|
|
break;
|
|
|
|
case GLFW_KEY_RIGHT:
|
|
kkey = "right";
|
|
break;
|
|
|
|
case GLFW_KEY_LEFT:
|
|
kkey = "left";
|
|
break;
|
|
|
|
case GLFW_KEY_UP:
|
|
kkey = "up";
|
|
break;
|
|
|
|
case GLFW_KEY_DOWN:
|
|
kkey = "down";
|
|
break;
|
|
|
|
case GLFW_KEY_LEFT_SHIFT:
|
|
kkey = "lshift";
|
|
break;
|
|
|
|
case GLFW_KEY_RIGHT_SHIFT:
|
|
kkey = "rshift";
|
|
break;
|
|
|
|
case GLFW_KEY_LEFT_CONTROL:
|
|
kkey = "lctrl";
|
|
break;
|
|
|
|
case GLFW_KEY_LEFT_ALT:
|
|
kkey = "lalt";
|
|
break;
|
|
|
|
case GLFW_KEY_RIGHT_CONTROL:
|
|
kkey = "rctrl";
|
|
break;
|
|
|
|
case GLFW_KEY_RIGHT_ALT:
|
|
kkey = "ralt";
|
|
break;
|
|
|
|
case GLFW_KEY_SPACE:
|
|
kkey = "space";
|
|
break;
|
|
|
|
case GLFW_MOUSE_BUTTON_RIGHT:
|
|
kkey = "rmouse";
|
|
break;
|
|
|
|
case GLFW_MOUSE_BUTTON_LEFT:
|
|
kkey = "lmouse";
|
|
break;
|
|
|
|
case GLFW_MOUSE_BUTTON_MIDDLE:
|
|
kkey = "mmouse";
|
|
break;
|
|
|
|
case GLFW_KEY_KP_ADD:
|
|
kkey = "plus";
|
|
break;
|
|
|
|
case GLFW_KEY_KP_SUBTRACT:
|
|
kkey = "minus";
|
|
break;
|
|
case GLFW_KEY_GRAVE_ACCENT:
|
|
kkey = "backtick";
|
|
break;
|
|
|
|
case GLFW_KEY_LEFT_BRACKET:
|
|
kkey = "lbracket";
|
|
break;
|
|
|
|
case GLFW_KEY_RIGHT_BRACKET:
|
|
kkey = "rbracket";
|
|
break;
|
|
|
|
case GLFW_KEY_BACKSPACE:
|
|
kkey = "backspace";
|
|
break;
|
|
}
|
|
|
|
if (kkey) return kkey;
|
|
}
|
|
|
|
kkey = glfwGetKeyName(key, scancode);
|
|
|
|
if (kkey) return kkey;
|
|
|
|
return "NULL";
|
|
}
|
|
|
|
void call_input_down(int *key) {
|
|
JSValue argv[3];
|
|
argv[0] = jsinput;
|
|
argv[1] = input2js(keyname_extd(*key, *key));
|
|
argv[2] = jsinputstate[4];
|
|
script_callee(pawn_callee, 3, argv);
|
|
}
|
|
|
|
const char *axis2str(int axis) {
|
|
switch (axis) {
|
|
case GLFW_GAMEPAD_AXIS_LEFT_X:
|
|
return "lx";
|
|
case GLFW_GAMEPAD_AXIS_LEFT_Y:
|
|
return "ly";
|
|
case GLFW_GAMEPAD_AXIS_RIGHT_X:
|
|
return "rx";
|
|
case GLFW_GAMEPAD_AXIS_RIGHT_Y:
|
|
return "ry";
|
|
case GLFW_GAMEPAD_AXIS_LEFT_TRIGGER:
|
|
return "ltrigger";
|
|
case GLFW_GAMEPAD_AXIS_RIGHT_TRIGGER:
|
|
return "rtrigger";
|
|
}
|
|
|
|
return "NOAXIS";
|
|
}
|
|
|
|
/* This is called once every frame - or more if we want it more! */
|
|
void input_poll(double wait) {
|
|
mouse_delta = cpvzero;
|
|
mouseWheelX = 0;
|
|
mouseWheelY = 0;
|
|
|
|
glfwWaitEventsTimeout(wait);
|
|
|
|
for (int i = 0; i < arrlen(downkeys); i++)
|
|
call_input_down(&downkeys[i]);
|
|
|
|
for (int i = 0; i < arrlen(joysticks); i++) {
|
|
GLFWgamepadstate state;
|
|
if (!glfwGetGamepadState(joysticks[i].id, &state)) continue;
|
|
|
|
JSValue argv[4];
|
|
argv[0] = num_cache[joysticks[i].id];
|
|
for (int b = 0; b < 15; b++) {
|
|
argv[1] = jsgamepadstr[b];
|
|
|
|
if (state.buttons[b]) {
|
|
argv[2] = num_cache[0];
|
|
script_callee(gamepad_callee, 3, argv);
|
|
|
|
if (!joysticks[i].state.buttons[b]) {
|
|
argv[2] = num_cache[1];
|
|
script_callee(gamepad_callee, 3, argv);
|
|
}
|
|
} else if (!state.buttons[b] && joysticks[i].state.buttons[b]) {
|
|
argv[2] = num_cache[2];
|
|
script_callee(gamepad_callee, 3, argv);
|
|
}
|
|
}
|
|
|
|
argv[2] = jsaxis;
|
|
|
|
float deadzone = 0.05;
|
|
|
|
for (int i = 0; i < 4; i++)
|
|
state.axes[i] = fabs(state.axes[i]) > deadzone ? state.axes[i] : 0;
|
|
|
|
argv[1] = jsaxesstr[0];
|
|
cpVect v;
|
|
v.x = state.axes[0];
|
|
v.y = -state.axes[1];
|
|
argv[3] = vec2js(v);
|
|
script_callee(gamepad_callee, 4, argv);
|
|
JS_FreeValue(js, argv[3]);
|
|
|
|
argv[1] = jsaxesstr[1];
|
|
v.x = state.axes[2];
|
|
v.y = -state.axes[3];
|
|
argv[3] = vec2js(v);
|
|
script_callee(gamepad_callee, 4, argv);
|
|
JS_FreeValue(js, argv[3]);
|
|
|
|
argv[1] = jsaxesstr[2];
|
|
argv[3] = num2js((state.axes[4] + 1) / 2);
|
|
script_callee(gamepad_callee, 4, argv);
|
|
JS_FreeValue(js, argv[3]);
|
|
|
|
argv[1] = jsaxesstr[3];
|
|
argv[3] = num2js((state.axes[5] + 1) / 2);
|
|
script_callee(gamepad_callee, 4, argv);
|
|
JS_FreeValue(js, argv[3]);
|
|
|
|
joysticks[i].state = state;
|
|
}
|
|
}
|
|
|
|
int key_is_num(int key) {
|
|
return key <= 57 && key >= 48;
|
|
}
|
|
|
|
void win_key_callback(GLFWwindow *w, int key, int scancode, int action, int mods) {
|
|
JSValue argv[3];
|
|
argv[0] = jsinput;
|
|
argv[1] = input2js(keyname_extd(key, scancode));
|
|
|
|
switch (action) {
|
|
case GLFW_PRESS:
|
|
argv[2] = jsinputstate[2];
|
|
script_callee(pawn_callee, 3, argv);
|
|
argv[2] = jsinputstate[3];
|
|
script_callee(pawn_callee, 3, argv);
|
|
add_downkey(key);
|
|
argv[1] = jsany;
|
|
argv[2] = jsinputstate[2];
|
|
script_callee(pawn_callee, 3, argv);
|
|
|
|
if (key_is_num(key))
|
|
pawn_call_keydown(key - 48);
|
|
|
|
break;
|
|
|
|
case GLFW_RELEASE:
|
|
argv[2] = jsinputstate[0];
|
|
script_callee(pawn_callee, 3, argv);
|
|
rm_downkey(key);
|
|
argv[1] = jsany;
|
|
script_callee(pawn_callee, 3, argv);
|
|
break;
|
|
|
|
case GLFW_REPEAT:
|
|
argv[2] = jsinputstate[1];
|
|
script_callee(pawn_callee, 3, argv);
|
|
argv[2] = jsinputstate[3];
|
|
script_callee(pawn_callee, 3, argv);
|
|
break;
|
|
}
|
|
}
|
|
|
|
void cursor_hide() {
|
|
glfwSetInputMode(mainwin->window, GLFW_CURSOR, GLFW_CURSOR_DISABLED);
|
|
}
|
|
|
|
void cursor_show() {
|
|
glfwSetInputMode(mainwin->window, GLFW_CURSOR, GLFW_CURSOR_NORMAL);
|
|
}
|
|
|
|
int action_down(int scancode) {
|
|
for (int i = 0; i < arrlen(downkeys); i++) {
|
|
if (downkeys[i] == scancode)
|
|
return 1;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
int action_up(int scancode) {
|
|
int found = 0;
|
|
for (int i = 0; i < arrlen(downkeys); i++) {
|
|
if (downkeys[i] == scancode) {
|
|
found = 1;
|
|
break;
|
|
}
|
|
}
|
|
|
|
return !found;
|
|
}
|
|
|
|
int want_quit() {
|
|
return mquit;
|
|
}
|
|
|
|
void quit() {
|
|
YughInfo("Exiting game.");
|
|
mquit = 1;
|
|
}
|