old-cross-binutils/ld/testsuite/ld-i386/tlspic3.s
H.J. Lu 6eaa7fb59b Support i386 TLS code sequences without PLT
We can generate i386 TLS code sequences for general and local dynamic
models without PLT, which uses indirect call via GOT:

call *___tls_get_addr@GOT(%reg)

where EBX register isn't required as GOT base, instead of direct call:

call ___tls_get_addr[@PLT]

which requires EBX register as GOT base.

Since direct call is 4-byte long and indirect call, is 5-byte long, the
extra one byte must be handled properly.

For general dynamic model, 7-byte lea instruction before call instruction
is replaced by 6-byte one to make room for indirect call.  For local
dynamic model, we simply use 5-byte indirect call.

TLS linker optimization is updated to recognize new instruction patterns.
For local dynamic model to local exec model transition, we generate
a 6-byte lea instruction as nop, instead of a 1-byte nop plus a 4-byte
lea instruction.  Since linker may convert

call ___tls_get_addr[@PLT]

to

addr32 call ____tls_get_addr

when producing static executable, both patterns are recognized.

bfd/

	* elf64-i386.c (elf_i386_link_hash_entry): Add tls_get_addr.
	(elf_i386_link_hash_newfunc): Initialize tls_get_addr to 2.
	(elf_i386_check_tls_transition): Check indirect call and direct
	call with the addr32 prefix for general and local dynamic models.
	Set the tls_get_addr feild.
	(elf_i386_convert_load_reloc): Always use addr32 prefix for
	indirect ___tls_get_addr call via GOT.
	(elf_i386_relocate_section): Handle GD->LE, GD->IE and LD->LE
	transitions with indirect call and direct call with the addr32
	prefix.

ld/

	* testsuite/ld-i386/i386.exp: Run libtlspic2.so, tlsbin2,
	tlsgd3, tlsld2, tlsgd4, tlspie3a, tlspie3b and tlspie3c.
	* testsuite/ld-i386/pass.out: New file.
	* testsuite/ld-i386/tls-def1.c: Likewise.
	* testsuite/ld-i386/tls-gd1.S: Likewise.
	* testsuite/ld-i386/tls-ld1.S: Likewise.
	* testsuite/ld-i386/tls-main1.c: Likewise.
	* testsuite/ld-i386/tls.exp: Likewise.
	* testsuite/ld-i386/tlsbin2-nacl.rd: Likewise.
	* testsuite/ld-i386/tlsbin2.dd: Likewise.
	* testsuite/ld-i386/tlsbin2.rd: Likewise.
	* testsuite/ld-i386/tlsbin2.sd: Likewise.
	* testsuite/ld-i386/tlsbin2.td: Likewise.
	* testsuite/ld-i386/tlsbinpic2.s: Likewise.
	* testsuite/ld-i386/tlsgd3.dd: Likewise.
	* testsuite/ld-i386/tlsgd3.s: Likewise.
	* testsuite/ld-i386/tlsgd4.d: Likewise.
	* testsuite/ld-i386/tlsgd4.s: Likewise.
	* testsuite/ld-i386/tlsld2.s: Likewise.
	* testsuite/ld-i386/tlspic2-nacl.rd: Likewise.
	* testsuite/ld-i386/tlspic2.dd: Likewise.
	* testsuite/ld-i386/tlspic2.rd: Likewise.
	* testsuite/ld-i386/tlspic2.sd: Likewise.
	* testsuite/ld-i386/tlspic2.td: Likewise.
	* testsuite/ld-i386/tlspic3.s: Likewise.
	* testsuite/ld-i386/tlspie3.s: Likewise.
	* testsuite/ld-i386/tlspie3a.d: Likewise.
	* testsuite/ld-i386/tlspie3b.d: Likewise.
	* testsuite/ld-i386/tlspie3c.d: Likewise.
2016-06-08 12:01:50 -07:00

282 lines
6.1 KiB
ArmAsm

.section ".tdata", "awT", @progbits
.globl sg1, sg2, sg3, sg4, sg5, sg6, sg7, sg8
.globl sh1, sh2, sh3, sh4, sh5, sh6, sh7, sh8
.hidden sh1, sh2, sh3, sh4, sh5, sh6, sh7, sh8
sg1: .long 17
sg2: .long 18
sg3: .long 19
sg4: .long 20
sg5: .long 21
sg6: .long 22
sg7: .long 23
sg8: .long 24
sl1: .long 65
sl2: .long 66
sl3: .long 67
sl4: .long 68
sl5: .long 69
sl6: .long 70
sl7: .long 71
sl8: .long 72
sh1: .long 257
sh2: .long 258
sh3: .long 259
sh4: .long 260
sh5: .long 261
sh6: .long 262
sh7: .long 263
sh8: .long 264
.text
.globl fn1
.type fn1,@function
fn1:
pushl %ebp
movl %esp, %ebp
pushl %ebx
pushl %eax
call 1f
1: popl %ebx
addl $_GLOBAL_OFFSET_TABLE_+[.-1b], %ebx
nop;nop;nop;nop
/* GD */
leal sg1@tlsgd(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop;nop;nop;nop
/* GD -> IE because variable is referenced through @gottpoff too */
leal sg2@tlsgd(%ecx), %eax
call *___tls_get_addr@GOT(%ecx)
nop;nop;nop;nop
/* GD -> IE because variable is referenced through @gotntpoff too */
leal sg3@tlsgd(%edx), %eax
call *___tls_get_addr@GOT(%edx)
nop;nop;nop;nop
/* GD -> IE because variable is referenced through @gottpoff and
@gotntpoff too */
leal sg4@tlsgd(%edi), %eax
call *___tls_get_addr@GOT(%edi)
nop;nop;nop;nop
/* GD against local variable */
leal sl1@tlsgd(%esi), %eax
call *___tls_get_addr@GOT(%esi)
nop;nop;nop;nop
/* GD -> IE against local variable referenced through @gottpoff too */
leal sl2@tlsgd(%ebp), %eax
call *___tls_get_addr@GOT(%ebp)
nop;nop;nop;nop
/* GD -> IE against local variable referenced through @gotntpoff
too */
leal sl3@tlsgd(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop;nop;nop;nop
/* GD -> IE against local variable referenced through @gottpoff and
@gotntpoff too */
leal sl4@tlsgd(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop;nop;nop;nop
/* GD against hidden and local variable */
leal sh1@tlsgd(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop;nop;nop;nop
/* GD -> IE against hidden and local variable referenced through
@gottpoff too */
leal sh2@tlsgd(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop;nop;nop;nop
/* GD -> IE against hidden and local variable referenced through
@gotntpoff too */
leal sh3@tlsgd(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop;nop;nop;nop
/* GD -> IE against hidden and local variable referenced through
@gottpoff and @gotntpoff too */
leal sh4@tlsgd(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop;nop;nop;nop
/* GD against hidden but not local variable */
leal sH1@tlsgd(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop;nop;nop;nop
/* GD -> IE against hidden but not local variable referenced through
@gottpoff too */
leal sH2@tlsgd(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop;nop;nop;nop
/* GD -> IE against hidden but not local variable referenced through
@gotntpoff too */
leal sH3@tlsgd(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop;nop;nop;nop
/* GD -> IE against hidden but not local variable referenced through
@gottpoff and @gotntpoff too */
leal sH4@tlsgd(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop;nop;nop;nop
/* LD */
leal sl1@tlsldm(%ebx), %eax
call *___tls_get_addr@GOT(%ebx)
nop
leal sl1@dtpoff(%eax), %edx
nop;nop
leal 2+sl2@dtpoff(%eax), %ecx
nop;nop;nop;nop
/* LD against hidden and local variables */
leal sh1@tlsldm(%ecx), %eax
call *___tls_get_addr@GOT(%ecx)
nop
leal sh1@dtpoff(%eax), %edx
nop;nop
leal sh2@dtpoff+3(%eax), %ecx
nop;nop;nop;nop
/* LD against hidden but not local variables */
leal sH1@tlsldm(%edx), %eax
call *___tls_get_addr@GOT(%edx)
nop
leal sH1@dtpoff(%eax), %edx
nop;nop
leal sH2@dtpoff+1(%eax), %ecx
nop;nop
/* @gottpoff IE against global var */
movl %gs:0, %ecx
nop;nop
subl sg2@gottpoff(%ebx), %ecx
nop;nop;nop;nop
/* @gottpoff IE against global var */
movl %gs:0, %eax
nop;nop
subl sg4@gottpoff(%ebx), %eax
nop;nop;nop;nop
/* @gotntpoff IE against global var */
movl %gs:0, %ecx
nop;nop
addl sg3@gotntpoff(%ebx), %ecx
nop;nop;nop;nop
/* @gotntpoff IE against global var */
movl %gs:0, %eax
nop;nop
addl sg4@gotntpoff(%ebx), %eax
nop;nop;nop;nop
/* @gottpoff IE against local var */
movl %gs:0, %ecx
nop;nop
subl sl2@gottpoff(%ebx), %ecx
nop;nop;nop;nop
/* @gottpoff IE against local var */
movl %gs:0, %eax
nop;nop
subl sl4@gottpoff(%ebx), %eax
nop;nop;nop;nop
/* @gotntpoff IE against local var */
movl %gs:0, %ecx
nop;nop
addl sl3@gotntpoff(%ebx), %ecx
nop;nop;nop;nop
/* @gotntpoff IE against local var */
movl %gs:0, %eax
nop;nop
addl sl4@gotntpoff(%ebx), %eax
nop;nop;nop;nop
/* @gottpoff IE against hidden and local var */
movl %gs:0, %ecx
nop;nop
subl sh2@gottpoff(%ebx), %ecx
nop;nop;nop;nop
/* @gottpoff IE against hidden and local var */
movl %gs:0, %eax
nop;nop
subl sh4@gottpoff(%ebx), %eax
nop;nop;nop;nop
/* @gotntpoff IE against hidden and local var */
movl %gs:0, %ecx
nop;nop
addl sh3@gotntpoff(%ebx), %ecx
nop;nop;nop;nop
/* @gotntpoff IE against hidden and local var */
movl %gs:0, %eax
nop;nop
addl sh4@gotntpoff(%ebx), %eax
nop;nop;nop;nop
/* @gottpoff IE against hidden but not local var */
movl %gs:0, %ecx
nop;nop
subl sH2@gottpoff(%ebx), %ecx
nop;nop;nop;nop
/* @gottpoff IE against hidden but not local var */
movl %gs:0, %eax
nop;nop
subl sH4@gottpoff(%ebx), %eax
nop;nop;nop;nop
/* @gotntpoff IE against hidden but not local var */
movl %gs:0, %ecx
nop;nop
addl sH3@gotntpoff(%ebx), %ecx
nop;nop;nop;nop
/* @gotntpoff IE against hidden but not local var */
movl %gs:0, %eax
nop;nop
addl sH4@gotntpoff(%ebx), %eax
nop;nop;nop;nop
/* Direct access through %gs */
/* @gotntpoff IE against global var */
movl sg5@gotntpoff(%ebx), %ecx
nop;nop
movl %gs:(%ecx), %edx
nop;nop;nop;nop
/* @gotntpoff IE against local var */
movl sl5@gotntpoff(%ebx), %eax
nop;nop
movl %gs:(%eax), %edx
nop;nop;nop;nop
/* @gotntpoff IE against hidden and local var */
movl sh5@gotntpoff(%ebx), %edx
nop;nop
movl %gs:(%edx), %edx
nop;nop;nop;nop
/* @gotntpoff IE against hidden but not local var */
movl sH5@gotntpoff(%ebx), %ecx
nop;nop
movl %gs:(%ecx), %edx
nop;nop;nop;nop
movl -4(%ebp), %ebx
leave
ret