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

   1 /*
   2  * Sparc signal handling routines
   3  *
   4  * Copyright 1999 Ulrich Weigand
   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 __sparc__
  22
  23 #include "config.h"
  24 #include "wine/port.h"
  25
  26 #include <assert.h>
  27 #include <signal.h>
  28 #include <stdlib.h>
  29 #ifdef HAVE_UNISTD_H
  30 # include <unistd.h>
  31 #endif
  32 #include <stdarg.h>
  33 #include <stdio.h>
  34 #include <sys/ucontext.h>
  35
  36 #include "windef.h"
  37 #include "winternl.h"
  38 #include "winnt.h"
  39
  40 #include "wine/exception.h"
  41 #include "ntdll_misc.h"
  42
  43 #include "wine/debug.h"
  44
  45 WINE_DEFAULT_DEBUG_CHANNEL(seh);
  46
  47 #define HANDLER_DEF(name) void name( int __signal, struct siginfo *__siginfo, ucontext_t *__context )
  48 #define HANDLER_CONTEXT (__context)
  49
  50 typedef int (*wine_signal_handler)(unsigned int sig);
  51
  52 static wine_signal_handler handlers[256];
  53
  54 /***********************************************************************
  55  *           dispatch_signal
  56  */
  57 static inline int dispatch_signal(unsigned int sig)
  58 {
  59     if (handlers[sig] == NULL) return 0;
  60     return handlers[sig](sig);
  61 }
  62
  63
  64 /*
  65  * FIXME:  All this works only on Solaris for now
  66  */
  67
  68 /**********************************************************************
  69  *              save_context
  70  */
  71 static void save_context( CONTEXT *context, ucontext_t *ucontext )
  72 {
  73     /* Special registers */
  74     context->psr = ucontext->uc_mcontext.gregs[REG_PSR];
  75     context->pc  = ucontext->uc_mcontext.gregs[REG_PC];
  76     context->npc = ucontext->uc_mcontext.gregs[REG_nPC];
  77     context->y   = ucontext->uc_mcontext.gregs[REG_Y];
  78     context->wim = 0;  /* FIXME */
  79     context->tbr = 0;  /* FIXME */
  80
  81     /* Global registers */
  82     context->g0 = 0;  /* always */
  83     context->g1 = ucontext->uc_mcontext.gregs[REG_G1];
  84     context->g2 = ucontext->uc_mcontext.gregs[REG_G2];
  85     context->g3 = ucontext->uc_mcontext.gregs[REG_G3];
  86     context->g4 = ucontext->uc_mcontext.gregs[REG_G4];
  87     context->g5 = ucontext->uc_mcontext.gregs[REG_G5];
  88     context->g6 = ucontext->uc_mcontext.gregs[REG_G6];
  89     context->g7 = ucontext->uc_mcontext.gregs[REG_G7];
  90
  91     /* Current 'out' registers */
  92     context->o0 = ucontext->uc_mcontext.gregs[REG_O0];
  93     context->o1 = ucontext->uc_mcontext.gregs[REG_O1];
  94     context->o2 = ucontext->uc_mcontext.gregs[REG_O2];
  95     context->o3 = ucontext->uc_mcontext.gregs[REG_O3];
  96     context->o4 = ucontext->uc_mcontext.gregs[REG_O4];
  97     context->o5 = ucontext->uc_mcontext.gregs[REG_O5];
  98     context->o6 = ucontext->uc_mcontext.gregs[REG_O6];
  99     context->o7 = ucontext->uc_mcontext.gregs[REG_O7];
 100
 101     /* FIXME: what if the current register window isn't saved? */
 102     if ( ucontext->uc_mcontext.gwins && ucontext->uc_mcontext.gwins->wbcnt > 0 )
 103     {
 104         /* Current 'local' registers from first register window */
 105         context->l0 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[0];
 106         context->l1 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[1];
 107         context->l2 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[2];
 108         context->l3 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[3];
 109         context->l4 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[4];
 110         context->l5 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[5];
 111         context->l6 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[6];
 112         context->l7 = ucontext->uc_mcontext.gwins->wbuf[0].rw_local[7];
 113
 114         /* Current 'in' registers from first register window */
 115         context->i0 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[0];
 116         context->i1 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[1];
 117         context->i2 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[2];
 118         context->i3 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[3];
 119         context->i4 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[4];
 120         context->i5 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[5];
 121         context->i6 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[6];
 122         context->i7 = ucontext->uc_mcontext.gwins->wbuf[0].rw_in[7];
 123     }
 124 }
 125
 126 /**********************************************************************
 127  *              restore_context
 128  */
 129 static void restore_context( CONTEXT *context, ucontext_t *ucontext )
 130 {
 131    /* FIXME */
 132 }
 133
 134 /**********************************************************************
 135  *              save_fpu
 136  */
 137 static void save_fpu( CONTEXT *context, ucontext_t *ucontext )
 138 {
 139    /* FIXME */
 140 }
 141
 142 /**********************************************************************
 143  *              restore_fpu
 144  */
 145 static void restore_fpu( CONTEXT *context, ucontext_t *ucontext )
 146 {
 147    /* FIXME */
 148 }
 149
 150
 151 /***********************************************************************
 152  *              get_cpu_context
 153  *
 154  * Get the context of the current thread.
 155  */
 156 void get_cpu_context( CONTEXT *context )
 157 {
 158     FIXME("not implemented\n");
 159 }
 160
 161
 162 /***********************************************************************
 163  *           set_cpu_context
 164  *
 165  * Set the new CPU context.
 166  */
 167 void set_cpu_context( const CONTEXT *context )
 168 {
 169     FIXME("not implemented\n");
 170 }
 171
 172
 173 /**********************************************************************
 174  *              segv_handler
 175  *
 176  * Handler for SIGSEGV.
 177  */
 178 static void segv_handler( int signal, siginfo_t *info, ucontext_t *ucontext )
 179 {
 180     EXCEPTION_RECORD rec;
 181     CONTEXT context;
 182
 183     rec.ExceptionCode = EXCEPTION_ACCESS_VIOLATION;
 184
 185     /* we want the page-fault case to be fast */
 186     if ( info->si_code == SEGV_ACCERR )
 187         if (!(rec.ExceptionCode = virtual_handle_fault( info->si_addr, 0 ))) return;
 188
 189     save_context( &context, ucontext );
 190     rec.ExceptionRecord  = NULL;
 191     rec.ExceptionFlags   = EXCEPTION_CONTINUABLE;
 192     rec.ExceptionAddress = (LPVOID)context.pc;
 193     rec.NumberParameters = 2;
 194     rec.ExceptionInformation[0] = 0;  /* FIXME: read/write access ? */
 195     rec.ExceptionInformation[1] = (ULONG_PTR)info->si_addr;
 196
 197     __regs_RtlRaiseException( &rec, &context );
 198     restore_context( &context, ucontext );
 199 }
 200
 201 /**********************************************************************
 202  *              bus_handler
 203  *
 204  * Handler for SIGBUS.
 205  */
 206 static void bus_handler( int signal, siginfo_t *info, ucontext_t *ucontext )
 207 {
 208     EXCEPTION_RECORD rec;
 209     CONTEXT context;
 210
 211     save_context( &context, ucontext );
 212     rec.ExceptionRecord  = NULL;
 213     rec.ExceptionFlags   = EXCEPTION_CONTINUABLE;
 214     rec.ExceptionAddress = (LPVOID)context.pc;
 215     rec.NumberParameters = 0;
 216
 217     if ( info->si_code == BUS_ADRALN )
 218         rec.ExceptionCode = EXCEPTION_DATATYPE_MISALIGNMENT;
 219     else
 220         rec.ExceptionCode = EXCEPTION_ACCESS_VIOLATION;
 221
 222     __regs_RtlRaiseException( &rec, &context );
 223     restore_context( &context, ucontext );
 224 }
 225
 226 /**********************************************************************
 227  *              ill_handler
 228  *
 229  * Handler for SIGILL.
 230  */
 231 static void ill_handler( int signal, siginfo_t *info, ucontext_t *ucontext )
 232 {
 233     EXCEPTION_RECORD rec;
 234     CONTEXT context;
 235
 236     switch ( info->si_code )
 237     {
 238     default:
 239     case ILL_ILLOPC:
 240     case ILL_ILLOPN:
 241     case ILL_ILLADR:
 242     case ILL_ILLTRP:
 243         rec.ExceptionCode = EXCEPTION_ILLEGAL_INSTRUCTION;
 244         break;
 245
 246     case ILL_PRVOPC:
 247     case ILL_PRVREG:
 248         rec.ExceptionCode = EXCEPTION_PRIV_INSTRUCTION;
 249         break;
 250
 251     case ILL_BADSTK:
 252         rec.ExceptionCode = EXCEPTION_STACK_OVERFLOW;
 253         break;
 254     }
 255
 256     save_context( &context, ucontext );
 257     rec.ExceptionRecord  = NULL;
 258     rec.ExceptionFlags   = EXCEPTION_CONTINUABLE;
 259     rec.ExceptionAddress = (LPVOID)context.pc;
 260     rec.NumberParameters = 0;
 261     __regs_RtlRaiseException( &rec, &context );
 262     restore_context( &context, ucontext );
 263 }
 264
 265
 266 /**********************************************************************
 267  *              trap_handler
 268  *
 269  * Handler for SIGTRAP.
 270  */
 271 static void trap_handler( int signal, siginfo_t *info, ucontext_t *ucontext )
 272 {
 273     EXCEPTION_RECORD rec;
 274     CONTEXT context;
 275
 276     switch ( info->si_code )
 277     {
 278     case TRAP_TRACE:
 279         rec.ExceptionCode = EXCEPTION_SINGLE_STEP;
 280         break;
 281     case TRAP_BRKPT:
 282     default:
 283         rec.ExceptionCode = EXCEPTION_BREAKPOINT;
 284         break;
 285     }
 286
 287     save_context( &context, ucontext );
 288     rec.ExceptionFlags   = EXCEPTION_CONTINUABLE;
 289     rec.ExceptionRecord  = NULL;
 290     rec.ExceptionAddress = (LPVOID)context.pc;
 291     rec.NumberParameters = 0;
 292     __regs_RtlRaiseException( &rec, &context );
 293     restore_context( &context, ucontext );
 294 }
 295
 296
 297 /**********************************************************************
 298  *              fpe_handler
 299  *
 300  * Handler for SIGFPE.
 301  */
 302 static void fpe_handler( int signal, siginfo_t *info, ucontext_t *ucontext )
 303 {
 304     EXCEPTION_RECORD rec;
 305     CONTEXT context;
 306
 307     switch ( info->si_code )
 308     {
 309     case FPE_FLTSUB:
 310         rec.ExceptionCode = EXCEPTION_ARRAY_BOUNDS_EXCEEDED;
 311         break;
 312     case FPE_INTDIV:
 313         rec.ExceptionCode = EXCEPTION_INT_DIVIDE_BY_ZERO;
 314         break;
 315     case FPE_INTOVF:
 316         rec.ExceptionCode = EXCEPTION_INT_OVERFLOW;
 317         break;
 318     case FPE_FLTDIV:
 319         rec.ExceptionCode = EXCEPTION_FLT_DIVIDE_BY_ZERO;
 320         break;
 321     case FPE_FLTOVF:
 322         rec.ExceptionCode = EXCEPTION_FLT_OVERFLOW;
 323         break;
 324     case FPE_FLTUND:
 325         rec.ExceptionCode = EXCEPTION_FLT_UNDERFLOW;
 326         break;
 327     case FPE_FLTRES:
 328         rec.ExceptionCode = EXCEPTION_FLT_INEXACT_RESULT;
 329         break;
 330     case FPE_FLTINV:
 331     default:
 332         rec.ExceptionCode = EXCEPTION_FLT_INVALID_OPERATION;
 333         break;
 334     }
 335
 336     save_context( &context, ucontext );
 337     save_fpu( &context, ucontext );
 338     rec.ExceptionFlags   = EXCEPTION_CONTINUABLE;
 339     rec.ExceptionRecord  = NULL;
 340     rec.ExceptionAddress = (LPVOID)context.pc;
 341     rec.NumberParameters = 0;
 342     __regs_RtlRaiseException( &rec, &context );
 343     restore_context( &context, ucontext );
 344     restore_fpu( &context, ucontext );
 345 }
 346
 347
 348 /**********************************************************************
 349  *              int_handler
 350  *
 351  * Handler for SIGINT.
 352  */
 353 static void int_handler( int signal, siginfo_t *info, ucontext_t *ucontext )
 354 {
 355     if (!dispatch_signal(SIGINT))
 356     {
 357         EXCEPTION_RECORD rec;
 358         CONTEXT context;
 359
 360         save_context( &context, ucontext );
 361         rec.ExceptionCode    = CONTROL_C_EXIT;
 362         rec.ExceptionFlags   = EXCEPTION_CONTINUABLE;
 363         rec.ExceptionRecord  = NULL;
 364         rec.ExceptionAddress = (LPVOID)context.pc;
 365         rec.NumberParameters = 0;
 366         __regs_RtlRaiseException( &rec, &context );
 367         restore_context( &context, ucontext );
 368     }
 369 }
 370
 371 /**********************************************************************
 372  *              abrt_handler
 373  *
 374  * Handler for SIGABRT.
 375  */
 376 static HANDLER_DEF(abrt_handler)
 377 {
 378     EXCEPTION_RECORD rec;
 379     CONTEXT context;
 380
 381     save_context( &context, HANDLER_CONTEXT );
 382     rec.ExceptionCode    = EXCEPTION_WINE_ASSERTION;
 383     rec.ExceptionFlags   = EH_NONCONTINUABLE;
 384     rec.ExceptionRecord  = NULL;
 385     rec.ExceptionAddress = (LPVOID)context.pc;
 386     rec.NumberParameters = 0;
 387     __regs_RtlRaiseException( &rec, &context ); /* Should never return.. */
 388     restore_context( &context, HANDLER_CONTEXT );
 389 }
 390
 391
 392 /**********************************************************************
 393  *              quit_handler
 394  *
 395  * Handler for SIGQUIT.
 396  */
 397 static HANDLER_DEF(quit_handler)
 398 {
 399     server_abort_thread(0);
 400 }
 401
 402
 403 /**********************************************************************
 404  *              usr1_handler
 405  *
 406  * Handler for SIGUSR1, used to signal a thread that it got suspended.
 407  */
 408 static HANDLER_DEF(usr1_handler)
 409 {
 410     CONTEXT context;
 411
 412     save_context( &context, HANDLER_CONTEXT );
 413     wait_suspend( &context );
 414     restore_context( &context, HANDLER_CONTEXT );
 415 }
 416
 417
 418 /**********************************************************************
 419  *              get_signal_stack_total_size
 420  *
 421  * Retrieve the size to allocate for the signal stack, including the TEB at the bottom.
 422  * Must be a power of two.
 423  */
 424 size_t get_signal_stack_total_size(void)
 425 {
 426     assert( sizeof(TEB) <= getpagesize() );
 427     return getpagesize();  /* this is just for the TEB, we don't need a signal stack */
 428 }
 429
 430
 431 /***********************************************************************
 432  *           set_handler
 433  *
 434  * Set a signal handler
 435  */
 436 static int set_handler( int sig, void (*func)() )
 437 {
 438     struct sigaction sig_act;
 439
 440     sig_act.sa_sigaction = func;
 441     sig_act.sa_mask = server_block_set;
 442     sig_act.sa_flags = SA_SIGINFO;
 443
 444     return sigaction( sig, &sig_act, NULL );
 445 }
 446
 447
 448 /***********************************************************************
 449  *           __wine_set_signal_handler   (NTDLL.@)
 450  */
 451 int CDECL __wine_set_signal_handler(unsigned int sig, wine_signal_handler wsh)
 452 {
 453     if (sig > sizeof(handlers) / sizeof(handlers[0])) return -1;
 454     if (handlers[sig] != NULL) return -2;
 455     handlers[sig] = wsh;
 456     return 0;
 457 }
 458
 459
 460 /**********************************************************************
 461  *              signal_init_thread
 462  */
 463 void signal_init_thread(void)
 464 {
 465 }
 466
 467 /**********************************************************************
 468  *              signal_init_process
 469  */
 470 void signal_init_process(void)
 471 {
 472     if (set_handler( SIGINT,  (void (*)())int_handler  ) == -1) goto error;
 473     if (set_handler( SIGFPE,  (void (*)())fpe_handler  ) == -1) goto error;
 474     if (set_handler( SIGSEGV, (void (*)())segv_handler ) == -1) goto error;
 475     if (set_handler( SIGILL,  (void (*)())ill_handler  ) == -1) goto error;
 476     if (set_handler( SIGBUS,  (void (*)())bus_handler  ) == -1) goto error;
 477     if (set_handler( SIGTRAP, (void (*)())trap_handler ) == -1) goto error;
 478     if (set_handler( SIGABRT, (void (*)())abrt_handler ) == -1) goto error;
 479     if (set_handler( SIGQUIT, (void (*)())quit_handler ) == -1) goto error;
 480     if (set_handler( SIGUSR1, (void (*)())usr1_handler ) == -1) goto error;
 481     /* 'ta 6' tells the kernel to synthesize any unaligned accesses this
 482        process makes, instead of just signalling an error and terminating
 483        the process.  wine-devel did not reach a conclusion on whether
 484        this is correct, because that is what x86 does, or it is harmful
 485        because it could obscure problems in user code */
 486     asm("ta 6"); /* 6 == ST_FIX_ALIGN defined in sys/trap.h */
 487     signal_init_thread();
 488     return;
 489
 490  error:
 491     perror("sigaction");
 492     exit(1);
 493 }
 494
 495
 496 /**********************************************************************
 497  *              __wine_enter_vm86
 498  */
 499 void __wine_enter_vm86( CONTEXT *context )
 500 {
 501     MESSAGE("vm86 mode not supported on this platform\n");
 502 }
 503
 504 /**********************************************************************
 505  *              DbgBreakPoint   (NTDLL.@)
 506  */
 507 void WINAPI DbgBreakPoint(void)
 508 {
 509      kill(getpid(), SIGTRAP);
 510 }
 511
 512 /**********************************************************************
 513  *              DbgUserBreakPoint   (NTDLL.@)
 514  */
 515 void WINAPI DbgUserBreakPoint(void)
 516 {
 517      kill(getpid(), SIGTRAP);
 518 }
 519
 520 #endif  /* __sparc__ */