adding (weak definitions to) stubs for some of the pthread functions. If the threads library is linked in, the real pthread functions will pulled in. Use the following convention for system calls wrapped by the threads library: __sys_foo - actual system call _foo - weak definition to __sys_foo foo - weak definition to __sys_foo Change all libc uses of system calls wrapped by the threads library from foo to _foo. In order to define the prototypes for _foo(), we introduce namespace.h and un-namespace.h (suggested by bde). All files that need to reference these system calls, should include namespace.h before any standard includes, then include un-namespace.h after the standard includes and before any local includes. <db.h> is an exception and shouldn't be included in between namespace.h and un-namespace.h namespace.h will define foo to _foo, and un-namespace.h will undefine foo. Try to eliminate some of the recursive calls to MT-safe functions in libc/stdio in preparation for adding a mutex to FILE. We have recursive mutexes, but would like to avoid using them if possible. Remove uneeded includes of <errno.h> from a few files. Add $FreeBSD$ to a few files in order to pass commitprep. Approved by: -arch
129 lines
3.7 KiB
ArmAsm
129 lines
3.7 KiB
ArmAsm
/* $NetBSD: setjmp.S,v 1.3 1997/12/05 02:06:27 thorpej Exp $ */
|
|
|
|
/*
|
|
* Copyright (c) 1994, 1995 Carnegie-Mellon University.
|
|
* All rights reserved.
|
|
*
|
|
* Author: Chris G. Demetriou
|
|
*
|
|
* Permission to use, copy, modify and distribute this software and
|
|
* its documentation is hereby granted, provided that both the copyright
|
|
* notice and this permission notice appear in all copies of the
|
|
* software, derivative works or modified versions, and any portions
|
|
* thereof, and that both notices appear in supporting documentation.
|
|
*
|
|
* CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
|
|
* CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
|
|
* FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
|
|
*
|
|
* Carnegie Mellon requests users of this software to return to
|
|
*
|
|
* Software Distribution Coordinator or Software.Distribution@CS.CMU.EDU
|
|
* School of Computer Science
|
|
* Carnegie Mellon University
|
|
* Pittsburgh PA 15213-3890
|
|
*
|
|
* any improvements or extensions that they make and grant Carnegie the
|
|
* rights to redistribute these changes.
|
|
*
|
|
* $FreeBSD$
|
|
*/
|
|
|
|
#include "SYS.h"
|
|
|
|
/*
|
|
* C library -- setjmp, longjmp
|
|
*
|
|
* longjmp(a,v)
|
|
* will generate a "return(v)" from
|
|
* the last call to
|
|
* setjmp(a)
|
|
* by restoring registers from the stack,
|
|
* and the previous signal state.
|
|
*/
|
|
|
|
.set noreorder
|
|
|
|
LEAF(setjmp, 1)
|
|
LDGP(pv)
|
|
stq ra, (2 * 8)(a0) /* sc_pc = return address */
|
|
stq s0, (( 9 + 4) * 8)(a0) /* saved bits of sc_regs */
|
|
stq s1, ((10 + 4) * 8)(a0)
|
|
stq s2, ((11 + 4) * 8)(a0)
|
|
stq s3, ((12 + 4) * 8)(a0)
|
|
stq s4, ((13 + 4) * 8)(a0)
|
|
stq s5, ((14 + 4) * 8)(a0)
|
|
stq s6, ((15 + 4) * 8)(a0)
|
|
stq ra, ((26 + 4) * 8)(a0)
|
|
stq sp, ((30 + 4) * 8)(a0)
|
|
|
|
/*
|
|
* get signal information
|
|
*/
|
|
mov a0, s0 /* squirrel away ptr to sc */
|
|
|
|
/* see what's blocked */
|
|
lda a2, (71 * 8)(a0) /* oset: sc_reserved */
|
|
mov zero, a1 /* set: NULL */
|
|
addq a1, 1, a0 /* how: SIG_BLOCK */
|
|
CALL(_sigprocmask) /* see what's blocked */
|
|
|
|
lda sp, -24(sp) /* sizeof struct sigaltstack */
|
|
mov zero, a0
|
|
mov sp, a1
|
|
CALL(_sigaltstack)
|
|
ldl t0, 16(sp) /* offset of ss_flags */
|
|
lda sp, 24(sp) /* sizeof struct sigaltstack */
|
|
ldq ra, ((26 + 4) * 8)(s0) /* restore return address */
|
|
blt v0, botch /* check for error */
|
|
and t0, 0x1, t0 /* get SA_ONSTACK flag */
|
|
stq t0, (0 * 8)(s0) /* and save it in sc_onstack */
|
|
/*
|
|
* Restore old s0 and a0, and continue saving registers
|
|
*/
|
|
mov s0, a0
|
|
ldq s0, (( 9 + 4) * 8)(a0)
|
|
|
|
ldiq t0, 0xacedbade /* sigcontext magic number */
|
|
stq t0, ((31 + 4) * 8)(a0) /* magic in sc_regs[31] */
|
|
/* Too bad we can't check if we actually used FP */
|
|
ldiq t0, 1
|
|
stq t0, (36 * 8)(a0) /* say we've used FP. */
|
|
stt fs0, ((2 + 37) * 8)(a0) /* saved bits of sc_fpregs */
|
|
stt fs1, ((3 + 37) * 8)(a0)
|
|
stt fs2, ((4 + 37) * 8)(a0)
|
|
stt fs3, ((5 + 37) * 8)(a0)
|
|
stt fs4, ((6 + 37) * 8)(a0)
|
|
stt fs5, ((7 + 37) * 8)(a0)
|
|
stt fs6, ((8 + 37) * 8)(a0)
|
|
stt fs7, ((9 + 37) * 8)(a0)
|
|
mf_fpcr ft0 /* get FP control reg */
|
|
stt ft0, (69 * 8)(a0) /* and store it in sc_fpcr */
|
|
stq zero, (70 * 8)(a0) /* FP software control XXX */
|
|
stq zero, (71 * 8)(a0) /* sc_reserved[0] */
|
|
stq zero, (72 * 8)(a0) /* sc_reserved[1] */
|
|
stq zero, (73 * 8)(a0) /* sc_xxx[0] */
|
|
stq zero, (74 * 8)(a0) /* sc_xxx[1] */
|
|
stq zero, (75 * 8)(a0) /* sc_xxx[2] */
|
|
stq zero, (76 * 8)(a0) /* sc_xxx[3] */
|
|
stq zero, (77 * 8)(a0) /* sc_xxx[4] */
|
|
stq zero, (78 * 8)(a0) /* sc_xxx[5] */
|
|
stq zero, (79 * 8)(a0) /* sc_xxx[6] */
|
|
stq zero, (80 * 8)(a0) /* sc_xxx[7] */
|
|
|
|
mov zero, v0 /* return zero */
|
|
RET
|
|
END(setjmp)
|
|
|
|
XLEAF(longjmp, 2)
|
|
LEAF(__longjmp, 2)
|
|
LDGP(pv)
|
|
stq a1, (( 0 + 4) * 8)(a0) /* save return value */
|
|
CALL(_sigreturn) /* use sigreturn to return */
|
|
|
|
botch:
|
|
CALL(longjmperror)
|
|
CALL(abort)
|
|
RET /* "can't" get here... */
|
|
END(__longjmp)
|