1
1

Ensure we get a non-zero exit status when we can't find the specified fork agent. Output a better error message, and ensure we don't multiply report the problem.

This commit was SVN r26191.
Этот коммит содержится в:
Ralph Castain 2012-03-24 00:49:38 +00:00
родитель 6dc44dc4b8
Коммит ca3ff58c76
3 изменённых файлов: 140 добавлений и 125 удалений

Просмотреть файл

@ -73,3 +73,11 @@ This is an error; your job will now abort.
Local host: %s
Application name: %s
Action requested: %s %s
#
[orte-odls-base:fork-agent-not-found]
The specified fork agent was not found:
Node: %s
Fork agent: %s
The application cannot be launched.

Просмотреть файл

@ -1529,6 +1529,7 @@ int orte_odls_base_default_launch_local(orte_jobid_t job,
"orte-odls-base:xterm-rank-out-of-bounds",
true, nm->name.vpid, jobdat->num_procs);
rc = ORTE_ERR_VALUE_OUT_OF_BOUNDS;
child->exit_code = ORTE_ERR_SILENT;
goto CLEANUP;
}
@ -1551,8 +1552,11 @@ int orte_odls_base_default_launch_local(orte_jobid_t job,
free(app->app);
app->app = opal_path_findv(orte_fork_agent[0], X_OK, orte_launch_environ, NULL);
if (NULL == app->app) {
opal_output(0, "%s CANNOT FIND FORK AGENT %s", ORTE_NAME_PRINT(ORTE_PROC_MY_NAME), orte_fork_agent[0]);
rc = ORTE_ERR_NOT_FOUND;
orte_show_help("help-orte-odls-base.txt",
"orte-odls-base:fork-agent-not-found",
true, orte_process_info.nodename, orte_fork_agent[0]);
rc = ORTE_ERR_SILENT;
child->exit_code = ORTE_ERR_SILENT;
goto CLEANUP;
}
}

Просмотреть файл

@ -231,6 +231,9 @@ static void dump_aborted_procs(void)
return;
}
switch (proc->exit_code) {
case ORTE_ERR_SILENT:
/* say nothing - it was already reported */
break;
case ORTE_ERR_SYS_LIMITS_PIPES:
orte_show_help("help-orterun.txt", "orterun:sys-limit-pipe", true,
orte_basename, proc->node->name,