/*
Copyright (C) 1997-2001 Id Software, Inc.

This program is free software; you can redistribute it and/or
modify it under the terms of the GNU General Public License
as published by the Free Software Foundation; either version 2
of the License, or (at your option) any later version.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  

See the GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

*/

// ui_main.c -- the main menu & support functions
 
#include <ctype.h>
#ifdef _WIN32
#include <io.h>
#endif
#include "../client/client.h"
#include "ui_local.h"

static int	m_main_cursor;

qboolean mainmouse;

/*
=======================================================================

MAIN MENU

=======================================================================
*/

#define	MAIN_ITEMS	3

char *main_names[] =
{
	"m_main_game",
	//"m_main_multiplayer",
	"m_main_options",
	//"m_main_video",
	"m_main_quit",
	0
};


/*
=============
FindMenuCoords
=============
*/
void FindMenuCoords (int *xoffset, int *ystart, int *totalheight, int *widest)
{
	int w, h, i;

	*totalheight = 0;
	*widest = -1;

	for (i = 0; main_names[i] != 0; i++)
	{
		R_DrawGetPicSize (&w, &h, main_names[i]);

		if (w > *widest)
			*widest = w;
		*totalheight += (h + 12);
	}

	
	//*xoffset = (SCREEN_WIDTH - *widest + 70) * 0.8;
	*xoffset = SCREEN_WIDTH * 0.62;
	*ystart = SCREEN_HEIGHT * 0.6;
}


/*
=============
UI_DrawMainCursor

Draws an animating cursor with the point at
x,y.  The pic will extend to the left of x,
and both above and below y.
=============
*/
void UI_DrawMainCursor (int x, int y, int f)
{
	char	cursorname[80];
	static	qboolean cached;
	int		w,h;

	

	if (!cached)
	{
		int i;

		for (i = 0; i < NUM_CURSOR_FRAMES; i++) {
			Com_sprintf (cursorname, sizeof(cursorname), "m_cursor%d", i);
			R_DrawFindPic (cursorname);
		}
		cached = true;
	}

	Com_sprintf (cursorname, sizeof(cursorname), "m_cursor%d", f);
	R_DrawGetPicSize (&w, &h, cursorname);
	SCR_DrawPic (x, y, w, h, ALIGN_CENTER, cursorname, 1.0);
}


/*
=============
M_Main_Draw
=============
*/
void M_Main_Draw (void)
{
	int i;
	int w, h, last_h;
	int ystart;
	int	xoffset;
	int widest = -1;
	int totalheight = 0;
	char litname[80];
	int selnum;

	FindMenuCoords (&xoffset, &ystart, &totalheight, &widest);


	if (Com_ServerState() != 2)//bc
	{
		int bgWidth = (viddef.height * 4) / 3.3f;
		int margin = (viddef.width - bgWidth) / 2;

		SCR_DrawFill2 (0, 0, SCREEN_WIDTH, SCREEN_HEIGHT, ALIGN_STRETCH, 52,47,0, 255);

		for (i = 0; i < SCREEN_HEIGHT; i += 48)
		{
			SCR_DrawFill2 (0, i, SCREEN_WIDTH, 32, ALIGN_STRETCH, 0,0,0, 64);
		}

		//BC MAIN MENU FULLSCREEN

		R_DrawStretchPic (
			margin,
			0,
			bgWidth,
			viddef.height,
			"m_main_bg", 1.0);

		SCR_DrawPic (0, 0,
			SCREEN_WIDTH, SCREEN_HEIGHT,
			ALIGN_STRETCH,
			"/pics/vignette.tga", 1.0);
	}
	else
	{
		int posy = viddef.height * 0.54;
		int adjustedWidth = (viddef.height * 4) / 3.3f;		

		int boxsize = viddef.height * 0.35;

		R_DrawStretchPic (
			//adjustedWidth * 0.65,
			(viddef.width /2) + (adjustedWidth * 0.1),
			posy,
			boxsize,
			boxsize,
			"m_main_minibox", 1.0);
	}



	for (i = 0; main_names[i] != 0; i++)
	{
		if (i != m_main_cursor)
		{
			R_DrawGetPicSize (&w, &h, main_names[i]);
			SCR_DrawPic (xoffset,
				(ystart + i*40+3),
				w*0.5, h*0.5,
				ALIGN_CENTER, main_names[i], 0.5);			
		}
		else
			selnum = i;
	}

	strcpy (litname, main_names[m_main_cursor]);

	//strcat (litname, "_sel");
	R_DrawGetPicSize (&w, &h, litname);
	SCR_DrawPic (xoffset+5*sin(anglemod(cl.time*0.005)) ,
		(ystart + m_main_cursor*40+3),
		w*0.5, h*0.5,
		ALIGN_CENTER, litname, 1.0);

	//UI_DrawMainCursor (xoffset-25, ystart+(m_main_cursor*40+1), (int)(cls.realtime/100)%NUM_CURSOR_FRAMES);

	/*
	R_DrawGetPicSize (&w, &h, "m_main_plaque");
	w *= 0.5;
	h *= 0.5;
	SCR_DrawPic (xoffset-(w/2+300), ystart *1.1, w, h, ALIGN_CENTER, "m_main_plaque", 1.0);
	last_h = h;
*/

/*
	if (cl.cinematictime > 0 || cls.state == ca_disconnected)
	{
		//zzz
		char	name[16];
		Com_sprintf (name, sizeof(name), "m_icon%i", selnum+1);

		R_DrawGetPicSize (&w, &h, name);
		w *= 0.5;
		h *= 0.5;
		SCR_DrawPic (xoffset-(w/2+320),
			ystart *1.8,
			w, h,
			ALIGN_CENTER, name, 1);

		//0.2*sin(anglemod(cl.time*0.001))
	}
	*/


	//R_DrawGetPicSize (&w, &h, "m_main_logo");
	//SCR_DrawPic (xoffset-(w/2+50), ystart+last_h+20, w, h, ALIGN_CENTER, "m_main_logo", 1.0);
}


/*
=============
OpenMenuFromMain
=============
*/
void OpenMenuFromMain (void)
{
	switch (m_main_cursor)
	{
		case 0:
			M_Menu_Game_f ();
			break;

		//case 1:
		//	M_Menu_Multiplayer_f();
			//break;

		case 1:
			M_Menu_Options_f ();
			break;

		//case 3:
			//M_Menu_Video_f ();
			//break;

		case 2:
			M_Menu_Quit_f ();
			break;
	}
}


/*
=============
UI_CheckMainMenuMouse
=============
*/
void UI_CheckMainMenuMouse (void)
{
	int ystart;
	int	xoffset;
	int widest;
	int totalheight;
	int i, oldhover;
	char *sound = NULL;
	mainmenuobject_t buttons[MAIN_ITEMS];

	oldhover = MainMenuMouseHover;
	MainMenuMouseHover = 0;

	FindMenuCoords(&xoffset, &ystart, &totalheight, &widest);
	for (i = 0; main_names[i] != 0; i++)
		UI_AddMainButton (&buttons[i], i, xoffset, ystart+(i*40+3), main_names[i]);

	// Exit with double click 2nd mouse button
	if (!cursor.buttonused[MOUSEBUTTON2] && cursor.buttonclicks[MOUSEBUTTON2]==2)
	{
		UI_PopMenu();
		sound = menu_out_sound;
		cursor.buttonused[MOUSEBUTTON2] = true;
		cursor.buttonclicks[MOUSEBUTTON2] = 0;
	}

	for (i=MAIN_ITEMS-1; i>=0; i--)
	{
		if (cursor.x>=buttons[i].min[0] && cursor.x<=buttons[i].max[0] &&
			cursor.y>=buttons[i].min[1] && cursor.y<=buttons[i].max[1])
		{
			if (!mainmouse)
			{
				sound = menu_move_sound;
				mainmouse=true;
			}

			if (cursor.mouseaction)
				m_main_cursor = i;

			MainMenuMouseHover = 1 + i;

			if (oldhover == MainMenuMouseHover && MainMenuMouseHover-1 == m_main_cursor &&
				!cursor.buttonused[MOUSEBUTTON1] && cursor.buttonclicks[MOUSEBUTTON1]==1)
			{
				OpenMenuFromMain();
				sound = menu_move_sound;
				cursor.buttonused[MOUSEBUTTON1] = true;
				cursor.buttonclicks[MOUSEBUTTON1] = 0;
			}

			break;
		}
	}

	if (!MainMenuMouseHover)
	{
		cursor.buttonused[MOUSEBUTTON1] = false;
		cursor.buttonclicks[MOUSEBUTTON1] = 0;
		cursor.buttontime[MOUSEBUTTON1] = 0;

		if (mainmouse)
			mainmouse=false;
	}

	cursor.mouseaction = false;

	if (sound)
		S_StartLocalSound(sound);
}


/*
=============
M_Main_Key
=============
*/
const char *M_Main_Key (int key)
{
	const char *sound = menu_move_sound;

	switch (key)
	{

	case K_JOY2: //BC B button.
	case K_ESCAPE:
#ifdef ERASER_COMPAT_BUILD // special hack for Eraser build
		if (cls.state == ca_disconnected)
			M_Menu_Quit_f ();
		else
			UI_PopMenu ();
#else	// can't exit menu if disconnected,
		// so restart demo loop
		//if (cls.state == ca_disconnected)
		//	Cbuf_AddText ("d1\n");

		if (Com_ServerState() == 2)//bc if we're ingame.
			UI_PopMenu ();
#endif
		break;

	
	case K_AUX31: //BC dpad down.
	case K_KP_DOWNARROW:
	case K_DOWNARROW:
		if (++m_main_cursor >= MAIN_ITEMS)
			m_main_cursor = 0;
		return sound;

	case K_AUX29: //BC dpad up.
	case K_KP_UPARROW:
	case K_UPARROW:
		if (--m_main_cursor < 0)
			m_main_cursor = MAIN_ITEMS - 1;
		return sound;

	case K_JOY1:
	case K_KP_ENTER:
	case K_ENTER:
		m_entersound = true;

		switch (m_main_cursor)
		{
		case 0:
			M_Menu_Game_f ();
			break;

		//case 1:
		//	M_Menu_Multiplayer_f();
		//	break;

		case 1:
			M_Menu_Options_f ();
			break;

		//case 3:
		//	M_Menu_Video_f ();
		//	break;

		case 2:
			M_Menu_Quit_f ();
			break;
		}
	}
	return NULL;
}


/*
=============
M_Menu_Main_f
=============
*/
void M_Menu_Main_f (void)
{
	char fn[8];

	UI_PushMenu (M_Main_Draw, M_Main_Key);

	
	if (cls.state == ca_disconnected)
	{
		Com_sprintf(cl.configstrings[CS_CDTRACK], sizeof(cl.configstrings[CS_CDTRACK]), "barsong");
		CL_PlayBackgroundTrack ();
	}
}