Add a friendly help message if no pls components are found to be

available.

This commit was SVN r8594.

orte/mca/pls/base/Makefile.am

@@ -16,6 +16,8 @@
 # $HEADER$
 #
 
+dist_pkgdata_DATA += base/help-pls-base.txt
+
 headers += \
         base/base.h
 

orte/mca/pls/base/help-pls-base.txt

@@ -0,0 +1,24 @@
+# -*- text -*-
+#
+# Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana
+#                         University Research and Technology
+#                         Corporation.  All rights reserved.
+# Copyright (c) 2004-2005 The University of Tennessee and The University
+#                         of Tennessee Research Foundation.  All rights
+#                         reserved.
+# Copyright (c) 2004-2005 High Performance Computing Center Stuttgart, 
+#                         University of Stuttgart.  All rights reserved.
+# Copyright (c) 2004-2005 The Regents of the University of California.
+#                         All rights reserved.
+# $COPYRIGHT$
+# 
+# Additional copyrights may follow
+# 
+# $HEADER$
+#
+[no-available-pls]
+No available launching agents were found.
+
+This is an unusual error; it means that Open RTE was unable to find
+any mechanism to launch proceses, and therefore is unable start the
+process(es) in your application.

orte/mca/pls/base/pls_base_select.c

@@ -18,12 +18,13 @@
 
 #include "orte_config.h"
 
-#include "include/orte_constants.h"
+#include "orte/include/orte_constants.h"
 #include "opal/class/opal_list.h"
 #include "opal/util/output.h"
-#include "mca/mca.h"
-#include "mca/base/base.h"
-#include "mca/pls/base/base.h"
+#include "opal/util/show_help.h"
+#include "opal/mca/mca.h"
+#include "opal/mca/base/base.h"
+#include "orte/mca/pls/base/base.h"
 
 
 /*
@@ -52,6 +53,8 @@ OBJ_CLASS_INSTANCE(orte_pls_base_cmp_t, opal_list_item_t,
  */
 orte_pls_base_module_t* orte_pls_base_select(char *preferred)
 {
+    orte_pls_base_module_t *ret;
+
     /* Construct the empty list */
 
     OBJ_CONSTRUCT(&orte_pls_base.pls_available, opal_list_t);
@@ -60,10 +63,14 @@ orte_pls_base_module_t* orte_pls_base_select(char *preferred)
     /* Now - did we want a specific one? */
 
     if (NULL != preferred) {
-        return select_preferred(preferred);
+        ret = select_preferred(preferred);
     } else {
-        return select_any();
+        ret = select_any();
     }
+    if (NULL == ret) {
+        opal_show_help("help-pls-base.txt", "no-available-pls", true);
+    }
+    return ret;
 }