From 3e8a5460e7f12ed9fbe464ee25fdd891bdf406a1 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mageia.org>
Date: Fri, 22 Jun 2012 16:03:05 +0000
Subject: (parse_synthesis__XS) enable to read xz & bzip2 compressed synthesis

---
 t/synthesis.t | 18 ++++++++++++++----
 1 file changed, 14 insertions(+), 4 deletions(-)

(limited to 't')

diff --git a/t/synthesis.t b/t/synthesis.t
index 6729b3b..8961e2a 100644
--- a/t/synthesis.t
+++ b/t/synthesis.t
@@ -2,29 +2,39 @@
 
 use strict ;
 use warnings ;
-use Test::More tests => 94;
+use Test::More tests => 95;
 use URPM;
 
 chdir 't' if -d 't';
 my $file1 = 'synthesis.sample.cz';
+my $file2 = 'synthesis.sample-xz.cz';
 
-open my $f, "| gzip -9 >$file1";
-print $f <<'EOF';
+my $s = <<'EOF';
 @provides@glibc-devel == 6:2.2.4-25mdk
 @requires@/sbin/install-info@glibc == 2.2.4@kernel-headers@kernel-headers >= 2.2.1@/bin/sh@/bin/sh@/bin/sh@rpmlib(PayloadFilesHavePrefix) <= 4.0-1@rpmlib(CompressedFileNames) <= 3.0.4-1
 @conflicts@texinfo < 3.11@gcc < 2.96-0.50mdk
 @obsoletes@libc-debug@libc-headers@libc-devel@linuxthreads-devel@glibc-debug
 @info@glibc-devel-2.2.4-25mdk.i586@6@45692097@Development/C
 EOF
+open my $f, "| gzip -9 >$file1";
+print $f $s;
+close $f;
+open my $f, "| xz -9 >$file2";
+print $f $s;
+$s =~ s/-devel//g;
+print $f $s;
 close $f;
 
-END { unlink $file1 }
+END { unlink $file1, $file2 }
 
 my $a = new URPM;
 ok($a);
 
 my ($first, $end);
 
+($first, $end) = URPM->new->parse_synthesis($file2);
+ok($first == 0 && $end == 1, 'parse XZ synthesis');
+
 ($first, $end) = URPM->new->parse_synthesis('empty_synthesis.cz');
 is("$first $end", "0 -1", 'parse empty synthesis');
 
-- 
cgit v1.2.1