From b745078535ddee211e2fb76389d6c4b1b4eef14b Mon Sep 17 00:00:00 2001 From: Ralph Castain Date: Thu, 19 Dec 2013 20:59:50 +0000 Subject: [PATCH] Support user-provided envars for comm_spawn using info key "env" Thanks to Tom Fogal for the request cmr=v1.7.4:reviewer=jsquyres This commit was SVN r29990. --- ompi/mca/dpm/orte/dpm_orte.c | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/ompi/mca/dpm/orte/dpm_orte.c b/ompi/mca/dpm/orte/dpm_orte.c index 65099a520e..ef635a2985 100644 --- a/ompi/mca/dpm/orte/dpm_orte.c +++ b/ompi/mca/dpm/orte/dpm_orte.c @@ -685,7 +685,7 @@ static int spawn(int count, const char *array_of_commands[], orte_app_context_t *app; bool local_spawn, non_mpi; bool local_bynode = false; - + /* parse the info object */ /* check potentially for: - "host": desired host where to spawn the processes @@ -815,6 +815,11 @@ static int spawn(int count, const char *array_of_commands[], app->add_host = opal_argv_split(host, ','); } + ompi_info_get (array_of_info[i], "env", sizeof(host)-1, host, &flag); + if ( flag ) { + opal_argv_append_nosize(&app->env, host); + } + /* 'path', 'arch', 'file', 'soft' -- to be implemented */ /* check for 'ompi_prefix' (OMPI-specific -- to effect the same