1 /* 2 * Copyright 2012 David Chisnall. All rights reserved. 3 * 4 * Permission is hereby granted, free of charge, to any person obtaining a copy 5 * of this software and associated documentation files (the "Software"), to 6 * deal in the Software without restriction, including without limitation the 7 * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or 8 * sell copies of the Software, and to permit persons to whom the Software is 9 * furnished to do so, subject to the following conditions: 10 * 11 * The above copyright notice and this permission notice shall be 12 * included in all copies or substantial portions of the Software. 13 * 14 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 15 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF 16 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 17 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE 18 * LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION 19 * OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION 20 * WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. 21 */ 22 23 /* For uint32_t and uint64_t */ 24 #include <stdint.h> 25 26 /** 27 * ARM-specific unwind definitions. These are taken from the ARM EHABI 28 * specification. 29 */ 30 typedef enum 31 { 32 _URC_OK = 0, /* operation completed successfully */ 33 _URC_FOREIGN_EXCEPTION_CAUGHT = 1, 34 _URC_END_OF_STACK = 5, 35 _URC_HANDLER_FOUND = 6, 36 _URC_INSTALL_CONTEXT = 7, 37 _URC_CONTINUE_UNWIND = 8, 38 _URC_FAILURE = 9, /* unspecified failure of some kind */ 39 _URC_FATAL_PHASE1_ERROR = _URC_FAILURE 40 } _Unwind_Reason_Code; 41 42 typedef int _Unwind_Action; 43 44 typedef uint32_t _Unwind_State; 45 #ifdef __clang__ 46 static const _Unwind_State _US_VIRTUAL_UNWIND_FRAME = 0; 47 static const _Unwind_State _US_UNWIND_FRAME_STARTING = 1; 48 static const _Unwind_State _US_UNWIND_FRAME_RESUME = 2; 49 static const _Unwind_State _US_ACTION_MASK = 3; 50 #else // GCC fails at knowing what a constant expression is 51 # define _US_VIRTUAL_UNWIND_FRAME 0 52 # define _US_UNWIND_FRAME_STARTING 1 53 # define _US_UNWIND_FRAME_RESUME 2 54 # define _US_ACTION_MASK 3 55 #endif 56 57 typedef struct _Unwind_Context _Unwind_Context; 58 59 typedef uint32_t _Unwind_EHT_Header; 60 61 struct _Unwind_Exception 62 { 63 uint64_t exception_class; 64 void (*exception_cleanup)(_Unwind_Reason_Code, struct _Unwind_Exception *); 65 /* Unwinder cache, private fields for the unwinder's use */ 66 struct 67 { 68 uint32_t reserved1; 69 uint32_t reserved2; 70 uint32_t reserved3; 71 uint32_t reserved4; 72 uint32_t reserved5; 73 /* init reserved1 to 0, then don't touch */ 74 } unwinder_cache; 75 /* Propagation barrier cache (valid after phase 1): */ 76 struct 77 { 78 uint32_t sp; 79 uint32_t bitpattern[5]; 80 } barrier_cache; 81 /* Cleanup cache (preserved over cleanup): */ 82 struct 83 { 84 uint32_t bitpattern[4]; 85 } cleanup_cache; 86 /* Pr cache (for pr's benefit): */ 87 struct 88 { 89 /** function start address */ 90 uint32_t fnstart; 91 /** pointer to EHT entry header word */ 92 _Unwind_EHT_Header *ehtp; 93 /** additional data */ 94 uint32_t additional; 95 uint32_t reserved1; 96 } pr_cache; 97 /** Force alignment of next item to 8-byte boundary */ 98 long long int :0; 99 }; 100 101 /* Unwinding functions */ 102 _Unwind_Reason_Code _Unwind_RaiseException(struct _Unwind_Exception *ucbp); 103 void _Unwind_Resume(struct _Unwind_Exception *ucbp); 104 void _Unwind_Complete(struct _Unwind_Exception *ucbp); 105 void _Unwind_DeleteException(struct _Unwind_Exception *ucbp); 106 void *_Unwind_GetLanguageSpecificData(struct _Unwind_Context*); 107 108 typedef enum 109 { 110 _UVRSR_OK = 0, 111 _UVRSR_NOT_IMPLEMENTED = 1, 112 _UVRSR_FAILED = 2 113 } _Unwind_VRS_Result; 114 typedef enum 115 { 116 _UVRSC_CORE = 0, 117 _UVRSC_VFP = 1, 118 _UVRSC_WMMXD = 3, 119 _UVRSC_WMMXC = 4 120 } _Unwind_VRS_RegClass; 121 typedef enum 122 { 123 _UVRSD_UINT32 = 0, 124 _UVRSD_VFPX = 1, 125 _UVRSD_UINT64 = 3, 126 _UVRSD_FLOAT = 4, 127 _UVRSD_DOUBLE = 5 128 } _Unwind_VRS_DataRepresentation; 129 130 _Unwind_VRS_Result _Unwind_VRS_Get(_Unwind_Context *context, 131 _Unwind_VRS_RegClass regclass, 132 uint32_t regno, 133 _Unwind_VRS_DataRepresentation representation, 134 void *valuep); 135 _Unwind_VRS_Result _Unwind_VRS_Set(_Unwind_Context *context, 136 _Unwind_VRS_RegClass regclass, 137 uint32_t regno, 138 _Unwind_VRS_DataRepresentation representation, 139 void *valuep); 140 141 /* Return the base-address for data references. */ 142 extern unsigned long _Unwind_GetDataRelBase(struct _Unwind_Context *); 143 144 /* Return the base-address for text references. */ 145 extern unsigned long _Unwind_GetTextRelBase(struct _Unwind_Context *); 146 extern unsigned long _Unwind_GetRegionStart(struct _Unwind_Context *); 147 148 typedef _Unwind_Reason_Code (*_Unwind_Trace_Fn) (struct _Unwind_Context *, 149 void *); 150 extern _Unwind_Reason_Code _Unwind_Backtrace (_Unwind_Trace_Fn, void *); 151 extern _Unwind_Reason_Code 152 _Unwind_Resume_or_Rethrow (struct _Unwind_Exception *); 153 154 /** 155 * The next set of functions are compatibility extensions, implementing Itanium 156 * ABI functions on top of ARM ones. 157 */ 158 159 #define _UA_SEARCH_PHASE 1 160 #define _UA_CLEANUP_PHASE 2 161 #define _UA_HANDLER_FRAME 4 162 #define _UA_FORCE_UNWIND 8 163 164 static inline unsigned long _Unwind_GetGR(struct _Unwind_Context *context, int reg) 165 { 166 unsigned long val; 167 _Unwind_VRS_Get(context, _UVRSC_CORE, reg, _UVRSD_UINT32, &val); 168 return val; 169 } 170 static inline void _Unwind_SetGR(struct _Unwind_Context *context, int reg, unsigned long val) 171 { 172 _Unwind_VRS_Set(context, _UVRSC_CORE, reg, _UVRSD_UINT32, &val); 173 } 174 static inline unsigned long _Unwind_GetIP(_Unwind_Context *context) 175 { 176 // Low bit store the thumb state - discard it 177 return _Unwind_GetGR(context, 15) & ~1; 178 } 179 static inline void _Unwind_SetIP(_Unwind_Context *context, unsigned long val) 180 { 181 // The lowest bit of the instruction pointer indicates whether we're in 182 // thumb or ARM mode. This is assumed to be fixed throughout a function, 183 // so must be propagated when setting the program counter. 184 unsigned long thumbState = _Unwind_GetGR(context, 15) & 1; 185 _Unwind_SetGR(context, 15, (val | thumbState)); 186 } 187 188 /** GNU API function that unwinds the frame */ 189 _Unwind_Reason_Code __gnu_unwind_frame(struct _Unwind_Exception*, struct _Unwind_Context*); 190 191 192 #define DECLARE_PERSONALITY_FUNCTION(name) \ 193 _Unwind_Reason_Code name(_Unwind_State state,\ 194 struct _Unwind_Exception *exceptionObject,\ 195 struct _Unwind_Context *context); 196 197 #define BEGIN_PERSONALITY_FUNCTION(name) \ 198 _Unwind_Reason_Code name(_Unwind_State state,\ 199 struct _Unwind_Exception *exceptionObject,\ 200 struct _Unwind_Context *context)\ 201 {\ 202 int version = 1;\ 203 uint64_t exceptionClass = exceptionObject->exception_class;\ 204 int actions;\ 205 switch (state)\ 206 {\ 207 default: return _URC_FAILURE;\ 208 case _US_VIRTUAL_UNWIND_FRAME:\ 209 {\ 210 actions = _UA_SEARCH_PHASE;\ 211 break;\ 212 }\ 213 case _US_UNWIND_FRAME_STARTING:\ 214 {\ 215 actions = _UA_CLEANUP_PHASE;\ 216 if (exceptionObject->barrier_cache.sp == _Unwind_GetGR(context, 13))\ 217 {\ 218 actions |= _UA_HANDLER_FRAME;\ 219 }\ 220 break;\ 221 }\ 222 case _US_UNWIND_FRAME_RESUME:\ 223 {\ 224 return continueUnwinding(exceptionObject, context);\ 225 break;\ 226 }\ 227 }\ 228 _Unwind_SetGR (context, 12, reinterpret_cast<unsigned long>(exceptionObject));\ 229 230 #define CALL_PERSONALITY_FUNCTION(name) name(state,exceptionObject,context) 231