123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223 |
- /*
- * Copyright 2012 David Chisnall. All rights reserved.
- *
- * Permission is hereby granted, free of charge, to any person obtaining a copy
- * of this software and associated documentation files (the "Software"), to
- * deal in the Software without restriction, including without limitation the
- * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
- * sell copies of the Software, and to permit persons to whom the Software is
- * furnished to do so, subject to the following conditions:
- *
- * The above copyright notice and this permission notice shall be
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
- * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
- * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
- * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
- */
- /**
- * ARM-specific unwind definitions. These are taken from the ARM EHABI
- * specification.
- */
- typedef enum
- {
- _URC_OK = 0, /* operation completed successfully */
- _URC_FOREIGN_EXCEPTION_CAUGHT = 1,
- _URC_END_OF_STACK = 5,
- _URC_HANDLER_FOUND = 6,
- _URC_INSTALL_CONTEXT = 7,
- _URC_CONTINUE_UNWIND = 8,
- _URC_FAILURE = 9, /* unspecified failure of some kind */
- _URC_FATAL_PHASE1_ERROR = _URC_FAILURE
- } _Unwind_Reason_Code;
- typedef uint32_t _Unwind_State;
- #ifdef __clang__
- static const _Unwind_State _US_VIRTUAL_UNWIND_FRAME = 0;
- static const _Unwind_State _US_UNWIND_FRAME_STARTING = 1;
- static const _Unwind_State _US_UNWIND_FRAME_RESUME = 2;
- #else // GCC fails at knowing what a constant expression is
- # define _US_VIRTUAL_UNWIND_FRAME 0
- # define _US_UNWIND_FRAME_STARTING 1
- # define _US_UNWIND_FRAME_RESUME 2
- #endif
- typedef struct _Unwind_Context _Unwind_Context;
- typedef uint32_t _Unwind_EHT_Header;
- struct _Unwind_Exception
- {
- uint64_t exception_class;
- void (*exception_cleanup)(_Unwind_Reason_Code, struct _Unwind_Exception *);
- /* Unwinder cache, private fields for the unwinder's use */
- struct
- {
- uint32_t reserved1;
- uint32_t reserved2;
- uint32_t reserved3;
- uint32_t reserved4;
- uint32_t reserved5;
- /* init reserved1 to 0, then don't touch */
- } unwinder_cache;
- /* Propagation barrier cache (valid after phase 1): */
- struct
- {
- uint32_t sp;
- uint32_t bitpattern[5];
- } barrier_cache;
- /* Cleanup cache (preserved over cleanup): */
- struct
- {
- uint32_t bitpattern[4];
- } cleanup_cache;
- /* Pr cache (for pr's benefit): */
- struct
- {
- /** function start address */
- uint32_t fnstart;
- /** pointer to EHT entry header word */
- _Unwind_EHT_Header *ehtp;
- /** additional data */
- uint32_t additional;
- uint32_t reserved1;
- } pr_cache;
- /** Force alignment of next item to 8-byte boundary */
- long long int :0;
- };
- /* Unwinding functions */
- _Unwind_Reason_Code _Unwind_RaiseException(struct _Unwind_Exception *ucbp);
- void _Unwind_Resume(struct _Unwind_Exception *ucbp);
- void _Unwind_Complete(struct _Unwind_Exception *ucbp);
- void _Unwind_DeleteException(struct _Unwind_Exception *ucbp);
- void *_Unwind_GetLanguageSpecificData(struct _Unwind_Context*);
- typedef enum
- {
- _UVRSR_OK = 0,
- _UVRSR_NOT_IMPLEMENTED = 1,
- _UVRSR_FAILED = 2
- } _Unwind_VRS_Result;
- typedef enum
- {
- _UVRSC_CORE = 0,
- _UVRSC_VFP = 1,
- _UVRSC_WMMXD = 3,
- _UVRSC_WMMXC = 4
- } _Unwind_VRS_RegClass;
- typedef enum
- {
- _UVRSD_UINT32 = 0,
- _UVRSD_VFPX = 1,
- _UVRSD_UINT64 = 3,
- _UVRSD_FLOAT = 4,
- _UVRSD_DOUBLE = 5
- } _Unwind_VRS_DataRepresentation;
- _Unwind_VRS_Result _Unwind_VRS_Get(_Unwind_Context *context,
- _Unwind_VRS_RegClass regclass,
- uint32_t regno,
- _Unwind_VRS_DataRepresentation representation,
- void *valuep);
- _Unwind_VRS_Result _Unwind_VRS_Set(_Unwind_Context *context,
- _Unwind_VRS_RegClass regclass,
- uint32_t regno,
- _Unwind_VRS_DataRepresentation representation,
- void *valuep);
- /* Return the base-address for data references. */
- extern unsigned long _Unwind_GetDataRelBase(struct _Unwind_Context *);
- /* Return the base-address for text references. */
- extern unsigned long _Unwind_GetTextRelBase(struct _Unwind_Context *);
- extern unsigned long _Unwind_GetRegionStart(struct _Unwind_Context *);
- typedef _Unwind_Reason_Code (*_Unwind_Trace_Fn) (struct _Unwind_Context *,
- void *);
- extern _Unwind_Reason_Code _Unwind_Backtrace (_Unwind_Trace_Fn, void *);
- extern _Unwind_Reason_Code
- _Unwind_Resume_or_Rethrow (struct _Unwind_Exception *);
- /**
- * The next set of functions are compatibility extensions, implementing Itanium
- * ABI functions on top of ARM ones.
- */
- #define _UA_SEARCH_PHASE 1
- #define _UA_CLEANUP_PHASE 2
- #define _UA_HANDLER_FRAME 4
- #define _UA_FORCE_UNWIND 8
- static inline unsigned long _Unwind_GetGR(struct _Unwind_Context *context, int reg)
- {
- unsigned long val;
- _Unwind_VRS_Get(context, _UVRSC_CORE, reg, _UVRSD_UINT32, &val);
- return val;
- }
- static inline void _Unwind_SetGR(struct _Unwind_Context *context, int reg, unsigned long val)
- {
- _Unwind_VRS_Set(context, _UVRSC_CORE, reg, _UVRSD_UINT32, &val);
- }
- static inline unsigned long _Unwind_GetIP(_Unwind_Context *context)
- {
- // Low bit store the thumb state - discard it
- return _Unwind_GetGR(context, 15) & ~1;
- }
- static inline void _Unwind_SetIP(_Unwind_Context *context, unsigned long val)
- {
- // The lowest bit of the instruction pointer indicates whether we're in
- // thumb or ARM mode. This is assumed to be fixed throughout a function,
- // so must be propagated when setting the program counter.
- unsigned long thumbState = _Unwind_GetGR(context, 15) & 1;
- _Unwind_SetGR(context, 15, (val | thumbState));
- }
- /** GNU API function that unwinds the frame */
- _Unwind_Reason_Code __gnu_unwind_frame(struct _Unwind_Exception*, struct _Unwind_Context*);
- #define DECLARE_PERSONALITY_FUNCTION(name) \
- _Unwind_Reason_Code name(_Unwind_State state,\
- struct _Unwind_Exception *exceptionObject,\
- struct _Unwind_Context *context);
- #define BEGIN_PERSONALITY_FUNCTION(name) \
- _Unwind_Reason_Code name(_Unwind_State state,\
- struct _Unwind_Exception *exceptionObject,\
- struct _Unwind_Context *context)\
- {\
- int version = 1;\
- uint64_t exceptionClass = exceptionObject->exception_class;\
- int actions;\
- switch (state)\
- {\
- default: return _URC_FAILURE;\
- case _US_VIRTUAL_UNWIND_FRAME:\
- {\
- actions = _UA_SEARCH_PHASE;\
- break;\
- }\
- case _US_UNWIND_FRAME_STARTING:\
- {\
- actions = _UA_CLEANUP_PHASE;\
- if (exceptionObject->barrier_cache.sp == _Unwind_GetGR(context, 13))\
- {\
- actions |= _UA_HANDLER_FRAME;\
- }\
- break;\
- }\
- case _US_UNWIND_FRAME_RESUME:\
- {\
- return continueUnwinding(exceptionObject, context);\
- break;\
- }\
- }\
- _Unwind_SetGR (context, 12, (unsigned long)exceptionObject);\
- #define CALL_PERSONALITY_FUNCTION(name) name(state,exceptionObject,context)
|