1 /* Disassemble WDC 65816 instructions.
2 Copyright (C) 1995-2016 Free Software Foundation, Inc.
3
4 This file is part of the GNU opcodes library.
5
6 This library is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3, or (at your option)
9 any later version.
10
11 It is distributed in the hope that it will be useful, but WITHOUT
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
13 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
14 License for more details.
15
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
19 MA 02110-1301, USA. */
20
21 #include "sysdep.h"
22 #include <stdio.h>
23
24 #define STATIC_TABLE
25 #define DEFINE_TABLE
26
27 #include "w65-opc.h"
28 #include "dis-asm.h"
29
30 static fprintf_ftype fpr;
31 static void *stream;
32 static struct disassemble_info *local_info;
33
34 static void
print_operand(int lookup,char * format,int * args)35 print_operand (int lookup, char *format, int *args)
36 {
37 int val;
38 int c;
39
40 while (*format)
41 {
42 switch (c = *format++)
43 {
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);
50
51 break;
52 default:
53 fpr (stream, "%c", c);
54 break;
55 }
56 }
57 }
58
59 int
print_insn_w65(bfd_vma memaddr,struct disassemble_info * info)60 print_insn_w65 (bfd_vma memaddr, struct disassemble_info *info)
61 {
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];
69
70 stream = info->stream;
71 fpr = info->fprintf_func;
72 local_info = info;
73
74 for (i = 0; i < 4 && status == 0; i++)
75 status = info->read_memory_func (memaddr + i, insn + i, 1, info);
76
77 for (op = optable; op->val != insn[0]; op++)
78 ;
79
80 fpr (stream, "%s", op->name);
81
82 /* Prepare all the posible operand values. */
83 {
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;
90
91 switch (op->amode)
92 {
93 DISASM ();
94 }
95
96 return size;
97 }
98 }
99