12 static struct disassemble_info di;
15 #define print_insn_func print_insn_little_arm
16 #define BFD_ARCH bfd_arch_arm
17 #define BFD_MACH bfd_mach_arm_4T
19 #define print_insn_func print_insn_i386_intel
20 #define BFD_ARCH bfd_arch_i386
21 #define BFD_MACH bfd_mach_i386_i386_intel_syntax
25 static asymbol **symbols;
26 static long symcount, symstorage;
29 /* Filter out (in place) symbols that are useless for disassembly.
30 COUNT is the number of elements in SYMBOLS.
31 Return the number of useful symbols. */
33 remove_useless_symbols (asymbol **symbols, long count)
35 asymbol **in_ptr = symbols, **out_ptr = symbols;
39 asymbol *sym = *in_ptr++;
41 if (sym->name == NULL || sym->name[0] == '\0' || sym->name[0] == '$')
43 if (sym->flags & (BSF_DEBUGGING | BSF_SECTION_SYM))
45 if (bfd_is_und_section (sym->section)
46 || bfd_is_com_section (sym->section))
48 if (sym->value + sym->section->vma == 0)
51 printf("sym: %08lx %04x %08x v %08x \"%s\"\n",
52 (unsigned int)sym->value, (unsigned int)sym->flags, (unsigned int)sym->udata.i,
53 (unsigned int)sym->section->vma, sym->name);
58 return out_ptr - symbols;
61 static void slurp_symtab(const char *filename)
67 abfd = bfd_openr(filename, NULL);
69 fprintf(stderr, "failed to open: %s\n", filename);
73 if (!bfd_check_format(abfd, bfd_object))
76 if (!(bfd_get_file_flags(abfd) & HAS_SYMS))
79 symstorage = bfd_get_symtab_upper_bound(abfd);
83 symbols = malloc(symstorage);
87 symcount = bfd_canonicalize_symtab(abfd, symbols);
91 symcount = remove_useless_symbols(symbols, symcount);
96 fprintf(stderr, "no symbols in %s\n", bfd_get_filename(abfd));
104 static const char *lookup_name(bfd_vma addr)
106 asymbol **sptr = symbols;
109 for (i = 0; i < symcount; i++) {
110 asymbol *sym = *sptr++;
112 if (addr == sym->value + sym->section->vma)
119 /* Like target_read_memory, but slightly different parameters. */
121 dis_asm_read_memory(bfd_vma memaddr, bfd_byte *myaddr, unsigned int len,
122 struct disassemble_info *info)
124 memcpy(myaddr, (void *)(int)memaddr, len);
129 dis_asm_memory_error(int status, bfd_vma memaddr,
130 struct disassemble_info *info)
132 fprintf(stderr, "memory_error %p\n", (void *)(int)memaddr);
136 dis_asm_print_address(bfd_vma addr, struct disassemble_info *info)
140 printf("%08x", (int)addr);
142 name = lookup_name(addr);
144 printf(" <%s>", name);
147 static int insn_printf(void *f, const char *format, ...)
152 va_start(args, format);
153 n = vprintf(format, args);
159 static void host_dasm_init(void)
162 slurp_symtab(g_argv[0]);
164 init_disassemble_info(&di, NULL, insn_printf);
165 di.flavour = bfd_target_unknown_flavour;
166 di.memory_error_func = dis_asm_memory_error;
167 di.print_address_func = dis_asm_print_address;
168 // di.symbol_at_address_func = dis_asm_symbol_at_address;
169 di.read_memory_func = dis_asm_read_memory;
172 di.endian = BFD_ENDIAN_LITTLE;
173 disassemble_init_for_target(&di);
177 void host_dasm(void *addr, int len)
179 bfd_vma vma_end, vma = (bfd_vma)(long)addr;
186 while (vma < vma_end) {
187 name = lookup_name(vma);
189 printf("%s:\n", name);
191 printf(" %08lx ", (long)vma);
192 vma += print_insn_func(vma, &di);
197 void host_dasm_new_symbol_(void *addr, const char *name)
199 bfd_vma vma = (bfd_vma)(long)addr;
206 if (symstorage <= symcount * sizeof(symbols[0])) {
207 tmp = realloc(symbols, symstorage * 2);
214 symbols[symcount] = calloc(sizeof(*symbols[0]), 1);
215 if (symbols[symcount] == NULL)
218 // a HACK (should use correct section), but ohwell
219 sym = symbols[symcount];
220 sym->section = symbols[0]->section;
221 sym->value = vma - sym->section->vma;