r474: * Added -X flag to dh_makeshlibs, for packages with wacky plugins that

[debhelper.git] / dh_makeshlibs

diff --git a/dh_makeshlibs b/dh_makeshlibs
index fe31f5ff7319743df5b8b3dff84aa8c81654e0fd..bb1d8acd8a715e3a0a8d605c335fa45b80a174f7 100755 (executable)
--- a/dh_makeshlibs
+++ b/dh_makeshlibs
@@ -11,7 +11,7 @@ use Debian::Debhelper::Dh_Lib;
 
 =head1 SYNOPSIS
 
-  dh_makeshlibs [debhelper options] [-mmajor] [-V[dependancies]] [-n]
+  dh_makeshlibs [debhelper options] [-mmajor] [-V[dependancies]] [-n] [-Xitem]
 
 =head1 DESCRIPTION
 
@@ -49,6 +49,11 @@ information needed (be sure to include the package name).
 
 Do not modify postinst/postrm scripts.
 
+=item B<-X>I<item>, B<--exclude=>I<item>
+
+Exclude files that contain "item" anywhere in their filename from
+being treated as shared libraries.
+
 =back
 
 =head1 EXAMPLES
@@ -82,10 +87,31 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
 
        doit("rm", "-f", "$tmp/DEBIAN/shlibs");
 
-       open (FIND, "find $tmp -xtype f -name '*.so*' |");
+       # So, we look for files or links to existing files with names that
+       # match "*.so*". Matching *.so.* is not good enough because of
+       # broken crap like db3. And we only look at real files not
+       # symlinks, so we don't accidentually add shlibs data to -dev
+       # packages. This may have a few false positives, which is ok,
+       # because only if we can get a library name and a major number from
+       # objdump is anything actually added.
+       my $exclude='';
+       if (defined($dh{EXCLUDE_FIND}) && $dh{EXCLUDE_FIND} ne '') {
+               $exclude="! \\( $dh{EXCLUDE_FIND} \\) ";
+       }
+       open (FIND, "find $tmp -type f -name '*.so*' $exclude |");
        while (<FIND>) {
-               my ($library, $major) = 
-                       `objdump -p $_` =~ m/\s+SONAME\s+(.+)\.so\.(.+)/;
+               my ($library, $major);
+               my $objdump=`objdump -p $_`;
+               if ($objdump=~m/\s+SONAME\s+(.+)\.so\.(.+)/) {
+                       # proper soname format
+                       $library=$1;
+                       $major=$2;
+               }
+               elsif ($objdump=~m/\s+SONAME\s+(.+)-(.+)\.so/) {
+                       # idiotic crap soname format
+                       $library=$1;
+                       $major=$2;
+               }
 
                if (defined($dh{M_PARAMS}) && $dh{M_PARAMS} ne '') {
                        $major=$dh{M_PARAMS};