/*

    espec - Sinclair Spectrum emulator

    Copyright (C) 2003  Ian Cowburn (ianc@noddybox.demon.co.uk)

    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

    -------------------------------------------------------------------------

*/
static const char id[]="$Id$";

#include <stdlib.h>
#include <stdio.h>
#include <string.h>

#include "SDL.h"

#include "z80.h"
#include "spec.h"
#include "gfx.h"
#include "gui.h"
#include "memmenu.h"
#include "config.h"
#include "kbbmp.h"
#include "exit.h"
#include "util.h"


/* ---------------------------------------- MACROS
*/
#ifndef TRUE
#define TRUE 1
#endif

#ifndef FALSE
#define FALSE 0
#endif


/* ---------------------------------------- STATICS
*/
static Uint32	white;
static Uint32	black;
static Uint32	grey;


/* ---------------------------------------- PRIVATE FUNCTIONS
*/
static void Usage(void)
{
    fprintf(stderr,"usage: espec [-m] [-l tape_file] [-s tape_file]\n");
    exit(EXIT_FAILURE);
}


/* ---------------------------------------- MAIN
*/
int main(int argc, char *argv[])
{
    char tape_in[FILENAME_MAX]="";
    char tape_out[FILENAME_MAX]="";
    Z80 *z80;
    SDL_Event *e;
    int quit;
    int trace;
    int inital_menu;
    int f;

    ConfigRead();

    trace=IConfig(CONF_TRACE);

    z80=Z80Init(SPECPeek,SPECPoke,SPECReadPort,SPECWritePort,SPECDisPeek);

    /* Z80SetLabels(z80,SPECGetLabel()); */

    GFXInit();

    SPECInit(z80);

    white=GFXRGB(255,255,255);
    grey=GFXRGB(128,128,128);
    black=GFXRGB(0,0,0);

    quit=FALSE;

    /* Parse switches
    */
    inital_menu=FALSE;
    tape_in[0]=0;
    tape_out[0]=0;

    f=1;

    while(f<argc && argv[f][0]=='-')
    {
	switch(argv[f][1])
	{
	    case 'm':
		inital_menu=TRUE;
		break;

	    case 'l':
	    	if (f>argc-2)
		{
		    Usage();
		}

		strcpy(tape_in,argv[++f]);
		break;

	    case 's':
	    	if (f>argc-2)
		{
		    Usage();
		}

		strcpy(tape_out,argv[++f]);
		break;

	    default:
	    	Usage();
		break;
	}

	f++;
    }

    if (inital_menu)
    {
    	quit=MemoryMenu(z80);
    }

    if (tape_in[0])
    {
	SPECMount(SPEC_TAPE_IN,tape_in);
    }

    if (tape_out[0])
    {
	SPECMount(SPEC_TAPE_IN,tape_out);
    }

    /* Main loop
    */
    while(!quit)
    {
	const char *brk;

	Z80State s1,s2;

	Z80GetState(z80,&s1);
	Z80SingleStep(z80);
	Z80GetState(z80,&s2);

	if (s2.PC==0)
	{
	    Debug("PC zero - prev %4.4x\n",s1.PC);
	}

	if (trace)
	{
	    DisplayState(z80);
	    GFXEndFrame(FALSE);
	}

	if ((brk=Break()))
	{
	    GUIMessage(eMessageBox,"BREAKPOINT","%s",brk);
	    quit=MemoryMenu(z80);
	}

	while(!quit && (e=GFXGetKey()))
	{
	    switch (e->key.keysym.sym)
	    {
	    	case SDLK_ESCAPE:
		    if (e->key.state==SDL_PRESSED)
			quit=GUIMessage(eYesNoBox,"QUIT","Sure?");
		    break;

		case SDLK_F1:
		    if (e->key.state==SDL_PRESSED)
			GUIMessage(eMessageBox,
				   "HELP",
				   "ESC - Quit                        \n"
				   "F1  - Help                        \n"
				   "F2  - About                       \n"
				   "F3  - View Spectrum keyboad       \n"
				   "F4  - View mounted tapes          \n"
				   "F8  - Select tape file for loading\n"
				   "F9  - Select tape file for saving \n"
				   "F10 - Close all open tape files   \n"
				   "F11 - Memory Menu                 \n"
				   "F12 - Toggle onscreen trace       ");
		    break;

		case SDLK_F2:
		    if (e->key.state==SDL_PRESSED)
			GUIMessage(eMessageBox,
				   "espec - ZX Spectrum Emulator",
				   "(c) 2004 Ian Cowburn\n"
				   " \n"
				   "This software comes with ABSOLUTELY \n"
				   "NO WARRANTY, and you are free to    \n"
				   "to redistribute it under certain    \n"
				   "conditions.  See the supplied GNU   \n"
				   "General Public License in LICENSE   \n"
				   "for details.                        \n"
				   " \n"
				   "If you did not recieve a license,   \n"
				   "vist www.gnu.org or wrote to:       \n"
				   " \n"
				   "Free Software Foundation, Inc.,     \n"
				   "59 Temple Place, Suite 330,         \n"
				   "Boston, MA 02111-1307 USA           ");
		    break;

		case SDLK_F3:
		    if (e->key.state==SDL_PRESSED)
		    {
			GFXBitmap((GFX_WIDTH-KBBMP_WIDTH)/2,
				  (GFX_HEIGHT-KBBMP_HEIGHT)/2,
				  KBBMP_WIDTH, KBBMP_HEIGHT,
				  keyboard_bitmap);

			GFXEndFrame(FALSE);
			GFXWaitKey();
		    }
		    break;

		case SDLK_F4:
		    if (e->key.state==SDL_PRESSED)
			GUIMessage(eMessageBox,
				   "Mounted Tape Files",
				   "In:  %-20.20s\nOut: %-20.20s",
				   tape_in[0] ? Basename(tape_in):"None",
				   tape_out[0] ? Basename(tape_out):"None");
		    break;


		case SDLK_F8:
		    if (e->key.state==SDL_PRESSED)
		    {
			GFXKeyRepeat(TRUE);

			if (GUIFileSelect("TAPE TO LOAD",TRUE,
					  tape_in[0] ?
					    Dirname(tape_in) :
					    SConfig(CONF_TAPEDIR),
					  tape_in))
			{
			    SPECMount(SPEC_TAPE_IN,tape_in);
			}

			GFXKeyRepeat(FALSE);
		    }
		    break;

		case SDLK_F9:
		    if (e->key.state==SDL_PRESSED)
		    {
			GFXKeyRepeat(TRUE);

			if (GUIFileSelect("TAPE TO SAVE",FALSE,
					  tape_out[0] ?
					    Dirname(tape_out) :
					    SConfig(CONF_TAPEDIR),
					  tape_out))
			{
			    SPECMount(SPEC_TAPE_OUT,tape_out);
			}

			GFXKeyRepeat(FALSE);
		    }
		    break;

		case SDLK_F10:
		    if (e->key.state==SDL_PRESSED)
		    {
			SPECUnmount(SPEC_TAPE_IN);
			SPECUnmount(SPEC_TAPE_OUT);
		    }
		    break;

		case SDLK_F11:
		    if (e->key.state==SDL_PRESSED)
		    	quit=MemoryMenu(z80);
		    break;

		case SDLK_F12:
		    if (e->key.state==SDL_PRESSED)
		    	trace=!trace;
		    break;

		default:
		    SPECKeyEvent(e);
		    break;
	    }
	}
    }

    return EXIT_SUCCESS;
}


/* END OF FILE */