BasiliskII/src/main.cpp

/*
 *  main.cpp - Startup/shutdown code
 *
 *  Basilisk II (C) 1997-2008 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
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program; if not, write to the Free Software
 *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

#include "sysdeps.h"

#include "cpu_emulation.h"
#include "xpram.h"
#include "timer.h"
#include "sony.h"
#include "disk.h"
#include "cdrom.h"
#include "scsi.h"
#include "extfs.h"
#include "audio.h"
#include "video.h"
#include "serial.h"
#include "ether.h"
#include "clip.h"
#include "adb.h"
#include "rom_patches.h"
#include "user_strings.h"
#include "prefs.h"
#include "main.h"

#define DEBUG 0
#include "debug.h"

#if ENABLE_MON
#include "mon.h"

static uint32 mon_read_byte_b2(uintptr adr)
{
        return ReadMacInt8(adr);
}

static void mon_write_byte_b2(uintptr adr, uint32 b)
{
        WriteMacInt8(adr, b);
}
#endif


/*
 *  Initialize everything, returns false on error
 */

bool InitAll(const char *vmdir)
{
        // Check ROM version
        if (!CheckROM()) {
                ErrorAlert(STR_UNSUPPORTED_ROM_TYPE_ERR);
                return false;
        }

#if EMULATED_68K
        // Set CPU and FPU type (UAE emulation)
        switch (ROMVersion) {
                case ROM_VERSION_64K:
                case ROM_VERSION_PLUS:
                case ROM_VERSION_CLASSIC:
                        CPUType = 0;
                        FPUType = 0;
                        TwentyFourBitAddressing = true;
                        break;
                case ROM_VERSION_II:
                        CPUType = PrefsFindInt32("cpu");
                        if (CPUType < 2) CPUType = 2;
                        if (CPUType > 4) CPUType = 4;
                        FPUType = PrefsFindBool("fpu") ? 1 : 0;
                        if (CPUType == 4) FPUType = 1;  // 68040 always with FPU
                        TwentyFourBitAddressing = true;
                        break;
                case ROM_VERSION_32:
                        CPUType = PrefsFindInt32("cpu");
                        if (CPUType < 2) CPUType = 2;
                        if (CPUType > 4) CPUType = 4;
                        FPUType = PrefsFindBool("fpu") ? 1 : 0;
                        if (CPUType == 4) FPUType = 1;  // 68040 always with FPU
                        TwentyFourBitAddressing = false;
                        break;
        }
        CPUIs68060 = false;
#endif

        // Load XPRAM
        XPRAMInit(vmdir);

        // Load XPRAM default values if signature not found
        if (XPRAM[0x0c] != 0x4e || XPRAM[0x0d] != 0x75
         || XPRAM[0x0e] != 0x4d || XPRAM[0x0f] != 0x63) {
                D(bug("Loading XPRAM default values\n"));
                memset(XPRAM, 0, 0x100);
                XPRAM[0x0c] = 0x4e;     // "NuMc" signature
                XPRAM[0x0d] = 0x75;
                XPRAM[0x0e] = 0x4d;
                XPRAM[0x0f] = 0x63;
                XPRAM[0x01] = 0x80;     // InternalWaitFlags = DynWait (don't wait for SCSI devices upon bootup)
                XPRAM[0x10] = 0xa8;     // Standard PRAM values
                XPRAM[0x11] = 0x00;
                XPRAM[0x12] = 0x00;
                XPRAM[0x13] = 0x22;
                XPRAM[0x14] = 0xcc;
                XPRAM[0x15] = 0x0a;
                XPRAM[0x16] = 0xcc;
                XPRAM[0x17] = 0x0a;
                XPRAM[0x1c] = 0x00;
                XPRAM[0x1d] = 0x02;
                XPRAM[0x1e] = 0x63;
                XPRAM[0x1f] = 0x00;
                XPRAM[0x08] = 0x13;
                XPRAM[0x09] = 0x88;
                XPRAM[0x0a] = 0x00;
                XPRAM[0x0b] = 0xcc;
                XPRAM[0x76] = 0x00;     // OSDefault = MacOS
                XPRAM[0x77] = 0x01;
        }

        // Set boot volume
        int16 i16 = PrefsFindInt32("bootdrive");
        XPRAM[0x78] = i16 >> 8;
        XPRAM[0x79] = i16 & 0xff;
        i16 = PrefsFindInt32("bootdriver");
        XPRAM[0x7a] = i16 >> 8;
        XPRAM[0x7b] = i16 & 0xff;

        // Init drivers
        SonyInit();
        DiskInit();
        CDROMInit();
        SCSIInit();

#if SUPPORTS_EXTFS
        // Init external file system
        ExtFSInit();
#endif

        // Init serial ports
        SerialInit();

        // Init network
        EtherInit();

        // Init Time Manager
        TimerInit();

        // Init clipboard
        ClipInit();

        // Init ADB
        ADBInit();

        // Init audio
        AudioInit();

        // Init video
        if (!VideoInit(ROMVersion == ROM_VERSION_64K || ROMVersion == ROM_VERSION_PLUS || ROMVersion == ROM_VERSION_CLASSIC))
                return false;

        // Set default video mode in XPRAM
        XPRAM[0x56] = 0x42;     // 'B'
        XPRAM[0x57] = 0x32;     // '2'
        const monitor_desc &main_monitor = *VideoMonitors[0];
        XPRAM[0x58] = main_monitor.depth_to_apple_mode(main_monitor.get_current_mode().depth);
        XPRAM[0x59] = 0;

#if EMULATED_68K
        // Init 680x0 emulation (this also activates the memory system which is needed for PatchROM())
        if (!Init680x0())
                return false;
#endif

        // Install ROM patches
        if (!PatchROM()) {
                ErrorAlert(STR_UNSUPPORTED_ROM_TYPE_ERR);
                return false;
        }

#if ENABLE_MON
        // Initialize mon
        mon_init();
        mon_read_byte = mon_read_byte_b2;
        mon_write_byte = mon_write_byte_b2;
#endif

        return true;
}


/*
 *  Deinitialize everything
 */

void ExitAll(void)
{
#if ENABLE_MON
        // Deinitialize mon
        mon_exit();
#endif

        // Save XPRAM
        XPRAMExit();

        // Exit video
        VideoExit();

        // Exit audio
        AudioExit();

        // Exit ADB
        ADBExit();

        // Exit clipboard
        ClipExit();

        // Exit Time Manager
        TimerExit();

        // Exit serial ports
        SerialExit();

        // Exit network
        EtherExit();

#if SUPPORTS_EXTFS
        // Exit external file system
        ExtFSExit();
#endif

        // Exit drivers
        SCSIExit();
        CDROMExit();
        DiskExit();
        SonyExit();
}


/*
 *  Display error/warning alert given the message string ID
 */

void ErrorAlert(int string_id)
{
        ErrorAlert(GetString(string_id));
}

void WarningAlert(int string_id)
{
        WarningAlert(GetString(string_id));
}
Revision:	1.18
Committed:	2009-07-23T19:19:14Z (15 years, 3 months ago) by asvitkine
Branch:	MAIN
CVS Tags:	HEAD
Changes since 1.17:	+2 -2 lines
Log Message:	BasiliskII side of changes to support .sheepvm bundles for SheepShaver
#	User	Rev	Content
1	cebix	1.1	/*
2			* main.cpp - Startup/shutdown code
3			*
4	gbeauche	1.17	* Basilisk II (C) 1997-2008 Christian Bauer
5	cebix	1.1	*
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
8			* the Free Software Foundation; either version 2 of the License, or
9			* (at your option) any later version.
10			*
11			* This program is distributed in the hope that it will be useful,
12			* but WITHOUT ANY WARRANTY; without even the implied warranty of
13			* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14			* GNU General Public License for more details.
15			*
16			* You should have received a copy of the GNU General Public License
17			* along with this program; if not, write to the Free Software
18			* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19			*/
20
21			#include "sysdeps.h"
22
23			#include "cpu_emulation.h"
24			#include "xpram.h"
25			#include "timer.h"
26			#include "sony.h"
27			#include "disk.h"
28			#include "cdrom.h"
29			#include "scsi.h"
30			#include "extfs.h"
31			#include "audio.h"
32			#include "video.h"
33			#include "serial.h"
34			#include "ether.h"
35			#include "clip.h"
36	cebix	1.10	#include "adb.h"
37	cebix	1.1	#include "rom_patches.h"
38			#include "user_strings.h"
39			#include "prefs.h"
40			#include "main.h"
41
42			#define DEBUG 0
43			#include "debug.h"
44
45	cebix	1.3	#if ENABLE_MON
46			#include "mon.h"
47
48	gbeauche	1.14	static uint32 mon_read_byte_b2(uintptr adr)
49	cebix	1.3	{
50			return ReadMacInt8(adr);
51			}
52
53	gbeauche	1.14	static void mon_write_byte_b2(uintptr adr, uint32 b)
54	cebix	1.3	{
55			WriteMacInt8(adr, b);
56			}
57			#endif
58
59	cebix	1.1
60			/*
61			* Initialize everything, returns false on error
62			*/
63
64	asvitkine	1.18	bool InitAll(const char *vmdir)
65	cebix	1.1	{
66			// Check ROM version
67			if (!CheckROM()) {
68	cebix	1.9	ErrorAlert(STR_UNSUPPORTED_ROM_TYPE_ERR);
69	cebix	1.1	return false;
70			}
71
72			#if EMULATED_68K
73			// Set CPU and FPU type (UAE emulation)
74			switch (ROMVersion) {
75			case ROM_VERSION_64K:
76			case ROM_VERSION_PLUS:
77			case ROM_VERSION_CLASSIC:
78			CPUType = 0;
79			FPUType = 0;
80			TwentyFourBitAddressing = true;
81			break;
82			case ROM_VERSION_II:
83	cebix	1.4	CPUType = PrefsFindInt32("cpu");
84			if (CPUType < 2) CPUType = 2;
85			if (CPUType > 4) CPUType = 4;
86	cebix	1.1	FPUType = PrefsFindBool("fpu") ? 1 : 0;
87	cebix	1.4	if (CPUType == 4) FPUType = 1; // 68040 always with FPU
88	cebix	1.1	TwentyFourBitAddressing = true;
89			break;
90			case ROM_VERSION_32:
91	cebix	1.4	CPUType = PrefsFindInt32("cpu");
92			if (CPUType < 2) CPUType = 2;
93			if (CPUType > 4) CPUType = 4;
94	cebix	1.1	FPUType = PrefsFindBool("fpu") ? 1 : 0;
95	cebix	1.4	if (CPUType == 4) FPUType = 1; // 68040 always with FPU
96	cebix	1.1	TwentyFourBitAddressing = false;
97			break;
98			}
99			CPUIs68060 = false;
100			#endif
101
102			// Load XPRAM
103	asvitkine	1.18	XPRAMInit(vmdir);
104	cebix	1.1
105	cebix	1.12	// Load XPRAM default values if signature not found
106			if (XPRAM[0x0c] != 0x4e \|\| XPRAM[0x0d] != 0x75
107			\|\| XPRAM[0x0e] != 0x4d \|\| XPRAM[0x0f] != 0x63) {
108			D(bug("Loading XPRAM default values\n"));
109			memset(XPRAM, 0, 0x100);
110			XPRAM[0x0c] = 0x4e; // "NuMc" signature
111			XPRAM[0x0d] = 0x75;
112			XPRAM[0x0e] = 0x4d;
113			XPRAM[0x0f] = 0x63;
114			XPRAM[0x01] = 0x80; // InternalWaitFlags = DynWait (don't wait for SCSI devices upon bootup)
115			XPRAM[0x10] = 0xa8; // Standard PRAM values
116			XPRAM[0x11] = 0x00;
117			XPRAM[0x12] = 0x00;
118			XPRAM[0x13] = 0x22;
119			XPRAM[0x14] = 0xcc;
120			XPRAM[0x15] = 0x0a;
121			XPRAM[0x16] = 0xcc;
122			XPRAM[0x17] = 0x0a;
123			XPRAM[0x1c] = 0x00;
124			XPRAM[0x1d] = 0x02;
125			XPRAM[0x1e] = 0x63;
126			XPRAM[0x1f] = 0x00;
127			XPRAM[0x08] = 0x13;
128			XPRAM[0x09] = 0x88;
129			XPRAM[0x0a] = 0x00;
130			XPRAM[0x0b] = 0xcc;
131			XPRAM[0x76] = 0x00; // OSDefault = MacOS
132			XPRAM[0x77] = 0x01;
133			}
134
135	cebix	1.1	// Set boot volume
136	cebix	1.6	int16 i16 = PrefsFindInt32("bootdrive");
137	cebix	1.1	XPRAM[0x78] = i16 >> 8;
138			XPRAM[0x79] = i16 & 0xff;
139	cebix	1.6	i16 = PrefsFindInt32("bootdriver");
140	cebix	1.1	XPRAM[0x7a] = i16 >> 8;
141			XPRAM[0x7b] = i16 & 0xff;
142
143			// Init drivers
144			SonyInit();
145			DiskInit();
146			CDROMInit();
147			SCSIInit();
148
149	cebix	1.2	#if SUPPORTS_EXTFS
150	cebix	1.1	// Init external file system
151			ExtFSInit();
152	cebix	1.2	#endif
153	cebix	1.1
154			// Init serial ports
155			SerialInit();
156
157			// Init network
158			EtherInit();
159
160			// Init Time Manager
161			TimerInit();
162
163			// Init clipboard
164			ClipInit();
165
166	cebix	1.10	// Init ADB
167			ADBInit();
168
169	cebix	1.1	// Init audio
170			AudioInit();
171
172			// Init video
173			if (!VideoInit(ROMVersion == ROM_VERSION_64K \|\| ROMVersion == ROM_VERSION_PLUS \|\| ROMVersion == ROM_VERSION_CLASSIC))
174			return false;
175
176	cebix	1.12	// Set default video mode in XPRAM
177	cebix	1.8	XPRAM[0x56] = 0x42; // 'B'
178			XPRAM[0x57] = 0x32; // '2'
179	cebix	1.13	const monitor_desc &main_monitor = *VideoMonitors[0];
180			XPRAM[0x58] = main_monitor.depth_to_apple_mode(main_monitor.get_current_mode().depth);
181	cebix	1.8	XPRAM[0x59] = 0;
182
183	cebix	1.1	#if EMULATED_68K
184			// Init 680x0 emulation (this also activates the memory system which is needed for PatchROM())
185			if (!Init680x0())
186			return false;
187			#endif
188
189			// Install ROM patches
190			if (!PatchROM()) {
191	cebix	1.9	ErrorAlert(STR_UNSUPPORTED_ROM_TYPE_ERR);
192	cebix	1.1	return false;
193			}
194	cebix	1.3
195			#if ENABLE_MON
196			// Initialize mon
197			mon_init();
198			mon_read_byte = mon_read_byte_b2;
199			mon_write_byte = mon_write_byte_b2;
200			#endif
201
202	cebix	1.1	return true;
203			}
204
205
206			/*
207			* Deinitialize everything
208			*/
209
210			void ExitAll(void)
211			{
212	cebix	1.3	#if ENABLE_MON
213			// Deinitialize mon
214			mon_exit();
215			#endif
216
217	cebix	1.1	// Save XPRAM
218			XPRAMExit();
219
220			// Exit video
221			VideoExit();
222
223			// Exit audio
224			AudioExit();
225	cebix	1.10
226			// Exit ADB
227			ADBExit();
228	cebix	1.1
229			// Exit clipboard
230			ClipExit();
231
232			// Exit Time Manager
233			TimerExit();
234
235			// Exit serial ports
236			SerialExit();
237
238			// Exit network
239			EtherExit();
240
241	cebix	1.2	#if SUPPORTS_EXTFS
242	cebix	1.1	// Exit external file system
243			ExtFSExit();
244	cebix	1.2	#endif
245	cebix	1.1
246			// Exit drivers
247			SCSIExit();
248			CDROMExit();
249			DiskExit();
250			SonyExit();
251	cebix	1.9	}
252
253
254			/*
255			* Display error/warning alert given the message string ID
256			*/
257
258			void ErrorAlert(int string_id)
259			{
260			ErrorAlert(GetString(string_id));
261			}
262
263			void WarningAlert(int string_id)
264			{
265			WarningAlert(GetString(string_id));
266	cebix	1.1	}