5ba6196e3c1e3f5ebac277c4729ecc5ced38ff70
[kopensolaris-gnu/glibc.git] / sysdeps / ia64 / elf / start.S
1 /* Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Written by Jes Sorensen, <Jes.Sorensen@cern.ch>, April 1999.
4
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Library General Public License as
7    published by the Free Software Foundation; either version 2 of the
8    License, or (at your option) any later version.
9
10    The GNU C Library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Library General Public License for more details.
14
15    You should have received a copy of the GNU Library General Public
16    License along with the GNU C Library; see the file COPYING.LIB.  If not,
17    write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18    Boston, MA 02111-1307, USA.  */
19
20 #include <asm/unistd.h>
21 #include <asm/fpu.h>
22
23 /*
24  * Arguments for __libc_start_main:
25  *      out0:   main
26  *      out1:   argc
27  *      out2:   argv
28  *      out3:   init
29  *      out4:   fini
30  *      out5:   rtld_fini
31  *      out6:   stack_end
32  */
33
34         .global _start
35         .proc   _start
36
37 _start:
38         { .mlx
39           alloc r2 = ar.pfs,0,0,7,0
40           movl r3 = FPSR_DEFAULT
41         }
42         { .mlx
43           adds out2 = 16, sp    /* get address of argc value */
44           movl gp = @gprel(0f)
45           ;;
46         }
47 0:      { .mii
48           ld8 out1 = [out2], 8  /* load argc and move out2 to become argv */
49           mov r9 = ip
50           ;;
51           sub gp = r9, gp       /* back-compute gp value */
52           ;;
53         }
54         { .mfi
55           mov ar.fpsr = r3
56           addl out0 = @ltoff(@fptr(main)), gp
57         }
58         { .mfi
59           addl out4 = @ltoff(@fptr(_fini)), gp
60           addl out3 = @ltoff(@fptr(_init)), gp
61           ;;
62         }
63         { .mmi
64           ld8 out0 = [out0]     /* pointer to `main' function descriptor */
65           ld8 out3 = [out3]     /* pointer to `init' function descriptor */
66           adds out6 = 16, sp    /* highest non-environment stack address */
67         }
68         { .mib
69           ld8 out4 = [out4]     /* pointer to `fini' function descriptor */
70           mov out5 = ret0       /* dynamic linker destructor */
71           br.call.sptk.few rp = __libc_start_main
72         }
73         { .mib
74           mov rp = r0
75           br.ret.sptk.few rp    /* break miserably if we ever return */
76           ;;
77         }
78         .endp   _start
79
80 /* Define a symbol for the first piece of initialized data.  */
81         .data
82         .globl __data_start
83 __data_start:
84         .long 0
85         .weak data_start
86         data_start = __data_start