Release 1.5.29.
[wine] / dlls / msvcrt / except_arm.c
1 /*
2  * msvcrt C++ exception handling
3  *
4  * Copyright 2011 Alexandre Julliard
5  * Copyright 2013 AndrĂ© Hentschel
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 #include "config.h"
23 #include "wine/port.h"
24
25 #ifdef __arm__
26
27 #include <stdarg.h>
28
29 #include "ntstatus.h"
30 #define WIN32_NO_STATUS
31 #include "windef.h"
32 #include "winbase.h"
33 #include "winternl.h"
34 #include "msvcrt.h"
35 #include "wine/exception.h"
36 #include "excpt.h"
37 #include "wine/debug.h"
38
39 #include "cppexcept.h"
40
41 WINE_DEFAULT_DEBUG_CHANNEL(seh);
42
43 struct _DISPATCHER_CONTEXT;
44
45 typedef LONG (WINAPI *PC_LANGUAGE_EXCEPTION_HANDLER)(EXCEPTION_POINTERS *ptrs, DWORD frame);
46 typedef EXCEPTION_DISPOSITION (WINAPI *PEXCEPTION_ROUTINE)(EXCEPTION_RECORD *rec, DWORD frame,
47                                                            CONTEXT *context,
48                                                            struct _DISPATCHER_CONTEXT *dispatch);
49
50 typedef struct _DISPATCHER_CONTEXT
51 {
52     DWORD                 ControlPc;
53     DWORD                 ImageBase;
54     PRUNTIME_FUNCTION     FunctionEntry;
55     DWORD                 EstablisherFrame;
56     DWORD                 TargetPc;
57     PCONTEXT              ContextRecord;
58     PEXCEPTION_ROUTINE    LanguageHandler;
59     PVOID                 HandlerData;
60     PUNWIND_HISTORY_TABLE HistoryTable;
61     DWORD                 ScopeIndex;
62     BOOLEAN               ControlPcIsUnwound;
63     PBYTE                 NonVolatileRegisters;
64     DWORD                 VirtualVfpHead;
65 } DISPATCHER_CONTEXT;
66
67
68 /*********************************************************************
69  *              __CxxFrameHandler (MSVCRT.@)
70  */
71 EXCEPTION_DISPOSITION CDECL __CxxFrameHandler(EXCEPTION_RECORD *rec, DWORD frame, CONTEXT *context,
72                                               DISPATCHER_CONTEXT *dispatch)
73 {
74     FIXME("%p %x %p %p: not implemented\n", rec, frame, context, dispatch);
75     return ExceptionContinueSearch;
76 }
77
78
79 /*********************************************************************
80  *              __CppXcptFilter (MSVCRT.@)
81  */
82 int CDECL __CppXcptFilter(NTSTATUS ex, PEXCEPTION_POINTERS ptr)
83 {
84     /* only filter c++ exceptions */
85     if (ex != CXX_EXCEPTION) return EXCEPTION_CONTINUE_SEARCH;
86     return _XcptFilter(ex, ptr);
87 }
88
89
90 /*********************************************************************
91  *              __CxxDetectRethrow (MSVCRT.@)
92  */
93 BOOL CDECL __CxxDetectRethrow(PEXCEPTION_POINTERS ptrs)
94 {
95     PEXCEPTION_RECORD rec;
96
97     if (!ptrs)
98         return FALSE;
99
100     rec = ptrs->ExceptionRecord;
101
102     if (rec->ExceptionCode == CXX_EXCEPTION &&
103         rec->NumberParameters == 3 &&
104         rec->ExceptionInformation[0] == CXX_FRAME_MAGIC_VC6 &&
105         rec->ExceptionInformation[2])
106     {
107         ptrs->ExceptionRecord = msvcrt_get_thread_data()->exc_record;
108         return TRUE;
109     }
110     return (msvcrt_get_thread_data()->exc_record == rec);
111 }
112
113
114 /*********************************************************************
115  *              __CxxQueryExceptionSize (MSVCRT.@)
116  */
117 unsigned int CDECL __CxxQueryExceptionSize(void)
118 {
119     return sizeof(cxx_exception_type);
120 }
121
122
123 /*******************************************************************
124  *              _setjmp (MSVCRT.@)
125  */
126 __ASM_GLOBAL_FUNC(MSVCRT__setjmp,
127                   "mov r1, #0\n\t"  /* frame */
128                   "b " __ASM_NAME("MSVCRT__setjmpex"));
129
130 /*******************************************************************
131  *              _setjmpex (MSVCRT.@)
132  */
133 __ASM_GLOBAL_FUNC(MSVCRT__setjmpex,
134                   "str r1, [r0]\n\t"              /* jmp_buf->Frame */
135                   "str r4, [r0, #0x4]\n\t"        /* jmp_buf->R4 */
136                   "str r5, [r0, #0x8]\n\t"        /* jmp_buf->R5 */
137                   "str r6, [r0, #0xc]\n\t"        /* jmp_buf->R6 */
138                   "str r7, [r0, #0x10]\n\t"       /* jmp_buf->R7 */
139                   "str r8, [r0, #0x14]\n\t"       /* jmp_buf->R8 */
140                   "str r9, [r0, #0x18]\n\t"       /* jmp_buf->R9 */
141                   "str r10, [r0, #0x1c]\n\t"      /* jmp_buf->R10 */
142                   "str r11, [r0, #0x20]\n\t"      /* jmp_buf->R11 */
143                   "str sp, [r0, #0x24]\n\t"       /* jmp_buf->Sp */
144                   "str lr, [r0, #0x28]\n\t"       /* jmp_buf->Pc */
145                   /* FIXME: Save floating point data */
146                   "mov r0, #0\n\t"
147                   "bx lr");
148
149
150 extern void DECLSPEC_NORETURN CDECL longjmp_set_regs(struct MSVCRT___JUMP_BUFFER *jmp, int retval);
151 __ASM_GLOBAL_FUNC(longjmp_set_regs,
152                   "ldr r4, [r0, #0x4]\n\t"        /* jmp_buf->R4 */
153                   "ldr r5, [r0, #0x8]\n\t"        /* jmp_buf->R5 */
154                   "ldr r6, [r0, #0xc]\n\t"        /* jmp_buf->R6 */
155                   "ldr r7, [r0, #0x10]\n\t"       /* jmp_buf->R7 */
156                   "ldr r8, [r0, #0x14]\n\t"       /* jmp_buf->R8 */
157                   "ldr r9, [r0, #0x18]\n\t"       /* jmp_buf->R9 */
158                   "ldr r10, [r0, #0x1c]\n\t"      /* jmp_buf->R10 */
159                   "ldr r11, [r0, #0x20]\n\t"      /* jmp_buf->R11 */
160                   "ldr sp, [r0, #0x24]\n\t"       /* jmp_buf->Sp */
161                   "ldr r2, [r0, #0x28]\n\t"       /* jmp_buf->Pc */
162                   /* FIXME: Restore floating point data */
163                   "mov r0, r1\n\t"                /* retval */
164                   "bx r2");
165
166 /*******************************************************************
167  *              longjmp (MSVCRT.@)
168  */
169 void __cdecl MSVCRT_longjmp(struct MSVCRT___JUMP_BUFFER *jmp, int retval)
170 {
171     EXCEPTION_RECORD rec;
172
173     if (!retval) retval = 1;
174     if (jmp->Frame)
175     {
176         rec.ExceptionCode = STATUS_LONGJUMP;
177         rec.ExceptionFlags = 0;
178         rec.ExceptionRecord = NULL;
179         rec.ExceptionAddress = NULL;
180         rec.NumberParameters = 1;
181         rec.ExceptionInformation[0] = (DWORD_PTR)jmp;
182         RtlUnwind((void *)jmp->Frame, (void *)jmp->Pc, &rec, IntToPtr(retval));
183     }
184     longjmp_set_regs(jmp, retval);
185 }
186
187 #endif  /* __arm__ */