SQL注入攻击零距离

韩冰

来源：http://www.17nc.com/

一次次的SQL注射入侵，一次次的网站被黑，总是那句话，漏洞在所难免，难道一点办法都没吗？这篇文章就是为大家解析下SQL注 射的原理，以及给出一些预防方法。 一：基础篇 分析下漏洞产生的原因，主要还是参数没完全过滤。 % o/ H! F! h& f, R$ t* pcntid = Request("cntid") 这样的语句就存在一个注入攻击，首先，没验证是否为整数 解决方法： <% dim cntid cntid =replace(request("cntid "),"","") if (not isnumeric(cntid)) then call error response.end end if ! r' F1 Z1 v) H, Nsub Error() response.write " <table align=center width=300 border=0 $ ^5 P" f$ a4 j/ ocellpadding=4 cellspacing=0 >" ! {) h3 q; Y6 b/ x, X* c7 Z# O5 jresponse.write " <tr > " 0 @9 F8 U# z% ?/ e, Vresponse.write " <td colspan=2 height=15> " response.write " <div align=center> / b7 @! L& P9 h) X- ~操作: 参数错误!</div>" , u1 ?# b/ y# ^response.write " </td>" response.write " </tr>" b6 ~" Z- ]9 p& S! Jresponse.write " <tr> " response.write " <td colspan=2 height=23> " " e1 L: T, U, ]) [& Eresponse.write " <div align=center><br><br>" 0 m# I2 `4 a! b( eresponse.write " 参数错误!!!非法探测已经被记录 <br><br>" + m( V; L# `9 `response.write " <a href=javascriptnclick=history.go(-1)>返回</a>" response.write " <br><br></div></td>" response.write " </tr> </table></body></html>" end sub + G0 Q& j2 k4 Z%> 8 X* j$ _) L# L; z : m! ^3 P2 U u! s这是一个最基础的过滤，如果提交非法参数效果如图1： ! C& u5 z, `2 ^ O' l0 G0 K 那么我们还需要注意什么？ 用户名的注册，必须过滤掉一些特殊符号，继续刚才的话题，我们假设是username. ! m' p5 r/ ?* d) _' f9 j<% dim username - k* ?; P+ J& A$ x* Busername =replace(request("username "),"","") if Instr(username,"=")>0 or Instr(username,"%")>0 or Instr(username,chr(32))>0 or Instr(username,"?")>0 or Instr(username,"&")>0 or Instr(username,";")>0 or 4 @6 L: C2 N, a3 BInstr(username,",")>0 or Instr(username,"")>0 or Instr(username,",")>0 or Instr (username,chr(34))>0 or Instr(username,chr(9))>0 or Instr(username,"?")>0 or Instr(username,">")>0 or Instr(username,"<")>0 or Instr(username,"$")>0 or Instr (username,"#")>0 or Instr(username,"@")>0 then & w( |1 d& @+ u; I; Z call error response.end 0 Z: z+ a% B* H& o d0 z! |end if 7 R9 Y! W/ M5 S) I* |5 C5 ]6 jsub Error() # a1 R7 V9 {" E/ O' t: ^response.write " <table align=center width=300 border=0 * N N& a$ R: [# Scellpadding=4 cellspacing=0 >" 0 V+ R9 ?" {5 jresponse.write " <tr > " response.write " <td colspan=2 height=15> " response.write " <div align=center>操作: 参数错 8 C* H$ B$ L: X误!</div>" " W3 O0 M% @2 f( ~+ a1 [2 eresponse.write " </td>" ! s0 r! d/ Y6 K- Jresponse.write " </tr>" 4 Q' p# C: I$ T# l4 N7 Sresponse.write " <tr> " response.write " <td colspan=2 height=23> " response.write " <div align=center><br><br>" response.write " 用户名中含有非法字符(“=”,“%”, “?”,“&”,“;”,“,”,“”,”?”,“>”,“<”,“$”,“#”,“@”) <br><br>" 3 j+ K' _- B: j% G# xresponse.write " <a href=javascriptnclick=history.go(-1)>返回</a>" 3 i$ I$ n% J. _. |% Nresponse.write " <br><br></div></td>" response.write " </tr> </table></body></html>" end sub %> 利用这个原理，我们还能过滤一些可能存在cookies跨站脚本的地方： 只要过滤cookie，java这样的字眼，方法同上。需要注意的事，类似与用户登陆的地方，用户名一定要username =replace(request("username "),"","")，意思就是把’过滤成”，这样做的目的就是预防’ or ‘’=’这样的入侵。 % D+ w2 V1 }4 I9 R/ K可是如果类似www.xx.com/list.asp? action = search 我们可以这样过滤 ' o1 u }$ t7 [7 m<% action=request("action") 2 F4 R5 Z3 |* m& `select case action case "search" call search() - X2 g9 d m* [" M$ s% B, vcase else 1 Q. C4 F& `. M# t1 mcall search() end select % k0 P9 m5 |: H- fsub search () ( I2 n3 d7 K" v7 x( F2 ~+ V0 Z* O这里是search的内容 end sub %> 大家可以看到无论对错，都执行search。这样也可以预防SQL。 2 o1 F" B% z i6 i8 w& g二：密码安全 采用不可逆加密是必须的选择，防止别人探测到密码后暴力破解，MD5用艿氖迪址浅＜虻ィ?姹闳フ腋鯩D5函数体，很多源代码都 带。 <!-- #include file=" md5.asp" --> 这里是引入MD5函数 1 o. ^% l. l1 J {8 C<% dim username username =md5(md5(replace(request("username "),"",""))) B% x B- R/ O2 a* }2 ?%> 这里就实现了2次MD5加密，一般2-3次就足够了，暴力破解比较困难：） COOKIES欺骗问题很严重，所以一般后台管理员一定要session验证。实现方法 我们在登入成功后写入 session("btadmin")=rsadmin("admin") 建立一个验证函数cookies.asp 4 Y2 y$ J. V3 v; f" S6 i8 ~内容如下 <% 0 t7 `" B1 _* G k' G( F p. Tif session("btadmin")="" then response.redirect "admin.asp" end if %> 0 K$ L% O$ L1 c0 `1 }* j$ \3 f4 j在每个管理员操作文件的开头加上 <!--#include file="cookies.asp" --> ! ^4 x! q. L; ~9 Q5 @这样就可以预防非法登陆了：） 6 Z+ b9 }% `$ J3 t* D. F Q我们经常看到验证码这样的东西，这样做是为了预防暴力破解。 实现方法，假设登入为login.asp 我们在开头加： <% 3 [0 P" q7 Y3 S9 |dim p randomize ‘对随机数生成器做初始化的动作 p = Int((8999 * Rnd) + 1000) session("cntcode")=p %> * U0 R/ F. Z& J: [' W4 s7 { 插入验证代码的表格 <tr> 8 F% H6 K5 Z7 K6 X<td valign=middle>请输入验证码</td> ! I' F( B# q; G1 j<td valign=middle> <INPUT name=yanzhen type=text> ) B0 X T5 a2 P: T/ m& t在左边框输入: <%=session("cntcode")%></td></tr> 2 D8 @9 [# E% a4 f* n' B% ?最后验证程序： <% * P5 F$ ~* B0 O& nif request("yanzhen")="" or trim(session("cntcode")) <>trim(replace(request("yanzhen"),"","")) then response.write " 请正确输入您的验证码。" 5 \+ J1 H/ u) E0 G5 i) @" U# ]response.end ! Q1 [9 [4 |' y% C* j% C7 xelse + W& [6 l, M8 G8 g3 d%> K8 x8 l% {6 Q7 Q" j7 P程序运行效果如图2： $ m: w, a, |: \4 k% X, ?7 H & g. w( \6 T# n/ ~ p y三：数据库安全 爆库的方法越来越多，我们来看下：如图3 按X档案以前文章一位大侠说的，将/替换为 %5c，确实很多网站都存在这样的漏洞。大家可以清楚的看到数据库地址。 ! |2 U% R' [7 `8 G9 d偶什么方法可以预防呢？ . Z& C9 s% @1 |。。。（代码见杂志）。。。。。。。。。。。 这是一个数据库连接文件，大部分为conn.asp ; ^( M/ [9 ^; O( T关键在与on error resume next出错了也执行下一句 + e$ X: u( B" k; C我们看下他的运行效果。 ) W! R6 q: h" x1 G& v$ E7 h/ m; O" L Z9 g8 q" `8 ]5 e" w 除了图片显示不正常外，没暴露数据库：） 其实浪心建议用WIN2003做服务器，当你用%5c 来替换的时候 _blank>http://127.0.0.1/fourm.asp?cntid=4 自动换成%5cfourm.asp/多个/ - x; E F! I$ T" S) S" L3 l- ~: J0 n_blank>http://127.0.0.1%5cfourm.asp/?cntid=4 # R% t0 ]0 l/ D; p6 p$ `找不到服务器，唯一的结果，更厉害：） + t" h8 F: J0 @- Z7 L) e$ Z% n4 p9 K还有一种方法就是不让对方下载数据库 " @# w. _ b* W方法是 # k8 E2 f. E! z' l9 C2 V. j* C新建一个notdown表，字段为nodown, 数据类型为ole 如图4 $ d* _! J" g5 }+ `, W保存为mdb.mdb - t3 U# h# L9 b) e' OOK，我们写个nodown.asp 代码如下 $ D) N) b( G1 m; U。。。（代码见杂志）。。。。。。。。。。。 把他同数据库一同上传到你的空间，或者本地做个IIS，运行nodown.asp 提示添加记录成功。 4 u, n+ F8 Q: AOK，把数据库重新命名为mdb.asp " p/ o; C" U! Y/ p直接在浏览器里输入数据库地址：提示 / v! k# ^* ~3 UActive Server Pages 错误 ASP 0116 5 W7 _- O: G% {9 C6 ~2 x9 ~& r丢失脚本关闭分隔符 /bbs/cntlovebbs.asp，行 44042 1 q0 Z# L* J1 U$ D! TScript 块缺少脚本关闭标记(%>)。 * Y8 u0 s1 K: C, |% f5 i9 S a用快车下载提示HTTP 500错误 OK到这里数据库安全也过去了：）下面说下浪心新的思维：）没任何技术难度，会VB的都会写：） 四：安全的后台登入 。。。（代码见杂志）。。。。。。。。。。。 9 n: f4 B; C ?: i OK了：）程序简单的出奇，他的功能可不小哦：）你的网站可以比以前安全许多。 ' I2 e( R( [% v$ x0 O