18 lines
501 B
OCaml
18 lines
501 B
OCaml
(** This modules handle zip archive format
|
|
|
|
ZIP file format is actually really easy to parse
|
|
the file is a list of files compressed
|
|
each entry is appended with a header
|
|
|
|
ZIP file supports multiple compression algorithm,
|
|
the most frequently used is LZMA
|
|
files can be encrypted using a weak algorithm
|
|
which has been deprecated or AES
|
|
*)
|
|
|
|
type t = { file : string; typ : string }
|
|
|
|
let signature = Bytes.of_string "PK\x03\x04"
|
|
|
|
let from file = { file = file; typ = "zip" }
|