xref: /petsc/include/petscviewer.h (revision 5ef9f2a5cf905ed65136deff0c9e7fca368161b7)
1 /* $Id: viewer.h,v 1.65 1999/01/14 17:01:45 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_Private(char*,char*,char*,int(*)(Viewer));
32 #if defined(USE_DYNAMIC_LIBRARIES)
33 #define ViewerRegister(a,b,c,d) ViewerRegister_Private(a,b,c,0)
34 #else
35 #define ViewerRegister(a,b,c,d) ViewerRegister_Private(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 
54 #define VIEWER_FORMAT_ASCII_DEFAULT       0
55 #define VIEWER_FORMAT_ASCII_MATLAB        1
56 #define VIEWER_FORMAT_ASCII_IMPL          2
57 #define VIEWER_FORMAT_ASCII_INFO          3
58 #define VIEWER_FORMAT_ASCII_INFO_LONG     4
59 #define VIEWER_FORMAT_ASCII_COMMON        5
60 #define VIEWER_FORMAT_ASCII_SYMMODU       6
61 #define VIEWER_FORMAT_ASCII_INDEX         7
62 #define VIEWER_FORMAT_ASCII_DENSE         8
63 
64 #define VIEWER_FORMAT_BINARY_DEFAULT      0
65 #define VIEWER_FORMAT_BINARY_NATIVE       1
66 
67 #define VIEWER_FORMAT_DRAW_BASIC          0
68 #define VIEWER_FORMAT_DRAW_LG             1
69 #define VIEWER_FORMAT_DRAW_CONTOUR        2
70 
71 extern int    ViewerSetFormat(Viewer,int,char[]);
72 extern int    ViewerPushFormat(Viewer,int,char[]);
73 extern int    ViewerPopFormat(Viewer);
74 extern int    ViewerGetFormat(Viewer,int*);
75 extern int    ViewerFlush(Viewer);
76 
77 /*
78    Operations explicit to a particular class of viewers
79 */
80 extern int ViewerASCIIGetPointer(Viewer,FILE**);
81 extern int ViewerASCIIPrintf(Viewer,const char[],...);
82 extern int ViewerASCIIPushTab(Viewer);
83 extern int ViewerASCIIPopTab(Viewer);
84 extern int ViewerBinaryGetDescriptor(Viewer,int*);
85 extern int ViewerBinaryGetInfoPointer(Viewer,FILE **);
86 extern int ViewerBinarySetType(Viewer,ViewerBinaryType);
87 extern int ViewerStringSPrintf(Viewer,char *,...);
88 extern int ViewerStringSetString(Viewer,char[],int);
89 extern int ViewerDrawClear(Viewer);
90 extern int ViewerDrawSetInfo(Viewer,const char[],const char[],int,int,int,int);
91 extern int ViewerSocketSetConnection(Viewer,const char[],int);
92 
93 extern int ViewerSetFilename(Viewer,const char[]);
94 
95 /*
96      These are all the default viewers that do not have
97    to be explicitly opened
98 */
99 extern Viewer VIEWER_STDOUT_SELF;
100 extern Viewer VIEWER_STDERR_SELF;
101 extern Viewer VIEWER_STDOUT_WORLD;
102 extern Viewer VIEWER_STDOUT_(MPI_Comm);
103 extern int    VIEWER_STDOUT_Destroy(MPI_Comm);
104 extern Viewer VIEWER_STDERR_WORLD;
105 extern Viewer VIEWER_STDERR_(MPI_Comm);
106 extern int    VIEWER_STDERR_Destroy(MPI_Comm);
107 extern Viewer VIEWER_DRAW_WORLD_PRIVATE_0;
108 extern Viewer VIEWER_DRAW_WORLD_PRIVATE_1;
109 extern Viewer VIEWER_DRAW_WORLD_PRIVATE_2;
110 extern Viewer VIEWER_DRAW_SELF_PRIVATE;
111 extern Viewer VIEWER_SOCKET_WORLD_PRIVATE;
112 extern Viewer VIEWER_SOCKET_SELF_PRIVATE;  /* not yet used */
113 
114 extern int    ViewerInitializeDrawWorld_Private_0(void);
115 extern int    ViewerInitializeDrawWorld_Private_1(void);
116 extern int    ViewerInitializeDrawWorld_Private_2(void);
117 extern int    ViewerInitializeDrawSelf_Private(void);
118 extern int    ViewerInitializeSocketWorld_Private(void);
119 extern Viewer VIEWER_DRAW_(MPI_Comm);
120 extern int    VIEWER_DRAW_Destroy(MPI_Comm);
121 extern Viewer VIEWER_SOCKET_(MPI_Comm);
122 extern int    VIEWER_SOCKET_Destroy(MPI_Comm);
123 
124 #define VIEWER_DRAW_WORLD_0 \
125               (ViewerInitializeDrawWorld_Private_0(),VIEWER_DRAW_WORLD_PRIVATE_0)
126 #define VIEWER_DRAW_WORLD_1 \
127               (ViewerInitializeDrawWorld_Private_1(),VIEWER_DRAW_WORLD_PRIVATE_1)
128 #define VIEWER_DRAW_WORLD_2 \
129               (ViewerInitializeDrawWorld_Private_2(),VIEWER_DRAW_WORLD_PRIVATE_2)
130 
131 #define VIEWER_DRAW_SELF \
132               (ViewerInitializeDrawSelf_Private(),VIEWER_DRAW_SELF_PRIVATE)
133 #define VIEWER_DRAW_WORLD VIEWER_DRAW_WORLD_0
134 
135 #define VIEWER_SOCKET_WORLD \
136         (ViewerInitializeSocketWorld_Private(),VIEWER_SOCKET_WORLD_PRIVATE)
137 
138 /*
139     Viewer based on the ALICE Memory Snooper
140 */
141 #if defined(HAVE_AMS)
142 #include "ams.h"
143 extern int    ViewerAMSGetAMSComm(Viewer,AMS_Comm *);
144 extern int    ViewerAMSOpen(MPI_Comm,const char[],Viewer*);
145 extern Viewer VIEWER_AMS_(MPI_Comm);
146 extern int    VIEWER_AMS_Destroy(MPI_Comm);
147 extern Viewer VIEWER_AMS_WORLD_PRIVATE;
148 extern int    ViewerInitializeAMSWorld_Private(void);
149 #define VIEWER_AMS_WORLD (ViewerInitializeAMSWorld_Private(),VIEWER_AMS_WORLD_PRIVATE)
150 #endif
151 
152 /*
153     Viewer utility routines used by PETSc that are not normally used
154    by users.
155 */
156 extern int  ViewerSocketPutScalar_Private(Viewer,int,int,Scalar*);
157 extern int  ViewerSocketPutDouble_Private(Viewer,int,int,double*);
158 extern int  ViewerSocketPutInt_Private(Viewer,int,int*);
159 extern int  ViewerSocketPutSparse_Private(Viewer,int,int,int,Scalar*,int*,int *);
160 extern int  ViewerInitializeASCII_Private(void);
161 extern int  ViewerDestroyASCII_Private(void);
162 extern int  ViewerDestroyDraw_Private(void);
163 extern int  ViewerDestroySocket_Private(void);
164 extern int  ViewerDestroyAMS_Private(void);
165 
166 #endif
167 
168