/*
* Copyright (c) 2008-2021 Jonathan Schleifer <js@nil.im>
*
* All rights reserved.
*
* This file is part of ObjFW. It may be distributed under the terms of the
* Q Public License 1.0, which can be found in the file LICENSE.QPL included in
* the packaging of this file.
*
* Alternatively, it may be distributed under the terms of the GNU General
* Public License, either version 2 or 3, which can be found in the file
* LICENSE.GPLv2 or LICENSE.GPLv3 respectively included in the packaging of this
* file.
*/
#include "config.h"
#include "invoke-x86_64.h"
.intel_syntax noprefix
.globl of_invocation_call
.section .text
of_invocation_call:
pushq rbp
mov rbp, rsp
sub rsp, 16
and rsp, -16
mov [rbp-8], rdi
mov r11b, [rdi+OFFSET_RETURN_TYPE]
cmp r11b, RETURN_TYPE_STRET
je short .Llookup_stret
cmp r11b, RETURN_TYPE_JMP_STRET
je short .Llookup_stret
mov rsi, [rdi+OFFSET_GPR_IN+8]
mov rdi, [rdi+OFFSET_GPR_IN]
call objc_msg_lookup@PLT
.Lafter_lookup:
mov [rbp-16], rax
mov rdi, [rbp-8]
lea rdx, [rdi+OFFSET_STACK]
mov rcx, [rdi+OFFSET_STACK_SIZE]
test rcx, 1
jnz short .Lfix_align
.Lfill_stack:
test rcx, rcx
jz short .Lstack_filled
dec rcx
mov r11, [rdx+rcx*8]
push r11
jmp short .Lfill_stack
.Lstack_filled:
mov al, [rdi+OFFSET_NUM_SSE_USED]
movaps xmm7, [rdi+OFFSET_SSE_INOUT+112]
movaps xmm6, [rdi+OFFSET_SSE_INOUT+96]
movaps xmm5, [rdi+OFFSET_SSE_INOUT+80]
movaps xmm4, [rdi+OFFSET_SSE_INOUT+64]
movaps xmm3, [rdi+OFFSET_SSE_INOUT+48]
movaps xmm2, [rdi+OFFSET_SSE_INOUT+32]
movaps xmm1, [rdi+OFFSET_SSE_INOUT+16]
movaps xmm0, [rdi+OFFSET_SSE_INOUT]
mov r9, [rdi+OFFSET_GPR_IN+40]
mov r8, [rdi+OFFSET_GPR_IN+32]
mov rcx, [rdi+OFFSET_GPR_IN+24]
mov rdx, [rdi+OFFSET_GPR_IN+16]
mov rsi, [rdi+OFFSET_GPR_IN+8]
mov r11b, [rdi+OFFSET_RETURN_TYPE]
mov rdi, [rdi+OFFSET_GPR_IN]
cmp r11b, RETURN_TYPE_JMP
je short .Ljmp_into_method
cmp r11b, RETURN_TYPE_JMP_STRET
je short .Ljmp_into_method
mov r11, [rbp-16]
call r11
.Lafter_send:
mov rdi, [rbp-8]
mov [rdi+OFFSET_GPR_OUT], rax
mov [rdi+OFFSET_GPR_OUT+8], rdx
movaps [rdi+OFFSET_SSE_INOUT], xmm0
movaps [rdi+OFFSET_SSE_INOUT+16], xmm1
mov r11b, [rdi+OFFSET_RETURN_TYPE]
cmp r11b, RETURN_TYPE_X87
je short .Lpop_long_double
cmp r11b, RETURN_TYPE_COMPLEX_X87
je short .Lpop_complex_long_double
.Lreturn:
mov rsp, rbp
pop rbp
ret
.Lfix_align:
xor r11, r11
push r11
jmp short .Lfill_stack
.Llookup_stret:
mov rsi, [rdi+OFFSET_GPR_IN+16]
mov rdi, [rdi+OFFSET_GPR_IN+8]
call objc_msg_lookup_stret@PLT
jmp short .Lafter_lookup
.Ljmp_into_method:
mov r11, [rbp-16]
jmp r11
.Lpop_long_double:
fstp tbyte ptr [rdi+OFFSET_X87_OUT]
jmp short .Lreturn
.Lpop_complex_long_double:
fstp tbyte ptr [rdi+OFFSET_X87_OUT]
fstp tbyte ptr [rdi+OFFSET_X87_OUT+16]
jmp short .Lreturn
#ifdef OF_LINUX
.section .note.GNU-stack, "", %progbits
#endif