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