轩辕EXE捆绑机

引用:
.386
.model flat, stdcall
option casemap:none

include        windows.inc
include        user32.inc
includelib    user32.lib
include        kernel32.inc
includelib    kernel32.lib
include     shell32.inc
includelib    shell32.lib

.const
    szFormat        db    "%d", 0
    szErr1            db    "打开文件出错!", 0
    szErr2            db    "读取文件出错!", 0
    szErr3            db    "分配内存出错!", 0
    szDontRunMe        db    "此文件是EXE捆绑机的宿主文件,请不要单独运行!", 0
    szNameFormat    db    "c:\windows\temp\temp%d.exe", 0
.code
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

_RunProcess proc
    LOCAL    @szFileName[MAX_PATH]:byte        ;存放文件名
    LOCAL    @hFileHandle                    ;文件句柄
    LOCAL    @dwFileSize                        ;文件大小
    LOCAL    @dwNumOfBytes                    ;实际影响的字节数
    LOCAL    @lpMemAddress                    ;分配内在基址
    LOCAL    @hFileWriteTo                    ;要写入文件句柄
    LOCAL    @si:SYSTEM_INFO                    ;系统信息结构
    LOCAL    @i                                ;处理第几个文件
    LOCAL    @szTempFileName[128]:byte        ;生成的临时文件名

    invoke    GetSystemInfo, addr @si            ;获取系统信息
    mov    @i, 1

    ;获得自身文件大小,并判断是否已经捆绑了其他文件
    invoke    GetModuleFileName, NULL, addr @szFileName, MAX_PATH
    invoke    CreateFile, addr @szFileName, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL
    mov    @hFileHandle, eax
    .if    eax == INVALID_HANDLE_VALUE
        invoke    MessageBox, NULL, offset szErr1, 0, MB_ICONERROR
        jmp    exit
    .endif
    invoke    GetFileSize, @hFileHandle, NULL
    .if    eax == 3584        ;如果没捆绑其他文件则退出
        invoke    MessageBox, NULL, offset szDontRunMe, 0, MB_ICONERROR
        jmp    exit
    .endif

    invoke    SetFilePointer, @hFileHandle, 8888, 0, FILE_BEGIN        ;文件指针移到捆绑文件开始处(具体位置需要在文件捆绑后重新设置)
    ;从文件尾部依次获取文件数据,写入临时文件并运行
@@:    invoke    ReadFile, @hFileHandle, addr @dwFileSize, 4, addr @dwNumOfBytes, NULL
    .if    @dwNumOfBytes == 0
        jmp    exit            ;没有更多的捆绑文件了
    .endif

    ;invoke    wsprintf, addr @szFileName, offset szFormat, @dwFileSize
    ;invoke    MessageBox, 0, addr @szFileName, 0, MB_OK            ;显示文件大小

    invoke    VirtualAlloc, NULL, @dwFileSize, MEM_COMMIT, PAGE_EXECUTE_READWRITE                ;分配内存以存放文件数据
    mov    @lpMemAddress, eax
    .if    eax == NULL
        invoke    MessageBox, NULL, offset szErr3, 0, MB_ICONERROR
        jmp exit
    .endif
    invoke    ReadFile, @hFileHandle, @lpMemAddress, @dwFileSize, addr @dwNumOfBytes, NULL    ;读入EXE文件数据
    invoke    wsprintf, addr @szTempFileName, offset szNameFormat, @i;                        ;临时文件名，格式为temp1.exe, temp2.exe ...
    invoke    CreateFile, addr @szTempFileName, GENERIC_WRITE, NULL, NULL, OPEN_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL
    mov    @hFileWriteTo, eax
    .if    eax == INVALID_HANDLE_VALUE
        invoke    MessageBox, NULL, offset szErr1, 0, MB_ICONERROR
        jmp    exit
    .endif
    invoke    WriteFile, @hFileWriteTo, @lpMemAddress, @dwFileSize, addr @dwNumOfBytes, NULL    ;写入文件数据
    invoke    CloseHandle, @hFileWriteTo
    invoke    VirtualFree, @lpMemAddress, 0, MEM_RELEASE    ;释放内存
    invoke    ShellExecute, 0, 0, addr @szTempFileName, 0, 0, SW_SHOW

    inc    @i
    jmp    @b
exit:
    invoke    CloseHandle, @hFileHandle
    ret

_RunProcess endp
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

start:
    call    _RunProcess
    invoke  ExitProcess, NULL
end    start