利用底层键盘钩子拦载任意按键(回调版)

时间:2022-04-27 12:36:18

<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

    前段时间我曾经写过一篇《利用底层键盘钩子屏蔽任意按键》,并放到了我的blog上。这篇文章的题目中把“屏蔽”改成了“拦截”,显然要比以前的版本强一些了。对于以前写的那个DLL,有一个不够理想的地方,就是仅仅能实现屏蔽。如果想在屏蔽之前加入一些“小动作”,就只能修改DLL,在LowLevelKeyboardProc函数中添加代码,实现新的功能。但这样显然不够灵活,这样的DLL也不具备一般性了。所以我自然而然地想到了回调,Windows中有很多需要回调函数的API,我们当然也可以写出这样的API,这样做的好处就是可以给DLL调用程序留下足够的接口。此时,DLL就像一个阀门,我们不关心的按键消息就把它放过去,只把我们关心的按键消息拦截下来,然后进一步处理,而这些处理的代码就写在DLL调用程序的回调函数中,这样做是最理想不过的了。

    相对于前一个版本,修改后的DLL源代码如下:

 

/********************************************************************/

/* 文件名: MaskKey.cpp                                              */

/*                                                                  */

/* 功能: 标准 DLL ---- 利用底层键盘钩子实现拦截键盘任意按键         */

/*                                                                  */

/* 作者: 卢培培 (goodname008)             时间: 2005.1.18           */

/*                                                                  */

/* BLOG: http://blog.csdn.net/goodname008                           */

/********************************************************************/

 

// 导出函数列表

// StartMaskKey

// StopMaskKey

 

#define _WIN32_WINNT  0x0500                   // 设置系统版本, 确保可以使用底层键盘钩子

 

#include "windows.h"

 

// 回调函数指针

typedef BOOL (CALLBACK* LPFNKEYBOARDPROC)(WPARAM, KBDLLHOOKSTRUCT*);

 

// 全局变量

LPDWORD       g_lpdwVirtualKey = NULL;         // Keycode 数组的指针

int           g_nLength = 0;                   // Keycode 数组的大小

BOOL          g_bDisableKeyboard = FALSE;      // 是否屏蔽整个键盘

HINSTANCE     g_hInstance = NULL;              // 模块实例句柄

HHOOK         g_hHook = NULL;                  // 钩子句柄

LPFNKEYBOARDPROC   g_lpfnKeyboardProc;         // 键盘钩子回调函数指针

 

// DLL 入口函数

BOOL APIENTRY DllMain(HANDLE hModule, DWORD ul_reason_for_call, LPVOID lpReserved)

{

     // 保存模块实例句柄

     g_hInstance = (HINSTANCE)hModule;

    

     // 在进程结束或线程结束时卸载钩子

     switch (ul_reason_for_call)

     {

         case DLL_PROCESS_ATTACH:

              break;

         case DLL_THREAD_ATTACH:

              break;

         case DLL_PROCESS_DETACH:

 

         case DLL_THREAD_DETACH:

              free(g_lpdwVirtualKey);

              if (g_hHook != NULL) UnhookWindowsHookEx(g_hHook);

              break;

     }

    return TRUE;

}

 

// 底层键盘钩子函数

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

{

     // 拦截键盘的某些按键, 如果 g_bDisableKeyboard TRUE 则拦截整个键盘按键

if (nCode >= HC_ACTION)

     {

         KBDLLHOOKSTRUCT* pStruct = (KBDLLHOOKSTRUCT*)lParam;

         if (g_bDisableKeyboard)

              if (g_lpfnKeyboardProc(wParam, pStruct))

   return CallNextHookEx(g_hHook, nCode, wParam, lParam);

              else

                   return true;

 

         LPDWORD tmpVirtualKey = g_lpdwVirtualKey;

         for (int i = 0; i < g_nLength; i++)

         {

              if (pStruct->vkCode == *tmpVirtualKey++)

                   if (g_lpfnKeyboardProc(wParam, pStruct))

   return CallNextHookEx(g_hHook, nCode, wParam, lParam);

                   else

                       return true;

         }

        

     }   

 

     // 调用系统中的下一个钩子

     return CallNextHookEx(g_hHook, nCode, wParam, lParam);

}

 

/********************************************************************/

/* 开始拦截键盘按键                                                 */

/*                                                                  */

/* 参数:                                                            */

/*            lpdwVirtualKey              Keycode 数组的指针        */

/*            nLength                     Keycode 数组的大小        */

/*            bDisableKeyboard            是否拦截整个键盘          */

/*                                                                  */

/* 返回值:    TRUE 成功, FALSE 失败                                 */

/********************************************************************/

BOOL WINAPI StartMaskKey(LPDWORD lpdwVirtualKey, int nLength,

                             LPFNKEYBOARDPROC lpfnKeyboardProc, BOOL bDisableKeyboard = FALSE)

{

     // 如果已经安装键盘钩子则返回 FALSE

     if (g_hHook != NULL || nLength == 0) return FALSE;

    

     // 将用户传来的 keycode 数组保存在全局变量中

     g_lpdwVirtualKey = (LPDWORD)malloc(sizeof(DWORD) * nLength);

     LPDWORD tmpVirtualKey = g_lpdwVirtualKey;

     for (int i = 0; i < nLength; i++)

     {

         *tmpVirtualKey++ = *lpdwVirtualKey++;

     }

     g_nLength = nLength;

     g_bDisableKeyboard = bDisableKeyboard;

     g_lpfnKeyboardProc = lpfnKeyboardProc;

    

     // 安装底层键盘钩子

     g_hHook = SetWindowsHookEx(WH_KEYBOARD_LL, LowLevelKeyboardProc, g_hInstance, NULL);

     if (g_hHook == NULL) return FALSE;

     return TRUE;

    

}

 

/********************************************************************/

/* 停止拦截键盘按键                                                 */

/*                                                                  */

/* 参数: ()                                                       */

/*                                                                  */

/* 返回值:    TRUE 成功, FALSE 失败                                 */

/********************************************************************/

BOOL WINAPI StopMaskKey()

{

     // 卸载钩子

     if (UnhookWindowsHookEx(g_hHook) == 0) return FALSE;

     g_hHook = NULL;

     return TRUE;

}

 

 

     当然了,MaskKey.h头文件中也要加上:

 

// 回调函数指针

typedef BOOL (CALLBACK* LPFNKEYBOARDPROC)(WPARAM, KBDLLHOOKSTRUCT*);

 

     下面是在VC中调用的例子:(两个Dialog的成员函数,对应两个按钮,再加上一个回调函数)

 

// 全局键盘钩子回调函数

// 参数: action 标识键盘消息(按下,弹起), keyStruct 包含按键信息

BOOL CALLBACK KeyboardProc(WPARAM action, KBDLLHOOKSTRUCT* pKeyStruct)

{

     // 判断按键动作

     switch (action)

     {

         case WM_KEYDOWN:

 

              break;

         case WM_KEYUP:

 

              break;

         case WM_SYSKEYDOWN:

 

              break;

         case WM_SYSKEYUP:

 

              break;

    

     }

 

// 返回 true 表示继续传递按键消息

    // 返回 false 表示结束按键消息传递

     return false;

}

 

void CMaskKeyAppDlg::OnStartmaskkey()

{

     // 屏蔽 A, B, C, , , , 右及两个win

     DWORD dwVK[] = {'A', 'B', 'C', VK_LEFT, VK_RIGHT, VK_UP, VK_DOWN, VK_LWIN, VK_RWIN};

     int nLength = sizeof(dwVK) / sizeof(DWORD);

     StartMaskKey(dwVK, nLength, KeyboardProc);    

    

}

 

void CMaskKeyAppDlg::OnStopmaskkey()

{

     StopMaskKey();

    

}

 

    呵呵,这样是不是让看到这里的你很兴奋呢?!StartMaskKey加了一个参数,是个函数指针,这是我们非常熟悉的回调函数的使用方法。DLL中的StartMaskKey函数收到这个函数指针后保存在了g_lpfnKeyboardProc变量中,然后在LowLevelKeyboardProc中一旦发现了要拦截的按键,就会通过函数指针调用回调函数,将控制权完全交回给DLL的调用程序,由回调函数KeyboardProc进一步处理(播放一小段音乐,还是执行个什么有意思的程序,亦或是重启关机什么的。呃,随你便了。:D),action参数用来标识键盘消息(按下或弹起),pKeyStruct参数包含了丰富的按键信息,其实就是系统传给LowLevelKeyboardProclParam,我又把它原封不动地传给了KeyboardProc,呵呵。最重要的就是回调函数的返回值了,它就像阀门的开关一样,将决定这个按键消息的命运。从DLL中的LowLevelKeyboardProc函数的流程可以看出,如果回调函数KeyboardProc的返回值为true则表示把该按键消息继续传递给系统中的下一个钩子;如果为false则表示结束该按键消息的传递,此时将会起到拦截按键的效果。

    VB的人可能有些不耐烦了,别着急,上篇文章在最后给出了VB调用的例程,此篇当然不能缺少这部分了。下面是在VB中调用的例子:(在窗体上添加2CommandButton,并分别改名为cmdStartMaskcmdStopMask

    

Option Explicit

Private Declare Function StartMaskKey Lib "MaskKey" (lpdwVirtualKey As Long, ByVal nLength As Long, ByVal lpfnKeyboarProc As Long, Optional ByVal bDisableKeyboard As Boolean = False) As Long

Private Declare Function StopMaskKey Lib "MaskKey" () As Long

 

Private Sub cmdStartMask_Click()

    ' 屏蔽 A, B, C, , , , 右及两个win

    Dim key(8) As Long

    key(0) = vbKeyA

    key(1) = vbKeyB

    key(2) = vbKeyC

    key(3) = vbKeyLeft

    key(4) = vbKeyRight

    key(5) = vbKeyUp

    key(6) = vbKeyDown

    key(7) = &H5B               ' 左边的win

    key(8) = &H<?xml:namespace prefix = st1 ns = "urn:schemas-microsoft-com:office:smarttags" />5C               ' 右边的win

    StartMaskKey key(0), UBound(key) + 1, AddressOf KeyboardProc

End Sub

 

Private Sub cmdStopMask_Click()

    StopMaskKey

End Sub

 

    窗体模块的代码和以前的例程几乎一样,只是在调用StartMaskKey函数时加了一个参数:AddressOf KeyboardProc。在VB中用过回调函数的人对这东西绝不会陌生,AddressOf是一个一元运算符,后面接一个函数名,它的功能就是获得指定函数的指针。但有一点必须注意,该回调函数(此例中为KeyboardProc)必须写在VB的标准模块中,标准模块的代码如下:

    

Option Explicit

 

Private Const WM_KEYDOWN = &H100

Private Const WM_KEYUP = &H101

Private Const WM_SYSKEYDOWN = &H104

Private Const WM_SYSKEYUP = &H105

 

Public Type KBDLLHOOKSTRUCT

    vkCode As Long              ' 虚拟按键码(1--254)

    scanCode As Long            ' 硬件按键扫描码

    flags As Long               ' flags

    time As Long                ' 消息时间戳

    dwExtraInfo As Long         ' 额外信息

End Type

 

Public Enum KEYACTION

    ACTION_KEYDOWN = WM_KEYDOWN

    ACTION_KEYUP = WM_KEYUP

    ACTION_SYSKEYDOWN = WM_SYSKEYDOWN

    ACTION_SYSKEYUP = WM_SYSKEYUP

End Enum

 

' 全局键盘钩子回调函数

' 参数: action 标识键盘消息(按下,弹起), keyStruct 包含按键信息

Public Function KeyboardProc(ByVal action As KEYACTION, keyStruct As KBDLLHOOKSTRUCT) As Boolean

    Select Case action

        Case ACTION_KEYDOWN

            Debug.Print keyStruct.vkCode, "按下键盘按键"

        Case ACTION_KEYUP

            Debug.Print keyStruct.vkCode, "弹起键盘按键"

        Case ACTION_SYSKEYDOWN

       

        Case ACTION_SYSKEYUP

       

    End Select

   

    ' 返回 True 表示继续传递按键消息

    ' 返回 False 表示结束按键消息传递

    KeyboardProc = False

End Function

 

    VC版的调用例程差不多,只是把语法翻译成了VB的,这个VB标准模块中的KeyboardProc有没有点MFC消息映射函数的味道呢?!   :D
   
需要注意的是,VB的回调函数必须写在标准模块中。细心的人还可能会发现,我对action参数作了一点小手脚,改成了一个枚举类型,这主要是为了易于理解。
   
OK,要写的就这么多了,关于全局键盘钩子的内容我也想告一段落了。利用VC编写的DLLVB也可以方便地实现全局键盘钩子了。当然,这不仅仅局限于键盘钩子,利用这种方法可以实现任何类型的钩子。
   
DLL源代码及VCVB调用例程的下载地址: http://csdngoodname008.51.net/MaskKeyCB.zip

 

*-------------------------------------------*

*  转载请通知作者并注明出处,CSDN欢迎您!   *

*  作者:卢培培(goodname008              *

*  邮箱:goodname008@163.com                *

*  专栏:http://blog.csdn.net/goodname008   *

*-------------------------------------------*