winebuild: Implement register entry points for x86_64.
This commit is contained in:
Alexandre Julliard
parent
a3a02d430a
commit
465ddc51dc
|
|
@ -223,7 +223,14 @@ static inline struct ntdll_thread_regs *ntdll_get_thread_regs(void)
|
|||
".long " __ASM_NAME("__regs_") #name "-.-11\n\t" \
|
||||
".byte 0x6a," #args "\n\t" /* pushl $args */ \
|
||||
"call " __ASM_NAME("__wine_call_from_32_regs"))
|
||||
/* FIXME: add support for other CPUs */
|
||||
#elif defined(__x86_64__)
|
||||
#define DEFINE_REGS_ENTRYPOINT( name, args ) \
|
||||
__ASM_GLOBAL_FUNC( name, \
|
||||
"movq %rcx,8(%rsp)\n\t" \
|
||||
"movq %rdx,16(%rsp)\n\t" \
|
||||
"movq $" #args ",%rcx\n\t" \
|
||||
"leaq " __ASM_NAME("__regs_") #name "(%rip),%rdx\n\t" \
|
||||
"call " __ASM_NAME("__wine_call_from_regs"))
|
||||
#endif
|
||||
|
||||
#endif
|
||||
|
|
|
|||
|
|
@ -983,6 +983,173 @@ void BuildRelays16(void)
|
|||
output_gnu_stack_note();
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************
|
||||
* build_call_from_regs_x86_64
|
||||
*
|
||||
* Build the register saving code for a 'register' entry point.
|
||||
*
|
||||
* Stack layout:
|
||||
* ...
|
||||
* (rsp+16) first arg
|
||||
* (rsp+8) ret addr to user code
|
||||
* (rsp) ret addr to relay code
|
||||
* (rsp-128) buffer area to allow stack frame manipulation
|
||||
*
|
||||
* Parameters:
|
||||
* %rcx number of args
|
||||
* %rdx entry point
|
||||
*/
|
||||
static void build_call_from_regs_x86_64(void)
|
||||
{
|
||||
static const int STACK_SPACE = 128 + 0x4d0; /* size of x86_64 context */
|
||||
|
||||
/* Function header */
|
||||
|
||||
function_header( "__wine_call_from_regs" );
|
||||
|
||||
output( "\tsubq $%u,%%rsp\n", STACK_SPACE );
|
||||
|
||||
/* save registers into the context */
|
||||
|
||||
output( "\tmovq %%rax,0x78(%%rsp)\n" );
|
||||
output( "\tmovq %u(%%rsp),%%rax\n", STACK_SPACE + 16 ); /* saved %rcx on stack */
|
||||
output( "\tmovq %%rax,0x80(%%rsp)\n" );
|
||||
output( "\tmovq %u(%%rsp),%%rax\n", STACK_SPACE + 24 ); /* saved %rdx on stack */
|
||||
output( "\tmovq %%rax,0x88(%%rsp)\n" );
|
||||
output( "\tmovq %%rbx,0x90(%%rsp)\n" );
|
||||
output( "\tleaq %u(%%rsp),%%rax\n", STACK_SPACE + 16 );
|
||||
output( "\tmovq %%rax,0x98(%%rsp)\n" );
|
||||
output( "\tmovq %%rbp,0xa0(%%rsp)\n" );
|
||||
output( "\tmovq %%rsi,0xa8(%%rsp)\n" );
|
||||
output( "\tmovq %%rdi,0xb0(%%rsp)\n" );
|
||||
output( "\tmovq %%r8,0xb8(%%rsp)\n" );
|
||||
output( "\tmovq %%r9,0xc0(%%rsp)\n" );
|
||||
output( "\tmovq %%r10,0xc8(%%rsp)\n" );
|
||||
output( "\tmovq %%r11,0xd0(%%rsp)\n" );
|
||||
output( "\tmovq %%r12,0xd8(%%rsp)\n" );
|
||||
output( "\tmovq %%r13,0xe0(%%rsp)\n" );
|
||||
output( "\tmovq %%r14,0xe8(%%rsp)\n" );
|
||||
output( "\tmovq %%r15,0xf0(%%rsp)\n" );
|
||||
output( "\tmovq %u(%%rsp),%%rax\n", STACK_SPACE + 8 );
|
||||
output( "\tmovq %%rax,0xf8(%%rsp)\n" );
|
||||
|
||||
output( "\tstmxcsr 0x34(%%rsp)\n" );
|
||||
output( "\tfxsave 0x100(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm0,0x1a0(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm1,0x1b0(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm2,0x1c0(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm3,0x1d0(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm4,0x1e0(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm5,0x1f0(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm6,0x200(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm7,0x210(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm8,0x220(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm9,0x230(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm10,0x240(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm11,0x250(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm12,0x260(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm13,0x270(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm14,0x280(%%rsp)\n" );
|
||||
output( "\tmovdqa %%xmm15,0x290(%%rsp)\n" );
|
||||
|
||||
output( "\tmovw %%cs,0x38(%%rsp)\n" );
|
||||
output( "\tmovw %%ds,0x3a(%%rsp)\n" );
|
||||
output( "\tmovw %%es,0x3c(%%rsp)\n" );
|
||||
output( "\tmovw %%fs,0x3e(%%rsp)\n" );
|
||||
output( "\tmovw %%gs,0x40(%%rsp)\n" );
|
||||
output( "\tmovw %%ss,0x42(%%rsp)\n" );
|
||||
output( "\tpushfq\n" );
|
||||
output( "\tpopq %%rax\n" );
|
||||
output( "\tmovl %%eax,0x44(%%rsp)\n" );
|
||||
|
||||
output( "\tmovl $0x%x,0x30(%%rsp)\n", 0x0010000f );
|
||||
|
||||
/* transfer the arguments */
|
||||
|
||||
output( "\tmovq %%r8,%u(%%rsp)\n", STACK_SPACE + 32 );
|
||||
output( "\tmovq %%r9,%u(%%rsp)\n", STACK_SPACE + 40 );
|
||||
output( "\tmovq $4,%%rax\n" );
|
||||
output( "\tleaq %u(%%rsp),%%rsi\n", STACK_SPACE + 16 );
|
||||
output( "\tcmpq %%rax,%%rcx\n" );
|
||||
output( "\tcmovgq %%rcx,%%rax\n" );
|
||||
output( "\tmovq %%rsp,%%rbx\n" );
|
||||
output( "\tleaq 16(,%%rax,8),%%rax\n" ); /* add 8 for context arg and 8 for rounding */
|
||||
output( "\tandq $~15,%%rax\n" );
|
||||
output( "\tsubq %%rax,%%rsp\n" );
|
||||
output( "\tmovq %%rsp,%%rdi\n" );
|
||||
output( "\tjrcxz 1f\n" );
|
||||
output( "\tcld\n" );
|
||||
output( "\trep\n\tmovsq\n" );
|
||||
output( "1:\tmovq %%rbx,0(%%rdi)\n" ); /* context arg */
|
||||
|
||||
/* call the entry point */
|
||||
|
||||
output( "\tmovq %%rdx,%%rax\n" );
|
||||
output( "\tmovq 0(%%rsp),%%rcx\n" );
|
||||
output( "\tmovq 8(%%rsp),%%rdx\n" );
|
||||
output( "\tmovq 16(%%rsp),%%r8\n" );
|
||||
output( "\tmovq 24(%%rsp),%%r9\n" );
|
||||
output( "\tcallq *%%rax\n" );
|
||||
|
||||
/* restore the context structure */
|
||||
|
||||
output( "1:\tmovq 0x80(%%rbx),%%rcx\n" );
|
||||
output( "\tmovq 0x88(%%rbx),%%rdx\n" );
|
||||
output( "\tmovq 0xa0(%%rbx),%%rbp\n" );
|
||||
output( "\tmovq 0xa8(%%rbx),%%rsi\n" );
|
||||
output( "\tmovq 0xb0(%%rbx),%%rdi\n" );
|
||||
output( "\tmovq 0xb8(%%rbx),%%r8\n" );
|
||||
output( "\tmovq 0xc0(%%rbx),%%r9\n" );
|
||||
output( "\tmovq 0xc8(%%rbx),%%r10\n" );
|
||||
output( "\tmovq 0xd0(%%rbx),%%r11\n" );
|
||||
output( "\tmovq 0xd8(%%rbx),%%r12\n" );
|
||||
output( "\tmovq 0xe0(%%rbx),%%r13\n" );
|
||||
output( "\tmovq 0xe8(%%rbx),%%r14\n" );
|
||||
output( "\tmovq 0xf0(%%rbx),%%r15\n" );
|
||||
|
||||
output( "\tmovdqa 0x1a0(%%rbx),%%xmm0\n" );
|
||||
output( "\tmovdqa 0x1b0(%%rbx),%%xmm1\n" );
|
||||
output( "\tmovdqa 0x1c0(%%rbx),%%xmm2\n" );
|
||||
output( "\tmovdqa 0x1d0(%%rbx),%%xmm3\n" );
|
||||
output( "\tmovdqa 0x1e0(%%rbx),%%xmm4\n" );
|
||||
output( "\tmovdqa 0x1f0(%%rbx),%%xmm5\n" );
|
||||
output( "\tmovdqa 0x200(%%rbx),%%xmm6\n" );
|
||||
output( "\tmovdqa 0x210(%%rbx),%%xmm7\n" );
|
||||
output( "\tmovdqa 0x220(%%rbx),%%xmm8\n" );
|
||||
output( "\tmovdqa 0x230(%%rbx),%%xmm9\n" );
|
||||
output( "\tmovdqa 0x240(%%rbx),%%xmm10\n" );
|
||||
output( "\tmovdqa 0x250(%%rbx),%%xmm11\n" );
|
||||
output( "\tmovdqa 0x260(%%rbx),%%xmm12\n" );
|
||||
output( "\tmovdqa 0x270(%%rbx),%%xmm13\n" );
|
||||
output( "\tmovdqa 0x280(%%rbx),%%xmm14\n" );
|
||||
output( "\tmovdqa 0x290(%%rbx),%%xmm15\n" );
|
||||
output( "\tfxrstor 0x100(%%rbx)\n" );
|
||||
output( "\tldmxcsr 0x34(%%rbx)\n" );
|
||||
|
||||
output( "\tmovl 0x44(%%rbx),%%eax\n" );
|
||||
output( "\tpushq %%rax\n" );
|
||||
output( "\tpopfq\n" );
|
||||
|
||||
output( "\tmovq 0x98(%%rbx),%%rax\n" ); /* stack pointer */
|
||||
output( "\tpushq 0xf8(%%rbx)\n" ); /* return address */
|
||||
output( "\tpopq -8(%%rax)\n" );
|
||||
output( "\tpushq 0x78(%%rbx)\n" ); /* rax */
|
||||
output( "\tpopq -16(%%rax)\n" );
|
||||
output( "\tmovq 0x90(%%rbx),%%rbx\n" );
|
||||
output( "\tleaq -16(%%rax),%%rsp\n" );
|
||||
output( "\tpopq %%rax\n" );
|
||||
output( "\tret\n" );
|
||||
|
||||
output_function_size( "__wine_call_from_regs" );
|
||||
|
||||
function_header( "__wine_restore_regs" );
|
||||
output( "\tmovq %%rcx,%%rbx\n" );
|
||||
output( "\tjmp 1b\n" );
|
||||
output_function_size( "__wine_restore_regs" );
|
||||
}
|
||||
|
||||
|
||||
/*******************************************************************
|
||||
* BuildRelays32
|
||||
*
|
||||
|
|
@ -990,21 +1157,29 @@ void BuildRelays16(void)
|
|||
*/
|
||||
void BuildRelays32(void)
|
||||
{
|
||||
if (target_cpu != CPU_x86)
|
||||
switch (target_cpu)
|
||||
{
|
||||
case CPU_x86:
|
||||
output( "/* File generated automatically. Do not edit! */\n\n" );
|
||||
output( "\t.text\n" );
|
||||
output( "%s:\n\n", asm_name("__wine_spec_thunk_text_32") );
|
||||
|
||||
/* 32-bit register entry point */
|
||||
BuildCallFrom32Regs();
|
||||
|
||||
output_function_size( "__wine_spec_thunk_text_32" );
|
||||
output_gnu_stack_note();
|
||||
break;
|
||||
|
||||
case CPU_x86_64:
|
||||
output( "/* File generated automatically. Do not edit! */\n\n" );
|
||||
output( "\t.text\n" );
|
||||
build_call_from_regs_x86_64();
|
||||
output_gnu_stack_note();
|
||||
break;
|
||||
|
||||
default:
|
||||
output( "/* File not used with this architecture. Do not edit! */\n\n" );
|
||||
return;
|
||||
}
|
||||
|
||||
/* File header */
|
||||
|
||||
output( "/* File generated automatically. Do not edit! */\n\n" );
|
||||
output( "\t.text\n" );
|
||||
output( "%s:\n\n", asm_name("__wine_spec_thunk_text_32") );
|
||||
|
||||
/* 32-bit register entry point */
|
||||
BuildCallFrom32Regs();
|
||||
|
||||
output_function_size( "__wine_spec_thunk_text_32" );
|
||||
output_gnu_stack_note();
|
||||
}
|
||||
|
|
|
|||
|
|
@ -170,7 +170,7 @@ static void output_relay_debug( DLLSPEC *spec )
|
|||
output( "\tmovq $%u,%%rdx\n", (flags << 24) | (args << 16) | (i - spec->base) );
|
||||
output( "\tleaq .L__wine_spec_relay_descr(%%rip),%%rcx\n" );
|
||||
output( "\tsubq $40,%%rsp\n" );
|
||||
output( "\tcallq *8(%%rcx)\n" );
|
||||
output( "\tcallq *%u(%%rcx)\n", (odp->flags & FLAG_REGISTER) ? 16 : 8 );
|
||||
output( "\taddq $40,%%rsp\n" );
|
||||
output( "\tret\n" );
|
||||
break;
|
||||
|
|
|
|||
Loading…
Reference in New Issue