espressif/binutils-gdb
1
0
Fork 0
mirror of https://github.com/espressif/binutils-gdb.git synced 2025-06-20 09:58:19 +08:00
Code Issues Packages Projects Releases Wiki Activity

* config/tc-v850.c (md_assemble): When no reloc, create pcrel fixups

Browse Source 
only for V850_OPERAND_DISP operands.
This commit is contained in:
Alan Modra
2003-07-15 04:04:18 +00:00
parent e85ca5bb79
commit ec178e1bbb
2 changed files with 59 additions and 55 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
gas/ChangeLog
View File

@ -1,3 +1,8 @@
2003-07-15 Alan Modra <amodra@bigpond.net.au>
* config/tc-v850.c (md_assemble): When no reloc, create pcrel fixups
only for V850_OPERAND_DISP operands.
2003-07-15 Alan Modra <amodra@bigpond.net.au> 2003-07-15 Alan Modra <amodra@bigpond.net.au>
* frags.c (frag_more): Move segment checks to.. * frags.c (frag_more): Move segment checks to..

109
gas/config/tc-v850.c
View File

@ -197,7 +197,7 @@ v850_offset (ignore)
int temp = get_absolute_expression (); int temp = get_absolute_expression ();
pfrag = frag_var (rs_org, 1, 1, (relax_substateT)0, (symbolS *)0, pfrag = frag_var (rs_org, 1, 1, (relax_substateT)0, (symbolS *)0,
(offsetT) temp, (char *) 0); (offsetT) temp, (char *) 0);
*pfrag = 0; *pfrag = 0;
demand_empty_rest_of_line (); demand_empty_rest_of_line ();
@ -396,12 +396,12 @@ v850_comm (area)
} }
else else
{ {
segT old_sec; segT old_sec;
int old_subsec; int old_subsec;
allocate_common: allocate_common:
old_sec = now_seg; old_sec = now_seg;
old_subsec = now_subseg; old_subsec = now_subseg;
S_SET_VALUE (symbolP, (valueT) size); S_SET_VALUE (symbolP, (valueT) size);
S_SET_ALIGN (symbolP, temp); S_SET_ALIGN (symbolP, temp);
@ -477,7 +477,7 @@ set_machine (number)
switch (machine) switch (machine)
{ {
case 0: processor_mask = PROCESSOR_V850; break; case 0: processor_mask = PROCESSOR_V850; break;
case bfd_mach_v850e: processor_mask = PROCESSOR_V850E; break; case bfd_mach_v850e: processor_mask = PROCESSOR_V850E; break;
} }
} }
@ -495,7 +495,7 @@ v850_longcode (type)
if (type == 1) if (type == 1)
as_warn (".longcall pseudo-op seen when not relaxing"); as_warn (".longcall pseudo-op seen when not relaxing");
else else
as_warn (".longjump pseudo-op seen when not relaxing"); as_warn (".longjump pseudo-op seen when not relaxing");
} }
expression (&ex); expression (&ex);
@ -508,7 +508,7 @@ v850_longcode (type)
return; return;
} }
if (type == 1) if (type == 1)
fix_new_exp (frag_now, frag_now_fix (), 4, & ex, 1, fix_new_exp (frag_now, frag_now_fix (), 4, & ex, 1,
BFD_RELOC_V850_LONGCALL); BFD_RELOC_V850_LONGCALL);
else else
@ -539,8 +539,8 @@ const pseudo_typeS md_pseudo_table[] =
{ "call_table_data", v850_seg, CALL_TABLE_DATA_SECTION }, { "call_table_data", v850_seg, CALL_TABLE_DATA_SECTION },
{ "call_table_text", v850_seg, CALL_TABLE_TEXT_SECTION }, { "call_table_text", v850_seg, CALL_TABLE_TEXT_SECTION },
{ "v850e", set_machine, bfd_mach_v850e }, { "v850e", set_machine, bfd_mach_v850e },
{ "longcall", v850_longcode, 1 }, { "longcall", v850_longcode, 1 },
{ "longjump", v850_longcode, 2 }, { "longjump", v850_longcode, 2 },
{ NULL, NULL, 0 } { NULL, NULL, 0 }
}; };
@ -715,9 +715,9 @@ reg_name_search (regs, regcount, name, accept_numbers)
} }
/* Summary of register_name(). /* Summary of register_name().
in: Input_line_pointer points to 1st char of operand. in: Input_line_pointer points to 1st char of operand.
out: An expressionS. out: An expressionS.
The operand may have been a register: in this case, X_op == O_register, The operand may have been a register: in this case, X_op == O_register,
X_add_number is set to the register number, and truth is returned. X_add_number is set to the register number, and truth is returned.
@ -749,7 +749,7 @@ register_name (expressionP)
/* Look to see if it's in the register table. */ /* Look to see if it's in the register table. */
if (reg_number >= 0) if (reg_number >= 0)
{ {
expressionP->X_op = O_register; expressionP->X_op = O_register;
expressionP->X_add_number = reg_number; expressionP->X_add_number = reg_number;
/* Make the rest nice. */ /* Make the rest nice. */
@ -768,13 +768,13 @@ register_name (expressionP)
} }
/* Summary of system_register_name(). /* Summary of system_register_name().
in: INPUT_LINE_POINTER points to 1st char of operand. in: INPUT_LINE_POINTER points to 1st char of operand.
EXPRESSIONP points to an expression structure to be filled in. EXPRESSIONP points to an expression structure to be filled in.
ACCEPT_NUMBERS is true iff numerical register names may be used. ACCEPT_NUMBERS is true iff numerical register names may be used.
ACCEPT_LIST_NAMES is true iff the special names PS and SR may be ACCEPT_LIST_NAMES is true iff the special names PS and SR may be
accepted. accepted.
out: An expressionS structure in expressionP. out: An expressionS structure in expressionP.
The operand may have been a register: in this case, X_op == O_register, The operand may have been a register: in this case, X_op == O_register,
X_add_number is set to the register number, and truth is returned. X_add_number is set to the register number, and truth is returned.
@ -837,7 +837,7 @@ system_register_name (expressionP, accept_numbers, accept_list_names)
/* Look to see if it's in the register table. */ /* Look to see if it's in the register table. */
if (reg_number >= 0) if (reg_number >= 0)
{ {
expressionP->X_op = O_register; expressionP->X_op = O_register;
expressionP->X_add_number = reg_number; expressionP->X_add_number = reg_number;
/* Make the rest nice. */ /* Make the rest nice. */
@ -856,9 +856,9 @@ system_register_name (expressionP, accept_numbers, accept_list_names)
} }
/* Summary of cc_name(). /* Summary of cc_name().
in: INPUT_LINE_POINTER points to 1st char of operand. in: INPUT_LINE_POINTER points to 1st char of operand.
out: An expressionS. out: An expressionS.
The operand may have been a register: in this case, X_op == O_register, The operand may have been a register: in this case, X_op == O_register,
X_add_number is set to the register number, and truth is returned. X_add_number is set to the register number, and truth is returned.
@ -888,7 +888,7 @@ cc_name (expressionP)
/* Look to see if it's in the register table. */ /* Look to see if it's in the register table. */
if (reg_number >= 0) if (reg_number >= 0)
{ {
expressionP->X_op = O_constant; expressionP->X_op = O_constant;
expressionP->X_add_number = reg_number; expressionP->X_add_number = reg_number;
/* Make the rest nice. */ /* Make the rest nice. */
@ -917,24 +917,24 @@ skip_white_space ()
} }
/* Summary of parse_register_list (). /* Summary of parse_register_list ().
in: INPUT_LINE_POINTER points to 1st char of a list of registers. in: INPUT_LINE_POINTER points to 1st char of a list of registers.
INSN is the partially constructed instruction. INSN is the partially constructed instruction.
OPERAND is the operand being inserted. OPERAND is the operand being inserted.
out: NULL if the parse completed successfully, otherwise a out: NULL if the parse completed successfully, otherwise a
pointer to an error message is returned. If the parse pointer to an error message is returned. If the parse
completes the correct bit fields in the instruction completes the correct bit fields in the instruction
will be filled in. will be filled in.
Parses register lists with the syntax: Parses register lists with the syntax:
{ rX } { rX }
{ rX, rY } { rX, rY }
{ rX - rY } { rX - rY }
{ rX - rY, rZ } { rX - rY, rZ }
etc etc
and also parses constant epxressions whoes bits indicate the and also parses constant epxressions whoes bits indicate the
registers in the lists. The LSB in the expression refers to registers in the lists. The LSB in the expression refers to
the lowest numbered permissable register in the register list, the lowest numbered permissable register in the register list,
@ -1158,7 +1158,6 @@ md_show_usage (stream)
fprintf (stream, _(" -mv850e The code is targeted at the v850e\n")); fprintf (stream, _(" -mv850e The code is targeted at the v850e\n"));
fprintf (stream, _(" -mv850any The code is generic, despite any processor specific instructions\n")); fprintf (stream, _(" -mv850any The code is generic, despite any processor specific instructions\n"));
fprintf (stream, _(" -mrelax Enable relaxation\n")); fprintf (stream, _(" -mrelax Enable relaxation\n"));
} }
int int
@ -1347,7 +1346,7 @@ md_begin ()
else else
/* xgettext:c-format */ /* xgettext:c-format */
as_bad (_("Unable to determine default target processor from string: %s"), as_bad (_("Unable to determine default target processor from string: %s"),
TARGET_CPU); TARGET_CPU);
v850_hash = hash_new (); v850_hash = hash_new ();
@ -1509,13 +1508,13 @@ v850_reloc_prefix (operand)
return reloc; \ return reloc; \
} }
CHECK_ ("hi0", BFD_RELOC_HI16 ); CHECK_ ("hi0", BFD_RELOC_HI16 );
CHECK_ ("hi", BFD_RELOC_HI16_S ); CHECK_ ("hi", BFD_RELOC_HI16_S );
CHECK_ ("lo", BFD_RELOC_LO16 ); CHECK_ ("lo", BFD_RELOC_LO16 );
CHECK_ ("sdaoff", handle_sdaoff (operand)); CHECK_ ("sdaoff", handle_sdaoff (operand));
CHECK_ ("zdaoff", handle_zdaoff (operand)); CHECK_ ("zdaoff", handle_zdaoff (operand));
CHECK_ ("tdaoff", handle_tdaoff (operand)); CHECK_ ("tdaoff", handle_tdaoff (operand));
CHECK_ ("hilo", BFD_RELOC_32 ); CHECK_ ("hilo", BFD_RELOC_32 );
CHECK_ ("ctoff", handle_ctoff (operand) ); CHECK_ ("ctoff", handle_ctoff (operand) );
/* Restore skipped parenthesis. */ /* Restore skipped parenthesis. */
@ -1791,8 +1790,8 @@ md_assemble (str)
} }
extra_data_after_insn = TRUE; extra_data_after_insn = TRUE;
extra_data_len = 4; extra_data_len = 4;
extra_data = 0; extra_data = 0;
break; break;
default: default:
@ -1820,8 +1819,8 @@ md_assemble (str)
} }
extra_data_after_insn = TRUE; extra_data_after_insn = TRUE;
extra_data_len = 4; extra_data_len = 4;
extra_data = ex.X_add_number; extra_data = ex.X_add_number;
} }
if (fc > MAX_INSN_FIXUPS) if (fc > MAX_INSN_FIXUPS)
@ -1897,7 +1896,7 @@ md_assemble (str)
/* The parse_register_list() function has already done /* The parse_register_list() function has already done
everything, so fake a dummy expression. */ everything, so fake a dummy expression. */
ex.X_op = O_constant; ex.X_op = O_constant;
ex.X_add_number = 0; ex.X_add_number = 0;
} }
else if (operand->flags & V850E_IMMEDIATE16) else if (operand->flags & V850E_IMMEDIATE16)
@ -1917,9 +1916,9 @@ md_assemble (str)
} }
extra_data_after_insn = TRUE; extra_data_after_insn = TRUE;
extra_data_len = 2; extra_data_len = 2;
extra_data = ex.X_add_number; extra_data = ex.X_add_number;
ex.X_add_number = 0; ex.X_add_number = 0;
} }
else if (operand->flags & V850E_IMMEDIATE32) else if (operand->flags & V850E_IMMEDIATE32)
{ {
@ -1929,9 +1928,9 @@ md_assemble (str)
errmsg = _("constant expression expected"); errmsg = _("constant expression expected");
extra_data_after_insn = TRUE; extra_data_after_insn = TRUE;
extra_data_len = 4; extra_data_len = 4;
extra_data = ex.X_add_number; extra_data = ex.X_add_number;
ex.X_add_number = 0; ex.X_add_number = 0;
} }
else if (register_name (&ex) else if (register_name (&ex)
&& (operand->flags & V850_OPERAND_REG) == 0) && (operand->flags & V850_OPERAND_REG) == 0)
@ -2216,7 +2215,7 @@ md_assemble (str)
fix_new_exp (frag_now, fix_new_exp (frag_now,
f - frag_now->fr_literal, 4, f - frag_now->fr_literal, 4,
& fixups[i].exp, & fixups[i].exp,
1 /* FIXME: V850_OPERAND_RELATIVE ??? */, (operand->flags & V850_OPERAND_DISP) != 0,
(bfd_reloc_code_real_type) (fixups[i].opindex (bfd_reloc_code_real_type) (fixups[i].opindex
+ (int) BFD_RELOC_UNUSED)); + (int) BFD_RELOC_UNUSED));
} }
@ -2235,7 +2234,7 @@ tc_gen_reloc (seg, fixp)
{ {
arelent *reloc; arelent *reloc;
reloc = (arelent *) xmalloc (sizeof (arelent)); reloc = (arelent *) xmalloc (sizeof (arelent));
reloc->sym_ptr_ptr = (asymbol **) xmalloc (sizeof (asymbol *)); reloc->sym_ptr_ptr = (asymbol **) xmalloc (sizeof (asymbol *));
*reloc->sym_ptr_ptr = symbol_get_bfdsym (fixp->fx_addsy); *reloc->sym_ptr_ptr = symbol_get_bfdsym (fixp->fx_addsy);
reloc->address = fixp->fx_frag->fr_address + fixp->fx_where; reloc->address = fixp->fx_frag->fr_address + fixp->fx_where;
@ -2255,7 +2254,7 @@ tc_gen_reloc (seg, fixp)
reloc->addend = fixp->fx_addnumber; reloc->addend = fixp->fx_addnumber;
} }
reloc->howto = bfd_reloc_type_lookup (stdoutput, fixp->fx_r_type); reloc->howto = bfd_reloc_type_lookup (stdoutput, fixp->fx_r_type);
if (reloc->howto == (reloc_howto_type *) NULL) if (reloc->howto == (reloc_howto_type *) NULL)
{ {
@ -2285,7 +2284,7 @@ v850_handle_align (frag)
&& now_seg != v850_seg_table[TBSS_SECTION].s && now_seg != v850_seg_table[TBSS_SECTION].s
&& now_seg != v850_seg_table[ZBSS_SECTION].s) && now_seg != v850_seg_table[ZBSS_SECTION].s)
fix_new (frag, frag->fr_fix, 2, & abs_symbol, frag->fr_offset, 0, fix_new (frag, frag->fr_fix, 2, & abs_symbol, frag->fr_offset, 0,
BFD_RELOC_V850_ALIGN); BFD_RELOC_V850_ALIGN);
} }
/* Return current size of variable part of frag. */ /* Return current size of variable part of frag. */
@ -2370,7 +2369,7 @@ md_apply_fix3 (fixP, valueP, seg)
operand = &v850_operands[opindex]; operand = &v850_operands[opindex];
/* Fetch the instruction, insert the fully resolved operand /* Fetch the instruction, insert the fully resolved operand
value, and stuff the instruction back again. value, and stuff the instruction back again.
Note the instruction has been stored in little endian Note the instruction has been stored in little endian
format! */ format! */