filename | src/dreamcast.c |
changeset | 422:61a0598e07ff |
prev | 372:86aa060ddcec |
next | 450:207461e79f21 |
author | nkeynes |
date | Thu Oct 11 08:22:03 2007 +0000 (16 years ago) |
permissions | -rw-r--r-- |
last change | Add speed meter to main window Add sunken border around video area Add debugger menu item Move logging out to util.c |
view | annotate | diff | log | raw |
1 /**
2 * $Id: dreamcast.c,v 1.23 2007-10-06 08:59:42 nkeynes Exp $
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/gstrfuncs.h>
22 #include "dream.h"
23 #include "mem.h"
24 #include "aica/aica.h"
25 #include "asic.h"
26 #include "dreamcast.h"
27 #include "gdrom/ide.h"
28 #include "maple/maple.h"
30 /**
31 * Current state of the DC virtual machine
32 */
33 #define STATE_UNINIT 0
34 #define STATE_RUNNING 1
35 #define STATE_STOPPING 2
36 #define STATE_STOPPED 3
37 static volatile int dreamcast_state = STATE_UNINIT;
38 static uint32_t timeslice_length = DEFAULT_TIMESLICE_LENGTH;
39 const char *dreamcast_config = "DEFAULT";
41 #define MAX_MODULES 32
42 static int num_modules = 0;
43 dreamcast_module_t modules[MAX_MODULES];
45 /**
46 * The unknown module is used for logging files without an actual module
47 * declaration
48 */
49 struct dreamcast_module unknown_module = { "****", NULL, NULL, NULL, NULL,
50 NULL, NULL, NULL };
52 /**
53 * This function is responsible for defining how all the pieces of the
54 * dreamcast actually fit together.
55 *
56 * Note currently the locations of the various MMIO pages are hard coded in
57 * the MMIO definitions - they should probably be moved here.
58 */
59 void dreamcast_configure( )
60 {
61 dreamcast_register_module( &eventq_module );
62 /* Register the memory framework */
63 dreamcast_register_module( &mem_module );
65 /* Setup standard memory map */
66 mem_create_repeating_ram_region( 0x0C000000, 16 MB, MEM_REGION_MAIN, 0x01000000, 0x0F000000 );
67 mem_create_ram_region( 0x00800000, 2 MB, MEM_REGION_AUDIO );
68 mem_create_ram_region( 0x00703000, 8 KB, MEM_REGION_AUDIO_SCRATCH );
69 mem_create_ram_region( 0x05000000, 8 MB, MEM_REGION_VIDEO );
70 if( mem_load_rom( dreamcast_get_config_value(CONFIG_BIOS_PATH),
71 0x00000000, 0x00200000, 0x89f2b1a1 ) == NULL ) {
72 /* Bios wasn't found. Dump an empty ram region in there for something to do */
73 mem_create_ram_region( 0x00000000, 0x00200000, MEM_REGION_BIOS );
74 }
75 mem_create_ram_region( 0x00200000, 0x00020000, MEM_REGION_FLASH );
76 mem_load_block( dreamcast_get_config_value(CONFIG_FLASH_PATH),
77 0x00200000, 0x00020000 );
79 /* Load in the rest of the core modules */
80 dreamcast_register_module( &sh4_module );
81 dreamcast_register_module( &asic_module );
82 dreamcast_register_module( &pvr2_module );
83 dreamcast_register_module( &aica_module );
84 dreamcast_register_module( &maple_module );
85 dreamcast_register_module( &ide_module );
86 }
88 void dreamcast_save_flash()
89 {
90 const char *file = dreamcast_get_config_value(CONFIG_FLASH_PATH);
91 mem_save_block( file, 0x00200000, 0x00020000 );
92 }
94 /**
95 * Constructs a system configuration for the AICA in standalone mode,
96 * ie sound chip only.
97 */
98 void dreamcast_configure_aica_only( )
99 {
100 dreamcast_register_module( &mem_module );
101 mem_create_ram_region( 0x00800000, 2 MB, MEM_REGION_AUDIO );
102 mem_create_ram_region( 0x00703000, 8 KB, MEM_REGION_AUDIO_SCRATCH );
103 dreamcast_register_module( &aica_module );
104 aica_enable();
105 dreamcast_state = STATE_STOPPED;
106 }
108 void dreamcast_register_module( dreamcast_module_t module )
109 {
110 modules[num_modules++] = module;
111 if( module->init != NULL )
112 module->init();
113 }
116 void dreamcast_init( void )
117 {
118 dreamcast_configure();
119 dreamcast_state = STATE_STOPPED;
120 }
122 void dreamcast_reset( void )
123 {
124 int i;
125 for( i=0; i<num_modules; i++ ) {
126 if( modules[i]->reset != NULL )
127 modules[i]->reset();
128 }
129 }
131 void dreamcast_run( void )
132 {
133 int i;
134 if( dreamcast_state != STATE_RUNNING ) {
135 for( i=0; i<num_modules; i++ ) {
136 if( modules[i]->start != NULL )
137 modules[i]->start();
138 }
139 }
140 dreamcast_state = STATE_RUNNING;
141 while( dreamcast_state == STATE_RUNNING ) {
142 int time_to_run = timeslice_length;
143 for( i=0; i<num_modules; i++ ) {
144 if( modules[i]->run_time_slice != NULL )
145 time_to_run = modules[i]->run_time_slice( time_to_run );
146 }
148 }
150 for( i=0; i<num_modules; i++ ) {
151 if( modules[i]->stop != NULL )
152 modules[i]->stop();
153 }
154 dreamcast_state = STATE_STOPPED;
155 }
157 void dreamcast_run_for( unsigned int seconds, unsigned int nanosecs )
158 {
160 int i;
161 if( dreamcast_state != STATE_RUNNING ) {
162 for( i=0; i<num_modules; i++ ) {
163 if( modules[i]->start != NULL )
164 modules[i]->start();
165 }
166 }
167 dreamcast_state = STATE_RUNNING;
168 uint32_t nanos = 0;
169 if( nanosecs != 0 ) {
170 nanos = 1000000000 - nanosecs;
171 seconds++;
172 }
173 while( dreamcast_state == STATE_RUNNING && seconds != 0 ) {
174 int time_to_run = timeslice_length;
175 for( i=0; i<num_modules; i++ ) {
176 if( modules[i]->run_time_slice != NULL )
177 time_to_run = modules[i]->run_time_slice( time_to_run );
178 }
179 nanos += time_to_run;
180 if( nanos >= 1000000000 ) {
181 nanos -= 1000000000;
182 seconds--;
183 }
184 }
186 for( i=0; i<num_modules; i++ ) {
187 if( modules[i]->stop != NULL )
188 modules[i]->stop();
189 }
190 dreamcast_state = STATE_STOPPED;
191 }
193 void dreamcast_stop( void )
194 {
195 if( dreamcast_state == STATE_RUNNING )
196 dreamcast_state = STATE_STOPPING;
197 }
199 void dreamcast_shutdown()
200 {
201 dreamcast_stop();
202 dreamcast_save_flash();
203 }
205 gboolean dreamcast_is_running( void )
206 {
207 return dreamcast_state == STATE_RUNNING;
208 }
210 /***************************** User Configuration **************************/
213 static struct dreamcast_config_entry global_config[] =
214 {{ "bios", CONFIG_TYPE_FILE, "dcboot.rom" },
215 { "flash", CONFIG_TYPE_FILE, "dcflash.rom" },
216 { "default path", CONFIG_TYPE_PATH, "." },
217 { "save path", CONFIG_TYPE_PATH, "save" },
218 { "bootstrap", CONFIG_TYPE_FILE, "IP.BIN" },
219 { NULL, CONFIG_TYPE_NONE }};
221 static struct dreamcast_config_entry serial_config[] =
222 {{ "device", CONFIG_TYPE_FILE, "/dev/ttyS1" },
223 { NULL, CONFIG_TYPE_NONE }};
225 struct dreamcast_config_group dreamcast_config_root[] =
226 {{ "global", global_config },
227 { "controllers", NULL },
228 { "serial", serial_config },
229 { NULL, CONFIG_TYPE_NONE }};
231 void dreamcast_set_default_config( )
232 {
233 struct dreamcast_config_group *group = dreamcast_config_root;
234 while( group->key != NULL ) {
235 struct dreamcast_config_entry *param = group->params;
236 if( param != NULL ) {
237 while( param->key != NULL ) {
238 if( param->value != param->default_value ) {
239 if( param->value != NULL )
240 free( param->value );
241 param->value = (gchar *)param->default_value;
242 }
243 param++;
244 }
245 }
246 group++;
247 }
248 maple_detach_all();
249 }
251 const gchar *dreamcast_get_config_value( int key )
252 {
253 return global_config[key].value;
254 }
256 gboolean dreamcast_load_config( const gchar *filename )
257 {
258 FILE *f = fopen(filename, "ro");
259 gboolean result;
261 if( f == NULL ) {
262 ERROR( "Unable to open '%s': %s", filename, strerror(errno) );
263 return FALSE;
264 }
266 result = dreamcast_load_config_stream( f );
267 fclose(f);
268 return result;
269 }
271 gboolean dreamcast_load_config_stream( FILE *f )
272 {
274 char buf[512];
275 int maple_device = -1, maple_subdevice = -1;
276 struct dreamcast_config_group devgroup;
277 struct dreamcast_config_group *group = NULL;
278 maple_device_t device = NULL;
279 dreamcast_set_default_config();
281 while( fgets( buf, sizeof(buf), f ) != NULL ) {
282 g_strstrip(buf);
283 if( buf[0] == '#' )
284 continue;
285 if( *buf == '[' ) {
286 char *p = strchr(buf, ']');
287 if( p != NULL ) {
288 struct dreamcast_config_group *tmp_group;
289 maple_device = maple_subdevice = -1;
290 *p = '\0';
291 g_strstrip(buf+1);
292 tmp_group = &dreamcast_config_root[0];
293 while( tmp_group->key != NULL ) {
294 if( strcasecmp(tmp_group->key, buf+1) == 0 ) {
295 group = tmp_group;
296 break;
297 }
298 tmp_group++;
299 }
300 }
301 } else if( group != NULL ) {
302 char *value = strchr( buf, '=' );
303 if( value != NULL ) {
304 struct dreamcast_config_entry *param = group->params;
305 *value = '\0';
306 value++;
307 g_strstrip(buf);
308 g_strstrip(value);
309 if( strcmp(group->key,"controllers") == 0 ) {
310 if( g_strncasecmp( buf, "device ", 7 ) == 0 ) {
311 maple_device = strtoul( buf+7, NULL, 0 );
312 if( maple_device < 0 || maple_device > 3 ) {
313 ERROR( "Device number must be between 0..3 (not '%s')", buf+7);
314 continue;
315 }
316 maple_subdevice = 0;
317 device = maple_new_device( value );
318 if( device == NULL ) {
319 ERROR( "Unrecognized device '%s'", value );
320 } else {
321 devgroup.key = "controllers";
322 devgroup.params = maple_get_device_config(device);
323 maple_attach_device( device, maple_device, maple_subdevice );
324 group = &devgroup;
325 }
326 continue;
327 } else if( g_strncasecmp( buf, "subdevice ", 10 ) == 0 ) {
328 maple_subdevice = strtoul( buf+10, NULL, 0 );
329 if( maple_device == -1 ) {
330 ERROR( "Subdevice not allowed without primary device" );
331 } else if( maple_subdevice < 1 || maple_subdevice > 5 ) {
332 ERROR( "Subdevice must be between 1..5 (not '%s')", buf+10 );
333 } else if( (device = maple_new_device(value)) == NULL ) {
334 ERROR( "Unrecognized subdevice '%s'", value );
335 } else {
336 devgroup.key = "controllers";
337 devgroup.params = maple_get_device_config(device);
338 maple_attach_device( device, maple_device, maple_subdevice );
339 group = &devgroup;
340 }
341 continue;
342 }
343 }
344 while( param->key != NULL ) {
345 if( strcasecmp( param->key, buf ) == 0 ) {
346 param->value = g_strdup(value);
347 break;
348 }
349 param++;
350 }
351 }
352 }
353 }
354 return TRUE;
355 }
357 gboolean dreamcast_save_config( const gchar *filename )
358 {
359 FILE *f = fopen(filename, "wo");
360 gboolean result;
361 if( f == NULL ) {
362 ERROR( "Unable to open '%s': %s", filename, strerror(errno) );
363 return FALSE;
364 }
365 result = dreamcast_save_config_stream(f);
366 fclose(f);
367 return TRUE;
368 }
370 gboolean dreamcast_save_config_stream( FILE *f )
371 {
372 struct dreamcast_config_group *group = &dreamcast_config_root[0];
374 while( group->key != NULL ) {
375 struct dreamcast_config_entry *entry = group->params;
376 fprintf( f, "[%s]\n", group->key );
378 if( entry != NULL ) {
379 while( entry->key != NULL ) {
380 fprintf( f, "%s = %s\n", entry->key, entry->value );
381 entry++;
382 }
383 } else if( strcmp(group->key, "controllers") == 0 ) {
384 int i,j;
385 for( i=0; i<4; i++ ) {
386 for( j=0; j<6; j++ ) {
387 maple_device_t dev = maple_get_device( i, j );
388 if( dev != NULL ) {
389 if( j == 0 )
390 fprintf( f, "Device %d = %s\n", i, dev->device_class->name );
391 else
392 fprintf( f, "Subdevice %d = %s\n", j, dev->device_class->name );
393 entry = dev->get_config(dev);
394 while( entry->key != NULL ) {
395 fprintf( f, "%*c%s = %s\n", j==0?4:8, ' ',entry->key, entry->value );
396 entry++;
397 }
398 }
399 }
400 }
401 }
402 fprintf( f, "\n" );
403 group++;
404 }
405 return TRUE;
406 }
408 /********************************* Save States *****************************/
410 struct save_state_header {
411 char magic[16];
412 uint32_t version;
413 uint32_t module_count;
414 };
416 int dreamcast_load_state( const gchar *filename )
417 {
418 int i,j;
419 uint32_t len;
420 int have_read[MAX_MODULES];
421 char tmp[64];
422 struct save_state_header header;
423 FILE *f;
425 f = fopen( filename, "r" );
426 if( f == NULL ) return errno;
428 fread( &header, sizeof(header), 1, f );
429 if( strncmp( header.magic, DREAMCAST_SAVE_MAGIC, 16 ) != 0 ) {
430 ERROR( "Not a %s save state file", APP_NAME );
431 return 1;
432 }
433 if( header.version != DREAMCAST_SAVE_VERSION ) {
434 ERROR( "%s save state version not supported", APP_NAME );
435 return 1;
436 }
437 if( header.module_count > MAX_MODULES ) {
438 ERROR( "%s save state is corrupted (bad module count)", APP_NAME );
439 return 1;
440 }
441 for( i=0; i<MAX_MODULES; i++ ) {
442 have_read[i] = 0;
443 }
445 for( i=0; i<header.module_count; i++ ) {
446 fread(tmp, 4, 1, f );
447 if( strncmp(tmp, "BLCK", 4) != 0 ) {
448 ERROR( "%s save state is corrupted (missing block header %d)", APP_NAME, i );
449 return 2;
450 }
451 len = fread_string(tmp, sizeof(tmp), f );
452 if( len > 64 || len < 1 ) {
453 ERROR( "%s save state is corrupted (bad string)", APP_NAME );
454 return 2;
455 }
457 /* Find the matching module by name */
458 for( j=0; j<num_modules; j++ ) {
459 if( strcmp(modules[j]->name,tmp) == 0 ) {
460 have_read[j] = 1;
461 if( modules[j]->load == NULL ) {
462 ERROR( "%s save state is corrupted (no loader for %s)", APP_NAME, modules[j]->name );
463 return 2;
464 } else if( modules[j]->load(f) != 0 ) {
465 ERROR( "%s save state is corrupted (%s failed)", APP_NAME, modules[j]->name );
466 return 2;
467 }
468 break;
469 }
470 }
471 if( j == num_modules ) {
472 ERROR( "%s save state contains unrecognized section", APP_NAME );
473 return 2;
474 }
475 }
477 /* Any modules that we didn't load - reset to the default state.
478 * (ie it's not an error to skip a module if you don't actually
479 * care about its state).
480 */
481 for( j=0; j<num_modules; j++ ) {
482 if( have_read[j] == 0 && modules[j]->reset != NULL ) {
483 modules[j]->reset();
484 }
485 }
486 fclose(f);
487 INFO( "Save state read from %s", filename );
488 return 0;
489 }
491 int dreamcast_save_state( const gchar *filename )
492 {
493 int i;
494 FILE *f;
495 struct save_state_header header;
497 f = fopen( filename, "w" );
498 if( f == NULL )
499 return errno;
500 strcpy( header.magic, DREAMCAST_SAVE_MAGIC );
501 header.version = DREAMCAST_SAVE_VERSION;
502 header.module_count = 0;
504 for( i=0; i<num_modules; i++ ) {
505 if( modules[i]->save != NULL )
506 header.module_count++;
507 }
508 fwrite( &header, sizeof(header), 1, f );
509 for( i=0; i<num_modules; i++ ) {
510 if( modules[i]->save != NULL ) {
511 fwrite( "BLCK", 4, 1, f );
512 fwrite_string( modules[i]->name, f );
513 modules[i]->save(f);
514 }
515 }
516 fclose( f );
517 INFO( "Save state written to %s", filename );
518 return 0;
519 }
.