From 1e26f9cda4041bc6961266895740d8c6a88b4a2b Mon Sep 17 00:00:00 2001 From: Gilles Gouaillardet Date: Mon, 8 Feb 2016 17:29:43 +0900 Subject: [PATCH] test/dss: update tests to make them usable again, and run them --- configure.ac | 3 +- test/Makefile.am | 4 +- test/dss/Makefile | 9 - test/dss/Makefile.am | 15 + test/dss/dss_buffer.c | 72 ++--- test/dss/dss_cmp.c | 68 ++--- test/dss/dss_copy.c | 78 ++--- test/dss/dss_payload.c | 106 +------ test/dss/dss_print.c | 87 +++--- test/dss/dss_release.c | 513 --------------------------------- test/dss/dss_set_get.c | 503 --------------------------------- test/dss/dss_size.c | 626 ----------------------------------------- 12 files changed, 194 insertions(+), 1890 deletions(-) delete mode 100644 test/dss/Makefile create mode 100644 test/dss/Makefile.am delete mode 100644 test/dss/dss_release.c delete mode 100644 test/dss/dss_set_get.c delete mode 100644 test/dss/dss_size.c diff --git a/configure.ac b/configure.ac index 5728079325..7bb7cbe8eb 100644 --- a/configure.ac +++ b/configure.ac @@ -20,7 +20,7 @@ # Copyright (c) 2013 Mellanox Technologies, Inc. # All rights reserved. # Copyright (c) 2013-2014 Intel, Inc. All rights reserved. -# Copyright (c) 2014-2015 Research Organization for Information Science +# Copyright (c) 2014-2016 Research Organization for Information Science # and Technology (RIST). All rights reserved. # $COPYRIGHT$ # @@ -1372,6 +1372,7 @@ AC_CONFIG_FILES([ test/event/Makefile test/asm/Makefile test/datatype/Makefile + test/dss/Makefile test/class/Makefile test/support/Makefile test/threads/Makefile diff --git a/test/Makefile.am b/test/Makefile.am index 5d5323d780..7eee672d46 100644 --- a/test/Makefile.am +++ b/test/Makefile.am @@ -11,7 +11,7 @@ # All rights reserved. # Copyright (c) 2009 Sun Microsystems, Inc. All rights reserved. # Copyright (c) 2010 Cisco Systems, Inc. All rights reserved. -# Copyright (c) 2015 Research Organization for Information Science +# Copyright (c) 2015-2016 Research Organization for Information Science # and Technology (RIST). All rights reserved. # $COPYRIGHT$ # @@ -21,7 +21,7 @@ # # support needs to be first for dependencies -SUBDIRS = support asm class threads datatype util +SUBDIRS = support asm class threads datatype util dss if PROJECT_OMPI SUBDIRS += monitoring endif diff --git a/test/dss/Makefile b/test/dss/Makefile deleted file mode 100644 index 4d0c3bdbb3..0000000000 --- a/test/dss/Makefile +++ /dev/null @@ -1,9 +0,0 @@ -PROGS = dss_buffer dss_payload dss_cmp dss_copy dss_print dss_release dss_set_get dss_size - -all: $(PROGS) - -CC = mpicc -CFLAGS = -g -I../../ -I../../opal/include - -clean: - rm -f $(PROGS) *~ .gdb* diff --git a/test/dss/Makefile.am b/test/dss/Makefile.am new file mode 100644 index 0000000000..08957b5040 --- /dev/null +++ b/test/dss/Makefile.am @@ -0,0 +1,15 @@ +# Copyright (c) 2016 Research Organization for Information Science +# and Technology (RIST). All rights reserved. +# $COPYRIGHT$ +# +# Additional copyrights may follow +# +# $HEADER$ +# + +TESTS = dss_buffer dss_cmp dss_payload dss_print + +check_PROGRAMS = $(TESTS) $(MPI_CHECKS) + +LDFLAGS = $(OPAL_PKG_CONFIG_LDFLAGS) +LDADD = $(top_builddir)/opal/lib@OPAL_LIB_PREFIX@open-pal.la diff --git a/test/dss/dss_buffer.c b/test/dss/dss_buffer.c index f336fa3126..5dbbb64fb8 100644 --- a/test/dss/dss_buffer.c +++ b/test/dss/dss_buffer.c @@ -9,6 +9,8 @@ * University of Stuttgart. All rights reserved. * Copyright (c) 2004-2005 The Regents of the University of California. * All rights reserved. + * Copyright (c) 2016 Research Organization for Information Science + * and Technology (RIST). All rights reserved. * $COPYRIGHT$ * * Additional copyrights may follow @@ -47,11 +49,13 @@ static bool test10(void); /* verify KEYVAL */ static bool test11(void); /* verify int32_t */ static bool test12(void); /* verify pid_t */ -FILE *test_out; +static FILE *test_out; int main (int argc, char* argv[]) { + int ret = 0; + opal_init(&argc, &argv); test_out = stderr; @@ -61,104 +65,104 @@ int main (int argc, char* argv[]) fprintf(test_out, "executing test1\n"); if (test1()) { fprintf(test_out, "Test1 succeeded\n"); - } - else { + } else { fprintf(test_out, "Test1 failed\n"); + ret = 1; } fprintf(test_out, "executing test2\n"); if (test2()) { fprintf(test_out, "Test2 succeeded\n"); - } - else { + } else { fprintf(test_out, "Test2 failed\n"); + ret = 2; } fprintf(test_out, "executing test3\n"); if (test3()) { fprintf(test_out, "Test3 succeeded\n"); - } - else { + } else { fprintf(test_out, "Test3 failed\n"); + ret = 3; } fprintf(test_out, "executing test4\n"); if (test4()) { fprintf(test_out, "Test4 succeeded\n"); - } - else { + } else { fprintf(test_out, "Test4 failed\n"); + ret = 4; } fprintf(test_out, "executing test5\n"); if (test5()) { fprintf(test_out, "Test5 succeeded\n"); - } - else { + } else { fprintf(test_out, "Test5 failed\n"); + ret = 5; } fprintf(test_out, "executing test6\n"); if (test6()) { fprintf(test_out, "Test6 succeeded\n"); - } - else { + } else { fprintf(test_out, "Test6 failed\n"); + ret = 6; } fprintf(test_out, "executing test7\n"); if (test7()) { fprintf(test_out, "Test7 succeeded\n"); - } - else { + } else { fprintf(test_out, "Test7 failed\n"); + ret = 7; } fprintf(test_out, "executing test8\n"); if (test8()) { fprintf(test_out, "Test8 succeeded\n"); - } - else { + } else { fprintf(test_out, "Test8 failed\n"); + ret = 8; } fprintf(test_out, "executing test9\n"); if (test9()) { fprintf(test_out, "Test9 succeeded\n"); - } - else { + } else { fprintf(test_out, "opal_dss test9 failed\n"); + ret = 9; } fprintf(test_out, "executing test10\n"); if (test10()) { fprintf(test_out, "Test10 succeeded\n"); - } - else { + } else { fprintf(test_out, "opal_dss test10 failed\n"); + ret = 10; } fprintf(test_out, "executing test11\n"); if (test11()) { fprintf(test_out, "Test11 succeeded\n"); - } - else { + } else { fprintf(test_out, "opal_dss test11 failed\n"); + ret = 11; } fprintf(test_out, "executing test12\n"); if (test12()) { fprintf(test_out, "Test12 succeeded\n"); - } - else { + } else { fprintf(test_out, "opal_dss test12 failed\n"); + ret = 12; } fclose(test_out); opal_finalize(); - return(0); + return ret; } static bool test1(void) /* verify different buffer inits */ @@ -199,7 +203,7 @@ static bool test2(void) return false; } - opal_dss.set_buffer_type(bufA, OPAL_DSS_BUFFER_NON_DESC); + bufA->type = OPAL_DSS_BUFFER_NON_DESC; for (i=0;itype = ((i % 2) == 0) ? OPAL_INT16 : OPAL_STRING; if (OPAL_INT16 == src[i]->type) - src[i]->data = &i16[i]; + src[i]->data.uint16 = i16[i]; else - src[i]->data = strdup("truly-a-dumb-test"); + src[i]->data.string = strdup("truly-a-dumb-test"); } bufA = OBJ_NEW(opal_buffer_t); @@ -812,7 +816,7 @@ static bool test10(void) } for (i=0;itype = OPAL_DSS_BUFFER_NON_DESC; /* pack something in A */ for (i=0;itype = OPAL_DSS_BUFFER_NON_DESC; /* pack something in B */ for (i=0;i -#include -#include - -#include "opal/runtime/opal.h" - -#include "opal/dss/dss.h" - -#define NUM_ITERS 3 -#define NUM_ELEMS 10 - -static bool test1(void); /* verify different buffer inits */ -static bool test2(void); /* verify int16 */ -static bool test3(void); /* verify int */ -static bool test4(void); /* verify int32 */ -static bool test5(void); /* verify int64 */ -static bool test6(void); /* verify string */ -static bool test7(void); /* verify BOOL */ -static bool test8(void); /* verify OBJECT */ -static bool test9(void); /* verify composite (multiple types and element counts) */ -static bool test11(void); /* verify size_t */ -static bool test12(void); /* verify pid_t */ -static bool test13(void); /* verify pid_t */ - -FILE *test_out; - -opal_dss_value_t dval = { {OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF,NULL}; - - -int main (int argc, char* argv[]) -{ - opal_init(&argc, &argv); - - test_out = stderr; - - /* run the tests */ - - fprintf(test_out, "executing test1\n"); - if (test1()) { - fprintf(test_out, "Test1 succeeded\n"); - } - else { - fprintf(test_out, "Test1 failed\n"); - } - - fprintf(test_out, "executing test2\n"); - if (test2()) { - fprintf(test_out, "Test2 succeeded\n"); - } - else { - fprintf(test_out, "Test2 failed\n"); - } - - fprintf(test_out, "executing test3\n"); - if (test3()) { - fprintf(test_out, "Test3 succeeded\n"); - } - else { - fprintf(test_out, "Test3 failed\n"); - } - - fprintf(test_out, "executing test4\n"); - if (test4()) { - fprintf(test_out, "Test4 succeeded\n"); - } - else { - fprintf(test_out, "Test4 failed\n"); - } - - fprintf(test_out, "executing test5\n"); - if (test5()) { - fprintf(test_out, "Test5 succeeded\n"); - } - else { - fprintf(test_out, "Test5 failed\n"); - } - - fprintf(test_out, "executing test6\n"); - if (test6()) { - fprintf(test_out, "Test6 succeeded\n"); - } - else { - fprintf(test_out, "Test6 failed\n"); - } - - fprintf(test_out, "executing test7\n"); - if (test7()) { - fprintf(test_out, "Test7 succeeded\n"); - } - else { - fprintf(test_out, "Test7 failed\n"); - } - - fprintf(test_out, "executing test8\n"); - if (test8()) { - fprintf(test_out, "Test8 succeeded\n"); - } - else { - fprintf(test_out, "Test8 failed\n"); - } - - fprintf(test_out, "executing test9\n"); - if (test9()) { - fprintf(test_out, "Test9 succeeded\n"); - } - else { - fprintf(test_out, "opal_dss test9 failed\n"); - } - - fprintf(test_out, "executing test11\n"); - if (test11()) { - fprintf(test_out, "Test11 succeeded\n"); - } - else { - fprintf(test_out, "opal_dss test11 failed\n"); - } - - fprintf(test_out, "executing test12\n"); - if (test12()) { - fprintf(test_out, "Test12 succeeded\n"); - } - else { - fprintf(test_out, "opal_dss test12 failed\n"); - } - - fprintf(test_out, "executing test13\n"); - if (test13()) { - fprintf(test_out, "Test13 succeeded\n"); - } - else { - fprintf(test_out, "opal_dss test13 failed\n"); - } - - fclose(test_out); - - opal_finalize(); - - return(0); -} - -/* - * INT8 - */ -static bool test1(void) -{ - int8_t *v1, v2=100; - uint8_t *u1, u2=150; - opal_data_type_t type=OPAL_INT8, utype=OPAL_UINT8; - - if (OPAL_SUCCESS != opal_dss.copy((void**)&v1, &v2, type)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = OPAL_INT8; - dval.data = v1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.copy((void**)&u1, &u2, utype)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = OPAL_UINT8; - dval.data = u1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for unsigned value\n"); - return(false); - } - - - return (true); -} - -/* - * INT16 - */ -static bool test2(void) -{ - int16_t *v1, v2=100; - uint16_t *u1, u2=150; - opal_data_type_t type=OPAL_INT16, utype=OPAL_UINT16; - - if (OPAL_SUCCESS != opal_dss.copy((void**)&v1, &v2, type)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = OPAL_INT16; - dval.data = v1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for signed value\n"); - return(false); - } - - - if (OPAL_SUCCESS != opal_dss.copy((void**)&u1, &u2, utype)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = OPAL_UINT16; - dval.data = u1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for unsigned value\n"); - return(false); - } - - return (true); -} - -/* - * INT32 - */ -static bool test3(void) -{ - int32_t *v1, v2=100; - uint32_t *u1, u2=150; - opal_data_type_t type=OPAL_INT32, utype=OPAL_UINT32; - - if (OPAL_SUCCESS != opal_dss.copy((void**)&v1, &v2, type)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = OPAL_INT32; - dval.data = v1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.copy((void**)&u1, &u2, utype)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = OPAL_UINT32; - dval.data = u1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for unsigned value\n"); - return(false); - } - - return (true); -} - -/* - * INT64 - */ -static bool test4(void) -{ - int64_t *v1, v2=100; - uint64_t *u1, u2=150; - opal_data_type_t type=OPAL_INT64, utype=OPAL_UINT64; - - if (OPAL_SUCCESS != opal_dss.copy((void**)&v1, &v2, type)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = type; - dval.data = v1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.copy((void**)&u1, &u2, utype)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = OPAL_UINT64; - dval.data = u1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for unsigned value\n"); - return(false); - } - - return (true); -} - -/* - * INT - */ -static bool test5(void) -{ - int *v1, v2=100; - uint *u1, u2=150; - opal_data_type_t type=OPAL_INT, utype=OPAL_UINT; - - if (OPAL_SUCCESS != opal_dss.copy((void**)&v1, &v2, type)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = type; - dval.data = v1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.copy((void**)&u1, &u2, utype)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = utype; - dval.data = u1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for unsigned value\n"); - return(false); - } - - return (true); -} - -/* - * STRING - */ -static bool test6(void) -{ - char *string1="This is a short string"; - char *string2; - - if (OPAL_EQUAL != opal_dss.copy((void**)&string2, string1, OPAL_STRING)) { - fprintf(test_out, "opal_dss.copy returned error code\n"); - return(false); - } - - dval.type = OPAL_STRING; - dval.data = string2; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for string value\n"); - return(false); - } - - return (true); -} - -/* - * BOOL - */ -static bool test7(void) -{ - bool *v1, v2=true; - - if (OPAL_SUCCESS != opal_dss.copy((void**)&v1, &v2, OPAL_BOOL)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = OPAL_BOOL; - dval.data = v1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for bool value\n"); - return(false); - } - - return (true); -} - - -/* - * SIZE - */ -static bool test8(void) -{ - size_t *v1, v2=100; - opal_data_type_t type=OPAL_SIZE; - - if (OPAL_SUCCESS != opal_dss.copy((void**)&v1, &v2, type)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = type; - dval.data = v1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for size value\n"); - return(false); - } - - return (true); -} - -/* - * PID - */ -static bool test9(void) -{ - pid_t *v1, v2=100; - opal_data_type_t type=OPAL_PID; - - if (OPAL_SUCCESS != opal_dss.copy((void**)&v1, &v2, type)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = type; - dval.data = v1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for pid value\n"); - return(false); - } - - return (true); -} - -/* - * DATA TYPE - */ -static bool test11(void) -{ - opal_data_type_t *v1, v2=100; - opal_data_type_t type=OPAL_DATA_TYPE; - - if (OPAL_SUCCESS != opal_dss.copy((void**)&v1, &v2, type)) { - fprintf(test_out, "opal_dss.copy returned error\n"); - return(false); - } - dval.type = type; - dval.data = v1; - opal_dss.release(&dval); - if (NULL != dval.data) { - fprintf(test_out, "opal_dss.release failed for data_type value\n"); - return(false); - } - - return (true); -} - -/** - * OPAL_BYTE_OBJECT - */ - -static bool test12(void) -{ - size_t i; - opal_byte_object_t *v1, v2; - opal_data_type_t type=OPAL_BYTE_OBJECT; - - v2.size = 20; - v2.bytes = (uint8_t*)malloc(v2.size); - for (i=0; i -#include -#include - -#include "opal/runtime/opal.h" - -#include "opal/dss/dss.h" - -#define NUM_ITERS 3 -#define NUM_ELEMS 10 - -static bool test1(void); /* verify different buffer inits */ -static bool test2(void); /* verify int16 */ -static bool test3(void); /* verify int */ -static bool test4(void); /* verify int32 */ -static bool test5(void); /* verify int64 */ -static bool test6(void); /* verify string */ -static bool test7(void); /* verify BOOL */ -static bool test8(void); /* verify OBJECT */ -static bool test9(void); /* verify composite (multiple types and element counts) */ -static bool test11(void); /* verify size_t */ -static bool test12(void); /* verify pid_t */ - -FILE *test_out; - - -int main (int argc, char* argv[]) -{ - opal_init(&argc, &argv); - - test_out = stderr; - - /* run the tests */ - - fprintf(test_out, "executing test1\n"); - if (test1()) { - fprintf(test_out, "Test1 succeeded\n"); - } - else { - fprintf(test_out, "Test1 failed\n"); - } - - fprintf(test_out, "executing test2\n"); - if (test2()) { - fprintf(test_out, "Test2 succeeded\n"); - } - else { - fprintf(test_out, "Test2 failed\n"); - } - - fprintf(test_out, "executing test3\n"); - if (test3()) { - fprintf(test_out, "Test3 succeeded\n"); - } - else { - fprintf(test_out, "Test3 failed\n"); - } - - fprintf(test_out, "executing test4\n"); - if (test4()) { - fprintf(test_out, "Test4 succeeded\n"); - } - else { - fprintf(test_out, "Test4 failed\n"); - } - - fprintf(test_out, "executing test5\n"); - if (test5()) { - fprintf(test_out, "Test5 succeeded\n"); - } - else { - fprintf(test_out, "Test5 failed\n"); - } - - fprintf(test_out, "executing test6\n"); - if (test6()) { - fprintf(test_out, "Test6 succeeded\n"); - } - else { - fprintf(test_out, "Test6 failed\n"); - } - - fprintf(test_out, "executing test7\n"); - if (test7()) { - fprintf(test_out, "Test7 succeeded\n"); - } - else { - fprintf(test_out, "Test7 failed\n"); - } - - fprintf(test_out, "executing test8\n"); - if (test8()) { - fprintf(test_out, "Test8 succeeded\n"); - } - else { - fprintf(test_out, "Test8 failed\n"); - } - - fprintf(test_out, "executing test9\n"); - if (test9()) { - fprintf(test_out, "Test9 succeeded\n"); - } - else { - fprintf(test_out, "opal_dss test9 failed\n"); - } - - fprintf(test_out, "executing test11\n"); - if (test11()) { - fprintf(test_out, "Test11 succeeded\n"); - } - else { - fprintf(test_out, "opal_dss test11 failed\n"); - } - - fprintf(test_out, "executing test12\n"); - if (test12()) { - fprintf(test_out, "Test12 succeeded\n"); - } - else { - fprintf(test_out, "opal_dss test12 failed\n"); - } - - fclose(test_out); - - opal_finalize(); - - return(0); -} - -/* - * INT8 - */ -static bool test1(void) -{ - int8_t *v1, v2=100; - uint8_t *u1, u2=150; - opal_data_type_t type=OPAL_INT8, utype=OPAL_UINT8; - opal_dss_value_t dv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - opal_dss_value_t udv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - - if (OPAL_SUCCESS != opal_dss.set(&dv, &v2, type)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&v1, &dv, type)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.set(&udv, &u2, utype)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&u1, &udv, utype)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for unsigned value\n"); - return(false); - } - - return (true); -} - -/* - * INT16 - */ -static bool test2(void) -{ - int16_t *v1, v2=100; - uint16_t *u1, u2=150; - opal_data_type_t type=OPAL_INT16, utype=OPAL_UINT16; - opal_dss_value_t dv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - opal_dss_value_t udv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - - if (OPAL_SUCCESS != opal_dss.set(&dv, &v2, type)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&v1, &dv, type)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.set(&udv, &u2, utype)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&u1, &udv, utype)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for unsigned value\n"); - return(false); - } - - return (true); -} - -/* - * INT32 - */ -static bool test3(void) -{ - int32_t *v1, v2=100; - uint32_t *u1, u2=150; - opal_data_type_t type=OPAL_INT32, utype=OPAL_UINT32; - opal_dss_value_t dv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - opal_dss_value_t udv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - - if (OPAL_SUCCESS != opal_dss.set(&dv, &v2, type)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&v1, &dv, type)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.set(&udv, &u2, utype)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&u1, &udv, utype)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for unsigned value\n"); - return(false); - } - - return (true); -} - -/* - * INT64 - */ -static bool test4(void) -{ - int64_t *v1, v2=100; - uint64_t *u1, u2=150; - opal_data_type_t type=OPAL_INT64, utype=OPAL_UINT64; - opal_dss_value_t dv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - opal_dss_value_t udv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - - if (OPAL_SUCCESS != opal_dss.set(&dv, &v2, type)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&v1, &dv, type)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.set(&udv, &u2, utype)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&u1, &udv, utype)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for unsigned value\n"); - return(false); - } - - return (true); -} - -/* - * INT - */ -static bool test5(void) -{ - int *v1, v2=100; - uint *u1, u2=150; - opal_data_type_t type=OPAL_INT, utype=OPAL_UINT; - opal_dss_value_t dv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - opal_dss_value_t udv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - - if (OPAL_SUCCESS != opal_dss.set(&dv, &v2, type)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&v1, &dv, type)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.set(&udv, &u2, utype)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&u1, &udv, utype)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for unsigned value\n"); - return(false); - } - - return (true); -} - -/* - * STRING - */ -static bool test6(void) -{ - char *string1="This is a short string", *string2; - opal_dss_value_t dv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - - if (OPAL_SUCCESS != opal_dss.set(&dv, string1, OPAL_STRING)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&string2, &dv, OPAL_STRING)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (0 != strcmp(string1, string2)) { - fprintf(test_out, "opal_dss.get/set failed for string value\n"); - return(false); - } - - return (true); -} - -/* - * BOOL - */ -static bool test7(void) -{ - bool *v1, v2=true; - opal_dss_value_t dv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - - if (OPAL_SUCCESS != opal_dss.set(&dv, &v2, OPAL_BOOL)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&v1, &dv, OPAL_BOOL)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for bool value\n"); - return(false); - } - - return (true); -} - - -/* - * SIZE - */ -static bool test8(void) -{ - size_t *v1, v2=100; - opal_data_type_t type=OPAL_SIZE; - opal_dss_value_t dv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - - if (OPAL_SUCCESS != opal_dss.set(&dv, &v2, type)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&v1, &dv, type)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for size value\n"); - return(false); - } - - return (true); -} - -/* - * PID - */ -static bool test9(void) -{ - pid_t *v1, v2=100; - opal_data_type_t type=OPAL_PID; - opal_dss_value_t dv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - - if (OPAL_SUCCESS != opal_dss.set(&dv, &v2, type)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&v1, &dv, type)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for pid value\n"); - return(false); - } - - return (true); -} - -/* - * DATA TYPE - */ -static bool test11(void) -{ - opal_data_type_t *v1, v2=100; - opal_data_type_t type=OPAL_DATA_TYPE; - opal_dss_value_t dv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - - if (OPAL_SUCCESS != opal_dss.set(&dv, &v2, type)) { - fprintf(test_out, "opal_dss.set returned error\n"); - return(false); - } - if (OPAL_SUCCESS != opal_dss.get((void**)&v1, &dv, type)) { - fprintf(test_out, "opal_dss.get returned error\n"); - return(false); - } - if (v2 != *v1) { - fprintf(test_out, "opal_dss.get/set failed for data type value\n"); - return(false); - } - - return (true); -} - -/** - * OPAL_BYTE_OBJECT - */ - -static bool test12(void) -{ - size_t i; - opal_byte_object_t v2, *v1; - opal_dss_value_t dv = {{OBJ_CLASS(opal_dss_value_t),0},OPAL_UNDEF, NULL}; - - v2.size = 20; - v2.bytes = (uint8_t*)malloc(v2.size); - for (i=0; i -#include -#include - -#include "opal/runtime/opal.h" - -#include "opal/dss/dss.h" - -#define NUM_ITERS 3 -#define NUM_ELEMS 10 - -static bool test1(void); /* verify different buffer inits */ -static bool test2(void); /* verify int16 */ -static bool test3(void); /* verify int */ -static bool test4(void); /* verify int32 */ -static bool test5(void); /* verify int64 */ -static bool test6(void); /* verify string */ -static bool test7(void); /* verify BOOL */ -static bool test8(void); /* verify OBJECT */ -static bool test9(void); /* verify composite (multiple types and element counts) */ -static bool test11(void); /* verify size_t */ -static bool test12(void); /* verify pid_t */ -static bool test13(void); /* verify pid_t */ - -FILE *test_out; - - -int main (int argc, char* argv[]) -{ - opal_init(&argc, &argv); - - test_out = stderr; - - /* run the tests */ - - fprintf(test_out, "executing test1\n"); - if (test1()) { - fprintf(test_out, "Test1 succeeded\n"); - } - else { - fprintf(test_out, "Test1 failed\n"); - } - - fprintf(test_out, "executing test2\n"); - if (test2()) { - fprintf(test_out, "Test2 succeeded\n"); - } - else { - fprintf(test_out, "Test2 failed\n"); - } - - fprintf(test_out, "executing test3\n"); - if (test3()) { - fprintf(test_out, "Test3 succeeded\n"); - } - else { - fprintf(test_out, "Test3 failed\n"); - } - - fprintf(test_out, "executing test4\n"); - if (test4()) { - fprintf(test_out, "Test4 succeeded\n"); - } - else { - fprintf(test_out, "Test4 failed\n"); - } - - fprintf(test_out, "executing test5\n"); - if (test5()) { - fprintf(test_out, "Test5 succeeded\n"); - } - else { - fprintf(test_out, "Test5 failed\n"); - } - - fprintf(test_out, "executing test6\n"); - if (test6()) { - fprintf(test_out, "Test6 succeeded\n"); - } - else { - fprintf(test_out, "Test6 failed\n"); - } - - fprintf(test_out, "executing test7\n"); - if (test7()) { - fprintf(test_out, "Test7 succeeded\n"); - } - else { - fprintf(test_out, "Test7 failed\n"); - } - - fprintf(test_out, "executing test8\n"); - if (test8()) { - fprintf(test_out, "Test8 succeeded\n"); - } - else { - fprintf(test_out, "Test8 failed\n"); - } - - fprintf(test_out, "executing test9\n"); - if (test9()) { - fprintf(test_out, "Test9 succeeded\n"); - } - else { - fprintf(test_out, "opal_dss test9 failed\n"); - } - - fprintf(test_out, "executing test11\n"); - if (test11()) { - fprintf(test_out, "Test11 succeeded\n"); - } - else { - fprintf(test_out, "opal_dss test11 failed\n"); - } - - fprintf(test_out, "executing test12\n"); - if (test12()) { - fprintf(test_out, "Test12 succeeded\n"); - } - else { - fprintf(test_out, "opal_dss test12 failed\n"); - } - - fprintf(test_out, "executing test13\n"); - if (test13()) { - fprintf(test_out, "Test13 succeeded\n"); - } - else { - fprintf(test_out, "opal_dss test13 failed\n"); - } - - fclose(test_out); - - opal_finalize(); - - return(0); -} - -/* - * INT8 - */ -static bool test1(void) -{ - int8_t v1; - uint8_t u1; - size_t s; - opal_data_type_t type=OPAL_INT8, utype=OPAL_UINT8; - - if (OPAL_SUCCESS != opal_dss.size(&s, &v1, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for signed value with NULL\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, &u1, utype)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(u1)) { - fprintf(test_out, "opal_dss.size failed for unsigned value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, utype)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for unsigned value with NULL\n"); - return(false); - } - - return (true); -} - -/* - * INT16 - */ -static bool test2(void) -{ - int16_t v1; - uint16_t u1; - opal_data_type_t type=OPAL_INT16, utype=OPAL_UINT16; - size_t s; - - if (OPAL_SUCCESS != opal_dss.size(&s, &v1, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for signed value with NULL\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, &u1, utype)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(u1)) { - fprintf(test_out, "opal_dss.size failed for unsigned value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, utype)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for unsigned value with NULL\n"); - return(false); - } - - return (true); -} - -/* - * INT32 - */ -static bool test3(void) -{ - int32_t v1; - uint32_t u1; - opal_data_type_t type=OPAL_INT32, utype=OPAL_UINT32; - size_t s; - - if (OPAL_SUCCESS != opal_dss.size(&s, &v1, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for signed value with NULL\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, &u1, utype)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(u1)) { - fprintf(test_out, "opal_dss.size failed for unsigned value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, utype)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for unsigned value with NULL\n"); - return(false); - } - - return (true); -} - -/* - * INT64 - */ -static bool test4(void) -{ - int64_t v1; - uint64_t u1; - opal_data_type_t type=OPAL_INT64, utype=OPAL_UINT64; - size_t s; - - if (OPAL_SUCCESS != opal_dss.size(&s, &v1, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for signed value with NULL\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, &u1, utype)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(u1)) { - fprintf(test_out, "opal_dss.size failed for unsigned value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, utype)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for unsigned value with NULL\n"); - return(false); - } - - return (true); -} - -/* - * INT - */ -static bool test5(void) -{ - int v1; - uint u1; - opal_data_type_t type=OPAL_INT, utype=OPAL_UINT; - size_t s; - - if (OPAL_SUCCESS != opal_dss.size(&s, &v1, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for signed value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for signed value with NULL\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, &u1, utype)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(u1)) { - fprintf(test_out, "opal_dss.size failed for unsigned value\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, utype)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for unsigned value with NULL\n"); - return(false); - } - - return (true); -} - -/* - * STRING - */ -static bool test6(void) -{ - char *string1="This is a short string"; - size_t s; - - if (OPAL_SUCCESS != opal_dss.size(&s, string1, OPAL_STRING)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != strlen(string1)+1) { - fprintf(test_out, "opal_dss.size failed for string\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, OPAL_STRING)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(string1)) { - fprintf(test_out, "opal_dss.size failed for string with NULL\n"); - return(false); - } - - return (true); -} - -/* - * BOOL - */ -static bool test7(void) -{ - bool v1; - size_t s; - - if (OPAL_SUCCESS != opal_dss.size(&s, &v1, OPAL_BOOL)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for bool"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, OPAL_BOOL)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for bool with NULL\n"); - return(false); - } - - return (true); -} - - -/* - * SIZE - */ -static bool test8(void) -{ - size_t v1; - opal_data_type_t type=OPAL_SIZE; - size_t s; - - if (OPAL_SUCCESS != opal_dss.size(&s, &v1, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for size\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for size with NULL\n"); - return(false); - } - - return (true); -} - -/* - * PID - */ -static bool test9(void) -{ - pid_t v1; - opal_data_type_t type=OPAL_PID; - size_t s; - - if (OPAL_SUCCESS != opal_dss.size(&s, &v1, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for pid\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for pid with NULL\n"); - return(false); - } - - return (true); -} - -/* - * DATA TYPE - */ -static bool test11(void) -{ - opal_data_type_t v1; - opal_data_type_t type=OPAL_DATA_TYPE; - size_t s; - - if (OPAL_SUCCESS != opal_dss.size(&s, &v1, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for data type\n"); - return(false); - } - - if (OPAL_SUCCESS != opal_dss.size(&s, NULL, type)) { - fprintf(test_out, "opal_dss.size returned error\n"); - return(false); - } - if (s != sizeof(v1)) { - fprintf(test_out, "opal_dss.size failed for data type with NULL\n"); - return(false); - } - - return (true); -} - -/** - * OPAL_BYTE_OBJECT - */ - -static bool test12(void) -{ - size_t i, ts; - opal_byte_object_t v2; - opal_data_type_t type=OPAL_BYTE_OBJECT; - size_t s; - - v2.size = 20; - v2.bytes = (uint8_t*)malloc(v2.size); - for (i=0; i