1/*	$NetBSD: setjmp.S,v 1.14 2023/10/11 09:12:21 skrll Exp $	*/
2
3/*
4 * Copyright (c) 1992, 1993
5 *	The Regents of the University of California.  All rights reserved.
6 *
7 * This software was developed by the Computer Systems Engineering group
8 * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
9 * contributed to Berkeley.
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 *    notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 *    notice, this list of conditions and the following disclaimer in the
18 *    documentation and/or other materials provided with the distribution.
19 * 3. Neither the name of the University nor the names of its contributors
20 *    may be used to endorse or promote products derived from this software
21 *    without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 *
35 * from: Header: setjmp.s,v 1.2 92/06/25 03:18:43 torek Exp
36 */
37
38#include <machine/asm.h>
39#if defined(LIBC_SCCS) && !defined(lint)
40#if 0
41	.asciz "@(#)setjmp.s	8.1 (Berkeley) 6/4/93"
42#else
43	RCSID("$NetBSD: setjmp.S,v 1.14 2023/10/11 09:12:21 skrll Exp $")
44#endif
45#endif /* LIBC_SCCS and not lint */
46
47/*
48 * C library -- setjmp, longjmp
49 *
50 *	longjmp(a,v)
51 * will generate a "return(v)" from
52 * the last call to
53 *	setjmp(a)
54 * by restoring registers from the stack,
55 * and a struct sigcontext, see <signal.h>
56 */
57
58#include "SYS.h"
59#include "assym.h"
60
61ENTRY(__setjmp14)
62	save	%sp, -CCFSZ, %sp
63	/*
64	 * local vars on stack: struct sigstack foo @ offset 0x48
65	 * Note: sc_g1 is not used; sc_o0 is set in longjmp()
66	 */
67	mov	0, %o0		/* 0 - is ignored */
68	add	%i0, 32, %o2	/* build sigcontext sc.sc_mask */
69	call	_C_LABEL(__sigprocmask14)
70	 clr	%o1		/* sigprocmask(0, NULL, &sc.sc_mask) */
71
72	add	%sp, 0x48, %o1	/* (foo being in arg dump area) */
73	call	_C_LABEL(__sigaltstack14)
74	 clr	%o0		/* sigstack(NULL, &foo) */
75
76	ld	[%sp + 0x48 + 8], %o0	/* foo.ss_flags */
77	and	%o0, 1, %o1	/* onstack = foo.ss_flags & 1; */
78	st	%o1, [%i0 + _SC_ONSTACK] /* sc.sc_onstack = current onstack; */
79	st	%fp, [%i0 + _SC_SP]	/* sc.sc_sp = (caller's) sp */
80	add	%i7, 8, %o0
81	st	%o0, [%i0 + _SC_PC]	/* sc.sc_pc = return_pc */
82	st	%g3, [%i0 + _SC_NPC]	/* sc.sc_npc */
83	st	%g0, [%i0 + _SC_PSR]	/* sc.sc_psr = (clean psr) */
84	st	%g2, [%i0 + _SC_G1]
85	st	%g4, [%i0 + _SIZEOF_SC + _JB_G4]
86	st	%g7, [%i0 + _SIZEOF_SC + _JB_G7]
87	ret			/* return 0 */
88	 restore	%g0, %g0, %o0
89
90