Implémentation et application de hooks dans la programmation VB

Les hooks dans les systèmes Windows ont des fonctions très puissantes. Grâce à cette technologie, presque tous les messages des systèmes Windows peuvent être interceptés, surveillés et traités. Cette technologie peut être largement utilisée dans divers logiciels, en particulier les logiciels nécessitant une surveillance, un enregistrement automatique et d'autres fonctions de surveillance du système. Cet article aborde ce sujet, dans l’espoir de servir de référence aux lecteurs.

1. Mécanisme et type de crochet

Les applications Windows sont toutes basées sur des messages et le fonctionnement de l'application dépend du type et du contenu du message qu'elle reçoit. Les hooks sont similaires au mécanisme de traitement d'interception des interruptions Dos. Hook est une plate-forme de mécanisme de traitement de messages Windows. En installant divers hooks, l'application peut y configurer des sous-programmes pour surveiller certains messages dans la fenêtre spécifiée et traiter le message avant qu'il n'atteigne la fenêtre cible.

Sous Windows, il existe deux types de hooks, l'un est le hook système (RemoteHook), qui surveille les messages dans l'ensemble du système, et l'autre est le hook de thread (LocalHook), qui intercepte uniquement les messages au sein du processus. Pour les hooks système, la fonction hook (HookFunction) doit être implémentée dans la bibliothèque de liens dynamiques (DLL) du système Windows. Pour les hooks de thread, la fonction hook peut être implémentée dans la DLL ou dans l'application correspondante. En effet, lorsqu'un développeur crée un hook, Windows crée d'abord une structure de données dans la mémoire système, qui contient des informations sur le hook, puis ajoute la structure à la liste de hooks existante, et les nouveaux Hooks seront triés devant les anciens. crochets. Lorsqu'un événement se produit, si un hook local est installé, la fonction hook du processus en cours sera appelée. S'il s'agit d'un hook distant, le système doit insérer la fonction hook dans l'espace d'adressage des autres processus. Pour ce faire, la fonction hook doit être dans une bibliothèque de liens dynamiques, donc si vous souhaitez utiliser un hook distant, vous devez le mettre. le hook Mettez la fonction dans la bibliothèque de liens dynamiques. Pour les types de messages surveillés par les hooks, Windows fournit un total des types suivants : Comme indiqué dans le tableau 1 :

Tableau 1. Types de messages Windows

2. Implémentation de hooks dans la programmation VB

(1) Format de la fonction hook (fonction HOOK). La fonction Hook est en fait une fonction. S'il s'agit d'un hook système, la fonction doit être placée dans la bibliothèque de liens dynamiques. Cette fonction a un certain format de paramètre, qui est le suivant en VB :

Parmi eux, nCode représente la situation dans laquelle le hook est généré, et il existe différents ensembles de valeurs possibles en fonction du hook ; les valeurs de retour des paramètres wParam et lParam incluent le contenu du message surveillé, qui varie ; avec le type de message surveillé par le Hook. Il diffère selon la valeur de nCode. Pour les fonctions hook définies avec VB, la forme générale du framework est la suivante :

La valeur de retour de la fonction Si le message doit être traité, passez 0, sinon passez 1 et mangez le message.

(2) Installation et exécution de crochets. Plusieurs fonctions API sont utilisées pour installer des hooks : Vous pouvez utiliser la fonction API SetWindowsHookEx() pour installer un sous-programme de hook défini par l'application dans la liste des hooks. La déclaration de la fonction SetWindowsHookEx() est la suivante :

La valeur idHook est le type de message qu'il gère ; la valeur lpfn est le pointeur d'adresse du sous-programme hook. Si le paramètre dwThreadId est 0 ou l'identifiant d'un thread créé par un autre processus, lpfn doit pointer vers le sous-programme hook dans la DLL. De plus, lpfn peut pointer vers un code de sous-programme hook du processus en cours. La valeur hMod est le handle de l'application, identifiant la DLL qui contient le sous-programme pointé par lpfn. Si dwThreadId identifie un thread créé par le processus en cours et que le code du sous-programme se trouve dans le processus en cours, hMod doit être égal à 0. La valeur dwThreadId est l'identifiant du thread associé au sous-processus hook installé. Si elle est égale à 0, le sous-processus hook est associé à tous les threads. Si le hook est installé avec succès, le handle du sous-processus du hook sera renvoyé. S'il échoue, 0 sera renvoyé.

De plus, la fonction CallNextHookEx() doit généralement être appelée dans le sous-programme de hook pour exécuter le sous-programme de hook suivant pointé par la liste de hooks. Sinon, les applications avec d'autres hooks installés ne recevront pas de notifications de hook, ce qui entraînera des résultats incorrects. La déclaration de la fonction CallNextHookEx() est la suivante :

La valeur hHook est la valeur de retour de SetWindowsHookEx() et nCode, wParam et lParam sont les trois paramètres de la fonction Hook. Avant la fin du programme, la fonction UnhookWindowsHookEx() doit être appelée pour libérer les ressources système associées au hook. La fonction UnhookWindowsEx() est déclarée comme suit :

hHook est la valeur de retour lors de l'installation du hook, c'est-à-dire le handle du sous-processus du hook.

(3) Problèmes auxquels il convient de prêter attention lors de l'installation de hooks dans VB. Le paramètre lpfn est l'adresse d'un HookFunc. VB stipule que le code HookFunc doit être placé dans un module .BAS standard et transmis en tant qu'adresse de HookFunc. Il ne peut pas être placé dans un module de classe ou attaché à un formulaire supérieur. Pour RemoteHook, HookFunc doit être inclus dans la bibliothèque de liens dynamiques, donc si RemoteHook est utilisé dans VB, deux fonctions API, GetModuleHandle() et GetProcAddress(), seront également utilisées. Leurs déclarations sont les suivantes :

La valeur hmod est le handle du nom du module contenant le processus hook. S'il s'agit de LocalHook, la valeur peut être Null (0 est transmis dans VB), et s'il s'agit de RemoteHook, vous pouvez utiliser GetModuleHandle (name.dll) pour la transmettre. .