| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Отладка процесса с точками останова
Unknown user © (2009-05-08 12:46:00)Подскажите, пожалуйста как продолжить выполнение отлаживаемого потока после события EXCEPTION_BREAKPOINT. Пишу отладчик, вот код:
BrkCnt := 0;
//запоминаем инструкцию
StartAddr := $401000 + FndLin.Offset;
ReadProcessMemory(ProcInfo.hProcess, Pointer(StartAddr),
@OrigOp, SizeOf(OrigOp), BR);
//записываем точку останова
BrkPnt := $CC;
WriteProcessMemory(ProcInfo.hProcess, Pointer(StartAddr),
@BrkPnt, SizeOf(BrkPnt), BW);
repeat
WaitForDebugEvent(Event, INFINITE);
if (Event.dwDebugEventCode = EXCEPTION_DEBUG_EVENT) and
(Event.Exception.ExceptionRecord.ExceptionCode = EXCEPTION_BREAKPOINT) then
begin
Inc(BrkCnt);
//пропускаем останов на первой исполняемой инструкции
if BrkCnt > 1 then
begin
//останавливаемся в нужном месте
...
//восстанавливаем инструкцию в точке останова
WriteProcessMemory(ProcInfo.hProcess, Pointer(StartAddr),
@OrigOp, SizeOf(OrigOp), BW);
//для надежности
FlushInstructionCache(ProcInfo.hProcess, nil, 0);
end;
end;
//продолжаем выполнение
ContinueDebugEvent(Event.dwProcessId, Event.dwThreadId, DBG_CONTINUE);
until False;
Останов происходит в нужном месте. Однако после восстановления измененной инструкции и запуска на дальнейшее выполнение сыпятся исключения (уже не EXCEPTION_BREAKPOINT).
Понимаю, что наверное, не выполнил всех необходимых действий после срабатывания breakpoint. Нужно ли изменять значения регистров процессора для запуска после breakpoint?
Unknown user (2009-05-08 15:52:00) [1]Большое спасибо, действительно EIP.
Rouse_ (2009-05-08 13:59:00) [2]EIP сдвинь на единицу назад, т.к. EXCEPTION_BREAKPOINT поднимается уже после выполнения INT 3
| |
