#include <stdlib.h>
#include <assert.h>

#include "main.h"
#include "list.h"
#include "myTimer.h"
#include "tux.h"
#include "space.h"
#include "arena.h"

#include "interface.h"
#include "term.h"
#include "font.h"

static list_t *listText;
static bool_t activeTerm;
static my_time_t lastActive;
static my_time_t lastRefresh;

void initTerm()
{
	listText = newList();

	activeTerm = FALSE;
	lastActive = getMyTime();
	lastRefresh = lastActive;
}

static char* getStrGun(int gun)
{
	switch( gun )
	{
		case GUN_SIMPLE : return "revolver";
		case GUN_DUAL_SIMPLE : return "dual revolver";
		case GUN_SCATTER : return "scatter";
		case GUN_TOMMY : return "tommy";
		case GUN_LASSER : return "lasser";
		case GUN_MINE : return "mine";
		case GUN_BOMBBALL : return "bombball";
		default : return "none";
	}

	return "gun_unknow";
}

static char* getStrBonus(int bonus)
{
	switch( bonus )
	{
		case BONUS_SPEED : return "speed";
		case BONUS_SHOT : return "shot";
		case BONUS_TELEPORT : return "teleport";
		case BONUS_GHOST : return "ghost";
		case BONUS_4X : return "4X";
		case BONUS_HIDDEN : return "hidden";
		default : return "none";
	}

	return "bonus_unknow";
}

static void action_refreshTerm(space_t *space, tux_t *tux, void *p)
{
	char str[STR_SIZE];

	sprintf(str,
		"name: %s "
		"score: %d "
		"gun: %s "
		"shot: %d "
		"bonus: %s",

		tux->name, tux->score,
		getStrGun(tux->gun),
		tux->shot[tux->gun],
		getStrBonus(tux->bonus)
	);

	addList(listText, strdup(str) );
}

static void refreshTerm()
{
	arena_t *arena;

	arena = getCurrentArena();

	destroyListItem(listText, free);
	listText = newList();

	actionSpace(arena->spaceTux, action_refreshTerm, NULL);

	//printf("refresh term..\n");
}

void drawTerm()
{
	int i;

	if( activeTerm == FALSE )
	{
		return;
	}

	for( i = 0 ; i < listText->count ; i++ )
	{
		char *line;

		line = (char *) listText->list[i];
		drawFont(line, 10, 10 + i*20, COLOR_WHITE);
	}
}

static void switchTerm()
{
	if( activeTerm == TRUE )
	{
		activeTerm = FALSE;
	}
	else
	{
		activeTerm = TRUE;
	}
}

void eventTerm()
{
	my_time_t currentTime;
	Uint8 *mapa;

	mapa = SDL_GetKeyState(NULL);

	currentTime = getMyTime();

	if( currentTime - lastRefresh > TERM_REFRESH_TIME_INTERVAL )
	{
		lastRefresh = currentTime;
		refreshTerm();
	}

	if( mapa[SDLK_TAB] == SDL_PRESSED )
	{
		if( currentTime - lastActive > TERM_ACTIVE_TIME_INTERVAL )
		{
			lastActive = currentTime;
			switchTerm();
		}
	}
}

void quitTerm()
{
	assert( listText != NULL );
	destroyListItem(listText, free);
}