/elec/propeller-clock

/*	Copyright (C) 2004 Garrett A. Kajmowicz

	This file is part of the uClibc++ Library.

	This library is free software; you can redistribute it and/or

	modify it under the terms of the GNU Lesser General Public

	License as published by the Free Software Foundation; either

	version 2.1 of the License, or (at your option) any later version.

	This library is distributed in the hope that it will be useful,

	but WITHOUT ANY WARRANTY; without even the implied warranty of

	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

	Lesser General Public License for more details.

	You should have received a copy of the GNU Lesser General Public

	License along with this library; if not, write to the Free Software

	Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA

*/

#include <exception>

#include <cstdlib>

#include <typeinfo>

#ifndef HEADER_ULC_SUPPORT

#define HEADER_ULC_SUPPORT 1

using namespace std;

//From C++ ABI spec

typedef enum {

	_URC_NO_REASON = 0,

	_URC_FOREIGN_EXCEPTION_CAUGHT = 1,

	_URC_FATAL_PHASE2_ERROR = 2,

	_URC_FATAL_PHASE1_ERROR = 3,

	_URC_NORMAL_STOP = 4,

	_URC_END_OF_STACK = 5,

	_URC_HANDLER_FOUND = 6,

	_URC_INSTALL_CONTEXT = 7,

	_URC_CONTINUE_UNWIND = 8

} _Unwind_Reason_Code;

typedef void (*_Unwind_Exception_Cleanup_Fn)

	(_Unwind_Reason_Code reason, struct _Unwind_Exception *exc);

//The following definitions were grabbed from the gcc implementation

typedef unsigned _Unwind_Ptr __attribute__((__mode__(__pointer__)));

typedef unsigned _Unwind_Word __attribute__((__mode__(__word__)));

typedef signed _Unwind_Sword __attribute__((__mode__(__word__)));

typedef unsigned _Unwind_Exception_Class __attribute__((__mode__(__DI__)));

typedef void (*_Unwind_Exception_Cleanup_Fn) (_Unwind_Reason_Code, struct _Unwind_Exception *);

typedef int _Unwind_Action;

static const _Unwind_Action _UA_SEARCH_PHASE = 1;

static const _Unwind_Action _UA_CLEANUP_PHASE = 2;

static const _Unwind_Action _UA_HANDLER_FRAME = 4;

static const _Unwind_Action _UA_FORCE_UNWIND = 8;

const _Unwind_Exception_Class __uclibcxx_exception_class = ((((((((

	_Unwind_Exception_Class) 'u' << 8 | (_Unwind_Exception_Class) 'l') << 8 

	| (_Unwind_Exception_Class) 'i') << 8 | (_Unwind_Exception_Class) 'b') << 8

	| (_Unwind_Exception_Class) 'C')<< 8 | (_Unwind_Exception_Class) '+') << 8 

	| (_Unwind_Exception_Class) '+') << 8 | (_Unwind_Exception_Class) '\0');

#define _UA_SEARCH_PHASE        1

#define _UA_CLEANUP_PHASE       2

#define _UA_HANDLER_FRAME       4

#define _UA_FORCE_UNWIND        8

#define _UA_END_OF_STACK        16

struct _Unwind_Exception{

        _Unwind_Exception_Class exception_class;		//Type of exception, eg ulibC++\0

        _Unwind_Exception_Cleanup_Fn exception_cleanup;		//Destructor if from diff runtime

        _Unwind_Word private_1;					//Don't touch at all!

        _Unwind_Word private_2;					//Don't touch at all!

} __attribute__((__aligned__));

//The following structure is system-dependent and defined by the compiler

//Thus it's definition was copied from the gcc 3.4.0 header files

struct _Unwind_Context;

//{

//	void *reg[DWARF_FRAME_REGISTERS+1];

//	void *cfa;

//	void *ra;

//	void *lsda;

//	struct dwarf_eh_bases bases;

//	_Unwind_Word args_size;

//};

_Unwind_Reason_Code _Unwind_RaiseException ( struct _Unwind_Exception *exception_object );

//_Unwind_ForcedUnwind 

typedef _Unwind_Reason_Code (*_Unwind_Stop_Fn)

	(int version, _Unwind_Action actions,  _Unwind_Exception_Class exceptionClass,

	struct _Unwind_Exception *exceptionObject, 

	struct _Unwind_Context *context, void *stop_parameter );

_Unwind_Reason_Code _Unwind_ForcedUnwind ( 

	struct _Unwind_Exception *exception_object, _Unwind_Stop_Fn stop,

	void *stop_parameter );

void _Unwind_Resume (struct _Unwind_Exception *exception_object);

void _Unwind_DeleteException (struct _Unwind_Exception *exception_object);

_Unwind_Word _Unwind_GetGR (struct _Unwind_Context *context, int index);

void _Unwind_SetGR (struct _Unwind_Context *context, int index, _Unwind_Word);

_Unwind_Ptr _Unwind_GetIP (struct _Unwind_Context *context);

void _Unwind_SetIP (struct _Unwind_Context *context, _Unwind_Ptr new_value);

_Unwind_Ptr _Unwind_GetLanguageSpecificData (struct _Unwind_Context *context);

_Unwind_Ptr _Unwind_GetRegionStart (struct _Unwind_Context *context);

_Unwind_Reason_Code (*__personality_routine)

	(int version,					//Should be 1

	_Unwind_Action actions,				//Actions the routine will perform (bitmask)

	_Unwind_Exception_Class exceptionClass,		//Type of exception - vendor is high 4 bytes

	struct _Unwind_Exception *exceptionObject,	//Points to exception header

	struct _Unwind_Context *context);		//Unwinder state information

/*The following part is the Level II ABI which is required for compatability*/

//This might be the only stuff that *I* need to implement

struct __cxa_exception { 

	std::type_info *exceptionType;		//Type of thrown exception

	void (*exceptionDestructor) (void *); 	//Pointer to the destructor

	unexpected_handler unexpectedHandler;	//Unexpected handler to use

	terminate_handler terminateHandler;	//Terminate handle to use

	__cxa_exception *nextException;		//per thread linked list

	int handlerCount;			//How many handlers have caught this

	int handlerSwitchValue;			

	const char *actionRecord;

	const char *languageSpecificData;

	void *catchTemp;

	void *adjustedPtr;

	_Unwind_Exception unwindHeader;

};

struct __cxa_eh_globals {

	__cxa_exception *caughtExceptions;

	unsigned int uncaughtExceptions;

};

extern "C" __cxa_eh_globals *__cxa_get_globals(void);	//Return ptr to the eh_globals object for current thread

extern "C" __cxa_eh_globals *__cxa_get_globals_fast(void);	//Same as above, assumes that above called at least once

extern "C" void *__cxa_allocate_exception(size_t thrown_size);	//Allocate space for exception plus header

extern "C" void __cxa_free_exception(void *thrown_exception);	//Free space allocated from the above

extern "C" void __cxa_throw (void *thrown_exception, 	//This is the actual throw call

//	std::type_info *tinfo, 			//Type of object

	void * tinfo, 			//Type of object

	void (*dest) (void *) );		//Pointer to destructor destroy object

#endif