FreeChainXenon/binutils-gdb
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* mn10200-dis.c: Finish writing disassembler.

Browse source 
* mn10200-opc.c (mn10200_opcodes): Fix mask for "mov imm8,dn".
        Fix mask for "jmp (an)".
mn10200 disassembler works!
This commit is contained in:
Jeff Law 1996-12-12 08:09:27 +00:00
parent 78b9b17039
commit c6b62ad1d7
3 changed files with 125 additions and 164 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
opcodes/ChangeLog
View file

@ -1,5 +1,12 @@
Wed Dec 11 09:23:46 1996 Jeffrey A Law (law@cygnus.com) Wed Dec 11 09:23:46 1996 Jeffrey A Law (law@cygnus.com)
* mn10200-dis.c: Finish writing disassembler.
* mn10200-opc.c (mn10200_opcodes): Fix mask for "mov imm8,dn".
Fix mask for "jmp (an)".
* mn10300-dis.c (disassemble, print_insn_mn10300): Corrently
handle endianness issues for mn10300.
* mn10200-opc.c (mn10200_opcodes): Fix operands for "movb dm,(an)". * mn10200-opc.c (mn10200_opcodes): Fix operands for "movb dm,(an)".
Tue Dec 10 12:08:05 1996 Jeffrey A Law (law@cygnus.com) Tue Dec 10 12:08:05 1996 Jeffrey A Law (law@cygnus.com)

278
opcodes/mn10200-dis.c
View file

@ -33,8 +33,7 @@ print_insn_mn10200 (memaddr, info)
{ {
int status; int status;
bfd_byte buffer[4]; bfd_byte buffer[4];
unsigned long insn; unsigned long insn, extension;
unsigned long extension;
unsigned int consume; unsigned int consume;
/* First figure out how big the opcode is. */ /* First figure out how big the opcode is. */
@ -47,55 +46,41 @@ print_insn_mn10200 (memaddr, info)
insn = *(unsigned char *) buffer; insn = *(unsigned char *) buffer;
/* These are one byte insns. */ /* These are one byte insns. */
if ((insn & 0xf3) == 0x00 if ((insn & 0xf0) == 0x00
|| (insn & 0xf0) == 0x10 || (insn & 0xf0) == 0x10
|| (insn & 0xfc) == 0x3c || (insn & 0xf0) == 0x20
|| (insn & 0xf3) == 0x41 || (insn & 0xf0) == 0x30
|| (insn & 0xf3) == 0x40
|| (insn & 0xfc) == 0x50
|| (insn & 0xfc) == 0x54
|| (insn & 0xf0) == 0x60
|| (insn & 0xf0) == 0x70
|| ((insn & 0xf0) == 0x80 || ((insn & 0xf0) == 0x80
&& (insn & 0x0c) >> 2 != (insn & 0x03)) && (insn & 0x0c) >> 2 != (insn & 0x03))
|| ((insn & 0xf0) == 0x90 || (insn & 0xf0) == 0x90
&& (insn & 0x0c) >> 2 != (insn & 0x03)) || (insn & 0xf0) == 0xa0
|| ((insn & 0xf0) == 0xa0 || (insn & 0xf0) == 0xb0
&& (insn & 0x0c) >> 2 != (insn & 0x03)) || (insn & 0xff) == 0xeb
|| ((insn & 0xf0) == 0xb0 || (insn & 0xff) == 0xf6
&& (insn & 0x0c) >> 2 != (insn & 0x03)) || (insn & 0xff) == 0xfe)
|| (insn & 0xff) == 0xcb
|| (insn & 0xfc) == 0xd0
|| (insn & 0xfc) == 0xd4
|| (insn & 0xfc) == 0xd8
|| (insn & 0xf0) == 0xe0)
{ {
extension = 0; extension = 0;
consume = 1; consume = 1;
} }
/* These are two byte insns. */ /* These are two byte insns. */
else if ((insn & 0xf0) == 0x80 else if ((insn & 0xf0) == 0x40
|| (insn & 0xf0) == 0x90 || (insn & 0xf0) == 0x50
|| (insn & 0xf0) == 0xa0 || (insn & 0xf0) == 0x60
|| (insn & 0xf0) == 0xb0 || (insn & 0xf0) == 0x70
|| (insn & 0xfc) == 0x20 || (insn & 0xf0) == 0x80
|| (insn & 0xfc) == 0x28 || (insn & 0xfc) == 0xd0
|| (insn & 0xf3) == 0x43 || (insn & 0xfc) == 0xd4
|| (insn & 0xf3) == 0x42 || (insn & 0xfc) == 0xd8
|| (insn & 0xfc) == 0x58 || (insn & 0xfc) == 0xe0
|| (insn & 0xfc) == 0x5c || (insn & 0xfc) == 0xe4
|| ((insn & 0xf0) == 0xc0 || (insn & 0xff) == 0xe8
&& (insn & 0xff) != 0xcb || (insn & 0xff) == 0xe9
&& (insn & 0xff) != 0xcc || (insn & 0xff) == 0xea
&& (insn & 0xff) != 0xcd)
|| (insn & 0xff) == 0xf0 || (insn & 0xff) == 0xf0
|| (insn & 0xff) == 0xf1 || (insn & 0xff) == 0xf1
|| (insn & 0xff) == 0xf2 || (insn & 0xff) == 0xf2
|| (insn & 0xff) == 0xf3 || (insn & 0xff) == 0xf3)
|| (insn & 0xff) == 0xf4
|| (insn & 0xff) == 0xf5
|| (insn & 0xff) == 0xf6)
{ {
status = (*info->read_memory_func) (memaddr, buffer, 2, info); status = (*info->read_memory_func) (memaddr, buffer, 2, info);
if (status != 0) if (status != 0)
@ -104,25 +89,50 @@ print_insn_mn10200 (memaddr, info)
return -1; return -1;
} }
insn = bfd_getb16 (buffer); insn = bfd_getb16 (buffer);
extension = 0;
consume = 2; consume = 2;
} }
/* These are three byte insns. */ /* These are three byte insns with a 16bit operand in little
else if ((insn & 0xff) == 0xf8 endian form. */
|| (insn & 0xff) == 0xcc else if ((insn & 0xf0) == 0xc0
|| (insn & 0xfc) == 0xdc
|| (insn & 0xfc) == 0xec
|| (insn & 0xff) == 0xf8
|| (insn & 0xff) == 0xf9 || (insn & 0xff) == 0xf9
|| (insn & 0xf3) == 0x01 || (insn & 0xff) == 0xfa
|| (insn & 0xf3) == 0x02 || (insn & 0xff) == 0xfb
|| (insn & 0xf3) == 0x03 || (insn & 0xff) == 0xfc
|| (insn & 0xfc) == 0x24 || (insn & 0xff) == 0xfd)
|| (insn & 0xfc) == 0x2c {
|| (insn & 0xfc) == 0x30 status = (*info->read_memory_func) (memaddr + 1, buffer, 2, info);
|| (insn & 0xfc) == 0x34 if (status != 0)
|| (insn & 0xfc) == 0x38 {
|| (insn & 0xff) == 0xde (*info->memory_error_func) (status, memaddr, info);
|| (insn & 0xff) == 0xdf return -1;
|| (insn & 0xff) == 0xcc) }
insn <<= 16;
insn |= bfd_getl16 (buffer);
extension = 0;
consume = 3;
}
/* These are three byte insns too, but we don't have to mess with
endianness stuff. */
else if ((insn & 0xff) == 0xf5)
{
status = (*info->read_memory_func) (memaddr + 1, buffer, 2, info);
if (status != 0)
{
(*info->memory_error_func) (status, memaddr, info);
return -1;
}
insn <<= 16;
insn |= bfd_getb16 (buffer);
extension = 0;
consume = 3;
}
/* These are four byte insns. */
else if ((insn & 0xff) == 0xf7)
{ {
status = (*info->read_memory_func) (memaddr, buffer, 2, info); status = (*info->read_memory_func) (memaddr, buffer, 2, info);
if (status != 0) if (status != 0)
@ -131,105 +141,57 @@ print_insn_mn10200 (memaddr, info)
return -1; return -1;
} }
insn = bfd_getb16 (buffer); insn = bfd_getb16 (buffer);
insn <<= 8; insn <<= 16;
status = (*info->read_memory_func) (memaddr + 2, buffer, 1, info); status = (*info->read_memory_func) (memaddr + 2, buffer, 2, info);
if (status != 0)
{
(*info->memory_error_func) (status, memaddr, info);
return -1;
}
insn |= bfd_getl16 (buffer);
extension = 0;
consume = 4;
}
/* These are five byte insns. */
else if ((insn & 0xff) == 0xf4)
{
status = (*info->read_memory_func) (memaddr, buffer, 2, info);
if (status != 0)
{
(*info->memory_error_func) (status, memaddr, info);
return -1;
}
insn = bfd_getb16 (buffer);
insn <<= 16;
status = (*info->read_memory_func) (memaddr + 4, buffer, 1, info);
if (status != 0)
{
(*info->memory_error_func) (status, memaddr, info);
return -1;
}
insn |= *(unsigned char *)buffer << 8;
status = (*info->read_memory_func) (memaddr + 3, buffer, 1, info);
if (status != 0) if (status != 0)
{ {
(*info->memory_error_func) (status, memaddr, info); (*info->memory_error_func) (status, memaddr, info);
return -1; return -1;
} }
insn |= *(unsigned char *)buffer; insn |= *(unsigned char *)buffer;
extension = 0;
consume = 3;
}
/* These are four byte insns. */ status = (*info->read_memory_func) (memaddr + 2, buffer, 1, info);
else if ((insn & 0xff) == 0xfa
|| (insn & 0xff) == 0xfb)
{
status = (*info->read_memory_func) (memaddr, buffer, 4, info);
if (status != 0) if (status != 0)
{ {
(*info->memory_error_func) (status, memaddr, info); (*info->memory_error_func) (status, memaddr, info);
return -1; return -1;
} }
insn = bfd_getb32 (buffer); extension = *(unsigned char *)buffer;
extension = 0;
consume = 4;
}
/* These are five byte insns. */
else if ((insn & 0xff) == 0xcd
|| (insn & 0xff) == 0xdc)
{
status = (*info->read_memory_func) (memaddr, buffer, 4, info);
if (status != 0)
{
(*info->memory_error_func) (status, memaddr, info);
return -1;
}
insn = bfd_getb32 (buffer);
status = (*info->read_memory_func) (memaddr + 4, buffer, 1, info);
if (status != 0)
{
(*info->memory_error_func) (status, memaddr + 4, info);
return -1;
}
extension = *(unsigned char *) buffer;
consume = 5; consume = 5;
} }
/* These are six byte insns. */
else if ((insn & 0xff) == 0xfd
|| (insn & 0xff) == 0xfc)
{
status = (*info->read_memory_func) (memaddr, buffer, 4, info);
if (status != 0)
{
(*info->memory_error_func) (status, memaddr, info);
return -1;
}
insn = bfd_getb32 (buffer);
status = (*info->read_memory_func) (memaddr + 4, buffer, 2, info);
if (status != 0)
{
(*info->memory_error_func) (status, memaddr + 4, info);
return -1;
}
extension = bfd_getb16 (buffer);
consume = 6;
}
/* Else its a seven byte insns (in theory). */
else else
{ return -1;
status = (*info->read_memory_func) (memaddr, buffer, 4, info);
if (status != 0)
{
(*info->memory_error_func) (status, memaddr, info);
return -1;
}
insn = bfd_getb32 (buffer);
status = (*info->read_memory_func) (memaddr + 4, buffer, 2, info);
if (status != 0)
{
(*info->memory_error_func) (status, memaddr + 4, info);
return -1;
}
extension = bfd_getb16 (buffer);
extension <<= 8;
status = (*info->read_memory_func) (memaddr + 6, buffer, 1, info);
if (status != 0)
{
(*info->memory_error_func) (status, memaddr + 6, info);
return -1;
}
extension |= *(unsigned char *)buffer;
consume = 7;
}
disassemble (memaddr, info, insn, extension, consume); disassemble (memaddr, info, insn, extension, consume);
@ -253,33 +215,29 @@ disassemble (memaddr, info, insn, extension, size)
{ {
int mysize, extra_shift; int mysize, extra_shift;
#if 0 if (op->format == FMT_1)
if (op->format == FMT_S0)
mysize = 1; mysize = 1;
else if (op->format == FMT_S1 else if (op->format == FMT_2
|| op->format == FMT_D0) || op->format == FMT_4)
mysize = 2; mysize = 2;
else if (op->format == FMT_S2 else if (op->format == FMT_3
|| op->format == FMT_D1) || op->format == FMT_5)
mysize = 3; mysize = 3;
else if (op->format == FMT_S4) else if (op->format == FMT_6)
mysize = 5;
else if (op->format == FMT_D2)
mysize = 4; mysize = 4;
else if (op->format == FMT_D4) else if (op->format == FMT_7)
mysize = 6; mysize = 5;
else else
mysize = 7; abort ();
if (op->format == FMT_D1 || op->format == FMT_S1) if (op->format == FMT_2 || op->format == FMT_5)
extra_shift = 8; extra_shift = 8;
else if (op->format == FMT_D2 || op->format == FMT_D4 else if (op->format == FMT_3
|| op->format == FMT_S2 || op->format == FMT_S4 || op->format == FMT_6
|| op->format == FMT_S6 || op->format == FMT_D5) || op->format == FMT_7)
extra_shift = 16; extra_shift = 16;
else else
extra_shift = 0; extra_shift = 0;
#endif
if ((op->mask & insn) == op->opcode if ((op->mask & insn) == op->opcode
&& size == mysize) && size == mysize)
@ -300,14 +258,10 @@ disassemble (memaddr, info, insn, extension, size)
operand = &mn10200_operands[*opindex_ptr]; operand = &mn10200_operands[*opindex_ptr];
if ((operand->flags & MN10200_OPERAND_SPLIT) != 0) if ((operand->flags & MN10200_OPERAND_EXTENDED) != 0)
{ {
unsigned long temp; value = (insn & 0xffff) << 8;
value = insn & ((1 << operand->bits) - 1); value |= extension;
value <<= (32 - operand->bits);
temp = extension >> operand->shift;
temp &= ((1 << (32 - operand->bits)) - 1);
value |= temp;
} }
else else
{ {

4
opcodes/mn10200-opc.c
View file

@ -155,7 +155,7 @@ const struct mn10200_operand mn10200_operands[] = {
sorted by major opcode. */ sorted by major opcode. */
const struct mn10200_opcode mn10200_opcodes[] = { const struct mn10200_opcode mn10200_opcodes[] = {
{ "mov", 0x8000, 0xfc00, FMT_2, {SIMM8, DN01}}, { "mov", 0x8000, 0xf000, FMT_2, {SIMM8, DN01}},
{ "mov", 0x80, 0xf0, FMT_1, {DN1, DM0}}, { "mov", 0x80, 0xf0, FMT_1, {DN1, DM0}},
{ "mov", 0xf230, 0xfff0, FMT_4, {DM1, AN0}}, { "mov", 0xf230, 0xfff0, FMT_4, {DM1, AN0}},
{ "mov", 0xf2f0, 0xfff0, FMT_4, {AN1, DM0}}, { "mov", 0xf2f0, 0xfff0, FMT_4, {AN1, DM0}},
@ -322,7 +322,7 @@ const struct mn10200_opcode mn10200_opcodes[] = {
{ "jmp", 0xfc0000, 0xff0000, FMT_3, {IMM16_PCREL}}, { "jmp", 0xfc0000, 0xff0000, FMT_3, {IMM16_PCREL}},
{ "jmp", 0xf4e00000, 0xffff0000, FMT_7, {IMM24_PCREL}}, { "jmp", 0xf4e00000, 0xffff0000, FMT_7, {IMM24_PCREL}},
{ "jmp", 0xf000, 0xfffc, FMT_4, {PAREN,AN1,PAREN}}, { "jmp", 0xf000, 0xfff3, FMT_4, {PAREN,AN1,PAREN}},
{ "jsr", 0xfd0000, 0xff0000, FMT_3, {IMM16_PCREL}}, { "jsr", 0xfd0000, 0xff0000, FMT_3, {IMM16_PCREL}},
{ "jsr", 0xf4e10000, 0xffff0000, FMT_7, {IMM24_PCREL}}, { "jsr", 0xf4e10000, 0xffff0000, FMT_7, {IMM24_PCREL}},
{ "jsr", 0xf001, 0xfff3, FMT_4, {PAREN,AN1,PAREN}}, { "jsr", 0xf001, 0xfff3, FMT_4, {PAREN,AN1,PAREN}},