summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorMiod Vallat <miod@cvs.openbsd.org>2003-08-01 07:41:36 +0000
committerMiod Vallat <miod@cvs.openbsd.org>2003-08-01 07:41:36 +0000
commit73eef6ca62430088ffd97b809a4a5aec3dc5299b (patch)
tree10a115d1bd4af7960d48e9d7e3d491c7c26f3627 /lib
parent7dffa371e27308374f15c1f63d11bef582a20f4c (diff)
Fix the *longjmp() behaviour - it is legal to reuse a jmp_buf several times.
Gets us a working perl 5.8.
Diffstat (limited to 'lib')
-rw-r--r--lib/libc/arch/m88k/gen/_setjmp.S17
-rw-r--r--lib/libc/arch/m88k/gen/setjmp.S17
-rw-r--r--lib/libc/arch/m88k/gen/sigsetjmp.S17
3 files changed, 15 insertions, 36 deletions
diff --git a/lib/libc/arch/m88k/gen/_setjmp.S b/lib/libc/arch/m88k/gen/_setjmp.S
index 393b3aefe09..d9de6a563ed 100644
--- a/lib/libc/arch/m88k/gen/_setjmp.S
+++ b/lib/libc/arch/m88k/gen/_setjmp.S
@@ -30,7 +30,7 @@
#if defined(LIBC_SCCS)
.data
- .string "$OpenBSD: _setjmp.S,v 1.5 2003/01/07 22:01:29 miod Exp $"
+ .string "$OpenBSD: _setjmp.S,v 1.6 2003/08/01 07:41:35 miod Exp $"
#endif /* LIBC_SCCS */
#include "SYS.h"
@@ -47,14 +47,13 @@
* or restored.
*
* For m88k, we define our jmp_buf length
- * to be the size of 22 longs. <machine/setjmp.h>
+ * to be the size of 21 longs. <machine/setjmp.h>
* The buffer's usage is as follows:
*
* jmp_buf[0] return address
* jmp_buf[1] signal set (if used)
* jmp_buf[2 to 19] r14 to r31
- * jmp_buf[20] 'used' flag
- * jmp_buf[21] setjmp type
+ * jmp_buf[20] setjmp type
*
*/
@@ -86,10 +85,9 @@ ENTRY(_setjmp)
st r29,r2,68
st r30,r2,72
st r31,r2,76
- st r0,r2,80 /* mark environment as NOT returned (0x0) */
or r4,r0,0 /* clear r4 */
or r4,r0,U_SETJMP_SIG /* r4 now contains setjmp type */
- st r4,r2,84 /* setjmp type to _setjmp */
+ st r4,r2,80 /* setjmp type to _setjmp */
jmp.n r1 /* return 0 */
or r2,r0,0
@@ -99,10 +97,7 @@ void _longjmp(jmp_buf env, int val);
ENTRY(_longjmp)
cmp r4,r2,r0 /* check for bad environment buffer address. */
bb1 eq,r4,2f /* if == 0, abort. */
- ld r4,r2,80 /* check if environment buffer has */
- cmp r4,r4,r0 /* already returned. */
- bb1 ne,r4,2f /* if != 0, abort. */
- ld r4,r2,84 /* check setjmp type. */
+ ld r4,r2,80 /* check setjmp type. */
cmp r4,r4,U_SETJMP_SIG /* should be U_SETJMP_SIG */
bb1 ne,r4,2f /* if != U_SETJMP_SIG, abort. */
@@ -124,8 +119,6 @@ ENTRY(_longjmp)
ld r29,r2,68
ld r30,r2,72
ld r31,r2,76
- or r4,r0,1
- st r4,r2,80 /* mark environment buffer as returned */
ld r1,r2,0 /* restore r1 */
bcnd.n ne0,r3,1f
or r2,r3,r0
diff --git a/lib/libc/arch/m88k/gen/setjmp.S b/lib/libc/arch/m88k/gen/setjmp.S
index d8a3cb4f36f..7227c0f89fb 100644
--- a/lib/libc/arch/m88k/gen/setjmp.S
+++ b/lib/libc/arch/m88k/gen/setjmp.S
@@ -30,7 +30,7 @@
#if defined(LIBC_SCCS)
.data
- .string "$OpenBSD: setjmp.S,v 1.5 2003/01/07 22:01:29 miod Exp $"
+ .string "$OpenBSD: setjmp.S,v 1.6 2003/08/01 07:41:35 miod Exp $"
#endif /* LIBC_SCCS */
#include "SYS.h"
@@ -46,14 +46,13 @@
* and a struct sigcontext, see <signal.h>
*
* For m88k, we define our jmp_buf length
- * to be the size of 22 longs. <machine/setjmp.h>
+ * to be the size of 21 longs. <machine/setjmp.h>
* The buffer's usage is as follows:
*
* jmp_buf[0] return address
* jmp_buf[1] signal set (if used)
* jmp_buf[2 to 19] r14 to r31
- * jmp_buf[20] 'used' flag
- * jmp_buf[21] setjmp type
+ * jmp_buf[20] setjmp type
*
*/
@@ -84,10 +83,9 @@ ENTRY(setjmp)
st r29,r2,68
st r30,r2,72
st r31,r2,76
- st r0,r2,80 /* mark environment as NOT returned (0x0) */
or r4,r0,0 /* clear r4 */
or r4,r0,SETJMP_SIG /* r4 now contains setjmp type */
- st r4,r2,84 /* setjmp type to _setjmp */
+ st r4,r2,80 /* setjmp type to _setjmp */
or r15,r1,0 /* store return address in r15 */
or r14,r2,0 /* store address of env in r14 */
bsr.n _C_LABEL(sigblock) /* r2 = sigblock(0) */
@@ -102,10 +100,7 @@ void longjmp(jmp_buf env, int retval);
ENTRY(longjmp)
cmp r4,r2,r0 /* check for bad environment buffer address. */
bb1 eq,r4,2f /* if == 0, abort. */
- ld r4,r2,80 /* check if environment buffer has */
- cmp r4,r4,r0 /* already returned. */
- bb1 ne,r4,2f /* if != 0, abort. */
- ld r4,r2,84 /* check setjmp type. */
+ ld r4,r2,80 /* check setjmp type. */
cmp r4,r4,SETJMP_SIG /* should be SETJMP_SIG */
bb1 ne,r4,2f /* if != SETJMP_SIG, abort. */
@@ -135,8 +130,6 @@ ENTRY(longjmp)
ld r3,r31,28 /* restore r3 from stack */
ld r30,r2,72 /* restore r30 */
ld r31,r2,76 /* restore r31 (sp)*/
- or r4,r0,1
- st r4,r2,80 /* mark environment buffer as returned */
ld r1,r2,0 /* restore r1 */
bcnd.n ne0,r3,1f
or r2,r3,r0
diff --git a/lib/libc/arch/m88k/gen/sigsetjmp.S b/lib/libc/arch/m88k/gen/sigsetjmp.S
index 87a6649b5eb..85285e7422e 100644
--- a/lib/libc/arch/m88k/gen/sigsetjmp.S
+++ b/lib/libc/arch/m88k/gen/sigsetjmp.S
@@ -30,7 +30,7 @@
#if defined(LIBC_SCCS)
.data
- .string "$OpenBSD: sigsetjmp.S,v 1.5 2003/01/07 22:01:29 miod Exp $"
+ .string "$OpenBSD: sigsetjmp.S,v 1.6 2003/08/01 07:41:35 miod Exp $"
#endif /* LIBC_SCCS */
#include "SYS.h"
@@ -46,14 +46,13 @@
* The previous signal state is restored if 'm' was non-zero.
*
* For m88k, we define our jmp_buf length
- * to be the size of 22 longs. <machine/setjmp.h>
+ * to be the size of 21 longs. <machine/setjmp.h>
* The buffer's usage is as follows:
*
* jmp_buf[0] return address
* jmp_buf[1] signal set (if used)
* jmp_buf[2 to 19] r14 to r31
- * jmp_buf[20] 'used' flag
- * jmp_buf[21] setjmp type
+ * jmp_buf[20] setjmp type
*
*/
@@ -84,10 +83,9 @@ ENTRY(sigsetjmp)
st r29,r2,68
st r30,r2,72
st r31,r2,76
- st r0,r2,80 /* mark environment as NOT returned (0x0) */
or r4,r0,0 /* clear r4 */
or r4,r0,SIGSETJMP_SIG /* r4 now contains setjmp type */
- st r4,r2,84 /* setjmp type to _setjmp */
+ st r4,r2,80 /* setjmp type to _setjmp */
or r15,r1,0 /* store return address in r15 */
or r14,r2,0 /* store address of env in r14 */
@@ -109,10 +107,7 @@ void siglongjmp(sigjmp_buf env, int val);
ENTRY(siglongjmp)
cmp r4,r2,r0 /* check for bad environment buffer address. */
bb1 eq,r4,3f /* if == 0, abort. */
- ld r4,r2,80 /* check if environment buffer has */
- cmp r4,r4,r0 /* already returned. */
- bb1 ne,r4,3f /* if != 0, abort. */
- ld r4,r2,84 /* check setjmp type. */
+ ld r4,r2,80 /* check setjmp type. */
cmp r4,r4,SIGSETJMP_SIG /* should be SIGSETJMP_SIG */
bb1 ne,r4,3f /* if != SIGSETJMP_SIG, abort. */
@@ -146,8 +141,6 @@ ENTRY(siglongjmp)
ld r3,r31,28 /* restore r3 from stack */
1: ld r30,r2,72 /* restore r30 */
ld r31,r2,76 /* restore r31 (sp)*/
- or r4,r0,1
- st r4,r2,80 /* mark environment buffer as returned */
ld r1,r2,0 /* restore r1 */
bcnd.n ne0,r3,3f
or r2,r3,r0