1
1

Grrrr.....add one more piece of source code.

This commit was SVN r1504.
Этот коммит содержится в:
Ralph Castain 2004-06-29 20:01:26 +00:00
родитель 65269316d6
Коммит 1eff215a1c

39
src/runtime/universe_init.c Обычный файл
Просмотреть файл

@ -0,0 +1,39 @@
/*
* $HEADER$
*
*/
#include <stdio.h>
#include <string.h>
#include <libgen.h>
#include <sys/stat.h>
#include "ompi_config.h"
#include "util/proc_info.h"
#include "util/os_path.h"
#include "util/session_dir.h"
#include "runtime/universe_init.h"
char *ompi_universe_init(char *tmpdir, char *user, char *universe)
{
char *uri, *tmp, *oob_info_path;
FILE *fp;
if (NULL == (tmp = ompi_session_dir(true, tmpdir, user, universe, "seed", NULL))) {
/* not found, and could not be created */
return(NULL);
}
ompi_process_info.job_session_dir = strdup(tmp);
ompi_process_info.universe_session_dir = dirname(tmp);
oob_info_path = ompi_os_path(ompi_process_info.job_session_dir, "oob", NULL);
fp = fopen(oob_info_path, "w"); /* must be a new file - fail if one already exists */
if (NULL == fp) {
return(NULL);
}
uri = strdup("dummy_uri_for_seed_oob");
fclose(fp);
return(ompi_process_info.job_session_dir);
}