nkeynes@26: /** nkeynes@295: * $Id: dreamcast.c,v 1.21 2007-01-16 10:34:46 nkeynes Exp $ nkeynes@26: * Central switchboard for the system. This pulls all the individual modules nkeynes@26: * together into some kind of coherent structure. This is also where you'd nkeynes@26: * add Naomi support, if I ever get a board to play with... nkeynes@26: * nkeynes@26: * Copyright (c) 2005 Nathan Keynes. nkeynes@26: * nkeynes@26: * This program is free software; you can redistribute it and/or modify nkeynes@26: * it under the terms of the GNU General Public License as published by nkeynes@26: * the Free Software Foundation; either version 2 of the License, or nkeynes@26: * (at your option) any later version. nkeynes@26: * nkeynes@26: * This program is distributed in the hope that it will be useful, nkeynes@26: * but WITHOUT ANY WARRANTY; without even the implied warranty of nkeynes@26: * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the nkeynes@26: * GNU General Public License for more details. nkeynes@26: */ nkeynes@26: nkeynes@18: #include nkeynes@144: #include nkeynes@2: #include "dream.h" nkeynes@2: #include "mem.h" nkeynes@11: #include "aica/aica.h" nkeynes@2: #include "asic.h" nkeynes@2: #include "dreamcast.h" nkeynes@25: #include "gdrom/ide.h" nkeynes@25: #include "maple/maple.h" nkeynes@15: nkeynes@26: /** nkeynes@26: * Current state of the DC virtual machine nkeynes@26: */ nkeynes@26: #define STATE_UNINIT 0 nkeynes@26: #define STATE_RUNNING 1 nkeynes@26: #define STATE_STOPPING 2 nkeynes@26: #define STATE_STOPPED 3 nkeynes@26: static volatile int dreamcast_state = STATE_UNINIT; nkeynes@26: static uint32_t timeslice_length = DEFAULT_TIMESLICE_LENGTH; nkeynes@26: static char *dreamcast_config = "DEFAULT"; nkeynes@2: nkeynes@15: #define MAX_MODULES 32 nkeynes@15: static int num_modules = 0; nkeynes@16: dreamcast_module_t modules[MAX_MODULES]; nkeynes@15: nkeynes@16: /** nkeynes@35: * The unknown module is used for logging files without an actual module nkeynes@35: * declaration nkeynes@35: */ nkeynes@35: struct dreamcast_module unknown_module = { "****", NULL, NULL, NULL, NULL, nkeynes@35: NULL, NULL, NULL }; nkeynes@35: nkeynes@35: /** nkeynes@16: * This function is responsible for defining how all the pieces of the nkeynes@26: * dreamcast actually fit together. nkeynes@16: * nkeynes@16: * Note currently the locations of the various MMIO pages are hard coded in nkeynes@16: * the MMIO definitions - they should probably be moved here. nkeynes@16: */ nkeynes@15: void dreamcast_configure( ) nkeynes@15: { nkeynes@265: dreamcast_register_module( &eventq_module ); nkeynes@16: /* Register the memory framework */ nkeynes@15: dreamcast_register_module( &mem_module ); nkeynes@16: nkeynes@16: /* Setup standard memory map */ nkeynes@146: mem_create_repeating_ram_region( 0x0C000000, 16 MB, MEM_REGION_MAIN, 0x01000000, 0x0F000000 ); nkeynes@16: mem_create_ram_region( 0x00800000, 2 MB, MEM_REGION_AUDIO ); nkeynes@16: mem_create_ram_region( 0x00703000, 8 KB, MEM_REGION_AUDIO_SCRATCH ); nkeynes@16: mem_create_ram_region( 0x05000000, 8 MB, MEM_REGION_VIDEO ); nkeynes@180: if( mem_load_rom( dreamcast_get_config_value(CONFIG_BIOS_PATH), nkeynes@180: 0x00000000, 0x00200000, 0x89f2b1a1 ) == NULL ) { nkeynes@180: /* Bios wasn't found. Dump an empty ram region in there for something to do */ nkeynes@180: mem_create_ram_region( 0x00000000, 0x00200000, MEM_REGION_BIOS ); nkeynes@180: } nkeynes@146: mem_create_ram_region( 0x00200000, 0x00020000, MEM_REGION_FLASH ); nkeynes@167: mem_load_block( dreamcast_get_config_value(CONFIG_FLASH_PATH), nkeynes@167: 0x00200000, 0x00020000 ); nkeynes@16: nkeynes@16: /* Load in the rest of the core modules */ nkeynes@15: dreamcast_register_module( &sh4_module ); nkeynes@15: dreamcast_register_module( &asic_module ); nkeynes@15: dreamcast_register_module( &pvr2_module ); nkeynes@15: dreamcast_register_module( &aica_module ); nkeynes@15: dreamcast_register_module( &maple_module ); nkeynes@15: dreamcast_register_module( &ide_module ); nkeynes@15: } nkeynes@15: nkeynes@277: void dreamcast_save_flash() nkeynes@277: { nkeynes@277: char *file = dreamcast_get_config_value(CONFIG_FLASH_PATH); nkeynes@277: mem_save_block( file, 0x00200000, 0x00020000 ); nkeynes@277: } nkeynes@277: nkeynes@71: /** nkeynes@71: * Constructs a system configuration for the AICA in standalone mode, nkeynes@71: * ie sound chip only. nkeynes@71: */ nkeynes@71: void dreamcast_configure_aica_only( ) nkeynes@71: { nkeynes@71: dreamcast_register_module( &mem_module ); nkeynes@71: mem_create_ram_region( 0x00800000, 2 MB, MEM_REGION_AUDIO ); nkeynes@71: mem_create_ram_region( 0x00703000, 8 KB, MEM_REGION_AUDIO_SCRATCH ); nkeynes@71: dreamcast_register_module( &aica_module ); nkeynes@89: aica_enable(); nkeynes@71: dreamcast_state = STATE_STOPPED; nkeynes@71: } nkeynes@71: nkeynes@15: void dreamcast_register_module( dreamcast_module_t module ) nkeynes@15: { nkeynes@15: modules[num_modules++] = module; nkeynes@16: if( module->init != NULL ) nkeynes@16: module->init(); nkeynes@15: } nkeynes@15: nkeynes@15: nkeynes@2: void dreamcast_init( void ) nkeynes@2: { nkeynes@15: dreamcast_configure(); nkeynes@23: dreamcast_state = STATE_STOPPED; nkeynes@2: } nkeynes@2: nkeynes@2: void dreamcast_reset( void ) nkeynes@2: { nkeynes@15: int i; nkeynes@15: for( i=0; ireset != NULL ) nkeynes@15: modules[i]->reset(); nkeynes@15: } nkeynes@2: } nkeynes@2: nkeynes@23: void dreamcast_run( void ) nkeynes@15: { nkeynes@15: int i; nkeynes@23: if( dreamcast_state != STATE_RUNNING ) { nkeynes@23: for( i=0; istart != NULL ) nkeynes@23: modules[i]->start(); nkeynes@23: } nkeynes@15: } nkeynes@23: dreamcast_state = STATE_RUNNING; nkeynes@23: while( dreamcast_state == STATE_RUNNING ) { nkeynes@27: int time_to_run = timeslice_length; nkeynes@23: for( i=0; irun_time_slice != NULL ) nkeynes@27: time_to_run = modules[i]->run_time_slice( time_to_run ); nkeynes@23: } nkeynes@23: nkeynes@23: } nkeynes@23: nkeynes@15: for( i=0; istop != NULL ) nkeynes@15: modules[i]->stop(); nkeynes@15: } nkeynes@23: dreamcast_state = STATE_STOPPED; nkeynes@2: } nkeynes@15: nkeynes@23: void dreamcast_stop( void ) nkeynes@23: { nkeynes@23: if( dreamcast_state == STATE_RUNNING ) nkeynes@23: dreamcast_state = STATE_STOPPING; nkeynes@23: } nkeynes@17: nkeynes@277: void dreamcast_shutdown() nkeynes@277: { nkeynes@277: dreamcast_stop(); nkeynes@277: sh4_stop(); nkeynes@277: dreamcast_save_flash(); nkeynes@277: } nkeynes@277: nkeynes@26: gboolean dreamcast_is_running( void ) nkeynes@26: { nkeynes@26: return dreamcast_state == STATE_RUNNING; nkeynes@26: } nkeynes@26: nkeynes@30: /***************************** User Configuration **************************/ nkeynes@30: nkeynes@167: nkeynes@144: static struct dreamcast_config_entry global_config[] = nkeynes@144: {{ "bios", CONFIG_TYPE_FILE, "dcboot.rom" }, nkeynes@144: { "flash", CONFIG_TYPE_FILE, "dcflash.rom" }, nkeynes@144: { "default path", CONFIG_TYPE_PATH, "." }, nkeynes@144: { "save path", CONFIG_TYPE_PATH, "save" }, nkeynes@144: { "bootstrap", CONFIG_TYPE_FILE, "IP.BIN" }, nkeynes@144: { NULL, CONFIG_TYPE_NONE }}; nkeynes@144: nkeynes@144: static struct dreamcast_config_entry serial_config[] = nkeynes@144: {{ "device", CONFIG_TYPE_FILE, "/dev/ttyS1" }, nkeynes@144: { NULL, CONFIG_TYPE_NONE }}; nkeynes@144: nkeynes@144: struct dreamcast_config_group dreamcast_config_root[] = nkeynes@144: {{ "global", global_config }, nkeynes@144: { "controllers", NULL }, nkeynes@144: { "serial", serial_config }, nkeynes@144: { NULL, CONFIG_TYPE_NONE }}; nkeynes@144: nkeynes@144: void dreamcast_set_default_config( ) nkeynes@144: { nkeynes@144: struct dreamcast_config_group *group = dreamcast_config_root; nkeynes@144: while( group->key != NULL ) { nkeynes@144: struct dreamcast_config_entry *param = group->params; nkeynes@144: if( param != NULL ) { nkeynes@144: while( param->key != NULL ) { nkeynes@144: if( param->value != param->default_value ) { nkeynes@144: if( param->value != NULL ) nkeynes@144: free( param->value ); nkeynes@144: param->value = (gchar *)param->default_value; nkeynes@144: } nkeynes@144: param++; nkeynes@144: } nkeynes@144: } nkeynes@144: group++; nkeynes@144: } nkeynes@144: maple_detach_all(); nkeynes@144: } nkeynes@144: nkeynes@167: const gchar *dreamcast_get_config_value( int key ) nkeynes@167: { nkeynes@167: return global_config[key].value; nkeynes@167: } nkeynes@167: nkeynes@144: gboolean dreamcast_load_config( const gchar *filename ) nkeynes@144: { nkeynes@144: FILE *f = fopen(filename, "ro"); nkeynes@144: gboolean result; nkeynes@144: nkeynes@144: if( f == NULL ) { nkeynes@144: ERROR( "Unable to open '%s': %s", filename, strerror(errno) ); nkeynes@144: return FALSE; nkeynes@144: } nkeynes@144: nkeynes@144: result = dreamcast_load_config_stream( f ); nkeynes@144: fclose(f); nkeynes@144: return result; nkeynes@144: } nkeynes@144: nkeynes@144: gboolean dreamcast_load_config_stream( FILE *f ) nkeynes@30: { nkeynes@30: nkeynes@144: char buf[512], *p; nkeynes@144: int maple_device = -1, maple_subdevice = -1; nkeynes@144: struct dreamcast_config_group devgroup; nkeynes@144: struct dreamcast_config_group *group = NULL; nkeynes@144: maple_device_t device = NULL; nkeynes@144: dreamcast_set_default_config(); nkeynes@30: nkeynes@144: while( fgets( buf, sizeof(buf), f ) != NULL ) { nkeynes@144: g_strstrip(buf); nkeynes@144: if( buf[0] == '#' ) nkeynes@144: continue; nkeynes@144: if( *buf == '[' ) { nkeynes@144: char *p = strchr(buf, ']'); nkeynes@144: if( p != NULL ) { nkeynes@144: struct dreamcast_config_group *tmp_group; nkeynes@144: maple_device = maple_subdevice = -1; nkeynes@144: *p = '\0'; nkeynes@144: g_strstrip(buf+1); nkeynes@144: tmp_group = &dreamcast_config_root[0]; nkeynes@144: while( tmp_group->key != NULL ) { nkeynes@144: if( strcasecmp(tmp_group->key, buf+1) == 0 ) { nkeynes@144: group = tmp_group; nkeynes@144: break; nkeynes@144: } nkeynes@144: tmp_group++; nkeynes@144: } nkeynes@144: } nkeynes@144: } else if( group != NULL ) { nkeynes@144: char *value = strchr( buf, '=' ); nkeynes@144: if( value != NULL ) { nkeynes@144: struct dreamcast_config_entry *param = group->params; nkeynes@144: *value = '\0'; nkeynes@144: value++; nkeynes@144: g_strstrip(buf); nkeynes@144: g_strstrip(value); nkeynes@144: if( strcmp(group->key,"controllers") == 0 ) { nkeynes@144: if( g_strncasecmp( buf, "device ", 7 ) == 0 ) { nkeynes@144: maple_device = strtoul( buf+7, NULL, 0 ); nkeynes@144: if( maple_device < 0 || maple_device > 3 ) { nkeynes@144: ERROR( "Device number must be between 0..3 (not '%s')", buf+7); nkeynes@144: continue; nkeynes@144: } nkeynes@144: maple_subdevice = 0; nkeynes@144: device = maple_new_device( value ); nkeynes@144: if( device == NULL ) { nkeynes@144: ERROR( "Unrecognized device '%s'", value ); nkeynes@144: } else { nkeynes@144: devgroup.key = "controllers"; nkeynes@144: devgroup.params = maple_get_device_config(device); nkeynes@144: maple_attach_device( device, maple_device, maple_subdevice ); nkeynes@144: group = &devgroup; nkeynes@144: } nkeynes@144: continue; nkeynes@144: } else if( g_strncasecmp( buf, "subdevice ", 10 ) == 0 ) { nkeynes@144: maple_subdevice = strtoul( buf+10, NULL, 0 ); nkeynes@144: if( maple_device == -1 ) { nkeynes@144: ERROR( "Subdevice not allowed without primary device" ); nkeynes@144: } else if( maple_subdevice < 1 || maple_subdevice > 5 ) { nkeynes@144: ERROR( "Subdevice must be between 1..5 (not '%s')", buf+10 ); nkeynes@144: } else if( (device = maple_new_device(value)) == NULL ) { nkeynes@144: ERROR( "Unrecognized subdevice '%s'", value ); nkeynes@144: } else { nkeynes@144: devgroup.key = "controllers"; nkeynes@144: devgroup.params = maple_get_device_config(device); nkeynes@144: maple_attach_device( device, maple_device, maple_subdevice ); nkeynes@144: group = &devgroup; nkeynes@144: } nkeynes@144: continue; nkeynes@144: } nkeynes@144: } nkeynes@144: while( param->key != NULL ) { nkeynes@144: if( strcasecmp( param->key, buf ) == 0 ) { nkeynes@144: param->value = g_strdup(value); nkeynes@144: break; nkeynes@144: } nkeynes@144: param++; nkeynes@144: } nkeynes@144: } nkeynes@144: } nkeynes@144: } nkeynes@144: return TRUE; nkeynes@30: } nkeynes@30: nkeynes@144: gboolean dreamcast_save_config( const gchar *filename ) nkeynes@30: { nkeynes@144: FILE *f = fopen(filename, "wo"); nkeynes@144: gboolean result; nkeynes@144: if( f == NULL ) { nkeynes@144: ERROR( "Unable to open '%s': %s", filename, strerror(errno) ); nkeynes@144: return FALSE; nkeynes@144: } nkeynes@144: result = dreamcast_save_config_stream(f); nkeynes@144: fclose(f); nkeynes@144: } nkeynes@30: nkeynes@144: gboolean dreamcast_save_config_stream( FILE *f ) nkeynes@144: { nkeynes@144: struct dreamcast_config_group *group = &dreamcast_config_root[0]; nkeynes@144: nkeynes@144: while( group->key != NULL ) { nkeynes@144: struct dreamcast_config_entry *entry = group->params; nkeynes@144: fprintf( f, "[%s]\n", group->key ); nkeynes@144: nkeynes@144: if( entry != NULL ) { nkeynes@144: while( entry->key != NULL ) { nkeynes@144: fprintf( f, "%s = %s\n", entry->key, entry->value ); nkeynes@144: entry++; nkeynes@144: } nkeynes@144: } else if( strcmp(group->key, "controllers") == 0 ) { nkeynes@144: int i,j; nkeynes@144: for( i=0; i<4; i++ ) { nkeynes@144: for( j=0; j<6; j++ ) { nkeynes@144: maple_device_t dev = maple_get_device( i, j ); nkeynes@144: if( dev != NULL ) { nkeynes@144: if( j == 0 ) nkeynes@144: fprintf( f, "Device %d = %s\n", i, dev->device_class->name ); nkeynes@144: else nkeynes@144: fprintf( f, "Subdevice %d = %s\n", j, dev->device_class->name ); nkeynes@144: entry = dev->get_config(dev); nkeynes@144: while( entry->key != NULL ) { nkeynes@144: fprintf( f, "%*c%s = %s\n", j==0?4:8, ' ',entry->key, entry->value ); nkeynes@144: entry++; nkeynes@144: } nkeynes@144: } nkeynes@144: } nkeynes@144: } nkeynes@144: } nkeynes@144: fprintf( f, "\n" ); nkeynes@144: group++; nkeynes@144: } nkeynes@144: return TRUE; nkeynes@30: } nkeynes@26: nkeynes@26: /********************************* Save States *****************************/ nkeynes@26: nkeynes@26: struct save_state_header { nkeynes@26: char magic[16]; nkeynes@26: uint32_t version; nkeynes@26: uint32_t module_count; nkeynes@26: }; nkeynes@26: nkeynes@18: int dreamcast_load_state( const gchar *filename ) nkeynes@15: { nkeynes@17: int i,j; nkeynes@17: uint32_t count, len; nkeynes@17: int have_read[MAX_MODULES]; nkeynes@17: char tmp[64]; nkeynes@15: struct save_state_header header; nkeynes@18: FILE *f; nkeynes@18: nkeynes@18: f = fopen( filename, "r" ); nkeynes@18: if( f == NULL ) return errno; nkeynes@15: nkeynes@15: fread( &header, sizeof(header), 1, f ); nkeynes@15: if( strncmp( header.magic, DREAMCAST_SAVE_MAGIC, 16 ) != 0 ) { nkeynes@180: ERROR( "Not a %s save state file", APP_NAME ); nkeynes@17: return 1; nkeynes@15: } nkeynes@15: if( header.version != DREAMCAST_SAVE_VERSION ) { nkeynes@180: ERROR( "%s save state version not supported", APP_NAME ); nkeynes@17: return 1; nkeynes@17: } nkeynes@18: if( header.module_count > MAX_MODULES ) { nkeynes@180: ERROR( "%s save state is corrupted (bad module count)", APP_NAME ); nkeynes@17: return 1; nkeynes@17: } nkeynes@17: for( i=0; i 64 || len < 1 ) { nkeynes@180: ERROR( "%s save state is corrupted (bad string)", APP_NAME ); nkeynes@17: return 2; nkeynes@17: } nkeynes@17: nkeynes@17: /* Find the matching module by name */ nkeynes@17: for( j=0; jname,tmp) == 0 ) { nkeynes@17: have_read[j] = 1; nkeynes@17: if( modules[j]->load == NULL ) { nkeynes@180: ERROR( "%s save state is corrupted (no loader for %s)", APP_NAME, modules[j]->name ); nkeynes@17: return 2; nkeynes@17: } else if( modules[j]->load(f) != 0 ) { nkeynes@180: ERROR( "%s save state is corrupted (%s failed)", APP_NAME, modules[j]->name ); nkeynes@17: return 2; nkeynes@17: } nkeynes@17: break; nkeynes@17: } nkeynes@17: } nkeynes@17: if( j == num_modules ) { nkeynes@180: ERROR( "%s save state contains unrecognized section", APP_NAME ); nkeynes@17: return 2; nkeynes@17: } nkeynes@17: } nkeynes@17: nkeynes@17: /* Any modules that we didn't load - reset to the default state. nkeynes@17: * (ie it's not an error to skip a module if you don't actually nkeynes@17: * care about its state). nkeynes@17: */ nkeynes@17: for( j=0; jreset != NULL ) { nkeynes@17: modules[j]->reset(); nkeynes@17: } nkeynes@15: } nkeynes@18: fclose(f); nkeynes@18: INFO( "Save state read from %s", filename ); nkeynes@15: } nkeynes@15: nkeynes@18: int dreamcast_save_state( const gchar *filename ) nkeynes@15: { nkeynes@15: int i; nkeynes@18: FILE *f; nkeynes@15: struct save_state_header header; nkeynes@15: nkeynes@18: f = fopen( filename, "w" ); nkeynes@18: if( f == NULL ) nkeynes@18: return errno; nkeynes@15: strcpy( header.magic, DREAMCAST_SAVE_MAGIC ); nkeynes@15: header.version = DREAMCAST_SAVE_VERSION; nkeynes@18: header.module_count = 0; nkeynes@18: nkeynes@18: for( i=0; isave != NULL ) nkeynes@18: header.module_count++; nkeynes@18: } nkeynes@15: fwrite( &header, sizeof(header), 1, f ); nkeynes@15: for( i=0; isave != NULL ) { nkeynes@17: fwrite( "BLCK", 4, 1, f ); nkeynes@17: fwrite_string( modules[i]->name, f ); nkeynes@15: modules[i]->save(f); nkeynes@15: } nkeynes@15: } nkeynes@18: fclose( f ); nkeynes@18: INFO( "Save state written to %s", filename ); nkeynes@15: } nkeynes@15: