Lines Matching full:raw
38 use_ok('Compress::Raw::Zlib', 2) ;
44 my $Zlib_ver = Compress::Raw::Zlib::zlib_version ;
59 eval { new Compress::Raw::Zlib::Deflate(-Level) };
60 like $@, mkErr("^Compress::Raw::Zlib::Deflate::new: Expected even number of parameters, got 1") ;
62 eval { new Compress::Raw::Zlib::Inflate(-Level) };
63 like $@, mkErr("^Compress::Raw::Zlib::Inflate::new: Expected even number of parameters, got 1");
65 eval { new Compress::Raw::Zlib::Deflate(-Joe => 1) };
66 like $@, mkErr('^Compress::Raw::Zlib::Deflate::new: unknown key value\(s\) Joe');
68 eval { new Compress::Raw::Zlib::Inflate(-Joe => 1) };
69 like $@, mkErr('^Compress::Raw::Zlib::Inflate::new: unknown key value\(s\) Joe');
71 eval { new Compress::Raw::Zlib::Deflate(-Bufsize => 0) };
72 like $@, mkErr("^Compress::Raw::Zlib::Deflate::new: Bufsize must be >= 1, you specified 0");
74 eval { new Compress::Raw::Zlib::Inflate(-Bufsize => 0) };
75 like $@, mkErr("^Compress::Raw::Zlib::Inflate::new: Bufsize must be >= 1, you specified 0");
77 eval { new Compress::Raw::Zlib::Deflate(-Bufsize => -1) };
78 like $@, mkErr("^Compress::Raw::Zlib::Deflate::new: Parameter 'Bufsize' must be an unsigned int, got '-1'");
80 eval { new Compress::Raw::Zlib::Inflate(-Bufsize => -1) };
81 like $@, mkErr("^Compress::Raw::Zlib::Inflate::new: Parameter 'Bufsize' must be an unsigned int, got '-1'");
83 eval { new Compress::Raw::Zlib::Deflate(-Bufsize => "xxx") };
84 like $@, mkErr("^Compress::Raw::Zlib::Deflate::new: Parameter 'Bufsize' must be an unsigned int, got 'xxx'");
86 eval { new Compress::Raw::Zlib::Inflate(-Bufsize => "xxx") };
87 like $@, mkErr("^Compress::Raw::Zlib::Inflate::new: Parameter 'Bufsize' must be an unsigned int, got 'xxx'");
89 eval { new Compress::Raw::Zlib::Inflate(-Bufsize => 1, 2) };
90 like $@, mkErr("^Compress::Raw::Zlib::Inflate::new: Expected even number of parameters, got 3");
92 eval { new Compress::Raw::Zlib::Deflate(-Bufsize => 1, 2) };
93 like $@, mkErr("^Compress::Raw::Zlib::Deflate::new: Expected even number of parameters, got 3");
106 ok( ($x, $err) = new Compress::Raw::Zlib::Deflate ( -Bufsize => 1 ), "Create deflate object" );
107 ok $x, "Compress::Raw::Zlib::Deflate ok" ;
136 ok(($k, $err) = new Compress::Raw::Zlib::Inflate( {-Bufsize => 1}) );
137 ok $k, "Compress::Raw::Zlib::Inflate ok" ;
169 ok my ($x, $err) = new Compress::Raw::Zlib::Deflate ( -Bufsize => 1, -AppendOutput => 1 ) ;
183 ok(($k, $err) = new Compress::Raw::Zlib::Inflate( {-Bufsize => 1, -AppendOutput =>1}) );
212 ok my ($x, $err) = new Compress::Raw::Zlib::Deflate ( {-Bufsize => 1, -AppendOutput =>1} ) ;
232 ok(($k, $err) = new Compress::Raw::Zlib::Inflate( {-Bufsize => 1, -AppendOutput =>1}));
260 ok my ($x, $err) = new Compress::Raw::Zlib::Deflate() ;
282 ok(($k, $err) = new Compress::Raw::Zlib::Inflate() );
293 ok (($k, $err) = new Compress::Raw::Zlib::Inflate(-AppendOutput => 1)) ;
317 ok my $x = new Compress::Raw::Zlib::Deflate({-Level => Z_BEST_COMPRESSION,
327 ok my $k = new Compress::Raw::Zlib::Inflate(-Dictionary => $dictionary) ;
341 ok my $x = new Compress::Raw::Zlib::Deflate(-Level => Z_BEST_COMPRESSION ) ;
348 ok my $k = new Compress::Raw::Zlib::Inflate( -ConsumeInput => $consume) ;
386 new Compress::Raw::Zlib::Deflate ( -Bufsize => 1,
410 ok(($k, $err) = new Compress::Raw::Zlib::Inflate(
445 ok(($x, $err) = new Compress::Raw::Zlib::Deflate(AppendOutput => 1)) ;
464 ok(($k, $err) = new Compress::Raw::Zlib::Inflate()) ;
492 if (ZLIB_VERNUM >= ZLIB_1_2_12_0 || Compress::Raw::Zlib::is_zlibng)
510 ok(($k, $err) = new Compress::Raw::Zlib::Inflate(ConsumeInput => 0)) ;
526 if (ZLIB_VERNUM >= ZLIB_1_2_12_0 || Compress::Raw::Zlib::is_zlibng)
545 ok(($x, $err) = new Compress::Raw::Zlib::Deflate(
561 like $@, mkErr('^Compress::Raw::Zlib::deflateParams needs Level and\/or Strategy');
564 like $@, mkErr('^Compress::Raw::Zlib::Inflate::deflateParams: Bufsize must be >= 1, you specified 0');
567 like $@, mkErr('^Compress::Raw::Zlib::deflateStream::deflateParams: unknown key value\(s\) Joe');
615 ok(($k, $err) = new Compress::Raw::Zlib::Inflate()) ;
630 ok my $k = new Compress::Raw::Zlib::Inflate(-ConsumeInput => 1) ;
634 like $@, mkErr("Compress::Raw::Zlib::Inflate::inflate input parameter cannot be read-only when ConsumeInput is specified");
646 # # https://github.com/pmqs/Compress-Raw-Zlib/issues/27
653 ok my $x = new Compress::Raw::Zlib::Deflate(-AppendOutput => 1) ;
666 ok my $k = new Compress::Raw::Zlib::Inflate(-AppendOutput => 1) ;
689 ok( ($x, $err) = new Compress::Raw::Zlib::Deflate ( -Bufsize => 1 ) );
711 ok(($k, $err) = new Compress::Raw::Zlib::Inflate(-AppendOutput => 1) );
735 # # https://github.com/pmqs/Compress-Raw-Zlib/issues/27
744 ok my $x = new Compress::Raw::Zlib::Deflate ( -AppendOutput => 1 );
754 ok my $k = new Compress::Raw::Zlib::Inflate ( -AppendOutput => 1,
764 ok $k = new Compress::Raw::Zlib::Inflate ( -AppendOutput => 1,
779 # https://github.com/pmqs/Compress-Raw-Zlib/issues/3
786 ok my $x = new Compress::Raw::Zlib::Deflate ( -AppendOutput => 1 );
792 ok my $k = new Compress::Raw::Zlib::Inflate ( -AppendOutput => 1,
815 # https://github.com/pmqs/Compress-Raw-Zlib/issues/3
834 ok my $x = new Compress::Raw::Zlib::Deflate ( -AppendOutput => 1 );
840 ok my $k = new Compress::Raw::Zlib::Inflate ( -AppendOutput => 1,
850 # https://github.com/pmqs/Compress-Raw-Zlib/issues/3
863 ok my $x = new Compress::Raw::Zlib::Deflate ( -AppendOutput => 1 );
869 ok my $k = new Compress::Raw::Zlib::Inflate ( -AppendOutput => 1,
883 Compress::Raw::Zlib::InflateScan->new->resetLastBlockByte(undef);
900 ok( ($x, $err) = new Compress::Raw::Zlib::Deflate (
904 ok $x, "Compress::Raw::Zlib::Deflate ok" ;
913 ($k, $err) = new Compress::Raw::Zlib::Inflate(
917 ok $k, "Compress::Raw::Zlib::Inflate WANT_GZIP ok" ;
925 ($k, $err) = new Compress::Raw::Zlib::Inflate(
928 ok $k, "Compress::Raw::Zlib::Inflate WANT_GZIP_OR_ZLIB ok" ;
951 ok( ($x, $err) = new Compress::Raw::Zlib::Deflate (
955 ok $x, "Compress::Raw::Zlib::Deflate ok" ;
964 ($k, $err) = new Compress::Raw::Zlib::Inflate(
968 ok $k, "Compress::Raw::Zlib::Inflate WANT_GZIP ok" ;
975 ($k, $err) = new Compress::Raw::Zlib::Inflate(
978 ok $k, "Compress::Raw::Zlib::Inflate WANT_GZIP_OR_ZLIB ok" ;
1000 ok( ($x, $err) = new Compress::Raw::Zlib::Deflate (
1003 ok $x, "Compress::Raw::Zlib::Deflate ok" ;
1012 ($k, $err) = new Compress::Raw::Zlib::Inflate(
1016 ok $k, "Compress::Raw::Zlib::Inflate WANT_GZIP ok" ;
1023 ($k, $err) = new Compress::Raw::Zlib::Inflate(
1026 ok $k, "Compress::Raw::Zlib::Inflate WANT_GZIP_OR_ZLIB ok" ;
1037 my $flags = Compress::Raw::Zlib::zlibCompileFlags;
1039 if (!Compress::Raw::Zlib::is_zlibng && ZLIB_VERNUM() < 0x1210)
1055 ok( ($x, $err) = new Compress::Raw::Zlib::Deflate ( ), "Create deflate object" );
1056 isa_ok $x, "Compress::Raw::Zlib::deflateStream" ;
1073 ok( ($x, $err) = new Compress::Raw::Zlib::Deflate ( ), "Create deflate object" );
1074 isa_ok $x, "Compress::Raw::Zlib::deflateStream" ;
1085 is eval('Compress::Raw::Zlib::crc32("A" x 0x100, 0, 0x100); 0x1234'), 0x1234;
1088 is eval('Compress::Raw::Zlib::crc32("A" x 0x100, 0, 0x101); 0x1234'), undef;
1089 like $@, mkErr("^Offset out of range in Compress::Raw::Zlib::crc32") ;
1103 my $crc1 = Compress::Raw::Zlib::crc32($first);
1104 my $crc2 = Compress::Raw::Zlib::crc32($second);
1106 my $composite_crc = Compress::Raw::Zlib::crc32($first . $second);
1108 my $combined_crc = Compress::Raw::Zlib::crc32_combine($crc1, $crc2, length $second);
1123 my $adler1 = Compress::Raw::Zlib::adler32($first);
1124 my $adler2 = Compress::Raw::Zlib::adler32($second);
1126 my $composite_adler = Compress::Raw::Zlib::adler32($first . $second);
1128 my $combined_adler = Compress::Raw::Zlib::adler32_combine($adler1, $adler2, length $second);
1140 ok( ($x, $err) = new Compress::Raw::Zlib::Deflate ( ), "Create deflate object" );
1141 isa_ok $x, "Compress::Raw::Zlib::deflateStream" ;
1159 ok( ($x, $err) = new Compress::Raw::Zlib::Deflate ( -Bufsize => 1,
1183 ok(($k, $err) = new Compress::Raw::Zlib::Inflate(-AppendOutput => 1) );
1209 ok( ($x, $err) = new Compress::Raw::Zlib::Deflate ( -Bufsize => 1,
1230 ok(($k, $err) = new Compress::Raw::Zlib::Inflate(-AppendOutput => 1) );