编写钩子程序实例

编写钩子程序的步骤分为三步：定义钩子函数、安装钩子和卸载钩子。 1．定义钩子函数

钩子函数是一种特殊的回调函数。钩子监视的特定事件发生后，系统会调用钩子函数进行处理。不同事件的钩子函数的形式是各不相同的。下面以鼠标钩子函数举例说明钩子函数的原型：

LRESULT CALLBACK HookProc(int nCode ,WPARAM wParam,LPARAM lParam)

参数wParam和 lParam包含所钩消息的信息，比如鼠标位置、状态，键盘按键等。nCode包含有关消息本身的信息，比如是否从消息队列中移出。 我们先在钩子函数中实现自定义的功能，然后调用函数 CallNextHookEx.把钩子信息传递给钩子链的下一个钩子函数。CallNextHookEx.的原型如下：

LRESULT CallNextHookEx( HHOOK hhk, int nCode, WPARAM wParam, LPARAM lParam ) 参数 hhk是钩子句柄。nCode、wParam和lParam 是钩子函数。

当然也可以通过直接返回TRUE来丢弃该消息，就阻止了该消息的传递。 2．安装钩子

在程序初始化的时候，调用函数SetWindowsHookEx安装钩子。其函数原型为： HHOOK SetWindowsHookEx( int idHook,HOOKPROC lpfn, INSTANCE hMod,DWORD dwThreadId )

参数idHook表示钩子类型，它是和钩子函数类型一一对应的。比如，WH_KEYBOARD表示安装的是键盘钩子，WH_MOUSE表示是鼠标钩子等等。

Lpfn是钩子函数的地址。

HMod是钩子函数所在的实例的句柄。对于线程钩子，该参数为NULL；对于系统钩子，该参数为钩子函数所在的DLL句柄。

dwThreadId 指定钩子所监视的线程的线程号。对于全局钩子，该参数为NULL。 SetWindowsHookEx返回所安装的钩子句柄。

3．卸载钩子

当不再使用钩子时，必须及时卸载。简单地调用函数 BOOL UnhookWindowsHookEx( HHOOK hhk)即可。

值得注意的是线程钩子和系统钩子的钩子函数的位置有很大的差别。线程钩子一般在当前线程或者当前线程派生的线程内，而系统钩子必须放在独立的动态链接库中，实现起来要麻烦一些。

线程钩子的编程实例：

按照上面介绍的方法实现一个线程级的鼠标钩子。钩子跟踪当前窗口鼠标移动的位置变化信息。并输出到窗口。

(1)在VC＋＋6.0中利用MFC

APPWizard（EXE）生成一个不使用文档/视结构的单文档应用mousehook。打开childview.cpp文件，加入全局变量： HHOOK hHook;//鼠标钩子句柄 CPoint point;//鼠标位置信息 CChildView ＊pView;

// 鼠标钩子函数用到的输出窗口指针 在CChildView::OnPaint()添加如下代码： CPaintDC dc(this);

- 1 -

char str[256];

sprintf(str,“x=％d,y=％d\

//构造字符串

dc.TextOut(0,0,str); //显示字符串

(2)childview.cpp文件中定义全局的鼠标钩子函数。

LRESULT CALLBACK MouseProc (int nCode, WPARAM wParam, LPARAM lParam) {//是鼠标移动消息

if(wParam==WM_MOUSEMOVE||wParam ==WM_NCMOUSEMOVE) {

point=((MOUSEHOOKSTRUCT ＊)lParam)－>pt; //取鼠标信息

pView－>Invalidate(); //窗口重画

}

return CallNextHookEx(hHook,nCode,wParam,lParam); //传递钩子信息

}

(3)CChildView类的构造函数中安装钩子。 CChildView::CChildView() {

pView=this;//获得输出窗口指针

hHook=SetWindowsHookEx(WH_MOUSE,MouseProc,0,GetCurrentThreadId()); }

(4)CChildView类的析构函数中卸载钩子。 CChildView::～CChildView() {

if(hHook)

UnhookWindowsHookEx(hHook);

}

系统钩子的编程实例：

由于系统钩子要用到dll，所以先介绍下win32 dll的特点：

Win32 DLL与 Win16 DLL有很大的区别，这主要是由操作系统的设计思想决定的。一方面，在Win16 DLL中程序入口点函数和出口点函数（LibMain和WEP）是分别实现的；而在Win32 DLL中却由同一函数DLLMain来实现。无论何时，当一个进程或线程载入和卸载DLL时，都要调用该函数，它的原型是BOOL WINAPI DllMain

(HINSTANCE hinstDLL,DWORD fdwReason, LPVOID lpvReserved);，其中，第一个参数表示DLL的实例句柄；第三个参数系统保留；这里主要介绍一下第二个参数，它有四个可能的值：DLL_PROCESS_ATTACH（进程载入），DLL_THREAD_ATTACH（线程载入），DLL_THREAD_DETACH（线程卸载），DLL_PROCESS_DETACH（进程卸载），在DLLMain函数中可以对传递进来的这个参数的值进行判别，并根据不同的参数值对DLL进行必要的初始化或清理工作。举个例子来说，当有一个进程载入一个DLL时，系统分派给DLL的第二个参数为DLL_PROCESS_ATTACH，这时，你可以根据这个参数初始化特定的数据。另一方

- 2 -

面，在Win16环境下，所有应用程序都在同一地址空间；而在Win32环境下，所有应用程序都有自己的私有空间，每个进程的空间都是相互独立的，这减少了应用程序间的相互影响，但同时也增加了编程的难度。大家知道，在Win16环境中，DLL的全局数据对每个载入它的进程来说都是相同的；而在Win32环境中，情况却发生了变化，当进程在载入DLL时，系统自动把DLL地址映射到该进程的私有空间，而且也复制该DLL的全局数据的一份拷贝到该进程空间，也就是说每个进程所拥有的相同的DLL的全局数据其值却并不一定是相同的。因此，在Win32环境下要想在多个进程中共享数据，就必须进行必要的设置。亦即把这些需要共享的数据分离出来，放置在一个独立的数据段里，并把该段的属性设置为共享。

在VC6中有三种形式的MFC DLL（在该DLL中可以使用和继承已有的MFC类)可供选择，即Regular statically linked to MFC DLL（标准静态链接MFC DLL）和Regular using the shared MFC DLL（标准动态链接MFC DLL）以及Extension MFC DLL（扩展MFC DLL）。第一种DLL的特点是，在编译时把使用的MFC代码加入到DLL中，因此，在使用该程序时不需要其他MFC动态链接类库的存在，但占用磁盘空间比较大；第二种DLL的特点是，在运行时，动态链接到MFC类库，因此减少了空间的占用，但是在运行时却依赖于MFC动态链接类库；这两种DLL既可以被MFC程序使用也可以被Win32程序使用。第三种DLL的特点类似于第二种，做为MFC类库的扩展，只能被MFC程序使用。

下面说说在VC6中全局共享数据的实现

在主文件中，用#pragma data_seg建立一个新的数据段并定义共享数据，其具体格式为： #pragma data_seg （\ HWND sharedwnd=NULL;//共享数据

#pragma data_seg()

仅定义一个数据段还不能达到共享数据的目的，还要告诉编译器该段的属性，有两种方法可以实现该目的（其效果是相同的），一种方法是在.DEF文件中加入如下语句： SETCTIONS shareddata READ WRITE SHARED

另一种方法是在项目设置链接选项中加入如下语句：

/SECTION:shareddata,rws

好了，准备知识已经学完了，让我们开始编写个全局的钩子程序吧！

由于全局钩子函数必须包含在动态链接库中，所以本例由两个程序体来实现。 1．建立钩子Mousehook.DLL

(1)选择MFC AppWizard(DLL)创建项目Mousehook； (2)选择MFC Extension DLL（共享MFC拷贝）类型；

(3)由于VC5没有现成的钩子类，所以要在项目目录中创建Mousehook.h文件，在其中建立钩子类：

class AFX_EXT_CLASS Cmousehook:public CObject {

public:

Cmousehook();

//钩子类的构造函数 ~Cmousehook(); //钩子类的析构函数

BOOL starthook(HWND hWnd); //安装钩子函数

- 3 -

BOOL stophook(); 卸载钩子函数

};

(4)在Mousehook.app文件的顶部加入#include\语句； (5)加入全局共享数据变量： #pragma data_seg(\ HWND glhPrevTarWnd=NULL; //上次鼠标所指的窗口句柄 HWND glhDisplayWnd=NULL; //显示目标窗口标题编辑框的句柄 HHOOK glhHook=NULL; //安装的鼠标钩子句柄

HINSTANCE glhInstance=NULL; //DLL实例句柄

#pragma data_seg()

(6)在DEF文件中定义段属性：

SECTIONS

mydata READ WRITE SHARED

(7)在主文件Mousehook.cpp的DllMain函数中加入保存DLL实例句柄的语句： DllMain(HINSTANCE hInstance, DWORD dwReason, LPVOID lpReserved) {

//如果使用lpReserved参数则删除下面这行 UNREFERENCED_PARAMETER(lpReserved); if (dwReason == DLL_PROCESS_ATTACH) {

TRACE0(\ //扩展DLL仅初始化一次

if (!AfxInitExtensionModule(MousehookDLL, hInstance)) return 0;

new CDynLinkLibrary(MousehookDLL); //把DLL加入动态MFC类库中 glhInstance=hInstance; //插入保存DLL实例句柄 }

else if (dwReason == DLL_PROCESS_DETACH) {

TRACE0(\ //终止这个链接库前调用它

AfxTermExtensionModule(MousehookDLL); }

return 1; }

- 4 -

(8)类Cmousehook的成员函数的具体实现： Cmousehook::Cmousehook() //类构造函数 { }

Cmousehook::~Cmousehook() //类析构函数 {

stophook();

}

BOOL Cmousehook::starthook(HWND hWnd) //安装钩子并设定接收显示窗口句柄 {

BOOL bResult=FALSE;

glhHook=SetWindowsHookEx(WH_MOUSE,MouseProc,glhInstance,0);

if(glhHook!=NULL)

bResult=TRUE; glhDisplayWnd=hWnd;

//设置显示目标窗口标题编辑框的句柄 return bResult; }

BOOL Cmousehook::stophook() //卸载钩子 {

BOOL bResult=FALSE; if(glhHook) {

bResult= UnhookWindowsHookEx(glhHook); if(bResult)

{

glhPrevTarWnd=NULL;

glhDisplayWnd=NULL;//清变量 glhHook=NULL; }

}

return bResult; }

(9)钩子函数的实现：

LRESULT WINAPI MouseProc(int nCode,WPARAM wparam,LPARAM lparam) {

LPMOUSEHOOKSTRUCT pMouseHook=(MOUSEHOOKSTRUCT FAR *) lparam; if (nCode>=0)

- 5 -

{

HWND glhTargetWnd=pMouseHook->hwnd; //取目标窗口句柄

HWND ParentWnd=glhTargetWnd; while (ParentWnd !=NULL) {

glhTargetWnd=ParentWnd;

ParentWnd=GetParent(glhTargetWnd); //取应用程序主窗口句柄 }

if(glhTargetWnd!=glhPrevTarWnd) {

char szCaption[100];

GetWindowText(glhTargetWnd,szCaption,100); //取目标窗口标题

if(IsWindow(glhDisplayWnd))

SendMessage(glhDisplayWnd,WM_SETTEXT,0,(LPARAM)(LPCTSTR)szCaption);

glhPrevTarWnd=glhTargetWnd; //保存目标窗口 } }

return CallNextHookEx(glhHook,nCode,wparam,lparam); //继续传递消息

}

(10)编译项目生成mousehook.dll。 2．创建钩子可执行程序

(1)用MFC的AppWizard(EXE)创建项目Mouse；

(2)选择“基于对话应用”并按下“完成”键；

(3)编辑对话框，删除其中原有的两个按钮，加入静态文本框和编辑框，用鼠标右键点击静态文本框，在弹出的菜单中选择“属性”，设置其标题为“鼠标所在的窗口标题”；

(4)在Mouse.h中加入对Mousehook.h的包含语句#Include\； (5)在CMouseDlg.h的CMouseDlg类定义中添加私有数据成员： CMouseHook m_hook;//加入钩子类作为数据成员 (6)修改CmouseDlg::OnInitDialog()函数： BOOL CMouseDlg::OnInitDialog() {

CDialog::OnInitDialog();

ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX); ASSERT(IDM_ABOUTBOX <0xF000); CMenu* pSysMenu = GetSystemMenu(FALSE);

if (pSysMenu != NULL) {

- 6 -

CString strAboutMenu;

strAboutMenu.LoadString(IDS_ABOUTBOX); if (!strAboutMenu.IsEmpty()) {

pSysMenu->AppendMenu(MF_SEPARATOR);

pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu); } }

SetIcon(m_hIcon, TRUE);//Set big icon SetIcon(m_hIcon, FALSE);//Set small icon //TODO: Add extra initialization here CWnd * pwnd=GetDlgItem(IDC_EDIT1); //取得编辑框的类指针

m_hook.starthook(pwnd->GetSafeHwnd()); //取得编辑框的窗口句柄并安装钩子 return TRUE;

//return TRUE unless you set the focus to a control

}

(7)链接DLL库，即把..\\Mousehook\\debug\\Mousehook.lib加入到项目设置链接标签中； (8)编译项目生成可执行文件；

(9)把Mousehook.DLL拷贝到..\\mouse\\debug目录中；

(10)先运行几个可执行程序，然后运行Mouse.exe程序，把鼠标在不同窗口中移动，在Mouse.exe程序窗口中的编辑框内将显示出鼠标所在的应用程序主窗口的标题。

好了，终于写完了，累ing，这是钩子函数的入门知识，包括了线程钩子和全局钩子，希望高手们加以指点斧正！谢谢大家！

[附：我有个疑问，希望高手们帮忙解决下，在编写线程钩子时，我用的是这个函数来安装钩子hHook=SetWindowsHookEx(WH_MOUSE,MouseProc,0,GetCurrentThreadId());第4个参数是GetCurrentThreadId()

是指此钩子函数监测的是自己的那个程序，那么如果我想监测其他一个特定程序的话，此参数该如何定义出来呢？比如想只监测mir3程序，该如何定义第4个参数呢？谢谢！

hhzore的评论:

======================

线程钩子只能截获程序本身，因为截获的线程对象是本身 获得的当前线程应该是mir3的窗口线程，那样我想应该没问题了。下面是拷贝别人的一段话如何得到系统的当前活动程序的窗口中里具有当前焦点的子窗口的句柄及内容 // 获得Foreground窗口当前焦点窗口的内容

//

自

己

的

程

序

在

后

台

运

行 CString CMyWnd::GetForegroudWndFocusWndText(void) { CWnd * mainwnd, *subwnd; DWORD dwthreadforeground, dwthreadthis; //获得当前活动窗口 mainwnd = GetForegroundWindow(); //获得活动窗口的线程号 dwthreadforeground = ::GetWindowThreadProcessId(mainwnd->m_hWnd, NULL); //获得

与自己程序的窗口相关的线程

- 7 -

号 dwthreadthis = ::GetWindowThreadProcessId(m_hWnd, NULL); //将两个线程的输入联系起来，只有这样，GetFocus函数才能获得其它线程中的焦点窗口 ::AttachThreadInput(dwthreadthis, dwthreadforeground, TRUE); //得到当前的具有输入焦点的子窗口 subwnd = GetFocus(); char lpszText[MAX_PATH]; //获得窗口中的文字信息 ::SendMessage(subwnd->m_hWnd, WM_GETTEXT, WPARAM(MAX_PATH), LPARAM(lpszText)); //

将

联

到

一

起

的

两

个

线

程

的

输

入

分

离 ::AttachThreadInput(dwthreadthis, dwthreadforeground, FALSE); return lpszText; } 同理可得到一切窗口的具有当前焦点的子窗口的句柄

- 8 -

本文来源：https://www.bwwdw.com/article/8qjx.html