Module Rfc1951.Lz77

val _max_match : int
val _min_match : int
val _min_lookahead : int
val (.!()) : bigstring -> int -> int32
val (.![]) : bigstring -> int -> int
val (.!{}) : bigstring -> int -> int
type deflate_configuration = {
max_chain : int;
max_lazy : int;
good_length : int;
nice_length : int;
}
type configuration =
| Copy
| Deflate of deflate_configuration
val _0 : configuration
val _1 : configuration
val _2 : configuration
val _3 : configuration
val _4 : configuration
val _5 : configuration
val _6 : configuration
val _7 : configuration
val _8 : configuration
val _9 : configuration
val _mem_level : int
val _hash_bits : int
val _hash_size : int
val _hash_mask : int
val _hash_shift : int
val _too_far : int
val update_hash : int -> int -> int
type src = [
| `Channel of Stdlib.in_channel
| `String of string
| `Manual
]
type decode = [
| `Await
| `Flush
| `End
]
type state = {
src : src;
cfg : configuration;
level : int;
mutable i : bigstring;
mutable i_pos : int;
mutable i_len : int;
l : literals;
d : distances;
w : bigstring;
wbits : int;
mutable lookahead : int;
mutable strstart : int;
prev : int array;
head : int array;
mutable hash : int;
mutable match_start : int;
mutable match_length : int;
mutable match_available : bool;
mutable insert : int;
mutable prev_length : int;
mutable prev_match : int;
q : Queue.t;
mutable crc : optint;
mutable k : configuration -> state -> decode;
}
val max_dist : state -> int
exception Break
val longest_match : deflate_configuration -> state -> int -> int
val eoi : state -> unit
val src : state -> ( char, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout ) Stdlib.Bigarray.Array1.t -> int -> int -> unit
val i_rem : state -> int
val src_rem : state -> int
val io_buffer_size : int
val refill : ( configuration -> state -> decode ) -> state -> decode
val memcpy : bigstring -> src_off:int -> bigstring -> dst_off:int -> len:int -> unit
val update_crc : state -> int -> unit
val insert_string : state -> int -> int
val succ_length : int array -> int -> unit
val succ_distance : int array -> int -> unit
val emit_match : state -> off:int -> len:int -> bool
val succ_literal : int array -> char -> unit
val emit_literal : state -> char -> bool
val trailing : state -> [> `End ]
val slide_hash : state -> unit
val fill_window : configuration -> state -> decode
val enough : configuration -> state -> decode
val deflate_fast : deflate_configuration -> state -> decode
val deflate_slow : deflate_configuration -> state -> decode
val copy : state -> decode
val _literals : int
val _length_codes : int
val _l_codes : int
val _d_codes : int
val checksum : state -> optint
val distances : state -> distances
val literals : state -> literals
val ctz : int -> int
val state : ?level:int -> q:Queue.t -> w: ( char, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout ) Stdlib.Bigarray.Array1.t -> src -> state
val compress : state -> decode
type window = bigstring
val make_window : bits:int -> ( char, Stdlib.Bigarray.int8_unsigned_elt, Stdlib.Bigarray.c_layout ) Stdlib.Bigarray.Array1.t
val no_compression : state -> bool