远程DLL注入、卸载

Dll注入

//dwPid 为目标进程PID
//szDllName 为要注入的DLL文件
void CDllManageDlg::InjectDll(DWORD dwPid, CString szDllName)
{
    if(dwPid == 0 || strlen(szDllName) == 0)
        return;

    HANDLE hProcess = OpenProcess(PROCESS_ALL_ACCESS, FALSE, dwPid);
    if(hProcess == NULL)
        return;

    //将CString转换为char *
    char *DllName = szDllName.GetBuffer(szDllName.GetLength());
    szDllName.ReleaseBuffer();
    int nDllLen = strlen(DllName) + sizeof(char);

    //在目标进程申请内存,返回目标进程申请到的内存块的起始地址
    LPVOID pDllAddr = VirtualAllocEx(hProcess, NULL, nDllLen, MEM_COMMIT, PAGE_READWRITE);
    if(pDllAddr == NULL)
    {
        CloseHandle(hProcess);
        AfxMessageBox("注入失败!");
        return;
    }

    //将要注入的Dll文件写入目标进程
    DWORD dwWriteNum = 0;
    WriteProcessMemory(hProcess, pDllAddr, DllName, nDllLen, &dwWriteNum);

    //检索指定的动态链接库(DLL)中的输出库函数地址
    LPVOID pFunAddr = LoadLibraryA;

    //创建一个远程线程
    HANDLE hThread = CreateRemoteThread(hProcess, NULL, 0, (LPTHREAD_START_ROUTINE)pFunAddr,
                                         pDllAddr, 0, NULL);

    // 等待LoadLibrary加载完毕
    WaitForSingleObject(hThread, INFINITE);

    // 释放目标进程中申请的空间  
    VirtualFreeEx( hProcess, NULL, nDllLen, MEM_DECOMMIT ); 

    CloseHandle(hThread);
    CloseHandle(hProcess);

}

Dll卸载

void CDllManageDlg::UnInjectDll(DWORD dwPid, char *szDllName)
{
    // 使目标进程调用GetModuleHandle,获得DLL在目标进程中的句柄  
    DWORD dwHandle;
    HANDLE hProcess = OpenProcess(PROCESS_ALL_ACCESS, FALSE, dwPid);
    LPVOID pFunc = GetModuleHandleA;  
    char lpBuf[MAXBYTE];
    HANDLE hThread = CreateRemoteThread( hProcess, NULL, 0, 
        (LPTHREAD_START_ROUTINE)pFunc, lpBuf, 0, &dwPid );

    // 等待GetModuleHandle运行完毕  
    WaitForSingleObject( hThread, INFINITE );  

    // 获得GetModuleHandle的返回值  
    GetExitCodeThread( hThread, &dwHandle );

    // 释放目标进程中申请的空间  
    int dwSize = strlen(szDllName) + sizeof(char);
    VirtualFreeEx( hProcess, lpBuf, dwSize, MEM_DECOMMIT );  
    CloseHandle( hThread );  

    // 使目标进程调用FreeLibrary,卸载DLL  
    pFunc = FreeLibrary;  
    hThread = CreateRemoteThread( hProcess, NULL, 0,  
    (LPTHREAD_START_ROUTINE)pFunc,  (LPVOID)dwHandle, 0, &dwPid ); 

    // 等待FreeLibrary卸载完毕  
    WaitForSingleObject( hThread, INFINITE );  
    CloseHandle( hThread );  
    CloseHandle( hProcess );  
}

得到进程ID

DWORD CDllManageDlg::GetSelectPid(CString PName)
{
    //获取当前进程快照
    HANDLE  snapShot = CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0 );

    //查询进程
    PROCESSENTRY32  processInfo;
    CString strProcessName = "";
    DWORD nProcessID = 0;
    int nProcessTerminate = 0;

    //这句很重要,否则就无法获取到进程信息
    processInfo.dwSize = sizeof( PROCESSENTRY32 );

    //获取第一个进程
    BOOL status = Process32First( snapShot, &processInfo );
    while( status )
    {
       //获取进程名字
       strProcessName = processInfo.szExeFile;

       //查询比较是否选中的进程
       if( strProcessName.CompareNoCase( PName ) == 0 )
       {
            //获取进程ID
           nProcessID = processInfo.th32ProcessID;
           break;
       }
       //获取下一个进程
       status = Process32Next( snapShot, &processInfo );    
    }
    return nProcessID;
}

Dll注入按钮

void CDllManageDlg::OnButtonInject() 
{
    // TODO: Add your control notification handler code here

    UpdateData(TRUE);
    ProcessName = m_PName;  //进程名
    dwPid = GetSelectPid(ProcessName);  //进程ID
    szDllName = m_DLL;  //Dll路径及名字
    InjectDll(dwPid, m_DLL);
}

Dll卸载按钮

void CDllManageDlg::OnButtonUninject() 
{
    // TODO: Add your control notification handler code here

    //将CString转换为char *
    char *DllName = szDllName.GetBuffer(szDllName.GetLength());
    szDllName.ReleaseBuffer();
    UnInjectDll(dwPid, DllName);
}

这里写图片描述

  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 2
    评论
Delphi是一种编程语言,而DLL(Dynamic-Link Library)是一种模块化的文件格式,用于存储代码和数据,可以被多个应用程序共享。DLL注入是一种技术,它允许将DLL文件加载到正在运行的进程中,并使得该进程能够调用DLL中的函数和使用其中的数据。 在Delphi中实现DLL注入的方法有很多种。一种常见的方法是使用Windows API函数LoadLibrary和GetProcAddress。通过调用LoadLibrary函数,将DLL文件加载到进程的虚拟地址空间中。然后使用GetProcAddress函数获取DLL中导出函数的地址,并将其传递给需要调用的函数。通过这种方式,可以在运行时将DLL注入到目标进程中,并且通过调用DLL中的函数来扩展进程的功能。 DLL注入在实际应用中有多种用途。例如,可以使用DLL注入来为某个程序添加额外的功能或修改程序的行为。DLL注入还可以用于实现一些调试和监控的功能。通过注入DLL,可以截获程序的输入和输出,或者在程序执行某些指定的操作时进行额外的处理。 在Delphi中实现DLL注入需要一定的编程知识和技巧。需要考虑目标进程的架构和权限限制,以及如何管理注入DLL的生命周期和资源管理。同时,还需要处理一些安全性和稳定性方面的问题,以确保注入过程不会对目标进程造成损害或崩溃。 总之,Delphi可以通过调用Windows API函数来实现DLL注入,从而扩展和修改进程的功能。但在实际应用中,需要考虑各种方面的问题,并且遵守相关的法律和规定,以确保注入操作的安全性和合法性。

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论 2
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值