1999-05-03 09:29:11 +02:00
|
|
|
|
/* write.c - emit .o file
|
2019-01-01 11:31:27 +01:00
|
|
|
|
Copyright (C) 1986-2019 Free Software Foundation, Inc.
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
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
|
2007-07-03 13:01:12 +02:00
|
|
|
|
the Free Software Foundation; either version 3, or (at your option)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
any later version.
|
|
|
|
|
|
|
|
|
|
GAS 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 GAS; see the file COPYING. If not, write to the Free
|
2005-05-05 11:13:19 +02:00
|
|
|
|
Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
|
|
|
|
|
02110-1301, USA. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2017-01-23 16:23:07 +01:00
|
|
|
|
/* This thing should be set up to do byte ordering correctly. But... */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
#include "as.h"
|
|
|
|
|
#include "subsegs.h"
|
|
|
|
|
#include "obstack.h"
|
|
|
|
|
#include "output-file.h"
|
2000-11-29 22:42:41 +01:00
|
|
|
|
#include "dwarf2dbg.h"
|
2010-07-03 22:52:24 +02:00
|
|
|
|
#include "compress-debug.h"
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
#ifndef TC_FORCE_RELOCATION
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#define TC_FORCE_RELOCATION(FIX) \
|
2003-01-23 13:51:05 +01:00
|
|
|
|
(generic_force_reloc (FIX))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#endif
|
|
|
|
|
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#ifndef TC_FORCE_RELOCATION_ABS
|
|
|
|
|
#define TC_FORCE_RELOCATION_ABS(FIX) \
|
|
|
|
|
(TC_FORCE_RELOCATION (FIX))
|
|
|
|
|
#endif
|
|
|
|
|
|
2017-05-16 01:13:24 +02:00
|
|
|
|
#define GENERIC_FORCE_RELOCATION_LOCAL(FIX) \
|
2002-09-05 02:01:18 +02:00
|
|
|
|
(!(FIX)->fx_pcrel \
|
|
|
|
|
|| TC_FORCE_RELOCATION (FIX))
|
2017-05-16 01:13:24 +02:00
|
|
|
|
#ifndef TC_FORCE_RELOCATION_LOCAL
|
|
|
|
|
#define TC_FORCE_RELOCATION_LOCAL GENERIC_FORCE_RELOCATION_LOCAL
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#endif
|
|
|
|
|
|
2017-05-16 01:13:24 +02:00
|
|
|
|
#define GENERIC_FORCE_RELOCATION_SUB_SAME(FIX, SEG) \
|
|
|
|
|
(!SEG_NORMAL (SEG))
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#ifndef TC_FORCE_RELOCATION_SUB_SAME
|
2017-05-16 01:13:24 +02:00
|
|
|
|
#define TC_FORCE_RELOCATION_SUB_SAME GENERIC_FORCE_RELOCATION_SUB_SAME
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#endif
|
|
|
|
|
|
2008-09-19 04:11:02 +02:00
|
|
|
|
#ifndef md_register_arithmetic
|
|
|
|
|
# define md_register_arithmetic 1
|
|
|
|
|
#endif
|
|
|
|
|
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#ifndef TC_FORCE_RELOCATION_SUB_ABS
|
2008-09-19 04:11:02 +02:00
|
|
|
|
#define TC_FORCE_RELOCATION_SUB_ABS(FIX, SEG) \
|
|
|
|
|
(!md_register_arithmetic && (SEG) == reg_section)
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#ifndef TC_FORCE_RELOCATION_SUB_LOCAL
|
|
|
|
|
#ifdef DIFF_EXPR_OK
|
2008-09-19 12:00:40 +02:00
|
|
|
|
#define TC_FORCE_RELOCATION_SUB_LOCAL(FIX, SEG) \
|
|
|
|
|
(!md_register_arithmetic && (SEG) == reg_section)
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#else
|
2008-09-19 12:00:40 +02:00
|
|
|
|
#define TC_FORCE_RELOCATION_SUB_LOCAL(FIX, SEG) 1
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#endif
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#ifndef TC_VALIDATE_FIX_SUB
|
|
|
|
|
#ifdef UNDEFINED_DIFFERENCE_OK
|
|
|
|
|
/* The PA needs this for PIC code generation. */
|
2008-09-19 12:00:40 +02:00
|
|
|
|
#define TC_VALIDATE_FIX_SUB(FIX, SEG) \
|
|
|
|
|
(md_register_arithmetic || (SEG) != reg_section)
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#else
|
2008-09-19 12:00:40 +02:00
|
|
|
|
#define TC_VALIDATE_FIX_SUB(FIX, SEG) \
|
|
|
|
|
((md_register_arithmetic || (SEG) != reg_section) \
|
|
|
|
|
&& ((FIX)->fx_r_type == BFD_RELOC_GPREL32 \
|
|
|
|
|
|| (FIX)->fx_r_type == BFD_RELOC_GPREL16))
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#endif
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#endif
|
|
|
|
|
|
2000-08-22 03:20:41 +02:00
|
|
|
|
#ifndef TC_LINKRELAX_FIXUP
|
|
|
|
|
#define TC_LINKRELAX_FIXUP(SEG) 1
|
|
|
|
|
#endif
|
|
|
|
|
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#ifndef MD_APPLY_SYM_VALUE
|
|
|
|
|
#define MD_APPLY_SYM_VALUE(FIX) 1
|
2000-08-22 06:52:40 +02:00
|
|
|
|
#endif
|
2000-11-07 02:18:45 +01:00
|
|
|
|
|
2001-07-03 17:04:19 +02:00
|
|
|
|
#ifndef TC_FINALIZE_SYMS_BEFORE_SIZE_SEG
|
|
|
|
|
#define TC_FINALIZE_SYMS_BEFORE_SIZE_SEG 1
|
|
|
|
|
#endif
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#ifndef MD_PCREL_FROM_SECTION
|
2002-08-28 05:35:59 +02:00
|
|
|
|
#define MD_PCREL_FROM_SECTION(FIX, SEC) md_pcrel_from (FIX)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#endif
|
|
|
|
|
|
2005-05-09 16:20:52 +02:00
|
|
|
|
#ifndef TC_FAKE_LABEL
|
|
|
|
|
#define TC_FAKE_LABEL(NAME) (strcmp ((NAME), FAKE_LABEL_NAME) == 0)
|
|
|
|
|
#endif
|
|
|
|
|
|
2007-02-18 00:13:49 +01:00
|
|
|
|
/* Positive values of TC_FX_SIZE_SLACK allow a target to define
|
|
|
|
|
fixups that far past the end of a frag. Having such fixups
|
|
|
|
|
is of course most most likely a bug in setting fx_size correctly.
|
|
|
|
|
A negative value disables the fixup check entirely, which is
|
|
|
|
|
appropriate for something like the Renesas / SuperH SH_COUNT
|
|
|
|
|
reloc. */
|
|
|
|
|
#ifndef TC_FX_SIZE_SLACK
|
|
|
|
|
#define TC_FX_SIZE_SLACK(FIX) 0
|
|
|
|
|
#endif
|
|
|
|
|
|
2001-05-22 12:23:50 +02:00
|
|
|
|
/* Used to control final evaluation of expressions. */
|
|
|
|
|
int finalize_syms = 0;
|
2001-03-30 04:19:36 +02:00
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
int symbol_table_frozen;
|
2002-09-05 02:01:18 +02:00
|
|
|
|
|
|
|
|
|
symbolS *abs_section_sym;
|
|
|
|
|
|
2002-09-20 01:51:35 +02:00
|
|
|
|
/* Remember the value of dot when parsing expressions. */
|
|
|
|
|
addressT dot_value;
|
|
|
|
|
|
2013-03-08 11:17:00 +01:00
|
|
|
|
/* The frag that dot_value is based from. */
|
|
|
|
|
fragS *dot_frag;
|
|
|
|
|
|
2007-03-26 14:23:48 +02:00
|
|
|
|
/* Relocs generated by ".reloc" pseudo. */
|
|
|
|
|
struct reloc_list* reloc_list;
|
|
|
|
|
|
2003-12-06 17:16:51 +01:00
|
|
|
|
void print_fixup (fixS *);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
/* We generally attach relocs to frag chains. However, after we have
|
|
|
|
|
chained these all together into a segment, any relocs we add after
|
|
|
|
|
that must be attached to a segment. This will include relocs added
|
|
|
|
|
in md_estimate_size_for_relax, for example. */
|
|
|
|
|
static int frags_chained = 0;
|
|
|
|
|
|
|
|
|
|
static int n_fixups;
|
|
|
|
|
|
2002-08-28 05:35:59 +02:00
|
|
|
|
#define RELOC_ENUM enum bfd_reloc_code_real
|
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Create a fixS in obstack 'notes'. */
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
static fixS *
|
2003-12-06 17:16:51 +01:00
|
|
|
|
fix_new_internal (fragS *frag, /* Which frag? */
|
|
|
|
|
int where, /* Where in that frag? */
|
|
|
|
|
int size, /* 1, 2, or 4 usually. */
|
|
|
|
|
symbolS *add_symbol, /* X_add_symbol. */
|
|
|
|
|
symbolS *sub_symbol, /* X_op_symbol. */
|
|
|
|
|
offsetT offset, /* X_add_number. */
|
|
|
|
|
int pcrel, /* TRUE if PC-relative relocation. */
|
2012-01-17 01:20:30 +01:00
|
|
|
|
RELOC_ENUM r_type /* Relocation type. */,
|
2010-01-23 13:05:33 +01:00
|
|
|
|
int at_beginning) /* Add to the start of the list? */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
fixS *fixP;
|
|
|
|
|
|
|
|
|
|
n_fixups++;
|
|
|
|
|
|
2009-09-11 17:27:38 +02:00
|
|
|
|
fixP = (fixS *) obstack_alloc (¬es, sizeof (fixS));
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
fixP->fx_frag = frag;
|
|
|
|
|
fixP->fx_where = where;
|
|
|
|
|
fixP->fx_size = size;
|
|
|
|
|
/* We've made fx_size a narrow field; check that it's wide enough. */
|
|
|
|
|
if (fixP->fx_size != size)
|
|
|
|
|
{
|
|
|
|
|
as_bad (_("field fx_size too small to hold %d"), size);
|
|
|
|
|
abort ();
|
|
|
|
|
}
|
|
|
|
|
fixP->fx_addsy = add_symbol;
|
|
|
|
|
fixP->fx_subsy = sub_symbol;
|
|
|
|
|
fixP->fx_offset = offset;
|
2002-09-20 01:51:35 +02:00
|
|
|
|
fixP->fx_dot_value = dot_value;
|
2013-03-08 11:17:00 +01:00
|
|
|
|
fixP->fx_dot_frag = dot_frag;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
fixP->fx_pcrel = pcrel;
|
|
|
|
|
fixP->fx_r_type = r_type;
|
|
|
|
|
fixP->fx_im_disp = 0;
|
|
|
|
|
fixP->fx_pcrel_adjust = 0;
|
|
|
|
|
fixP->fx_bit_fixP = 0;
|
|
|
|
|
fixP->fx_addnumber = 0;
|
|
|
|
|
fixP->fx_tcbit = 0;
|
2007-02-01 15:12:20 +01:00
|
|
|
|
fixP->fx_tcbit2 = 0;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
fixP->fx_done = 0;
|
|
|
|
|
fixP->fx_no_overflow = 0;
|
|
|
|
|
fixP->fx_signed = 0;
|
|
|
|
|
|
|
|
|
|
#ifdef USING_CGEN
|
|
|
|
|
fixP->fx_cgen.insn = NULL;
|
|
|
|
|
fixP->fx_cgen.opinfo = 0;
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#ifdef TC_FIX_TYPE
|
2000-07-20 22:07:09 +02:00
|
|
|
|
TC_INIT_FIX_DATA (fixP);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#endif
|
|
|
|
|
|
2016-02-22 15:11:27 +01:00
|
|
|
|
fixP->fx_file = as_where (&fixP->fx_line);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
{
|
|
|
|
|
|
|
|
|
|
fixS **seg_fix_rootP = (frags_chained
|
|
|
|
|
? &seg_info (now_seg)->fix_root
|
|
|
|
|
: &frchain_now->fix_root);
|
|
|
|
|
fixS **seg_fix_tailP = (frags_chained
|
|
|
|
|
? &seg_info (now_seg)->fix_tail
|
|
|
|
|
: &frchain_now->fix_tail);
|
|
|
|
|
|
2010-01-23 13:05:33 +01:00
|
|
|
|
if (at_beginning)
|
|
|
|
|
{
|
|
|
|
|
fixP->fx_next = *seg_fix_rootP;
|
|
|
|
|
*seg_fix_rootP = fixP;
|
|
|
|
|
if (fixP->fx_next == NULL)
|
|
|
|
|
*seg_fix_tailP = fixP;
|
|
|
|
|
}
|
1999-05-03 09:29:11 +02:00
|
|
|
|
else
|
2010-01-23 13:05:33 +01:00
|
|
|
|
{
|
|
|
|
|
fixP->fx_next = NULL;
|
|
|
|
|
if (*seg_fix_tailP)
|
|
|
|
|
(*seg_fix_tailP)->fx_next = fixP;
|
|
|
|
|
else
|
|
|
|
|
*seg_fix_rootP = fixP;
|
|
|
|
|
*seg_fix_tailP = fixP;
|
|
|
|
|
}
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
return fixP;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Create a fixup relative to a symbol (plus a constant). */
|
|
|
|
|
|
|
|
|
|
fixS *
|
2003-12-06 17:16:51 +01:00
|
|
|
|
fix_new (fragS *frag, /* Which frag? */
|
|
|
|
|
int where, /* Where in that frag? */
|
|
|
|
|
int size, /* 1, 2, or 4 usually. */
|
|
|
|
|
symbolS *add_symbol, /* X_add_symbol. */
|
|
|
|
|
offsetT offset, /* X_add_number. */
|
|
|
|
|
int pcrel, /* TRUE if PC-relative relocation. */
|
|
|
|
|
RELOC_ENUM r_type /* Relocation type. */)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
return fix_new_internal (frag, where, size, add_symbol,
|
2010-01-23 13:05:33 +01:00
|
|
|
|
(symbolS *) NULL, offset, pcrel, r_type, FALSE);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Create a fixup for an expression. Currently we only support fixups
|
|
|
|
|
for difference expressions. That is itself more than most object
|
|
|
|
|
file formats support anyhow. */
|
|
|
|
|
|
|
|
|
|
fixS *
|
2003-12-06 17:16:51 +01:00
|
|
|
|
fix_new_exp (fragS *frag, /* Which frag? */
|
|
|
|
|
int where, /* Where in that frag? */
|
|
|
|
|
int size, /* 1, 2, or 4 usually. */
|
|
|
|
|
expressionS *exp, /* Expression. */
|
|
|
|
|
int pcrel, /* TRUE if PC-relative relocation. */
|
|
|
|
|
RELOC_ENUM r_type /* Relocation type. */)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
symbolS *add = NULL;
|
|
|
|
|
symbolS *sub = NULL;
|
|
|
|
|
offsetT off = 0;
|
|
|
|
|
|
|
|
|
|
switch (exp->X_op)
|
|
|
|
|
{
|
|
|
|
|
case O_absent:
|
|
|
|
|
break;
|
|
|
|
|
|
2001-03-23 19:15:49 +01:00
|
|
|
|
case O_register:
|
|
|
|
|
as_bad (_("register value used as expression"));
|
|
|
|
|
break;
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
case O_add:
|
|
|
|
|
/* This comes up when _GLOBAL_OFFSET_TABLE_+(.-L0) is read, if
|
|
|
|
|
the difference expression cannot immediately be reduced. */
|
|
|
|
|
{
|
|
|
|
|
symbolS *stmp = make_expr_symbol (exp);
|
2000-08-22 03:20:41 +02:00
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
exp->X_op = O_symbol;
|
|
|
|
|
exp->X_op_symbol = 0;
|
|
|
|
|
exp->X_add_symbol = stmp;
|
|
|
|
|
exp->X_add_number = 0;
|
2000-08-22 03:20:41 +02:00
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
return fix_new_exp (frag, where, size, exp, pcrel, r_type);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
case O_symbol_rva:
|
|
|
|
|
add = exp->X_add_symbol;
|
|
|
|
|
off = exp->X_add_number;
|
|
|
|
|
r_type = BFD_RELOC_RVA;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case O_uminus:
|
|
|
|
|
sub = exp->X_add_symbol;
|
|
|
|
|
off = exp->X_add_number;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case O_subtract:
|
|
|
|
|
sub = exp->X_op_symbol;
|
|
|
|
|
/* Fall through. */
|
|
|
|
|
case O_symbol:
|
|
|
|
|
add = exp->X_add_symbol;
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Fall through. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
case O_constant:
|
|
|
|
|
off = exp->X_add_number;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
default:
|
|
|
|
|
add = make_expr_symbol (exp);
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
2010-01-23 13:05:33 +01:00
|
|
|
|
return fix_new_internal (frag, where, size, add, sub, off, pcrel,
|
|
|
|
|
r_type, FALSE);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Create a fixup at the beginning of FRAG. The arguments are the same
|
|
|
|
|
as for fix_new, except that WHERE is implicitly 0. */
|
|
|
|
|
|
|
|
|
|
fixS *
|
|
|
|
|
fix_at_start (fragS *frag, int size, symbolS *add_symbol,
|
|
|
|
|
offsetT offset, int pcrel, RELOC_ENUM r_type)
|
|
|
|
|
{
|
|
|
|
|
return fix_new_internal (frag, 0, size, add_symbol,
|
|
|
|
|
(symbolS *) NULL, offset, pcrel, r_type, TRUE);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
2003-01-23 13:51:05 +01:00
|
|
|
|
/* Generic function to determine whether a fixup requires a relocation. */
|
|
|
|
|
int
|
2003-12-06 17:16:51 +01:00
|
|
|
|
generic_force_reloc (fixS *fix)
|
2003-01-23 13:51:05 +01:00
|
|
|
|
{
|
|
|
|
|
if (fix->fx_r_type == BFD_RELOC_VTABLE_INHERIT
|
|
|
|
|
|| fix->fx_r_type == BFD_RELOC_VTABLE_ENTRY)
|
|
|
|
|
return 1;
|
* README-vms: Delete.
* config-gas.com: Delete.
* makefile.vms: Delete.
* vmsconf.sh: Delete.
* config/atof-tahoe.c: Delete.
* config/m88k-opcode.h: Delete.
* config/obj-bout.c: Delete.
* config/obj-bout.h: Delete.
* config/obj-hp300.c: Delete.
* config/obj-hp300.h: Delete.
* config/tc-a29k.c: Delete.
* config/tc-a29k.h: Delete.
* config/tc-h8500.c: Delete.
* config/tc-h8500.h: Delete.
* config/tc-m88k.c: Delete.
* config/tc-m88k.h: Delete.
* config/tc-tahoe.c: Delete.
* config/tc-tahoe.h: Delete.
* config/tc-tic80.c: Delete.
* config/tc-tic80.h: Delete.
* config/tc-w65.c: Delete.
* config/tc-w65.h: Delete.
* config/te-aux.h: Delete.
* config/te-delt88.h: Delete.
* config/te-delta.h: Delete.
* config/te-dpx2.h: Delete.
* config/te-hp300.h: Delete.
* config/te-ic960.h: Delete.
* config/vms-a-conf.h: Delete.
* doc/c-a29k.texi: Delete.
* doc/c-h8500.texi: Delete.
* doc/c-m88k.texi: Delete.
* README: Remove obsolete examples, and list of supported targets.
* Makefile.am: Remove a29k, h8500, m88k, tahoe, tic80, w65,
bout and hp300 support.
(DEP_FLAGS): Don't define BFD_ASSEMBLER.
* configure.in: Remove --enable-bfd-assembler, need_bfd,
primary_bfd_gas.
* configure.tgt: Remove a29k, h8300-coff, h8500-*, i960 non-elf,
m68k non bfd, m88k, or32-coff, tic80-*, vax non-bfd, w65k-*, *-nindy.
* as.c: Remove all non-BFD_ASSEMBLER code, support for above targets.
* as.h: Likewise.
* dw2gencfi.c: Likewise.
* dwarf2dbg.c: Likewise.
* ehopt.c: Likewise.
* input-file.c: Likewise.
* listing.c: Likewise.
* literal.c: Likewise.
* messages.c: Likewise.
* obj.h: Likewise.
* output-file.c: Likewise.
* read.c: Likewise.
* stabs.c: Likewise.
* struc-symbol.h: Likewise.
* subsegs.c: Likewise.
* subsegs.h: Likewise.
* symbols.c: Likewise.
* symbols.h: Likewise.
* tc.h: Likewise.
* write.c: Likewise.
* write.h: Likewise.
* config/aout_gnu.h: Likewise.
* config/obj-aout.c: Likewise.
* config/obj-aout.h: Likewise.
* config/obj-coff.c: Likewise.
* config/obj-coff.h: Likewise.
* config/obj-evax.h: Likewise.
* config/obj-ieee.h: Likewise.
* config/tc-arm.c: Likewise.
* config/tc-arm.h: Likewise.
* config/tc-avr.c: Likewise.
* config/tc-avr.h: Likewise.
* config/tc-crx.h: Likewise.
* config/tc-d10v.h: Likewise.
* config/tc-d30v.h: Likewise.
* config/tc-dlx.h: Likewise.
* config/tc-fr30.h: Likewise.
* config/tc-frv.h: Likewise.
* config/tc-h8300.c: Likewise.
* config/tc-h8300.h: Likewise.
* config/tc-hppa.h: Likewise.
* config/tc-i370.h: Likewise.
* config/tc-i386.c: Likewise.
* config/tc-i386.h: Likewise.
* config/tc-i860.h: Likewise.
* config/tc-i960.c: Likewise.
* config/tc-i960.h: Likewise.
* config/tc-ip2k.h: Likewise.
* config/tc-iq2000.h: Likewise.
* config/tc-m32c.h: Likewise.
* config/tc-m32r.h: Likewise.
* config/tc-m68hc11.h: Likewise.
* config/tc-m68k.c: Likewise.
* config/tc-m68k.h: Likewise.
* config/tc-maxq.c: Likewise.
* config/tc-maxq.h: Likewise.
* config/tc-mcore.c: Likewise.
* config/tc-mcore.h: Likewise.
* config/tc-mn10200.h: Likewise.
* config/tc-mn10300.c: Likewise.
* config/tc-mn10300.h: Likewise.
* config/tc-ms1.h: Likewise.
* config/tc-msp430.c: Likewise.
* config/tc-msp430.h: Likewise.
* config/tc-ns32k.c: Likewise.
* config/tc-ns32k.h: Likewise.
* config/tc-openrisc.h: Likewise.
* config/tc-or32.c: Likewise.
* config/tc-or32.h: Likewise.
* config/tc-ppc.c: Likewise.
* config/tc-ppc.h: Likewise.
* config/tc-s390.h: Likewise.
* config/tc-sh.c: Likewise.
* config/tc-sh.h: Likewise.
* config/tc-sparc.c: Likewise.
* config/tc-tic30.c: Likewise.
* config/tc-tic30.h: Likewise.
* config/tc-tic4x.c: Likewise.
* config/tc-tic4x.h: Likewise.
* config/tc-tic54x.c: Likewise.
* config/tc-tic54x.h: Likewise.
* config/tc-v850.h: Likewise.
* config/tc-vax.c: Likewise.
* config/tc-vax.h: Likewise.
* config/tc-xstormy16.h: Likewise.
* config/tc-xtensa.h: Likewise.
* config/tc-z8k.c: Likewise.
* config/tc-z8k.h: Likewise.
* config/vms-a-conf.h
* doc/Makefile.am: Likewise.
* doc/all.texi: Likewise.
* doc/as.texinfo: Likewise.
* doc/Makefile.in: Regenerate.
* Makefile.in: Regenerate.
* configure: Regenerate.
* config.in: Regenerate.
* po/POTFILES.in: Regenerate.
2005-08-11 03:25:29 +02:00
|
|
|
|
|
2005-08-29 18:30:14 +02:00
|
|
|
|
if (fix->fx_addsy == NULL)
|
|
|
|
|
return 0;
|
|
|
|
|
|
2003-01-23 13:51:05 +01:00
|
|
|
|
return S_FORCE_RELOC (fix->fx_addsy, fix->fx_subsy == NULL);
|
|
|
|
|
}
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
/* Append a string onto another string, bumping the pointer along. */
|
|
|
|
|
void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
append (char **charPP, char *fromP, unsigned long length)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Don't trust memcpy() of 0 chars. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
if (length == 0)
|
|
|
|
|
return;
|
|
|
|
|
|
|
|
|
|
memcpy (*charPP, fromP, length);
|
|
|
|
|
*charPP += length;
|
|
|
|
|
}
|
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* This routine records the largest alignment seen for each segment.
|
|
|
|
|
If the beginning of the segment is aligned on the worst-case
|
|
|
|
|
boundary, all of the other alignments within it will work. At
|
|
|
|
|
least one object format really uses this info. */
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
record_alignment (/* Segment to which alignment pertains. */
|
|
|
|
|
segT seg,
|
|
|
|
|
/* Alignment, as a power of 2 (e.g., 1 => 2-byte
|
|
|
|
|
boundary, 2 => 4-byte boundary, etc.) */
|
2016-02-18 10:47:31 +01:00
|
|
|
|
unsigned int align)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
if (seg == absolute_section)
|
|
|
|
|
return;
|
* README-vms: Delete.
* config-gas.com: Delete.
* makefile.vms: Delete.
* vmsconf.sh: Delete.
* config/atof-tahoe.c: Delete.
* config/m88k-opcode.h: Delete.
* config/obj-bout.c: Delete.
* config/obj-bout.h: Delete.
* config/obj-hp300.c: Delete.
* config/obj-hp300.h: Delete.
* config/tc-a29k.c: Delete.
* config/tc-a29k.h: Delete.
* config/tc-h8500.c: Delete.
* config/tc-h8500.h: Delete.
* config/tc-m88k.c: Delete.
* config/tc-m88k.h: Delete.
* config/tc-tahoe.c: Delete.
* config/tc-tahoe.h: Delete.
* config/tc-tic80.c: Delete.
* config/tc-tic80.h: Delete.
* config/tc-w65.c: Delete.
* config/tc-w65.h: Delete.
* config/te-aux.h: Delete.
* config/te-delt88.h: Delete.
* config/te-delta.h: Delete.
* config/te-dpx2.h: Delete.
* config/te-hp300.h: Delete.
* config/te-ic960.h: Delete.
* config/vms-a-conf.h: Delete.
* doc/c-a29k.texi: Delete.
* doc/c-h8500.texi: Delete.
* doc/c-m88k.texi: Delete.
* README: Remove obsolete examples, and list of supported targets.
* Makefile.am: Remove a29k, h8500, m88k, tahoe, tic80, w65,
bout and hp300 support.
(DEP_FLAGS): Don't define BFD_ASSEMBLER.
* configure.in: Remove --enable-bfd-assembler, need_bfd,
primary_bfd_gas.
* configure.tgt: Remove a29k, h8300-coff, h8500-*, i960 non-elf,
m68k non bfd, m88k, or32-coff, tic80-*, vax non-bfd, w65k-*, *-nindy.
* as.c: Remove all non-BFD_ASSEMBLER code, support for above targets.
* as.h: Likewise.
* dw2gencfi.c: Likewise.
* dwarf2dbg.c: Likewise.
* ehopt.c: Likewise.
* input-file.c: Likewise.
* listing.c: Likewise.
* literal.c: Likewise.
* messages.c: Likewise.
* obj.h: Likewise.
* output-file.c: Likewise.
* read.c: Likewise.
* stabs.c: Likewise.
* struc-symbol.h: Likewise.
* subsegs.c: Likewise.
* subsegs.h: Likewise.
* symbols.c: Likewise.
* symbols.h: Likewise.
* tc.h: Likewise.
* write.c: Likewise.
* write.h: Likewise.
* config/aout_gnu.h: Likewise.
* config/obj-aout.c: Likewise.
* config/obj-aout.h: Likewise.
* config/obj-coff.c: Likewise.
* config/obj-coff.h: Likewise.
* config/obj-evax.h: Likewise.
* config/obj-ieee.h: Likewise.
* config/tc-arm.c: Likewise.
* config/tc-arm.h: Likewise.
* config/tc-avr.c: Likewise.
* config/tc-avr.h: Likewise.
* config/tc-crx.h: Likewise.
* config/tc-d10v.h: Likewise.
* config/tc-d30v.h: Likewise.
* config/tc-dlx.h: Likewise.
* config/tc-fr30.h: Likewise.
* config/tc-frv.h: Likewise.
* config/tc-h8300.c: Likewise.
* config/tc-h8300.h: Likewise.
* config/tc-hppa.h: Likewise.
* config/tc-i370.h: Likewise.
* config/tc-i386.c: Likewise.
* config/tc-i386.h: Likewise.
* config/tc-i860.h: Likewise.
* config/tc-i960.c: Likewise.
* config/tc-i960.h: Likewise.
* config/tc-ip2k.h: Likewise.
* config/tc-iq2000.h: Likewise.
* config/tc-m32c.h: Likewise.
* config/tc-m32r.h: Likewise.
* config/tc-m68hc11.h: Likewise.
* config/tc-m68k.c: Likewise.
* config/tc-m68k.h: Likewise.
* config/tc-maxq.c: Likewise.
* config/tc-maxq.h: Likewise.
* config/tc-mcore.c: Likewise.
* config/tc-mcore.h: Likewise.
* config/tc-mn10200.h: Likewise.
* config/tc-mn10300.c: Likewise.
* config/tc-mn10300.h: Likewise.
* config/tc-ms1.h: Likewise.
* config/tc-msp430.c: Likewise.
* config/tc-msp430.h: Likewise.
* config/tc-ns32k.c: Likewise.
* config/tc-ns32k.h: Likewise.
* config/tc-openrisc.h: Likewise.
* config/tc-or32.c: Likewise.
* config/tc-or32.h: Likewise.
* config/tc-ppc.c: Likewise.
* config/tc-ppc.h: Likewise.
* config/tc-s390.h: Likewise.
* config/tc-sh.c: Likewise.
* config/tc-sh.h: Likewise.
* config/tc-sparc.c: Likewise.
* config/tc-tic30.c: Likewise.
* config/tc-tic30.h: Likewise.
* config/tc-tic4x.c: Likewise.
* config/tc-tic4x.h: Likewise.
* config/tc-tic54x.c: Likewise.
* config/tc-tic54x.h: Likewise.
* config/tc-v850.h: Likewise.
* config/tc-vax.c: Likewise.
* config/tc-vax.h: Likewise.
* config/tc-xstormy16.h: Likewise.
* config/tc-xtensa.h: Likewise.
* config/tc-z8k.c: Likewise.
* config/tc-z8k.h: Likewise.
* config/vms-a-conf.h
* doc/Makefile.am: Likewise.
* doc/all.texi: Likewise.
* doc/as.texinfo: Likewise.
* doc/Makefile.in: Regenerate.
* Makefile.in: Regenerate.
* configure: Regenerate.
* config.in: Regenerate.
* po/POTFILES.in: Regenerate.
2005-08-11 03:25:29 +02:00
|
|
|
|
|
2016-02-18 10:47:31 +01:00
|
|
|
|
if (align > bfd_get_section_alignment (stdoutput, seg))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
bfd_set_section_alignment (stdoutput, seg, align);
|
|
|
|
|
}
|
|
|
|
|
|
2000-12-28 11:07:56 +01:00
|
|
|
|
int
|
2003-12-06 17:16:51 +01:00
|
|
|
|
get_recorded_alignment (segT seg)
|
2000-12-28 11:07:56 +01:00
|
|
|
|
{
|
|
|
|
|
if (seg == absolute_section)
|
|
|
|
|
return 0;
|
* README-vms: Delete.
* config-gas.com: Delete.
* makefile.vms: Delete.
* vmsconf.sh: Delete.
* config/atof-tahoe.c: Delete.
* config/m88k-opcode.h: Delete.
* config/obj-bout.c: Delete.
* config/obj-bout.h: Delete.
* config/obj-hp300.c: Delete.
* config/obj-hp300.h: Delete.
* config/tc-a29k.c: Delete.
* config/tc-a29k.h: Delete.
* config/tc-h8500.c: Delete.
* config/tc-h8500.h: Delete.
* config/tc-m88k.c: Delete.
* config/tc-m88k.h: Delete.
* config/tc-tahoe.c: Delete.
* config/tc-tahoe.h: Delete.
* config/tc-tic80.c: Delete.
* config/tc-tic80.h: Delete.
* config/tc-w65.c: Delete.
* config/tc-w65.h: Delete.
* config/te-aux.h: Delete.
* config/te-delt88.h: Delete.
* config/te-delta.h: Delete.
* config/te-dpx2.h: Delete.
* config/te-hp300.h: Delete.
* config/te-ic960.h: Delete.
* config/vms-a-conf.h: Delete.
* doc/c-a29k.texi: Delete.
* doc/c-h8500.texi: Delete.
* doc/c-m88k.texi: Delete.
* README: Remove obsolete examples, and list of supported targets.
* Makefile.am: Remove a29k, h8500, m88k, tahoe, tic80, w65,
bout and hp300 support.
(DEP_FLAGS): Don't define BFD_ASSEMBLER.
* configure.in: Remove --enable-bfd-assembler, need_bfd,
primary_bfd_gas.
* configure.tgt: Remove a29k, h8300-coff, h8500-*, i960 non-elf,
m68k non bfd, m88k, or32-coff, tic80-*, vax non-bfd, w65k-*, *-nindy.
* as.c: Remove all non-BFD_ASSEMBLER code, support for above targets.
* as.h: Likewise.
* dw2gencfi.c: Likewise.
* dwarf2dbg.c: Likewise.
* ehopt.c: Likewise.
* input-file.c: Likewise.
* listing.c: Likewise.
* literal.c: Likewise.
* messages.c: Likewise.
* obj.h: Likewise.
* output-file.c: Likewise.
* read.c: Likewise.
* stabs.c: Likewise.
* struc-symbol.h: Likewise.
* subsegs.c: Likewise.
* subsegs.h: Likewise.
* symbols.c: Likewise.
* symbols.h: Likewise.
* tc.h: Likewise.
* write.c: Likewise.
* write.h: Likewise.
* config/aout_gnu.h: Likewise.
* config/obj-aout.c: Likewise.
* config/obj-aout.h: Likewise.
* config/obj-coff.c: Likewise.
* config/obj-coff.h: Likewise.
* config/obj-evax.h: Likewise.
* config/obj-ieee.h: Likewise.
* config/tc-arm.c: Likewise.
* config/tc-arm.h: Likewise.
* config/tc-avr.c: Likewise.
* config/tc-avr.h: Likewise.
* config/tc-crx.h: Likewise.
* config/tc-d10v.h: Likewise.
* config/tc-d30v.h: Likewise.
* config/tc-dlx.h: Likewise.
* config/tc-fr30.h: Likewise.
* config/tc-frv.h: Likewise.
* config/tc-h8300.c: Likewise.
* config/tc-h8300.h: Likewise.
* config/tc-hppa.h: Likewise.
* config/tc-i370.h: Likewise.
* config/tc-i386.c: Likewise.
* config/tc-i386.h: Likewise.
* config/tc-i860.h: Likewise.
* config/tc-i960.c: Likewise.
* config/tc-i960.h: Likewise.
* config/tc-ip2k.h: Likewise.
* config/tc-iq2000.h: Likewise.
* config/tc-m32c.h: Likewise.
* config/tc-m32r.h: Likewise.
* config/tc-m68hc11.h: Likewise.
* config/tc-m68k.c: Likewise.
* config/tc-m68k.h: Likewise.
* config/tc-maxq.c: Likewise.
* config/tc-maxq.h: Likewise.
* config/tc-mcore.c: Likewise.
* config/tc-mcore.h: Likewise.
* config/tc-mn10200.h: Likewise.
* config/tc-mn10300.c: Likewise.
* config/tc-mn10300.h: Likewise.
* config/tc-ms1.h: Likewise.
* config/tc-msp430.c: Likewise.
* config/tc-msp430.h: Likewise.
* config/tc-ns32k.c: Likewise.
* config/tc-ns32k.h: Likewise.
* config/tc-openrisc.h: Likewise.
* config/tc-or32.c: Likewise.
* config/tc-or32.h: Likewise.
* config/tc-ppc.c: Likewise.
* config/tc-ppc.h: Likewise.
* config/tc-s390.h: Likewise.
* config/tc-sh.c: Likewise.
* config/tc-sh.h: Likewise.
* config/tc-sparc.c: Likewise.
* config/tc-tic30.c: Likewise.
* config/tc-tic30.h: Likewise.
* config/tc-tic4x.c: Likewise.
* config/tc-tic4x.h: Likewise.
* config/tc-tic54x.c: Likewise.
* config/tc-tic54x.h: Likewise.
* config/tc-v850.h: Likewise.
* config/tc-vax.c: Likewise.
* config/tc-vax.h: Likewise.
* config/tc-xstormy16.h: Likewise.
* config/tc-xtensa.h: Likewise.
* config/tc-z8k.c: Likewise.
* config/tc-z8k.h: Likewise.
* config/vms-a-conf.h
* doc/Makefile.am: Likewise.
* doc/all.texi: Likewise.
* doc/as.texinfo: Likewise.
* doc/Makefile.in: Regenerate.
* Makefile.in: Regenerate.
* configure: Regenerate.
* config.in: Regenerate.
* po/POTFILES.in: Regenerate.
2005-08-11 03:25:29 +02:00
|
|
|
|
|
2000-12-28 11:07:56 +01:00
|
|
|
|
return bfd_get_section_alignment (stdoutput, seg);
|
|
|
|
|
}
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
/* Reset the section indices after removing the gas created sections. */
|
|
|
|
|
|
|
|
|
|
static void
|
2007-02-16 04:40:17 +01:00
|
|
|
|
renumber_sections (bfd *abfd ATTRIBUTE_UNUSED, asection *sec, void *countparg)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
int *countp = (int *) countparg;
|
|
|
|
|
|
|
|
|
|
sec->index = *countp;
|
|
|
|
|
++*countp;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static fragS *
|
2003-12-06 17:16:51 +01:00
|
|
|
|
chain_frchains_together_1 (segT section, struct frchain *frchp)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
fragS dummy, *prev_frag = &dummy;
|
|
|
|
|
fixS fix_dummy, *prev_fix = &fix_dummy;
|
|
|
|
|
|
2006-05-04 01:52:15 +02:00
|
|
|
|
for (; frchp; frchp = frchp->frch_next)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
prev_frag->fr_next = frchp->frch_root;
|
|
|
|
|
prev_frag = frchp->frch_last;
|
* gas/app, gas/as.c, gas/as.h, gas/atof-generic.c, gas/cgen.c,
gas/config/atof-ieee.c, gas/config/obj-aout.c,
gas/config/obj-coff.c, gas/config/obj-ecoff.c,
gas/config/obj-elf.c, gas/config/obj-som.c, gas/config/tc-alpha.c,
gas/config/tc-arc.c, gas/config/tc-arm.c, gas/config/tc-cr16.c,
gas/config/tc-cris.c, gas/config/tc-crx.c, gas/config/tc-d30v.c,
gas/config/tc-dlx.c, gas/config/tc-hppa.c, gas/config/tc-i370.c,
gas/config/tc-i386-intel.c, gas/config/tc-i386.c,
gas/config/tc-i860.c, gas/config/tc-i960.c, gas/config/tc-ia64.c,
gas/config/tc-iq2000.c, gas/config/tc-m32c.c,
gas/config/tc-m32r.c, gas/config/tc-m68hc11.c,
gas/config/tc-m68k.c, gas/config/tc-maxq.c, gas/config/tc-mcore.c,
gas/config/tc-mep.c, gas/config/tc-mips.c, gas/config/tc-mmix.c,
gas/config/tc-mn10300.c, gas/config/tc-moxie.c,
gas/config/tc-ns32k.c, gas/config/tc-pj.c, gas/config/tc-ppc.c,
gas/config/tc-s390.c, gas/config/tc-score.c,
gas/config/tc-score7.c, gas/config/tc-sh.c, gas/config/tc-sparc.c,
gas/config/tc-spu.c, gas/config/tc-tic30.c, gas/config/tc-vax.c,
gas/config/tc-xtensa.c, gas/config/xtensa-relax.c,
gas/dw2gencfi.c, gas/dwarf2dbg.c, gas/ehopt.c, gas/expr.c,
gas/frags.c, gas/input-file.c, gas/read.c, gas/sb.c,
gas/subsegs.c, gas/symbols.c, gas/write.c: Change the name of the
gas macro `assert' to `gas_assert'.
2009-06-22 19:56:02 +02:00
|
|
|
|
gas_assert (prev_frag->fr_type != 0);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
if (frchp->fix_root != (fixS *) NULL)
|
|
|
|
|
{
|
|
|
|
|
if (seg_info (section)->fix_root == (fixS *) NULL)
|
|
|
|
|
seg_info (section)->fix_root = frchp->fix_root;
|
|
|
|
|
prev_fix->fx_next = frchp->fix_root;
|
|
|
|
|
seg_info (section)->fix_tail = frchp->fix_tail;
|
|
|
|
|
prev_fix = frchp->fix_tail;
|
|
|
|
|
}
|
|
|
|
|
}
|
2012-10-01 08:46:16 +02:00
|
|
|
|
gas_assert (prev_frag != &dummy
|
|
|
|
|
&& prev_frag->fr_type != 0);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
prev_frag->fr_next = 0;
|
|
|
|
|
return prev_frag;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
chain_frchains_together (bfd *abfd ATTRIBUTE_UNUSED,
|
|
|
|
|
segT section,
|
2007-02-16 04:40:17 +01:00
|
|
|
|
void *xxx ATTRIBUTE_UNUSED)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
segment_info_type *info;
|
|
|
|
|
|
|
|
|
|
/* BFD may have introduced its own sections without using
|
|
|
|
|
subseg_new, so it is possible that seg_info is NULL. */
|
|
|
|
|
info = seg_info (section);
|
|
|
|
|
if (info != (segment_info_type *) NULL)
|
2000-07-20 22:07:09 +02:00
|
|
|
|
info->frchainP->frch_last
|
|
|
|
|
= chain_frchains_together_1 (section, info->frchainP);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
/* Now that we've chained the frags together, we must add new fixups
|
|
|
|
|
to the segment, not to the frag chain. */
|
|
|
|
|
frags_chained = 1;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
cvt_frag_to_fill (segT sec ATTRIBUTE_UNUSED, fragS *fragP)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
switch (fragP->fr_type)
|
|
|
|
|
{
|
Add .nop assembler directive
Implement the '.nop SIZE[, CONTROL]' assembler directive, which emits
SIZE bytes filled with no-op instructions. SIZE is absolute expression.
The optional CONTROL byte controls how no-op instructions should be
generated. If the comma and @var{control} are omitted, CONTROL is
assumed to be zero.
For Intel 80386 and AMD x86-64 targets, CONTROL byte specifies the size
limit of a single no-op instruction. The valid values of CONTROL byte
are between 0 and 8 for 16-bit mode, between 0 and 10 for 32-bit mode,
between 0 and 11 for 64-bit mode. When 0 is used, the no-op size limit
is set to the maximum supported size.
2 new relax states, rs_space_nop and rs_fill_nop, are added to enum
_relax_state, which are similar to rs_space and rs_fill, respectively,
but they fill with no-op instructions, instead of a single byte. A
target backend must override the default md_generate_nops to generate
proper no-op instructions. Otherwise, an error of unimplemented .nop
directive will be issued whenever .nop directive is used.
* NEWS: Mention .nop directive.
* as.h (_relax_state): Add rs_space_nop and rs_fill_nop.
* read.c (potable): Add .nop.
(s_nop): New function.
* read.h (s_nop): New prototype.
* write.c (cvt_frag_to_fill): Handle rs_space_nop and
rs_fill_nop.
(md_generate_nops): New function.
(relax_segment): Likewise.
(write_contents): Use md_generate_nops for rs_fill_nop.
* config/tc-i386.c (alt64_11): New.
(alt64_patt): Likewise.
(md_convert_frag): Handle rs_space_nop.
(i386_output_nops): New function.
(i386_generate_nops): Likewise.
(i386_align_code): Call i386_output_nops.
* config/tc-i386.h (i386_generate_nops): New.
(md_generate_nops): Likewise.
* doc/as.texinfo: Document .nop directive.
* testsuite/gas/i386/i386.exp: Run .nop directive tests.
* testsuite/gas/i386/nop-1.d: New file.
* testsuite/gas/i386/nop-1.s: Likewise.
* testsuite/gas/i386/nop-2.d: Likewise.
* testsuite/gas/i386/nop-2.s: Likewise.
* testsuite/gas/i386/nop-3.d: Likewise.
* testsuite/gas/i386/nop-3.s: Likewise.
* testsuite/gas/i386/nop-4.d: Likewise.
* testsuite/gas/i386/nop-4.s: Likewise.
* testsuite/gas/i386/nop-5.d: Likewise.
* testsuite/gas/i386/nop-5.s: Likewise.
* testsuite/gas/i386/nop-6.d: Likewise.
* testsuite/gas/i386/nop-6.s: Likewise.
* testsuite/gas/i386/nop-bad-1.l: Likewise.
* testsuite/gas/i386/nop-bad-1.s: Likewise.
* testsuite/gas/i386/x86-64-nop-1.d: Likewise.
* testsuite/gas/i386/x86-64-nop-2.d: Likewise.
* testsuite/gas/i386/x86-64-nop-3.d: Likewise.
* testsuite/gas/i386/x86-64-nop-4.d: Likewise.
* testsuite/gas/i386/x86-64-nop-5.d: Likewise.
* testsuite/gas/i386/x86-64-nop-6.d: Likewise.
2018-02-17 14:20:42 +01:00
|
|
|
|
case rs_space_nop:
|
|
|
|
|
goto skip_align;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
case rs_align:
|
|
|
|
|
case rs_align_code:
|
2000-12-28 11:07:56 +01:00
|
|
|
|
case rs_align_test:
|
1999-05-03 09:29:11 +02:00
|
|
|
|
case rs_org:
|
|
|
|
|
case rs_space:
|
|
|
|
|
#ifdef HANDLE_ALIGN
|
|
|
|
|
HANDLE_ALIGN (fragP);
|
|
|
|
|
#endif
|
Add .nop assembler directive
Implement the '.nop SIZE[, CONTROL]' assembler directive, which emits
SIZE bytes filled with no-op instructions. SIZE is absolute expression.
The optional CONTROL byte controls how no-op instructions should be
generated. If the comma and @var{control} are omitted, CONTROL is
assumed to be zero.
For Intel 80386 and AMD x86-64 targets, CONTROL byte specifies the size
limit of a single no-op instruction. The valid values of CONTROL byte
are between 0 and 8 for 16-bit mode, between 0 and 10 for 32-bit mode,
between 0 and 11 for 64-bit mode. When 0 is used, the no-op size limit
is set to the maximum supported size.
2 new relax states, rs_space_nop and rs_fill_nop, are added to enum
_relax_state, which are similar to rs_space and rs_fill, respectively,
but they fill with no-op instructions, instead of a single byte. A
target backend must override the default md_generate_nops to generate
proper no-op instructions. Otherwise, an error of unimplemented .nop
directive will be issued whenever .nop directive is used.
* NEWS: Mention .nop directive.
* as.h (_relax_state): Add rs_space_nop and rs_fill_nop.
* read.c (potable): Add .nop.
(s_nop): New function.
* read.h (s_nop): New prototype.
* write.c (cvt_frag_to_fill): Handle rs_space_nop and
rs_fill_nop.
(md_generate_nops): New function.
(relax_segment): Likewise.
(write_contents): Use md_generate_nops for rs_fill_nop.
* config/tc-i386.c (alt64_11): New.
(alt64_patt): Likewise.
(md_convert_frag): Handle rs_space_nop.
(i386_output_nops): New function.
(i386_generate_nops): Likewise.
(i386_align_code): Call i386_output_nops.
* config/tc-i386.h (i386_generate_nops): New.
(md_generate_nops): Likewise.
* doc/as.texinfo: Document .nop directive.
* testsuite/gas/i386/i386.exp: Run .nop directive tests.
* testsuite/gas/i386/nop-1.d: New file.
* testsuite/gas/i386/nop-1.s: Likewise.
* testsuite/gas/i386/nop-2.d: Likewise.
* testsuite/gas/i386/nop-2.s: Likewise.
* testsuite/gas/i386/nop-3.d: Likewise.
* testsuite/gas/i386/nop-3.s: Likewise.
* testsuite/gas/i386/nop-4.d: Likewise.
* testsuite/gas/i386/nop-4.s: Likewise.
* testsuite/gas/i386/nop-5.d: Likewise.
* testsuite/gas/i386/nop-5.s: Likewise.
* testsuite/gas/i386/nop-6.d: Likewise.
* testsuite/gas/i386/nop-6.s: Likewise.
* testsuite/gas/i386/nop-bad-1.l: Likewise.
* testsuite/gas/i386/nop-bad-1.s: Likewise.
* testsuite/gas/i386/x86-64-nop-1.d: Likewise.
* testsuite/gas/i386/x86-64-nop-2.d: Likewise.
* testsuite/gas/i386/x86-64-nop-3.d: Likewise.
* testsuite/gas/i386/x86-64-nop-4.d: Likewise.
* testsuite/gas/i386/x86-64-nop-5.d: Likewise.
* testsuite/gas/i386/x86-64-nop-6.d: Likewise.
2018-02-17 14:20:42 +01:00
|
|
|
|
skip_align:
|
1999-05-03 09:29:11 +02:00
|
|
|
|
know (fragP->fr_next != NULL);
|
|
|
|
|
fragP->fr_offset = (fragP->fr_next->fr_address
|
|
|
|
|
- fragP->fr_address
|
|
|
|
|
- fragP->fr_fix) / fragP->fr_var;
|
|
|
|
|
if (fragP->fr_offset < 0)
|
|
|
|
|
{
|
1999-07-14 16:02:33 +02:00
|
|
|
|
as_bad_where (fragP->fr_file, fragP->fr_line,
|
2018-02-27 23:45:48 +01:00
|
|
|
|
_("attempt to .org/.space/.nops backwards? (%ld)"),
|
1999-07-14 16:02:33 +02:00
|
|
|
|
(long) fragP->fr_offset);
|
2002-05-01 02:33:09 +02:00
|
|
|
|
fragP->fr_offset = 0;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
Add .nop assembler directive
Implement the '.nop SIZE[, CONTROL]' assembler directive, which emits
SIZE bytes filled with no-op instructions. SIZE is absolute expression.
The optional CONTROL byte controls how no-op instructions should be
generated. If the comma and @var{control} are omitted, CONTROL is
assumed to be zero.
For Intel 80386 and AMD x86-64 targets, CONTROL byte specifies the size
limit of a single no-op instruction. The valid values of CONTROL byte
are between 0 and 8 for 16-bit mode, between 0 and 10 for 32-bit mode,
between 0 and 11 for 64-bit mode. When 0 is used, the no-op size limit
is set to the maximum supported size.
2 new relax states, rs_space_nop and rs_fill_nop, are added to enum
_relax_state, which are similar to rs_space and rs_fill, respectively,
but they fill with no-op instructions, instead of a single byte. A
target backend must override the default md_generate_nops to generate
proper no-op instructions. Otherwise, an error of unimplemented .nop
directive will be issued whenever .nop directive is used.
* NEWS: Mention .nop directive.
* as.h (_relax_state): Add rs_space_nop and rs_fill_nop.
* read.c (potable): Add .nop.
(s_nop): New function.
* read.h (s_nop): New prototype.
* write.c (cvt_frag_to_fill): Handle rs_space_nop and
rs_fill_nop.
(md_generate_nops): New function.
(relax_segment): Likewise.
(write_contents): Use md_generate_nops for rs_fill_nop.
* config/tc-i386.c (alt64_11): New.
(alt64_patt): Likewise.
(md_convert_frag): Handle rs_space_nop.
(i386_output_nops): New function.
(i386_generate_nops): Likewise.
(i386_align_code): Call i386_output_nops.
* config/tc-i386.h (i386_generate_nops): New.
(md_generate_nops): Likewise.
* doc/as.texinfo: Document .nop directive.
* testsuite/gas/i386/i386.exp: Run .nop directive tests.
* testsuite/gas/i386/nop-1.d: New file.
* testsuite/gas/i386/nop-1.s: Likewise.
* testsuite/gas/i386/nop-2.d: Likewise.
* testsuite/gas/i386/nop-2.s: Likewise.
* testsuite/gas/i386/nop-3.d: Likewise.
* testsuite/gas/i386/nop-3.s: Likewise.
* testsuite/gas/i386/nop-4.d: Likewise.
* testsuite/gas/i386/nop-4.s: Likewise.
* testsuite/gas/i386/nop-5.d: Likewise.
* testsuite/gas/i386/nop-5.s: Likewise.
* testsuite/gas/i386/nop-6.d: Likewise.
* testsuite/gas/i386/nop-6.s: Likewise.
* testsuite/gas/i386/nop-bad-1.l: Likewise.
* testsuite/gas/i386/nop-bad-1.s: Likewise.
* testsuite/gas/i386/x86-64-nop-1.d: Likewise.
* testsuite/gas/i386/x86-64-nop-2.d: Likewise.
* testsuite/gas/i386/x86-64-nop-3.d: Likewise.
* testsuite/gas/i386/x86-64-nop-4.d: Likewise.
* testsuite/gas/i386/x86-64-nop-5.d: Likewise.
* testsuite/gas/i386/x86-64-nop-6.d: Likewise.
2018-02-17 14:20:42 +01:00
|
|
|
|
if (fragP->fr_type == rs_space_nop)
|
|
|
|
|
fragP->fr_type = rs_fill_nop;
|
|
|
|
|
else
|
|
|
|
|
fragP->fr_type = rs_fill;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_fill:
|
Add .nop assembler directive
Implement the '.nop SIZE[, CONTROL]' assembler directive, which emits
SIZE bytes filled with no-op instructions. SIZE is absolute expression.
The optional CONTROL byte controls how no-op instructions should be
generated. If the comma and @var{control} are omitted, CONTROL is
assumed to be zero.
For Intel 80386 and AMD x86-64 targets, CONTROL byte specifies the size
limit of a single no-op instruction. The valid values of CONTROL byte
are between 0 and 8 for 16-bit mode, between 0 and 10 for 32-bit mode,
between 0 and 11 for 64-bit mode. When 0 is used, the no-op size limit
is set to the maximum supported size.
2 new relax states, rs_space_nop and rs_fill_nop, are added to enum
_relax_state, which are similar to rs_space and rs_fill, respectively,
but they fill with no-op instructions, instead of a single byte. A
target backend must override the default md_generate_nops to generate
proper no-op instructions. Otherwise, an error of unimplemented .nop
directive will be issued whenever .nop directive is used.
* NEWS: Mention .nop directive.
* as.h (_relax_state): Add rs_space_nop and rs_fill_nop.
* read.c (potable): Add .nop.
(s_nop): New function.
* read.h (s_nop): New prototype.
* write.c (cvt_frag_to_fill): Handle rs_space_nop and
rs_fill_nop.
(md_generate_nops): New function.
(relax_segment): Likewise.
(write_contents): Use md_generate_nops for rs_fill_nop.
* config/tc-i386.c (alt64_11): New.
(alt64_patt): Likewise.
(md_convert_frag): Handle rs_space_nop.
(i386_output_nops): New function.
(i386_generate_nops): Likewise.
(i386_align_code): Call i386_output_nops.
* config/tc-i386.h (i386_generate_nops): New.
(md_generate_nops): Likewise.
* doc/as.texinfo: Document .nop directive.
* testsuite/gas/i386/i386.exp: Run .nop directive tests.
* testsuite/gas/i386/nop-1.d: New file.
* testsuite/gas/i386/nop-1.s: Likewise.
* testsuite/gas/i386/nop-2.d: Likewise.
* testsuite/gas/i386/nop-2.s: Likewise.
* testsuite/gas/i386/nop-3.d: Likewise.
* testsuite/gas/i386/nop-3.s: Likewise.
* testsuite/gas/i386/nop-4.d: Likewise.
* testsuite/gas/i386/nop-4.s: Likewise.
* testsuite/gas/i386/nop-5.d: Likewise.
* testsuite/gas/i386/nop-5.s: Likewise.
* testsuite/gas/i386/nop-6.d: Likewise.
* testsuite/gas/i386/nop-6.s: Likewise.
* testsuite/gas/i386/nop-bad-1.l: Likewise.
* testsuite/gas/i386/nop-bad-1.s: Likewise.
* testsuite/gas/i386/x86-64-nop-1.d: Likewise.
* testsuite/gas/i386/x86-64-nop-2.d: Likewise.
* testsuite/gas/i386/x86-64-nop-3.d: Likewise.
* testsuite/gas/i386/x86-64-nop-4.d: Likewise.
* testsuite/gas/i386/x86-64-nop-5.d: Likewise.
* testsuite/gas/i386/x86-64-nop-6.d: Likewise.
2018-02-17 14:20:42 +01:00
|
|
|
|
case rs_fill_nop:
|
1999-05-03 09:29:11 +02:00
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_leb128:
|
|
|
|
|
{
|
|
|
|
|
valueT value = S_GET_VALUE (fragP->fr_symbol);
|
|
|
|
|
int size;
|
|
|
|
|
|
2017-07-21 11:09:06 +02:00
|
|
|
|
if (!S_IS_DEFINED (fragP->fr_symbol))
|
|
|
|
|
{
|
|
|
|
|
as_bad_where (fragP->fr_file, fragP->fr_line,
|
|
|
|
|
_("leb128 operand is an undefined symbol: %s"),
|
|
|
|
|
S_GET_NAME (fragP->fr_symbol));
|
|
|
|
|
}
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
size = output_leb128 (fragP->fr_literal + fragP->fr_fix, value,
|
|
|
|
|
fragP->fr_subtype);
|
|
|
|
|
|
|
|
|
|
fragP->fr_fix += size;
|
|
|
|
|
fragP->fr_type = rs_fill;
|
|
|
|
|
fragP->fr_var = 0;
|
|
|
|
|
fragP->fr_offset = 0;
|
|
|
|
|
fragP->fr_symbol = NULL;
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_cfa:
|
|
|
|
|
eh_frame_convert_frag (fragP);
|
|
|
|
|
break;
|
|
|
|
|
|
2000-11-29 22:42:41 +01:00
|
|
|
|
case rs_dwarf2dbg:
|
|
|
|
|
dwarf2dbg_convert_frag (fragP);
|
|
|
|
|
break;
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
case rs_machine_dependent:
|
|
|
|
|
md_convert_frag (stdoutput, sec, fragP);
|
|
|
|
|
|
* gas/app, gas/as.c, gas/as.h, gas/atof-generic.c, gas/cgen.c,
gas/config/atof-ieee.c, gas/config/obj-aout.c,
gas/config/obj-coff.c, gas/config/obj-ecoff.c,
gas/config/obj-elf.c, gas/config/obj-som.c, gas/config/tc-alpha.c,
gas/config/tc-arc.c, gas/config/tc-arm.c, gas/config/tc-cr16.c,
gas/config/tc-cris.c, gas/config/tc-crx.c, gas/config/tc-d30v.c,
gas/config/tc-dlx.c, gas/config/tc-hppa.c, gas/config/tc-i370.c,
gas/config/tc-i386-intel.c, gas/config/tc-i386.c,
gas/config/tc-i860.c, gas/config/tc-i960.c, gas/config/tc-ia64.c,
gas/config/tc-iq2000.c, gas/config/tc-m32c.c,
gas/config/tc-m32r.c, gas/config/tc-m68hc11.c,
gas/config/tc-m68k.c, gas/config/tc-maxq.c, gas/config/tc-mcore.c,
gas/config/tc-mep.c, gas/config/tc-mips.c, gas/config/tc-mmix.c,
gas/config/tc-mn10300.c, gas/config/tc-moxie.c,
gas/config/tc-ns32k.c, gas/config/tc-pj.c, gas/config/tc-ppc.c,
gas/config/tc-s390.c, gas/config/tc-score.c,
gas/config/tc-score7.c, gas/config/tc-sh.c, gas/config/tc-sparc.c,
gas/config/tc-spu.c, gas/config/tc-tic30.c, gas/config/tc-vax.c,
gas/config/tc-xtensa.c, gas/config/xtensa-relax.c,
gas/dw2gencfi.c, gas/dwarf2dbg.c, gas/ehopt.c, gas/expr.c,
gas/frags.c, gas/input-file.c, gas/read.c, gas/sb.c,
gas/subsegs.c, gas/symbols.c, gas/write.c: Change the name of the
gas macro `assert' to `gas_assert'.
2009-06-22 19:56:02 +02:00
|
|
|
|
gas_assert (fragP->fr_next == NULL
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|| ((offsetT) (fragP->fr_next->fr_address - fragP->fr_address)
|
|
|
|
|
== fragP->fr_fix));
|
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* After md_convert_frag, we make the frag into a ".space 0".
|
|
|
|
|
md_convert_frag() should set up any fixSs and constants
|
|
|
|
|
required. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
frag_wane (fragP);
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
#ifndef WORKING_DOT_WORD
|
|
|
|
|
case rs_broken_word:
|
|
|
|
|
{
|
|
|
|
|
struct broken_word *lie;
|
|
|
|
|
|
|
|
|
|
if (fragP->fr_subtype)
|
|
|
|
|
{
|
|
|
|
|
fragP->fr_fix += md_short_jump_size;
|
|
|
|
|
for (lie = (struct broken_word *) (fragP->fr_symbol);
|
|
|
|
|
lie && lie->dispfrag == fragP;
|
|
|
|
|
lie = lie->next_broken_word)
|
|
|
|
|
if (lie->added == 1)
|
|
|
|
|
fragP->fr_fix += md_long_jump_size;
|
|
|
|
|
}
|
|
|
|
|
frag_wane (fragP);
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
default:
|
|
|
|
|
BAD_CASE (fragP->fr_type);
|
|
|
|
|
break;
|
|
|
|
|
}
|
2004-07-02 08:40:19 +02:00
|
|
|
|
#ifdef md_frag_check
|
|
|
|
|
md_frag_check (fragP);
|
|
|
|
|
#endif
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
2006-05-08 01:03:48 +02:00
|
|
|
|
struct relax_seg_info
|
|
|
|
|
{
|
|
|
|
|
int pass;
|
|
|
|
|
int changed;
|
|
|
|
|
};
|
2003-12-06 17:16:51 +01:00
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
static void
|
2006-05-08 01:03:48 +02:00
|
|
|
|
relax_seg (bfd *abfd ATTRIBUTE_UNUSED, asection *sec, void *xxx)
|
2001-03-30 04:19:36 +02:00
|
|
|
|
{
|
|
|
|
|
segment_info_type *seginfo = seg_info (sec);
|
2006-05-08 01:03:48 +02:00
|
|
|
|
struct relax_seg_info *info = (struct relax_seg_info *) xxx;
|
2001-03-30 04:19:36 +02:00
|
|
|
|
|
|
|
|
|
if (seginfo && seginfo->frchainP
|
2006-05-08 01:03:48 +02:00
|
|
|
|
&& relax_segment (seginfo->frchainP->frch_root, sec, info->pass))
|
|
|
|
|
info->changed = 1;
|
2001-03-30 04:19:36 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2007-02-16 04:40:17 +01:00
|
|
|
|
size_seg (bfd *abfd, asection *sec, void *xxx ATTRIBUTE_UNUSED)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
flagword flags;
|
|
|
|
|
fragS *fragp;
|
|
|
|
|
segment_info_type *seginfo;
|
|
|
|
|
int x;
|
|
|
|
|
valueT size, newsize;
|
|
|
|
|
|
|
|
|
|
subseg_change (sec, 0);
|
|
|
|
|
|
|
|
|
|
seginfo = seg_info (sec);
|
|
|
|
|
if (seginfo && seginfo->frchainP)
|
|
|
|
|
{
|
|
|
|
|
for (fragp = seginfo->frchainP->frch_root; fragp; fragp = fragp->fr_next)
|
|
|
|
|
cvt_frag_to_fill (sec, fragp);
|
|
|
|
|
for (fragp = seginfo->frchainP->frch_root;
|
|
|
|
|
fragp->fr_next;
|
|
|
|
|
fragp = fragp->fr_next)
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Walk to last elt. */
|
|
|
|
|
;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
size = fragp->fr_address + fragp->fr_fix;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
size = 0;
|
|
|
|
|
|
2001-03-30 04:19:36 +02:00
|
|
|
|
flags = bfd_get_section_flags (abfd, sec);
|
2009-08-17 13:45:23 +02:00
|
|
|
|
if (size == 0 && bfd_get_section_size (sec) != 0 &&
|
|
|
|
|
(flags & SEC_HAS_CONTENTS) != 0)
|
|
|
|
|
return;
|
2001-03-30 04:19:36 +02:00
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
if (size > 0 && ! seginfo->bss)
|
|
|
|
|
flags |= SEC_HAS_CONTENTS;
|
|
|
|
|
|
2007-02-22 06:54:51 +01:00
|
|
|
|
flags &= ~SEC_RELOC;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
x = bfd_set_section_flags (abfd, sec, flags);
|
* gas/app, gas/as.c, gas/as.h, gas/atof-generic.c, gas/cgen.c,
gas/config/atof-ieee.c, gas/config/obj-aout.c,
gas/config/obj-coff.c, gas/config/obj-ecoff.c,
gas/config/obj-elf.c, gas/config/obj-som.c, gas/config/tc-alpha.c,
gas/config/tc-arc.c, gas/config/tc-arm.c, gas/config/tc-cr16.c,
gas/config/tc-cris.c, gas/config/tc-crx.c, gas/config/tc-d30v.c,
gas/config/tc-dlx.c, gas/config/tc-hppa.c, gas/config/tc-i370.c,
gas/config/tc-i386-intel.c, gas/config/tc-i386.c,
gas/config/tc-i860.c, gas/config/tc-i960.c, gas/config/tc-ia64.c,
gas/config/tc-iq2000.c, gas/config/tc-m32c.c,
gas/config/tc-m32r.c, gas/config/tc-m68hc11.c,
gas/config/tc-m68k.c, gas/config/tc-maxq.c, gas/config/tc-mcore.c,
gas/config/tc-mep.c, gas/config/tc-mips.c, gas/config/tc-mmix.c,
gas/config/tc-mn10300.c, gas/config/tc-moxie.c,
gas/config/tc-ns32k.c, gas/config/tc-pj.c, gas/config/tc-ppc.c,
gas/config/tc-s390.c, gas/config/tc-score.c,
gas/config/tc-score7.c, gas/config/tc-sh.c, gas/config/tc-sparc.c,
gas/config/tc-spu.c, gas/config/tc-tic30.c, gas/config/tc-vax.c,
gas/config/tc-xtensa.c, gas/config/xtensa-relax.c,
gas/dw2gencfi.c, gas/dwarf2dbg.c, gas/ehopt.c, gas/expr.c,
gas/frags.c, gas/input-file.c, gas/read.c, gas/sb.c,
gas/subsegs.c, gas/symbols.c, gas/write.c: Change the name of the
gas macro `assert' to `gas_assert'.
2009-06-22 19:56:02 +02:00
|
|
|
|
gas_assert (x);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2016-06-27 14:49:09 +02:00
|
|
|
|
/* If permitted, allow the backend to pad out the section
|
|
|
|
|
to some alignment boundary. */
|
|
|
|
|
if (do_not_pad_sections_to_alignment)
|
|
|
|
|
newsize = size;
|
|
|
|
|
else
|
|
|
|
|
newsize = md_section_align (sec, size);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
x = bfd_set_section_size (abfd, sec, newsize);
|
* gas/app, gas/as.c, gas/as.h, gas/atof-generic.c, gas/cgen.c,
gas/config/atof-ieee.c, gas/config/obj-aout.c,
gas/config/obj-coff.c, gas/config/obj-ecoff.c,
gas/config/obj-elf.c, gas/config/obj-som.c, gas/config/tc-alpha.c,
gas/config/tc-arc.c, gas/config/tc-arm.c, gas/config/tc-cr16.c,
gas/config/tc-cris.c, gas/config/tc-crx.c, gas/config/tc-d30v.c,
gas/config/tc-dlx.c, gas/config/tc-hppa.c, gas/config/tc-i370.c,
gas/config/tc-i386-intel.c, gas/config/tc-i386.c,
gas/config/tc-i860.c, gas/config/tc-i960.c, gas/config/tc-ia64.c,
gas/config/tc-iq2000.c, gas/config/tc-m32c.c,
gas/config/tc-m32r.c, gas/config/tc-m68hc11.c,
gas/config/tc-m68k.c, gas/config/tc-maxq.c, gas/config/tc-mcore.c,
gas/config/tc-mep.c, gas/config/tc-mips.c, gas/config/tc-mmix.c,
gas/config/tc-mn10300.c, gas/config/tc-moxie.c,
gas/config/tc-ns32k.c, gas/config/tc-pj.c, gas/config/tc-ppc.c,
gas/config/tc-s390.c, gas/config/tc-score.c,
gas/config/tc-score7.c, gas/config/tc-sh.c, gas/config/tc-sparc.c,
gas/config/tc-spu.c, gas/config/tc-tic30.c, gas/config/tc-vax.c,
gas/config/tc-xtensa.c, gas/config/xtensa-relax.c,
gas/dw2gencfi.c, gas/dwarf2dbg.c, gas/ehopt.c, gas/expr.c,
gas/frags.c, gas/input-file.c, gas/read.c, gas/sb.c,
gas/subsegs.c, gas/symbols.c, gas/write.c: Change the name of the
gas macro `assert' to `gas_assert'.
2009-06-22 19:56:02 +02:00
|
|
|
|
gas_assert (x);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
/* If the size had to be rounded up, add some padding in the last
|
|
|
|
|
non-empty frag. */
|
* gas/app, gas/as.c, gas/as.h, gas/atof-generic.c, gas/cgen.c,
gas/config/atof-ieee.c, gas/config/obj-aout.c,
gas/config/obj-coff.c, gas/config/obj-ecoff.c,
gas/config/obj-elf.c, gas/config/obj-som.c, gas/config/tc-alpha.c,
gas/config/tc-arc.c, gas/config/tc-arm.c, gas/config/tc-cr16.c,
gas/config/tc-cris.c, gas/config/tc-crx.c, gas/config/tc-d30v.c,
gas/config/tc-dlx.c, gas/config/tc-hppa.c, gas/config/tc-i370.c,
gas/config/tc-i386-intel.c, gas/config/tc-i386.c,
gas/config/tc-i860.c, gas/config/tc-i960.c, gas/config/tc-ia64.c,
gas/config/tc-iq2000.c, gas/config/tc-m32c.c,
gas/config/tc-m32r.c, gas/config/tc-m68hc11.c,
gas/config/tc-m68k.c, gas/config/tc-maxq.c, gas/config/tc-mcore.c,
gas/config/tc-mep.c, gas/config/tc-mips.c, gas/config/tc-mmix.c,
gas/config/tc-mn10300.c, gas/config/tc-moxie.c,
gas/config/tc-ns32k.c, gas/config/tc-pj.c, gas/config/tc-ppc.c,
gas/config/tc-s390.c, gas/config/tc-score.c,
gas/config/tc-score7.c, gas/config/tc-sh.c, gas/config/tc-sparc.c,
gas/config/tc-spu.c, gas/config/tc-tic30.c, gas/config/tc-vax.c,
gas/config/tc-xtensa.c, gas/config/xtensa-relax.c,
gas/dw2gencfi.c, gas/dwarf2dbg.c, gas/ehopt.c, gas/expr.c,
gas/frags.c, gas/input-file.c, gas/read.c, gas/sb.c,
gas/subsegs.c, gas/symbols.c, gas/write.c: Change the name of the
gas macro `assert' to `gas_assert'.
2009-06-22 19:56:02 +02:00
|
|
|
|
gas_assert (newsize >= size);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
if (size != newsize)
|
|
|
|
|
{
|
|
|
|
|
fragS *last = seginfo->frchainP->frch_last;
|
|
|
|
|
fragp = seginfo->frchainP->frch_root;
|
|
|
|
|
while (fragp->fr_next != last)
|
|
|
|
|
fragp = fragp->fr_next;
|
|
|
|
|
last->fr_address = size;
|
2002-05-23 10:08:48 +02:00
|
|
|
|
if ((newsize - size) % fragp->fr_var == 0)
|
|
|
|
|
fragp->fr_offset += (newsize - size) / fragp->fr_var;
|
|
|
|
|
else
|
|
|
|
|
/* If we hit this abort, it's likely due to subsegs_finish not
|
|
|
|
|
providing sufficient alignment on the last frag, and the
|
|
|
|
|
machine dependent code using alignment frags with fr_var
|
|
|
|
|
greater than 1. */
|
|
|
|
|
abort ();
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#ifdef tc_frob_section
|
|
|
|
|
tc_frob_section (sec);
|
|
|
|
|
#endif
|
|
|
|
|
#ifdef obj_frob_section
|
|
|
|
|
obj_frob_section (sec);
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#ifdef DEBUG2
|
|
|
|
|
static void
|
2005-05-31 20:36:28 +02:00
|
|
|
|
dump_section_relocs (bfd *abfd ATTRIBUTE_UNUSED, asection *sec, FILE *stream)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
segment_info_type *seginfo = seg_info (sec);
|
|
|
|
|
fixS *fixp = seginfo->fix_root;
|
|
|
|
|
|
|
|
|
|
if (!fixp)
|
|
|
|
|
return;
|
|
|
|
|
|
|
|
|
|
fprintf (stream, "sec %s relocs:\n", sec->name);
|
|
|
|
|
while (fixp)
|
|
|
|
|
{
|
|
|
|
|
symbolS *s = fixp->fx_addsy;
|
1999-09-11 16:59:14 +02:00
|
|
|
|
|
|
|
|
|
fprintf (stream, " %08lx: type %d ", (unsigned long) fixp,
|
|
|
|
|
(int) fixp->fx_r_type);
|
|
|
|
|
if (s == NULL)
|
|
|
|
|
fprintf (stream, "no sym\n");
|
|
|
|
|
else
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
1999-09-11 16:59:14 +02:00
|
|
|
|
print_symbol_value_1 (stream, s);
|
|
|
|
|
fprintf (stream, "\n");
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
fixp = fixp->fx_next;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
#else
|
|
|
|
|
#define dump_section_relocs(ABFD,SEC,STREAM) ((void) 0)
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#ifndef EMIT_SECTION_SYMBOLS
|
|
|
|
|
#define EMIT_SECTION_SYMBOLS 1
|
|
|
|
|
#endif
|
|
|
|
|
|
2007-03-26 14:23:48 +02:00
|
|
|
|
/* Resolve U.A.OFFSET_SYM and U.A.SYM fields of RELOC_LIST entries,
|
|
|
|
|
and check for validity. Convert RELOC_LIST from using U.A fields
|
|
|
|
|
to U.B fields. */
|
|
|
|
|
static void
|
|
|
|
|
resolve_reloc_expr_symbols (void)
|
|
|
|
|
{
|
2011-11-15 14:08:17 +01:00
|
|
|
|
bfd_vma addr_mask = 1;
|
2007-03-26 14:23:48 +02:00
|
|
|
|
struct reloc_list *r;
|
|
|
|
|
|
2011-11-15 14:08:17 +01:00
|
|
|
|
/* Avoid a shift by the width of type. */
|
|
|
|
|
addr_mask <<= bfd_arch_bits_per_address (stdoutput) - 1;
|
|
|
|
|
addr_mask <<= 1;
|
|
|
|
|
addr_mask -= 1;
|
|
|
|
|
|
2007-03-26 14:23:48 +02:00
|
|
|
|
for (r = reloc_list; r; r = r->next)
|
|
|
|
|
{
|
2011-11-15 14:08:17 +01:00
|
|
|
|
reloc_howto_type *howto = r->u.a.howto;
|
2007-03-26 14:23:48 +02:00
|
|
|
|
expressionS *symval;
|
|
|
|
|
symbolS *sym;
|
|
|
|
|
bfd_vma offset, addend;
|
|
|
|
|
asection *sec;
|
|
|
|
|
|
|
|
|
|
resolve_symbol_value (r->u.a.offset_sym);
|
|
|
|
|
symval = symbol_get_value_expression (r->u.a.offset_sym);
|
|
|
|
|
|
|
|
|
|
offset = 0;
|
|
|
|
|
sym = NULL;
|
|
|
|
|
if (symval->X_op == O_constant)
|
|
|
|
|
sym = r->u.a.offset_sym;
|
|
|
|
|
else if (symval->X_op == O_symbol)
|
|
|
|
|
{
|
|
|
|
|
sym = symval->X_add_symbol;
|
|
|
|
|
offset = symval->X_add_number;
|
|
|
|
|
symval = symbol_get_value_expression (symval->X_add_symbol);
|
|
|
|
|
}
|
|
|
|
|
if (sym == NULL
|
|
|
|
|
|| symval->X_op != O_constant
|
|
|
|
|
|| (sec = S_GET_SEGMENT (sym)) == NULL
|
|
|
|
|
|| !SEG_NORMAL (sec))
|
|
|
|
|
{
|
|
|
|
|
as_bad_where (r->file, r->line, _("invalid offset expression"));
|
|
|
|
|
sec = NULL;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
offset += S_GET_VALUE (sym);
|
|
|
|
|
|
|
|
|
|
sym = NULL;
|
|
|
|
|
addend = r->u.a.addend;
|
|
|
|
|
if (r->u.a.sym != NULL)
|
|
|
|
|
{
|
|
|
|
|
resolve_symbol_value (r->u.a.sym);
|
|
|
|
|
symval = symbol_get_value_expression (r->u.a.sym);
|
|
|
|
|
if (symval->X_op == O_constant)
|
|
|
|
|
sym = r->u.a.sym;
|
|
|
|
|
else if (symval->X_op == O_symbol)
|
|
|
|
|
{
|
|
|
|
|
sym = symval->X_add_symbol;
|
|
|
|
|
addend += symval->X_add_number;
|
|
|
|
|
symval = symbol_get_value_expression (symval->X_add_symbol);
|
|
|
|
|
}
|
|
|
|
|
if (symval->X_op != O_constant)
|
|
|
|
|
{
|
|
|
|
|
as_bad_where (r->file, r->line, _("invalid reloc expression"));
|
|
|
|
|
sec = NULL;
|
|
|
|
|
}
|
2017-09-14 02:49:31 +02:00
|
|
|
|
else if (sym != NULL && sec != NULL)
|
2011-08-18 16:10:35 +02:00
|
|
|
|
{
|
2011-11-15 14:08:17 +01:00
|
|
|
|
/* Convert relocs against local symbols to refer to the
|
|
|
|
|
corresponding section symbol plus offset instead. Keep
|
|
|
|
|
PC-relative relocs of the REL variety intact though to
|
|
|
|
|
prevent the offset from overflowing the relocated field,
|
|
|
|
|
unless it has enough bits to cover the whole address
|
|
|
|
|
space. */
|
|
|
|
|
if (S_IS_LOCAL (sym) && !symbol_section_p (sym)
|
2013-05-29 18:22:14 +02:00
|
|
|
|
&& (sec->use_rela_p
|
|
|
|
|
|| (howto->partial_inplace
|
|
|
|
|
&& (!howto->pc_relative
|
|
|
|
|
|| howto->src_mask == addr_mask))))
|
2011-08-18 16:10:35 +02:00
|
|
|
|
{
|
|
|
|
|
asection *symsec = S_GET_SEGMENT (sym);
|
|
|
|
|
if (!(((symsec->flags & SEC_MERGE) != 0
|
|
|
|
|
&& addend != 0)
|
|
|
|
|
|| (symsec->flags & SEC_THREAD_LOCAL) != 0))
|
|
|
|
|
{
|
|
|
|
|
addend += S_GET_VALUE (sym);
|
|
|
|
|
sym = section_symbol (symsec);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
symbol_mark_used_in_reloc (sym);
|
|
|
|
|
}
|
2007-03-26 14:23:48 +02:00
|
|
|
|
}
|
|
|
|
|
if (sym == NULL)
|
|
|
|
|
{
|
|
|
|
|
if (abs_section_sym == NULL)
|
|
|
|
|
abs_section_sym = section_symbol (absolute_section);
|
|
|
|
|
sym = abs_section_sym;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
r->u.b.sec = sec;
|
|
|
|
|
r->u.b.s = symbol_get_bfdsym (sym);
|
|
|
|
|
r->u.b.r.sym_ptr_ptr = &r->u.b.s;
|
|
|
|
|
r->u.b.r.address = offset;
|
|
|
|
|
r->u.b.r.addend = addend;
|
|
|
|
|
r->u.b.r.howto = howto;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
2002-08-28 05:35:59 +02:00
|
|
|
|
/* This pass over fixups decides whether symbols can be replaced with
|
|
|
|
|
section symbols. */
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
static void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
adjust_reloc_syms (bfd *abfd ATTRIBUTE_UNUSED,
|
|
|
|
|
asection *sec,
|
2007-02-16 04:40:17 +01:00
|
|
|
|
void *xxx ATTRIBUTE_UNUSED)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
segment_info_type *seginfo = seg_info (sec);
|
|
|
|
|
fixS *fixp;
|
|
|
|
|
|
|
|
|
|
if (seginfo == NULL)
|
|
|
|
|
return;
|
|
|
|
|
|
|
|
|
|
dump_section_relocs (abfd, sec, stderr);
|
|
|
|
|
|
|
|
|
|
for (fixp = seginfo->fix_root; fixp; fixp = fixp->fx_next)
|
|
|
|
|
if (fixp->fx_done)
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Ignore it. */
|
|
|
|
|
;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
else if (fixp->fx_addsy)
|
|
|
|
|
{
|
|
|
|
|
symbolS *sym;
|
|
|
|
|
asection *symsec;
|
|
|
|
|
|
|
|
|
|
#ifdef DEBUG5
|
|
|
|
|
fprintf (stderr, "\n\nadjusting fixup:\n");
|
|
|
|
|
print_fixup (fixp);
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
sym = fixp->fx_addsy;
|
|
|
|
|
|
|
|
|
|
/* All symbols should have already been resolved at this
|
|
|
|
|
point. It is possible to see unresolved expression
|
|
|
|
|
symbols, though, since they are not in the regular symbol
|
|
|
|
|
table. */
|
2002-08-28 05:35:59 +02:00
|
|
|
|
resolve_symbol_value (sym);
|
2000-07-20 22:07:09 +02:00
|
|
|
|
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
if (fixp->fx_subsy != NULL)
|
2001-05-22 12:23:50 +02:00
|
|
|
|
resolve_symbol_value (fixp->fx_subsy);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2005-04-26 19:15:22 +02:00
|
|
|
|
/* If this symbol is equated to an undefined or common symbol,
|
|
|
|
|
convert the fixup to being against that symbol. */
|
2007-02-17 08:20:56 +01:00
|
|
|
|
while (symbol_equated_reloc_p (sym)
|
|
|
|
|
|| S_IS_WEAKREFR (sym))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2007-02-17 08:20:56 +01:00
|
|
|
|
symbolS *newsym = symbol_get_value_expression (sym)->X_add_symbol;
|
|
|
|
|
if (sym == newsym)
|
|
|
|
|
break;
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
fixp->fx_offset += symbol_get_value_expression (sym)->X_add_number;
|
2007-02-17 08:20:56 +01:00
|
|
|
|
fixp->fx_addsy = newsym;
|
|
|
|
|
sym = newsym;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
2002-08-28 05:35:59 +02:00
|
|
|
|
if (symbol_mri_common_p (sym))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2007-02-17 08:20:56 +01:00
|
|
|
|
fixp->fx_offset += S_GET_VALUE (sym);
|
|
|
|
|
fixp->fx_addsy = symbol_get_value_expression (sym)->X_add_symbol;
|
2002-08-28 05:35:59 +02:00
|
|
|
|
continue;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
2002-09-05 02:01:18 +02:00
|
|
|
|
/* If the symbol is undefined, common, weak, or global (ELF
|
|
|
|
|
shared libs), we can't replace it with the section symbol. */
|
2003-01-23 13:51:05 +01:00
|
|
|
|
if (S_FORCE_RELOC (fixp->fx_addsy, 1))
|
2002-09-05 02:01:18 +02:00
|
|
|
|
continue;
|
|
|
|
|
|
|
|
|
|
/* Is there some other (target cpu dependent) reason we can't adjust
|
|
|
|
|
this one? (E.g. relocations involving function addresses on
|
|
|
|
|
the PA. */
|
|
|
|
|
#ifdef tc_fix_adjustable
|
|
|
|
|
if (! tc_fix_adjustable (fixp))
|
|
|
|
|
continue;
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
/* Since we're reducing to section symbols, don't attempt to reduce
|
|
|
|
|
anything that's already using one. */
|
|
|
|
|
if (symbol_section_p (sym))
|
|
|
|
|
continue;
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
symsec = S_GET_SEGMENT (sym);
|
|
|
|
|
if (symsec == NULL)
|
|
|
|
|
abort ();
|
2000-07-20 22:07:09 +02:00
|
|
|
|
|
2014-10-18 02:40:53 +02:00
|
|
|
|
if (bfd_is_abs_section (symsec)
|
|
|
|
|
|| symsec == reg_section)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2002-09-05 02:01:18 +02:00
|
|
|
|
/* The fixup_segment routine normally will not use this
|
2007-02-17 08:20:56 +01:00
|
|
|
|
symbol in a relocation. */
|
2002-08-28 05:35:59 +02:00
|
|
|
|
continue;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
1999-06-13 00:15:51 +02:00
|
|
|
|
/* Don't try to reduce relocs which refer to non-local symbols
|
2007-02-17 08:20:56 +01:00
|
|
|
|
in .linkonce sections. It can lead to confusion when a
|
|
|
|
|
debugging section refers to a .linkonce section. I hope
|
|
|
|
|
this will always be correct. */
|
1999-06-13 00:15:51 +02:00
|
|
|
|
if (symsec != sec && ! S_IS_LOCAL (sym))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2002-09-05 02:01:18 +02:00
|
|
|
|
if ((symsec->flags & SEC_LINK_ONCE) != 0
|
|
|
|
|
|| (IS_ELF
|
|
|
|
|
/* The GNU toolchain uses an extension for ELF: a
|
|
|
|
|
section beginning with the magic string
|
|
|
|
|
.gnu.linkonce is a linkonce section. */
|
|
|
|
|
&& strncmp (segment_name (symsec), ".gnu.linkonce",
|
|
|
|
|
sizeof ".gnu.linkonce" - 1) == 0))
|
|
|
|
|
continue;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
2001-11-28 20:15:14 +01:00
|
|
|
|
|
|
|
|
|
/* Never adjust a reloc against local symbol in a merge section
|
|
|
|
|
with non-zero addend. */
|
2002-11-20 13:56:01 +01:00
|
|
|
|
if ((symsec->flags & SEC_MERGE) != 0
|
|
|
|
|
&& (fixp->fx_offset != 0 || fixp->fx_subsy != NULL))
|
2002-09-05 02:01:18 +02:00
|
|
|
|
continue;
|
* elf.c (_bfd_elf_make_section_from_shdr): Set SEC_THREAD_LOCAL
for symbols from SHF_TLS section.
(_bfd_elf_print_private_bfd_data): Add PT_TLS.
(elf_fake_sections): Set SHF_TLS for SEC_THREAD_LOCAL sections.
(map_sections_to_segments): Build PT_TLS segment if necessary.
(assign_file_positions_for_segments): Likewise.
(get_program_header_size): Account for PT_TLS segment.
(swap_out_syms): Set type of BSF_THREAD_LOCAL symbols and symbols from
SEC_THREAD_LOCAL sections to STT_TLS.
* reloc.c: Add 386 and IA-64 TLS relocs.
* section.c (SEC_THREAD_LOCAL): Define.
(SEC_CONSTRUCTOR_TEXT, SEC_CONSTRUCTOR_DATA, SEC_CONSTRUCTOR_BSS):
Remove.
* elflink.h (elf_link_add_object_symbols): Support .tcommon.
(size_dynamic_sections): If DF_STATIC_TLS, set DF_FLAGS
unconditionally.
(struct elf_final_link_info): Add first_tls_sec.
(elf_bfd_final_link): Set first_tls_sec.
Compute elf_hash_table (info)->tls_segment.
(elf_link_output_extsym): Handle STT_TLS symbols.
(elf_link_input_bfd): Likewise.
* syms.c (BSF_THREAD_LOCAL): Define.
* bfd-in2.h: Rebuilt.
* libbfd.h: Rebuilt.
* elf32-i386.c (elf_i386_tls_transition, dtpoff_base, tpoff,
elf_i386_mkobject, elf_i386_object_p): New functions.
(elf_howto_table): Add TLS relocs.
(elf_i386_reloc_type_lookup): Support TLS relocs.
(elf_i386_info_to_howto_rel): Likewise.
(struct elf_i386_link_hash_entry): Add tls_type.
(struct elf_i386_obj_tdata): New.
(elf_i386_hash_entry, elf_i386_tdata, elf_i386_local_got_tls_type):
New macros.
(struct elf_i386_link_hash_table): Add tls_ldm_got.
(link_hash_newfunc): Clear tls_type.
(elf_i386_check_relocs): Support TLS relocs.
(elf_i386_gc_sweep_hook): Likewise.
(allocate_dynrelocs): Likewise.
(elf_i386_size_dynamic_sections): Likewise.
(elf_i386_relocate_section): Likewise.
(elf_i386_finish_dynamic_symbol): Likewise.
(bfd_elf32_mkobject, elf_backend_object_p): Define.
* elfxx-ia64.c (struct elfNN_ia64_dyn_sym_info): Add tprel_offset,
dtpmod_offset, dtprel_offset, tprel_done, dtpmod_done, dtprel_done,
want_tprel, want_dtpmod, want_dtprel.
(elfNN_ia64_tprel_base, elfNN_ia64_dtprel_base): New functions.
(ia64_howto_table): Add TLS relocs, rename R_IA64_LTOFF_TP22 to
R_IA64_LTOFF_TPREL22.
(elf_code_to_howto_index): Add TLS relocs.
(elfNN_ia64_check_relocs): Support TLS relocs.
(allocate_global_data_got): Account for TLS .got data.
(allocate_dynrel_entries): Account for TLS dynamic relocations.
(elfNN_ia64_install_value): Supprt TLS relocs.
(set_got_entry): Support TLS relocs.
(elfNN_ia64_relocate_section): Likewise.
* config/obj-elf.c (elf_common): Renamed from obj_elf_common.
(obj_elf_common): Call elf_common.
(obj_elf_tls_common): New function.
(elf_pseudo_tab): Support .tls_common.
(special_sections): Add .tdata and .tbss.
(obj_elf_change_section): Set SEC_THREAD_LOCAL for SHF_TLS
sections.
(obj_elf_parse_section_letters): Support T in section flags (SHF_TLS).
(obj_elf_parse_section_letters): Include T in error message.
* config/tc-ppc.c (ppc_section_letter): Likewise.
* config/tc-alpha.c (alpha_elf_section_letter): Likewise.
(tc_gen_reloc): Handle SEC_THREAD_LOCAL the same way as
SEC_MERGE.
* config/tc-sparc.c (md_apply_fix3): Likewise.
* config/tc-i386.c (tc_i386_fix_adjustable): Add TLS relocs.
Define them if not BFD_ASSEMBLER.
(lex_got): Support @TLSGD, @TLSLDM, @GOTTPOFF, @TPOFF, @DTPOFF
and @NTPOFF.
(md_apply_fix3): Add TLS relocs.
* config/tc-ia64.c (enum reloc_func): Add FUNC_DTP_MODULE,
FUNC_DTP_RELATIVE, FUNC_TP_RELATIVE, FUNC_LT_DTP_MODULE,
FUNC_LT_DTP_RELATIVE, FUNC_LT_TP_RELATIVE.
(pseudo_func): Support @dtpmod(), @dtprel() and @tprel().
(ia64_elf_section_letter): Include T in error message.
(md_begin): Support TLS operators.
(md_operand): Likewise.
(ia64_gen_real_reloc_type): Support TLS relocs.
* testsuite/gas/i386/tlspic.s: New file.
* testsuite/gas/i386/tlsd.s: New file.
* testsuite/gas/i386/tlsnopic.s: New file.
* testsuite/gas/i386/tlsd.d: New file.
* testsuite/gas/i386/tlsnopic.d: New file.
* testsuite/gas/i386/tlspic.d: New file.
* testsuite/gas/i386/i386.exp: Add tlsd, tlsnopic and tlspic tests.
* testsuite/gas/ia64/tls.s: New file.
* testsuite/gas/ia64/tls.d: New file.
* testsuite/gas/ia64/ia64.exp: Add tls test.
* write.c (adjust_reloc_syms): Don't change symbols in
SEC_THREAD_LOCAL sections to STT_SECTION + addend.
* elf/common.h (PT_TLS, SHF_TLS, STT_TLS, DF_STATIC_TLS): Define.
* elf/ia64.h (R_IA64_LTOFF_TPREL22): Renamed from R_IA64_LTOFF_TP22.
* elf/i386.h: Add TLS relocs.
* scripttempl/elf.sc: Add .rel{,a}.t{bss,data}, .tdata and .tbss.
* ldlang.c (lang_add_section): Set SEC_THREAD_LOCAL for
output section if necessary. Handle .tbss.
(lang_size_sections): Clear _raw_size for .tbss section
(it allocates space in PT_TLS segment only).
* ldwrite.c (build_link_order): Build link order for .tbss too.
* readelf.c (get_segment_type): Add PT_TLS.
(get_elf_section_flags): Add SHF_TLS.
(get_dynamic_flags): Optimize. Add DF_STATIC_TLS.
(process_dynamic_segment): Use puts instead of printf.
(get_symbol_type): Support STT_TLS.
* objdump.c (dump_section_header): Remove SEC_CONSTRUCTOR_TEXT,
SEC_CONSTRUCTOR_DATA, SEC_CONSTRUCTOR_BSS.
Add SEC_THREAD_LOCAL.
2002-05-23 15:12:53 +02:00
|
|
|
|
|
|
|
|
|
/* Never adjust a reloc against TLS local symbol. */
|
2002-08-28 05:35:59 +02:00
|
|
|
|
if ((symsec->flags & SEC_THREAD_LOCAL) != 0)
|
2002-09-05 02:01:18 +02:00
|
|
|
|
continue;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2002-09-05 02:01:18 +02:00
|
|
|
|
/* We refetch the segment when calling section_symbol, rather
|
1999-05-03 09:29:11 +02:00
|
|
|
|
than using symsec, because S_GET_VALUE may wind up changing
|
2000-07-20 22:07:09 +02:00
|
|
|
|
the section when it calls resolve_symbol_value. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
fixp->fx_offset += S_GET_VALUE (sym);
|
|
|
|
|
fixp->fx_addsy = section_symbol (S_GET_SEGMENT (sym));
|
1999-09-11 16:59:14 +02:00
|
|
|
|
#ifdef DEBUG5
|
|
|
|
|
fprintf (stderr, "\nadjusted fixup:\n");
|
|
|
|
|
print_fixup (fixp);
|
|
|
|
|
#endif
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
dump_section_relocs (abfd, sec, stderr);
|
|
|
|
|
}
|
|
|
|
|
|
2007-02-16 04:40:17 +01:00
|
|
|
|
/* fixup_segment()
|
|
|
|
|
|
|
|
|
|
Go through all the fixS's in a segment and see which ones can be
|
|
|
|
|
handled now. (These consist of fixS where we have since discovered
|
|
|
|
|
the value of a symbol, or the address of the frag involved.)
|
|
|
|
|
For each one, call md_apply_fix to put the fix into the frag data.
|
2013-02-04 13:34:17 +01:00
|
|
|
|
Ones that we couldn't completely handle here will be output later
|
|
|
|
|
by emit_relocations. */
|
2007-02-16 04:40:17 +01:00
|
|
|
|
|
2013-02-04 13:34:17 +01:00
|
|
|
|
static void
|
2007-02-16 04:40:17 +01:00
|
|
|
|
fixup_segment (fixS *fixP, segT this_segment)
|
|
|
|
|
{
|
|
|
|
|
valueT add_number;
|
|
|
|
|
fragS *fragP;
|
|
|
|
|
segT add_symbol_segment = absolute_section;
|
|
|
|
|
|
|
|
|
|
if (fixP != NULL && abs_section_sym == NULL)
|
|
|
|
|
abs_section_sym = section_symbol (absolute_section);
|
|
|
|
|
|
|
|
|
|
/* If the linker is doing the relaxing, we must not do any fixups.
|
|
|
|
|
|
|
|
|
|
Well, strictly speaking that's not true -- we could do any that
|
Remove i860, i960, bout and aout-adobe targets
Plus remove a few leftovers from the 29k support.
include/
* aout/adobe.h: Delete.
* aout/reloc.h: Delete.
* coff/i860.h: Delete.
* coff/i960.h: Delete.
* elf/i860.h: Delete.
* elf/i960.h: Delete.
* opcode/i860.h: Delete.
* opcode/i960.h: Delete.
* aout/aout64.h (enum reloc_type): Trim off 29k and other unused values.
* aout/ar.h (ARMAGB): Remove.
* coff/internal.h (struct internal_aouthdr, struct internal_scnhdr,
union internal_auxent): Remove i960 support.
bfd/
* aout-adobe.c: Delete.
* bout.c: Delete.
* coff-i860.c: Delete.
* coff-i960.c: Delete.
* cpu-i860.c: Delete.
* cpu-i960.c: Delete.
* elf32-i860.c: Delete.
* elf32-i960.c: Delete.
* hosts/i860mach3.h: Delete.
* Makefile.am: Remove i860, i960, bout, and adobe support.
* archures.c: Remove i860 and i960 support.
* coffcode.h: Likewise.
* reloc.c: Likewise.
* aoutx.h: Comment updates.
* archive.c: Remove BOUT and i960 support.
* bfd.c: Remove BOUT support.
* coffswap.h: Remove i960 support.
* config.bfd: Remove i860, i960 and adobe targets.
* configure.ac: Remove adode, bout, i860, i960, icoff targets.
* targets.c: Likewise.
* ieee.c: Remove i960 support.
* mach-o.c: Remove i860 support.
* Makefile.in: Regenerate.
* bfd-in2.h: Regenerate.
* configure: Regenerate.
* libbfd.h: Regenerate.
* po/SRC-POTFILES.in: Regenerate.
opcodes/
* opcodes/i860-dis.c: Delete.
* opcodes/i960-dis.c: Delete.
* Makefile.am: Remove i860 and i960 support.
* configure.ac: Likewise.
* disassemble.c: Likewise.
* disassemble.h: Likewise.
* Makefile.in: Regenerate.
* configure: Regenerate.
* po/POTFILES.in: Regenerate.
binutils/
* ieee.c: Remove i960 support.
* od-macho.c: Remove i860 support.
* readelf.c: Remove i860 and i960 support.
* testsuite/binutils-all/objcopy.exp: Likewise.
* testsuite/binutils-all/objdump.exp: Likewise.
* testsuite/lib/binutils-common.exp: Likewise.
gas/
* config/aout_gnu.h: Delete.
* config/tc-i860.c: Delete.
* config/tc-i860.h: Delete.
* config/tc-i960.c: Delete.
* config/tc-i960.h: Delete.
* doc/c-i860.texi: Delete.
* doc/c-i960.texi: Delete.
* testsuite/gas/i860/README.i860: Delete.
* testsuite/gas/i860/bitwise.d: Delete.
* testsuite/gas/i860/bitwise.s: Delete.
* testsuite/gas/i860/branch.d: Delete.
* testsuite/gas/i860/branch.s: Delete.
* testsuite/gas/i860/bte.d: Delete.
* testsuite/gas/i860/bte.s: Delete.
* testsuite/gas/i860/dir-align01.d: Delete.
* testsuite/gas/i860/dir-align01.s: Delete.
* testsuite/gas/i860/dir-intel01.d: Delete.
* testsuite/gas/i860/dir-intel01.s: Delete.
* testsuite/gas/i860/dir-intel02.d: Delete.
* testsuite/gas/i860/dir-intel02.s: Delete.
* testsuite/gas/i860/dir-intel03-err.l: Delete.
* testsuite/gas/i860/dir-intel03-err.s: Delete.
* testsuite/gas/i860/dual01.d: Delete.
* testsuite/gas/i860/dual01.s: Delete.
* testsuite/gas/i860/dual02-err.l: Delete.
* testsuite/gas/i860/dual02-err.s: Delete.
* testsuite/gas/i860/dual03.d: Delete.
* testsuite/gas/i860/dual03.s: Delete.
* testsuite/gas/i860/fldst01.d: Delete.
* testsuite/gas/i860/fldst01.s: Delete.
* testsuite/gas/i860/fldst02.d: Delete.
* testsuite/gas/i860/fldst02.s: Delete.
* testsuite/gas/i860/fldst03.d: Delete.
* testsuite/gas/i860/fldst03.s: Delete.
* testsuite/gas/i860/fldst04.d: Delete.
* testsuite/gas/i860/fldst04.s: Delete.
* testsuite/gas/i860/fldst05.d: Delete.
* testsuite/gas/i860/fldst05.s: Delete.
* testsuite/gas/i860/fldst06.d: Delete.
* testsuite/gas/i860/fldst06.s: Delete.
* testsuite/gas/i860/fldst07.d: Delete.
* testsuite/gas/i860/fldst07.s: Delete.
* testsuite/gas/i860/fldst08.d: Delete.
* testsuite/gas/i860/fldst08.s: Delete.
* testsuite/gas/i860/float01.d: Delete.
* testsuite/gas/i860/float01.s: Delete.
* testsuite/gas/i860/float02.d: Delete.
* testsuite/gas/i860/float02.s: Delete.
* testsuite/gas/i860/float03.d: Delete.
* testsuite/gas/i860/float03.s: Delete.
* testsuite/gas/i860/float04.d: Delete.
* testsuite/gas/i860/float04.s: Delete.
* testsuite/gas/i860/form.d: Delete.
* testsuite/gas/i860/form.s: Delete.
* testsuite/gas/i860/i860.exp: Delete.
* testsuite/gas/i860/iarith.d: Delete.
* testsuite/gas/i860/iarith.s: Delete.
* testsuite/gas/i860/ldst01.d: Delete.
* testsuite/gas/i860/ldst01.s: Delete.
* testsuite/gas/i860/ldst02.d: Delete.
* testsuite/gas/i860/ldst02.s: Delete.
* testsuite/gas/i860/ldst03.d: Delete.
* testsuite/gas/i860/ldst03.s: Delete.
* testsuite/gas/i860/ldst04.d: Delete.
* testsuite/gas/i860/ldst04.s: Delete.
* testsuite/gas/i860/ldst05.d: Delete.
* testsuite/gas/i860/ldst05.s: Delete.
* testsuite/gas/i860/ldst06.d: Delete.
* testsuite/gas/i860/ldst06.s: Delete.
* testsuite/gas/i860/pfam.d: Delete.
* testsuite/gas/i860/pfam.s: Delete.
* testsuite/gas/i860/pfmam.d: Delete.
* testsuite/gas/i860/pfmam.s: Delete.
* testsuite/gas/i860/pfmsm.d: Delete.
* testsuite/gas/i860/pfmsm.s: Delete.
* testsuite/gas/i860/pfsm.d: Delete.
* testsuite/gas/i860/pfsm.s: Delete.
* testsuite/gas/i860/pseudo-ops01.d: Delete.
* testsuite/gas/i860/pseudo-ops01.s: Delete.
* testsuite/gas/i860/regress01.d: Delete.
* testsuite/gas/i860/regress01.s: Delete.
* testsuite/gas/i860/shift.d: Delete.
* testsuite/gas/i860/shift.s: Delete.
* testsuite/gas/i860/simd.d: Delete.
* testsuite/gas/i860/simd.s: Delete.
* testsuite/gas/i860/system.d: Delete.
* testsuite/gas/i860/system.s: Delete.
* testsuite/gas/i860/xp.d: Delete.
* testsuite/gas/i860/xp.s: Delete.
* Makefile.am: Remove i860 and i960 support.
* configure.tgt: Likewise.
* doc/Makefile.am: Likewise.
* doc/all.texi: Likewise.
* testsuite/gas/all/gas.exp
* config/obj-coff.h: Remove i960 support.
* doc/internals.texi: Likewise.
* expr.c: Likewise.
* read.c: Likewise.
* write.c: Likewise.
* write.h: Likewise.
* testsuite/gas/lns/lns.exp: Likewise.
* testsuite/gas/symver/symver.exp: Likewise.
* config/tc-m68k.c: Remove BOUT support.
* config/tc-score.c: Likewise.
* config/tc-score7.c: Likewise.
* config/tc-sparc.c: Likewise.
* symbols.c: Likewise.
* doc/h8.texi: Likewise.
* configure.ac: Remove BOUT and i860 support.
* doc/as.texinfo: Remove BOUT, i860 and i960 support
* Makefile.in: Regenerate.
* config.in: Regenerate.
* configure: Regenerate.
* doc/Makefile.in: Regenerate.
* po/POTFILES.in: Regenerate.
ld/
* emulparams/coff_i860.sh: Delete.
* emulparams/elf32_i860.sh: Delete.
* emulparams/elf32_i960.sh: Delete.
* emulparams/gld960.sh: Delete.
* emulparams/gld960coff.sh: Delete.
* emulparams/lnk960.sh: Delete.
* emultempl/gld960.em: Delete.
* emultempl/gld960c.em: Delete.
* emultempl/lnk960.em: Delete.
* scripttempl/i860coff.sc: Delete.
* scripttempl/i960.sc: Delete.
* ld.texinfo: Remove i960 support.
* Makefile.am: Remove i860 and i960 support.
* configure.tgt: Likewise.
* testsuite/ld-discard/extern.d: Likewise.
* testsuite/ld-discard/start.d: Likewise.
* testsuite/ld-discard/static.d: Likewise.
* testsuite/ld-elf/compressed1d.d: Likewise.
* testsuite/ld-elf/group1.d: Likewise.
* testsuite/ld-elf/group3b.d: Likewise.
* testsuite/ld-elf/group8a.d: Likewise.
* testsuite/ld-elf/group8b.d: Likewise.
* testsuite/ld-elf/group9a.d: Likewise.
* testsuite/ld-elf/group9b.d: Likewise.
* testsuite/ld-elf/linkonce2.d: Likewise.
* testsuite/ld-elf/merge.d: Likewise.
* testsuite/ld-elf/merge2.d: Likewise.
* testsuite/ld-elf/merge3.d: Likewise.
* testsuite/ld-elf/orphan-10.d: Likewise.
* testsuite/ld-elf/orphan-11.d: Likewise.
* testsuite/ld-elf/orphan-12.d: Likewise.
* testsuite/ld-elf/orphan-9.d: Likewise.
* testsuite/ld-elf/orphan-region.d: Likewise.
* testsuite/ld-elf/orphan.d: Likewise.
* testsuite/ld-elf/orphan3.d: Likewise.
* testsuite/ld-elf/pr12851.d: Likewise.
* testsuite/ld-elf/pr12975.d: Likewise.
* testsuite/ld-elf/pr13177.d: Likewise.
* testsuite/ld-elf/pr13195.d: Likewise.
* testsuite/ld-elf/pr17550a.d: Likewise.
* testsuite/ld-elf/pr17550b.d: Likewise.
* testsuite/ld-elf/pr17550c.d: Likewise.
* testsuite/ld-elf/pr17550d.d: Likewise.
* testsuite/ld-elf/pr17615.d: Likewise.
* testsuite/ld-elf/pr20528a.d: Likewise.
* testsuite/ld-elf/pr20528b.d: Likewise.
* testsuite/ld-elf/pr21562a.d: Likewise.
* testsuite/ld-elf/pr21562b.d: Likewise.
* testsuite/ld-elf/pr21562c.d: Likewise.
* testsuite/ld-elf/pr21562d.d: Likewise.
* testsuite/ld-elf/pr21562i.d: Likewise.
* testsuite/ld-elf/pr21562j.d: Likewise.
* testsuite/ld-elf/pr21562k.d: Likewise.
* testsuite/ld-elf/pr21562l.d: Likewise.
* testsuite/ld-elf/pr21562m.d: Likewise.
* testsuite/ld-elf/pr21562n.d: Likewise.
* testsuite/ld-elf/pr22677.d: Likewise.
* testsuite/ld-elf/pr22836-1a.d: Likewise.
* testsuite/ld-elf/pr22836-1b.d: Likewise.
* testsuite/ld-elf/pr349.d: Likewise.
* testsuite/ld-elf/sec-to-seg.exp: Likewise.
* testsuite/ld-elf/sec64k.exp: Likewise.
* testsuite/ld-elf/warn1.d: Likewise.
* testsuite/ld-elf/warn2.d: Likewise.
* testsuite/ld-elf/warn3.d: Likewise.
* testsuite/lib/ld-lib.exp: Likewise.
* Makefile.in: Regenerate.
* po/BLD-POTFILES.in: Regenerate.
2018-04-11 11:16:05 +02:00
|
|
|
|
are PC-relative and don't cross regions that could change size. */
|
2007-02-16 04:40:17 +01:00
|
|
|
|
if (linkrelax && TC_LINKRELAX_FIXUP (this_segment))
|
|
|
|
|
{
|
|
|
|
|
for (; fixP; fixP = fixP->fx_next)
|
|
|
|
|
if (!fixP->fx_done)
|
|
|
|
|
{
|
|
|
|
|
if (fixP->fx_addsy == NULL)
|
|
|
|
|
{
|
|
|
|
|
/* There was no symbol required by this relocation.
|
|
|
|
|
However, BFD doesn't really handle relocations
|
|
|
|
|
without symbols well. So fake up a local symbol in
|
|
|
|
|
the absolute section. */
|
|
|
|
|
fixP->fx_addsy = abs_section_sym;
|
|
|
|
|
}
|
|
|
|
|
symbol_mark_used_in_reloc (fixP->fx_addsy);
|
|
|
|
|
if (fixP->fx_subsy != NULL)
|
|
|
|
|
symbol_mark_used_in_reloc (fixP->fx_subsy);
|
|
|
|
|
}
|
2013-02-04 13:34:17 +01:00
|
|
|
|
return;
|
2007-02-16 04:40:17 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
for (; fixP; fixP = fixP->fx_next)
|
|
|
|
|
{
|
|
|
|
|
#ifdef DEBUG5
|
|
|
|
|
fprintf (stderr, "\nprocessing fixup:\n");
|
|
|
|
|
print_fixup (fixP);
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
fragP = fixP->fx_frag;
|
|
|
|
|
know (fragP);
|
|
|
|
|
#ifdef TC_VALIDATE_FIX
|
|
|
|
|
TC_VALIDATE_FIX (fixP, this_segment, skip);
|
|
|
|
|
#endif
|
|
|
|
|
add_number = fixP->fx_offset;
|
|
|
|
|
|
|
|
|
|
if (fixP->fx_addsy != NULL)
|
|
|
|
|
add_symbol_segment = S_GET_SEGMENT (fixP->fx_addsy);
|
|
|
|
|
|
|
|
|
|
if (fixP->fx_subsy != NULL)
|
|
|
|
|
{
|
|
|
|
|
segT sub_symbol_segment;
|
|
|
|
|
resolve_symbol_value (fixP->fx_subsy);
|
|
|
|
|
sub_symbol_segment = S_GET_SEGMENT (fixP->fx_subsy);
|
|
|
|
|
if (fixP->fx_addsy != NULL
|
|
|
|
|
&& sub_symbol_segment == add_symbol_segment
|
2010-12-02 14:25:13 +01:00
|
|
|
|
&& !S_FORCE_RELOC (fixP->fx_addsy, 0)
|
|
|
|
|
&& !S_FORCE_RELOC (fixP->fx_subsy, 0)
|
2007-02-16 04:40:17 +01:00
|
|
|
|
&& !TC_FORCE_RELOCATION_SUB_SAME (fixP, add_symbol_segment))
|
|
|
|
|
{
|
|
|
|
|
add_number += S_GET_VALUE (fixP->fx_addsy);
|
|
|
|
|
add_number -= S_GET_VALUE (fixP->fx_subsy);
|
|
|
|
|
fixP->fx_offset = add_number;
|
|
|
|
|
fixP->fx_addsy = NULL;
|
|
|
|
|
fixP->fx_subsy = NULL;
|
|
|
|
|
#ifdef TC_M68K
|
|
|
|
|
/* See the comment below about 68k weirdness. */
|
|
|
|
|
fixP->fx_pcrel = 0;
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
else if (sub_symbol_segment == absolute_section
|
2010-12-02 14:25:13 +01:00
|
|
|
|
&& !S_FORCE_RELOC (fixP->fx_subsy, 0)
|
2008-09-19 04:11:02 +02:00
|
|
|
|
&& !TC_FORCE_RELOCATION_SUB_ABS (fixP, add_symbol_segment))
|
2007-02-16 04:40:17 +01:00
|
|
|
|
{
|
|
|
|
|
add_number -= S_GET_VALUE (fixP->fx_subsy);
|
|
|
|
|
fixP->fx_offset = add_number;
|
|
|
|
|
fixP->fx_subsy = NULL;
|
|
|
|
|
}
|
|
|
|
|
else if (sub_symbol_segment == this_segment
|
2010-12-02 14:25:13 +01:00
|
|
|
|
&& !S_FORCE_RELOC (fixP->fx_subsy, 0)
|
2008-09-19 12:00:40 +02:00
|
|
|
|
&& !TC_FORCE_RELOCATION_SUB_LOCAL (fixP, add_symbol_segment))
|
2007-02-16 04:40:17 +01:00
|
|
|
|
{
|
|
|
|
|
add_number -= S_GET_VALUE (fixP->fx_subsy);
|
|
|
|
|
fixP->fx_offset = (add_number + fixP->fx_dot_value
|
2013-03-08 11:17:00 +01:00
|
|
|
|
+ fixP->fx_dot_frag->fr_address);
|
2007-02-16 04:40:17 +01:00
|
|
|
|
|
|
|
|
|
/* Make it pc-relative. If the back-end code has not
|
|
|
|
|
selected a pc-relative reloc, cancel the adjustment
|
|
|
|
|
we do later on all pc-relative relocs. */
|
|
|
|
|
if (0
|
|
|
|
|
#ifdef TC_M68K
|
|
|
|
|
/* Do this for m68k even if it's already described
|
|
|
|
|
as pc-relative. On the m68k, an operand of
|
|
|
|
|
"pc@(foo-.-2)" should address "foo" in a
|
|
|
|
|
pc-relative mode. */
|
|
|
|
|
|| 1
|
|
|
|
|
#endif
|
|
|
|
|
|| !fixP->fx_pcrel)
|
|
|
|
|
add_number += MD_PCREL_FROM_SECTION (fixP, this_segment);
|
|
|
|
|
fixP->fx_subsy = NULL;
|
|
|
|
|
fixP->fx_pcrel = 1;
|
|
|
|
|
}
|
2012-07-02 09:35:06 +02:00
|
|
|
|
else if (!TC_VALIDATE_FIX_SUB (fixP, add_symbol_segment))
|
2007-02-16 04:40:17 +01:00
|
|
|
|
{
|
2008-09-19 04:11:02 +02:00
|
|
|
|
if (!md_register_arithmetic
|
|
|
|
|
&& (add_symbol_segment == reg_section
|
|
|
|
|
|| sub_symbol_segment == reg_section))
|
|
|
|
|
as_bad_where (fixP->fx_file, fixP->fx_line,
|
|
|
|
|
_("register value used as expression"));
|
|
|
|
|
else
|
|
|
|
|
as_bad_where (fixP->fx_file, fixP->fx_line,
|
|
|
|
|
_("can't resolve `%s' {%s section} - `%s' {%s section}"),
|
|
|
|
|
fixP->fx_addsy ? S_GET_NAME (fixP->fx_addsy) : "0",
|
|
|
|
|
segment_name (add_symbol_segment),
|
|
|
|
|
S_GET_NAME (fixP->fx_subsy),
|
|
|
|
|
segment_name (sub_symbol_segment));
|
2007-02-16 04:40:17 +01:00
|
|
|
|
}
|
2012-07-02 09:35:06 +02:00
|
|
|
|
else if (sub_symbol_segment != undefined_section
|
|
|
|
|
&& ! bfd_is_com_section (sub_symbol_segment)
|
|
|
|
|
&& MD_APPLY_SYM_VALUE (fixP))
|
|
|
|
|
add_number -= S_GET_VALUE (fixP->fx_subsy);
|
2007-02-16 04:40:17 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (fixP->fx_addsy)
|
|
|
|
|
{
|
2010-05-04 18:21:07 +02:00
|
|
|
|
if (add_symbol_segment == this_segment
|
2010-12-02 14:25:13 +01:00
|
|
|
|
&& !S_FORCE_RELOC (fixP->fx_addsy, 0)
|
2007-02-16 04:40:17 +01:00
|
|
|
|
&& !TC_FORCE_RELOCATION_LOCAL (fixP))
|
|
|
|
|
{
|
|
|
|
|
/* This fixup was made when the symbol's segment was
|
|
|
|
|
SEG_UNKNOWN, but it is now in the local segment.
|
|
|
|
|
So we know how to do the address without relocation. */
|
|
|
|
|
add_number += S_GET_VALUE (fixP->fx_addsy);
|
|
|
|
|
fixP->fx_offset = add_number;
|
|
|
|
|
if (fixP->fx_pcrel)
|
|
|
|
|
add_number -= MD_PCREL_FROM_SECTION (fixP, this_segment);
|
|
|
|
|
fixP->fx_addsy = NULL;
|
|
|
|
|
fixP->fx_pcrel = 0;
|
|
|
|
|
}
|
|
|
|
|
else if (add_symbol_segment == absolute_section
|
2010-12-02 14:25:13 +01:00
|
|
|
|
&& !S_FORCE_RELOC (fixP->fx_addsy, 0)
|
2007-02-16 04:40:17 +01:00
|
|
|
|
&& !TC_FORCE_RELOCATION_ABS (fixP))
|
|
|
|
|
{
|
|
|
|
|
add_number += S_GET_VALUE (fixP->fx_addsy);
|
|
|
|
|
fixP->fx_offset = add_number;
|
|
|
|
|
fixP->fx_addsy = NULL;
|
|
|
|
|
}
|
|
|
|
|
else if (add_symbol_segment != undefined_section
|
|
|
|
|
&& ! bfd_is_com_section (add_symbol_segment)
|
|
|
|
|
&& MD_APPLY_SYM_VALUE (fixP))
|
|
|
|
|
add_number += S_GET_VALUE (fixP->fx_addsy);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (fixP->fx_pcrel)
|
|
|
|
|
{
|
|
|
|
|
add_number -= MD_PCREL_FROM_SECTION (fixP, this_segment);
|
|
|
|
|
if (!fixP->fx_done && fixP->fx_addsy == NULL)
|
|
|
|
|
{
|
|
|
|
|
/* There was no symbol required by this relocation.
|
|
|
|
|
However, BFD doesn't really handle relocations
|
|
|
|
|
without symbols well. So fake up a local symbol in
|
|
|
|
|
the absolute section. */
|
|
|
|
|
fixP->fx_addsy = abs_section_sym;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (!fixP->fx_done)
|
|
|
|
|
md_apply_fix (fixP, &add_number, this_segment);
|
|
|
|
|
|
|
|
|
|
if (!fixP->fx_done)
|
|
|
|
|
{
|
|
|
|
|
if (fixP->fx_addsy == NULL)
|
|
|
|
|
fixP->fx_addsy = abs_section_sym;
|
|
|
|
|
symbol_mark_used_in_reloc (fixP->fx_addsy);
|
|
|
|
|
if (fixP->fx_subsy != NULL)
|
|
|
|
|
symbol_mark_used_in_reloc (fixP->fx_subsy);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (!fixP->fx_bit_fixP && !fixP->fx_no_overflow && fixP->fx_size != 0)
|
|
|
|
|
{
|
|
|
|
|
if (fixP->fx_size < sizeof (valueT))
|
|
|
|
|
{
|
|
|
|
|
valueT mask;
|
|
|
|
|
|
|
|
|
|
mask = 0;
|
|
|
|
|
mask--; /* Set all bits to one. */
|
|
|
|
|
mask <<= fixP->fx_size * 8 - (fixP->fx_signed ? 1 : 0);
|
|
|
|
|
if ((add_number & mask) != 0 && (add_number & mask) != mask)
|
|
|
|
|
{
|
|
|
|
|
char buf[50], buf2[50];
|
|
|
|
|
sprint_value (buf, fragP->fr_address + fixP->fx_where);
|
|
|
|
|
if (add_number > 1000)
|
|
|
|
|
sprint_value (buf2, add_number);
|
|
|
|
|
else
|
|
|
|
|
sprintf (buf2, "%ld", (long) add_number);
|
|
|
|
|
as_bad_where (fixP->fx_file, fixP->fx_line,
|
2017-11-06 10:14:02 +01:00
|
|
|
|
ngettext ("value of %s too large for field "
|
|
|
|
|
"of %d byte at %s",
|
|
|
|
|
"value of %s too large for field "
|
|
|
|
|
"of %d bytes at %s",
|
|
|
|
|
fixP->fx_size),
|
2007-02-16 04:40:17 +01:00
|
|
|
|
buf2, fixP->fx_size, buf);
|
|
|
|
|
} /* Generic error checking. */
|
|
|
|
|
}
|
|
|
|
|
#ifdef WARN_SIGNED_OVERFLOW_WORD
|
|
|
|
|
/* Warn if a .word value is too large when treated as a signed
|
|
|
|
|
number. We already know it is not too negative. This is to
|
|
|
|
|
catch over-large switches generated by gcc on the 68k. */
|
|
|
|
|
if (!flag_signed_overflow_ok
|
|
|
|
|
&& fixP->fx_size == 2
|
|
|
|
|
&& add_number > 0x7fff)
|
|
|
|
|
as_bad_where (fixP->fx_file, fixP->fx_line,
|
|
|
|
|
_("signed .word overflow; switch may be too large; %ld at 0x%lx"),
|
|
|
|
|
(long) add_number,
|
|
|
|
|
(long) (fragP->fr_address + fixP->fx_where));
|
|
|
|
|
#endif
|
|
|
|
|
} /* Not a bit fix. */
|
|
|
|
|
|
|
|
|
|
#ifdef TC_VALIDATE_FIX
|
|
|
|
|
skip: ATTRIBUTE_UNUSED_LABEL
|
|
|
|
|
;
|
|
|
|
|
#endif
|
|
|
|
|
#ifdef DEBUG5
|
|
|
|
|
fprintf (stderr, "result:\n");
|
|
|
|
|
print_fixup (fixP);
|
|
|
|
|
#endif
|
|
|
|
|
} /* For each fixS in this segment. */
|
|
|
|
|
}
|
|
|
|
|
|
2002-09-05 02:01:18 +02:00
|
|
|
|
static void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
fix_segment (bfd *abfd ATTRIBUTE_UNUSED,
|
|
|
|
|
asection *sec,
|
2007-02-16 04:40:17 +01:00
|
|
|
|
void *xxx ATTRIBUTE_UNUSED)
|
2002-09-05 02:01:18 +02:00
|
|
|
|
{
|
|
|
|
|
segment_info_type *seginfo = seg_info (sec);
|
|
|
|
|
|
|
|
|
|
fixup_segment (seginfo->fix_root, sec);
|
|
|
|
|
}
|
|
|
|
|
|
2007-02-22 06:54:51 +01:00
|
|
|
|
static void
|
|
|
|
|
install_reloc (asection *sec, arelent *reloc, fragS *fragp,
|
2016-02-22 15:11:27 +01:00
|
|
|
|
const char *file, unsigned int line)
|
2007-02-22 06:54:51 +01:00
|
|
|
|
{
|
|
|
|
|
char *err;
|
|
|
|
|
bfd_reloc_status_type s;
|
2008-08-20 15:43:32 +02:00
|
|
|
|
asymbol *sym;
|
|
|
|
|
|
|
|
|
|
if (reloc->sym_ptr_ptr != NULL
|
|
|
|
|
&& (sym = *reloc->sym_ptr_ptr) != NULL
|
|
|
|
|
&& (sym->flags & BSF_KEEP) == 0
|
|
|
|
|
&& ((sym->flags & BSF_SECTION_SYM) == 0
|
2008-09-15 15:53:17 +02:00
|
|
|
|
|| (EMIT_SECTION_SYMBOLS
|
|
|
|
|
&& !bfd_is_abs_section (sym->section))))
|
2008-08-20 15:43:32 +02:00
|
|
|
|
as_bad_where (file, line, _("redefined symbol cannot be used on reloc"));
|
2007-02-22 06:54:51 +01:00
|
|
|
|
|
|
|
|
|
s = bfd_install_relocation (stdoutput, reloc,
|
|
|
|
|
fragp->fr_literal, fragp->fr_address,
|
|
|
|
|
sec, &err);
|
|
|
|
|
switch (s)
|
|
|
|
|
{
|
|
|
|
|
case bfd_reloc_ok:
|
|
|
|
|
break;
|
|
|
|
|
case bfd_reloc_overflow:
|
|
|
|
|
as_bad_where (file, line, _("relocation overflow"));
|
|
|
|
|
break;
|
|
|
|
|
case bfd_reloc_outofrange:
|
|
|
|
|
as_bad_where (file, line, _("relocation out of range"));
|
|
|
|
|
break;
|
|
|
|
|
default:
|
|
|
|
|
as_fatal (_("%s:%u: bad return from bfd_install_relocation: %x"),
|
|
|
|
|
file, line, s);
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
2011-08-18 16:10:35 +02:00
|
|
|
|
static fragS *
|
|
|
|
|
get_frag_for_reloc (fragS *last_frag,
|
|
|
|
|
const segment_info_type *seginfo,
|
|
|
|
|
const struct reloc_list *r)
|
|
|
|
|
{
|
|
|
|
|
fragS *f;
|
2013-01-10 20:51:55 +01:00
|
|
|
|
|
2011-08-18 16:10:35 +02:00
|
|
|
|
for (f = last_frag; f != NULL; f = f->fr_next)
|
|
|
|
|
if (f->fr_address <= r->u.b.r.address
|
|
|
|
|
&& r->u.b.r.address < f->fr_address + f->fr_fix)
|
|
|
|
|
return f;
|
|
|
|
|
|
|
|
|
|
for (f = seginfo->frchainP->frch_root; f != NULL; f = f->fr_next)
|
|
|
|
|
if (f->fr_address <= r->u.b.r.address
|
|
|
|
|
&& r->u.b.r.address < f->fr_address + f->fr_fix)
|
|
|
|
|
return f;
|
|
|
|
|
|
2015-01-19 09:27:04 +01:00
|
|
|
|
for (f = seginfo->frchainP->frch_root; f != NULL; f = f->fr_next)
|
|
|
|
|
if (f->fr_address <= r->u.b.r.address
|
|
|
|
|
&& r->u.b.r.address <= f->fr_address + f->fr_fix)
|
|
|
|
|
return f;
|
|
|
|
|
|
2011-08-18 16:10:35 +02:00
|
|
|
|
as_bad_where (r->file, r->line,
|
|
|
|
|
_("reloc not within (fixed part of) section"));
|
|
|
|
|
return NULL;
|
|
|
|
|
}
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
static void
|
2007-02-16 04:40:17 +01:00
|
|
|
|
write_relocs (bfd *abfd, asection *sec, void *xxx ATTRIBUTE_UNUSED)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
segment_info_type *seginfo = seg_info (sec);
|
|
|
|
|
unsigned int n;
|
2007-03-26 14:23:48 +02:00
|
|
|
|
struct reloc_list *my_reloc_list, **rp, *r;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
arelent **relocs;
|
|
|
|
|
fixS *fixp;
|
2011-08-18 16:10:35 +02:00
|
|
|
|
fragS *last_frag;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
/* If seginfo is NULL, we did not create this section; don't do
|
|
|
|
|
anything with it. */
|
|
|
|
|
if (seginfo == NULL)
|
|
|
|
|
return;
|
|
|
|
|
|
|
|
|
|
n = 0;
|
|
|
|
|
for (fixp = seginfo->fix_root; fixp; fixp = fixp->fx_next)
|
2007-02-22 06:54:51 +01:00
|
|
|
|
if (!fixp->fx_done)
|
|
|
|
|
n++;
|
|
|
|
|
|
|
|
|
|
#ifdef RELOC_EXPANSION_POSSIBLE
|
|
|
|
|
n *= MAX_RELOC_EXPANSION;
|
|
|
|
|
#endif
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2007-03-26 14:23:48 +02:00
|
|
|
|
/* Extract relocs for this section from reloc_list. */
|
|
|
|
|
rp = &reloc_list;
|
|
|
|
|
my_reloc_list = NULL;
|
|
|
|
|
while ((r = *rp) != NULL)
|
|
|
|
|
{
|
|
|
|
|
if (r->u.b.sec == sec)
|
|
|
|
|
{
|
|
|
|
|
*rp = r->next;
|
|
|
|
|
r->next = my_reloc_list;
|
|
|
|
|
my_reloc_list = r;
|
|
|
|
|
n++;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
rp = &r->next;
|
|
|
|
|
}
|
|
|
|
|
|
2016-04-06 22:26:46 +02:00
|
|
|
|
relocs = XCNEWVEC (arelent *, n);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2011-08-18 16:10:35 +02:00
|
|
|
|
n = 0;
|
|
|
|
|
r = my_reloc_list;
|
|
|
|
|
last_frag = NULL;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
for (fixp = seginfo->fix_root; fixp != (fixS *) NULL; fixp = fixp->fx_next)
|
|
|
|
|
{
|
2007-02-18 00:13:49 +01:00
|
|
|
|
int fx_size, slack;
|
|
|
|
|
offsetT loc;
|
2011-08-18 16:10:35 +02:00
|
|
|
|
arelent **reloc;
|
|
|
|
|
#ifndef RELOC_EXPANSION_POSSIBLE
|
|
|
|
|
arelent *rel;
|
|
|
|
|
|
|
|
|
|
reloc = &rel;
|
|
|
|
|
#endif
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
if (fixp->fx_done)
|
2007-02-22 06:54:51 +01:00
|
|
|
|
continue;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2007-02-18 00:13:49 +01:00
|
|
|
|
fx_size = fixp->fx_size;
|
|
|
|
|
slack = TC_FX_SIZE_SLACK (fixp);
|
|
|
|
|
if (slack > 0)
|
|
|
|
|
fx_size = fx_size > slack ? fx_size - slack : 0;
|
|
|
|
|
loc = fixp->fx_where + fx_size;
|
2007-02-22 06:54:51 +01:00
|
|
|
|
if (slack >= 0 && loc > fixp->fx_frag->fr_fix)
|
2007-02-18 00:13:49 +01:00
|
|
|
|
as_bad_where (fixp->fx_file, fixp->fx_line,
|
|
|
|
|
_("internal error: fixup not contained within frag"));
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2007-02-22 06:54:51 +01:00
|
|
|
|
#ifndef RELOC_EXPANSION_POSSIBLE
|
2011-08-18 16:10:35 +02:00
|
|
|
|
*reloc = tc_gen_reloc (sec, fixp);
|
2007-02-22 06:54:51 +01:00
|
|
|
|
#else
|
2011-08-18 16:10:35 +02:00
|
|
|
|
reloc = tc_gen_reloc (sec, fixp);
|
|
|
|
|
#endif
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2011-08-18 16:10:35 +02:00
|
|
|
|
while (*reloc)
|
|
|
|
|
{
|
|
|
|
|
while (r != NULL && r->u.b.r.address < (*reloc)->address)
|
|
|
|
|
{
|
|
|
|
|
fragS *f = get_frag_for_reloc (last_frag, seginfo, r);
|
|
|
|
|
if (f != NULL)
|
|
|
|
|
{
|
|
|
|
|
last_frag = f;
|
|
|
|
|
relocs[n++] = &r->u.b.r;
|
|
|
|
|
install_reloc (sec, &r->u.b.r, f, r->file, r->line);
|
|
|
|
|
}
|
|
|
|
|
r = r->next;
|
|
|
|
|
}
|
|
|
|
|
relocs[n++] = *reloc;
|
|
|
|
|
install_reloc (sec, *reloc, fixp->fx_frag,
|
|
|
|
|
fixp->fx_file, fixp->fx_line);
|
|
|
|
|
#ifndef RELOC_EXPANSION_POSSIBLE
|
|
|
|
|
break;
|
|
|
|
|
#else
|
|
|
|
|
reloc++;
|
2007-02-22 06:54:51 +01:00
|
|
|
|
#endif
|
2011-08-18 16:10:35 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
2007-02-18 00:13:49 +01:00
|
|
|
|
|
2011-08-18 16:10:35 +02:00
|
|
|
|
while (r != NULL)
|
|
|
|
|
{
|
|
|
|
|
fragS *f = get_frag_for_reloc (last_frag, seginfo, r);
|
|
|
|
|
if (f != NULL)
|
|
|
|
|
{
|
|
|
|
|
last_frag = f;
|
|
|
|
|
relocs[n++] = &r->u.b.r;
|
|
|
|
|
install_reloc (sec, &r->u.b.r, f, r->file, r->line);
|
|
|
|
|
}
|
|
|
|
|
r = r->next;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#ifdef DEBUG4
|
|
|
|
|
{
|
2011-08-01 11:05:40 +02:00
|
|
|
|
unsigned int k, j, nsyms;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
asymbol **sympp;
|
|
|
|
|
sympp = bfd_get_outsymbols (stdoutput);
|
|
|
|
|
nsyms = bfd_get_symcount (stdoutput);
|
2011-08-01 11:05:40 +02:00
|
|
|
|
for (k = 0; k < n; k++)
|
|
|
|
|
if (((*relocs[k]->sym_ptr_ptr)->flags & BSF_SECTION_SYM) == 0)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
for (j = 0; j < nsyms; j++)
|
2011-08-01 11:05:40 +02:00
|
|
|
|
if (sympp[j] == *relocs[k]->sym_ptr_ptr)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
break;
|
|
|
|
|
if (j == nsyms)
|
|
|
|
|
abort ();
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
if (n)
|
2007-02-22 06:54:51 +01:00
|
|
|
|
{
|
|
|
|
|
flagword flags = bfd_get_section_flags (abfd, sec);
|
|
|
|
|
flags |= SEC_RELOC;
|
|
|
|
|
bfd_set_section_flags (abfd, sec, flags);
|
|
|
|
|
bfd_set_reloc (stdoutput, sec, relocs, n);
|
|
|
|
|
}
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
1999-09-12 05:44:42 +02:00
|
|
|
|
#ifdef SET_SECTION_RELOCS
|
|
|
|
|
SET_SECTION_RELOCS (sec, relocs, n);
|
|
|
|
|
#endif
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#ifdef DEBUG3
|
|
|
|
|
{
|
2011-08-01 11:05:40 +02:00
|
|
|
|
unsigned int k;
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
fprintf (stderr, "relocs for sec %s\n", sec->name);
|
2011-08-01 11:05:40 +02:00
|
|
|
|
for (k = 0; k < n; k++)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2011-08-01 11:05:40 +02:00
|
|
|
|
arelent *rel = relocs[k];
|
|
|
|
|
asymbol *s = *rel->sym_ptr_ptr;
|
2005-05-31 20:36:28 +02:00
|
|
|
|
fprintf (stderr, " reloc %2d @%p off %4lx : sym %-10s addend %lx\n",
|
2011-08-01 11:05:40 +02:00
|
|
|
|
k, rel, (unsigned long)rel->address, s->name,
|
|
|
|
|
(unsigned long)rel->addend);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
|
2010-07-03 22:52:24 +02:00
|
|
|
|
static int
|
|
|
|
|
compress_frag (struct z_stream_s *strm, const char *contents, int in_size,
|
|
|
|
|
fragS **last_newf, struct obstack *ob)
|
|
|
|
|
{
|
|
|
|
|
int out_size;
|
|
|
|
|
int total_out_size = 0;
|
|
|
|
|
fragS *f = *last_newf;
|
|
|
|
|
char *next_out;
|
|
|
|
|
int avail_out;
|
|
|
|
|
|
|
|
|
|
/* Call the compression routine repeatedly until it has finished
|
|
|
|
|
processing the frag. */
|
|
|
|
|
while (in_size > 0)
|
|
|
|
|
{
|
|
|
|
|
/* Reserve all the space available in the current chunk.
|
|
|
|
|
If none is available, start a new frag. */
|
|
|
|
|
avail_out = obstack_room (ob);
|
|
|
|
|
if (avail_out <= 0)
|
|
|
|
|
{
|
|
|
|
|
obstack_finish (ob);
|
|
|
|
|
f = frag_alloc (ob);
|
|
|
|
|
f->fr_type = rs_fill;
|
|
|
|
|
(*last_newf)->fr_next = f;
|
|
|
|
|
*last_newf = f;
|
|
|
|
|
avail_out = obstack_room (ob);
|
|
|
|
|
}
|
|
|
|
|
if (avail_out <= 0)
|
|
|
|
|
as_fatal (_("can't extend frag"));
|
|
|
|
|
next_out = obstack_next_free (ob);
|
|
|
|
|
obstack_blank_fast (ob, avail_out);
|
|
|
|
|
out_size = compress_data (strm, &contents, &in_size,
|
|
|
|
|
&next_out, &avail_out);
|
|
|
|
|
if (out_size < 0)
|
|
|
|
|
return -1;
|
|
|
|
|
|
|
|
|
|
f->fr_fix += out_size;
|
|
|
|
|
total_out_size += out_size;
|
|
|
|
|
|
|
|
|
|
/* Return unused space. */
|
|
|
|
|
if (avail_out > 0)
|
|
|
|
|
obstack_blank_fast (ob, -avail_out);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
return total_out_size;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
compress_debug (bfd *abfd, asection *sec, void *xxx ATTRIBUTE_UNUSED)
|
|
|
|
|
{
|
|
|
|
|
segment_info_type *seginfo = seg_info (sec);
|
|
|
|
|
fragS *f;
|
|
|
|
|
fragS *first_newf;
|
|
|
|
|
fragS *last_newf;
|
|
|
|
|
struct obstack *ob = &seginfo->frchainP->frch_obstack;
|
|
|
|
|
bfd_size_type uncompressed_size = (bfd_size_type) sec->size;
|
|
|
|
|
bfd_size_type compressed_size;
|
|
|
|
|
const char *section_name;
|
|
|
|
|
char *compressed_name;
|
|
|
|
|
char *header;
|
|
|
|
|
struct z_stream_s *strm;
|
|
|
|
|
int x;
|
2010-10-29 14:10:39 +02:00
|
|
|
|
flagword flags = bfd_get_section_flags (abfd, sec);
|
2015-04-08 16:53:54 +02:00
|
|
|
|
unsigned int header_size, compression_header_size;
|
2010-07-03 22:52:24 +02:00
|
|
|
|
|
|
|
|
|
if (seginfo == NULL
|
2011-01-19 01:24:23 +01:00
|
|
|
|
|| sec->size < 32
|
2010-10-29 14:10:39 +02:00
|
|
|
|
|| (flags & (SEC_ALLOC | SEC_HAS_CONTENTS)) == SEC_ALLOC)
|
2010-07-03 22:52:24 +02:00
|
|
|
|
return;
|
|
|
|
|
|
|
|
|
|
section_name = bfd_get_section_name (stdoutput, sec);
|
|
|
|
|
if (strncmp (section_name, ".debug_", 7) != 0)
|
|
|
|
|
return;
|
|
|
|
|
|
|
|
|
|
strm = compress_init ();
|
|
|
|
|
if (strm == NULL)
|
|
|
|
|
return;
|
|
|
|
|
|
2015-04-08 16:53:54 +02:00
|
|
|
|
if (flag_compress_debug == COMPRESS_DEBUG_GABI_ZLIB)
|
2015-05-15 00:58:51 +02:00
|
|
|
|
{
|
|
|
|
|
compression_header_size
|
|
|
|
|
= bfd_get_compression_header_size (stdoutput, NULL);
|
|
|
|
|
header_size = compression_header_size;
|
|
|
|
|
}
|
2015-04-08 16:53:54 +02:00
|
|
|
|
else
|
2015-05-15 00:58:51 +02:00
|
|
|
|
{
|
|
|
|
|
compression_header_size = 0;
|
|
|
|
|
header_size = 12;
|
|
|
|
|
}
|
2015-04-08 16:53:54 +02:00
|
|
|
|
|
2015-05-15 00:58:51 +02:00
|
|
|
|
/* Create a new frag to contain the compression header. */
|
2010-07-03 22:52:24 +02:00
|
|
|
|
first_newf = frag_alloc (ob);
|
2015-04-08 16:53:54 +02:00
|
|
|
|
if (obstack_room (ob) < header_size)
|
2010-07-03 22:52:24 +02:00
|
|
|
|
first_newf = frag_alloc (ob);
|
2015-04-08 16:53:54 +02:00
|
|
|
|
if (obstack_room (ob) < header_size)
|
2017-11-06 10:14:02 +01:00
|
|
|
|
as_fatal (ngettext ("can't extend frag %lu char",
|
|
|
|
|
"can't extend frag %lu chars",
|
|
|
|
|
(unsigned long) header_size),
|
|
|
|
|
(unsigned long) header_size);
|
2010-07-03 22:52:24 +02:00
|
|
|
|
last_newf = first_newf;
|
2015-04-08 16:53:54 +02:00
|
|
|
|
obstack_blank_fast (ob, header_size);
|
2010-07-03 22:52:24 +02:00
|
|
|
|
last_newf->fr_type = rs_fill;
|
2015-04-08 16:53:54 +02:00
|
|
|
|
last_newf->fr_fix = header_size;
|
2010-07-03 22:52:24 +02:00
|
|
|
|
header = last_newf->fr_literal;
|
2015-04-08 16:53:54 +02:00
|
|
|
|
compressed_size = header_size;
|
2010-07-03 22:52:24 +02:00
|
|
|
|
|
|
|
|
|
/* Stream the frags through the compression engine, adding new frags
|
2016-11-25 21:01:41 +01:00
|
|
|
|
as necessary to accommodate the compressed output. */
|
2010-07-03 22:52:24 +02:00
|
|
|
|
for (f = seginfo->frchainP->frch_root;
|
|
|
|
|
f;
|
|
|
|
|
f = f->fr_next)
|
|
|
|
|
{
|
|
|
|
|
offsetT fill_size;
|
|
|
|
|
char *fill_literal;
|
|
|
|
|
offsetT count;
|
|
|
|
|
int out_size;
|
|
|
|
|
|
|
|
|
|
gas_assert (f->fr_type == rs_fill);
|
|
|
|
|
if (f->fr_fix)
|
|
|
|
|
{
|
|
|
|
|
out_size = compress_frag (strm, f->fr_literal, f->fr_fix,
|
|
|
|
|
&last_newf, ob);
|
|
|
|
|
if (out_size < 0)
|
|
|
|
|
return;
|
|
|
|
|
compressed_size += out_size;
|
|
|
|
|
}
|
|
|
|
|
fill_literal = f->fr_literal + f->fr_fix;
|
|
|
|
|
fill_size = f->fr_var;
|
|
|
|
|
count = f->fr_offset;
|
|
|
|
|
gas_assert (count >= 0);
|
|
|
|
|
if (fill_size && count)
|
|
|
|
|
{
|
|
|
|
|
while (count--)
|
|
|
|
|
{
|
|
|
|
|
out_size = compress_frag (strm, fill_literal, (int) fill_size,
|
|
|
|
|
&last_newf, ob);
|
|
|
|
|
if (out_size < 0)
|
|
|
|
|
return;
|
|
|
|
|
compressed_size += out_size;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Flush the compression state. */
|
|
|
|
|
for (;;)
|
|
|
|
|
{
|
|
|
|
|
int avail_out;
|
|
|
|
|
char *next_out;
|
|
|
|
|
int out_size;
|
|
|
|
|
|
|
|
|
|
/* Reserve all the space available in the current chunk.
|
|
|
|
|
If none is available, start a new frag. */
|
|
|
|
|
avail_out = obstack_room (ob);
|
|
|
|
|
if (avail_out <= 0)
|
|
|
|
|
{
|
|
|
|
|
fragS *newf;
|
|
|
|
|
|
|
|
|
|
obstack_finish (ob);
|
|
|
|
|
newf = frag_alloc (ob);
|
|
|
|
|
newf->fr_type = rs_fill;
|
|
|
|
|
last_newf->fr_next = newf;
|
|
|
|
|
last_newf = newf;
|
|
|
|
|
avail_out = obstack_room (ob);
|
|
|
|
|
}
|
|
|
|
|
if (avail_out <= 0)
|
|
|
|
|
as_fatal (_("can't extend frag"));
|
|
|
|
|
next_out = obstack_next_free (ob);
|
|
|
|
|
obstack_blank_fast (ob, avail_out);
|
|
|
|
|
x = compress_finish (strm, &next_out, &avail_out, &out_size);
|
|
|
|
|
if (x < 0)
|
|
|
|
|
return;
|
|
|
|
|
|
|
|
|
|
last_newf->fr_fix += out_size;
|
|
|
|
|
compressed_size += out_size;
|
|
|
|
|
|
|
|
|
|
/* Return unused space. */
|
|
|
|
|
if (avail_out > 0)
|
|
|
|
|
obstack_blank_fast (ob, -avail_out);
|
|
|
|
|
|
|
|
|
|
if (x == 0)
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
2015-03-25 03:06:22 +01:00
|
|
|
|
/* PR binutils/18087: If compression didn't make the section smaller,
|
|
|
|
|
just keep it uncompressed. */
|
2015-04-05 17:11:11 +02:00
|
|
|
|
if (compressed_size >= uncompressed_size)
|
2015-03-18 16:47:13 +01:00
|
|
|
|
return;
|
2015-03-18 17:20:38 +01:00
|
|
|
|
|
2010-07-03 22:52:24 +02:00
|
|
|
|
/* Replace the uncompressed frag list with the compressed frag list. */
|
|
|
|
|
seginfo->frchainP->frch_root = first_newf;
|
|
|
|
|
seginfo->frchainP->frch_last = last_newf;
|
|
|
|
|
|
|
|
|
|
/* Update the section size and its name. */
|
2015-04-08 16:53:54 +02:00
|
|
|
|
bfd_update_compression_header (abfd, (bfd_byte *) header, sec);
|
2010-07-03 22:52:24 +02:00
|
|
|
|
x = bfd_set_section_size (abfd, sec, compressed_size);
|
|
|
|
|
gas_assert (x);
|
2015-04-08 16:53:54 +02:00
|
|
|
|
if (!compression_header_size)
|
|
|
|
|
{
|
2016-03-28 11:49:15 +02:00
|
|
|
|
compressed_name = concat (".z", section_name + 1, (char *) NULL);
|
2015-04-08 16:53:54 +02:00
|
|
|
|
bfd_section_name (stdoutput, sec) = compressed_name;
|
|
|
|
|
}
|
2010-07-03 22:52:24 +02:00
|
|
|
|
}
|
|
|
|
|
|
Add .nop assembler directive
Implement the '.nop SIZE[, CONTROL]' assembler directive, which emits
SIZE bytes filled with no-op instructions. SIZE is absolute expression.
The optional CONTROL byte controls how no-op instructions should be
generated. If the comma and @var{control} are omitted, CONTROL is
assumed to be zero.
For Intel 80386 and AMD x86-64 targets, CONTROL byte specifies the size
limit of a single no-op instruction. The valid values of CONTROL byte
are between 0 and 8 for 16-bit mode, between 0 and 10 for 32-bit mode,
between 0 and 11 for 64-bit mode. When 0 is used, the no-op size limit
is set to the maximum supported size.
2 new relax states, rs_space_nop and rs_fill_nop, are added to enum
_relax_state, which are similar to rs_space and rs_fill, respectively,
but they fill with no-op instructions, instead of a single byte. A
target backend must override the default md_generate_nops to generate
proper no-op instructions. Otherwise, an error of unimplemented .nop
directive will be issued whenever .nop directive is used.
* NEWS: Mention .nop directive.
* as.h (_relax_state): Add rs_space_nop and rs_fill_nop.
* read.c (potable): Add .nop.
(s_nop): New function.
* read.h (s_nop): New prototype.
* write.c (cvt_frag_to_fill): Handle rs_space_nop and
rs_fill_nop.
(md_generate_nops): New function.
(relax_segment): Likewise.
(write_contents): Use md_generate_nops for rs_fill_nop.
* config/tc-i386.c (alt64_11): New.
(alt64_patt): Likewise.
(md_convert_frag): Handle rs_space_nop.
(i386_output_nops): New function.
(i386_generate_nops): Likewise.
(i386_align_code): Call i386_output_nops.
* config/tc-i386.h (i386_generate_nops): New.
(md_generate_nops): Likewise.
* doc/as.texinfo: Document .nop directive.
* testsuite/gas/i386/i386.exp: Run .nop directive tests.
* testsuite/gas/i386/nop-1.d: New file.
* testsuite/gas/i386/nop-1.s: Likewise.
* testsuite/gas/i386/nop-2.d: Likewise.
* testsuite/gas/i386/nop-2.s: Likewise.
* testsuite/gas/i386/nop-3.d: Likewise.
* testsuite/gas/i386/nop-3.s: Likewise.
* testsuite/gas/i386/nop-4.d: Likewise.
* testsuite/gas/i386/nop-4.s: Likewise.
* testsuite/gas/i386/nop-5.d: Likewise.
* testsuite/gas/i386/nop-5.s: Likewise.
* testsuite/gas/i386/nop-6.d: Likewise.
* testsuite/gas/i386/nop-6.s: Likewise.
* testsuite/gas/i386/nop-bad-1.l: Likewise.
* testsuite/gas/i386/nop-bad-1.s: Likewise.
* testsuite/gas/i386/x86-64-nop-1.d: Likewise.
* testsuite/gas/i386/x86-64-nop-2.d: Likewise.
* testsuite/gas/i386/x86-64-nop-3.d: Likewise.
* testsuite/gas/i386/x86-64-nop-4.d: Likewise.
* testsuite/gas/i386/x86-64-nop-5.d: Likewise.
* testsuite/gas/i386/x86-64-nop-6.d: Likewise.
2018-02-17 14:20:42 +01:00
|
|
|
|
#ifndef md_generate_nops
|
|
|
|
|
/* Genenerate COUNT bytes of no-op instructions to WHERE. A target
|
|
|
|
|
backend must override this with proper no-op instructions. */
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
md_generate_nops (fragS *f ATTRIBUTE_UNUSED,
|
|
|
|
|
char *where ATTRIBUTE_UNUSED,
|
|
|
|
|
offsetT count ATTRIBUTE_UNUSED,
|
|
|
|
|
int control ATTRIBUTE_UNUSED)
|
|
|
|
|
{
|
2018-02-27 23:45:48 +01:00
|
|
|
|
as_bad (_("unimplemented .nops directive"));
|
Add .nop assembler directive
Implement the '.nop SIZE[, CONTROL]' assembler directive, which emits
SIZE bytes filled with no-op instructions. SIZE is absolute expression.
The optional CONTROL byte controls how no-op instructions should be
generated. If the comma and @var{control} are omitted, CONTROL is
assumed to be zero.
For Intel 80386 and AMD x86-64 targets, CONTROL byte specifies the size
limit of a single no-op instruction. The valid values of CONTROL byte
are between 0 and 8 for 16-bit mode, between 0 and 10 for 32-bit mode,
between 0 and 11 for 64-bit mode. When 0 is used, the no-op size limit
is set to the maximum supported size.
2 new relax states, rs_space_nop and rs_fill_nop, are added to enum
_relax_state, which are similar to rs_space and rs_fill, respectively,
but they fill with no-op instructions, instead of a single byte. A
target backend must override the default md_generate_nops to generate
proper no-op instructions. Otherwise, an error of unimplemented .nop
directive will be issued whenever .nop directive is used.
* NEWS: Mention .nop directive.
* as.h (_relax_state): Add rs_space_nop and rs_fill_nop.
* read.c (potable): Add .nop.
(s_nop): New function.
* read.h (s_nop): New prototype.
* write.c (cvt_frag_to_fill): Handle rs_space_nop and
rs_fill_nop.
(md_generate_nops): New function.
(relax_segment): Likewise.
(write_contents): Use md_generate_nops for rs_fill_nop.
* config/tc-i386.c (alt64_11): New.
(alt64_patt): Likewise.
(md_convert_frag): Handle rs_space_nop.
(i386_output_nops): New function.
(i386_generate_nops): Likewise.
(i386_align_code): Call i386_output_nops.
* config/tc-i386.h (i386_generate_nops): New.
(md_generate_nops): Likewise.
* doc/as.texinfo: Document .nop directive.
* testsuite/gas/i386/i386.exp: Run .nop directive tests.
* testsuite/gas/i386/nop-1.d: New file.
* testsuite/gas/i386/nop-1.s: Likewise.
* testsuite/gas/i386/nop-2.d: Likewise.
* testsuite/gas/i386/nop-2.s: Likewise.
* testsuite/gas/i386/nop-3.d: Likewise.
* testsuite/gas/i386/nop-3.s: Likewise.
* testsuite/gas/i386/nop-4.d: Likewise.
* testsuite/gas/i386/nop-4.s: Likewise.
* testsuite/gas/i386/nop-5.d: Likewise.
* testsuite/gas/i386/nop-5.s: Likewise.
* testsuite/gas/i386/nop-6.d: Likewise.
* testsuite/gas/i386/nop-6.s: Likewise.
* testsuite/gas/i386/nop-bad-1.l: Likewise.
* testsuite/gas/i386/nop-bad-1.s: Likewise.
* testsuite/gas/i386/x86-64-nop-1.d: Likewise.
* testsuite/gas/i386/x86-64-nop-2.d: Likewise.
* testsuite/gas/i386/x86-64-nop-3.d: Likewise.
* testsuite/gas/i386/x86-64-nop-4.d: Likewise.
* testsuite/gas/i386/x86-64-nop-5.d: Likewise.
* testsuite/gas/i386/x86-64-nop-6.d: Likewise.
2018-02-17 14:20:42 +01:00
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
static void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
write_contents (bfd *abfd ATTRIBUTE_UNUSED,
|
|
|
|
|
asection *sec,
|
2007-02-16 04:40:17 +01:00
|
|
|
|
void *xxx ATTRIBUTE_UNUSED)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
segment_info_type *seginfo = seg_info (sec);
|
2003-06-24 13:10:47 +02:00
|
|
|
|
addressT offset = 0;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
fragS *f;
|
|
|
|
|
|
|
|
|
|
/* Write out the frags. */
|
|
|
|
|
if (seginfo == NULL
|
2000-07-20 22:07:09 +02:00
|
|
|
|
|| !(bfd_get_section_flags (abfd, sec) & SEC_HAS_CONTENTS))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
return;
|
|
|
|
|
|
|
|
|
|
for (f = seginfo->frchainP->frch_root;
|
|
|
|
|
f;
|
|
|
|
|
f = f->fr_next)
|
|
|
|
|
{
|
|
|
|
|
int x;
|
2003-06-24 13:10:47 +02:00
|
|
|
|
addressT fill_size;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
char *fill_literal;
|
2003-06-24 13:10:47 +02:00
|
|
|
|
offsetT count;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
Add .nop assembler directive
Implement the '.nop SIZE[, CONTROL]' assembler directive, which emits
SIZE bytes filled with no-op instructions. SIZE is absolute expression.
The optional CONTROL byte controls how no-op instructions should be
generated. If the comma and @var{control} are omitted, CONTROL is
assumed to be zero.
For Intel 80386 and AMD x86-64 targets, CONTROL byte specifies the size
limit of a single no-op instruction. The valid values of CONTROL byte
are between 0 and 8 for 16-bit mode, between 0 and 10 for 32-bit mode,
between 0 and 11 for 64-bit mode. When 0 is used, the no-op size limit
is set to the maximum supported size.
2 new relax states, rs_space_nop and rs_fill_nop, are added to enum
_relax_state, which are similar to rs_space and rs_fill, respectively,
but they fill with no-op instructions, instead of a single byte. A
target backend must override the default md_generate_nops to generate
proper no-op instructions. Otherwise, an error of unimplemented .nop
directive will be issued whenever .nop directive is used.
* NEWS: Mention .nop directive.
* as.h (_relax_state): Add rs_space_nop and rs_fill_nop.
* read.c (potable): Add .nop.
(s_nop): New function.
* read.h (s_nop): New prototype.
* write.c (cvt_frag_to_fill): Handle rs_space_nop and
rs_fill_nop.
(md_generate_nops): New function.
(relax_segment): Likewise.
(write_contents): Use md_generate_nops for rs_fill_nop.
* config/tc-i386.c (alt64_11): New.
(alt64_patt): Likewise.
(md_convert_frag): Handle rs_space_nop.
(i386_output_nops): New function.
(i386_generate_nops): Likewise.
(i386_align_code): Call i386_output_nops.
* config/tc-i386.h (i386_generate_nops): New.
(md_generate_nops): Likewise.
* doc/as.texinfo: Document .nop directive.
* testsuite/gas/i386/i386.exp: Run .nop directive tests.
* testsuite/gas/i386/nop-1.d: New file.
* testsuite/gas/i386/nop-1.s: Likewise.
* testsuite/gas/i386/nop-2.d: Likewise.
* testsuite/gas/i386/nop-2.s: Likewise.
* testsuite/gas/i386/nop-3.d: Likewise.
* testsuite/gas/i386/nop-3.s: Likewise.
* testsuite/gas/i386/nop-4.d: Likewise.
* testsuite/gas/i386/nop-4.s: Likewise.
* testsuite/gas/i386/nop-5.d: Likewise.
* testsuite/gas/i386/nop-5.s: Likewise.
* testsuite/gas/i386/nop-6.d: Likewise.
* testsuite/gas/i386/nop-6.s: Likewise.
* testsuite/gas/i386/nop-bad-1.l: Likewise.
* testsuite/gas/i386/nop-bad-1.s: Likewise.
* testsuite/gas/i386/x86-64-nop-1.d: Likewise.
* testsuite/gas/i386/x86-64-nop-2.d: Likewise.
* testsuite/gas/i386/x86-64-nop-3.d: Likewise.
* testsuite/gas/i386/x86-64-nop-4.d: Likewise.
* testsuite/gas/i386/x86-64-nop-5.d: Likewise.
* testsuite/gas/i386/x86-64-nop-6.d: Likewise.
2018-02-17 14:20:42 +01:00
|
|
|
|
gas_assert (f->fr_type == rs_fill || f->fr_type == rs_fill_nop);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
if (f->fr_fix)
|
|
|
|
|
{
|
|
|
|
|
x = bfd_set_section_contents (stdoutput, sec,
|
|
|
|
|
f->fr_literal, (file_ptr) offset,
|
|
|
|
|
(bfd_size_type) f->fr_fix);
|
2002-11-30 09:39:46 +01:00
|
|
|
|
if (!x)
|
2017-11-06 10:14:02 +01:00
|
|
|
|
as_fatal (ngettext ("can't write %ld byte "
|
|
|
|
|
"to section %s of %s: '%s'",
|
|
|
|
|
"can't write %ld bytes "
|
|
|
|
|
"to section %s of %s: '%s'",
|
|
|
|
|
(long) f->fr_fix),
|
|
|
|
|
(long) f->fr_fix,
|
|
|
|
|
sec->name, stdoutput->filename,
|
2006-09-22 13:35:14 +02:00
|
|
|
|
bfd_errmsg (bfd_get_error ()));
|
1999-05-03 09:29:11 +02:00
|
|
|
|
offset += f->fr_fix;
|
|
|
|
|
}
|
Add .nop assembler directive
Implement the '.nop SIZE[, CONTROL]' assembler directive, which emits
SIZE bytes filled with no-op instructions. SIZE is absolute expression.
The optional CONTROL byte controls how no-op instructions should be
generated. If the comma and @var{control} are omitted, CONTROL is
assumed to be zero.
For Intel 80386 and AMD x86-64 targets, CONTROL byte specifies the size
limit of a single no-op instruction. The valid values of CONTROL byte
are between 0 and 8 for 16-bit mode, between 0 and 10 for 32-bit mode,
between 0 and 11 for 64-bit mode. When 0 is used, the no-op size limit
is set to the maximum supported size.
2 new relax states, rs_space_nop and rs_fill_nop, are added to enum
_relax_state, which are similar to rs_space and rs_fill, respectively,
but they fill with no-op instructions, instead of a single byte. A
target backend must override the default md_generate_nops to generate
proper no-op instructions. Otherwise, an error of unimplemented .nop
directive will be issued whenever .nop directive is used.
* NEWS: Mention .nop directive.
* as.h (_relax_state): Add rs_space_nop and rs_fill_nop.
* read.c (potable): Add .nop.
(s_nop): New function.
* read.h (s_nop): New prototype.
* write.c (cvt_frag_to_fill): Handle rs_space_nop and
rs_fill_nop.
(md_generate_nops): New function.
(relax_segment): Likewise.
(write_contents): Use md_generate_nops for rs_fill_nop.
* config/tc-i386.c (alt64_11): New.
(alt64_patt): Likewise.
(md_convert_frag): Handle rs_space_nop.
(i386_output_nops): New function.
(i386_generate_nops): Likewise.
(i386_align_code): Call i386_output_nops.
* config/tc-i386.h (i386_generate_nops): New.
(md_generate_nops): Likewise.
* doc/as.texinfo: Document .nop directive.
* testsuite/gas/i386/i386.exp: Run .nop directive tests.
* testsuite/gas/i386/nop-1.d: New file.
* testsuite/gas/i386/nop-1.s: Likewise.
* testsuite/gas/i386/nop-2.d: Likewise.
* testsuite/gas/i386/nop-2.s: Likewise.
* testsuite/gas/i386/nop-3.d: Likewise.
* testsuite/gas/i386/nop-3.s: Likewise.
* testsuite/gas/i386/nop-4.d: Likewise.
* testsuite/gas/i386/nop-4.s: Likewise.
* testsuite/gas/i386/nop-5.d: Likewise.
* testsuite/gas/i386/nop-5.s: Likewise.
* testsuite/gas/i386/nop-6.d: Likewise.
* testsuite/gas/i386/nop-6.s: Likewise.
* testsuite/gas/i386/nop-bad-1.l: Likewise.
* testsuite/gas/i386/nop-bad-1.s: Likewise.
* testsuite/gas/i386/x86-64-nop-1.d: Likewise.
* testsuite/gas/i386/x86-64-nop-2.d: Likewise.
* testsuite/gas/i386/x86-64-nop-3.d: Likewise.
* testsuite/gas/i386/x86-64-nop-4.d: Likewise.
* testsuite/gas/i386/x86-64-nop-5.d: Likewise.
* testsuite/gas/i386/x86-64-nop-6.d: Likewise.
2018-02-17 14:20:42 +01:00
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
fill_size = f->fr_var;
|
|
|
|
|
count = f->fr_offset;
|
Add .nop assembler directive
Implement the '.nop SIZE[, CONTROL]' assembler directive, which emits
SIZE bytes filled with no-op instructions. SIZE is absolute expression.
The optional CONTROL byte controls how no-op instructions should be
generated. If the comma and @var{control} are omitted, CONTROL is
assumed to be zero.
For Intel 80386 and AMD x86-64 targets, CONTROL byte specifies the size
limit of a single no-op instruction. The valid values of CONTROL byte
are between 0 and 8 for 16-bit mode, between 0 and 10 for 32-bit mode,
between 0 and 11 for 64-bit mode. When 0 is used, the no-op size limit
is set to the maximum supported size.
2 new relax states, rs_space_nop and rs_fill_nop, are added to enum
_relax_state, which are similar to rs_space and rs_fill, respectively,
but they fill with no-op instructions, instead of a single byte. A
target backend must override the default md_generate_nops to generate
proper no-op instructions. Otherwise, an error of unimplemented .nop
directive will be issued whenever .nop directive is used.
* NEWS: Mention .nop directive.
* as.h (_relax_state): Add rs_space_nop and rs_fill_nop.
* read.c (potable): Add .nop.
(s_nop): New function.
* read.h (s_nop): New prototype.
* write.c (cvt_frag_to_fill): Handle rs_space_nop and
rs_fill_nop.
(md_generate_nops): New function.
(relax_segment): Likewise.
(write_contents): Use md_generate_nops for rs_fill_nop.
* config/tc-i386.c (alt64_11): New.
(alt64_patt): Likewise.
(md_convert_frag): Handle rs_space_nop.
(i386_output_nops): New function.
(i386_generate_nops): Likewise.
(i386_align_code): Call i386_output_nops.
* config/tc-i386.h (i386_generate_nops): New.
(md_generate_nops): Likewise.
* doc/as.texinfo: Document .nop directive.
* testsuite/gas/i386/i386.exp: Run .nop directive tests.
* testsuite/gas/i386/nop-1.d: New file.
* testsuite/gas/i386/nop-1.s: Likewise.
* testsuite/gas/i386/nop-2.d: Likewise.
* testsuite/gas/i386/nop-2.s: Likewise.
* testsuite/gas/i386/nop-3.d: Likewise.
* testsuite/gas/i386/nop-3.s: Likewise.
* testsuite/gas/i386/nop-4.d: Likewise.
* testsuite/gas/i386/nop-4.s: Likewise.
* testsuite/gas/i386/nop-5.d: Likewise.
* testsuite/gas/i386/nop-5.s: Likewise.
* testsuite/gas/i386/nop-6.d: Likewise.
* testsuite/gas/i386/nop-6.s: Likewise.
* testsuite/gas/i386/nop-bad-1.l: Likewise.
* testsuite/gas/i386/nop-bad-1.s: Likewise.
* testsuite/gas/i386/x86-64-nop-1.d: Likewise.
* testsuite/gas/i386/x86-64-nop-2.d: Likewise.
* testsuite/gas/i386/x86-64-nop-3.d: Likewise.
* testsuite/gas/i386/x86-64-nop-4.d: Likewise.
* testsuite/gas/i386/x86-64-nop-5.d: Likewise.
* testsuite/gas/i386/x86-64-nop-6.d: Likewise.
2018-02-17 14:20:42 +01:00
|
|
|
|
fill_literal = f->fr_literal + f->fr_fix;
|
|
|
|
|
|
|
|
|
|
if (f->fr_type == rs_fill_nop)
|
|
|
|
|
{
|
|
|
|
|
gas_assert (count >= 0 && fill_size == 1);
|
|
|
|
|
if (count > 0)
|
|
|
|
|
{
|
|
|
|
|
char *buf = xmalloc (count);
|
|
|
|
|
md_generate_nops (f, buf, count, *fill_literal);
|
|
|
|
|
x = bfd_set_section_contents
|
|
|
|
|
(stdoutput, sec, buf, (file_ptr) offset,
|
|
|
|
|
(bfd_size_type) count);
|
|
|
|
|
if (!x)
|
|
|
|
|
as_fatal (ngettext ("can't fill %ld byte "
|
|
|
|
|
"in section %s of %s: '%s'",
|
|
|
|
|
"can't fill %ld bytes "
|
|
|
|
|
"in section %s of %s: '%s'",
|
|
|
|
|
(long) count), (long) count,
|
|
|
|
|
sec->name, stdoutput->filename,
|
|
|
|
|
bfd_errmsg (bfd_get_error ()));
|
|
|
|
|
offset += count;
|
|
|
|
|
free (buf);
|
|
|
|
|
}
|
|
|
|
|
continue;
|
|
|
|
|
}
|
|
|
|
|
|
* gas/app, gas/as.c, gas/as.h, gas/atof-generic.c, gas/cgen.c,
gas/config/atof-ieee.c, gas/config/obj-aout.c,
gas/config/obj-coff.c, gas/config/obj-ecoff.c,
gas/config/obj-elf.c, gas/config/obj-som.c, gas/config/tc-alpha.c,
gas/config/tc-arc.c, gas/config/tc-arm.c, gas/config/tc-cr16.c,
gas/config/tc-cris.c, gas/config/tc-crx.c, gas/config/tc-d30v.c,
gas/config/tc-dlx.c, gas/config/tc-hppa.c, gas/config/tc-i370.c,
gas/config/tc-i386-intel.c, gas/config/tc-i386.c,
gas/config/tc-i860.c, gas/config/tc-i960.c, gas/config/tc-ia64.c,
gas/config/tc-iq2000.c, gas/config/tc-m32c.c,
gas/config/tc-m32r.c, gas/config/tc-m68hc11.c,
gas/config/tc-m68k.c, gas/config/tc-maxq.c, gas/config/tc-mcore.c,
gas/config/tc-mep.c, gas/config/tc-mips.c, gas/config/tc-mmix.c,
gas/config/tc-mn10300.c, gas/config/tc-moxie.c,
gas/config/tc-ns32k.c, gas/config/tc-pj.c, gas/config/tc-ppc.c,
gas/config/tc-s390.c, gas/config/tc-score.c,
gas/config/tc-score7.c, gas/config/tc-sh.c, gas/config/tc-sparc.c,
gas/config/tc-spu.c, gas/config/tc-tic30.c, gas/config/tc-vax.c,
gas/config/tc-xtensa.c, gas/config/xtensa-relax.c,
gas/dw2gencfi.c, gas/dwarf2dbg.c, gas/ehopt.c, gas/expr.c,
gas/frags.c, gas/input-file.c, gas/read.c, gas/sb.c,
gas/subsegs.c, gas/symbols.c, gas/write.c: Change the name of the
gas macro `assert' to `gas_assert'.
2009-06-22 19:56:02 +02:00
|
|
|
|
gas_assert (count >= 0);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
if (fill_size && count)
|
|
|
|
|
{
|
|
|
|
|
char buf[256];
|
2000-07-20 22:07:09 +02:00
|
|
|
|
if (fill_size > sizeof (buf))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Do it the old way. Can this ever happen? */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
while (count--)
|
|
|
|
|
{
|
|
|
|
|
x = bfd_set_section_contents (stdoutput, sec,
|
|
|
|
|
fill_literal,
|
|
|
|
|
(file_ptr) offset,
|
|
|
|
|
(bfd_size_type) fill_size);
|
2002-11-30 09:39:46 +01:00
|
|
|
|
if (!x)
|
2017-11-06 10:14:02 +01:00
|
|
|
|
as_fatal (ngettext ("can't fill %ld byte "
|
|
|
|
|
"in section %s of %s: '%s'",
|
|
|
|
|
"can't fill %ld bytes "
|
|
|
|
|
"in section %s of %s: '%s'",
|
|
|
|
|
(long) fill_size),
|
|
|
|
|
(long) fill_size,
|
|
|
|
|
sec->name, stdoutput->filename,
|
2006-09-22 13:35:14 +02:00
|
|
|
|
bfd_errmsg (bfd_get_error ()));
|
1999-05-03 09:29:11 +02:00
|
|
|
|
offset += fill_size;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
/* Build a buffer full of fill objects and output it as
|
|
|
|
|
often as necessary. This saves on the overhead of
|
|
|
|
|
potentially lots of bfd_set_section_contents calls. */
|
|
|
|
|
int n_per_buf, i;
|
|
|
|
|
if (fill_size == 1)
|
|
|
|
|
{
|
|
|
|
|
n_per_buf = sizeof (buf);
|
|
|
|
|
memset (buf, *fill_literal, n_per_buf);
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
char *bufp;
|
2000-07-20 22:07:09 +02:00
|
|
|
|
n_per_buf = sizeof (buf) / fill_size;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
for (i = n_per_buf, bufp = buf; i; i--, bufp += fill_size)
|
2000-07-20 22:07:09 +02:00
|
|
|
|
memcpy (bufp, fill_literal, fill_size);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
for (; count > 0; count -= n_per_buf)
|
|
|
|
|
{
|
|
|
|
|
n_per_buf = n_per_buf > count ? count : n_per_buf;
|
2000-07-20 22:07:09 +02:00
|
|
|
|
x = bfd_set_section_contents
|
|
|
|
|
(stdoutput, sec, buf, (file_ptr) offset,
|
|
|
|
|
(bfd_size_type) n_per_buf * fill_size);
|
2002-11-30 09:39:46 +01:00
|
|
|
|
if (!x)
|
2017-11-06 10:14:02 +01:00
|
|
|
|
as_fatal (ngettext ("can't fill %ld byte "
|
|
|
|
|
"in section %s of %s: '%s'",
|
|
|
|
|
"can't fill %ld bytes "
|
|
|
|
|
"in section %s of %s: '%s'",
|
|
|
|
|
(long) (n_per_buf * fill_size)),
|
|
|
|
|
(long) (n_per_buf * fill_size),
|
|
|
|
|
sec->name, stdoutput->filename,
|
2011-01-31 17:43:15 +01:00
|
|
|
|
bfd_errmsg (bfd_get_error ()));
|
1999-05-03 09:29:11 +02:00
|
|
|
|
offset += n_per_buf * fill_size;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
merge_data_into_text (void)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
seg_info (text_section)->frchainP->frch_last->fr_next =
|
|
|
|
|
seg_info (data_section)->frchainP->frch_root;
|
|
|
|
|
seg_info (text_section)->frchainP->frch_last =
|
|
|
|
|
seg_info (data_section)->frchainP->frch_last;
|
|
|
|
|
seg_info (data_section)->frchainP = 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
static void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
set_symtab (void)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
int nsyms;
|
|
|
|
|
asymbol **asympp;
|
|
|
|
|
symbolS *symp;
|
2002-11-30 09:39:46 +01:00
|
|
|
|
bfd_boolean result;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
/* Count symbols. We can't rely on a count made by the loop in
|
|
|
|
|
write_object_file, because *_frob_file may add a new symbol or
|
|
|
|
|
two. */
|
|
|
|
|
nsyms = 0;
|
|
|
|
|
for (symp = symbol_rootP; symp; symp = symbol_next (symp))
|
|
|
|
|
nsyms++;
|
|
|
|
|
|
|
|
|
|
if (nsyms)
|
|
|
|
|
{
|
|
|
|
|
int i;
|
2001-09-18 12:08:15 +02:00
|
|
|
|
bfd_size_type amt = (bfd_size_type) nsyms * sizeof (asymbol *);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2009-09-11 17:27:38 +02:00
|
|
|
|
asympp = (asymbol **) bfd_alloc (stdoutput, amt);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
symp = symbol_rootP;
|
|
|
|
|
for (i = 0; i < nsyms; i++, symp = symbol_next (symp))
|
|
|
|
|
{
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
asympp[i] = symbol_get_bfdsym (symp);
|
2008-08-20 15:43:32 +02:00
|
|
|
|
if (asympp[i]->flags != BSF_SECTION_SYM
|
|
|
|
|
|| !(bfd_is_const_section (asympp[i]->section)
|
|
|
|
|
&& asympp[i]->section->symbol == asympp[i]))
|
|
|
|
|
asympp[i]->flags |= BSF_KEEP;
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
symbol_mark_written (symp);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
asympp = 0;
|
|
|
|
|
result = bfd_set_symtab (stdoutput, asympp, nsyms);
|
* gas/app, gas/as.c, gas/as.h, gas/atof-generic.c, gas/cgen.c,
gas/config/atof-ieee.c, gas/config/obj-aout.c,
gas/config/obj-coff.c, gas/config/obj-ecoff.c,
gas/config/obj-elf.c, gas/config/obj-som.c, gas/config/tc-alpha.c,
gas/config/tc-arc.c, gas/config/tc-arm.c, gas/config/tc-cr16.c,
gas/config/tc-cris.c, gas/config/tc-crx.c, gas/config/tc-d30v.c,
gas/config/tc-dlx.c, gas/config/tc-hppa.c, gas/config/tc-i370.c,
gas/config/tc-i386-intel.c, gas/config/tc-i386.c,
gas/config/tc-i860.c, gas/config/tc-i960.c, gas/config/tc-ia64.c,
gas/config/tc-iq2000.c, gas/config/tc-m32c.c,
gas/config/tc-m32r.c, gas/config/tc-m68hc11.c,
gas/config/tc-m68k.c, gas/config/tc-maxq.c, gas/config/tc-mcore.c,
gas/config/tc-mep.c, gas/config/tc-mips.c, gas/config/tc-mmix.c,
gas/config/tc-mn10300.c, gas/config/tc-moxie.c,
gas/config/tc-ns32k.c, gas/config/tc-pj.c, gas/config/tc-ppc.c,
gas/config/tc-s390.c, gas/config/tc-score.c,
gas/config/tc-score7.c, gas/config/tc-sh.c, gas/config/tc-sparc.c,
gas/config/tc-spu.c, gas/config/tc-tic30.c, gas/config/tc-vax.c,
gas/config/tc-xtensa.c, gas/config/xtensa-relax.c,
gas/dw2gencfi.c, gas/dwarf2dbg.c, gas/ehopt.c, gas/expr.c,
gas/frags.c, gas/input-file.c, gas/read.c, gas/sb.c,
gas/subsegs.c, gas/symbols.c, gas/write.c: Change the name of the
gas macro `assert' to `gas_assert'.
2009-06-22 19:56:02 +02:00
|
|
|
|
gas_assert (result);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
symbol_table_frozen = 1;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Finish the subsegments. After every sub-segment, we fake an
|
2016-06-27 14:49:09 +02:00
|
|
|
|
".align ...". This conforms to BSD4.2 brain-damage. We then fake
|
1999-05-03 09:29:11 +02:00
|
|
|
|
".fill 0" because that is the kind of frag that requires least
|
|
|
|
|
thought. ".align" frags like to have a following frag since that
|
|
|
|
|
makes calculating their intended length trivial. */
|
|
|
|
|
|
|
|
|
|
#ifndef SUB_SEGMENT_ALIGN
|
2002-05-23 10:08:48 +02:00
|
|
|
|
#ifdef HANDLE_ALIGN
|
2003-11-23 03:14:21 +01:00
|
|
|
|
/* The last subsegment gets an alignment corresponding to the alignment
|
2002-05-23 10:08:48 +02:00
|
|
|
|
of the section. This allows proper nop-filling at the end of
|
|
|
|
|
code-bearing sections. */
|
|
|
|
|
#define SUB_SEGMENT_ALIGN(SEG, FRCHAIN) \
|
2015-02-25 00:06:36 +01:00
|
|
|
|
(!(FRCHAIN)->frch_next && subseg_text_p (SEG) \
|
2016-06-27 14:49:09 +02:00
|
|
|
|
&& !do_not_pad_sections_to_alignment \
|
2015-02-25 00:06:36 +01:00
|
|
|
|
? get_recorded_alignment (SEG) \
|
|
|
|
|
: 0)
|
2002-05-23 10:08:48 +02:00
|
|
|
|
#else
|
|
|
|
|
#define SUB_SEGMENT_ALIGN(SEG, FRCHAIN) 0
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#endif
|
|
|
|
|
#endif
|
|
|
|
|
|
2014-06-16 03:34:04 +02:00
|
|
|
|
static void
|
2014-09-29 04:12:10 +02:00
|
|
|
|
subsegs_finish_section (asection *s)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
struct frchain *frchainP;
|
2014-09-29 04:12:10 +02:00
|
|
|
|
segment_info_type *seginfo = seg_info (s);
|
|
|
|
|
if (!seginfo)
|
|
|
|
|
return;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2014-09-29 04:12:10 +02:00
|
|
|
|
for (frchainP = seginfo->frchainP;
|
|
|
|
|
frchainP != NULL;
|
|
|
|
|
frchainP = frchainP->frch_next)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
PR gas/20312: Do not pad sections to alignment on failed assembly
Correct a regression from commit 85024cd8bcb9 ("Run write_object_file
after errors") causing unsuccessful assembly, which may be due to any
reason, such as supplying a valid source like this:
.text
.byte 0
.err
to terminate with an assertion failure like:
test.s: Assembler messages:
test.s:3: Error: .err encountered
../as-new: BFD (GNU Binutils) 2.24.51.20140628 internal error, aborting at .../gas/write.c line 608 in size_seg
../as-new: Please report this bug.
on targets whose default text section alignment is above 0, typically
RISC machines.
This is due to an attempt to set last text section's frag alignment to
0, requested from `subsegs_finish_section' where `frag_align_code
(alignment, 0)' is called with `alignment' set to 0 rather than the
section alignment if `had_errors' has returned true. The call to
`subsegs_finish_section' is made from `subsegs_finish' from
`write_object_file' at unsuccessful completion, which previously wasn't
made.
Always set last section's frag alignment from the section alignment
then, forcing no section padding instead if completing unsuccessfully,
so that in that case alignment padding is still suppressed from any
listing generated, fixing assertion failures for these targets:
alpha-linuxecoff -FAIL: all pr20312
arm-aout -FAIL: all pr20312
mips-freebsd -FAIL: all pr20312
mips-img-linux -FAIL: all pr20312
mips-linux -FAIL: all pr20312
mips-mti-linux -FAIL: all pr20312
mips-netbsd -FAIL: all pr20312
mips-sgi-irix5 -FAIL: all pr20312
mips-sgi-irix6 -FAIL: all pr20312
mips-vxworks -FAIL: all pr20312
mips64-freebsd -FAIL: all pr20312
mips64-img-linux -FAIL: all pr20312
mips64-linux -FAIL: all pr20312
mips64-mti-linux -FAIL: all pr20312
mips64-openbsd -FAIL: all pr20312
mips64el-freebsd -FAIL: all pr20312
mips64el-img-linux -FAIL: all pr20312
mips64el-linux -FAIL: all pr20312
mips64el-mti-linux -FAIL: all pr20312
mips64el-openbsd -FAIL: all pr20312
mipsel-freebsd -FAIL: all pr20312
mipsel-img-linux -FAIL: all pr20312
mipsel-linux -FAIL: all pr20312
mipsel-mti-linux -FAIL: all pr20312
mipsel-netbsd -FAIL: all pr20312
mipsel-vxworks -FAIL: all pr20312
mipsisa32-linux -FAIL: all pr20312
mipsisa32el-linux -FAIL: all pr20312
mipsisa64-linux -FAIL: all pr20312
mipsisa64el-linux -FAIL: all pr20312
sh-pe -FAIL: all pr20312
sparc-aout -FAIL: all pr20312
gas/
PR gas/20312
* write.c (subsegs_finish_section): Force no section padding to
alignment on failed assembly, always set last frag's alignment
from section.
* testsuite/gas/all/pr20312.l: New list test.
* testsuite/gas/all/pr20312.s: New test source.
* testsuite/gas/all/gas.exp: Run the new test
2016-06-29 02:38:50 +02:00
|
|
|
|
int alignment;
|
2000-12-28 11:07:56 +01:00
|
|
|
|
|
2014-09-29 04:12:10 +02:00
|
|
|
|
subseg_set (s, frchainP->frch_subseg);
|
2002-11-28 15:13:51 +01:00
|
|
|
|
|
2014-09-29 04:12:10 +02:00
|
|
|
|
/* This now gets called even if we had errors. In that case,
|
|
|
|
|
any alignment is meaningless, and, moreover, will look weird
|
|
|
|
|
if we are generating a listing. */
|
PR gas/20312: Do not pad sections to alignment on failed assembly
Correct a regression from commit 85024cd8bcb9 ("Run write_object_file
after errors") causing unsuccessful assembly, which may be due to any
reason, such as supplying a valid source like this:
.text
.byte 0
.err
to terminate with an assertion failure like:
test.s: Assembler messages:
test.s:3: Error: .err encountered
../as-new: BFD (GNU Binutils) 2.24.51.20140628 internal error, aborting at .../gas/write.c line 608 in size_seg
../as-new: Please report this bug.
on targets whose default text section alignment is above 0, typically
RISC machines.
This is due to an attempt to set last text section's frag alignment to
0, requested from `subsegs_finish_section' where `frag_align_code
(alignment, 0)' is called with `alignment' set to 0 rather than the
section alignment if `had_errors' has returned true. The call to
`subsegs_finish_section' is made from `subsegs_finish' from
`write_object_file' at unsuccessful completion, which previously wasn't
made.
Always set last section's frag alignment from the section alignment
then, forcing no section padding instead if completing unsuccessfully,
so that in that case alignment padding is still suppressed from any
listing generated, fixing assertion failures for these targets:
alpha-linuxecoff -FAIL: all pr20312
arm-aout -FAIL: all pr20312
mips-freebsd -FAIL: all pr20312
mips-img-linux -FAIL: all pr20312
mips-linux -FAIL: all pr20312
mips-mti-linux -FAIL: all pr20312
mips-netbsd -FAIL: all pr20312
mips-sgi-irix5 -FAIL: all pr20312
mips-sgi-irix6 -FAIL: all pr20312
mips-vxworks -FAIL: all pr20312
mips64-freebsd -FAIL: all pr20312
mips64-img-linux -FAIL: all pr20312
mips64-linux -FAIL: all pr20312
mips64-mti-linux -FAIL: all pr20312
mips64-openbsd -FAIL: all pr20312
mips64el-freebsd -FAIL: all pr20312
mips64el-img-linux -FAIL: all pr20312
mips64el-linux -FAIL: all pr20312
mips64el-mti-linux -FAIL: all pr20312
mips64el-openbsd -FAIL: all pr20312
mipsel-freebsd -FAIL: all pr20312
mipsel-img-linux -FAIL: all pr20312
mipsel-linux -FAIL: all pr20312
mipsel-mti-linux -FAIL: all pr20312
mipsel-netbsd -FAIL: all pr20312
mipsel-vxworks -FAIL: all pr20312
mipsisa32-linux -FAIL: all pr20312
mipsisa32el-linux -FAIL: all pr20312
mipsisa64-linux -FAIL: all pr20312
mipsisa64el-linux -FAIL: all pr20312
sh-pe -FAIL: all pr20312
sparc-aout -FAIL: all pr20312
gas/
PR gas/20312
* write.c (subsegs_finish_section): Force no section padding to
alignment on failed assembly, always set last frag's alignment
from section.
* testsuite/gas/all/pr20312.l: New list test.
* testsuite/gas/all/pr20312.s: New test source.
* testsuite/gas/all/gas.exp: Run the new test
2016-06-29 02:38:50 +02:00
|
|
|
|
if (had_errors ())
|
|
|
|
|
do_not_pad_sections_to_alignment = 1;
|
2006-05-04 01:52:15 +02:00
|
|
|
|
|
PR gas/20312: Do not pad sections to alignment on failed assembly
Correct a regression from commit 85024cd8bcb9 ("Run write_object_file
after errors") causing unsuccessful assembly, which may be due to any
reason, such as supplying a valid source like this:
.text
.byte 0
.err
to terminate with an assertion failure like:
test.s: Assembler messages:
test.s:3: Error: .err encountered
../as-new: BFD (GNU Binutils) 2.24.51.20140628 internal error, aborting at .../gas/write.c line 608 in size_seg
../as-new: Please report this bug.
on targets whose default text section alignment is above 0, typically
RISC machines.
This is due to an attempt to set last text section's frag alignment to
0, requested from `subsegs_finish_section' where `frag_align_code
(alignment, 0)' is called with `alignment' set to 0 rather than the
section alignment if `had_errors' has returned true. The call to
`subsegs_finish_section' is made from `subsegs_finish' from
`write_object_file' at unsuccessful completion, which previously wasn't
made.
Always set last section's frag alignment from the section alignment
then, forcing no section padding instead if completing unsuccessfully,
so that in that case alignment padding is still suppressed from any
listing generated, fixing assertion failures for these targets:
alpha-linuxecoff -FAIL: all pr20312
arm-aout -FAIL: all pr20312
mips-freebsd -FAIL: all pr20312
mips-img-linux -FAIL: all pr20312
mips-linux -FAIL: all pr20312
mips-mti-linux -FAIL: all pr20312
mips-netbsd -FAIL: all pr20312
mips-sgi-irix5 -FAIL: all pr20312
mips-sgi-irix6 -FAIL: all pr20312
mips-vxworks -FAIL: all pr20312
mips64-freebsd -FAIL: all pr20312
mips64-img-linux -FAIL: all pr20312
mips64-linux -FAIL: all pr20312
mips64-mti-linux -FAIL: all pr20312
mips64-openbsd -FAIL: all pr20312
mips64el-freebsd -FAIL: all pr20312
mips64el-img-linux -FAIL: all pr20312
mips64el-linux -FAIL: all pr20312
mips64el-mti-linux -FAIL: all pr20312
mips64el-openbsd -FAIL: all pr20312
mipsel-freebsd -FAIL: all pr20312
mipsel-img-linux -FAIL: all pr20312
mipsel-linux -FAIL: all pr20312
mipsel-mti-linux -FAIL: all pr20312
mipsel-netbsd -FAIL: all pr20312
mipsel-vxworks -FAIL: all pr20312
mipsisa32-linux -FAIL: all pr20312
mipsisa32el-linux -FAIL: all pr20312
mipsisa64-linux -FAIL: all pr20312
mipsisa64el-linux -FAIL: all pr20312
sh-pe -FAIL: all pr20312
sparc-aout -FAIL: all pr20312
gas/
PR gas/20312
* write.c (subsegs_finish_section): Force no section padding to
alignment on failed assembly, always set last frag's alignment
from section.
* testsuite/gas/all/pr20312.l: New list test.
* testsuite/gas/all/pr20312.s: New test source.
* testsuite/gas/all/gas.exp: Run the new test
2016-06-29 02:38:50 +02:00
|
|
|
|
alignment = SUB_SEGMENT_ALIGN (now_seg, frchainP);
|
|
|
|
|
if ((bfd_get_section_flags (now_seg->owner, now_seg) & SEC_MERGE)
|
|
|
|
|
&& now_seg->entsize)
|
|
|
|
|
{
|
|
|
|
|
unsigned int entsize = now_seg->entsize;
|
|
|
|
|
int entalign = 0;
|
2014-09-29 04:12:10 +02:00
|
|
|
|
|
PR gas/20312: Do not pad sections to alignment on failed assembly
Correct a regression from commit 85024cd8bcb9 ("Run write_object_file
after errors") causing unsuccessful assembly, which may be due to any
reason, such as supplying a valid source like this:
.text
.byte 0
.err
to terminate with an assertion failure like:
test.s: Assembler messages:
test.s:3: Error: .err encountered
../as-new: BFD (GNU Binutils) 2.24.51.20140628 internal error, aborting at .../gas/write.c line 608 in size_seg
../as-new: Please report this bug.
on targets whose default text section alignment is above 0, typically
RISC machines.
This is due to an attempt to set last text section's frag alignment to
0, requested from `subsegs_finish_section' where `frag_align_code
(alignment, 0)' is called with `alignment' set to 0 rather than the
section alignment if `had_errors' has returned true. The call to
`subsegs_finish_section' is made from `subsegs_finish' from
`write_object_file' at unsuccessful completion, which previously wasn't
made.
Always set last section's frag alignment from the section alignment
then, forcing no section padding instead if completing unsuccessfully,
so that in that case alignment padding is still suppressed from any
listing generated, fixing assertion failures for these targets:
alpha-linuxecoff -FAIL: all pr20312
arm-aout -FAIL: all pr20312
mips-freebsd -FAIL: all pr20312
mips-img-linux -FAIL: all pr20312
mips-linux -FAIL: all pr20312
mips-mti-linux -FAIL: all pr20312
mips-netbsd -FAIL: all pr20312
mips-sgi-irix5 -FAIL: all pr20312
mips-sgi-irix6 -FAIL: all pr20312
mips-vxworks -FAIL: all pr20312
mips64-freebsd -FAIL: all pr20312
mips64-img-linux -FAIL: all pr20312
mips64-linux -FAIL: all pr20312
mips64-mti-linux -FAIL: all pr20312
mips64-openbsd -FAIL: all pr20312
mips64el-freebsd -FAIL: all pr20312
mips64el-img-linux -FAIL: all pr20312
mips64el-linux -FAIL: all pr20312
mips64el-mti-linux -FAIL: all pr20312
mips64el-openbsd -FAIL: all pr20312
mipsel-freebsd -FAIL: all pr20312
mipsel-img-linux -FAIL: all pr20312
mipsel-linux -FAIL: all pr20312
mipsel-mti-linux -FAIL: all pr20312
mipsel-netbsd -FAIL: all pr20312
mipsel-vxworks -FAIL: all pr20312
mipsisa32-linux -FAIL: all pr20312
mipsisa32el-linux -FAIL: all pr20312
mipsisa64-linux -FAIL: all pr20312
mipsisa64el-linux -FAIL: all pr20312
sh-pe -FAIL: all pr20312
sparc-aout -FAIL: all pr20312
gas/
PR gas/20312
* write.c (subsegs_finish_section): Force no section padding to
alignment on failed assembly, always set last frag's alignment
from section.
* testsuite/gas/all/pr20312.l: New list test.
* testsuite/gas/all/pr20312.s: New test source.
* testsuite/gas/all/gas.exp: Run the new test
2016-06-29 02:38:50 +02:00
|
|
|
|
while ((entsize & 1) == 0)
|
|
|
|
|
{
|
|
|
|
|
++entalign;
|
|
|
|
|
entsize >>= 1;
|
2002-11-28 15:13:51 +01:00
|
|
|
|
}
|
PR gas/20312: Do not pad sections to alignment on failed assembly
Correct a regression from commit 85024cd8bcb9 ("Run write_object_file
after errors") causing unsuccessful assembly, which may be due to any
reason, such as supplying a valid source like this:
.text
.byte 0
.err
to terminate with an assertion failure like:
test.s: Assembler messages:
test.s:3: Error: .err encountered
../as-new: BFD (GNU Binutils) 2.24.51.20140628 internal error, aborting at .../gas/write.c line 608 in size_seg
../as-new: Please report this bug.
on targets whose default text section alignment is above 0, typically
RISC machines.
This is due to an attempt to set last text section's frag alignment to
0, requested from `subsegs_finish_section' where `frag_align_code
(alignment, 0)' is called with `alignment' set to 0 rather than the
section alignment if `had_errors' has returned true. The call to
`subsegs_finish_section' is made from `subsegs_finish' from
`write_object_file' at unsuccessful completion, which previously wasn't
made.
Always set last section's frag alignment from the section alignment
then, forcing no section padding instead if completing unsuccessfully,
so that in that case alignment padding is still suppressed from any
listing generated, fixing assertion failures for these targets:
alpha-linuxecoff -FAIL: all pr20312
arm-aout -FAIL: all pr20312
mips-freebsd -FAIL: all pr20312
mips-img-linux -FAIL: all pr20312
mips-linux -FAIL: all pr20312
mips-mti-linux -FAIL: all pr20312
mips-netbsd -FAIL: all pr20312
mips-sgi-irix5 -FAIL: all pr20312
mips-sgi-irix6 -FAIL: all pr20312
mips-vxworks -FAIL: all pr20312
mips64-freebsd -FAIL: all pr20312
mips64-img-linux -FAIL: all pr20312
mips64-linux -FAIL: all pr20312
mips64-mti-linux -FAIL: all pr20312
mips64-openbsd -FAIL: all pr20312
mips64el-freebsd -FAIL: all pr20312
mips64el-img-linux -FAIL: all pr20312
mips64el-linux -FAIL: all pr20312
mips64el-mti-linux -FAIL: all pr20312
mips64el-openbsd -FAIL: all pr20312
mipsel-freebsd -FAIL: all pr20312
mipsel-img-linux -FAIL: all pr20312
mipsel-linux -FAIL: all pr20312
mipsel-mti-linux -FAIL: all pr20312
mipsel-netbsd -FAIL: all pr20312
mipsel-vxworks -FAIL: all pr20312
mipsisa32-linux -FAIL: all pr20312
mipsisa32el-linux -FAIL: all pr20312
mipsisa64-linux -FAIL: all pr20312
mipsisa64el-linux -FAIL: all pr20312
sh-pe -FAIL: all pr20312
sparc-aout -FAIL: all pr20312
gas/
PR gas/20312
* write.c (subsegs_finish_section): Force no section padding to
alignment on failed assembly, always set last frag's alignment
from section.
* testsuite/gas/all/pr20312.l: New list test.
* testsuite/gas/all/pr20312.s: New test source.
* testsuite/gas/all/gas.exp: Run the new test
2016-06-29 02:38:50 +02:00
|
|
|
|
|
|
|
|
|
if (entalign > alignment)
|
|
|
|
|
alignment = entalign;
|
2014-09-29 04:12:10 +02:00
|
|
|
|
}
|
2000-12-28 11:07:56 +01:00
|
|
|
|
|
2014-09-29 04:12:10 +02:00
|
|
|
|
if (subseg_text_p (now_seg))
|
|
|
|
|
frag_align_code (alignment, 0);
|
|
|
|
|
else
|
|
|
|
|
frag_align (alignment, 0, 0);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2014-09-29 04:12:10 +02:00
|
|
|
|
/* frag_align will have left a new frag.
|
|
|
|
|
Use this last frag for an empty ".fill".
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2014-09-29 04:12:10 +02:00
|
|
|
|
For this segment ...
|
|
|
|
|
Create a last frag. Do not leave a "being filled in frag". */
|
|
|
|
|
frag_wane (frag_now);
|
|
|
|
|
frag_now->fr_fix = 0;
|
|
|
|
|
know (frag_now->fr_next == NULL);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
2014-09-29 04:12:10 +02:00
|
|
|
|
static void
|
|
|
|
|
subsegs_finish (void)
|
|
|
|
|
{
|
|
|
|
|
asection *s;
|
|
|
|
|
|
|
|
|
|
for (s = stdoutput->sections; s; s = s->next)
|
|
|
|
|
subsegs_finish_section (s);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#ifdef OBJ_ELF
|
|
|
|
|
static void
|
|
|
|
|
create_obj_attrs_section (void)
|
|
|
|
|
{
|
|
|
|
|
segT s;
|
|
|
|
|
char *p;
|
|
|
|
|
offsetT size;
|
|
|
|
|
const char *name;
|
|
|
|
|
|
|
|
|
|
size = bfd_elf_obj_attr_size (stdoutput);
|
2018-04-26 16:12:42 +02:00
|
|
|
|
if (size == 0)
|
|
|
|
|
return;
|
|
|
|
|
|
|
|
|
|
name = get_elf_backend_data (stdoutput)->obj_attrs_section;
|
|
|
|
|
if (!name)
|
|
|
|
|
name = ".gnu.attributes";
|
|
|
|
|
s = subseg_new (name, 0);
|
|
|
|
|
elf_section_type (s)
|
|
|
|
|
= get_elf_backend_data (stdoutput)->obj_attrs_section_type;
|
|
|
|
|
bfd_set_section_flags (stdoutput, s, SEC_READONLY | SEC_DATA);
|
|
|
|
|
frag_now_fix ();
|
|
|
|
|
p = frag_more (size);
|
|
|
|
|
bfd_elf_set_obj_attr_contents (stdoutput, (bfd_byte *)p, size);
|
|
|
|
|
|
|
|
|
|
subsegs_finish_section (s);
|
|
|
|
|
relax_segment (seg_info (s)->frchainP->frch_root, s, 0);
|
|
|
|
|
size_seg (stdoutput, s, NULL);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Create a relocation against an entry in a GNU Build attribute section. */
|
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
create_note_reloc (segT sec,
|
|
|
|
|
symbolS * sym,
|
|
|
|
|
bfd_size_type offset,
|
|
|
|
|
int reloc_type,
|
|
|
|
|
bfd_vma addend,
|
|
|
|
|
char * note)
|
|
|
|
|
{
|
|
|
|
|
struct reloc_list * reloc;
|
|
|
|
|
|
|
|
|
|
reloc = XNEW (struct reloc_list);
|
|
|
|
|
|
|
|
|
|
/* We create a .b type reloc as resolve_reloc_expr_symbols() has already been called. */
|
|
|
|
|
reloc->u.b.sec = sec;
|
Move struc-symbol.h to symbols.c
This file was never supposed to be widely used. The fact that it has
found its way into many gas files led to bugs, typically when code
expecting a symbolS* to point at a struct symbol is presented with a
struct local_symbol. Also, commit 158184ac9e changed these structs in
2012 but didn't catch all places where symbol bsym was being used to
test for a local_symbol.
* Makefile.am (HFILES): Delete struc-symbol.h.
* doc/internals.texi: Delete struc-symbol.h reference and out
of date local symbol description.
* struc-symbol.h: Delete. Move contents to..
* symbols.c: ..here.
(symbol_on_chain, symbol_symbolS): New functions.
* symbols.h (symbol_on_chain, symbol_symbolS): Declare.
* cgen.c: Don't #include struc-symbol.h.
(gas_cgen_parse_operand): Don't test for local_symbol using
bsym, instead call symbol_symbolS. Use symbol_get_bfdsym.
(weak_operand_overflow_check, make_right_shifted_expr): Use
symbol accessors.
* config/obj-coff.c: Don't #include struc-symbol.h.
(GET_FILENAME_STRING): Delete.
* config/obj-elf.c: Don't #include struc-symbol.h.
(elf_file_symbol): Use symbol accessors.
(elf_adjust_symtab): Call symbol_on_chain.
* config/obj-evax.c: Don't #include struc-symbol.h.
* config/tc-nds32.c: Likewise.
* config/tc-rl78.c: Likewise.
* config/tc-rx.c: Likewise.
* config/tc-alpha.c: Likewise.
(add_to_link_pool, s_alpha_comm): Use symbol accessors.
* config/tc-arc.c: Don't #include struc-symbol.h.
(arc_check_relocs): Use symbol accessors, testing gas symbol
section rather than bfd symbol section.
* config/tc-avr.c: Don't #include struc-symbol.h.
(avr_patch_gccisr_frag): Use symbol accessors.
* config/tc-bfin.c: Don't #include struc-symbol.h.
(bfin_loop_beginend): Use symbol accessors.
* config/tc-csky.c: Don't #include struc-symbol.h.
(v2_work_movih, v2_work_ori): Use symbol accessors. Check for
absolute symbol as well as O_constant.
* config/tc-riscv.c: Don't #include struc-symbol.h.
(riscv_pre_output_hook): Use symbol accessors.
* config/tc-s390.c: Don't #include struc-symbol.h.
(s390_literals): Use symbol accessors.
* config/tc-score.c (s3_build_la_pic, s3_build_lwst_pic): Use
symbol accessors.
(s3_relax_branch_inst16, s3_relax_cmpbranch_inst32): Don't
test symbol bsym.
* config/tc-score7.c: Don't #include struc-symbol.h.
(s7_build_la_pic, s7_build_lwst_pic): Use symbol accessors.
(s7_b32_relax_to_b16): Don't test symbol bsym.
* config/tc-sh.c: Don't #include struc-symbol.h.
(insert_loop_bounds): Use symbol accessors.
(sh_frob_section): Remove bogus symbol canonicalization.
* config/tc-tic54x.c: Don't #include struc-symbol.h.
(tic54x_bss): Use symbol accessors.
* config/tc-tilegx.c: Don't #include struc-symbol.h.
(emit_tilegx_instruction, tilegx_parse_name): Use symbol accessors.
* config/tc-tilepro.c: Don't #include struc-symbol.h.
(emit_tilepro_instruction, tilepro_parse_name): Use accessors.
* config/tc-xtensa.c: Don't #include struc-symbol.h.
(xg_assemble_vliw_tokens): Use symbol accessors.
(xg_order_trampoline_chain): Likewise.
* ehopt.c: Don't #include struc-symbol.h.
(check_eh_frame): Correct local symbol test. Use symbol accessors.
* write.c: Don't #include struc-symbol.h.
(create_note_reloc, maybe_generate_build_notes): Use symbol accessors.
* Makefile.in: Regenerate.
* po/POTFILES.in: Regenerate.
2018-10-29 07:07:24 +01:00
|
|
|
|
reloc->u.b.s = symbol_get_bfdsym (sym);
|
2018-04-26 16:12:42 +02:00
|
|
|
|
reloc->u.b.r.sym_ptr_ptr = & reloc->u.b.s;
|
|
|
|
|
reloc->u.b.r.address = offset;
|
|
|
|
|
reloc->u.b.r.addend = addend;
|
|
|
|
|
reloc->u.b.r.howto = bfd_reloc_type_lookup (stdoutput, reloc_type);
|
|
|
|
|
|
|
|
|
|
if (reloc->u.b.r.howto == NULL)
|
2014-09-29 04:12:10 +02:00
|
|
|
|
{
|
2018-04-26 16:12:42 +02:00
|
|
|
|
as_bad (_("unable to create reloc for build note"));
|
|
|
|
|
return;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
reloc->file = N_("<gnu build note>");
|
|
|
|
|
reloc->line = 0;
|
|
|
|
|
|
|
|
|
|
reloc->next = reloc_list;
|
|
|
|
|
reloc_list = reloc;
|
|
|
|
|
|
|
|
|
|
/* For REL relocs, store the addend in the section. */
|
|
|
|
|
if (! sec->use_rela_p
|
|
|
|
|
/* The SH target is a special case that uses RELA relocs
|
|
|
|
|
but still stores the addend in the word being relocated. */
|
|
|
|
|
|| strstr (bfd_get_target (stdoutput), "-sh") != NULL)
|
|
|
|
|
{
|
|
|
|
|
if (target_big_endian)
|
|
|
|
|
{
|
|
|
|
|
if (bfd_arch_bits_per_address (stdoutput) <= 32)
|
|
|
|
|
note[offset + 3] = addend;
|
|
|
|
|
else
|
|
|
|
|
note[offset + 7] = addend;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
note[offset] = addend;
|
2014-09-29 04:12:10 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
2018-04-26 16:12:42 +02:00
|
|
|
|
|
|
|
|
|
static void
|
|
|
|
|
maybe_generate_build_notes (void)
|
|
|
|
|
{
|
|
|
|
|
segT sec;
|
|
|
|
|
char * note;
|
|
|
|
|
offsetT note_size;
|
2018-05-14 16:32:43 +02:00
|
|
|
|
offsetT total_size;
|
2018-04-26 16:12:42 +02:00
|
|
|
|
offsetT desc_size;
|
|
|
|
|
offsetT desc2_offset;
|
|
|
|
|
int desc_reloc;
|
|
|
|
|
symbolS * sym;
|
Move struc-symbol.h to symbols.c
This file was never supposed to be widely used. The fact that it has
found its way into many gas files led to bugs, typically when code
expecting a symbolS* to point at a struct symbol is presented with a
struct local_symbol. Also, commit 158184ac9e changed these structs in
2012 but didn't catch all places where symbol bsym was being used to
test for a local_symbol.
* Makefile.am (HFILES): Delete struc-symbol.h.
* doc/internals.texi: Delete struc-symbol.h reference and out
of date local symbol description.
* struc-symbol.h: Delete. Move contents to..
* symbols.c: ..here.
(symbol_on_chain, symbol_symbolS): New functions.
* symbols.h (symbol_on_chain, symbol_symbolS): Declare.
* cgen.c: Don't #include struc-symbol.h.
(gas_cgen_parse_operand): Don't test for local_symbol using
bsym, instead call symbol_symbolS. Use symbol_get_bfdsym.
(weak_operand_overflow_check, make_right_shifted_expr): Use
symbol accessors.
* config/obj-coff.c: Don't #include struc-symbol.h.
(GET_FILENAME_STRING): Delete.
* config/obj-elf.c: Don't #include struc-symbol.h.
(elf_file_symbol): Use symbol accessors.
(elf_adjust_symtab): Call symbol_on_chain.
* config/obj-evax.c: Don't #include struc-symbol.h.
* config/tc-nds32.c: Likewise.
* config/tc-rl78.c: Likewise.
* config/tc-rx.c: Likewise.
* config/tc-alpha.c: Likewise.
(add_to_link_pool, s_alpha_comm): Use symbol accessors.
* config/tc-arc.c: Don't #include struc-symbol.h.
(arc_check_relocs): Use symbol accessors, testing gas symbol
section rather than bfd symbol section.
* config/tc-avr.c: Don't #include struc-symbol.h.
(avr_patch_gccisr_frag): Use symbol accessors.
* config/tc-bfin.c: Don't #include struc-symbol.h.
(bfin_loop_beginend): Use symbol accessors.
* config/tc-csky.c: Don't #include struc-symbol.h.
(v2_work_movih, v2_work_ori): Use symbol accessors. Check for
absolute symbol as well as O_constant.
* config/tc-riscv.c: Don't #include struc-symbol.h.
(riscv_pre_output_hook): Use symbol accessors.
* config/tc-s390.c: Don't #include struc-symbol.h.
(s390_literals): Use symbol accessors.
* config/tc-score.c (s3_build_la_pic, s3_build_lwst_pic): Use
symbol accessors.
(s3_relax_branch_inst16, s3_relax_cmpbranch_inst32): Don't
test symbol bsym.
* config/tc-score7.c: Don't #include struc-symbol.h.
(s7_build_la_pic, s7_build_lwst_pic): Use symbol accessors.
(s7_b32_relax_to_b16): Don't test symbol bsym.
* config/tc-sh.c: Don't #include struc-symbol.h.
(insert_loop_bounds): Use symbol accessors.
(sh_frob_section): Remove bogus symbol canonicalization.
* config/tc-tic54x.c: Don't #include struc-symbol.h.
(tic54x_bss): Use symbol accessors.
* config/tc-tilegx.c: Don't #include struc-symbol.h.
(emit_tilegx_instruction, tilegx_parse_name): Use symbol accessors.
* config/tc-tilepro.c: Don't #include struc-symbol.h.
(emit_tilepro_instruction, tilepro_parse_name): Use accessors.
* config/tc-xtensa.c: Don't #include struc-symbol.h.
(xg_assemble_vliw_tokens): Use symbol accessors.
(xg_order_trampoline_chain): Likewise.
* ehopt.c: Don't #include struc-symbol.h.
(check_eh_frame): Correct local symbol test. Use symbol accessors.
* write.c: Don't #include struc-symbol.h.
(create_note_reloc, maybe_generate_build_notes): Use symbol accessors.
* Makefile.in: Regenerate.
* po/POTFILES.in: Regenerate.
2018-10-29 07:07:24 +01:00
|
|
|
|
asymbol * bsym;
|
2018-04-26 16:12:42 +02:00
|
|
|
|
|
|
|
|
|
if (! flag_generate_build_notes
|
|
|
|
|
|| bfd_get_section_by_name (stdoutput,
|
|
|
|
|
GNU_BUILD_ATTRS_SECTION_NAME) != NULL)
|
|
|
|
|
return;
|
|
|
|
|
|
|
|
|
|
/* Create a GNU Build Attribute section. */
|
|
|
|
|
sec = subseg_new (GNU_BUILD_ATTRS_SECTION_NAME, FALSE);
|
|
|
|
|
elf_section_type (sec) = SHT_NOTE;
|
|
|
|
|
bfd_set_section_flags (stdoutput, sec,
|
|
|
|
|
SEC_READONLY | SEC_HAS_CONTENTS | SEC_DATA);
|
|
|
|
|
bfd_set_section_alignment (stdoutput, sec, 2);
|
|
|
|
|
|
2018-05-14 16:32:43 +02:00
|
|
|
|
/* Work out the size of the notes that we will create,
|
|
|
|
|
and the relocation we should use. */
|
2018-04-26 16:12:42 +02:00
|
|
|
|
if (bfd_arch_bits_per_address (stdoutput) <= 32)
|
|
|
|
|
{
|
|
|
|
|
note_size = 28;
|
|
|
|
|
desc_size = 8; /* Two 4-byte offsets. */
|
|
|
|
|
desc2_offset = 24;
|
|
|
|
|
|
|
|
|
|
/* FIXME: The BFD backend for the CRX target does not support the
|
|
|
|
|
BFD_RELOC_32, even though it really should. Likewise for the
|
|
|
|
|
CR16 target. So we have special case code here... */
|
|
|
|
|
if (strstr (bfd_get_target (stdoutput), "-crx") != NULL)
|
|
|
|
|
desc_reloc = BFD_RELOC_CRX_NUM32;
|
|
|
|
|
else if (strstr (bfd_get_target (stdoutput), "-cr16") != NULL)
|
|
|
|
|
desc_reloc = BFD_RELOC_CR16_NUM32;
|
|
|
|
|
else
|
|
|
|
|
desc_reloc = BFD_RELOC_32;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
note_size = 36;
|
|
|
|
|
desc_size = 16; /* Two 8-byte offsets. */
|
|
|
|
|
desc2_offset = 28;
|
|
|
|
|
/* FIXME: The BFD backend for the IA64 target does not support the
|
|
|
|
|
BFD_RELOC_64, even though it really should. The HPPA backend
|
|
|
|
|
has a similar issue, although it does not support BFD_RELOCs at
|
|
|
|
|
all! So we have special case code to handle these targets. */
|
|
|
|
|
if (strstr (bfd_get_target (stdoutput), "-ia64") != NULL)
|
|
|
|
|
desc_reloc = target_big_endian ? BFD_RELOC_IA64_DIR32MSB : BFD_RELOC_IA64_DIR32LSB;
|
|
|
|
|
else if (strstr (bfd_get_target (stdoutput), "-hppa") != NULL)
|
|
|
|
|
desc_reloc = 80; /* R_PARISC_DIR64. */
|
|
|
|
|
else
|
|
|
|
|
desc_reloc = BFD_RELOC_64;
|
|
|
|
|
}
|
|
|
|
|
|
2018-05-14 16:32:43 +02:00
|
|
|
|
/* We have to create a note for *each* code section.
|
|
|
|
|
Linker garbage collection might discard some. */
|
|
|
|
|
total_size = 0;
|
|
|
|
|
note = NULL;
|
2018-04-26 16:12:42 +02:00
|
|
|
|
|
Move struc-symbol.h to symbols.c
This file was never supposed to be widely used. The fact that it has
found its way into many gas files led to bugs, typically when code
expecting a symbolS* to point at a struct symbol is presented with a
struct local_symbol. Also, commit 158184ac9e changed these structs in
2012 but didn't catch all places where symbol bsym was being used to
test for a local_symbol.
* Makefile.am (HFILES): Delete struc-symbol.h.
* doc/internals.texi: Delete struc-symbol.h reference and out
of date local symbol description.
* struc-symbol.h: Delete. Move contents to..
* symbols.c: ..here.
(symbol_on_chain, symbol_symbolS): New functions.
* symbols.h (symbol_on_chain, symbol_symbolS): Declare.
* cgen.c: Don't #include struc-symbol.h.
(gas_cgen_parse_operand): Don't test for local_symbol using
bsym, instead call symbol_symbolS. Use symbol_get_bfdsym.
(weak_operand_overflow_check, make_right_shifted_expr): Use
symbol accessors.
* config/obj-coff.c: Don't #include struc-symbol.h.
(GET_FILENAME_STRING): Delete.
* config/obj-elf.c: Don't #include struc-symbol.h.
(elf_file_symbol): Use symbol accessors.
(elf_adjust_symtab): Call symbol_on_chain.
* config/obj-evax.c: Don't #include struc-symbol.h.
* config/tc-nds32.c: Likewise.
* config/tc-rl78.c: Likewise.
* config/tc-rx.c: Likewise.
* config/tc-alpha.c: Likewise.
(add_to_link_pool, s_alpha_comm): Use symbol accessors.
* config/tc-arc.c: Don't #include struc-symbol.h.
(arc_check_relocs): Use symbol accessors, testing gas symbol
section rather than bfd symbol section.
* config/tc-avr.c: Don't #include struc-symbol.h.
(avr_patch_gccisr_frag): Use symbol accessors.
* config/tc-bfin.c: Don't #include struc-symbol.h.
(bfin_loop_beginend): Use symbol accessors.
* config/tc-csky.c: Don't #include struc-symbol.h.
(v2_work_movih, v2_work_ori): Use symbol accessors. Check for
absolute symbol as well as O_constant.
* config/tc-riscv.c: Don't #include struc-symbol.h.
(riscv_pre_output_hook): Use symbol accessors.
* config/tc-s390.c: Don't #include struc-symbol.h.
(s390_literals): Use symbol accessors.
* config/tc-score.c (s3_build_la_pic, s3_build_lwst_pic): Use
symbol accessors.
(s3_relax_branch_inst16, s3_relax_cmpbranch_inst32): Don't
test symbol bsym.
* config/tc-score7.c: Don't #include struc-symbol.h.
(s7_build_la_pic, s7_build_lwst_pic): Use symbol accessors.
(s7_b32_relax_to_b16): Don't test symbol bsym.
* config/tc-sh.c: Don't #include struc-symbol.h.
(insert_loop_bounds): Use symbol accessors.
(sh_frob_section): Remove bogus symbol canonicalization.
* config/tc-tic54x.c: Don't #include struc-symbol.h.
(tic54x_bss): Use symbol accessors.
* config/tc-tilegx.c: Don't #include struc-symbol.h.
(emit_tilegx_instruction, tilegx_parse_name): Use symbol accessors.
* config/tc-tilepro.c: Don't #include struc-symbol.h.
(emit_tilepro_instruction, tilepro_parse_name): Use accessors.
* config/tc-xtensa.c: Don't #include struc-symbol.h.
(xg_assemble_vliw_tokens): Use symbol accessors.
(xg_order_trampoline_chain): Likewise.
* ehopt.c: Don't #include struc-symbol.h.
(check_eh_frame): Correct local symbol test. Use symbol accessors.
* write.c: Don't #include struc-symbol.h.
(create_note_reloc, maybe_generate_build_notes): Use symbol accessors.
* Makefile.in: Regenerate.
* po/POTFILES.in: Regenerate.
2018-10-29 07:07:24 +01:00
|
|
|
|
for (sym = symbol_rootP; sym != NULL; sym = symbol_next (sym))
|
|
|
|
|
if ((bsym = symbol_get_bfdsym (sym)) != NULL
|
|
|
|
|
&& bsym->flags & BSF_SECTION_SYM
|
|
|
|
|
&& bsym->section != NULL
|
2018-07-06 12:46:14 +02:00
|
|
|
|
/* Skip linkonce sections - we cannot use these section symbols as they may disappear. */
|
Move struc-symbol.h to symbols.c
This file was never supposed to be widely used. The fact that it has
found its way into many gas files led to bugs, typically when code
expecting a symbolS* to point at a struct symbol is presented with a
struct local_symbol. Also, commit 158184ac9e changed these structs in
2012 but didn't catch all places where symbol bsym was being used to
test for a local_symbol.
* Makefile.am (HFILES): Delete struc-symbol.h.
* doc/internals.texi: Delete struc-symbol.h reference and out
of date local symbol description.
* struc-symbol.h: Delete. Move contents to..
* symbols.c: ..here.
(symbol_on_chain, symbol_symbolS): New functions.
* symbols.h (symbol_on_chain, symbol_symbolS): Declare.
* cgen.c: Don't #include struc-symbol.h.
(gas_cgen_parse_operand): Don't test for local_symbol using
bsym, instead call symbol_symbolS. Use symbol_get_bfdsym.
(weak_operand_overflow_check, make_right_shifted_expr): Use
symbol accessors.
* config/obj-coff.c: Don't #include struc-symbol.h.
(GET_FILENAME_STRING): Delete.
* config/obj-elf.c: Don't #include struc-symbol.h.
(elf_file_symbol): Use symbol accessors.
(elf_adjust_symtab): Call symbol_on_chain.
* config/obj-evax.c: Don't #include struc-symbol.h.
* config/tc-nds32.c: Likewise.
* config/tc-rl78.c: Likewise.
* config/tc-rx.c: Likewise.
* config/tc-alpha.c: Likewise.
(add_to_link_pool, s_alpha_comm): Use symbol accessors.
* config/tc-arc.c: Don't #include struc-symbol.h.
(arc_check_relocs): Use symbol accessors, testing gas symbol
section rather than bfd symbol section.
* config/tc-avr.c: Don't #include struc-symbol.h.
(avr_patch_gccisr_frag): Use symbol accessors.
* config/tc-bfin.c: Don't #include struc-symbol.h.
(bfin_loop_beginend): Use symbol accessors.
* config/tc-csky.c: Don't #include struc-symbol.h.
(v2_work_movih, v2_work_ori): Use symbol accessors. Check for
absolute symbol as well as O_constant.
* config/tc-riscv.c: Don't #include struc-symbol.h.
(riscv_pre_output_hook): Use symbol accessors.
* config/tc-s390.c: Don't #include struc-symbol.h.
(s390_literals): Use symbol accessors.
* config/tc-score.c (s3_build_la_pic, s3_build_lwst_pic): Use
symbol accessors.
(s3_relax_branch_inst16, s3_relax_cmpbranch_inst32): Don't
test symbol bsym.
* config/tc-score7.c: Don't #include struc-symbol.h.
(s7_build_la_pic, s7_build_lwst_pic): Use symbol accessors.
(s7_b32_relax_to_b16): Don't test symbol bsym.
* config/tc-sh.c: Don't #include struc-symbol.h.
(insert_loop_bounds): Use symbol accessors.
(sh_frob_section): Remove bogus symbol canonicalization.
* config/tc-tic54x.c: Don't #include struc-symbol.h.
(tic54x_bss): Use symbol accessors.
* config/tc-tilegx.c: Don't #include struc-symbol.h.
(emit_tilegx_instruction, tilegx_parse_name): Use symbol accessors.
* config/tc-tilepro.c: Don't #include struc-symbol.h.
(emit_tilepro_instruction, tilepro_parse_name): Use accessors.
* config/tc-xtensa.c: Don't #include struc-symbol.h.
(xg_assemble_vliw_tokens): Use symbol accessors.
(xg_order_trampoline_chain): Likewise.
* ehopt.c: Don't #include struc-symbol.h.
(check_eh_frame): Correct local symbol test. Use symbol accessors.
* write.c: Don't #include struc-symbol.h.
(create_note_reloc, maybe_generate_build_notes): Use symbol accessors.
* Makefile.in: Regenerate.
* po/POTFILES.in: Regenerate.
2018-10-29 07:07:24 +01:00
|
|
|
|
&& (bsym->section->flags & (SEC_CODE | SEC_LINK_ONCE)) == SEC_CODE
|
2018-05-14 16:32:43 +02:00
|
|
|
|
/* Not all linkonce sections are flagged... */
|
|
|
|
|
&& strncmp (S_GET_NAME (sym), ".gnu.linkonce", sizeof ".gnu.linkonce" - 1) != 0)
|
2018-04-26 16:12:42 +02:00
|
|
|
|
{
|
2018-05-14 16:32:43 +02:00
|
|
|
|
/* Create a version note. */
|
|
|
|
|
frag_now_fix ();
|
|
|
|
|
note = frag_more (note_size);
|
|
|
|
|
memset (note, 0, note_size);
|
2018-04-26 16:12:42 +02:00
|
|
|
|
|
2018-05-14 16:32:43 +02:00
|
|
|
|
if (target_big_endian)
|
2018-04-26 16:12:42 +02:00
|
|
|
|
{
|
2018-05-14 16:32:43 +02:00
|
|
|
|
note[3] = 8; /* strlen (name) + 1. */
|
|
|
|
|
note[7] = desc_size; /* Two 8-byte offsets. */
|
|
|
|
|
note[10] = NT_GNU_BUILD_ATTRIBUTE_OPEN >> 8;
|
|
|
|
|
note[11] = NT_GNU_BUILD_ATTRIBUTE_OPEN & 0xff;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
note[0] = 8; /* strlen (name) + 1. */
|
|
|
|
|
note[4] = desc_size; /* Two 8-byte offsets. */
|
|
|
|
|
note[8] = NT_GNU_BUILD_ATTRIBUTE_OPEN & 0xff;
|
|
|
|
|
note[9] = NT_GNU_BUILD_ATTRIBUTE_OPEN >> 8;
|
2018-04-26 16:12:42 +02:00
|
|
|
|
}
|
|
|
|
|
|
2018-05-14 16:32:43 +02:00
|
|
|
|
/* The a1 version number indicates that this note was
|
|
|
|
|
generated by the assembler and not the gcc annobin plugin. */
|
|
|
|
|
memcpy (note + 12, "GA$3a1", 8);
|
|
|
|
|
|
|
|
|
|
/* Create a relocation to install the start address of the note... */
|
2018-07-06 12:46:14 +02:00
|
|
|
|
create_note_reloc (sec, sym, total_size + 20, desc_reloc, 0, note);
|
2018-05-14 16:32:43 +02:00
|
|
|
|
|
|
|
|
|
/* ...and another one to install the end address. */
|
2018-07-06 12:46:14 +02:00
|
|
|
|
create_note_reloc (sec, sym, total_size + desc2_offset, desc_reloc,
|
Move struc-symbol.h to symbols.c
This file was never supposed to be widely used. The fact that it has
found its way into many gas files led to bugs, typically when code
expecting a symbolS* to point at a struct symbol is presented with a
struct local_symbol. Also, commit 158184ac9e changed these structs in
2012 but didn't catch all places where symbol bsym was being used to
test for a local_symbol.
* Makefile.am (HFILES): Delete struc-symbol.h.
* doc/internals.texi: Delete struc-symbol.h reference and out
of date local symbol description.
* struc-symbol.h: Delete. Move contents to..
* symbols.c: ..here.
(symbol_on_chain, symbol_symbolS): New functions.
* symbols.h (symbol_on_chain, symbol_symbolS): Declare.
* cgen.c: Don't #include struc-symbol.h.
(gas_cgen_parse_operand): Don't test for local_symbol using
bsym, instead call symbol_symbolS. Use symbol_get_bfdsym.
(weak_operand_overflow_check, make_right_shifted_expr): Use
symbol accessors.
* config/obj-coff.c: Don't #include struc-symbol.h.
(GET_FILENAME_STRING): Delete.
* config/obj-elf.c: Don't #include struc-symbol.h.
(elf_file_symbol): Use symbol accessors.
(elf_adjust_symtab): Call symbol_on_chain.
* config/obj-evax.c: Don't #include struc-symbol.h.
* config/tc-nds32.c: Likewise.
* config/tc-rl78.c: Likewise.
* config/tc-rx.c: Likewise.
* config/tc-alpha.c: Likewise.
(add_to_link_pool, s_alpha_comm): Use symbol accessors.
* config/tc-arc.c: Don't #include struc-symbol.h.
(arc_check_relocs): Use symbol accessors, testing gas symbol
section rather than bfd symbol section.
* config/tc-avr.c: Don't #include struc-symbol.h.
(avr_patch_gccisr_frag): Use symbol accessors.
* config/tc-bfin.c: Don't #include struc-symbol.h.
(bfin_loop_beginend): Use symbol accessors.
* config/tc-csky.c: Don't #include struc-symbol.h.
(v2_work_movih, v2_work_ori): Use symbol accessors. Check for
absolute symbol as well as O_constant.
* config/tc-riscv.c: Don't #include struc-symbol.h.
(riscv_pre_output_hook): Use symbol accessors.
* config/tc-s390.c: Don't #include struc-symbol.h.
(s390_literals): Use symbol accessors.
* config/tc-score.c (s3_build_la_pic, s3_build_lwst_pic): Use
symbol accessors.
(s3_relax_branch_inst16, s3_relax_cmpbranch_inst32): Don't
test symbol bsym.
* config/tc-score7.c: Don't #include struc-symbol.h.
(s7_build_la_pic, s7_build_lwst_pic): Use symbol accessors.
(s7_b32_relax_to_b16): Don't test symbol bsym.
* config/tc-sh.c: Don't #include struc-symbol.h.
(insert_loop_bounds): Use symbol accessors.
(sh_frob_section): Remove bogus symbol canonicalization.
* config/tc-tic54x.c: Don't #include struc-symbol.h.
(tic54x_bss): Use symbol accessors.
* config/tc-tilegx.c: Don't #include struc-symbol.h.
(emit_tilegx_instruction, tilegx_parse_name): Use symbol accessors.
* config/tc-tilepro.c: Don't #include struc-symbol.h.
(emit_tilepro_instruction, tilepro_parse_name): Use accessors.
* config/tc-xtensa.c: Don't #include struc-symbol.h.
(xg_assemble_vliw_tokens): Use symbol accessors.
(xg_order_trampoline_chain): Likewise.
* ehopt.c: Don't #include struc-symbol.h.
(check_eh_frame): Correct local symbol test. Use symbol accessors.
* write.c: Don't #include struc-symbol.h.
(create_note_reloc, maybe_generate_build_notes): Use symbol accessors.
* Makefile.in: Regenerate.
* po/POTFILES.in: Regenerate.
2018-10-29 07:07:24 +01:00
|
|
|
|
bfd_get_section_size (bsym->section),
|
2018-05-14 16:32:43 +02:00
|
|
|
|
note);
|
|
|
|
|
|
|
|
|
|
total_size += note_size;
|
|
|
|
|
/* FIXME: Maybe add a note recording the assembler command line and version ? */
|
|
|
|
|
}
|
2018-04-26 16:12:42 +02:00
|
|
|
|
|
|
|
|
|
/* Install the note(s) into the section. */
|
2018-05-14 16:32:43 +02:00
|
|
|
|
if (total_size)
|
|
|
|
|
bfd_set_section_contents (stdoutput, sec, (bfd_byte *) note, 0, total_size);
|
2018-04-26 16:12:42 +02:00
|
|
|
|
subsegs_finish_section (sec);
|
|
|
|
|
relax_segment (seg_info (sec)->frchainP->frch_root, sec, 0);
|
|
|
|
|
size_seg (stdoutput, sec, NULL);
|
|
|
|
|
}
|
|
|
|
|
#endif /* OBJ_ELF */
|
2014-09-29 04:12:10 +02:00
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
/* Write the object file. */
|
|
|
|
|
|
|
|
|
|
void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
write_object_file (void)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2006-05-08 01:03:48 +02:00
|
|
|
|
struct relax_seg_info rsi;
|
* README-vms: Delete.
* config-gas.com: Delete.
* makefile.vms: Delete.
* vmsconf.sh: Delete.
* config/atof-tahoe.c: Delete.
* config/m88k-opcode.h: Delete.
* config/obj-bout.c: Delete.
* config/obj-bout.h: Delete.
* config/obj-hp300.c: Delete.
* config/obj-hp300.h: Delete.
* config/tc-a29k.c: Delete.
* config/tc-a29k.h: Delete.
* config/tc-h8500.c: Delete.
* config/tc-h8500.h: Delete.
* config/tc-m88k.c: Delete.
* config/tc-m88k.h: Delete.
* config/tc-tahoe.c: Delete.
* config/tc-tahoe.h: Delete.
* config/tc-tic80.c: Delete.
* config/tc-tic80.h: Delete.
* config/tc-w65.c: Delete.
* config/tc-w65.h: Delete.
* config/te-aux.h: Delete.
* config/te-delt88.h: Delete.
* config/te-delta.h: Delete.
* config/te-dpx2.h: Delete.
* config/te-hp300.h: Delete.
* config/te-ic960.h: Delete.
* config/vms-a-conf.h: Delete.
* doc/c-a29k.texi: Delete.
* doc/c-h8500.texi: Delete.
* doc/c-m88k.texi: Delete.
* README: Remove obsolete examples, and list of supported targets.
* Makefile.am: Remove a29k, h8500, m88k, tahoe, tic80, w65,
bout and hp300 support.
(DEP_FLAGS): Don't define BFD_ASSEMBLER.
* configure.in: Remove --enable-bfd-assembler, need_bfd,
primary_bfd_gas.
* configure.tgt: Remove a29k, h8300-coff, h8500-*, i960 non-elf,
m68k non bfd, m88k, or32-coff, tic80-*, vax non-bfd, w65k-*, *-nindy.
* as.c: Remove all non-BFD_ASSEMBLER code, support for above targets.
* as.h: Likewise.
* dw2gencfi.c: Likewise.
* dwarf2dbg.c: Likewise.
* ehopt.c: Likewise.
* input-file.c: Likewise.
* listing.c: Likewise.
* literal.c: Likewise.
* messages.c: Likewise.
* obj.h: Likewise.
* output-file.c: Likewise.
* read.c: Likewise.
* stabs.c: Likewise.
* struc-symbol.h: Likewise.
* subsegs.c: Likewise.
* subsegs.h: Likewise.
* symbols.c: Likewise.
* symbols.h: Likewise.
* tc.h: Likewise.
* write.c: Likewise.
* write.h: Likewise.
* config/aout_gnu.h: Likewise.
* config/obj-aout.c: Likewise.
* config/obj-aout.h: Likewise.
* config/obj-coff.c: Likewise.
* config/obj-coff.h: Likewise.
* config/obj-evax.h: Likewise.
* config/obj-ieee.h: Likewise.
* config/tc-arm.c: Likewise.
* config/tc-arm.h: Likewise.
* config/tc-avr.c: Likewise.
* config/tc-avr.h: Likewise.
* config/tc-crx.h: Likewise.
* config/tc-d10v.h: Likewise.
* config/tc-d30v.h: Likewise.
* config/tc-dlx.h: Likewise.
* config/tc-fr30.h: Likewise.
* config/tc-frv.h: Likewise.
* config/tc-h8300.c: Likewise.
* config/tc-h8300.h: Likewise.
* config/tc-hppa.h: Likewise.
* config/tc-i370.h: Likewise.
* config/tc-i386.c: Likewise.
* config/tc-i386.h: Likewise.
* config/tc-i860.h: Likewise.
* config/tc-i960.c: Likewise.
* config/tc-i960.h: Likewise.
* config/tc-ip2k.h: Likewise.
* config/tc-iq2000.h: Likewise.
* config/tc-m32c.h: Likewise.
* config/tc-m32r.h: Likewise.
* config/tc-m68hc11.h: Likewise.
* config/tc-m68k.c: Likewise.
* config/tc-m68k.h: Likewise.
* config/tc-maxq.c: Likewise.
* config/tc-maxq.h: Likewise.
* config/tc-mcore.c: Likewise.
* config/tc-mcore.h: Likewise.
* config/tc-mn10200.h: Likewise.
* config/tc-mn10300.c: Likewise.
* config/tc-mn10300.h: Likewise.
* config/tc-ms1.h: Likewise.
* config/tc-msp430.c: Likewise.
* config/tc-msp430.h: Likewise.
* config/tc-ns32k.c: Likewise.
* config/tc-ns32k.h: Likewise.
* config/tc-openrisc.h: Likewise.
* config/tc-or32.c: Likewise.
* config/tc-or32.h: Likewise.
* config/tc-ppc.c: Likewise.
* config/tc-ppc.h: Likewise.
* config/tc-s390.h: Likewise.
* config/tc-sh.c: Likewise.
* config/tc-sh.h: Likewise.
* config/tc-sparc.c: Likewise.
* config/tc-tic30.c: Likewise.
* config/tc-tic30.h: Likewise.
* config/tc-tic4x.c: Likewise.
* config/tc-tic4x.h: Likewise.
* config/tc-tic54x.c: Likewise.
* config/tc-tic54x.h: Likewise.
* config/tc-v850.h: Likewise.
* config/tc-vax.c: Likewise.
* config/tc-vax.h: Likewise.
* config/tc-xstormy16.h: Likewise.
* config/tc-xtensa.h: Likewise.
* config/tc-z8k.c: Likewise.
* config/tc-z8k.h: Likewise.
* config/vms-a-conf.h
* doc/Makefile.am: Likewise.
* doc/all.texi: Likewise.
* doc/as.texinfo: Likewise.
* doc/Makefile.in: Regenerate.
* Makefile.in: Regenerate.
* configure: Regenerate.
* config.in: Regenerate.
* po/POTFILES.in: Regenerate.
2005-08-11 03:25:29 +02:00
|
|
|
|
#ifndef WORKING_DOT_WORD
|
2000-07-20 22:07:09 +02:00
|
|
|
|
fragS *fragP; /* Track along all frags. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#endif
|
|
|
|
|
|
2014-06-16 03:34:04 +02:00
|
|
|
|
subsegs_finish ();
|
|
|
|
|
|
2012-02-21 14:39:37 +01:00
|
|
|
|
#ifdef md_pre_output_hook
|
|
|
|
|
md_pre_output_hook;
|
|
|
|
|
#endif
|
|
|
|
|
|
2012-02-21 10:13:02 +01:00
|
|
|
|
#ifdef md_pre_relax_hook
|
|
|
|
|
md_pre_relax_hook;
|
|
|
|
|
#endif
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
/* From now on, we don't care about sub-segments. Build one frag chain
|
2016-11-25 21:01:41 +01:00
|
|
|
|
for each segment. Linked through fr_next. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
/* Remove the sections created by gas for its own purposes. */
|
|
|
|
|
{
|
|
|
|
|
int i;
|
|
|
|
|
|
2005-05-03 03:05:03 +02:00
|
|
|
|
bfd_section_list_remove (stdoutput, reg_section);
|
|
|
|
|
bfd_section_list_remove (stdoutput, expr_section);
|
|
|
|
|
stdoutput->section_count -= 2;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
i = 0;
|
|
|
|
|
bfd_map_over_sections (stdoutput, renumber_sections, &i);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
bfd_map_over_sections (stdoutput, chain_frchains_together, (char *) 0);
|
|
|
|
|
|
|
|
|
|
/* We have two segments. If user gave -R flag, then we must put the
|
|
|
|
|
data frags into the text segment. Do this before relaxing so
|
|
|
|
|
we know to take advantage of -R and make shorter addresses. */
|
|
|
|
|
if (flag_readonly_data_in_text)
|
|
|
|
|
{
|
|
|
|
|
merge_data_into_text ();
|
|
|
|
|
}
|
|
|
|
|
|
2006-05-08 01:03:48 +02:00
|
|
|
|
rsi.pass = 0;
|
2001-03-30 04:19:36 +02:00
|
|
|
|
while (1)
|
|
|
|
|
{
|
2001-04-04 05:05:47 +02:00
|
|
|
|
#ifndef WORKING_DOT_WORD
|
|
|
|
|
/* We need to reset the markers in the broken word list and
|
|
|
|
|
associated frags between calls to relax_segment (via
|
|
|
|
|
relax_seg). Since the broken word list is global, we do it
|
|
|
|
|
once per round, rather than locally in relax_segment for each
|
|
|
|
|
segment. */
|
|
|
|
|
struct broken_word *brokp;
|
|
|
|
|
|
|
|
|
|
for (brokp = broken_words;
|
|
|
|
|
brokp != (struct broken_word *) NULL;
|
|
|
|
|
brokp = brokp->next_broken_word)
|
|
|
|
|
{
|
|
|
|
|
brokp->added = 0;
|
|
|
|
|
|
|
|
|
|
if (brokp->dispfrag != (fragS *) NULL
|
|
|
|
|
&& brokp->dispfrag->fr_type == rs_broken_word)
|
|
|
|
|
brokp->dispfrag->fr_subtype = 0;
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
|
2006-05-08 01:03:48 +02:00
|
|
|
|
rsi.changed = 0;
|
|
|
|
|
bfd_map_over_sections (stdoutput, relax_seg, &rsi);
|
|
|
|
|
rsi.pass++;
|
|
|
|
|
if (!rsi.changed)
|
2001-03-30 04:19:36 +02:00
|
|
|
|
break;
|
|
|
|
|
}
|
2001-05-24 10:19:32 +02:00
|
|
|
|
|
2001-07-03 17:04:19 +02:00
|
|
|
|
/* Note - Most ports will use the default value of
|
|
|
|
|
TC_FINALIZE_SYMS_BEFORE_SIZE_SEG, which 1. This will force
|
|
|
|
|
local symbols to be resolved, removing their frag information.
|
|
|
|
|
Some ports however, will not have finished relaxing all of
|
|
|
|
|
their frags and will still need the local symbol frag
|
|
|
|
|
information. These ports can set
|
|
|
|
|
TC_FINALIZE_SYMS_BEFORE_SIZE_SEG to 0. */
|
|
|
|
|
finalize_syms = TC_FINALIZE_SYMS_BEFORE_SIZE_SEG;
|
|
|
|
|
|
2001-03-30 04:19:36 +02:00
|
|
|
|
bfd_map_over_sections (stdoutput, size_seg, (char *) 0);
|
|
|
|
|
|
2001-06-27 10:49:42 +02:00
|
|
|
|
/* Relaxation has completed. Freeze all syms. */
|
|
|
|
|
finalize_syms = 1;
|
|
|
|
|
|
2017-07-21 11:09:06 +02:00
|
|
|
|
dwarf2dbg_final_check ();
|
|
|
|
|
|
2003-04-01 17:50:31 +02:00
|
|
|
|
#ifdef md_post_relax_hook
|
|
|
|
|
md_post_relax_hook;
|
|
|
|
|
#endif
|
|
|
|
|
|
2014-09-29 04:12:10 +02:00
|
|
|
|
#ifdef OBJ_ELF
|
|
|
|
|
if (IS_ELF)
|
|
|
|
|
create_obj_attrs_section ();
|
|
|
|
|
#endif
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#ifndef WORKING_DOT_WORD
|
|
|
|
|
{
|
|
|
|
|
struct broken_word *lie;
|
|
|
|
|
struct broken_word **prevP;
|
|
|
|
|
|
|
|
|
|
prevP = &broken_words;
|
|
|
|
|
for (lie = broken_words; lie; lie = lie->next_broken_word)
|
|
|
|
|
if (!lie->added)
|
|
|
|
|
{
|
|
|
|
|
expressionS exp;
|
|
|
|
|
|
|
|
|
|
subseg_change (lie->seg, lie->subseg);
|
|
|
|
|
exp.X_op = O_subtract;
|
|
|
|
|
exp.X_add_symbol = lie->add;
|
|
|
|
|
exp.X_op_symbol = lie->sub;
|
|
|
|
|
exp.X_add_number = lie->addnum;
|
|
|
|
|
#ifdef TC_CONS_FIX_NEW
|
|
|
|
|
TC_CONS_FIX_NEW (lie->frag,
|
2000-07-20 22:07:09 +02:00
|
|
|
|
lie->word_goes_here - lie->frag->fr_literal,
|
gas TC_PARSE_CONS_EXPRESSION communication with TC_CONS_FIX_NEW
A number of targets pass extra information from TC_PARSE_CONS_EXPRESSION
to TC_CONS_FIX_NEW via static variables. That's OK, but not best
practice. tc-ppc.c goes further in implementing its own replacement
for cons(), because the generic one doesn't allow relocation modifiers
on constants. This patch fixes both of these warts.
* gas/config/tc-alpha.h (TC_CONS_FIX_NEW): Add RELOC parameter.
* gas/config/tc-arc.c (arc_cons_fix_new): Add reloc parameter.
* gas/config/tc-arc.h (arc_cons_fix_new): Update prototype.
(TC_CONS_FIX_NEW): Add RELOC parameter.
* gas/config/tc-arm.c (cons_fix_new_arm): Similarly
* gas/config/tc-arm.h (cons_fix_new_arm, TC_CONS_FIX_NEW): Similarly.
* gas/config/tc-cr16.c (cr16_cons_fix_new): Similarly.
* gas/config/tc-cr16.h (cr16_cons_fix_new, TC_CONS_FIX_NEW): Similarly.
* gas/config/tc-crx.h (TC_CONS_FIX_NEW): Similarly.
* gas/config/tc-m32c.c (m32c_cons_fix_new): Similarly.
* gas/config/tc-m32c.h (m32c_cons_fix_new, TC_CONS_FIX_NEW): Similarly.
* gas/config/tc-mn10300.c (mn10300_cons_fix_new): Similarly.
* gas/config/tc-mn10300.h (mn10300_cons_fix_new, TC_CONS_FIX_NEW):
Similarly.
* gas/config/tc-ns32k.c (cons_fix_new_ns32k): Similarly.
* gas/config/tc-ns32k.h (cons_fix_new_ns32k): Similarly.
* gas/config/tc-pj.c (pj_cons_fix_new_pj): Similarly.
* gas/config/tc-pj.h (pj_cons_fix_new_pj, TC_CONS_FIX_NEW): Similarly.
* gas/config/tc-rx.c (rx_cons_fix_new): Similarly.
* gas/config/tc-rx.h (rx_cons_fix_new, TC_CONS_FIX_NEW): Similarly.
* gas/config/tc-sh.c (sh_cons_fix_new): Similarly.
* gas/config/tc-sh.h (sh_cons_fix_new, TC_CONS_FIX_NEW): Similarly.
* gas/config/tc-tic54x.c (tic54x_cons_fix_new): Similarly.
* gas/config/tc-tic54x.h (tic54x_cons_fix_new, TC_CONS_FIX_NEW):
Similarly.
* gas/config/tc-tic6x.c (tic6x_cons_fix_new): Similarly.
* gas/config/tc-tic6x.h (tic6x_cons_fix_new, TC_CONS_FIX_NEW):
Similarly.
* gas/config/tc-arc.c (arc_parse_cons_expression): Return reloc.
* gas/config/tc-arc.h (arc_parse_cons_expression): Update proto.
* gas/config/tc-avr.c (exp_mod_data): Make global.
(pexp_mod_data): Delete.
(avr_parse_cons_expression): Return exp_mod_data pointer.
(avr_cons_fix_new): Add exp_mod_data_t pointer param.
(exp_mod_data_t): Move typedef..
* gas/config/tc-avr.h: ..to here.
(exp_mod_data): Declare.
(TC_PARSE_CONS_RETURN_TYPE, TC_PARSE_CONS_RETURN_NONE): Define.
(avr_parse_cons_expression, avr_cons_fix_new): Update prototype.
(TC_CONS_FIX_NEW): Update.
* gas/config/tc-hppa.c (hppa_field_selector): Delete static var.
(cons_fix_new_hppa): Add hppa_field_selector param.
(fix_new_hppa): Adjust.
(parse_cons_expression_hppa): Return field selector.
* gas/config/tc-hppa.h (parse_cons_expression_hppa): Update proto.
(cons_fix_new_hppa): Likewise.
(TC_PARSE_CONS_RETURN_TYPE, TC_PARSE_CONS_RETURN_NONE): Define.
* gas/config/tc-i386.c (got_reloc): Delete static var.
(x86_cons_fix_new): Add reloc param.
(x86_cons): Return got reloc.
* gas/config/tc-i386.h (x86_cons, x86_cons_fix_new): Update proto.
(TC_CONS_FIX_NEW): Add RELOC param.
* gas/config/tc-ia64.c (ia64_cons_fix_new): Add reloc param. Adjust
calls.
* gas/config/tc-ia64.h (ia64_cons_fix_new): Update prototype.
(TC_CONS_FIX_NEW): Add reloc param.
* gas/config/tc-microblaze.c (parse_cons_expression_microblaze):
Return reloc.
(cons_fix_new_microblaze): Add reloc param.
* gas/config/tc-microblaze.h: Formatting.
(parse_cons_expression_microblaze): Update proto.
(cons_fix_new_microblaze): Likewise.
* gas/config/tc-nios2.c (nios2_tls_ldo_reloc): Delete static var.
(nios2_cons): Return ldo reloc.
(nios2_cons_fix_new): Delete.
* gas/config/tc-nios2.h (nios2_cons): Update prototype.
(nios2_cons_fix_new, TC_CONS_FIX_NEW): Delete.
* gas/config/tc-ppc.c (md_pseudo_table): Remove quad, long, word,
short. Make llong use cons.
(ppc_elf_suffix): Return BFD_RELOC_NONE rather than BFD_RELOC_UNUSED.
(ppc_elf_cons): Delete.
(ppc_elf_parse_cons): New function.
(ppc_elf_validate_fix): Don't check for BFD_RELOC_UNUSED.
(md_assemble): Use BFD_RELOC_NONE rather than BFD_RELOC_UNUSED.
* gas/config/tc-ppc.h (TC_PARSE_CONS_EXPRESSION): Define
(ppc_elf_parse_cons): Declare.
* gas/config/tc-sparc.c (sparc_cons_special_reloc): Delete static var.
(sparc_cons): Return reloc specifier.
(cons_fix_new_sparc): Add reloc specifier param.
(sparc_cfi_emit_pcrel_expr): Use emit_expr_with_reloc.
* gas/config/tc-sparc.h (TC_PARSE_CONS_RETURN_TYPE): Define.
(TC_PARSE_CONS_RETURN_NONE): Define.
(sparc_cons, cons_fix_new_sparc): Update prototype.
* gas/config/tc-v850.c (hold_cons_reloc): Delete static var.
(v850_reloc_prefix): Use BFD_RELOC_NONE rather than BFD_RELOC_UNUSED.
(md_assemble): Likewise.
(parse_cons_expression_v850): Return reloc.
(cons_fix_new_v850): Add reloc parameter.
* gas/config/tc-v850.h (parse_cons_expression_v850): Update proto.
(cons_fix_new_v850): Likewise.
* gas/config/tc-vax.c (vax_cons_special_reloc): Delete static var.
(vax_cons): Return reloc.
(vax_cons_fix_new): Add reloc parameter.
* gas/config/tc-vax.h (vax_cons, vax_cons_fix_new): Update proto.
* gas/config/tc-xstormy16.c (xstormy16_cons_fix_new): Add reloc param.
* gas/config/tc-xstormy16.h (xstormy16_cons_fix_new): Update proto.
* gas/dwarf2dbg.c (TC_PARSE_CONS_RETURN_NONE): Provide default.
(emit_fixed_inc_line_addr): Adjust exmit_expr_fix calls.
* gas/read.c (TC_PARSE_CONS_EXPRESSION): Return value.
(do_parse_cons_expression): Adjust.
(cons_worker): Pass return value from TC_PARSE_CONS_EXPRESSION
to emit_expr_with_reloc.
(emit_expr_with_reloc): New function handling reloc, mostly
extracted from..
(emit_expr): ..here.
(emit_expr_fix): Add reloc param. Adjust TC_CONS_FIX_NEW invocation.
Handle reloc.
(parse_mri_cons): Convert to ISO.
* gas/read.h (TC_PARSE_CONS_RETURN_TYPE): Define.
(TC_PARSE_CONS_RETURN_NONE): Define.
(emit_expr_with_reloc): Declare.
(emit_expr_fix): Update prototype.
* gas/write.c (write_object_file): Update TC_CONS_FIX_NEW invocation.
2014-04-08 07:08:22 +02:00
|
|
|
|
2, &exp, TC_PARSE_CONS_RETURN_NONE);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#else
|
|
|
|
|
fix_new_exp (lie->frag,
|
|
|
|
|
lie->word_goes_here - lie->frag->fr_literal,
|
|
|
|
|
2, &exp, 0, BFD_RELOC_16);
|
|
|
|
|
#endif
|
|
|
|
|
*prevP = lie->next_broken_word;
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
prevP = &(lie->next_broken_word);
|
|
|
|
|
|
|
|
|
|
for (lie = broken_words; lie;)
|
|
|
|
|
{
|
|
|
|
|
struct broken_word *untruth;
|
|
|
|
|
char *table_ptr;
|
|
|
|
|
addressT table_addr;
|
|
|
|
|
addressT from_addr, to_addr;
|
|
|
|
|
int n, m;
|
|
|
|
|
|
|
|
|
|
subseg_change (lie->seg, lie->subseg);
|
|
|
|
|
fragP = lie->dispfrag;
|
|
|
|
|
|
|
|
|
|
/* Find out how many broken_words go here. */
|
|
|
|
|
n = 0;
|
2000-07-20 22:07:09 +02:00
|
|
|
|
for (untruth = lie;
|
|
|
|
|
untruth && untruth->dispfrag == fragP;
|
|
|
|
|
untruth = untruth->next_broken_word)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
if (untruth->added == 1)
|
|
|
|
|
n++;
|
|
|
|
|
|
|
|
|
|
table_ptr = lie->dispfrag->fr_opcode;
|
2000-07-20 22:07:09 +02:00
|
|
|
|
table_addr = (lie->dispfrag->fr_address
|
|
|
|
|
+ (table_ptr - lie->dispfrag->fr_literal));
|
1999-05-03 09:29:11 +02:00
|
|
|
|
/* Create the jump around the long jumps. This is a short
|
|
|
|
|
jump from table_ptr+0 to table_ptr+n*long_jump_size. */
|
|
|
|
|
from_addr = table_addr;
|
|
|
|
|
to_addr = table_addr + md_short_jump_size + n * md_long_jump_size;
|
2000-07-20 22:07:09 +02:00
|
|
|
|
md_create_short_jump (table_ptr, from_addr, to_addr, lie->dispfrag,
|
|
|
|
|
lie->add);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
table_ptr += md_short_jump_size;
|
|
|
|
|
table_addr += md_short_jump_size;
|
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
for (m = 0;
|
|
|
|
|
lie && lie->dispfrag == fragP;
|
|
|
|
|
m++, lie = lie->next_broken_word)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
if (lie->added == 2)
|
|
|
|
|
continue;
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Patch the jump table. */
|
2009-03-10 15:38:03 +01:00
|
|
|
|
for (untruth = (struct broken_word *) (fragP->fr_symbol);
|
2000-07-20 22:07:09 +02:00
|
|
|
|
untruth && untruth->dispfrag == fragP;
|
|
|
|
|
untruth = untruth->next_broken_word)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
if (untruth->use_jump == lie)
|
2009-03-10 15:38:03 +01:00
|
|
|
|
{
|
|
|
|
|
/* This is the offset from ??? to table_ptr+0.
|
|
|
|
|
The target is the same for all users of this
|
|
|
|
|
md_long_jump, but the "sub" bases (and hence the
|
|
|
|
|
offsets) may be different. */
|
|
|
|
|
addressT to_word = table_addr - S_GET_VALUE (untruth->sub);
|
|
|
|
|
#ifdef TC_CHECK_ADJUSTED_BROKEN_DOT_WORD
|
|
|
|
|
TC_CHECK_ADJUSTED_BROKEN_DOT_WORD (to_word, untruth);
|
|
|
|
|
#endif
|
|
|
|
|
md_number_to_chars (untruth->word_goes_here, to_word, 2);
|
|
|
|
|
}
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Install the long jump. */
|
|
|
|
|
/* This is a long jump from table_ptr+0 to the final target. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
from_addr = table_addr;
|
|
|
|
|
to_addr = S_GET_VALUE (lie->add) + lie->addnum;
|
2000-07-20 22:07:09 +02:00
|
|
|
|
md_create_long_jump (table_ptr, from_addr, to_addr, lie->dispfrag,
|
|
|
|
|
lie->add);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
table_ptr += md_long_jump_size;
|
|
|
|
|
table_addr += md_long_jump_size;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
2000-07-20 22:07:09 +02:00
|
|
|
|
#endif /* not WORKING_DOT_WORD */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
/* Resolve symbol values. This needs to be done before processing
|
|
|
|
|
the relocations. */
|
|
|
|
|
if (symbol_rootP)
|
|
|
|
|
{
|
|
|
|
|
symbolS *symp;
|
|
|
|
|
|
|
|
|
|
for (symp = symbol_rootP; symp; symp = symbol_next (symp))
|
2001-05-22 12:23:50 +02:00
|
|
|
|
resolve_symbol_value (symp);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
resolve_local_symbol_values ();
|
2007-03-26 14:23:48 +02:00
|
|
|
|
resolve_reloc_expr_symbols ();
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2018-04-26 16:12:42 +02:00
|
|
|
|
#ifdef OBJ_ELF
|
|
|
|
|
if (IS_ELF)
|
|
|
|
|
maybe_generate_build_notes ();
|
|
|
|
|
#endif
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
PROGRESS (1);
|
|
|
|
|
|
|
|
|
|
#ifdef tc_frob_file_before_adjust
|
|
|
|
|
tc_frob_file_before_adjust ();
|
|
|
|
|
#endif
|
|
|
|
|
#ifdef obj_frob_file_before_adjust
|
|
|
|
|
obj_frob_file_before_adjust ();
|
|
|
|
|
#endif
|
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
bfd_map_over_sections (stdoutput, adjust_reloc_syms, (char *) 0);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2002-09-05 02:01:18 +02:00
|
|
|
|
#ifdef tc_frob_file_before_fix
|
|
|
|
|
tc_frob_file_before_fix ();
|
|
|
|
|
#endif
|
|
|
|
|
#ifdef obj_frob_file_before_fix
|
|
|
|
|
obj_frob_file_before_fix ();
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
bfd_map_over_sections (stdoutput, fix_segment, (char *) 0);
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
/* Set up symbol table, and write it out. */
|
|
|
|
|
if (symbol_rootP)
|
|
|
|
|
{
|
|
|
|
|
symbolS *symp;
|
2005-02-07 04:13:10 +01:00
|
|
|
|
bfd_boolean skip_next_symbol = FALSE;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
for (symp = symbol_rootP; symp; symp = symbol_next (symp))
|
|
|
|
|
{
|
|
|
|
|
int punt = 0;
|
|
|
|
|
const char *name;
|
|
|
|
|
|
2005-02-07 04:13:10 +01:00
|
|
|
|
if (skip_next_symbol)
|
|
|
|
|
{
|
|
|
|
|
/* Don't do anything besides moving the value of the
|
|
|
|
|
symbol from the GAS value-field to the BFD value-field. */
|
|
|
|
|
symbol_get_bfdsym (symp)->value = S_GET_VALUE (symp);
|
|
|
|
|
skip_next_symbol = FALSE;
|
|
|
|
|
continue;
|
|
|
|
|
}
|
|
|
|
|
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
if (symbol_mri_common_p (symp))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
if (S_IS_EXTERNAL (symp))
|
|
|
|
|
as_bad (_("%s: global symbols not supported in common sections"),
|
|
|
|
|
S_GET_NAME (symp));
|
|
|
|
|
symbol_remove (symp, &symbol_rootP, &symbol_lastP);
|
|
|
|
|
continue;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
name = S_GET_NAME (symp);
|
|
|
|
|
if (name)
|
|
|
|
|
{
|
2000-07-20 22:07:09 +02:00
|
|
|
|
const char *name2 =
|
|
|
|
|
decode_local_label_name ((char *) S_GET_NAME (symp));
|
1999-05-03 09:29:11 +02:00
|
|
|
|
/* They only differ if `name' is a fb or dollar local
|
|
|
|
|
label name. */
|
|
|
|
|
if (name2 != name && ! S_IS_DEFINED (symp))
|
* read.c: Standardize error/warning messages - don't capitalise, no
final period or newline, don't say "ignored" or "zero assumed" for
as_bad messages. In some cases, change the wording to that used
elsewhere for similar messages.
* app.c, as.c, atof-generic.c, cgen.c, cond.c, depend.c, dwarf2dbg.c,
ecoff.c, expr.c, frags.c, input-file.c, input-scrub.c, listing.c,
output-file.c, stabs.c, subsegs.c, symbols.c, write.c: Likewise.
* ecoff.c (ecoff_directive_end): Test for missing name by
comparing input line pointers rather than reading string.
(ecoff_directive_ent): Likewise.
* read.c (s_set): Likewise.
(s_align): Report a warning rather than an error for
alignment too large.
(s_comm): Check for missing symbol name.
(s_lcomm_internal): Likewise.
(s_lsym): Likewise.
(s_globl): Use is_end_of_line instead of looking for '\n'.
(s_lcomm_internal): Likewise.
(ignore_rest_of_line): Report a warning rather than an error.
2001-08-01 03:44:25 +02:00
|
|
|
|
as_bad (_("local label `%s' is not defined"), name2);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Do it again, because adjust_reloc_syms might introduce
|
|
|
|
|
more symbols. They'll probably only be section symbols,
|
|
|
|
|
but they'll still need to have the values computed. */
|
2001-05-22 12:23:50 +02:00
|
|
|
|
resolve_symbol_value (symp);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
/* Skip symbols which were equated to undefined or common
|
2007-02-17 08:20:56 +01:00
|
|
|
|
symbols. */
|
gas/ChangeLog:
* read.c (potable): Add weakref.
(s_weakref): New.
* read.h (s_weakref): Declare.
* struc-symbol.h (struct symbol): Add sy_weakrefr and sy_weakrefd.
* symbols.c (colon): Clear weakrefr.
(symbol_find_exact): Rename to, and reimplement in terms of...
(symbol_find_exact_noref): ... new function.
(symbol_find): Likewise...
(symbol_find_noref): ... ditto.
(resolve_symbol_value): Resolve weakrefr without setting their
values.
(S_SET_WEAK): Call hook.
(S_GET_VALUE): Follow weakref link.
(S_SET_VALUE): Clear weakrefr.
(S_IS_WEAK): Follow weakref link.
(S_IS_WEAKREFR, S_SET_WEAKREFR, S_CLEAR_WEAKREFR): New.
(S_IS_WEAKREFD, S_SET_WEAKREFD, S_CLEAR_WEAKREFD): New.
(symbol_set_value_expression, symbol_set_frag): Clear weakrefr.
(symbol_mark_used): Follow weakref link.
(print_symbol_value_1): Print weak, weakrefr and weakrefd.
* symbols.h (symbol_find_noref, symbol_find_exact_noref): Declare.
(S_IS_WEAKREFR, S_SET_WEAKREFR, S_CLEAR_WEAKREFR): Declare.
(S_IS_WEAKREFD, S_SET_WEAKREFD, S_CLEAR_WEAKREFD): Declare.
* write.c (adust_reloc_syms): Follow weakref link. Do not
complain if target is undefined.
(write_object_file): Likewise. Remove weakrefr symbols. Drop
unreferenced weakrefd symbols.
* config/obj-coff.c (obj_frob_symbol): Do not force WEAKREFD
symbols EXTERNAL.
(pecoff_obj_set_weak_hook, pecoff_obj_clear_weak_hook): New.
* config/obj-coff.h (obj_set_weak_hook, obj_clear_weak_hook): Define.
* doc/as.texinfo: Document weakref.
* doc/internals.texi: Document new struct members, internal
functions and hooks.
gas/testsuite/ChangeLog:
* gas/all/weakref1.s, gas/all/weakref1.d: New test.
* gas/all/weakref1g.d, gas/all/weakref1l.d: New tests.
* gas/all/weakref1u.d, gas/all/weakref1w.d: New tests.
* gas/all/weakref2.s, gas/all/weakref3.s: New tests.
* gas/all/gas.exp: Run new tests.
2005-10-24 19:51:42 +02:00
|
|
|
|
if (symbol_equated_reloc_p (symp)
|
|
|
|
|
|| S_IS_WEAKREFR (symp))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2009-12-11 14:42:17 +01:00
|
|
|
|
const char *sname = S_GET_NAME (symp);
|
|
|
|
|
|
2005-04-26 19:15:22 +02:00
|
|
|
|
if (S_IS_COMMON (symp)
|
2009-12-11 14:42:17 +01:00
|
|
|
|
&& !TC_FAKE_LABEL (sname)
|
2017-08-11 16:41:51 +02:00
|
|
|
|
&& !S_IS_WEAKREFR (symp))
|
2005-04-26 19:15:22 +02:00
|
|
|
|
{
|
|
|
|
|
expressionS *e = symbol_get_value_expression (symp);
|
2009-12-11 14:42:17 +01:00
|
|
|
|
|
2017-08-11 16:41:51 +02:00
|
|
|
|
as_bad (_("`%s' can't be equated to common symbol `%s'"),
|
2009-12-11 14:42:17 +01:00
|
|
|
|
sname, S_GET_NAME (e->X_add_symbol));
|
2005-04-26 19:15:22 +02:00
|
|
|
|
}
|
2008-03-03 16:28:58 +01:00
|
|
|
|
if (S_GET_SEGMENT (symp) == reg_section)
|
|
|
|
|
{
|
|
|
|
|
/* Report error only if we know the symbol name. */
|
|
|
|
|
if (S_GET_NAME (symp) != reg_section->name)
|
|
|
|
|
as_bad (_("can't make global register symbol `%s'"),
|
2009-12-11 14:42:17 +01:00
|
|
|
|
sname);
|
2008-03-03 16:28:58 +01:00
|
|
|
|
}
|
1999-05-03 09:29:11 +02:00
|
|
|
|
symbol_remove (symp, &symbol_rootP, &symbol_lastP);
|
|
|
|
|
continue;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#ifdef obj_frob_symbol
|
|
|
|
|
obj_frob_symbol (symp, punt);
|
|
|
|
|
#endif
|
|
|
|
|
#ifdef tc_frob_symbol
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
if (! punt || symbol_used_in_reloc_p (symp))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
tc_frob_symbol (symp, punt);
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
/* If we don't want to keep this symbol, splice it out of
|
|
|
|
|
the chain now. If EMIT_SECTION_SYMBOLS is 0, we never
|
|
|
|
|
want section symbols. Otherwise, we skip local symbols
|
|
|
|
|
and symbols that the frob_symbol macros told us to punt,
|
|
|
|
|
but we keep such symbols if they are used in relocs. */
|
2002-09-05 02:01:18 +02:00
|
|
|
|
if (symp == abs_section_sym
|
|
|
|
|
|| (! EMIT_SECTION_SYMBOLS
|
|
|
|
|
&& symbol_section_p (symp))
|
2005-04-20 19:40:01 +02:00
|
|
|
|
/* Note that S_IS_EXTERNAL and S_IS_LOCAL are not always
|
1999-05-03 09:29:11 +02:00
|
|
|
|
opposites. Sometimes the former checks flags and the
|
|
|
|
|
latter examines the name... */
|
2005-04-20 19:40:01 +02:00
|
|
|
|
|| (!S_IS_EXTERNAL (symp)
|
2005-11-17 14:32:27 +01:00
|
|
|
|
&& (punt || S_IS_LOCAL (symp) ||
|
|
|
|
|
(S_IS_WEAKREFD (symp) && ! symbol_used_p (symp)))
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
&& ! symbol_used_in_reloc_p (symp)))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
symbol_remove (symp, &symbol_rootP, &symbol_lastP);
|
2000-07-20 22:07:09 +02:00
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
/* After symbol_remove, symbol_next(symp) still returns
|
|
|
|
|
the one that came after it in the chain. So we don't
|
|
|
|
|
need to do any extra cleanup work here. */
|
|
|
|
|
continue;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Make sure we really got a value for the symbol. */
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
if (! symbol_resolved_p (symp))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
* read.c: Standardize error/warning messages - don't capitalise, no
final period or newline, don't say "ignored" or "zero assumed" for
as_bad messages. In some cases, change the wording to that used
elsewhere for similar messages.
* app.c, as.c, atof-generic.c, cgen.c, cond.c, depend.c, dwarf2dbg.c,
ecoff.c, expr.c, frags.c, input-file.c, input-scrub.c, listing.c,
output-file.c, stabs.c, subsegs.c, symbols.c, write.c: Likewise.
* ecoff.c (ecoff_directive_end): Test for missing name by
comparing input line pointers rather than reading string.
(ecoff_directive_ent): Likewise.
* read.c (s_set): Likewise.
(s_align): Report a warning rather than an error for
alignment too large.
(s_comm): Check for missing symbol name.
(s_lcomm_internal): Likewise.
(s_lsym): Likewise.
(s_globl): Use is_end_of_line instead of looking for '\n'.
(s_lcomm_internal): Likewise.
(ignore_rest_of_line): Report a warning rather than an error.
2001-08-01 03:44:25 +02:00
|
|
|
|
as_bad (_("can't resolve value for symbol `%s'"),
|
1999-05-03 09:29:11 +02:00
|
|
|
|
S_GET_NAME (symp));
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
symbol_mark_resolved (symp);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* Set the value into the BFD symbol. Up til now the value
|
|
|
|
|
has only been kept in the gas symbolS struct. */
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
symbol_get_bfdsym (symp)->value = S_GET_VALUE (symp);
|
2005-02-07 04:13:10 +01:00
|
|
|
|
|
|
|
|
|
/* A warning construct is a warning symbol followed by the
|
|
|
|
|
symbol warned about. Don't let anything object-format or
|
|
|
|
|
target-specific muck with it; it's ready for output. */
|
|
|
|
|
if (symbol_get_bfdsym (symp)->flags & BSF_WARNING)
|
|
|
|
|
skip_next_symbol = TRUE;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
PROGRESS (1);
|
|
|
|
|
|
|
|
|
|
/* Now do any format-specific adjustments to the symbol table, such
|
|
|
|
|
as adding file symbols. */
|
|
|
|
|
#ifdef tc_adjust_symtab
|
|
|
|
|
tc_adjust_symtab ();
|
|
|
|
|
#endif
|
|
|
|
|
#ifdef obj_adjust_symtab
|
|
|
|
|
obj_adjust_symtab ();
|
|
|
|
|
#endif
|
|
|
|
|
|
2008-03-03 16:28:58 +01:00
|
|
|
|
/* Stop if there is an error. */
|
|
|
|
|
if (had_errors ())
|
|
|
|
|
return;
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
/* Now that all the sizes are known, and contents correct, we can
|
|
|
|
|
start writing to the file. */
|
2011-08-04 22:53:58 +02:00
|
|
|
|
set_symtab ();
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
/* If *_frob_file changes the symbol value at this point, it is
|
|
|
|
|
responsible for moving the changed value into symp->bsym->value
|
|
|
|
|
as well. Hopefully all symbol value changing can be done in
|
|
|
|
|
*_frob_symbol. */
|
|
|
|
|
#ifdef tc_frob_file
|
|
|
|
|
tc_frob_file ();
|
|
|
|
|
#endif
|
|
|
|
|
#ifdef obj_frob_file
|
|
|
|
|
obj_frob_file ();
|
|
|
|
|
#endif
|
2009-08-17 13:45:23 +02:00
|
|
|
|
#ifdef obj_coff_generate_pdata
|
|
|
|
|
obj_coff_generate_pdata ();
|
|
|
|
|
#endif
|
2018-04-26 16:12:42 +02:00
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
bfd_map_over_sections (stdoutput, write_relocs, (char *) 0);
|
|
|
|
|
|
2009-08-31 20:45:26 +02:00
|
|
|
|
#ifdef tc_frob_file_after_relocs
|
1999-05-03 09:29:11 +02:00
|
|
|
|
tc_frob_file_after_relocs ();
|
|
|
|
|
#endif
|
|
|
|
|
#ifdef obj_frob_file_after_relocs
|
|
|
|
|
obj_frob_file_after_relocs ();
|
|
|
|
|
#endif
|
2009-08-31 20:45:26 +02:00
|
|
|
|
|
Properly implement STT_COMMON
The BFD configure option, --enable-elf-stt-common, can't be to used to
verify STT_COMMON implementation with the normal binutils build. Instead,
this patch removes it from BFD. It adds --elf-stt-common=[no|yes] to ELF
assembler/objcopy and adds -z common/-z nocommon to ld.
A configure option, --enable-elf-stt-common, is added to gas to specify
whether ELF assembler should generate common symbols with the STT_COMMON
type by default.
Since BSF_KEEP_G is never used, it is renamed to BSF_ELF_COMMON for ELF
common symbols.
bfd/
PR ld/19645
* bfd.c (bfd): Change flags to 20 bits.
(BFD_CONVERT_ELF_COMMON): New.
(BFD_USE_ELF_STT_COMMON): Likewise.
(BFD_FLAGS_SAVED): Add BFD_CONVERT_ELF_COMMON and
BFD_USE_ELF_STT_COMMON.
(BFD_FLAGS_FOR_BFD_USE_MASK): Likewise.
* configure.ac: Remove --enable-elf-stt-common.
* elf.c (swap_out_syms): Choose STT_COMMON or STT_OBJECT for
common symbol depending on BFD_CONVERT_ELF_COMMON and
BFD_USE_ELF_STT_COMMON.
* elfcode.h (elf_slurp_symbol_table): Set BSF_ELF_COMMON for
STT_COMMON.
* elflink.c (bfd_elf_link_mark_dynamic_symbol): Also check
STT_COMMON.
(elf_link_convert_common_type): New function.
(elf_link_output_extsym): Choose STT_COMMON or STT_OBJECT for
common symbol depending on BFD_CONVERT_ELF_COMMON and
BFD_USE_ELF_STT_COMMON. Set sym.st_info after sym.st_shndx.
* elfxx-target.h (TARGET_BIG_SYM): Add BFD_CONVERT_ELF_COMMON
and BFD_USE_ELF_STT_COMMON to object_flags.
(TARGET_LITTLE_SYM): Likewise.
* syms.c (BSF_KEEP_G): Renamed to ...
(BSF_ELF_COMMON): This.
* bfd-in2.h: Regenerated.
* config.in: Likewise.
* configure: Likewise.
binutils/
PR ld/19645
* NEWS: Mention --elf-stt-common= for objcopy.
* doc/binutils.texi: Document --elf-stt-common= for objcopy.
* objcopy.c (do_elf_stt_common): New.
(command_line_switch): Add OPTION_ELF_STT_COMMON.
(copy_options): Add --elf-stt-common=.
(copy_usage): Add --elf-stt-common=.
(copy_object): Also check do_elf_stt_common for ELF targets.
(copy_file): Handle do_elf_stt_common.
(copy_main): Handle OPTION_ELF_STT_COMMON.
* readelf.c (apply_relocations): Support STT_COMMON.
* testsuite/binutils-all/common-1.s: New file.
* testsuite/binutils-all/common-1a.d: Likewise.
* testsuite/binutils-all/common-1b.d: Likewise.
* testsuite/binutils-all/common-1c.d: Likewise.
* testsuite/binutils-all/common-1d.d: Likewise.
* testsuite/binutils-all/common-1e.d: Likewise.
* testsuite/binutils-all/common-1f.d: Likewise.
* testsuite/binutils-all/common-2.s: Likewise.
* testsuite/binutils-all/common-2a.d: Likewise.
* testsuite/binutils-all/common-2b.d: Likewise.
* testsuite/binutils-all/common-2c.d: Likewise.
* testsuite/binutils-all/common-2d.d: Likewise.
* testsuite/binutils-all/common-2e.d: Likewise.
* testsuite/binutils-all/common-2f.d: Likewise.
* testsuite/binutils-all/objcopy.exp
(objcopy_test_elf_common_symbols): New proc.
Run objcopy_test_elf_common_symbols for ELF targets
gas/
PR ld/19645
* NEWS: Mention --enable-elf-stt-common and --elf-stt-common=
for ELF assemblers.
* as.c (flag_use_elf_stt_common): New.
(show_usage): Add --elf-stt-common=.
(option_values): Add OPTION_ELF_STT_COMMON.
(std_longopts): Add --elf-stt-common=.
(parse_args): Handle --elf-stt-common=.
* as.h (flag_use_elf_stt_common): New.
* config.in: Regenerated.
* configure: Likewise.
* configure.ac: Add --enable-elf-stt-common and define
DEFAULT_GENERATE_ELF_STT_COMMON.
* gas/write.c (write_object_file): Set BFD_CONVERT_ELF_COMMON
and BFD_USE_ELF_STT_COMMON if flag_use_elf_stt_common is set.
* doc/as.texinfo: Document --elf-stt-common=.
* testsuite/gas/elf/common3.s: New file.
* testsuite/gas/elf/common3a.d: Likewise.
* testsuite/gas/elf/common3b.d: Likewise.
* testsuite/gas/elf/common4.s: Likewise.
* testsuite/gas/elf/common4a.d: Likewise.
* testsuite/gas/elf/common4b.d: Likewise.
* testsuite/gas/i386/dw2-compress-3b.d: Likewise.
* testsuite/gas/i386/dw2-compressed-3b.d: Likewise.
* testsuite/gas/elf/elf.exp: Run common3a, common3b, common4a
and common4b.
* testsuite/gas/i386/dw2-compress-3.d: Renamed to ...
* testsuite/gas/i386/dw2-compress-3a.d: This. Pass
--elf-stt-common=no to as.
* testsuite/gas/i386/dw2-compressed-3.d: Renamed to ...
* testsuite/gas/i386/dw2-compressed-3a.d: This. Pass
--elf-stt-common=no to as.
* testsuite/gas/i386/i386.exp: Run dw2-compress-3a,
dw2-compress-3b, dw2-compressed-3a and dw2-compressed-3b instead
of dw2-compress-3 and dw2-compressed-3.
include/
PR ld/19645
* bfdlink.h (bfd_link_elf_stt_common): New enum.
(bfd_link_info): Add elf_stt_common.
ld/
PR ld/19645
* NEWS: Mention -z common/-z nocommon for ELF targets.
* emultempl/elf32.em (gld${EMULATION_NAME}_handle_option): Handle
-z common and -z nocommon.
* ld.texinfo: Document -z common/-z nocommon.
* lexsup.c (elf_shlib_list_options): Add -z common/-z nocommon.
* testsuite/ld-elf/tls_common.exp: Test --elf-stt-common=no and
--elf-stt-common=yes with assembler.
* testsuite/ld-elfcomm/common-1.s: New file.
* testsuite/ld-elfcomm/common-1a.d: Likewise.
* testsuite/ld-elfcomm/common-1b.d: Likewise.
* testsuite/ld-elfcomm/common-1c.d: Likewise.
* testsuite/ld-elfcomm/common-1d.d: Likewise.
* testsuite/ld-elfcomm/common-1e.d: Likewise.
* testsuite/ld-elfcomm/common-1f.d: Likewise.
* testsuite/ld-elfcomm/common-2.s: Likewise.
* testsuite/ld-elfcomm/common-2a.d: Likewise.
* testsuite/ld-elfcomm/common-2b.d: Likewise.
* testsuite/ld-elfcomm/common-2c.d: Likewise.
* testsuite/ld-elfcomm/common-2d.d: Likewise.
* testsuite/ld-elfcomm/common-2e.d: Likewise.
* testsuite/ld-elfcomm/common-2f.d: Likewise.
* testsuite/ld-elfcomm/common-3a.rd: Likewise.
* testsuite/ld-elfcomm/common-3b.rd: Likewise.
* testsuite/ld-i386/pr19645.d: Likewise.
* testsuite/ld-i386/pr19645.s: Likewise.
* testsuite/ld-x86-64/largecomm-1.s: Likewise.
* testsuite/ld-x86-64/largecomm-1a.d: Likewise.
* testsuite/ld-x86-64/largecomm-1b.d: Likewise.
* testsuite/ld-x86-64/largecomm-1c.d: Likewise.
* testsuite/ld-x86-64/largecomm-1d.d: Likewise.
* testsuite/ld-x86-64/largecomm-1e.d: Likewise.
* testsuite/ld-x86-64/largecomm-1f.d: Likewise.
* testsuite/ld-x86-64/pr19645.d: Likewise.
* testsuite/ld-x86-64/pr19645.s: Likewise.
* testsuite/ld-elfcomm/elfcomm.exp: Test --elf-stt-common=yes
with assembler.
(assembler_generates_commons): Removed.
Run -z common/-z nocommon tests. Run *.d tests.
* testsuite/ld-i386/i386.exp: Run pr19645.
* testsuite/ld-x86-64/x86-64.exp: Likewise.
* testsuite/ld-x86-64/dwarfreloc.exp: Test --elf-stt-common with
assembler. Test STT_COMMON with readelf.
2016-02-22 18:18:52 +01:00
|
|
|
|
#if defined OBJ_ELF || defined OBJ_MAYBE_ELF
|
|
|
|
|
if (IS_ELF && flag_use_elf_stt_common)
|
|
|
|
|
stdoutput->flags |= BFD_CONVERT_ELF_COMMON | BFD_USE_ELF_STT_COMMON;
|
|
|
|
|
#endif
|
|
|
|
|
|
2010-07-03 22:52:24 +02:00
|
|
|
|
/* Once all relocations have been written, we can compress the
|
|
|
|
|
contents of the debug sections. This needs to be done before
|
|
|
|
|
we start writing any sections, because it will affect the file
|
|
|
|
|
layout, which is fixed once we start writing contents. */
|
|
|
|
|
if (flag_compress_debug)
|
2016-02-21 15:43:20 +01:00
|
|
|
|
{
|
|
|
|
|
if (flag_compress_debug == COMPRESS_DEBUG_GABI_ZLIB)
|
|
|
|
|
stdoutput->flags |= BFD_COMPRESS | BFD_COMPRESS_GABI;
|
|
|
|
|
else
|
|
|
|
|
stdoutput->flags |= BFD_COMPRESS;
|
|
|
|
|
bfd_map_over_sections (stdoutput, compress_debug, (char *) 0);
|
|
|
|
|
}
|
2010-07-03 22:52:24 +02:00
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
bfd_map_over_sections (stdoutput, write_contents, (char *) 0);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
#ifdef TC_GENERIC_RELAX_TABLE
|
|
|
|
|
/* Relax a fragment by scanning TC_GENERIC_RELAX_TABLE. */
|
|
|
|
|
|
|
|
|
|
long
|
2003-12-06 17:16:51 +01:00
|
|
|
|
relax_frag (segT segment, fragS *fragP, long stretch)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
const relax_typeS *this_type;
|
|
|
|
|
const relax_typeS *start_type;
|
|
|
|
|
relax_substateT next_state;
|
|
|
|
|
relax_substateT this_state;
|
2003-06-24 13:10:47 +02:00
|
|
|
|
offsetT growth;
|
2001-03-20 04:12:01 +01:00
|
|
|
|
offsetT aim;
|
|
|
|
|
addressT target;
|
|
|
|
|
addressT address;
|
|
|
|
|
symbolS *symbolP;
|
|
|
|
|
const relax_typeS *table;
|
|
|
|
|
|
|
|
|
|
target = fragP->fr_offset;
|
|
|
|
|
address = fragP->fr_address;
|
|
|
|
|
table = TC_GENERIC_RELAX_TABLE;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
this_state = fragP->fr_subtype;
|
|
|
|
|
start_type = this_type = table + this_state;
|
2001-03-20 04:12:01 +01:00
|
|
|
|
symbolP = fragP->fr_symbol;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
if (symbolP)
|
|
|
|
|
{
|
2001-02-13 22:27:52 +01:00
|
|
|
|
fragS *sym_frag;
|
|
|
|
|
|
|
|
|
|
sym_frag = symbol_get_frag (symbolP);
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#ifndef DIFF_EXPR_OK
|
2001-02-13 22:27:52 +01:00
|
|
|
|
know (sym_frag != NULL);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#endif
|
2002-09-05 02:01:18 +02:00
|
|
|
|
know (S_GET_SEGMENT (symbolP) != absolute_section
|
2001-02-13 22:27:52 +01:00
|
|
|
|
|| sym_frag == &zero_address_frag);
|
* symbols.c (S_GET_VALUE): Don't treat O_constant and local
symbols specially. Always resolve, adding fr_address to value.
* write.c (write_object_file): Don't add fr_address to sym values.
(relax_frag): Likewise.
(relax_segment): Likewise.
* config/obj-ieee.c (do_symbols): Likewise.
* config/tc-cris.c (md_convert_frag): Likewise.
* config/tc-fr30.c (md_convert_frag): Likewise.
* config/tc-i386.c (md_convert_frag): Likewise.
* config/tc-m32r.c (md_convert_frag): Likewise.
* config/tc-m68hc11.c (md_convert_frag): Likewise.
* config/tc-mcore.c (md_convert_frag): Likewise.
* config/tc-mips.c (mips16_extended_frag): Likewise.
* config/tc-ns32k.c (md_convert_frag): Likewise.
* config/tc-m68k.c (md_convert_frag_1): Likewise.
(BRANCHBWL, BRABSJUNC, BRABSJCOND, BRANCHBW, FBRANCH, DBCCLBR,
DBCCABSJ, PCREL1632, PCINDEX, ABSTOPCREL): Decrement.
(md_relax_table): Remove first four entries. Format.
(md_estimate_size_before_relax): Remove old_fix. Don't bother
setting fr_var. Simplify byte branch checks.
2001-07-23 15:03:40 +02:00
|
|
|
|
target += S_GET_VALUE (symbolP);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2010-10-19 14:00:33 +02:00
|
|
|
|
/* If SYM_FRAG has yet to be reached on this pass, assume it
|
|
|
|
|
will move by STRETCH just as we did, unless there is an
|
|
|
|
|
alignment frag between here and SYM_FRAG. An alignment may
|
|
|
|
|
well absorb any STRETCH, and we don't want to choose a larger
|
|
|
|
|
branch insn by overestimating the needed reach of this
|
|
|
|
|
branch. It isn't critical to calculate TARGET exactly; We
|
|
|
|
|
know we'll be doing another pass if STRETCH is non-zero. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2001-02-13 22:27:52 +01:00
|
|
|
|
if (stretch != 0
|
2001-03-20 04:12:01 +01:00
|
|
|
|
&& sym_frag->relax_marker != fragP->relax_marker
|
|
|
|
|
&& S_GET_SEGMENT (symbolP) == segment)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2010-10-19 14:00:33 +02:00
|
|
|
|
if (stretch < 0
|
|
|
|
|
|| sym_frag->region == fragP->region)
|
|
|
|
|
target += stretch;
|
2010-10-25 05:03:18 +02:00
|
|
|
|
/* If we get here we know we have a forward branch. This
|
|
|
|
|
relax pass may have stretched previous instructions so
|
|
|
|
|
far that omitting STRETCH would make the branch
|
|
|
|
|
negative. Don't allow this in case the negative reach is
|
|
|
|
|
large enough to require a larger branch instruction. */
|
|
|
|
|
else if (target < address)
|
|
|
|
|
target = fragP->fr_next->fr_address + stretch;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
aim = target - address - fragP->fr_fix;
|
|
|
|
|
#ifdef TC_PCREL_ADJUST
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Currently only the ns32k family needs this. */
|
|
|
|
|
aim += TC_PCREL_ADJUST (fragP);
|
|
|
|
|
#endif
|
2005-01-21 06:54:38 +01:00
|
|
|
|
|
|
|
|
|
#ifdef md_prepare_relax_scan
|
|
|
|
|
/* Formerly called M68K_AIM_KLUDGE. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
md_prepare_relax_scan (fragP, address, aim, this_state, this_type);
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
if (aim < 0)
|
|
|
|
|
{
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Look backwards. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
for (next_state = this_type->rlx_more; next_state;)
|
|
|
|
|
if (aim >= this_type->rlx_backward)
|
|
|
|
|
next_state = 0;
|
|
|
|
|
else
|
|
|
|
|
{
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Grow to next state. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
this_state = next_state;
|
|
|
|
|
this_type = table + this_state;
|
|
|
|
|
next_state = this_type->rlx_more;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
{
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Look forwards. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
for (next_state = this_type->rlx_more; next_state;)
|
|
|
|
|
if (aim <= this_type->rlx_forward)
|
|
|
|
|
next_state = 0;
|
|
|
|
|
else
|
|
|
|
|
{
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Grow to next state. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
this_state = next_state;
|
|
|
|
|
this_type = table + this_state;
|
|
|
|
|
next_state = this_type->rlx_more;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
growth = this_type->rlx_length - start_type->rlx_length;
|
|
|
|
|
if (growth != 0)
|
|
|
|
|
fragP->fr_subtype = this_state;
|
|
|
|
|
return growth;
|
|
|
|
|
}
|
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
#endif /* defined (TC_GENERIC_RELAX_TABLE) */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
/* Relax_align. Advance location counter to next address that has 'alignment'
|
|
|
|
|
lowest order bits all 0s, return size of adjustment made. */
|
|
|
|
|
static relax_addressT
|
Don't use register keyword
* expr.c (expr_symbol_where): Don't use register keyword.
* app.c (app_push, app_pop, do_scrub_chars): Likewise.
* ecoff.c (add_string, add_ecoff_symbol, add_aux_sym_symint,
add_aux_sym_rndx, add_aux_sym_tir, add_procedure, add_file,
ecoff_build_lineno, ecoff_setup_ext, allocate_cluster.
allocate_scope, allocate_vlinks, allocate_shash,
allocate_thash, allocate_tag, allocate_forward, allocate_thead,
allocate_lineno_list): Likewise.
* frags.c (frag_more, frag_var, frag_variant, frag_wane): Likewise.
* input-file.c (input_file_push, input_file_pop): Likewise.
* input-scrub.c (input_scrub_push, input_scrub_next_buffer): Likewise.
* subsegs.c (subseg_change): Likewise.
* symbols.c (colon, symbol_table_insert, symbol_find_or_make)
(dollar_label_name, fb_label_name): Likewise.
* write.c (relax_align): Likewise.
* config/tc-alpha.c (s_alpha_pdesc): Likewise.
* config/tc-bfin.c (bfin_s_bss): Likewise.
* config/tc-i860.c (md_estimate_size_before_relax): Likewise.
* config/tc-m68hc11.c (md_convert_frag): Likewise.
* config/tc-m68k.c (m68k_ip, crack_operand): Likewise.
(md_convert_frag_1, s_even): Likewise.
* config/tc-mips.c (mips_clear_insn_labels): Likewise.
* config/tc-mn10200.c (md_begin): Likewise.
* config/tc-s390.c (s390_setup_opcodes, md_begin): Likewise.
* config/tc-sh.c (sh_elf_cons): Likewise.
* config/tc-tic4x.c (tic4x_cons, tic4x_stringer): Likewise.
* config/m68k-parse.y (m68k_reg_parse): Likewise. Convert from K&R.
(yylex, m68k_ip_op, yyerror): Convert from K&R.
2014-11-04 06:01:09 +01:00
|
|
|
|
relax_align (relax_addressT address, /* Address now. */
|
|
|
|
|
int alignment /* Alignment (binary). */)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
relax_addressT mask;
|
|
|
|
|
relax_addressT new_address;
|
|
|
|
|
|
2014-10-14 05:06:20 +02:00
|
|
|
|
mask = ~((relax_addressT) ~0 << alignment);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
new_address = (address + mask) & (~mask);
|
|
|
|
|
#ifdef LINKER_RELAXING_SHRINKS_ONLY
|
|
|
|
|
if (linkrelax)
|
|
|
|
|
/* We must provide lots of padding, so the linker can discard it
|
|
|
|
|
when needed. The linker will not add extra space, ever. */
|
|
|
|
|
new_address += (1 << alignment);
|
|
|
|
|
#endif
|
|
|
|
|
return (new_address - address);
|
|
|
|
|
}
|
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Now we have a segment, not a crowd of sub-segments, we can make
|
|
|
|
|
fr_address values.
|
2000-08-22 03:20:41 +02:00
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
Relax the frags.
|
2000-08-22 03:20:41 +02:00
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
After this, all frags in this segment have addresses that are correct
|
|
|
|
|
within the segment. Since segments live in different file addresses,
|
|
|
|
|
these frag addresses may not be the same as final object-file
|
|
|
|
|
addresses. */
|
|
|
|
|
|
2001-03-30 04:19:36 +02:00
|
|
|
|
int
|
2006-05-08 01:03:48 +02:00
|
|
|
|
relax_segment (struct frag *segment_frag_root, segT segment, int pass)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2005-08-18 11:26:16 +02:00
|
|
|
|
unsigned long frag_count;
|
|
|
|
|
struct frag *fragP;
|
|
|
|
|
relax_addressT address;
|
2010-10-19 14:00:33 +02:00
|
|
|
|
int region;
|
2001-03-30 04:19:36 +02:00
|
|
|
|
int ret;
|
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* In case md_estimate_size_before_relax() wants to make fixSs. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
subseg_change (segment, 0);
|
|
|
|
|
|
|
|
|
|
/* For each frag in segment: count and store (a 1st guess of)
|
|
|
|
|
fr_address. */
|
|
|
|
|
address = 0;
|
2010-10-19 14:00:33 +02:00
|
|
|
|
region = 0;
|
2005-08-18 11:26:16 +02:00
|
|
|
|
for (frag_count = 0, fragP = segment_frag_root;
|
|
|
|
|
fragP;
|
|
|
|
|
fragP = fragP->fr_next, frag_count ++)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2010-10-19 14:00:33 +02:00
|
|
|
|
fragP->region = region;
|
2001-03-20 04:12:01 +01:00
|
|
|
|
fragP->relax_marker = 0;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
fragP->fr_address = address;
|
|
|
|
|
address += fragP->fr_fix;
|
|
|
|
|
|
|
|
|
|
switch (fragP->fr_type)
|
|
|
|
|
{
|
|
|
|
|
case rs_fill:
|
|
|
|
|
address += fragP->fr_offset * fragP->fr_var;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_align:
|
|
|
|
|
case rs_align_code:
|
2000-12-28 11:07:56 +01:00
|
|
|
|
case rs_align_test:
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
addressT offset = relax_align (address, (int) fragP->fr_offset);
|
|
|
|
|
|
|
|
|
|
if (fragP->fr_subtype != 0 && offset > fragP->fr_subtype)
|
|
|
|
|
offset = 0;
|
|
|
|
|
|
|
|
|
|
if (offset % fragP->fr_var != 0)
|
|
|
|
|
{
|
2001-05-26 14:45:15 +02:00
|
|
|
|
as_bad_where (fragP->fr_file, fragP->fr_line,
|
2017-11-06 10:14:02 +01:00
|
|
|
|
ngettext ("alignment padding (%lu byte) "
|
|
|
|
|
"not a multiple of %ld",
|
|
|
|
|
"alignment padding (%lu bytes) "
|
|
|
|
|
"not a multiple of %ld",
|
|
|
|
|
(unsigned long) offset),
|
2001-05-26 14:45:15 +02:00
|
|
|
|
(unsigned long) offset, (long) fragP->fr_var);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
offset -= (offset % fragP->fr_var);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
address += offset;
|
2010-10-19 14:00:33 +02:00
|
|
|
|
region += 1;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_org:
|
|
|
|
|
/* Assume .org is nugatory. It will grow with 1st relax. */
|
2010-10-19 14:00:33 +02:00
|
|
|
|
region += 1;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_space:
|
Add .nop assembler directive
Implement the '.nop SIZE[, CONTROL]' assembler directive, which emits
SIZE bytes filled with no-op instructions. SIZE is absolute expression.
The optional CONTROL byte controls how no-op instructions should be
generated. If the comma and @var{control} are omitted, CONTROL is
assumed to be zero.
For Intel 80386 and AMD x86-64 targets, CONTROL byte specifies the size
limit of a single no-op instruction. The valid values of CONTROL byte
are between 0 and 8 for 16-bit mode, between 0 and 10 for 32-bit mode,
between 0 and 11 for 64-bit mode. When 0 is used, the no-op size limit
is set to the maximum supported size.
2 new relax states, rs_space_nop and rs_fill_nop, are added to enum
_relax_state, which are similar to rs_space and rs_fill, respectively,
but they fill with no-op instructions, instead of a single byte. A
target backend must override the default md_generate_nops to generate
proper no-op instructions. Otherwise, an error of unimplemented .nop
directive will be issued whenever .nop directive is used.
* NEWS: Mention .nop directive.
* as.h (_relax_state): Add rs_space_nop and rs_fill_nop.
* read.c (potable): Add .nop.
(s_nop): New function.
* read.h (s_nop): New prototype.
* write.c (cvt_frag_to_fill): Handle rs_space_nop and
rs_fill_nop.
(md_generate_nops): New function.
(relax_segment): Likewise.
(write_contents): Use md_generate_nops for rs_fill_nop.
* config/tc-i386.c (alt64_11): New.
(alt64_patt): Likewise.
(md_convert_frag): Handle rs_space_nop.
(i386_output_nops): New function.
(i386_generate_nops): Likewise.
(i386_align_code): Call i386_output_nops.
* config/tc-i386.h (i386_generate_nops): New.
(md_generate_nops): Likewise.
* doc/as.texinfo: Document .nop directive.
* testsuite/gas/i386/i386.exp: Run .nop directive tests.
* testsuite/gas/i386/nop-1.d: New file.
* testsuite/gas/i386/nop-1.s: Likewise.
* testsuite/gas/i386/nop-2.d: Likewise.
* testsuite/gas/i386/nop-2.s: Likewise.
* testsuite/gas/i386/nop-3.d: Likewise.
* testsuite/gas/i386/nop-3.s: Likewise.
* testsuite/gas/i386/nop-4.d: Likewise.
* testsuite/gas/i386/nop-4.s: Likewise.
* testsuite/gas/i386/nop-5.d: Likewise.
* testsuite/gas/i386/nop-5.s: Likewise.
* testsuite/gas/i386/nop-6.d: Likewise.
* testsuite/gas/i386/nop-6.s: Likewise.
* testsuite/gas/i386/nop-bad-1.l: Likewise.
* testsuite/gas/i386/nop-bad-1.s: Likewise.
* testsuite/gas/i386/x86-64-nop-1.d: Likewise.
* testsuite/gas/i386/x86-64-nop-2.d: Likewise.
* testsuite/gas/i386/x86-64-nop-3.d: Likewise.
* testsuite/gas/i386/x86-64-nop-4.d: Likewise.
* testsuite/gas/i386/x86-64-nop-5.d: Likewise.
* testsuite/gas/i386/x86-64-nop-6.d: Likewise.
2018-02-17 14:20:42 +01:00
|
|
|
|
case rs_space_nop:
|
1999-05-03 09:29:11 +02:00
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_machine_dependent:
|
2001-09-09 16:01:17 +02:00
|
|
|
|
/* If fr_symbol is an expression, this call to
|
|
|
|
|
resolve_symbol_value sets up the correct segment, which will
|
|
|
|
|
likely be needed in md_estimate_size_before_relax. */
|
|
|
|
|
if (fragP->fr_symbol)
|
|
|
|
|
resolve_symbol_value (fragP->fr_symbol);
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
address += md_estimate_size_before_relax (fragP, segment);
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
#ifndef WORKING_DOT_WORD
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Broken words don't concern us yet. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
case rs_broken_word:
|
|
|
|
|
break;
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
case rs_leb128:
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* Initial guess is always 1; doing otherwise can result in
|
1999-05-03 09:29:11 +02:00
|
|
|
|
stable solutions that are larger than the minimum. */
|
|
|
|
|
address += fragP->fr_offset = 1;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_cfa:
|
|
|
|
|
address += eh_frame_estimate_size_before_relax (fragP);
|
|
|
|
|
break;
|
|
|
|
|
|
2000-11-29 22:42:41 +01:00
|
|
|
|
case rs_dwarf2dbg:
|
|
|
|
|
address += dwarf2dbg_estimate_size_before_relax (fragP);
|
|
|
|
|
break;
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
default:
|
|
|
|
|
BAD_CASE (fragP->fr_type);
|
|
|
|
|
break;
|
2000-07-20 22:07:09 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
/* Do relax(). */
|
|
|
|
|
{
|
2005-08-18 11:26:16 +02:00
|
|
|
|
unsigned long max_iterations;
|
2007-03-14 12:03:38 +01:00
|
|
|
|
|
|
|
|
|
/* Cumulative address adjustment. */
|
|
|
|
|
offsetT stretch;
|
|
|
|
|
|
|
|
|
|
/* Have we made any adjustment this pass? We can't just test
|
|
|
|
|
stretch because one piece of code may have grown and another
|
|
|
|
|
shrank. */
|
|
|
|
|
int stretched;
|
|
|
|
|
|
|
|
|
|
/* Most horrible, but gcc may give us some exception data that
|
|
|
|
|
is impossible to assemble, of the form
|
|
|
|
|
|
|
|
|
|
.align 4
|
|
|
|
|
.byte 0, 0
|
|
|
|
|
.uleb128 end - start
|
|
|
|
|
start:
|
|
|
|
|
.space 128*128 - 1
|
|
|
|
|
.align 4
|
|
|
|
|
end:
|
|
|
|
|
|
|
|
|
|
If the leb128 is two bytes in size, then end-start is 128*128,
|
|
|
|
|
which requires a three byte leb128. If the leb128 is three
|
|
|
|
|
bytes in size, then end-start is 128*128-1, which requires a
|
|
|
|
|
two byte leb128. We work around this dilemma by inserting
|
|
|
|
|
an extra 4 bytes of alignment just after the .align. This
|
|
|
|
|
works because the data after the align is accessed relative to
|
|
|
|
|
the end label.
|
|
|
|
|
|
|
|
|
|
This counter is used in a tiny state machine to detect
|
|
|
|
|
whether a leb128 followed by an align is impossible to
|
|
|
|
|
relax. */
|
|
|
|
|
int rs_leb128_fudge = 0;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2005-08-18 11:26:16 +02:00
|
|
|
|
/* We want to prevent going into an infinite loop where one frag grows
|
|
|
|
|
depending upon the location of a symbol which is in turn moved by
|
|
|
|
|
the growing frag. eg:
|
|
|
|
|
|
2007-02-17 08:20:56 +01:00
|
|
|
|
foo = .
|
|
|
|
|
.org foo+16
|
|
|
|
|
foo = .
|
2005-08-18 11:26:16 +02:00
|
|
|
|
|
2007-02-17 08:20:56 +01:00
|
|
|
|
So we dictate that this algorithm can be at most O2. */
|
2005-08-18 11:26:16 +02:00
|
|
|
|
max_iterations = frag_count * frag_count;
|
|
|
|
|
/* Check for overflow. */
|
|
|
|
|
if (max_iterations < frag_count)
|
|
|
|
|
max_iterations = frag_count;
|
|
|
|
|
|
2006-05-08 01:03:48 +02:00
|
|
|
|
ret = 0;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
do
|
|
|
|
|
{
|
2001-03-30 04:19:36 +02:00
|
|
|
|
stretch = 0;
|
|
|
|
|
stretched = 0;
|
2000-08-22 03:20:41 +02:00
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
for (fragP = segment_frag_root; fragP; fragP = fragP->fr_next)
|
|
|
|
|
{
|
2003-06-24 13:10:47 +02:00
|
|
|
|
offsetT growth = 0;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
addressT was_address;
|
|
|
|
|
offsetT offset;
|
|
|
|
|
symbolS *symbolP;
|
|
|
|
|
|
2001-03-20 04:12:01 +01:00
|
|
|
|
fragP->relax_marker ^= 1;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
was_address = fragP->fr_address;
|
|
|
|
|
address = fragP->fr_address += stretch;
|
|
|
|
|
symbolP = fragP->fr_symbol;
|
|
|
|
|
offset = fragP->fr_offset;
|
|
|
|
|
|
|
|
|
|
switch (fragP->fr_type)
|
|
|
|
|
{
|
2000-07-20 22:07:09 +02:00
|
|
|
|
case rs_fill: /* .fill never relaxes. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
growth = 0;
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
#ifndef WORKING_DOT_WORD
|
|
|
|
|
/* JF: This is RMS's idea. I do *NOT* want to be blamed
|
|
|
|
|
for it I do not want to write it. I do not want to have
|
|
|
|
|
anything to do with it. This is not the proper way to
|
|
|
|
|
implement this misfeature. */
|
|
|
|
|
case rs_broken_word:
|
|
|
|
|
{
|
|
|
|
|
struct broken_word *lie;
|
|
|
|
|
struct broken_word *untruth;
|
|
|
|
|
|
|
|
|
|
/* Yes this is ugly (storing the broken_word pointer
|
|
|
|
|
in the symbol slot). Still, this whole chunk of
|
|
|
|
|
code is ugly, and I don't feel like doing anything
|
|
|
|
|
about it. Think of it as stubbornness in action. */
|
|
|
|
|
growth = 0;
|
|
|
|
|
for (lie = (struct broken_word *) (fragP->fr_symbol);
|
|
|
|
|
lie && lie->dispfrag == fragP;
|
|
|
|
|
lie = lie->next_broken_word)
|
|
|
|
|
{
|
|
|
|
|
|
|
|
|
|
if (lie->added)
|
|
|
|
|
continue;
|
|
|
|
|
|
* symbols.c (S_GET_VALUE): Don't treat O_constant and local
symbols specially. Always resolve, adding fr_address to value.
* write.c (write_object_file): Don't add fr_address to sym values.
(relax_frag): Likewise.
(relax_segment): Likewise.
* config/obj-ieee.c (do_symbols): Likewise.
* config/tc-cris.c (md_convert_frag): Likewise.
* config/tc-fr30.c (md_convert_frag): Likewise.
* config/tc-i386.c (md_convert_frag): Likewise.
* config/tc-m32r.c (md_convert_frag): Likewise.
* config/tc-m68hc11.c (md_convert_frag): Likewise.
* config/tc-mcore.c (md_convert_frag): Likewise.
* config/tc-mips.c (mips16_extended_frag): Likewise.
* config/tc-ns32k.c (md_convert_frag): Likewise.
* config/tc-m68k.c (md_convert_frag_1): Likewise.
(BRANCHBWL, BRABSJUNC, BRABSJCOND, BRANCHBW, FBRANCH, DBCCLBR,
DBCCABSJ, PCREL1632, PCINDEX, ABSTOPCREL): Decrement.
(md_relax_table): Remove first four entries. Format.
(md_estimate_size_before_relax): Remove old_fix. Don't bother
setting fr_var. Simplify byte branch checks.
2001-07-23 15:03:40 +02:00
|
|
|
|
offset = (S_GET_VALUE (lie->add)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
+ lie->addnum
|
* symbols.c (S_GET_VALUE): Don't treat O_constant and local
symbols specially. Always resolve, adding fr_address to value.
* write.c (write_object_file): Don't add fr_address to sym values.
(relax_frag): Likewise.
(relax_segment): Likewise.
* config/obj-ieee.c (do_symbols): Likewise.
* config/tc-cris.c (md_convert_frag): Likewise.
* config/tc-fr30.c (md_convert_frag): Likewise.
* config/tc-i386.c (md_convert_frag): Likewise.
* config/tc-m32r.c (md_convert_frag): Likewise.
* config/tc-m68hc11.c (md_convert_frag): Likewise.
* config/tc-mcore.c (md_convert_frag): Likewise.
* config/tc-mips.c (mips16_extended_frag): Likewise.
* config/tc-ns32k.c (md_convert_frag): Likewise.
* config/tc-m68k.c (md_convert_frag_1): Likewise.
(BRANCHBWL, BRABSJUNC, BRABSJCOND, BRANCHBW, FBRANCH, DBCCLBR,
DBCCABSJ, PCREL1632, PCINDEX, ABSTOPCREL): Decrement.
(md_relax_table): Remove first four entries. Format.
(md_estimate_size_before_relax): Remove old_fix. Don't bother
setting fr_var. Simplify byte branch checks.
2001-07-23 15:03:40 +02:00
|
|
|
|
- S_GET_VALUE (lie->sub));
|
1999-05-03 09:29:11 +02:00
|
|
|
|
if (offset <= -32768 || offset >= 32767)
|
|
|
|
|
{
|
|
|
|
|
if (flag_warn_displacement)
|
|
|
|
|
{
|
|
|
|
|
char buf[50];
|
|
|
|
|
sprint_value (buf, (addressT) lie->addnum);
|
2001-05-26 14:45:15 +02:00
|
|
|
|
as_warn_where (fragP->fr_file, fragP->fr_line,
|
|
|
|
|
_(".word %s-%s+%s didn't fit"),
|
|
|
|
|
S_GET_NAME (lie->add),
|
|
|
|
|
S_GET_NAME (lie->sub),
|
|
|
|
|
buf);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
if (fragP->fr_subtype == 0)
|
|
|
|
|
{
|
|
|
|
|
fragP->fr_subtype++;
|
|
|
|
|
growth += md_short_jump_size;
|
|
|
|
|
}
|
2009-03-10 15:38:03 +01:00
|
|
|
|
|
|
|
|
|
/* Redirect *all* words of this table with the same
|
|
|
|
|
target, lest we have to handle the case where the
|
|
|
|
|
same target but with a offset that fits on this
|
|
|
|
|
round overflows at the next relaxation round. */
|
|
|
|
|
for (untruth = (struct broken_word *) (fragP->fr_symbol);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
untruth && untruth->dispfrag == lie->dispfrag;
|
|
|
|
|
untruth = untruth->next_broken_word)
|
Add support for storing local symbols in a small structure to save
memory when assembling large files.
* as.h: Don't include struc-symbol.h.
(symbolS): Add typedef.
* symbols.c: Include struc-symbol.h.
(local_hash): New static variable.
(save_symbol_name): New static function, from symbol_create.
(symbol_create): Call save_symbol_name.
(local_symbol_count): New static variable.
(local_symbol_conversion_count): Likewise.
(LOCAL_SYMBOL_CHECK): Define.
(local_symbol_make): New static function.
(local_symbol_convert): New static function.
(colon): Handle local symbols. Create local symbol for local
label name.
(symbol_table_insert): Handle local symbols.
(symbol_find_or_make): Create local symbol for local label name.
(symbol_find_base): Check for local symbol.
(symbol_append, symbol_insert): Check for local symbols.
(symbol_clear_list_pointers, symbol_remove): Likewise.
(verify_symbol_chain): Likewise.
(copy_symbol_attributes): Likewise.
(resolve_symbol_value): Handle local symbols.
(resolve_local_symbol): New static function.
(resolve_local_symbol_values): New function.
(S_GET_VALUE, S_SET_VALUE): Handle local symbols.
(S_IS_FUNCTION, S_IS_EXTERNAL, S_IS_WEAK, S_IS_COMMON): Likewise.
(S_IS_DEFINED, S_IS_DEBUG, S_IS_LOCAL, S_GET_NAME): Likewise.
(S_GET_SEGMENT, S_SET_SEGMENT, S_SET_EXTERNAL): Likewise.
(S_CLEAR_EXTERNAL, S_SET_WEAK, S_SET_NAME): Likewise.
(symbol_previous, symbol_next): New functions.
(symbol_get_value_expression): Likewise.
(symbol_set_value_expression): Likewise.
(symbol_set_frag, symbol_get_frag): Likewise.
(symbol_mark_used, symbol_clear_used, symbol_used_p): Likewise.
(symbol_mark_used_in_reloc): Likewise.
(symbol_clear_used_in_reloc, symbol_used_in_reloc_p): Likewise.
(symbol_mark_mri_common, symbol_clear_mri_common): Likewise.
(symbol_mri_common_p): Likewise.
(symbol_mark_written, symbol_clear_written): Likewise.
(symbol_written_p): Likewise.
(symbol_mark_resolved, symbol_resolved_p): Likewise.
(symbol_section_p, symbol_equated_p): Likewise.
(symbol_constant_p): Likewise.
(symbol_get_bfdsym, symbol_set_bfdsym): Likewise.
(symbol_get_obj, symbol_set_obj): Likewise.
(symbol_get_tc, symbol_set_tc): Likewise.
(symbol_begin): Initialize local_hash.
(print_symbol_value_1): Handle local symbols.
(symbol_print_statistics): Print local symbol statistics.
* symbols.h: Include "struc-symbol.h" if not BFD_ASSEMBLER.
Declare new symbols.c functions. Move many declarations here from
struc-symbol.h.
(SYMBOLS_NEED_BACKPOINTERS): Define if needed.
* struc-symbol.h (SYMBOLS_NEED_BACKPOINTERS): Don't set.
(struct symbol): Move bsym to make it clearly the first field.
Remove TARGET_SYMBOL_FIELDS.
(symbolS): Don't typedef.
(struct broken_word): Remove.
(N_TYPE_seg, seg_N_TYPE): Move to symbol.h.
(SEGMENT_TO_SYMBOL_TYPE, N_REGISTER): Likewise.
(symbol_clear_list_pointers): Likewise.
(symbol_insert, symbol_remove): Likewise.
(symbol_previous, symbol_append): Likewise.
(verify_symbol_chain, verify_symbol_chain_2): Likewise.
(struct local_symbol): Define.
(local_symbol_converted_p, local_symbol_mark_converted): Define.
(local_symbol_resolved_p, local_symbol_mark_resolved): Define.
(local_symbol_get_frag, local_symbol_set_frag): Define.
(local_symbol_get_real_symbol): Define.
(local_symbol_set_real_symbol): Define.
Define.
* write.c (write_object_file): Call resolve_local_symbol_values.
* config/obj-ecoff.h (OBJ_SYMFIELD_TYPE): Define.
(TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-elf.h (OBJ_SYMFIELD_TYPE): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
* config/obj-multi.h (struct elf_obj_sy): Add local field. If
ECOFF_DEBUGGING, add ECOFF fields.
(ELF_TARGET_SYMBOL_FIELDS, TARGET_SYMBOL_FIELDS): Don't define.
(ECOFF_DEBUG_TARGET_SYMBOL_FIELDS): Don't define.
* config/tc-mcore.h: Don't include struc-symbol.h.
(TARGET_SYMBOL_FIELDS): Don't define.
(struct mcore_tc_sy): Define.
(TC_SYMFIELD_TYPE): Define.
* Many files: Use symbolS instead of struct symbol. Use new
accessor functions rather than referring to symbolS fields
directly.
* read.c (s_mri_common): Don't add in value of line_label.
* config/tc-mips.c (md_apply_fix): Correct parenthesization when
checking for SEC_LINK_ONCE.
* config/tc-sh.h (sh_fix_adjustable): Declare.
1999-06-03 02:29:48 +02:00
|
|
|
|
if ((symbol_get_frag (untruth->add)
|
|
|
|
|
== symbol_get_frag (lie->add))
|
|
|
|
|
&& (S_GET_VALUE (untruth->add)
|
|
|
|
|
== S_GET_VALUE (lie->add)))
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
untruth->added = 2;
|
|
|
|
|
untruth->use_jump = lie;
|
|
|
|
|
}
|
2009-03-10 15:38:03 +01:00
|
|
|
|
|
|
|
|
|
lie->added = 1;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
growth += md_long_jump_size;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
break;
|
2000-07-20 22:07:09 +02:00
|
|
|
|
} /* case rs_broken_word */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#endif
|
|
|
|
|
case rs_align:
|
|
|
|
|
case rs_align_code:
|
2000-12-28 11:07:56 +01:00
|
|
|
|
case rs_align_test:
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
addressT oldoff, newoff;
|
|
|
|
|
|
|
|
|
|
oldoff = relax_align (was_address + fragP->fr_fix,
|
|
|
|
|
(int) offset);
|
|
|
|
|
newoff = relax_align (address + fragP->fr_fix,
|
|
|
|
|
(int) offset);
|
|
|
|
|
|
|
|
|
|
if (fragP->fr_subtype != 0)
|
|
|
|
|
{
|
|
|
|
|
if (oldoff > fragP->fr_subtype)
|
|
|
|
|
oldoff = 0;
|
|
|
|
|
if (newoff > fragP->fr_subtype)
|
|
|
|
|
newoff = 0;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
growth = newoff - oldoff;
|
2007-03-14 12:03:38 +01:00
|
|
|
|
|
|
|
|
|
/* If this align happens to follow a leb128 and
|
|
|
|
|
we have determined that the leb128 is bouncing
|
|
|
|
|
in size, then break the cycle by inserting an
|
|
|
|
|
extra alignment. */
|
|
|
|
|
if (growth < 0
|
|
|
|
|
&& (rs_leb128_fudge & 16) != 0
|
|
|
|
|
&& (rs_leb128_fudge & 15) >= 2)
|
|
|
|
|
{
|
|
|
|
|
segment_info_type *seginfo = seg_info (segment);
|
|
|
|
|
struct obstack *ob = &seginfo->frchainP->frch_obstack;
|
|
|
|
|
struct frag *newf;
|
|
|
|
|
|
|
|
|
|
newf = frag_alloc (ob);
|
|
|
|
|
obstack_blank_fast (ob, fragP->fr_var);
|
|
|
|
|
obstack_finish (ob);
|
|
|
|
|
memcpy (newf, fragP, SIZEOF_STRUCT_FRAG);
|
|
|
|
|
memcpy (newf->fr_literal,
|
|
|
|
|
fragP->fr_literal + fragP->fr_fix,
|
|
|
|
|
fragP->fr_var);
|
|
|
|
|
newf->fr_type = rs_fill;
|
2010-10-19 14:14:23 +02:00
|
|
|
|
newf->fr_address = address + fragP->fr_fix + newoff;
|
2007-03-14 12:03:38 +01:00
|
|
|
|
newf->fr_fix = 0;
|
|
|
|
|
newf->fr_offset = (((offsetT) 1 << fragP->fr_offset)
|
|
|
|
|
/ fragP->fr_var);
|
|
|
|
|
if (newf->fr_offset * newf->fr_var
|
|
|
|
|
!= (offsetT) 1 << fragP->fr_offset)
|
|
|
|
|
{
|
|
|
|
|
newf->fr_offset = (offsetT) 1 << fragP->fr_offset;
|
|
|
|
|
newf->fr_var = 1;
|
|
|
|
|
}
|
2010-10-19 14:14:23 +02:00
|
|
|
|
/* Include size of new frag in GROWTH. */
|
2007-03-14 12:03:38 +01:00
|
|
|
|
growth += newf->fr_offset * newf->fr_var;
|
2010-10-19 14:14:23 +02:00
|
|
|
|
/* Adjust the new frag address for the amount
|
|
|
|
|
we'll add when we process the new frag. */
|
|
|
|
|
newf->fr_address -= stretch + growth;
|
2007-03-14 12:03:38 +01:00
|
|
|
|
newf->relax_marker ^= 1;
|
|
|
|
|
fragP->fr_next = newf;
|
|
|
|
|
#ifdef DEBUG
|
|
|
|
|
as_warn (_("padding added"));
|
|
|
|
|
#endif
|
|
|
|
|
}
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_org:
|
|
|
|
|
{
|
2001-03-30 04:19:36 +02:00
|
|
|
|
addressT target = offset;
|
|
|
|
|
addressT after;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
if (symbolP)
|
|
|
|
|
{
|
2007-02-17 08:20:56 +01:00
|
|
|
|
/* Convert from an actual address to an octet offset
|
|
|
|
|
into the section. Here it is assumed that the
|
|
|
|
|
section's VMA is zero, and can omit subtracting it
|
|
|
|
|
from the symbol's value to get the address offset. */
|
|
|
|
|
know (S_GET_SEGMENT (symbolP)->vma == 0);
|
2001-11-13 15:22:53 +01:00
|
|
|
|
target += S_GET_VALUE (symbolP) * OCTETS_PER_BYTE;
|
* symbols.c (S_GET_VALUE): Don't treat O_constant and local
symbols specially. Always resolve, adding fr_address to value.
* write.c (write_object_file): Don't add fr_address to sym values.
(relax_frag): Likewise.
(relax_segment): Likewise.
* config/obj-ieee.c (do_symbols): Likewise.
* config/tc-cris.c (md_convert_frag): Likewise.
* config/tc-fr30.c (md_convert_frag): Likewise.
* config/tc-i386.c (md_convert_frag): Likewise.
* config/tc-m32r.c (md_convert_frag): Likewise.
* config/tc-m68hc11.c (md_convert_frag): Likewise.
* config/tc-mcore.c (md_convert_frag): Likewise.
* config/tc-mips.c (mips16_extended_frag): Likewise.
* config/tc-ns32k.c (md_convert_frag): Likewise.
* config/tc-m68k.c (md_convert_frag_1): Likewise.
(BRANCHBWL, BRABSJUNC, BRABSJCOND, BRANCHBW, FBRANCH, DBCCLBR,
DBCCABSJ, PCREL1632, PCINDEX, ABSTOPCREL): Decrement.
(md_relax_table): Remove first four entries. Format.
(md_estimate_size_before_relax): Remove old_fix. Don't bother
setting fr_var. Simplify byte branch checks.
2001-07-23 15:03:40 +02:00
|
|
|
|
}
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
know (fragP->fr_next);
|
2008-06-24 03:49:36 +02:00
|
|
|
|
after = fragP->fr_next->fr_address + stretch;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
growth = target - after;
|
GAS: Fix bogus "attempt to move .org backwards" relaxation errors
Fix a commit 6afe8e98a664 ("internal error for backwards .org"),
<https://www.sourceware.org/ml/binutils/2008-06/msg00212.html>,
GAS regression that caused legitimate code to fail assembly with an
"attempt to move .org backwards" error.
For example with the `mips-linux' target we get:
$ cat org.s
.set mips16
la $2, foo
.org 0x1000
.align 2
foo:
.half 0
$ as -o org.o org.s
org.s: Assembler messages:
org.s:3: Error: attempt to move .org backwards
$
where the location pointer is obviously not moved backwards with `.org'.
The cause is positive `stretch' in relaxation due to a PC-relative ADDIU
instruction (produced from the LA macro used) getting expanded from 2 to
4 bytes as `foo' is noticed to be out of range for the short encoding.
This in turn triggers logic in `relax_segment' which concludes in the
processing of an `rs_org' frag produced that the location pointer is
moved backwards while in fact only the amount to space forward to the
location requested has shrunk, resulting in a negative growth of the
frag.
Correct the bad logic then and instead verify that the fixed part of an
`rs_org' frag has not overrun the location requested, as per the comment
already included with the error message:
/* Growth may be negative, but variable part of frag
cannot have fewer than 0 chars. That is, we can't
.org backwards. */
which accurately describes the regression scenario. Move the comment
ahead the conditional noted, for clarity.
Add generic and MIPS test cases for the `.org' pseudo-op, including the
test case discussed though not integrated with the offending commit in
particular, adjusted to work across all targets.
gas/
* write.c (relax_segment) <rs_org>: Only bail out if the fixed
part of the frag has overrun the location requested.
* testsuite/gas/all/org-1.d: New test.
* testsuite/gas/all/org-2.d: New test.
* testsuite/gas/all/org-3.d: New test.
* testsuite/gas/all/org-4.d: New test.
* testsuite/gas/all/org-5.d: New test.
* testsuite/gas/all/org-6.d: New test.
* testsuite/gas/all/org-1.l: New stderr output.
* testsuite/gas/all/org-2.l: New stderr output.
* testsuite/gas/all/org-3.l: New stderr output.
* testsuite/gas/all/org-1.s: New test source.
* testsuite/gas/all/org-2.s: New test source.
* testsuite/gas/all/org-3.s: New test source.
* testsuite/gas/all/org-4.s: New test source.
* testsuite/gas/all/org-5.s: New test source.
* testsuite/gas/all/org-6.s: New test source.
* testsuite/gas/all/gas.exp: Run the new tests.
* testsuite/gas/mips/org-1.d: New test.
* testsuite/gas/mips/org-2.d: New test.
* testsuite/gas/mips/org-3.d: New test.
* testsuite/gas/mips/org-4.d: New test.
* testsuite/gas/mips/org-5.d: New test.
* testsuite/gas/mips/org-6.d: New test.
* testsuite/gas/mips/org-7.d: New test.
* testsuite/gas/mips/org-8.d: New test.
* testsuite/gas/mips/org-9.d: New test.
* testsuite/gas/mips/org-10.d: New test.
* testsuite/gas/mips/org-11.d: New test.
* testsuite/gas/mips/org-12.d: New test.
* testsuite/gas/mips/org-1.l: New stderr output.
* testsuite/gas/mips/org-4.l: New stderr output.
* testsuite/gas/mips/org-5.l: New stderr output.
* testsuite/gas/mips/org-6.l: New stderr output.
* testsuite/gas/mips/org-10.l: New stderr output.
* testsuite/gas/mips/org-1.s: New test source.
* testsuite/gas/mips/org-2.s: New test source.
* testsuite/gas/mips/org-3.s: New test source.
* testsuite/gas/mips/org-4.s: New test source.
* testsuite/gas/mips/org-5.s: New test source.
* testsuite/gas/mips/org-6.s: New test source.
* testsuite/gas/mips/org-7.s: New test source.
* testsuite/gas/mips/org-8.s: New test source.
* testsuite/gas/mips/org-9.s: New test source.
* testsuite/gas/mips/org-10.s: New test source.
* testsuite/gas/mips/org-11.s: New test source.
* testsuite/gas/mips/org-12.s: New test source.
* testsuite/gas/mips/mips.exp: Run the new tests.
2017-03-02 02:24:15 +01:00
|
|
|
|
|
|
|
|
|
/* Growth may be negative, but variable part of frag
|
|
|
|
|
cannot have fewer than 0 chars. That is, we can't
|
|
|
|
|
.org backwards. */
|
|
|
|
|
if (address + fragP->fr_fix > target)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2006-05-08 01:03:48 +02:00
|
|
|
|
growth = 0;
|
|
|
|
|
|
|
|
|
|
/* Don't error on first few frag relax passes.
|
|
|
|
|
The symbol might be an expression involving
|
|
|
|
|
symbol values from other sections. If those
|
|
|
|
|
sections have not yet been processed their
|
|
|
|
|
frags will all have zero addresses, so we
|
|
|
|
|
will calculate incorrect values for them. The
|
|
|
|
|
number of passes we allow before giving an
|
|
|
|
|
error is somewhat arbitrary. It should be at
|
|
|
|
|
least one, with larger values requiring
|
|
|
|
|
increasingly contrived dependencies between
|
|
|
|
|
frags to trigger a false error. */
|
|
|
|
|
if (pass < 2)
|
|
|
|
|
{
|
|
|
|
|
/* Force another pass. */
|
|
|
|
|
ret = 1;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
1999-07-14 16:02:33 +02:00
|
|
|
|
as_bad_where (fragP->fr_file, fragP->fr_line,
|
2003-06-24 13:10:47 +02:00
|
|
|
|
_("attempt to move .org backwards"));
|
1999-07-14 16:02:33 +02:00
|
|
|
|
|
|
|
|
|
/* We've issued an error message. Change the
|
2007-02-17 08:20:56 +01:00
|
|
|
|
frag to avoid cascading errors. */
|
1999-07-14 16:02:33 +02:00
|
|
|
|
fragP->fr_type = rs_align;
|
|
|
|
|
fragP->fr_subtype = 0;
|
|
|
|
|
fragP->fr_offset = 0;
|
2008-06-24 03:49:36 +02:00
|
|
|
|
fragP->fr_fix = after - address;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
}
|
2008-06-24 03:49:36 +02:00
|
|
|
|
break;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
case rs_space:
|
Add .nop assembler directive
Implement the '.nop SIZE[, CONTROL]' assembler directive, which emits
SIZE bytes filled with no-op instructions. SIZE is absolute expression.
The optional CONTROL byte controls how no-op instructions should be
generated. If the comma and @var{control} are omitted, CONTROL is
assumed to be zero.
For Intel 80386 and AMD x86-64 targets, CONTROL byte specifies the size
limit of a single no-op instruction. The valid values of CONTROL byte
are between 0 and 8 for 16-bit mode, between 0 and 10 for 32-bit mode,
between 0 and 11 for 64-bit mode. When 0 is used, the no-op size limit
is set to the maximum supported size.
2 new relax states, rs_space_nop and rs_fill_nop, are added to enum
_relax_state, which are similar to rs_space and rs_fill, respectively,
but they fill with no-op instructions, instead of a single byte. A
target backend must override the default md_generate_nops to generate
proper no-op instructions. Otherwise, an error of unimplemented .nop
directive will be issued whenever .nop directive is used.
* NEWS: Mention .nop directive.
* as.h (_relax_state): Add rs_space_nop and rs_fill_nop.
* read.c (potable): Add .nop.
(s_nop): New function.
* read.h (s_nop): New prototype.
* write.c (cvt_frag_to_fill): Handle rs_space_nop and
rs_fill_nop.
(md_generate_nops): New function.
(relax_segment): Likewise.
(write_contents): Use md_generate_nops for rs_fill_nop.
* config/tc-i386.c (alt64_11): New.
(alt64_patt): Likewise.
(md_convert_frag): Handle rs_space_nop.
(i386_output_nops): New function.
(i386_generate_nops): Likewise.
(i386_align_code): Call i386_output_nops.
* config/tc-i386.h (i386_generate_nops): New.
(md_generate_nops): Likewise.
* doc/as.texinfo: Document .nop directive.
* testsuite/gas/i386/i386.exp: Run .nop directive tests.
* testsuite/gas/i386/nop-1.d: New file.
* testsuite/gas/i386/nop-1.s: Likewise.
* testsuite/gas/i386/nop-2.d: Likewise.
* testsuite/gas/i386/nop-2.s: Likewise.
* testsuite/gas/i386/nop-3.d: Likewise.
* testsuite/gas/i386/nop-3.s: Likewise.
* testsuite/gas/i386/nop-4.d: Likewise.
* testsuite/gas/i386/nop-4.s: Likewise.
* testsuite/gas/i386/nop-5.d: Likewise.
* testsuite/gas/i386/nop-5.s: Likewise.
* testsuite/gas/i386/nop-6.d: Likewise.
* testsuite/gas/i386/nop-6.s: Likewise.
* testsuite/gas/i386/nop-bad-1.l: Likewise.
* testsuite/gas/i386/nop-bad-1.s: Likewise.
* testsuite/gas/i386/x86-64-nop-1.d: Likewise.
* testsuite/gas/i386/x86-64-nop-2.d: Likewise.
* testsuite/gas/i386/x86-64-nop-3.d: Likewise.
* testsuite/gas/i386/x86-64-nop-4.d: Likewise.
* testsuite/gas/i386/x86-64-nop-5.d: Likewise.
* testsuite/gas/i386/x86-64-nop-6.d: Likewise.
2018-02-17 14:20:42 +01:00
|
|
|
|
case rs_space_nop:
|
2001-05-26 14:45:15 +02:00
|
|
|
|
growth = 0;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
if (symbolP)
|
|
|
|
|
{
|
2001-05-25 01:33:00 +02:00
|
|
|
|
offsetT amount;
|
|
|
|
|
|
|
|
|
|
amount = S_GET_VALUE (symbolP);
|
2001-05-27 14:17:38 +02:00
|
|
|
|
if (S_GET_SEGMENT (symbolP) != absolute_section
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|| S_IS_COMMON (symbolP)
|
|
|
|
|
|| ! S_IS_DEFINED (symbolP))
|
|
|
|
|
{
|
2001-05-26 14:45:15 +02:00
|
|
|
|
as_bad_where (fragP->fr_file, fragP->fr_line,
|
|
|
|
|
_(".space specifies non-absolute value"));
|
|
|
|
|
/* Prevent repeat of this error message. */
|
|
|
|
|
fragP->fr_symbol = 0;
|
|
|
|
|
}
|
|
|
|
|
else if (amount < 0)
|
|
|
|
|
{
|
2006-05-08 01:03:48 +02:00
|
|
|
|
/* Don't error on first few frag relax passes.
|
|
|
|
|
See rs_org comment for a longer explanation. */
|
|
|
|
|
if (pass < 2)
|
|
|
|
|
{
|
|
|
|
|
ret = 1;
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
|
2001-05-26 14:45:15 +02:00
|
|
|
|
as_warn_where (fragP->fr_file, fragP->fr_line,
|
2018-02-27 23:45:48 +01:00
|
|
|
|
_(".space, .nops or .fill with negative value, ignored"));
|
2001-05-25 01:33:00 +02:00
|
|
|
|
fragP->fr_symbol = 0;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
2001-05-26 14:45:15 +02:00
|
|
|
|
else
|
2001-07-26 05:39:29 +02:00
|
|
|
|
growth = (was_address + fragP->fr_fix + amount
|
2001-05-26 14:45:15 +02:00
|
|
|
|
- fragP->fr_next->fr_address);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_machine_dependent:
|
|
|
|
|
#ifdef md_relax_frag
|
2001-02-13 22:27:52 +01:00
|
|
|
|
growth = md_relax_frag (segment, fragP, stretch);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#else
|
|
|
|
|
#ifdef TC_GENERIC_RELAX_TABLE
|
|
|
|
|
/* The default way to relax a frag is to look through
|
|
|
|
|
TC_GENERIC_RELAX_TABLE. */
|
2001-02-13 22:27:52 +01:00
|
|
|
|
growth = relax_frag (segment, fragP, stretch);
|
2000-07-20 22:07:09 +02:00
|
|
|
|
#endif /* TC_GENERIC_RELAX_TABLE */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
#endif
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_leb128:
|
|
|
|
|
{
|
|
|
|
|
valueT value;
|
2003-06-24 13:10:47 +02:00
|
|
|
|
offsetT size;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2001-05-22 12:23:50 +02:00
|
|
|
|
value = resolve_symbol_value (fragP->fr_symbol);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
size = sizeof_leb128 (value, fragP->fr_subtype);
|
|
|
|
|
growth = size - fragP->fr_offset;
|
|
|
|
|
fragP->fr_offset = size;
|
|
|
|
|
}
|
|
|
|
|
break;
|
|
|
|
|
|
|
|
|
|
case rs_cfa:
|
|
|
|
|
growth = eh_frame_relax_frag (fragP);
|
|
|
|
|
break;
|
|
|
|
|
|
2000-11-29 22:42:41 +01:00
|
|
|
|
case rs_dwarf2dbg:
|
|
|
|
|
growth = dwarf2dbg_relax_frag (fragP);
|
|
|
|
|
break;
|
|
|
|
|
|
1999-05-03 09:29:11 +02:00
|
|
|
|
default:
|
|
|
|
|
BAD_CASE (fragP->fr_type);
|
|
|
|
|
break;
|
|
|
|
|
}
|
|
|
|
|
if (growth)
|
|
|
|
|
{
|
|
|
|
|
stretch += growth;
|
2001-03-30 04:19:36 +02:00
|
|
|
|
stretched = 1;
|
2007-03-14 12:03:38 +01:00
|
|
|
|
if (fragP->fr_type == rs_leb128)
|
|
|
|
|
rs_leb128_fudge += 16;
|
|
|
|
|
else if (fragP->fr_type == rs_align
|
|
|
|
|
&& (rs_leb128_fudge & 16) != 0
|
|
|
|
|
&& stretch == 0)
|
|
|
|
|
rs_leb128_fudge += 16;
|
|
|
|
|
else
|
|
|
|
|
rs_leb128_fudge = 0;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
2005-08-18 11:26:16 +02:00
|
|
|
|
}
|
2007-03-14 12:03:38 +01:00
|
|
|
|
|
|
|
|
|
if (stretch == 0
|
|
|
|
|
&& (rs_leb128_fudge & 16) == 0
|
|
|
|
|
&& (rs_leb128_fudge & -16) != 0)
|
|
|
|
|
rs_leb128_fudge += 1;
|
|
|
|
|
else
|
|
|
|
|
rs_leb128_fudge = 0;
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
2005-08-18 11:26:16 +02:00
|
|
|
|
/* Until nothing further to relax. */
|
|
|
|
|
while (stretched && -- max_iterations);
|
|
|
|
|
|
|
|
|
|
if (stretched)
|
|
|
|
|
as_fatal (_("Infinite loop encountered whilst attempting to compute the addresses of symbols in section %s"),
|
|
|
|
|
segment_name (segment));
|
|
|
|
|
}
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
2001-03-30 04:19:36 +02:00
|
|
|
|
for (fragP = segment_frag_root; fragP; fragP = fragP->fr_next)
|
|
|
|
|
if (fragP->last_fr_address != fragP->fr_address)
|
|
|
|
|
{
|
|
|
|
|
fragP->last_fr_address = fragP->fr_address;
|
|
|
|
|
ret = 1;
|
|
|
|
|
}
|
|
|
|
|
return ret;
|
2000-07-20 22:07:09 +02:00
|
|
|
|
}
|
1999-05-03 09:29:11 +02:00
|
|
|
|
|
|
|
|
|
void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
number_to_chars_bigendian (char *buf, valueT val, int n)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2002-03-06 05:59:36 +01:00
|
|
|
|
if (n <= 0)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
abort ();
|
|
|
|
|
while (n--)
|
|
|
|
|
{
|
|
|
|
|
buf[n] = val & 0xff;
|
|
|
|
|
val >>= 8;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
number_to_chars_littleendian (char *buf, valueT val, int n)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
2002-03-06 05:59:36 +01:00
|
|
|
|
if (n <= 0)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
abort ();
|
|
|
|
|
while (n--)
|
|
|
|
|
{
|
|
|
|
|
*buf++ = val & 0xff;
|
|
|
|
|
val >>= 8;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
write_print_statistics (FILE *file)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
1999-05-17 05:21:46 +02:00
|
|
|
|
fprintf (file, "fixups: %d\n", n_fixups);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
}
|
|
|
|
|
|
2000-07-20 22:07:09 +02:00
|
|
|
|
/* For debugging. */
|
1999-05-03 09:29:11 +02:00
|
|
|
|
extern int indent_level;
|
|
|
|
|
|
|
|
|
|
void
|
2003-12-06 17:16:51 +01:00
|
|
|
|
print_fixup (fixS *fixp)
|
1999-05-03 09:29:11 +02:00
|
|
|
|
{
|
|
|
|
|
indent_level = 1;
|
2007-07-12 09:16:41 +02:00
|
|
|
|
fprintf (stderr, "fix ");
|
|
|
|
|
fprintf_vma (stderr, (bfd_vma)((bfd_hostptr_t) fixp));
|
|
|
|
|
fprintf (stderr, " %s:%d",fixp->fx_file, fixp->fx_line);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
if (fixp->fx_pcrel)
|
|
|
|
|
fprintf (stderr, " pcrel");
|
|
|
|
|
if (fixp->fx_pcrel_adjust)
|
|
|
|
|
fprintf (stderr, " pcrel_adjust=%d", fixp->fx_pcrel_adjust);
|
|
|
|
|
if (fixp->fx_im_disp)
|
|
|
|
|
{
|
|
|
|
|
#ifdef TC_NS32K
|
|
|
|
|
fprintf (stderr, " im_disp=%d", fixp->fx_im_disp);
|
|
|
|
|
#else
|
|
|
|
|
fprintf (stderr, " im_disp");
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
if (fixp->fx_tcbit)
|
|
|
|
|
fprintf (stderr, " tcbit");
|
|
|
|
|
if (fixp->fx_done)
|
|
|
|
|
fprintf (stderr, " done");
|
2007-07-12 09:16:41 +02:00
|
|
|
|
fprintf (stderr, "\n size=%d frag=", fixp->fx_size);
|
|
|
|
|
fprintf_vma (stderr, (bfd_vma) ((bfd_hostptr_t) fixp->fx_frag));
|
|
|
|
|
fprintf (stderr, " where=%ld offset=%lx addnumber=%lx",
|
|
|
|
|
(long) fixp->fx_where,
|
2008-07-30 06:34:58 +02:00
|
|
|
|
(unsigned long) fixp->fx_offset,
|
|
|
|
|
(unsigned long) fixp->fx_addnumber);
|
1999-05-03 09:29:11 +02:00
|
|
|
|
fprintf (stderr, "\n %s (%d)", bfd_get_reloc_code_name (fixp->fx_r_type),
|
|
|
|
|
fixp->fx_r_type);
|
|
|
|
|
if (fixp->fx_addsy)
|
|
|
|
|
{
|
|
|
|
|
fprintf (stderr, "\n +<");
|
|
|
|
|
print_symbol_value_1 (stderr, fixp->fx_addsy);
|
|
|
|
|
fprintf (stderr, ">");
|
|
|
|
|
}
|
|
|
|
|
if (fixp->fx_subsy)
|
|
|
|
|
{
|
|
|
|
|
fprintf (stderr, "\n -<");
|
|
|
|
|
print_symbol_value_1 (stderr, fixp->fx_subsy);
|
|
|
|
|
fprintf (stderr, ">");
|
|
|
|
|
}
|
|
|
|
|
fprintf (stderr, "\n");
|
|
|
|
|
#ifdef TC_FIX_DATA_PRINT
|
|
|
|
|
TC_FIX_DATA_PRINT (stderr, fixp);
|
|
|
|
|
#endif
|
|
|
|
|
}
|