Subversion Repositories or1k

/* 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