summaryrefslogtreecommitdiff
path: root/gcc/config/alpha/crtbegin.asm
blob: 96725b003b5a8e306d51af9baa16c0a0858dc428 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
/*
 * Copyright (C) 1996, 1998, 2000 Free Software Foundation, Inc.
 *  Contributed by Richard Henderson (rth@tamu.edu)
 *
 * This file is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License as published by the
 * Free Software Foundation; either version 2, or (at your option) any
 * later version.
 * 
 * In addition to the permissions in the GNU 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 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.)
 * 
 * This file 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
 * General Public License for more details.
 * 
 * You should have received a copy of the GNU General Public License
 * along with this program; see the file COPYING.  If not, write to
 * the Free Software Foundation, 59 Temple Place - Suite 330,
 * Boston, MA 02111-1307, USA.
 * 
 *    As a special exception, if you link this library with files
 *    compiled with GCC to produce an executable, this does not cause
 *    the resulting executable to be covered by the GNU General Public License.
 *    This exception does not however invalidate any other reasons why
 *    the executable file might be covered by the GNU General Public License.
 */

#include "auto-host.h"


/*
 * Heads of the constructor/destructor lists.
 */

/* The __*TOR_LIST__ symbols are not global because when this file is used
   in a shared library, we do not want the symbol to fall over to the
   application's lists.  */

.section .ctors,"aw"
	.align 3
__CTOR_LIST__:
	.quad	-1

.section .dtors,"aw"
	.align 3
__DTOR_LIST__:
	.quad	-1

.section .jcr,"aw"
	.align 3
__JCR_LIST__:

.section .eh_frame,"aw"
__EH_FRAME_BEGIN__:

/*
 * Fragment of the ELF _fini routine that invokes our dtor cleanup.
 */

.section .fini,"ax"

	/* Since the bits of the _fini function are spread across many
	   object files, each potentially with its own GP, we must
	   assume we need to load ours.  Further, our .fini section
	   can easily be more than 4MB away from our .text bits so we
	   can't use bsr.  */

	br      $29,1f
1:	ldgp    $29,0($29)
	jsr     $26,__do_global_dtors_aux

	/* Must match the alignment we got from crti.o else we get
	   zero-filled holes in our _fini function and then SIGILL.  */
	.align 3

/*
 * Fragment of the ELF _init routine that sets up the frame info.
 */

.section .init,"ax"
       br      $29,1f
1:     ldgp    $29,0($29)
       jsr     $26,__do_frame_setup
       .align 3

/*
 * Invoke our destructors in order.
 */

.section .sdata

/* Support recursive calls to exit.  */
	.type dtor_ptr,@object
	.size dtor_ptr,4
dtor_ptr:
	.gprel32 __DTOR_LIST__ + 8

/* A globally unique widget for c++ local destructors to hang off.

   This has a unique value in every dso; in the main program its
   value is zero.  The object should be protected.  This means the
   instance in any dso or the main program is not used in any other
   dso.  The dynamic linker takes care of this.  */
 
	.global __dso_handle
	.type __dso_handle,@object
	.size __dso_handle,8
#ifdef SHARED
.section .data
	.align 3
__dso_handle:
	.quad	__dso_handle
#else
.section .bss
	.align 3
__dso_handle:
	.zero 8
#endif
#ifdef HAVE_GAS_HIDDEN
	.hidden	__dso_handle
#endif

.text

	.align 3
	.ent __do_global_dtors_aux

__do_global_dtors_aux:
	ldgp	$29,0($27)
	lda     $30,-16($30)
	.frame  $30,16,$26,0
	stq	$9,8($30)
	stq     $26,0($30)
	.mask   0x4000200,-16
	.prologue 1

#ifdef SHARED
	/* Do c++ local destructors.  */
	lda	$1,__cxa_finalize
	beq	$1,0f
	lda	$16,__dso_handle
	jsr	$26,__cxa_finalize
	ldgp	$29,0($26)
#endif

0:	lda     $9,dtor_ptr
	br      2f
1:	stl	$1,0($9)
	jsr     $26,($27)
	ldgp	$29,0($26)
2:	ldl	$1,0($9)
	addq	$1,$29,$2
	ldq     $27,0($2)
	addl    $1,8,$1
	bne     $27,1b

	/* Remove our frame info.  */
	lda	$1,__deregister_frame_info
	beq	$1,3f
	lda	$16,__EH_FRAME_BEGIN__
	jsr	$26,__deregister_frame_info
	ldgp	$29,0($26)

3:	ldq     $26,0($30)
	ldq	$9,8($30)
	lda     $30,16($30)
	ret

	.end __do_global_dtors_aux

/*
 * Install our frame info; register java classes, if any.
 */

.section .bss
	.type frame_object,@object
	.size frame_object, 48
	.align 3
frame_object:
	.zero 48

.text 

	.align 3
	.ent __do_frame_setup

__do_frame_setup:
	ldgp	$29,0($27)
	lda     $30,-16($30)
	.frame  $30,16,$26,0
	stq     $26,0($30)
	.mask   0x4000000,-16
	.prologue 1

	lda	$1,__register_frame_info
	beq	$1,0f
	lda	$16,__EH_FRAME_BEGIN__
	lda	$17,frame_object
	jsr	$26,__register_frame_info
	ldgp	$29,0($26)

0:	lda	$1,_Jv_RegisterClasses
	lda	$16,__JCR_LIST__
	beq	$1,0f
	ldq	$2,8($16)
	beq	$2,0f
	jsr	$26,_Jv_RegisterClasses
	ldgp	$29,0($26)

0:	ldq     $26,0($30)
	lda     $30,16($30)
	ret

	.end __do_frame_setup

.weak __register_frame_info
.weak __deregister_frame_info
#ifdef SHARED
.weak __cxa_finalize
#endif
.weak _Jv_RegisterClasses