?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
crypt32/tests: Don't crash on some win9x boxes.
[wine.git] / dlls / ntdll / signal_i386.c
blobfb2c0fdd160a97669c24ac63da306c51934b4e53
1 /*
2 * i386 signal handling routines
3 *
4 * Copyright 1999 Alexandre Julliard
5 *
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
10 *
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
15 *
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 */
20
21 #ifdef __i386__
22
23 #include "config.h"
24 #include "wine/port.h"
25
26 #include <errno.h>
27 #include <signal.h>
28 #include <stdlib.h>
29 #include <stdarg.h>
30 #include <stdio.h>
31 #include <sys/types.h>
32 #ifdef HAVE_UNISTD_H
33 # include <unistd.h>
34 #endif
35
36 #ifdef HAVE_SYS_PARAM_H
37 # include <sys/param.h>
38 #endif
39 #ifdef HAVE_SYSCALL_H
40 # include <syscall.h>
41 #else
42 # ifdef HAVE_SYS_SYSCALL_H
43 # include <sys/syscall.h>
44 # endif
45 #endif
46
47 #ifdef HAVE_SYS_VM86_H
48 # include <sys/vm86.h>
49 #endif
50
51 #ifdef HAVE_SYS_SIGNAL_H
52 # include <sys/signal.h>
53 #endif
54 #ifdef HAVE_SYS_SYSCTL_H
55 # include <sys/sysctl.h>
56 #endif
57
58 #include "windef.h"
59 #include "wine/library.h"
60 #include "ntdll_misc.h"
61 #include "wine/exception.h"
62 #include "wine/debug.h"
63
64 #ifdef HAVE_VALGRIND_MEMCHECK_H
65 #include <valgrind/memcheck.h>
66 #endif
67
68 #undef ERR /* Solaris needs to define this */
69
70 /* not defined for x86, so copy the x86_64 definition */
71 typedef struct DECLSPEC_ALIGN(16) _M128A
72 {
73 ULONGLONG Low;
74 LONGLONG High;
75 } M128A;
76
77 typedef struct
78 {
79 WORD ControlWord;
80 WORD StatusWord;
81 BYTE TagWord;
82 BYTE Reserved1;
83 WORD ErrorOpcode;
84 DWORD ErrorOffset;
85 WORD ErrorSelector;
86 WORD Reserved2;
87 DWORD DataOffset;
88 WORD DataSelector;
89 WORD Reserved3;
90 DWORD MxCsr;
91 DWORD MxCsr_Mask;
92 M128A FloatRegisters[8];
93 M128A XmmRegisters[16];
94 BYTE Reserved4[96];
95 } XMM_SAVE_AREA32;
96
97 /***********************************************************************
98 * signal context platform-specific definitions
99 */
100
101 #ifdef linux
102
103 typedef ucontext_t SIGCONTEXT;
104
105 #define EAX_sig(context) ((context)->uc_mcontext.gregs[REG_EAX])
106 #define EBX_sig(context) ((context)->uc_mcontext.gregs[REG_EBX])
107 #define ECX_sig(context) ((context)->uc_mcontext.gregs[REG_ECX])
108 #define EDX_sig(context) ((context)->uc_mcontext.gregs[REG_EDX])
109 #define ESI_sig(context) ((context)->uc_mcontext.gregs[REG_ESI])
110 #define EDI_sig(context) ((context)->uc_mcontext.gregs[REG_EDI])
111 #define EBP_sig(context) ((context)->uc_mcontext.gregs[REG_EBP])
112 #define ESP_sig(context) ((context)->uc_mcontext.gregs[REG_ESP])
113
114 #define CS_sig(context) ((context)->uc_mcontext.gregs[REG_CS])
115 #define DS_sig(context) ((context)->uc_mcontext.gregs[REG_DS])
116 #define ES_sig(context) ((context)->uc_mcontext.gregs[REG_ES])
117 #define SS_sig(context) ((context)->uc_mcontext.gregs[REG_SS])
118 #define FS_sig(context) ((context)->uc_mcontext.gregs[REG_FS])
119 #define GS_sig(context) ((context)->uc_mcontext.gregs[REG_GS])
120
121 #define EFL_sig(context) ((context)->uc_mcontext.gregs[REG_EFL])
122 #define EIP_sig(context) ((context)->uc_mcontext.gregs[REG_EIP])
123 #define TRAP_sig(context) ((context)->uc_mcontext.gregs[REG_TRAPNO])
124 #define ERROR_sig(context) ((context)->uc_mcontext.gregs[REG_ERR])
125
126 #define FPU_sig(context) ((FLOATING_SAVE_AREA*)((context)->uc_mcontext.fpregs))
127 #define FPUX_sig(context) (FPU_sig(context) && !((context)->uc_mcontext.fpregs->status >> 16) ? (XMM_SAVE_AREA32 *)(FPU_sig(context) + 1) : NULL)
128
129 #define VM86_EAX 0 /* the %eax value while vm86_enter is executing */
130 #define VIF_FLAG 0x00080000
131 #define VIP_FLAG 0x00100000
132
133 int vm86_enter( void **vm86_ptr );
134 void vm86_return(void);
135 void vm86_return_end(void);
136 __ASM_GLOBAL_FUNC(vm86_enter,
137 "pushl %ebp\n\t"
138 "movl %esp, %ebp\n\t"
139 "movl $166,%eax\n\t" /*SYS_vm86*/
140 "movl 8(%ebp),%ecx\n\t" /* vm86_ptr */
141 "movl (%ecx),%ecx\n\t"
142 "pushl %ebx\n\t"
143 "movl $1,%ebx\n\t" /*VM86_ENTER*/
144 "pushl %ecx\n\t" /* put vm86plus_struct ptr somewhere we can find it */
145 "pushl %fs\n\t"
146 "pushl %gs\n\t"
147 "int $0x80\n"
148 ".globl " __ASM_NAME("vm86_return") "\n\t"
149 __ASM_FUNC("vm86_return") "\n"
150 __ASM_NAME("vm86_return") ":\n\t"
151 "popl %gs\n\t"
152 "popl %fs\n\t"
153 "popl %ecx\n\t"
154 "popl %ebx\n\t"
155 "popl %ebp\n\t"
156 "testl %eax,%eax\n\t"
157 "jl 0f\n\t"
158 "cmpb $0,%al\n\t" /* VM86_SIGNAL */
159 "je " __ASM_NAME("vm86_enter") "\n\t"
160 "0:\n\t"
161 "movl 4(%esp),%ecx\n\t" /* vm86_ptr */
162 "movl $0,(%ecx)\n\t"
163 ".globl " __ASM_NAME("vm86_return_end") "\n\t"
164 __ASM_FUNC("vm86_return_end") "\n"
165 __ASM_NAME("vm86_return_end") ":\n\t"
166 "ret" )
167
168 #ifdef HAVE_SYS_VM86_H
169 # define __HAVE_VM86
170 #endif
171
172 #endif /* linux */
173
174 #ifdef BSDI
175
176 #include <machine/frame.h>
177 typedef struct trapframe SIGCONTEXT;
178
179 #define EAX_sig(context) ((context)->tf_eax)
180 #define EBX_sig(context) ((context)->tf_ebx)
181 #define ECX_sig(context) ((context)->tf_ecx)
182 #define EDX_sig(context) ((context)->tf_edx)
183 #define ESI_sig(context) ((context)->tf_esi)
184 #define EDI_sig(context) ((context)->tf_edi)
185 #define EBP_sig(context) ((context)->tf_ebp)
186
187 #define CS_sig(context) ((context)->tf_cs)
188 #define DS_sig(context) ((context)->tf_ds)
189 #define ES_sig(context) ((context)->tf_es)
190 #define SS_sig(context) ((context)->tf_ss)
191
192 #define EFL_sig(context) ((context)->tf_eflags)
193
194 #define EIP_sig(context) (*((unsigned long*)&(context)->tf_eip))
195 #define ESP_sig(context) (*((unsigned long*)&(context)->tf_esp))
196
197 #define FPU_sig(context) NULL /* FIXME */
198 #define FPUX_sig(context) NULL /* FIXME */
199
200 #endif /* bsdi */
201
202 #if defined(__NetBSD__) || defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || defined(__OpenBSD__)
203
204 typedef struct sigcontext SIGCONTEXT;
205
206 #define EAX_sig(context) ((context)->sc_eax)
207 #define EBX_sig(context) ((context)->sc_ebx)
208 #define ECX_sig(context) ((context)->sc_ecx)
209 #define EDX_sig(context) ((context)->sc_edx)
210 #define ESI_sig(context) ((context)->sc_esi)
211 #define EDI_sig(context) ((context)->sc_edi)
212 #define EBP_sig(context) ((context)->sc_ebp)
213
214 #define CS_sig(context) ((context)->sc_cs)
215 #define DS_sig(context) ((context)->sc_ds)
216 #define ES_sig(context) ((context)->sc_es)
217 #define FS_sig(context) ((context)->sc_fs)
218 #define GS_sig(context) ((context)->sc_gs)
219 #define SS_sig(context) ((context)->sc_ss)
220
221 #define TRAP_sig(context) ((context)->sc_trapno)
222 #define ERROR_sig(context) ((context)->sc_err)
223 #define EFL_sig(context) ((context)->sc_eflags)
224
225 #define EIP_sig(context) ((context)->sc_eip)
226 #define ESP_sig(context) ((context)->sc_esp)
227
228 #define FPU_sig(context) NULL /* FIXME */
229 #define FPUX_sig(context) NULL /* FIXME */
230
231 #endif /* *BSD */
232
233 #if defined(__svr4__) || defined(_SCO_DS) || defined(__sun)
234
235 #ifdef _SCO_DS
236 #include <sys/regset.h>
237 #endif
238 #include <sys/ucontext.h>
239 typedef struct ucontext SIGCONTEXT;
240
241 #ifdef _SCO_DS
242 #define gregs regs
243 #endif
244
245 #define EAX_sig(context) ((context)->uc_mcontext.gregs[EAX])
246 #define EBX_sig(context) ((context)->uc_mcontext.gregs[EBX])
247 #define ECX_sig(context) ((context)->uc_mcontext.gregs[ECX])
248 #define EDX_sig(context) ((context)->uc_mcontext.gregs[EDX])
249 #define ESI_sig(context) ((context)->uc_mcontext.gregs[ESI])
250 #define EDI_sig(context) ((context)->uc_mcontext.gregs[EDI])
251 #define EBP_sig(context) ((context)->uc_mcontext.gregs[EBP])
252
253 #define CS_sig(context) ((context)->uc_mcontext.gregs[CS])
254 #define DS_sig(context) ((context)->uc_mcontext.gregs[DS])
255 #define ES_sig(context) ((context)->uc_mcontext.gregs[ES])
256 #define SS_sig(context) ((context)->uc_mcontext.gregs[SS])
257
258 #define FS_sig(context) ((context)->uc_mcontext.gregs[FS])
259 #define GS_sig(context) ((context)->uc_mcontext.gregs[GS])
260
261 #define EFL_sig(context) ((context)->uc_mcontext.gregs[EFL])
262
263 #define EIP_sig(context) ((context)->uc_mcontext.gregs[EIP])
264 #ifdef UESP
265 #define ESP_sig(context) ((context)->uc_mcontext.gregs[UESP])
266 #elif defined(R_ESP)
267 #define ESP_sig(context) ((context)->uc_mcontext.gregs[R_ESP])
268 #else
269 #define ESP_sig(context) ((context)->uc_mcontext.gregs[ESP])
270 #endif
271 #ifdef ERR
272 #define ERROR_sig(context) ((context)->uc_mcontext.gregs[ERR])
273 #endif
274 #ifdef TRAPNO
275 #define TRAP_sig(context) ((context)->uc_mcontext.gregs[TRAPNO])
276 #endif
277
278 #define FPU_sig(context) NULL /* FIXME */
279 #define FPUX_sig(context) NULL /* FIXME */
280
281 #endif /* svr4 || SCO_DS */
282
283 #ifdef __APPLE__
284 # include <sys/ucontext.h>
285
286 typedef ucontext_t SIGCONTEXT;
287
288 /* work around silly renaming of struct members in OS X 10.5 */
289 #if __DARWIN_UNIX03 && defined(_STRUCT_X86_EXCEPTION_STATE32)
290 #define EAX_sig(context) ((context)->uc_mcontext->__ss.__eax)
291 #define EBX_sig(context) ((context)->uc_mcontext->__ss.__ebx)
292 #define ECX_sig(context) ((context)->uc_mcontext->__ss.__ecx)
293 #define EDX_sig(context) ((context)->uc_mcontext->__ss.__edx)
294 #define ESI_sig(context) ((context)->uc_mcontext->__ss.__esi)
295 #define EDI_sig(context) ((context)->uc_mcontext->__ss.__edi)
296 #define EBP_sig(context) ((context)->uc_mcontext->__ss.__ebp)
297 #define CS_sig(context) ((context)->uc_mcontext->__ss.__cs)
298 #define DS_sig(context) ((context)->uc_mcontext->__ss.__ds)
299 #define ES_sig(context) ((context)->uc_mcontext->__ss.__es)
300 #define FS_sig(context) ((context)->uc_mcontext->__ss.__fs)
301 #define GS_sig(context) ((context)->uc_mcontext->__ss.__gs)
302 #define SS_sig(context) ((context)->uc_mcontext->__ss.__ss)
303 #define EFL_sig(context) ((context)->uc_mcontext->__ss.__eflags)
304 #define EIP_sig(context) (*((unsigned long*)&(context)->uc_mcontext->__ss.__eip))
305 #define ESP_sig(context) (*((unsigned long*)&(context)->uc_mcontext->__ss.__esp))
306 #define TRAP_sig(context) ((context)->uc_mcontext->__es.__trapno)
307 #define ERROR_sig(context) ((context)->uc_mcontext->__es.__err)
308 #define FPU_sig(context) NULL
309 #define FPUX_sig(context) ((XMM_SAVE_AREA32 *)&(context)->uc_mcontext->__fs.__fpu_fcw)
310 #else
311 #define EAX_sig(context) ((context)->uc_mcontext->ss.eax)
312 #define EBX_sig(context) ((context)->uc_mcontext->ss.ebx)
313 #define ECX_sig(context) ((context)->uc_mcontext->ss.ecx)
314 #define EDX_sig(context) ((context)->uc_mcontext->ss.edx)
315 #define ESI_sig(context) ((context)->uc_mcontext->ss.esi)
316 #define EDI_sig(context) ((context)->uc_mcontext->ss.edi)
317 #define EBP_sig(context) ((context)->uc_mcontext->ss.ebp)
318 #define CS_sig(context) ((context)->uc_mcontext->ss.cs)
319 #define DS_sig(context) ((context)->uc_mcontext->ss.ds)
320 #define ES_sig(context) ((context)->uc_mcontext->ss.es)
321 #define FS_sig(context) ((context)->uc_mcontext->ss.fs)
322 #define GS_sig(context) ((context)->uc_mcontext->ss.gs)
323 #define SS_sig(context) ((context)->uc_mcontext->ss.ss)
324 #define EFL_sig(context) ((context)->uc_mcontext->ss.eflags)
325 #define EIP_sig(context) (*((unsigned long*)&(context)->uc_mcontext->ss.eip))
326 #define ESP_sig(context) (*((unsigned long*)&(context)->uc_mcontext->ss.esp))
327 #define TRAP_sig(context) ((context)->uc_mcontext->es.trapno)
328 #define ERROR_sig(context) ((context)->uc_mcontext->es.err)
329 #define FPU_sig(context) NULL
330 #define FPUX_sig(context) ((XMM_SAVE_AREA32 *)&(context)->uc_mcontext->fs.fpu_fcw)
331 #endif
332
333 #endif /* __APPLE__ */
334
335 WINE_DEFAULT_DEBUG_CHANNEL(seh);
336
337 typedef int (*wine_signal_handler)(unsigned int sig);
338
339 static size_t signal_stack_mask;
340 static size_t signal_stack_size;
341
342 static wine_signal_handler handlers[256];
343
344 static int fpux_support; /* whether the CPU support extended fpu context */
345
346 extern void DECLSPEC_NORETURN __wine_call_from_32_restore_regs( const CONTEXT *context );
347
348 enum i386_trap_code
349 {
350 TRAP_x86_UNKNOWN = -1, /* Unknown fault (TRAP_sig not defined) */
351 #if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__)
352 TRAP_x86_DIVIDE = T_DIVIDE, /* Division by zero exception */
353 TRAP_x86_TRCTRAP = T_TRCTRAP, /* Single-step exception */
354 TRAP_x86_NMI = T_NMI, /* NMI interrupt */
355 TRAP_x86_BPTFLT = T_BPTFLT, /* Breakpoint exception */
356 TRAP_x86_OFLOW = T_OFLOW, /* Overflow exception */
357 TRAP_x86_BOUND = T_BOUND, /* Bound range exception */
358 TRAP_x86_PRIVINFLT = T_PRIVINFLT, /* Invalid opcode exception */
359 TRAP_x86_DNA = T_DNA, /* Device not available exception */
360 TRAP_x86_DOUBLEFLT = T_DOUBLEFLT, /* Double fault exception */
361 TRAP_x86_FPOPFLT = T_FPOPFLT, /* Coprocessor segment overrun */
362 TRAP_x86_TSSFLT = T_TSSFLT, /* Invalid TSS exception */
363 TRAP_x86_SEGNPFLT = T_SEGNPFLT, /* Segment not present exception */
364 TRAP_x86_STKFLT = T_STKFLT, /* Stack fault */
365 TRAP_x86_PROTFLT = T_PROTFLT, /* General protection fault */
366 TRAP_x86_PAGEFLT = T_PAGEFLT, /* Page fault */
367 TRAP_x86_ARITHTRAP = T_ARITHTRAP, /* Floating point exception */
368 TRAP_x86_ALIGNFLT = T_ALIGNFLT, /* Alignment check exception */
369 TRAP_x86_MCHK = T_MCHK, /* Machine check exception */
370 TRAP_x86_CACHEFLT = T_XMMFLT /* Cache flush exception */
371 #else
372 TRAP_x86_DIVIDE = 0, /* Division by zero exception */
373 TRAP_x86_TRCTRAP = 1, /* Single-step exception */
374 TRAP_x86_NMI = 2, /* NMI interrupt */
375 TRAP_x86_BPTFLT = 3, /* Breakpoint exception */
376 TRAP_x86_OFLOW = 4, /* Overflow exception */
377 TRAP_x86_BOUND = 5, /* Bound range exception */
378 TRAP_x86_PRIVINFLT = 6, /* Invalid opcode exception */
379 TRAP_x86_DNA = 7, /* Device not available exception */
380 TRAP_x86_DOUBLEFLT = 8, /* Double fault exception */
381 TRAP_x86_FPOPFLT = 9, /* Coprocessor segment overrun */
382 TRAP_x86_TSSFLT = 10, /* Invalid TSS exception */
383 TRAP_x86_SEGNPFLT = 11, /* Segment not present exception */
384 TRAP_x86_STKFLT = 12, /* Stack fault */
385 TRAP_x86_PROTFLT = 13, /* General protection fault */
386 TRAP_x86_PAGEFLT = 14, /* Page fault */
387 TRAP_x86_ARITHTRAP = 16, /* Floating point exception */
388 TRAP_x86_ALIGNFLT = 17, /* Alignment check exception */
389 TRAP_x86_MCHK = 18, /* Machine check exception */
390 TRAP_x86_CACHEFLT = 19 /* SIMD exception (via SIGFPE) if CPU is SSE capable
391 otherwise Cache flush exception (via SIGSEV) */
392 #endif
393 };
394
395
396 /***********************************************************************
397 * dispatch_signal
398 */
399 static inline int dispatch_signal(unsigned int sig)
400 {
401 if (handlers[sig] == NULL) return 0;
402 return handlers[sig](sig);
403 }
404
405
406 /***********************************************************************
407 * get_trap_code
408 *
409 * Get the trap code for a signal.
410 */
411 static inline enum i386_trap_code get_trap_code( const SIGCONTEXT *sigcontext )
412 {
413 #ifdef TRAP_sig
414 return TRAP_sig(sigcontext);
415 #else
416 return TRAP_x86_UNKNOWN; /* unknown trap code */
417 #endif
418 }
419
420 /***********************************************************************
421 * get_error_code
422 *
423 * Get the error code for a signal.
424 */
425 static inline WORD get_error_code( const SIGCONTEXT *sigcontext )
426 {
427 #ifdef ERROR_sig
428 return ERROR_sig(sigcontext);
429 #else
430 return 0;
431 #endif
432 }
433
434 /***********************************************************************
435 * get_signal_stack
436 *
437 * Get the base of the signal stack for the current thread.
438 */
439 static inline void *get_signal_stack(void)
440 {
441 return (char *)NtCurrentTeb() + 4096;
442 }
443
444
445 /***********************************************************************
446 * get_current_teb
447 *
448 * Get the current teb based on the stack pointer.
449 */
450 static inline TEB *get_current_teb(void)
451 {
452 unsigned long esp;
453 __asm__("movl %%esp,%0" : "=g" (esp) );
454 return (TEB *)(esp & ~signal_stack_mask);
455 }
456
457
458 #ifdef __HAVE_VM86
459 /***********************************************************************
460 * save_vm86_context
461 *
462 * Set the register values from a vm86 structure.
463 */
464 static void save_vm86_context( CONTEXT *context, const struct vm86plus_struct *vm86 )
465 {
466 context->ContextFlags = CONTEXT_FULL;
467 context->Eax = vm86->regs.eax;
468 context->Ebx = vm86->regs.ebx;
469 context->Ecx = vm86->regs.ecx;
470 context->Edx = vm86->regs.edx;
471 context->Esi = vm86->regs.esi;
472 context->Edi = vm86->regs.edi;
473 context->Esp = vm86->regs.esp;
474 context->Ebp = vm86->regs.ebp;
475 context->Eip = vm86->regs.eip;
476 context->SegCs = vm86->regs.cs;
477 context->SegDs = vm86->regs.ds;
478 context->SegEs = vm86->regs.es;
479 context->SegFs = vm86->regs.fs;
480 context->SegGs = vm86->regs.gs;
481 context->SegSs = vm86->regs.ss;
482 context->EFlags = vm86->regs.eflags;
483 }
484
485
486 /***********************************************************************
487 * restore_vm86_context
488 *
489 * Build a vm86 structure from the register values.
490 */
491 static void restore_vm86_context( const CONTEXT *context, struct vm86plus_struct *vm86 )
492 {
493 vm86->regs.eax = context->Eax;
494 vm86->regs.ebx = context->Ebx;
495 vm86->regs.ecx = context->Ecx;
496 vm86->regs.edx = context->Edx;
497 vm86->regs.esi = context->Esi;
498 vm86->regs.edi = context->Edi;
499 vm86->regs.esp = context->Esp;
500 vm86->regs.ebp = context->Ebp;
501 vm86->regs.eip = context->Eip;
502 vm86->regs.cs = context->SegCs;
503 vm86->regs.ds = context->SegDs;
504 vm86->regs.es = context->SegEs;
505 vm86->regs.fs = context->SegFs;
506 vm86->regs.gs = context->SegGs;
507 vm86->regs.ss = context->SegSs;
508 vm86->regs.eflags = context->EFlags;
509 }
510
511
512 /**********************************************************************
513 * merge_vm86_pending_flags
514 *
515 * Merges TEB.vm86_ptr and TEB.vm86_pending VIP flags and
516 * raises exception if there are pending events and VIF flag
517 * has been turned on.
518 *
519 * Called from __wine_enter_vm86 because vm86_enter
520 * doesn't check for pending events.
521 *
522 * Called from raise_vm86_sti_exception to check for
523 * pending events in a signal safe way.
524 */
525 static void merge_vm86_pending_flags( EXCEPTION_RECORD *rec )
526 {
527 BOOL check_pending = TRUE;
528 struct vm86plus_struct *vm86 =
529 (struct vm86plus_struct*)(ntdll_get_thread_data()->vm86_ptr);
530
531 /*
532 * In order to prevent a race when SIGUSR2 occurs while
533 * we are returning from exception handler, pending events
534 * will be rechecked after each raised exception.
535 */
536 while (check_pending && get_vm86_teb_info()->vm86_pending)
537 {
538 check_pending = FALSE;
539 ntdll_get_thread_data()->vm86_ptr = NULL;
540
541 /*
542 * If VIF is set, throw exception.
543 * Note that SIGUSR2 may turn VIF flag off so
544 * VIF check must occur only when TEB.vm86_ptr is NULL.
545 */
546 if (vm86->regs.eflags & VIF_FLAG)
547 {
548 CONTEXT vcontext;
549 save_vm86_context( &vcontext, vm86 );
550
551 rec->ExceptionCode = EXCEPTION_VM86_STI;
552 rec->ExceptionFlags = EXCEPTION_CONTINUABLE;
553 rec->ExceptionRecord = NULL;
554 rec->NumberParameters = 0;
555 rec->ExceptionAddress = (LPVOID)vcontext.Eip;
556
557 vcontext.EFlags &= ~VIP_FLAG;
558 get_vm86_teb_info()->vm86_pending = 0;
559 __regs_RtlRaiseException( rec, &vcontext );
560
561 restore_vm86_context( &vcontext, vm86 );
562 check_pending = TRUE;
563 }
564
565 ntdll_get_thread_data()->vm86_ptr = vm86;
566 }
567
568 /*
569 * Merge VIP flags in a signal safe way. This requires
570 * that the following operation compiles into atomic
571 * instruction.
572 */
573 vm86->regs.eflags |= get_vm86_teb_info()->vm86_pending;
574 }
575 #endif /* __HAVE_VM86 */
576
577
578 #ifdef __sun
579
580 /* We have to workaround two Solaris breakages:
581 * - Solaris doesn't restore %ds and %es before calling the signal handler so exceptions in 16-bit
582 * code crash badly.
583 * - Solaris inserts a libc trampoline to call our handler, but the trampoline expects that registers
584 * are setup correctly. So we need to insert our own trampoline below the libc trampoline to set %gs.
585 */
586
587 extern int sigaction_syscall( int sig, const struct sigaction *new, struct sigaction *old );
588 __ASM_GLOBAL_FUNC( sigaction_syscall,
589 "movl $0x62,%eax\n\t"
590 "int $0x91\n\t"
591 "ret" )
592
593 /* assume the same libc handler is used for all signals */
594 static void (*libc_sigacthandler)( int signal, siginfo_t *siginfo, void *context );
595
596 static void wine_sigacthandler( int signal, siginfo_t *siginfo, void *sigcontext )
597 {
598 struct ntdll_thread_data *thread_data;
599
600 __asm__ __volatile__("mov %ss,%ax; mov %ax,%ds; mov %ax,%es");
601
602 thread_data = (struct ntdll_thread_data *)get_current_teb()->SystemReserved2;
603 wine_set_fs( thread_data->fs );
604 wine_set_gs( thread_data->gs );
605
606 libc_sigacthandler( signal, siginfo, sigcontext );
607 }
608
609 static int solaris_sigaction( int sig, const struct sigaction *new, struct sigaction *old )
610 {
611 struct sigaction real_act;
612
613 if (sigaction( sig, new, old ) == -1) return -1;
614
615 /* retrieve the real handler and flags with a direct syscall */
616 sigaction_syscall( sig, NULL, &real_act );
617 libc_sigacthandler = real_act.sa_sigaction;
618 real_act.sa_sigaction = wine_sigacthandler;
619 sigaction_syscall( sig, &real_act, NULL );
620 return 0;
621 }
622 #define sigaction(sig,new,old) solaris_sigaction(sig,new,old)
623
624 #endif
625
626 typedef void (WINAPI *raise_func)( EXCEPTION_RECORD *rec, CONTEXT *context );
627
628
629 /***********************************************************************
630 * init_handler
631 *
632 * Handler initialization when the full context is not needed.
633 * Return the stack pointer to use for pushing the exception data.
634 */
635 static inline void *init_handler( const SIGCONTEXT *sigcontext, WORD *fs, WORD *gs )
636 {
637 TEB *teb = get_current_teb();
638 struct ntdll_thread_data *thread_data = (struct ntdll_thread_data *)teb->SystemReserved2;
639
640 /* get %fs and %gs at time of the fault */
641 #ifdef FS_sig
642 *fs = LOWORD(FS_sig(sigcontext));
643 #else
644 *fs = wine_get_fs();
645 #endif
646 #ifdef GS_sig
647 *gs = LOWORD(GS_sig(sigcontext));
648 #else
649 *gs = wine_get_gs();
650 #endif
651
652 #ifndef __sun /* see above for Solaris handling */
653 wine_set_fs( thread_data->fs );
654 wine_set_gs( thread_data->gs );
655 #endif
656
657 if (!wine_ldt_is_system(CS_sig(sigcontext)) ||
658 !wine_ldt_is_system(SS_sig(sigcontext))) /* 16-bit mode */
659 {
660 /*
661 * Win16 or DOS protected mode. Note that during switch
662 * from 16-bit mode to linear mode, CS may be set to system
663 * segment before FS is restored. Fortunately, in this case
664 * SS is still non-system segment. This is why both CS and SS
665 * are checked.
666 */
667 return teb->WOW32Reserved;
668 }
669 return (void *)(ESP_sig(sigcontext) & ~3);
670 }
671
672
673 /***********************************************************************
674 * save_fpu
675 *
676 * Save the thread FPU context.
677 */
678 static inline void save_fpu( CONTEXT *context )
679 {
680 #ifdef __GNUC__
681 context->ContextFlags |= CONTEXT_FLOATING_POINT;
682 __asm__ __volatile__( "fnsave %0; fwait" : "=m" (context->FloatSave) );
683 #endif
684 }
685
686
687 /***********************************************************************
688 * save_fpux
689 *
690 * Save the thread FPU extended context.
691 */
692 static inline void save_fpux( CONTEXT *context )
693 {
694 #ifdef __GNUC__
695 /* we have to enforce alignment by hand */
696 char buffer[sizeof(XMM_SAVE_AREA32) + 16];
697 XMM_SAVE_AREA32 *state = (XMM_SAVE_AREA32 *)(((ULONG_PTR)buffer + 15) & ~15);
698
699 __asm__ __volatile__( "fxsave %0" : "=m" (*state) );
700 context->ContextFlags |= CONTEXT_EXTENDED_REGISTERS;
701 memcpy( context->ExtendedRegisters, state, sizeof(*state) );
702 #endif
703 }
704
705
706 /***********************************************************************
707 * restore_fpu
708 *
709 * Restore the FPU context to a sigcontext.
710 */
711 static inline void restore_fpu( const CONTEXT *context )
712 {
713 FLOATING_SAVE_AREA float_status = context->FloatSave;
714 /* reset the current interrupt status */
715 float_status.StatusWord &= float_status.ControlWord | 0xffffff80;
716 #ifdef __GNUC__
717 __asm__ __volatile__( "frstor %0; fwait" : : "m" (float_status) );
718 #endif /* __GNUC__ */
719 }
720
721
722 /***********************************************************************
723 * restore_fpux
724 *
725 * Restore the FPU extended context to a sigcontext.
726 */
727 static inline void restore_fpux( const CONTEXT *context )
728 {
729 #ifdef __GNUC__
730 /* we have to enforce alignment by hand */
731 char buffer[sizeof(XMM_SAVE_AREA32) + 16];
732 XMM_SAVE_AREA32 *state = (XMM_SAVE_AREA32 *)(((ULONG_PTR)buffer + 15) & ~15);
733
734 memcpy( state, context->ExtendedRegisters, sizeof(*state) );
735 /* reset the current interrupt status */
736 state->StatusWord &= state->ControlWord | 0xff80;
737 __asm__ __volatile__( "fxrstor %0" : : "m" (*state) );
738 #endif
739 }
740
741
742 /***********************************************************************
743 * fpux_to_fpu
744 *
745 * Build a standard FPU context from an extended one.
746 */
747 static void fpux_to_fpu( FLOATING_SAVE_AREA *fpu, const XMM_SAVE_AREA32 *fpux )
748 {
749 unsigned int i, tag, stack_top;
750
751 fpu->ControlWord = fpux->ControlWord | 0xffff0000;
752 fpu->StatusWord = fpux->StatusWord | 0xffff0000;
753 fpu->ErrorOffset = fpux->ErrorOffset;
754 fpu->ErrorSelector = fpux->ErrorSelector | (fpux->ErrorOpcode << 16);
755 fpu->DataOffset = fpux->DataOffset;
756 fpu->DataSelector = fpux->DataSelector;
757 fpu->Cr0NpxState = fpux->StatusWord | 0xffff0000;
758
759 stack_top = (fpux->StatusWord >> 11) & 7;
760 fpu->TagWord = 0xffff0000;
761 for (i = 0; i < 8; i++)
762 {
763 memcpy( &fpu->RegisterArea[10 * i], &fpux->FloatRegisters[i], 10 );
764 if (!(fpux->TagWord & (1 << i))) tag = 3; /* empty */
765 else
766 {
767 const M128A *reg = &fpux->FloatRegisters[(i - stack_top) & 7];
768 if ((reg->High & 0x7fff) == 0x7fff) /* exponent all ones */
769 {
770 tag = 2; /* special */
771 }
772 else if (!(reg->High & 0x7fff)) /* exponent all zeroes */
773 {
774 if (reg->Low) tag = 2; /* special */
775 else tag = 1; /* zero */
776 }
777 else
778 {
779 if (reg->Low >> 63) tag = 0; /* valid */
780 else tag = 2; /* special */
781 }
782 }
783 fpu->TagWord |= tag << (2 * i);
784 }
785 }
786
787
788 /***********************************************************************
789 * save_context
790 *
791 * Build a context structure from the signal info.
792 */
793 static inline void save_context( CONTEXT *context, const SIGCONTEXT *sigcontext, WORD fs, WORD gs )
794 {
795 struct ntdll_thread_regs * const regs = ntdll_get_thread_regs();
796 FLOATING_SAVE_AREA *fpu = FPU_sig(sigcontext);
797 XMM_SAVE_AREA32 *fpux = FPUX_sig(sigcontext);
798
799 memset(context, 0, sizeof(*context));
800 context->ContextFlags = CONTEXT_FULL | CONTEXT_DEBUG_REGISTERS;
801 context->Eax = EAX_sig(sigcontext);
802 context->Ebx = EBX_sig(sigcontext);
803 context->Ecx = ECX_sig(sigcontext);
804 context->Edx = EDX_sig(sigcontext);
805 context->Esi = ESI_sig(sigcontext);
806 context->Edi = EDI_sig(sigcontext);
807 context->Ebp = EBP_sig(sigcontext);
808 context->EFlags = EFL_sig(sigcontext);
809 context->Eip = EIP_sig(sigcontext);
810 context->Esp = ESP_sig(sigcontext);
811 context->SegCs = LOWORD(CS_sig(sigcontext));
812 context->SegDs = LOWORD(DS_sig(sigcontext));
813 context->SegEs = LOWORD(ES_sig(sigcontext));
814 context->SegFs = fs;
815 context->SegGs = gs;
816 context->SegSs = LOWORD(SS_sig(sigcontext));
817 context->Dr0 = regs->dr0;
818 context->Dr1 = regs->dr1;
819 context->Dr2 = regs->dr2;
820 context->Dr3 = regs->dr3;
821 context->Dr6 = regs->dr6;
822 context->Dr7 = regs->dr7;
823
824 if (fpu)
825 {
826 context->ContextFlags |= CONTEXT_FLOATING_POINT;
827 context->FloatSave = *fpu;
828 }
829 if (fpux)
830 {
831 context->ContextFlags |= CONTEXT_FLOATING_POINT | CONTEXT_EXTENDED_REGISTERS;
832 memcpy( context->ExtendedRegisters, fpux, sizeof(*fpux) );
833 fpux_support = 1;
834 if (!fpu) fpux_to_fpu( &context->FloatSave, fpux );
835 }
836 if (!fpu && !fpux) save_fpu( context );
837 }
838
839
840 /***********************************************************************
841 * restore_context
842 *
843 * Restore the signal info from the context.
844 */
845 static inline void restore_context( const CONTEXT *context, SIGCONTEXT *sigcontext )
846 {
847 struct ntdll_thread_regs * const regs = ntdll_get_thread_regs();
848 FLOATING_SAVE_AREA *fpu = FPU_sig(sigcontext);
849 XMM_SAVE_AREA32 *fpux = FPUX_sig(sigcontext);
850
851 regs->dr0 = context->Dr0;
852 regs->dr1 = context->Dr1;
853 regs->dr2 = context->Dr2;
854 regs->dr3 = context->Dr3;
855 regs->dr6 = context->Dr6;
856 regs->dr7 = context->Dr7;
857 EAX_sig(sigcontext) = context->Eax;
858 EBX_sig(sigcontext) = context->Ebx;
859 ECX_sig(sigcontext) = context->Ecx;
860 EDX_sig(sigcontext) = context->Edx;
861 ESI_sig(sigcontext) = context->Esi;
862 EDI_sig(sigcontext) = context->Edi;
863 EBP_sig(sigcontext) = context->Ebp;
864 EFL_sig(sigcontext) = context->EFlags;
865 EIP_sig(sigcontext) = context->Eip;
866 ESP_sig(sigcontext) = context->Esp;
867 CS_sig(sigcontext) = context->SegCs;
868 DS_sig(sigcontext) = context->SegDs;
869 ES_sig(sigcontext) = context->SegEs;
870 SS_sig(sigcontext) = context->SegSs;
871 #ifdef GS_sig
872 GS_sig(sigcontext) = context->SegGs;
873 #else
874 wine_set_gs( context->SegGs );
875 #endif
876 #ifdef FS_sig
877 FS_sig(sigcontext) = context->SegFs;
878 #else
879 wine_set_fs( context->SegFs );
880 #endif
881
882 if (fpu) *fpu = context->FloatSave;
883 if (fpux) memcpy( fpux, context->ExtendedRegisters, sizeof(*fpux) );
884 if (!fpu && !fpux) restore_fpu( context );
885 }
886
887
888 /***********************************************************************
889 * get_cpu_context
890 *
891 * Register function to get the context of the current thread.
892 */
893 void WINAPI __regs_get_cpu_context( CONTEXT *context, CONTEXT *regs )
894 {
895 *context = *regs;
896 if (fpux_support) save_fpux( context );
897 else save_fpu( context );
898 }
899 DEFINE_REGS_ENTRYPOINT( get_cpu_context, 4, 4 )
900
901
902 /***********************************************************************
903 * set_cpu_context
904 *
905 * Set the new CPU context. Used by NtSetContextThread.
906 */
907 void set_cpu_context( const CONTEXT *context )
908 {
909 DWORD flags = context->ContextFlags & ~CONTEXT_i386;
910
911 if ((flags & CONTEXT_EXTENDED_REGISTERS) && fpux_support) restore_fpux( context );
912 else if (flags & CONTEXT_FLOATING_POINT) restore_fpu( context );
913
914 if (flags & CONTEXT_DEBUG_REGISTERS)
915 {
916 struct ntdll_thread_regs * const regs = ntdll_get_thread_regs();
917 regs->dr0 = context->Dr0;
918 regs->dr1 = context->Dr1;
919 regs->dr2 = context->Dr2;
920 regs->dr3 = context->Dr3;
921 regs->dr6 = context->Dr6;
922 regs->dr7 = context->Dr7;
923 }
924 if (flags & CONTEXT_FULL)
925 {
926 if (!(flags & CONTEXT_CONTROL))
927 FIXME( "setting partial context (%x) not supported\n", flags );
928 else if (flags & CONTEXT_SEGMENTS)
929 __wine_call_from_32_restore_regs( context );
930 else
931 {
932 CONTEXT newcontext = *context;
933 newcontext.SegDs = wine_get_ds();
934 newcontext.SegEs = wine_get_es();
935 newcontext.SegFs = wine_get_fs();
936 newcontext.SegGs = wine_get_gs();
937 __wine_call_from_32_restore_regs( &newcontext );
938 }
939 }
940 }
941
942
943 /***********************************************************************
944 * is_privileged_instr
945 *
946 * Check if the fault location is a privileged instruction.
947 * Based on the instruction emulation code in dlls/kernel/instr.c.
948 */
949 static inline DWORD is_privileged_instr( CONTEXT86 *context )
950 {
951 const BYTE *instr;
952 unsigned int prefix_count = 0;
953
954 if (!wine_ldt_is_system( context->SegCs )) return 0;
955 instr = (BYTE *)context->Eip;
956
957 for (;;) switch(*instr)
958 {
959 /* instruction prefixes */
960 case 0x2e: /* %cs: */
961 case 0x36: /* %ss: */
962 case 0x3e: /* %ds: */
963 case 0x26: /* %es: */
964 case 0x64: /* %fs: */
965 case 0x65: /* %gs: */
966 case 0x66: /* opcode size */
967 case 0x67: /* addr size */
968 case 0xf0: /* lock */
969 case 0xf2: /* repne */
970 case 0xf3: /* repe */
971 if (++prefix_count >= 15) return EXCEPTION_ILLEGAL_INSTRUCTION;
972 instr++;
973 continue;
974
975 case 0x0f: /* extended instruction */
976 switch(instr[1])
977 {
978 case 0x20: /* mov crX, reg */
979 case 0x21: /* mov drX, reg */
980 case 0x22: /* mov reg, crX */
981 case 0x23: /* mov reg drX */
982 return EXCEPTION_PRIV_INSTRUCTION;
983 }
984 return 0;
985 case 0x6c: /* insb (%dx) */
986 case 0x6d: /* insl (%dx) */
987 case 0x6e: /* outsb (%dx) */
988 case 0x6f: /* outsl (%dx) */
989 case 0xcd: /* int $xx */
990 case 0xe4: /* inb al,XX */
991 case 0xe5: /* in (e)ax,XX */
992 case 0xe6: /* outb XX,al */
993 case 0xe7: /* out XX,(e)ax */
994 case 0xec: /* inb (%dx),%al */
995 case 0xed: /* inl (%dx),%eax */
996 case 0xee: /* outb %al,(%dx) */
997 case 0xef: /* outl %eax,(%dx) */
998 case 0xf4: /* hlt */
999 case 0xfa: /* cli */
1000 case 0xfb: /* sti */
1001 return EXCEPTION_PRIV_INSTRUCTION;
1002 default:
1003 return 0;
1004 }
1005 }
1006
1007
1008 #include "pshpack1.h"
1009 struct atl_thunk
1010 {
1011 DWORD movl; /* movl this,4(%esp) */
1012 DWORD this;
1013 BYTE jmp; /* jmp func */
1014 int func;
1015 };
1016 #include "poppack.h"
1017
1018 /**********************************************************************
1019 * check_atl_thunk
1020 *
1021 * Check if code destination is an ATL thunk, and emulate it if so.
1022 */
1023 static BOOL check_atl_thunk( EXCEPTION_RECORD *rec, CONTEXT *context )
1024 {
1025 const struct atl_thunk *thunk = (const struct atl_thunk *)rec->ExceptionInformation[1];
1026 BOOL ret = FALSE;
1027
1028 __TRY
1029 {
1030 if (thunk->movl == 0x042444c7 && thunk->jmp == 0xe9)
1031 {
1032 *((DWORD *)context->Esp + 1) = thunk->this;
1033 context->Eip = (DWORD_PTR)(&thunk->func + 1) + thunk->func;
1034 TRACE( "emulating ATL thunk at %p, func=%08x arg=%08x\n",
1035 thunk, context->Eip, *((DWORD *)context->Esp + 1) );
1036 ret = TRUE;
1037 }
1038 }
1039 __EXCEPT_PAGE_FAULT
1040 {
1041 return FALSE;
1042 }
1043 __ENDTRY
1044 return ret;
1045 }
1046
1047
1048 /***********************************************************************
1049 * setup_exception_record
1050 *
1051 * Setup the exception record and context on the thread stack.
1052 */
1053 static EXCEPTION_RECORD *setup_exception_record( SIGCONTEXT *sigcontext, void *stack_ptr,
1054 WORD fs, WORD gs, raise_func func )
1055 {
1056 struct stack_layout
1057 {
1058 void *ret_addr; /* return address from raise_func */
1059 EXCEPTION_RECORD *rec_ptr; /* first arg for raise_func */
1060 CONTEXT *context_ptr; /* second arg for raise_func */
1061 CONTEXT context;
1062 EXCEPTION_RECORD rec;
1063 DWORD ebp;
1064 DWORD eip;
1065 } *stack = stack_ptr;
1066 DWORD exception_code = 0;
1067
1068 /* stack sanity checks */
1069
1070 if ((char *)stack >= (char *)get_signal_stack() &&
1071 (char *)stack < (char *)get_signal_stack() + signal_stack_size)
1072 {
1073 WINE_ERR( "nested exception on signal stack in thread %04x eip %08x esp %08x stack %p-%p\n",
1074 GetCurrentThreadId(), (unsigned int) EIP_sig(sigcontext),
1075 (unsigned int) ESP_sig(sigcontext), NtCurrentTeb()->Tib.StackLimit,
1076 NtCurrentTeb()->Tib.StackBase );
1077 server_abort_thread(1);
1078 }
1079
1080 if (stack - 1 > stack || /* check for overflow in subtraction */
1081 (char *)stack <= (char *)NtCurrentTeb()->DeallocationStack ||
1082 (char *)stack > (char *)NtCurrentTeb()->Tib.StackBase)
1083 {
1084 WARN( "exception outside of stack limits in thread %04x eip %08x esp %08x stack %p-%p\n",
1085 GetCurrentThreadId(), (unsigned int) EIP_sig(sigcontext),
1086 (unsigned int) ESP_sig(sigcontext), NtCurrentTeb()->Tib.StackLimit,
1087 NtCurrentTeb()->Tib.StackBase );
1088 }
1089 else if ((char *)(stack - 1) < (char *)NtCurrentTeb()->DeallocationStack + 4096)
1090 {
1091 /* stack overflow on last page, unrecoverable */
1092 UINT diff = (char *)NtCurrentTeb()->DeallocationStack + 4096 - (char *)(stack - 1);
1093 WINE_ERR( "stack overflow %u bytes in thread %04x eip %08x esp %08x stack %p-%p-%p\n",
1094 diff, GetCurrentThreadId(), (unsigned int) EIP_sig(sigcontext),
1095 (unsigned int) ESP_sig(sigcontext), NtCurrentTeb()->DeallocationStack,
1096 NtCurrentTeb()->Tib.StackLimit, NtCurrentTeb()->Tib.StackBase );
1097 server_abort_thread(1);
1098 }
1099 else if ((char *)(stack - 1) < (char *)NtCurrentTeb()->Tib.StackLimit)
1100 {
1101 /* stack access below stack limit, may be recoverable */
1102 if (virtual_handle_stack_fault( stack - 1 )) exception_code = EXCEPTION_STACK_OVERFLOW;
1103 else
1104 {
1105 UINT diff = (char *)NtCurrentTeb()->Tib.StackLimit - (char *)(stack - 1);
1106 WINE_ERR( "stack overflow %u bytes in thread %04x eip %08x esp %08x stack %p-%p-%p\n",
1107 diff, GetCurrentThreadId(), (unsigned int) EIP_sig(sigcontext),
1108 (unsigned int) ESP_sig(sigcontext), NtCurrentTeb()->DeallocationStack,
1109 NtCurrentTeb()->Tib.StackLimit, NtCurrentTeb()->Tib.StackBase );
1110 server_abort_thread(1);
1111 }
1112 }
1113
1114 stack--; /* push the stack_layout structure */
1115 #if defined(VALGRIND_MAKE_MEM_UNDEFINED)
1116 VALGRIND_MAKE_MEM_UNDEFINED(stack, sizeof(*stack));
1117 #elif defined(VALGRIND_MAKE_WRITABLE)
1118 VALGRIND_MAKE_WRITABLE(stack, sizeof(*stack));
1119 #endif
1120 stack->ret_addr = (void *)0xdeadbabe; /* raise_func must not return */
1121 stack->rec_ptr = &stack->rec;
1122 stack->context_ptr = &stack->context;
1123
1124 stack->rec.ExceptionRecord = NULL;
1125 stack->rec.ExceptionCode = exception_code;
1126 stack->rec.ExceptionFlags = EXCEPTION_CONTINUABLE;
1127 stack->rec.ExceptionAddress = (LPVOID)EIP_sig(sigcontext);
1128 stack->rec.NumberParameters = 0;
1129
1130 save_context( &stack->context, sigcontext, fs, gs );
1131
1132 /* now modify the sigcontext to return to the raise function */
1133 ESP_sig(sigcontext) = (DWORD)stack;
1134 EIP_sig(sigcontext) = (DWORD)func;
1135 /* clear single-step, direction, and align check flag */
1136 EFL_sig(sigcontext) &= ~(0x100|0x400|0x40000);
1137 CS_sig(sigcontext) = wine_get_cs();
1138 DS_sig(sigcontext) = wine_get_ds();
1139 ES_sig(sigcontext) = wine_get_es();
1140 FS_sig(sigcontext) = wine_get_fs();
1141 GS_sig(sigcontext) = wine_get_gs();
1142 SS_sig(sigcontext) = wine_get_ss();
1143
1144 return stack->rec_ptr;
1145 }
1146
1147
1148 /***********************************************************************
1149 * setup_exception
1150 *
1151 * Setup a proper stack frame for the raise function, and modify the
1152 * sigcontext so that the return from the signal handler will call
1153 * the raise function.
1154 */
1155 static EXCEPTION_RECORD *setup_exception( SIGCONTEXT *sigcontext, raise_func func )
1156 {
1157 WORD fs, gs;
1158 void *stack = init_handler( sigcontext, &fs, &gs );
1159
1160 return setup_exception_record( sigcontext, stack, fs, gs, func );
1161 }
1162
1163
1164 /***********************************************************************
1165 * get_exception_context
1166 *
1167 * Get a pointer to the context built by setup_exception.
1168 */
1169 static inline CONTEXT *get_exception_context( EXCEPTION_RECORD *rec )
1170 {
1171 return (CONTEXT *)rec - 1; /* cf. stack_layout structure */
1172 }
1173
1174
1175 /**********************************************************************
1176 * get_fpu_code
1177 *
1178 * Get the FPU exception code from the FPU status.
1179 */
1180 static inline DWORD get_fpu_code( const CONTEXT *context )
1181 {
1182 DWORD status = context->FloatSave.StatusWord;
1183
1184 if (status & 0x01) /* IE */
1185 {
1186 if (status & 0x40) /* SF */
1187 return EXCEPTION_FLT_STACK_CHECK;
1188 else
1189 return EXCEPTION_FLT_INVALID_OPERATION;
1190 }
1191 if (status & 0x02) return EXCEPTION_FLT_DENORMAL_OPERAND; /* DE flag */
1192 if (status & 0x04) return EXCEPTION_FLT_DIVIDE_BY_ZERO; /* ZE flag */
1193 if (status & 0x08) return EXCEPTION_FLT_OVERFLOW; /* OE flag */
1194 if (status & 0x10) return EXCEPTION_FLT_UNDERFLOW; /* UE flag */
1195 if (status & 0x20) return EXCEPTION_FLT_INEXACT_RESULT; /* PE flag */
1196 return EXCEPTION_FLT_INVALID_OPERATION; /* generic error */
1197 }
1198
1199
1200 /**********************************************************************
1201 * raise_segv_exception
1202 */
1203 static void WINAPI raise_segv_exception( EXCEPTION_RECORD *rec, CONTEXT *context )
1204 {
1205 switch(rec->ExceptionCode)
1206 {
1207 case EXCEPTION_ACCESS_VIOLATION:
1208 if (rec->NumberParameters == 2)
1209 {
1210 if (rec->ExceptionInformation[0] == EXCEPTION_EXECUTE_FAULT && check_atl_thunk( rec, context ))
1211 goto done;
1212 rec->ExceptionCode = VIRTUAL_HandleFault( (void *)rec->ExceptionInformation[1] );
1213 }
1214 break;
1215 case EXCEPTION_DATATYPE_MISALIGNMENT:
1216 /* FIXME: pass through exception handler first? */
1217 if (context->EFlags & 0x00040000)
1218 {
1219 /* Disable AC flag, return */
1220 context->EFlags &= ~0x00040000;
1221 goto done;
1222 }
1223 break;
1224 }
1225 __regs_RtlRaiseException( rec, context );
1226 done:
1227 NtSetContextThread( GetCurrentThread(), context );
1228 }
1229
1230
1231 /**********************************************************************
1232 * raise_trap_exception
1233 */
1234 static void WINAPI raise_trap_exception( EXCEPTION_RECORD *rec, CONTEXT *context )
1235 {
1236 if (rec->ExceptionCode == EXCEPTION_SINGLE_STEP)
1237 {
1238 struct ntdll_thread_regs * const regs = ntdll_get_thread_regs();
1239
1240 /* when single stepping can't tell whether this is a hw bp or a
1241 * single step interrupt. try to avoid as much overhead as possible
1242 * and only do a server call if there is any hw bp enabled. */
1243
1244 if( !(context->EFlags & 0x100) || (regs->dr7 & 0xff) )
1245 {
1246 /* (possible) hardware breakpoint, fetch the debug registers */
1247 context->ContextFlags = CONTEXT_DEBUG_REGISTERS;
1248 NtGetContextThread(GetCurrentThread(), context);
1249 context->ContextFlags |= CONTEXT_FULL; /* restore flags */
1250 }
1251
1252 context->EFlags &= ~0x100; /* clear single-step flag */
1253 }
1254
1255 __regs_RtlRaiseException( rec, context );
1256 NtSetContextThread( GetCurrentThread(), context );
1257 }
1258
1259
1260 /**********************************************************************
1261 * raise_exception
1262 *
1263 * Generic raise function for exceptions that don't need special treatment.
1264 */
1265 static void WINAPI raise_exception( EXCEPTION_RECORD *rec, CONTEXT *context )
1266 {
1267 __regs_RtlRaiseException( rec, context );
1268 NtSetContextThread( GetCurrentThread(), context );
1269 }
1270
1271
1272 #ifdef __HAVE_VM86
1273 /**********************************************************************
1274 * raise_vm86_sti_exception
1275 */
1276 static void WINAPI raise_vm86_sti_exception( EXCEPTION_RECORD *rec, CONTEXT *context )
1277 {
1278 /* merge_vm86_pending_flags merges the vm86_pending flag in safely */
1279 get_vm86_teb_info()->vm86_pending |= VIP_FLAG;
1280
1281 if (ntdll_get_thread_data()->vm86_ptr)
1282 {
1283 if (((char*)context->Eip >= (char*)vm86_return) &&
1284 ((char*)context->Eip <= (char*)vm86_return_end) &&
1285 (VM86_TYPE(context->Eax) != VM86_SIGNAL)) {
1286 /* exiting from VM86, can't throw */
1287 goto done;
1288 }
1289 merge_vm86_pending_flags( rec );
1290 }
1291 else if (get_vm86_teb_info()->dpmi_vif &&
1292 !wine_ldt_is_system(context->SegCs) &&
1293 !wine_ldt_is_system(context->SegSs))
1294 {
1295 /* Executing DPMI code and virtual interrupts are enabled. */
1296 get_vm86_teb_info()->vm86_pending = 0;
1297 __regs_RtlRaiseException( rec, context );
1298 }
1299 done:
1300 NtSetContextThread( GetCurrentThread(), context );
1301 }
1302
1303
1304 /**********************************************************************
1305 * usr2_handler
1306 *
1307 * Handler for SIGUSR2.
1308 * We use it to signal that the running __wine_enter_vm86() should
1309 * immediately set VIP_FLAG, causing pending events to be handled
1310 * as early as possible.
1311 */
1312 static void usr2_handler( int signal, siginfo_t *siginfo, void *sigcontext )
1313 {
1314 EXCEPTION_RECORD *rec = setup_exception( sigcontext, raise_vm86_sti_exception );
1315 rec->ExceptionCode = EXCEPTION_VM86_STI;
1316 }
1317 #endif /* __HAVE_VM86 */
1318
1319
1320 /**********************************************************************
1321 * segv_handler
1322 *
1323 * Handler for SIGSEGV and related errors.
1324 */
1325 static void segv_handler( int signal, siginfo_t *siginfo, void *sigcontext )
1326 {
1327 WORD fs, gs;
1328 EXCEPTION_RECORD *rec;
1329 SIGCONTEXT *context = sigcontext;
1330 void *stack = init_handler( sigcontext, &fs, &gs );
1331
1332 /* check for page fault inside the thread stack */
1333 if (get_trap_code(context) == TRAP_x86_PAGEFLT &&
1334 (char *)siginfo->si_addr >= (char *)NtCurrentTeb()->DeallocationStack &&
1335 (char *)siginfo->si_addr < (char *)NtCurrentTeb()->Tib.StackBase &&
1336 virtual_handle_stack_fault( siginfo->si_addr ))
1337 {
1338 /* check if this was the last guard page */
1339 if ((char *)siginfo->si_addr < (char *)NtCurrentTeb()->DeallocationStack + 2*4096)
1340 {
1341 rec = setup_exception_record( context, stack, fs, gs, raise_segv_exception );
1342 rec->ExceptionCode = EXCEPTION_STACK_OVERFLOW;
1343 }
1344 return;
1345 }
1346
1347 rec = setup_exception_record( context, stack, fs, gs, raise_segv_exception );
1348 if (rec->ExceptionCode == EXCEPTION_STACK_OVERFLOW) return;
1349
1350 switch(get_trap_code(context))
1351 {
1352 case TRAP_x86_OFLOW: /* Overflow exception */
1353 rec->ExceptionCode = EXCEPTION_INT_OVERFLOW;
1354 break;
1355 case TRAP_x86_BOUND: /* Bound range exception */
1356 rec->ExceptionCode = EXCEPTION_ARRAY_BOUNDS_EXCEEDED;
1357 break;
1358 case TRAP_x86_PRIVINFLT: /* Invalid opcode exception */
1359 rec->ExceptionCode = EXCEPTION_ILLEGAL_INSTRUCTION;
1360 break;
1361 case TRAP_x86_STKFLT: /* Stack fault */
1362 rec->ExceptionCode = EXCEPTION_STACK_OVERFLOW;
1363 break;
1364 case TRAP_x86_SEGNPFLT: /* Segment not present exception */
1365 case TRAP_x86_PROTFLT: /* General protection fault */
1366 case TRAP_x86_UNKNOWN: /* Unknown fault code */
1367 {
1368 WORD err = get_error_code(context);
1369 if (!err && (rec->ExceptionCode = is_privileged_instr( get_exception_context(rec) ))) break;
1370 rec->ExceptionCode = EXCEPTION_ACCESS_VIOLATION;
1371 rec->NumberParameters = 2;
1372 rec->ExceptionInformation[0] = 0;
1373 /* if error contains a LDT selector, use that as fault address */
1374 if ((err & 7) == 4 && !wine_ldt_is_system( err | 7 ))
1375 rec->ExceptionInformation[1] = err & ~7;
1376 else
1377 rec->ExceptionInformation[1] = 0xffffffff;
1378 }
1379 break;
1380 case TRAP_x86_PAGEFLT: /* Page fault */
1381 rec->ExceptionCode = EXCEPTION_ACCESS_VIOLATION;
1382 rec->NumberParameters = 2;
1383 rec->ExceptionInformation[0] = (get_error_code(context) >> 1) & 0x09;
1384 rec->ExceptionInformation[1] = (ULONG_PTR)siginfo->si_addr;
1385 break;
1386 case TRAP_x86_ALIGNFLT: /* Alignment check exception */
1387 rec->ExceptionCode = EXCEPTION_DATATYPE_MISALIGNMENT;
1388 break;
1389 default:
1390 WINE_ERR( "Got unexpected trap %d\n", get_trap_code(context) );
1391 /* fall through */
1392 case TRAP_x86_NMI: /* NMI interrupt */
1393 case TRAP_x86_DNA: /* Device not available exception */
1394 case TRAP_x86_DOUBLEFLT: /* Double fault exception */
1395 case TRAP_x86_TSSFLT: /* Invalid TSS exception */
1396 case TRAP_x86_MCHK: /* Machine check exception */
1397 case TRAP_x86_CACHEFLT: /* Cache flush exception */
1398 rec->ExceptionCode = EXCEPTION_ILLEGAL_INSTRUCTION;
1399 break;
1400 }
1401 }
1402
1403
1404 /**********************************************************************
1405 * trap_handler
1406 *
1407 * Handler for SIGTRAP.
1408 */
1409 static void trap_handler( int signal, siginfo_t *siginfo, void *sigcontext )
1410 {
1411 SIGCONTEXT *context = sigcontext;
1412 EXCEPTION_RECORD *rec = setup_exception( context, raise_trap_exception );
1413
1414 switch(get_trap_code(context))
1415 {
1416 case TRAP_x86_TRCTRAP: /* Single-step exception */
1417 rec->ExceptionCode = EXCEPTION_SINGLE_STEP;
1418 break;
1419 case TRAP_x86_BPTFLT: /* Breakpoint exception */
1420 rec->ExceptionAddress = (char *)rec->ExceptionAddress - 1; /* back up over the int3 instruction */
1421 /* fall through */
1422 default:
1423 rec->ExceptionCode = EXCEPTION_BREAKPOINT;
1424 break;
1425 }
1426 }
1427
1428
1429 /**********************************************************************
1430 * fpe_handler
1431 *
1432 * Handler for SIGFPE.
1433 */
1434 static void fpe_handler( int signal, siginfo_t *siginfo, void *sigcontext )
1435 {
1436 CONTEXT *win_context;
1437 SIGCONTEXT *context = sigcontext;
1438 EXCEPTION_RECORD *rec = setup_exception( context, raise_exception );
1439
1440 win_context = get_exception_context( rec );
1441
1442 switch(get_trap_code(context))
1443 {
1444 case TRAP_x86_DIVIDE: /* Division by zero exception */
1445 rec->ExceptionCode = EXCEPTION_INT_DIVIDE_BY_ZERO;
1446 break;
1447 case TRAP_x86_FPOPFLT: /* Coprocessor segment overrun */
1448 rec->ExceptionCode = EXCEPTION_FLT_INVALID_OPERATION;
1449 break;
1450 case TRAP_x86_ARITHTRAP: /* Floating point exception */
1451 case TRAP_x86_UNKNOWN: /* Unknown fault code */
1452 rec->ExceptionCode = get_fpu_code( win_context );
1453 break;
1454 case TRAP_x86_CACHEFLT: /* SIMD exception */
1455 /* TODO:
1456 * Behaviour only tested for divide-by-zero exceptions
1457 * Check for other SIMD exceptions as well */
1458 if(siginfo->si_code != FPE_FLTDIV)
1459 FIXME("untested SIMD exception: %#x. Might not work correctly\n",
1460 siginfo->si_code);
1461
1462 rec->ExceptionCode = STATUS_FLOAT_MULTIPLE_TRAPS;
1463 rec->NumberParameters = 1;
1464 /* no idea what meaning is actually behind this but that's what native does */
1465 rec->ExceptionInformation[0] = 0;
1466 break;
1467 default:
1468 WINE_ERR( "Got unexpected trap %d\n", get_trap_code(context) );
1469 rec->ExceptionCode = EXCEPTION_FLT_INVALID_OPERATION;
1470 break;
1471 }
1472 }
1473
1474
1475 /**********************************************************************
1476 * int_handler
1477 *
1478 * Handler for SIGINT.
1479 *
1480 * FIXME: should not be calling external functions on the signal stack.
1481 */
1482 static void int_handler( int signal, siginfo_t *siginfo, void *sigcontext )
1483 {
1484 WORD fs, gs;
1485 init_handler( sigcontext, &fs, &gs );
1486 if (!dispatch_signal(SIGINT))
1487 {
1488 EXCEPTION_RECORD *rec = setup_exception( sigcontext, raise_exception );
1489 rec->ExceptionCode = CONTROL_C_EXIT;
1490 }
1491 }
1492
1493 /**********************************************************************
1494 * abrt_handler
1495 *
1496 * Handler for SIGABRT.
1497 */
1498 static void abrt_handler( int signal, siginfo_t *siginfo, void *sigcontext )
1499 {
1500 EXCEPTION_RECORD *rec = setup_exception( sigcontext, raise_exception );
1501 rec->ExceptionCode = EXCEPTION_WINE_ASSERTION;
1502 rec->ExceptionFlags = EH_NONCONTINUABLE;
1503 }
1504
1505
1506 /**********************************************************************
1507 * quit_handler
1508 *
1509 * Handler for SIGQUIT.
1510 */
1511 static void quit_handler( int signal, siginfo_t *siginfo, void *sigcontext )
1512 {
1513 WORD fs, gs;
1514 init_handler( sigcontext, &fs, &gs );
1515 server_abort_thread(0);
1516 }
1517
1518
1519 /**********************************************************************
1520 * usr1_handler
1521 *
1522 * Handler for SIGUSR1, used to signal a thread that it got suspended.
1523 */
1524 static void usr1_handler( int signal, siginfo_t *siginfo, void *sigcontext )
1525 {
1526 CONTEXT context;
1527 WORD fs, gs;
1528
1529 init_handler( sigcontext, &fs, &gs );
1530 save_context( &context, sigcontext, fs, gs );
1531 wait_suspend( &context );
1532 restore_context( &context, sigcontext );
1533 }
1534
1535
1536 /**********************************************************************
1537 * get_signal_stack_total_size
1538 *
1539 * Retrieve the size to allocate for the signal stack, including the TEB at the bottom.
1540 * Must be a power of two.
1541 */
1542 size_t get_signal_stack_total_size(void)
1543 {
1544 static const size_t teb_size = 4096; /* we reserve one page for the TEB */
1545
1546 if (!signal_stack_size)
1547 {
1548 size_t size = 8192, min_size = teb_size + max( MINSIGSTKSZ, 8192 );
1549 /* find the first power of two not smaller than min_size */
1550 while (size < min_size) size *= 2;
1551 signal_stack_mask = size - 1;
1552 signal_stack_size = size - teb_size;
1553 }
1554 return signal_stack_size + teb_size;
1555 }
1556
1557
1558 /***********************************************************************
1559 * __wine_set_signal_handler (NTDLL.@)
1560 */
1561 int __wine_set_signal_handler(unsigned int sig, wine_signal_handler wsh)
1562 {
1563 if (sig >= sizeof(handlers) / sizeof(handlers[0])) return -1;
1564 if (handlers[sig] != NULL) return -2;
1565 handlers[sig] = wsh;
1566 return 0;
1567 }
1568
1569
1570 /**********************************************************************
1571 * signal_init_thread
1572 */
1573 void signal_init_thread(void)
1574 {
1575 #ifdef HAVE_SIGALTSTACK
1576 stack_t ss;
1577
1578 #ifdef __APPLE__
1579 int mib[2], val = 1;
1580
1581 mib[0] = CTL_KERN;
1582 mib[1] = KERN_THALTSTACK;
1583 sysctl( mib, 2, NULL, NULL, &val, sizeof(val) );
1584 #endif
1585
1586 ss.ss_sp = get_signal_stack();
1587 ss.ss_size = signal_stack_size;
1588 ss.ss_flags = 0;
1589 if (sigaltstack(&ss, NULL) == -1) perror( "sigaltstack" );
1590 #endif /* HAVE_SIGALTSTACK */
1591
1592 ntdll_get_thread_data()->gs = wine_get_gs();
1593 }
1594
1595 /**********************************************************************
1596 * signal_init_process
1597 */
1598 void signal_init_process(void)
1599 {
1600 struct sigaction sig_act;
1601
1602 sig_act.sa_mask = server_block_set;
1603 sig_act.sa_flags = SA_SIGINFO | SA_RESTART;
1604 #ifdef SA_ONSTACK
1605 sig_act.sa_flags |= SA_ONSTACK;
1606 #endif
1607
1608 sig_act.sa_sigaction = int_handler;
1609 if (sigaction( SIGINT, &sig_act, NULL ) == -1) goto error;
1610 sig_act.sa_sigaction = fpe_handler;
1611 if (sigaction( SIGFPE, &sig_act, NULL ) == -1) goto error;
1612 sig_act.sa_sigaction = abrt_handler;
1613 if (sigaction( SIGABRT, &sig_act, NULL ) == -1) goto error;
1614 sig_act.sa_sigaction = quit_handler;
1615 if (sigaction( SIGQUIT, &sig_act, NULL ) == -1) goto error;
1616 sig_act.sa_sigaction = usr1_handler;
1617 if (sigaction( SIGUSR1, &sig_act, NULL ) == -1) goto error;
1618
1619 sig_act.sa_sigaction = segv_handler;
1620 if (sigaction( SIGSEGV, &sig_act, NULL ) == -1) goto error;
1621 if (sigaction( SIGILL, &sig_act, NULL ) == -1) goto error;
1622 #ifdef SIGBUS
1623 if (sigaction( SIGBUS, &sig_act, NULL ) == -1) goto error;
1624 #endif
1625
1626 #ifdef SIGTRAP
1627 sig_act.sa_sigaction = trap_handler;
1628 if (sigaction( SIGTRAP, &sig_act, NULL ) == -1) goto error;
1629 #endif
1630
1631 #ifdef __HAVE_VM86
1632 sig_act.sa_sigaction = usr2_handler;
1633 if (sigaction( SIGUSR2, &sig_act, NULL ) == -1) goto error;
1634 #endif
1635
1636 signal_init_thread();
1637 return;
1638
1639 error:
1640 perror("sigaction");
1641 exit(1);
1642 }
1643
1644
1645 #ifdef __HAVE_VM86
1646 /**********************************************************************
1647 * __wine_enter_vm86 (NTDLL.@)
1648 *
1649 * Enter vm86 mode with the specified register context.
1650 */
1651 void __wine_enter_vm86( CONTEXT *context )
1652 {
1653 EXCEPTION_RECORD rec;
1654 int res;
1655 struct vm86plus_struct vm86;
1656
1657 memset( &vm86, 0, sizeof(vm86) );
1658 for (;;)
1659 {
1660 restore_vm86_context( context, &vm86 );
1661
1662 ntdll_get_thread_data()->vm86_ptr = &vm86;
1663 merge_vm86_pending_flags( &rec );
1664
1665 res = vm86_enter( &ntdll_get_thread_data()->vm86_ptr ); /* uses and clears teb->vm86_ptr */
1666 if (res < 0)
1667 {
1668 errno = -res;
1669 return;
1670 }
1671
1672 save_vm86_context( context, &vm86 );
1673
1674 rec.ExceptionFlags = EXCEPTION_CONTINUABLE;
1675 rec.ExceptionRecord = NULL;
1676 rec.ExceptionAddress = (LPVOID)context->Eip;
1677 rec.NumberParameters = 0;
1678
1679 switch(VM86_TYPE(res))
1680 {
1681 case VM86_UNKNOWN: /* unhandled GP fault - IO-instruction or similar */
1682 rec.ExceptionCode = EXCEPTION_PRIV_INSTRUCTION;
1683 break;
1684 case VM86_TRAP: /* return due to DOS-debugger request */
1685 switch(VM86_ARG(res))
1686 {
1687 case TRAP_x86_TRCTRAP: /* Single-step exception */
1688 rec.ExceptionCode = EXCEPTION_SINGLE_STEP;
1689 break;
1690 case TRAP_x86_BPTFLT: /* Breakpoint exception */
1691 rec.ExceptionAddress = (char *)rec.ExceptionAddress - 1; /* back up over the int3 instruction */
1692 /* fall through */
1693 default:
1694 rec.ExceptionCode = EXCEPTION_BREAKPOINT;
1695 break;
1696 }
1697 break;
1698 case VM86_INTx: /* int3/int x instruction (ARG = x) */
1699 rec.ExceptionCode = EXCEPTION_VM86_INTx;
1700 rec.NumberParameters = 1;
1701 rec.ExceptionInformation[0] = VM86_ARG(res);
1702 break;
1703 case VM86_STI: /* sti/popf/iret instruction enabled virtual interrupts */
1704 context->EFlags |= VIF_FLAG;
1705 context->EFlags &= ~VIP_FLAG;
1706 get_vm86_teb_info()->vm86_pending = 0;
1707 rec.ExceptionCode = EXCEPTION_VM86_STI;
1708 break;
1709 case VM86_PICRETURN: /* return due to pending PIC request */
1710 rec.ExceptionCode = EXCEPTION_VM86_PICRETURN;
1711 break;
1712 case VM86_SIGNAL: /* cannot happen because vm86_enter handles this case */
1713 default:
1714 WINE_ERR( "unhandled result from vm86 mode %x\n", res );
1715 continue;
1716 }
1717 __regs_RtlRaiseException( &rec, context );
1718 }
1719 }
1720
1721 #else /* __HAVE_VM86 */
1722 /**********************************************************************
1723 * __wine_enter_vm86 (NTDLL.@)
1724 */
1725 void __wine_enter_vm86( CONTEXT *context )
1726 {
1727 MESSAGE("vm86 mode not supported on this platform\n");
1728 }
1729 #endif /* __HAVE_VM86 */
1730
1731 /**********************************************************************
1732 * DbgBreakPoint (NTDLL.@)
1733 */
1734 __ASM_GLOBAL_FUNC( DbgBreakPoint, "int $3; ret")
1735
1736 /**********************************************************************
1737 * DbgUserBreakPoint (NTDLL.@)
1738 */
1739 __ASM_GLOBAL_FUNC( DbgUserBreakPoint, "int $3; ret")
1740
1741
1742 /**********************************************************************
1743 * EXC_CallHandler (internal)
1744 *
1745 * Some exception handlers depend on EBP to have a fixed position relative to
1746 * the exception frame.
1747 * Shrinker depends on (*1) doing what it does,
1748 * (*2) being the exact instruction it is and (*3) beginning with 0x64
1749 * (i.e. the %fs prefix to the movl instruction). It also depends on the
1750 * function calling the handler having only 5 parameters (*4).
1751 */
1752 __ASM_GLOBAL_FUNC( EXC_CallHandler,
1753 " pushl %ebp\n"
1754 " movl %esp, %ebp\n"
1755 " pushl %ebx\n"
1756 " movl 28(%ebp), %edx\n" /* ugly hack to pass the 6th param needed because of Shrinker */
1757 " pushl 24(%ebp)\n"
1758 " pushl 20(%ebp)\n"
1759 " pushl 16(%ebp)\n"
1760 " pushl 12(%ebp)\n"
1761 " pushl 8(%ebp)\n"
1762 " call " __ASM_NAME("call_exception_handler") "\n"
1763 " popl %ebx\n"
1764 " leave\n"
1765 " ret\n"
1766 )
1767 __ASM_GLOBAL_FUNC(call_exception_handler,
1768 " pushl %ebp\n"
1769 " movl %esp, %ebp\n"
1770 " subl $12,%esp\n"
1771 " pushl 12(%ebp)\n" /* make any exceptions in this... */
1772 " pushl %edx\n" /* handler be handled by... */
1773 " .byte 0x64\n"
1774 " pushl (0)\n" /* nested_handler (passed in edx). */
1775 " .byte 0x64\n"
1776 " movl %esp,(0)\n" /* push the new exception frame onto the exception stack. */
1777 " pushl 20(%ebp)\n"
1778 " pushl 16(%ebp)\n"
1779 " pushl 12(%ebp)\n"
1780 " pushl 8(%ebp)\n"
1781 " movl 24(%ebp), %ecx\n" /* (*1) */
1782 " call *%ecx\n" /* call handler. (*2) */
1783 " .byte 0x64\n"
1784 " movl (0), %esp\n" /* restore previous... (*3) */
1785 " .byte 0x64\n"
1786 " popl (0)\n" /* exception frame. */
1787 " movl %ebp, %esp\n" /* restore saved stack, in case it was corrupted */
1788 " popl %ebp\n"
1789 " ret $20\n" /* (*4) */
1790 )
1791 #endif /* __i386__ */
Windows API implementation