ASP网站漏洞解析及黑客入侵防范方法(2)

     6、数据库下载漏洞
  
  　　攻击原理：在用Aclearcase/" target="_blank" >ccess做后台数据库时，如果有人通过各种方法知道或者猜到了服务器的Access数据库的路径和数据库名称，那么他也能够下载这个Access数据库文件，这是非常危险的。
  
  　　防范技巧：
  
  　　（1）为你的数据库文件名称起个复杂的非常规的名字，并把它放在几层目录下。所谓 “非常规”， 打个比方说，比如有个数据库要保存的是有关书籍的信息， 可不要给它起个“book.mdb”的名字，而要起个怪怪的名称，比如d34ksfslf.mdb， 并把它放在如./kdslf/i44/studi/的几层目录下，这样黑客要想通过猜的方式得到你的Access数据库文件就难上加难了。
  
  　　（2）不要把数据库名写在程序中。有些人喜欢把DSN写在程序中，比如：
  
  　　DBPath = Server.MapPath（“cmddb.mdb”）
  　　conn.Open “driver={Microsoft Access Driver （*.mdb）}；dbq=” & DBPath
  
  　　假如万一给人拿到了源程序，你的Access数据库的名字就一览无余了。因此建议你在ODBC里设置数据源，再在程序中这样写：
  
  　　conn.open“shujiyuan”
  
  　　（3）使用Access来为数据库文件编码及加密。首先在“工具→安全→加密/解密数据库”中选取数据库（如：employer.mdb），然后按确定，接着会出现“数据库加密后另存为”的窗口，可存为：“employer1.mdb”。
  
  　　要注意的是，以上的动作并不是对数据库设置密码，而只是对数据库文件加以编码，目的是为了防止他人使用别的工具来查看数据库文件的内容。
  
  　　接下来我们为数据库加密，首先打开经过编码了的 employer1.mdb，在打开时，选择“独占”方式。然后选取功能表的“工具→安全→设置数据库密码”，接着输入密码即可。这样即使他人得到了employer1.mdb文件，没有密码他也是无法看到 employer1.mdb中的内容。
  
  　　7、防范远程注入攻击
  
  　　这类攻击在以前应该是比较常见的攻击方式,比如POST攻击,攻击者可以随便的改变要提交的数据值已达到攻击目的.又如:COOKIES 的伪造,这一点更值得引起程序编写者或站长的注意，不要使用COOKIES来做为用户验证的方式,否则你和把钥匙留给贼是同一个道理.
  
  　　比如:
  
  　　If trim(Request. cookies ("uname"))="fqy" and Request.cookies("upwd") =”fqy#e3i5.com” then
  　　……..more………
  　　End if
  
  　　我想各位站长或者是喜好写程序的朋友千万别出这类错误,真的是不可饶恕.伪造COOKIES 都多少年了，你还用这样的就不能怪别人跑你的密码.涉及到用户密码或者是用户登陆时,你最好使用session 它才是最安全的.如果要使用COOKIES就在你的COOKIES上多加一个信息,SessionID,它的随机值是64位的,要猜解它,不可能.例:
  
  　　if not (rs.BOF or rs.eof) then
  　　login="true"
  　　Session("username"&sessionID) = Username
  　　Session("password"& sessionID) = Password
  　　‘Response.cookies(“username”)= Username
  　　‘Response.cookies(“Password”)= Password
  
  　　下面我们来谈谈如何防范远程注入攻击,一般的攻击都是将单表提交文件拖到本地,将Form ACTION=”chk.asp” 指向你服务器中处理数据的文件即可.如果你全部的数据过滤都在单表页上，那么恭喜你，你将已经被脚本攻击了.
  
  　　怎么才能制止这样的远程攻击?好办,请看代码如下: 程序体(9)
  
  　　＜%
  　　server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))
  　　server_v2=Cstr(Request.ServerVariables("SERVER_NAME"))
  　　if mid(server_v1,8,len(server_v2))＜＞server_v2 then
  　　response.write "＜br＞＜br＞＜center>"
  　　response.write " "
  　　response.write "你提交的路径有误，禁止从站点外部提交数据请不要乱改参数！"
  　　response.write "
  
  "
  　　response.end
  　　end if
  　　%>
  
  ‘个人感觉上面的代码过滤不是很好，有一些外部提交竟然还能堂堂正正的进来,于是再写一个.
  
  　　‘这个是过滤效果很好,建议使用.
  
  　　if instr(request.servervariables("http_referer"),"http://"&request.servervariables("host") )<1 then response.write "处理 URL 时服务器上出错。
  
  　　如果您是在用任何手段攻击服务器，那你应该庆幸，你的所有操作已经被服务器记录，我们会第一时间通知公安局与国家安全部门来调查你的IP. "
  
  　　response.end
  　　end if
  
  　　程序体(9)
  
  　　本以为这样就万事大吉了，在表格页上加一些限制,比如maxlength啦,等等..但天公就是那么不作美,你越怕什么他越来什么.你别忘了,攻击者可以突破sql注入攻击时输入框长度的限制.写一个SOCKET程序改变HTTP_REFERER？我不会。网上发表了这样一篇文章：
  
  　　------------len.reg-----------------
  　　Windows ReGIStry Editor Version 5.00
  　　[HKEY_CURRENT_USER\Software\Microsoft\Inte.net Explorer\MenuExt\扩展(&E)]
  　　@="C:\Documents and Settings\Administrator\桌面\len.htm"
  　　"contexts"=dword:00000004
  　　-----------end----------------------
  　　-----------len.htm------------------
  　　
  　　----------end-----------------------
  
  　　用法:先把len.reg导入注册表(注意文件路径)
  
  　　然后把len.htm拷到注册表中指定的地方.
  
  　　打开网页,光标放在要改变长度的输入框上点右键,看多了一个叫扩展的选项了吧
  
  　　单击搞定! 后记:同样的也就可以对付那些限制输入内容的脚本了.
  
  　　怎么办？我们的限制被饶过了，所有的努力都白费了？不，举起你de键盘，说不。让我们继续回到脚本字符的过滤吧，他们所进行的注入无非就是进行脚本攻击。我们把所有的精力全都用到ACTION以后的页面吧，在chk.asp页中，我们将非法的字符全部过滤掉，结果如何？我们只在前面虚晃一枪，叫他们去改注册表吧，当他们改完才会发现，他们所做的都是那么的徒劳。
  
  　　8、ASP木马
  
  　　已经讲到这里了，再提醒各位论坛站长一句，小心你们的文件上传：为什么论坛程序被攻破后主机也随之被攻击者占据。原因就在……对！ASP木马！一个绝对可恶的东西。病毒么？非也.把个文件随便放到你论坛的程序中，您老找去吧。不吐血才怪哦。如何才能防止ASP木马被上传到服务器呢？方法很简单，如果你的论坛支持文件上传，请设定好你要上传的文件格式，我不赞成使用可更改的文件格式，直接从程序上锁定，只有图象文件格式，和压缩文件就完全可以，多给自己留点方便也就多给攻击者留点方便。怎么判断格式，我这里收集了一个，也改出了一个，大家可以看一下：
  
  　　程序体（10）
  
  　　’判断文件类型是否合格
  　　Private Function CheckFileExt (fileEXT)
  　　dim Forumupload
  　　Forumupload="gif,jpg,bmp,jpeg"
  　　Forumupload=split(Forumupload,",")
  　　for i=0 to ubound(Forumupload)
  　　if lcase(fileEXT)=lcase(trim(Forumupload(i))) then
  　　CheckFileExt=true
  　　exit Function
  　　else
  　　CheckFileExt=false
  　　end if
  　　next
  　　End Function
  　　‘验证文件内容的合法性
  
  set MyFile = server.CreateObject ("Scripting.FileSystemObject")
  　　set MyText = MyFile.OpenTextFile (sFile, 1) ’ 读取文本文件
  　　sTextAll = lcase(MyText.ReadAll): MyText.close
  　　’判断用户文件中的危险操作
  　　sStr ="8　.getfolder　.createfolder　.deletefolder　.createdirectory　
  　　.deletedirectory"
  　　sStr = sStr & "　.saveas　wscript.shell　script.encode"
  　　sNoString = split(sStr,"　")
  　　for i = 1 to sNoString(0)
  　　if instr(sTextAll, sNoString(i)) ＜＞ 0 then
  　　sFile = Upl.Path & sFileSave: fs.DeleteFile sFile
  　　Response.write "＜center＞＜br＞＜big＞"& sFileSave &"文件中含有与操作目录等有关的命令"&_
  　　"＜br＞＜font color=red＞"& mid(sNoString(i),2) &"＜/font＞，为了安全原因，＜b＞不能上传。＜b＞"&_"＜/big＞＜/center＞＜/html＞"
  　　Response.end
  　　end if
  　　next
  
  　　把他们加到你的上传程序里做一次验证，那么你的上传程序安全性将会大大提高.
  
  　　什么？你还不放心？拿出杀手锏，请你的虚拟主机服务商来帮忙吧。登陆到服务器，将PROG ID 中的"shell.application"项和"shell.application.1"项改名或删除。再将”WSCRIPT.SHELL”项和”WSCRIPT.SHELL.1”这两项都要改名或删除。呵呵，我可以大胆的说，国内可能近半以上的虚拟主机都没改过。只能庆幸你们的用户很合作，否则……我删，我删，我删删删……
  

原文转自：http://www.ltesting.net