这个，那个，这个任务似乎我拖了很久了= =.....先说声抱歉....6 D. p! A5 \3 z5 i
3 z7 F9 c) j1 Y0 J! q其实代码很早之前就写了，不过之前调试一直通不过，后来又是复习又是考试的就一直耽搁了...
( r+ q' t6 r3 G2 W) A" U0 r* d( b0 Z8 Z p$ A' r- e
这周末有点空闲，于是狠下心重写了下代码，搞了两天，终于完成了..
' x# v( C! h& V. ]
5 Q+ E/ j- g! PBF的文件格式虽然简单，打包器却不是太好做，我觉得还是有必要写写的7 L) Z3 v& f+ H" g) N0 r$ p
6 H- l" t. A% t u1 ]- c
BF格式有两个特点：
: N8 C. C: r7 [" `' x6 C其一是文件表的递归存放，这个不算难，Quickbms也可以用
3 z9 r6 b7 D# n1 g& J2 zStart Function XX3 S. d* v, W; {( Y
End Function XX$ G4 x! Q- t% L
Call Function XX+ g0 k/ \# q$ I3 a% |5 ]# R7 V
来做递归，不过输出读入时文件名前面要加上目录名和/，还是有点小麻烦....
2 @9 I% G, H" C' S# f; J
- ^& t. y& r g6 L: }( D其二是，包文件主体中文件的存放顺序并不是按照文件名表中来的，7 I6 i7 T; I5 a" ~* e/ Z
举个例子，文件名表中，每个文件的内容是这样的：
& Y- N) I+ m6 z9 G9 Z2 a文件名长度 文件名 文件大小 偏移量 O6 C3 ]0 t8 ]7 t" B& }4 B
* w0 C9 S$ E, C; |
也就是说，偏移量才代表了该文件在包中的位置，偏移量最小的文件，就是主体中存放在最前面的，却不是文件名表中的第一个。
; x6 o$ e; W, J; c4 a; f8 D+ l1 x$ @: w, F0 s3 b
这是很麻烦的一点。! x8 H8 e; m4 _8 G& \- h- ^
这样一来，打包的时候就不能按照文件名表中文件顺序来打包，而必须根据偏移量大小顺序来依次打包。( q) k. T0 R- `
) ?( B- N, M5 J9 u! m: W+ M
这儿我用的方法是把每个文件的信息（文件名、大小、偏移）存放到一个结构数组中。
& ]$ f9 O0 L; O9 R6 T& h2 ~( Z然后对这个数组按照偏移量做个排序，然后按照排完的顺序依次打包。6 @2 O, |% X; S- K _
之前肥牛的图形打包器似乎用了数据库，不过我看不太懂delphi，也不懂数据库....
9 J' X7 V( F# |' I0 f) X7 B) w
; E- k( k, I7 g- v目前还存在的问题是，这个打包器无法通用：2 h( L3 s7 V! T6 N9 R
! I7 w, l$ O% M3 w% |
因为文件数量比较大，考虑到排序算法的效率，我用了结构数组做Quicksort，而用数组的话，数组大小（即文件数量）就是确定的值了。如果要大小可变，那么似乎用链表比较合适，不过用链表做quicksort我搞不定....做insertionsort效率又比较低下....不知有没有高人有更好的办法
: U- j, n) T+ N" j
/ [- h2 S# ~1 o2 _不过实际要通用也很容易，之前解包出来后看一下文件数量" v4 s0 X" Y5 y' W* O
然后把代码开头 #define FILENUM 760 后面定义的数值改成文件数量，重新编译一下就行了。
( y; E X5 t; d8 J# d3 \0 A
4 g G `/ b( C/ H( {解包脚本，打包器，代码都在压缩包里，打包代码我写了不少注释，欢迎各位高手指正。
6 }2 E* L; Q+ ?6 Y q3 P2 c& }0 _! q) b; `3 A, l' R
打包器使用方法，和解包后的文件放在同一文件夹下，命令提示符下输入 pack Filename: m# |' c! L* H8 o* Q1 m% @4 w9 v
filename即要输出的包文件名 |
发表于 2009-12-13 20:04
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
收藏
分享
很美好
很差劲
发表于 2009-12-13 23:25
楼主
