shithub: qk1

ref: 65327985abf5b3619428eb0fc489d875fcb9555b
dir: /in_9.c/

View raw version
#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){
		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;
}