VBS伪造HTTP-REFERER

标签: , , , ,

最近用VBS模拟POST提交表单,发现遇到检测Referer的页面就不管用了。

在测试目录写了一个简单的referer.php,代码如下

<?php
if (!isset($_SERVER["HTTP_REFERER"]))
    echo "No Referer";
else
    echo $_SERVER["HTTP_REFERER"];
?>

如果直接点击上面的链接,那么页面会显示referer页面的链接。

Set http = CreateObject("msxml2.xmlhttp")
http.open "GET","http://demon.tw/test/referer.php",False
http.setRequestHeader "Referer","http://demon.tw"
http.send
WScript.Echo http.responseText

但是如果我用VBS调用msxml2.xmlhttp组件访问这个页面,返回的却是No Referer。实在匪夷所思,难道我的代码写错了?

于是Google了一下“VBS伪造HTTP REFERER”,发现搜出来的内容大部分和这篇文章一样,不用看又是复制粘贴,你抄我的,我抄你的,抄来抄去不知道到底是谁的,而且还是错的!

那篇文章第一个例子是ASP的

dim http 
set http=server.createobject("MSXML2.XMLHTTP")
Http.open "GET",url,false 
Http.setRequestHeader "Referer","http://www.fromdomain.cn/" 
Http.send()

开始我还以为ASP下的VBS和我直接双击运行的VBS不一样,ASP下的比较牛逼,可以改Referer。为此我还专门装了IIS测试,发现返回的照样是No Referer。后来才看到下面的留言,“原谅我对asp不熟,给不了你什么帮助,自己查点其他资料参考一下吧”,“这我没怎么玩asp了,代码只是参考来的,asp的没测试过”。

我真的不想骂人,不熟你写也就算了,起码测试一下吧,没有测试过的代码你也好意思贴上来?后来在千一网络(这个网络貌似不错)看到一个比较靠谱的答案,Referer在ASP和Ajax中是无法通过设置Header来更改的。

怒了,既然xmlhttp组件不行,我用socket来写总行了吧!(注:不是所有电脑上都注册了Winsock组件)

Set socket = WScript.CreateObject("MSWinsock.Winsock","Winsock_")
socket.RemoteHost = "demon.tw"
socket.RemotePort = 80
socket.Connect
Do
    WScript.Sleep 100
Loop

Sub Winsock_Connect()
    data =  "GET /test/referer.php HTTP/1.1" & vbCrLf &_
            "Referer: http://demon.tw" & vbCrLf &_
            "Host: demon.tw" & vbCrLf & vbCrLf
    socket.SendData data
End Sub

Sub Winsock_DataArrival(bytesTotal)
    socket.GetData str
    WScript.Echo Utf8ToUnicode(str)
    WScript.Quit
End Sub

Utf8ToUnicode函数比较长就不贴出来了,以前的文章写过。测试结果如下:

HTTP/1.1 200 OK
Date: Thu, 04 Nov 2010 14:05:20 GMT
Server: Apache
Transfer-Encoding: chunked
Content-Type: text/html

f
http://demon.tw
0

可以肯定伪造Referer成功了,但是返回的结果好像有点奇怪,demon.tw前面和后面一行的f和0是什么东西啊?(其实用浏览器访问也是这样返回的,只不过浏览器不显示给我们看罢了)我猜想f是Referer字符串的长度,但是搜了半天也找不到解释。不管了,伪造成功就行,结果难看点就难看点吧。

随机文章:

  1. 用VBS检测U盘插入和弹出事件
  2. 利用53端口的OpenVPN免费上网
  3. NDS上的FC模拟器nesDS
  4. VBS实现全角字符转半角字符
  5. 用VBS读写二进制文件的另一种方法

8 条评论 发表在“VBS伪造HTTP-REFERER”上

  1. Kaisir.Wang说道:

    是的 最近我也在为这个Referer而发愁 我以前写过一个C#的人人网日志备份工具,现在人人网更改了提交方式,经抓包分析,只有检测到一个Referer才会跳转到正确的页面,无奈只有。Net 4.0才支持对Referer的修改…汗了我…
    不行我也用WinScoket重写一个~~

  2. prophetk说道:

    装个VB就好搞了嘛 winsock很牛X的说

  3. BALTHASAR说道:

    HTTP/1.1 200 OK
    Date: Thu, 04 Nov 2010 14:05:20 GMT
    Server: Apache
    Transfer-Encoding: chunked
    Content-Type: text/html

    f

    http://demon.tw

    0

    这段代码是CHUNKED编码,是分段的
    [内容1长度]\r\n内容1\r\n[内容2长度]\r\n内容2\r\n….\r\n0\r\n
    \r\n0\r\n是结束标志

    CHUNKED困扰了我很久的说。。。。

  4. jack说道:

    我的电脑测试
    application/x-www-form-urlencoded时,可以设置referer,且服务端能收到
    multipart/form-data时,设置无效,服务端收不到

    好奇怪

留下回复