77 строки
2.1 KiB
C
77 строки
2.1 KiB
C
/*
|
|
* Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana
|
|
* University Research and Technology
|
|
* Corporation. All rights reserved.
|
|
* Copyright (c) 2004-2005 The University of Tennessee and The University
|
|
* of Tennessee Research Foundation. All rights
|
|
* reserved.
|
|
* Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
|
|
* University of Stuttgart. All rights reserved.
|
|
* Copyright (c) 2004-2005 The Regents of the University of California.
|
|
* All rights reserved.
|
|
* $COPYRIGHT$
|
|
*
|
|
* Additional copyrights may follow
|
|
*
|
|
* $HEADER$
|
|
*/
|
|
|
|
#include "orte_config.h"
|
|
#include "orte/orte_constants.h"
|
|
|
|
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
#ifdef HAVE_SYS_PARAM_H
|
|
#include <sys/param.h>
|
|
#endif
|
|
#ifdef HAVE_NETINET_IN_H
|
|
#include <netinet/in.h>
|
|
#endif
|
|
|
|
#include "support.h"
|
|
#include "orte/runtime/runtime.h"
|
|
|
|
#define NUM_ITERS 3
|
|
|
|
FILE *test_out;
|
|
|
|
int main (int argc, char* argv[])
|
|
{
|
|
int rc, i;
|
|
|
|
test_init("orte_start_shut");
|
|
test_out = stderr;
|
|
|
|
fprintf(test_out, "initialize the system\n");
|
|
if (ORTE_SUCCESS != (rc = orte_init(true))) {
|
|
fprintf(test_out, "couldn't complete init - error code %d\n", rc);
|
|
exit(1);
|
|
}
|
|
|
|
for (i=0; i < NUM_ITERS; i++) {
|
|
if (ORTE_SUCCESS != (rc = orte_finalize())) {
|
|
fprintf(test_out, "iter %d: couldn't complete orte system finalize - error %d\n", i, rc);
|
|
exit(1);
|
|
}
|
|
fprintf(test_out, "\tfinalize successful\n");
|
|
if (ORTE_SUCCESS != (rc = orte_init(true))) {
|
|
fprintf(test_out, "iter %d: couldn't complete orte system init - error code %d\n", i, rc);
|
|
exit(1);
|
|
}
|
|
}
|
|
|
|
fprintf(test_out, "shut system down\n");
|
|
if (ORTE_SUCCESS != (rc = orte_finalize())) {
|
|
fprintf(test_out, "couldn't complete finalize - error code %d\n", rc);
|
|
exit(1);
|
|
}
|
|
|
|
fprintf(test_out, "orte_start_shut: successful\n");
|
|
|
|
rc = test_finalize();
|
|
fclose(test_out);
|
|
return rc;
|
|
}
|