2 Copyright (c) 2008 KJK::Hyperion
4 Permission is hereby granted, free of charge, to any person obtaining a
5 copy of this software and associated documentation files (the "Software"),
6 to deal in the Software without restriction, including without limitation
7 the rights to use, copy, modify, merge, publish, distribute, sublicense,
8 and/or sell copies of the Software, and to permit persons to whom the
9 Software is furnished to do so, subject to the following conditions:
11 The above copyright notice and this permission notice shall be included in
12 all copies or substantial portions of the Software.
14 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
15 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
16 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
17 AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
18 LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
19 FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
20 DEALINGS IN THE SOFTWARE.
29 struct _EXCEPTION_RECORD
;
30 struct _EXCEPTION_POINTERS
;
33 typedef int (__cdecl
* _SEH2FrameHandler_t
)
35 struct _EXCEPTION_RECORD
*,
41 typedef struct __SEH2Registration
43 struct __SEH2Registration
* SER_Prev
;
44 _SEH2FrameHandler_t SER_Handler
;
48 typedef struct __SEH2Frame
50 _SEH2Registration_t SF_Registration
;
51 volatile struct __SEH2TryLevel
* volatile SF_TopTryLevel
;
52 void * volatile SF_FramePointer
;
53 void * volatile SF_StackPointer
;
54 volatile unsigned long SF_Code
;
58 typedef struct __SEH2TryLevel
60 volatile struct __SEH2TryLevel
* ST_Next
;
61 void * ST_FramePointer
;
72 extern void __cdecl
_SEH2EnterFrame(_SEH2Frame_t
*);
73 extern void __cdecl
_SEH2LeaveFrame(void);
74 extern void __cdecl
_SEH2Return(void);
83 typedef struct __SEHTrampoline
85 unsigned char STR_MovEcx
;
86 unsigned char STR_Closure
[4];
87 unsigned char STR_Jmp
;
88 unsigned char STR_Function
[4];
94 __attribute__((always_inline
))
95 int _SEHIsTrampoline(_SEHTrampoline_t
* trampoline_
)
97 return trampoline_
->STR_MovEcx
== 0xb9 && trampoline_
->STR_Jmp
== 0xe9;
102 __attribute__((always_inline
))
103 void * _SEHFunctionFromTrampoline(_SEHTrampoline_t
* trampoline_
)
105 return (void *)(*(int *)(&trampoline_
->STR_Function
[0]) + (int)(trampoline_
+ 1));
110 __attribute__((always_inline
))
111 void * _SEHClosureFromTrampoline(_SEHTrampoline_t
* trampoline_
)
113 return (void *)*(int *)(&trampoline_
->STR_Closure
[0]);
119 /* A no-op side effect that scares GCC */
120 #define __SEH_SIDE_EFFECT __asm__ __volatile__("#")
122 /* A no-op without any real side effects, but silences warnings */
123 #define __SEH_PRETEND_SIDE_EFFECT (void)0
125 /* Forces GCC to consider the specified label reachable */
126 #define __SEH_USE_LABEL(L_) __asm__ __volatile__("# %0\n" : : "i" (&&L_))
128 /* Makes GCC pretend the specified label is reachable, to silence warnings */
129 #define __SEH_PRETEND_USE_LABEL(L_) (void)(&&L_)
131 /* Forces GCC to emit the specified nested function as a function */
132 #define __SEH_USE_NESTED_FUNCTION(F_) (void)(&F_) /* __attribute__((noinline)) seems to do the trick */
134 /* Soft memory barrier */
135 #define __SEH_BARRIER __asm__ __volatile__("#":::"memory")
137 /* GCC doesn't know that this equals zero */
138 #define __SEH_ZERO ({ int zero = 0; __asm__ __volatile__("#" : "+g" (zero)); zero; })
140 #define __SEH_FALSE __builtin_expect(__SEH_ZERO, 0)
141 #define __SEH_TRUE __builtin_expect(!__SEH_ZERO, 1)
143 #define __SEH_FORCE_NEST \
144 __asm__ __volatile__("#%0" : : "r" (&_SEHFrame))
146 #define __SEH_NESTED_PROLOG \
149 #define __SEH_DECLARE_EXCEPT_PFN(NAME_) int (__cdecl * NAME_)(void *)
150 #define __SEH_DECLARE_EXCEPT(NAME_) int __cdecl NAME_(void *)
151 #define __SEH_DEFINE_EXCEPT(NAME_) int __cdecl NAME_(void * _SEHExceptionPointers)
153 #define __SEH_DECLARE_FINALLY_PFN(NAME_) void (__cdecl * NAME_)(void)
154 #define __SEH_DECLARE_FINALLY(NAME_) void __cdecl NAME_(void)
155 #define __SEH_DEFINE_FINALLY(NAME_) void __cdecl NAME_(void)
157 #define __SEH_RETURN_EXCEPT(R_) return (int)(R_)
158 #define __SEH_RETURN_FINALLY() return
160 #define __SEH_BEGIN_TRY \
162 __label__ _SEHBeginTry; \
163 __label__ _SEHEndTry; \
165 __SEH_USE_LABEL(_SEHBeginTry); \
166 __SEH_USE_LABEL(_SEHEndTry); \
168 _SEHBeginTry: __SEH_SIDE_EFFECT; \
172 #define __SEH_END_TRY \
175 _SEHEndTry: __SEH_SIDE_EFFECT; \
178 #define __SEH_SET_TRYLEVEL(TRYLEVEL_) \
180 __SEH_BARRIER; _SEH2FrameP->SF_TopTryLevel = (TRYLEVEL_); __SEH_BARRIER; \
183 #define __SEH_ENTER_TRYLEVEL() __SEH_SET_TRYLEVEL(&_SEHTryLevel)
184 #define __SEH_LEAVE_TRYLEVEL() __SEH_SET_TRYLEVEL(_SEHPrevTryLevelP)
186 #define __SEH_END_SCOPE_CHAIN \
187 static const int _SEH2ScopeKind = 1; \
188 static _SEH2Frame_t * const _SEH2FrameP = 0; \
189 static _SEH2TryLevel_t * const _SEH2TryLevelP = 0;
191 #define __SEH_BEGIN_SCOPE \
194 __label__ _SEHBeginScope; \
195 __label__ _SEHEndScope; \
197 _SEHBeginScope: __SEH_SIDE_EFFECT; \
199 const int _SEHTopTryLevel = (_SEH2ScopeKind != 0); \
200 _SEH2Frame_t * const _SEHCurFrameP = _SEH2FrameP; \
201 volatile _SEH2TryLevel_t * const _SEHPrevTryLevelP = _SEH2TryLevelP; \
203 (void)_SEHTopTryLevel; \
204 (void)_SEHCurFrameP; \
205 (void)_SEHPrevTryLevelP; \
207 __SEH_USE_LABEL(_SEHBeginScope); \
208 __SEH_USE_LABEL(_SEHEndScope); \
211 __label__ _SEHBeforeTry; \
212 __label__ _SEHDoTry; \
213 __label__ _SEHAfterTry; \
214 static const int _SEH2ScopeKind = 0; \
215 _SEH2Frame_t _SEHFrame; \
216 volatile _SEH2TryLevel_t _SEHTryLevel; \
217 _SEH2Frame_t * const _SEH2FrameP = _SEHTopTryLevel ? &_SEHFrame : _SEHCurFrameP; \
218 volatile _SEH2TryLevel_t * const _SEH2TryLevelP = &_SEHTryLevel; \
220 (void)_SEH2ScopeKind; \
222 (void)_SEHTryLevel; \
224 (void)_SEH2TryLevelP; \
226 _SEHTryLevel.ST_Next = _SEHPrevTryLevelP; \
227 goto _SEHBeforeTry; \
230 __SEH_ENTER_TRYLEVEL(); \
232 if(_SEHTopTryLevel) \
234 __SEH_BARRIER; __asm__ __volatile__("mov %%ebp, %0\n#%1" : "=m" (_SEHFrame.SF_FramePointer) : "r" (__builtin_frame_address(0))); __SEH_BARRIER; \
235 _SEH2EnterFrame(&_SEHFrame); \
238 #define __SEH_END_SCOPE \
241 _SEHEndScope: __SEH_SIDE_EFFECT; \
246 #define __SEH_SCOPE_LOCALS \
247 __label__ _SEHBeginExcept; \
248 __label__ _SEHEndExcept; \
250 auto __SEH_DECLARE_EXCEPT(_SEHExcept); \
251 auto __SEH_DECLARE_FINALLY(_SEHFinally);
256 __SEH_SCOPE_LOCALS; \
261 #define _SEH2_FINALLY \
268 __SEH_PRETEND_USE_LABEL(_SEHBeginExcept); \
269 __SEH_PRETEND_USE_LABEL(_SEHEndExcept); \
271 __SEH_USE_NESTED_FUNCTION(_SEHFinally); \
273 _SEHTryLevel.ST_FramePointer = _SEHClosureFromTrampoline((_SEHTrampoline_t *)&_SEHFinally); \
274 _SEHTryLevel.ST_Filter = 0; \
275 _SEHTryLevel.ST_Body = _SEHFunctionFromTrampoline((_SEHTrampoline_t *)&_SEHFinally); \
280 if(_SEHTopTryLevel) \
284 __SEH_LEAVE_TRYLEVEL(); \
288 goto _SEHEndExcept; \
290 _SEHBeginExcept: __SEH_PRETEND_SIDE_EFFECT; \
291 __attribute__((unused)) __SEH_DEFINE_EXCEPT(_SEHExcept) { __SEH_RETURN_EXCEPT(0); } \
293 __attribute__((noinline)) __attribute__((used)) __SEH_DEFINE_FINALLY(_SEHFinally) \
295 __SEH_END_SCOPE_CHAIN; \
297 (void)_SEH2ScopeKind; \
299 (void)_SEH2TryLevelP; \
301 __SEH_NESTED_PROLOG; \
303 for(;; ({ __SEH_RETURN_FINALLY(); })) \
306 #define _SEH2_EXCEPT(E_) \
314 __SEH_USE_LABEL(_SEHBeginExcept); \
315 __SEH_USE_LABEL(_SEHEndExcept); \
317 __SEH_USE_NESTED_FUNCTION(_SEHExcept); \
319 _SEHTryLevel.ST_FramePointer = _SEHClosureFromTrampoline((_SEHTrampoline_t *)&_SEHExcept); \
320 _SEHTryLevel.ST_Filter = _SEHFunctionFromTrampoline((_SEHTrampoline_t *)&_SEHExcept); \
321 _SEHTryLevel.ST_Body = &&_SEHBeginExcept; \
322 __SEH_BARRIER; __asm__ __volatile__("mov %%esp, %0" : "=m" (_SEH2FrameP->SF_StackPointer)); __SEH_BARRIER; \
326 __attribute__((noinline)) __attribute__((used)) __SEH_DEFINE_EXCEPT(_SEHExcept) \
328 __SEH_NESTED_PROLOG; \
329 __SEH_RETURN_EXCEPT(E_); \
332 __attribute__((unused)) __SEH_DEFINE_FINALLY(_SEHFinally) { __SEH_RETURN_FINALLY(); } \
335 if(_SEHTopTryLevel) \
339 __SEH_LEAVE_TRYLEVEL(); \
343 goto _SEHBeginExcept; \
345 goto _SEHEndExcept; \
347 _SEHBeginExcept: __SEH_SIDE_EFFECT; \
350 _SEH2Frame_t * const _SEH2FrameP = _SEHTopTryLevel ? &_SEHFrame : _SEHCurFrameP; \
358 _SEHEndExcept: __SEH_SIDE_EFFECT; \
362 #define _SEH2_GetExceptionInformation() ((struct _EXCEPTION_POINTERS *)_SEHExceptionPointers)
363 #define _SEH2_GetExceptionCode() ((_SEH2FrameP)->SF_Code)
364 #define _SEH2_AbnormalTermination() (!!_SEH2_GetExceptionCode())
366 #define _SEH2_YIELD(STMT_) \
369 if(!_SEH2ScopeKind) \
375 #define _SEH2_LEAVE goto _SEHEndTry
377 __SEH_END_SCOPE_CHAIN
;
383 #define _SEH2_TRY __try
384 #define _SEH2_FINALLY __finally
385 #define _SEH2_EXCEPT(E_) __except((E_))
388 #define _SEH2_GetExceptionInformation() (GetExceptionInformation())
389 #define _SEH2_GetExceptionCode() (GetExceptionCode())
390 #define _SEH2_AbnormalTermination() (AbnormalTermination())
392 #define _SEH2_YIELD(STMT_) STMT_
393 #define _SEH2_LEAVE __leave