Skip to content

Commit 527b5c6

Browse files
author
Ralph Castain
committed
Update to include extended tool support, new datatypes
1 parent ba77d9b commit 527b5c6

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

62 files changed

+5424
-3344
lines changed

‎opal/dss/dss_pack.c‎

Lines changed: 7 additions & 285 deletions
Original file line numberDiff line numberDiff line change
@@ -769,6 +769,10 @@ int opal_dss_pack_value(opal_buffer_t *buffer, const void *src,
769769
}
770770
break;
771771
case OPAL_UINT8:
772+
case OPAL_PERSIST:
773+
case OPAL_SCOPE:
774+
case OPAL_DATA_RANGE:
775+
case OPAL_PROC_STATE:
772776
if (OPAL_SUCCESS != (ret = opal_dss_pack_buffer(buffer, &ptr[i]->data.uint8, 1, OPAL_UINT8))) {
773777
return ret;
774778
}
@@ -779,6 +783,7 @@ int opal_dss_pack_value(opal_buffer_t *buffer, const void *src,
779783
}
780784
break;
781785
case OPAL_UINT32:
786+
case OPAL_INFO_DIRECTIVES:
782787
if (OPAL_SUCCESS != (ret = opal_dss_pack_buffer(buffer, &ptr[i]->data.uint32, 1, OPAL_UINT32))) {
783788
return ret;
784789
}
@@ -823,291 +828,8 @@ int opal_dss_pack_value(opal_buffer_t *buffer, const void *src,
823828
return ret;
824829
}
825830
break;
826-
case OPAL_FLOAT_ARRAY:
827-
if (OPAL_SUCCESS !=
828-
(ret = opal_dss_pack_buffer(buffer,
829-
&ptr[i]->data.fval_array.size,
830-
1,
831-
OPAL_INT32))) {
832-
return ret;
833-
}
834-
if (OPAL_SUCCESS !=
835-
(ret = opal_dss_pack_buffer(buffer,
836-
ptr[i]->data.fval_array.data,
837-
ptr[i]->data.fval_array.size,
838-
OPAL_FLOAT))) {
839-
return ret;
840-
}
841-
break;
842-
case OPAL_DOUBLE_ARRAY:
843-
if (OPAL_SUCCESS !=
844-
(ret = opal_dss_pack_buffer(buffer,
845-
&ptr[i]->data.dval_array.size,
846-
1,
847-
OPAL_INT32))) {
848-
return ret;
849-
}
850-
if (OPAL_SUCCESS !=
851-
(ret = opal_dss_pack_buffer(buffer,
852-
ptr[i]->data.dval_array.data,
853-
ptr[i]->data.dval_array.size,
854-
OPAL_DOUBLE))) {
855-
return ret;
856-
}
857-
break;
858-
case OPAL_STRING_ARRAY:
859-
if (OPAL_SUCCESS !=
860-
(ret = opal_dss_pack_buffer(buffer,
861-
&ptr[i]->data.string_array.size,
862-
1,
863-
OPAL_INT32))) {
864-
return ret;
865-
}
866-
if (OPAL_SUCCESS !=
867-
(ret = opal_dss_pack_buffer(buffer,
868-
ptr[i]->data.string_array.data,
869-
ptr[i]->data.string_array.size,
870-
OPAL_STRING))) {
871-
return ret;
872-
}
873-
break;
874-
case OPAL_BOOL_ARRAY:
875-
if (OPAL_SUCCESS !=
876-
(ret = opal_dss_pack_buffer(buffer,
877-
&ptr[i]->data.flag_array.size,
878-
1,
879-
OPAL_INT32))) {
880-
return ret;
881-
}
882-
if (OPAL_SUCCESS !=
883-
(ret = opal_dss_pack_buffer(buffer,
884-
ptr[i]->data.flag_array.data,
885-
ptr[i]->data.flag_array.size,
886-
OPAL_BOOL))) {
887-
return ret;
888-
}
889-
break;
890-
case OPAL_SIZE_ARRAY:
891-
if (OPAL_SUCCESS !=
892-
(ret = opal_dss_pack_buffer(buffer,
893-
&ptr[i]->data.size_array.size,
894-
1,
895-
OPAL_INT32))) {
896-
return ret;
897-
}
898-
if (OPAL_SUCCESS !=
899-
(ret = opal_dss_pack_buffer(buffer,
900-
ptr[i]->data.size_array.data,
901-
ptr[i]->data.size_array.size,
902-
OPAL_SIZE))) {
903-
return ret;
904-
}
905-
break;
906-
case OPAL_BYTE_ARRAY:
907-
if (OPAL_SUCCESS !=
908-
(ret = opal_dss_pack_buffer(buffer,
909-
&ptr[i]->data.byte_array.size,
910-
1,
911-
OPAL_INT32))) {
912-
return ret;
913-
}
914-
if (OPAL_SUCCESS !=
915-
(ret = opal_dss_pack_buffer(buffer,
916-
ptr[i]->data.byte_array.data,
917-
ptr[i]->data.byte_array.size,
918-
OPAL_BYTE))) {
919-
return ret;
920-
}
921-
break;
922-
case OPAL_INT_ARRAY:
923-
if (OPAL_SUCCESS !=
924-
(ret = opal_dss_pack_buffer(buffer,
925-
&ptr[i]->data.integer_array.size,
926-
1,
927-
OPAL_INT32))) {
928-
return ret;
929-
}
930-
if (OPAL_SUCCESS !=
931-
(ret = opal_dss_pack_buffer(buffer,
932-
ptr[i]->data.integer_array.data,
933-
ptr[i]->data.integer_array.size,
934-
OPAL_INT))) {
935-
return ret;
936-
}
937-
break;
938-
case OPAL_INT8_ARRAY:
939-
if (OPAL_SUCCESS !=
940-
(ret = opal_dss_pack_buffer(buffer,
941-
&ptr[i]->data.int8_array.size,
942-
1,
943-
OPAL_INT32))) {
944-
return ret;
945-
}
946-
if (OPAL_SUCCESS !=
947-
(ret = opal_dss_pack_buffer(buffer,
948-
ptr[i]->data.int8_array.data,
949-
ptr[i]->data.int8_array.size,
950-
OPAL_INT8))) {
951-
return ret;
952-
}
953-
break;
954-
case OPAL_INT16_ARRAY:
955-
if (OPAL_SUCCESS !=
956-
(ret = opal_dss_pack_buffer(buffer,
957-
&ptr[i]->data.int16_array.size,
958-
1,
959-
OPAL_INT32))) {
960-
return ret;
961-
}
962-
if (OPAL_SUCCESS !=
963-
(ret = opal_dss_pack_buffer(buffer,
964-
ptr[i]->data.int16_array.data,
965-
ptr[i]->data.int16_array.size,
966-
OPAL_INT16))) {
967-
return ret;
968-
}
969-
break;
970-
case OPAL_INT32_ARRAY:
971-
if (OPAL_SUCCESS !=
972-
(ret = opal_dss_pack_buffer(buffer,
973-
&ptr[i]->data.int32_array.size,
974-
1,
975-
OPAL_INT32))) {
976-
return ret;
977-
}
978-
if (OPAL_SUCCESS !=
979-
(ret = opal_dss_pack_buffer(buffer,
980-
ptr[i]->data.int32_array.data,
981-
ptr[i]->data.int32_array.size,
982-
OPAL_INT32))) {
983-
return ret;
984-
}
985-
break;
986-
case OPAL_INT64_ARRAY:
987-
if (OPAL_SUCCESS !=
988-
(ret = opal_dss_pack_buffer(buffer,
989-
&ptr[i]->data.int64_array.size,
990-
1,
991-
OPAL_INT32))) {
992-
return ret;
993-
}
994-
if (OPAL_SUCCESS !=
995-
(ret = opal_dss_pack_buffer(buffer,
996-
ptr[i]->data.int64_array.data,
997-
ptr[i]->data.int64_array.size,
998-
OPAL_INT64))) {
999-
return ret;
1000-
}
1001-
break;
1002-
case OPAL_UINT_ARRAY:
1003-
if (OPAL_SUCCESS !=
1004-
(ret = opal_dss_pack_buffer(buffer,
1005-
&ptr[i]->data.uint_array.size,
1006-
1,
1007-
OPAL_INT32))) {
1008-
return ret;
1009-
}
1010-
if (OPAL_SUCCESS !=
1011-
(ret = opal_dss_pack_buffer(buffer,
1012-
ptr[i]->data.uint_array.data,
1013-
ptr[i]->data.uint_array.size,
1014-
OPAL_UINT))) {
1015-
return ret;
1016-
}
1017-
break;
1018-
case OPAL_UINT8_ARRAY:
1019-
if (OPAL_SUCCESS !=
1020-
(ret = opal_dss_pack_buffer(buffer,
1021-
&ptr[i]->data.uint8_array.size,
1022-
1,
1023-
OPAL_INT32))) {
1024-
return ret;
1025-
}
1026-
if (OPAL_SUCCESS !=
1027-
(ret = opal_dss_pack_buffer(buffer,
1028-
ptr[i]->data.uint8_array.data,
1029-
ptr[i]->data.uint8_array.size,
1030-
OPAL_UINT8))) {
1031-
return ret;
1032-
}
1033-
break;
1034-
case OPAL_UINT16_ARRAY:
1035-
if (OPAL_SUCCESS !=
1036-
(ret = opal_dss_pack_buffer(buffer,
1037-
&ptr[i]->data.uint16_array.size,
1038-
1,
1039-
OPAL_INT32))) {
1040-
return ret;
1041-
}
1042-
if (OPAL_SUCCESS !=
1043-
(ret = opal_dss_pack_buffer(buffer,
1044-
ptr[i]->data.uint16_array.data,
1045-
ptr[i]->data.uint16_array.size,
1046-
OPAL_UINT16))) {
1047-
return ret;
1048-
}
1049-
break;
1050-
case OPAL_UINT32_ARRAY:
1051-
if (OPAL_SUCCESS !=
1052-
(ret = opal_dss_pack_buffer(buffer,
1053-
&ptr[i]->data.uint32_array.size,
1054-
1,
1055-
OPAL_INT32))) {
1056-
return ret;
1057-
}
1058-
if (OPAL_SUCCESS !=
1059-
(ret = opal_dss_pack_buffer(buffer,
1060-
ptr[i]->data.uint32_array.data,
1061-
ptr[i]->data.uint32_array.size,
1062-
OPAL_UINT32))) {
1063-
return ret;
1064-
}
1065-
break;
1066-
case OPAL_UINT64_ARRAY:
1067-
if (OPAL_SUCCESS !=
1068-
(ret = opal_dss_pack_buffer(buffer,
1069-
&ptr[i]->data.uint64_array.size,
1070-
1,
1071-
OPAL_INT32))) {
1072-
return ret;
1073-
}
1074-
if (OPAL_SUCCESS !=
1075-
(ret = opal_dss_pack_buffer(buffer,
1076-
ptr[i]->data.uint64_array.data,
1077-
ptr[i]->data.uint64_array.size,
1078-
OPAL_UINT64))) {
1079-
return ret;
1080-
}
1081-
break;
1082-
case OPAL_PID_ARRAY:
1083-
if (OPAL_SUCCESS !=
1084-
(ret = opal_dss_pack_buffer(buffer,
1085-
&ptr[i]->data.pid_array.size,
1086-
1,
1087-
OPAL_INT32))) {
1088-
return ret;
1089-
}
1090-
if (OPAL_SUCCESS !=
1091-
(ret = opal_dss_pack_buffer(buffer,
1092-
ptr[i]->data.pid_array.data,
1093-
ptr[i]->data.pid_array.size,
1094-
OPAL_PID))) {
1095-
return ret;
1096-
}
1097-
break;
1098-
case OPAL_TIMEVAL_ARRAY:
1099-
if (OPAL_SUCCESS !=
1100-
(ret = opal_dss_pack_buffer(buffer,
1101-
&ptr[i]->data.tv_array.size,
1102-
1,
1103-
OPAL_INT32))) {
1104-
return ret;
1105-
}
1106-
if (OPAL_SUCCESS !=
1107-
(ret = opal_dss_pack_buffer(buffer,
1108-
ptr[i]->data.tv_array.data,
1109-
ptr[i]->data.tv_array.size,
1110-
OPAL_TIMEVAL))) {
831+
case OPAL_STATUS:
832+
if (OPAL_SUCCESS != (ret = opal_dss_pack_buffer(buffer, &ptr[i]->data.status, 1, OPAL_INT))) {
1111833
return ret;
1112834
}
1113835
break;

0 commit comments

Comments
 (0)