f78541dcec
The merged version follows the ppc64 version pretty closely mostly, and in fact ARCH=ppc64 now uses the arch/powerpc/xmon version. The main difference for ppc64 is that the 'p' command to call show_state (which was always pretty dodgy) has been replaced by the ppc32 'p' command, which calls a given procedure (so in fact the old 'p' command behaviour can be achieved with 'p $show_state'). Signed-off-by: Paul Mackerras <paulus@samba.org>
136 lines
2.9 KiB
ArmAsm
136 lines
2.9 KiB
ArmAsm
/*
|
|
* Copyright (C) 1996 Paul Mackerras.
|
|
*
|
|
* This program is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License
|
|
* as published by the Free Software Foundation; either version
|
|
* 2 of the License, or (at your option) any later version.
|
|
*
|
|
* NOTE: assert(sizeof(buf) > 23 * sizeof(long))
|
|
*/
|
|
#include <asm/processor.h>
|
|
#include <asm/ppc_asm.h>
|
|
#include <asm/asm-offsets.h>
|
|
|
|
_GLOBAL(xmon_setjmp)
|
|
mflr r0
|
|
STL r0,0(r3)
|
|
STL r1,SZL(r3)
|
|
STL r2,2*SZL(r3)
|
|
mfcr r0
|
|
STL r0,3*SZL(r3)
|
|
STL r13,4*SZL(r3)
|
|
STL r14,5*SZL(r3)
|
|
STL r15,6*SZL(r3)
|
|
STL r16,7*SZL(r3)
|
|
STL r17,8*SZL(r3)
|
|
STL r18,9*SZL(r3)
|
|
STL r19,10*SZL(r3)
|
|
STL r20,11*SZL(r3)
|
|
STL r21,12*SZL(r3)
|
|
STL r22,13*SZL(r3)
|
|
STL r23,14*SZL(r3)
|
|
STL r24,15*SZL(r3)
|
|
STL r25,16*SZL(r3)
|
|
STL r26,17*SZL(r3)
|
|
STL r27,18*SZL(r3)
|
|
STL r28,19*SZL(r3)
|
|
STL r29,20*SZL(r3)
|
|
STL r30,21*SZL(r3)
|
|
STL r31,22*SZL(r3)
|
|
li r3,0
|
|
blr
|
|
|
|
_GLOBAL(xmon_longjmp)
|
|
CMPI r4,0
|
|
bne 1f
|
|
li r4,1
|
|
1: LDL r13,4*SZL(r3)
|
|
LDL r14,5*SZL(r3)
|
|
LDL r15,6*SZL(r3)
|
|
LDL r16,7*SZL(r3)
|
|
LDL r17,8*SZL(r3)
|
|
LDL r18,9*SZL(r3)
|
|
LDL r19,10*SZL(r3)
|
|
LDL r20,11*SZL(r3)
|
|
LDL r21,12*SZL(r3)
|
|
LDL r22,13*SZL(r3)
|
|
LDL r23,14*SZL(r3)
|
|
LDL r24,15*SZL(r3)
|
|
LDL r25,16*SZL(r3)
|
|
LDL r26,17*SZL(r3)
|
|
LDL r27,18*SZL(r3)
|
|
LDL r28,19*SZL(r3)
|
|
LDL r29,20*SZL(r3)
|
|
LDL r30,21*SZL(r3)
|
|
LDL r31,22*SZL(r3)
|
|
LDL r0,3*SZL(r3)
|
|
mtcrf 0x38,r0
|
|
LDL r0,0(r3)
|
|
LDL r1,SZL(r3)
|
|
LDL r2,2*SZL(r3)
|
|
mtlr r0
|
|
mr r3,r4
|
|
blr
|
|
|
|
/*
|
|
* Grab the register values as they are now.
|
|
* This won't do a particularily good job because we really
|
|
* want our caller's caller's registers, and our caller has
|
|
* already executed its prologue.
|
|
* ToDo: We could reach back into the caller's save area to do
|
|
* a better job of representing the caller's state (note that
|
|
* that will be different for 32-bit and 64-bit, because of the
|
|
* different ABIs, though).
|
|
*/
|
|
_GLOBAL(xmon_save_regs)
|
|
STL r0,0*SZL(r3)
|
|
STL r2,2*SZL(r3)
|
|
STL r3,3*SZL(r3)
|
|
STL r4,4*SZL(r3)
|
|
STL r5,5*SZL(r3)
|
|
STL r6,6*SZL(r3)
|
|
STL r7,7*SZL(r3)
|
|
STL r8,8*SZL(r3)
|
|
STL r9,9*SZL(r3)
|
|
STL r10,10*SZL(r3)
|
|
STL r11,11*SZL(r3)
|
|
STL r12,12*SZL(r3)
|
|
STL r13,13*SZL(r3)
|
|
STL r14,14*SZL(r3)
|
|
STL r15,15*SZL(r3)
|
|
STL r16,16*SZL(r3)
|
|
STL r17,17*SZL(r3)
|
|
STL r18,18*SZL(r3)
|
|
STL r19,19*SZL(r3)
|
|
STL r20,20*SZL(r3)
|
|
STL r21,21*SZL(r3)
|
|
STL r22,22*SZL(r3)
|
|
STL r23,23*SZL(r3)
|
|
STL r24,24*SZL(r3)
|
|
STL r25,25*SZL(r3)
|
|
STL r26,26*SZL(r3)
|
|
STL r27,27*SZL(r3)
|
|
STL r28,28*SZL(r3)
|
|
STL r29,29*SZL(r3)
|
|
STL r30,30*SZL(r3)
|
|
STL r31,31*SZL(r3)
|
|
/* go up one stack frame for SP */
|
|
LDL r4,0(r1)
|
|
STL r4,1*SZL(r3)
|
|
/* get caller's LR */
|
|
LDL r0,LRSAVE(r4)
|
|
STL r0,_NIP-STACK_FRAME_OVERHEAD(r3)
|
|
STL r0,_LINK-STACK_FRAME_OVERHEAD(r3)
|
|
mfmsr r0
|
|
STL r0,_MSR-STACK_FRAME_OVERHEAD(r3)
|
|
mfctr r0
|
|
STL r0,_CTR-STACK_FRAME_OVERHEAD(r3)
|
|
mfxer r0
|
|
STL r0,_XER-STACK_FRAME_OVERHEAD(r3)
|
|
mfcr r0
|
|
STL r0,_CCR-STACK_FRAME_OVERHEAD(r3)
|
|
li r0,0
|
|
STL r0,_TRAP-STACK_FRAME_OVERHEAD(r3)
|
|
blr
|