1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
|
import libc::{c_void, size_t, c_int};
extern mod rustrt {
fn tdefl_compress_mem_to_heap(psrc_buf: *const c_void,
src_buf_len: size_t,
pout_len: *size_t,
flags: c_int) -> *c_void;
fn tinfl_decompress_mem_to_heap(psrc_buf: *const c_void,
src_buf_len: size_t,
pout_len: *size_t,
flags: c_int) -> *c_void;
}
const lz_none : c_int = 0x0; // Huffman-coding only.
const lz_fast : c_int = 0x1; // LZ with only one probe
const lz_norm : c_int = 0x80; // LZ with 128 probes, "normal"
const lz_best : c_int = 0xfff; // LZ with 4095 probes, "best"
fn deflate_buf(buf: &[const u8]) -> ~[u8] {
do vec::as_const_buf(buf) |b, len| {
unsafe {
let mut outsz : size_t = 0;
let res =
rustrt::tdefl_compress_mem_to_heap(b as *c_void,
len as size_t,
ptr::addr_of(outsz),
lz_norm);
assert res as int != 0;
let out = vec::unsafe::from_buf(res as *u8,
outsz as uint);
libc::free(res);
out
}
}
}
fn inflate_buf(buf: &[const u8]) -> ~[u8] {
do vec::as_const_buf(buf) |b, len| {
unsafe {
let mut outsz : size_t = 0;
let res =
rustrt::tinfl_decompress_mem_to_heap(b as *c_void,
len as size_t,
ptr::addr_of(outsz),
0);
assert res as int != 0;
let out = vec::unsafe::from_buf(res as *u8,
outsz as uint);
libc::free(res);
out
}
}
}
#[test]
fn test_flate_round_trip() {
let r = rand::Rng();
let mut words = ~[];
for 20.times {
vec::push(words, r.gen_bytes(r.gen_uint_range(1, 10)));
}
for 20.times {
let mut in = ~[];
for 2000.times {
vec::push_all(in, r.choose(words));
}
debug!("de/inflate of %u bytes of random word-sequences",
in.len());
let cmp = flate::deflate_buf(in);
let out = flate::inflate_buf(cmp);
debug!("%u bytes deflated to %u (%.1f%% size)",
in.len(), cmp.len(),
100.0 * ((cmp.len() as float) / (in.len() as float)));
assert(in == out);
}
}
|