Advapihook & Windows7

Почему не работает эта либа в win7 , ставлю стандартный хук на любую функцию, например так

Код (Text):

1. function Nsend(s:tsocket; var buf; len, flags: integer): integer;stdcall;
2. begin
3. Result:=Tsend(s,Buf,len,flags);
4. end;

При переходе на строчку Result:=Tsend(s,Buf,len,flags); процесс в котором перехват вылетает с ошибкой.
В отладчике толком посмотреть не могу, т.к. плохо разбираюсь в таких вещах.

 

в функции HookCode

Код (Text):

1.   GetMem(OldFunction, 255);

измени способ выделения памяти на VirtualAlloc

 

сейчас попробую

 

ставлю OldFunction:=virtualalloc(nil,255,MEM_COMMIT or MEM_RESERVE,PAGE_READWRITE);
также вылетает с ошибкой

 

мб тогда DEP,x64,UAC ?

 

у меня экзепшена нет.
только что затестил вмваре Win7

 

DEP отключена. система х32 UAC включена, но причем здесь?

 

вместо PAGE_READWRITE надо PAGE_EXECUTE_READWRITE =\

 

спасибо. теперь все работает

 

Там дохрена ошибок - советую написать свою с дизасмом длин.

 

дизасм длин для меня сейчас трудная задача )

 

зачем писать то, что тыщу раз написано до нас?

 

тип защиты поправь на PAGE_EXECUTE_READWRITE

 

Патч кода использовать там где можно обойтись без него просто глупо.

 

ну а как обойтись без патча если нужно контролировать выполнение функции?

 

Ща тебе прочтут лекцию при наличии соответствующего настроения у Клерка про использование сексуальной обработки исключений и генерации собственного сепшина для отлова функции.

 

d2k9
Нет желания читать лекцию. Способов множество, не только сепшены - калбэки, синхронизация(бесконечные циклы ожидания), системные ошибки и пр.

 

Все вышеперечисленное не относится к стабильности и совместимости, учитывая задачу ТС, когда функция send может вызываться немерянное количество раз из десятков потоков.

 

Ну тут да наиболее оптимально IAT патчинг или сплайс - но надёжнее в ядре

 

JohnFive
Почему не стабильно ?
Это зависит не от техники, а от кривости рук автора. Даже такой тяжёлый способ захвата как трассировка никак не скажется на скорости работы этой функи.