1/*-
2 * Copyright (c) 2002 Peter Grehan.
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26/*      $NetBSD: setjmp.S,v 1.3 1998/10/03 12:30:38 tsubai Exp $        */
27
28#include <machine/asm.h>
29__FBSDID("$FreeBSD$");
30
31#include <sys/syscall.h>
32
33/*
34 * C library -- setjmp, longjmp
35 *
36 *      longjmp(a,v)
37 * will generate a "return(v?v:1)" from the last call to
38 *      setjmp(a)
39 * by restoring registers from the stack.
40 * The previous signal state is restored.
41 *
42 * jmpbuf layout:
43 *     +------------+
44 *     |   unused   |
45 *     +------------+
46 *     | sig state  |
47 *     |            |
48 *     | (4 words)  |
49 *     |            |
50 *     +------------+
51 *     | saved regs |
52 *     |    ...     |
53 */
54
55ENTRY(setjmp)
56	mr	%r6,%r3
57	li	%r3,1			/* SIG_BLOCK, but doesn't matter */
58					/*            since set == NULL  */
59	li	%r4,0			/* set = NULL */
60	mr	%r5,%r6			/* &oset */
61	addi	%r5,%r5,4
62	li	%r0, SYS_sigprocmask	/*sigprocmask(SIG_BLOCK, NULL, &oset)*/
63	sc				/*assume no error       XXX */
64	mflr	%r11			/* r11 <- link reg */
65	mfcr	%r12			/* r12 <- condition reg */
66	mr	%r10,%r1		/* r10 <- stackptr */
67	mr	%r9,%r2			/*  r9 <- global ptr */
68
69	std	%r9,40 + 0*8(%r6)
70	std	%r10,40 + 1*8(%r6)
71	std	%r11,40 + 2*8(%r6)
72	std	%r12,40 + 3*8(%r6)
73	std	%r13,40 + 4*8(%r6)
74	std	%r14,40 + 5*8(%r6)
75	std	%r15,40 + 6*8(%r6)
76	std	%r16,40 + 7*8(%r6)
77	std	%r17,40 + 8*8(%r6)
78	std	%r18,40 + 9*8(%r6)
79	std	%r19,40 + 10*8(%r6)
80	std	%r20,40 + 11*8(%r6)
81	std	%r21,40 + 12*8(%r6)
82	std	%r22,40 + 13*8(%r6)
83	std	%r23,40 + 14*8(%r6)
84	std	%r24,40 + 15*8(%r6)
85	std	%r25,40 + 16*8(%r6)
86	std	%r26,40 + 17*8(%r6)
87	std	%r27,40 + 18*8(%r6)
88	std	%r28,40 + 19*8(%r6)
89	std	%r29,40 + 20*8(%r6)
90	std	%r30,40 + 21*8(%r6)
91	std	%r31,40 + 22*8(%r6)
92
93	li	%r3,0			/* return (0) */
94	blr
95
96	.weak CNAME(longjmp)
97	.set CNAME(longjmp),CNAME(__longjmp)
98	.weak CNAME(.longjmp)
99	.set CNAME(.longjmp),CNAME(.__longjmp)
100ENTRY(__longjmp)
101	ld	%r9,40 + 0*8(%r3)
102	ld	%r10,40 + 1*8(%r3)
103	ld	%r11,40 + 2*8(%r3)
104	ld	%r12,40 + 3*8(%r3)
105	ld	%r14,40 + 5*8(%r3)
106	ld	%r15,40 + 6*8(%r3)
107	ld	%r16,40 + 7*8(%r3)
108	ld	%r17,40 + 8*8(%r3)
109	ld	%r18,40 + 9*8(%r3)
110	ld	%r19,40 + 10*8(%r3)
111	ld	%r20,40 + 11*8(%r3)
112	ld	%r21,40 + 12*8(%r3)
113	ld	%r22,40 + 13*8(%r3)
114	ld	%r23,40 + 14*8(%r3)
115	ld	%r24,40 + 15*8(%r3)
116	ld	%r25,40 + 16*8(%r3)
117	ld	%r26,40 + 17*8(%r3)
118	ld	%r27,40 + 18*8(%r3)
119	ld	%r28,40 + 19*8(%r3)
120	ld	%r29,40 + 20*8(%r3)
121	ld	%r30,40 + 21*8(%r3)
122	ld	%r31,40 + 22*8(%r3)
123	mr	%r6,%r4			/* save val param */
124	mtlr	%r11			/* r11 -> link reg */
125	mtcr	%r12			/* r12 -> condition reg */
126	mr	%r2,%r9			/* r9  -> global ptr */
127	mr	%r1,%r10		/* r10 -> stackptr */
128	mr	%r4,%r3
129	li	%r3,3			/* SIG_SETMASK */
130	addi	%r4,%r4,4		/* &set */
131	li	%r5,0			/* oset = NULL */
132	li	%r0,SYS_sigprocmask	/* sigprocmask(SIG_SET, &set, NULL) */
133	sc                              /* assume no error       XXX */
134	or.	%r3,%r6,%r6
135	bnelr
136	li	%r3,1
137	blr
138
139	.section .note.GNU-stack,"",%progbits
140