X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;f=opcodes%2Fmt-asm.c;h=6581efaccf039a94999f4aac16cf139cc5606134;hb=refs%2Fheads%2Fconcurrent-displaced-stepping-2020-04-01;hp=85e1249b6869e3671a6586ecbbf986f14da992c8;hpb=01f0fe5e0450edf168c1f612feb93cf588e4e7ea;p=deliverable%2Fbinutils-gdb.git diff --git a/opcodes/mt-asm.c b/opcodes/mt-asm.c index 85e1249b68..6581efaccf 100644 --- a/opcodes/mt-asm.c +++ b/opcodes/mt-asm.c @@ -1,28 +1,29 @@ +/* DO NOT EDIT! -*- buffer-read-only: t -*- vi:set ro: */ /* Assembler interface for targets using CGEN. -*- C -*- CGEN: Cpu tools GENerator THIS FILE IS MACHINE GENERATED WITH CGEN. - the resultant file is machine generated, cgen-asm.in isn't - Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2005 - Free Software Foundation, Inc. + Copyright (C) 1996-2020 Free Software Foundation, Inc. - This file is part of the GNU Binutils and GDB, the GNU debugger. + This file is part of libopcodes. - This program is free software; you can redistribute it and/or modify + This library is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by - the Free Software Foundation; either version 2, or (at your option) + the Free Software Foundation; either version 3, or (at your option) any later version. - This program is distributed in the hope that it will be useful, - but WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - GNU General Public License for more details. + It is distributed in the hope that it will be useful, but WITHOUT + ANY WARRANTY; without even the implied warranty of MERCHANTABILITY + or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public + License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */ + /* ??? Eventually more and more of this stuff can go to cpu-independent files. Keep that in mind. */ @@ -52,7 +53,7 @@ static const char * parse_insn_normal /* Range checking for signed numbers. Returns 0 if acceptable and 1 if the value is out of bounds for a signed quantity. */ -static int +static int signed_out_of_bounds (long val) { if ((val < -32768) || (val > 32767)) @@ -72,7 +73,7 @@ parse_loopsize (CGEN_CPU_DESC cd, enum cgen_parse_operand_result result_type; bfd_vma value; - /* Is it a control transfer instructions? */ + /* Is it a control transfer instructions? */ if (opindex == (CGEN_OPERAND_TYPE) MT_OPERAND_LOOPSIZE) { code = BFD_RELOC_MT_PCINSN8; @@ -97,7 +98,7 @@ parse_imm16 (CGEN_CPU_DESC cd, bfd_reloc_code_real_type code = BFD_RELOC_NONE; bfd_vma value; - /* Is it a control transfer instructions? */ + /* Is it a control transfer instructions? */ if (opindex == (CGEN_OPERAND_TYPE) MT_OPERAND_IMM16O) { code = BFD_RELOC_16_PCREL; @@ -144,7 +145,7 @@ parse_imm16 (CGEN_CPU_DESC cd, value = (value >> 16) & 0xFFFF; else if (code == BFD_RELOC_LO16) value = value & 0xFFFF; - else + else errmsg = _("Biiiig Trouble in parse_imm16!"); break; @@ -153,7 +154,7 @@ parse_imm16 (CGEN_CPU_DESC cd, break; default: - errmsg = _("%operator operand is not a symbol"); + errmsg = _("The percent-operator's operand is not a symbol"); break; } } @@ -173,27 +174,27 @@ parse_imm16 (CGEN_CPU_DESC cd, if (parse_signed) { /* Parse as as signed integer. */ - + errmsg = cgen_parse_signed_integer (cd, strp, opindex, valuep); - if (errmsg == NULL) + if (errmsg == NULL) { #if 0 /* Manual range checking is needed for the signed case. */ if (*valuep & 0x8000) value = 0xffff0000 | *valuep; - else + else value = *valuep; if (signed_out_of_bounds (value)) errmsg = _("Operand out of range. Must be between -32768 and 32767."); /* Truncate to 16 bits. This is necessary because cgen will have sign extended *valuep. */ - *valuep &= 0xFFFF; + *valuep &= 0xFFFF; #endif } } - else + else { /* MT_OPERAND_IMM16Z. Parse as an unsigned integer. */ errmsg = cgen_parse_unsigned_integer (cd, strp, opindex, (unsigned long *) valuep); @@ -591,14 +592,16 @@ mt_cgen_parse_operand (CGEN_CPU_DESC cd, default : /* xgettext:c-format */ - fprintf (stderr, _("Unrecognized field %d while parsing.\n"), opindex); + opcodes_error_handler + (_("internal error: unrecognized field %d while parsing"), + opindex); abort (); } return errmsg; } -cgen_parse_fn * const mt_cgen_parse_handlers[] = +cgen_parse_fn * const mt_cgen_parse_handlers[] = { parse_insn_normal, }; @@ -610,6 +613,9 @@ mt_cgen_init_asm (CGEN_CPU_DESC cd) mt_cgen_init_ibld_table (cd); cd->parse_handlers = & mt_cgen_parse_handlers[0]; cd->parse_operand = mt_cgen_parse_operand; +#ifdef CGEN_ASM_INIT_HOOK +CGEN_ASM_INIT_HOOK +#endif } @@ -625,9 +631,9 @@ mt_cgen_init_asm (CGEN_CPU_DESC cd) Returns NULL for success, an error message for failure. */ -char * +char * mt_cgen_build_insn_regex (CGEN_INSN *insn) -{ +{ CGEN_OPCODE *opc = (CGEN_OPCODE *) CGEN_INSN_OPCODE (insn); const char *mnem = CGEN_INSN_MNEMONIC (insn); char rxbuf[CGEN_MAX_RX_ELEMENTS]; @@ -666,18 +672,18 @@ mt_cgen_build_insn_regex (CGEN_INSN *insn) /* Copy any remaining literals from the syntax string into the rx. */ for(; * syn != 0 && rx <= rxbuf + (CGEN_MAX_RX_ELEMENTS - 7 - 4); ++syn) { - if (CGEN_SYNTAX_CHAR_P (* syn)) + if (CGEN_SYNTAX_CHAR_P (* syn)) { char c = CGEN_SYNTAX_CHAR (* syn); - switch (c) + switch (c) { /* Escape any regex metacharacters in the syntax. */ - case '.': case '[': case '\\': - case '*': case '^': case '$': + case '.': case '[': case '\\': + case '*': case '^': case '$': #ifdef CGEN_ESCAPE_EXTENDED_REGEX - case '?': case '{': case '}': + case '?': case '{': case '}': case '(': case ')': case '*': case '|': case '+': case ']': #endif @@ -707,20 +713,20 @@ mt_cgen_build_insn_regex (CGEN_INSN *insn) } /* Trailing whitespace ok. */ - * rx++ = '['; - * rx++ = ' '; - * rx++ = '\t'; - * rx++ = ']'; - * rx++ = '*'; + * rx++ = '['; + * rx++ = ' '; + * rx++ = '\t'; + * rx++ = ']'; + * rx++ = '*'; /* But anchor it after that. */ - * rx++ = '$'; + * rx++ = '$'; * rx = '\0'; CGEN_INSN_RX (insn) = xmalloc (sizeof (regex_t)); reg_err = regcomp ((regex_t *) CGEN_INSN_RX (insn), rxbuf, REG_NOSUB); - if (reg_err == 0) + if (reg_err == 0) return NULL; else { @@ -838,9 +844,11 @@ parse_insn_normal (CGEN_CPU_DESC cd, continue; } +#ifdef CGEN_MNEMONIC_OPERANDS + (void) past_opcode_p; +#endif /* We have an operand of some sort. */ - errmsg = cd->parse_operand (cd, CGEN_SYNTAX_FIELD (*syn), - &str, fields); + errmsg = cd->parse_operand (cd, CGEN_SYNTAX_FIELD (*syn), &str, fields); if (errmsg) return errmsg; @@ -917,7 +925,7 @@ mt_cgen_assemble_insn (CGEN_CPU_DESC cd, const CGEN_INSN *insn = ilist->insn; recognized_mnemonic = 1; -#ifdef CGEN_VALIDATE_INSN_SUPPORTED +#ifdef CGEN_VALIDATE_INSN_SUPPORTED /* Not usually needed as unsupported opcodes shouldn't be in the hash lists. */ /* Is this insn supported by the selected cpu? */ @@ -957,32 +965,40 @@ mt_cgen_assemble_insn (CGEN_CPU_DESC cd, { static char errbuf[150]; -#ifdef CGEN_VERBOSE_ASSEMBLER_ERRORS const char *tmp_errmsg; - - /* If requesting verbose error messages, use insert_errmsg. - Failing that, use parse_errmsg. */ - tmp_errmsg = (insert_errmsg ? insert_errmsg : - parse_errmsg ? parse_errmsg : - recognized_mnemonic ? - _("unrecognized form of instruction") : - _("unrecognized instruction")); - - if (strlen (start) > 50) - /* xgettext:c-format */ - sprintf (errbuf, "%s `%.50s...'", tmp_errmsg, start); - else - /* xgettext:c-format */ - sprintf (errbuf, "%s `%.50s'", tmp_errmsg, start); +#ifdef CGEN_VERBOSE_ASSEMBLER_ERRORS +#define be_verbose 1 #else - if (strlen (start) > 50) - /* xgettext:c-format */ - sprintf (errbuf, _("bad instruction `%.50s...'"), start); - else - /* xgettext:c-format */ - sprintf (errbuf, _("bad instruction `%.50s'"), start); +#define be_verbose 0 #endif - + + if (be_verbose) + { + /* If requesting verbose error messages, use insert_errmsg. + Failing that, use parse_errmsg. */ + tmp_errmsg = (insert_errmsg ? insert_errmsg : + parse_errmsg ? parse_errmsg : + recognized_mnemonic ? + _("unrecognized form of instruction") : + _("unrecognized instruction")); + + if (strlen (start) > 50) + /* xgettext:c-format */ + sprintf (errbuf, "%s `%.50s...'", tmp_errmsg, start); + else + /* xgettext:c-format */ + sprintf (errbuf, "%s `%.50s'", tmp_errmsg, start); + } + else + { + if (strlen (start) > 50) + /* xgettext:c-format */ + sprintf (errbuf, _("bad instruction `%.50s...'"), start); + else + /* xgettext:c-format */ + sprintf (errbuf, _("bad instruction `%.50s'"), start); + } + *errmsg = errbuf; return NULL; }