binutils-gdb/ld/testsuite/ld-i386/tlspic3.s

283 lines
6.1 KiB
ArmAsm
Raw Normal View History

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-09 02:59:47 +08:00
.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