mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-12-24 09:43:36 +08:00
6eaa7fb59b
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.
283 lines
6.1 KiB
ArmAsm
283 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
|