深入浅出HOOKS（之贰）

如何获得密码窗口的内容------揭开Hook的面纱

Pan Ying(zero world)

现在的不少程序都有取得密码窗口的内容的功能，你有没有想过是如何做到这一切的呢？我有一个同学就问过我这样一个问题，当时我也回答不出来，现在我研究了视窗的Hook函数之后总算有了一定的了解。下面就有我来揭开Hook函数的神秘面纱。

先来介绍Hook的含义：

Hook是指在程序正常运行中接受信息之前预先启动的函数，用来检查和修改传给该程序的信息。举例来说，当你在一个窗口上点击鼠标以后，首先接收信息的是相应的Hook函数，然后才传到相应的应用程序。

如何定义Hook函数：

SetWindowsHookEx：

用来装入新的Hook函数，其参数列表为下：

int idHook：装入Hook类型，有WH_MOUSE 等。

HOOKPROC lpfn：要装入的Hook函数地址。

HINSTANCE hMod：函数所在的进程，如果为全局Hook函数该函数必须在Dll中。

DWORD dwThreadId：装入哪个进程，如果为全局，则为0。

返回相应Hook标识。

HookProc：

您自定义的Hook函数，应具有的参数如下：

int nCode：传入的信息类型。

WPARAM wParam：短整型参数。

LPARAM lParam：长整型参数。

要在函数中调用CallNextHookEx把信息传给下一个Hook函数。

CallNextHookEx：

用于将信息传给下一个Hook函数，需要将得到的Hook标识和相应参数传入。

UnhookWindowsHookEx：

用于将装入的Hook函数从Hook链表中剔除，应传入得到的Hook标识。

下面我们来看一个例子：

例子原码的下载：HookTest.zip 本程序在Window98和Delphi5下通过。

一、调用LoadLibrary和GetProcAddress取得函数地址。

hinstDLL := LoadLibrary(LPCTSTR( 'hooktest.dll'));

@hkprcSysMsg:=GetProcAddress(hinstDLL, 'MouseProc');

二、用SetWindowsHookEx将得到的函数装入。

hhk:= SetWindowsHookEx(WH_MOUSE,@hkprcSysMsg,hinstDLL, 0);

三、Windows会将函数装入到每一个进程中。

四、每当鼠标点击，自定义的Hook函数会将点击的窗口标题传给程序的标题。

if (nCode=HC_ACTION)and(WPARAM=WM_LBUTTONDOWN)

then

begin

MyMouse:=CPointer(lPARAM);

MyHandle2:=MyMouse^.hwnd;

GetMem(MyString,GetWindowTextlength(myhandle2)+1);

GetWindowText(MyHandle2,MyString,GetWindowTextlength(myhandle2)+1);

TempHandle:=myhandle2;

while (TempHandle<>0) do

begin

myHandle2:=TempHandle;

TempHandle:=GetParent(TempHandle);

end;

if (myhandle2<>0)

then

SetWindowText(myhandle2,MyString);

FreeMem(MyString);

end

就这样完成了得到密码窗口内容的功能。