--- BasiliskII/src/AmigaOS/main_amiga.cpp	2000/07/14 21:29:10	1.7
+++ BasiliskII/src/AmigaOS/main_amiga.cpp	2002/01/15 14:58:34	1.21
@@ -1,7 +1,7 @@
 /*
  *  main_amiga.cpp - Startup code for AmigaOS
  *
- *  Basilisk II (C) 1997-2000 Christian Bauer
+ *  Basilisk II (C) 1997-2002 Christian Bauer
  *
  *  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
@@ -97,7 +97,7 @@ struct Library *AHIBase = NULL;
 struct Library *DiskBase = NULL;
 
 struct Task *MainTask;							// Our task
-uint32 ScratchMem = NULL;						// Scratch memory for Mac ROM writes
+uint8 *ScratchMem = NULL;						// Scratch memory for Mac ROM writes
 APTR OldTrapHandler = NULL;						// Old trap handler
 APTR OldExceptionHandler = NULL;				// Old exception handler
 BYTE IRQSig = -1;								// "Interrupt" signal number
@@ -108,6 +108,9 @@ static struct timerequest *timereq = NUL
 static struct MsgPort *ahi_port = NULL;			// Port for AHI
 static struct AHIRequest *ahi_io = NULL;		// IORequest for AHI
 
+static struct Process *xpram_proc = NULL;		// XPRAM watchdog
+static volatile bool xpram_proc_active = true;	// Flag for quitting the XPRAM watchdog
+
 static struct Process *tick_proc = NULL;		// 60Hz process
 static volatile bool tick_proc_active = true;	// Flag for quitting the 60Hz process
 
@@ -120,16 +123,19 @@ struct trap_regs;
 extern "C" void AtomicAnd(uint32 *p, uint32 val);
 extern "C" void AtomicOr(uint32 *p, uint32 val);
 extern "C" void MoveVBR(void);
+extern "C" void DisableSuperBypass(void);
 extern "C" void TrapHandlerAsm(void);
 extern "C" void ExceptionHandlerAsm(void);
 extern "C" void IllInstrHandler(trap_regs *regs);
 extern "C" void PrivViolHandler(trap_regs *regs);
 extern "C" void quit_emulator(void);
+extern "C" void AsmTriggerNMI(void);
 uint16 EmulatedSR;					// Emulated SR (supervisor bit and interrupt mask)
 
 
 // Prototypes
 static void jump_to_rom(void);
+static void xpram_func(void);
 static void tick_func(void);
 
 
@@ -137,7 +143,7 @@ static void tick_func(void);
  *  Main program
  */
 
-int main(void)
+int main(int argc, char **argv)
 {
 	// Initialize variables
 	RAMBaseHost = NULL;
@@ -168,26 +174,32 @@ int main(void)
 		QuitEmulator();
 	GadToolsBase = OpenLibrary((UBYTE *)"gadtools.library", 39);
 	if (GadToolsBase == NULL) {
-		ErrorAlert(GetString(STR_NO_GADTOOLS_LIB_ERR));
+		ErrorAlert(STR_NO_GADTOOLS_LIB_ERR);
 		QuitEmulator();
 	}
 	IFFParseBase = OpenLibrary((UBYTE *)"iffparse.library", 39);
 	if (IFFParseBase == NULL) {
-		ErrorAlert(GetString(STR_NO_IFFPARSE_LIB_ERR));
+		ErrorAlert(STR_NO_IFFPARSE_LIB_ERR);
 		QuitEmulator();
 	}
 	AslBase = OpenLibrary((UBYTE *)"asl.library", 36);
 	if (AslBase == NULL) {
-		ErrorAlert(GetString(STR_NO_ASL_LIB_ERR));
+		ErrorAlert(STR_NO_ASL_LIB_ERR);
 		QuitEmulator();
 	}
 
+	if (FindTask((UBYTE *) "« Enforcer »"))
+		{
+		ErrorAlert(STR_ENFORCER_RUNNING_ERR);
+		QuitEmulator();
+		}
+
 	// These two can fail (the respective gfx support won't be available, then)
 	P96Base = OpenLibrary((UBYTE *)"Picasso96API.library", 2);
 	CyberGfxBase = OpenLibrary((UBYTE *)"cybergraphics.library", 2);
 
 	// Read preferences
-	PrefsInit();
+	PrefsInit(argc, argv);
 
 	// Open AHI
 	ahi_port = CreateMsgPort();
@@ -211,26 +223,26 @@ int main(void)
 
 	// Check start of Chip memory (because we need access to 0x0000..0x2000)
 	if ((uint32)FindName(&SysBase->MemList, (UBYTE *)"chip memory") < 0x2000) {
-		ErrorAlert(GetString(STR_NO_PREPARE_EMUL_ERR));
+		ErrorAlert(STR_NO_PREPARE_EMUL_ERR);
 		QuitEmulator();
 	}
 
 	// Open timer.device
 	timereq = (struct timerequest *)AllocVec(sizeof(timerequest), MEMF_PUBLIC | MEMF_CLEAR);
 	if (timereq == NULL) {
-		ErrorAlert(GetString(STR_NO_MEM_ERR));
+		ErrorAlert(STR_NO_MEM_ERR);
 		QuitEmulator();
 	}
 	if (OpenDevice((UBYTE *)TIMERNAME, UNIT_MICROHZ, (struct IORequest *)timereq, 0)) {
-		ErrorAlert(GetString(STR_NO_TIMER_DEV_ERR));
+		ErrorAlert(STR_NO_TIMER_DEV_ERR);
 		QuitEmulator();
 	}
 	TimerBase = (struct Library *)timereq->tr_node.io_Device;
 
 	// Allocate scratch memory
-	ScratchMem = (uint32)AllocMem(SCRATCH_MEM_SIZE, MEMF_PUBLIC);
+	ScratchMem = (uint8 *)AllocMem(SCRATCH_MEM_SIZE, MEMF_PUBLIC);
 	if (ScratchMem == NULL) {
-		ErrorAlert(GetString(STR_NO_MEM_ERR));
+		ErrorAlert(STR_NO_MEM_ERR);
 		QuitEmulator();
 	}
 	ScratchMem += SCRATCH_MEM_SIZE/2;	// ScratchMem points to middle of block
@@ -242,10 +254,22 @@ int main(void)
 		WarningAlert(GetString(STR_SMALL_RAM_WARN));
 		RAMSize = 1024*1024;
 	}
-	RAMBaseHost = (uint8 *)AllocMem(RAMSize + 0x100000, MEMF_PUBLIC);
+	RAMBaseHost = (uint8 *)AllocVec(RAMSize + 0x100000, MEMF_PUBLIC);
 	if (RAMBaseHost == NULL) {
-		ErrorAlert(GetString(STR_NO_MEM_ERR));
-		QuitEmulator();
+		uint32 newRAMSize = AvailMem(MEMF_LARGEST) - 0x100000;
+		char xText[120];
+
+		sprintf(xText, GetString(STR_NOT_ENOUGH_MEM_WARN), RAMSize, newRAMSize);
+
+		if (ChoiceAlert(xText, "Use", "Quit") != 1)
+			QuitEmulator();
+
+		RAMSize = newRAMSize;
+		RAMBaseHost = (uint8 *)AllocVec(RAMSize + 0x100000, MEMF_PUBLIC);
+		if (RAMBaseHost == NULL) {
+			ErrorAlert(STR_NO_MEM_ERR);
+			QuitEmulator();
+		}
 	}
 	RAMBaseMac = (uint32)RAMBaseHost;
 	D(bug("Mac RAM starts at %08lx\n", RAMBaseHost));
@@ -258,21 +282,21 @@ int main(void)
 
 	// Load Mac ROM
 	BPTR rom_fh = Open(rom_path ? (char *)rom_path : (char *)ROM_FILE_NAME, MODE_OLDFILE);
-	if (rom_fh == NULL) {
-		ErrorAlert(GetString(STR_NO_ROM_FILE_ERR));
+	if (rom_fh == 0) {
+		ErrorAlert(STR_NO_ROM_FILE_ERR);
 		QuitEmulator();
 	}
 	printf(GetString(STR_READING_ROM_FILE));
 	Seek(rom_fh, 0, OFFSET_END);
 	ROMSize = Seek(rom_fh, 0, OFFSET_CURRENT);
 	if (ROMSize != 512*1024 && ROMSize != 1024*1024) {
-		ErrorAlert(GetString(STR_ROM_SIZE_ERR));
+		ErrorAlert(STR_ROM_SIZE_ERR);
 		Close(rom_fh);
 		QuitEmulator();
 	}
 	Seek(rom_fh, 0, OFFSET_BEGINNING);
 	if (Read(rom_fh, ROMBaseHost, ROMSize) != ROMSize) {
-		ErrorAlert(GetString(STR_ROM_FILE_READ_ERR));
+		ErrorAlert(STR_ROM_FILE_READ_ERR);
 		Close(rom_fh);
 		QuitEmulator();
 	}
@@ -290,6 +314,10 @@ int main(void)
 	// Move VBR away from 0 if neccessary
 	MoveVBR();
 
+	// On 68060, disable Super Bypass mode because of a CPU bug that is triggered by MacOS 8
+	if (CPUIs68060)
+		DisableSuperBypass();
+
 	// Install trap handler
 	EmulatedSR = 0x2700;
 	OldTrapHandler = MainTask->tc_TrapCode;
@@ -302,6 +330,14 @@ int main(void)
 	MainTask->tc_ExceptCode = (APTR)ExceptionHandlerAsm;
 	SetExcept(SIGBREAKF_CTRL_C | IRQSigMask, SIGBREAKF_CTRL_C | IRQSigMask);
 
+	// Start XPRAM watchdog process
+	xpram_proc = CreateNewProcTags(
+		NP_Entry, (ULONG)xpram_func,
+		NP_Name, (ULONG)"Basilisk II XPRAM Watchdog",
+		NP_Priority, 0,
+		TAG_END
+	);
+
 	// Start 60Hz process
 	tick_proc = CreateNewProcTags(
 		NP_Entry, (ULONG)tick_func,
@@ -313,6 +349,8 @@ int main(void)
 	// Set task priority to -1 so we don't use all processing time
 	SetTaskPri(MainTask, -1);
 
+	WriteMacInt32(0xbff, 0);	// MacsBugFlags
+
 	// Swap stack to Mac RAM area
 	stack_swap.stk_Lower = RAMBaseHost;
 	stack_swap.stk_Upper = (ULONG)RAMBaseHost + RAMSize;
@@ -347,13 +385,20 @@ void __saveds quit_emulator(void)
 
 void QuitEmulator(void)
 {
-	// Stop 60Hz thread
+	// Stop 60Hz process
 	if (tick_proc) {
 		SetSignal(0, SIGF_SINGLE);
 		tick_proc_active = false;
 		Wait(SIGF_SINGLE);
 	}
 
+	// Stop XPRAM watchdog process
+	if (xpram_proc) {
+		SetSignal(0, SIGF_SINGLE);
+		xpram_proc_active = false;
+		Wait(SIGF_SINGLE);
+	}
+
 	// Restore stack
 	if (stack_swapped) {
 		stack_swapped = false;
@@ -375,7 +420,7 @@ void QuitEmulator(void)
 
 	// Delete RAM/ROM area
 	if (RAMBaseHost)
-		FreeMem(RAMBaseHost, RAMSize + 0x100000);
+		FreeVec(RAMBaseHost);
 
 	// Delete scratch memory area
 	if (ScratchMem)
@@ -433,6 +478,33 @@ void FlushCodeCache(void *start, uint32
 
 
 /*
+ *  Mutexes
+ */
+
+struct B2_mutex {
+	int dummy;	//!!
+};
+
+B2_mutex *B2_create_mutex(void)
+{
+	return new B2_mutex;
+}
+
+void B2_lock_mutex(B2_mutex *mutex)
+{
+}
+
+void B2_unlock_mutex(B2_mutex *mutex)
+{
+}
+
+void B2_delete_mutex(B2_mutex *mutex)
+{
+	delete mutex;
+}
+
+
+/*
  *  Interrupt flags (must be handled atomically!)
  */
 
@@ -453,9 +525,14 @@ void TriggerInterrupt(void)
 	Signal(MainTask, IRQSigMask);
 }
 
+void TriggerNMI(void)
+{
+	AsmTriggerNMI();
+}
+
 
 /*
- *  60Hz thread
+ *  60Hz thread (really 60.15Hz)
  */
 
 static __saveds void tick_func(void)
@@ -522,6 +599,30 @@ static __saveds void tick_func(void)
 
 
 /*
+ *  XPRAM watchdog thread (saves XPRAM every minute)
+ */
+
+static __saveds void xpram_func(void)
+{
+	uint8 last_xpram[XPRAM_SIZE];
+	memcpy(last_xpram, XPRAM, XPRAM_SIZE);
+
+	while (xpram_proc_active) {
+		for (int i=0; i<60 && xpram_proc_active; i++)
+			Delay(50);		// Only wait 1 second so we quit promptly when xpram_proc_active becomes false
+		if (memcmp(last_xpram, XPRAM, XPRAM_SIZE)) {
+			memcpy(last_xpram, XPRAM, XPRAM_SIZE);
+			SaveXPRAM();
+		}
+	}
+
+	// Main task asked for termination, send signal
+	Forbid();
+	Signal(MainTask, SIGF_SINGLE);
+}
+
+
+/*
  *  Display error alert
  */
 
@@ -610,7 +711,7 @@ void __saveds IllInstrHandler(trap_regs
 		EmulatedSR |= 0x0700;
 
 		// Call opcode routine
-		EmulOp(*(uint16 *)(r->pc), (M68kRegisters *)r);
+		EmulOp(opcode, (M68kRegisters *)r);
 		r->pc += 2;
 
 		// Restore interrupts