ViewVC Help
View File | Revision Log | Show Annotations | Revision Graph | Root Listing
root/cebix/BasiliskII/src/AmigaOS/main_amiga.cpp
(Generate patch)

Comparing BasiliskII/src/AmigaOS/main_amiga.cpp (file contents):
Revision 1.1 by cebix, 1999-10-03T14:16:25Z vs.
Revision 1.19 by cebix, 2001-10-07T19:50:19Z

# 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 != 512*1024 && ROMSize != 1024*1024) {
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[XPRAM_SIZE];
602 +        memcpy(last_xpram, XPRAM, XPRAM_SIZE);
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, XPRAM_SIZE)) {
608 +                        memcpy(last_xpram, XPRAM, XPRAM_SIZE);
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