Lines Matching refs:viewer
29 PetscErrorCode PetscViewerHDF5GetGroup(PetscViewer viewer, const char path[], const char *abspath[]) in PetscViewerHDF5GetGroup() argument
37 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5GetGroup()
40 PetscCall(PetscViewerHDF5GetGroup_Internal(viewer, &group)); in PetscViewerHDF5GetGroup()
54 static PetscErrorCode PetscViewerHDF5CheckNamedObject_Internal(PetscViewer viewer, PetscObject obj) in PetscViewerHDF5CheckNamedObject_Internal() argument
59 PetscCall(PetscViewerHDF5HasObject(viewer, obj, &has)); in PetscViewerHDF5CheckNamedObject_Internal()
62 PetscCall(PetscViewerHDF5GetGroup(viewer, NULL, &group)); in PetscViewerHDF5CheckNamedObject_Internal()
63 …SETERRQ(PetscObjectComm((PetscObject)viewer), PETSC_ERR_FILE_UNEXPECTED, "Object (dataset) \"%s\" … in PetscViewerHDF5CheckNamedObject_Internal()
87 static PetscErrorCode PetscViewerView_HDF5(PetscViewer v, PetscViewer viewer) in PetscViewerView_HDF5() argument
93 if (hdf5->filename) PetscCall(PetscViewerASCIIPrintf(viewer, "Filename: %s\n", hdf5->filename)); in PetscViewerView_HDF5()
94 …PetscCall(PetscViewerASCIIPrintf(viewer, "Vectors with blocksize 1 saved as 2D datasets: %s\n", Pe… in PetscViewerView_HDF5()
95 …PetscCall(PetscViewerASCIIPrintf(viewer, "Enforce single precision storage: %s\n", PetscBools[hdf5… in PetscViewerView_HDF5()
97 …PetscCall(PetscViewerASCIIPrintf(viewer, "MPI-IO transfer mode: %s\n", flg ? "collective" : "indep… in PetscViewerView_HDF5()
98 …PetscCall(PetscViewerASCIIPrintf(viewer, "Default timestepping: %s\n", PetscBools[hdf5->defTimeste… in PetscViewerView_HDF5()
99 PetscCall(PetscViewerASCIIPrintf(viewer, "Compression: %s\n", PetscBools[hdf5->compress])); in PetscViewerView_HDF5()
103 static PetscErrorCode PetscViewerFileClose_HDF5(PetscViewer viewer) in PetscViewerFileClose_HDF5() argument
105 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerFileClose_HDF5()
113 static PetscErrorCode PetscViewerFlush_HDF5(PetscViewer viewer) in PetscViewerFlush_HDF5() argument
115 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerFlush_HDF5()
122 static PetscErrorCode PetscViewerDestroy_HDF5(PetscViewer viewer) in PetscViewerDestroy_HDF5() argument
124 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerDestroy_HDF5()
128 PetscCall(PetscViewerFileClose_HDF5(viewer)); in PetscViewerDestroy_HDF5()
137 PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileSetName_C", NULL)); in PetscViewerDestroy_HDF5()
138 PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileGetName_C", NULL)); in PetscViewerDestroy_HDF5()
139 PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileSetMode_C", NULL)); in PetscViewerDestroy_HDF5()
140 PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileGetMode_C", NULL)); in PetscViewerDestroy_HDF5()
141 …PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerHDF5SetBaseDimension2_C", NU… in PetscViewerDestroy_HDF5()
142 PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerHDF5SetSPOutput_C", NULL)); in PetscViewerDestroy_HDF5()
143 …PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerHDF5SetCollective_C", NULL)); in PetscViewerDestroy_HDF5()
144 …PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerHDF5GetCollective_C", NULL)); in PetscViewerDestroy_HDF5()
145 …PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerHDF5GetDefaultTimestepping_C… in PetscViewerDestroy_HDF5()
146 …PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerHDF5SetDefaultTimestepping_C… in PetscViewerDestroy_HDF5()
147 PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerHDF5SetCompress_C", NULL)); in PetscViewerDestroy_HDF5()
148 PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerHDF5GetCompress_C", NULL)); in PetscViewerDestroy_HDF5()
152 static PetscErrorCode PetscViewerFileSetMode_HDF5(PetscViewer viewer, PetscFileMode type) in PetscViewerFileSetMode_HDF5() argument
154 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerFileSetMode_HDF5()
161 static PetscErrorCode PetscViewerFileGetMode_HDF5(PetscViewer viewer, PetscFileMode *type) in PetscViewerFileGetMode_HDF5() argument
163 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerFileGetMode_HDF5()
170 static PetscErrorCode PetscViewerHDF5SetBaseDimension2_HDF5(PetscViewer viewer, PetscBool flg) in PetscViewerHDF5SetBaseDimension2_HDF5() argument
172 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5SetBaseDimension2_HDF5()
200 PetscErrorCode PetscViewerHDF5SetBaseDimension2(PetscViewer viewer, PetscBool flg) in PetscViewerHDF5SetBaseDimension2() argument
203 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5SetBaseDimension2()
204 …PetscTryMethod(viewer, "PetscViewerHDF5SetBaseDimension2_C", (PetscViewer, PetscBool), (viewer, fl… in PetscViewerHDF5SetBaseDimension2()
228 PetscErrorCode PetscViewerHDF5GetBaseDimension2(PetscViewer viewer, PetscBool *flg) in PetscViewerHDF5GetBaseDimension2() argument
230 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5GetBaseDimension2()
233 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5GetBaseDimension2()
238 static PetscErrorCode PetscViewerHDF5SetSPOutput_HDF5(PetscViewer viewer, PetscBool flg) in PetscViewerHDF5SetSPOutput_HDF5() argument
240 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5SetSPOutput_HDF5()
269 PetscErrorCode PetscViewerHDF5SetSPOutput(PetscViewer viewer, PetscBool flg) in PetscViewerHDF5SetSPOutput() argument
272 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5SetSPOutput()
273 PetscTryMethod(viewer, "PetscViewerHDF5SetSPOutput_C", (PetscViewer, PetscBool), (viewer, flg)); in PetscViewerHDF5SetSPOutput()
294 PetscErrorCode PetscViewerHDF5GetSPOutput(PetscViewer viewer, PetscBool *flg) in PetscViewerHDF5GetSPOutput() argument
296 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5GetSPOutput()
299 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5GetSPOutput()
304 static PetscErrorCode PetscViewerHDF5SetCollective_HDF5(PetscViewer viewer, PetscBool flg) in PetscViewerHDF5SetCollective_HDF5() argument
311 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5SetCollective_HDF5()
315 …if (flg) PetscCall(PetscPrintf(PetscObjectComm((PetscObject)viewer), "Warning: PetscViewerHDF5SetC… in PetscViewerHDF5SetCollective_HDF5()
345 PetscErrorCode PetscViewerHDF5SetCollective(PetscViewer viewer, PetscBool flg) in PetscViewerHDF5SetCollective() argument
348 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5SetCollective()
349 PetscValidLogicalCollectiveBool(viewer, flg, 2); in PetscViewerHDF5SetCollective()
350 PetscTryMethod(viewer, "PetscViewerHDF5SetCollective_C", (PetscViewer, PetscBool), (viewer, flg)); in PetscViewerHDF5SetCollective()
354 static PetscErrorCode PetscViewerHDF5GetCollective_HDF5(PetscViewer viewer, PetscBool *flg) in PetscViewerHDF5GetCollective_HDF5() argument
357 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5GetCollective_HDF5()
390 PetscErrorCode PetscViewerHDF5GetCollective(PetscViewer viewer, PetscBool *flg) in PetscViewerHDF5GetCollective() argument
393 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5GetCollective()
396 …PetscUseMethod(viewer, "PetscViewerHDF5GetCollective_C", (PetscViewer, PetscBool *), (viewer, flg)… in PetscViewerHDF5GetCollective()
400 static PetscErrorCode PetscViewerFileSetName_HDF5(PetscViewer viewer, const char name[]) in PetscViewerFileSetName_HDF5() argument
402 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerFileSetName_HDF5()
412 PetscCallHDF5(H5Pset_fapl_mpio, (plist_id, PetscObjectComm((PetscObject)viewer), MPI_INFO_NULL)); in PetscViewerFileSetName_HDF5()
421 PetscCallMPI(MPI_Comm_rank(PetscObjectComm((PetscObject)viewer), &rank)); in PetscViewerFileSetName_HDF5()
426 PetscCallMPI(MPI_Barrier(PetscObjectComm((PetscObject)viewer))); in PetscViewerFileSetName_HDF5()
442 …SETERRQ(PetscObjectComm((PetscObject)viewer), PETSC_ERR_ORDER, "Must call PetscViewerFileSetMode()… in PetscViewerFileSetName_HDF5()
444 …SETERRQ(PetscObjectComm((PetscObject)viewer), PETSC_ERR_SUP, "Unsupported file mode %s", PetscFile… in PetscViewerFileSetName_HDF5()
448 PetscCall(PetscViewerHDF5ResetAttachedDMPlexStorageVersion(viewer)); in PetscViewerFileSetName_HDF5()
452 static PetscErrorCode PetscViewerFileGetName_HDF5(PetscViewer viewer, const char **name) in PetscViewerFileGetName_HDF5() argument
454 PetscViewer_HDF5 *vhdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerFileGetName_HDF5()
461 static PetscErrorCode PetscViewerSetUp_HDF5(PetscViewer viewer) in PetscViewerSetUp_HDF5() argument
471 static PetscErrorCode PetscViewerHDF5SetDefaultTimestepping_HDF5(PetscViewer viewer, PetscBool flg) in PetscViewerHDF5SetDefaultTimestepping_HDF5() argument
473 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5SetDefaultTimestepping_HDF5()
480 static PetscErrorCode PetscViewerHDF5GetDefaultTimestepping_HDF5(PetscViewer viewer, PetscBool *flg) in PetscViewerHDF5GetDefaultTimestepping_HDF5() argument
482 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5GetDefaultTimestepping_HDF5()
508 PetscErrorCode PetscViewerHDF5SetDefaultTimestepping(PetscViewer viewer, PetscBool flg) in PetscViewerHDF5SetDefaultTimestepping() argument
511 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5SetDefaultTimestepping()
512 …PetscTryMethod(viewer, "PetscViewerHDF5SetDefaultTimestepping_C", (PetscViewer, PetscBool), (viewe… in PetscViewerHDF5SetDefaultTimestepping()
531 PetscErrorCode PetscViewerHDF5GetDefaultTimestepping(PetscViewer viewer, PetscBool *flg) in PetscViewerHDF5GetDefaultTimestepping() argument
534 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5GetDefaultTimestepping()
535 …PetscUseMethod(viewer, "PetscViewerHDF5GetDefaultTimestepping_C", (PetscViewer, PetscBool *), (vie… in PetscViewerHDF5GetDefaultTimestepping()
539 static PetscErrorCode PetscViewerHDF5SetCompress_HDF5(PetscViewer viewer, PetscBool flg) in PetscViewerHDF5SetCompress_HDF5() argument
541 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5SetCompress_HDF5()
548 static PetscErrorCode PetscViewerHDF5GetCompress_HDF5(PetscViewer viewer, PetscBool *flg) in PetscViewerHDF5GetCompress_HDF5() argument
550 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5GetCompress_HDF5()
573 PetscErrorCode PetscViewerHDF5SetCompress(PetscViewer viewer, PetscBool flg) in PetscViewerHDF5SetCompress() argument
576 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5SetCompress()
577 PetscTryMethod(viewer, "PetscViewerHDF5SetCompress_C", (PetscViewer, PetscBool), (viewer, flg)); in PetscViewerHDF5SetCompress()
596 PetscErrorCode PetscViewerHDF5GetCompress(PetscViewer viewer, PetscBool *flg) in PetscViewerHDF5GetCompress() argument
599 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5GetCompress()
600 PetscUseMethod(viewer, "PetscViewerHDF5GetCompress_C", (PetscViewer, PetscBool *), (viewer, flg)); in PetscViewerHDF5GetCompress()
720 PetscErrorCode PetscViewerHDF5GetFileId(PetscViewer viewer, hid_t *file_id) in PetscViewerHDF5GetFileId() argument
722 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5GetFileId()
725 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5GetFileId()
763 PetscErrorCode PetscViewerHDF5PushGroup(PetscViewer viewer, const char name[]) in PetscViewerHDF5PushGroup() argument
765 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5PushGroup()
772 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5PushGroup()
814 PetscErrorCode PetscViewerHDF5PopGroup(PetscViewer viewer) in PetscViewerHDF5PopGroup() argument
816 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5PopGroup()
820 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5PopGroup()
821 …PetscCheck(hdf5->groups, PetscObjectComm((PetscObject)viewer), PETSC_ERR_ARG_WRONGSTATE, "HDF5 gro… in PetscViewerHDF5PopGroup()
829 static PetscErrorCode PetscViewerHDF5GetGroup_Internal(PetscViewer viewer, const char *name[]) in PetscViewerHDF5GetGroup_Internal() argument
831 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5GetGroup_Internal()
834 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5GetGroup_Internal()
866 PetscErrorCode PetscViewerHDF5OpenGroup(PetscViewer viewer, const char path[], hid_t *fileId, hid_t… in PetscViewerHDF5OpenGroup() argument
875 PetscCall(PetscViewerWritable(viewer, &writable)); in PetscViewerHDF5OpenGroup()
876 PetscCall(PetscViewerHDF5GetFileId(viewer, &file_id)); in PetscViewerHDF5OpenGroup()
877 PetscCall(PetscViewerFileGetName(viewer, &fileName)); in PetscViewerHDF5OpenGroup()
878 PetscCall(PetscViewerHDF5GetGroup(viewer, path, &groupName)); in PetscViewerHDF5OpenGroup()
879 PetscCall(PetscViewerHDF5Traverse_Internal(viewer, groupName, writable, &has, &type)); in PetscViewerHDF5OpenGroup()
881 …PetscCheck(writable, PetscObjectComm((PetscObject)viewer), PETSC_ERR_FILE_UNEXPECTED, "Group %s do… in PetscViewerHDF5OpenGroup()
882 …SETERRQ(PetscObjectComm((PetscObject)viewer), PETSC_ERR_LIB, "HDF5 failed to create group %s altho… in PetscViewerHDF5OpenGroup()
884 …PetscCheck(type == H5O_TYPE_GROUP, PetscObjectComm((PetscObject)viewer), PETSC_ERR_FILE_UNEXPECTED… in PetscViewerHDF5OpenGroup()
910 PetscErrorCode PetscViewerHDF5WriteGroup(PetscViewer viewer, const char path[]) in PetscViewerHDF5WriteGroup() argument
915 …PetscCall(PetscViewerHDF5OpenGroup(viewer, path, &fileId, &groupId)); // make sure group is actual… in PetscViewerHDF5WriteGroup()
945 PetscErrorCode PetscViewerHDF5PushTimestepping(PetscViewer viewer) in PetscViewerHDF5PushTimestepping() argument
947 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5PushTimestepping()
950 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5PushTimestepping()
951 …PetscCheck(!hdf5->timestepping, PetscObjectComm((PetscObject)viewer), PETSC_ERR_ARG_WRONGSTATE, "T… in PetscViewerHDF5PushTimestepping()
972 PetscErrorCode PetscViewerHDF5PopTimestepping(PetscViewer viewer) in PetscViewerHDF5PopTimestepping() argument
974 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5PopTimestepping()
977 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5PopTimestepping()
978 …PetscCheck(hdf5->timestepping, PetscObjectComm((PetscObject)viewer), PETSC_ERR_ARG_WRONGSTATE, "Ti… in PetscViewerHDF5PopTimestepping()
1001 PetscErrorCode PetscViewerHDF5IsTimestepping(PetscViewer viewer, PetscBool *flg) in PetscViewerHDF5IsTimestepping() argument
1003 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5IsTimestepping()
1006 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5IsTimestepping()
1026 PetscErrorCode PetscViewerHDF5IncrementTimestep(PetscViewer viewer) in PetscViewerHDF5IncrementTimestep() argument
1028 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5IncrementTimestep()
1031 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5IncrementTimestep()
1032 …PetscCheck(hdf5->timestepping, PetscObjectComm((PetscObject)viewer), PETSC_ERR_ARG_WRONGSTATE, "Ti… in PetscViewerHDF5IncrementTimestep()
1053 PetscErrorCode PetscViewerHDF5SetTimestep(PetscViewer viewer, PetscInt timestep) in PetscViewerHDF5SetTimestep() argument
1055 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5SetTimestep()
1058 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5SetTimestep()
1059 PetscValidLogicalCollectiveInt(viewer, timestep, 2); in PetscViewerHDF5SetTimestep()
1060 …PetscCheck(timestep >= 0, PetscObjectComm((PetscObject)viewer), PETSC_ERR_ARG_WRONGSTATE, "Timeste… in PetscViewerHDF5SetTimestep()
1061 …PetscCheck(hdf5->timestepping, PetscObjectComm((PetscObject)viewer), PETSC_ERR_ARG_WRONGSTATE, "Ti… in PetscViewerHDF5SetTimestep()
1084 PetscErrorCode PetscViewerHDF5GetTimestep(PetscViewer viewer, PetscInt *timestep) in PetscViewerHDF5GetTimestep() argument
1086 PetscViewer_HDF5 *hdf5 = (PetscViewer_HDF5 *)viewer->data; in PetscViewerHDF5GetTimestep()
1089 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5GetTimestep()
1091 …PetscCheck(hdf5->timestepping, PetscObjectComm((PetscObject)viewer), PETSC_ERR_ARG_WRONGSTATE, "Ti… in PetscViewerHDF5GetTimestep()
1182 PetscErrorCode PetscViewerHDF5WriteAttribute(PetscViewer viewer, const char parent[], const char na… in PetscViewerHDF5WriteAttribute() argument
1189 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5WriteAttribute()
1192 PetscValidLogicalCollectiveEnum(viewer, datatype, 4); in PetscViewerHDF5WriteAttribute()
1194 PetscCall(PetscViewerHDF5GetGroup(viewer, parent, &parentAbsPath)); in PetscViewerHDF5WriteAttribute()
1195 PetscCall(PetscViewerHDF5Traverse_Internal(viewer, parentAbsPath, PETSC_TRUE, NULL, NULL)); in PetscViewerHDF5WriteAttribute()
1196 PetscCall(PetscViewerHDF5HasAttribute_Internal(viewer, parentAbsPath, name, &has)); in PetscViewerHDF5WriteAttribute()
1203 PetscCall(PetscViewerHDF5GetFileId(viewer, &h5)); in PetscViewerHDF5WriteAttribute()
1241 PetscErrorCode PetscViewerHDF5WriteObjectAttribute(PetscViewer viewer, PetscObject obj, const char … in PetscViewerHDF5WriteObjectAttribute() argument
1244 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5WriteObjectAttribute()
1248 PetscCall(PetscViewerHDF5CheckNamedObject_Internal(viewer, obj)); in PetscViewerHDF5WriteObjectAttribute()
1249 PetscCall(PetscViewerHDF5WriteAttribute(viewer, obj->name, name, datatype, value)); in PetscViewerHDF5WriteObjectAttribute()
1288 PetscErrorCode PetscViewerHDF5ReadAttribute(PetscViewer viewer, const char parent[], const char nam… in PetscViewerHDF5ReadAttribute() argument
1295 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5ReadAttribute()
1301 PetscCall(PetscViewerHDF5GetGroup(viewer, parent, &parentAbsPath)); in PetscViewerHDF5ReadAttribute()
1302 PetscCall(PetscViewerHDF5Traverse_Internal(viewer, parentAbsPath, PETSC_FALSE, &has, NULL)); in PetscViewerHDF5ReadAttribute()
1303 if (has) PetscCall(PetscViewerHDF5HasAttribute_Internal(viewer, parentAbsPath, name, &has)); in PetscViewerHDF5ReadAttribute()
1317 …} else SETERRQ(PetscObjectComm((PetscObject)viewer), PETSC_ERR_FILE_UNEXPECTED, "Attribute %s/%s d… in PetscViewerHDF5ReadAttribute()
1319 PetscCall(PetscViewerHDF5GetFileId(viewer, &h5)); in PetscViewerHDF5ReadAttribute()
1363 PetscErrorCode PetscViewerHDF5ReadObjectAttribute(PetscViewer viewer, PetscObject obj, const char n… in PetscViewerHDF5ReadObjectAttribute() argument
1366 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5ReadObjectAttribute()
1370 PetscCall(PetscViewerHDF5CheckNamedObject_Internal(viewer, obj)); in PetscViewerHDF5ReadObjectAttribute()
1371 PetscCall(PetscViewerHDF5ReadAttribute(viewer, obj->name, name, datatype, defaultValue, value)); in PetscViewerHDF5ReadObjectAttribute()
1392 static PetscErrorCode PetscViewerHDF5Traverse_Internal(PetscViewer viewer, const char name[], Petsc… in PetscViewerHDF5Traverse_Internal() argument
1403 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5Traverse_Internal()
1414 PetscCall(PetscViewerHDF5GetFileId(viewer, &h5)); in PetscViewerHDF5Traverse_Internal()
1473 PetscErrorCode PetscViewerHDF5HasGroup(PetscViewer viewer, const char path[], PetscBool *has) in PetscViewerHDF5HasGroup() argument
1479 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5HasGroup()
1482 PetscCall(PetscViewerHDF5GetGroup(viewer, path, &abspath)); in PetscViewerHDF5HasGroup()
1483 PetscCall(PetscViewerHDF5Traverse_Internal(viewer, abspath, PETSC_FALSE, NULL, &type)); in PetscViewerHDF5HasGroup()
1512 PetscErrorCode PetscViewerHDF5HasDataset(PetscViewer viewer, const char path[], PetscBool *has) in PetscViewerHDF5HasDataset() argument
1518 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5HasDataset()
1521 PetscCall(PetscViewerHDF5GetGroup(viewer, path, &abspath)); in PetscViewerHDF5HasDataset()
1522 PetscCall(PetscViewerHDF5Traverse_Internal(viewer, abspath, PETSC_FALSE, NULL, &type)); in PetscViewerHDF5HasDataset()
1549 PetscErrorCode PetscViewerHDF5HasObject(PetscViewer viewer, PetscObject obj, PetscBool *has) in PetscViewerHDF5HasObject() argument
1554 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5HasObject()
1558 …PetscCheck(len, PetscObjectComm((PetscObject)viewer), PETSC_ERR_ARG_WRONG, "Object must be named"); in PetscViewerHDF5HasObject()
1559 PetscCall(PetscViewerHDF5HasDataset(viewer, obj->name, has)); in PetscViewerHDF5HasObject()
1583 PetscErrorCode PetscViewerHDF5HasAttribute(PetscViewer viewer, const char parent[], const char name… in PetscViewerHDF5HasAttribute() argument
1588 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5HasAttribute()
1592 PetscCall(PetscViewerHDF5GetGroup(viewer, parent, &parentAbsPath)); in PetscViewerHDF5HasAttribute()
1593 PetscCall(PetscViewerHDF5Traverse_Internal(viewer, parentAbsPath, PETSC_FALSE, has, NULL)); in PetscViewerHDF5HasAttribute()
1594 if (*has) PetscCall(PetscViewerHDF5HasAttribute_Internal(viewer, parentAbsPath, name, has)); in PetscViewerHDF5HasAttribute()
1620 PetscErrorCode PetscViewerHDF5HasObjectAttribute(PetscViewer viewer, PetscObject obj, const char na… in PetscViewerHDF5HasObjectAttribute() argument
1623 PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1); in PetscViewerHDF5HasObjectAttribute()
1627 PetscCall(PetscViewerHDF5CheckNamedObject_Internal(viewer, obj)); in PetscViewerHDF5HasObjectAttribute()
1628 PetscCall(PetscViewerHDF5HasAttribute(viewer, obj->name, name, has)); in PetscViewerHDF5HasObjectAttribute()
1632 static PetscErrorCode PetscViewerHDF5HasAttribute_Internal(PetscViewer viewer, const char parent[],… in PetscViewerHDF5HasAttribute_Internal() argument
1638 PetscCall(PetscViewerHDF5GetFileId(viewer, &h5)); in PetscViewerHDF5HasAttribute_Internal()
1681 PetscViewer viewer; in PETSC_VIEWER_HDF5_() local
1698 mpi_ierr = MPI_Comm_get_attr(ncomm, Petsc_Viewer_HDF5_keyval, (void **)&viewer, &iflg); in PETSC_VIEWER_HDF5_()
1716 ierr = PetscViewerHDF5Open(ncomm, fname, FILE_MODE_WRITE, &viewer); in PETSC_VIEWER_HDF5_()
1721 ierr = PetscObjectRegisterDestroy((PetscObject)viewer); in PETSC_VIEWER_HDF5_()
1726 mpi_ierr = MPI_Comm_set_attr(ncomm, Petsc_Viewer_HDF5_keyval, (void *)viewer); in PETSC_VIEWER_HDF5_()
1737 PetscFunctionReturn(viewer); in PETSC_VIEWER_HDF5_()