sysdeps/hppa/elf/start.S

   1 /* ELF startup code for HPPA.
   2    Copyright (C) 2002 Free Software Foundation, Inc.
   3    This file is part of the GNU C Library.
   4
   5    The GNU C Library is free software; you can redistribute it and/or
   6    modify it under the terms of the GNU Lesser General Public
   7    License as published by the Free Software Foundation; either
   8    version 2.1 of the License, or (at your option) any later version.
   9
  10    In addition to the permissions in the GNU Lesser General Public
  11    License, the Free Software Foundation gives you unlimited
  12    permission to link the compiled version of this file with other
  13    programs, and to distribute those programs without any restriction
  14    coming from the use of this file. (The GNU Lesser General Public
  15    License restrictions do apply in other respects; for example, they
  16    cover modification of the file, and distribution when not linked
  17    into another program.)
  18
  19    Note that people who make modified versions of this file are not
  20    obligated to grant this special exception for their modified
  21    versions; it is their choice whether to do so. The GNU Lesser
  22    General Public License gives permission to release a modified
  23    version without this exception; this exception also makes it
  24    possible to release a modified version which carries forward this
  25    exception.
  26
  27    The GNU C Library is distributed in the hope that it will be useful,
  28    but WITHOUT ANY WARRANTY; without even the implied warranty of
  29    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  30    Lesser General Public License for more details.
  31
  32    You should have received a copy of the GNU Lesser General Public
  33    License along with the GNU C Library; if not, write to the Free
  34    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  35    02111-1307 USA.  */
  36
  37         .text
  38
  39         .align 4
  40
  41         .import main, code
  42         .import $global$, data
  43         .import __libc_start_main, code
  44         .import __libc_csu_fini, code
  45         .import __libc_csu_init, code
  46
  47         .globl _start
  48         .export _start, ENTRY
  49         .type _start,@function
  50 _start:
  51
  52         .proc
  53         .callinfo
  54
  55         /* load main */
  56         ldil    LP%main, %r26
  57         ldo     RP%main(%r26), %r26
  58
  59         /* argc and argv should be in 25 and 24 */
  60
  61         /* Expand the stack to store the 5th through 7th args */
  62         ldo     64(%sp), %sp
  63
  64         /* void (*rtld_fini) (void) (actually the 6th arg) */
  65         stw     %r23, -56(%sp)
  66
  67         /* void (*init) (void) */
  68         ldil    LP%__libc_csu_init, %r23
  69         ldo     RP%__libc_csu_init(%r23), %r23
  70
  71         /* void (*fini) (void) */
  72         ldil    LP%__libc_csu_fini, %r22
  73         ldo     RP%__libc_csu_fini(%r22), %r22
  74         stw     %r22, -52(%sp)
  75
  76         /* void *stack_end */
  77         stw     %sp, -60(%sp)
  78
  79         /* load global */
  80         ldil    L%$global$, %dp
  81         ldo     R%$global$(%dp), %dp
  82
  83         bl      __libc_start_main,%r2
  84         nop
  85         /* die horribly if it returned (it shouldn't) */
  86         iitlbp %r0,(%r0)
  87         nop
  88
  89         .procend
  90
  91 /* Define a symbol for the first piece of initialized data.  */
  92         .data
  93         .globl __data_start
  94 __data_start:
  95         .long 0
  96         .weak data_start
  97         data_start = __data_start