1
1
openmpi/test/util/ompi_session_dir.c
2004-08-29 02:46:31 +00:00

284 строки
6.8 KiB
C

/*
* $HEADER$
*/
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <unistd.h>
#include <libgen.h>
#include <sys/param.h>
#include <sys/stat.h>
#include "ompi_config.h"
#include "include/constants.h"
#include "util/sys_info.h"
#include "util/os_path.h"
#include "util/session_dir.h"
#include "util/proc_info.h"
#include "support.h"
static bool test1(void); /* given prefix, both one that works and one that fails */
static bool test2(void); /* no prefix given, OMPI_PREFIX_ENV set, one good and one bad */
static bool test3(void); /* no prefix given, TMPDIR set, one good and one bad */
static bool test4(void); /* no prefix given, TMP set, one good and one bad */
static bool test5(void); /* no prefix given, HOME set, one good and one bad */
static bool test6(void); /* no prefix given, nothing set, one good and one bad */
static bool test7(void); /* remove session directory tree */
static FILE *test_out=NULL;
int main(int argc, char* argv[])
{
ompi_sys_info(); /* initialize system */
test_init("ompi_session_dir_t");
test_out = fopen( "test_session_dir_out", "w+" );
if( test_out == NULL ) {
test_failure("test_session_dir couldn't open test file failed");
test_finalize();
exit(1);
}
fprintf(test_out, "running test1\n");
if (test1()) {
test_success();
}
else {
test_failure("ompi_session_dir_t test1 failed");
}
fprintf(test_out, "running test2\n");
if (test2()) {
test_success();
}
else {
test_failure("ompi_session_dir_t test2 failed");
}
fprintf(test_out, "running test3\n");
if (test3()) {
test_success();
}
else {
test_failure("ompi_session_dir_t test3 failed");
}
fprintf(test_out, "running test4\n");
if (test4()) {
test_success();
}
else {
test_failure("ompi_session_dir_t test4 failed");
}
fprintf(test_out, "running test5\n");
if (test5()) {
test_success();
}
else {
test_failure("ompi_session_dir_t test5 failed");
}
fprintf(test_out, "running test6\n");
if (test6()) {
test_success();
}
else {
test_failure("ompi_session_dir_t test6 failed");
}
fprintf(test_out, "running test7\n");
if (test7()) {
test_success();
}
else {
test_failure("ompi_session_dir_t test6 failed");
}
fclose(test_out);
test_finalize();
return 0;
}
static bool test1(void)
{
/* Test proper action when given a prefix */
char *prefix, *tmp, *tmp2;
/* see if we can create a specified path */
prefix = ompi_os_path(false, "tmp", NULL);
if (OMPI_ERROR == ompi_session_dir(true, prefix, ompi_system_info.user, NULL, NULL, "test-universe", NULL, NULL)) {
printf("test1 - couldn't create specified path\n");
free(prefix);
return(false);
}
/* see if it can access an existing path */
if (OMPI_ERROR == ompi_session_dir(false, prefix, ompi_system_info.user, NULL, NULL, "test-universe", NULL, NULL)) {
printf("test1 - couldn't access existing path\n");
free(prefix);
return(false);
}
rmdir(ompi_process_info.universe_session_dir);
tmp = strdup(dirname(ompi_process_info.universe_session_dir));
rmdir(tmp);
free(ompi_process_info.universe_session_dir);
free(prefix);
free(tmp);
/* check what happens when given prefix that won't allow access */
tmp2 = ompi_os_path(false, "test", NULL); /* assume we don't have root privileges */
if (OMPI_SUCCESS == ompi_session_dir(true, tmp2, ompi_system_info.user, NULL, NULL, "test-universe", NULL, NULL)) {
printf("created temp directory in %s - shouldn't have been able to do so\n", tmp2);
rmdir(ompi_process_info.universe_session_dir);
tmp = strdup(dirname(ompi_process_info.universe_session_dir));
rmdir(tmp);
free(tmp);
free(tmp2);
return(false);
}
return true;
}
static bool test2(void)
{
char *tmp;
/* use the OMPI_PREFIX_ENV variable */
setenv("OMPI_PREFIX_ENV", "/tmp/trythis", 1);
if (OMPI_ERROR == ompi_session_dir(true, NULL, ompi_system_info.user, NULL, NULL, "test-universe", NULL, NULL)) {
unsetenv("OMPI_PREFIX_ENV");
return(false);
}
rmdir(ompi_process_info.universe_session_dir);
tmp = strdup(dirname(ompi_process_info.universe_session_dir));
rmdir(tmp);
free(tmp);
unsetenv("OMPI_PREFIX_ENV");
return(true);
}
static bool test3(void)
{
/* use the TMPDIR enviro variable */
char *tmp;
setenv("TMPDIR", "/tmp/trythis", 1);
if (OMPI_ERROR == ompi_session_dir(true, NULL, ompi_system_info.user, NULL, NULL, "test-universe", NULL, NULL)) {
unsetenv("TMPDIR");
return(false);
}
rmdir(ompi_process_info.universe_session_dir);
tmp = strdup(dirname(ompi_process_info.universe_session_dir));
rmdir(tmp);
free(tmp);
unsetenv("TMPDIR");
return(true);
}
static bool test4(void)
{
/* use the TMP enviro variable */
char *tmp;
setenv("TMP", "/tmp/trythis", 1);
if (OMPI_ERROR == ompi_session_dir(true, NULL, ompi_system_info.user, NULL, NULL, "test-universe", NULL, NULL)) {
unsetenv("TMP");
return(false);
}
rmdir(ompi_process_info.universe_session_dir);
tmp = strdup(dirname(ompi_process_info.universe_session_dir));
rmdir(tmp);
free(tmp);
unsetenv("TMP");
return(true);
}
static bool test5(void)
{
/* use the HOME enviro variable */
char *tmp;
setenv("HOME", "/tmp/trythis", 1);
if (OMPI_ERROR == ompi_session_dir(true, NULL, ompi_system_info.user, NULL, NULL, "test-universe", NULL, NULL)) {
unsetenv("HOME");
return(false);
}
rmdir(ompi_process_info.universe_session_dir);
tmp = strdup(dirname(ompi_process_info.universe_session_dir));
rmdir(tmp);
free(tmp);
unsetenv("HOME");
return(true);
}
static bool test6(void)
{
char *tmp;
/* no enviro variables set, no prefix given
* Program should turn to default of /tmp (where "/" is whatever
* top-level directory is appropriate for given system)
*/
if (OMPI_ERROR == ompi_session_dir(true, NULL, ompi_system_info.user, NULL, NULL, "test-universe", NULL, NULL)) {
return(false);
}
rmdir(ompi_process_info.universe_session_dir);
tmp = strdup(dirname(ompi_process_info.universe_session_dir));
rmdir(tmp);
return(true);
}
static bool test7(void)
{
/* create test proc session directory tree */
if (OMPI_ERROR == ompi_session_dir(true, NULL, ompi_system_info.user, "localhost", NULL, "test-universe", "test-job", "test-proc")) {
return(false);
}
fprintf(test_out, "removing directories: %s\n\t%s\n\t%s\n",
ompi_process_info.proc_session_dir,
ompi_process_info.job_session_dir,
ompi_process_info.universe_session_dir);
if (OMPI_ERROR == ompi_session_dir_finalize()) {
return(false);
}
return true;
}