__setjmp14.S revision 1.5 1 /* $NetBSD: __setjmp14.S,v 1.5 2025/05/03 19:56:21 riastradh Exp $ */
2
3 /*
4 * Copyright (c) 2001 Wasabi Systems, Inc.
5 * All rights reserved.
6 *
7 * Written by Frank van der Linden for Wasabi Systems, Inc.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 * must display the following acknowledgement:
19 * This product includes software developed for the NetBSD Project by
20 * Wasabi Systems, Inc.
21 * 4. The name of Wasabi Systems, Inc. may not be used to endorse
22 * or promote products derived from this software without specific prior
23 * written permission.
24 *
25 * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
27 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
28 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL WASABI SYSTEMS, INC
29 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
30 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
31 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
32 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
33 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
34 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
35 * POSSIBILITY OF SUCH DAMAGE.
36 */
37
38
39 #include <machine/asm.h>
40 #include <machine/setjmp.h>
41
42 #if defined(LIBC_SCCS)
43 RCSID("$NetBSD: __setjmp14.S,v 1.5 2025/05/03 19:56:21 riastradh Exp $")
44 #endif
45
46 /*
47 * C library -- _setjmp, _longjmp
48 *
49 * longjmp(a,v)
50 * will generate a "return(v)" from the last call to
51 * setjmp(a)
52 * by restoring registers from the stack.
53 * The previous signal state is restored.
54 */
55
56 /*
57 * setjmp(jmp_buf env@rdi)
58 *
59 * ELF symbol: __setjmp14, because the size of jmp_buf changed on some
60 * platforms in 1.4.
61 */
62 ENTRY(__setjmp14)
63 /*
64 * Save the callee-saves registers: %rbx, %rbp, %r12-r15,
65 * plus %rsp and the return address on the stack since it
66 * will be overwritten if the caller makes any subroutine
67 * calls before longjmp.
68 */
69 movq (%rsp),%r11
70 movq %rbx,(_JB_RBX * 8)(%rdi)
71 movq %rbp,(_JB_RBP * 8)(%rdi)
72 movq %r12,(_JB_R12 * 8)(%rdi)
73 movq %r13,(_JB_R13 * 8)(%rdi)
74 movq %r14,(_JB_R14 * 8)(%rdi)
75 movq %r15,(_JB_R15 * 8)(%rdi)
76 movq %rsp,(_JB_RSP * 8)(%rdi)
77 movq %r11,(_JB_PC * 8)(%rdi)
78
79 leaq (_JB_SIGMASK * 8)(%rdi),%rdx /* oset@rdx */
80 xorl %edi,%edi /* how@edi := 0 (ignored) */
81 xorl %esi,%esi /* set@rsi := NULL */
82
83 call PIC_PLT(_C_LABEL(__sigprocmask14))
84 xorl %eax,%eax
85 ret
86 END(__setjmp14)
87
88 /*
89 * longjmp(jmp_buf env@rdi, int val@esi)
90 *
91 * ELF symbol: __longjmp14, because the size of jmp_buf changed on some
92 * platforms in 1.4
93 */
94 ENTRY(__longjmp14)
95 /*
96 * Restore the callee-saves registers: %rbx, %rbp, %r12-r15,
97 * plus %rsp and the return address on the stack.
98 */
99 movq (_JB_RBX * 8)(%rdi),%rbx
100 movq (_JB_RBP * 8)(%rdi),%rbp
101 movq (_JB_R12 * 8)(%rdi),%r12
102 movq (_JB_R13 * 8)(%rdi),%r13
103 movq (_JB_R14 * 8)(%rdi),%r14
104 movq (_JB_R15 * 8)(%rdi),%r15
105 movq (_JB_RSP * 8)(%rdi),%rsp
106 movq (_JB_PC * 8)(%rdi),%r11
107 movq %r11,0(%rsp)
108
109 /*
110 * Use pushq %rsi instead of pushl %esi in order to keep
111 * 16-byte stack alignment, even though we only care about the
112 * 32-bit int in esi.
113 */
114 pushq %rsi /* save val@esi */
115
116 leaq (_JB_SIGMASK * 8)(%rdi),%rsi /* set@rsi */
117 movl $3,%edi /* how@edi := SIG_SETMASK */
118 xorl %edx,%edx /* oset@rdx := NULL */
119
120 call PIC_PLT(_C_LABEL(__sigprocmask14))
121
122 popq %rax /* restore val@eax */
123
124 testl %eax,%eax /* val@eax == 0? */
125 jz 1f /* jump if val@eax == 0 */
126 ret /* return val@eax */
127 1: incl %eax /* val@eax := 1 */
128 ret /* return val@eax */
129 END(__longjmp14)
130