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