orted/pmix: fix spawn in singleton mode

invoke orte_pre_condition_transports() in order to set the
ORTE_JOB_TRANSPORT_KEY attribute.

Author: ggouaillardet

orte/orted/pmix/pmix_server_dyn.c

@@ -44,6 +44,7 @@
 #include "orte/mca/rmaps/base/base.h"
 #include "orte/util/name_fns.h"
 #include "orte/util/show_help.h"
+#include "orte/util/pre_condition_transports.h"
 #include "orte/runtime/orte_globals.h"
 #include "orte/mca/rml/rml.h"
 
@@ -159,6 +160,8 @@ int pmix_server_spawn_fn(opal_process_name_t *requestor,
     orte_app_context_t *app;
     opal_pmix_app_t *papp;
     opal_value_t *info;
+    orte_job_t *parent;
+    char *key;
     int rc;
     char cwd[OPAL_PATH_MAX];
 
@@ -313,6 +316,22 @@ int pmix_server_spawn_fn(opal_process_name_t *requestor,
     orte_set_attribute(&jdata->attributes, ORTE_JOB_LAUNCH_PROXY, ORTE_ATTR_GLOBAL,
                        requestor, OPAL_NAME);
 
+    /* get the parent jdata */
+    if (NULL == (parent = orte_get_job_data_object(requestor->jobid))) {
+        OBJ_RELEASE(jdata);
+        return ORTE_ERR_NOT_FOUND;
+    }
+    key = NULL;
+    if (!orte_get_attribute(&parent->attributes, ORTE_JOB_TRANSPORT_KEY, (void**)&key, OPAL_STRING) ||
+        NULL == key) {
+        /* record the transport key attribute in the job object if that
+         * has not been done already */
+        if (ORTE_SUCCESS != (rc = orte_pre_condition_transports(parent))) {
+            OBJ_RELEASE(jdata);
+            return rc;
+        }
+    }
+
     /* setup a spawn tracker so we know who to call back when this is done
      * and thread-shift the entire thing so it can be safely added to
      * our tracking list */