20 static PetscErrorCode PetscViewerFileClose_VU(PetscViewer viewer)  in PetscViewerFileClose_VU()  argument
22   PetscViewer_VU *vu = (PetscViewer_VU *)viewer->data;  in PetscViewerFileClose_VU()
25   if (vu->vecSeen) PetscCall(PetscViewerVUPrintDeferred(viewer, "};\n\n"));  in PetscViewerFileClose_VU()
26   PetscCall(PetscViewerVUFlushDeferred(viewer));  in PetscViewerFileClose_VU()
27   PetscCall(PetscFClose(PetscObjectComm((PetscObject)viewer), vu->fd));  in PetscViewerFileClose_VU()
33 static PetscErrorCode PetscViewerDestroy_VU(PetscViewer viewer)  in PetscViewerDestroy_VU()  argument
35   PetscViewer_VU *vu = (PetscViewer_VU *)viewer->data;  in PetscViewerDestroy_VU()
38   PetscCall(PetscViewerFileClose_VU(viewer));  in PetscViewerDestroy_VU()
40   PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileSetName_C", NULL));  in PetscViewerDestroy_VU()
41   PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileGetName_C", NULL));  in PetscViewerDestroy_VU()
42   PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileSetMode_C", NULL));  in PetscViewerDestroy_VU()
43   PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileGetMode_C", NULL));  in PetscViewerDestroy_VU()
47 static PetscErrorCode PetscViewerFlush_VU(PetscViewer viewer)  in PetscViewerFlush_VU()  argument
52   PetscCallMPI(MPI_Comm_rank(PetscObjectComm((PetscObject)viewer), &rank));  in PetscViewerFlush_VU()
53   if (rank == 0) PetscCall(PetscFFlush(((PetscViewer_VU *)viewer->data)->fd));  in PetscViewerFlush_VU()
57 static PetscErrorCode PetscViewerFileSetMode_VU(PetscViewer viewer, PetscFileMode mode)  in PetscViewerFileSetMode_VU()  argument
59   PetscViewer_VU *vu = (PetscViewer_VU *)viewer->data;  in PetscViewerFileSetMode_VU()
66 static PetscErrorCode PetscViewerFileGetMode_VU(PetscViewer viewer, PetscFileMode *type)  in PetscViewerFileGetMode_VU()  argument
68   PetscViewer_VU *vu = (PetscViewer_VU *)viewer->data;  in PetscViewerFileGetMode_VU()
75 static PetscErrorCode PetscViewerFileGetName_VU(PetscViewer viewer, const char **name)  in PetscViewerFileGetName_VU()  argument
77   PetscViewer_VU *vu = (PetscViewer_VU *)viewer->data;  in PetscViewerFileGetName_VU()
84 static PetscErrorCode PetscViewerFileSetName_VU(PetscViewer viewer, const char name[])  in PetscViewerFileSetName_VU()  argument
86   PetscViewer_VU *vu = (PetscViewer_VU *)viewer->data;  in PetscViewerFileSetName_VU()
92   PetscCall(PetscViewerFileClose_VU(viewer));  in PetscViewerFileSetName_VU()
93   PetscCallMPI(MPI_Comm_rank(PetscObjectComm((PetscObject)viewer), &rank));  in PetscViewerFileSetName_VU()
123 …SETERRQ(PetscObjectComm((PetscObject)viewer), PETSC_ERR_SUP, "Unsupported file mode %s", PetscFile…  in PetscViewerFileSetName_VU()
127   PetscCall(PetscLogObjectState((PetscObject)viewer, "File: %s", name));  in PetscViewerFileSetName_VU()
139 PETSC_EXTERN PetscErrorCode PetscViewerCreate_VU(PetscViewer viewer)  in PetscViewerCreate_VU()  argument
145   viewer->data = (void *)vu;  in PetscViewerCreate_VU()
147   viewer->ops->destroy          = PetscViewerDestroy_VU;  in PetscViewerCreate_VU()
148   viewer->ops->flush            = PetscViewerFlush_VU;  in PetscViewerCreate_VU()
149   viewer->ops->getsubviewer     = NULL;  in PetscViewerCreate_VU()
150   viewer->ops->restoresubviewer = NULL;  in PetscViewerCreate_VU()
160 …PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileSetName_C", PetscViewerF…  in PetscViewerCreate_VU()
161 …PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileGetName_C", PetscViewerF…  in PetscViewerCreate_VU()
162 …PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileSetMode_C", PetscViewerF…  in PetscViewerCreate_VU()
163 …PetscCall(PetscObjectComposeFunction((PetscObject)viewer, "PetscViewerFileGetMode_C", PetscViewerF…  in PetscViewerCreate_VU()
182 PetscErrorCode PetscViewerVUGetPointer(PetscViewer viewer, FILE **fd)  in PetscViewerVUGetPointer()  argument
184   PetscViewer_VU *vu = (PetscViewer_VU *)viewer->data;  in PetscViewerVUGetPointer()
187   PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1);  in PetscViewerVUGetPointer()
207 PetscErrorCode PetscViewerVUSetVecSeen(PetscViewer viewer, PetscBool vecSeen)  in PetscViewerVUSetVecSeen()  argument
209   PetscViewer_VU *vu = (PetscViewer_VU *)viewer->data;  in PetscViewerVUSetVecSeen()
232 PetscErrorCode PetscViewerVUGetVecSeen(PetscViewer viewer, PetscBool *vecSeen)  in PetscViewerVUGetVecSeen()  argument
234   PetscViewer_VU *vu = (PetscViewer_VU *)viewer->data;  in PetscViewerVUGetVecSeen()
237   PetscValidHeaderSpecific(viewer, PETSC_VIEWER_CLASSID, 1);  in PetscViewerVUGetVecSeen()
256 PetscErrorCode PetscViewerVUPrintDeferred(PetscViewer viewer, const char format[], ...)  in PetscViewerVUPrintDeferred()  argument
258   PetscViewer_VU *vu = (PetscViewer_VU *)viewer->data;  in PetscViewerVUPrintDeferred()
293 PetscErrorCode PetscViewerVUFlushDeferred(PetscViewer viewer)  in PetscViewerVUFlushDeferred()  argument
295   PetscViewer_VU *vu   = (PetscViewer_VU *)viewer->data;  in PetscViewerVUFlushDeferred()
302     PetscCall(PetscFPrintf(PetscObjectComm((PetscObject)viewer), vu->fd, "%s", next->string));  in PetscViewerVUFlushDeferred()