OpenE2K/binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

* xcofflink.c (xcoff_link_input_bfd): Adjust the TOC anchor value

Browse Source 
if it is not large enough to accomodate the entire TOC area with
	signed 16 bit offsets.
	(xcoff_write_global_symbol): Handle negative TOC offsets in global
	linkage code.
	(_bfd_ppc_xcoff_relocate_section): Adjust relocations against a
	TOC anchor to use the TOC value used in the output file.
This commit is contained in:
Ian Lance Taylor 1995-11-20 19:57:30 +00:00
parent e7b6403a67
commit b5403ad754
2 changed files with 48 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
bfd/ChangeLog
View File

@ -1,3 +1,13 @@
Mon Nov 20 14:54:09 1995 Ian Lance Taylor <ian@cygnus.com>
* xcofflink.c (xcoff_link_input_bfd): Adjust the TOC anchor value
if it is not large enough to accomodate the entire TOC area with
signed 16 bit offsets.
(xcoff_write_global_symbol): Handle negative TOC offsets in global
linkage code.
(_bfd_ppc_xcoff_relocate_section): Adjust relocations against a
TOC anchor to use the TOC value used in the output file.
Sat Nov 18 18:01:41 1995 Ian Lance Taylor <ian@cygnus.com>
* coffgen.c (_bfd_coff_get_external_symbols): Cast malloc return.

37
bfd/xcofflink.c
View File

@ -2477,7 +2477,7 @@ bfd_xcoff_export_symbol (output_bfd, info, harg, syscall)
char *fnname;
struct xcoff_link_hash_entry *hfn;
fnname = (char *) malloc (strlen (h->root.root.string + 2));
fnname = (char *) malloc (strlen (h->root.root.string) + 2);
if (fnname == NULL)
{
bfd_set_error (bfd_error_no_memory);
@ -4011,12 +4011,33 @@ xcoff_link_input_bfd (finfo, input_bfd)
skip = true;
else
{
finfo->toc_symindx = output_index;
xcoff_data (finfo->output_bfd)->toc =
((*csectpp)->output_section->vma
bfd_vma tocval, tocend;
tocval = ((*csectpp)->output_section->vma
+ (*csectpp)->output_offset
+ isym.n_value
- (*csectpp)->vma);
/* We want to find out if tocval is a good value to use
as the TOC anchor--that is, whether we can access all
of the TOC using a 16 bit offset from tocval. This
test assumes that the TOC comes at the end of the
output section, as it does in the default linker
script. If the TOC anchor is too far into the .toc
section, the relocation routine will report
overflows. */
tocend = ((*csectpp)->output_section->vma
+ (*csectpp)->output_section->_raw_size);
if (tocval + 0x8000 < tocend)
{
bfd_vma tocadd;
tocadd = tocend - (tocval + 0x8000);
tocval += tocadd;
isym.n_value += tocadd;
}
finfo->toc_symindx = output_index;
xcoff_data (finfo->output_bfd)->toc = tocval;
xcoff_data (finfo->output_bfd)->toc_section =
(*csectpp)->output_section;
require = true;
@ -4993,7 +5014,7 @@ xcoff_write_global_symbol (h, p)
- xcoff_data (output_bfd)->toc);
if ((h->descriptor->flags & XCOFF_SET_TOC) != 0)
tocoff += h->descriptor->u.toc_offset;
bfd_put_32 (output_bfd, XCOFF_GLINK_FIRST | tocoff, p);
bfd_put_32 (output_bfd, XCOFF_GLINK_FIRST | (tocoff & 0xffff), p);
for (i = 0, p += 4;
i < sizeof xcoff_glink_code / sizeof xcoff_glink_code[0];
i++, p += 4)
@ -5568,6 +5589,12 @@ _bfd_ppc_xcoff_relocate_section (output_bfd, info, input_bfd,
else
{
sec = sections[symndx];
/* Hack to make sure we use the right TOC anchor value
if this reloc is against the TOC anchor. */
if (sec->name[3] == '0'
&& strcmp (sec->name, ".tc0") == 0)
val = xcoff_data (output_bfd)->toc;
else
val = (sec->output_section->vma
+ sec->output_offset
+ sym->n_value