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