137 lines
2.8 KiB
ArmAsm
137 lines
2.8 KiB
ArmAsm
/* This is file is a merger of SETJMP.S and LONGJMP.S */
|
|
/*
|
|
* This file was modified to use the __USER_LABEL_PREFIX__ and
|
|
* __REGISTER_PREFIX__ macros defined by later versions of GNU cpp by
|
|
* Joel Sherrill (joel@OARcorp.com)
|
|
*
|
|
** Copyright (C) 1991 DJ Delorie, 24 Kirsten Ave, Rochester NH 03867-2954
|
|
**
|
|
** This file is distributed under the terms listed in the document
|
|
** "copying.dj", available from DJ Delorie at the address above.
|
|
** A copy of "copying.dj" should accompany this file; if not, a copy
|
|
** should be available from where this file was obtained. This file
|
|
** may not be distributed without a verbatim copy of "copying.dj".
|
|
**
|
|
** This file is distributed WITHOUT ANY WARRANTY; without even the implied
|
|
** warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
|
|
*/
|
|
|
|
/*
|
|
** jmp_buf:
|
|
** eax ebx ecx edx esi edi ebp esp eip
|
|
** 0 4 8 12 16 20 24 28 32
|
|
*/
|
|
|
|
/* These are predefined by new versions of GNU cpp. */
|
|
|
|
#ifndef __USER_LABEL_PREFIX__
|
|
#define __USER_LABEL_PREFIX__ _
|
|
#endif
|
|
|
|
/***************************** TEMPORARY ******************************
|
|
*
|
|
* It appears that the i386-coff configuration of gcc 2.6.2 does not
|
|
* do the __REGISTER_PREFIX__ correctly. Fix this when it does.
|
|
**********************************************************************/
|
|
#define __REGISTER_PREFIX__ %
|
|
#ifndef __REGISTER_PREFIX__
|
|
#define __REGISTER_PREFIX__
|
|
#endif
|
|
|
|
/* ANSI concatenation macros. */
|
|
|
|
#define CONCAT1(a, b) CONCAT2(a, b)
|
|
#define CONCAT2(a, b) a ## b
|
|
|
|
/* Use the right prefix for global labels. */
|
|
|
|
#define SYM(x) CONCAT1 (__USER_LABEL_PREFIX__, x)
|
|
|
|
/* Use the right prefix for registers. */
|
|
|
|
#define REG(x) CONCAT1 (__REGISTER_PREFIX__, x)
|
|
|
|
#define eax REG (eax)
|
|
#define ebx REG (ebx)
|
|
#define ecx REG (ecx)
|
|
#define edx REG (edx)
|
|
#define esi REG (esi)
|
|
#define edi REG (edi)
|
|
#define ebp REG (ebp)
|
|
#define esp REG (esp)
|
|
|
|
#define ax REG (ax)
|
|
#define bx REG (bx)
|
|
#define cx REG (cx)
|
|
#define dx REG (dx)
|
|
|
|
#define ah REG (ah)
|
|
#define bh REG (bh)
|
|
#define ch REG (ch)
|
|
#define dh REG (dh)
|
|
|
|
#define al REG (al)
|
|
#define bl REG (bl)
|
|
#define cl REG (cl)
|
|
#define dl REG (dl)
|
|
|
|
.global SYM (setjmp)
|
|
.global SYM (longjmp)
|
|
|
|
SYM (setjmp):
|
|
|
|
pushl ebp
|
|
movl esp,ebp
|
|
|
|
pushl edi
|
|
movl 8 (ebp),edi
|
|
|
|
movl eax,0 (edi)
|
|
movl ebx,4 (edi)
|
|
movl ecx,8 (edi)
|
|
movl edx,12 (edi)
|
|
movl esi,16 (edi)
|
|
|
|
movl -4 (ebp),eax
|
|
movl eax,20 (edi)
|
|
|
|
movl 0 (ebp),eax
|
|
movl eax,24 (edi)
|
|
|
|
movl esp,eax
|
|
addl $12,eax
|
|
movl eax,28 (edi)
|
|
|
|
movl 4 (ebp),eax
|
|
movl eax,32 (edi)
|
|
|
|
popl edi
|
|
movl $0,eax
|
|
leave
|
|
ret
|
|
|
|
SYM (longjmp):
|
|
pushl ebp
|
|
movl esp,ebp
|
|
|
|
movl 8(ebp),edi /* get jmp_buf */
|
|
movl 12(ebp),eax /* store retval in j->eax */
|
|
movl eax,0(edi)
|
|
|
|
movl 24(edi),ebp
|
|
|
|
cli
|
|
movl 28(edi),esp
|
|
|
|
pushl 32(edi)
|
|
|
|
movl 0(edi),eax
|
|
movl 4(edi),ebx
|
|
movl 8(edi),ecx
|
|
movl 12(edi),edx
|
|
movl 16(edi),esi
|
|
movl 20(edi),edi
|
|
sti
|
|
|
|
ret
|