File strip-nondeterminism-0.029-zipfix.patch of Package strip-nondeterminism
commit 0ec2e898c1f2027a158d581a9fcd6d7f3fcf0b97
Author: Bernhard M. Wiedemann <bwiedemann@suse.de>
Date: Wed May 10 15:21:28 2017 +0200
zip: make sure we have permissions on extracted file
an imageconversion.jar had
-rw-rw-rw- 2.0 unx 3215 b- defN 99-Sep-06 10:58 com/ibm/imageconversion/IndexColorTable.class
?--------- 2.0 unx 7004 b- defN 99-Sep-06 10:58 META-INF/MANIFEST.MF
and thus generated an error like
strip-nondeterminism: ./imageconversion.jar: Unable to open /tmp/3F14xYUtK0/member for reading: Permission denied at /usr/lib/perl5/vendor_perl/5.24.0/File/StripNondeterminism/handlers/jar.pm line 46.
diff --git a/lib/File/StripNondeterminism/handlers/zip.pm b/lib/File/StripNondeterminism/handlers/zip.pm
index 6bbce66..c25ec39 100644
--- a/lib/File/StripNondeterminism/handlers/zip.pm
+++ b/lib/File/StripNondeterminism/handlers/zip.pm
@@ -56,6 +56,7 @@ sub normalize_member {
my $filename = "$tempdir/member";
my $original_size = $member->compressedSize();
$member->extractToFileNamed($filename);
+ chmod(0600, $filename);
$member->{'compressedSize'} = $original_size
; # Work around https://github.com/redhotpenguin/perl-Archive-Zip/issues/11