Remove the ancient, crufty non-UCONTEXT system-dependent LWP code.
Using it required manual hackery since 4.3.0, and it hasn't been missed.
This commit is contained in:
parent
015d8d933b
commit
62c8eea544
7 changed files with 5 additions and 589 deletions
1
Make.mk
1
Make.mk
|
|
@ -95,7 +95,6 @@ acdist := aclocal.m4 config.h.in configure stamp-h.in
|
||||||
acdistcli := $(addprefix src/client/, aclocal.m4 config.h.in configure)
|
acdistcli := $(addprefix src/client/, aclocal.m4 config.h.in configure)
|
||||||
# Object files:
|
# Object files:
|
||||||
obj := $(csrc:.c=.o) $(filter %.o, $(ac:.c=.o))
|
obj := $(csrc:.c=.o) $(filter %.o, $(ac:.c=.o))
|
||||||
# TODO AIX needs lwpInit.o lwpRestore.o lwpSave.o unless UCONTEXT
|
|
||||||
# Dependencies:
|
# Dependencies:
|
||||||
deps := $(obj:.o=.d)
|
deps := $(obj:.o=.d)
|
||||||
# Library archives:
|
# Library archives:
|
||||||
|
|
|
||||||
|
|
@ -132,8 +132,7 @@ fi
|
||||||
AC_SUBST(empthread)
|
AC_SUBST(empthread)
|
||||||
AC_MSG_NOTICE([Using $empthread threads])
|
AC_MSG_NOTICE([Using $empthread threads])
|
||||||
case $empthread in
|
case $empthread in
|
||||||
LWP) AC_DEFINE([EMPTH_LWP], 1, [Define to use LWP threads])
|
LWP) AC_DEFINE([EMPTH_LWP], 1, [Define to use LWP threads]) ;;
|
||||||
AC_DEFINE([UCONTEXT], 1, [Define to make LWP use makecontext()]) ;;
|
|
||||||
POSIX) AC_DEFINE([EMPTH_POSIX], 1, [Define to use POSIX threads]) ;;
|
POSIX) AC_DEFINE([EMPTH_POSIX], 1, [Define to use POSIX threads]) ;;
|
||||||
Windows) AC_DEFINE([EMPTH_W32], 1, [Define to use Windows threads]) ;;
|
Windows) AC_DEFINE([EMPTH_W32], 1, [Define to use Windows threads]) ;;
|
||||||
esac
|
esac
|
||||||
|
|
|
||||||
|
|
@ -31,7 +31,7 @@
|
||||||
* Known contributors to this file:
|
* Known contributors to this file:
|
||||||
* Dave Pare, 1994
|
* Dave Pare, 1994
|
||||||
* Steve McClure, 1994-2000
|
* Steve McClure, 1994-2000
|
||||||
* Markus Armbruster, 2004-2006
|
* Markus Armbruster, 2004-2007
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include <config.h>
|
#include <config.h>
|
||||||
|
|
@ -41,17 +41,9 @@
|
||||||
#include "lwpint.h"
|
#include "lwpint.h"
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Implement machine-dependent functions lwpNewContext(),
|
* Historically, this was implemented by abusing setjmp() and
|
||||||
* lwpSwitchContext().
|
* longjump(), which required a fair amount of system-dependent and
|
||||||
*/
|
* fragile hackery. We now use POSIX ucontext.h.
|
||||||
|
|
||||||
|
|
||||||
#if defined UCONTEXT
|
|
||||||
|
|
||||||
/*
|
|
||||||
* Alternate aproach using setcontext and getcontext instead of setjmp
|
|
||||||
* and longjump. This should work on any SVr4 machine independant of
|
|
||||||
* architecture.
|
|
||||||
*/
|
*/
|
||||||
|
|
||||||
int
|
int
|
||||||
|
|
@ -106,365 +98,3 @@ lwpSwitchContext(struct lwpProc *oldp, struct lwpProc *nextp)
|
||||||
abort();
|
abort();
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
#else /* !UCONTEXT */
|
|
||||||
|
|
||||||
/*
|
|
||||||
* If lwpSave() and lwpRestore() are #def'd to setjmp() and longjmp(),
|
|
||||||
* then lwpInitContext() needs to set up the jmp_buf for a longjmp(),
|
|
||||||
* similar to setjmp(). To figure that out for another machine, check
|
|
||||||
* their source or reverse engineer.
|
|
||||||
*/
|
|
||||||
|
|
||||||
#if defined(hpc)
|
|
||||||
|
|
||||||
#define STKALIGN 64
|
|
||||||
|
|
||||||
static struct lwpProc *tempcontext;
|
|
||||||
static struct lwpProc *initcontext = NULL;
|
|
||||||
static int startpoint;
|
|
||||||
|
|
||||||
static void
|
|
||||||
startcontext(void)
|
|
||||||
{
|
|
||||||
int space[10000];
|
|
||||||
int x;
|
|
||||||
|
|
||||||
startpoint = (void *)&x;
|
|
||||||
if (!setjmp(initcontext->context))
|
|
||||||
longjmp(tempcontext->context, 1);
|
|
||||||
|
|
||||||
if (!setjmp(tempcontext->context))
|
|
||||||
longjmp(LwpCurrent->context, 1);
|
|
||||||
|
|
||||||
lwpEntryPoint();
|
|
||||||
}
|
|
||||||
|
|
||||||
static void
|
|
||||||
lwpInitContext(struct lwpProc *newp, void *sp)
|
|
||||||
{
|
|
||||||
struct lwpProc holder;
|
|
||||||
int endpoint;
|
|
||||||
|
|
||||||
if (initcontext == NULL) {
|
|
||||||
initcontext = malloc(sizeof(struct lwpProc));
|
|
||||||
tempcontext = &holder;
|
|
||||||
if (!setjmp(tempcontext->context))
|
|
||||||
startcontext();
|
|
||||||
}
|
|
||||||
|
|
||||||
tempcontext = newp;
|
|
||||||
endpoint = &endpoint;
|
|
||||||
if (endpoint < startpoint) {
|
|
||||||
if (!setjmp(LwpCurrent->context))
|
|
||||||
longjmp(initcontext->context, 1);
|
|
||||||
} else {
|
|
||||||
LwpCurrent->size = endpoint - startpoint;
|
|
||||||
LwpCurrent->sbtm = realloc(LwpCurrent->sbtm, LwpCurrent->size);
|
|
||||||
memcpy(LwpCurrent->sbtm, startpoint, LwpCurrent->size);
|
|
||||||
if (!setjmp(LwpCurrent->context))
|
|
||||||
longjmp(initcontext->context, 1);
|
|
||||||
memcpy(startpoint, LwpCurrent->sbtm, LwpCurrent->size);
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
static int
|
|
||||||
lwpSave(jmp_buf jb)
|
|
||||||
{
|
|
||||||
int endpoint;
|
|
||||||
|
|
||||||
endpoint = &endpoint;
|
|
||||||
if (initcontext == NULL || endpoint < startpoint)
|
|
||||||
return setjmp(jb, 1);
|
|
||||||
|
|
||||||
LwpCurrent->size = endpoint - startpoint;
|
|
||||||
LwpCurrent->sbtm = realloc(LwpCurrent->sbtm, LwpCurrent->size);
|
|
||||||
memcpy(LwpCurrent->sbtm, startpoint, LwpCurrent->size);
|
|
||||||
if (setjmp(jb, 1)) {
|
|
||||||
memcpy(startpoint, LwpCurrent->sbtm, LwpCurrent->size);
|
|
||||||
return 1;
|
|
||||||
}
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
#elif defined(hpux)
|
|
||||||
|
|
||||||
#define STKALIGN 64
|
|
||||||
|
|
||||||
static void
|
|
||||||
lwpInitContext(volatile struct lwpProc *volatile newp, void *sp)
|
|
||||||
{
|
|
||||||
static jmp_buf *cpp;
|
|
||||||
|
|
||||||
if (!lwpSave(LwpCurrent->context)) {
|
|
||||||
cpp = (jmp_buf *)&newp->context;
|
|
||||||
asm volatile ("ldw %0, %%sp"::"o" (sp));
|
|
||||||
if (!lwpSave(*cpp))
|
|
||||||
lwpRestore(LwpCurrent->context);
|
|
||||||
lwpEntryPoint();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
static int
|
|
||||||
lwpSave(jmp_buf jb)
|
|
||||||
{
|
|
||||||
/* save stack pointer and return program counter */
|
|
||||||
asm("stw %sp, 4(%arg0)");
|
|
||||||
asm("stw %rp, 8(%arg0)");
|
|
||||||
|
|
||||||
/* save "callee save" registers */
|
|
||||||
asm("stw %r3, 12(%arg0)");
|
|
||||||
asm("stw %r4, 16(%arg0)");
|
|
||||||
asm("stw %r5, 20(%arg0)");
|
|
||||||
asm("stw %r6, 24(%arg0)");
|
|
||||||
asm("stw %r7, 28(%arg0)");
|
|
||||||
asm("stw %r8, 32(%arg0)");
|
|
||||||
asm("stw %r9, 36(%arg0)");
|
|
||||||
asm("stw %r10, 40(%arg0)");
|
|
||||||
asm("stw %r11, 44(%arg0)");
|
|
||||||
asm("stw %r12, 48(%arg0)");
|
|
||||||
asm("stw %r13, 52(%arg0)");
|
|
||||||
asm("stw %r14, 56(%arg0)");
|
|
||||||
asm("stw %r15, 60(%arg0)");
|
|
||||||
asm("stw %r16, 64(%arg0)");
|
|
||||||
asm("stw %r17, 68(%arg0)");
|
|
||||||
asm("stw %r18, 72(%arg0)");
|
|
||||||
|
|
||||||
/* save "callee save" space register */
|
|
||||||
asm volatile ("mfsp %sr3, %r1");
|
|
||||||
asm("stw %r1, 0(%arg0)");
|
|
||||||
|
|
||||||
/* indicate "true return" from saved() */
|
|
||||||
asm("ldi 0, %ret0");
|
|
||||||
|
|
||||||
asm(".LABEL _comefrom_");
|
|
||||||
}
|
|
||||||
|
|
||||||
static void
|
|
||||||
lwpRestore(jmp_buf jb)
|
|
||||||
{
|
|
||||||
/* restore stack pointer and program counter */
|
|
||||||
asm volatile ("ldw 4(%arg0), %sp");
|
|
||||||
asm volatile ("ldw 8(%arg0), %rp");
|
|
||||||
|
|
||||||
/* restore "callee save" space register */
|
|
||||||
asm volatile ("ldw 0(%arg0), %r1");
|
|
||||||
asm volatile ("mtsp %r1, %sr3");
|
|
||||||
|
|
||||||
/* restore "callee save" registers */
|
|
||||||
asm volatile ("ldw 12(%arg0), %r3");
|
|
||||||
asm volatile ("ldw 16(%arg0), %r4");
|
|
||||||
asm volatile ("ldw 20(%arg0), %r5");
|
|
||||||
asm volatile ("ldw 24(%arg0), %r6");
|
|
||||||
asm volatile ("ldw 28(%arg0), %r7");
|
|
||||||
asm volatile ("ldw 32(%arg0), %r8");
|
|
||||||
asm volatile ("ldw 36(%arg0), %r9");
|
|
||||||
asm volatile ("ldw 40(%arg0), %r10");
|
|
||||||
asm volatile ("ldw 44(%arg0), %r11");
|
|
||||||
asm volatile ("ldw 48(%arg0), %r12");
|
|
||||||
asm volatile ("ldw 52(%arg0), %r13");
|
|
||||||
asm volatile ("ldw 56(%arg0), %r14");
|
|
||||||
asm volatile ("ldw 60(%arg0), %r15");
|
|
||||||
asm volatile ("ldw 64(%arg0), %r16");
|
|
||||||
asm volatile ("ldw 68(%arg0), %r17");
|
|
||||||
asm volatile ("ldw 72(%arg0), %r18");
|
|
||||||
|
|
||||||
/* warp to saved() to unwind the frame correctly */
|
|
||||||
asm volatile ("bl _comefrom_, %r0");
|
|
||||||
asm volatile ("ldi 1, %ret0");
|
|
||||||
}
|
|
||||||
|
|
||||||
#elif defined(FBSD)
|
|
||||||
|
|
||||||
static void
|
|
||||||
lwpInitContext(struct lwpProc *newp, void *sp)
|
|
||||||
{
|
|
||||||
setjmp(newp->context);
|
|
||||||
newp->context->_jb[2] = (int)sp;
|
|
||||||
newp->context->_jb[3] = (int)sp;
|
|
||||||
newp->context->_jb[0] = (int)lwpEntryPoint;
|
|
||||||
}
|
|
||||||
|
|
||||||
#elif defined(__linux__)
|
|
||||||
|
|
||||||
static void
|
|
||||||
lwpInitContext(struct lwpProc *newp, void *sp)
|
|
||||||
{
|
|
||||||
#if defined(__GLIBC__) && (__GLIBC__ >= 2)
|
|
||||||
#if defined(__PPC__)
|
|
||||||
newp->context->__jmpbuf[JB_GPR1] = (int)sp;
|
|
||||||
newp->context->__jmpbuf[JB_LR] = (int)lwpEntryPoint;
|
|
||||||
#else
|
|
||||||
newp->context->__jmpbuf[JB_SP] = (int)sp;
|
|
||||||
newp->context->__jmpbuf[JB_BP] = (int)sp;
|
|
||||||
newp->context->__jmpbuf[JB_PC] = (int)lwpEntryPoint;
|
|
||||||
#endif
|
|
||||||
#else
|
|
||||||
newp->context->__sp = sp;
|
|
||||||
newp->context->__bp = sp;
|
|
||||||
newp->context->__pc = (void *)lwpEntryPoint;
|
|
||||||
#endif
|
|
||||||
}
|
|
||||||
|
|
||||||
#elif defined(SUN3)
|
|
||||||
|
|
||||||
static void
|
|
||||||
lwpInitContext(struct lwpProc *newp, void *sp)
|
|
||||||
{
|
|
||||||
newp->context[2] = (int)sp;
|
|
||||||
newp->context[3] = (int)lwpEntryPoint;
|
|
||||||
}
|
|
||||||
|
|
||||||
#elif defined(SUN4)
|
|
||||||
|
|
||||||
static void
|
|
||||||
lwpInitContext(struct lwpProc *newp, void *sp)
|
|
||||||
{
|
|
||||||
static jmp_buf *cpp;
|
|
||||||
|
|
||||||
memset(newp->context, 0, sizeof(newp->context));
|
|
||||||
newp->context[0] = (int)sp;
|
|
||||||
/* preserve cpp for new context */
|
|
||||||
cpp = (jmp_buf *) & newp->context;
|
|
||||||
if (!_setjmp(LwpCurrent->context)) {
|
|
||||||
/* create new context */
|
|
||||||
/* flush registers */
|
|
||||||
asm("ta 0x03");
|
|
||||||
/* %o0 <- newp */
|
|
||||||
asm("ld [%fp+0x44], %o0");
|
|
||||||
/* %o1 <- newp->context[0] */
|
|
||||||
asm("ld [%o0], %o1");
|
|
||||||
/* create min frame on new stack */
|
|
||||||
asm("save %o1,-96, %sp");
|
|
||||||
if (!_setjmp(*cpp))
|
|
||||||
_longjmp(LwpCurrent->context, 1);
|
|
||||||
lwpEntryPoint();
|
|
||||||
}
|
|
||||||
}
|
|
||||||
|
|
||||||
#define lwpSave(x) _setjmp(x)
|
|
||||||
#define lwpRestore(x) _longjmp(x, 1)
|
|
||||||
|
|
||||||
#elif defined(ALPHA)
|
|
||||||
|
|
||||||
#include <c_asm.h>
|
|
||||||
|
|
||||||
static void
|
|
||||||
lwpInitContext(struct lwpProc *newp, void *sp)
|
|
||||||
{
|
|
||||||
extern long *_gp;
|
|
||||||
|
|
||||||
/* register values obtained from setjmp.h */
|
|
||||||
_setjmp(newp->context);
|
|
||||||
newp->context[2] = (long)lwpEntryPoint; /* program counter */
|
|
||||||
newp->context[30] = (long)lwpEntryPoint; /* return address */
|
|
||||||
newp->context[31] = (long)lwpEntryPoint; /* fake program value (!) */
|
|
||||||
newp->context[34] = (long)sp; /* stack pointer */
|
|
||||||
}
|
|
||||||
|
|
||||||
static int
|
|
||||||
lwpSave(jmp_buf jb)
|
|
||||||
{
|
|
||||||
return _setjmp(jb);
|
|
||||||
}
|
|
||||||
|
|
||||||
static void
|
|
||||||
lwpRestore(jmp_buf jb)
|
|
||||||
{
|
|
||||||
/* resume, but get the pv from the jmp_buf */
|
|
||||||
asm("ldq %pv, 248(%a0)");
|
|
||||||
asm("stq %a0, 16(%sp)");
|
|
||||||
/* generates a warning, but functions just fine */
|
|
||||||
asm("bsr %ra, __longjump_resume");
|
|
||||||
}
|
|
||||||
|
|
||||||
#elif defined(AIX32)
|
|
||||||
|
|
||||||
#define LWP_EXTRASTACK 12
|
|
||||||
|
|
||||||
/* Code is in .s files, as compiler doesn't grok asm */
|
|
||||||
extern int lwpSave(jmp_buf);
|
|
||||||
extern void lwpRestore(jmp_buf);
|
|
||||||
extern void lwpInitContext(struct lwpProc *);
|
|
||||||
|
|
||||||
#endif
|
|
||||||
|
|
||||||
#ifndef LWP_EXTRASTACK
|
|
||||||
#define LWP_EXTRASTACK 0
|
|
||||||
#endif
|
|
||||||
#ifndef STKALIGN
|
|
||||||
#define STKALIGN sizeof(double)
|
|
||||||
#endif
|
|
||||||
#ifndef lwpSave
|
|
||||||
#define lwpSave(x) setjmp(x)
|
|
||||||
#endif
|
|
||||||
#ifndef lwpRestore
|
|
||||||
#define lwpRestore(x) longjmp(x, 1)
|
|
||||||
#endif
|
|
||||||
|
|
||||||
int
|
|
||||||
lwpNewContext(struct lwpProc *newp, int stacksz)
|
|
||||||
{
|
|
||||||
char *s, *sp;
|
|
||||||
int size, redsize;
|
|
||||||
|
|
||||||
if (CANT_HAPPEN(STKALIGN == 0|| (STKALIGN & (STKALIGN - 1))))
|
|
||||||
return -1; /* STKALIGN not power of 2 */
|
|
||||||
|
|
||||||
/* Make size a multiple of sizeof(long) to keep things aligned */
|
|
||||||
stacksz = (stacksz + sizeof(long) - 1) & -sizeof(long);
|
|
||||||
/* Add a red zone on each side of the stack for LWP_STACKCHECK */
|
|
||||||
redsize = newp->flags & LWP_STACKCHECK ? LWP_REDZONE : 0;
|
|
||||||
size = stacksz + 2 * redsize + LWP_EXTRASTACK + STKALIGN - 1;
|
|
||||||
|
|
||||||
s = malloc(size);
|
|
||||||
if (!s)
|
|
||||||
return -1;
|
|
||||||
|
|
||||||
if (LwpStackGrowsDown) {
|
|
||||||
/*
|
|
||||||
* Stack layout for stack growing downward:
|
|
||||||
* ptr block size
|
|
||||||
* --------------------------------------
|
|
||||||
* red zone LWP_REDZONE
|
|
||||||
* sp -> extra LWP_EXTRASTACK
|
|
||||||
* ustack -> stack stacksz
|
|
||||||
* red zone LWP_REDZONE
|
|
||||||
* waste STKALIGN - 1 - x
|
|
||||||
* sp is aligned to a multiple of STKALIGN.
|
|
||||||
*/
|
|
||||||
sp = s + redsize + stacksz;
|
|
||||||
sp = (char *)0 + (((sp + STKALIGN - 1) - (char *)0) & -STKALIGN);
|
|
||||||
newp->ustack = sp - stacksz;
|
|
||||||
} else {
|
|
||||||
/*
|
|
||||||
* Stack layout for stack growing upward:
|
|
||||||
* ptr block size
|
|
||||||
* --------------------------------------
|
|
||||||
* waste x
|
|
||||||
* red zone LWP_REDZONE
|
|
||||||
* sp -> stack stacksz
|
|
||||||
* ustack -> extra LWP_EXTRASTACK
|
|
||||||
* red zone LWP_REDZONE
|
|
||||||
* waste STKALIGN - 1 - x
|
|
||||||
* sp is aligned to a multiple of STKALIGN.
|
|
||||||
*/
|
|
||||||
sp = s + redsize + LWP_EXTRASTACK;
|
|
||||||
sp = (char *)0 + (((sp + STKALIGN - 1) - (char *)0) & -STKALIGN);
|
|
||||||
newp->ustack = sp - LWP_EXTRASTACK;
|
|
||||||
}
|
|
||||||
newp->sbtm = s;
|
|
||||||
newp->size = size;
|
|
||||||
newp->usize = stacksz + LWP_EXTRASTACK;
|
|
||||||
lwpInitContext(newp, sp);
|
|
||||||
return 0;
|
|
||||||
}
|
|
||||||
|
|
||||||
void
|
|
||||||
lwpSwitchContext(struct lwpProc *oldp, struct lwpProc *nextp)
|
|
||||||
{
|
|
||||||
if (!(oldp && lwpSave(oldp->context)))
|
|
||||||
lwpRestore(nextp->context);
|
|
||||||
}
|
|
||||||
|
|
||||||
#endif /* !UCONTEXT */
|
|
||||||
|
|
|
||||||
|
|
@ -1,76 +0,0 @@
|
||||||
.set r0,0; .set SP,1; .set RTOC,2; .set r3,3; .set r4,4
|
|
||||||
.set r5,5; .set r6,6; .set r7,7; .set r8,8; .set r9,9
|
|
||||||
.set LR,8
|
|
||||||
|
|
||||||
.rename LwpInitContext{PR},""
|
|
||||||
.rename LwpInitContext{TC},"lwpInitContext"
|
|
||||||
.rename LwpEntryPoint{TC},"lwpEntryPoint"
|
|
||||||
|
|
||||||
.lglobl LwpInitContext{PR}
|
|
||||||
.globl .lwpInitContext
|
|
||||||
.globl lwpInitContext{DS}
|
|
||||||
.extern lwpEntryPoint{DS}
|
|
||||||
|
|
||||||
|
|
||||||
# .text section
|
|
||||||
|
|
||||||
|
|
||||||
.csect LwpInitContext{PR}
|
|
||||||
.function LwpInitContext{PR},.lwpInitContext,2,0
|
|
||||||
.lwpInitContext: # 0x00000000 (LwpInitContext)
|
|
||||||
stu SP,-0x40(SP)
|
|
||||||
st r3,0x58(SP) # r3 = newp pointer
|
|
||||||
st r4,0x5c(SP) # r4 = sp pointer
|
|
||||||
.bf 234
|
|
||||||
st SP,0x0(r4)
|
|
||||||
st SP,0xf8(r3) # store prev SP
|
|
||||||
st r4,0xc(r3) # store entrypoint at newp[3]
|
|
||||||
l r3,LWPEntryPoint(RTOC)
|
|
||||||
l r4,0x0(r3)
|
|
||||||
l r3,0x58(SP) # load newp into r3
|
|
||||||
st r4,0x8(r3) # store sp at newp[2]
|
|
||||||
st RTOC,0x10(r3) # store RTOC at newp[4]
|
|
||||||
ai SP,SP,0x40
|
|
||||||
br
|
|
||||||
.ef 236
|
|
||||||
# traceback table
|
|
||||||
.long 0x00000000
|
|
||||||
.byte 0x00 # VERSION=0
|
|
||||||
.byte 0x00 # LANG=TB_C
|
|
||||||
.byte 0x20 # IS_GL=0,IS_EPROL=0,HAS_TBOFF=1
|
|
||||||
# INT_PROC=0,HAS_CTL=0,TOCLESS=0
|
|
||||||
# FP_PRESENT=0,LOG_ABORT=0
|
|
||||||
.byte 0x40 # INT_HNDL=0,NAME_PRESENT=1
|
|
||||||
# USES_ALLOCA=0,CL_DIS_INV=WALK_ONCOND
|
|
||||||
# SAVES_CR=0,SAVES_LR=0
|
|
||||||
.byte 0x80 # STORES_BC=1,FPR_SAVED=0
|
|
||||||
.byte 0x00 # GPR_SAVED=0
|
|
||||||
.byte 0x02 # FIXEDPARMS=2
|
|
||||||
.byte 0x01 # FLOATPARMS=0,PARMSONSTK=1
|
|
||||||
.long 0x00000000 #
|
|
||||||
.long 0x0000002c # TB_OFFSET
|
|
||||||
.short 14 # NAME_LEN
|
|
||||||
.byte "lwpInitContext"
|
|
||||||
# End of traceback table
|
|
||||||
# End csect LwpInitContext{PR}
|
|
||||||
|
|
||||||
# .data section
|
|
||||||
|
|
||||||
|
|
||||||
.toc # 0x00000050
|
|
||||||
LWPInitContext:
|
|
||||||
.tc LwpInitContext{TC},lwpInitContext{DS}
|
|
||||||
LWPEntryPoint:
|
|
||||||
.tc LwpEntryPoint{TC},lwpEntryPoint{DS}
|
|
||||||
|
|
||||||
|
|
||||||
.csect lwpInitContext{DS}
|
|
||||||
.long .lwpInitContext # "\0\0\0\0"
|
|
||||||
.long TOC{TC0} # "\0\0\0P"
|
|
||||||
.long 0x00000000 # "\0\0\0\0"
|
|
||||||
# End csect lwpInitContext{DS}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
# .bss section
|
|
||||||
|
|
||||||
|
|
@ -1,62 +0,0 @@
|
||||||
.set r0,0; .set SP,1; .set RTOC,2; .set r3,3; .set r4,4
|
|
||||||
.set r5,5; .set r6,6; .set r7,7; .set r8,8; .set r9,9
|
|
||||||
.set LR,8
|
|
||||||
|
|
||||||
.rename lwpRestore{PR},""
|
|
||||||
.rename lwpRestore{TC},"lwpRestore"
|
|
||||||
|
|
||||||
.lglobl lwpRestore{PR}
|
|
||||||
.globl .lwpRestore
|
|
||||||
.globl lwpRestore{DS}
|
|
||||||
|
|
||||||
|
|
||||||
# .text section
|
|
||||||
|
|
||||||
|
|
||||||
.csect lwpRestore{PR}
|
|
||||||
.lwpRestore: # 0x00000000 (lwpRestore)
|
|
||||||
l r5,0x8(r3)
|
|
||||||
l SP,0xc(r3)
|
|
||||||
l RTOC,0x10(r3)
|
|
||||||
mtlr r5
|
|
||||||
lil r3,0x1
|
|
||||||
br
|
|
||||||
# traceback table
|
|
||||||
.long 0x00000000
|
|
||||||
.byte 0x00 # VERSION=0
|
|
||||||
.byte 0x00 # LANG=TB_C
|
|
||||||
.byte 0x20 # IS_GL=0,IS_EPROL=0,HAS_TBOFF=1
|
|
||||||
# INT_PROC=0,HAS_CTL=0,TOCLESS=0
|
|
||||||
# FP_PRESENT=0,LOG_ABORT=0
|
|
||||||
.byte 0x40 # INT_HNDL=0,NAME_PRESENT=1
|
|
||||||
# USES_ALLOCA=0,CL_DIS_INV=WALK_ONCOND
|
|
||||||
# SAVES_CR=0,SAVES_LR=0
|
|
||||||
.byte 0x80 # STORES_BC=1,FPR_SAVED=0
|
|
||||||
.byte 0x00 # GPR_SAVED=0
|
|
||||||
.byte 0x01 # FIXEDPARMS=1
|
|
||||||
.byte 0x01 # FLOATPARMS=0,PARMSONSTK=1
|
|
||||||
.long 0x00000000 #
|
|
||||||
.long 0x00000010 # TB_OFFSET
|
|
||||||
.short 10 # NAME_LEN
|
|
||||||
.byte "lwpRestore"
|
|
||||||
# End of traceback table
|
|
||||||
# End csect lwpRestore{PR}
|
|
||||||
|
|
||||||
# .data section
|
|
||||||
|
|
||||||
|
|
||||||
.toc # 0x00000030
|
|
||||||
LWPRestore:
|
|
||||||
.tc lwpRestore{TC},lwpRestore{DS}
|
|
||||||
|
|
||||||
|
|
||||||
.csect lwpRestore{DS}
|
|
||||||
.long .lwpRestore # "\0\0\0\0"
|
|
||||||
.long TOC{TC0} # "\0\0\0000"
|
|
||||||
.long 0x00000000 # "\0\0\0\0"
|
|
||||||
# End csect lwpRestore{DS}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
# .bss section
|
|
||||||
|
|
||||||
|
|
@ -1,66 +0,0 @@
|
||||||
.set r0,0; .set SP,1; .set RTOC,2; .set r3,3; .set r4,4
|
|
||||||
.set r5,5; .set r6,6; .set r7,7; .set r8,8; .set r9,9
|
|
||||||
.set LR,8
|
|
||||||
|
|
||||||
.rename lwpSave{PR},""
|
|
||||||
.rename lwpSave{TC},"lwpSave"
|
|
||||||
|
|
||||||
.lglobl lwpSave{PR}
|
|
||||||
.globl .lwpSave
|
|
||||||
.globl lwpSave{DS}
|
|
||||||
|
|
||||||
|
|
||||||
# .text section
|
|
||||||
|
|
||||||
|
|
||||||
.csect lwpSave{PR}
|
|
||||||
.lwpSave: # 0x00000000 (lwpSave)
|
|
||||||
st SP,0xc(r3)
|
|
||||||
st RTOC,0x10(r3)
|
|
||||||
mflr r4
|
|
||||||
st r4,0x8(r3)
|
|
||||||
lil r3,0x0
|
|
||||||
br
|
|
||||||
# traceback table
|
|
||||||
.long 0x00000000
|
|
||||||
.byte 0x00 # VERSION=0
|
|
||||||
.byte 0x00 # LANG=TB_C
|
|
||||||
.byte 0x20 # IS_GL=0,IS_EPROL=0,HAS_TBOFF=1
|
|
||||||
# INT_PROC=0,HAS_CTL=0,TOCLESS=0
|
|
||||||
# FP_PRESENT=0,LOG_ABORT=0
|
|
||||||
.byte 0x40 # INT_HNDL=0,NAME_PRESENT=1
|
|
||||||
# USES_ALLOCA=0,CL_DIS_INV=WALK_ONCOND
|
|
||||||
# SAVES_CR=0,SAVES_LR=0
|
|
||||||
.byte 0x80 # STORES_BC=1,FPR_SAVED=0
|
|
||||||
.byte 0x00 # GPR_SAVED=0
|
|
||||||
.byte 0x01 # FIXEDPARMS=1
|
|
||||||
.byte 0x01 # FLOATPARMS=0,PARMSONSTK=1
|
|
||||||
.long 0x00000000 #
|
|
||||||
.long 0x00000014 # TB_OFFSET
|
|
||||||
.short 7 # NAME_LEN
|
|
||||||
.byte "lwpSave"
|
|
||||||
.byte 0 # padding
|
|
||||||
.byte 0 # padding
|
|
||||||
.byte 0 # padding
|
|
||||||
# End of traceback table
|
|
||||||
.long 0x00000000 # "\0\0\0\0"
|
|
||||||
# End csect lwpSave{PR}
|
|
||||||
|
|
||||||
# .data section
|
|
||||||
|
|
||||||
|
|
||||||
.toc # 0x00000038
|
|
||||||
LWPSave:
|
|
||||||
.tc lwpSave{TC},lwpSave{DS}
|
|
||||||
|
|
||||||
|
|
||||||
.csect lwpSave{DS}
|
|
||||||
.long .lwpSave # "\0\0\0\0"
|
|
||||||
.long TOC{TC0} # "\0\0\0008"
|
|
||||||
.long 0x00000000 # "\0\0\0\0"
|
|
||||||
# End csect lwpSave{DS}
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
# .bss section
|
|
||||||
|
|
||||||
|
|
@ -36,21 +36,13 @@
|
||||||
#define LWPINT_H
|
#define LWPINT_H
|
||||||
|
|
||||||
#include <signal.h>
|
#include <signal.h>
|
||||||
#ifdef UCONTEXT
|
|
||||||
#include <ucontext.h>
|
#include <ucontext.h>
|
||||||
#else /* !UCONTEXT */
|
|
||||||
#include <setjmp.h>
|
|
||||||
#endif /* !UCONTEXT */
|
|
||||||
|
|
||||||
#include "misc.h"
|
#include "misc.h"
|
||||||
|
|
||||||
/* process control block. do *not* change the position of context */
|
/* process control block. do *not* change the position of context */
|
||||||
struct lwpProc {
|
struct lwpProc {
|
||||||
#ifdef UCONTEXT
|
|
||||||
ucontext_t context; /* context structure */
|
ucontext_t context; /* context structure */
|
||||||
#else /* !UCONTEXT */
|
|
||||||
jmp_buf context; /* processor context area */
|
|
||||||
#endif /* !UCONTEXT */
|
|
||||||
void *sbtm; /* stack buffer attached to it */
|
void *sbtm; /* stack buffer attached to it */
|
||||||
int size; /* size of stack buffer */
|
int size; /* size of stack buffer */
|
||||||
char *ustack; /* lowest usable stack address */
|
char *ustack; /* lowest usable stack address */
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue