filename | src/test/testsh4x86.c |
changeset | 905:4c17ebd9ef5e |
prev | 884:2dcd6a3829fa |
next | 911:2f6ba75b84d1 |
author | nkeynes |
date | Wed Oct 29 23:51:58 2008 +0000 (15 years ago) |
permissions | -rw-r--r-- |
last change | Use regparam calling conventions for all functions called from translated code, along with a few other high-use functions. Can probably extend this to all functions, but as it is this is a nice performance boost |
file | annotate | diff | log | raw |
nkeynes@363 | 1 | /** |
nkeynes@586 | 2 | * $Id$ |
nkeynes@363 | 3 | * |
nkeynes@363 | 4 | * Test cases for the SH4 => x86 translator core. Takes as |
nkeynes@363 | 5 | * input a binary SH4 object (and VMA), generates the |
nkeynes@363 | 6 | * corresponding x86 code, and outputs the disassembly. |
nkeynes@363 | 7 | * |
nkeynes@363 | 8 | * Copyright (c) 2005 Nathan Keynes. |
nkeynes@363 | 9 | * |
nkeynes@363 | 10 | * This program is free software; you can redistribute it and/or modify |
nkeynes@363 | 11 | * it under the terms of the GNU General Public License as published by |
nkeynes@363 | 12 | * the Free Software Foundation; either version 2 of the License, or |
nkeynes@363 | 13 | * (at your option) any later version. |
nkeynes@363 | 14 | * |
nkeynes@363 | 15 | * This program is distributed in the hope that it will be useful, |
nkeynes@363 | 16 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
nkeynes@363 | 17 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
nkeynes@363 | 18 | * GNU General Public License for more details. |
nkeynes@363 | 19 | */ |
nkeynes@363 | 20 | |
nkeynes@363 | 21 | #include <stdio.h> |
nkeynes@363 | 22 | #include <stdarg.h> |
nkeynes@363 | 23 | #include <getopt.h> |
nkeynes@365 | 24 | #include <sys/stat.h> |
nkeynes@365 | 25 | #include "x86dasm/x86dasm.h" |
nkeynes@363 | 26 | #include "sh4/sh4trans.h" |
nkeynes@363 | 27 | #include "sh4/sh4core.h" |
nkeynes@586 | 28 | #include "sh4/sh4mmio.h" |
nkeynes@586 | 29 | |
nkeynes@820 | 30 | struct dreamcast_module sh4_module; |
nkeynes@586 | 31 | struct mmio_region mmio_region_MMU; |
nkeynes@820 | 32 | struct mmio_region mmio_region_PMM; |
nkeynes@586 | 33 | struct breakpoint_struct sh4_breakpoints[MAX_BREAKPOINTS]; |
nkeynes@586 | 34 | int sh4_breakpoint_count = 0; |
nkeynes@363 | 35 | |
nkeynes@363 | 36 | #define MAX_INS_SIZE 32 |
nkeynes@363 | 37 | |
nkeynes@363 | 38 | char *option_list = "s:o:d:h"; |
nkeynes@363 | 39 | struct option longopts[1] = { { NULL, 0, 0, 0 } }; |
nkeynes@363 | 40 | |
nkeynes@363 | 41 | char *input_file = NULL; |
nkeynes@363 | 42 | char *diff_file = NULL; |
nkeynes@363 | 43 | char *output_file = NULL; |
nkeynes@602 | 44 | gboolean sh4_starting; |
nkeynes@363 | 45 | uint32_t start_addr = 0x8C010000; |
nkeynes@365 | 46 | uint32_t sh4_cpu_period = 5; |
nkeynes@586 | 47 | sh4ptr_t sh4_main_ram; |
nkeynes@363 | 48 | FILE *in; |
nkeynes@363 | 49 | |
nkeynes@363 | 50 | char *inbuf; |
nkeynes@365 | 51 | |
nkeynes@365 | 52 | struct x86_symbol local_symbols[] = { |
nkeynes@365 | 53 | { "_sh4_read_byte", sh4_read_byte }, |
nkeynes@365 | 54 | { "_sh4_read_word", sh4_read_word }, |
nkeynes@365 | 55 | { "_sh4_read_long", sh4_read_long }, |
nkeynes@365 | 56 | { "_sh4_write_byte", sh4_write_byte }, |
nkeynes@365 | 57 | { "_sh4_write_word", sh4_write_word }, |
nkeynes@365 | 58 | { "_sh4_write_long", sh4_write_long } |
nkeynes@365 | 59 | }; |
nkeynes@363 | 60 | |
nkeynes@905 | 61 | int32_t FASTCALL sh4_read_byte( uint32_t addr ) |
nkeynes@363 | 62 | { |
nkeynes@363 | 63 | return *(uint8_t *)(inbuf+(addr-start_addr)); |
nkeynes@363 | 64 | } |
nkeynes@905 | 65 | int32_t FASTCALL sh4_read_word( uint32_t addr ) |
nkeynes@363 | 66 | { |
nkeynes@363 | 67 | return *(uint16_t *)(inbuf+(addr-start_addr)); |
nkeynes@363 | 68 | } |
nkeynes@905 | 69 | int32_t FASTCALL sh4_read_long( uint32_t addr ) |
nkeynes@363 | 70 | { |
nkeynes@363 | 71 | return *(uint32_t *)(inbuf+(addr-start_addr)); |
nkeynes@363 | 72 | } |
nkeynes@363 | 73 | // Stubs |
nkeynes@802 | 74 | gboolean sh4_execute_instruction( ) { return TRUE; } |
nkeynes@363 | 75 | void sh4_accept_interrupt() {} |
nkeynes@586 | 76 | void sh4_set_breakpoint( uint32_t pc, breakpoint_type_t type ) { } |
nkeynes@802 | 77 | gboolean sh4_clear_breakpoint( uint32_t pc, breakpoint_type_t type ) { return TRUE; } |
nkeynes@775 | 78 | gboolean dreamcast_is_running() { return FALSE; } |
nkeynes@802 | 79 | int sh4_get_breakpoint( uint32_t pc ) { return 0; } |
nkeynes@740 | 80 | void sh4_core_exit( int exit_code ){} |
nkeynes@740 | 81 | void sh4_flush_icache(){} |
nkeynes@363 | 82 | void event_execute() {} |
nkeynes@363 | 83 | void TMU_run_slice( uint32_t nanos ) {} |
nkeynes@884 | 84 | void PMM_write_control( int ctr, uint32_t val ) { } |
nkeynes@363 | 85 | void SCIF_run_slice( uint32_t nanos ) {} |
nkeynes@905 | 86 | void FASTCALL sh4_write_byte( uint32_t addr, uint32_t val ) {} |
nkeynes@905 | 87 | void FASTCALL sh4_write_word( uint32_t addr, uint32_t val ) {} |
nkeynes@905 | 88 | void FASTCALL sh4_write_long( uint32_t addr, uint32_t val ) {} |
nkeynes@905 | 89 | void FASTCALL sh4_write_fpscr( uint32_t val ) { } |
nkeynes@905 | 90 | void FASTCALL sh4_write_sr( uint32_t val ) { } |
nkeynes@905 | 91 | uint32_t FASTCALL sh4_read_sr( void ) { return 0; } |
nkeynes@905 | 92 | void FASTCALL sh4_sleep() { } |
nkeynes@905 | 93 | void FASTCALL sh4_fsca( uint32_t angle, float *fr ) { } |
nkeynes@905 | 94 | void FASTCALL sh4_ftrv( float *fv ) { } |
nkeynes@905 | 95 | void FASTCALL signsat48(void) { } |
nkeynes@669 | 96 | void sh4_switch_fr_banks() { } |
nkeynes@586 | 97 | void mem_copy_to_sh4( sh4addr_t addr, sh4ptr_t src, size_t size ) { } |
nkeynes@602 | 98 | gboolean sh4_has_page( sh4vma_t vma ) { return TRUE; } |
nkeynes@385 | 99 | void syscall_invoke( uint32_t val ) { } |
nkeynes@586 | 100 | void dreamcast_stop() {} |
nkeynes@586 | 101 | void dreamcast_reset() {} |
nkeynes@905 | 102 | gboolean FASTCALL sh4_raise_reset( int exc ) { return TRUE; } |
nkeynes@905 | 103 | gboolean FASTCALL sh4_raise_exception( int exc ) { return TRUE; } |
nkeynes@905 | 104 | gboolean FASTCALL sh4_raise_tlb_exception( int exc ) { return TRUE; } |
nkeynes@905 | 105 | gboolean FASTCALL sh4_raise_trap( int exc ) { return TRUE; } |
nkeynes@802 | 106 | uint32_t sh4_sleep_run_slice(uint32_t nanosecs) { return nanosecs; } |
nkeynes@802 | 107 | gboolean gui_error_dialog( const char *fmt, ... ) { return TRUE; } |
nkeynes@586 | 108 | struct sh4_icache_struct sh4_icache; |
nkeynes@363 | 109 | |
nkeynes@363 | 110 | void usage() |
nkeynes@363 | 111 | { |
nkeynes@363 | 112 | fprintf( stderr, "Usage: testsh4x86 [options] <input bin file>\n"); |
nkeynes@363 | 113 | fprintf( stderr, "Options:\n"); |
nkeynes@363 | 114 | fprintf( stderr, " -d <filename> Diff results against contents of file\n" ); |
nkeynes@363 | 115 | fprintf( stderr, " -h Display this help message\n" ); |
nkeynes@363 | 116 | fprintf( stderr, " -o <filename> Output disassembly to file [stdout]\n" ); |
nkeynes@363 | 117 | fprintf( stderr, " -s <addr> Specify start address of binary [8C010000]\n" ); |
nkeynes@363 | 118 | } |
nkeynes@363 | 119 | |
nkeynes@363 | 120 | void emit( void *ptr, int level, const gchar *source, const char *msg, ... ) |
nkeynes@363 | 121 | { |
nkeynes@363 | 122 | va_list ap; |
nkeynes@363 | 123 | va_start( ap, msg ); |
nkeynes@363 | 124 | vfprintf( stderr, msg, ap ); |
nkeynes@363 | 125 | fprintf( stderr, "\n" ); |
nkeynes@363 | 126 | va_end(ap); |
nkeynes@363 | 127 | } |
nkeynes@363 | 128 | |
nkeynes@363 | 129 | |
nkeynes@363 | 130 | struct sh4_registers sh4r; |
nkeynes@363 | 131 | |
nkeynes@363 | 132 | |
nkeynes@363 | 133 | int main( int argc, char *argv[] ) |
nkeynes@363 | 134 | { |
nkeynes@363 | 135 | struct stat st; |
nkeynes@363 | 136 | int opt; |
nkeynes@363 | 137 | while( (opt = getopt_long( argc, argv, option_list, longopts, NULL )) != -1 ) { |
nkeynes@363 | 138 | switch( opt ) { |
nkeynes@363 | 139 | case 'd': |
nkeynes@363 | 140 | diff_file = optarg; |
nkeynes@363 | 141 | break; |
nkeynes@363 | 142 | case 'o': |
nkeynes@363 | 143 | output_file = optarg; |
nkeynes@363 | 144 | break; |
nkeynes@363 | 145 | case 's': |
nkeynes@363 | 146 | start_addr = strtoul(optarg, NULL, 0); |
nkeynes@363 | 147 | break; |
nkeynes@363 | 148 | case 'h': |
nkeynes@363 | 149 | usage(); |
nkeynes@363 | 150 | exit(0); |
nkeynes@363 | 151 | } |
nkeynes@363 | 152 | } |
nkeynes@363 | 153 | if( optind < argc ) { |
nkeynes@363 | 154 | input_file = argv[optind++]; |
nkeynes@363 | 155 | } else { |
nkeynes@363 | 156 | usage(); |
nkeynes@363 | 157 | exit(1); |
nkeynes@363 | 158 | } |
nkeynes@363 | 159 | |
nkeynes@363 | 160 | in = fopen( input_file, "ro" ); |
nkeynes@363 | 161 | if( in == NULL ) { |
nkeynes@363 | 162 | perror( "Unable to open input file" ); |
nkeynes@363 | 163 | exit(2); |
nkeynes@363 | 164 | } |
nkeynes@363 | 165 | fstat( fileno(in), &st ); |
nkeynes@363 | 166 | inbuf = malloc( st.st_size ); |
nkeynes@363 | 167 | fread( inbuf, st.st_size, 1, in ); |
nkeynes@363 | 168 | |
nkeynes@365 | 169 | xlat_cache_init(); |
nkeynes@363 | 170 | uint32_t pc; |
nkeynes@365 | 171 | uint8_t *buf = sh4_translate_basic_block( start_addr ); |
nkeynes@365 | 172 | uint32_t buflen = xlat_get_block_size(buf); |
nkeynes@365 | 173 | x86_disasm_init( buf, 0x8c010000, buflen ); |
nkeynes@365 | 174 | x86_set_symtab( local_symbols, 6 ); |
nkeynes@363 | 175 | for( pc = 0x8c010000; pc < 0x8c010000 + buflen; ) { |
nkeynes@363 | 176 | char buf[256]; |
nkeynes@363 | 177 | char op[256]; |
nkeynes@363 | 178 | uint32_t pc2 = x86_disasm_instruction( pc, buf, sizeof(buf), op ); |
nkeynes@363 | 179 | fprintf( stdout, "%08X: %-20s %s\n", pc, op, buf ); |
nkeynes@363 | 180 | pc = pc2; |
nkeynes@363 | 181 | } |
nkeynes@802 | 182 | return 0; |
nkeynes@363 | 183 | } |
.