menu_memory_disk.cpp

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

#include "sysconfig.h"
#include "sysdeps.h"
#include "config.h"
#include "menu.h"
#include "menu_config.h"

#include <sys/stat.h>
#include <unistd.h>
#ifdef __PSP2__
#include "psp2-dirent.h"
#else
#include <dirent.h>
#endif

#include "autoconf.h"
#include "uae.h"
#include "options.h"
#include "sound.h"
#include "gui.h"
#include <SDL.h>
#include "gp2x.h"
#include <SDL_ttf.h>

/* PocketUAE config file. Used for parsing PocketUAE-like options. */
#include "cfgfile.h" 

#ifdef __PSP2__
#define SDL_PollEvent PSP2_PollEvent
#endif

const char *text_str_memdisk_separator="--------------------------------------";
static const char *text_str_memdisk_title=    "     Memory and Disk Options     -";
const char *text_str_off="off";
const char *text_str_on="on";
const char *text_str_512K="512K";
const char *text_str_1M="1M";
const char *text_str_1_5M="1.5M";
const char *text_str_2M="2M";
const char *text_str_4M="4M";
const char *text_str_8M="8M";

int menuMemDisk = 0;
extern int quit_pressed_in_submenu;
extern int emulating;

enum { 
	MENUDISK_RETURNMAIN = 0,
	MENUDISK_CHIPMEM,
	MENUDISK_SLOWMEM,
	MENUDISK_FASTMEM,
	MENUDISK_BOOTHD,
	MENUDISK_HDDIR,
	MENUDISK_HDFILE,
	MENUDISK_SAVEHDCONF,
	MENUDISK_FLOPPYSPEED,
	MENUDISK_END
};

extern char currentDir[300];
extern void reset_hdConf();

static void draw_memDiskMenu(int c)
{
	static int b=0;
	int bb=(b%6)/3;		/* Inverted/normal selection drawing */

	int leftMargin=3;
	int tabstop1 = 17;
	int tabstop2 = 19;
	int tabstop3 = 21;
	int tabstop4 = 23;
	int tabstop5 = 25;
	int tabstop6 = 27;
	int tabstop7 = 29;
	int tabstop8 = 31;
	int tabstop9 = 33;
	
	int menuLine = 3;
	SDL_Rect r;
	extern SDL_Surface *text_screen;

	r.x=80-64; r.y=0; r.w=110+64+64; r.h=240;

	text_draw_background();
	text_draw_window(2,2,40,30,text_str_memdisk_title);
	
	if ((menuMemDisk == 0)&&(c==MENUDISK_RETURNMAIN)&&(bb))
		write_text_inv(3, menuLine, "Return to main menu");
	else
		write_text(3, menuLine, "Return to main menu");

	menuLine++;
	write_text(3, menuLine, text_str_memdisk_separator);
	menuLine++;
	
	write_text(leftMargin,menuLine,"Chip Memory");
	if ((mainMenu_chipMemory==0)&&((c!=MENUDISK_CHIPMEM)||(!bb)))
		write_text_inv(tabstop3 + 4,menuLine,text_str_512K);
	else
		write_text(tabstop3 + 4,menuLine,text_str_512K);
	
	if ((mainMenu_chipMemory==1)&&((c!=MENUDISK_CHIPMEM)||(!bb)))
		write_text_inv(tabstop3 + 9,menuLine,text_str_1M);
	else
		write_text(tabstop3 + 9,menuLine,text_str_1M);

	if ((mainMenu_chipMemory==2)&&((c!=MENUDISK_CHIPMEM)||(!bb)))
		write_text_inv(tabstop3 + 12,menuLine,text_str_2M);
	else
		write_text(tabstop3 + 12,menuLine,text_str_2M);

	if ((mainMenu_chipMemory==3)&&((c!=MENUDISK_CHIPMEM)||(!bb)))
		write_text_inv(tabstop3 + 15,menuLine,text_str_4M);
	else
		write_text(tabstop3 + 15,menuLine,text_str_4M);
	
	if ((mainMenu_chipMemory==4)&&((c!=MENUDISK_CHIPMEM)||(!bb)))
		write_text_inv(tabstop3 + 18,menuLine,text_str_8M);
	else
		write_text(tabstop3 + 18,menuLine,text_str_8M);
	
	menuLine+=2;
	write_text(leftMargin,menuLine,"Slow Memory");
	if ((mainMenu_slowMemory==0)&&((c!=MENUDISK_SLOWMEM)||(!bb)))
		write_text_inv(tabstop3,menuLine,text_str_off);
	else
		write_text(tabstop3,menuLine,text_str_off);
	
	if ((mainMenu_slowMemory==1)&&((c!=MENUDISK_SLOWMEM)||(!bb)))
		write_text_inv(tabstop3 + 4,menuLine,text_str_512K);
	else
		write_text(tabstop3 + 4,menuLine,text_str_512K);
	
	if ((mainMenu_slowMemory==2)&&((c!=MENUDISK_SLOWMEM)||(!bb)))
		write_text_inv(tabstop3 + 9,menuLine,text_str_1M);
	else
		write_text(tabstop3 + 9,menuLine,text_str_1M);

	if ((mainMenu_slowMemory==3)&&((c!=MENUDISK_SLOWMEM)||(!bb)))
		write_text_inv(tabstop3 + 12,menuLine,text_str_1_5M);
	else
		write_text(tabstop3 + 12,menuLine,text_str_1_5M);
	
	menuLine+=2;
	write_text(leftMargin,menuLine,"Fast Memory");
	if ((mainMenu_fastMemory==0)&&((c!=MENUDISK_FASTMEM)||(!bb)))
		write_text_inv(tabstop3,menuLine,text_str_off);
	else
		write_text(tabstop3,menuLine,text_str_off);

	if ((mainMenu_fastMemory==1)&&((c!=MENUDISK_FASTMEM)||(!bb)))
		write_text_inv(tabstop3 + 9,menuLine,text_str_1M);
	else
		write_text(tabstop3 + 9,menuLine,text_str_1M);
	
	if ((mainMenu_fastMemory==2)&&((c!=MENUDISK_FASTMEM)||(!bb)))
		write_text_inv(tabstop3 + 12,menuLine,text_str_2M);
	else
		write_text(tabstop3 + 12,menuLine,text_str_2M);

	if ((mainMenu_fastMemory==3)&&((c!=MENUDISK_FASTMEM)||(!bb)))
		write_text_inv(tabstop3 + 15,menuLine,text_str_4M);
	else
		write_text(tabstop3 + 15,menuLine,text_str_4M);

	if ((mainMenu_fastMemory==4)&&((c!=MENUDISK_FASTMEM)||(!bb)))
		write_text_inv(tabstop3 + 18,menuLine,text_str_8M);
	else
		write_text(tabstop3 + 18,menuLine,text_str_8M);

	menuLine++;
	write_text(3, menuLine, text_str_memdisk_separator);
	menuLine++;
	
	write_text(leftMargin,menuLine,"Boot HD");
	if ((mainMenu_bootHD==0)&&((c!=MENUDISK_BOOTHD)||(!bb)))
		write_text_inv(tabstop3,menuLine,text_str_off);
	else
		write_text(tabstop3,menuLine,text_str_off);

	if ((mainMenu_bootHD==1)&&((c!=MENUDISK_BOOTHD)||(!bb)))
		write_text_inv(tabstop3 + 7,menuLine,"Dir");
	else
		write_text(tabstop3 + 7,menuLine,"Dir");
	
	if ((mainMenu_bootHD==2)&&((c!=MENUDISK_BOOTHD)||(!bb)))
		write_text_inv(tabstop3 + 12,menuLine,"File");
	else
		write_text(tabstop3 + 12,menuLine,"File");
	
	menuLine+=2;

	{
		char str[256];
		int i;
		
		strcpy(str, "HD Dir");
		if ((c==MENUDISK_HDDIR)&&(bb))
			write_text_inv(leftMargin + 2,menuLine,str);
		else
			write_text(leftMargin + 2,menuLine,str);
		for (i = strlen(uae4all_hard_dir); i > 0; i--)
			if ((uae4all_hard_dir[i] == '/')||(uae4all_hard_dir[i] == '\\'))
				break;
		if (i > 0) {
			strcpy(str, &uae4all_hard_dir[i+1]);
			if (strlen(str) > (MENU_MEMDISK_WINDOW_WIDTH - tabstop1))
				str[MENU_MEMDISK_WINDOW_WIDTH - tabstop1] = '\0';
			write_text(tabstop1,menuLine,str);
		} else
			write_text(tabstop1,menuLine,"");
		
		menuLine += 2;
		
		strcpy(str, "HD File");
		if ((c==MENUDISK_HDFILE)&&(bb))
			write_text_inv(leftMargin + 2,menuLine,str);
		else
			write_text(leftMargin + 2,menuLine,str);
		for (i = strlen(uae4all_hard_file); i > 0; i--)
			if ((uae4all_hard_file[i] == '/') || (uae4all_hard_file[i] == '\\'))
				break;
		if (i > 0) {
			strcpy(str, &uae4all_hard_file[i+1]);
			if (strlen(str) > MENU_MEMDISK_WINDOW_WIDTH - tabstop1)
				str[MENU_MEMDISK_WINDOW_WIDTH - tabstop1] = '\0';
			write_text(tabstop1,menuLine,str);
		} else
			write_text(tabstop1,menuLine,"");
	}

	menuLine += 2;

	if ((c==MENUDISK_SAVEHDCONF)&&(bb))
		write_text_inv(3, menuLine, "Save Config for current HD");
	else
		write_text(3, menuLine, "Save Config for current HD");
	
	menuLine++;
	write_text(3, menuLine, text_str_memdisk_separator);
	menuLine++;

	write_text(leftMargin,menuLine,"Floppy speed:");

	if ((mainMenu_floppyspeed==100)&&((c!=MENUDISK_FLOPPYSPEED)||(bb)))
		write_text_inv(tabstop3,menuLine,"1x");
	else
		write_text(tabstop3,menuLine,"1x");

	if ((mainMenu_floppyspeed==200)&&((c!=MENUDISK_FLOPPYSPEED)||(bb)))
		write_text_inv(tabstop4+1,menuLine,"2x");
	else
		write_text(tabstop4+1,menuLine,"2x");

	if ((mainMenu_floppyspeed==400)&&((c!=MENUDISK_FLOPPYSPEED)||(bb)))
		write_text_inv(tabstop5+2,menuLine,"4x");
	else
		write_text(tabstop5+2,menuLine,"4x");

	if ((mainMenu_floppyspeed==800)&&((c!=MENUDISK_FLOPPYSPEED)||(bb)))
		write_text_inv(tabstop6+3,menuLine,"8x");
	else
		write_text(tabstop6+3,menuLine,"8x");

	menuLine++;
	write_text(3, menuLine, text_str_memdisk_separator);
	menuLine++;

	text_flip();

	b++;
}


static int key_memDiskMenu(int *c)
{
	int end=0;
	int left=0, right=0, up=0, down=0;
	int hit0=0, hit1=0, hit2=0;
	int del=0;

	SDL_Event event;
	
	while (SDL_PollEvent(&event) > 0)
	{
		if (event.type == SDL_QUIT)
			end=-1;
		else if (event.type == SDL_KEYDOWN)
		{
			uae4all_play_click();
			switch(event.key.keysym.sym)
			{
				case SDLK_RIGHT: right=1; break;
				case SDLK_LEFT: left=1; break;
				case SDLK_UP: up=1; break;
				case SDLK_DOWN: down=1; break;
				case SDLK_PAGEDOWN: hit0=1; break;
				case SDLK_HOME: hit0=1; break;
				case SDLK_LALT: hit1=1; break;
				case SDLK_RSHIFT: hit0=1; break;
				case SDLK_RCTRL: hit0=1; break;
				case SDLK_END: hit0=1; break;
				case SDLK_PAGEUP: hit0=1; break;
				case SDLK_DELETE: case SDLK_BACKSPACE: case SDLK_ESCAPE: del=1; break;
				case SDLK_LCTRL: hit2=1; break; //allow user to quit menu completely at any time
				//note SDLK_CTRL corresponds to ButtonSelect on Vita
				default:
					break;
			}
		}
	}
	if (hit2) //Does the user want to cancel the menu completely?
	{
		if (emulating)
		{
			end = -1; 
			quit_pressed_in_submenu = 1; //Tell the mainMenu to cancel, too
		}
	}	
	else if (hit1)
	{
		end=-1;
	}
	else if (up)
	{
		if (menuMemDisk==MENUDISK_RETURNMAIN) menuMemDisk=MENUDISK_END - 1;
		else menuMemDisk--;
	}
	else if (down)
	{
		if (menuMemDisk==MENUDISK_END - 1) menuMemDisk=MENUDISK_RETURNMAIN;
		else menuMemDisk++;	
	}

	switch (menuMemDisk)
	{
		case MENUDISK_RETURNMAIN:
			if (hit0)
				end = 1;
			break;
		case MENUDISK_CHIPMEM:
			if (hit0)
				end = 1;
			if ((left)||(right)) {
				if (right) {
					if (mainMenu_chipMemory < 4)
						mainMenu_chipMemory++;
					else
						mainMenu_chipMemory = 0;
				} else if (left) {
					if (mainMenu_chipMemory > 0)
						mainMenu_chipMemory--;
					else
						mainMenu_chipMemory = 4;
				}
				UpdateMemorySettings();
			}
			break;
		case MENUDISK_SLOWMEM:
			if (hit0)
				end = 1;
			if ((left)||(right)) {
				if (right) {
					if (mainMenu_slowMemory < 3)
						mainMenu_slowMemory++;
					else
						mainMenu_slowMemory = 0;
				} else if (left) {
					if (mainMenu_slowMemory > 0)
						mainMenu_slowMemory--;
					else
						mainMenu_slowMemory = 3;
				}
				UpdateMemorySettings();
			}
			break;
		case MENUDISK_FASTMEM:
			if (hit0)
				end = 1;
			if ((left) || (right)) {
				if (right) {
					if (mainMenu_fastMemory < 4)
						mainMenu_fastMemory++;
					else
						mainMenu_fastMemory = 0;
				} else if (left) {
					if (mainMenu_fastMemory > 0)
						mainMenu_fastMemory--;
					else
						mainMenu_fastMemory = 4;
				}
				
				/* Fast memory > 0 => max 2MB chip memory */
				if ((mainMenu_fastMemory > 0) && (mainMenu_chipMemory > 2))
					mainMenu_chipMemory = 2;
				UpdateMemorySettings();
			}
			break;
		case MENUDISK_BOOTHD:
			if (hit0)
				end = 1;
			if (left) {
				if (mainMenu_bootHD > 0)
					mainMenu_bootHD--;
				else
					mainMenu_bootHD = 2;
				reset_hdConf();
			} else if (right) {
				if (mainMenu_bootHD < 2)
					mainMenu_bootHD++;
				else
					mainMenu_bootHD = 0;
				reset_hdConf();
			}
			break;
		case MENUDISK_HDDIR:
			if (hit0) {
				if (run_menuLoad(currentDir, MENU_LOAD_HD_DIR)) {
					make_hard_dir_cfg_line(uae4all_hard_dir);
					reset_hdConf();
					mainMenu_bootHD = 1;
					loadconfig(2);
				}
			} else if (del) {
				uae4all_hard_dir[0] = '\0';
				reset_hdConf();
			}
			break;
		case MENUDISK_HDFILE:
			if (hit0) {
				if (run_menuLoad(currentDir, MENU_LOAD_HDF)) {
					make_hard_file_cfg_line(uae4all_hard_file);
					reset_hdConf();
					mainMenu_bootHD = 2;
					loadconfig(2);
				}
			} else if (del) {
				uae4all_hard_file[0] = '\0';
				reset_hdConf();
			}
			break;
		case MENUDISK_SAVEHDCONF:
			if (hit0)
			{
				if (saveconfig(2))
					showWarning("Config saved for current HD");
			}
			break;
		case MENUDISK_FLOPPYSPEED:
			if (hit0)
				end = 1;
			if (left)
			{
				if (mainMenu_floppyspeed>100)
					mainMenu_floppyspeed/=2;
				else
					mainMenu_floppyspeed=800;
			}
			else if (right)
			{
				if (mainMenu_floppyspeed<800)
					mainMenu_floppyspeed*=2;
				else
					mainMenu_floppyspeed=100;
			}
	}
	
	*c = menuMemDisk;
	
	return end;
}

static void raise_memDiskMenu()
{
	int i;

	text_draw_background();
	text_flip();
	for(i=0;i<10;i++)
	{
		text_draw_background();
		text_draw_window(80-64,(10-i)*24,160+64+64,220,text_str_memdisk_title);
		text_flip();
	}
}

static void unraise_memDiskMenu()
{
	int i;

	for(i=9;i>=0;i--)
	{
		text_draw_background();
		text_draw_window(80-64,(10-i)*24,160+64+64,220,text_str_memdisk_title);
		text_flip();
	}
	text_draw_background();
	text_flip();
}

int run_menuMemDisk()
{
	SDL_Event event;
	
	SDL_Delay(150);
	while(SDL_PollEvent(&event))
		SDL_Delay(10);
	int end=0,c=0;
	raise_memDiskMenu();
	
	while(!end)
	{
		draw_memDiskMenu(c);
		end = key_memDiskMenu(&c);
	}
	
	unraise_memDiskMenu();
	return end;
}