2.3.90-1
[kopensolaris-gnu/glibc.git] / sysdeps / ia64 / elf / start.S
index c09d070..1c41a65 100644 (file)
@@ -1,21 +1,40 @@
-/* Copyright (C) 1999, 2000 Free Software Foundation, Inc.
+/* Copyright (C) 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
    Written by Jes Sorensen, <Jes.Sorensen@cern.ch>, April 1999.
 
    The GNU C Library is free software; you can redistribute it and/or
-   modify it under the terms of the GNU Library General Public License as
-   published by the Free Software Foundation; either version 2 of the
-   License, or (at your option) any later version.
+   modify it under the terms of the GNU Lesser General Public
+   License as published by the Free Software Foundation; either
+   version 2.1 of the License, or (at your option) any later version.
+
+   In addition to the permissions in the GNU Lesser General Public
+   License, the Free Software Foundation gives you unlimited
+   permission to link the compiled version of this file with other
+   programs, and to distribute those programs without any restriction
+   coming from the use of this file. (The GNU Lesser General Public
+   License restrictions do apply in other respects; for example, they
+   cover modification of the file, and distribution when not linked
+   into another program.)
+
+   Note that people who make modified versions of this file are not
+   obligated to grant this special exception for their modified
+   versions; it is their choice whether to do so. The GNU Lesser
+   General Public License gives permission to release a modified
+   version without this exception; this exception also makes it
+   possible to release a modified version which carries forward this
+   exception.
 
    The GNU C Library 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
-   Library General Public License for more details.
+   Lesser General Public License for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License along with the GNU C Library; if not, write to the Free
+   Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
+   02111-1307 USA.  */
 
-   You should have received a copy of the GNU Library General Public
-   License along with the GNU C Library; see the file COPYING.LIB.  If not,
-   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-   Boston, MA 02111-1307, USA.  */
+#include <sysdep.h>
 
 #include <asm/unistd.h>
 #include <asm/fpu.h>
  *     out6:   stack_end
  */
 
-       .psr    abi64
-       .psr    lsb
-       .lsb
-
-       .text
-
-       .global _start#
-       .proc   _start#
+       .align 32
+       .global _start
 
+       .proc _start
+       .type _start,@function
 _start:
+       .prologue
+       .save rp, r0
+       .body
+       .prologue
        { .mlx
          alloc r2 = ar.pfs,0,0,7,0
          movl r3 = FPSR_DEFAULT
@@ -50,38 +69,45 @@ _start:
          movl gp = @gprel(0f)
          ;;
        }
-0:     { .mii
+0:     { .mmi
          ld8 out1 = [out2], 8  /* load argc and move out2 to become argv */
+         mov.m r10 = ar.bsp    /* fetch rbs base address */
          mov r9 = ip
          ;;
-         sub gp = r9, gp       /* back-compute gp value */
-         ;;
        }
-       { .mfi
+       { .mii
          mov ar.fpsr = r3
-         addl out0 = @ltoff(@fptr(main#)), gp
+         sub gp = r9, gp       /* back-compute gp value */
+         adds out6 = 16, sp    /* highest non-environment stack address */
+         ;;
        }
-       { .mfi
-         addl out4 = @ltoff(@fptr(_fini#)), gp
-         addl out3 = @ltoff(@fptr(_init#)), gp
+       {
+         addl r11 = @ltoff(__libc_ia64_register_backing_store_base), gp
+         addl out0 = @ltoff(@fptr(main)), gp
+         addl out3 = @ltoff(@fptr(__libc_csu_init)), gp
          ;;
        }
        { .mmi
+         ld8 r3 = [r11]        /* pointer to __libc_ia64_register_backing_store_base */
          ld8 out0 = [out0]     /* pointer to `main' function descriptor */
+         addl out4 = @ltoff(@fptr(__libc_csu_fini)), gp
+         ;;
+       }
+       { .mmi
          ld8 out3 = [out3]     /* pointer to `init' function descriptor */
-         adds out6 = 16, sp    /* highest non-environment stack address */
+         ld8 out4 = [out4]     /* pointer to `fini' function descriptor */
+         nop 0
        }
+       .body
        { .mib
-         ld8 out4 = [out4]     /* pointer to `fini' function descriptor */
+         st8 [r3] = r10
          mov out5 = ret0       /* dynamic linker destructor */
-         br.call.sptk.few rp = __libc_start_main#
+         br.call.sptk.few rp = __libc_start_main
        }
        { .mib
-         mov rp = r0
-         br.ret.sptk.few rp    /* break miserably if we ever return */
-         ;;
+         break 0       /* break miserably if we ever return */
        }
-       .endp   _start#
+       .endp _start
 
 /* Define a symbol for the first piece of initialized data.  */
        .data
@@ -90,3 +116,5 @@ __data_start:
        .long 0
        .weak data_start
        data_start = __data_start
+
+       .common __libc_ia64_register_backing_store_base, 8, 8