X-Git-Url: http://git.efficios.com/?a=blobdiff_plain;f=gas%2Fitbl-ops.c;h=e5d48e48ddc9d4c6d5951351562b4533af307af3;hb=3318ac0e53a673f9989f5e9bbaa9d1c5d536f4e5;hp=6498a0f4753411e47eeb2bb461212ccc5550ff75;hpb=59c871b45790452b5643de68629dea986f7ffee0;p=deliverable%2Fbinutils-gdb.git diff --git a/gas/itbl-ops.c b/gas/itbl-ops.c index 6498a0f475..e5d48e48dd 100644 --- a/gas/itbl-ops.c +++ b/gas/itbl-ops.c @@ -1,11 +1,11 @@ /* itbl-ops.c - Copyright 1997, 1999, 2000, 2001 Free Software Foundation, Inc. + Copyright (C) 1997-2020 Free Software Foundation, Inc. This file is part of GAS, the GNU Assembler. GAS 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. GAS is distributed in the hope that it will be useful, @@ -15,8 +15,8 @@ You should have received a copy of the GNU General Public License along with GAS; see the file COPYING. If not, write to the Free - Software Foundation, 59 Temple Place - Suite 330, Boston, MA - 02111-1307, USA. */ + Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA + 02110-1301, USA. */ /*======================================================================*/ /* @@ -88,9 +88,7 @@ * */ -#include -#include -#include +#include "as.h" #include "itbl-ops.h" #include @@ -98,7 +96,7 @@ #ifdef DEBUG #include -#define ASSERT(x) assert(x) +#define ASSERT(x) gas_assert (x) #define DBG(x) printf x #else #define ASSERT(x) @@ -134,7 +132,7 @@ struct itbl_field { struct itbl_entry { e_processor processor; /* processor number */ e_type type; /* dreg/creg/greg/insn */ - char *name; /* mnemionic name for insn/register */ + char *name; /* mnemonic name for insn/register */ unsigned long value; /* opcode/instruction mask/register number */ unsigned long flags; /* effects of the instruction */ struct itbl_range range; /* bit range within instruction for value */ @@ -146,12 +144,7 @@ struct itbl_entry { static int itbl_num_opcodes = 0; /* Array of entries for each processor and entry type */ -static struct itbl_entry *entries[e_nprocs][e_ntypes] = { - {0, 0, 0, 0, 0, 0}, - {0, 0, 0, 0, 0, 0}, - {0, 0, 0, 0, 0, 0}, - {0, 0, 0, 0, 0, 0} -}; +static struct itbl_entry *entries[e_nprocs][e_ntypes]; /* local prototypes */ static unsigned long build_opcode (struct itbl_entry *e); @@ -252,8 +245,6 @@ itbl_add_operand (struct itbl_entry *e, int yytype, int sbit, /* Interfaces for assembler and disassembler */ #ifndef STAND_ALONE -#include "as.h" -#include "symbols.h" static void append_insns_as_macros (void); /* Initialize for gas. */ @@ -308,7 +299,10 @@ append_insns_as_macros (void) { struct ITBL_OPCODE_STRUCT *new_opcodes, *o; struct itbl_entry *e, **es; - int n, id, size, new_size, new_num_opcodes; + int n, size, new_num_opcodes; +#ifdef USE_MACROS + int id; +#endif if (!itbl_have_entries) return; @@ -326,12 +320,9 @@ append_insns_as_macros (void) ASSERT (size >= 0); DBG (("I get=%d\n", size / sizeof (ITBL_OPCODES[0]))); - new_size = sizeof (struct ITBL_OPCODE_STRUCT) * new_num_opcodes; - ASSERT (new_size > size); - - /* FIXME since ITBL_OPCODES culd be a static table, + /* FIXME since ITBL_OPCODES could be a static table, we can't realloc or delete the old memory. */ - new_opcodes = (struct ITBL_OPCODE_STRUCT *) malloc (new_size); + new_opcodes = XNEWVEC (struct ITBL_OPCODE_STRUCT, new_num_opcodes); if (!new_opcodes) { printf (_("Unable to allocate memory for new instructions\n")); @@ -343,7 +334,9 @@ append_insns_as_macros (void) /* FIXME! some NUMOPCODES are calculated expressions. These need to be changed before itbls can be supported. */ +#ifdef USE_MACROS id = ITBL_NUM_MACROS; /* begin the next macro id after the last */ +#endif o = &new_opcodes[ITBL_NUM_OPCODES]; /* append macro to opcodes list */ for (n = e_p0; n < e_nprocs; n++) { @@ -547,7 +540,7 @@ itbl_assemble (char *name, char *s) return 0; /-* error; invalid operand *-/ break; */ - /* If not a symbol, fall thru to IMMED */ + /* If not a symbol, fallthru to IMMED */ case e_immed: if (*n == '0' && *(n + 1) == 'x') /* hex begins 0x... */ { @@ -601,6 +594,7 @@ itbl_disassemble (char *s, unsigned long insn) { struct itbl_entry *r; unsigned long value; + char s_value[20]; if (f == e->fields) /* First operand is preceded by tab. */ strcat (s, "\t"); @@ -619,14 +613,18 @@ itbl_disassemble (char *s, unsigned long insn) if (r) strcat (s, r->name); else - sprintf (s, "%s$%lu", s, value); + { + sprintf (s_value, "$%lu", value); + strcat (s, s_value); + } break; case e_addr: /* Use assembler's symbol table to find symbol. */ /* FIXME!! Do we need this? If so, what about relocs?? */ /* If not a symbol, fall through to IMMED. */ case e_immed: - sprintf (s, "%s0x%lx", s, value); + sprintf (s_value, "0x%lx", value); + strcat (s, s_value); break; default: return 0; /* error; invalid field spec */ @@ -852,13 +850,11 @@ alloc_entry (e_processor processor, e_type type, struct itbl_entry *e, **es; if (!name) return 0; - e = (struct itbl_entry *) malloc (sizeof (struct itbl_entry)); + e = XNEW (struct itbl_entry); if (e) { memset (e, 0, sizeof (struct itbl_entry)); - e->name = (char *) malloc (sizeof (strlen (name)) + 1); - if (e->name) - strcpy (e->name, name); + e->name = xstrdup (name); e->processor = processor; e->type = type; e->value = value; @@ -876,7 +872,7 @@ alloc_field (e_type type, int sbit, int ebit, unsigned long flags) { struct itbl_field *f; - f = (struct itbl_field *) malloc (sizeof (struct itbl_field)); + f = XNEW (struct itbl_field); if (f) { memset (f, 0, sizeof (struct itbl_field));