git.oblomov.eu Git - wine/blob - dlls/ntdll/signal_i386.c

   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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  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 #ifdef HAVE_UNISTD_H
  32 # include <unistd.h>
  33 #endif
  34
  35 #ifdef HAVE_SYS_PARAM_H
  36 # include <sys/param.h>
  37 #endif
  38 #ifdef HAVE_SYSCALL_H
  39 # include <syscall.h>
  40 #else
  41 # ifdef HAVE_SYS_SYSCALL_H
  42 #  include <sys/syscall.h>
  43 # endif
  44 #endif
  45
  46 #ifdef HAVE_SYS_VM86_H
  47 # include <sys/vm86.h>
  48 #endif
  49
  50 #ifdef HAVE_SYS_SIGNAL_H
  51 # include <sys/signal.h>
  52 #endif
  53
  54 #include "windef.h"
  55 #include "winbase.h"
  56 #include "winreg.h"
  57 #include "winternl.h"
  58 #include "wine/library.h"
  59 #include "ntdll_misc.h"
  60 #include "selectors.h"
  61
  62 /***********************************************************************
  63  * signal context platform-specific definitions
  64  */
  65
  66 #ifdef linux
  67 typedef struct
  68 {
  69     unsigned short sc_gs, __gsh;
  70     unsigned short sc_fs, __fsh;
  71     unsigned short sc_es, __esh;
  72     unsigned short sc_ds, __dsh;
  73     unsigned long sc_edi;
  74     unsigned long sc_esi;
  75     unsigned long sc_ebp;
  76     unsigned long sc_esp;
  77     unsigned long sc_ebx;
  78     unsigned long sc_edx;
  79     unsigned long sc_ecx;
  80     unsigned long sc_eax;
  81     unsigned long sc_trapno;
  82     unsigned long sc_err;
  83     unsigned long sc_eip;
  84     unsigned short sc_cs, __csh;
  85     unsigned long sc_eflags;
  86     unsigned long esp_at_signal;
  87     unsigned short sc_ss, __ssh;
  88     unsigned long i387;
  89     unsigned long oldmask;
  90     unsigned long cr2;
  91 } SIGCONTEXT;
  92
  93 #define HANDLER_DEF(name) void name( int __signal, SIGCONTEXT __context )
  94 #define HANDLER_CONTEXT (&__context)
  95
  96 /* this is the sigaction structure from the Linux 2.1.20 kernel.  */
  97 struct kernel_sigaction
  98 {
  99     void (*ksa_handler)();
 100     unsigned long ksa_mask;
 101     unsigned long ksa_flags;
 102     void *ksa_restorer;
 103 };
 104
 105 /* Similar to the sigaction function in libc, except it leaves alone the
 106    restorer field, which is used to specify the signal stack address */
 107 static inline int wine_sigaction( int sig, struct kernel_sigaction *new,
 108                                   struct kernel_sigaction *old )
 109 {
 110     __asm__ __volatile__( "pushl %%ebx\n\t"
 111                           "movl %2,%%ebx\n\t"
 112                           "int $0x80\n\t"
 113                           "popl %%ebx"
 114                           : "=a" (sig)
 115                           : "0" (SYS_sigaction), "r" (sig), "c" (new), "d" (old) );
 116     if (sig>=0) return 0;
 117     errno = -sig;
 118     return -1;
 119 }
 120
 121 #ifdef HAVE_SIGALTSTACK
 122 /* direct syscall for sigaltstack to work around glibc 2.0 brain-damage */
 123 static inline int wine_sigaltstack( const struct sigaltstack *new,
 124                                     struct sigaltstack *old )
 125 {
 126     int ret;
 127     __asm__ __volatile__( "pushl %%ebx\n\t"
 128                           "movl %2,%%ebx\n\t"
 129                           "int $0x80\n\t"
 130                           "popl %%ebx"
 131                           : "=a" (ret)
 132                           : "0" (SYS_sigaltstack), "r" (new), "c" (old) );
 133     if (ret >= 0) return 0;
 134     errno = -ret;
 135     return -1;
 136 }
 137 #endif
 138
 139 #define VM86_EAX 0 /* the %eax value while vm86_enter is executing */
 140
 141 int vm86_enter( void **vm86_ptr );
 142 void vm86_return(void);
 143 void vm86_return_end(void);
 144 __ASM_GLOBAL_FUNC(vm86_enter,
 145                   "pushl %ebp\n\t"
 146                   "movl %esp, %ebp\n\t"
 147                   "movl $166,%eax\n\t"  /*SYS_vm86*/
 148                   "movl 8(%ebp),%ecx\n\t" /* vm86_ptr */
 149                   "movl (%ecx),%ecx\n\t"
 150                   "pushl %ebx\n\t"
 151                   "movl $1,%ebx\n\t"    /*VM86_ENTER*/
 152                   "pushl %ecx\n\t"      /* put vm86plus_struct ptr somewhere we can find it */
 153                   "pushl %gs\n\t"
 154                   "pushl %fs\n\t"
 155                   "int $0x80\n"
 156                   ".globl " __ASM_NAME("vm86_return") "\n\t"
 157                   __ASM_FUNC("vm86_return") "\n"
 158                   __ASM_NAME("vm86_return") ":\n\t"
 159                   "popl %fs\n\t"
 160                   "popl %gs\n\t"
 161                   "popl %ecx\n\t"
 162                   "popl %ebx\n\t"
 163                   "popl %ebp\n\t"
 164                   "testl %eax,%eax\n\t"
 165                   "jl 0f\n\t"
 166                   "cmpb $0,%al\n\t" /* VM86_SIGNAL */
 167                   "je " __ASM_NAME("vm86_enter") "\n\t"
 168                   "0:\n\t"
 169                   "movl 4(%esp),%ecx\n\t"  /* vm86_ptr */
 170                   "movl $0,(%ecx)\n\t"
 171                   ".globl " __ASM_NAME("vm86_return_end") "\n\t"
 172                   __ASM_FUNC("vm86_return_end") "\n"
 173                   __ASM_NAME("vm86_return_end") ":\n\t"
 174                   "ret" );
 175
 176 #ifdef HAVE_SYS_VM86_H
 177 # define __HAVE_VM86
 178 #endif
 179
 180 #endif  /* linux */
 181
 182 #ifdef BSDI
 183
 184 #define EAX_sig(context)     ((context)->tf_eax)
 185 #define EBX_sig(context)     ((context)->tf_ebx)
 186 #define ECX_sig(context)     ((context)->tf_ecx)
 187 #define EDX_sig(context)     ((context)->tf_edx)
 188 #define ESI_sig(context)     ((context)->tf_esi)
 189 #define EDI_sig(context)     ((context)->tf_edi)
 190 #define EBP_sig(context)     ((context)->tf_ebp)
 191
 192 #define CS_sig(context)      ((context)->tf_cs)
 193 #define DS_sig(context)      ((context)->tf_ds)
 194 #define ES_sig(context)      ((context)->tf_es)
 195 #define SS_sig(context)      ((context)->tf_ss)
 196
 197 #include <machine/frame.h>
 198 typedef struct trapframe SIGCONTEXT;
 199
 200 #define HANDLER_DEF(name) void name( int __signal, int code, SIGCONTEXT *__context )
 201 #define HANDLER_CONTEXT __context
 202
 203 #define EFL_sig(context)     ((context)->tf_eflags)
 204
 205 #define EIP_sig(context)     (*((unsigned long*)&(context)->tf_eip))
 206 #define ESP_sig(context)     (*((unsigned long*)&(context)->tf_esp))
 207
 208 #endif /* bsdi */
 209
 210 #if defined(__NetBSD__) || defined(__FreeBSD__) || defined(__OpenBSD__)
 211
 212 typedef struct sigcontext SIGCONTEXT;
 213
 214 #define HANDLER_DEF(name) void name( int __signal, int code, SIGCONTEXT *__context )
 215 #define HANDLER_CONTEXT __context
 216
 217 #endif  /* FreeBSD */
 218
 219 #if defined(__svr4__) || defined(_SCO_DS) || defined(__sun)
 220
 221 #ifdef _SCO_DS
 222 #include <sys/regset.h>
 223 #endif
 224 /* Solaris kludge */
 225 #undef ERR
 226 #include <sys/ucontext.h>
 227 #undef ERR
 228 typedef struct ucontext SIGCONTEXT;
 229
 230 #define HANDLER_DEF(name) void name( int __signal, void *__siginfo, SIGCONTEXT *__context )
 231 #define HANDLER_CONTEXT __context
 232
 233 #endif  /* svr4 || SCO_DS */
 234
 235 #ifdef __EMX__
 236
 237 typedef struct
 238 {
 239     unsigned long ContextFlags;
 240     FLOATING_SAVE_AREA sc_float;
 241     unsigned long sc_gs;
 242     unsigned long sc_fs;
 243     unsigned long sc_es;
 244     unsigned long sc_ds;
 245     unsigned long sc_edi;
 246     unsigned long sc_esi;
 247     unsigned long sc_eax;
 248     unsigned long sc_ebx;
 249     unsigned long sc_ecx;
 250     unsigned long sc_edx;
 251     unsigned long sc_ebp;
 252     unsigned long sc_eip;
 253     unsigned long sc_cs;
 254     unsigned long sc_eflags;
 255     unsigned long sc_esp;
 256     unsigned long sc_ss;
 257 } SIGCONTEXT;
 258
 259 #endif  /* __EMX__ */
 260
 261 #ifdef __CYGWIN__
 262
 263 /* FIXME: This section is just here so it can compile, it's most likely
 264  * completely wrong. */
 265
 266 typedef struct
 267 {
 268     unsigned short sc_gs, __gsh;
 269     unsigned short sc_fs, __fsh;
 270     unsigned short sc_es, __esh;
 271     unsigned short sc_ds, __dsh;
 272     unsigned long sc_edi;
 273     unsigned long sc_esi;
 274     unsigned long sc_ebp;
 275     unsigned long sc_esp;
 276     unsigned long sc_ebx;
 277     unsigned long sc_edx;
 278     unsigned long sc_ecx;
 279     unsigned long sc_eax;
 280     unsigned long sc_trapno;
 281     unsigned long sc_err;
 282     unsigned long sc_eip;
 283     unsigned short sc_cs, __csh;
 284     unsigned long sc_eflags;
 285     unsigned long esp_at_signal;
 286     unsigned short sc_ss, __ssh;
 287     unsigned long i387;
 288     unsigned long oldmask;
 289     unsigned long cr2;
 290 } SIGCONTEXT;
 291
 292 #define HANDLER_DEF(name) void name( int __signal, SIGCONTEXT __context )
 293 #define HANDLER_CONTEXT (&__context)
 294
 295 #endif /* __CYGWIN__ */
 296
 297 #if defined(linux) || defined(__NetBSD__) || defined(__FreeBSD__) ||\
 298     defined(__OpenBSD__) || defined(__EMX__) || defined(__CYGWIN__)
 299
 300 #define EAX_sig(context)     ((context)->sc_eax)
 301 #define EBX_sig(context)     ((context)->sc_ebx)
 302 #define ECX_sig(context)     ((context)->sc_ecx)
 303 #define EDX_sig(context)     ((context)->sc_edx)
 304 #define ESI_sig(context)     ((context)->sc_esi)
 305 #define EDI_sig(context)     ((context)->sc_edi)
 306 #define EBP_sig(context)     ((context)->sc_ebp)
 307
 308 #define CS_sig(context)      ((context)->sc_cs)
 309 #define DS_sig(context)      ((context)->sc_ds)
 310 #define ES_sig(context)      ((context)->sc_es)
 311 #define FS_sig(context)      ((context)->sc_fs)
 312 #define GS_sig(context)      ((context)->sc_gs)
 313 #define SS_sig(context)      ((context)->sc_ss)
 314
 315 #define TRAP_sig(context)    ((context)->sc_trapno)
 316
 317 #ifdef __NetBSD__
 318 #define ERROR_sig(context)   ((context)->sc_err)
 319 #endif
 320
 321 #ifdef linux
 322 #define ERROR_sig(context)   ((context)->sc_err)
 323 #define FPU_sig(context)     ((FLOATING_SAVE_AREA*)((context)->i387))
 324 #define FAULT_ADDRESS        ((void *)HANDLER_CONTEXT->cr2)
 325 #endif
 326
 327 #ifdef __FreeBSD__
 328 #define EFL_sig(context)     ((context)->sc_efl)
 329 /* FreeBSD, see i386/i386/traps.c::trap_pfault va->err kludge  */
 330 #define FAULT_ADDRESS        ((void *)HANDLER_CONTEXT->sc_err)
 331 #else
 332 #define EFL_sig(context)     ((context)->sc_eflags)
 333 #endif
 334
 335 #define EIP_sig(context)     (*((unsigned long*)&(context)->sc_eip))
 336 #define ESP_sig(context)     (*((unsigned long*)&(context)->sc_esp))
 337
 338 #endif  /* linux || __NetBSD__ || __FreeBSD__ || __OpenBSD__ */
 339
 340 #if defined(__svr4__) || defined(_SCO_DS) || defined(__sun)
 341
 342 #ifdef _SCO_DS
 343 #define gregs regs
 344 #endif
 345
 346 #define EAX_sig(context)     ((context)->uc_mcontext.gregs[EAX])
 347 #define EBX_sig(context)     ((context)->uc_mcontext.gregs[EBX])
 348 #define ECX_sig(context)     ((context)->uc_mcontext.gregs[ECX])
 349 #define EDX_sig(context)     ((context)->uc_mcontext.gregs[EDX])
 350 #define ESI_sig(context)     ((context)->uc_mcontext.gregs[ESI])
 351 #define EDI_sig(context)     ((context)->uc_mcontext.gregs[EDI])
 352 #define EBP_sig(context)     ((context)->uc_mcontext.gregs[EBP])
 353
 354 #define CS_sig(context)      ((context)->uc_mcontext.gregs[CS])
 355 #define DS_sig(context)      ((context)->uc_mcontext.gregs[DS])
 356 #define ES_sig(context)      ((context)->uc_mcontext.gregs[ES])
 357 #define SS_sig(context)      ((context)->uc_mcontext.gregs[SS])
 358
 359 #define FS_sig(context)      ((context)->uc_mcontext.gregs[FS])
 360 #define GS_sig(context)      ((context)->uc_mcontext.gregs[GS])
 361
 362 #define EFL_sig(context)     ((context)->uc_mcontext.gregs[EFL])
 363
 364 #define EIP_sig(context)     ((context)->uc_mcontext.gregs[EIP])
 365 #ifdef R_ESP
 366 #define ESP_sig(context)     ((context)->uc_mcontext.gregs[R_ESP])
 367 #else
 368 #define ESP_sig(context)     ((context)->uc_mcontext.gregs[ESP])
 369 #endif
 370 #ifdef TRAPNO
 371 #define TRAP_sig(context)     ((context)->uc_mcontext.gregs[TRAPNO])
 372 #endif
 373
 374 #define FAULT_ADDRESS         (__siginfo->si_addr)
 375
 376 #endif  /* svr4 || SCO_DS */
 377
 378
 379 /* exception code definitions (already defined by FreeBSD/NetBSD) */
 380 #if !defined(__FreeBSD__) && !defined(__NetBSD__) /* FIXME: other BSDs? */
 381 #define T_DIVIDE        0   /* Division by zero exception */
 382 #define T_TRCTRAP       1   /* Single-step exception */
 383 #define T_NMI           2   /* NMI interrupt */
 384 #define T_BPTFLT        3   /* Breakpoint exception */
 385 #define T_OFLOW         4   /* Overflow exception */
 386 #define T_BOUND         5   /* Bound range exception */
 387 #define T_PRIVINFLT     6   /* Invalid opcode exception */
 388 #define T_DNA           7   /* Device not available exception */
 389 #define T_DOUBLEFLT     8   /* Double fault exception */
 390 #define T_FPOPFLT       9   /* Coprocessor segment overrun */
 391 #define T_TSSFLT        10  /* Invalid TSS exception */
 392 #define T_SEGNPFLT      11  /* Segment not present exception */
 393 #define T_STKFLT        12  /* Stack fault */
 394 #define T_PROTFLT       13  /* General protection fault */
 395 #define T_PAGEFLT       14  /* Page fault */
 396 #define T_RESERVED      15  /* Unknown exception */
 397 #define T_ARITHTRAP     16  /* Floating point exception */
 398 #define T_ALIGNFLT      17  /* Alignment check exception */
 399 #define T_MCHK          18  /* Machine check exception */
 400 #define T_CACHEFLT      19  /* Cache flush exception */
 401 #endif
 402 #if defined(__NetBSD__)
 403 #define T_MCHK          19  /* Machine check exception */
 404 #endif
 405
 406 #define T_UNKNOWN     (-1)  /* Unknown fault (TRAP_sig not defined) */
 407
 408 #include "wine/exception.h"
 409 #include "global.h"
 410 #include "wine/debug.h"
 411
 412 WINE_DEFAULT_DEBUG_CHANNEL(seh);
 413
 414 typedef int (*wine_signal_handler)(unsigned int sig);
 415
 416 static wine_signal_handler handlers[256];
 417
 418 extern void WINAPI EXC_RtlRaiseException( PEXCEPTION_RECORD, PCONTEXT );
 419
 420 /* Global variable to save the thread %fs register while in 16-bit code (FIXME) */
 421 static unsigned int signal_fs;
 422
 423 /***********************************************************************
 424  *           dispatch_signal
 425  */
 426 inline static int dispatch_signal(unsigned int sig)
 427 {
 428     if (handlers[sig] == NULL) return 0;
 429     return handlers[sig](sig);
 430 }
 431
 432
 433 /***********************************************************************
 434  *           get_trap_code
 435  *
 436  * Get the trap code for a signal.
 437  */
 438 static inline int get_trap_code( const SIGCONTEXT *sigcontext )
 439 {
 440 #ifdef TRAP_sig
 441     return TRAP_sig(sigcontext);
 442 #else
 443     return T_UNKNOWN;  /* unknown trap code */
 444 #endif
 445 }
 446
 447 /***********************************************************************
 448  *           get_error_code
 449  *
 450  * Get the error code for a signal.
 451  */
 452 static inline int get_error_code( const SIGCONTEXT *sigcontext )
 453 {
 454 #ifdef ERROR_sig
 455     return ERROR_sig(sigcontext);
 456 #else
 457     return 0;
 458 #endif
 459 }
 460
 461 #ifdef __HAVE_VM86
 462 /***********************************************************************
 463  *           save_vm86_context
 464  *
 465  * Set the register values from a vm86 structure.
 466  */
 467 static void save_vm86_context( CONTEXT *context, const struct vm86plus_struct *vm86 )
 468 {
 469     context->Eax    = vm86->regs.eax;
 470     context->Ebx    = vm86->regs.ebx;
 471     context->Ecx    = vm86->regs.ecx;
 472     context->Edx    = vm86->regs.edx;
 473     context->Esi    = vm86->regs.esi;
 474     context->Edi    = vm86->regs.edi;
 475     context->Esp    = vm86->regs.esp;
 476     context->Ebp    = vm86->regs.ebp;
 477     context->Eip    = vm86->regs.eip;
 478     context->SegCs  = vm86->regs.cs;
 479     context->SegDs  = vm86->regs.ds;
 480     context->SegEs  = vm86->regs.es;
 481     context->SegFs  = vm86->regs.fs;
 482     context->SegGs  = vm86->regs.gs;
 483     context->SegSs  = vm86->regs.ss;
 484     context->EFlags = vm86->regs.eflags;
 485 }
 486
 487
 488 /***********************************************************************
 489  *           restore_vm86_context
 490  *
 491  * Build a vm86 structure from the register values.
 492  */
 493 static void restore_vm86_context( const CONTEXT *context, struct vm86plus_struct *vm86 )
 494 {
 495     vm86->regs.eax    = context->Eax;
 496     vm86->regs.ebx    = context->Ebx;
 497     vm86->regs.ecx    = context->Ecx;
 498     vm86->regs.edx    = context->Edx;
 499     vm86->regs.esi    = context->Esi;
 500     vm86->regs.edi    = context->Edi;
 501     vm86->regs.esp    = context->Esp;
 502     vm86->regs.ebp    = context->Ebp;
 503     vm86->regs.eip    = context->Eip;
 504     vm86->regs.cs     = context->SegCs;
 505     vm86->regs.ds     = context->SegDs;
 506     vm86->regs.es     = context->SegEs;
 507     vm86->regs.fs     = context->SegFs;
 508     vm86->regs.gs     = context->SegGs;
 509     vm86->regs.ss     = context->SegSs;
 510     vm86->regs.eflags = context->EFlags;
 511 }
 512 #endif /* __HAVE_VM86 */
 513
 514
 515 /***********************************************************************
 516  *           save_context
 517  *
 518  * Set the register values from a sigcontext.
 519  */
 520 static void save_context( CONTEXT *context, const SIGCONTEXT *sigcontext )
 521 {
 522     /* get %fs and %gs at time of the fault */
 523 #ifdef FS_sig
 524     context->SegFs = LOWORD(FS_sig(sigcontext));
 525 #else
 526     context->SegFs = wine_get_fs();
 527 #endif
 528 #ifdef GS_sig
 529     context->SegGs = LOWORD(GS_sig(sigcontext));
 530 #else
 531     context->SegGs = wine_get_gs();
 532 #endif
 533
 534     /* now restore a proper %fs for the fault handler */
 535     if (!IS_SELECTOR_SYSTEM(CS_sig(sigcontext)) ||
 536         !IS_SELECTOR_SYSTEM(SS_sig(sigcontext)))  /* 16-bit mode */
 537     {
 538         /*
 539          * Win16 or DOS protected mode. Note that during switch
 540          * from 16-bit mode to linear mode, CS may be set to system
 541          * segment before FS is restored. Fortunately, in this case
 542          * SS is still non-system segment. This is why both CS and SS
 543          * are checked.
 544          */
 545         wine_set_fs( signal_fs );
 546         wine_set_gs( NtCurrentTeb()->gs_sel );
 547     }
 548 #ifdef __HAVE_VM86
 549     else if ((void *)EIP_sig(sigcontext) == vm86_return)  /* vm86 mode */
 550     {
 551         unsigned int *stack = (unsigned int *)ESP_sig(sigcontext);
 552
 553         /* fetch the saved %fs on the stack */
 554         wine_set_fs( stack[0] );
 555         wine_set_gs( stack[1] );
 556         if (EAX_sig(sigcontext) == VM86_EAX) {
 557             /* retrieve pointer to vm86plus struct that was stored in vm86_enter
 558              * (but we could also get if from teb->vm86_ptr) */
 559             struct vm86plus_struct *vm86 = (struct vm86plus_struct *)stack[2];
 560             /* get context from vm86 struct */
 561             save_vm86_context( context, vm86 );
 562             return;
 563         }
 564     }
 565 #endif  /* __HAVE_VM86 */
 566     else  /* 32-bit mode */
 567     {
 568 #ifdef FS_sig
 569         wine_set_fs( FS_sig(sigcontext) );
 570 #endif
 571 #ifdef GS_sig
 572         wine_set_gs( GS_sig(sigcontext) );
 573 #endif
 574     }
 575
 576     context->Eax    = EAX_sig(sigcontext);
 577     context->Ebx    = EBX_sig(sigcontext);
 578     context->Ecx    = ECX_sig(sigcontext);
 579     context->Edx    = EDX_sig(sigcontext);
 580     context->Esi    = ESI_sig(sigcontext);
 581     context->Edi    = EDI_sig(sigcontext);
 582     context->Ebp    = EBP_sig(sigcontext);
 583     context->EFlags = EFL_sig(sigcontext);
 584     context->Eip    = EIP_sig(sigcontext);
 585     context->Esp    = ESP_sig(sigcontext);
 586     context->SegCs  = LOWORD(CS_sig(sigcontext));
 587     context->SegDs  = LOWORD(DS_sig(sigcontext));
 588     context->SegEs  = LOWORD(ES_sig(sigcontext));
 589     context->SegSs  = LOWORD(SS_sig(sigcontext));
 590 }
 591
 592
 593 /***********************************************************************
 594  *           restore_context
 595  *
 596  * Build a sigcontext from the register values.
 597  */
 598 static void restore_context( const CONTEXT *context, SIGCONTEXT *sigcontext )
 599 {
 600 #ifdef __HAVE_VM86
 601     /* check if exception occurred in vm86 mode */
 602     if ((void *)EIP_sig(sigcontext) == vm86_return &&
 603         IS_SELECTOR_SYSTEM(CS_sig(sigcontext)) &&
 604         EAX_sig(sigcontext) == VM86_EAX)
 605     {
 606         unsigned int *stack = (unsigned int *)ESP_sig(sigcontext);
 607         /* retrieve pointer to vm86plus struct that was stored in vm86_enter
 608          * (but we could also get it from teb->vm86_ptr) */
 609         struct vm86plus_struct *vm86 = (struct vm86plus_struct *)stack[2];
 610         restore_vm86_context( context, vm86 );
 611         return;
 612     }
 613 #endif /* __HAVE_VM86 */
 614
 615     EAX_sig(sigcontext) = context->Eax;
 616     EBX_sig(sigcontext) = context->Ebx;
 617     ECX_sig(sigcontext) = context->Ecx;
 618     EDX_sig(sigcontext) = context->Edx;
 619     ESI_sig(sigcontext) = context->Esi;
 620     EDI_sig(sigcontext) = context->Edi;
 621     EBP_sig(sigcontext) = context->Ebp;
 622     EFL_sig(sigcontext) = context->EFlags;
 623     EIP_sig(sigcontext) = context->Eip;
 624     ESP_sig(sigcontext) = context->Esp;
 625     CS_sig(sigcontext)  = context->SegCs;
 626     DS_sig(sigcontext)  = context->SegDs;
 627     ES_sig(sigcontext)  = context->SegEs;
 628     SS_sig(sigcontext)  = context->SegSs;
 629 #ifdef FS_sig
 630     FS_sig(sigcontext)  = context->SegFs;
 631 #else
 632     wine_set_fs( context->SegFs );
 633 #endif
 634 #ifdef GS_sig
 635     GS_sig(sigcontext)  = context->SegGs;
 636 #else
 637     wine_set_gs( context->SegGs );
 638 #endif
 639 }
 640
 641
 642 /***********************************************************************
 643  *           init_handler
 644  *
 645  * Handler initialization when the full context is not needed.
 646  */
 647 static void init_handler( const SIGCONTEXT *sigcontext )
 648 {
 649     /* restore a proper %fs for the fault handler */
 650     if (!IS_SELECTOR_SYSTEM(CS_sig(sigcontext)) ||
 651         !IS_SELECTOR_SYSTEM(SS_sig(sigcontext)))  /* 16-bit mode */
 652     {
 653         wine_set_fs( signal_fs );
 654         wine_set_gs( NtCurrentTeb()->gs_sel );
 655     }
 656 #ifdef __HAVE_VM86
 657     else if ((void *)EIP_sig(sigcontext) == vm86_return)  /* vm86 mode */
 658     {
 659         /* fetch the saved %fs on the stack */
 660         wine_set_fs( *(unsigned int *)ESP_sig(sigcontext) );
 661         wine_set_gs( NtCurrentTeb()->gs_sel );
 662     }
 663 #endif  /* __HAVE_VM86 */
 664     else  /* 32-bit mode, get %fs at time of the fault */
 665     {
 666 #ifdef FS_sig
 667         wine_set_fs( FS_sig(sigcontext) );
 668 #endif
 669 #ifdef GS_sig
 670         wine_set_gs( GS_sig(sigcontext) );
 671 #endif
 672     }
 673 }
 674
 675
 676 /***********************************************************************
 677  *           save_fpu
 678  *
 679  * Set the FPU context from a sigcontext.
 680  */
 681 inline static void save_fpu( CONTEXT *context, const SIGCONTEXT *sigcontext )
 682 {
 683 #ifdef FPU_sig
 684     if (FPU_sig(sigcontext))
 685     {
 686         context->FloatSave = *FPU_sig(sigcontext);
 687         return;
 688     }
 689 #endif  /* FPU_sig */
 690 #ifdef __GNUC__
 691     __asm__ __volatile__( "fnsave %0; fwait" : "=m" (context->FloatSave) );
 692 #endif  /* __GNUC__ */
 693 }
 694
 695
 696 /***********************************************************************
 697  *           restore_fpu
 698  *
 699  * Restore the FPU context to a sigcontext.
 700  */
 701 inline static void restore_fpu( CONTEXT *context, const SIGCONTEXT *sigcontext )
 702 {
 703     /* reset the current interrupt status */
 704     context->FloatSave.StatusWord &= context->FloatSave.ControlWord | 0xffffff80;
 705 #ifdef FPU_sig
 706     if (FPU_sig(sigcontext))
 707     {
 708         *FPU_sig(sigcontext) = context->FloatSave;
 709         return;
 710     }
 711 #endif  /* FPU_sig */
 712 #ifdef __GNUC__
 713     /* avoid nested exceptions */
 714     __asm__ __volatile__( "frstor %0; fwait" : : "m" (context->FloatSave) );
 715 #endif  /* __GNUC__ */
 716 }
 717
 718
 719 /**********************************************************************
 720  *              get_fpu_code
 721  *
 722  * Get the FPU exception code from the FPU status.
 723  */
 724 static inline DWORD get_fpu_code( const CONTEXT *context )
 725 {
 726     DWORD status = context->FloatSave.StatusWord;
 727
 728     if (status & 0x01)  /* IE */
 729     {
 730         if (status & 0x40)  /* SF */
 731             return EXCEPTION_FLT_STACK_CHECK;
 732         else
 733             return EXCEPTION_FLT_INVALID_OPERATION;
 734     }
 735     if (status & 0x02) return EXCEPTION_FLT_DENORMAL_OPERAND;  /* DE flag */
 736     if (status & 0x04) return EXCEPTION_FLT_DIVIDE_BY_ZERO;    /* ZE flag */
 737     if (status & 0x08) return EXCEPTION_FLT_OVERFLOW;          /* OE flag */
 738     if (status & 0x10) return EXCEPTION_FLT_UNDERFLOW;         /* UE flag */
 739     if (status & 0x20) return EXCEPTION_FLT_INEXACT_RESULT;    /* PE flag */
 740     return EXCEPTION_FLT_INVALID_OPERATION;  /* generic error */
 741 }
 742
 743
 744 /**********************************************************************
 745  *              do_segv
 746  *
 747  * Implementation of SIGSEGV handler.
 748  */
 749 static void do_segv( CONTEXT *context, int trap_code, void *cr2, int err_code )
 750 {
 751     EXCEPTION_RECORD rec;
 752
 753     rec.ExceptionRecord  = NULL;
 754     rec.ExceptionFlags   = EXCEPTION_CONTINUABLE;
 755     rec.ExceptionAddress = (LPVOID)context->Eip;
 756     rec.NumberParameters = 0;
 757
 758     switch(trap_code)
 759     {
 760     case T_OFLOW:   /* Overflow exception */
 761         rec.ExceptionCode = EXCEPTION_INT_OVERFLOW;
 762         break;
 763     case T_BOUND:   /* Bound range exception */
 764         rec.ExceptionCode = EXCEPTION_ARRAY_BOUNDS_EXCEEDED;
 765         break;
 766     case T_PRIVINFLT:   /* Invalid opcode exception */
 767         rec.ExceptionCode = EXCEPTION_ILLEGAL_INSTRUCTION;
 768         break;
 769     case T_STKFLT:  /* Stack fault */
 770         rec.ExceptionCode = EXCEPTION_STACK_OVERFLOW;
 771         break;
 772     case T_SEGNPFLT:  /* Segment not present exception */
 773     case T_PROTFLT:   /* General protection fault */
 774     case T_UNKNOWN:   /* Unknown fault code */
 775         rec.ExceptionCode = err_code ? EXCEPTION_ACCESS_VIOLATION : EXCEPTION_PRIV_INSTRUCTION;
 776         break;
 777     case T_PAGEFLT:  /* Page fault */
 778 #ifdef FAULT_ADDRESS
 779         if (!(rec.ExceptionCode = VIRTUAL_HandleFault( cr2 ))) return;
 780         rec.NumberParameters = 2;
 781         rec.ExceptionInformation[0] = (err_code & 2) != 0;
 782         rec.ExceptionInformation[1] = (DWORD)cr2;
 783 #else
 784         rec.ExceptionCode = EXCEPTION_ACCESS_VIOLATION;
 785 #endif
 786         break;
 787     case T_ALIGNFLT:  /* Alignment check exception */
 788         /* FIXME: pass through exception handler first? */
 789         if (context->EFlags & 0x00040000)
 790         {
 791             /* Disable AC flag, return */
 792             context->EFlags &= ~0x00040000;
 793             return;
 794         }
 795         rec.ExceptionCode = EXCEPTION_DATATYPE_MISALIGNMENT;
 796         break;
 797     default:
 798         ERR( "Got unexpected trap %d\n", trap_code );
 799         /* fall through */
 800     case T_NMI:       /* NMI interrupt */
 801     case T_DNA:       /* Device not available exception */
 802     case T_DOUBLEFLT: /* Double fault exception */
 803     case T_TSSFLT:    /* Invalid TSS exception */
 804     case T_RESERVED:  /* Unknown exception */
 805     case T_MCHK:      /* Machine check exception */
 806 #ifdef T_CACHEFLT
 807     case T_CACHEFLT:  /* Cache flush exception */
 808 #endif
 809         rec.ExceptionCode = EXCEPTION_ILLEGAL_INSTRUCTION;
 810         break;
 811     }
 812     EXC_RtlRaiseException( &rec, context );
 813 }
 814
 815
 816 /**********************************************************************
 817  *              do_trap
 818  *
 819  * Implementation of SIGTRAP handler.
 820  */
 821 static void do_trap( CONTEXT *context, int trap_code )
 822 {
 823     EXCEPTION_RECORD rec;
 824     DWORD dr0, dr1, dr2, dr3, dr6, dr7;
 825
 826     rec.ExceptionFlags   = EXCEPTION_CONTINUABLE;
 827     rec.ExceptionRecord  = NULL;
 828     rec.ExceptionAddress = (LPVOID)context->Eip;
 829     rec.NumberParameters = 0;
 830
 831     switch(trap_code)
 832     {
 833     case T_TRCTRAP:  /* Single-step exception */
 834         rec.ExceptionCode = EXCEPTION_SINGLE_STEP;
 835         if (context->EFlags & 0x100)
 836         {
 837             context->EFlags &= ~0x100;  /* clear single-step flag */
 838         }
 839         else  /* hardware breakpoint, fetch the debug registers */
 840         {
 841             context->ContextFlags = CONTEXT_DEBUG_REGISTERS;
 842             NtGetContextThread(GetCurrentThread(), context);
 843             /* do we really have a bp from a debug register ?
 844              * if not, then someone did a kill(SIGTRAP) on us, and we
 845              * shall return a breakpoint, not a single step exception
 846              */
 847             if (!(context->Dr6 & 0xf))
 848                 rec.ExceptionCode = EXCEPTION_BREAKPOINT;
 849         }
 850         break;
 851     case T_BPTFLT:   /* Breakpoint exception */
 852         rec.ExceptionAddress = (char *)rec.ExceptionAddress - 1;  /* back up over the int3 instruction */
 853         /* fall through */
 854     default:
 855         rec.ExceptionCode = EXCEPTION_BREAKPOINT;
 856         break;
 857     }
 858     dr0 = context->Dr0;
 859     dr1 = context->Dr1;
 860     dr2 = context->Dr2;
 861     dr3 = context->Dr3;
 862     dr6 = context->Dr6;
 863     dr7 = context->Dr7;
 864
 865     EXC_RtlRaiseException( &rec, context );
 866
 867     if (dr0 != context->Dr0 || dr1 != context->Dr1 || dr2 != context->Dr2 ||
 868         dr3 != context->Dr3 || dr6 != context->Dr6 || dr7 != context->Dr7)
 869     {
 870         /* the debug registers have changed, set the new values */
 871         context->ContextFlags = CONTEXT_DEBUG_REGISTERS;
 872         NtSetContextThread(GetCurrentThread(), context);
 873     }
 874 }
 875
 876
 877 /**********************************************************************
 878  *              do_fpe
 879  *
 880  * Implementation of SIGFPE handler
 881  */
 882 static void do_fpe( CONTEXT *context, int trap_code )
 883 {
 884     EXCEPTION_RECORD rec;
 885
 886     switch(trap_code)
 887     {
 888     case T_DIVIDE:   /* Division by zero exception */
 889         rec.ExceptionCode = EXCEPTION_INT_DIVIDE_BY_ZERO;
 890         break;
 891     case T_FPOPFLT:   /* Coprocessor segment overrun */
 892         rec.ExceptionCode = EXCEPTION_FLT_INVALID_OPERATION;
 893         break;
 894     case T_ARITHTRAP:  /* Floating point exception */
 895     case T_UNKNOWN:    /* Unknown fault code */
 896         rec.ExceptionCode = get_fpu_code( context );
 897         break;
 898     default:
 899         ERR( "Got unexpected trap %d\n", trap_code );
 900         rec.ExceptionCode = EXCEPTION_FLT_INVALID_OPERATION;
 901         break;
 902     }
 903     rec.ExceptionFlags   = EXCEPTION_CONTINUABLE;
 904     rec.ExceptionRecord  = NULL;
 905     rec.ExceptionAddress = (LPVOID)context->Eip;
 906     rec.NumberParameters = 0;
 907     EXC_RtlRaiseException( &rec, context );
 908 }
 909
 910
 911 #ifdef __HAVE_VM86
 912 /**********************************************************************
 913  *              set_vm86_pend
 914  *
 915  * Handler for SIGUSR2, which we use to set the vm86 pending flag.
 916  */
 917 static void set_vm86_pend( CONTEXT *context )
 918 {
 919     EXCEPTION_RECORD rec;
 920     TEB *teb = NtCurrentTeb();
 921     struct vm86plus_struct *vm86 = (struct vm86plus_struct*)(teb->vm86_ptr);
 922
 923     rec.ExceptionCode           = EXCEPTION_VM86_STI;
 924     rec.ExceptionFlags          = EXCEPTION_CONTINUABLE;
 925     rec.ExceptionRecord         = NULL;
 926     rec.NumberParameters        = 1;
 927     rec.ExceptionInformation[0] = 0;
 928
 929     /* __wine_enter_vm86() merges the vm86_pending flag in safely */
 930     teb->vm86_pending |= VIP_MASK;
 931     /* see if we were in VM86 mode */
 932     if (context->EFlags & 0x00020000)
 933     {
 934         /* seems so, also set flag in signal context */
 935         if (context->EFlags & VIP_MASK) return;
 936         context->EFlags |= VIP_MASK;
 937         vm86->regs.eflags |= VIP_MASK; /* no exception recursion */
 938         if (context->EFlags & VIF_MASK) {
 939             /* VIF is set, throw exception */
 940             teb->vm86_pending = 0;
 941             teb->vm86_ptr = NULL;
 942             rec.ExceptionAddress = (LPVOID)context->Eip;
 943             EXC_RtlRaiseException( &rec, context );
 944             /*
 945              * FIXME: EXC_RtlRaiseException has unblocked all signals.
 946              *        If we receive nested SIGUSR2 here, VM86 event
 947              *        handling may lock up!
 948              */
 949             teb->vm86_ptr = vm86;
 950         }
 951     }
 952     else if (vm86)
 953     {
 954         /* not in VM86, but possibly setting up for it */
 955         if (vm86->regs.eflags & VIP_MASK) return;
 956         vm86->regs.eflags |= VIP_MASK;
 957         if (((char*)context->Eip >= (char*)vm86_return) &&
 958             ((char*)context->Eip <= (char*)vm86_return_end) &&
 959             (VM86_TYPE(context->Eax) != VM86_SIGNAL)) {
 960             /* exiting from VM86, can't throw */
 961             return;
 962         }
 963         if (vm86->regs.eflags & VIF_MASK) {
 964             /* VIF is set, throw exception */
 965             CONTEXT vcontext;
 966             teb->vm86_pending = 0;
 967             teb->vm86_ptr = NULL;
 968             save_vm86_context( &vcontext, vm86 );
 969             rec.ExceptionAddress = (LPVOID)vcontext.Eip;
 970             EXC_RtlRaiseException( &rec, &vcontext );
 971             /*
 972              * FIXME: EXC_RtlRaiseException has unblocked all signals.
 973              *        If we receive nested SIGUSR2 here, VM86 event
 974              *        handling may lock up!
 975              */
 976             teb->vm86_ptr = vm86;
 977             restore_vm86_context( &vcontext, vm86 );
 978         }
 979     }
 980     else if(teb->dpmi_vif &&
 981             !IS_SELECTOR_SYSTEM(context->SegCs) &&
 982             !IS_SELECTOR_SYSTEM(context->SegSs))
 983     {
 984         /* Executing DPMI code and virtual interrupts are enabled. */
 985         teb->vm86_pending = 0;
 986         rec.ExceptionAddress = (LPVOID)context->Eip;
 987         EXC_RtlRaiseException( &rec, context );
 988         /*
 989          * EXC_RtlRaiseException has unblocked all signals and this
 990          * signal handler is about to return to either DOS relay or
 991          * IRQ handler. Because both of these will check pending
 992          * interrupts again, it is not a problem if we receive
 993          * a nested SIGUSR2 here and ignore it.
 994          */
 995     }
 996 }
 997
 998
 999 /**********************************************************************
1000  *              usr2_handler
1001  *
1002  * Handler for SIGUSR2.
1003  * We use it to signal that the running __wine_enter_vm86() should
1004  * immediately set VIP_MASK, causing pending events to be handled
1005  * as early as possible.
1006  */
1007 static HANDLER_DEF(usr2_handler)
1008 {
1009     CONTEXT context;
1010
1011     save_context( &context, HANDLER_CONTEXT );
1012     set_vm86_pend( &context );
1013     restore_context( &context, HANDLER_CONTEXT );
1014 }
1015 #endif /* __HAVE_VM86 */
1016
1017
1018 /**********************************************************************
1019  *              segv_handler
1020  *
1021  * Handler for SIGSEGV and related errors.
1022  */
1023 static HANDLER_DEF(segv_handler)
1024 {
1025     CONTEXT context;
1026     void *cr2;
1027
1028     save_context( &context, HANDLER_CONTEXT );
1029 #ifdef FAULT_ADDRESS
1030     cr2 = FAULT_ADDRESS;
1031 #else
1032     cr2 = NULL;
1033 #endif
1034     do_segv( &context, get_trap_code(HANDLER_CONTEXT), cr2, get_error_code(HANDLER_CONTEXT) );
1035     restore_context( &context, HANDLER_CONTEXT );
1036 }
1037
1038
1039 /**********************************************************************
1040  *              trap_handler
1041  *
1042  * Handler for SIGTRAP.
1043  */
1044 static HANDLER_DEF(trap_handler)
1045 {
1046     CONTEXT context;
1047     save_context( &context, HANDLER_CONTEXT );
1048     do_trap( &context, get_trap_code(HANDLER_CONTEXT) );
1049     restore_context( &context, HANDLER_CONTEXT );
1050 }
1051
1052
1053 /**********************************************************************
1054  *              fpe_handler
1055  *
1056  * Handler for SIGFPE.
1057  */
1058 static HANDLER_DEF(fpe_handler)
1059 {
1060     CONTEXT context;
1061     save_fpu( &context, HANDLER_CONTEXT );
1062     save_context( &context, HANDLER_CONTEXT );
1063     do_fpe( &context, get_trap_code(HANDLER_CONTEXT) );
1064     restore_context( &context, HANDLER_CONTEXT );
1065     restore_fpu( &context, HANDLER_CONTEXT );
1066 }
1067
1068
1069 /**********************************************************************
1070  *              int_handler
1071  *
1072  * Handler for SIGINT.
1073  */
1074 static HANDLER_DEF(int_handler)
1075 {
1076     init_handler( HANDLER_CONTEXT );
1077     if (!dispatch_signal(SIGINT))
1078     {
1079         EXCEPTION_RECORD rec;
1080         CONTEXT context;
1081
1082         save_context( &context, HANDLER_CONTEXT );
1083         rec.ExceptionCode    = CONTROL_C_EXIT;
1084         rec.ExceptionFlags   = EXCEPTION_CONTINUABLE;
1085         rec.ExceptionRecord  = NULL;
1086         rec.ExceptionAddress = (LPVOID)context.Eip;
1087         rec.NumberParameters = 0;
1088         EXC_RtlRaiseException( &rec, &context );
1089         restore_context( &context, HANDLER_CONTEXT );
1090     }
1091 }
1092
1093 /**********************************************************************
1094  *              abrt_handler
1095  *
1096  * Handler for SIGABRT.
1097  */
1098 static HANDLER_DEF(abrt_handler)
1099 {
1100     EXCEPTION_RECORD rec;
1101     CONTEXT context;
1102
1103     save_context( &context, HANDLER_CONTEXT );
1104     rec.ExceptionCode    = EXCEPTION_WINE_ASSERTION;
1105     rec.ExceptionFlags   = EH_NONCONTINUABLE;
1106     rec.ExceptionRecord  = NULL;
1107     rec.ExceptionAddress = (LPVOID)context.Eip;
1108     rec.NumberParameters = 0;
1109     EXC_RtlRaiseException( &rec, &context ); /* Should never return.. */
1110     restore_context( &context, HANDLER_CONTEXT );
1111 }
1112
1113
1114 /**********************************************************************
1115  *              term_handler
1116  *
1117  * Handler for SIGTERM.
1118  */
1119 static HANDLER_DEF(term_handler)
1120 {
1121     init_handler( HANDLER_CONTEXT );
1122     SYSDEPS_AbortThread(0);
1123 }
1124
1125
1126 /**********************************************************************
1127  *              usr1_handler
1128  *
1129  * Handler for SIGUSR1, used to signal a thread that it got suspended.
1130  */
1131 static HANDLER_DEF(usr1_handler)
1132 {
1133     LARGE_INTEGER timeout;
1134
1135     init_handler( HANDLER_CONTEXT );
1136     /* wait with 0 timeout, will only return once the thread is no longer suspended */
1137     timeout.QuadPart = 0;
1138     NTDLL_wait_for_multiple_objects( 0, NULL, 0, &timeout );
1139 }
1140
1141
1142 /***********************************************************************
1143  *           set_handler
1144  *
1145  * Set a signal handler
1146  */
1147 static int set_handler( int sig, int have_sigaltstack, void (*func)() )
1148 {
1149     struct sigaction sig_act;
1150
1151 #ifdef linux
1152     if (!have_sigaltstack && NtCurrentTeb()->signal_stack)
1153     {
1154         struct kernel_sigaction sig_act;
1155         sig_act.ksa_handler = func;
1156         sig_act.ksa_flags   = SA_RESTART;
1157         sig_act.ksa_mask    = (1 << (SIGINT-1)) |
1158                               (1 << (SIGUSR2-1));
1159         /* point to the top of the stack */
1160         sig_act.ksa_restorer = (char *)NtCurrentTeb()->signal_stack + SIGNAL_STACK_SIZE;
1161         return wine_sigaction( sig, &sig_act, NULL );
1162     }
1163 #endif  /* linux */
1164     sig_act.sa_handler = func;
1165     sigemptyset( &sig_act.sa_mask );
1166     sigaddset( &sig_act.sa_mask, SIGINT );
1167     sigaddset( &sig_act.sa_mask, SIGUSR2 );
1168
1169 #if defined(linux) || defined(__NetBSD__)
1170     sig_act.sa_flags = SA_RESTART;
1171 #elif defined (__svr4__) || defined(_SCO_DS)
1172     sig_act.sa_flags = SA_SIGINFO | SA_RESTART;
1173 #else
1174     sig_act.sa_flags = 0;
1175 #endif
1176
1177 #ifdef SA_ONSTACK
1178     if (have_sigaltstack) sig_act.sa_flags |= SA_ONSTACK;
1179 #endif
1180     return sigaction( sig, &sig_act, NULL );
1181 }
1182
1183
1184 /***********************************************************************
1185  *           __wine_set_signal_handler   (NTDLL.@)
1186  */
1187 int __wine_set_signal_handler(unsigned int sig, wine_signal_handler wsh)
1188 {
1189     if (sig > sizeof(handlers) / sizeof(handlers[0])) return -1;
1190     if (handlers[sig] != NULL) return -2;
1191     handlers[sig] = wsh;
1192     return 0;
1193 }
1194
1195
1196 /***********************************************************************
1197  *           __wine_set_signal_fs  (NTDLL.@)
1198  */
1199 void __wine_set_signal_fs( unsigned int fs )
1200 {
1201     signal_fs = fs;
1202 }
1203
1204
1205 /**********************************************************************
1206  *              SIGNAL_Init
1207  */
1208 BOOL SIGNAL_Init(void)
1209 {
1210     int have_sigaltstack = 0;
1211
1212 #ifdef HAVE_SIGALTSTACK
1213     struct sigaltstack ss;
1214     if ((ss.ss_sp = NtCurrentTeb()->signal_stack))
1215     {
1216         ss.ss_size  = SIGNAL_STACK_SIZE;
1217         ss.ss_flags = 0;
1218         if (!sigaltstack(&ss, NULL)) have_sigaltstack = 1;
1219 #ifdef linux
1220         /* sigaltstack may fail because the kernel is too old, or
1221            because glibc is brain-dead. In the latter case a
1222            direct system call should succeed. */
1223         else if (!wine_sigaltstack(&ss, NULL)) have_sigaltstack = 1;
1224 #endif  /* linux */
1225     }
1226 #endif  /* HAVE_SIGALTSTACK */
1227
1228     if (set_handler( SIGINT,  have_sigaltstack, (void (*)())int_handler ) == -1) goto error;
1229     if (set_handler( SIGFPE,  have_sigaltstack, (void (*)())fpe_handler ) == -1) goto error;
1230     if (set_handler( SIGSEGV, have_sigaltstack, (void (*)())segv_handler ) == -1) goto error;
1231     if (set_handler( SIGILL,  have_sigaltstack, (void (*)())segv_handler ) == -1) goto error;
1232     if (set_handler( SIGABRT, have_sigaltstack, (void (*)())abrt_handler ) == -1) goto error;
1233     if (set_handler( SIGTERM, have_sigaltstack, (void (*)())term_handler ) == -1) goto error;
1234     if (set_handler( SIGUSR1, have_sigaltstack, (void (*)())usr1_handler ) == -1) goto error;
1235 #ifdef SIGBUS
1236     if (set_handler( SIGBUS,  have_sigaltstack, (void (*)())segv_handler ) == -1) goto error;
1237 #endif
1238 #ifdef SIGTRAP
1239     if (set_handler( SIGTRAP, have_sigaltstack, (void (*)())trap_handler ) == -1) goto error;
1240 #endif
1241
1242 #ifdef __HAVE_VM86
1243     if (set_handler( SIGUSR2, have_sigaltstack, (void (*)())usr2_handler ) == -1) goto error;
1244 #endif
1245
1246     return TRUE;
1247
1248  error:
1249     perror("sigaction");
1250     return FALSE;
1251 }
1252
1253
1254 /**********************************************************************
1255  *              SIGNAL_Block
1256  *
1257  * Block the async signals.
1258  */
1259 void SIGNAL_Block(void)
1260 {
1261     sigset_t block_set;
1262
1263     sigemptyset( &block_set );
1264     sigaddset( &block_set, SIGIO );
1265     sigaddset( &block_set, SIGHUP );
1266     sigaddset( &block_set, SIGUSR1 );
1267     sigaddset( &block_set, SIGUSR2 );
1268     sigprocmask( SIG_BLOCK, &block_set, NULL );
1269 }
1270
1271
1272 /***********************************************************************
1273  *           SIGNAL_Unblock
1274  *
1275  * Unblock signals. Called from EXC_RtlRaiseException.
1276  */
1277 void SIGNAL_Unblock(void)
1278 {
1279     sigset_t all_sigs;
1280
1281     sigfillset( &all_sigs );
1282     sigprocmask( SIG_UNBLOCK, &all_sigs, NULL );
1283 }
1284
1285
1286 /**********************************************************************
1287  *              SIGNAL_Reset
1288  *
1289  * Restore the default handlers.
1290  */
1291 void SIGNAL_Reset(void)
1292 {
1293     signal( SIGINT, SIG_DFL );
1294     signal( SIGFPE, SIG_DFL );
1295     signal( SIGSEGV, SIG_DFL );
1296     signal( SIGILL, SIG_DFL );
1297     signal( SIGABRT, SIG_DFL );
1298     signal( SIGTERM, SIG_DFL );
1299 #ifdef SIGBUS
1300     signal( SIGBUS, SIG_DFL );
1301 #endif
1302 #ifdef SIGTRAP
1303     signal( SIGTRAP, SIG_DFL );
1304 #endif
1305 }
1306
1307
1308 #ifdef __HAVE_VM86
1309 /**********************************************************************
1310  *              __wine_enter_vm86   (NTDLL.@)
1311  *
1312  * Enter vm86 mode with the specified register context.
1313  */
1314 void __wine_enter_vm86( CONTEXT *context )
1315 {
1316     EXCEPTION_RECORD rec;
1317     TEB *teb = NtCurrentTeb();
1318     int res;
1319     struct vm86plus_struct vm86;
1320
1321     memset( &vm86, 0, sizeof(vm86) );
1322     for (;;)
1323     {
1324         restore_vm86_context( context, &vm86 );
1325         /* Linux doesn't preserve pending flag (VIP_MASK) on return,
1326          * so save it on entry, just in case */
1327         teb->vm86_pending |= (context->EFlags & VIP_MASK);
1328         /* Work around race conditions with signal handler
1329          * (avoiding sigprocmask for performance reasons) */
1330         teb->vm86_ptr = &vm86;
1331         vm86.regs.eflags |= teb->vm86_pending;
1332         /* Check for VIF|VIP here, since vm86_enter doesn't */
1333         if ((vm86.regs.eflags & (VIF_MASK|VIP_MASK)) == (VIF_MASK|VIP_MASK)) {
1334             teb->vm86_ptr = NULL;
1335             teb->vm86_pending = 0;
1336             context->EFlags |= VIP_MASK;
1337             rec.ExceptionCode = EXCEPTION_VM86_STI;
1338             rec.ExceptionInformation[0] = 0;
1339             goto cancel_vm86;
1340         }
1341
1342         do
1343         {
1344             res = vm86_enter( &teb->vm86_ptr ); /* uses and clears teb->vm86_ptr */
1345             if (res < 0)
1346             {
1347                 errno = -res;
1348                 return;
1349             }
1350         } while (VM86_TYPE(res) == VM86_SIGNAL);
1351
1352         save_vm86_context( context, &vm86 );
1353         context->EFlags |= teb->vm86_pending;
1354
1355         switch(VM86_TYPE(res))
1356         {
1357         case VM86_UNKNOWN: /* unhandled GP fault - IO-instruction or similar */
1358             do_segv( context, T_PROTFLT, 0, 0 );
1359             continue;
1360         case VM86_TRAP: /* return due to DOS-debugger request */
1361             do_trap( context, VM86_ARG(res) );
1362             continue;
1363         case VM86_INTx: /* int3/int x instruction (ARG = x) */
1364             rec.ExceptionCode = EXCEPTION_VM86_INTx;
1365             break;
1366         case VM86_STI: /* sti/popf/iret instruction enabled virtual interrupts */
1367             teb->vm86_pending = 0;
1368             rec.ExceptionCode = EXCEPTION_VM86_STI;
1369             break;
1370         case VM86_PICRETURN: /* return due to pending PIC request */
1371             rec.ExceptionCode = EXCEPTION_VM86_PICRETURN;
1372             break;
1373         default:
1374             ERR( "unhandled result from vm86 mode %x\n", res );
1375             continue;
1376         }
1377         rec.ExceptionInformation[0] = VM86_ARG(res);
1378 cancel_vm86:
1379         rec.ExceptionFlags          = EXCEPTION_CONTINUABLE;
1380         rec.ExceptionRecord         = NULL;
1381         rec.ExceptionAddress        = (LPVOID)context->Eip;
1382         rec.NumberParameters        = 1;
1383         EXC_RtlRaiseException( &rec, context );
1384     }
1385 }
1386
1387 #else /* __HAVE_VM86 */
1388 /**********************************************************************
1389  *              __wine_enter_vm86   (NTDLL.@)
1390  */
1391 void __wine_enter_vm86( CONTEXT *context )
1392 {
1393     MESSAGE("vm86 mode not supported on this platform\n");
1394 }
1395 #endif /* __HAVE_VM86 */
1396
1397 /**********************************************************************
1398  *              DbgBreakPoint   (NTDLL.@)
1399  */
1400 __ASM_GLOBAL_FUNC( DbgBreakPoint, "int $3; ret");
1401
1402 /**********************************************************************
1403  *              DbgUserBreakPoint   (NTDLL.@)
1404  */
1405 __ASM_GLOBAL_FUNC( DbgUserBreakPoint, "int $3; ret");
1406
1407 #endif  /* __i386__ */