/* m32c opcode support. -*- C -*-
|
/* m32c opcode support. -*- C -*-
|
|
|
Copyright 2005, 2007 Free Software Foundation, Inc.
|
Copyright 2005, 2007 Free Software Foundation, Inc.
|
|
|
Contributed by Red Hat Inc; developed under contract from Renesas
|
Contributed by Red Hat Inc; developed under contract from Renesas
|
|
|
This file is part of the GNU Binutils.
|
This file is part of the GNU Binutils.
|
|
|
This program is free software; you can redistribute it and/or modify
|
This program is free software; you can redistribute it and/or modify
|
it under the terms of the GNU General Public License as published by
|
it under the terms of the GNU General Public License as published by
|
the Free Software Foundation; either version 3 of the License, or
|
the Free Software Foundation; either version 3 of the License, or
|
(at your option) any later version.
|
(at your option) any later version.
|
|
|
This program is distributed in the hope that it will be useful,
|
This program is distributed in the hope that it will be useful,
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
GNU General Public License for more details.
|
GNU General Public License for more details.
|
|
|
You should have received a copy of the GNU General Public License
|
You should have received a copy of the GNU General Public License
|
along with this program; if not, write to the Free Software
|
along with this program; if not, write to the Free Software
|
Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
|
Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
|
MA 02110-1301, USA. */
|
MA 02110-1301, USA. */
|
|
|
|
|
/* This file is an addendum to m32c.cpu. Heavy use of C code isn't
|
/* This file is an addendum to m32c.cpu. Heavy use of C code isn't
|
appropriate in .cpu files, so it resides here. This especially applies
|
appropriate in .cpu files, so it resides here. This especially applies
|
to assembly/disassembly where parsing/printing can be quite involved.
|
to assembly/disassembly where parsing/printing can be quite involved.
|
Such things aren't really part of the specification of the cpu, per se,
|
Such things aren't really part of the specification of the cpu, per se,
|
so .cpu files provide the general framework and .opc files handle the
|
so .cpu files provide the general framework and .opc files handle the
|
nitty-gritty details as necessary.
|
nitty-gritty details as necessary.
|
|
|
Each section is delimited with start and end markers.
|
Each section is delimited with start and end markers.
|
|
|
-opc.h additions use: "-- opc.h"
|
-opc.h additions use: "-- opc.h"
|
-opc.c additions use: "-- opc.c"
|
-opc.c additions use: "-- opc.c"
|
-asm.c additions use: "-- asm.c"
|
-asm.c additions use: "-- asm.c"
|
-dis.c additions use: "-- dis.c"
|
-dis.c additions use: "-- dis.c"
|
-ibd.h additions use: "-- ibd.h". */
|
-ibd.h additions use: "-- ibd.h". */
|
|
|
/* -- opc.h */
|
/* -- opc.h */
|
|
|
/* Needed for RTL's 'ext' and 'trunc' operators. */
|
/* Needed for RTL's 'ext' and 'trunc' operators. */
|
#include "cgen-types.h"
|
#include "cgen-types.h"
|
#include "cgen-ops.h"
|
#include "cgen-ops.h"
|
|
|
/* We can't use the default hash size because many bits are used by
|
/* We can't use the default hash size because many bits are used by
|
operands. */
|
operands. */
|
#define CGEN_DIS_HASH_SIZE 1
|
#define CGEN_DIS_HASH_SIZE 1
|
#define CGEN_DIS_HASH(buf, value) 0
|
#define CGEN_DIS_HASH(buf, value) 0
|
#define CGEN_VERBOSE_ASSEMBLER_ERRORS
|
#define CGEN_VERBOSE_ASSEMBLER_ERRORS
|
#define CGEN_VALIDATE_INSN_SUPPORTED
|
#define CGEN_VALIDATE_INSN_SUPPORTED
|
|
|
extern int m32c_cgen_insn_supported (CGEN_CPU_DESC, const CGEN_INSN *);
|
extern int m32c_cgen_insn_supported (CGEN_CPU_DESC, const CGEN_INSN *);
|
|
|
#define CGEN_ASM_HASH_SIZE 0xffff
|
#define CGEN_ASM_HASH_SIZE 0xffff
|
#define CGEN_ASM_HASH(mnem) m32c_asm_hash ((mnem))
|
#define CGEN_ASM_HASH(mnem) m32c_asm_hash ((mnem))
|
|
|
/* -- */
|
/* -- */
|
|
|
/* -- opc.c */
|
/* -- opc.c */
|
static unsigned int
|
static unsigned int
|
m32c_asm_hash (const char *mnem)
|
m32c_asm_hash (const char *mnem)
|
{
|
{
|
unsigned int h;
|
unsigned int h;
|
|
|
/* The length of the mnemonic for the Jcnd insns is 1. Hash jsri. */
|
/* The length of the mnemonic for the Jcnd insns is 1. Hash jsri. */
|
if (mnem[0] == 'j' && mnem[1] != 's')
|
if (mnem[0] == 'j' && mnem[1] != 's')
|
return 'j';
|
return 'j';
|
|
|
/* Don't hash scCND */
|
/* Don't hash scCND */
|
if (mnem[0] == 's' && mnem[1] == 'c')
|
if (mnem[0] == 's' && mnem[1] == 'c')
|
return 's';
|
return 's';
|
|
|
/* Don't hash bmCND */
|
/* Don't hash bmCND */
|
if (mnem[0] == 'b' && mnem[1] == 'm')
|
if (mnem[0] == 'b' && mnem[1] == 'm')
|
return 'b';
|
return 'b';
|
|
|
for (h = 0; *mnem && *mnem != ' ' && *mnem != ':'; ++mnem)
|
for (h = 0; *mnem && *mnem != ' ' && *mnem != ':'; ++mnem)
|
h += *mnem;
|
h += *mnem;
|
return h % CGEN_ASM_HASH_SIZE;
|
return h % CGEN_ASM_HASH_SIZE;
|
}
|
}
|
|
|
/* -- asm.c */
|
/* -- asm.c */
|
#include "safe-ctype.h"
|
#include "safe-ctype.h"
|
|
|
#define MACH_M32C 5 /* Must match md_begin. */
|
#define MACH_M32C 5 /* Must match md_begin. */
|
|
|
static int
|
static int
|
m32c_cgen_isa_register (const char **strp)
|
m32c_cgen_isa_register (const char **strp)
|
{
|
{
|
int u;
|
int u;
|
const char *s = *strp;
|
const char *s = *strp;
|
static char * m32c_register_names [] =
|
static char * m32c_register_names [] =
|
{
|
{
|
"r0", "r1", "r2", "r3", "r0l", "r0h", "r1l", "r1h",
|
"r0", "r1", "r2", "r3", "r0l", "r0h", "r1l", "r1h",
|
"a0", "a1", "r2r0", "r3r1", "sp", "fb", "dct0", "dct1", "flg", "svf",
|
"a0", "a1", "r2r0", "r3r1", "sp", "fb", "dct0", "dct1", "flg", "svf",
|
"drc0", "drc1", "dmd0", "dmd1", "intb", "svp", "vct", "isp", "dma0",
|
"drc0", "drc1", "dmd0", "dmd1", "intb", "svp", "vct", "isp", "dma0",
|
"dma1", "dra0", "dra1", "dsa0", "dsa1", 0
|
"dma1", "dra0", "dra1", "dsa0", "dsa1", 0
|
};
|
};
|
|
|
for (u = 0; m32c_register_names[u]; u++)
|
for (u = 0; m32c_register_names[u]; u++)
|
{
|
{
|
int len = strlen (m32c_register_names[u]);
|
int len = strlen (m32c_register_names[u]);
|
|
|
if (memcmp (m32c_register_names[u], s, len) == 0
|
if (memcmp (m32c_register_names[u], s, len) == 0
|
&& (s[len] == 0 || ! ISALNUM (s[len])))
|
&& (s[len] == 0 || ! ISALNUM (s[len])))
|
return 1;
|
return 1;
|
}
|
}
|
return 0;
|
return 0;
|
}
|
}
|
|
|
#define PARSE_UNSIGNED \
|
#define PARSE_UNSIGNED \
|
do \
|
do \
|
{ \
|
{ \
|
/* Don't successfully parse literals beginning with '['. */ \
|
/* Don't successfully parse literals beginning with '['. */ \
|
if (**strp == '[') \
|
if (**strp == '[') \
|
return "Invalid literal"; /* Anything -- will not be seen. */ \
|
return "Invalid literal"; /* Anything -- will not be seen. */ \
|
\
|
\
|
errmsg = cgen_parse_unsigned_integer (cd, strp, opindex, & value);\
|
errmsg = cgen_parse_unsigned_integer (cd, strp, opindex, & value);\
|
if (errmsg) \
|
if (errmsg) \
|
return errmsg; \
|
return errmsg; \
|
} \
|
} \
|
while (0)
|
while (0)
|
|
|
#define PARSE_SIGNED \
|
#define PARSE_SIGNED \
|
do \
|
do \
|
{ \
|
{ \
|
/* Don't successfully parse literals beginning with '['. */ \
|
/* Don't successfully parse literals beginning with '['. */ \
|
if (**strp == '[') \
|
if (**strp == '[') \
|
return "Invalid literal"; /* Anything -- will not be seen. */ \
|
return "Invalid literal"; /* Anything -- will not be seen. */ \
|
\
|
\
|
errmsg = cgen_parse_signed_integer (cd, strp, opindex, & value); \
|
errmsg = cgen_parse_signed_integer (cd, strp, opindex, & value); \
|
if (errmsg) \
|
if (errmsg) \
|
return errmsg; \
|
return errmsg; \
|
} \
|
} \
|
while (0)
|
while (0)
|
|
|
static const char *
|
static const char *
|
parse_unsigned6 (CGEN_CPU_DESC cd, const char **strp,
|
parse_unsigned6 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep)
|
int opindex, unsigned long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
unsigned long value;
|
unsigned long value;
|
|
|
PARSE_UNSIGNED;
|
PARSE_UNSIGNED;
|
|
|
if (value > 0x3f)
|
if (value > 0x3f)
|
return _("imm:6 immediate is out of range");
|
return _("imm:6 immediate is out of range");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_unsigned8 (CGEN_CPU_DESC cd, const char **strp,
|
parse_unsigned8 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep)
|
int opindex, unsigned long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
unsigned long value;
|
unsigned long value;
|
long have_zero = 0;
|
long have_zero = 0;
|
|
|
if (strncasecmp (*strp, "%dsp8(", 6) == 0)
|
if (strncasecmp (*strp, "%dsp8(", 6) == 0)
|
{
|
{
|
enum cgen_parse_operand_result result_type;
|
enum cgen_parse_operand_result result_type;
|
bfd_vma value;
|
bfd_vma value;
|
const char *errmsg;
|
const char *errmsg;
|
|
|
*strp += 6;
|
*strp += 6;
|
errmsg = cgen_parse_address (cd, strp, opindex, BFD_RELOC_8,
|
errmsg = cgen_parse_address (cd, strp, opindex, BFD_RELOC_8,
|
& result_type, & value);
|
& result_type, & value);
|
if (**strp != ')')
|
if (**strp != ')')
|
return _("missing `)'");
|
return _("missing `)'");
|
(*strp) ++;
|
(*strp) ++;
|
|
|
if (errmsg == NULL
|
if (errmsg == NULL
|
&& result_type == CGEN_PARSE_OPERAND_RESULT_NUMBER)
|
&& result_type == CGEN_PARSE_OPERAND_RESULT_NUMBER)
|
{
|
{
|
return _("%dsp8() takes a symbolic address, not a number");
|
return _("%dsp8() takes a symbolic address, not a number");
|
}
|
}
|
*valuep = value;
|
*valuep = value;
|
return errmsg;
|
return errmsg;
|
}
|
}
|
|
|
if (strncmp (*strp, "0x0", 3) == 0
|
if (strncmp (*strp, "0x0", 3) == 0
|
|| (**strp == '0' && *(*strp + 1) != 'x'))
|
|| (**strp == '0' && *(*strp + 1) != 'x'))
|
have_zero = 1;
|
have_zero = 1;
|
|
|
PARSE_UNSIGNED;
|
PARSE_UNSIGNED;
|
|
|
if (value > 0xff)
|
if (value > 0xff)
|
return _("dsp:8 immediate is out of range");
|
return _("dsp:8 immediate is out of range");
|
|
|
/* If this field may require a relocation then use larger dsp16. */
|
/* If this field may require a relocation then use larger dsp16. */
|
if (! have_zero && value == 0)
|
if (! have_zero && value == 0)
|
return _("dsp:8 immediate is out of range");
|
return _("dsp:8 immediate is out of range");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_signed4 (CGEN_CPU_DESC cd, const char **strp,
|
parse_signed4 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
signed long value;
|
signed long value;
|
long have_zero = 0;
|
long have_zero = 0;
|
|
|
if (strncmp (*strp, "0x0", 3) == 0
|
if (strncmp (*strp, "0x0", 3) == 0
|
|| (**strp == '0' && *(*strp + 1) != 'x'))
|
|| (**strp == '0' && *(*strp + 1) != 'x'))
|
have_zero = 1;
|
have_zero = 1;
|
|
|
PARSE_SIGNED;
|
PARSE_SIGNED;
|
|
|
if (value < -8 || value > 7)
|
if (value < -8 || value > 7)
|
return _("Immediate is out of range -8 to 7");
|
return _("Immediate is out of range -8 to 7");
|
|
|
/* If this field may require a relocation then use larger dsp16. */
|
/* If this field may require a relocation then use larger dsp16. */
|
if (! have_zero && value == 0)
|
if (! have_zero && value == 0)
|
return _("Immediate is out of range -8 to 7");
|
return _("Immediate is out of range -8 to 7");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_signed4n (CGEN_CPU_DESC cd, const char **strp,
|
parse_signed4n (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
signed long value;
|
signed long value;
|
long have_zero = 0;
|
long have_zero = 0;
|
|
|
if (strncmp (*strp, "0x0", 3) == 0
|
if (strncmp (*strp, "0x0", 3) == 0
|
|| (**strp == '0' && *(*strp + 1) != 'x'))
|
|| (**strp == '0' && *(*strp + 1) != 'x'))
|
have_zero = 1;
|
have_zero = 1;
|
|
|
PARSE_SIGNED;
|
PARSE_SIGNED;
|
|
|
if (value < -7 || value > 8)
|
if (value < -7 || value > 8)
|
return _("Immediate is out of range -7 to 8");
|
return _("Immediate is out of range -7 to 8");
|
|
|
/* If this field may require a relocation then use larger dsp16. */
|
/* If this field may require a relocation then use larger dsp16. */
|
if (! have_zero && value == 0)
|
if (! have_zero && value == 0)
|
return _("Immediate is out of range -7 to 8");
|
return _("Immediate is out of range -7 to 8");
|
|
|
*valuep = -value;
|
*valuep = -value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_signed8 (CGEN_CPU_DESC cd, const char **strp,
|
parse_signed8 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
signed long value;
|
signed long value;
|
|
|
if (strncasecmp (*strp, "%hi8(", 5) == 0)
|
if (strncasecmp (*strp, "%hi8(", 5) == 0)
|
{
|
{
|
enum cgen_parse_operand_result result_type;
|
enum cgen_parse_operand_result result_type;
|
bfd_vma value;
|
bfd_vma value;
|
const char *errmsg;
|
const char *errmsg;
|
|
|
*strp += 5;
|
*strp += 5;
|
errmsg = cgen_parse_address (cd, strp, opindex, BFD_RELOC_M32C_HI8,
|
errmsg = cgen_parse_address (cd, strp, opindex, BFD_RELOC_M32C_HI8,
|
& result_type, & value);
|
& result_type, & value);
|
if (**strp != ')')
|
if (**strp != ')')
|
return _("missing `)'");
|
return _("missing `)'");
|
(*strp) ++;
|
(*strp) ++;
|
|
|
if (errmsg == NULL
|
if (errmsg == NULL
|
&& result_type == CGEN_PARSE_OPERAND_RESULT_NUMBER)
|
&& result_type == CGEN_PARSE_OPERAND_RESULT_NUMBER)
|
{
|
{
|
value >>= 16;
|
value >>= 16;
|
}
|
}
|
*valuep = value;
|
*valuep = value;
|
return errmsg;
|
return errmsg;
|
}
|
}
|
|
|
PARSE_SIGNED;
|
PARSE_SIGNED;
|
|
|
if (value <= 255 && value > 127)
|
if (value <= 255 && value > 127)
|
value -= 0x100;
|
value -= 0x100;
|
|
|
if (value < -128 || value > 127)
|
if (value < -128 || value > 127)
|
return _("dsp:8 immediate is out of range");
|
return _("dsp:8 immediate is out of range");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_unsigned16 (CGEN_CPU_DESC cd, const char **strp,
|
parse_unsigned16 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep)
|
int opindex, unsigned long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
unsigned long value;
|
unsigned long value;
|
long have_zero = 0;
|
long have_zero = 0;
|
|
|
if (strncasecmp (*strp, "%dsp16(", 7) == 0)
|
if (strncasecmp (*strp, "%dsp16(", 7) == 0)
|
{
|
{
|
enum cgen_parse_operand_result result_type;
|
enum cgen_parse_operand_result result_type;
|
bfd_vma value;
|
bfd_vma value;
|
const char *errmsg;
|
const char *errmsg;
|
|
|
*strp += 7;
|
*strp += 7;
|
errmsg = cgen_parse_address (cd, strp, opindex, BFD_RELOC_16,
|
errmsg = cgen_parse_address (cd, strp, opindex, BFD_RELOC_16,
|
& result_type, & value);
|
& result_type, & value);
|
if (**strp != ')')
|
if (**strp != ')')
|
return _("missing `)'");
|
return _("missing `)'");
|
(*strp) ++;
|
(*strp) ++;
|
|
|
if (errmsg == NULL
|
if (errmsg == NULL
|
&& result_type == CGEN_PARSE_OPERAND_RESULT_NUMBER)
|
&& result_type == CGEN_PARSE_OPERAND_RESULT_NUMBER)
|
{
|
{
|
return _("%dsp16() takes a symbolic address, not a number");
|
return _("%dsp16() takes a symbolic address, not a number");
|
}
|
}
|
*valuep = value;
|
*valuep = value;
|
return errmsg;
|
return errmsg;
|
}
|
}
|
|
|
/* Don't successfully parse literals beginning with '['. */
|
/* Don't successfully parse literals beginning with '['. */
|
if (**strp == '[')
|
if (**strp == '[')
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
|
|
/* Don't successfully parse register names. */
|
/* Don't successfully parse register names. */
|
if (m32c_cgen_isa_register (strp))
|
if (m32c_cgen_isa_register (strp))
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
|
|
if (strncmp (*strp, "0x0", 3) == 0
|
if (strncmp (*strp, "0x0", 3) == 0
|
|| (**strp == '0' && *(*strp + 1) != 'x'))
|
|| (**strp == '0' && *(*strp + 1) != 'x'))
|
have_zero = 1;
|
have_zero = 1;
|
|
|
errmsg = cgen_parse_unsigned_integer (cd, strp, opindex, & value);
|
errmsg = cgen_parse_unsigned_integer (cd, strp, opindex, & value);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
if (value > 0xffff)
|
if (value > 0xffff)
|
return _("dsp:16 immediate is out of range");
|
return _("dsp:16 immediate is out of range");
|
|
|
/* If this field may require a relocation then use larger dsp24. */
|
/* If this field may require a relocation then use larger dsp24. */
|
if (cd->machs == MACH_M32C && ! have_zero && value == 0
|
if (cd->machs == MACH_M32C && ! have_zero && value == 0
|
&& (strncmp (*strp, "[a", 2) == 0
|
&& (strncmp (*strp, "[a", 2) == 0
|
|| **strp == ','
|
|| **strp == ','
|
|| **strp == 0))
|
|| **strp == 0))
|
return _("dsp:16 immediate is out of range");
|
return _("dsp:16 immediate is out of range");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_signed16 (CGEN_CPU_DESC cd, const char **strp,
|
parse_signed16 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
signed long value;
|
signed long value;
|
|
|
if (strncasecmp (*strp, "%lo16(", 6) == 0)
|
if (strncasecmp (*strp, "%lo16(", 6) == 0)
|
{
|
{
|
enum cgen_parse_operand_result result_type;
|
enum cgen_parse_operand_result result_type;
|
bfd_vma value;
|
bfd_vma value;
|
const char *errmsg;
|
const char *errmsg;
|
|
|
*strp += 6;
|
*strp += 6;
|
errmsg = cgen_parse_address (cd, strp, opindex, BFD_RELOC_LO16,
|
errmsg = cgen_parse_address (cd, strp, opindex, BFD_RELOC_LO16,
|
& result_type, & value);
|
& result_type, & value);
|
if (**strp != ')')
|
if (**strp != ')')
|
return _("missing `)'");
|
return _("missing `)'");
|
(*strp) ++;
|
(*strp) ++;
|
|
|
if (errmsg == NULL
|
if (errmsg == NULL
|
&& result_type == CGEN_PARSE_OPERAND_RESULT_NUMBER)
|
&& result_type == CGEN_PARSE_OPERAND_RESULT_NUMBER)
|
{
|
{
|
value &= 0xffff;
|
value &= 0xffff;
|
}
|
}
|
*valuep = value;
|
*valuep = value;
|
return errmsg;
|
return errmsg;
|
}
|
}
|
|
|
if (strncasecmp (*strp, "%hi16(", 6) == 0)
|
if (strncasecmp (*strp, "%hi16(", 6) == 0)
|
{
|
{
|
enum cgen_parse_operand_result result_type;
|
enum cgen_parse_operand_result result_type;
|
bfd_vma value;
|
bfd_vma value;
|
const char *errmsg;
|
const char *errmsg;
|
|
|
*strp += 6;
|
*strp += 6;
|
errmsg = cgen_parse_address (cd, strp, opindex, BFD_RELOC_HI16,
|
errmsg = cgen_parse_address (cd, strp, opindex, BFD_RELOC_HI16,
|
& result_type, & value);
|
& result_type, & value);
|
if (**strp != ')')
|
if (**strp != ')')
|
return _("missing `)'");
|
return _("missing `)'");
|
(*strp) ++;
|
(*strp) ++;
|
|
|
if (errmsg == NULL
|
if (errmsg == NULL
|
&& result_type == CGEN_PARSE_OPERAND_RESULT_NUMBER)
|
&& result_type == CGEN_PARSE_OPERAND_RESULT_NUMBER)
|
{
|
{
|
value >>= 16;
|
value >>= 16;
|
}
|
}
|
*valuep = value;
|
*valuep = value;
|
return errmsg;
|
return errmsg;
|
}
|
}
|
|
|
PARSE_SIGNED;
|
PARSE_SIGNED;
|
|
|
if (value <= 65535 && value > 32767)
|
if (value <= 65535 && value > 32767)
|
value -= 0x10000;
|
value -= 0x10000;
|
|
|
if (value < -32768 || value > 32767)
|
if (value < -32768 || value > 32767)
|
return _("dsp:16 immediate is out of range");
|
return _("dsp:16 immediate is out of range");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_unsigned20 (CGEN_CPU_DESC cd, const char **strp,
|
parse_unsigned20 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep)
|
int opindex, unsigned long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
unsigned long value;
|
unsigned long value;
|
|
|
/* Don't successfully parse literals beginning with '['. */
|
/* Don't successfully parse literals beginning with '['. */
|
if (**strp == '[')
|
if (**strp == '[')
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
|
|
/* Don't successfully parse register names. */
|
/* Don't successfully parse register names. */
|
if (m32c_cgen_isa_register (strp))
|
if (m32c_cgen_isa_register (strp))
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
|
|
errmsg = cgen_parse_unsigned_integer (cd, strp, opindex, & value);
|
errmsg = cgen_parse_unsigned_integer (cd, strp, opindex, & value);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
if (value > 0xfffff)
|
if (value > 0xfffff)
|
return _("dsp:20 immediate is out of range");
|
return _("dsp:20 immediate is out of range");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_unsigned24 (CGEN_CPU_DESC cd, const char **strp,
|
parse_unsigned24 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep)
|
int opindex, unsigned long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
unsigned long value;
|
unsigned long value;
|
|
|
/* Don't successfully parse literals beginning with '['. */
|
/* Don't successfully parse literals beginning with '['. */
|
if (**strp == '[')
|
if (**strp == '[')
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
|
|
/* Don't successfully parse register names. */
|
/* Don't successfully parse register names. */
|
if (m32c_cgen_isa_register (strp))
|
if (m32c_cgen_isa_register (strp))
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
return "Invalid literal"; /* Anything -- will not be seen. */
|
|
|
errmsg = cgen_parse_unsigned_integer (cd, strp, opindex, & value);
|
errmsg = cgen_parse_unsigned_integer (cd, strp, opindex, & value);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
if (value > 0xffffff)
|
if (value > 0xffffff)
|
return _("dsp:24 immediate is out of range");
|
return _("dsp:24 immediate is out of range");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
/* This should only be used for #imm->reg. */
|
/* This should only be used for #imm->reg. */
|
static const char *
|
static const char *
|
parse_signed24 (CGEN_CPU_DESC cd, const char **strp,
|
parse_signed24 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
signed long value;
|
signed long value;
|
|
|
PARSE_SIGNED;
|
PARSE_SIGNED;
|
|
|
if (value <= 0xffffff && value > 0x7fffff)
|
if (value <= 0xffffff && value > 0x7fffff)
|
value -= 0x1000000;
|
value -= 0x1000000;
|
|
|
if (value > 0xffffff)
|
if (value > 0xffffff)
|
return _("dsp:24 immediate is out of range");
|
return _("dsp:24 immediate is out of range");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_signed32 (CGEN_CPU_DESC cd, const char **strp,
|
parse_signed32 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
signed long value;
|
signed long value;
|
|
|
errmsg = cgen_parse_signed_integer (cd, strp, opindex, & value);
|
errmsg = cgen_parse_signed_integer (cd, strp, opindex, & value);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_imm1_S (CGEN_CPU_DESC cd, const char **strp,
|
parse_imm1_S (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
signed long value;
|
signed long value;
|
|
|
errmsg = cgen_parse_signed_integer (cd, strp, opindex, & value);
|
errmsg = cgen_parse_signed_integer (cd, strp, opindex, & value);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
if (value < 1 || value > 2)
|
if (value < 1 || value > 2)
|
return _("immediate is out of range 1-2");
|
return _("immediate is out of range 1-2");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_imm3_S (CGEN_CPU_DESC cd, const char **strp,
|
parse_imm3_S (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
signed long value;
|
signed long value;
|
|
|
errmsg = cgen_parse_signed_integer (cd, strp, opindex, & value);
|
errmsg = cgen_parse_signed_integer (cd, strp, opindex, & value);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
if (value < 1 || value > 8)
|
if (value < 1 || value > 8)
|
return _("immediate is out of range 1-8");
|
return _("immediate is out of range 1-8");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_bit3_S (CGEN_CPU_DESC cd, const char **strp,
|
parse_bit3_S (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
signed long value;
|
signed long value;
|
|
|
errmsg = cgen_parse_signed_integer (cd, strp, opindex, & value);
|
errmsg = cgen_parse_signed_integer (cd, strp, opindex, & value);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
if (value < 0 || value > 7)
|
if (value < 0 || value > 7)
|
return _("immediate is out of range 0-7");
|
return _("immediate is out of range 0-7");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_lab_5_3 (CGEN_CPU_DESC cd,
|
parse_lab_5_3 (CGEN_CPU_DESC cd,
|
const char **strp,
|
const char **strp,
|
int opindex ATTRIBUTE_UNUSED,
|
int opindex ATTRIBUTE_UNUSED,
|
int opinfo,
|
int opinfo,
|
enum cgen_parse_operand_result *type_addr,
|
enum cgen_parse_operand_result *type_addr,
|
bfd_vma *valuep)
|
bfd_vma *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
bfd_vma value;
|
bfd_vma value;
|
enum cgen_parse_operand_result op_res;
|
enum cgen_parse_operand_result op_res;
|
|
|
errmsg = cgen_parse_address (cd, strp, M32C_OPERAND_LAB_5_3,
|
errmsg = cgen_parse_address (cd, strp, M32C_OPERAND_LAB_5_3,
|
opinfo, & op_res, & value);
|
opinfo, & op_res, & value);
|
|
|
if (type_addr)
|
if (type_addr)
|
*type_addr = op_res;
|
*type_addr = op_res;
|
|
|
if (op_res == CGEN_PARSE_OPERAND_ADDRESS)
|
if (op_res == CGEN_PARSE_OPERAND_ADDRESS)
|
{
|
{
|
/* This is a hack; the field cannot handle near-zero signed
|
/* This is a hack; the field cannot handle near-zero signed
|
offsets that CGEN wants to put in to indicate an "empty"
|
offsets that CGEN wants to put in to indicate an "empty"
|
operand at first. */
|
operand at first. */
|
*valuep = 2;
|
*valuep = 2;
|
return 0;
|
return 0;
|
}
|
}
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
if (value < 2 || value > 9)
|
if (value < 2 || value > 9)
|
return _("immediate is out of range 2-9");
|
return _("immediate is out of range 2-9");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_Bitno16R (CGEN_CPU_DESC cd, const char **strp,
|
parse_Bitno16R (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep)
|
int opindex, unsigned long *valuep)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
unsigned long value;
|
unsigned long value;
|
|
|
errmsg = cgen_parse_unsigned_integer (cd, strp, opindex, & value);
|
errmsg = cgen_parse_unsigned_integer (cd, strp, opindex, & value);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
if (value > 15)
|
if (value > 15)
|
return _("Bit number for indexing general register is out of range 0-15");
|
return _("Bit number for indexing general register is out of range 0-15");
|
|
|
*valuep = value;
|
*valuep = value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_unsigned_bitbase (CGEN_CPU_DESC cd, const char **strp,
|
parse_unsigned_bitbase (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep,
|
int opindex, unsigned long *valuep,
|
unsigned bits, int allow_syms)
|
unsigned bits, int allow_syms)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
unsigned long bit;
|
unsigned long bit;
|
unsigned long base;
|
unsigned long base;
|
const char *newp = *strp;
|
const char *newp = *strp;
|
unsigned long long bitbase;
|
unsigned long long bitbase;
|
long have_zero = 0;
|
long have_zero = 0;
|
|
|
errmsg = cgen_parse_unsigned_integer (cd, & newp, opindex, & bit);
|
errmsg = cgen_parse_unsigned_integer (cd, & newp, opindex, & bit);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
if (*newp != ',')
|
if (*newp != ',')
|
return "Missing base for bit,base:8";
|
return "Missing base for bit,base:8";
|
|
|
++newp;
|
++newp;
|
|
|
if (strncmp (newp, "0x0", 3) == 0
|
if (strncmp (newp, "0x0", 3) == 0
|
|| (newp[0] == '0' && newp[1] != 'x'))
|
|| (newp[0] == '0' && newp[1] != 'x'))
|
have_zero = 1;
|
have_zero = 1;
|
|
|
errmsg = cgen_parse_unsigned_integer (cd, & newp, opindex, & base);
|
errmsg = cgen_parse_unsigned_integer (cd, & newp, opindex, & base);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
bitbase = (unsigned long long) bit + ((unsigned long long) base * 8);
|
bitbase = (unsigned long long) bit + ((unsigned long long) base * 8);
|
|
|
if (bitbase >= (1ull << bits))
|
if (bitbase >= (1ull << bits))
|
return _("bit,base is out of range");
|
return _("bit,base is out of range");
|
|
|
/* If this field may require a relocation then use larger displacement. */
|
/* If this field may require a relocation then use larger displacement. */
|
if (! have_zero && base == 0)
|
if (! have_zero && base == 0)
|
{
|
{
|
switch (allow_syms) {
|
switch (allow_syms) {
|
case 0:
|
case 0:
|
return _("bit,base out of range for symbol");
|
return _("bit,base out of range for symbol");
|
case 1:
|
case 1:
|
break;
|
break;
|
case 2:
|
case 2:
|
if (strncmp (newp, "[sb]", 4) != 0)
|
if (strncmp (newp, "[sb]", 4) != 0)
|
return _("bit,base out of range for symbol");
|
return _("bit,base out of range for symbol");
|
break;
|
break;
|
}
|
}
|
}
|
}
|
|
|
*valuep = bitbase;
|
*valuep = bitbase;
|
*strp = newp;
|
*strp = newp;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_signed_bitbase (CGEN_CPU_DESC cd, const char **strp,
|
parse_signed_bitbase (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep,
|
int opindex, signed long *valuep,
|
unsigned bits, int allow_syms)
|
unsigned bits, int allow_syms)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
unsigned long bit;
|
unsigned long bit;
|
signed long base;
|
signed long base;
|
const char *newp = *strp;
|
const char *newp = *strp;
|
long long bitbase;
|
long long bitbase;
|
long long limit;
|
long long limit;
|
long have_zero = 0;
|
long have_zero = 0;
|
|
|
errmsg = cgen_parse_unsigned_integer (cd, & newp, opindex, & bit);
|
errmsg = cgen_parse_unsigned_integer (cd, & newp, opindex, & bit);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
if (*newp != ',')
|
if (*newp != ',')
|
return "Missing base for bit,base:8";
|
return "Missing base for bit,base:8";
|
|
|
++newp;
|
++newp;
|
|
|
if (strncmp (newp, "0x0", 3) == 0
|
if (strncmp (newp, "0x0", 3) == 0
|
|| (newp[0] == '0' && newp[1] != 'x'))
|
|| (newp[0] == '0' && newp[1] != 'x'))
|
have_zero = 1;
|
have_zero = 1;
|
|
|
errmsg = cgen_parse_signed_integer (cd, & newp, opindex, & base);
|
errmsg = cgen_parse_signed_integer (cd, & newp, opindex, & base);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
bitbase = (long long)bit + ((long long)base * 8);
|
bitbase = (long long)bit + ((long long)base * 8);
|
|
|
limit = 1ll << (bits - 1);
|
limit = 1ll << (bits - 1);
|
if (bitbase < -limit || bitbase >= limit)
|
if (bitbase < -limit || bitbase >= limit)
|
return _("bit,base is out of range");
|
return _("bit,base is out of range");
|
|
|
/* If this field may require a relocation then use larger displacement. */
|
/* If this field may require a relocation then use larger displacement. */
|
if (! have_zero && base == 0 && ! allow_syms)
|
if (! have_zero && base == 0 && ! allow_syms)
|
return _("bit,base out of range for symbol");
|
return _("bit,base out of range for symbol");
|
|
|
*valuep = bitbase;
|
*valuep = bitbase;
|
*strp = newp;
|
*strp = newp;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_unsigned_bitbase8 (CGEN_CPU_DESC cd, const char **strp,
|
parse_unsigned_bitbase8 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep)
|
int opindex, unsigned long *valuep)
|
{
|
{
|
return parse_unsigned_bitbase (cd, strp, opindex, valuep, 8, 0);
|
return parse_unsigned_bitbase (cd, strp, opindex, valuep, 8, 0);
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_unsigned_bitbase11 (CGEN_CPU_DESC cd, const char **strp,
|
parse_unsigned_bitbase11 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep)
|
int opindex, unsigned long *valuep)
|
{
|
{
|
return parse_unsigned_bitbase (cd, strp, opindex, valuep, 11, 0);
|
return parse_unsigned_bitbase (cd, strp, opindex, valuep, 11, 0);
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_unsigned_bitbase16 (CGEN_CPU_DESC cd, const char **strp,
|
parse_unsigned_bitbase16 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep)
|
int opindex, unsigned long *valuep)
|
{
|
{
|
return parse_unsigned_bitbase (cd, strp, opindex, valuep, 16, 1);
|
return parse_unsigned_bitbase (cd, strp, opindex, valuep, 16, 1);
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_unsigned_bitbase19 (CGEN_CPU_DESC cd, const char **strp,
|
parse_unsigned_bitbase19 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep)
|
int opindex, unsigned long *valuep)
|
{
|
{
|
return parse_unsigned_bitbase (cd, strp, opindex, valuep, 19, 2);
|
return parse_unsigned_bitbase (cd, strp, opindex, valuep, 19, 2);
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_unsigned_bitbase27 (CGEN_CPU_DESC cd, const char **strp,
|
parse_unsigned_bitbase27 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, unsigned long *valuep)
|
int opindex, unsigned long *valuep)
|
{
|
{
|
return parse_unsigned_bitbase (cd, strp, opindex, valuep, 27, 1);
|
return parse_unsigned_bitbase (cd, strp, opindex, valuep, 27, 1);
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_signed_bitbase8 (CGEN_CPU_DESC cd, const char **strp,
|
parse_signed_bitbase8 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
return parse_signed_bitbase (cd, strp, opindex, valuep, 8, 1);
|
return parse_signed_bitbase (cd, strp, opindex, valuep, 8, 1);
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_signed_bitbase11 (CGEN_CPU_DESC cd, const char **strp,
|
parse_signed_bitbase11 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
return parse_signed_bitbase (cd, strp, opindex, valuep, 11, 0);
|
return parse_signed_bitbase (cd, strp, opindex, valuep, 11, 0);
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_signed_bitbase19 (CGEN_CPU_DESC cd, const char **strp,
|
parse_signed_bitbase19 (CGEN_CPU_DESC cd, const char **strp,
|
int opindex, signed long *valuep)
|
int opindex, signed long *valuep)
|
{
|
{
|
return parse_signed_bitbase (cd, strp, opindex, valuep, 19, 1);
|
return parse_signed_bitbase (cd, strp, opindex, valuep, 19, 1);
|
}
|
}
|
|
|
/* Parse the suffix as : or as nothing followed by a whitespace. */
|
/* Parse the suffix as : or as nothing followed by a whitespace. */
|
|
|
static const char *
|
static const char *
|
parse_suffix (const char **strp, char suffix)
|
parse_suffix (const char **strp, char suffix)
|
{
|
{
|
const char *newp = *strp;
|
const char *newp = *strp;
|
|
|
if (**strp == ':' && TOLOWER (*(*strp + 1)) == suffix)
|
if (**strp == ':' && TOLOWER (*(*strp + 1)) == suffix)
|
newp = *strp + 2;
|
newp = *strp + 2;
|
|
|
if (ISSPACE (*newp))
|
if (ISSPACE (*newp))
|
{
|
{
|
*strp = newp;
|
*strp = newp;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
return "Invalid suffix"; /* Anything -- will not be seen. */
|
return "Invalid suffix"; /* Anything -- will not be seen. */
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_S (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
parse_S (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
{
|
{
|
return parse_suffix (strp, 's');
|
return parse_suffix (strp, 's');
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_G (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
parse_G (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
{
|
{
|
return parse_suffix (strp, 'g');
|
return parse_suffix (strp, 'g');
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_Q (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
parse_Q (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
{
|
{
|
return parse_suffix (strp, 'q');
|
return parse_suffix (strp, 'q');
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_Z (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
parse_Z (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
{
|
{
|
return parse_suffix (strp, 'z');
|
return parse_suffix (strp, 'z');
|
}
|
}
|
|
|
/* Parse an empty suffix. Fail if the next char is ':'. */
|
/* Parse an empty suffix. Fail if the next char is ':'. */
|
|
|
static const char *
|
static const char *
|
parse_X (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
parse_X (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
{
|
{
|
if (**strp == ':')
|
if (**strp == ':')
|
return "Unexpected suffix";
|
return "Unexpected suffix";
|
return 0;
|
return 0;
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_r0l_r0h (CGEN_CPU_DESC cd, const char **strp,
|
parse_r0l_r0h (CGEN_CPU_DESC cd, const char **strp,
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep)
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep)
|
{
|
{
|
const char *errmsg;
|
const char *errmsg;
|
signed long value;
|
signed long value;
|
signed long junk;
|
signed long junk;
|
const char *newp = *strp;
|
const char *newp = *strp;
|
|
|
/* Parse r0[hl]. */
|
/* Parse r0[hl]. */
|
errmsg = cgen_parse_keyword (cd, & newp, & m32c_cgen_opval_h_r0l_r0h, & value);
|
errmsg = cgen_parse_keyword (cd, & newp, & m32c_cgen_opval_h_r0l_r0h, & value);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
if (*newp != ',')
|
if (*newp != ',')
|
return _("not a valid r0l/r0h pair");
|
return _("not a valid r0l/r0h pair");
|
++newp;
|
++newp;
|
|
|
/* Parse the second register in the pair. */
|
/* Parse the second register in the pair. */
|
if (value == 0) /* r0l */
|
if (value == 0) /* r0l */
|
errmsg = cgen_parse_keyword (cd, & newp, & m32c_cgen_opval_h_r0h, & junk);
|
errmsg = cgen_parse_keyword (cd, & newp, & m32c_cgen_opval_h_r0h, & junk);
|
else
|
else
|
errmsg = cgen_parse_keyword (cd, & newp, & m32c_cgen_opval_h_r0l, & junk);
|
errmsg = cgen_parse_keyword (cd, & newp, & m32c_cgen_opval_h_r0l, & junk);
|
if (errmsg)
|
if (errmsg)
|
return errmsg;
|
return errmsg;
|
|
|
*strp = newp;
|
*strp = newp;
|
*valuep = ! value;
|
*valuep = ! value;
|
return 0;
|
return 0;
|
}
|
}
|
|
|
/* Accept .b or .w in any case. */
|
/* Accept .b or .w in any case. */
|
|
|
static const char *
|
static const char *
|
parse_size (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
parse_size (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED, const char **strp,
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
int opindex ATTRIBUTE_UNUSED, signed long *valuep ATTRIBUTE_UNUSED)
|
{
|
{
|
if (**strp == '.'
|
if (**strp == '.'
|
&& (*(*strp + 1) == 'b' || *(*strp + 1) == 'B'
|
&& (*(*strp + 1) == 'b' || *(*strp + 1) == 'B'
|
|| *(*strp + 1) == 'w' || *(*strp + 1) == 'W'))
|
|| *(*strp + 1) == 'w' || *(*strp + 1) == 'W'))
|
{
|
{
|
*strp += 2;
|
*strp += 2;
|
return NULL;
|
return NULL;
|
}
|
}
|
|
|
return _("Invalid size specifier");
|
return _("Invalid size specifier");
|
}
|
}
|
|
|
/* Special check to ensure that instruction exists for given machine. */
|
/* Special check to ensure that instruction exists for given machine. */
|
|
|
int
|
int
|
m32c_cgen_insn_supported (CGEN_CPU_DESC cd,
|
m32c_cgen_insn_supported (CGEN_CPU_DESC cd,
|
const CGEN_INSN *insn)
|
const CGEN_INSN *insn)
|
{
|
{
|
int machs = CGEN_INSN_ATTR_VALUE (insn, CGEN_INSN_MACH);
|
int machs = CGEN_INSN_ATTR_VALUE (insn, CGEN_INSN_MACH);
|
CGEN_BITSET isas = CGEN_INSN_BITSET_ATTR_VALUE (insn, CGEN_INSN_ISA);
|
CGEN_BITSET isas = CGEN_INSN_BITSET_ATTR_VALUE (insn, CGEN_INSN_ISA);
|
|
|
/* If attributes are absent, assume no restriction. */
|
/* If attributes are absent, assume no restriction. */
|
if (machs == 0)
|
if (machs == 0)
|
machs = ~0;
|
machs = ~0;
|
|
|
return ((machs & cd->machs)
|
return ((machs & cd->machs)
|
&& cgen_bitset_intersect_p (& isas, cd->isas));
|
&& cgen_bitset_intersect_p (& isas, cd->isas));
|
}
|
}
|
|
|
/* Parse a set of registers, R0,R1,A0,A1,SB,FB. */
|
/* Parse a set of registers, R0,R1,A0,A1,SB,FB. */
|
|
|
static const char *
|
static const char *
|
parse_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
parse_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
const char **strp,
|
const char **strp,
|
int opindex ATTRIBUTE_UNUSED,
|
int opindex ATTRIBUTE_UNUSED,
|
unsigned long *valuep,
|
unsigned long *valuep,
|
int push)
|
int push)
|
{
|
{
|
const char *errmsg = 0;
|
const char *errmsg = 0;
|
int regno = 0;
|
int regno = 0;
|
|
|
*valuep = 0;
|
*valuep = 0;
|
while (**strp && **strp != ')')
|
while (**strp && **strp != ')')
|
{
|
{
|
if (**strp == 'r' || **strp == 'R')
|
if (**strp == 'r' || **strp == 'R')
|
{
|
{
|
++*strp;
|
++*strp;
|
regno = **strp - '0';
|
regno = **strp - '0';
|
if (regno > 4)
|
if (regno > 4)
|
errmsg = _("Register number is not valid");
|
errmsg = _("Register number is not valid");
|
}
|
}
|
else if (**strp == 'a' || **strp == 'A')
|
else if (**strp == 'a' || **strp == 'A')
|
{
|
{
|
++*strp;
|
++*strp;
|
regno = **strp - '0';
|
regno = **strp - '0';
|
if (regno > 2)
|
if (regno > 2)
|
errmsg = _("Register number is not valid");
|
errmsg = _("Register number is not valid");
|
regno = **strp - '0' + 4;
|
regno = **strp - '0' + 4;
|
}
|
}
|
|
|
else if (strncasecmp (*strp, "sb", 2) == 0 || strncasecmp (*strp, "SB", 2) == 0)
|
else if (strncasecmp (*strp, "sb", 2) == 0 || strncasecmp (*strp, "SB", 2) == 0)
|
{
|
{
|
regno = 6;
|
regno = 6;
|
++*strp;
|
++*strp;
|
}
|
}
|
|
|
else if (strncasecmp (*strp, "fb", 2) == 0 || strncasecmp (*strp, "FB", 2) == 0)
|
else if (strncasecmp (*strp, "fb", 2) == 0 || strncasecmp (*strp, "FB", 2) == 0)
|
{
|
{
|
regno = 7;
|
regno = 7;
|
++*strp;
|
++*strp;
|
}
|
}
|
|
|
if (push) /* Mask is reversed for push. */
|
if (push) /* Mask is reversed for push. */
|
*valuep |= 0x80 >> regno;
|
*valuep |= 0x80 >> regno;
|
else
|
else
|
*valuep |= 1 << regno;
|
*valuep |= 1 << regno;
|
|
|
++*strp;
|
++*strp;
|
if (**strp == ',')
|
if (**strp == ',')
|
{
|
{
|
if (*(*strp + 1) == ')')
|
if (*(*strp + 1) == ')')
|
break;
|
break;
|
++*strp;
|
++*strp;
|
}
|
}
|
}
|
}
|
|
|
if (!*strp)
|
if (!*strp)
|
errmsg = _("Register list is not valid");
|
errmsg = _("Register list is not valid");
|
|
|
return errmsg;
|
return errmsg;
|
}
|
}
|
|
|
#define POP 0
|
#define POP 0
|
#define PUSH 1
|
#define PUSH 1
|
|
|
static const char *
|
static const char *
|
parse_pop_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
parse_pop_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
const char **strp,
|
const char **strp,
|
int opindex ATTRIBUTE_UNUSED,
|
int opindex ATTRIBUTE_UNUSED,
|
unsigned long *valuep)
|
unsigned long *valuep)
|
{
|
{
|
return parse_regset (cd, strp, opindex, valuep, POP);
|
return parse_regset (cd, strp, opindex, valuep, POP);
|
}
|
}
|
|
|
static const char *
|
static const char *
|
parse_push_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
parse_push_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
const char **strp,
|
const char **strp,
|
int opindex ATTRIBUTE_UNUSED,
|
int opindex ATTRIBUTE_UNUSED,
|
unsigned long *valuep)
|
unsigned long *valuep)
|
{
|
{
|
return parse_regset (cd, strp, opindex, valuep, PUSH);
|
return parse_regset (cd, strp, opindex, valuep, PUSH);
|
}
|
}
|
|
|
/* -- dis.c */
|
/* -- dis.c */
|
|
|
#include "elf/m32c.h"
|
#include "elf/m32c.h"
|
#include "elf-bfd.h"
|
#include "elf-bfd.h"
|
|
|
/* Always print the short insn format suffix as ':'. */
|
/* Always print the short insn format suffix as ':'. */
|
|
|
static void
|
static void
|
print_suffix (void * dis_info, char suffix)
|
print_suffix (void * dis_info, char suffix)
|
{
|
{
|
disassemble_info *info = dis_info;
|
disassemble_info *info = dis_info;
|
|
|
(*info->fprintf_func) (info->stream, ":%c", suffix);
|
(*info->fprintf_func) (info->stream, ":%c", suffix);
|
}
|
}
|
|
|
static void
|
static void
|
print_S (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_S (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
long value ATTRIBUTE_UNUSED,
|
long value ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
print_suffix (dis_info, 's');
|
print_suffix (dis_info, 's');
|
}
|
}
|
|
|
|
|
static void
|
static void
|
print_G (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_G (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
long value ATTRIBUTE_UNUSED,
|
long value ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
print_suffix (dis_info, 'g');
|
print_suffix (dis_info, 'g');
|
}
|
}
|
|
|
static void
|
static void
|
print_Q (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_Q (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
long value ATTRIBUTE_UNUSED,
|
long value ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
print_suffix (dis_info, 'q');
|
print_suffix (dis_info, 'q');
|
}
|
}
|
|
|
static void
|
static void
|
print_Z (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_Z (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
long value ATTRIBUTE_UNUSED,
|
long value ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
print_suffix (dis_info, 'z');
|
print_suffix (dis_info, 'z');
|
}
|
}
|
|
|
/* Print the empty suffix. */
|
/* Print the empty suffix. */
|
|
|
static void
|
static void
|
print_X (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_X (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info ATTRIBUTE_UNUSED,
|
void * dis_info ATTRIBUTE_UNUSED,
|
long value ATTRIBUTE_UNUSED,
|
long value ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
return;
|
return;
|
}
|
}
|
|
|
static void
|
static void
|
print_r0l_r0h (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_r0l_r0h (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
long value,
|
long value,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
disassemble_info *info = dis_info;
|
disassemble_info *info = dis_info;
|
|
|
if (value == 0)
|
if (value == 0)
|
(*info->fprintf_func) (info->stream, "r0h,r0l");
|
(*info->fprintf_func) (info->stream, "r0h,r0l");
|
else
|
else
|
(*info->fprintf_func) (info->stream, "r0l,r0h");
|
(*info->fprintf_func) (info->stream, "r0l,r0h");
|
}
|
}
|
|
|
static void
|
static void
|
print_unsigned_bitbase (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_unsigned_bitbase (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
unsigned long value,
|
unsigned long value,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
disassemble_info *info = dis_info;
|
disassemble_info *info = dis_info;
|
|
|
(*info->fprintf_func) (info->stream, "%ld,0x%lx", value & 0x7, value >> 3);
|
(*info->fprintf_func) (info->stream, "%ld,0x%lx", value & 0x7, value >> 3);
|
}
|
}
|
|
|
static void
|
static void
|
print_signed_bitbase (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_signed_bitbase (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
signed long value,
|
signed long value,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
disassemble_info *info = dis_info;
|
disassemble_info *info = dis_info;
|
|
|
(*info->fprintf_func) (info->stream, "%ld,%ld", value & 0x7, value >> 3);
|
(*info->fprintf_func) (info->stream, "%ld,%ld", value & 0x7, value >> 3);
|
}
|
}
|
|
|
static void
|
static void
|
print_size (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_size (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
long value ATTRIBUTE_UNUSED,
|
long value ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
/* Always print the size as '.w'. */
|
/* Always print the size as '.w'. */
|
disassemble_info *info = dis_info;
|
disassemble_info *info = dis_info;
|
|
|
(*info->fprintf_func) (info->stream, ".w");
|
(*info->fprintf_func) (info->stream, ".w");
|
}
|
}
|
|
|
#define POP 0
|
#define POP 0
|
#define PUSH 1
|
#define PUSH 1
|
|
|
static void print_pop_regset (CGEN_CPU_DESC, void *, long, unsigned int, bfd_vma, int);
|
static void print_pop_regset (CGEN_CPU_DESC, void *, long, unsigned int, bfd_vma, int);
|
static void print_push_regset (CGEN_CPU_DESC, void *, long, unsigned int, bfd_vma, int);
|
static void print_push_regset (CGEN_CPU_DESC, void *, long, unsigned int, bfd_vma, int);
|
|
|
/* Print a set of registers, R0,R1,A0,A1,SB,FB. */
|
/* Print a set of registers, R0,R1,A0,A1,SB,FB. */
|
|
|
static void
|
static void
|
print_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
long value,
|
long value,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED,
|
int push)
|
int push)
|
{
|
{
|
static char * m16c_register_names [] =
|
static char * m16c_register_names [] =
|
{
|
{
|
"r0", "r1", "r2", "r3", "a0", "a1", "sb", "fb"
|
"r0", "r1", "r2", "r3", "a0", "a1", "sb", "fb"
|
};
|
};
|
disassemble_info *info = dis_info;
|
disassemble_info *info = dis_info;
|
int mask;
|
int mask;
|
int index = 0;
|
int index = 0;
|
char* comma = "";
|
char* comma = "";
|
|
|
if (push)
|
if (push)
|
mask = 0x80;
|
mask = 0x80;
|
else
|
else
|
mask = 1;
|
mask = 1;
|
|
|
if (value & mask)
|
if (value & mask)
|
{
|
{
|
(*info->fprintf_func) (info->stream, "%s", m16c_register_names [0]);
|
(*info->fprintf_func) (info->stream, "%s", m16c_register_names [0]);
|
comma = ",";
|
comma = ",";
|
}
|
}
|
|
|
for (index = 1; index <= 7; ++index)
|
for (index = 1; index <= 7; ++index)
|
{
|
{
|
if (push)
|
if (push)
|
mask >>= 1;
|
mask >>= 1;
|
else
|
else
|
mask <<= 1;
|
mask <<= 1;
|
|
|
if (value & mask)
|
if (value & mask)
|
{
|
{
|
(*info->fprintf_func) (info->stream, "%s%s", comma,
|
(*info->fprintf_func) (info->stream, "%s%s", comma,
|
m16c_register_names [index]);
|
m16c_register_names [index]);
|
comma = ",";
|
comma = ",";
|
}
|
}
|
}
|
}
|
}
|
}
|
|
|
static void
|
static void
|
print_pop_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_pop_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
long value,
|
long value,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
print_regset (cd, dis_info, value, attrs, pc, length, POP);
|
print_regset (cd, dis_info, value, attrs, pc, length, POP);
|
}
|
}
|
|
|
static void
|
static void
|
print_push_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_push_regset (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
long value,
|
long value,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
print_regset (cd, dis_info, value, attrs, pc, length, PUSH);
|
print_regset (cd, dis_info, value, attrs, pc, length, PUSH);
|
}
|
}
|
|
|
static void
|
static void
|
print_signed4n (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
print_signed4n (CGEN_CPU_DESC cd ATTRIBUTE_UNUSED,
|
void * dis_info,
|
void * dis_info,
|
signed long value,
|
signed long value,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
unsigned int attrs ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
bfd_vma pc ATTRIBUTE_UNUSED,
|
int length ATTRIBUTE_UNUSED)
|
int length ATTRIBUTE_UNUSED)
|
{
|
{
|
disassemble_info *info = dis_info;
|
disassemble_info *info = dis_info;
|
|
|
(*info->fprintf_func) (info->stream, "%ld", -value);
|
(*info->fprintf_func) (info->stream, "%ld", -value);
|
}
|
}
|
|
|
