无意中在一个外国的网站发现的,配合quickbms使用
7 y6 P9 U& g' W* M1 `/ d* n8 G& z; G0 P
getdstring SIGN 4
5 {& T1 L: `* t+ f5 oif SIGN == "YYST"
% L$ \ I% e/ V& l6 E$ p) y comtype unzip_dynamic, u% o+ h$ s4 E: g, c
get DUMMY long
( D3 Z1 O8 h" T get FILES long
0 S: u# S; R' J3 P/ d4 D1 S. P get HEAD_SIZE long
3 z' f# t+ o& m for i = 0 < FILES
9 D$ C- n# a# q- t, w! d get NAMESZ short6 L; J" T0 E. B& P0 j
getdstring NAME NAMESZ
* B" \& e5 N. q/ F5 G) K# A get SIZE long* Q- e( }) T# j7 Z& K) q% H7 d
get OFFSET long
! S0 K9 F- u# C% \" d# j7 A" f set TMP extension NAME
- w2 r6 L" B: g, l if TMP == "ccz"4 M; Y& D8 ]+ `- u- X
clog NAME OFFSET SIZE SIZE
5 h3 L6 J5 F+ h2 `1 i% l7 J. H0 R else
8 W2 f- ]4 d# o1 S; E) G log NAME OFFSET SIZE
* s9 u! c1 Z2 \) B endif; Z# [. e I) P+ @5 p" ~+ U
next i
8 k, H% @9 [1 I5 @ cleanexit
( {, c. o5 @4 P2 T% I! i) hendif
0 L* N* q" d5 V: o' \ G+ b- ~goto 0
0 C' s7 c& \" J3 [0 j& M. Q% m2 R- F6 R$ i. N/ c0 y$ K- n
comtype lzma86head
& w. `/ I, S. j) nget OFFSET long& [# v u$ ?* P% x1 @
goto OFFSET
& T2 j: c F! s( pset NAME string ""# V, }$ X" ?, L1 h: e4 U. p. T
set PATH string ""
1 _5 e( l3 `! z. `5 C0 }6 Ycallfunction EXTRACT
. u h1 K4 x' Q' W! t( U5 a( Q$ A: O, Z4 b1 m' ~$ {
startfunction EXTRACT
1 a O8 q/ s/ e5 h% I. b get NAMESZ byte- e, X; q3 R$ P9 p! }
getdstring NAME NAMESZ; P) _: W6 \' g1 B4 ^
get FOLDERS short
3 Z" n( U8 }* E. U! m* E get FILES short
8 k' T, v# Z [8 r
+ N* P# t/ F" q4 d. f string PATH += NAME
; z# Y+ w( e) S3 W( u! v1 K string PATH += /
& O% t& N2 f% M9 p4 _$ v% U8 p3 y for i = 0 < FOLDERS6 }! z$ G' F3 C! I$ ~$ d5 t
callfunction EXTRACT- B: C) o' u+ m' `7 `! W0 A
next i
- K/ L' F: C6 t' z4 ^. u$ G6 G% n |$ Q
for i = 0 < FILES
1 K" P$ i1 I( i( Y) E4 Q9 {+ n K @ get NAMESZ byte! ]/ w* e! O+ K# C F4 R
getdstring NAME NAMESZ
0 t- f0 j' w5 Z- b/ o# j get OFFSET long9 S& ?" x+ O9 Y- f. b& ^
get ZSIZE long
' m. `+ O2 g, O+ P$ P get SIZE long
- l" i0 r% Q# ?' T" ?& X& L9 n get ZIP byte9 v) _7 m3 P9 S
set FNAME string PATH
- k* Y' C- v! q- J string FNAME += NAME
) d1 ]) t. U" z1 V( p- A if ZIP == 0' a: I& ^7 X# n
log FNAME OFFSET SIZE8 M, O( q! T6 R: x7 J7 O
else7 K2 v+ k3 @5 r( V5 V" L
clog FNAME OFFSET ZSIZE SIZE
, Y( r# p5 \! L" P/ @6 ~6 w2 t3 U* _ endif5 c# o5 l) A1 q1 J1 |
next i; `( q8 K3 r+ g1 J2 z8 R
endfunction |