ctrl.c

#include "config.h"

#include <pspkernel.h>
#include <time.h>
#include "display.h"
#include "conf.h"
#ifdef ENABLE_MUSIC
#include "mp3.h"
#ifdef ENABLE_LYRIC
#include "lyric.h"
#endif
#endif
#include "ctrl.h"

#define CTRL_REPEAT_TIME 0x40000
static unsigned int last_btn = 0;
static unsigned int last_tick = 0;
#ifdef ENABLE_HPRM
static bool hprmenable = false;
static u32 lasthprmkey = 0;
static u32 lastkhprmkey = 0;
static SceUID hprm_sema = -1;
#endif

extern void ctrl_init()
{
	sceCtrlSetSamplingCycle(0);
#ifdef ENABLE_ANALOG
	sceCtrlSetSamplingMode(PSP_CTRL_MODE_ANALOG);
#else
	sceCtrlSetSamplingMode(PSP_CTRL_MODE_DIGITAL);
#endif
#ifdef ENABLE_HPRM
	hprm_sema = sceKernelCreateSema("hprm sem", 0, 1, 1, NULL);
#endif
}

extern void ctrl_destroy()
{
#ifdef ENABLE_HPRM
	sceKernelDeleteSema(hprm_sema);
	hprm_sema = -1;
#endif
}

#ifdef ENABLE_ANALOG
extern void ctrl_analog(int * x, int * y)
{
	SceCtrlData ctl;
	sceCtrlReadBufferPositive(&ctl,1);
	*x = ((int)ctl.Lx) - 128;
	*y = ((int)ctl.Ly) - 128;
}
#endif

extern dword ctrl_read_cont()
{
	SceCtrlData ctl;

	sceCtrlReadBufferPositive(&ctl,1);

#ifdef ENABLE_HPRM
	if(hprmenable && sceHprmIsRemoteExist())
	{
		u32 key;
		if(sceKernelWaitSema(hprm_sema, 1, NULL) >= 0)
		{
			sceHprmPeekCurrentKey(&key);
			sceKernelSignalSema(hprm_sema, 1);

			if(key > 0)
			{
				switch(key)
				{
				case PSP_HPRM_FORWARD:
					if(key == lastkhprmkey)
						break;
					lastkhprmkey = key;
					return CTRL_FORWARD;
				case PSP_HPRM_BACK:
					if(key == lastkhprmkey)
						break;
					lastkhprmkey = key;
					return CTRL_BACK;
				case PSP_HPRM_PLAYPAUSE:
					if(key == lastkhprmkey)
						break;
					lastkhprmkey = key;
					return CTRL_PLAYPAUSE;
				}
			}
			else
				lastkhprmkey = 0;
		}
	}
#endif

#ifdef ENABLE_ANALOG
	if (ctl.Lx < 65 || ctl.Lx > 191 || ctl.Ly < 65 || ctl.Ly > 191)
		return CTRL_ANALOG | ctl.Buttons;
#endif
	last_btn  = ctl.Buttons;
	last_tick = ctl.TimeStamp;
	return last_btn;
}

extern dword ctrl_read()
{
	SceCtrlData ctl;

#ifdef ENABLE_HPRM
	if(hprmenable && sceHprmIsRemoteExist())
	{
		u32 key;
		sceHprmPeekCurrentKey(&key);

		if(key > 0)
		{
			switch(key)
			{
			case PSP_HPRM_FORWARD:
				if(key == lastkhprmkey)
					break;
				lastkhprmkey = key;
				return CTRL_FORWARD;
			case PSP_HPRM_BACK:
				if(key == lastkhprmkey)
					break;
				lastkhprmkey = key;
				return CTRL_BACK;
			case PSP_HPRM_PLAYPAUSE:
				if(key == lastkhprmkey)
					break;
				lastkhprmkey = key;
				return CTRL_PLAYPAUSE;
			}
		}
		else
			lastkhprmkey = 0;
	}
#endif

	sceCtrlReadBufferPositive(&ctl,1);

#ifdef ENABLE_ANALOG
	if (ctl.Lx < 65 || ctl.Lx > 191 || ctl.Ly < 65 || ctl.Ly > 191)
		return CTRL_ANALOG;
#endif
	if (ctl.Buttons == last_btn) {
		if (ctl.TimeStamp - last_tick < CTRL_REPEAT_TIME) return 0;
		return last_btn;
	}
	last_btn  = ctl.Buttons;
	last_tick = ctl.TimeStamp;
	return last_btn;
}

extern void ctrl_waitrelease()
{
	SceCtrlData ctl;
	do {
		sceCtrlReadBufferPositive(&ctl,1);
		sceKernelDelayThread(20000);
	} while (ctl.Buttons != 0);
}

extern dword ctrl_waitany()
{
	dword key;

	while((key = ctrl_read()) == 0)
	{
		sceKernelDelayThread(20000);
	}
	return key;
}

extern dword ctrl_waitkey(dword keymask)
{
	dword key;
	while((key = ctrl_read()) != key)
	{
		sceKernelDelayThread(20000);
	}
	return key;
}

extern dword ctrl_waitmask(dword keymask)
{
	dword key;
	while(((key = ctrl_read()) & keymask) == 0)
	{
		sceKernelDelayThread(20000);
	}
	return key;
}

#if defined(ENABLE_MUSIC) && defined(ENABLE_LYRIC)
extern dword ctrl_waitlyric()
{
	dword key;

	while((key = ctrl_read()) == 0)
	{
		sceKernelDelayThread(20000);
		if(lyric_check_changed(mp3_get_lyric()))
			break;
	}
	return key;
}
#endif

#ifdef ENABLE_HPRM
extern dword ctrl_hprm()
{
/*	if(sceKernelDevkitVersion() >= 0x02000010)
		return 0;*/
	if(!sceHprmIsRemoteExist())
		return 0;

	if(sceKernelWaitSema(hprm_sema, 1, NULL) < 0)
		return 0;
	u32 key;
	sceHprmPeekCurrentKey(&key);
	sceKernelSignalSema(hprm_sema, 1);
	if(key == lasthprmkey)
		return 0;

	lasthprmkey = key;
	return (dword)key;
}
#endif

extern dword ctrl_waittime(dword t)
{
	dword key;
	time_t t1 = time(NULL);
	while((key = ctrl_read()) == 0)
	{
		sceKernelDelayThread(20000);
		if(time(NULL) - t1 >= t)
			return 0;
	}
	return key;
}

#ifdef ENABLE_HPRM
extern void ctrl_enablehprm(bool enable)
{
	hprmenable = /*(sceKernelDevkitVersion() < 0x02000010) &&*/ enable;
}
#endif