gas/testsuite/
[binutils.git] / opcodes / w65-dis.c
blob60d9b04595930c9086cbd27486c9bde5866a2e01
1 /* Disassemble WDC 65816 instructions.
2 Copyright 1995, 1998, 2000, 2001, 2002, 2005, 2007
3 Free Software Foundation, Inc.
5 This file is part of the GNU opcodes library.
7 This library is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3, or (at your option)
10 any later version.
12 It is distributed in the hope that it will be useful, but WITHOUT
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
14 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
15 License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
22 #include <stdio.h>
23 #include "sysdep.h"
24 #define STATIC_TABLE
25 #define DEFINE_TABLE
27 #include "w65-opc.h"
28 #include "dis-asm.h"
30 static fprintf_ftype fpr;
31 static void *stream;
32 static struct disassemble_info *local_info;
34 static void
35 print_operand (int lookup, char *format, int *args)
37 int val;
38 int c;
40 while (*format)
42 switch (c = *format++)
44 case '$':
45 val = args[(*format++) - '0'];
46 if (lookup)
47 local_info->print_address_func (val, local_info);
48 else
49 fpr (stream, "0x%x", val);
51 break;
52 default:
53 fpr (stream, "%c", c);
54 break;
59 int
60 print_insn_w65 (bfd_vma memaddr, struct disassemble_info *info)
62 int status = 0;
63 unsigned char insn[4];
64 const struct opinfo *op;
65 int i;
66 int X = 0;
67 int M = 0;
68 int args[2];
70 stream = info->stream;
71 fpr = info->fprintf_func;
72 local_info = info;
74 for (i = 0; i < 4 && status == 0; i++)
75 status = info->read_memory_func (memaddr + i, insn + i, 1, info);
77 for (op = optable; op->val != insn[0]; op++)
80 fpr (stream, "%s", op->name);
82 /* Prepare all the posible operand values. */
84 int size = 1;
85 int asR_W65_ABS8 = insn[1];
86 int asR_W65_ABS16 = (insn[2] << 8) + asR_W65_ABS8;
87 int asR_W65_ABS24 = (insn[3] << 16) + asR_W65_ABS16;
88 int asR_W65_PCR8 = ((char) (asR_W65_ABS8)) + memaddr + 2;
89 int asR_W65_PCR16 = ((short) (asR_W65_ABS16)) + memaddr + 3;
91 switch (op->amode)
93 DISASM ();
96 return size;