90 lines
1.7 KiB
C++
90 lines
1.7 KiB
C++
|
/*
|
||
|
|
* Copyright (c) 1995 Argonaut Technologies Limited. All rights reserved.
|
||
|
|
*
|
||
|
|
* $Id: brexcept.c 1.2 1995/07/28 19:01:34 sam Exp $
|
||
|
|
* $Locker: $
|
||
|
|
*
|
||
|
|
* Simple exception handling
|
||
|
|
*/
|
||
|
|
#include <stddef.h>
|
||
|
|
#include <stdio.h>
|
||
|
|
#include <string.h>
|
||
|
|
#include <setjmp.h>
|
||
|
|
|
||
|
|
#include "fw.h"
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Current head of exception handler chain
|
||
|
|
*/
|
||
|
|
br_exception_handler *_BrExceptionHandler = NULL;
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Temporary global used to pass exception value
|
||
|
|
*/
|
||
|
|
static void * exceptionValue;
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Add an exception handler to the stack - returns a point to exception handler
|
||
|
|
* into which the caller should save context
|
||
|
|
*/
|
||
|
|
br_exception_handler * _BrExceptionCatch(void)
|
||
|
|
{
|
||
|
|
br_exception_handler *h;
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Create an anchor resource
|
||
|
|
*/
|
||
|
|
h = BrResAllocate(0,sizeof(*h), BR_MEMORY_EXCEPTION_HANDLER);
|
||
|
|
h->prev = _BrExceptionHandler;
|
||
|
|
|
||
|
|
return _BrExceptionHandler;
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Unwind back to the last exception handler, passing a type and value
|
||
|
|
*/
|
||
|
|
void _BrExceptionThrow(br_int_32 type, void *value)
|
||
|
|
{
|
||
|
|
br_exception_handler h,*old;
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Make sure exception stack does not underflow
|
||
|
|
*/
|
||
|
|
if(_BrExceptionHandler == NULL)
|
||
|
|
BR_ERROR("Unhandled exception: %d");
|
||
|
|
|
||
|
|
h = *_BrExceptionHandler;
|
||
|
|
old = _BrExceptionHandler;
|
||
|
|
|
||
|
|
_BrExceptionHandler = _BrExceptionHandler->prev;
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Release all the attached resources
|
||
|
|
*/
|
||
|
|
BrResFree(old);
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Pop stack back down to handler context
|
||
|
|
*/
|
||
|
|
exceptionValue = value;
|
||
|
|
longjmp(h.context, type);
|
||
|
|
}
|
||
|
|
|
||
|
|
/*
|
||
|
|
* Wrapper function used in BrExceptionCatch() macro to stash the
|
||
|
|
* value
|
||
|
|
*
|
||
|
|
*
|
||
|
|
*/
|
||
|
|
br_exception _BrExceptionValueFetch(br_exception type, void **evp)
|
||
|
|
{
|
||
|
|
/*
|
||
|
|
* If type is a valid exception, save the exception value
|
||
|
|
*/
|
||
|
|
if(type && evp)
|
||
|
|
*evp = exceptionValue;
|
||
|
|
|
||
|
|
return type;
|
||
|
|
}
|
||
|
|
|