1 /* Disassemble h8500 instructions.
2 Copyright (C) 1993, 94, 95, 1998 Free Software Foundation, Inc.
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2 of the License, or
7 (at your option) any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
20 #define DISASSEMBLER_TABLE
24 #include "h8500-opc.h"
28 /* Maximum length of an instruction. */
35 /* Points to first byte not fetched. */
36 bfd_byte
*max_fetched
;
37 bfd_byte the_buffer
[MAXLEN
];
42 /* Make sure that bytes from INFO->PRIVATE_DATA->BUFFER (inclusive)
43 to ADDR (exclusive) are valid. Returns 1 for success, longjmps
45 #define FETCH_DATA(info, addr) \
46 ((addr) <= ((struct private *)(info->private_data))->max_fetched \
47 ? 1 : fetch_data ((info), (addr)))
50 fetch_data (info
, addr
)
51 struct disassemble_info
*info
;
55 struct private *priv
= (struct private *) info
->private_data
;
56 bfd_vma start
= priv
->insn_start
+ (priv
->max_fetched
- priv
->the_buffer
);
58 status
= (*info
->read_memory_func
) (start
,
60 addr
- priv
->max_fetched
,
64 (*info
->memory_error_func
) (status
, start
, info
);
65 longjmp (priv
->bailout
, 1);
68 priv
->max_fetched
= addr
;
72 static char *crname
[] = { "sr", "ccr", "*", "br", "ep", "dp", "*", "tp" };
75 print_insn_h8500 (addr
, info
)
77 disassemble_info
*info
;
79 h8500_opcode_info
*opcode
;
80 void *stream
= info
->stream
;
81 fprintf_ftype func
= info
->fprintf_func
;
84 bfd_byte
*buffer
= priv
.the_buffer
;
86 info
->private_data
= (PTR
) & priv
;
87 priv
.max_fetched
= priv
.the_buffer
;
88 priv
.insn_start
= addr
;
89 if (setjmp (priv
.bailout
) != 0)
100 for (opcode
= h8500_table
; opcode
->name
; opcode
++)
102 if ((opcode
->bytes
[0].contents
& 0x8) == 0)
103 printf ("%s\n", opcode
->name
);
108 /* Run down the table to find the one which matches. */
109 for (opcode
= h8500_table
; opcode
->name
; opcode
++)
123 for (byte
= 0; byte
< opcode
->length
; byte
++)
125 FETCH_DATA (info
, buffer
+ byte
+ 1);
126 if ((buffer
[byte
] & opcode
->bytes
[byte
].mask
)
127 != (opcode
->bytes
[byte
].contents
))
133 /* Extract any info parts. */
134 switch (opcode
->bytes
[byte
].insert
)
140 /* xgettext:c-format */
141 func (stream
, _("can't cope with insert %d\n"),
142 opcode
->bytes
[byte
].insert
);
145 rn
= buffer
[byte
] & 0x7;
148 rs
= buffer
[byte
] & 0x7;
151 cr
= buffer
[byte
] & 0x7;
156 cr
= buffer
[byte
] & 0x7;
161 FETCH_DATA (info
, buffer
+ byte
+ 2);
162 disp
= (buffer
[byte
] << 8) | (buffer
[byte
+ 1]);
166 disp
= ((char) (buffer
[byte
]));
170 rd
= buffer
[byte
] & 0x7;
173 FETCH_DATA (info
, buffer
+ byte
+ 3);
176 | (buffer
[byte
+ 1] << 8)
177 | (buffer
[byte
+ 2]);
180 FETCH_DATA (info
, buffer
+ byte
+ 2);
181 abs
= (buffer
[byte
] << 8) | (buffer
[byte
+ 1]);
184 abs
= (buffer
[byte
]);
187 FETCH_DATA (info
, buffer
+ byte
+ 2);
188 imm
= (buffer
[byte
] << 8) | (buffer
[byte
+ 1]);
191 imm
= (buffer
[byte
]) & 0xf;
195 imm
= (buffer
[byte
]);
198 FETCH_DATA (info
, buffer
+ byte
+ 2);
199 pcrel
= (buffer
[byte
] << 8) | (buffer
[byte
+ 1]);
202 pcrel
= (buffer
[byte
]);
205 switch (buffer
[byte
] & 0x7)
225 /* We get here when all the masks have passed so we can output
227 FETCH_DATA (info
, buffer
+ opcode
->length
);
228 for (i
= 0; i
< opcode
->length
; i
++)
230 (func
) (stream
, "%02x ", buffer
[i
]);
234 (func
) (stream
, " ");
236 (func
) (stream
, "%s\t", opcode
->name
);
237 for (i
= 0; i
< opcode
->nargs
; i
++)
240 (func
) (stream
, ",");
241 switch (opcode
->arg_type
[i
])
247 func (stream
, "@(0x%x:16,r%d)", disp
, rn
);
250 func (stream
, "@(0x%x:8 (%d),r%d)", disp
& 0xff, disp
, rn
);
253 func (stream
, "@(0x%x:16,r%d)", disp
, rd
);
256 func (stream
, "@(0x%x:8 (%d), r%d)", disp
& 0xff, disp
, rd
);
259 func (stream
, "@(0x%x:8 (%d), fp)", disp
& 0xff, disp
, rn
);
263 func (stream
, "%s", crname
[cr
]);
266 func (stream
, "r%d", rn
);
269 func (stream
, "r%d", rd
);
272 func (stream
, "r%d", rs
);
275 func (stream
, "@-r%d", rn
);
278 func (stream
, "@r%d+", rn
);
281 func (stream
, "@r%d", rn
);
284 func (stream
, "@r%d", rd
);
287 func (stream
, "@sp+");
290 func (stream
, "@-sp");
293 func (stream
, "@0x%0x:24", abs
);
296 func (stream
, "@0x%0x:16", abs
& 0xffff);
299 func (stream
, "@0x%0x:8", abs
& 0xff);
302 func (stream
, "#0x%0x:16", imm
& 0xffff);
309 for (i
= 0; i
< 8; i
++)
313 func (stream
, "r%d", i
);
323 func (stream
, "#0x%0x:8", imm
& 0xff);
326 func (stream
, "0x%0x:16",
327 (pcrel
+ addr
+ opcode
->length
) & 0xffff);
330 func (stream
, "#0x%0x:8",
331 ((char) pcrel
+ addr
+ opcode
->length
) & 0xffff);
334 func (stream
, "#%d:q", qim
);
337 func (stream
, "#%d:4", imm
);
341 return opcode
->length
;
346 /* Couldn't understand anything. */
347 /* xgettext:c-format */
348 func (stream
, _("%02x\t\t*unknown*"), buffer
[0]);
This page took 0.036398 seconds and 4 git commands to generate.