Re: [perl #40583] sprintf "%#04X" also uppercases the 0x-prefix
[p5sagit/p5-mst-13.2.git] / ext / Compress / IO / Zlib / lib / IO / Compress / Zip / Constants.pm
CommitLineData
25f0751f 1package IO::Compress::Zip::Constants;
2
3use strict ;
4use warnings;
5
6require Exporter;
7
c70c1701 8our ($VERSION, @ISA, @EXPORT, %ZIP_CM_MIN_VERSIONS);
25f0751f 9
e7d45986 10$VERSION = '2.000_13';
25f0751f 11
12@ISA = qw(Exporter);
13
14@EXPORT= qw(
15
2b4e0969 16 ZIP_CM_STORE
c70c1701 17 ZIP_CM_DEFLATE
2b4e0969 18 ZIP_CM_BZIP2
c70c1701 19
20 ZIP_LOCAL_HDR_SIG
21 ZIP_DATA_HDR_SIG
22 ZIP_CENTRAL_HDR_SIG
23 ZIP_END_CENTRAL_HDR_SIG
e7d45986 24 ZIP64_END_CENTRAL_REC_HDR_SIG
25 ZIP64_END_CENTRAL_LOC_HDR_SIG
26 ZIP64_ARCHIVE_EXTRA_SIG
27 ZIP64_DIGITAL_SIGNATURE_SIG
25f0751f 28
c70c1701 29 ZIP_GP_FLAG_STREAMING_MASK
25f0751f 30
e7d45986 31 ZIP_EXTRA_ID_ZIP64
c70c1701 32 ZIP_EXTRA_ID_EXT_TIMESTAMP
33 ZIP_EXTRA_ID_INFO_ZIP_UNIX
25f0751f 34
c70c1701 35 ZIP_IFA_TEXT_MASK
25f0751f 36
c70c1701 37 %ZIP_CM_MIN_VERSIONS
e7d45986 38 ZIP64_MIN_VERSION
25f0751f 39
40 );
41
c70c1701 42# Compression types supported
43use constant ZIP_CM_STORE => 0 ;
44use constant ZIP_CM_DEFLATE => 8 ;
45use constant ZIP_CM_BZIP2 => 12 ;
25f0751f 46
c70c1701 47# General Purpose Flag
48use constant ZIP_GP_FLAG_ENCRYPTED_MASK => 1 ;
49use constant ZIP_GP_FLAG_STREAMING_MASK => 8 ;
25f0751f 50
c70c1701 51# Internal File Attributes
52use constant ZIP_IFA_TEXT_MASK => 1;
25f0751f 53
c70c1701 54# Signatures for each of the headers
55use constant ZIP_LOCAL_HDR_SIG => 0x04034b50;
56use constant ZIP_DATA_HDR_SIG => 0x08074b50;
57use constant ZIP_CENTRAL_HDR_SIG => 0x02014b50;
58use constant ZIP_END_CENTRAL_HDR_SIG => 0x06054b50;
e7d45986 59use constant ZIP64_END_CENTRAL_REC_HDR_SIG => 0x06064b50;
60use constant ZIP64_END_CENTRAL_LOC_HDR_SIG => 0x07064b50;
61use constant ZIP64_ARCHIVE_EXTRA_SIG => 0x08064b50;
62use constant ZIP64_DIGITAL_SIGNATURE_SIG => 0x05054b50;
25f0751f 63
c70c1701 64# Extra Field ID's
e7d45986 65use constant ZIP_EXTRA_ID_ZIP64 => pack "v", 1;
c70c1701 66use constant ZIP_EXTRA_ID_EXT_TIMESTAMP => "UT";
67use constant ZIP_EXTRA_ID_INFO_ZIP_UNIX => "Ux";
25f0751f 68
e7d45986 69use constant ZIP64_MIN_VERSION => 45;
70
c70c1701 71%ZIP_CM_MIN_VERSIONS = (
72 ZIP_CM_STORE() => 20,
73 ZIP_CM_DEFLATE() => 20,
74 ZIP_CM_BZIP2() => 46,
75 );
25f0751f 76
25f0751f 77
c70c1701 781;
25f0751f 79
c70c1701 80__END__
25f0751f 81