1 /* jit/powerpc/disass.c - wrapper functions for GNU binutils disassembler
3 Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003
4 Institut f. Computersprachen, TU Wien
5 R. Grafl, A. Krall, C. Kruegel, C. Oates, R. Obermaisser, M. Probst,
6 S. Ring, E. Steiner, C. Thalinger, D. Thuernbeck, P. Tomsich,
9 This file is part of CACAO.
11 This program is free software; you can redistribute it and/or
12 modify it under the terms of the GNU General Public License as
13 published by the Free Software Foundation; either version 2, or (at
14 your option) any later version.
16 This program is distributed in the hope that it will be useful, but
17 WITHOUT ANY WARRANTY; without even the implied warranty of
18 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
19 General Public License for more details.
21 You should have received a copy of the GNU General Public License
22 along with this program; if not, write to the Free Software
23 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
26 Contact: cacao@complang.tuwien.ac.at
28 Authors: Andreas Krall
33 $Id: disass.c 568 2003-11-06 14:42:16Z twisti $
80 void myprintf(PTR p, const char *fmt, ...)
90 int buffer_read_memory(bfd_vma memaddr, bfd_byte *myaddr, unsigned int length, struct disassemble_info *info)
92 memcpy(myaddr, (void*) memaddr, length);
97 void perror_memory(int status, bfd_vma memaddr, struct disassemble_info *info)
103 void generic_print_address(bfd_vma addr, struct disassemble_info *info)
105 myprintf(NULL, "0x%x", addr - (u4) info->application_data);
109 int generic_symbol_at_address(bfd_vma addr, struct disassemble_info *info)
115 unsigned long bfd_getb32(void *buf)
117 return *(unsigned long *) buf;
121 unsigned long bfd_getl32(void *buf)
123 return *(unsigned long *) buf;
127 void sprintf_vma(char *buf, bfd_vma disp)
129 sprintf(buf, "0x%x", disp);
133 void disassinstr(int c, int pos)
135 disassemble_info info;
137 printf("%6x: %8x ", pos, c);
139 INIT_DISASSEMBLE_INFO(info, NULL, myprintf);
140 info.application_data = (PTR) ((u4) &c - pos);
141 print_insn_big_powerpc((bfd_vma) &c, &info);
146 void disassemble(int *code, int len)
149 disassemble_info info;
151 INIT_DISASSEMBLE_INFO(info, NULL, myprintf);
152 info.application_data = code;
153 printf (" --- disassembler listing ---\n");
154 for (p = 0; p < len; p += 4, code++) {
155 myprintf(NULL, "%6x: %08x ", p, *code);
156 print_insn_big_powerpc((bfd_vma) p, &info);
157 myprintf(NULL, "\n");
163 * These are local overrides for various environment variables in Emacs.
164 * Please do not remove this and leave it at the end of the file, where
165 * Emacs will automagically detect them.
166 * ---------------------------------------------------------------------
169 * indent-tabs-mode: t