bindtest.bat

来自「Cracker终结者——提供最优秀的软件保护技术」· Batch 代码 · 共 57 行

;@GOTO TRANSLATE

.586P

.MODEL             FLAT, STDCALL

   OPTION          CASEMAP: NONE
   INCLUDE         WINDOWS.inc
   UNICODE         = TRUE
   INCLUDE         APIMACRO.mac

   INCLUDE         ApiHooks.inc

   INCLUDELIB      master
;------------------------------------------------------------------
.CODE

  GetApiHookChain  PROC
                   MOV    EAX, OFFSET BindTest
                   RET
  GetApiHookChain  ENDP
;------------------------------------------------------------------
  NewExport        PROC
                   iWin32   Export
                   INC      EAX 
                   RET
  NewExport        ENDP
;names-------------------------------------------------------------
                   TEXTA    master,   <master.dll/0> 
                   TEXTA    Export,   <Export/0> 
;------------------------------------------------------------------
 HOOK_NOW          = HOOK_EXPORT

 IFDEF DONT_UNBIND
  HOOK_NOW         = HOOK_NOW OR HOOK_NO_UNBIND
 ENDIF

 BeginHooks      BindTest
     MkHook     , master, Export, HOOK_NOW
 EndHooks
;------------------------------------------------------------------

END

:TRANSLATE
@ECHO OFF
ML   /c /coff /nologo BindTest.bat
eLINK BindTest /nologo /optidata /DLL /noentry /EXPORT:GetApiHookChain /SUBSYSTEM:WINDOWS /MERGE:.rdata=.text /IGNORE:4078 /BASE:0X77300000
ML   /c /coff /nologo /DDONT_UNBIND BindTest.bat
eLINK BindTest /OUT:KindTest.dll /nologo /optidata /DLL /noentry /EXPORT:GetApiHookChain /SUBSYSTEM:WINDOWS /MERGE:.rdata=.text /IGNORE:4078 /BASE:0X77300000
DEL  BindTest.obj
DEL  BindTest.exp
DEL  BindTest.lib
DEL  KindTest.exp
DEL  KindTest.lib
PAUSE
CLS