SF.net SVN: gar:[23132] csw/mgar/gar/v2/bin/check_db_symbols

[chninkel at users.sourceforge.net]

Revision: 23132
          http://sourceforge.net/p/gar/code/23132
Author:   chninkel
Date:     2014-03-04 22:21:10 +0000 (Tue, 04 Mar 2014)
Log Message:
-----------
gar/v2: (check_db_symbols) handle the case where only the library path is given by ldd

Modified Paths:
--------------
    csw/mgar/gar/v2/bin/check_db_symbols

Modified: csw/mgar/gar/v2/bin/check_db_symbols
===================================================================
--- csw/mgar/gar/v2/bin/check_db_symbols	2014-03-04 15:53:47 UTC (rev 23131)
+++ csw/mgar/gar/v2/bin/check_db_symbols	2014-03-04 22:21:10 UTC (rev 23132)
@@ -56,12 +56,16 @@
     while (my $line = <$ldd>) {
         my ( $soname, $library_path ) = (
             $line =~ m{\s*(\S+)      # soname
-                             \s+=>\s+
-                             (\S+)      # library path
+                             (?:\s+=>\s+
+                             (\S+))?      # library path
                          }x
         );
 	# (file not found) case
-	if ($library_path eq '(file') {
+	if (not defined ($library_path)) {
+		$library_path = $soname;
+		$soname = (split(/\//, $soname))[-1]
+
+	} elsif ($library_path eq '(file') {
 		$library_path = undef;
 	}
         $library_location{$soname} = $library_path;

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.