Подскажите как выклядит структура DEBUG_EVENT, пишу на VB. А есть у кого наработки трейсера? И где можно найти константы и структуры?

-----
Research For Food

| Сообщение посчитали полезным:

msdn.microsoft.com/library/en-us/debug/base/debug_event_str.asp?frame= true

-----
Nothing just happens. You choose it to happen.

| Сообщение посчитали полезным:

Спаибо за ссылку, но там структура явно не на ВБ написана, можеш объяснить мне смысл строк идущих после union {

typedef struct _DEBUG_EVENT {
DWORD dwDebugEventCode;
DWORD dwProcessId;
DWORD dwThreadId;
union {
EXCEPTION_DEBUG_INFO Exception;
CREATE_THREAD_DEBUG_INFO CreateThread;
CREATE_PROCESS_DEBUG_INFO CreateProcessInfo;
EXIT_THREAD_DEBUG_INFO ExitThread;
EXIT_PROCESS_DEBUG_INFO ExitProcess;
LOAD_DLL_DEBUG_INFO LoadDll;
UNLOAD_DLL_DEBUG_INFO UnloadDll;
OUTPUT_DEBUG_STRING_INFO DebugString;
RIP_INFO RipInfo;
} u;
} DEBUG_EVENT,
*LPDEBUG_EVENT;

-----
Research For Food

| Сообщение посчитали полезным:

www.wasm.ru/article.php?article=1001030

| Сообщение посчитали полезным:

daFix пишет:
EXCEPTION_DEBUG_INFO Exception;
CREATE_THREAD_DEBUG_INFO CreateThread;
CREATE_PROCESS_DEBUG_INFO CreateProcessInfo;
EXIT_THREAD_DEBUG_INFO ExitThread;
EXIT_PROCESS_DEBUG_INFO ExitProcess;
LOAD_DLL_DEBUG_INFO LoadDll;
UNLOAD_DLL_DEBUG_INFO UnloadDll;
OUTPUT_DEBUG_STRING_INFO DebugString;
RIP_INFO RipInfo;

это всё, тоже структуры! кури доки на васме...

-----
[nice coder and reverser]

| Сообщение посчитали полезным:

[19:28:41] <Ast> запостите ссылко в топик про дебуг_эвент www.codeguru.com/vb/gen/vb_system/win32/article.php/c7525/

| Сообщение посчитали полезным:

Я когда-то так писал:


Public Const EXCEPTION_MAXIMUM_PARAMETERS = 15

Public Type EXCEPTION_RECORD
ExceptionCode As Long
ExceptionFlags As Long
pExceptionRecord As Long
ExceptionAddress As Long
NumberParameters As Long
ExceptionInformation(EXCEPTION_MAXIMUM_PARAMETERS) As Long
End Type

Public Type EXCEPTION_DEBUG_INFO
ExceptionRecord As EXCEPTION_RECORD
dwFirstChance As Long
End Type

Public Type CREATE_THREAD_DEBUG_INFO
hThread As Long
lpThreadLocalBase As Long
lpStartAddress As Long
End Type

Public Type CREATE_PROCESS_DEBUG_INFO
hFile As Long
hProcess As Long
hThread As Long
lpBaseOfImage As Long
dwDebugInfoFileOffset As Long
nDebugInfoSize As Long
lpThreadLocalBase As Long
lpStartAddress As Long
lpImageName As Long
fUnicode As Integer
End Type

Public Type EXIT_THREAD_DEBUG_INFO
dwExitCode As Long
End Type

Public Type EXIT_PROCESS_DEBUG_INFO
dwExitCode As Long
End Type

Public Type LOAD_DLL_DEBUG_INFO
hFile As Long
lpBaseOfDll As Long
dwDebugInfoFileOffset As Long
nDebugInfoSize As Long
lpImageName As Long
fUnicode As Integer
End Type

Public Type UNLOAD_DLL_DEBUG_INFO
lpBaseOfDll As Long
End Type

Public Type OUTPUT_DEBUG_STRING_INFO
lpDebugStringData As String
fUnicode As Integer
nDebugStringiLength As Integer
End Type

Public Type RIP_INFO
dwError As Long
dwType As Long
End Type

Public Type DEBUGSTRUCT
Exception As EXCEPTION_DEBUG_INFO
CreateThread As CREATE_THREAD_DEBUG_INFO
CreateProcessInfo As CREATE_PROCESS_DEBUG_INFO
ExitThread As EXIT_THREAD_DEBUG_INFO
ExitProcess As EXIT_PROCESS_DEBUG_INFO
LoadDll As LOAD_DLL_DEBUG_INFO
UnloadDll As UNLOAD_DLL_DEBUG_INFO
DebugString As OUTPUT_DEBUG_STRING_INFO
RipInfo As RIP_INFO
End Type

Public Type DEBUG_EVENT
dwDebugEventCode As Long
dwProcessId As Long
dwThreadId As Long
u As DEBUGSTRUCT
End Type


| Сообщение посчитали полезным:

W[4Fh]LF Спасибо щас попробую

Нарыл такую шнягу:

(Вырезка из DEBUGGY)
Public Type DEBUG_EVENT
dwDebugEventCode As Long
dwProcessId As Long
dwThreadId As Long
Data(20) As Long 'enough space
'UNION***NOT SUPPORTED BY VB <-------
End Type

Так структура будет работать на ВБ ?

-----
Research For Food

| Сообщение посчитали полезным:

slip

Офигенная ссылка! Думаю этого хватит с головой!
Респект всем за помощь!

-----
Research For Food

| Сообщение посчитали полезным: