ref: 4219f692b155bf650c0918bffbbfa8d41dd670b6
dir: /in_9.c/
#include <u.h>
#include <libc.h>
#include <stdio.h>
#include <draw.h>
#include <thread.h>
#include <mouse.h>
#include <keyboard.h>
#include "quakedef.h"
typedef struct Kev Kev;
struct Kev{
int key;
int down;
};
enum{
Nbuf = 64
};
cvar_t m_windowed = {"m_windowed","0", true};
cvar_t m_filter = {"m_filter","0", true};
float oldm_windowed;
int mouse_buttons = 3;
int mouse_buttonstate, mouse_oldbuttonstate;
float mouse_x, mouse_y, old_mouse_x, old_mouse_y;
int mouseon;
int ktid = -1, mtid = -1;
Channel *kchan;
/* vid_9.c */
extern int config_notify;
extern Point center;
extern Rectangle grabout;
void Sys_SendKeyEvents(void)
{
Kev ev;
int r;
/* FIXME: sloppy */
if(oldm_windowed != m_windowed.value){
oldm_windowed = m_windowed.value;
if(!m_windowed.value)
IN_Grabm(0);
else
IN_Grabm(1);
}
while((r = nbrecv(kchan, &ev)) > 0)
Key_Event(ev.key, ev.down);
if(r < 0)
Con_Printf("Sys_SendKeyEvents:nbrecv: %r\n");
}
void IN_Commands (void)
{
int i;
if(!mouseon)
return;
/* FIXMEGASHIT */
for(i = 0; i < mouse_buttons; i++){
if(mouse_buttonstate & 1<<i && ~mouse_oldbuttonstate & 1<<i)
Key_Event(K_MOUSE1+i, true);
if (~mouse_buttonstate & 1<<i && mouse_oldbuttonstate & 1<<i)
Key_Event(K_MOUSE1+i, false);
}
mouse_oldbuttonstate = mouse_buttonstate;
}
void IN_Move (usercmd_t *cmd)
{
if(!mouseon)
return;
if(m_filter.value){
mouse_x = (mouse_x + old_mouse_x) * 0.5;
mouse_y = (mouse_y + old_mouse_y) * 0.5;
}
old_mouse_x = mouse_x;
old_mouse_y = mouse_y;
mouse_x *= sensitivity.value;
mouse_y *= sensitivity.value;
if(in_strafe.state & 1 || lookstrafe.value && in_mlook.state & 1)
cmd->sidemove += m_side.value * mouse_x;
else
cl.viewangles[YAW] -= m_yaw.value * mouse_x;
if(in_mlook.state & 1)
V_StopPitchDrift();
if(in_mlook.state & 1 && ~in_strafe.state & 1){
cl.viewangles[PITCH] += m_pitch.value * mouse_y;
if(cl.viewangles[PITCH] > 80)
cl.viewangles[PITCH] = 80;
if(cl.viewangles[PITCH] < -70)
cl.viewangles[PITCH] = -70;
}else{
if(in_strafe.state & 1 && noclip_anglehack)
cmd->upmove -= m_forward.value * mouse_y;
else
cmd->forwardmove -= m_forward.value * mouse_y;
}
mouse_x = mouse_y = 0.0;
}
int runetokey (Rune r)
{
int k = 0;
switch(r){
case Kpgup: k = K_PGUP; break;
case Kpgdown: k = K_PGDN; break;
case Khome: k = K_HOME; break;
case Kend: k = K_END; break;
case Kleft: k = K_LEFTARROW; break;
case Kright: k = K_RIGHTARROW; break;
case Kdown: k = K_DOWNARROW; break;
case Kup: k = K_UPARROW; break;
case Kesc: k = K_ESCAPE; break;
case '\n': k = K_ENTER; break;
case '\t': k = K_TAB; break;
case KF|1: k = K_F1; break;
case KF|2: k = K_F2; break;
case KF|3: k = K_F3; break;
case KF|4: k = K_F4; break;
case KF|5: k = K_F5; break;
case KF|6: k = K_F6; break;
case KF|7: k = K_F7; break;
case KF|8: k = K_F8; break;
case KF|9: k = K_F9; break;
case KF|10: k = K_F10; break;
case KF|11: k = K_F11; break;
case KF|12: k = K_F12; break;
case Kbs: k = K_BACKSPACE; break;
case Kdel: k = K_DEL; break;
case Kbreak: k = K_PAUSE; break;
case Kshift: k = K_SHIFT; break;
case Kctl: k = K_CTRL; break;
case Kalt:
case Kaltgr: k = K_ALT; break;
case Kins: k = K_INS; break;
default:
if(r < 0x80)
k = r;
}
return k;
}
void kproc (void *)
{
int n, k, fd;
char buf[128], kdown[128] = {0}, *s;
Rune r;
Kev ev;
if((fd = open("/dev/kbd", OREAD)) < 0)
sysfatal("open /dev/kbd: %r");
while((n = read(fd, buf, sizeof(buf))) > 0){
buf[n-1] = 0;
switch(*buf){
case 'c':
default:
continue;
case 'k':
s = buf+1;
while(*s){
s += chartorune(&r, s);
if(utfrune(kdown+1, r) == nil){
if(k = runetokey(r)){
ev.key = k;
ev.down = true;
if(nbsend(kchan, &ev) < 0)
Con_Printf("kproc:nbsend: %r\n");
}
}
}
break;
case 'K':
s = kdown+1;
while(*s){
s += chartorune(&r, s);
if(utfrune(buf+1, r) == nil){
if(k = runetokey(r)){
ev.key = k;
ev.down = false;
if(nbsend(kchan, &ev) < 0)
Con_Printf("kproc:nbsend: %r\n");
}
}
}
break;
}
strcpy(kdown, buf);
}
close(fd);
}
void mproc (void *)
{
int b, n, nerr, fd;
char buf[1+5*12];
float x, y;
if((fd = open("/dev/mouse", ORDWR)) < 0)
sysfatal("open /dev/mouse: %r");
nerr = 0;
for(;;){
if((n = read(fd, buf, sizeof buf)) != 1+4*12){
Con_Printf("mproc:read: bad count %d not 49: %r\n", n);
if(n < 0 || ++nerr > 10)
break;
continue;
}
nerr = 0;
switch(*buf){
case 'r':
config_notify = 1;
/* fall through */
case 'm':
if(!mouseon)
break;
x = atoi(buf+1+0*12) - center.x;
y = atoi(buf+1+1*12) - center.y;
b = atoi(buf+1+2*12);
mouse_x += x;
mouse_y += y;
if(m_windowed.value && (x != 0.0 || y != 0.0))
fprint(fd, "m%d %d", center.x, center.y);
mouse_buttonstate = b&1 | (b&2)<<1 | (b&4)>>1;
break;
}
}
close(fd);
}
void IN_Grabm (int on)
{
static char nocurs[2*4+2*2*16];
static int fd = -1;
if(mouseon == on)
return;
if(mouseon = on && m_windowed.value){
if((fd = open("/dev/cursor", ORDWR|OCEXEC)) < 0){
Con_Printf("IN_Grabm:open: %r\n");
return;
}
write(fd, nocurs, sizeof(nocurs));
}else if(fd >= 0){
close(fd);
fd = -1;
}
}
void IN_Shutdown (void)
{
IN_Grabm(0);
if(ktid != -1){
threadkill(ktid);
ktid = -1;
}
if(mtid != -1){
threadkill(mtid);
mtid = -1;
}
chanclose(kchan);
chanfree(kchan);
mouseon = 0;
}
void sucks (void *, char *note)
{
if(!strncmp(note, "sys:", 4))
IN_Shutdown();
noted(NDFLT);
}
void IN_Init (void)
{
Cvar_RegisterVariable(&m_windowed);
Cvar_RegisterVariable(&m_filter);
notify(sucks);
kchan = chancreate(sizeof(Kev), Nbuf);
if((ktid = proccreate(kproc, nil, 8192)) < 0)
sysfatal("proccreate kproc: %r");
if(COM_CheckParm("-nomouse"))
return;
if(m_windowed.value)
IN_Grabm(1);
if((mtid = proccreate(mproc, nil, 8192)) < 0)
sysfatal("proccreate mproc: %r");
mouse_x = mouse_y = 0.0;
}