[ViewVC] Diff of: cebix/BasiliskII/src/AmigaOS/main

Comparing BasiliskII/src/AmigaOS/main_amiga.cpp (file contents):
Revision 1.1 by cebix, 1999-10-03T14:16:25Z vs.
Revision 1.18 by cebix, 2001-07-03T15:59:45Z

#	Line 1 \| Line 1
1		/*
2		* main_amiga.cpp - Startup code for AmigaOS
3		*
4	<	* Basilisk II (C) 1997-1999 Christian Bauer
4	>	* Basilisk II (C) 1997-2001 Christian Bauer
5		*
6		* This program is free software; you can redistribute it and/or modify
7		* it under the terms of the GNU General Public License as published by
#	Line 56 \| Line 56
56		#include "debug.h"
57
58
59	+	// Options for libnix
60	+	unsigned long __stack = 0x4000; // Stack requirement
61	+	int __nocommandline = 1; // Disable command line parsing
62	+
63	+
64		// Constants
65		static const char ROM_FILE_NAME[] = "ROM";
66	<	static const char __ver[] = "$VER: " VERSION_STRING " " __AMIGADATE__;
66	>	static const char __ver[] = "$VER: " VERSION_STRING " " __DATE__;
67		static const int SCRATCH_MEM_SIZE = 65536;
68
69
#	Line 80 \| Line 85 \| bool TwentyFourBitAddressing;
85
86		// Global variables
87		extern ExecBase *SysBase;
88	+	struct Library *GfxBase = NULL;
89	+	struct IntuitionBase *IntuitionBase = NULL;
90		struct Library *GadToolsBase = NULL;
91	+	struct Library *IFFParseBase = NULL;
92		struct Library *AslBase = NULL;
93		struct Library *P96Base = NULL;
94	+	struct Library *CyberGfxBase = NULL;
95		struct Library *TimerBase = NULL;
96		struct Library *AHIBase = NULL;
97		struct Library *DiskBase = NULL;
98
99		struct Task *MainTask; // Our task
100	<	uint32 ScratchMem = NULL; // Scratch memory for Mac ROM writes
100	>	uint8 *ScratchMem = NULL; // Scratch memory for Mac ROM writes
101		APTR OldTrapHandler = NULL; // Old trap handler
102		APTR OldExceptionHandler = NULL; // Old exception handler
103		BYTE IRQSig = -1; // "Interrupt" signal number
#	Line 99 \| Line 108 \| *static struct timerequest timereq = NUL**
108		static struct MsgPort *ahi_port = NULL; // Port for AHI
109		static struct AHIRequest *ahi_io = NULL; // IORequest for AHI
110
111	+	static struct Process *xpram_proc = NULL; // XPRAM watchdog
112	+	static volatile bool xpram_proc_active = true; // Flag for quitting the XPRAM watchdog
113	+
114		static struct Process *tick_proc = NULL; // 60Hz process
115		static volatile bool tick_proc_active = true; // Flag for quitting the 60Hz process
116
#	Line 106 \| Line 118 \| static bool stack_swapped = false; //
118		static StackSwapStruct stack_swap;
119
120
109	–	// Prototypes
110	–	static void jump_to_rom(void);
111	–	static void tick_func(void);
112	–
113	–
121		// Assembly functions
122		struct trap_regs;
123		extern "C" void AtomicAnd(uint32 *p, uint32 val);
124		extern "C" void AtomicOr(uint32 *p, uint32 val);
125		extern "C" void MoveVBR(void);
126	+	extern "C" void DisableSuperBypass(void);
127		extern "C" void TrapHandlerAsm(void);
128		extern "C" void ExceptionHandlerAsm(void);
129		extern "C" void IllInstrHandler(trap_regs *regs);
130		extern "C" void PrivViolHandler(trap_regs *regs);
131	+	extern "C" void quit_emulator(void);
132	+	extern "C" void AsmTriggerNMI(void);
133		uint16 EmulatedSR; // Emulated SR (supervisor bit and interrupt mask)
134
135
136	+	// Prototypes
137	+	static void jump_to_rom(void);
138	+	static void xpram_func(void);
139	+	static void tick_func(void);
140	+
141	+
142		/*
143		* Main program
144		*/
145
146	<	int main(void)
146	>	int main(int argc, char **argv)
147		{
148		// Initialize variables
149		RAMBaseHost = NULL;
#	Line 141 \| Line 157 \| int main(void)
157		printf(GetString(STR_ABOUT_TEXT1), VERSION_MAJOR, VERSION_MINOR);
158		printf(" %s\n", GetString(STR_ABOUT_TEXT2));
159
144	–	// Read preferences
145	–	PrefsInit();
146	–
160		// Open libraries
161	+	GfxBase = OpenLibrary((UBYTE *)"graphics.library", 39);
162	+	if (GfxBase == NULL) {
163	+	printf("Cannot open graphics.library V39.\n");
164	+	exit(1);
165	+	}
166	+	IntuitionBase = (struct IntuitionBase )OpenLibrary((UBYTE )"intuition.library", 39);
167	+	if (IntuitionBase == NULL) {
168	+	printf("Cannot open intuition.library V39.\n");
169	+	CloseLibrary(GfxBase);
170	+	exit(1);
171	+	}
172		DiskBase = (struct Library )OpenResource((UBYTE )"disk.resource");
173		if (DiskBase == NULL)
174		QuitEmulator();
175		GadToolsBase = OpenLibrary((UBYTE *)"gadtools.library", 39);
176		if (GadToolsBase == NULL) {
177	<	ErrorAlert(GetString(STR_NO_GADTOOLS_LIB_ERR));
177	>	ErrorAlert(STR_NO_GADTOOLS_LIB_ERR);
178	>	QuitEmulator();
179	>	}
180	>	IFFParseBase = OpenLibrary((UBYTE *)"iffparse.library", 39);
181	>	if (IFFParseBase == NULL) {
182	>	ErrorAlert(STR_NO_IFFPARSE_LIB_ERR);
183		QuitEmulator();
184		}
185		AslBase = OpenLibrary((UBYTE *)"asl.library", 36);
186		if (AslBase == NULL) {
187	<	ErrorAlert(GetString(STR_NO_ASL_LIB_ERR));
187	>	ErrorAlert(STR_NO_ASL_LIB_ERR);
188		QuitEmulator();
189		}
190	+
191	+	// These two can fail (the respective gfx support won't be available, then)
192		P96Base = OpenLibrary((UBYTE *)"Picasso96API.library", 2);
193	+	CyberGfxBase = OpenLibrary((UBYTE *)"cybergraphics.library", 2);
194	+
195	+	// Read preferences
196	+	PrefsInit(argc, argv);
197
198		// Open AHI
199		ahi_port = CreateMsgPort();
#	Line 182 \| Line 217 \| int main(void)
217
218		// Check start of Chip memory (because we need access to 0x0000..0x2000)
219		if ((uint32)FindName(&SysBase->MemList, (UBYTE *)"chip memory") < 0x2000) {
220	<	ErrorAlert(GetString(STR_NO_PREPARE_EMUL_ERR));
220	>	ErrorAlert(STR_NO_PREPARE_EMUL_ERR);
221		QuitEmulator();
222		}
223
224		// Open timer.device
225		timereq = (struct timerequest *)AllocVec(sizeof(timerequest), MEMF_PUBLIC \| MEMF_CLEAR);
226		if (timereq == NULL) {
227	<	ErrorAlert(GetString(STR_NO_MEM_ERR));
227	>	ErrorAlert(STR_NO_MEM_ERR);
228		QuitEmulator();
229		}
230		if (OpenDevice((UBYTE )TIMERNAME, UNIT_MICROHZ, (struct IORequest )timereq, 0)) {
231	<	ErrorAlert(GetString(STR_NO_TIMER_DEV_ERR));
231	>	ErrorAlert(STR_NO_TIMER_DEV_ERR);
232		QuitEmulator();
233		}
234		TimerBase = (struct Library *)timereq->tr_node.io_Device;
235
236		// Allocate scratch memory
237	<	ScratchMem = (uint32)AllocMem(SCRATCH_MEM_SIZE, MEMF_PUBLIC);
237	>	ScratchMem = (uint8 *)AllocMem(SCRATCH_MEM_SIZE, MEMF_PUBLIC);
238		if (ScratchMem == NULL) {
239	<	ErrorAlert(GetString(STR_NO_MEM_ERR));
239	>	ErrorAlert(STR_NO_MEM_ERR);
240		QuitEmulator();
241		}
242		ScratchMem += SCRATCH_MEM_SIZE/2; // ScratchMem points to middle of block
#	Line 213 \| Line 248 \| int main(void)
248		WarningAlert(GetString(STR_SMALL_RAM_WARN));
249		RAMSize = 1024*1024;
250		}
251	<	RAMBaseHost = (uint8 *)AllocMem(RAMSize + 0x100000, MEMF_PUBLIC);
251	>	RAMBaseHost = (uint8 *)AllocVec(RAMSize + 0x100000, MEMF_PUBLIC);
252		if (RAMBaseHost == NULL) {
253	<	ErrorAlert(GetString(STR_NO_MEM_ERR));
254	<	QuitEmulator();
253	>	uint32 newRAMSize = AvailMem(MEMF_LARGEST) - 0x100000;
254	>	char xText[120];
255	>
256	>	sprintf(xText, GetString(STR_NOT_ENOUGH_MEM_WARN), RAMSize, newRAMSize);
257	>
258	>	if (ChoiceAlert(xText, "Use", "Quit") != 1)
259	>	QuitEmulator();
260	>
261	>	RAMSize = newRAMSize;
262	>	RAMBaseHost = (uint8 *)AllocVec(RAMSize + 0x100000, MEMF_PUBLIC);
263	>	if (RAMBaseHost == NULL) {
264	>	ErrorAlert(STR_NO_MEM_ERR);
265	>	QuitEmulator();
266	>	}
267		}
268		RAMBaseMac = (uint32)RAMBaseHost;
269		D(bug("Mac RAM starts at %08lx\n", RAMBaseHost));
#	Line 228 \| Line 275 \| int main(void)
275		const char *rom_path = PrefsFindString("rom");
276
277		// Load Mac ROM
278	<	BPTR rom_fh = Open(rom_path ? (char *)rom_path : ROM_FILE_NAME, MODE_OLDFILE);
279	<	if (rom_fh == NULL) {
280	<	ErrorAlert(GetString(STR_NO_ROM_FILE_ERR));
278	>	BPTR rom_fh = Open(rom_path ? (char )rom_path : (char )ROM_FILE_NAME, MODE_OLDFILE);
279	>	if (rom_fh == 0) {
280	>	ErrorAlert(STR_NO_ROM_FILE_ERR);
281		QuitEmulator();
282		}
283		printf(GetString(STR_READING_ROM_FILE));
284		Seek(rom_fh, 0, OFFSET_END);
285		ROMSize = Seek(rom_fh, 0, OFFSET_CURRENT);
286		if (ROMSize != 5121024 && ROMSize != 10241024) {
287	<	ErrorAlert(GetString(STR_ROM_SIZE_ERR));
287	>	ErrorAlert(STR_ROM_SIZE_ERR);
288		Close(rom_fh);
289		QuitEmulator();
290		}
291		Seek(rom_fh, 0, OFFSET_BEGINNING);
292		if (Read(rom_fh, ROMBaseHost, ROMSize) != ROMSize) {
293	<	ErrorAlert(GetString(STR_ROM_FILE_READ_ERR));
293	>	ErrorAlert(STR_ROM_FILE_READ_ERR);
294		Close(rom_fh);
295		QuitEmulator();
296		}
297
251	–	// Check ROM version
252	–	if (!CheckROM()) {
253	–	ErrorAlert(GetString(STR_UNSUPPORTED_ROM_TYPE_ERR));
254	–	QuitEmulator();
255	–	}
256	–
298		// Set CPU and FPU type
299		UWORD attn = SysBase->AttnFlags;
300		CPUType = attn & AFF_68040 ? 4 : (attn & AFF_68030 ? 3 : 2);
301		CPUIs68060 = attn & AFF_68060;
302		FPUType = attn & AFF_68881 ? 1 : 0;
303
304	<	// Load XPRAM
305	<	XPRAMInit();
265	<
266	<	// Set boot volume
267	<	int16 i16 = PrefsFindInt16("bootdrive");
268	<	XPRAM[0x78] = i16 >> 8;
269	<	XPRAM[0x79] = i16 & 0xff;
270	<	i16 = PrefsFindInt16("bootdriver");
271	<	XPRAM[0x7a] = i16 >> 8;
272	<	XPRAM[0x7b] = i16 & 0xff;
273	<
274	<	// Init drivers
275	<	SonyInit();
276	<	DiskInit();
277	<	CDROMInit();
278	<	SCSIInit();
279	<
280	<	// Init network
281	<	EtherInit();
282	<
283	<	// Init serial ports
284	<	SerialInit();
285	<
286	<	// Init Time Manager
287	<	TimerInit();
288	<
289	<	// Init clipboard
290	<	ClipInit();
291	<
292	<	// Init audio
293	<	AudioInit();
294	<
295	<	// Init video
296	<	if (!VideoInit(ROMVersion == ROM_VERSION_64K \|\| ROMVersion == ROM_VERSION_PLUS \|\| ROMVersion == ROM_VERSION_CLASSIC))
304	>	// Initialize everything
305	>	if (!InitAll())
306		QuitEmulator();
307
299	–	// Install ROM patches
300	–	if (!PatchROM()) {
301	–	ErrorAlert(GetString(STR_UNSUPPORTED_ROM_TYPE_ERR));
302	–	QuitEmulator();
303	–	}
304	–
308		// Move VBR away from 0 if neccessary
309		MoveVBR();
310
311	+	// On 68060, disable Super Bypass mode because of a CPU bug that is triggered by MacOS 8
312	+	if (CPUIs68060)
313	+	DisableSuperBypass();
314	+
315		// Install trap handler
316		EmulatedSR = 0x2700;
317		OldTrapHandler = MainTask->tc_TrapCode;
#	Line 317 \| Line 324 \| int main(void)
324		MainTask->tc_ExceptCode = (APTR)ExceptionHandlerAsm;
325		SetExcept(SIGBREAKF_CTRL_C \| IRQSigMask, SIGBREAKF_CTRL_C \| IRQSigMask);
326
327	+	// Start XPRAM watchdog process
328	+	xpram_proc = CreateNewProcTags(
329	+	NP_Entry, (ULONG)xpram_func,
330	+	NP_Name, (ULONG)"Basilisk II XPRAM Watchdog",
331	+	NP_Priority, 0,
332	+	TAG_END
333	+	);
334	+
335		// Start 60Hz process
336		tick_proc = CreateNewProcTags(
337	<	NP_Entry, tick_func,
338	<	NP_Name, "Basilisk II 60Hz",
337	>	NP_Entry, (ULONG)tick_func,
338	>	NP_Name, (ULONG)"Basilisk II 60Hz",
339		NP_Priority, 5,
340		TAG_END
341		);
#	Line 328 \| Line 343 \| int main(void)
343		// Set task priority to -1 so we don't use all processing time
344		SetTaskPri(MainTask, -1);
345
346	+	WriteMacInt32(0xbff, 0); // MacsBugFlags
347	+
348		// Swap stack to Mac RAM area
349		stack_swap.stk_Lower = RAMBaseHost;
350		stack_swap.stk_Upper = (ULONG)RAMBaseHost + RAMSize;
#	Line 354 \| Line 371 \| void Start680x0(void)
371		* Quit emulator (__saveds because it might be called from an exception)
372		*/
373
374	<	void __saveds QuitEmulator(void)
374	>	// Assembly entry point
375	>	void __saveds quit_emulator(void)
376		{
377	+	QuitEmulator();
378	+	}
379	+
380	+	void QuitEmulator(void)
381	+	{
382	+	// Stop 60Hz process
383	+	if (tick_proc) {
384	+	SetSignal(0, SIGF_SINGLE);
385	+	tick_proc_active = false;
386	+	Wait(SIGF_SINGLE);
387	+	}
388	+
389	+	// Stop XPRAM watchdog process
390	+	if (xpram_proc) {
391	+	SetSignal(0, SIGF_SINGLE);
392	+	xpram_proc_active = false;
393	+	Wait(SIGF_SINGLE);
394	+	}
395	+
396		// Restore stack
397		if (stack_swapped) {
398		stack_swapped = false;
#	Line 369 \| Line 406 \| void __saveds QuitEmulator(void)
406		FreeSignal(IRQSig);
407		}
408
372	–	// Stop 60Hz thread
373	–	if (tick_proc) {
374	–	SetSignal(0, SIGF_SINGLE);
375	–	tick_proc_active = false;
376	–	Wait(SIGF_SINGLE);
377	–	}
378	–
409		// Remove trap handler
410		MainTask->tc_TrapCode = OldTrapHandler;
411
412	<	// Save XPRAM
413	<	XPRAMExit();
384	<
385	<	// Exit video
386	<	VideoExit();
387	<
388	<	// Exit audio
389	<	AudioExit();
390	<
391	<	// Exit clipboard
392	<	ClipExit();
393	<
394	<	// Exit Time Manager
395	<	TimerExit();
396	<
397	<	// Exit serial ports
398	<	SerialExit();
399	<
400	<	// Exit network
401	<	EtherExit();
402	<
403	<	// Exit drivers
404	<	SCSIExit();
405	<	CDROMExit();
406	<	DiskExit();
407	<	SonyExit();
412	>	// Deinitialize everything
413	>	ExitAll();
414
415		// Delete RAM/ROM area
416		if (RAMBaseHost)
417	<	FreeMem(RAMBaseHost, RAMSize + 0x100000);
417	>	FreeVec(RAMBaseHost);
418
419		// Delete scratch memory area
420		if (ScratchMem)
#	Line 435 \| Line 441 \| void __saveds QuitEmulator(void)
441		PrefsExit();
442
443		// Close libraries
444	+	if (CyberGfxBase)
445	+	CloseLibrary(CyberGfxBase);
446		if (P96Base)
447		CloseLibrary(P96Base);
448		if (AslBase)
449		CloseLibrary(AslBase);
450	+	if (IFFParseBase)
451	+	CloseLibrary(IFFParseBase);
452		if (GadToolsBase)
453		CloseLibrary(GadToolsBase);
454	+	if (IntuitionBase)
455	+	CloseLibrary((struct Library *)IntuitionBase);
456	+	if (GfxBase)
457	+	CloseLibrary(GfxBase);
458
459		exit(0);
460		}
#	Line 458 \| Line 472 \| *void FlushCodeCache(void start, uint32**
472
473
474		/*
475	+	* Mutexes
476	+	*/
477	+
478	+	struct B2_mutex {
479	+	int dummy; //!!
480	+	};
481	+
482	+	B2_mutex *B2_create_mutex(void)
483	+	{
484	+	return new B2_mutex;
485	+	}
486	+
487	+	void B2_lock_mutex(B2_mutex *mutex)
488	+	{
489	+	}
490	+
491	+	void B2_unlock_mutex(B2_mutex *mutex)
492	+	{
493	+	}
494	+
495	+	void B2_delete_mutex(B2_mutex *mutex)
496	+	{
497	+	delete mutex;
498	+	}
499	+
500	+
501	+	/*
502		* Interrupt flags (must be handled atomically!)
503		*/
504
#	Line 478 \| Line 519 \| void TriggerInterrupt(void)
519		Signal(MainTask, IRQSigMask);
520		}
521
522	+	void TriggerNMI(void)
523	+	{
524	+	AsmTriggerNMI();
525	+	}
526	+
527
528		/*
529	<	* 60Hz thread
529	>	* 60Hz thread (really 60.15Hz)
530		*/
531
532		static __saveds void tick_func(void)
#	Line 520 \| Line 566 \| static __saveds void tick_func(void)
566		if (++tick_counter > 60) {
567		tick_counter = 0;
568		WriteMacInt32(0x20c, TimerDateTime());
569	+	SetInterruptFlag(INTFLAG_1HZ);
570	+	TriggerInterrupt();
571		}
572
573		// Trigger 60Hz interrupt
#	Line 545 \| Line 593 \| static __saveds void tick_func(void)
593
594
595		/*
596	+	* XPRAM watchdog thread (saves XPRAM every minute)
597	+	*/
598	+
599	+	static __saveds void xpram_func(void)
600	+	{
601	+	uint8 last_xpram[256];
602	+	memcpy(last_xpram, XPRAM, 256);
603	+
604	+	while (xpram_proc_active) {
605	+	for (int i=0; i<60 && xpram_proc_active; i++)
606	+	Delay(50); // Only wait 1 second so we quit promptly when xpram_proc_active becomes false
607	+	if (memcmp(last_xpram, XPRAM, 256)) {
608	+	memcpy(last_xpram, XPRAM, 256);
609	+	SaveXPRAM();
610	+	}
611	+	}
612	+
613	+	// Main task asked for termination, send signal
614	+	Forbid();
615	+	Signal(MainTask, SIGF_SINGLE);
616	+	}
617	+
618	+
619	+	/*
620		* Display error alert
621		*/
622
#	Line 560 \| Line 632 \| *void ErrorAlert(const char text)**
632		req.es_Title = (UBYTE *)GetString(STR_ERROR_ALERT_TITLE);
633		req.es_TextFormat = (UBYTE *)GetString(STR_GUI_ERROR_PREFIX);
634		req.es_GadgetFormat = (UBYTE *)GetString(STR_QUIT_BUTTON);
635	<	EasyRequest(NULL, &req, NULL, text);
635	>	EasyRequest(NULL, &req, NULL, (ULONG)text);
636		}
637
638
#	Line 580 \| Line 652 \| *void WarningAlert(const char text)**
652		req.es_Title = (UBYTE *)GetString(STR_WARNING_ALERT_TITLE);
653		req.es_TextFormat = (UBYTE *)GetString(STR_GUI_WARNING_PREFIX);
654		req.es_GadgetFormat = (UBYTE *)GetString(STR_OK_BUTTON);
655	<	EasyRequest(NULL, &req, NULL, text);
655	>	EasyRequest(NULL, &req, NULL, (ULONG)text);
656		}
657
658
#	Line 598 \| Line 670 \| *bool ChoiceAlert(const char text, const**
670		req.es_Title = (UBYTE *)GetString(STR_WARNING_ALERT_TITLE);
671		req.es_TextFormat = (UBYTE *)GetString(STR_GUI_WARNING_PREFIX);
672		req.es_GadgetFormat = (UBYTE *)str;
673	<	return EasyRequest(NULL, &req, NULL, text);
673	>	return EasyRequest(NULL, &req, NULL, (ULONG)text);
674		}
675
676
#	Line 633 \| Line 705 \| void __saveds IllInstrHandler(trap_regs
705		EmulatedSR \|= 0x0700;
706
707		// Call opcode routine
708	<	EmulOp((uint16 )(r->pc), (M68kRegisters *)r);
708	>	EmulOp(opcode, (M68kRegisters *)r);
709		r->pc += 2;
710
711		// Restore interrupts

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing BasiliskII/src/AmigaOS/main_amiga.cpp (file contents): Revision 1.1 by cebix, 1999-10-03T14:16:25Z vs. Revision 1.18 by cebix, 2001-07-03T15:59:45Z

Diff Legend

Comparing BasiliskII/src/AmigaOS/main_amiga.cpp (file contents):
Revision 1.1 by cebix, 1999-10-03T14:16:25Z vs.
Revision 1.18 by cebix, 2001-07-03T15:59:45Z