[thirdparty/gcc.git] / libphobos / libdruntime / config / x86 / switchcontext.S

/* i386 support code for fibers and multithreading.
   Copyright (C) 2019-2024 Free Software Foundation, Inc.

This file is part of GCC.

GCC is free software; you can redistribute it and/or modify it under
the terms of the GNU General Public License as published by the Free
Software Foundation; either version 3, or (at your option) any later
version.

GCC is distributed in the hope that it will be useful, but WITHOUT ANY
WARRANTY; without even the implied warranty of MERCHANTABILITY or
FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
for more details.

Under Section 7 of GPL version 3, you are granted additional
permissions described in the GCC Runtime Library Exception, version
3.1, as published by the Free Software Foundation.

You should have received a copy of the GNU General Public License and
a copy of the GCC Runtime Library Exception along with this program;
see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
<http://www.gnu.org/licenses/>.  */

#include "../common/threadasm.S"

/* NB: Generate the CET marker for -fcf-protection.  */
#ifdef __CET__
# include <cet.h>
#endif

#if !defined(__CET__)

# if defined(__ELF__)

#  if defined(__i386__)

    .text
    .globl CSYM(fiber_switchContext)
    .type CSYM(fiber_switchContext), @function
    .align 16
CSYM(fiber_switchContext):
    .cfi_startproc
    // save current stack state
    push %ebp
    mov  %esp, %ebp
    push %edi
    push %esi
    push %ebx
    push %eax

    // store oldp again with more accurate address
    mov 8(%ebp), %eax
    mov %esp, (%eax)
    // load newp to begin context switch
    mov 12(%ebp), %esp

    // load saved state from new stack
    pop %eax
    pop %ebx
    pop %esi
    pop %edi
    pop %ebp

    // 'return' to complete switch
    ret
    .cfi_endproc
    .size CSYM(fiber_switchContext),.-CSYM(fiber_switchContext)

#  endif /* defined(__ELF__) && defined(__i386__) */

#  if defined(__x86_64__) && !defined(__ILP32__)

    .text
    .globl CSYM(fiber_switchContext)
    .type CSYM(fiber_switchContext), @function
    .align 16
CSYM(fiber_switchContext):
    .cfi_startproc
    // Save current stack state.save current stack state
    push %rbp
    mov  %rsp, %rbp
    push %rbx
    push %r12
    push %r13
    push %r14
    push %r15

    // store oldp again with more accurate address
    mov %rsp, (%rdi)
    // load newp to begin context switch
    mov %rsi, %rsp

    // load saved state from new stack
    pop %r15
    pop %r14
    pop %r13
    pop %r12
    pop %rbx
    pop %rbp

    // 'return' to complete switch
    ret
    .cfi_endproc
   .size CSYM(fiber_switchContext),.-CSYM(fiber_switchContext)

#  endif /* defined(__ELF__) && defined(__x86_64__) && !defined(__ILP32__) */

# endif /* defined(__ELF__) */

# if defined(__MACH__)

#  if defined(__i386__)

    .text
    .globl CSYM(fiber_switchContext)
    .p2align 4
CSYM(fiber_switchContext):
LFB0:
    // save current stack state
    push %ebp
    mov  %esp, %ebp
    push %edi
    push %esi
    push %ebx
    push %eax

    // store oldp again with more accurate address
    mov 8(%ebp), %eax
    mov %esp, (%eax)
    // load newp to begin context switch
    mov 12(%ebp), %esp

    // load saved state from new stack
    pop %eax
    pop %ebx
    pop %esi
    pop %edi
    pop %ebp

    // 'return' to complete switch
    ret
LFE0:

/* CFI */
        .section __TEXT,__eh_frame,coalesced,no_toc+strip_static_syms+live_support
EH_frame1:
        .set L$set$0,LECIE1-LSCIE1
        .long L$set$0   # Length of Common Information Entry
LSCIE1:
        .long   0       # CIE Identifier Tag
        .byte   0x1     # CIE Version
        .ascii "zR\0"   # CIE Augmentation
        .byte   0x1     # uleb128 0x1; CIE Code Alignment Factor
        .byte   0x7c    # sleb128 -4; CIE Data Alignment Factor
        .byte   0x8     # CIE RA Column
        .byte   0x1     # uleb128 0x1; Augmentation size
        .byte   0x10    # FDE Encoding (pcrel)
        .byte   0xc     # DW_CFA_def_cfa
        .byte   0x5     # uleb128 0x5
        .byte   0x4     # uleb128 0x4
        .byte   0x88    # DW_CFA_offset, column 0x8
        .byte   0x1     # uleb128 0x1
        .p2align 2,0
LECIE1:

/* minimal FDE - does not record the stack frame changes. */
LSFDE1:
        .set L$set$1,LEFDE1-LASFDE1
        .long L$set$1   # FDE Length
LASFDE1:
        .long   LASFDE1-EH_frame1       # FDE CIE offset
        .long   LFB0-.  # FDE initial location
        .set L$set$2,LFE0-LFB0
        .long L$set$2   # FDE address range
        .byte   0       # uleb128 0; Augmentation size
        .p2align 2,0
LEFDE1:

#  endif /* defined(__MACH__) && defined(__i386__) */

#  if defined(__x86_64__) && !defined(__ILP32__)

    .text
    .globl CSYM(fiber_switchContext)
    .p2align 4
CSYM(fiber_switchContext):
LFB0:
    // Save current stack state.save current stack state
    push %rbp
    mov  %rsp, %rbp
    push %r15
    push %r14
    push %r13
    push %r12
    push %rbx

    // store oldp again with more accurate address
    mov %rsp, (%rdi)
    // load newp to begin context switch
    mov %rsi, %rsp

    // load saved state from new stack
    pop %rbx
    pop %r12
    pop %r13
    pop %r14
    pop %r15
    pop %rbp

    // 'return' to complete switch
    ret
LFE0:

/* CFI */
        .section __TEXT,__eh_frame,coalesced,no_toc+strip_static_syms+live_support
EH_frame1:
        .set L$set$0,LECIE1-LSCIE1
        .long L$set$0   # Length of Common Information Entry
LSCIE1:
        .long   0       # CIE Identifier Tag
        .byte   0x1     # CIE Version
        .ascii "zR\0"   # CIE Augmentation
        .byte   0x1     # uleb128 0x1; CIE Code Alignment Factor
        .byte   0x78    # sleb128 -8; CIE Data Alignment Factor
        .byte   0x10    # CIE RA Column
        .byte   0x1     # uleb128 0x1; Augmentation size
        .byte   0x10    # FDE Encoding (pcrel)
        .byte   0xc     # DW_CFA_def_cfa
        .byte   0x7     # uleb128 0x7
        .byte   0x8     # uleb128 0x8
        .byte   0x90    # DW_CFA_offset, column 0x10
        .byte   0x1     # uleb128 0x1
        .p2align 3,0
LECIE1:

/* minimal FDE - does not record the stack frame changes. */
LSFDE1:
        .set L$set$1,LEFDE1-LASFDE1
        .long L$set$1   # FDE Length
LASFDE1:
        .long   LASFDE1-EH_frame1       # FDE CIE offset
        .quad   LFB0-.  # FDE initial location
        .set L$set$2,LFE0-LFB0
        .quad L$set$2   # FDE address range
        .byte   0       # uleb128 0; Augmentation size
        .p2align 3,0
LEFDE1:

#  endif /* defined(__MACH__) && defined(__x86_64__) && !defined(__ILP32__) */

# endif /* defined (__MACH__) */

#endif /* !defined(__CET__) */
Commit	Line	Data
2493e718	1	/* i386 support code for fibers and multithreading.
a945c346	2	Copyright (C) 2019-2024 Free Software Foundation, Inc.
2493e718 IB	3
	4	This file is part of GCC.
	5
	6	GCC is free software; you can redistribute it and/or modify it under
	7	the terms of the GNU General Public License as published by the Free
	8	Software Foundation; either version 3, or (at your option) any later
	9	version.
	10
	11	GCC is distributed in the hope that it will be useful, but WITHOUT ANY
	12	WARRANTY; without even the implied warranty of MERCHANTABILITY or
	13	FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
	14	for more details.
	15
	16	Under Section 7 of GPL version 3, you are granted additional
	17	permissions described in the GCC Runtime Library Exception, version
	18	3.1, as published by the Free Software Foundation.
	19
	20	You should have received a copy of the GNU General Public License and
	21	a copy of the GCC Runtime Library Exception along with this program;
	22	see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
	23	<http://www.gnu.org/licenses/>. */
	24
	25	#include "../common/threadasm.S"
	26
c6632dc9 L	27	/* NB: Generate the CET marker for -fcf-protection. */
	28	#ifdef __CET__
	29	# include <cet.h>
	30	#endif
	31
6eae7549 IB	32	#if !defined(__CET__)
	33
	34	# if defined(__ELF__)
	35
	36	# if defined(__i386__)
2493e718 IB	37
	38	.text
	39	.globl CSYM(fiber_switchContext)
	40	.type CSYM(fiber_switchContext), @function
	41	.align 16
	42	CSYM(fiber_switchContext):
	43	.cfi_startproc
	44	// save current stack state
	45	push %ebp
	46	mov %esp, %ebp
	47	push %edi
	48	push %esi
	49	push %ebx
	50	push %eax
	51
	52	// store oldp again with more accurate address
	53	mov 8(%ebp), %eax
	54	mov %esp, (%eax)
	55	// load newp to begin context switch
	56	mov 12(%ebp), %esp
	57
	58	// load saved state from new stack
	59	pop %eax
	60	pop %ebx
	61	pop %esi
	62	pop %edi
	63	pop %ebp
	64
	65	// 'return' to complete switch
	66	ret
	67	.cfi_endproc
	68	.size CSYM(fiber_switchContext),.-CSYM(fiber_switchContext)
	69
6eae7549 IB	70	# endif /* defined(__ELF__) && defined(__i386__) */
	71
	72	# if defined(__x86_64__) && !defined(__ILP32__)
2493e718 IB	73
	74	.text
	75	.globl CSYM(fiber_switchContext)
	76	.type CSYM(fiber_switchContext), @function
	77	.align 16
	78	CSYM(fiber_switchContext):
	79	.cfi_startproc
	80	// Save current stack state.save current stack state
	81	push %rbp
	82	mov %rsp, %rbp
	83	push %rbx
	84	push %r12
	85	push %r13
	86	push %r14
	87	push %r15
	88
	89	// store oldp again with more accurate address
	90	mov %rsp, (%rdi)
	91	// load newp to begin context switch
	92	mov %rsi, %rsp
	93
	94	// load saved state from new stack
	95	pop %r15
	96	pop %r14
	97	pop %r13
	98	pop %r12
	99	pop %rbx
	100	pop %rbp
	101
	102	// 'return' to complete switch
	103	ret
	104	.cfi_endproc
	105	.size CSYM(fiber_switchContext),.-CSYM(fiber_switchContext)
	106
6eae7549 IB	107	# endif /* defined(__ELF__) && defined(__x86_64__) && !defined(__ILP32__) */
	108
	109	# endif /* defined(__ELF__) */
	110
	111	# if defined(__MACH__)
	112
	113	# if defined(__i386__)
	114
	115	.text
	116	.globl CSYM(fiber_switchContext)
	117	.p2align 4
	118	CSYM(fiber_switchContext):
	119	LFB0:
	120	// save current stack state
	121	push %ebp
	122	mov %esp, %ebp
	123	push %edi
	124	push %esi
	125	push %ebx
	126	push %eax
	127
	128	// store oldp again with more accurate address
	129	mov 8(%ebp), %eax
	130	mov %esp, (%eax)
	131	// load newp to begin context switch
	132	mov 12(%ebp), %esp
	133
	134	// load saved state from new stack
	135	pop %eax
	136	pop %ebx
	137	pop %esi
	138	pop %edi
	139	pop %ebp
	140
	141	// 'return' to complete switch
	142	ret
	143	LFE0:
	144
	145	/* CFI */
	146	.section __TEXT,__eh_frame,coalesced,no_toc+strip_static_syms+live_support
	147	EH_frame1:
	148	.set L$set$0,LECIE1-LSCIE1
	149	.long L$set$0 # Length of Common Information Entry
	150	LSCIE1:
	151	.long 0 # CIE Identifier Tag
	152	.byte 0x1 # CIE Version
	153	.ascii "zR\0" # CIE Augmentation
	154	.byte 0x1 # uleb128 0x1; CIE Code Alignment Factor
	155	.byte 0x7c # sleb128 -4; CIE Data Alignment Factor
	156	.byte 0x8 # CIE RA Column
	157	.byte 0x1 # uleb128 0x1; Augmentation size
	158	.byte 0x10 # FDE Encoding (pcrel)
	159	.byte 0xc # DW_CFA_def_cfa
	160	.byte 0x5 # uleb128 0x5
	161	.byte 0x4 # uleb128 0x4
	162	.byte 0x88 # DW_CFA_offset, column 0x8
	163	.byte 0x1 # uleb128 0x1
	164	.p2align 2,0
	165	LECIE1:
	166
	167	/* minimal FDE - does not record the stack frame changes. */
	168	LSFDE1:
	169	.set L$set$1,LEFDE1-LASFDE1
	170	.long L$set$1 # FDE Length
171	LASFDE1:
172	.long LASFDE1-EH_frame1 # FDE CIE offset
173	.long LFB0-. # FDE initial location
174	.set L$set$2,LFE0-LFB0
175	.long L$set$2 # FDE address range
176	.byte 0 # uleb128 0; Augmentation size
177	.p2align 2,0
178	LEFDE1:
179
180	# endif /* defined(__MACH__) && defined(__i386__) */
181
182	# if defined(__x86_64__) && !defined(__ILP32__)
183
184	.text
185	.globl CSYM(fiber_switchContext)
186	.p2align 4
187	CSYM(fiber_switchContext):
188	LFB0:
189	// Save current stack state.save current stack state
190	push %rbp
191	mov %rsp, %rbp
192	push %r15
193	push %r14
194	push %r13
195	push %r12
196	push %rbx
197
198	// store oldp again with more accurate address
199	mov %rsp, (%rdi)
200	// load newp to begin context switch
201	mov %rsi, %rsp
202
203	// load saved state from new stack
204	pop %rbx
205	pop %r12
206	pop %r13
207	pop %r14
208	pop %r15
209	pop %rbp
210
211	// 'return' to complete switch
212	ret
213	LFE0:
214
215	/* CFI */
216	.section __TEXT,__eh_frame,coalesced,no_toc+strip_static_syms+live_support
217	EH_frame1:
218	.set L$set$0,LECIE1-LSCIE1
219	.long L$set$0 # Length of Common Information Entry
220	LSCIE1:
221	.long 0 # CIE Identifier Tag
222	.byte 0x1 # CIE Version
223	.ascii "zR\0" # CIE Augmentation
224	.byte 0x1 # uleb128 0x1; CIE Code Alignment Factor
225	.byte 0x78 # sleb128 -8; CIE Data Alignment Factor
226	.byte 0x10 # CIE RA Column
227	.byte 0x1 # uleb128 0x1; Augmentation size
228	.byte 0x10 # FDE Encoding (pcrel)
229	.byte 0xc # DW_CFA_def_cfa
230	.byte 0x7 # uleb128 0x7
231	.byte 0x8 # uleb128 0x8
232	.byte 0x90 # DW_CFA_offset, column 0x10
233	.byte 0x1 # uleb128 0x1
234	.p2align 3,0
235	LECIE1:
236
237	/* minimal FDE - does not record the stack frame changes. */
238	LSFDE1:
239	.set L$set$1,LEFDE1-LASFDE1
240	.long L$set$1 # FDE Length
241	LASFDE1:
242	.long LASFDE1-EH_frame1 # FDE CIE offset
243	.quad LFB0-. # FDE initial location
244	.set L$set$2,LFE0-LFB0
245	.quad L$set$2 # FDE address range
246	.byte 0 # uleb128 0; Augmentation size
247	.p2align 3,0
248	LEFDE1:
249
250	# endif /* defined(__MACH__) && defined(__x86_64__) && !defined(__ILP32__) */
251
252	# endif /* defined (__MACH__) */
253
254	#endif /* !defined(__CET__) */