deb: support recognition and recompression of xz archives

openSUSE · Aug 17, 2015 · 31e0e4c · 31e0e4c
1 parent 6c8ed29
commit 31e0e4c
Show file tree

Hide file tree

Showing 2 changed files with 16 additions and 3 deletions.
diff --git a/debtransform b/debtransform
@@ -281,10 +281,10 @@ if ($tags->{'DEBTRANSFORM-FILES-TAR'}) {
 }
 
 if (!$tarfile || !@debtarfiles) {
-  my @tars = grep {/\.tgz$|\.tar(?:\.gz|\.bz2)?$/} @dir;
-  my @debtars = grep {/^debian\.tar(?:\.gz|\.bz2)?$/} @tars;
+  my @tars = grep {/\.tgz$|\.tar(?:\.gz|\.bz2|\.xz)?$/} @dir;
+  my @debtars = grep {/^debian\.tar(?:\.gz|\.bz2|\.xz)?$/} @tars;
   if (!$tarfile) {
-    @tars = grep {!/^debian\.tar(?:\.gz|\.bz2)?$/} @tars;
+    @tars = grep {!/^debian\.tar(?:\.gz|\.bz2|\.xz)?$/} @tars;
     if (@debtarfiles) {
       my %debtarfiles = map {$_ => 1} @debtarfiles;
       @tars = grep {!$debtarfiles{$_}} @tars;
@@ -315,6 +315,13 @@ if ($tarfile =~ /\.tar\.bz2/) {
     print "converting $dir/$old to $tarfile\n";
     system( ( "debtransformbz2", "$dir/$old", "$tmptar" )) == 0 || die("cannot transform .tar.bz2 to .tar.gz");
 }
+if ($tarfile =~ /\.tar\.xz/) {
+    my $old = $tarfile;
+    $tarfile =~ s/\.tar\.xz/\.tar\.gz/;
+    $tmptar = "$out/$tarfile";
+    print "converting $dir/$old to $tarfile\n";
+    system( ( "debtransformxz", "$dir/$old", "$tmptar" )) == 0 || die("cannot transform .tar.xz to .tar.gz");
+}
 if ($tarfile =~ /\.zip/) {
     my $old = $tarfile;
     $tarfile =~ s/\.zip/\.tar\.gz/;

diff --git a/debtransformxz b/debtransformxz
@@ -0,0 +1,6 @@
+#!/bin/sh
+if test $# -ne 2; then
+	exit 1
+fi
+xz -cd "$1" | gzip -f - >"$2" || exit 1
+exit 0