ldso/ldso/xtensa/dl-startup.h

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Xtensa ELF code used by dl-startup.c.
   4  *
   5  * Copyright (C) 2007 Tensilica Inc.
   6  *
   7  * Licensed under the LGPL v2.1, see the file COPYING.LIB in this tarball.
   8  * Parts taken from glibc/sysdeps/xtensa/dl-machine.h.
   9  */
  10
  11 __asm__ (
  12     "   .text\n"
  13     "   .align  4\n"
  14     "   .literal_position\n"
  15     "   .global _start\n"
  16     "   .type   _start, @function\n"
  17     "   .hidden _start\n"
  18     "_start:\n"
  19     "   # Compute load offset in a2: the GOT has not yet been relocated\n"
  20     "   # but the entries for local symbols contain the relative offsets\n"
  21     "   # and we can explicitly add the load offset in this code.\n"
  22     "   _call0  0f\n"
  23     "   .align  4\n"
  24     "0: movi    a3, _start+3\n"
  25     "   sub     a2, a0, a3\n"
  26     "   # Make sure a0 is cleared to mark the top of stack.\n"
  27     "   movi    a0, 0\n"
  28     "   # user_entry_point = _dl_start(pointer to argument block)\n"
  29     "   movi    a4, _dl_start\n"
  30     "   mov     a6, sp\n"
  31     "   add     a4, a4, a2\n"
  32     "   callx4  a4\n"
  33     "   # Save user_entry_point so we can jump to it.\n"
  34     "   mov     a3, a6\n"
  35     "   l32i    a7, sp, 0   # load argc\n"
  36     "   # Load _dl_skip_args into a4.\n"
  37     "   movi    a4, _dl_skip_args\n"
  38     "   l32i    a4, a4, 0\n"
  39     "   bnez    a4, .Lfixup_stack\n"
  40     ".Lfixup_stack_ret:\n"
  41     "   # Pass finalizer (_dl_fini) in a2 to the user entry point.\n"
  42     "   movi    a2, _dl_fini\n"
  43     "   # Jump to user's entry point (_start).\n"
  44     "   jx      a3\n"
  45     ".Lfixup_stack:\n"
  46     "   # argc -= _dl_skip_args (with argc @ sp+0)\n"
  47     "   sub     a7, a7, a4\n"
  48     "   s32i    a7, sp, 0\n"
  49     "   # Shift everything by _dl_skip_args.\n"
  50     "   addi    a5, sp, 4   # a5 = destination ptr = argv\n"
  51     "   add     a4, a5, a4  # a4 = source ptr = argv + _dl_skip_args\n"
  52     "   # Shift argv.\n"
  53     "1: l32i    a6, a4, 0\n"
  54     "   addi    a4, a4, 4\n"
  55     "   s32i    a6, a5, 0\n"
  56     "   addi    a5, a5, 4\n"
  57     "   bnez    a6, 1b\n"
  58     "   # Shift envp.\n"
  59     "2: l32i    a6, a4, 0\n"
  60     "   addi    a4, a4, 4\n"
  61     "   s32i    a6, a5, 0\n"
  62     "   addi    a5, a5, 4\n"
  63     "   bnez    a6, 2b\n"
  64     "   # Shift auxiliary table.\n"
  65     "3: l32i    a6, a4, 0\n"
  66     "   l32i    a8, a4, 4\n"
  67     "   addi    a4, a4, 8\n"
  68     "   s32i    a6, a5, 0\n"
  69     "   s32i    a8, a5, 4\n"
  70     "   addi    a5, a5, 8\n"
  71     "   bnez    a6, 3b\n"
  72     "   j      .Lfixup_stack_ret");
  73
  74 /* Get a pointer to the argv value.  */
  75 #define GET_ARGV(ARGVP, ARGS) ARGVP = (((unsigned long *) ARGS) + 1)
  76
  77 /* Function calls are not safe until the GOT relocations have been done.  */
  78 #define NO_FUNCS_BEFORE_BOOTSTRAP
  79
  80 #define PERFORM_BOOTSTRAP_GOT(tpnt) \
  81 do { \
  82         xtensa_got_location *got_loc; \
  83         unsigned long l_addr = tpnt->loadaddr; \
  84         Elf32_Word relative_count; \
  85         unsigned long rel_addr; \
  86         int x; \
  87 \
  88         got_loc = (xtensa_got_location *) \
  89                 (tpnt->dynamic_info[DT_XTENSA (GOT_LOC_OFF)] + l_addr); \
  90 \
  91         for (x = 0; x < tpnt->dynamic_info[DT_XTENSA (GOT_LOC_SZ)]; x++) { \
  92                 Elf32_Addr got_start, got_end; \
  93                 got_start = got_loc[x].offset & ~(PAGE_SIZE - 1); \
  94                 got_end = ((got_loc[x].offset + got_loc[x].length + PAGE_SIZE - 1) \
  95                                    & ~(PAGE_SIZE - 1)); \
  96                 _dl_mprotect ((void *)(got_start + l_addr), got_end - got_start, \
  97                                           PROT_READ | PROT_WRITE | PROT_EXEC); \
  98         } \
  99 \
 100         /* The following is a stripped down version of the code following \
 101            the invocation of PERFORM_BOOTSTRAP_GOT in dl-startup.c.      That \
 102            code is skipped when PERFORM_BOOTSTRAP_GOT is defined, so it has \
 103            to be done here instead.      */ \
 104         relative_count = tpnt->dynamic_info[DT_RELCONT_IDX]; \
 105         rel_addr = tpnt->dynamic_info[DT_RELOC_TABLE_ADDR]; \
 106         if (rel_addr) \
 107           elf_machine_relative(load_addr, rel_addr, relative_count); \
 108 } while (0)