|
Packit |
6c4009 |
/* Copyright (C) 1999-2018 Free Software Foundation, Inc.
|
|
Packit |
6c4009 |
This file is part of the GNU C Library.
|
|
Packit |
6c4009 |
Written by Jes Sorensen, <Jes.Sorensen@cern.ch>, April 1999.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is free software; you can redistribute it and/or
|
|
Packit |
6c4009 |
modify it under the terms of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License as published by the Free Software Foundation; either
|
|
Packit |
6c4009 |
version 2.1 of the License, or (at your option) any later version.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
In addition to the permissions in the GNU Lesser General Public
|
|
Packit |
6c4009 |
License, the Free Software Foundation gives you unlimited
|
|
Packit |
6c4009 |
permission to link the compiled version of this file with other
|
|
Packit |
6c4009 |
programs, and to distribute those programs without any restriction
|
|
Packit |
6c4009 |
coming from the use of this file. (The GNU Lesser General Public
|
|
Packit |
6c4009 |
License restrictions do apply in other respects; for example, they
|
|
Packit |
6c4009 |
cover modification of the file, and distribution when not linked
|
|
Packit |
6c4009 |
into another program.)
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
Note that people who make modified versions of this file are not
|
|
Packit |
6c4009 |
obligated to grant this special exception for their modified
|
|
Packit |
6c4009 |
versions; it is their choice whether to do so. The GNU Lesser
|
|
Packit |
6c4009 |
General Public License gives permission to release a modified
|
|
Packit |
6c4009 |
version without this exception; this exception also makes it
|
|
Packit |
6c4009 |
possible to release a modified version which carries forward this
|
|
Packit |
6c4009 |
exception.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
The GNU C Library is distributed in the hope that it will be useful,
|
|
Packit |
6c4009 |
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
Packit |
6c4009 |
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Packit |
6c4009 |
Lesser General Public License for more details.
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
You should have received a copy of the GNU Lesser General Public
|
|
Packit |
6c4009 |
License along with the GNU C Library; if not, see
|
|
Packit |
6c4009 |
<http://www.gnu.org/licenses/>. */
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include <sysdep.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
#include <asm/unistd.h>
|
|
Packit |
6c4009 |
#include <asm/fpu.h>
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/*
|
|
Packit |
6c4009 |
* Arguments for __libc_start_main:
|
|
Packit |
6c4009 |
* out0: main
|
|
Packit |
6c4009 |
* out1: argc
|
|
Packit |
6c4009 |
* out2: argv
|
|
Packit |
6c4009 |
* out3: init
|
|
Packit |
6c4009 |
* out4: fini
|
|
Packit |
6c4009 |
* out5: rtld_fini
|
|
Packit |
6c4009 |
* out6: stack_end
|
|
Packit |
6c4009 |
*/
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
.align 32
|
|
Packit |
6c4009 |
.global _start
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
.proc _start
|
|
Packit |
6c4009 |
.type _start,@function
|
|
Packit |
6c4009 |
_start:
|
|
Packit |
6c4009 |
.prologue
|
|
Packit |
6c4009 |
.save rp, r0
|
|
Packit |
6c4009 |
.body
|
|
Packit |
6c4009 |
.prologue
|
|
Packit |
6c4009 |
{ .mlx
|
|
Packit |
6c4009 |
alloc r2 = ar.pfs,0,0,7,0
|
|
Packit |
6c4009 |
movl r3 = FPSR_DEFAULT
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
{ .mlx
|
|
Packit |
6c4009 |
adds out2 = 16, sp /* get address of argc value */
|
|
Packit |
6c4009 |
movl gp = @gprel(0f)
|
|
Packit |
6c4009 |
;;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
0: { .mmi
|
|
Packit |
6c4009 |
ld8 out1 = [out2], 8 /* load argc and move out2 to become argv */
|
|
Packit |
6c4009 |
mov.m r10 = ar.bsp /* fetch rbs base address */
|
|
Packit |
6c4009 |
mov r9 = ip
|
|
Packit |
6c4009 |
;;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
{ .mii
|
|
Packit |
6c4009 |
mov ar.fpsr = r3
|
|
Packit |
6c4009 |
sub gp = r9, gp /* back-compute gp value */
|
|
Packit |
6c4009 |
adds out6 = 16, sp /* highest non-environment stack address */
|
|
Packit |
6c4009 |
;;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
{
|
|
Packit |
6c4009 |
addl r11 = @ltoff(__libc_ia64_register_backing_store_base), gp
|
|
Packit |
6c4009 |
addl out0 = @ltoff(@fptr(main)), gp
|
|
Packit |
6c4009 |
addl out3 = @ltoff(@fptr(__libc_csu_init)), gp
|
|
Packit |
6c4009 |
;;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
{ .mmi
|
|
Packit |
6c4009 |
ld8 r3 = [r11] /* pointer to __libc_ia64_register_backing_store_base */
|
|
Packit |
6c4009 |
ld8 out0 = [out0] /* pointer to `main' function descriptor */
|
|
Packit |
6c4009 |
addl out4 = @ltoff(@fptr(__libc_csu_fini)), gp
|
|
Packit |
6c4009 |
;;
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
{ .mmi
|
|
Packit |
6c4009 |
ld8 out3 = [out3] /* pointer to `init' function descriptor */
|
|
Packit |
6c4009 |
ld8 out4 = [out4] /* pointer to `fini' function descriptor */
|
|
Packit |
6c4009 |
nop 0
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
.body
|
|
Packit |
6c4009 |
{ .mib
|
|
Packit |
6c4009 |
st8 [r3] = r10
|
|
Packit |
6c4009 |
mov out5 = ret0 /* dynamic linker destructor */
|
|
Packit |
6c4009 |
br.call.sptk.few rp = __libc_start_main
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
{ .mib
|
|
Packit |
6c4009 |
break 0 /* break miserably if we ever return */
|
|
Packit |
6c4009 |
}
|
|
Packit |
6c4009 |
.endp _start
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
/* Define a symbol for the first piece of initialized data. */
|
|
Packit |
6c4009 |
.data
|
|
Packit |
6c4009 |
.globl __data_start
|
|
Packit |
6c4009 |
__data_start:
|
|
Packit |
6c4009 |
.long 0
|
|
Packit |
6c4009 |
.weak data_start
|
|
Packit |
6c4009 |
data_start = __data_start
|
|
Packit |
6c4009 |
|
|
Packit |
6c4009 |
.common __libc_ia64_register_backing_store_base, 8, 8
|