学习如何编制WINDOWS系统下的钩子函数

转载 2007年09月25日 09:50:00

原文转自:http://www.3800hk.com/news/w45/129917.html

【编辑提示:本文内容仅供参考,切勿用于不当之处!】

把鼠标关标滑过一个窗口时,该窗口的有关消息将显示在主窗口中。当您按下“Unhook”时,应用程序将卸载钩子。主窗口使用一个对话框来作为它的主窗口。它自定义了一个消息WM_MOUSEHOOK,用来在主窗口和DLL之间传递消息。当主窗口接收到该消息时,wParam中包含了光标所在位置的窗口的句柄。当然这是我们做的安排。我这么做只是为了方便。您可以使用您自己的方法在主应用程序和DLL之间进行通讯。

 

.if HookFlag==FALSE 
invoke InstallHook,hDlg 
.if eax!=NULL 
mov HookFlag,TRUE 
invoke SetDlgItemText,hDlg,IDC_HOOK,addr UnhookText 
.endif

该应用程序有一个全局变量,HookFlag,它用来监视钩子的状态。如果安装来钩子它就是TRUE,否则是FALSE。当用户按下Hook按钮时,应用程序检查钩子是否已经安装。如果还没有的话,它将调用DLL中引出的函数InstallHook来安装它。注意我们把主对话框的句柄传递给了DLL,这样这个钩子DLL就可以把WM_MOUSEHOOK消息传递给正确的窗口了。当应用程序加载时,钩子DLL也同时加载。时机上当主程序一旦加载到内存中后,DLL就立即加载。DLL的入口点函数载主程序的第一条语句执行前就前执行了。所以当主程序执行时,DLL已经初始化好了。我们载入口点处放入如下代码:

 

.if reason==DLL_PROCESS_ATTACH 
push hInst 
pop hInstance 
.endif

该段代码把DLL自己的实例句柄放到一个全局变量中保存。由于入口点函数是在所有函数调用前被执行的,所以hInstance总是有效的。我们把该变量放到.data中,使得每一个进程都有自己一个该变量的值。因为当鼠标光标停在一个窗口上时,钩子DLL被映射进进程的地址空间。加入在DLL缺省加载的地址处已经加载其它的DLL,那钩子DLL将要被映射到其他的地址。hInstance将被更新成其它的值。当用户按下Unhook再按下Hook时,SetWindowsHookEx将被再次调用。这一次,它将把新的地址作为实例句柄。而在例子中这是错误的,DLL装载的地址并没有变。这个钩子将变成一个局部的,您只能钩挂发生在您窗口中的鼠标事件,这是很难让人满意的。

 

InstallHook proc hwnd:DWORD 
push hwnd 
pop hWnd 
invoke SetWindowsHookEx,WH_MOUSE,addr MouseProc,hInstance,NULL 
mov hHook,eax 
ret 
InstallHook endp

InstallHook 函数非常简单。它把传递过来的窗口句柄保存在hWnd中以备后用。接着调用SetWindowsHookEx函数来安装一个鼠标钩子。该函数的返回值放在全局变量hHook中,将来在UnhookWindowsHookEx中还要使用。在调用SetWindowsHookEx后,鼠标钩子就开始工作了。无论什么时候发生了鼠标事件,MouseProc函数都将被调用:

 

MouseProc proc nCode:DWORD,wParam:DWORD,lParam:DWORD 
invoke CallNextHookEx,hHook,nCode,wParam,lParam 
mov edx,lParam 
assume edx:PTR MOUSEHOOKSTRUCT 
invoke WindowFromPoint,[edx].pt.x,[edx].pt.y 
invoke PostMessage,hWnd,WM_MOUSEHOOK,eax,0 
assume edx:nothing 
xor eax,eax 
ret 
MouseProc endp

 

钩子函数首先调用CallNextHookEx函数让其它的钩子处理该鼠标事件。然后,调用WindowFromPoint函数来得到给定屏幕坐标位置处的窗口句柄。注意:我们用lParam指向的MOUSEHOOKSTRUCT型结构体变量中的POINT成员变量作为当前的鼠标位置。在我们调用PostMessage函数把WM_MOUSEHOOK消息发送到主程序。您必须记住的一件事是:在钩子函数中不要使用SendMessage函数,它会引起死锁。MOUSEHOOKSTRUCT的定义如下:

 

MOUSEHOOKSTRUCT STRUCT DWORD 

pt POINT <> 

hwnd DWORD ? 

wHitTestCode DWORD ? 

dwExtraInfo DWORD ? 

MOUSEHOOKSTRUCT ENDS

pt 是当前鼠标所在的屏幕位置。

hwnd 是将接收鼠标消息的窗口的句柄。通常它是鼠标所在处的窗口,但是如果窗口调用了SetCapture,鼠标的输入将到向到这个窗口。因我们不用该成员变量而是用WindowFromPoint函数。

wHitTestCode 指定hit-test值,该值给出了更多的鼠标位置值。它指定了鼠标在窗口的那个部位。该值的完全列表,请参考WIN32 API 指南中的WM_NCHITTEST消息。

dwExtraInfo 该值包含了相关的信息。一般该值由mouse_event函数设定,可以调用GetMessageExtraInfo来获得。

当主窗口接收到WM_MOUSEHOOK 消息时,它用wParam参数中的窗口句柄来查询窗口的消息。

 

.elseif uMsg==WM_MOUSEHOOK 
invoke GetDlgItemText,hDlg,IDC_HANDLE,addr buffer1,128 
invoke wsprintf,addr buffer,addr template,wParam 
invoke lstrcmpi,addr buffer,addr buffer1 
.if eax!=0 
invoke SetDlgItemText,hDlg,IDC_HANDLE,addr buffer 
.endif 
invoke GetDlgItemText,hDlg,IDC_CLASSNAME,addr buffer1,128 
invoke GetClassName,wParam,addr buffer,128 
invoke lstrcmpi,addr buffer,addr buffer1 
.if eax!=0 
invoke SetDlgItemText,hDlg,IDC_CLASSNAME,addr buffer 
.endif 
invoke GetDlgItemText,hDlg,IDC_WNDPROC,addr buffer1,128 
invoke GetClassLong,wParam,GCL_WNDPROC 
invoke wsprintf,addr buffer,addr template,eax 
invoke lstrcmpi,addr buffer,addr buffer1 
.if eax!=0 
invoke SetDlgItemText,hDlg,IDC_WNDPROC,addr buffer 
.endif

为了避免重绘文本时的抖动,我们把已经在编辑空间中线时的文本和我们将要显示的对比。如果相同,就可以忽略掉。得到类名调用GetClassName,得到窗口过程调用GetClassLong并传入GCL_WNDPROC标志,然后把它们格式化成文本串并放到相关的编辑空间中去。

 

invoke UninstallHook 

invoke SetDlgItemText,hDlg,IDC_HOOK,addr HookText 

mov HookFlag,FALSE 

invoke SetDlgItemText,hDlg,IDC_CLASSNAME,NULL 

invoke SetDlgItemText,hDlg,IDC_HANDLE,NULL 

invoke SetDlgItemText,hDlg,IDC_WNDPROC,NULL

当用户按下Unhook后,主程序调用DLL中的UninstallHook函数。该函数调用UnhookWindowsHookEx函数。然后,它把按钮的文本换回“Hook”,HookFlag的值设成FALSE再清除掉编辑控件中的文本。

 

链接器的开关选项如下:

 

Link /SECTION:.bss,S /DLL /DEF:$(NAME).def /SUBSYSTEM:WINDOWS

 

它指定.bss段作为一个共享段以便所有映射该DLL的进程共享未初始化的数据段。如果不用该开关,您DLL中的钩子就不能正常工作了。

 

相关文章推荐

WINDOWS钩子函数的使用方法

  • 2011年03月21日 22:06
  • 53KB
  • 下载

Delphi中的消息钩子函数和Windows子类处理 入门篇

Delphi中的消息钩子函数和Windows子类处理 入门篇2008年07月26日 星期六 14:42首先我们先看一下安装HOOK的函数: HHOOK SetWindowsHookEx(int id...

Windows下利用钩子函数抓取声卡数据

Windows下利用钩子函数抓取声卡数据  (2013-04-06 00:46:27) 转载▼   分类: 技术文章 [讨论]Window...

利用钩子函数捕获Windows鼠标动作

我们知道,Windows系统是建立在消息传递机制基础上的,几乎所有的程序活动都由消息来驱动。Windows的钩子机制可以看作是一个消息中转 站,控制系统发出消息的处理和传递,利用钩子,我们可以截获系统...

利用钩子函数来捕捉键盘响应的windows应用程序

转自:http://edu.qudong.com/program/C/shilijiexi/20080512/11946.html   一:引言: 你也许一直对金山词霸的屏幕抓词的实现原理感到...

用Delphi实现Windows的鼠标钩子函数

用Delphi实现Windows的鼠标钩子函数     Delphi是基于PASCAL语言的Windows编程工具,功能十分强大。然而在Delphi的帮助 文件中,对Windows API函数...

如何开发windows系统钩子

  • 2014年08月04日 16:29
  • 155KB
  • 下载

系统钩子应用--如何通过编程实现禁止Windows系统关机?

系统钩子应用--如何通过编程实现禁止Windows系统关机? 1 关于系统钩子 1) 钩子根据其对消息监视范围的不同而分为系统全局钩子和线程局部钩子两大类,其中线程局部钩子只能监视本进程中某个指定...

设置钩子函数

  • 2013年03月14日 19:51
  • 57KB
  • 下载
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:学习如何编制WINDOWS系统下的钩子函数
举报原因:
原因补充:

(最多只允许输入30个字)