BBSXP论坛程序Manage.asp页面过滤不严导致SQL注入漏洞
添加时间:
2008-10-05
系统编号:
WAVDB-01245
影响版本:
BBSxp 2008 For Access
程序介绍:
解决方案:
厂商补丁:
BBSxp 2008
----------
目前厂商已经发布了升级补丁以修复这个安全问题,请到厂商的主页下载:
http://www.bbsxp.com/
信息来源:
<*来源:Bug.Center.Team http://www.cnbct.org/ *>
2008-10-05
系统编号:
WAVDB-01245
影响版本:
BBSxp 2008 For Access
程序介绍:
BBSXP是一个强大的论坛社区解决方案,使用它您可以轻易为您的网站创建论坛系统。
漏洞分析:
Manage.asp文件的ThreadID没有经过任何过滤便放入SQL语句中执行 导致注射漏洞发生
漏洞代码:
- <%
- if CookieUserName=empty then error("您还未<a href=""javascript:BBSXP_Modal.Open('Login.asp',380,170);"">登录</a>论坛")
- if Request_Method <> "POST" then error("<li>提交方式错误!</li><li>您本次使用的是"& Request_Method"提交方式!</li>")
- ForumID=RequestInt("ForumID")
- ThreadID=Request("ThreadID") // 这里不知道程序员是不是晚上床上劳累过度
- If IsNumeric(ThreadID) then
- ThreadID=int(ThreadID) //这里虽然进行数字型判断 但是我们有办法直接跳出这里 继续执行下面的SQL语句
- ForumID=Execute("Select ForumID From ["&TablePrefix"Threads] where ThreadID="&ThreadID"")(0)
- End If
- if BestRole<>1 then
- Moderated=Execute("Select Moderated From ["&TablePrefix"Forums] where ForumID="&ForumID" ")(0)
- %><!– #include file="Utility/ForumPermissions.asp" –><%
- end if
- if BestRole=1 and ForumID<1 then
- ForumIDSql=""
- else
- ForumIDSql=" and ForumID="&ForumID""
- end if
- select case Request("menu")
- case "Top"
- if BestRole = 1 then
- for each ho in Request("ThreadID")
- ho=int(ho)
- Execute("update ["&TablePrefix"Threads] Set ThreadTop=2,StickyDate=DateAdd("&SqlChar"yyyy"&SqlChar", 3, "&SqlNowString") where ThreadID="&ho&ForumIDSql"")
- next
- succtitle="批量公告主题,主题ID:"&Request("ThreadID")""
- else
- error("您的权限不够")
- end if
- case "UnTop"
- if BestRole = 1 then
- for each ho in Request("ThreadID")
- ho=int(ho)
- Execute("update ["&TablePrefix"Threads] Set ThreadTop=0,StickyDate="&SqlNowString" where ThreadID="&ho&ForumIDSql"")
- next
- succtitle="批量取消公告,主题ID:"&Request("ThreadID")""
- else
- error("您的权限不够")
- end if
- ….这里省略部分代码
- next
- UpdateThreadStatic(ThreadID)
- succtitle="批量删除帖子,帖子ID:"&Request.Form("PostID")""
- case "UnDelPost"
- for each ho in Request.Form("PostID")
- ho=int(ho)
- Rs.open "select * from ["&TablePrefix"Posts] where ThreadID="&ThreadID" and PostID="&ho"",Conn,1,3
- if not Rs.eof then
- Rs("Visible")=1
- Rs.update
- if Rs("ParentID")=0 then Execute("update ["&TablePrefix"Threads] Set Visible=1 where ThreadID="&Rs("ThreadID")"")
- end if
- Rs.close
- next
- UpdateThreadStatic(ThreadID)
- succtitle="批量还原帖子,帖子ID:"&Request.Form("PostID")""
- '''''''''''''''''''''''''''''''''''帖子管理 End''''''''''''''''''''''''''''''''''
- end select
- if succtitle="" then error("无效指令")
- Log(""&succtitle"")
- Message="<li>"&succtitle"</li>"
- succeed Message,""
- %>
- 第231行到第235行代码如下
- Rs.open "select * from ["&TablePrefix"Posts] where ThreadID="&ThreadID" and PostID="&ho"",Conn,1,3
- if not Rs.eof then
- Rs("Visible")=2
- Rs.update
- if Rs("ParentID")=0 then Execute("update ["&TablePrefix"Threads] Set Visible=2 where ThreadID="&Rs("ThreadID")"")
可以看到ThreadID,没有经过任何过滤变放入查询 导致漏洞发生
解决方案:
厂商补丁:
BBSxp 2008
----------
目前厂商已经发布了升级补丁以修复这个安全问题,请到厂商的主页下载:
http://www.bbsxp.com/
信息来源:
<*来源:Bug.Center.Team http://www.cnbct.org/ *>