filename | src/dreamcast.c |
changeset | 766:336858fb0160 |
prev | 742:e730ba4938f6 |
next | 825:2ac7ceccd775 |
author | nkeynes |
date | Mon Aug 18 12:18:10 2008 +0000 (15 years ago) |
permissions | -rw-r--r-- |
last change | Move arm clock rate back to clock.h where it's supposed to be Fix STM with R15 (should be current pc +12, was +8...) - not sure how this managed to work as long as it did |
view | annotate | diff | log | raw |
1 /**
2 * $Id$
3 * Central switchboard for the system. This pulls all the individual modules
4 * together into some kind of coherent structure. This is also where you'd
5 * add Naomi support, if I ever get a board to play with...
6 *
7 * Copyright (c) 2005 Nathan Keynes.
8 *
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
13 *
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
18 */
20 #include <errno.h>
21 #include <glib.h>
22 #include "lxdream.h"
23 #include "dream.h"
24 #include "mem.h"
25 #include "dreamcast.h"
26 #include "asic.h"
27 #include "syscall.h"
28 #include "gui.h"
29 #include "aica/aica.h"
30 #include "gdrom/ide.h"
31 #include "maple/maple.h"
32 #include "sh4/sh4.h"
33 #include "sh4/sh4core.h"
35 /**
36 * Current state of the DC virtual machine
37 */
38 typedef enum { STATE_UNINIT=0, STATE_RUNNING,
39 STATE_STOPPING, STATE_STOPPED } dreamcast_state_t;
41 static volatile dreamcast_state_t dreamcast_state = STATE_UNINIT;
42 static gboolean dreamcast_has_bios = FALSE;
43 static gboolean dreamcast_has_flash = FALSE;
44 static gboolean dreamcast_exit_on_stop = FALSE;
45 static gchar *dreamcast_program_name = NULL;
46 static sh4addr_t dreamcast_entry_point = 0xA0000000;
47 static uint32_t timeslice_length = DEFAULT_TIMESLICE_LENGTH;
48 static uint64_t run_time_nanosecs = 0;
50 #define MAX_MODULES 32
51 static int num_modules = 0;
52 dreamcast_module_t modules[MAX_MODULES];
54 /**
55 * The unknown module is used for logging files without an actual module
56 * declaration
57 */
58 struct dreamcast_module unknown_module = { "****", NULL, NULL, NULL, NULL,
59 NULL, NULL, NULL };
61 /**
62 * This function is responsible for defining how all the pieces of the
63 * dreamcast actually fit together.
64 *
65 * Note currently the locations of the various MMIO pages are hard coded in
66 * the MMIO definitions - they should probably be moved here.
67 */
68 void dreamcast_configure( )
69 {
70 dreamcast_register_module( &eventq_module );
71 /* Register the memory framework */
72 dreamcast_register_module( &mem_module );
74 /* Setup standard memory map */
75 mem_create_repeating_ram_region( 0x0C000000, 16 MB, MEM_REGION_MAIN, 0x01000000, 0x0F000000 );
76 mem_create_ram_region( 0x00800000, 2 MB, MEM_REGION_AUDIO );
77 mem_create_ram_region( 0x00703000, 8 KB, MEM_REGION_AUDIO_SCRATCH );
78 mem_create_ram_region( 0x05000000, 8 MB, MEM_REGION_VIDEO );
79 dreamcast_has_bios = mem_load_rom( lxdream_get_config_value(CONFIG_BIOS_PATH),
80 0x00000000, 0x00200000, 0x89f2b1a1,
81 MEM_REGION_BIOS );
82 mem_create_ram_region( 0x00200000, 0x00020000, MEM_REGION_FLASH );
83 mem_load_block( lxdream_get_config_value(CONFIG_FLASH_PATH),
84 0x00200000, 0x00020000 );
85 dreamcast_has_flash = TRUE;
87 /* Load in the rest of the core modules */
88 dreamcast_register_module( &sh4_module );
89 dreamcast_register_module( &asic_module );
90 dreamcast_register_module( &pvr2_module );
91 dreamcast_register_module( &aica_module );
92 dreamcast_register_module( &maple_module );
93 dreamcast_register_module( &ide_module );
94 }
96 void dreamcast_config_changed(void)
97 {
98 dreamcast_has_bios = mem_load_rom( lxdream_get_config_value(CONFIG_BIOS_PATH),
99 0x00000000, 0x00200000, 0x89f2b1a1,
100 MEM_REGION_BIOS );
101 mem_load_block( lxdream_get_config_value(CONFIG_FLASH_PATH),
102 0x00200000, 0x00020000 );
103 }
105 void dreamcast_save_flash()
106 {
107 if( dreamcast_has_flash ) {
108 const char *file = lxdream_get_config_value(CONFIG_FLASH_PATH);
109 mem_save_block( file, 0x00200000, 0x00020000 );
110 }
111 }
113 /**
114 * Constructs a system configuration for the AICA in standalone mode,
115 * ie sound chip only.
116 */
117 void dreamcast_configure_aica_only( )
118 {
119 dreamcast_register_module( &mem_module );
120 mem_create_ram_region( 0x00800000, 2 MB, MEM_REGION_AUDIO );
121 mem_create_ram_region( 0x00703000, 8 KB, MEM_REGION_AUDIO_SCRATCH );
122 dreamcast_register_module( &aica_module );
123 aica_enable();
124 dreamcast_state = STATE_STOPPED;
125 }
127 void dreamcast_register_module( dreamcast_module_t module )
128 {
129 modules[num_modules++] = module;
130 if( module->init != NULL )
131 module->init();
132 }
134 void dreamcast_set_run_time( uint32_t secs, uint32_t nanosecs )
135 {
136 run_time_nanosecs = (((uint64_t)secs) * 1000000000) + nanosecs;
137 }
139 void dreamcast_set_exit_on_stop( gboolean flag )
140 {
141 dreamcast_exit_on_stop = flag;
142 }
144 void dreamcast_init( void )
145 {
146 dreamcast_configure();
147 dreamcast_state = STATE_STOPPED;
148 }
150 void dreamcast_reset( void )
151 {
152 sh4_core_exit(CORE_EXIT_SYSRESET);
153 int i;
154 for( i=0; i<num_modules; i++ ) {
155 if( modules[i]->reset != NULL )
156 modules[i]->reset();
157 }
158 }
160 void dreamcast_run( void )
161 {
162 int i;
164 if( dreamcast_state != STATE_RUNNING ) {
165 for( i=0; i<num_modules; i++ ) {
166 if( modules[i]->start != NULL )
167 modules[i]->start();
168 }
169 }
171 dreamcast_state = STATE_RUNNING;
173 if( run_time_nanosecs != 0 ) {
174 while( dreamcast_state == STATE_RUNNING ) {
175 uint32_t time_to_run = timeslice_length;
176 if( run_time_nanosecs < time_to_run ) {
177 time_to_run = (uint32_t)run_time_nanosecs;
178 }
180 for( i=0; i<num_modules; i++ ) {
181 if( modules[i]->run_time_slice != NULL )
182 time_to_run = modules[i]->run_time_slice( time_to_run );
183 }
185 if( run_time_nanosecs > time_to_run ) {
186 run_time_nanosecs -= time_to_run;
187 } else {
188 run_time_nanosecs = 0; // Finished
189 break;
190 }
191 }
192 } else {
193 while( dreamcast_state == STATE_RUNNING ) {
194 int time_to_run = timeslice_length;
195 for( i=0; i<num_modules; i++ ) {
196 if( modules[i]->run_time_slice != NULL )
197 time_to_run = modules[i]->run_time_slice( time_to_run );
198 }
200 }
201 }
203 for( i=0; i<num_modules; i++ ) {
204 if( modules[i]->stop != NULL )
205 modules[i]->stop();
206 }
207 dreamcast_state = STATE_STOPPED;
209 if( dreamcast_exit_on_stop ) {
210 dreamcast_shutdown();
211 exit(0);
212 }
213 }
215 void dreamcast_stop( void )
216 {
217 sh4_core_exit(CORE_EXIT_HALT); // returns only if not inside SH4 core
218 if( dreamcast_state == STATE_RUNNING )
219 dreamcast_state = STATE_STOPPING;
220 }
222 void dreamcast_shutdown()
223 {
224 // Don't do a dreamcast_stop - if we're calling this out of SH4 code,
225 // it's a shutdown-and-quit event
226 if( dreamcast_state == STATE_RUNNING )
227 dreamcast_state = STATE_STOPPING;
228 dreamcast_save_flash();
229 #ifdef ENABLE_SH4STATS
230 sh4_stats_print(stdout);
231 #endif
232 }
234 void dreamcast_program_loaded( const gchar *name, sh4addr_t entry_point )
235 {
236 if( dreamcast_program_name != NULL ) {
237 g_free(dreamcast_program_name);
238 }
239 dreamcast_program_name = g_strdup(name);
240 dreamcast_entry_point = entry_point;
241 sh4_set_pc(entry_point);
242 bios_install();
243 dcload_install();
244 gui_update_state();
245 }
247 gboolean dreamcast_is_running( void )
248 {
249 return dreamcast_state == STATE_RUNNING;
250 }
252 gboolean dreamcast_can_run(void)
253 {
254 return dreamcast_state != STATE_UNINIT &&
255 (dreamcast_has_bios || dreamcast_program_name != NULL);
256 }
258 /********************************* Save States *****************************/
260 struct save_state_header {
261 char magic[16];
262 uint32_t version;
263 uint32_t module_count;
264 };
266 struct chunk_header {
267 char marker[4]; /* Always BLCK */
268 char name[8]; /* Block (module) name */
269 uint32_t block_length;
270 };
272 /**
273 * Check the save state header to ensure that it is a valid, supported
274 * file.
275 * @return the number of blocks following, or 0 if the file is invalid.
276 */
277 int dreamcast_read_save_state_header( FILE *f )
278 {
279 struct save_state_header header;
280 if( fread( &header, sizeof(header), 1, f ) != 1 ) {
281 return 0;
282 }
283 if( strncmp( header.magic, DREAMCAST_SAVE_MAGIC, 16 ) != 0 ) {
284 ERROR( "Not a %s save state file", APP_NAME );
285 return 0;
286 }
287 if( header.version != DREAMCAST_SAVE_VERSION ) {
288 ERROR( "%s save state version not supported", APP_NAME );
289 return 0;
290 }
291 if( header.module_count > MAX_MODULES ) {
292 ERROR( "%s save state is corrupted (bad module count)", APP_NAME );
293 return 0;
294 }
295 return header.module_count;
296 }
298 int dreamcast_write_chunk_header( const gchar *name, uint32_t length, FILE *f )
299 {
300 struct chunk_header head;
302 memcpy( head.marker, "BLCK", 4 );
303 memset( head.name, 0, 8 );
304 memcpy( head.name, name, strlen(name) );
305 head.block_length = length;
306 return fwrite( &head, sizeof(head), 1, f );
307 }
310 frame_buffer_t dreamcast_load_preview( const gchar *filename )
311 {
312 int i;
313 FILE *f = fopen( filename, "r" );
314 if( f == NULL ) return NULL;
316 int module_count = dreamcast_read_save_state_header(f);
317 if( module_count <= 0 ) {
318 fclose(f);
319 return NULL;
320 }
321 for( i=0; i<module_count; i++ ) {
322 struct chunk_header head;
323 if( fread( &head, sizeof(head), 1, f ) != 1 ) {
324 fclose(f);
325 return NULL;
326 }
327 if( memcmp("BLCK", head.marker, 4) != 0 ) {
328 fclose(f);
329 return NULL;
330 }
332 if( strcmp("PVR2", head.name) == 0 ) {
333 uint32_t buf_count;
334 int has_front;
335 fread( &buf_count, sizeof(buf_count), 1, f );
336 fread( &has_front, sizeof(has_front), 1, f );
337 if( buf_count != 0 && has_front ) {
338 frame_buffer_t result = read_png_from_stream(f);
339 fclose(f);
340 return result;
341 }
342 break;
343 } else {
344 fseek( f, head.block_length, SEEK_CUR );
345 }
346 }
347 return NULL;
348 }
350 int dreamcast_load_state( const gchar *filename )
351 {
352 int i,j;
353 int module_count;
354 int have_read[MAX_MODULES];
356 FILE *f = fopen( filename, "r" );
357 if( f == NULL ) return errno;
359 module_count = dreamcast_read_save_state_header(f);
360 if( module_count <= 0 ) {
361 fclose(f);
362 return 1;
363 }
365 for( i=0; i<MAX_MODULES; i++ ) {
366 have_read[i] = 0;
367 }
369 for( i=0; i<module_count; i++ ) {
370 struct chunk_header chunk;
371 fread( &chunk, sizeof(chunk), 1, f );
372 if( strncmp(chunk.marker, "BLCK", 4) != 0 ) {
373 ERROR( "%s save state is corrupted (missing block header %d)", APP_NAME, i );
374 fclose(f);
375 return 2;
376 }
378 /* Find the matching module by name */
379 for( j=0; j<num_modules; j++ ) {
380 if( strcmp(modules[j]->name,chunk.name) == 0 ) {
381 have_read[j] = 1;
382 if( modules[j]->load == NULL ) {
383 ERROR( "%s save state is corrupted (no loader for %s)", APP_NAME, modules[j]->name );
384 fclose(f);
385 return 2;
386 } else if( modules[j]->load(f) != 0 ) {
387 ERROR( "%s save state is corrupted (%s failed)", APP_NAME, modules[j]->name );
388 fclose(f);
389 return 2;
390 }
391 break;
392 }
393 }
394 if( j == num_modules ) {
395 fclose(f);
396 ERROR( "%s save state contains unrecognized section", APP_NAME );
397 return 2;
398 }
399 }
401 /* Any modules that we didn't load - reset to the default state.
402 * (ie it's not an error to skip a module if you don't actually
403 * care about its state).
404 */
405 for( j=0; j<num_modules; j++ ) {
406 if( have_read[j] == 0 && modules[j]->reset != NULL ) {
407 modules[j]->reset();
408 }
409 }
410 fclose(f);
411 INFO( "Save state read from %s", filename );
412 return 0;
413 }
415 int dreamcast_save_state( const gchar *filename )
416 {
417 int i;
418 FILE *f;
419 struct save_state_header header;
421 f = fopen( filename, "w" );
422 if( f == NULL )
423 return errno;
424 strcpy( header.magic, DREAMCAST_SAVE_MAGIC );
425 header.version = DREAMCAST_SAVE_VERSION;
426 header.module_count = 0;
428 for( i=0; i<num_modules; i++ ) {
429 if( modules[i]->save != NULL )
430 header.module_count++;
431 }
432 fwrite( &header, sizeof(header), 1, f );
433 for( i=0; i<num_modules; i++ ) {
434 if( modules[i]->save != NULL ) {
435 uint32_t blocklen, posn1, posn2;
436 dreamcast_write_chunk_header( modules[i]->name, 0, f );
437 posn1 = ftell(f);
438 modules[i]->save(f);
439 posn2 = ftell(f);
440 blocklen = posn2 - posn1;
441 fseek( f, posn1-4, SEEK_SET );
442 fwrite( &blocklen, sizeof(blocklen), 1, f );
443 fseek( f, posn2, SEEK_SET );
444 }
445 }
446 fclose( f );
447 INFO( "Save state written to %s", filename );
448 return 0;
449 }
.