[picodrive.git] / platform / uiq3 / App.cpp

/*******************************************************************\r
 *\r
 *	File:		App.cpp\r
 *\r
 *	Author:		Peter van Sebille (peter@yipton.net)\r
 *\r
 *  Modified/adapted for picodriveN by notaz, 2006\r
 *\r
 *  (c) Copyright 2006, notaz\r
 *	(c) Copyright 2002, Peter van Sebille\r
 *	All Rights Reserved\r
 *\r
 *******************************************************************/\r
\r
#include "App.h"\r
// #include "picodriven.mbg" // bitmap identifiers\r
#include "rsc/picodrive.rsg" // resource include\r
#include <eikenv.h>\r
#include <qbtselectdlg.h>\r
//#include <gulutil.h>\r
//#include <bautils.h>\r
//#include <eikmenub.h> // CEikMenuBar\r
#include <apgtask.h> // TApaSystemEvent\r
#include <eikstart.h>\r
#include <eikedwin.h>\r
#include <s32strm.h>\r
\r
#include <qikappui.h>\r
#include <qikeditcategoryobserver.h>\r
#include <qikselectfiledlg.h>\r
#include <qikcommand.h>\r
\r
#include "Dialogs.h"\r
#include "engine/debug.h"\r
#include "../common/emu.h"\r
#include "emu.h"\r
\r
\r
////////////////////////////////////////////////////////////////\r
//\r
// class CPicolAppView\r
//\r
////////////////////////////////////////////////////////////////\r
\r
// Creates and constructs the view.\r
CPicolAppView* CPicolAppView::NewLC(CQikAppUi& aAppUi, TPicoConfig& aCurrentConfig)\r
{\r
	CPicolAppView* self = new (ELeave) CPicolAppView(aAppUi, aCurrentConfig);\r
	CleanupStack::PushL(self);\r
	return self;\r
}\r
\r
/**\r
Constructor for the view.\r
Passes the application UI reference to the construction of the super class.\r
\r
KNullViewId should normally be passed as parent view for the applications \r
default view. The parent view is the logical view that is normally activated \r
when a go back command is issued. KNullViewId will activate the system \r
default view. \r
\r
@param aAppUi Reference to the application UI\r
*/\r
CPicolAppView::CPicolAppView(CQikAppUi& aAppUi, TPicoConfig& aCurrentConfig) \r
: CQikViewBase(aAppUi, KNullViewId), iCurrentConfig(aCurrentConfig)\r
{\r
}\r
\r
void CPicolAppView::ConstructL()\r
{\r
	BaseConstructL();\r
}\r
\r
CPicolAppView::~CPicolAppView()\r
{\r
}\r
\r
\r
/**\r
Inherited from CQikViewBase and called upon by the UI Framework. \r
It creates the view from resource.\r
*/\r
void CPicolAppView::ViewConstructL()\r
{\r
	// Loads information about the UI configurations this view supports\r
	// together with definition of each view.	\r
	ViewConstructFromResourceL(R_APP_UI_CONFIGURATIONS);\r
	UpdateCommandList();\r
}\r
\r
/**\r
Returns the view Id\r
\r
@return Returns the Uid of the view\r
*/\r
TVwsViewId CPicolAppView::ViewId()const\r
{\r
	return TVwsViewId(KUidPicolApp, KUidPicolMainView);\r
}\r
\r
/**\r
Handles all commands in the view.\r
Called by the UI framework when a command has been issued.\r
The command Ids are defined in the .hrh file.\r
\r
@param aCommand The command to be executed\r
@see CQikViewBase::HandleCommandL\r
*/\r
void CPicolAppView::HandleCommandL(CQikCommand& aCommand)\r
{\r
	TInt res;\r
\r
	switch(aCommand.Id())\r
	{\r
		case EEikCmdPicoLoadState:\r
			if(iROMLoaded) {\r
				CEikonEnv::Static()->BusyMsgL(_L("Loading State"));\r
				res = CPicoGameSession::Do(PicoMsgLoadState);\r
				CEikonEnv::Static()->BusyMsgCancel();\r
				// emu doesn't start to run if load fails, so we can display this\r
				if(res) CEikonEnv::Static()->InfoMsg(_L("Load Failed"));\r
			}\r
			break;\r
\r
		case EEikCmdPicoSaveState:\r
			if(iROMLoaded) {\r
				CEikonEnv::Static()->BusyMsgL(_L("Saving State"));\r
				res = CPicoGameSession::Do(PicoMsgSaveState);\r
				CEikonEnv::Static()->BusyMsgCancel();\r
				if(res) CEikonEnv::Static()->InfoMsg(_L("Save Failed"));\r
			}\r
			break;\r
\r
		case EEikCmdPicoLoadROM:\r
			DisplayOpenROMDialogL();\r
			DEBUGPRINT(_L("after DisplayOpenROMDialogL()"));\r
			break;\r
\r
		case EEikCmdPicoResume:\r
			CPicoGameSession::Do(PicoMsgResume);\r
			break;\r
\r
		case EEikCmdPicoReset:\r
			CPicoGameSession::Do(PicoMsgReset);\r
			break;\r
\r
		case EEikCmdPicoSettings:\r
			DisplayConfigDialogL();\r
			break;\r
\r
		case EEikCmdHelpAbout:\r
			DisplayAboutDialogL();\r
			break;\r
\r
		case EEikCmdPicoDebugInfo:\r
			DisplayDebugDialogL();\r
			break;\r
\r
		case EEikCmdPicoKeys:\r
			CPicoGameSession::Do(PicoMsgConfigChange, &iCurrentConfig);\r
			CPicoGameSession::Do(PicoMsgKeys);\r
			break;\r
\r
		case EEikCmdPicoFrameskipAuto:\r
			currentConfig.Frameskip = -1;\r
			emu_WriteConfig(0);\r
			break;\r
\r
		case EEikCmdPicoFrameskip0:\r
			currentConfig.Frameskip = 0;\r
			emu_WriteConfig(0);\r
			break;\r
\r
		case EEikCmdPicoFrameskip1:\r
			currentConfig.Frameskip = 1;\r
			emu_WriteConfig(0);\r
			break;\r
\r
		case EEikCmdPicoFrameskip2:\r
			currentConfig.Frameskip = 2;\r
			emu_WriteConfig(0);\r
			break;\r
\r
		case EEikCmdPicoFrameskip4:\r
			currentConfig.Frameskip = 4;\r
			emu_WriteConfig(0);\r
			break;\r
\r
		case EEikCmdPicoFrameskip8:\r
			currentConfig.Frameskip = 8;\r
			emu_WriteConfig(0);\r
			break;\r
\r
		case EEikCmdExit:\r
			emu_Deinit();\r
			CPicoGameSession::freeResources();\r
			//break; // this is intentional\r
\r
		default:\r
			// Go back and exit command will be passed to the CQikViewBase to handle.\r
			CQikViewBase::HandleCommandL(aCommand);\r
			break;\r
	}\r
}\r
\r
void CPicolAppView::DisplayOpenROMDialogL()\r
{\r
	// Array of mimetypes that the dialog shall filter on, if empty all\r
	// mimetypes will be visible.\r
	CDesCArray* mimeArray = new (ELeave) CDesCArrayFlat(1);\r
	CleanupStack::PushL(mimeArray);\r
	// Array that will be filled with the file paths that are choosen\r
	// from the dialog. \r
	CDesCArray* fileArray = new (ELeave) CDesCArraySeg(3);\r
	CleanupStack::PushL(fileArray);\r
	_LIT16(KDlgTitle, "Select a ROM file");\r
\r
	TPtrC8 text8((TUint8*) loadedRomFName);\r
	iCurrentConfig.iLastROMFile.Copy(text8);\r
\r
	if( CQikSelectFileDlg::RunDlgLD( *mimeArray, *fileArray, &KDlgTitle, &iCurrentConfig.iLastROMFile) )\r
	{\r
		CEikonEnv::Static()->BusyMsgL(_L("Loading ROM"));\r
		TPtrC16 file = (*fileArray)[0];\r
		//iCurrentConfig.iLastROMFile.Copy(file);\r
\r
		// push the config first\r
		CPicoGameSession::Do(PicoMsgSetAppView, this);\r
		CPicoGameSession::Do(PicoMsgConfigChange, &iCurrentConfig);\r
\r
		TInt res = CPicoGameSession::Do(PicoMsgLoadROM, &file);\r
\r
		CEikonEnv::Static()->BusyMsgCancel();\r
\r
		iROMLoaded = EFalse;\r
		switch (res)\r
		{\r
			case PicoErrRomOpenFailed:\r
				CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed to open file."));\r
				break;\r
\r
			case PicoErrOutOfMem:\r
				CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed to allocate memory."));\r
				break;\r
\r
			case PicoErrNotRom:\r
				CEikonEnv::Static()->InfoWinL(_L("Error"), _L("The file you selected is not a game ROM."));\r
				break;\r
\r
			case PicoErrNoRomsInArchive:\r
				CEikonEnv::Static()->InfoWinL(_L("Error"), _L("No game ROMs found in zipfile."));\r
				break;\r
\r
			case PicoErrUncomp:\r
				CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed while unzipping ROM."));\r
				break;\r
\r
			case PicoErrEmuThread:\r
				CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed to create emulation thread. Try to restart this application."));\r
				break;\r
\r
			default:\r
				iROMLoaded = ETrue;\r
				break;\r
		}\r
\r
		// errors which leave ROM loaded\r
		switch (res)\r
		{\r
			case PicoErrOutOfMemSnd:\r
				CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed to allocate sound buffer, disabled sound."));\r
				break;\r
\r
			case PicoErrGenSnd:\r
				CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed to start soundsystem, disabled sound."));\r
				break;\r
		}\r
		if(res == 6 || res == 7) currentConfig.EmuOpt &= ~EOPT_EN_SOUND;\r
\r
		if(iROMLoaded) {\r
			if(iTitleAdded)\r
			     ViewContext()->ChangeTextL(EEikCidTitleBarLabel, CPicoGameSession::iRomInternalName);\r
			else ViewContext()->AddTextL   (EEikCidTitleBarLabel, CPicoGameSession::iRomInternalName);\r
			iTitleAdded = ETrue;\r
			UpdateCommandList();\r
		}\r
	}\r
	CleanupStack::PopAndDestroy(2, mimeArray);\r
}\r
\r
\r
void CPicolAppView::DisplayConfigDialogL()\r
{\r
	CPicoConfigDialog* configDialog = new(ELeave)CPicoConfigDialog(currentConfig);\r
	emu_packConfig();\r
	configDialog->ExecuteLD(R_PICO_CONFIG);\r
	emu_unpackConfig();\r
	emu_WriteConfig(0);\r
\r
	CPicoGameSession::Do(PicoMsgConfigChange, &currentConfig);\r
}\r
\r
\r
void CPicolAppView::DisplayAboutDialogL()\r
{\r
	TInt iButtonRes;\r
	CAboutDialog* dialog = new (ELeave) CAboutDialog;\r
\r
	dialog->PrepareLC(R_PICO_ABOUT);\r
	iButtonRes = dialog->RunLD();\r
\r
	if(iButtonRes == EEikCmdPicoAboutCreditsCmd) {\r
		CCreditsDialog *creditsDialog = new (ELeave) CCreditsDialog();\r
		creditsDialog->PrepareLC(R_PICO_CREDITS);\r
		creditsDialog->RunLD();\r
	}\r
}\r
\r
#ifdef __DEBUG_PRINT\r
extern "C" char *PDebugMain();\r
#endif\r
\r
void CPicolAppView::DisplayDebugDialogL()\r
{\r
#ifdef __DEBUG_PRINT\r
	CDebugDialog* dialog = new (ELeave) CDebugDialog(PDebugMain());\r
\r
	dialog->PrepareLC(R_PICO_DEBUG);\r
	dialog->RunLD();\r
#endif\r
}\r
\r
void CPicolAppView::UpdateCommandList()\r
{\r
	CQikCommandManager& commandManager = CQikCommandManager::Static(*iCoeEnv);\r
	CQikCommand *cmd_fs[10];\r
	Mem::FillZ(cmd_fs, sizeof(CQikCommand*)*10);\r
\r
	CQikCommand* cmd_reset  = commandManager.Command(*this, EEikCmdPicoReset);\r
	CQikCommand* cmd_savest = commandManager.Command(*this, EEikCmdPicoSaveState);\r
	CQikCommand* cmd_loadst = commandManager.Command(*this, EEikCmdPicoLoadState);\r
	CQikCommand* cmd_resume = commandManager.Command(*this, EEikCmdPicoResume);\r
	cmd_fs[0]  = commandManager.Command(*this, EEikCmdPicoFrameskipAuto);\r
	cmd_fs[1]  = commandManager.Command(*this, EEikCmdPicoFrameskip0);\r
	cmd_fs[2]  = commandManager.Command(*this, EEikCmdPicoFrameskip1);\r
	cmd_fs[3]  = commandManager.Command(*this, EEikCmdPicoFrameskip2);\r
	cmd_fs[5]  = commandManager.Command(*this, EEikCmdPicoFrameskip4);\r
	cmd_fs[9]  = commandManager.Command(*this, EEikCmdPicoFrameskip8);\r
\r
	TBool dimmed = !CPicoGameSession::iEmuRunning || !iROMLoaded;\r
	cmd_reset ->SetDimmed(dimmed);\r
	cmd_savest->SetDimmed(dimmed);\r
	cmd_loadst->SetDimmed(dimmed);\r
	cmd_resume->SetDimmed(dimmed);\r
\r
	// frameskip\r
	TInt fs_index = currentConfig.Frameskip + 1;\r
	if (fs_index >= 0 && fs_index < 10 && cmd_fs[fs_index])\r
	{\r
		cmd_fs[fs_index]->SetChecked(ETrue);\r
	}\r
}\r
\r
\r
////////////////////////////////////////////////////////////////\r
//\r
// class CPicolAppUi\r
//\r
////////////////////////////////////////////////////////////////\r
\r
\r
void CPicolAppUi::ConstructL()\r
{\r
	BaseConstructL();\r
\r
	// Create the view and add it to the framework\r
	iAppView = CPicolAppView::NewLC(*this, ((CPicolDocument *)Document())->iCurrentConfig);\r
	AddViewL(*iAppView);\r
	CleanupStack::Pop(iAppView);\r
}\r
\r
\r
////////////////////////////////////////////////////////////////\r
//\r
// CPicolDocument\r
//\r
////////////////////////////////////////////////////////////////\r
\r
\r
CPicolDocument::CPicolDocument(CQikApplication& aApp)\r
: CQikDocument(aApp)\r
{\r
}\r
\r
CQikAppUi* CPicolDocument::CreateAppUiL()\r
{\r
	return new(ELeave) CPicolAppUi;\r
}\r
\r
/**\r
Called by the framework when ::SaveL has been called.\r
*/\r
void CPicolDocument::StoreL(CStreamStore& aStore, CStreamDictionary& aStreamDic) const\r
{\r
#if 0\r
	RStoreWriteStream stream;\r
\r
	TStreamId preferenceId = stream.CreateLC(aStore);\r
	aStreamDic.AssignL(KUidPicolStore, preferenceId);\r
\r
	// Externalize preference\r
	stream << iCurrentConfig;\r
\r
	// Ensures that any buffered data is written to aStore\r
	stream.CommitL();\r
	CleanupStack::PopAndDestroy(); // stream\r
#endif\r
/*\r
	// tmp\r
	TInt res;\r
	RFile logFile;\r
	res = logFile.Replace(CEikonEnv::Static()->FsSession(), _L("C:\\Shared\\pico.cfg"), EFileWrite|EFileShareAny);\r
	if(!res) {\r
		logFile.Write(TPtr8((TUint8 *)&iCurrentConfig, sizeof(iCurrentConfig), sizeof(iCurrentConfig)));\r
		logFile.Close();\r
	}\r
*/\r
}\r
\r
/**\r
Called by the framework on application start.\r
Loads the application data from disk, i.e. domain data and preferences.\r
*/\r
void CPicolDocument::RestoreL(const CStreamStore& aStore, const CStreamDictionary& aStreamDic)\r
{ \r
#if 0\r
	// Find the stream ID of the model data from the stream dictionary:\r
	TStreamId preferenceId(aStreamDic.At(KUidPicolStore));\r
	RStoreReadStream stream;\r
	stream.OpenLC(aStore, preferenceId);\r
	if(preferenceId != KNullStreamId)\r
	{\r
		// Interalize preference and model\r
		stream >> iCurrentConfig;\r
	}\r
\r
	CleanupStack::PopAndDestroy(); // stream\r
#endif\r
\r
	// tmp\r
/*	TInt res;\r
	RFile logFile;\r
	res = logFile.Open(CEikonEnv::Static()->FsSession(), _L("C:\\Shared\\pico.cfg"), EFileRead|EFileShareAny);\r
	if(!res) {\r
		TPtr8 ptr((TUint8 *)&iCurrentConfig, sizeof(iCurrentConfig), sizeof(iCurrentConfig));\r
		logFile.Read(ptr);\r
		logFile.Close();\r
	}*/\r
}\r
\r
////////////////////////////////////////////////////////////////\r
//\r
// framework\r
//\r
////////////////////////////////////////////////////////////////\r
\r
\r
CApaDocument* CPicolApplication::CreateDocumentL()\r
{\r
	return new (ELeave) CPicolDocument(*this);\r
}\r
\r
EXPORT_C CApaApplication* NewApplication()\r
{\r
	return new CPicolApplication;\r
}\r
\r
\r
TUid CPicolApplication::AppDllUid() const\r
{\r
	return KUidPicolApp;\r
}\r
\r
\r
extern "C" TInt my_SetExceptionHandler(TInt, TExceptionHandler, TUint32);\r
\r
GLDEF_C TInt E32Main()\r
{\r
	// doesn't work :(\r
	User::SetExceptionHandler(ExceptionHandler, (TUint32) -1);\r
//	my_SetExceptionHandler(KCurrentThreadHandle, ExceptionHandler, 0xffffffff);\r
\r
	emu_Init();\r
\r
	return EikStart::RunApplication(NewApplication);\r
}\r
\r
\r
Commit	Line	Data
cc68a136	1	/*******************************************************************\r
	2	*\r
	3	* File: App.cpp\r
	4	*\r
	5	* Author: Peter van Sebille (peter@yipton.net)\r
	6	*\r
	7	* Modified/adapted for picodriveN by notaz, 2006\r
	8	*\r
	9	* (c) Copyright 2006, notaz\r
	10	* (c) Copyright 2002, Peter van Sebille\r
	11	* All Rights Reserved\r
	12	*\r
	13	*******************************************************************/\r
	14	\r
ca482e5d	15	#include "App.h"\r
cc68a136	16	// #include "picodriven.mbg" // bitmap identifiers\r
ca482e5d	17	#include "rsc/picodrive.rsg" // resource include\r
cc68a136	18	#include <eikenv.h>\r
	19	#include <qbtselectdlg.h>\r
	20	//#include <gulutil.h>\r
	21	//#include <bautils.h>\r
	22	//#include <eikmenub.h> // CEikMenuBar\r
	23	#include <apgtask.h> // TApaSystemEvent\r
	24	#include <eikstart.h>\r
	25	#include <eikedwin.h>\r
	26	#include <s32strm.h>\r
	27	\r
ca482e5d	28	#include <qikappui.h>\r
	29	#include <qikeditcategoryobserver.h>\r
	30	#include <qikselectfiledlg.h>\r
	31	#include <qikcommand.h>\r
cc68a136	32	\r
	33	#include "Dialogs.h"\r
	34	#include "engine/debug.h"\r
ca482e5d	35	#include "../common/emu.h"\r
ca482e5d	36	#include "emu.h"\r
cc68a136	37	\r
	38	\r
	39	////////////////////////////////////////////////////////////////\r
	40	//\r
	41	// class CPicolAppView\r
	42	//\r
	43	////////////////////////////////////////////////////////////////\r
	44	\r
	45	// Creates and constructs the view.\r
	46	CPicolAppView* CPicolAppView::NewLC(CQikAppUi& aAppUi, TPicoConfig& aCurrentConfig)\r
	47	{\r
	48	CPicolAppView* self = new (ELeave) CPicolAppView(aAppUi, aCurrentConfig);\r
	49	CleanupStack::PushL(self);\r
	50	return self;\r
	51	}\r
	52	\r
	53	/**\r
	54	Constructor for the view.\r
	55	Passes the application UI reference to the construction of the super class.\r
	56	\r
	57	KNullViewId should normally be passed as parent view for the applications \r
	58	default view. The parent view is the logical view that is normally activated \r
	59	when a go back command is issued. KNullViewId will activate the system \r
	60	default view. \r
	61	\r
	62	@param aAppUi Reference to the application UI\r
	63	*/\r
	64	CPicolAppView::CPicolAppView(CQikAppUi& aAppUi, TPicoConfig& aCurrentConfig) \r
	65	: CQikViewBase(aAppUi, KNullViewId), iCurrentConfig(aCurrentConfig)\r
	66	{\r
	67	}\r
	68	\r
	69	void CPicolAppView::ConstructL()\r
	70	{\r
	71	BaseConstructL();\r
	72	}\r
	73	\r
	74	CPicolAppView::~CPicolAppView()\r
	75	{\r
	76	}\r
	77	\r
	78	\r
	79	/**\r
	80	Inherited from CQikViewBase and called upon by the UI Framework. \r
	81	It creates the view from resource.\r
	82	*/\r
	83	void CPicolAppView::ViewConstructL()\r
	84	{\r
	85	// Loads information about the UI configurations this view supports\r
	86	// together with definition of each view. \r
	87	ViewConstructFromResourceL(R_APP_UI_CONFIGURATIONS);\r
	88	UpdateCommandList();\r
	89	}\r
	90	\r
	91	/**\r
	92	Returns the view Id\r
	93	\r
	94	@return Returns the Uid of the view\r
	95	*/\r
	96	TVwsViewId CPicolAppView::ViewId()const\r
	97	{\r
	98	return TVwsViewId(KUidPicolApp, KUidPicolMainView);\r
	99	}\r
	100	\r
101	/**\r
102	Handles all commands in the view.\r
103	Called by the UI framework when a command has been issued.\r
104	The command Ids are defined in the .hrh file.\r
105	\r
106	@param aCommand The command to be executed\r
107	@see CQikViewBase::HandleCommandL\r
108	*/\r
109	void CPicolAppView::HandleCommandL(CQikCommand& aCommand)\r
110	{\r
111	TInt res;\r
112	\r
113	switch(aCommand.Id())\r
114	{\r
115	case EEikCmdPicoLoadState:\r
116	if(iROMLoaded) {\r
117	CEikonEnv::Static()->BusyMsgL(_L("Loading State"));\r
118	res = CPicoGameSession::Do(PicoMsgLoadState);\r
119	CEikonEnv::Static()->BusyMsgCancel();\r
120	// emu doesn't start to run if load fails, so we can display this\r
121	if(res) CEikonEnv::Static()->InfoMsg(_L("Load Failed"));\r
122	}\r
123	break;\r
124	\r
125	case EEikCmdPicoSaveState:\r
126	if(iROMLoaded) {\r
127	CEikonEnv::Static()->BusyMsgL(_L("Saving State"));\r
128	res = CPicoGameSession::Do(PicoMsgSaveState);\r
129	CEikonEnv::Static()->BusyMsgCancel();\r
130	if(res) CEikonEnv::Static()->InfoMsg(_L("Save Failed"));\r
131	}\r
132	break;\r
133	\r
134	case EEikCmdPicoLoadROM:\r
135	DisplayOpenROMDialogL();\r
136	DEBUGPRINT(_L("after DisplayOpenROMDialogL()"));\r
137	break;\r
138	\r
139	case EEikCmdPicoResume:\r
140	CPicoGameSession::Do(PicoMsgResume);\r
141	break;\r
142	\r
143	case EEikCmdPicoReset:\r
144	CPicoGameSession::Do(PicoMsgReset);\r
145	break;\r
146	\r
147	case EEikCmdPicoSettings:\r
148	DisplayConfigDialogL();\r
149	break;\r
150	\r
151	case EEikCmdHelpAbout:\r
152	DisplayAboutDialogL();\r
153	break;\r
154	\r
155	case EEikCmdPicoDebugInfo:\r
156	DisplayDebugDialogL();\r
157	break;\r
158	\r
159	case EEikCmdPicoKeys:\r
160	CPicoGameSession::Do(PicoMsgConfigChange, &iCurrentConfig);\r
161	CPicoGameSession::Do(PicoMsgKeys);\r
162	break;\r
163	\r
164	case EEikCmdPicoFrameskipAuto:\r
ca482e5d	165	currentConfig.Frameskip = -1;\r
ca482e5d	166	emu_WriteConfig(0);\r
cc68a136	167	break;\r
	168	\r
	169	case EEikCmdPicoFrameskip0:\r
ca482e5d	170	currentConfig.Frameskip = 0;\r
ca482e5d	171	emu_WriteConfig(0);\r
cc68a136	172	break;\r
	173	\r
	174	case EEikCmdPicoFrameskip1:\r
ca482e5d	175	currentConfig.Frameskip = 1;\r
ca482e5d	176	emu_WriteConfig(0);\r
cc68a136	177	break;\r
	178	\r
	179	case EEikCmdPicoFrameskip2:\r
ca482e5d	180	currentConfig.Frameskip = 2;\r
ca482e5d	181	emu_WriteConfig(0);\r
cc68a136	182	break;\r
	183	\r
	184	case EEikCmdPicoFrameskip4:\r
ca482e5d	185	currentConfig.Frameskip = 4;\r
ca482e5d	186	emu_WriteConfig(0);\r
cc68a136	187	break;\r
	188	\r
	189	case EEikCmdPicoFrameskip8:\r
ca482e5d	190	currentConfig.Frameskip = 8;\r
ca482e5d	191	emu_WriteConfig(0);\r
cc68a136	192	break;\r
	193	\r
	194	case EEikCmdExit:\r
ca482e5d	195	emu_Deinit();\r
cc68a136	196	CPicoGameSession::freeResources();\r
	197	//break; // this is intentional\r
	198	\r
	199	default:\r
	200	// Go back and exit command will be passed to the CQikViewBase to handle.\r
	201	CQikViewBase::HandleCommandL(aCommand);\r
	202	break;\r
	203	}\r
	204	}\r
	205	\r
	206	void CPicolAppView::DisplayOpenROMDialogL()\r
	207	{\r
	208	// Array of mimetypes that the dialog shall filter on, if empty all\r
	209	// mimetypes will be visible.\r
	210	CDesCArray* mimeArray = new (ELeave) CDesCArrayFlat(1);\r
	211	CleanupStack::PushL(mimeArray);\r
	212	// Array that will be filled with the file paths that are choosen\r
	213	// from the dialog. \r
	214	CDesCArray* fileArray = new (ELeave) CDesCArraySeg(3);\r
	215	CleanupStack::PushL(fileArray);\r
	216	_LIT16(KDlgTitle, "Select a ROM file");\r
	217	\r
ca482e5d	218	TPtrC8 text8((TUint8*) loadedRomFName);\r
	219	iCurrentConfig.iLastROMFile.Copy(text8);\r
	220	\r
cc68a136	221	if( CQikSelectFileDlg::RunDlgLD( mimeArray, fileArray, &KDlgTitle, &iCurrentConfig.iLastROMFile) )\r
	222	{\r
	223	CEikonEnv::Static()->BusyMsgL(_L("Loading ROM"));\r
	224	TPtrC16 file = (*fileArray)[0];\r
ca482e5d	225	//iCurrentConfig.iLastROMFile.Copy(file);\r
cc68a136	226	\r
	227	// push the config first\r
	228	CPicoGameSession::Do(PicoMsgSetAppView, this);\r
	229	CPicoGameSession::Do(PicoMsgConfigChange, &iCurrentConfig);\r
	230	\r
	231	TInt res = CPicoGameSession::Do(PicoMsgLoadROM, &file);\r
	232	\r
	233	CEikonEnv::Static()->BusyMsgCancel();\r
	234	\r
	235	iROMLoaded = EFalse;\r
	236	switch (res)\r
	237	{\r
	238	case PicoErrRomOpenFailed:\r
	239	CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed to open file."));\r
	240	break;\r
	241	\r
	242	case PicoErrOutOfMem:\r
	243	CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed to allocate memory."));\r
	244	break;\r
	245	\r
	246	case PicoErrNotRom:\r
	247	CEikonEnv::Static()->InfoWinL(_L("Error"), _L("The file you selected is not a game ROM."));\r
	248	break;\r
	249	\r
	250	case PicoErrNoRomsInArchive:\r
	251	CEikonEnv::Static()->InfoWinL(_L("Error"), _L("No game ROMs found in zipfile."));\r
	252	break;\r
	253	\r
	254	case PicoErrUncomp:\r
	255	CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed while unzipping ROM."));\r
	256	break;\r
	257	\r
	258	case PicoErrEmuThread:\r
	259	CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed to create emulation thread. Try to restart this application."));\r
	260	break;\r
	261	\r
	262	default:\r
	263	iROMLoaded = ETrue;\r
	264	break;\r
	265	}\r
	266	\r
	267	// errors which leave ROM loaded\r
	268	switch (res)\r
	269	{\r
	270	case PicoErrOutOfMemSnd:\r
	271	CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed to allocate sound buffer, disabled sound."));\r
	272	break;\r
	273	\r
	274	case PicoErrGenSnd:\r
	275	CEikonEnv::Static()->InfoWinL(_L("Error"), _L("Failed to start soundsystem, disabled sound."));\r
	276	break;\r
	277	}\r
ca482e5d	278	if(res == 6 \|\| res == 7) currentConfig.EmuOpt &= ~EOPT_EN_SOUND;\r
cc68a136	279	\r
	280	if(iROMLoaded) {\r
	281	if(iTitleAdded)\r
	282	ViewContext()->ChangeTextL(EEikCidTitleBarLabel, CPicoGameSession::iRomInternalName);\r
	283	else ViewContext()->AddTextL (EEikCidTitleBarLabel, CPicoGameSession::iRomInternalName);\r
	284	iTitleAdded = ETrue;\r
	285	UpdateCommandList();\r
	286	}\r
	287	}\r
	288	CleanupStack::PopAndDestroy(2, mimeArray);\r
	289	}\r
	290	\r
	291	\r
	292	void CPicolAppView::DisplayConfigDialogL()\r
	293	{\r
ca482e5d	294	CPicoConfigDialog* configDialog = new(ELeave)CPicoConfigDialog(currentConfig);\r
ca482e5d	295	emu_packConfig();\r
cc68a136	296	configDialog->ExecuteLD(R_PICO_CONFIG);\r
ca482e5d	297	emu_unpackConfig();\r
ca482e5d	298	emu_WriteConfig(0);\r
cc68a136	299	\r
ca482e5d	300	CPicoGameSession::Do(PicoMsgConfigChange, &currentConfig);\r
cc68a136	301	}\r
	302	\r
	303	\r
	304	void CPicolAppView::DisplayAboutDialogL()\r
	305	{\r
	306	TInt iButtonRes;\r
	307	CAboutDialog* dialog = new (ELeave) CAboutDialog;\r
	308	\r
	309	dialog->PrepareLC(R_PICO_ABOUT);\r
	310	iButtonRes = dialog->RunLD();\r
	311	\r
	312	if(iButtonRes == EEikCmdPicoAboutCreditsCmd) {\r
	313	CCreditsDialog *creditsDialog = new (ELeave) CCreditsDialog();\r
	314	creditsDialog->PrepareLC(R_PICO_CREDITS);\r
	315	creditsDialog->RunLD();\r
	316	}\r
	317	}\r
	318	\r
	319	#ifdef __DEBUG_PRINT\r
ca482e5d	320	extern "C" char *PDebugMain();\r
cc68a136	321	#endif\r
	322	\r
	323	void CPicolAppView::DisplayDebugDialogL()\r
	324	{\r
	325	#ifdef __DEBUG_PRINT\r
ca482e5d	326	CDebugDialog* dialog = new (ELeave) CDebugDialog(PDebugMain());\r
cc68a136	327	\r
	328	dialog->PrepareLC(R_PICO_DEBUG);\r
	329	dialog->RunLD();\r
	330	#endif\r
	331	}\r
	332	\r
	333	void CPicolAppView::UpdateCommandList()\r
	334	{\r
	335	CQikCommandManager& commandManager = CQikCommandManager::Static(*iCoeEnv);\r
	336	CQikCommand *cmd_fs[10];\r
	337	Mem::FillZ(cmd_fs, sizeof(CQikCommand)10);\r
	338	\r
	339	CQikCommand* cmd_reset = commandManager.Command(*this, EEikCmdPicoReset);\r
	340	CQikCommand* cmd_savest = commandManager.Command(*this, EEikCmdPicoSaveState);\r
	341	CQikCommand* cmd_loadst = commandManager.Command(*this, EEikCmdPicoLoadState);\r
	342	CQikCommand* cmd_resume = commandManager.Command(*this, EEikCmdPicoResume);\r
	343	cmd_fs[0] = commandManager.Command(*this, EEikCmdPicoFrameskipAuto);\r
	344	cmd_fs[1] = commandManager.Command(*this, EEikCmdPicoFrameskip0);\r
	345	cmd_fs[2] = commandManager.Command(*this, EEikCmdPicoFrameskip1);\r
	346	cmd_fs[3] = commandManager.Command(*this, EEikCmdPicoFrameskip2);\r
	347	cmd_fs[5] = commandManager.Command(*this, EEikCmdPicoFrameskip4);\r
	348	cmd_fs[9] = commandManager.Command(*this, EEikCmdPicoFrameskip8);\r
	349	\r
	350	TBool dimmed = !CPicoGameSession::iEmuRunning \|\| !iROMLoaded;\r
	351	cmd_reset ->SetDimmed(dimmed);\r
	352	cmd_savest->SetDimmed(dimmed);\r
	353	cmd_loadst->SetDimmed(dimmed);\r
	354	cmd_resume->SetDimmed(dimmed);\r
	355	\r
	356	// frameskip\r
ca482e5d	357	TInt fs_index = currentConfig.Frameskip + 1;\r
cc68a136	358	if (fs_index >= 0 && fs_index < 10 && cmd_fs[fs_index])\r
	359	{\r
	360	cmd_fs[fs_index]->SetChecked(ETrue);\r
	361	}\r
	362	}\r
	363	\r
	364	\r
	365	////////////////////////////////////////////////////////////////\r
	366	//\r
	367	// class CPicolAppUi\r
	368	//\r
	369	////////////////////////////////////////////////////////////////\r
	370	\r
	371	\r
	372	void CPicolAppUi::ConstructL()\r
	373	{\r
	374	BaseConstructL();\r
	375	\r
	376	// Create the view and add it to the framework\r
	377	iAppView = CPicolAppView::NewLC(this, ((CPicolDocument )Document())->iCurrentConfig);\r
	378	AddViewL(*iAppView);\r
	379	CleanupStack::Pop(iAppView);\r
	380	}\r
	381	\r
	382	\r
	383	////////////////////////////////////////////////////////////////\r
	384	//\r
	385	// CPicolDocument\r
	386	//\r
	387	////////////////////////////////////////////////////////////////\r
	388	\r
	389	\r
	390	CPicolDocument::CPicolDocument(CQikApplication& aApp)\r
	391	: CQikDocument(aApp)\r
	392	{\r
cc68a136	393	}\r
	394	\r
	395	CQikAppUi* CPicolDocument::CreateAppUiL()\r
	396	{\r
	397	return new(ELeave) CPicolAppUi;\r
	398	}\r
	399	\r
	400	/**\r
	401	Called by the framework when ::SaveL has been called.\r
	402	*/\r
	403	void CPicolDocument::StoreL(CStreamStore& aStore, CStreamDictionary& aStreamDic) const\r
	404	{\r
ca482e5d	405	#if 0\r
cc68a136	406	RStoreWriteStream stream;\r
	407	\r
	408	TStreamId preferenceId = stream.CreateLC(aStore);\r
	409	aStreamDic.AssignL(KUidPicolStore, preferenceId);\r
	410	\r
	411	// Externalize preference\r
	412	stream << iCurrentConfig;\r
	413	\r
	414	// Ensures that any buffered data is written to aStore\r
	415	stream.CommitL();\r
	416	CleanupStack::PopAndDestroy(); // stream\r
ca482e5d	417	#endif\r
cc68a136	418	/*\r
	419	// tmp\r
	420	TInt res;\r
	421	RFile logFile;\r
	422	res = logFile.Replace(CEikonEnv::Static()->FsSession(), _L("C:\\Shared\\pico.cfg"), EFileWrite\|EFileShareAny);\r
	423	if(!res) {\r
	424	logFile.Write(TPtr8((TUint8 *)&iCurrentConfig, sizeof(iCurrentConfig), sizeof(iCurrentConfig)));\r
	425	logFile.Close();\r
	426	}\r
	427	*/\r
	428	}\r
	429	\r
	430	/**\r
	431	Called by the framework on application start.\r
	432	Loads the application data from disk, i.e. domain data and preferences.\r
	433	*/\r
	434	void CPicolDocument::RestoreL(const CStreamStore& aStore, const CStreamDictionary& aStreamDic)\r
	435	{ \r
ca482e5d	436	#if 0\r
cc68a136	437	// Find the stream ID of the model data from the stream dictionary:\r
	438	TStreamId preferenceId(aStreamDic.At(KUidPicolStore));\r
	439	RStoreReadStream stream;\r
	440	stream.OpenLC(aStore, preferenceId);\r
	441	if(preferenceId != KNullStreamId)\r
	442	{\r
	443	// Interalize preference and model\r
	444	stream >> iCurrentConfig;\r
	445	}\r
	446	\r
	447	CleanupStack::PopAndDestroy(); // stream\r
ca482e5d	448	#endif\r
cc68a136	449	\r
	450	// tmp\r
	451	/* TInt res;\r
	452	RFile logFile;\r
	453	res = logFile.Open(CEikonEnv::Static()->FsSession(), _L("C:\\Shared\\pico.cfg"), EFileRead\|EFileShareAny);\r
	454	if(!res) {\r
	455	TPtr8 ptr((TUint8 *)&iCurrentConfig, sizeof(iCurrentConfig), sizeof(iCurrentConfig));\r
	456	logFile.Read(ptr);\r
	457	logFile.Close();\r
	458	}*/\r
	459	}\r
	460	\r
	461	////////////////////////////////////////////////////////////////\r
	462	//\r
	463	// framework\r
	464	//\r
	465	////////////////////////////////////////////////////////////////\r
	466	\r
	467	\r
	468	CApaDocument* CPicolApplication::CreateDocumentL()\r
	469	{\r
	470	return new (ELeave) CPicolDocument(*this);\r
	471	}\r
	472	\r
	473	EXPORT_C CApaApplication* NewApplication()\r
	474	{\r
	475	return new CPicolApplication;\r
	476	}\r
	477	\r
	478	\r
	479	TUid CPicolApplication::AppDllUid() const\r
	480	{\r
	481	return KUidPicolApp;\r
	482	}\r
	483	\r
	484	\r
ca482e5d	485	extern "C" TInt my_SetExceptionHandler(TInt, TExceptionHandler, TUint32);\r
ca482e5d	486	\r
cc68a136	487	GLDEF_C TInt E32Main()\r
cc68a136	488	{\r
ca482e5d	489	// doesn't work :(\r
cc68a136	490	User::SetExceptionHandler(ExceptionHandler, (TUint32) -1);\r
ca482e5d	491	// my_SetExceptionHandler(KCurrentThreadHandle, ExceptionHandler, 0xffffffff);\r
	492	\r
	493	emu_Init();\r
cc68a136	494	\r
	495	return EikStart::RunApplication(NewApplication);\r
	496	}\r
	497	\r
	498	\r