mpv/input/input.c

1232 lines
30 KiB
C

#include "../config.h"
#ifdef HAVE_NEW_INPUT
#include <stdlib.h>
#include <string.h>
#include <stdio.h>
#include <unistd.h>
#include <errno.h>
#include <signal.h>
#include <sys/types.h>
#include <sys/time.h>
#include <fcntl.h>
#include "input.h"
#include "mouse.h"
#ifdef MP_DEBUG
#include <assert.h>
#endif
#include "../linux/getch2.h"
#include "../linux/keycodes.h"
#include "../linux/timer.h"
#include "../cfgparser.h"
#include "joystick.h"
#ifdef HAVE_LIRC
#include "lirc.h"
#endif
// If the args field is not NULL, the command will only be passed if
// an argument exist.
static mp_cmd_t mp_cmds[] = {
{ MP_CMD_SEEK, "seek", 1, { {MP_CMD_ARG_INT,{0}}, {MP_CMD_ARG_INT,{0}}, {-1,{0}} } },
{ MP_CMD_AUDIO_DELAY, "audio_delay", 1, { {MP_CMD_ARG_FLOAT,{0}}, {-1,{0}} } },
{ MP_CMD_QUIT, "quit", 0, { {-1,{0}} } },
{ MP_CMD_PAUSE, "pause", 0, { {-1,{0}} } },
{ MP_CMD_GRAB_FRAMES, "grab_frames",0, { {-1,{0}} } },
{ MP_CMD_PLAY_TREE_STEP, "pt_step",1, { { MP_CMD_ARG_INT ,{0}}, {-1,{0}} } },
{ MP_CMD_PLAY_TREE_UP_STEP, "pt_up_step",1, { { MP_CMD_ARG_INT,{0} }, {-1,{0}} } },
{ MP_CMD_PLAY_ALT_SRC_STEP, "alt_src_step",1, { { MP_CMD_ARG_INT,{0} }, {-1,{0}} } },
{ MP_CMD_SUB_DELAY, "sub_delay",1, { {MP_CMD_ARG_FLOAT,{0}}, {MP_CMD_ARG_INT,{0}}, {-1,{0}} } },
{ MP_CMD_OSD, "osd",0, { {MP_CMD_ARG_INT,{-1}}, {-1,{0}} } },
{ MP_CMD_VOLUME, "volume", 1, { { MP_CMD_ARG_INT,{0} }, {-1,{0}} } },
{ MP_CMD_MIXER_USEMASTER, "use_master", 0, { {-1,{0}} } },
{ MP_CMD_CONTRAST, "contrast",1, { {MP_CMD_ARG_INT,{0}}, {MP_CMD_ARG_INT,{0}}, {-1,{0}} } },
{ MP_CMD_BRIGHTNESS, "brightness",1, { {MP_CMD_ARG_INT,{0}}, {MP_CMD_ARG_INT,{0}}, {-1,{0}} } },
{ MP_CMD_HUE, "hue",1, { {MP_CMD_ARG_INT,{0}}, {MP_CMD_ARG_INT,{0}}, {-1,{0}} } },
{ MP_CMD_SATURATION, "saturation",1, { {MP_CMD_ARG_INT,{0}}, {MP_CMD_ARG_INT,{0}}, {-1,{0}} } },
{ MP_CMD_FRAMEDROPPING, "frame_drop",0, { { MP_CMD_ARG_INT,{-1} }, {-1,{0}} } },
{ MP_CMD_SUB_POS, "sub_pos", 1, { {MP_CMD_ARG_INT,{0}}, {MP_CMD_ARG_INT,{0}}, {-1,{0}} } },
#ifdef USE_TV
{ MP_CMD_TV_STEP_CHANNEL, "tv_step_channel", 1, { { MP_CMD_ARG_INT ,{0}}, {-1,{0}} }},
{ MP_CMD_TV_STEP_NORM, "tv_step_norm",0, { {-1,{0}} } },
{ MP_CMD_TV_STEP_CHANNEL_LIST, "tv_step_chanlist", 0, { {-1,{0}} } },
#endif
{ MP_CMD_VO_FULLSCREEN, "vo_fullscreen", 0, { {-1,{0}} } },
#ifdef HAVE_NEW_GUI
{ MP_CMD_GUI_LOADFILE, "gui_loadfile", 0, { {-1,{0}} } },
{ MP_CMD_GUI_LOADSUBTITLE, "gui_loadsubtitle", 0, { {-1,{0}} } },
{ MP_CMD_GUI_ABOUT, "gui_about", 0, { {-1,{0}} } },
{ MP_CMD_GUI_PLAY, "gui_play", 0, { {-1,{0}} } },
{ MP_CMD_GUI_STOP, "gui_stop", 0, { {-1,{0}} } },
{ MP_CMD_GUI_PLAYLIST, "gui_playlist", 0, { {-1,{0}} } },
{ MP_CMD_GUI_PREFERENCES, "gui_preferences", 0, { {-1,{0}} } },
{ MP_CMD_GUI_SKINBROWSER, "gui_skinbrowser", 0, { {-1,{0}} } },
#endif
{ 0, NULL, 0, {} }
};
static mp_key_name_t key_names[] = {
{ ' ', "SPACE" },
{ KEY_ENTER, "ENTER" },
{ KEY_TAB, "TAB" },
{ KEY_CTRL, "CTRL" },
{ KEY_BACKSPACE, "BS" },
{ KEY_DELETE, "DEL" },
{ KEY_INSERT, "INS" },
{ KEY_HOME, "HOME" },
{ KEY_END, "END" },
{ KEY_PAGE_UP, "PGUP" },
{ KEY_PAGE_DOWN, "PGDWN" },
{ KEY_ESC, "ESC" },
{ KEY_RIGHT, "RIGHT" },
{ KEY_LEFT, "LEFT" },
{ KEY_DOWN, "DOWN" },
{ KEY_UP, "UP" },
{ MOUSE_BTN0, "MOUSE_BTN0" },
{ MOUSE_BTN1, "MOUSE_BTN1" },
{ MOUSE_BTN2, "MOUSE_BTN2" },
{ MOUSE_BTN3, "MOUSE_BTN3" },
{ MOUSE_BTN4, "MOUSE_BTN4" },
{ MOUSE_BTN5, "MOUSE_BTN5" },
{ MOUSE_BTN6, "MOUSE_BTN6" },
{ MOUSE_BTN7, "MOUSE_BTN7" },
{ MOUSE_BTN8, "MOUSE_BTN8" },
{ MOUSE_BTN9, "MOUSE_BTN9" },
{ JOY_AXIS1_MINUS, "JOY_UP" },
{ JOY_AXIS1_PLUS, "JOY_DOWN" },
{ JOY_AXIS0_MINUS, "JOY_LEFT" },
{ JOY_AXIS0_PLUS, "JOY_RIGHT" },
{ JOY_AXIS0_PLUS, "JOY_AXIS0_PLUS" },
{ JOY_AXIS0_MINUS, "JOY_AXIS0_MINUS" },
{ JOY_AXIS1_PLUS, " JOY_AXIS1_PLUS" },
{ JOY_AXIS1_MINUS, "JOY_AXIS1_MINUS" },
{ JOY_AXIS2_PLUS, "JOY_AXIS2_PLUS" },
{ JOY_AXIS2_MINUS, "JOY_AXIS2_MINUS" },
{ JOY_AXIS3_PLUS, " JOY_AXIS3_PLUS" },
{ JOY_AXIS3_MINUS, "JOY_AXIS3_MINUS" },
{ JOY_AXIS4_PLUS, "JOY_AXIS4_PLUS" },
{ JOY_AXIS4_MINUS, "JOY_AXIS4_MINUS" },
{ JOY_AXIS5_PLUS, " JOY_AXIS5_PLUS" },
{ JOY_AXIS5_MINUS, "JOY_AXIS5_MINUS" },
{ JOY_AXIS6_PLUS, "JOY_AXIS6_PLUS" },
{ JOY_AXIS6_MINUS, "JOY_AXIS6_MINUS" },
{ JOY_AXIS7_PLUS, " JOY_AXIS7_PLUS" },
{ JOY_AXIS7_MINUS, "JOY_AXIS7_MINUS" },
{ JOY_AXIS8_PLUS, "JOY_AXIS8_PLUS" },
{ JOY_AXIS8_MINUS, "JOY_AXIS8_MINUS" },
{ JOY_AXIS9_PLUS, " JOY_AXIS9_PLUS" },
{ JOY_AXIS9_MINUS, "JOY_AXIS9_MINUS" },
{ JOY_BTN0, "JOY_BTN0" },
{ JOY_BTN1, "JOY_BTN1" },
{ JOY_BTN2, "JOY_BTN2" },
{ JOY_BTN3, "JOY_BTN3" },
{ JOY_BTN4, "JOY_BTN4" },
{ JOY_BTN5, "JOY_BTN5" },
{ JOY_BTN6, "JOY_BTN6" },
{ JOY_BTN7, "JOY_BTN7" },
{ JOY_BTN8, "JOY_BTN8" },
{ JOY_BTN9, "JOY_BTN9" },
{ 0, NULL }
};
// This is the default binding we use when no config file is here
static mp_cmd_bind_t def_cmd_binds[] = {
{ { MOUSE_BTN3, 0 }, "seek 10" },
{ { MOUSE_BTN4, 0 }, "seek -10" },
{ { MOUSE_BTN5, 0 }, "volume 1" },
{ { MOUSE_BTN6, 0 }, "volume -1" },
{ { KEY_RIGHT, 0 }, "seek 10" },
{ { KEY_LEFT, 0 }, "seek -10" },
{ { KEY_UP, 0 }, "seek 60" },
{ { KEY_DOWN, 0 }, "seek -60" },
{ { KEY_PAGE_UP, 0 }, "seek 600" },
{ { KEY_PAGE_DOWN, 0 }, "seek -600" },
{ { '+', 0 }, "audio_delay 0.100" },
{ { '-', 0 }, "audio_delay -0.100" },
{ { 'q', 0 }, "quit" },
{ { KEY_ESC, 0 }, "quit" },
{ { KEY_ENTER, 0 }, "quit" },
// { { 'p', 0 }, "pause" },
{ { ' ', 0 }, "pause" },
{ { KEY_HOME, 0 }, "pt_up_step 1" },
{ { KEY_END, 0 }, "pt_up_step -1" },
{ { '>', 0 }, "pt_step 1" },
// { { KEY_ENTER, 0 }, "pt_step 1" },
{ { '<', 0 }, "pt_step -1" },
{ { KEY_INS, 0 }, "alt_src_step 1" },
{ { KEY_DEL, 0 }, "alt_src_step -1" },
{ { 'o', 0 }, "osd" },
{ { 'z', 0 }, "sub_delay -0.1" },
{ { 'x', 0 }, "sub_delay +0.1" },
{ { '9', 0 }, "volume -1" },
{ { '/', 0 }, "volume -1" },
{ { '0', 0 }, "volume 1" },
{ { '*', 0 }, "volume 1" },
{ { 'm', 0 }, "use_master" },
{ { '1', 0 }, "contrast -1" },
{ { '2', 0 }, "contrast 1" },
{ { '3', 0 }, "brightness -1" },
{ { '4', 0 }, "brightness 1" },
{ { '5', 0 }, "hue -1" },
{ { '6', 0 }, "hue 1" },
{ { '7', 0 }, "saturation -1" },
{ { '8', 0 }, "saturation 1" },
{ { 'd', 0 }, "frame_drop" },
{ { 'r', 0 }, "sub_pos -1" },
{ { 't', 0 }, "sub_pos +1" },
#ifdef USE_TV
{ { 'h', 0 }, "tv_step_channel 1" },
{ { 'k', 0 }, "tv_step_channel -1" },
{ { 'n', 0 }, "tv_step_norm" },
{ { 'm', 0 }, "tv_step_chanlist" },
#endif
#ifdef HAVE_NEW_GUI
{ { 'l', 0 }, "gui_loadfile" },
{ { 't', 0 }, "gui_loadsubtitle" },
{ { 'a', 0 }, "gui_about" },
{ { KEY_ENTER, 0 }, "gui_play" },
{ { 's', 0 }, "gui_stop" },
{ { 'p', 0 }, "gui_playlist" },
{ { 'r', 0 }, "gui_preferences" },
{ { 'c', 0 }, "gui_skinbrowser" },
#endif
#ifdef HAVE_JOYSTICK
{ { JOY_AXIS0_PLUS, 0 }, "seek 10" },
{ { JOY_AXIS0_MINUS, 0 }, "seek -10" },
{ { JOY_AXIS1_MINUS, 0 }, "seek 60" },
{ { JOY_AXIS1_PLUS, 0 }, "seek -60" },
{ { JOY_BTN0, 0 }, "pause" },
{ { JOY_BTN1, 0 }, "osd" },
{ { JOY_BTN2, 0 }, "volume 1"},
{ { JOY_BTN3, 0 }, "volume -1"},
#endif
{ { 'f', 0 }, "vo_fullscreen" },
{ { 0 }, NULL }
};
#ifndef MP_MAX_KEY_FD
#define MP_MAX_KEY_FD 10
#endif
#ifndef MP_MAX_CMD_FD
#define MP_MAX_CMD_FD 10
#endif
#define MP_FD_EOF (1<<0)
#define MP_FD_DROP (1<<1)
#define MP_FD_DEAD (1<<2)
#define MP_FD_GOT_CMD (1<<3)
#define MP_FD_NO_SELECT (1<<4)
#define CMD_QUEUE_SIZE 10
typedef struct mp_input_fd {
int fd;
void* read_func;
mp_close_func_t close_func;
int flags;
// This fields are for the cmd fds
char* buffer;
int pos,size;
} mp_input_fd_t;
static mp_cmd_bind_t* cmd_binds = NULL;
static mp_input_fd_t key_fds[MP_MAX_KEY_FD];
static unsigned int num_key_fd = 0;
static mp_input_fd_t cmd_fds[MP_MAX_CMD_FD];
static unsigned int num_cmd_fd = 0;
static mp_cmd_t* cmd_queue[CMD_QUEUE_SIZE];
static unsigned int cmd_queue_length = 0,cmd_queue_start = 0, cmd_queue_end = 0;
// this is the key currently down
static int key_down[MP_MAX_KEY_DOWN];
static unsigned int num_key_down = 0, last_key_down = 0;
// Autorepeat stuff
static short ar_state = -1;
static mp_cmd_t* ar_cmd = NULL;
static unsigned int ar_delay = 100, ar_rate = 8, last_ar = 0;
static int use_joystick = 1, use_lirc = 1;
static char* config_file = "input.conf";
static config_t input_conf[] = {
{ "conf", &config_file, CONF_TYPE_STRING, CONF_GLOBAL, 0, 0, NULL },
{ "ar-delay", &ar_delay, CONF_TYPE_INT, CONF_GLOBAL, 0, 0, NULL },
{ "ar-rate", &ar_rate, CONF_TYPE_INT, CONF_GLOBAL, 0, 0, NULL },
{ NULL, NULL, 0, 0, 0, 0, NULL}
};
static config_t mp_input_opts[] = {
{ "input", &input_conf, CONF_TYPE_SUBCONFIG, 0, 0, 0, NULL},
{ "nojoystick", &use_joystick, CONF_TYPE_FLAG, CONF_GLOBAL, 1, 0, NULL },
{ "joystick", &use_joystick, CONF_TYPE_FLAG, CONF_GLOBAL, 0, 1, NULL },
{ "nolirc", &use_lirc, CONF_TYPE_FLAG, CONF_GLOBAL, 1, 0, NULL },
{ "lirc", &use_lirc, CONF_TYPE_FLAG, CONF_GLOBAL, 0, 1, NULL },
{ NULL, NULL, 0, 0, 0, 0, NULL}
};
static int
mp_input_default_key_func(int fd);
static char*
mp_input_get_key_name(int key);
int
mp_input_add_cmd_fd(int fd, int select, mp_cmd_func_t read_func, mp_close_func_t close_func) {
if(num_cmd_fd == MP_MAX_CMD_FD) {
printf("Too much command fd, unable to register fd %d\n",fd);
return 0;
}
memset(&cmd_fds[num_cmd_fd],0,sizeof(mp_input_fd_t));
cmd_fds[num_cmd_fd].fd = fd;
cmd_fds[num_cmd_fd].read_func = read_func ? read_func : (mp_cmd_func_t)read;
cmd_fds[num_cmd_fd].close_func = close_func;
if(!select)
cmd_fds[num_cmd_fd].flags = MP_FD_NO_SELECT;
num_cmd_fd++;
return 1;
}
void
mp_input_rm_cmd_fd(int fd) {
unsigned int i;
for(i = 0; i < num_cmd_fd; i++) {
if(cmd_fds[i].fd == fd)
break;
}
if(i == num_cmd_fd)
return;
if(cmd_fds[i].close_func)
cmd_fds[i].close_func(cmd_fds[i].fd);
if(i + 1 < num_cmd_fd)
memmove(&cmd_fds[i],&cmd_fds[i+1],(num_cmd_fd - i - 1)*sizeof(mp_input_fd_t));
num_cmd_fd--;
}
void
mp_input_rm_key_fd(int fd) {
unsigned int i;
for(i = 0; i < num_key_fd; i++) {
if(key_fds[i].fd == fd)
break;
}
if(i == num_key_fd)
return;
if(key_fds[i].close_func)
key_fds[i].close_func(key_fds[i].fd);
if(i + 1 < num_key_fd)
memmove(&key_fds[i],&key_fds[i+1],(num_key_fd - i - 1)*sizeof(mp_input_fd_t));
num_key_fd--;
}
int
mp_input_add_key_fd(int fd, int select, mp_key_func_t read_func, mp_close_func_t close_func) {
if(num_key_fd == MP_MAX_KEY_FD) {
printf("Too much key fd, unable to register fd %d\n",fd);
return 0;
}
memset(&key_fds[num_key_fd],0,sizeof(mp_input_fd_t));
key_fds[num_key_fd].fd = fd;
key_fds[num_key_fd].read_func = read_func ? read_func : mp_input_default_key_func;
key_fds[num_key_fd].close_func = close_func;
if(!select)
key_fds[num_key_fd].flags |= MP_FD_NO_SELECT;
num_key_fd++;
return 1;
}
static mp_cmd_t*
mp_input_parse_cmd(char* str) {
int i,l;
char *ptr,*e;
mp_cmd_t *cmd, *cmd_def;
#ifdef MP_DEBUG
assert(str != NULL);
#endif
for(ptr = str ; ptr[0] != '\0' && ptr[0] != '\t' && ptr[0] != ' ' ; ptr++)
/* NOTHING */;
if(ptr[0] != '\0')
l = ptr-str;
else
l = strlen(str);
if(l == 0)
return NULL;
for(i=0; mp_cmds[i].name != NULL; i++) {
if(strncasecmp(mp_cmds[i].name,str,l) == 0)
break;
}
if(mp_cmds[i].name == NULL)
return NULL;
cmd_def = &mp_cmds[i];
cmd = (mp_cmd_t*)malloc(sizeof(mp_cmd_t));
cmd->id = cmd_def->id;
cmd->name = strdup(cmd_def->name);
ptr = str;
for(i=0; ptr && i < MP_CMD_MAX_ARGS; i++) {
ptr = strchr(ptr,' ');
if(!ptr) break;
while(ptr[0] == ' ' || ptr[0] == '\t') ptr++;
if(ptr[0] == '\0') break;
switch(cmd_def->args[i].type) {
case MP_CMD_ARG_INT:
errno = 0;
cmd->args[i].v.i = atoi(ptr);
if(errno != 0) {
printf("Command %s : argument %d isn't an integer\n",cmd_def->name,i+1);
ptr = NULL;
}
break;
case MP_CMD_ARG_FLOAT:
errno = 0;
cmd->args[i].v.f = atof(ptr);
if(errno != 0) {
printf("Command %s : argument %d isn't a float\n",cmd_def->name,i+1);
ptr = NULL;
}
break;
case MP_CMD_ARG_STRING:
e = strchr(ptr,' ');
if(!e) e = ptr+strlen(ptr);
l = e-ptr;
cmd->args[i].v.s = (char*)malloc((l+1)*sizeof(char));
strncpy(cmd->args[i].v.s,ptr,l);
cmd->args[i].v.s[l] = '\0';
break;
case -1:
ptr = NULL;
default :
printf("Unknown argument %d\n",i);
}
}
cmd->nargs = i;
if(cmd_def->nargs > cmd->nargs) {
printf("Got [%s] but\n",str);
printf("Command %s require at least %d arguments, we found only %d so far\n",cmd_def->name,cmd_def->nargs,cmd->nargs);
mp_cmd_free(cmd);
return NULL;
}
for( ; i < MP_CMD_MAX_ARGS && cmd_def->args[i].type != -1 ; i++) {
memcpy(&cmd->args[i],&cmd_def->args[i],sizeof(mp_cmd_arg_t));
if(cmd_def->args[i].type == MP_CMD_ARG_STRING && cmd_def->args[i].v.s != NULL)
cmd->args[i].v.s = strdup(cmd_def->args[i].v.s);
}
return cmd;
}
static int
mp_input_default_key_func(int fd) {
int r,code=0;
unsigned int l;
l = 0;
while(l < sizeof(int)) {
r = read(fd,(&code)+l,sizeof(int)-l);
if(r <= 0)
break;
l +=r;
}
return code;
}
#define MP_CMD_MAX_SIZE 256
static int
mp_input_read_cmd(mp_input_fd_t* mp_fd, char** ret) {
char* end;
(*ret) = NULL;
if(!mp_fd->buffer) {
mp_fd->buffer = (char*)malloc(MP_CMD_MAX_SIZE*sizeof(char));
mp_fd->pos = 0;
mp_fd->size = MP_CMD_MAX_SIZE;
}
if(mp_fd->size - mp_fd->pos == 0) {
printf("Cmd buffer of fd %d is full : dropping content\n",mp_fd->fd);
mp_fd->pos = 0;
mp_fd->flags |= MP_FD_DROP;
}
while( !(mp_fd->flags & MP_FD_EOF) && (mp_fd->size - mp_fd->pos > 1) ) {
int r = ((mp_cmd_func_t)mp_fd->read_func)(mp_fd->fd,mp_fd->buffer+mp_fd->pos,mp_fd->size - 1 - mp_fd->pos);
if(r < 0) {
if(errno == EINTR)
continue;
else if(errno == EAGAIN)
break;
printf("Error while reading cmd fd %d : %s\n",mp_fd->fd,strerror(errno));
return MP_INPUT_ERROR;
} else if(r == 0) {
mp_fd->flags |= MP_FD_EOF;
break;
}
mp_fd->pos += r;
break;
}
while(1) {
int l = 0;
mp_fd->buffer[mp_fd->pos] = '\0';
end = strchr(mp_fd->buffer,'\n');
if(!end)
break;
else if((*ret)) {
mp_fd->flags |= MP_FD_GOT_CMD;
break;
}
l = end - mp_fd->buffer;
if( ! (mp_fd->flags & MP_FD_DROP)) {
(*ret) = (char*)malloc((l+1)*sizeof(char));
strncpy((*ret),mp_fd->buffer,l);
(*ret)[l] = '\0';
} else {
mp_fd->flags &= ~MP_FD_DROP;
}
if( mp_fd->pos - (l+1) > 0)
memmove(mp_fd->buffer,end,mp_fd->pos-(l+1));
mp_fd->pos -= l+1;
}
if(*ret)
return 1;
else
return MP_INPUT_NOTHING;
}
static char*
mp_input_find_bind_for_key(mp_cmd_bind_t* binds, int n,int* keys) {
int j;
for(j = 0; binds[j].cmd != NULL; j++) {
if(n > 0) {
int found = 1,s;
for(s = 0; s < n && binds[j].input[s] != 0; s++) {
if(binds[j].input[s] != keys[s]) {
found = 0;
break;
}
}
if(found && binds[j].input[s] == 0 && s == n)
break;
else
continue;
} else if(n == 1){
if(binds[j].input[0] == keys[0] && binds[j].input[1] == 0)
break;
}
}
return binds[j].cmd;
}
static mp_cmd_t*
mp_input_get_cmd_from_keys(int n,int* keys, int paused) {
char* cmd = NULL;
mp_cmd_t* ret;
// In pause mode we return pause for the first key which come
if(paused)
return mp_input_parse_cmd("pause");
if(cmd_binds)
cmd = mp_input_find_bind_for_key(cmd_binds,n,keys);
if(cmd == NULL)
cmd = mp_input_find_bind_for_key(def_cmd_binds,n,keys);
if(cmd == NULL) {
printf("No bind found for key %s",mp_input_get_key_name(keys[0]));
if(n > 1) {
int s;
for(s=1; s < n; s++)
printf("-%s",mp_input_get_key_name(keys[s]));
}
printf(" \n");
return NULL;
}
ret = mp_input_parse_cmd(cmd);
if(!ret) {
printf("Invalid command for binded key %s",mp_input_get_key_name(key_down[0]));
if( num_key_down > 1) {
unsigned int s;
for(s=1; s < num_key_down; s++)
printf("-%s",mp_input_get_key_name(key_down[s]));
}
printf(" : %s \n",cmd);
}
return ret;
}
static mp_cmd_t*
mp_input_read_keys(int time,int paused) {
fd_set fds;
struct timeval tv,*time_val;
int i,n=0,max_fd = 0;
mp_cmd_t* ret;
static int last_loop = 0;
if(num_key_fd == 0)
return NULL;
FD_ZERO(&fds);
// Remove fd marked as dead and build the fd_set
for(i = 0; (unsigned int)i < num_key_fd; i++) {
if( (key_fds[i].flags & MP_FD_DEAD) ) {
mp_input_rm_key_fd(key_fds[i].fd);
i--;
continue;
} else if(key_fds[i].flags & MP_FD_NO_SELECT)
continue;
if(key_fds[i].fd > max_fd)
max_fd = key_fds[i].fd;
FD_SET(key_fds[i].fd,&fds);
n++;
}
if(num_key_fd == 0)
return NULL;
if(time >= 0 ) {
tv.tv_sec=time/1000;
tv.tv_usec = (time%1000)*1000;
time_val = &tv;
} else
time_val = NULL;
while(n > 0) {
if(select(max_fd+1,&fds,NULL,NULL,time_val) < 0) {
if(errno == EINTR)
continue;
printf("Select error : %s\n",strerror(errno));
}
break;
}
for(i = last_loop + 1 ; i != last_loop ; i++) {
int code = -1;
unsigned int j;
// This is to check all fd in turn
if((unsigned int)i >= num_key_fd) {
i = -1;
last_loop++;
last_loop %= (num_key_fd+1);
continue;
}
// No input from this fd
if(! (key_fds[i].flags & MP_FD_NO_SELECT) && ! FD_ISSET(key_fds[i].fd,&fds))
continue;
if(key_fds[i].fd == 0) { // stdin is handled by getch2
code = getch2(time);
if(code < 0)
code = MP_INPUT_NOTHING;
}
else
code = ((mp_key_func_t)key_fds[i].read_func)(key_fds[i].fd);
if(code < 0) {
if(code == MP_INPUT_ERROR)
printf("Error on key input fd %d\n",key_fds[i].fd);
else if(code == MP_INPUT_DEAD) {
printf("Dead key input on fd %d\n",key_fds[i].fd);
key_fds[i].flags |= MP_FD_DEAD;
}
continue;
}
// key pushed
if(code & MP_KEY_DOWN) {
if(num_key_down > MP_MAX_KEY_DOWN) {
printf("Too much key down at the same time\n");
continue;
}
code &= ~MP_KEY_DOWN;
// Check if we don't already have this key as pushed
for(j = 0; j < num_key_down; j++) {
if(key_down[j] == code)
break;
}
if(j != num_key_down)
continue;
key_down[num_key_down] = code;
num_key_down++;
last_key_down = GetTimer();
ar_state = 0;
continue;
}
// key released
// Check if the key is in the down key, driver which can't send push event
// send only release event
for(j = 0; j < num_key_down; j++) {
if(key_down[j] == code)
break;
}
if(j == num_key_down) { // key was not in the down keys : add it
if(num_key_down > MP_MAX_KEY_DOWN) {
printf("Too much key down at the same time\n");
continue;
}
key_down[num_key_down] = code;
num_key_down++;
last_key_down = 1;
}
// We ignore key from last combination
ret = last_key_down ? mp_input_get_cmd_from_keys(num_key_down,key_down,paused) : NULL;
// Remove the key
if(j+1 < num_key_down)
memmove(&key_down[j],&key_down[j+1],(num_key_down-(j+1))*sizeof(int));
num_key_down--;
last_key_down = 0;
ar_state = -1;
if(ar_cmd) {
mp_cmd_free(ar_cmd);
ar_cmd = NULL;
}
if(ret)
return ret;
}
last_loop = 0;
// No input : autorepeat ?
if(ar_rate > 0 && ar_state >=0 && num_key_down > 0 && ! (key_down[num_key_down-1] & MP_NO_REPEAT_KEY)) {
unsigned int t = GetTimer();
// First time : wait delay
if(ar_state == 0 && (t - last_key_down) >= ar_delay*1000) {
ar_cmd = mp_input_get_cmd_from_keys(num_key_down,key_down,paused);
if(!ar_cmd)
ar_state = -1;
else {
ar_state = 1;
last_ar = t;
}
return mp_cmd_clone(ar_cmd);
// Then send rate / sec event
} else if(ar_state == 1 && (t -last_ar) >= 1000000/ar_rate) {
last_ar = t;
return mp_cmd_clone(ar_cmd);
}
}
return NULL;
}
static mp_cmd_t*
mp_input_read_cmds(int time) {
fd_set fds;
struct timeval tv,*time_val;
int i,n = 0,max_fd = 0;
mp_cmd_t* ret;
static int last_loop = 0;
if(num_cmd_fd == 0)
return NULL;
FD_ZERO(&fds);
for(i = 0; (unsigned int)i < num_cmd_fd ; i++) {
if( (cmd_fds[i].flags & MP_FD_DEAD) || (cmd_fds[i].flags & MP_FD_EOF) ) {
mp_input_rm_cmd_fd(cmd_fds[i].fd);
i--;
continue;
} else if(cmd_fds[i].flags & MP_FD_NO_SELECT)
continue;
if(cmd_fds[i].fd > max_fd)
max_fd = cmd_fds[i].fd;
FD_SET(cmd_fds[i].fd,&fds);
n++;
}
if(num_cmd_fd == 0)
return NULL;
if(time >= 0) {
tv.tv_sec=time/1000;
tv.tv_usec = (time%1000)*1000;
time_val = &tv;
} else
time_val = NULL;
while(n > 0) {
if((i = select(max_fd+1,&fds,NULL,NULL,time_val)) <= 0) {
if(i < 0) {
if(errno == EINTR)
continue;
printf("Select error : %s\n",strerror(errno));
}
return NULL;
}
break;
}
for(i = last_loop + 1; i != last_loop ; i++) {
int r = 0;
char* cmd;
if((unsigned int)i >= num_cmd_fd) {
i = -1;
last_loop++;
last_loop %= (num_cmd_fd+1);
continue;
}
if( ! (cmd_fds[i].flags & MP_FD_NO_SELECT) && ! FD_ISSET(cmd_fds[i].fd,&fds) && ! (cmd_fds[i].flags & MP_FD_GOT_CMD) )
continue;
r = mp_input_read_cmd(&cmd_fds[i],&cmd);
if(r < 0) {
if(r == MP_INPUT_ERROR)
printf("Error on cmd fd %d\n",cmd_fds[i].fd);
else if(r == MP_INPUT_DEAD)
cmd_fds[i].flags |= MP_FD_DEAD;
continue;
}
ret = mp_input_parse_cmd(cmd);
free(cmd);
if(!ret)
continue;
last_loop = i;
return ret;
}
last_loop = 0;
return NULL;
}
int
mp_input_queue_cmd(mp_cmd_t* cmd) {
if(cmd_queue_length >= CMD_QUEUE_SIZE)
return 0;
cmd_queue[cmd_queue_end] = cmd;
cmd_queue_end = (cmd_queue_end + 1) % CMD_QUEUE_SIZE;
cmd_queue_length++;
return 1;
}
static mp_cmd_t*
mp_input_get_queued_cmd(void) {
mp_cmd_t* ret;
if(cmd_queue_length == 0)
return NULL;
ret = cmd_queue[cmd_queue_start];
cmd_queue_length--;
cmd_queue_start = (cmd_queue_start + 1) % CMD_QUEUE_SIZE;
return ret;
}
mp_cmd_t*
mp_input_get_cmd(int time, int paused) {
mp_cmd_t* ret;
ret = mp_input_get_queued_cmd();
if(ret)
return ret;
ret = mp_input_read_keys(time,paused);
if(ret)
return ret;
return mp_input_read_cmds(time);
}
void
mp_cmd_free(mp_cmd_t* cmd) {
int i;
//#ifdef MP_DEBUG
// assert(cmd != NULL);
//#endif
if ( !cmd ) return;
if(cmd->name)
free(cmd->name);
for(i=0; i < MP_CMD_MAX_ARGS && cmd->args[i].type != -1; i++) {
if(cmd->args[i].type == MP_CMD_ARG_STRING && cmd->args[i].v.s != NULL)
free(cmd->args[i].v.s);
}
free(cmd);
}
mp_cmd_t*
mp_cmd_clone(mp_cmd_t* cmd) {
mp_cmd_t* ret;
int i;
#ifdef MP_DEBUG
assert(cmd != NULL);
#endif
ret = (mp_cmd_t*)malloc(sizeof(mp_cmd_t));
memcpy(ret,cmd,sizeof(mp_cmd_t));
if(cmd->name)
ret->name = strdup(cmd->name);
for(i = 0; i < MP_CMD_MAX_ARGS && cmd->args[i].type != -1; i++) {
if(cmd->args[i].type == MP_CMD_ARG_STRING && cmd->args[i].v.s != NULL)
ret->args[i].v.s = strdup(cmd->args[i].v.s);
}
return ret;
}
static char key_str[2];
static char*
mp_input_get_key_name(int key) {
int i;
for(i = 0; key_names[i].name != NULL; i++) {
if(key_names[i].key == key)
return key_names[i].name;
}
if(key >> 8 == 0) {
snprintf(key_str,2,"%c",(char)key);
return key_str;
}
return NULL;
}
static int
mp_input_get_key_from_name(char* name) {
int i,ret = 0;
if(strlen(name) == 1) { // Direct key code
(char)ret = name[0];
return ret;
}
for(i = 0; key_names[i].name != NULL; i++) {
if(strcasecmp(key_names[i].name,name) == 0)
return key_names[i].key;
}
return -1;
}
static int
mp_input_get_input_from_name(char* name,int* keys) {
char *end,*ptr;
int n=0;
ptr = name;
n = 0;
for(end = strchr(ptr,'-') ; ptr != NULL ; end = strchr(ptr,'-')) {
if(end && end[1] != '\0') {
if(end[1] == '-')
end = &end[1];
end[0] = '\0';
}
keys[n] = mp_input_get_key_from_name(ptr);
if(keys[n] < 0) {
return 0;
}
n++;
if(end && end[1] != '\0' && n < MP_MAX_KEY_DOWN)
ptr = &end[1];
else
break;
}
keys[n] = 0;
return 1;
}
void
mp_input_bind_keys(int keys[MP_MAX_KEY_DOWN+1], char* cmd) {
int i = 0,j;
mp_cmd_bind_t* bind = NULL;
#ifdef MP_DEBUG
assert(keys != NULL);
assert(cmd != NULL);
#endif
if(cmd_binds) {
for(i = 0; cmd_binds[i].cmd != NULL ; i++) {
for(j = 0 ; cmd_binds[i].input[j] == keys[j] && keys[j] != 0 ; j++)
/* NOTHING */;
if(keys[j] == 0 && cmd_binds[i].input[j] == 0 ) {
bind = &cmd_binds[i];
break;
}
}
}
if(!bind) {
cmd_binds = (mp_cmd_bind_t*)realloc(cmd_binds,(i+2)*sizeof(mp_cmd_bind_t));
memset(&cmd_binds[i],0,2*sizeof(mp_cmd_bind_t));
bind = &cmd_binds[i];
}
if(bind->cmd)
free(bind->cmd);
bind->cmd = strdup(cmd);
memcpy(bind->input,keys,(MP_MAX_KEY_DOWN+1)*sizeof(int));
}
static void
mp_input_free_binds(mp_cmd_bind_t* binds) {
int i;
if(!binds)
return;
for(i = 0; binds[i].cmd != NULL; i++)
free(binds[i].cmd);
free(binds);
}
#define BS_MAX 256
#define SPACE_CHAR " \n\r\t"
static int
mp_input_parse_config(char *file) {
int fd;
int bs = 0,r,eof = 0,comments = 0;
char *iter,*end;
char buffer[BS_MAX];
int n_binds = 0, keys[MP_MAX_KEY_DOWN+1] = { 0 };
mp_cmd_bind_t* binds = NULL;
fd = open(file,O_RDONLY);
if(fd < 0) {
printf("Can't open input config file %s : %s\n",file,strerror(errno));
return 0;
}
printf("Parsing input config file %s\n",file);
while(1) {
if(! eof && bs < BS_MAX-1) {
if(bs > 0) bs--;
r = read(fd,buffer+bs,BS_MAX-1-bs);
if(r < 0) {
if(errno == EINTR)
continue;
printf("Error while reading input config file %s : %s\n",file,strerror(errno));
mp_input_free_binds(binds);
return 0;
} else if(r == 0)
eof = 1;
else {
bs += r+1;
buffer[bs-1] = '\0';
}
}
// Empty buffer : return
if(bs <= 0) {
printf("Input config file %s parsed : %d binds\n",file,n_binds);
if(binds)
cmd_binds = binds;
return 1;
}
iter = buffer;
if(comments) {
for( ; iter[0] != '\0' && iter[0] != '\n' ; iter++)
/* NOTHING */;
if(iter[0] == '\0') { // Buffer was full of comment
bs = 0;
continue;
}
iter++;
r = strlen(iter);
if(r)
memmove(buffer,iter,r+1);
bs = r+1;
if(iter[0] != '#')
comments = 0;
continue;
}
// Find the wanted key
if(keys[0] == 0) {
// Jump beginning space
for( ; iter[0] != '\0' && strchr(SPACE_CHAR,iter[0]) != NULL ; iter++)
/* NOTHING */;
if(iter[0] == '\0') { // Buffer was full of space char
bs = 0;
continue;
}
if(iter[0] == '#') { // Comments
comments = 1;
continue;
}
// Find the end of the key code name
for(end = iter; end[0] != '\0' && strchr(SPACE_CHAR,end[0]) == NULL ; end++)
/*NOTHING */;
if(end[0] == '\0') { // Key name don't fit in the buffer
if(buffer == iter) {
if(eof && (buffer-iter) == bs)
printf("Unfinished binding %s\n",iter);
else
printf("Buffer is too small for this key name : %s\n",iter);
mp_input_free_binds(binds);
return 0;
}
memmove(buffer,iter,end-iter);
bs = end-iter;
continue;
}
{
char name[end-iter+1];
strncpy(name,iter,end-iter);
name[end-iter] = '\0';
if(! mp_input_get_input_from_name(name,keys)) {
printf("Unknown key '%s'\n",name);
mp_input_free_binds(binds);
return 0;
}
}
if( bs > (end-buffer))
memmove(buffer,end,bs - (end-buffer));
bs -= end-buffer;
continue;
} else { // Get the command
while(iter[0] == ' ' || iter[0] == '\t') iter++;
// Found new line
if(iter[0] == '\n' || iter[0] == '\r') {
int i;
printf("No command found for key %s" ,mp_input_get_key_name(keys[0]));
for(i = 1; keys[i] != 0 ; i++)
printf("-%s",mp_input_get_key_name(keys[i]));
printf("\n");
keys[0] = 0;
if(iter > buffer) {
memmove(buffer,iter,bs- (iter-buffer));
bs -= (iter-buffer);
}
continue;
}
for(end = iter ; end[0] != '\n' && end[0] != '\r' && end[0] != '\0' ; end++)
/* NOTHING */;
if(end[0] == '\0' && ! (eof && ((end+1) - buffer) == bs)) {
if(iter == buffer) {
printf("Buffer is too small for command %s\n",buffer);
mp_input_free_binds(binds);
return 0;
}
memmove(buffer,iter,end - iter);
bs = end - iter;
continue;
}
{
char cmd[end-iter+1];
strncpy(cmd,iter,end-iter);
cmd[end-iter] = '\0';
//printf("Set bind %d => %s\n",code,cmd);
mp_input_bind_keys(keys,cmd);
n_binds++;
}
keys[0] = 0;
end++;
if(bs > (end-buffer))
memmove(buffer,end,bs-(end-buffer));
bs -= (end-buffer);
buffer[bs-1] = '\0';
continue;
}
}
printf("What are we doing here ?\n");
return 0;
}
extern char *get_path(char *filename);
void
mp_input_init(void) {
char* file;
file = config_file[0] != '/' ? get_path(config_file) : config_file;
if(!file)
return;
if(! mp_input_parse_config(file))
printf("Falling back on default (hardcoded) config\n");
#ifdef HAVE_JOYSTICK
if(use_joystick) {
int fd = mp_input_joystick_init(NULL);
if(fd < 0)
printf("Can't init input joystick\n");
else
mp_input_add_key_fd(fd,1,mp_input_joystick_read,(mp_close_func_t)close);
}
#endif
#ifdef HAVE_LIRC
if(use_lirc) {
int fd = mp_input_lirc_init();
if(fd > 0)
mp_input_add_cmd_fd(fd,1,NULL,(mp_close_func_t)close);
}
#endif
}
void
mp_input_uninit(void) {
unsigned int i;
for(i=0; i < num_key_fd; i++) {
if(key_fds[i].close_func)
key_fds[i].close_func(key_fds[i].fd);
}
for(i=0; i < num_cmd_fd; i++) {
if(cmd_fds[i].close_func)
cmd_fds[i].close_func(cmd_fds[i].fd);
}
#ifdef HAVE_LIRC
if(use_lirc)
mp_input_lirc_uninit();
#endif
}
void
mp_input_register_options(m_config_t* cfg) {
m_config_register_options(cfg,mp_input_opts);
}
#endif /* HAVE_NEW_INPUT */