[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Bug#526221: debhelper: Please fix permissions of OCaml native-code shared objects

Package: debhelper
Version: 7.2.7
Severity: normal
Tags: patch


OCaml native-code shared objects are generated the same way *.so files
are generated and suffer from the same issue of being executables.
However, running them results in a segfault.

It would be nice if dh_fixperms handled this the same way it does for
*.so files. Attached is a patch that does this.



-- System Information:
Debian Release: squeeze/sid
  APT prefers testing
  APT policy: (990, 'testing'), (500, 'unstable'), (1, 'experimental')
Architecture: amd64 (x86_64)

Kernel: Linux 2.6.29-1-amd64 (SMP w/4 CPU cores)
Locale: LANG=fr_FR.UTF-8, LC_CTYPE=fr_FR.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/bash

Versions of packages debhelper depends on:
ii  binutils                      2.19.1-1   The GNU assembler, linker and bina
ii  dpkg-dev                      1.14.25    Debian package development tools
ii  file                          5.00-1     Determines file type using "magic"
ii  html2text                     1.3.2a-13  advanced HTML to text converter
ii  man-db                        2.5.5-1    on-line manual pager
ii  perl                          5.10.0-19  Larry Wall's Practical Extraction 
ii  po-debconf                    1.0.16     tool for managing templates file t

debhelper recommends no packages.

Versions of packages debhelper suggests:
ii  dh-make                       0.48       tool that converts source archives

-- no debconf information
commit 82f67f7ff7f9cd112ef00abc92c38c46df3e84cd
Author: Stephane Glondu <steph@glondu.net>
Date:   Wed Apr 29 23:37:27 2009 +0200

    Fix permissions of *.cmxs files

diff --git a/dh_fixperms b/dh_fixperms
index 1d4a33f..6fa5065 100755
--- a/dh_fixperms
+++ b/dh_fixperms
@@ -82,6 +82,11 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
 	# ..and desktop files ..
 	complex_doit("find $tmp/usr/share/applications -type f $find_options -print0",
 		"2>/dev/null | xargs -0r chmod 644");
+	# ..and OCaml native-code shared objects ..
+	complex_doit("find $tmp -perm -5 -type f",
+		"\\( -name '*.cmxs' \\) $find_options -print0",
+		"2>/dev/null | xargs -0r chmod 644");
 	# .. and perl modules.
 	complex_doit("find $tmp/usr/lib/perl5 $tmp/usr/share/perl5 -type f",

Reply to: