[deliverable/binutils-gdb.git] / ld / emultempl / ppc32elf.em

# This shell script emits a C file. -*- C -*-
#   Copyright (C) 2003-2018 Free Software Foundation, Inc.
#
# This file is part of the GNU Binutils.
#
# 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
# the Free Software Foundation; either version 3 of the License, or
# (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
# Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
# MA 02110-1301, USA.
#

# This file is sourced from elf32.em, and defines extra powerpc32-elf
# specific routines.
#
fragment <<EOF

#include "elf32-ppc.h"
#include "ldlex.h"
#include "ldlang.h"

#define is_ppc_elf(bfd) \
  (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
   && elf_object_id (bfd) == PPC32_ELF_DATA)

/* Whether to run tls optimization.  */
static int notlsopt = 0;

/* Whether to convert inline PLT calls to direct.  */
static int no_inline_opt = 0;

/* Choose the correct place for .got.  */
static int old_got = 0;

static struct ppc_elf_params params = { PLT_UNSET, 0, -1,
					0, 0, 0, 0, 0, 0, 0 };

static void
ppc_after_open_output (void)
{
  if (params.emit_stub_syms < 0)
    params.emit_stub_syms = (link_info.emitrelocations
			     || bfd_link_pic (&link_info));
  if (params.pagesize == 0)
    params.pagesize = config.commonpagesize;
  ppc_elf_link_params (&link_info, &params);
}

EOF

# No --secure-plt, --bss-plt, or --sdata-got for vxworks.
if test -z "$VXWORKS_BASE_EM_FILE" ; then
  fragment <<EOF
static void
ppc_after_check_relocs (void)
{
  if (is_ppc_elf (link_info.output_bfd))
    {
      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];

      new_plt = ppc_elf_select_plt_layout (link_info.output_bfd, &link_info);
      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;
	}
    }

  after_check_relocs_default ();
}

EOF
fi
fragment <<EOF
static void
prelim_size_sections (void)
{
  if (expld.phase != lang_mark_phase_enum)
    {
      expld.phase = lang_mark_phase_enum;
      expld.dataseg.phase = exp_seg_none;
      one_lang_size_sections_pass (NULL, FALSE);
      /* We must not cache anything from the preliminary sizing.  */
      lang_reset_memory_regions ();
    }
}

static void
ppc_before_allocation (void)
{
  if (is_ppc_elf (link_info.output_bfd))
    {
      if (!no_inline_opt
	  && !bfd_link_relocatable (&link_info))
	{
	  prelim_size_sections ();

	  if (!ppc_elf_inline_plt (&link_info))
	    einfo (_("%X%P: inline PLT: %E\n"));
	}

      if (ppc_elf_tls_setup (link_info.output_bfd, &link_info)
	  && !notlsopt)
	{
	  if (!ppc_elf_tls_optimize (link_info.output_bfd, &link_info))
	    {
	      einfo (_("%X%P: TLS problem %E\n"));
	      return;
	    }
	}
    }

  gld${EMULATION_NAME}_before_allocation ();

  ppc_elf_maybe_strip_sdata_syms (&link_info);

  if (RELAXATION_ENABLED)
    params.branch_trampolines = 1;

  /* Turn on relaxation if executable sections have addresses that
     might make branches overflow.  */
  else if (!RELAXATION_DISABLED_BY_USER)
    {
      bfd_vma low = (bfd_vma) -1;
      bfd_vma high = 0;
      asection *o;

      /* Run lang_size_sections (if not already done).  */
      prelim_size_sections ();

      for (o = link_info.output_bfd->sections; o != NULL; o = o->next)
	{
	  if ((o->flags & (SEC_ALLOC | SEC_CODE)) != (SEC_ALLOC | SEC_CODE))
	    continue;
	  if (o->rawsize == 0)
	    continue;
	  if (low > o->vma)
	    low = o->vma;
	  if (high < o->vma + o->rawsize - 1)
	    high = o->vma + o->rawsize - 1;
	}
      if (high > low && high - low > (1 << 25) - 1)
	params.branch_trampolines = 1;
    }

  if (params.branch_trampolines
      || params.ppc476_workaround
      || params.pic_fixup > 0)
    ENABLE_RELAXATION;
}

/* Replaces default zero fill padding in executable sections with
   "ba 0" instructions.  This works around the ppc476 icache bug if we
   have a function pointer tail call near the end of a page, some
   small amount of padding, then the function called at the beginning
   of the next page.  If the "ba 0" is ever executed we should hit a
   segv, so it's almost as good as an illegal instruction (zero).  */

static void
no_zero_padding (lang_statement_union_type *l)
{
  if (l->header.type == lang_padding_statement_enum
      && l->padding_statement.size != 0
      && l->padding_statement.output_section != NULL
      && (l->padding_statement.output_section->flags & SEC_CODE) != 0
      && l->padding_statement.fill->size == 0)
    {
      struct _ppc_fill_type
      {
	size_t size;
	unsigned char data[4];
      };
      static struct _ppc_fill_type fill_be = { 4, {0x48, 0, 0, 2} };
      static struct _ppc_fill_type fill_le = { 4, {2, 0, 0, 0x48} };

      if (bfd_big_endian (link_info.output_bfd))
	l->padding_statement.fill = (struct _fill_type *) &fill_be;
      else
	l->padding_statement.fill = (struct _fill_type *) &fill_le;
    }
}

static void
ppc_finish (void)
{
  if (params.ppc476_workaround)
    lang_for_each_statement (no_zero_padding);
  if (!ppc_finish_symbols (&link_info))
    einfo (_("%X%P: ppc_finish_symbols problem %E\n"));
  finish_default ();
}

EOF

if grep -q 'ld_elf32_spu_emulation' ldemul-list.h; then
  fragment <<EOF
/* 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

# Define some shell vars to insert bits of code into the standard elf
# parse_args and list_options functions.
#
PARSE_AND_LIST_PROLOGUE=${PARSE_AND_LIST_PROLOGUE}'
enum ppc32_opt
{
  OPTION_NO_TLS_OPT = 321,
  OPTION_NO_TLS_GET_ADDR_OPT,
  OPTION_NEW_PLT,
  OPTION_OLD_PLT,
  OPTION_PLT_ALIGN,
  OPTION_NO_PLT_ALIGN,
  OPTION_NO_INLINE_OPT,
  OPTION_OLD_GOT,
  OPTION_STUBSYMS,
  OPTION_NO_STUBSYMS,
  OPTION_PPC476_WORKAROUND,
  OPTION_NO_PPC476_WORKAROUND,
  OPTION_NO_PICFIXUP,
  OPTION_VLE_RELOC_FIXUP
};
'

PARSE_AND_LIST_LONGOPTS=${PARSE_AND_LIST_LONGOPTS}'
  { "emit-stub-syms", no_argument, NULL, OPTION_STUBSYMS },
  { "no-emit-stub-syms", no_argument, NULL, OPTION_NO_STUBSYMS },
  { "no-tls-optimize", no_argument, NULL, OPTION_NO_TLS_OPT },
  { "no-tls-get-addr-optimize", no_argument, NULL, OPTION_NO_TLS_GET_ADDR_OPT },'
if test -z "$VXWORKS_BASE_EM_FILE" ; then
  PARSE_AND_LIST_LONGOPTS=${PARSE_AND_LIST_LONGOPTS}'
  { "secure-plt", no_argument, NULL, OPTION_NEW_PLT },
  { "bss-plt", no_argument, NULL, OPTION_OLD_PLT },
  { "plt-align", optional_argument, NULL, OPTION_PLT_ALIGN },
  { "no-plt-align", no_argument, NULL, OPTION_NO_PLT_ALIGN },
  { "no-inline-optimize", no_argument, NULL, OPTION_NO_INLINE_OPT },
  { "sdata-got", no_argument, NULL, OPTION_OLD_GOT },'
fi
PARSE_AND_LIST_LONGOPTS=${PARSE_AND_LIST_LONGOPTS}'
  { "ppc476-workaround", optional_argument, NULL, OPTION_PPC476_WORKAROUND },
  { "no-ppc476-workaround", no_argument, NULL, OPTION_NO_PPC476_WORKAROUND },
  { "no-pic-fixup", no_argument, NULL, OPTION_NO_PICFIXUP },
  { "vle-reloc-fixup", no_argument, NULL, OPTION_VLE_RELOC_FIXUP },
'

PARSE_AND_LIST_OPTIONS=${PARSE_AND_LIST_OPTIONS}'
  fprintf (file, _("\
  --emit-stub-syms            Label linker stubs with a symbol\n"
		   ));
  fprintf (file, _("\
  --no-emit-stub-syms         Don'\''t label linker stubs with a symbol\n"
		   ));
  fprintf (file, _("\
  --no-tls-optimize           Don'\''t try to optimize TLS accesses\n"
		   ));
  fprintf (file, _("\
  --no-tls-get-addr-optimize  Don'\''t use a special __tls_get_addr call\n"
		   ));'
if test -z "$VXWORKS_BASE_EM_FILE" ; then
  PARSE_AND_LIST_OPTIONS=${PARSE_AND_LIST_OPTIONS}'\
  fprintf (file, _("\
  --secure-plt                Use new-style PLT if possible\n"
		   ));
  fprintf (file, _("\
  --bss-plt                   Force old-style BSS PLT\n"
		   ));
  fprintf (file, _("\
  --plt-align                 Align PLT call stubs to fit cache lines\n"
		   ));
  fprintf (file, _("\
  --no-plt-align              Dont'\''t align individual PLT call stubs\n"
		   ));
  fprintf (file, _("\
  --no-inline-optimize        Don'\''t convert inline PLT to direct calls\n"
		   ));
  fprintf (file, _("\
  --sdata-got                 Force GOT location just before .sdata\n"
		   ));'
fi
PARSE_AND_LIST_OPTIONS=${PARSE_AND_LIST_OPTIONS}'\
  fprintf (file, _("\
  --ppc476-workaround [=pagesize]\n\
                              Avoid a cache bug on ppc476\n"
		   ));
  fprintf (file, _("\
  --no-ppc476-workaround      Disable workaround\n"
		   ));
  fprintf (file, _("\
  --no-pic-fixup              Don'\''t edit non-pic to pic\n"
		   ));
  fprintf (file, _("\
  --vle-reloc-fixup           Correct old object file 16A/16D relocation\n"
		   ));
'

PARSE_AND_LIST_ARGS_CASES=${PARSE_AND_LIST_ARGS_CASES}'
    case OPTION_STUBSYMS:
      params.emit_stub_syms = 1;
      break;

    case OPTION_NO_STUBSYMS:
      params.emit_stub_syms = 0;
      break;

    case OPTION_NO_TLS_OPT:
      notlsopt = 1;
      break;

    case OPTION_NO_TLS_GET_ADDR_OPT:
      params.no_tls_get_addr_opt = 1;
      break;

    case OPTION_NEW_PLT:
      params.plt_style = PLT_NEW;
      break;

    case OPTION_OLD_PLT:
      params.plt_style = PLT_OLD;
      break;

    case OPTION_PLT_ALIGN:
      if (optarg != NULL)
	{
	  char *end;
	  unsigned long val = strtoul (optarg, &end, 0);
	  if (*end || val > 5)
	    einfo (_("%F%P: invalid --plt-align `%s'\''\n"), optarg);
	  params.plt_stub_align = val;
	}
      else
	params.plt_stub_align = 5;
      break;

    case OPTION_NO_PLT_ALIGN:
      params.plt_stub_align = 0;
      break;

    case OPTION_NO_INLINE_OPT:
      no_inline_opt = 1;
      break;

    case OPTION_OLD_GOT:
      old_got = 1;
      break;

    case OPTION_TRADITIONAL_FORMAT:
      notlsopt = 1;
      params.no_tls_get_addr_opt = 1;
      return FALSE;

    case OPTION_PPC476_WORKAROUND:
      params.ppc476_workaround = 1;
      if (optarg != NULL)
	{
	  char *end;
	  params.pagesize = strtoul (optarg, &end, 0);
	  if (*end
	      || (params.pagesize < 4096 && params.pagesize != 0)
	      || params.pagesize != (params.pagesize & -params.pagesize))
	    einfo (_("%F%P: invalid pagesize `%s'\''\n"), optarg);
	}
      break;

    case OPTION_NO_PPC476_WORKAROUND:
      params.ppc476_workaround = 0;
      break;

    case OPTION_NO_PICFIXUP:
      params.pic_fixup = -1;
      break;

    case OPTION_VLE_RELOC_FIXUP:
      params.vle_reloc_fixup = 1;
      break;
'

# Put these extra ppc32elf routines in ld_${EMULATION_NAME}_emulation
#
LDEMUL_CREATE_OUTPUT_SECTION_STATEMENTS=ppc_after_open_output
if test -z "$VXWORKS_BASE_EM_FILE" ; then
  LDEMUL_AFTER_CHECK_RELOCS=ppc_after_check_relocs
fi
LDEMUL_BEFORE_ALLOCATION=ppc_before_allocation
LDEMUL_FINISH=ppc_finish
Commit	Line	Data
f9e6bfa8	1	# This shell script emits a C file. -- C --
219d1afa	2	# Copyright (C) 2003-2018 Free Software Foundation, Inc.
f9e6bfa8	3	#
f96b4a7b	4	# This file is part of the GNU Binutils.
f9e6bfa8 AM	5	#
	6	# This program is free software; you can redistribute it and/or modify
	7	# it under the terms of the GNU General Public License as published by
f96b4a7b	8	# the Free Software Foundation; either version 3 of the License, or
f9e6bfa8 AM	9	# (at your option) any later version.
	10	#
	11	# This program is distributed in the hope that it will be useful,
	12	# but WITHOUT ANY WARRANTY; without even the implied warranty of
	13	# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	14	# GNU General Public License for more details.
	15	#
	16	# You should have received a copy of the GNU General Public License
	17	# along with this program; if not, write to the Free Software
f96b4a7b NC	18	# Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
f96b4a7b NC	19	# MA 02110-1301, USA.
f9e6bfa8 AM	20	#
f9e6bfa8 AM	21
c9a2f333	22	# This file is sourced from elf32.em, and defines extra powerpc32-elf
f9e6bfa8 AM	23	# specific routines.
f9e6bfa8 AM	24	#
92b93329	25	fragment <<EOF
f9e6bfa8	26
f9e6bfa8	27	#include "elf32-ppc.h"
f05eb3b7	28	#include "ldlex.h"
b4ab4364	29	#include "ldlang.h"
f9e6bfa8	30
5503fea1 AM	31	#define is_ppc_elf(bfd) \
5503fea1 AM	32	(bfd_get_flavour (bfd) == bfd_target_elf_flavour \
4dfe6ac6	33	&& elf_object_id (bfd) == PPC32_ELF_DATA)
c9a2f333	34
f9e6bfa8 AM	35	/* Whether to run tls optimization. */
	36	static int notlsopt = 0;
	37
3e04d765 AM	38	/* Whether to convert inline PLT calls to direct. */
	39	static int no_inline_opt = 0;
	40
5446cbdf	41	/* Choose the correct place for .got. */
0cf7d72c AM	42	static int old_got = 0;
0cf7d72c AM	43
407aa07c	44	static struct ppc_elf_params params = { PLT_UNSET, 0, -1,
9e390558	45	0, 0, 0, 0, 0, 0, 0 };
5446cbdf AM	46
	47	static void
	48	ppc_after_open_output (void)
	49	{
	50	if (params.emit_stub_syms < 0)
0e1862bb L	51	params.emit_stub_syms = (link_info.emitrelocations
0e1862bb L	52	\|\| bfd_link_pic (&link_info));
76e7a751 AM	53	if (params.pagesize == 0)
76e7a751 AM	54	params.pagesize = config.commonpagesize;
5446cbdf AM	55	ppc_elf_link_params (&link_info, &params);
	56	}
	57
db434ba0 AM	58	EOF
	59
	60	# No --secure-plt, --bss-plt, or --sdata-got for vxworks.
	61	if test -z "$VXWORKS_BASE_EM_FILE" ; then
	62	fragment <<EOF
0cf7d72c	63	static void
5c3261b0	64	ppc_after_check_relocs (void)
0cf7d72c	65	{
5503fea1	66	if (is_ppc_elf (link_info.output_bfd))
0cf7d72c AM	67	{
	68	int new_plt;
	69	int keep_new;
	70	unsigned int num_plt;
	71	unsigned int num_got;
	72	lang_output_section_statement_type *os;
	73	lang_output_section_statement_type *plt_os[2];
	74	lang_output_section_statement_type *got_os[2];
	75
5446cbdf	76	new_plt = ppc_elf_select_plt_layout (link_info.output_bfd, &link_info);
0cf7d72c	77	if (new_plt < 0)
d003af55	78	einfo (_("%X%P: select_plt_layout problem %E\n"));
0cf7d72c AM	79
	80	num_got = 0;
	81	num_plt = 0;
	82	for (os = &lang_output_section_statement.head->output_section_statement;
	83	os != NULL;
	84	os = os->next)
	85	{
	86	if (os->constraint == SPECIAL && strcmp (os->name, ".plt") == 0)
	87	{
	88	if (num_plt < 2)
	89	plt_os[num_plt] = os;
	90	++num_plt;
	91	}
	92	if (os->constraint == SPECIAL && strcmp (os->name, ".got") == 0)
	93	{
	94	if (num_got < 2)
	95	got_os[num_got] = os;
	96	++num_got;
	97	}
	98	}
	99
	100	keep_new = new_plt == 1 ? 0 : -1;
	101	if (num_plt == 2)
	102	{
	103	plt_os[0]->constraint = keep_new;
	104	plt_os[1]->constraint = ~keep_new;
	105	}
	106	if (num_got == 2)
	107	{
	108	if (old_got)
	109	keep_new = -1;
	110	got_os[0]->constraint = keep_new;
	111	got_os[1]->constraint = ~keep_new;
	112	}
	113	}
	114
5c3261b0	115	after_check_relocs_default ();
0cf7d72c AM	116	}
0cf7d72c AM	117
db434ba0 AM	118	EOF
	119	fi
	120	fragment <<EOF
3e04d765 AM	121	static void
	122	prelim_size_sections (void)
	123	{
	124	if (expld.phase != lang_mark_phase_enum)
	125	{
	126	expld.phase = lang_mark_phase_enum;
	127	expld.dataseg.phase = exp_seg_none;
	128	one_lang_size_sections_pass (NULL, FALSE);
	129	/* We must not cache anything from the preliminary sizing. */
	130	lang_reset_memory_regions ();
	131	}
	132	}
	133
f9e6bfa8	134	static void
7e5d8d48	135	ppc_before_allocation (void)
f9e6bfa8	136	{
5503fea1	137	if (is_ppc_elf (link_info.output_bfd))
f9e6bfa8	138	{
3e04d765 AM	139	if (!no_inline_opt
	140	&& !bfd_link_relocatable (&link_info))
	141	{
	142	prelim_size_sections ();
	143
	144	if (!ppc_elf_inline_plt (&link_info))
	145	einfo (_("%X%P: inline PLT: %E\n"));
	146	}
	147
5446cbdf	148	if (ppc_elf_tls_setup (link_info.output_bfd, &link_info)
a7f2871e	149	&& !notlsopt)
f9e6bfa8	150	{
f13a99db	151	if (!ppc_elf_tls_optimize (link_info.output_bfd, &link_info))
f9e6bfa8	152	{
d003af55	153	einfo (_("%X%P: TLS problem %E\n"));
f9e6bfa8 AM	154	return;
	155	}
	156	}
	157	}
4135c73b	158
f9e6bfa8	159	gld${EMULATION_NAME}_before_allocation ();
4135c73b	160
93d1b056 AM	161	ppc_elf_maybe_strip_sdata_syms (&link_info);
93d1b056 AM	162
5446cbdf AM	163	if (RELAXATION_ENABLED)
	164	params.branch_trampolines = 1;
	165
4135c73b AM	166	/* Turn on relaxation if executable sections have addresses that
4135c73b AM	167	might make branches overflow. */
5446cbdf	168	else if (!RELAXATION_DISABLED_BY_USER)
4135c73b AM	169	{
	170	bfd_vma low = (bfd_vma) -1;
	171	bfd_vma high = 0;
	172	asection *o;
	173
	174	/* Run lang_size_sections (if not already done). */
3e04d765	175	prelim_size_sections ();
4135c73b AM	176
	177	for (o = link_info.output_bfd->sections; o != NULL; o = o->next)
	178	{
	179	if ((o->flags & (SEC_ALLOC \| SEC_CODE)) != (SEC_ALLOC \| SEC_CODE))
	180	continue;
07088e95	181	if (o->rawsize == 0)
4135c73b AM	182	continue;
	183	if (low > o->vma)
	184	low = o->vma;
07088e95 AM	185	if (high < o->vma + o->rawsize - 1)
07088e95 AM	186	high = o->vma + o->rawsize - 1;
4135c73b AM	187	}
4135c73b AM	188	if (high > low && high - low > (1 << 25) - 1)
5446cbdf	189	params.branch_trampolines = 1;
4135c73b	190	}
5446cbdf	191
d3e454b9 AM	192	if (params.branch_trampolines
	193	\|\| params.ppc476_workaround
	194	\|\| params.pic_fixup > 0)
5446cbdf	195	ENABLE_RELAXATION;
f9e6bfa8 AM	196	}
f9e6bfa8 AM	197
b4ab4364 AM	198	/* Replaces default zero fill padding in executable sections with
	199	"ba 0" instructions. This works around the ppc476 icache bug if we
	200	have a function pointer tail call near the end of a page, some
	201	small amount of padding, then the function called at the beginning
	202	of the next page. If the "ba 0" is ever executed we should hit a
	203	segv, so it's almost as good as an illegal instruction (zero). */
	204
	205	static void
	206	no_zero_padding (lang_statement_union_type *l)
	207	{
	208	if (l->header.type == lang_padding_statement_enum
	209	&& l->padding_statement.size != 0
	210	&& l->padding_statement.output_section != NULL
	211	&& (l->padding_statement.output_section->flags & SEC_CODE) != 0
	212	&& l->padding_statement.fill->size == 0)
	213	{
	214	struct _ppc_fill_type
	215	{
	216	size_t size;
	217	unsigned char data[4];
	218	};
	219	static struct _ppc_fill_type fill_be = { 4, {0x48, 0, 0, 2} };
	220	static struct _ppc_fill_type fill_le = { 4, {2, 0, 0, 0x48} };
	221
	222	if (bfd_big_endian (link_info.output_bfd))
	223	l->padding_statement.fill = (struct _fill_type *) &fill_be;
	224	else
	225	l->padding_statement.fill = (struct _fill_type *) &fill_le;
	226	}
	227	}
	228
	229	static void
	230	ppc_finish (void)
	231	{
	232	if (params.ppc476_workaround)
	233	lang_for_each_statement (no_zero_padding);
49c09209 AM	234	if (!ppc_finish_symbols (&link_info))
49c09209 AM	235	einfo (_("%X%P: ppc_finish_symbols problem %E\n"));
b4ab4364 AM	236	finish_default ();
	237	}
	238
f9e6bfa8 AM	239	EOF
f9e6bfa8 AM	240
dc27aea4	241	if grep -q 'ld_elf32_spu_emulation' ldemul-list.h; then
92b93329	242	fragment <<EOF
dc27aea4 AM	243	/* Special handling for embedded SPU executables. */
	244	extern bfd_boolean embedded_spu_file (lang_input_statement_type , const char );
	245	static bfd_boolean gld${EMULATION_NAME}_load_symbols (lang_input_statement_type *);
	246
	247	static bfd_boolean
	248	ppc_recognized_file (lang_input_statement_type *entry)
	249	{
	250	if (embedded_spu_file (entry, "-m32"))
	251	return TRUE;
	252
	253	return gld${EMULATION_NAME}_load_symbols (entry);
	254	}
	255
	256	EOF
	257	LDEMUL_RECOGNIZED_FILE=ppc_recognized_file
	258	fi
	259
f9e6bfa8 AM	260	# Define some shell vars to insert bits of code into the standard elf
	261	# parse_args and list_options functions.
	262	#
58d180e8	263	PARSE_AND_LIST_PROLOGUE=${PARSE_AND_LIST_PROLOGUE}'
9e390558 AM	264	enum ppc32_opt
	265	{
	266	OPTION_NO_TLS_OPT = 321,
	267	OPTION_NO_TLS_GET_ADDR_OPT,
	268	OPTION_NEW_PLT,
	269	OPTION_OLD_PLT,
	270	OPTION_PLT_ALIGN,
	271	OPTION_NO_PLT_ALIGN,
3e04d765	272	OPTION_NO_INLINE_OPT,
9e390558 AM	273	OPTION_OLD_GOT,
	274	OPTION_STUBSYMS,
	275	OPTION_NO_STUBSYMS,
	276	OPTION_PPC476_WORKAROUND,
	277	OPTION_NO_PPC476_WORKAROUND,
	278	OPTION_NO_PICFIXUP,
	279	OPTION_VLE_RELOC_FIXUP
	280	};
f9e6bfa8 AM	281	'
f9e6bfa8 AM	282
58d180e8	283	PARSE_AND_LIST_LONGOPTS=${PARSE_AND_LIST_LONGOPTS}'
0ba07910	284	{ "emit-stub-syms", no_argument, NULL, OPTION_STUBSYMS },
b02c4cfa	285	{ "no-emit-stub-syms", no_argument, NULL, OPTION_NO_STUBSYMS },
f9e6bfa8	286	{ "no-tls-optimize", no_argument, NULL, OPTION_NO_TLS_OPT },
db434ba0 AM	287	{ "no-tls-get-addr-optimize", no_argument, NULL, OPTION_NO_TLS_GET_ADDR_OPT },'
	288	if test -z "$VXWORKS_BASE_EM_FILE" ; then
	289	PARSE_AND_LIST_LONGOPTS=${PARSE_AND_LIST_LONGOPTS}'
016687f8	290	{ "secure-plt", no_argument, NULL, OPTION_NEW_PLT },
0cf7d72c	291	{ "bss-plt", no_argument, NULL, OPTION_OLD_PLT },
691d2e9a	292	{ "plt-align", optional_argument, NULL, OPTION_PLT_ALIGN },
9e390558	293	{ "no-plt-align", no_argument, NULL, OPTION_NO_PLT_ALIGN },
3e04d765	294	{ "no-inline-optimize", no_argument, NULL, OPTION_NO_INLINE_OPT },
db434ba0 AM	295	{ "sdata-got", no_argument, NULL, OPTION_OLD_GOT },'
	296	fi
	297	PARSE_AND_LIST_LONGOPTS=${PARSE_AND_LIST_LONGOPTS}'
5446cbdf AM	298	{ "ppc476-workaround", optional_argument, NULL, OPTION_PPC476_WORKAROUND },
5446cbdf AM	299	{ "no-ppc476-workaround", no_argument, NULL, OPTION_NO_PPC476_WORKAROUND },
d3e454b9	300	{ "no-pic-fixup", no_argument, NULL, OPTION_NO_PICFIXUP },
08dc996f	301	{ "vle-reloc-fixup", no_argument, NULL, OPTION_VLE_RELOC_FIXUP },
f9e6bfa8 AM	302	'
f9e6bfa8 AM	303
58d180e8	304	PARSE_AND_LIST_OPTIONS=${PARSE_AND_LIST_OPTIONS}'
f9e6bfa8	305	fprintf (file, _("\
df5f2391	306	--emit-stub-syms Label linker stubs with a symbol\n"
9e390558 AM	307	));
9e390558 AM	308	fprintf (file, _("\
df5f2391	309	--no-emit-stub-syms Don'\''t label linker stubs with a symbol\n"
9e390558 AM	310	));
9e390558 AM	311	fprintf (file, _("\
df5f2391	312	--no-tls-optimize Don'\''t try to optimize TLS accesses\n"
9e390558 AM	313	));
9e390558 AM	314	fprintf (file, _("\
df5f2391	315	--no-tls-get-addr-optimize Don'\''t use a special __tls_get_addr call\n"
9e390558	316	));'
db434ba0 AM	317	if test -z "$VXWORKS_BASE_EM_FILE" ; then
db434ba0 AM	318	PARSE_AND_LIST_OPTIONS=${PARSE_AND_LIST_OPTIONS}'\
9e390558	319	fprintf (file, _("\
df5f2391	320	--secure-plt Use new-style PLT if possible\n"
9e390558 AM	321	));
9e390558 AM	322	fprintf (file, _("\
df5f2391	323	--bss-plt Force old-style BSS PLT\n"
9e390558 AM	324	));
9e390558 AM	325	fprintf (file, _("\
df5f2391	326	--plt-align Align PLT call stubs to fit cache lines\n"
9e390558 AM	327	));
9e390558 AM	328	fprintf (file, _("\
df5f2391	329	--no-plt-align Dont'\''t align individual PLT call stubs\n"
9e390558 AM	330	));
9e390558 AM	331	fprintf (file, _("\
3e04d765 AM	332	--no-inline-optimize Don'\''t convert inline PLT to direct calls\n"
	333	));
	334	fprintf (file, _("\
df5f2391	335	--sdata-got Force GOT location just before .sdata\n"
9e390558	336	));'
db434ba0 AM	337	fi
db434ba0 AM	338	PARSE_AND_LIST_OPTIONS=${PARSE_AND_LIST_OPTIONS}'\
9e390558	339	fprintf (file, _("\
5446cbdf	340	--ppc476-workaround [=pagesize]\n\
df5f2391	341	Avoid a cache bug on ppc476\n"
9e390558 AM	342	));
9e390558 AM	343	fprintf (file, _("\
df5f2391	344	--no-ppc476-workaround Disable workaround\n"
9e390558 AM	345	));
9e390558 AM	346	fprintf (file, _("\
df5f2391	347	--no-pic-fixup Don'\''t edit non-pic to pic\n"
9e390558 AM	348	));
9e390558 AM	349	fprintf (file, _("\
df5f2391	350	--vle-reloc-fixup Correct old object file 16A/16D relocation\n"
f9e6bfa8 AM	351	));
	352	'
	353
58d180e8	354	PARSE_AND_LIST_ARGS_CASES=${PARSE_AND_LIST_ARGS_CASES}'
0ba07910	355	case OPTION_STUBSYMS:
5446cbdf	356	params.emit_stub_syms = 1;
0ba07910 AM	357	break;
0ba07910 AM	358
b02c4cfa	359	case OPTION_NO_STUBSYMS:
5446cbdf	360	params.emit_stub_syms = 0;
b02c4cfa AM	361	break;
b02c4cfa AM	362
f9e6bfa8 AM	363	case OPTION_NO_TLS_OPT:
	364	notlsopt = 1;
	365	break;
0cf7d72c	366
a7f2871e	367	case OPTION_NO_TLS_GET_ADDR_OPT:
5446cbdf	368	params.no_tls_get_addr_opt = 1;
a7f2871e AM	369	break;
a7f2871e AM	370
016687f8	371	case OPTION_NEW_PLT:
5446cbdf	372	params.plt_style = PLT_NEW;
016687f8 AM	373	break;
016687f8 AM	374
0cf7d72c	375	case OPTION_OLD_PLT:
5446cbdf	376	params.plt_style = PLT_OLD;
0cf7d72c AM	377	break;
0cf7d72c AM	378
9e390558	379	case OPTION_PLT_ALIGN:
691d2e9a AM	380	if (optarg != NULL)
	381	{
	382	char *end;
	383	unsigned long val = strtoul (optarg, &end, 0);
	384	if (*end \|\| val > 5)
df5f2391	385	einfo (_("%F%P: invalid --plt-align `%s'\''\n"), optarg);
691d2e9a AM	386	params.plt_stub_align = val;
	387	}
	388	else
	389	params.plt_stub_align = 5;
9e390558 AM	390	break;
	391
	392	case OPTION_NO_PLT_ALIGN:
	393	params.plt_stub_align = 0;
	394	break;
	395
3e04d765 AM	396	case OPTION_NO_INLINE_OPT:
	397	no_inline_opt = 1;
	398	break;
	399
0cf7d72c AM	400	case OPTION_OLD_GOT:
	401	old_got = 1;
	402	break;
f05eb3b7 AM	403
	404	case OPTION_TRADITIONAL_FORMAT:
	405	notlsopt = 1;
5446cbdf	406	params.no_tls_get_addr_opt = 1;
f05eb3b7	407	return FALSE;
5446cbdf AM	408
	409	case OPTION_PPC476_WORKAROUND:
	410	params.ppc476_workaround = 1;
	411	if (optarg != NULL)
	412	{
	413	char *end;
76e7a751	414	params.pagesize = strtoul (optarg, &end, 0);
5446cbdf	415	if (*end
76e7a751 AM	416	\|\| (params.pagesize < 4096 && params.pagesize != 0)
76e7a751 AM	417	\|\| params.pagesize != (params.pagesize & -params.pagesize))
df5f2391	418	einfo (_("%F%P: invalid pagesize `%s'\''\n"), optarg);
5446cbdf AM	419	}
	420	break;
	421
	422	case OPTION_NO_PPC476_WORKAROUND:
	423	params.ppc476_workaround = 0;
	424	break;
d3e454b9 AM	425
	426	case OPTION_NO_PICFIXUP:
	427	params.pic_fixup = -1;
	428	break;
08dc996f AM	429
	430	case OPTION_VLE_RELOC_FIXUP:
	431	params.vle_reloc_fixup = 1;
	432	break;
f9e6bfa8 AM	433	'
f9e6bfa8 AM	434
c9a2f333	435	# Put these extra ppc32elf routines in ld_${EMULATION_NAME}_emulation
f9e6bfa8	436	#
5446cbdf	437	LDEMUL_CREATE_OUTPUT_SECTION_STATEMENTS=ppc_after_open_output
db434ba0	438	if test -z "$VXWORKS_BASE_EM_FILE" ; then
5c3261b0	439	LDEMUL_AFTER_CHECK_RELOCS=ppc_after_check_relocs
db434ba0	440	fi
f9e6bfa8	441	LDEMUL_BEFORE_ALLOCATION=ppc_before_allocation
b4ab4364	442	LDEMUL_FINISH=ppc_finish