Search
lxdream.org :: lxdream/src/x86dasm/x86dasm.c
lxdream 0.9.1
released Jun 29
Download Now
filename src/x86dasm/x86dasm.c
changeset 1065:bc1cc0c54917
prev1026:a0aa3c503103
prev571:9bc09948d0f2
next1087:d54c499b48c7
author nkeynes
date Sun Jul 05 13:52:50 2009 +1000 (12 years ago)
permissions -rw-r--r--
last change No-op merge lxdream-mmu to remove head (actually merged long ago)
view annotate diff log raw
     1 /**
     2  * $Id$
     3  *
     4  * Wrapper around i386-dis to supply the same behaviour as the other
     5  * disassembly functions.
     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 <stdarg.h>
    21 #include <string.h>
    22 #include "x86dasm/x86dasm.h"
    23 #include "x86dasm/bfd.h"
    24 #include "x86dasm/dis-asm.h"
    25 #include "sh4/sh4.h"
    26 #include "sh4/sh4trans.h"
    28 const struct cpu_desc_struct x86_cpu_desc = 
    29     { "x86", (disasm_func_t)x86_disasm_instruction, NULL, mem_has_page, 
    30       NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, 1, 
    31       NULL, 0, NULL, 0, 0,  
    32       &sh4r.pc };
    34 static int x86_disasm_output( void *data, const char *format, ... );
    35 static void x86_print_address( bfd_vma memaddr, struct disassemble_info *info );
    37 static struct disassemble_info x86_disasm_info;
    39 static x86_symbol *x86_symtab;
    40 static int x86_num_symbols = 0;   
    43 void xlat_disasm_block( FILE *out, void *block )
    44 {
    45     uint32_t buflen = xlat_get_code_size(block);
    46     x86_set_symtab( NULL, 0 );
    47     x86_disasm_block( out, block, buflen );
    48 }
    50 void x86_disasm_block(FILE *out, void *start, uint32_t len)
    51 {
    52     uintptr_t start_addr = (uintptr_t)start;
    53     uintptr_t pc;
    54     x86_disasm_init( start, start_addr, len );
    55     for( pc = start_addr; pc < start_addr + len;  ) {
    56 	char buf[256];
    57 	char op[256];
    58 	uintptr_t pc2 = x86_disasm_instruction( pc, buf, sizeof(buf), op );
    59 	fprintf( out, "%08X: %-20s %s\n", (unsigned int)pc, op, buf );
    60 	pc = pc2;
    61     }
    62 }
    64 void x86_disasm_init(unsigned char *buf, uintptr_t vma, int buflen)
    65 {
    66     init_disassemble_info( &x86_disasm_info, NULL, x86_disasm_output );
    67     x86_disasm_info.arch = bfd_arch_i386;
    68 #if SIZEOF_VOID_P == 8
    69     x86_disasm_info.mach =  bfd_mach_x86_64_intel_syntax;
    70 #else
    71     x86_disasm_info.mach = bfd_mach_i386_i386_intel_syntax;
    72 #endif
    73     x86_disasm_info.endian = BFD_ENDIAN_LITTLE;
    74     x86_disasm_info.buffer = buf;
    75     x86_disasm_info.buffer_vma = vma;
    76     x86_disasm_info.buffer_length = buflen;
    77     x86_disasm_info.print_address_func = x86_print_address;
    78 }
    80 void x86_set_symtab( x86_symbol *symtab, int num_symbols )
    81 {
    82     x86_symtab = symtab;
    83     x86_num_symbols = num_symbols;
    84 }
    86 static const char *x86_find_symbol( bfd_vma memaddr, struct disassemble_info *info )
    87 {
    88     int i;
    89     for( i=0; i<x86_num_symbols; i++ ) {
    90 	if( x86_symtab[i].ptr == (void *)(uintptr_t)memaddr ) {
    91 	    return x86_symtab[i].name;
    92 	}
    93     }
    94     return NULL;
    95 }
    97 static void x86_print_address( bfd_vma memaddr, struct disassemble_info *info )
    98 {
    99     const char *sym = x86_find_symbol(memaddr, info);
   100     info->fprintf_func( info->stream, "%08X", memaddr );
   101     if( sym != NULL ) {
   102 	info->fprintf_func( info->stream, " <%s>", sym );
   103     }
   104 }
   106 void x86_print_symbolic_operand( char *buf, int hex, unsigned int disp )
   107 {
   108     const char *sym = x86_find_symbol(disp, NULL);
   109     if( sym != NULL ) {
   110         snprintf( buf, 50, "<%s>", sym );
   111     } else if( hex ) {
   112         sprintf( buf, "0x%x", disp );
   113     } else {
   114         sprintf( buf, "%d", (int)disp );
   115     }
   116 }
   118 uintptr_t x86_disasm_instruction( uintptr_t pc, char *buf, int len, char *opcode )
   119 {
   120     int count, i;
   122     x86_disasm_info.stream = buf;
   123     buf[0] = 0;
   124     count = print_insn_i386_att( pc, &x86_disasm_info );
   125     if( count != 0 ) {
   126 	unsigned char tmp[count];
   127 	x86_disasm_info.read_memory_func( pc, tmp, count, &x86_disasm_info );
   128 	for( i=0; i<count; i++ ) {
   129 	    sprintf( opcode, "%02X ", ((unsigned int)tmp[i])&0xFF );
   130 	    opcode += 3;
   131 	}
   132 	*(opcode-1) = '\0';
   133     }
   134     return pc + count;
   135 }
   137 int x86_disasm_output( void *data, const char *format, ... )
   138 {
   139     char *p = (char *)data;
   140     va_list ap;
   141     int n;
   142     p += strlen(p);
   143     va_start( ap, format );
   144     n = vsprintf( p, format, ap );
   145     va_end( ap );
   146     return n;
   147 }
.