//千万别忘记声明WINAPI,否则调用的时候回产生声明错误哦！  
int WINAPI add(int a,int b)  
{    
    return a+b;  
}  
  
BOOL APIENTRY DllMain( HANDLE hModule,   
                      DWORD  ul_reason_for_call,   
                      LPVOID lpReserved  
                      )  
{  
    return TRUE;  
}  

LIBRARY  Add
DESCRIPTION "ADD LA"
EXPORTS
 add  @1;

//调用dll函数 add(int a,int b)  
void CCallAddDlg::OnBnClickedBtnCallAdd()  
{  
    HINSTANCE hAddDll=NULL;  
    typedef int (WINAPI*AddProc)(int a,int b);//函数原型定义  
    AddProc add;  
    if (hAddDll==NULL)  
    {  
        hAddDll=::LoadLibrary(_T("Add.dll"));//加载dll  
    }  
    add=(AddProc)::GetProcAddress(hAddDll,"add");//获取函数add地址  
  
    int a=1;  
    int b=2;  
    int c=add(a,b);//调用函数  
    CString tem;  
    tem.Format(_T("%d+%d=%d"),a,b,c);  
    AfxMessageBox(tem);  
}  

//变量定义  
//不同Instance共享的该变量  
#pragma data_seg("SHARED")  
static HHOOK  hhk=NULL; //鼠标钩子句柄  
static HINSTANCE hinst=NULL; //本dll的实例句柄 (hook.dll)  
#pragma data_seg()  
#pragma comment(linker, "/section:SHARED,rws")  
//以上的变量共享哦!  
  
CString temp; //用于显示错误的临时变量  
bool bHook=false; //是否Hook了函数  
bool m_bInjected=false; //是否对API进行了Hook  
BYTE OldCode[5]; //老的系统API入口代码  
BYTE NewCode[5]; //要跳转的API代码 (jmp xxxx)  
typedef int (WINAPI*AddProc)(int a,int b);//add.dll中的add函数定义  
AddProc add; //add.dll中的add函数  
HANDLE hProcess=NULL; //所处进程的句柄  
FARPROC pfadd;  //指向add函数的远指针  
DWORD dwPid;  //所处进程ID  
//end of 变量定义

//鼠标钩子过程，什么也不做，目的是注入dll到程序中  
LRESULT CALLBACK MouseProc(int nCode,WPARAM wParam,LPARAM lParam)  
{  
    return CallNextHookEx(hhk,nCode,wParam,lParam);  
}  
  
//鼠标钩子安装函数:  
BOOL InstallHook()  
{  
  
    hhk=::SetWindowsHookEx(WH_MOUSE,MouseProc,hinst,0);  
  
    return true;  
}  
  
//卸载鼠标钩子函数  
void UninstallHook()  
{  
    ::UnhookWindowsHookEx(hhk);  
}  

//在dll实例化中获得一些参数  
BOOL CHookApp::InitInstance()  
{  
    CWinApp::InitInstance();  
  
    //获得dll 实例，进程句柄  
    hinst=::AfxGetInstanceHandle();  
    DWORD dwPid=::GetCurrentProcessId();  
    hProcess=OpenProcess(PROCESS_ALL_ACCESS,0,dwPid);   
    //调用注射函数  
    Inject();  
    return TRUE;  
}  

//好，最重要的HOOK函数：  
void Inject()  
{  
  
    if (m_bInjected==false)  
    { //保证只调用1次  
        m_bInjected=true;  
  
        //获取add.dll中的add()函数  
        HMODULE hmod=::LoadLibrary(_T("Add.dll"));  
        add=(AddProc)::GetProcAddress(hmod,"add");  
        pfadd=(FARPROC)add;  
  
        if (pfadd==NULL)  
        {  
            AfxMessageBox(L"cannot locate add()");  
        }  
  
        // 将add()中的入口代码保存入OldCode[]  
        _asm   
        {   
            lea edi,OldCode   
                mov esi,pfadd   
                cld   
                movsd   
                movsb   
        }  
  
        NewCode[0]=0xe9;//实际上0xe9就相当于jmp指令  
        //获取Myadd()的相对地址  
        _asm   
        {   
            lea eax,Myadd  
                mov ebx,pfadd   
                sub eax,ebx   
                sub eax,5   
                mov dword ptr [NewCode+1],eax   
        }   
        //填充完毕，现在NewCode[]里的指令相当于Jmp Myadd  
        HookOn(); //可以开启钩子了  
    }  
}  

//开启钩子的函数  
void HookOn()   
{   
    ASSERT(hProcess!=NULL);  
  
    DWORD dwTemp=0;  
    DWORD dwOldProtect;  
  
    //将内存保护模式改为可写,老模式保存入dwOldProtect  
    VirtualProtectEx(hProcess,pfadd,5,PAGE_READWRITE,&dwOldProtect);   
    //将所属进程中add()的前5个字节改为Jmp Myadd   
    WriteProcessMemory(hProcess,pfadd,NewCode,5,0);  
    //将内存保护模式改回为dwOldProtect  
    VirtualProtectEx(hProcess,pfadd,5,dwOldProtect,&dwTemp);  
  
    bHook=true;   
}  
//关闭钩子的函数  
void HookOff()//将所属进程中add()的入口代码恢复  
{   
    ASSERT(hProcess!=NULL);  
  
    DWORD dwTemp=0;  
    DWORD dwOldProtect;  
  
    VirtualProtectEx(hProcess,pfadd,5,PAGE_READWRITE,&dwOldProtect);   
    WriteProcessMemory(hProcess,pfadd,OldCode,5,0);   
    VirtualProtectEx(hProcess,pfadd,5,dwOldProtect,&dwTemp);   
    bHook=false;   
}  

//然后，写我们自己的Myadd()函数  
int WINAPI Myadd(int a,int b)  
{  
    //截获了对add()的调用，我们给a,b都加1  
    a=a+1;  
    b=b+1;  
  
    HookOff();//关掉Myadd()钩子防止死循环  
  
    int ret;  
    ret=add(a,b);  
  
    HookOn();//开启Myadd()钩子  
  
    return ret;  
}  

HINSTANCE hinst=NULL;  
//安装鼠标钩子，进行HOOK  
void CCallAddDlg::OnBnClickedBtnStartHook()  
{  
    typedef BOOL (CALLBACK *inshook)(); //函数原型定义  
    inshook insthook;  
      
    hinst=LoadLibrary(_T("Hook.dll"));//加载dll文件  
    if(hinst==NULL)  
    {  
        AfxMessageBox(_T("no Hook.dll!"));  
        return;  
    }  
    insthook=::GetProcAddress(hinst,"InstallHook");//获取函数地址  
    if(insthook==NULL)  
    {  
        AfxMessageBox(_T("func not found!"));  
        return;  
    }  
    insthook();//开始HOOK  
}  
  
//卸载鼠标钩子，停止HOOK  
void CCallAddDlg::OnBnClickedBtnStopHook()  
{  
    if (hinst==NULL)  
    {  
        return;  
    }  
    typedef BOOL (CALLBACK *UnhookProc)(); //函数原型定义  
    UnhookProc UninstallHook;  
  
    UninstallHook=::GetProcAddress(hinst,"UninstallHook");//获取函数地址  
    if(UninstallHook!=NULL)   
    {  
        UninstallHook();  
    }  
    if (hinst!=NULL)  
    {  
        ::FreeLibrary(hinst);  
    }  
}  

//卸载鼠标钩子函数  
void UninstallHook()  
{  
    if (hhk!=NULL)  
    {  
        ::UnhookWindowsHookEx(hhk);  
    }  
    HookOff();//记得恢复原函数入口  
}  
  
//dll退出时  
int CHookApp::ExitInstance()  
{  
    HookOff();//记得恢复原函数入口  
    return CWinApp::ExitInstance();  
}