2003-02-18 14:05:07 +08:00
|
|
|
# This shell script emits a C file. -*- C -*-
|
2008-02-15 11:35:53 +08:00
|
|
|
# Copyright 2003, 2005, 2007, 2008 Free Software Foundation, Inc.
|
2003-02-18 14:05:07 +08:00
|
|
|
#
|
2007-07-06 22:09:45 +08:00
|
|
|
# This file is part of the GNU Binutils.
|
2003-02-18 14:05:07 +08:00
|
|
|
#
|
|
|
|
# This program 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-06 22:09:45 +08:00
|
|
|
# the Free Software Foundation; either version 3 of the License, or
|
2003-02-18 14:05:07 +08:00
|
|
|
# (at your option) any later version.
|
|
|
|
#
|
|
|
|
# This program is distributed in the hope that it will be useful,
|
|
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
# GNU General Public License for more details.
|
|
|
|
#
|
|
|
|
# You should have received a copy of the GNU General Public License
|
|
|
|
# along with this program; if not, write to the Free Software
|
2007-07-06 22:09:45 +08:00
|
|
|
# Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
|
|
|
|
# MA 02110-1301, USA.
|
2003-02-18 14:05:07 +08:00
|
|
|
#
|
|
|
|
|
2005-03-21 21:23:15 +08:00
|
|
|
# This file is sourced from elf32.em, and defines extra powerpc32-elf
|
2003-02-18 14:05:07 +08:00
|
|
|
# specific routines.
|
|
|
|
#
|
2007-07-20 03:56:10 +08:00
|
|
|
fragment <<EOF
|
2003-02-18 14:05:07 +08:00
|
|
|
|
|
|
|
#include "libbfd.h"
|
|
|
|
#include "elf32-ppc.h"
|
|
|
|
|
2008-02-15 17:03:02 +08:00
|
|
|
#define is_ppc_elf(bfd) \
|
|
|
|
(bfd_get_flavour (bfd) == bfd_target_elf_flavour \
|
|
|
|
&& elf_object_id (bfd) == PPC32_ELF_TDATA)
|
2005-03-21 21:23:15 +08:00
|
|
|
|
2003-02-18 14:05:07 +08:00
|
|
|
/* Whether to run tls optimization. */
|
|
|
|
static int notlsopt = 0;
|
|
|
|
|
2005-12-08 19:41:12 +08:00
|
|
|
/* Whether to emit symbols for stubs. */
|
|
|
|
static int emit_stub_syms = 0;
|
|
|
|
|
2005-05-11 22:10:10 +08:00
|
|
|
/* Chooses the correct place for .plt and .got. */
|
2007-05-11 14:39:05 +08:00
|
|
|
static enum ppc_elf_plt_type plt_style = PLT_UNSET;
|
2005-05-11 22:10:10 +08:00
|
|
|
static int old_got = 0;
|
|
|
|
|
|
|
|
static void
|
|
|
|
ppc_after_open (void)
|
|
|
|
{
|
2008-02-15 17:03:02 +08:00
|
|
|
if (is_ppc_elf (link_info.output_bfd))
|
2005-05-11 22:10:10 +08:00
|
|
|
{
|
|
|
|
int new_plt;
|
|
|
|
int keep_new;
|
|
|
|
unsigned int num_plt;
|
|
|
|
unsigned int num_got;
|
|
|
|
lang_output_section_statement_type *os;
|
|
|
|
lang_output_section_statement_type *plt_os[2];
|
|
|
|
lang_output_section_statement_type *got_os[2];
|
|
|
|
|
2005-12-08 19:41:12 +08:00
|
|
|
emit_stub_syms |= link_info.emitrelocations;
|
2008-02-15 11:35:53 +08:00
|
|
|
new_plt = ppc_elf_select_plt_layout (link_info.output_bfd, &link_info,
|
|
|
|
plt_style, emit_stub_syms);
|
2005-05-11 22:10:10 +08:00
|
|
|
if (new_plt < 0)
|
|
|
|
einfo ("%X%P: select_plt_layout problem %E\n");
|
|
|
|
|
|
|
|
num_got = 0;
|
|
|
|
num_plt = 0;
|
|
|
|
for (os = &lang_output_section_statement.head->output_section_statement;
|
|
|
|
os != NULL;
|
|
|
|
os = os->next)
|
|
|
|
{
|
|
|
|
if (os->constraint == SPECIAL && strcmp (os->name, ".plt") == 0)
|
|
|
|
{
|
|
|
|
if (num_plt < 2)
|
|
|
|
plt_os[num_plt] = os;
|
|
|
|
++num_plt;
|
|
|
|
}
|
|
|
|
if (os->constraint == SPECIAL && strcmp (os->name, ".got") == 0)
|
|
|
|
{
|
|
|
|
if (num_got < 2)
|
|
|
|
got_os[num_got] = os;
|
|
|
|
++num_got;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
keep_new = new_plt == 1 ? 0 : -1;
|
|
|
|
if (num_plt == 2)
|
|
|
|
{
|
|
|
|
plt_os[0]->constraint = keep_new;
|
|
|
|
plt_os[1]->constraint = ~keep_new;
|
|
|
|
}
|
|
|
|
if (num_got == 2)
|
|
|
|
{
|
|
|
|
if (old_got)
|
|
|
|
keep_new = -1;
|
|
|
|
got_os[0]->constraint = keep_new;
|
|
|
|
got_os[1]->constraint = ~keep_new;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
gld${EMULATION_NAME}_after_open ();
|
|
|
|
}
|
|
|
|
|
2003-02-18 14:05:07 +08:00
|
|
|
static void
|
2003-06-24 22:04:29 +08:00
|
|
|
ppc_before_allocation (void)
|
2003-02-18 14:05:07 +08:00
|
|
|
{
|
2008-02-15 17:03:02 +08:00
|
|
|
if (is_ppc_elf (link_info.output_bfd))
|
2003-02-18 14:05:07 +08:00
|
|
|
{
|
2008-02-15 11:35:53 +08:00
|
|
|
if (ppc_elf_tls_setup (link_info.output_bfd, &link_info) && !notlsopt)
|
2003-02-18 14:05:07 +08:00
|
|
|
{
|
2008-02-15 11:35:53 +08:00
|
|
|
if (!ppc_elf_tls_optimize (link_info.output_bfd, &link_info))
|
2003-02-18 14:05:07 +08:00
|
|
|
{
|
|
|
|
einfo ("%X%P: TLS problem %E\n");
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
gld${EMULATION_NAME}_before_allocation ();
|
|
|
|
}
|
|
|
|
|
|
|
|
EOF
|
|
|
|
|
2007-03-26 19:10:44 +08:00
|
|
|
if grep -q 'ld_elf32_spu_emulation' ldemul-list.h; then
|
2007-07-20 03:56:10 +08:00
|
|
|
fragment <<EOF
|
2007-03-26 19:10:44 +08:00
|
|
|
/* Special handling for embedded SPU executables. */
|
|
|
|
extern bfd_boolean embedded_spu_file (lang_input_statement_type *, const char *);
|
|
|
|
static bfd_boolean gld${EMULATION_NAME}_load_symbols (lang_input_statement_type *);
|
|
|
|
|
|
|
|
static bfd_boolean
|
|
|
|
ppc_recognized_file (lang_input_statement_type *entry)
|
|
|
|
{
|
|
|
|
if (embedded_spu_file (entry, "-m32"))
|
|
|
|
return TRUE;
|
|
|
|
|
|
|
|
return gld${EMULATION_NAME}_load_symbols (entry);
|
|
|
|
}
|
|
|
|
|
|
|
|
EOF
|
|
|
|
LDEMUL_RECOGNIZED_FILE=ppc_recognized_file
|
|
|
|
fi
|
|
|
|
|
2003-02-18 14:05:07 +08:00
|
|
|
# Define some shell vars to insert bits of code into the standard elf
|
|
|
|
# parse_args and list_options functions.
|
|
|
|
#
|
|
|
|
PARSE_AND_LIST_PROLOGUE='
|
|
|
|
#define OPTION_NO_TLS_OPT 301
|
2007-05-11 14:39:05 +08:00
|
|
|
#define OPTION_NEW_PLT 302
|
|
|
|
#define OPTION_OLD_PLT 303
|
|
|
|
#define OPTION_OLD_GOT 304
|
|
|
|
#define OPTION_STUBSYMS 305
|
2003-02-18 14:05:07 +08:00
|
|
|
'
|
|
|
|
|
|
|
|
PARSE_AND_LIST_LONGOPTS='
|
2005-12-08 19:41:12 +08:00
|
|
|
{ "emit-stub-syms", no_argument, NULL, OPTION_STUBSYMS },
|
2003-02-18 14:05:07 +08:00
|
|
|
{ "no-tls-optimize", no_argument, NULL, OPTION_NO_TLS_OPT },
|
2007-05-11 14:39:05 +08:00
|
|
|
{ "secure-plt", no_argument, NULL, OPTION_NEW_PLT },
|
2005-05-11 22:10:10 +08:00
|
|
|
{ "bss-plt", no_argument, NULL, OPTION_OLD_PLT },
|
|
|
|
{ "sdata-got", no_argument, NULL, OPTION_OLD_GOT },
|
2003-02-18 14:05:07 +08:00
|
|
|
'
|
|
|
|
|
|
|
|
PARSE_AND_LIST_OPTIONS='
|
|
|
|
fprintf (file, _("\
|
2007-08-17 21:50:48 +08:00
|
|
|
--emit-stub-syms Label linker stubs with a symbol.\n\
|
|
|
|
--no-tls-optimize Don'\''t try to optimize TLS accesses.\n\
|
|
|
|
--secure-plt Use new-style PLT if possible.\n\
|
|
|
|
--bss-plt Force old-style BSS PLT.\n\
|
|
|
|
--sdata-got Force GOT location just before .sdata.\n"
|
2003-02-18 14:05:07 +08:00
|
|
|
));
|
|
|
|
'
|
|
|
|
|
|
|
|
PARSE_AND_LIST_ARGS_CASES='
|
2005-12-08 19:41:12 +08:00
|
|
|
case OPTION_STUBSYMS:
|
|
|
|
emit_stub_syms = 1;
|
|
|
|
break;
|
|
|
|
|
2003-02-18 14:05:07 +08:00
|
|
|
case OPTION_NO_TLS_OPT:
|
|
|
|
notlsopt = 1;
|
|
|
|
break;
|
2005-05-11 22:10:10 +08:00
|
|
|
|
2007-05-11 14:39:05 +08:00
|
|
|
case OPTION_NEW_PLT:
|
|
|
|
plt_style = PLT_NEW;
|
|
|
|
break;
|
|
|
|
|
2005-05-11 22:10:10 +08:00
|
|
|
case OPTION_OLD_PLT:
|
2007-05-11 14:39:05 +08:00
|
|
|
plt_style = PLT_OLD;
|
2005-05-11 22:10:10 +08:00
|
|
|
break;
|
|
|
|
|
|
|
|
case OPTION_OLD_GOT:
|
|
|
|
old_got = 1;
|
|
|
|
break;
|
2003-02-18 14:05:07 +08:00
|
|
|
'
|
|
|
|
|
2005-03-21 21:23:15 +08:00
|
|
|
# Put these extra ppc32elf routines in ld_${EMULATION_NAME}_emulation
|
2003-02-18 14:05:07 +08:00
|
|
|
#
|
2005-05-11 22:10:10 +08:00
|
|
|
LDEMUL_AFTER_OPEN=ppc_after_open
|
2003-02-18 14:05:07 +08:00
|
|
|
LDEMUL_BEFORE_ALLOCATION=ppc_before_allocation
|