[padb] r328 committed - If showing the message queues via the -q option the spec says to try...

[padb at googlecode.com]

Revision: 328
Author: apittman
Date: Thu Nov 12 06:51:01 2009
Log: If showing the message queues via the -q option the spec says to try
edb (a QsNet program) and fall back to minfo if that doesn't work.
Add a test for edb being installed and if it's not then go straight to
minfo.  This should prevent errors seen on Solaris where the shell
complains edb isn't found.

http://code.google.com/p/padb/source/detail?r=328

Modified:
  /trunk/src/padb

=======================================
--- /trunk/src/padb	Thu Nov 12 03:54:49 2009
+++ /trunk/src/padb	Thu Nov 12 06:51:01 2009
@@ -7550,6 +7550,14 @@

  sub show_queue {
      my ( $carg, $vp, $pid ) = @_;
+
+    # If edb isn't installed (this isn't a Quadrics system) don't even try
+    # and run edb as it'll fail, switch straight to minfo for the MPI
+    # message queues instead.
+    if ( !find_exe( $inner_conf{edb} ) ) {
+        show_mpi_queue( $carg, $vp, $pid );
+        return;
+    }

      # Nobble the LD_LIBRARY_PATH to give etrace the best chance of working.
      my %remote_env = get_remote_env($pid);