1 /* $Id: viewer.h,v 1.71 1999/11/05 14:48:27 bsmith Exp bsmith $ */ 2 /* 3 Viewers are objects where other objects can be looked at or stored. 4 */ 5 6 #if !defined(__VIEWER_H) 7 #define __VIEWER_H 8 9 typedef struct _p_Viewer* Viewer; 10 11 /* 12 petsc.h must be included AFTER the definition of Viewer for ADIC to 13 process correctly. 14 */ 15 #include "petsc.h" 16 17 #define VIEWER_COOKIE PETSC_COOKIE+1 18 typedef char* ViewerType; 19 20 #define SOCKET_VIEWER "socket" 21 #define ASCII_VIEWER "ascii" 22 #define BINARY_VIEWER "binary" 23 #define STRING_VIEWER "string" 24 #define DRAW_VIEWER "draw" 25 #define AMS_VIEWER "ams" 26 27 extern FList ViewerList; 28 extern int ViewerRegisterAll(char *); 29 extern int ViewerRegisterDestroy(void); 30 31 extern int ViewerRegister(char*,char*,char*,int(*)(Viewer)); 32 #if defined(PETSC_USE_DYNAMIC_LIBRARIES) 33 #define ViewerRegisterDynamic(a,b,c,d) ViewerRegister(a,b,c,0) 34 #else 35 #define ViewerRegisterDynamic(a,b,c,d) ViewerRegister(a,b,c,d) 36 #endif 37 extern int ViewerCreate(MPI_Comm,Viewer*); 38 extern int ViewerSetFromOptions(Viewer); 39 40 41 extern int ViewerASCIIOpen(MPI_Comm,const char[],Viewer*); 42 typedef enum {BINARY_RDONLY, BINARY_WRONLY, BINARY_CREATE} ViewerBinaryType; 43 extern int ViewerBinaryOpen(MPI_Comm,const char[],ViewerBinaryType,Viewer*); 44 extern int ViewerSocketOpen(MPI_Comm,const char[],int,Viewer*); 45 extern int ViewerStringOpen(MPI_Comm,char[],int, Viewer*); 46 extern int ViewerDrawOpen(MPI_Comm,const char[],const char[],int,int,int,int,Viewer*); 47 extern int ViewerAMSSetCommName(Viewer,const char[]); 48 49 extern int ViewerGetOutputname(Viewer,char**); 50 extern int ViewerGetType(Viewer,ViewerType*); 51 extern int ViewerSetType(Viewer,ViewerType); 52 extern int ViewerDestroy(Viewer); 53 extern int ViewerGetSingleton(Viewer,Viewer*); 54 extern int ViewerRestoreSingleton(Viewer,Viewer*); 55 56 #define VIEWER_FORMAT_ASCII_DEFAULT 0 57 #define VIEWER_FORMAT_ASCII_MATLAB 1 58 #define VIEWER_FORMAT_ASCII_IMPL 2 59 #define VIEWER_FORMAT_ASCII_INFO 3 60 #define VIEWER_FORMAT_ASCII_INFO_LONG 4 61 #define VIEWER_FORMAT_ASCII_COMMON 5 62 #define VIEWER_FORMAT_ASCII_SYMMODU 6 63 #define VIEWER_FORMAT_ASCII_INDEX 7 64 #define VIEWER_FORMAT_ASCII_DENSE 8 65 66 #define VIEWER_FORMAT_BINARY_DEFAULT 9 67 #define VIEWER_FORMAT_BINARY_NATIVE 10 68 69 #define VIEWER_FORMAT_DRAW_BASIC 11 70 #define VIEWER_FORMAT_DRAW_LG 12 71 #define VIEWER_FORMAT_DRAW_CONTOUR 13 72 #define VIEWER_FORMAT_DRAW_PORTS 15 73 74 #define VIEWER_FORMAT_NATIVE 14 75 76 extern int ViewerSetFormat(Viewer,int,char[]); 77 extern int ViewerPushFormat(Viewer,int,char[]); 78 extern int ViewerPopFormat(Viewer); 79 extern int ViewerGetFormat(Viewer,int*); 80 extern int ViewerFlush(Viewer); 81 82 /* 83 Operations explicit to a particular class of viewers 84 */ 85 extern int ViewerASCIIGetPointer(Viewer,FILE**); 86 extern int ViewerASCIIPrintf(Viewer,const char[],...); 87 extern int ViewerASCIISynchronizedPrintf(Viewer,const char[],...); 88 extern int ViewerASCIIPushTab(Viewer); 89 extern int ViewerASCIIPopTab(Viewer); 90 extern int ViewerASCIIUseTabs(Viewer,PetscTruth); 91 extern int ViewerBinaryGetDescriptor(Viewer,int*); 92 extern int ViewerBinaryGetInfoPointer(Viewer,FILE **); 93 extern int ViewerBinarySetType(Viewer,ViewerBinaryType); 94 extern int ViewerStringSPrintf(Viewer,char *,...); 95 extern int ViewerStringSetString(Viewer,char[],int); 96 extern int ViewerDrawClear(Viewer); 97 extern int ViewerDrawSetInfo(Viewer,const char[],const char[],int,int,int,int); 98 extern int ViewerSocketSetConnection(Viewer,const char[],int); 99 100 extern int ViewerSetFilename(Viewer,const char[]); 101 extern int ViewerGetFilename(Viewer,char**); 102 103 /* 104 These are all the default viewers that do not have 105 to be explicitly opened 106 */ 107 extern Viewer VIEWER_STDOUT_SELF; 108 extern Viewer VIEWER_STDERR_SELF; 109 extern Viewer VIEWER_STDOUT_WORLD; 110 extern Viewer VIEWER_STDOUT_(MPI_Comm); 111 extern int VIEWER_STDOUT_Destroy(MPI_Comm); 112 extern Viewer VIEWER_STDERR_WORLD; 113 extern Viewer VIEWER_STDERR_(MPI_Comm); 114 extern int VIEWER_STDERR_Destroy(MPI_Comm); 115 extern Viewer VIEWER_DRAW_WORLD_PRIVATE_0; 116 extern Viewer VIEWER_DRAW_WORLD_PRIVATE_1; 117 extern Viewer VIEWER_DRAW_WORLD_PRIVATE_2; 118 extern Viewer VIEWER_DRAW_SELF_PRIVATE; 119 extern Viewer VIEWER_SOCKET_WORLD_PRIVATE; 120 extern Viewer VIEWER_SOCKET_SELF_PRIVATE; /* not yet used */ 121 122 extern int ViewerInitializeDrawWorld_Private_0(void); 123 extern int ViewerInitializeDrawWorld_Private_1(void); 124 extern int ViewerInitializeDrawWorld_Private_2(void); 125 extern int ViewerInitializeDrawSelf_Private(void); 126 extern int ViewerInitializeSocketWorld_Private(void); 127 extern Viewer VIEWER_DRAW_(MPI_Comm); 128 extern int VIEWER_DRAW_Destroy(MPI_Comm); 129 extern Viewer VIEWER_SOCKET_(MPI_Comm); 130 extern int VIEWER_SOCKET_Destroy(MPI_Comm); 131 132 #define VIEWER_DRAW_WORLD_0 \ 133 (ViewerInitializeDrawWorld_Private_0(),VIEWER_DRAW_WORLD_PRIVATE_0) 134 #define VIEWER_DRAW_WORLD_1 \ 135 (ViewerInitializeDrawWorld_Private_1(),VIEWER_DRAW_WORLD_PRIVATE_1) 136 #define VIEWER_DRAW_WORLD_2 \ 137 (ViewerInitializeDrawWorld_Private_2(),VIEWER_DRAW_WORLD_PRIVATE_2) 138 139 #define VIEWER_DRAW_SELF \ 140 (ViewerInitializeDrawSelf_Private(),VIEWER_DRAW_SELF_PRIVATE) 141 #define VIEWER_DRAW_WORLD VIEWER_DRAW_WORLD_0 142 143 #define VIEWER_SOCKET_WORLD \ 144 (ViewerInitializeSocketWorld_Private(),VIEWER_SOCKET_WORLD_PRIVATE) 145 146 /* 147 Viewer based on the ALICE Memory Snooper 148 */ 149 #if defined(PETSC_HAVE_AMS) 150 #include "ams.h" 151 extern int ViewerAMSGetAMSComm(Viewer,AMS_Comm *); 152 extern int ViewerAMSOpen(MPI_Comm,const char[],Viewer*); 153 extern Viewer VIEWER_AMS_(MPI_Comm); 154 extern int VIEWER_AMS_Destroy(MPI_Comm); 155 extern Viewer VIEWER_AMS_WORLD_PRIVATE; 156 extern int ViewerInitializeAMSWorld_Private(void); 157 #define VIEWER_AMS_WORLD (ViewerInitializeAMSWorld_Private(),VIEWER_AMS_WORLD_PRIVATE) 158 #endif 159 160 /* 161 Viewer utility routines used by PETSc that are not normally used 162 by users. 163 */ 164 extern int ViewerSocketPutScalar_Private(Viewer,int,int,Scalar*); 165 extern int ViewerSocketPutDouble_Private(Viewer,int,int,double*); 166 extern int ViewerSocketPutInt_Private(Viewer,int,int*); 167 extern int ViewerSocketPutSparse_Private(Viewer,int,int,int,Scalar*,int*,int *); 168 extern int ViewerInitializeASCII_Private(void); 169 extern int ViewerDestroyASCII_Private(void); 170 extern int ViewerDestroyDraw_Private(void); 171 extern int ViewerDestroySocket_Private(void); 172 extern int ViewerDestroyAMS_Private(void); 173 174 /* 175 Manages sets of viewers 176 */ 177 typedef struct _p_Viewers* Viewers; 178 extern int ViewersCreate(MPI_Comm,Viewers*); 179 extern int ViewersDestroy(Viewers); 180 extern int ViewersGetViewer(Viewers,int,Viewer*); 181 182 #endif 183 184