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.
26 #if defined(USE_DUMMY_PSEH) || defined (__arm__) || defined(__clang__) || defined(_M_AMD64)
29 #define _SEH2_FINALLY } {
30 #define _SEH2_EXCEPT(...) } if (0) {
32 #define _SEH2_GetExceptionInformation()
33 #define _SEH2_GetExceptionCode() 0
34 #define _SEH2_AbnormalTermination()
35 #define _SEH2_YIELD(STMT_) STMT_
38 #elif defined(USE_NATIVE_SEH) || defined(_MSC_VER)
41 #define _SEH2_TRY __try
42 #define _SEH2_FINALLY __finally
43 #define _SEH2_EXCEPT(...) __except(__VA_ARGS__)
45 #define _SEH2_GetExceptionInformation() (GetExceptionInformation())
46 #define _SEH2_GetExceptionCode() (GetExceptionCode())
47 #define _SEH2_AbnormalTermination() (AbnormalTermination())
48 #define _SEH2_YIELD(STMT_) STMT_
49 #define _SEH2_LEAVE __leave
51 #elif defined(__GNUC__)
53 struct _EXCEPTION_RECORD
;
54 struct _EXCEPTION_POINTERS
;
57 typedef int (__cdecl
* _SEH2FrameHandler_t
)
59 struct _EXCEPTION_RECORD
*,
65 typedef struct __SEH2Registration
67 struct __SEH2Registration
* SER_Prev
;
68 _SEH2FrameHandler_t SER_Handler
;
72 typedef struct __SEH2Frame
74 _SEH2Registration_t SF_Registration
;
75 volatile struct __SEH2TryLevel
* volatile SF_TopTryLevel
;
76 volatile unsigned long SF_Code
;
80 typedef struct __SEH2TryLevel
82 volatile struct __SEH2TryLevel
* ST_Next
;
88 typedef struct __SEH2HandleTryLevel
90 _SEH2TryLevel_t SHT_Common
;
91 void * volatile SHT_Esp
;
92 void * volatile SHT_Ebp
;
93 void * volatile SHT_Ebx
;
94 void * volatile SHT_Esi
;
95 void * volatile SHT_Edi
;
97 _SEH2HandleTryLevel_t
;
103 extern int __cdecl
_SEH2EnterFrameAndTrylevel(_SEH2Frame_t
*, volatile _SEH2TryLevel_t
*);
104 extern __attribute__((returns_twice
)) int __cdecl
_SEH2EnterFrameAndHandleTrylevel(_SEH2Frame_t
*, volatile _SEH2HandleTryLevel_t
*, void *);
105 extern __attribute__((returns_twice
)) int __cdecl
_SEH2EnterHandleTrylevel(_SEH2Frame_t
*, volatile _SEH2HandleTryLevel_t
*, void *);
106 extern void __cdecl
_SEH2LeaveFrame(void);
107 extern void __cdecl
_SEH2Return(void);
113 /* A no-op side effect that scares GCC */
114 #define __SEH_SIDE_EFFECT __asm__ __volatile__("#")
116 /* A no-op without any real side effects, but silences warnings */
117 #define __SEH_PRETEND_SIDE_EFFECT (void)0
119 /* Forces GCC to consider the specified label reachable */
120 #define __SEH_USE_LABEL(L_) if(__SEH_VOLATILE_FALSE) goto L_;
122 /* Makes GCC pretend the specified label is reachable, to silence warnings */
123 #define __SEH_PRETEND_USE_LABEL(L_) (void)(&&L_)
125 /* Soft memory barrier */
126 #define __SEH_BARRIER __asm__ __volatile__("#":::"memory")
128 /* GCC doesn't know that this equals zero */
129 #define __SEH_VOLATILE_ZERO ({ int zero = 0; __asm__ __volatile__("#" : "+g" (zero)); zero; })
131 #define __SEH_VOLATILE_FALSE __builtin_expect(__SEH_VOLATILE_ZERO, 0)
132 #define __SEH_VOLATILE_TRUE __builtin_expect(!__SEH_VOLATILE_ZERO, 1)
134 #define ___SEH_STRINGIFY(X_) # X_
135 #define __SEH_STRINGIFY(X_) ___SEH_STRINGIFY(X_)
137 #define __SEH_EXCEPT_RET long
138 #define __SEH_EXCEPT_ARGS __attribute__((unused)) _SEH2Frame_t * _SEH2FrameP, __attribute__((unused)) struct _EXCEPTION_POINTERS * _SEHExceptionInformation
139 #define __SEH_EXCEPT_ARGS_ , __SEH_EXCEPT_ARGS
140 #define __SEH_EXCEPT_PFN __SEH_DECLARE_EXCEPT_PFN
141 #define __SEH_DECLARE_EXCEPT_PFN(NAME_) __SEH_EXCEPT_RET (__cdecl * NAME_)(__SEH_EXCEPT_ARGS)
142 #define __SEH_DECLARE_EXCEPT(NAME_) __SEH_EXCEPT_RET __cdecl NAME_(__SEH_EXCEPT_ARGS)
143 #define __SEH_DEFINE_EXCEPT(NAME_) __SEH_EXCEPT_RET __cdecl NAME_(__SEH_EXCEPT_ARGS)
145 #define __SEH_FINALLY_RET void
146 #define __SEH_FINALLY_ARGS void
147 #define __SEH_FINALLY_ARGS_
148 #define __SEH_FINALLY_PFN __SEH_DECLARE_FINALLY_PFN
149 #define __SEH_DECLARE_FINALLY_PFN(NAME_) __SEH_FINALLY_RET (__cdecl * NAME_)(__SEH_FINALLY_ARGS)
150 #define __SEH_DECLARE_FINALLY(NAME_) __SEH_FINALLY_RET __cdecl NAME_(__SEH_FINALLY_ARGS)
151 #define __SEH_DEFINE_FINALLY(NAME_) __SEH_FINALLY_RET __cdecl NAME_(__SEH_FINALLY_ARGS)
153 #define __SEH_RETURN_EXCEPT(R_) return (long)(R_)
154 #define __SEH_RETURN_FINALLY() return
156 #define __SEH_BEGIN_TRY \
158 __label__ _SEHEndTry; \
160 __SEH_PRETEND_USE_LABEL(_SEHEndTry); \
165 #define __SEH_END_TRY \
171 #define __SEH_SET_TRYLEVEL(TRYLEVEL_) \
173 __SEH_BARRIER; _SEH2FrameP->SF_TopTryLevel = (TRYLEVEL_); __SEH_BARRIER; \
176 #define __SEH_ENTER_FRAME_AND_TRYLEVEL(TRYLEVEL_) (_SEH2EnterFrameAndTrylevel(_SEH2FrameP, (TRYLEVEL_)))
177 #define __SEH_ENTER_TRYLEVEL(TRYLEVEL_) ((__SEH_SET_TRYLEVEL((TRYLEVEL_))), 0)
179 #define __SEH_ENTER_FRAME_AND_HANDLE_TRYLEVEL(TRYLEVEL_, HANDLE_) _SEH2EnterFrameAndHandleTrylevel(_SEH2FrameP, (TRYLEVEL_), (HANDLE_))
180 #define __SEH_ENTER_HANDLE_TRYLEVEL(TRYLEVEL_, HANDLE_) _SEH2EnterHandleTrylevel(_SEH2FrameP, (TRYLEVEL_), (HANDLE_))
182 #define __SEH_ENTER_SCOPE(TRYLEVEL_) (_SEHTopTryLevel ? __SEH_ENTER_FRAME_AND_TRYLEVEL(TRYLEVEL_) : __SEH_ENTER_TRYLEVEL(TRYLEVEL_))
183 #define __SEH_ENTER_HANDLE_SCOPE(TRYLEVEL_, HANDLE_) (({ __SEH_BARRIER; __asm__ __volatile__("mov %%esp, %0" : "=m" ((TRYLEVEL_)->SHT_Esp)); __SEH_BARRIER; }), (_SEHTopTryLevel ? __SEH_ENTER_FRAME_AND_HANDLE_TRYLEVEL((TRYLEVEL_), (HANDLE_)) : __SEH_ENTER_HANDLE_TRYLEVEL((TRYLEVEL_), (HANDLE_))))
185 #define __SEH_LEAVE_TRYLEVEL() \
186 if(!_SEHTopTryLevel) \
188 __SEH_SET_TRYLEVEL(_SEHPrevTryLevelP); \
191 #define __SEH_LEAVE_FRAME() \
192 if(_SEHTopTryLevel) \
195 __asm__ __volatile__("mov %0, %%esp" : : "g" (_SEHStackPointer)); \
198 #define __SEH_END_SCOPE_CHAIN \
199 static __attribute__((unused)) const int _SEH2ScopeKind = 1; \
200 static __attribute__((unused)) _SEH2Frame_t * const _SEH2FrameP = 0; \
201 static __attribute__((unused)) _SEH2TryLevel_t * const _SEH2TryLevelP = 0;
203 #define __SEH_BEGIN_SCOPE \
206 const int _SEHTopTryLevel = (_SEH2ScopeKind != 0); \
207 _SEH2Frame_t * const _SEHCurFrameP = _SEH2FrameP; \
208 volatile _SEH2TryLevel_t * const _SEHPrevTryLevelP = _SEH2TryLevelP; \
209 __attribute__((unused)) int _SEHAbnormalTermination; \
211 (void)_SEHTopTryLevel; \
212 (void)_SEHCurFrameP; \
213 (void)_SEHPrevTryLevelP; \
216 __label__ _SEHBeforeTry; \
217 __label__ _SEHDoTry; \
218 __label__ _SEHAfterTry; \
219 static const int _SEH2ScopeKind = 0; \
220 volatile _SEH2TryLevel_t _SEHTryLevel; \
221 volatile _SEH2HandleTryLevel_t _SEHHandleTryLevel; \
222 void * _SEHStackPointer; \
223 volatile _SEH2TryLevel_t * _SEH2TryLevelP; \
224 _SEH2Frame_t * const _SEH2FrameP = _SEHTopTryLevel ? \
225 ({ __asm__ __volatile__("mov %%esp, %0" : "=g" (_SEHStackPointer)); __builtin_alloca(sizeof(_SEH2Frame_t)); }) : \
228 (void)_SEH2ScopeKind; \
229 (void)_SEHTryLevel; \
230 (void)_SEHHandleTryLevel; \
231 (void)_SEHStackPointer; \
233 (void)_SEH2TryLevelP; \
235 goto _SEHBeforeTry; \
239 #define __SEH_END_SCOPE \
245 #define __SEH_SCOPE_LOCALS \
246 __label__ _SEHBeginExcept; \
247 __label__ _SEHEndExcept; \
249 auto __SEH_DECLARE_FINALLY(_SEHFinally);
254 __SEH_SCOPE_LOCALS; \
259 #define _SEH2_FINALLY \
266 __SEH_PRETEND_USE_LABEL(_SEHBeginExcept); \
267 __SEH_PRETEND_USE_LABEL(_SEHEndExcept); \
269 _SEHTryLevel.ST_Filter = 0; \
270 _SEHTryLevel.ST_Body = &_SEHFinally; \
271 _SEHTryLevel.ST_Next = _SEHPrevTryLevelP; \
272 __SEH_ENTER_SCOPE(&_SEHTryLevel); \
273 _SEH2TryLevelP = &_SEHTryLevel; \
275 _SEHAbnormalTermination = 1; \
280 _SEHAbnormalTermination = 0; \
282 __SEH_LEAVE_TRYLEVEL(); \
285 goto _SEHEndExcept; \
289 __attribute__((noinline)) __SEH_DEFINE_FINALLY(_SEHFinally) \
291 __SEH_END_SCOPE_CHAIN; \
293 (void)_SEH2ScopeKind; \
295 (void)_SEH2TryLevelP; \
297 for(;; ({ __SEH_RETURN_FINALLY(); })) \
300 #define _SEH2_EXCEPT(...) \
309 __attribute__((unused)) struct _EXCEPTION_POINTERS * volatile _SEHExceptionInformation; \
311 if(__builtin_constant_p((__VA_ARGS__)) && (__VA_ARGS__) <= 0) \
313 if((__VA_ARGS__) < 0) \
315 _SEHTryLevel.ST_Filter = (void *)-1; \
316 _SEHTryLevel.ST_Body = 0; \
320 _SEHTryLevel.ST_Filter = (void *)0; \
321 _SEHTryLevel.ST_Body = 0; \
324 _SEHTryLevel.ST_Next = _SEHPrevTryLevelP; \
325 __SEH_ENTER_SCOPE(&_SEHTryLevel); \
326 _SEH2TryLevelP = &_SEHTryLevel; \
330 if(__builtin_constant_p((__VA_ARGS__)) && (__VA_ARGS__) > 0) \
331 _SEHHandleTryLevel.SHT_Common.ST_Filter = (void *)1; \
334 __SEH_DEFINE_EXCEPT(_SEHExcept) \
336 __SEH_RETURN_EXCEPT((__VA_ARGS__)); \
339 _SEHHandleTryLevel.SHT_Common.ST_Filter = &_SEHExcept; \
342 _SEHHandleTryLevel.SHT_Common.ST_Next = _SEHPrevTryLevelP; \
343 _SEH2TryLevelP = &_SEHHandleTryLevel.SHT_Common; \
345 if(__builtin_expect(__SEH_ENTER_HANDLE_SCOPE(&_SEHHandleTryLevel, &&_SEHBeginExcept), 0)) \
346 goto _SEHBeginExcept; \
352 __attribute__((unused)) __SEH_DEFINE_FINALLY(_SEHFinally) { __SEH_RETURN_FINALLY(); } \
355 __SEH_LEAVE_TRYLEVEL(); \
357 goto _SEHEndExcept; \
371 __SEH_LEAVE_FRAME(); \
375 #define _SEH2_GetExceptionInformation() (_SEHExceptionInformation)
376 #define _SEH2_GetExceptionCode() ((_SEH2FrameP)->SF_Code)
377 #define _SEH2_AbnormalTermination() (_SEHAbnormalTermination)
379 #define _SEH2_YIELD(STMT_) \
382 if(!_SEH2ScopeKind) \
388 #define _SEH2_LEAVE goto _SEHEndTry
390 __SEH_END_SCOPE_CHAIN
;
394 #error no PSEH support
397 #endif /* !KJK_PSEH2_H_ */