[apple/ld64.git] / unit-tests / test-cases / relocs-asm / relocs-asm.s

/*
 * Copyright (c) 2005 Apple Computer, Inc. All rights reserved.
 *
 * @APPLE_LICENSE_HEADER_START@
 * 
 * This file contains Original Code and/or Modifications of Original Code
 * as defined in and that are subject to the Apple Public Source License
 * Version 2.0 (the 'License'). You may not use this file except in
 * compliance with the License. Please obtain a copy of the License at
 * http://www.opensource.apple.com/apsl/ and read it before using this
 * file.
 * 
 * The Original Code and all software distributed under the License are
 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
 * Please see the License for the specific language governing rights and
 * limitations under the License.
 * 
 * @APPLE_LICENSE_HEADER_END@
 */

#if __ppc__ || __ppc64__

	.text
	.align 2
		
	.globl _test_loads
_test_loads:
	stmw r30,-8(r1)
	stwu r1,-48(r1)
Lpicbase:

	; PIC load of a 
	addis r2,r10,ha16(_a-Lpicbase)
	lwz r2,lo16(_a-Lpicbase)(r2)

	; PIC load of c 
	addis r2,r10,ha16(_c-Lpicbase)
	lwz r2,lo16(_c-Lpicbase)(r2)

	; absolute load of a
	lis r2,ha16(_a)
	lwz r2,lo16(_a)(r2)

	; absolute load of c
	lis r2,ha16(_c)
	lwz r2,lo16(_c)(r2)

	; absolute load of external
	lis r2,ha16(_ax)
	lwz r2,lo16(_ax)(r2)

	; absolute lea of external
	lis r2,hi16(_ax)
	ori r2,r2,lo16(_ax)


	; PIC load of a + addend
	addis r2,r10,ha16(_a+0x19000-Lpicbase)
	lwz r2,lo16(_a+0x19000-Lpicbase)(r2)

	; absolute load of a + addend
	lis r2,ha16(_a+0x19000)
	lwz r2,lo16(_a+0x19000)(r2)

	; absolute load of external + addend
	lis r2,ha16(_ax+0x19000)
	lwz r2,lo16(_ax+0x19000)(r2)

	; absolute lea of external + addend
	lis r2,hi16(_ax+0x19000)
	ori r2,r2,lo16(_ax+0x19000)


	; PIC load of a + addend
	addis r2,r10,ha16(_a+0x09000-Lpicbase)
	lwz r2,lo16(_a+0x09000-Lpicbase)(r2)

	; absolute load of a + addend
	lis r2,ha16(_a+0x09000)
	lwz r2,lo16(_a+0x09000)(r2)

	; absolute load of external + addend
	lis r2,ha16(_ax+0x09000)
	lwz r2,lo16(_ax+0x09000)(r2)

	; absolute lea of external + addend
	lis r2,hi16(_ax+0x09000)
	ori r2,r2,lo16(_ax+0x09000)

	blr


_test_calls:
	; call internal
	bl	_test_branches
	
	; call internal + addend
	bl	_test_branches+0x19000

	; call external
	bl	_external
	
	; call external + addend
	bl	_external+0x19000
	

_test_branches:
	; call internal
	bne	_test_calls
	
	; call internal + addend
	bne	_test_calls+16

	; call external
	bne	_external
	
	; call external + addend
	bne	_external+16
#endif


#if __i386__
	.text
	.align 2
	
	.globl _test_loads
_test_loads:
	pushl	%ebp
Lpicbase:

	# PIC load of a 
	movl	_a-Lpicbase(%ebx), %eax
	
	# absolute load of a
	movl	_a, %eax

	# absolute load of external
	movl	_ax, %eax

	# absolute lea of external
	leal	_ax, %eax


	# PIC load of a + addend
	movl	_a-Lpicbase+0x19000(%ebx), %eax

	# absolute load of a + addend
	movl	_a+0x19000(%ebx), %eax

	# absolute load of external + addend
	movl	_ax+0x19000(%ebx), %eax

	# absolute lea of external + addend
	leal	_ax+0x1900, %eax

	ret


_test_calls:
	# call internal
	call	_test_branches
	
	# call internal + addend
	call	_test_branches+0x19000

	# call external
	call	_external
	
	# call external + addend
	call	_external+0x19000
	

_test_branches:
	# call internal
	jne	_test_calls
	
	# call internal + addend
	jne	_test_calls+16

	# call external
	jne	_external
	
	# call external + addend
	jne	_external+16
#endif


	# test that pointer-diff relocs are preserved
	.text
_test_diffs:
	.align 2
Llocal2:
	.long 0
	.long Llocal2-_test_branches
#if __ppc64__
	.quad Llocal2-_test_branches
#endif


	.data
_a:	
	.long	0

_b:
#if __ppc__ || __i386__
	.long	_test_calls
	.long	_test_calls+16
	.long	_external
	.long	_external+16
#elif __ppc64__
	.quad	_test_calls
	.quad	_test_calls+16
	.quad	_external
	.quad	_external+16
#endif

	# test that reloc sizes are the same
Llocal3:
	.long	0
	
Llocal4:
	.long 0
	
	.long Llocal4-Llocal3
	
Lfiller:
	.space	0x9000
_c:
	.long	0
Commit	Line	Data
d696c285 A	1	/*
	2	* Copyright (c) 2005 Apple Computer, Inc. All rights reserved.
	3	*
	4	* @APPLE_LICENSE_HEADER_START@
	5	*
	6	* This file contains Original Code and/or Modifications of Original Code
	7	* as defined in and that are subject to the Apple Public Source License
	8	* Version 2.0 (the 'License'). You may not use this file except in
	9	* compliance with the License. Please obtain a copy of the License at
	10	* http://www.opensource.apple.com/apsl/ and read it before using this
	11	* file.
	12	*
	13	* The Original Code and all software distributed under the License are
	14	* distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
	15	* EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
	16	* INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
	17	* FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
	18	* Please see the License for the specific language governing rights and
	19	* limitations under the License.
	20	*
	21	* @APPLE_LICENSE_HEADER_END@
	22	*/
	23
	24	#if __ppc__ \|\| __ppc64__
	25
	26	.text
	27	.align 2
	28
	29	.globl _test_loads
	30	_test_loads:
	31	stmw r30,-8(r1)
	32	stwu r1,-48(r1)
	33	Lpicbase:
	34
	35	; PIC load of a
	36	addis r2,r10,ha16(_a-Lpicbase)
	37	lwz r2,lo16(_a-Lpicbase)(r2)
	38
	39	; PIC load of c
	40	addis r2,r10,ha16(_c-Lpicbase)
	41	lwz r2,lo16(_c-Lpicbase)(r2)
	42
	43	; absolute load of a
	44	lis r2,ha16(_a)
	45	lwz r2,lo16(_a)(r2)
	46
	47	; absolute load of c
	48	lis r2,ha16(_c)
	49	lwz r2,lo16(_c)(r2)
	50
	51	; absolute load of external
	52	lis r2,ha16(_ax)
	53	lwz r2,lo16(_ax)(r2)
	54
	55	; absolute lea of external
	56	lis r2,hi16(_ax)
	57	ori r2,r2,lo16(_ax)
	58
	59
	60	; PIC load of a + addend
	61	addis r2,r10,ha16(_a+0x19000-Lpicbase)
	62	lwz r2,lo16(_a+0x19000-Lpicbase)(r2)
	63
	64	; absolute load of a + addend
65	lis r2,ha16(_a+0x19000)
66	lwz r2,lo16(_a+0x19000)(r2)
67
68	; absolute load of external + addend
69	lis r2,ha16(_ax+0x19000)
70	lwz r2,lo16(_ax+0x19000)(r2)
71
72	; absolute lea of external + addend
73	lis r2,hi16(_ax+0x19000)
74	ori r2,r2,lo16(_ax+0x19000)
75
76
77	; PIC load of a + addend
78	addis r2,r10,ha16(_a+0x09000-Lpicbase)
79	lwz r2,lo16(_a+0x09000-Lpicbase)(r2)
80
81	; absolute load of a + addend
82	lis r2,ha16(_a+0x09000)
83	lwz r2,lo16(_a+0x09000)(r2)
84
85	; absolute load of external + addend
86	lis r2,ha16(_ax+0x09000)
87	lwz r2,lo16(_ax+0x09000)(r2)
88
89	; absolute lea of external + addend
90	lis r2,hi16(_ax+0x09000)
91	ori r2,r2,lo16(_ax+0x09000)
92
93	blr
94
95
96	_test_calls:
97	; call internal
98	bl _test_branches
99
100	; call internal + addend
101	bl _test_branches+0x19000
102
103	; call external
104	bl _external
105
106	; call external + addend
107	bl _external+0x19000
108
109
110	_test_branches:
111	; call internal
112	bne _test_calls
113
114	; call internal + addend
115	bne _test_calls+16
116
117	; call external
118	bne _external
119
120	; call external + addend
121	bne _external+16
122	#endif
123
124
125
126	#if __i386__
127	.text
128	.align 2
129
130	.globl _test_loads
131	_test_loads:
132	pushl %ebp
133	Lpicbase:
134
135	# PIC load of a
136	movl _a-Lpicbase(%ebx), %eax
137
138	# absolute load of a
139	movl _a, %eax
140
141	# absolute load of external
142	movl _ax, %eax
143
144	# absolute lea of external
145	leal _ax, %eax
146
147
148	# PIC load of a + addend
149	movl _a-Lpicbase+0x19000(%ebx), %eax
150
151	# absolute load of a + addend
152	movl _a+0x19000(%ebx), %eax
153
154	# absolute load of external + addend
155	movl _ax+0x19000(%ebx), %eax
156
157	# absolute lea of external + addend
158	leal _ax+0x1900, %eax
159
160	ret
161
162
163	_test_calls:
164	# call internal
165	call _test_branches
166
167	# call internal + addend
168	call _test_branches+0x19000
169
170	# call external
171	call _external
172
173	# call external + addend
174	call _external+0x19000
175
176
177	_test_branches:
178	# call internal
179	jne _test_calls
180
181	# call internal + addend
182	jne _test_calls+16
183
184	# call external
185	jne _external
186
187	# call external + addend
188	jne _external+16
189	#endif
190
191
192
193	# test that pointer-diff relocs are preserved
194	.text
195	_test_diffs:
196	.align 2
197	Llocal2:
198	.long 0
199	.long Llocal2-_test_branches
200	#if __ppc64__
201	.quad Llocal2-_test_branches
202	#endif
203
204
205	.data
206	_a:
207	.long 0
208
209	_b:
210	#if __ppc__ \|\| __i386__
211	.long _test_calls
212	.long _test_calls+16
213	.long _external
214	.long _external+16
215	#elif __ppc64__
216	.quad _test_calls
217	.quad _test_calls+16
218	.quad _external
219	.quad _external+16
220	#endif
221
222	# test that reloc sizes are the same
223	Llocal3:
224	.long 0
225
226	Llocal4:
227	.long 0
228
229	.long Llocal4-Llocal3
230
231	Lfiller:
232	.space 0x9000
233	_c:
234	.long 0
235