#include "SDL/SDL_ttf.h"
#include "SDL/SDL_image.h"
#include "SDL/SDL.h"
#include <string>

// screen attributes
const int SCREEN_WIDTH = 640;
const int SCREEN_HEIGHT = 480;
const int SCREEN_BPP =32;

// surfaces
SDL_Surface *background = NULL;
SDL_Surface *screen = NULL;

SDL_Surface *message = NULL;
SDL_Surface *up = NULL;
SDL_Surface *down = NULL;
SDL_Surface *left = NULL;
SDL_Surface *right = NULL;

// event handler
SDL_Event event;

// the fonts & font color
TTF_Font *font = NULL;
SDL_Color textColor = {255, 255, 255};

// func decs
bool loadFiles();
bool init();
void clean_up();
SDL_Surface *loadImage(std::string);
void applySurface( int, int, SDL_Surface*, SDL_Surface*, SDL_Rect*);

bool init()
{
	// init SDL
	if (SDL_Init( SDL_INIT_EVERYTHING) == -1)
		return false;
	
	screen = SDL_SetVideoMode(SCREEN_WIDTH, SCREEN_HEIGHT,
							SCREEN_BPP, SDL_SWSURFACE);
	
	if (screen == NULL)
		return false;
	
	// init ttf
	if (TTF_Init() == -1)
		return false;
	
	SDL_WM_SetCaption( "Keypress Testing", NULL);
	
	return true;
}

bool loadFiles()
{
	background = loadImage( "background.png" );
	font = TTF_OpenFont( "lazy.ttf", 72 );
	
	if (background == NULL)
		return false;
	
	if (font == NULL)
		return false;
	
	// Everything loaded fine
	return true;
}

// Free's the surfaces, fonts, and exits SDL
void clean_up()
{
	SDL_FreeSurface( background );
	SDL_FreeSurface( message );
	SDL_FreeSurface( up );
	SDL_FreeSurface( down );
	SDL_FreeSurface( left );
	SDL_FreeSurface( right );
	TTF_CloseFont( font );
	TTF_Quit();
	SDL_Quit();
}

// load a image into memory as a surface
SDL_Surface *loadImage(std::string filename)
{
	// temp image
	SDL_Surface* loadedImage = NULL;
	
	// optimized image
	SDL_Surface* optimizedImage = NULL;
	
	// load the image
	loadedImage = IMG_Load( filename.c_str() );
	if (loadedImage != NULL)
	{
		// optimize image and free old image
		optimizedImage = SDL_DisplayFormat( loadedImage );
		SDL_FreeSurface( loadedImage );
		
		if (optimizedImage != NULL)
		{ // Color key the surface
			SDL_SetColorKey( optimizedImage, SDL_RLEACCEL | SDL_SRCCOLORKEY,
						SDL_MapRGB( optimizedImage->format, 0, 0xFF, 0xFF ) );
		}
	}
	return optimizedImage;
}

// Blit a surface from source to the destination at x,y
void applySurface( int x, int y, SDL_Surface* source, 
						  SDL_Surface* destination,
						  SDL_Rect* clip = NULL)
{
	// temp rec to hold offsets
	SDL_Rect offset;
	
	offset.x = x;
	offset.y = y;
	SDL_BlitSurface(source, clip, destination, &offset);
}

int main( int argc, char* args[] )
{
	bool quit = false;
	
	// Initialize SDL and load the files
	if ( init() == false )
		return 1;
	if ( loadFiles() == false )
		return 1;
	
	// Create the messages
	up = TTF_RenderText_Solid(font, "Up was pressed", textColor);
	down = TTF_RenderText_Solid(font, "Down was pressed", textColor);
	left = TTF_RenderText_Solid(font, "Left was pressed", textColor);
	right = TTF_RenderText_Solid(font, "Right was pressed", textColor);

	applySurface(0, 0, background, screen);
	
	while (!quit)
	{
		if ( SDL_PollEvent( &event ) )
		{
			if( event.type == SDL_KEYDOWN )
			{
				// set the text
				switch( event.key.keysym.sym )
				{
					case SDLK_UP: message = up; break;
					case SDLK_DOWN: message = down; break;
					case SDLK_LEFT: message = left; break;
					case SDLK_RIGHT: message = right; break;
				}
			}
			else if( event.type == SDL_QUIT )
				quit = true;
			
		}
		// Message to the screen
		if ( message != NULL )
		{
			applySurface(0, 0, background, screen);
			applySurface( (SCREEN_WIDTH - message->w) / 2,
						(SCREEN_HEIGHT - message->h) / 2,
						message, screen );
		
			message = NULL;
		}
		// Update the screen
		if ( SDL_Flip( screen ) == -1 )
			return 1;
	}
	// Clean and exit
	clean_up();
	return 0;
}

int main( int argc, char* args[] ){	bool quit = false;		// Initialize SDL and load the files	if ( init() == false )		return 1;	if ( loadFiles() == false )		return 1;		// Create the messages	up = TTF_RenderText_Solid(font, "Up was pressed", textColor);	down = TTF_RenderText_Solid(font, "Down was pressed", textColor);	left = TTF_RenderText_Solid(font, "Left was pressed", textColor);	right = TTF_RenderText_Solid(font, "Right was pressed", textColor);	// Put the background on so it isn't just black.	applySurface(0, 0, background, screen);        // This next line causes segmentation fault	//applySurface( (SCREEN_WIDTH - up->w) / 2,	//					(SCREEN_HEIGHT - up->h) / 2,	//					up, screen );		while (!quit)	{		if ( SDL_PollEvent( &event ) )		{			if( event.type == SDL_KEYDOWN )			{				switch( event.key.keysym.sym )				{					case SDLK_UP: message = up; break;					case SDLK_DOWN: message = down; break;					case SDLK_LEFT: message = left; break;					case SDLK_RIGHT: message = right; break;				}			}						else if( event.type == SDL_KEYUP )				message = NULL;							else if( event.type == SDL_QUIT )				quit = true;		}				// Draw the screen		if ( message != NULL )		{			applySurface(0, 0, background, screen);			applySurface( (SCREEN_WIDTH - message->w) / 2,						(SCREEN_HEIGHT - message->h) / 2,						message, screen );		}		if ( SDL_Flip( screen ) == -1 )			return 1;	}	// Clean and exit	clean_up();	return 0;}