mirror of
git://source.winehq.org/git/wine.git
synced 2024-09-14 18:25:40 +00:00
a69b88b2f2
Sun Mar 15 03:46:50 1998 Dimitrie O. Paun <dimi@mail.cs.toronto.edu> * [*/*] Fixed some dprintf_ such that there is one and only one new line for each dprintf and that new line occurs at the end. Transformed some fprintfs into proper debug statements. Removed much redundancy from most of the debug statements. The redundancy appeared because now the component and function name is output automatically. Most debug statements also used to output the name of the function. All these changes prepared the source to switch completely to the new debugging interface. For more info, refer to ./documentation/debug-msg Sat Mar 14 19:45:23 1997 Andreas Mohr <100.30936@germany.net> * [misc/shell.c] [if1632/kernel.spec] Changed parameters of FUNC004() to fix a crash. Not sure if this fix is correct (doc wanted). * [windows/user.c] [if1632/user.spec] [include/user.h] Implemented UserSeeUserDo. * [msdos/int21.c] [include/msdos.h] Added "GET LIST OF LISTS" (INT 21/52h). Sat Mar 14 15:48:02 1998 Douglas Ridgway <ridgway@gmcl.com> * [include/windows.h] [relay32/gdi32.spec] [objects/enhmetafile.c] Beginnings of enhanced metafile support. Fri Mar 13 20:53:09 1998 John Richardson <jrichard@zko.dec.com> * [win32/console.c] Restart interrupted console writes. Fri Mar 13 18:59:24 1998 Matthew Becker <mbecker@glasscity.net> * [*/*.c] Updated documentation for API manpages. * [windows/dce.c] ReleaseDC16: Fixed cast. * [include/windows.h] [memory/virtual.c] VirtualQuery{Ex} should return DWORD instead of BOOL32. Fri Mar 13 13:03:06 1998 Marcus Meissner <msmeissn@cip.informatik.uni-erlangen.de> * [README][documentation/status/] README updated, added lzexpand,version and multimedia status notes to new documentation/status directory. * [ole/*.c][if1632/typelib.spec] Added typelib stubs, several small additions and fixes. * [loader/pe_image.c] Fixed a small bug (fixup_imports got passed the wrong hModule in a remapcase). * [loader/signal.c][if1632/signal.c][misc/winsock_dns.c] [loader/module.c] Fixed some recursive debugger crashes (caused by invalid FS). * [misc/registry.c] Two bugs fixed. Fri Mar 13 04:55:01 1998 David Lee Lambert <lamber45@egr.msu.edu> * [include/winnt.h] [include/winnls.h] Moved LANG_xxx flags to winnls.h * [include/winnls.h] Added flags for GetDateFormat(); fixed validity of LOCALE_SYSTEM_DEFAULT. * [include/windows.h] Added GetTimeFormat() prototypes. * [ole/ole2nls.c] Implemented ASCII date- and time-functions, using an optimized common core; added stubs for Unicode versions; started work on a Unicode core. * [AUTHORS] Added my name. Mon Mar 9 20:10:15 1998 Eric Kohl <ekohl@abo.rhein-zeitung.de> * [relay32/comctl32.spec] [include/imagelist.h] [include/commctrl.h] [misc/imagelist.c] [misc/Makefile.in] First attempt at implementing ImageLists. Sun Mar 8 20:19:49 1998 Uwe Bonnes <bon@elektron.ikp.physik.tu-darmstadt.de> * [files/dos_fs.c] [configure.in] Try to get FileTimeToLocalFileTime,FileTimeToSystemTime and SystemTimeToFileTime right. Use timegm() where available. * [misc/lstr.c] Fix an off by one error in FormatMessage and handle the case when args = NULL (used by programs to get the length of the string). * [win32/console.c] Actual display a per-process Title string, better working attempt for WriteConsole32W and ReadConsole32W. Fri Mar 6 20:33:45 1998 Slaven Rezic <eserte@cs.tu-berlin.de> * [include/config.h.in][configure.in][multimedia/audio.c] [multimedia/dsound.c] Added check for FreeBSD sound system. Sun Mar 1 17:40:10 1998 Jason Schonberg <schon@mti.sgi.com> * [controls/edit.c] [include/ole.h] [include/shlobj.h] Removed final commas in enum types. Mon Feb 23 07:52:18 1998 Luiz Otavio L. Zorzella <zorzella@nr.conexware.com> * [multimedia/time.c] Workaround to avoid infinite recursion inside timeGetTime. * [multimedia/audio.c] WODM_GETNUMDEVS and WIDM_GETNUMDEVS only return 1 now if the SOUND_DEV can be opened, or if it's busy.
221 lines
7.9 KiB
C
221 lines
7.9 KiB
C
/*
|
|
* Win32 exception functions
|
|
*
|
|
* Copyright (c) 1996 Onno Hovers, (onno@stack.urc.tue.nl)
|
|
*
|
|
* Notes:
|
|
* What really happens behind the scenes of those new
|
|
* __try{...}__except(..){....} and
|
|
* __try{...}__finally{...}
|
|
* statements is simply not documented by Microsoft. There could be different
|
|
* reasons for this:
|
|
* One reason could be that they try to hide the fact that exception
|
|
* handling in Win32 looks almost the same as in OS/2 2.x.
|
|
* Another reason could be that Microsoft does not want others to write
|
|
* binary compatible implementations of the Win32 API (like us).
|
|
*
|
|
* Whatever the reason, THIS SUCKS!! Ensuring portabilty or future
|
|
* compatability may be valid reasons to keep some things undocumented.
|
|
* But exception handling is so basic to Win32 that it should be
|
|
* documented!
|
|
*
|
|
* Fixmes:
|
|
* -Most functions need better parameter checking.
|
|
* -I do not know how to handle exceptions within an exception handler.
|
|
* or what is done when ExceptionNestedException is returned from an
|
|
* exception handler
|
|
* -Real exceptions are not yet implemented. only the exception functions
|
|
* are implemented. A real implementation needs some new code in
|
|
* loader/signal.c. There would also be a need for showing debugging
|
|
* information in UnhandledExceptionFilter.
|
|
*
|
|
*/
|
|
|
|
#include <assert.h>
|
|
#include <stdio.h>
|
|
#include "windows.h"
|
|
#include "winerror.h"
|
|
#include "ldt.h"
|
|
#include "process.h"
|
|
#include "thread.h"
|
|
#include "debug.h"
|
|
#include "except.h"
|
|
|
|
#define TEB_EXCEPTION_FRAME(pcontext) \
|
|
((PEXCEPTION_FRAME)((TEB *)GET_SEL_BASE((pcontext)->SegFs))->except)
|
|
|
|
/*******************************************************************
|
|
* RtlUnwind (KERNEL32.443)
|
|
*
|
|
* This function is undocumented. This is the general idea of
|
|
* RtlUnwind, though. Note that error handling is not yet implemented.
|
|
*/
|
|
void WINAPI RtlUnwind( PEXCEPTION_FRAME pEndFrame, LPVOID unusedEip,
|
|
PEXCEPTION_RECORD pRecord, DWORD returnEax,
|
|
PCONTEXT pcontext /* Wine additional parameter */ )
|
|
{
|
|
EXCEPTION_RECORD record;
|
|
DWORD dispatch;
|
|
int retval;
|
|
|
|
EAX_reg(pcontext) = returnEax;
|
|
|
|
/* build an exception record, if we do not have one */
|
|
if(!pRecord)
|
|
{
|
|
record.ExceptionCode = STATUS_INVALID_DISPOSITION;
|
|
record.ExceptionFlags = 0;
|
|
record.ExceptionRecord = NULL;
|
|
record.ExceptionAddress = (LPVOID)EIP_reg(pcontext);
|
|
record.NumberParameters = 0;
|
|
pRecord = &record;
|
|
}
|
|
|
|
if(pEndFrame)
|
|
pRecord->ExceptionFlags|=EH_UNWINDING;
|
|
else
|
|
pRecord->ExceptionFlags|=EH_UNWINDING | EH_EXIT_UNWIND;
|
|
|
|
/* get chain of exception frames */
|
|
while ((TEB_EXCEPTION_FRAME(pcontext) != NULL) &&
|
|
(TEB_EXCEPTION_FRAME(pcontext) != ((void *)0xffffffff)) &&
|
|
(TEB_EXCEPTION_FRAME(pcontext) != pEndFrame))
|
|
{
|
|
TRACE(win32, "calling exception handler at 0x%x\n",
|
|
(int)TEB_EXCEPTION_FRAME(pcontext)->Handler );
|
|
|
|
dispatch=0;
|
|
retval = TEB_EXCEPTION_FRAME(pcontext)->Handler( pRecord,
|
|
TEB_EXCEPTION_FRAME(pcontext),
|
|
pcontext, &dispatch);
|
|
|
|
TRACE(win32,"exception handler returns 0x%x, dispatch=0x%x\n",
|
|
retval, (int) dispatch);
|
|
|
|
if ( (retval == ExceptionCollidedUnwind) &&
|
|
(TEB_EXCEPTION_FRAME(pcontext) != (LPVOID)dispatch)
|
|
)
|
|
TEB_EXCEPTION_FRAME(pcontext) = (LPVOID)dispatch;
|
|
else if ( (TEB_EXCEPTION_FRAME(pcontext) != pEndFrame) &&
|
|
(TEB_EXCEPTION_FRAME(pcontext) != TEB_EXCEPTION_FRAME(pcontext)->Prev)
|
|
)
|
|
TEB_EXCEPTION_FRAME(pcontext) = TEB_EXCEPTION_FRAME(pcontext)->Prev;
|
|
else
|
|
break;
|
|
}
|
|
}
|
|
|
|
/* This is the real entry point called by relay debugging code */
|
|
void EXC_RtlUnwind( CONTEXT *context )
|
|
{
|
|
/* Retrieve the arguments (args[0] is return addr, args[1] is first arg) */
|
|
DWORD *args = (DWORD *)ESP_reg(context);
|
|
ESP_reg(context) += 4 * sizeof(DWORD); /* Pop the arguments */
|
|
RtlUnwind( (PEXCEPTION_FRAME)args[1], (LPVOID)args[2],
|
|
(PEXCEPTION_RECORD)args[3], args[4], context );
|
|
}
|
|
|
|
|
|
/*******************************************************************
|
|
* RaiseException (KERNEL32.418)
|
|
*/
|
|
void WINAPI RaiseException(DWORD dwExceptionCode,
|
|
DWORD dwExceptionFlags,
|
|
DWORD cArguments,
|
|
const LPDWORD lpArguments,
|
|
PCONTEXT pcontext /* Wine additional parameter */ )
|
|
{
|
|
PEXCEPTION_FRAME pframe;
|
|
EXCEPTION_RECORD record;
|
|
DWORD dispatch; /* is this used in raising exceptions ?? */
|
|
int retval;
|
|
int i;
|
|
|
|
/* compose an exception record */
|
|
|
|
record.ExceptionCode = dwExceptionCode;
|
|
record.ExceptionFlags = dwExceptionFlags;
|
|
record.ExceptionRecord = NULL;
|
|
record.NumberParameters = cArguments;
|
|
record.ExceptionAddress = (LPVOID)EIP_reg(pcontext);
|
|
|
|
if (lpArguments) for( i = 0; i < cArguments; i++)
|
|
record.ExceptionInformation[i] = lpArguments[i];
|
|
|
|
/* get chain of exception frames */
|
|
|
|
retval = ExceptionContinueSearch;
|
|
pframe = TEB_EXCEPTION_FRAME( pcontext );
|
|
|
|
while((pframe!=NULL)&&(pframe!=((void *)0xFFFFFFFF)))
|
|
{
|
|
TRACE(win32,"calling exception handler at 0x%x\n",
|
|
(int) pframe->Handler);
|
|
dispatch=0;
|
|
TRACE(relay,"(except=%p,record=%p,frame=%p,context=%p,dispatch=%p)\n",
|
|
pframe->Handler, &record, pframe, pcontext, &dispatch );
|
|
retval=pframe->Handler(&record,pframe,pcontext,&dispatch);
|
|
|
|
TRACE(win32,"exception handler returns 0x%x, dispatch=0x%x\n",
|
|
retval, (int) dispatch);
|
|
|
|
if(retval==ExceptionContinueExecution)
|
|
break;
|
|
pframe=pframe->Prev;
|
|
}
|
|
|
|
if (retval!=ExceptionContinueExecution)
|
|
{
|
|
/* FIXME: what should we do here? */
|
|
TRACE(win32,"no handler wanted to handle the exception, exiting\n");
|
|
ExitProcess(dwExceptionCode); /* what status should be used here ? */
|
|
}
|
|
}
|
|
|
|
/* This is the real entry point called by relay debugging code */
|
|
void EXC_RaiseException( CONTEXT *context )
|
|
{
|
|
/* Retrieve the arguments (args[0] is return addr, args[1] is first arg) */
|
|
DWORD *args = (DWORD *)ESP_reg(context);
|
|
ESP_reg(context) += 4 * sizeof(DWORD); /* Pop the arguments */
|
|
RaiseException( args[1], args[2], args[3], (LPDWORD)args[4], context );
|
|
}
|
|
|
|
/*******************************************************************
|
|
* UnhandledExceptionFilter (KERNEL32.537)
|
|
*/
|
|
DWORD WINAPI UnhandledExceptionFilter(PEXCEPTION_POINTERS epointers)
|
|
{
|
|
char message[80];
|
|
PDB32 *pdb = PROCESS_Current();
|
|
|
|
/* FIXME: Should check if the process is being debugged */
|
|
|
|
if (pdb->top_filter)
|
|
{
|
|
DWORD ret = pdb->top_filter( epointers );
|
|
if (ret != EXCEPTION_CONTINUE_SEARCH) return ret;
|
|
}
|
|
|
|
/* FIXME: Should check the current error mode */
|
|
|
|
sprintf( message, "Unhandled exception 0x%08lx at address 0x%08lx.",
|
|
epointers->ExceptionRecord->ExceptionCode,
|
|
(DWORD)epointers->ExceptionRecord->ExceptionAddress );
|
|
MessageBox32A( 0, message, "Error", MB_OK | MB_ICONHAND );
|
|
return EXCEPTION_EXECUTE_HANDLER;
|
|
}
|
|
|
|
|
|
/*************************************************************
|
|
* SetUnhandledExceptionFilter (KERNEL32.516)
|
|
*/
|
|
LPTOP_LEVEL_EXCEPTION_FILTER WINAPI SetUnhandledExceptionFilter(
|
|
LPTOP_LEVEL_EXCEPTION_FILTER filter )
|
|
{
|
|
PDB32 *pdb = PROCESS_Current();
|
|
LPTOP_LEVEL_EXCEPTION_FILTER old = pdb->top_filter;
|
|
pdb->top_filter = filter;
|
|
return old;
|
|
}
|