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
 
openSUSE Build Service is sponsored by