1 /* 2 Interface to the PETSc graphics (currently only support for X-windows 3 */ 4 #if !defined(__PETSCDRAW_H) 5 #define __PETSCDRAW_H 6 #include <petscsys.h> 7 8 PETSC_EXTERN PetscClassId PETSC_DRAW_CLASSID; 9 10 /*J 11 PetscDrawType - String with the name of a PetscDraw 12 13 Level: beginner 14 15 .seealso: PetscDrawSetType(), PetscDraw, PetscViewer 16 J*/ 17 typedef const char* PetscDrawType; 18 #define PETSC_DRAW_X "x" 19 #define PETSC_DRAW_GLUT "glut" 20 #define PETSC_DRAW_OPENGLES "opengles" 21 #define PETSC_DRAW_NULL "null" 22 #define PETSC_DRAW_WIN32 "win32" 23 24 /*S 25 PetscDraw - Abstract PETSc object for graphics 26 27 Level: beginner 28 29 Concepts: graphics 30 31 .seealso: PetscDrawCreate(), PetscDrawSetType(), PetscDrawType 32 S*/ 33 typedef struct _p_PetscDraw* PetscDraw; 34 35 PETSC_EXTERN PetscFList PetscDrawList; 36 PETSC_EXTERN PetscErrorCode PetscDrawRegisterAll(const char[]); 37 PETSC_EXTERN PetscErrorCode PetscDrawInitializePackage(const char[]); 38 PETSC_EXTERN PetscErrorCode PetscDrawRegisterDestroy(void); 39 40 PETSC_EXTERN PetscErrorCode PetscDrawRegister(const char*,const char*,const char*,PetscErrorCode(*)(PetscDraw)); 41 42 /*MC 43 PetscDrawRegisterDynamic - Adds a method to the Krylov subspace solver package. 44 45 Synopsis: 46 PetscErrorCode PetscDrawRegisterDynamic(const char *name_solver,const char *path,const char *name_create,PetscErrorCode (*routine_create)(PetscDraw)) 47 48 Not Collective 49 50 Input Parameters: 51 + name_solver - name of a new user-defined solver 52 . path - path (either absolute or relative) the library containing this solver 53 . name_create - name of routine to create method context 54 - routine_create - routine to create method context 55 56 Level: developer 57 58 Notes: 59 PetscDrawRegisterDynamic() may be called multiple times to add several user-defined solvers. 60 61 If dynamic libraries are used, then the fourth input argument (routine_create) 62 is ignored. 63 64 Sample usage: 65 .vb 66 PetscDrawRegisterDynamic("my_draw_type",/home/username/my_lib/lib/libO/solaris/mylib.a, 67 "MyDrawCreate",MyDrawCreate); 68 .ve 69 70 Then, your solver can be chosen with the procedural interface via 71 $ PetscDrawSetType(ksp,"my_draw_type") 72 or at runtime via the option 73 $ -draw_type my_draw_type 74 75 Concepts: graphics^registering new draw classes 76 Concepts: PetscDraw^registering new draw classes 77 78 .seealso: PetscDrawRegisterAll(), PetscDrawRegisterDestroy() 79 M*/ 80 #if defined(PETSC_USE_DYNAMIC_LIBRARIES) 81 #define PetscDrawRegisterDynamic(a,b,c,d) PetscDrawRegister(a,b,c,0) 82 #else 83 #define PetscDrawRegisterDynamic(a,b,c,d) PetscDrawRegister(a,b,c,d) 84 #endif 85 86 PETSC_EXTERN PetscErrorCode PetscDrawGetType(PetscDraw,PetscDrawType*); 87 PETSC_EXTERN PetscErrorCode PetscDrawSetType(PetscDraw,PetscDrawType); 88 PETSC_EXTERN PetscErrorCode PetscDrawCreate(MPI_Comm,const char[],const char[],int,int,int,int,PetscDraw*); 89 PETSC_EXTERN PetscErrorCode PetscDrawSetFromOptions(PetscDraw); 90 PETSC_EXTERN PetscErrorCode PetscDrawSetSave(PetscDraw,const char*,PetscBool); 91 92 /* 93 Number of basic colors in the draw routines, the others are used 94 for a uniform colormap. 95 */ 96 #define PETSC_DRAW_BASIC_COLORS 33 97 98 #define PETSC_DRAW_ROTATE -1 /* will rotate through the colors, start with 2 */ 99 #define PETSC_DRAW_WHITE 0 100 #define PETSC_DRAW_BLACK 1 101 #define PETSC_DRAW_RED 2 102 #define PETSC_DRAW_GREEN 3 103 #define PETSC_DRAW_CYAN 4 104 #define PETSC_DRAW_BLUE 5 105 #define PETSC_DRAW_MAGENTA 6 106 #define PETSC_DRAW_AQUAMARINE 7 107 #define PETSC_DRAW_FORESTGREEN 8 108 #define PETSC_DRAW_ORANGE 9 109 #define PETSC_DRAW_VIOLET 10 110 #define PETSC_DRAW_BROWN 11 111 #define PETSC_DRAW_PINK 12 112 #define PETSC_DRAW_CORAL 13 113 #define PETSC_DRAW_GRAY 14 114 #define PETSC_DRAW_YELLOW 15 115 116 #define PETSC_DRAW_GOLD 16 117 #define PETSC_DRAW_LIGHTPINK 17 118 #define PETSC_DRAW_MEDIUMTURQUOISE 18 119 #define PETSC_DRAW_KHAKI 19 120 #define PETSC_DRAW_DIMGRAY 20 121 #define PETSC_DRAW_YELLOWGREEN 21 122 #define PETSC_DRAW_SKYBLUE 22 123 #define PETSC_DRAW_DARKGREEN 23 124 #define PETSC_DRAW_NAVYBLUE 24 125 #define PETSC_DRAW_SANDYBROWN 25 126 #define PETSC_DRAW_CADETBLUE 26 127 #define PETSC_DRAW_POWDERBLUE 27 128 #define PETSC_DRAW_DEEPPINK 28 129 #define PETSC_DRAW_THISTLE 29 130 #define PETSC_DRAW_LIMEGREEN 30 131 #define PETSC_DRAW_LAVENDERBLUSH 31 132 #define PETSC_DRAW_PLUM 32 133 134 PETSC_EXTERN PetscErrorCode PetscDrawOpenX(MPI_Comm,const char[],const char[],int,int,int,int,PetscDraw*); 135 PETSC_EXTERN PetscErrorCode PetscDrawOpenGLUT(MPI_Comm,const char[],const char[],int,int,int,int,PetscDraw*); 136 137 #define PETSC_DRAW_FULL_SIZE -3 138 #define PETSC_DRAW_HALF_SIZE -4 139 #define PETSC_DRAW_THIRD_SIZE -5 140 #define PETSC_DRAW_QUARTER_SIZE -6 141 142 PETSC_EXTERN PetscErrorCode PetscDrawOpenNull(MPI_Comm,PetscDraw *); 143 PETSC_EXTERN PetscErrorCode PetscDrawDestroy(PetscDraw*); 144 PETSC_EXTERN PetscErrorCode PetscDrawIsNull(PetscDraw,PetscBool *); 145 146 PETSC_EXTERN PetscErrorCode PetscDrawGetPopup(PetscDraw,PetscDraw*); 147 PETSC_EXTERN PetscErrorCode PetscDrawCheckResizedWindow(PetscDraw); 148 PETSC_EXTERN PetscErrorCode PetscDrawResizeWindow(PetscDraw,int,int); 149 150 PETSC_EXTERN PetscErrorCode PetscDrawScalePopup(PetscDraw,PetscReal,PetscReal); 151 152 PETSC_EXTERN PetscErrorCode PetscDrawPixelToCoordinate(PetscDraw,PetscInt,PetscInt,PetscReal*,PetscReal*); 153 PETSC_EXTERN PetscErrorCode PetscDrawCoordinateToPixel(PetscDraw,PetscReal,PetscReal,PetscInt*,PetscInt*); 154 155 PETSC_EXTERN PetscErrorCode PetscDrawIndicatorFunction(PetscDraw,PetscReal,PetscReal,PetscReal,PetscReal,int,PetscErrorCode (*)(void*,PetscReal,PetscReal,PetscBool*),void*); 156 157 PETSC_EXTERN PetscErrorCode PetscDrawLine(PetscDraw,PetscReal,PetscReal,PetscReal,PetscReal,int); 158 PETSC_EXTERN PetscErrorCode PetscDrawArrow(PetscDraw,PetscReal,PetscReal,PetscReal,PetscReal,int); 159 PETSC_EXTERN PetscErrorCode PetscDrawLineSetWidth(PetscDraw,PetscReal); 160 PETSC_EXTERN PetscErrorCode PetscDrawLineGetWidth(PetscDraw,PetscReal*); 161 162 PETSC_EXTERN PetscErrorCode PetscDrawPoint(PetscDraw,PetscReal,PetscReal,int); 163 PETSC_EXTERN PetscErrorCode PetscDrawPointPixel(PetscDraw,PetscInt,PetscInt,int); 164 PETSC_EXTERN PetscErrorCode PetscDrawPointSetSize(PetscDraw,PetscReal); 165 166 PETSC_EXTERN PetscErrorCode PetscDrawRectangle(PetscDraw,PetscReal,PetscReal,PetscReal,PetscReal,int,int,int,int); 167 PETSC_EXTERN PetscErrorCode PetscDrawTriangle(PetscDraw,PetscReal,PetscReal,PetscReal,PetscReal,PetscReal,PetscReal,int,int,int); 168 PETSC_EXTERN PetscErrorCode PetscDrawEllipse(PetscDraw,PetscReal,PetscReal,PetscReal,PetscReal,int); 169 PETSC_EXTERN PetscErrorCode PetscDrawTensorContourPatch(PetscDraw,int,int,PetscReal*,PetscReal*,PetscReal,PetscReal,PetscReal*); 170 PETSC_EXTERN PetscErrorCode PetscDrawTensorContour(PetscDraw,int,int,const PetscReal[],const PetscReal[],PetscReal *); 171 172 PETSC_EXTERN PetscErrorCode PetscDrawString(PetscDraw,PetscReal,PetscReal,int,const char[]); 173 PETSC_EXTERN PetscErrorCode PetscDrawStringVertical(PetscDraw,PetscReal,PetscReal,int,const char[]); 174 PETSC_EXTERN PetscErrorCode PetscDrawStringSetSize(PetscDraw,PetscReal,PetscReal); 175 PETSC_EXTERN PetscErrorCode PetscDrawStringGetSize(PetscDraw,PetscReal*,PetscReal*); 176 177 PETSC_EXTERN PetscErrorCode PetscDrawSetViewPort(PetscDraw,PetscReal,PetscReal,PetscReal,PetscReal); 178 PETSC_EXTERN PetscErrorCode PetscDrawGetViewPort(PetscDraw,PetscReal*,PetscReal*,PetscReal*,PetscReal*); 179 PETSC_EXTERN PetscErrorCode PetscDrawSplitViewPort(PetscDraw); 180 181 PETSC_EXTERN PetscErrorCode PetscDrawSetCoordinates(PetscDraw,PetscReal,PetscReal,PetscReal,PetscReal); 182 PETSC_EXTERN PetscErrorCode PetscDrawGetCoordinates(PetscDraw,PetscReal*,PetscReal*,PetscReal*,PetscReal*); 183 184 PETSC_EXTERN PetscErrorCode PetscDrawSetTitle(PetscDraw,const char[]); 185 PETSC_EXTERN PetscErrorCode PetscDrawAppendTitle(PetscDraw,const char[]); 186 PETSC_EXTERN PetscErrorCode PetscDrawGetTitle(PetscDraw,char **); 187 188 PETSC_EXTERN PetscErrorCode PetscDrawSetPause(PetscDraw,PetscReal); 189 PETSC_EXTERN PetscErrorCode PetscDrawGetPause(PetscDraw,PetscReal*); 190 PETSC_EXTERN PetscErrorCode PetscDrawPause(PetscDraw); 191 PETSC_EXTERN PetscErrorCode PetscDrawSetDoubleBuffer(PetscDraw); 192 PETSC_EXTERN PetscErrorCode PetscDrawFlush(PetscDraw); 193 PETSC_EXTERN PetscErrorCode PetscDrawSynchronizedFlush(PetscDraw); 194 PETSC_EXTERN PetscErrorCode PetscDrawClear(PetscDraw); 195 PETSC_EXTERN PetscErrorCode PetscDrawSave(PetscDraw); 196 PETSC_EXTERN PetscErrorCode PetscDrawSynchronizedClear(PetscDraw); 197 PETSC_EXTERN PetscErrorCode PetscDrawBOP(PetscDraw); 198 PETSC_EXTERN PetscErrorCode PetscDrawEOP(PetscDraw); 199 200 PETSC_EXTERN PetscErrorCode PetscDrawSetDisplay(PetscDraw,const char[]); 201 PETSC_EXTERN PetscErrorCode PetscDrawGetSingleton(PetscDraw,PetscDraw*); 202 PETSC_EXTERN PetscErrorCode PetscDrawRestoreSingleton(PetscDraw,PetscDraw*); 203 204 /*E 205 PetscDrawButton - Used to determine which button was pressed 206 207 Level: intermediate 208 209 .seealso: PetscDrawGetMouseButton(), PetscDrawSynchronizedGetMouseButton() 210 E*/ 211 typedef enum {PETSC_BUTTON_NONE,PETSC_BUTTON_LEFT,PETSC_BUTTON_CENTER,PETSC_BUTTON_RIGHT,PETSC_BUTTON_LEFT_SHIFT,PETSC_BUTTON_CENTER_SHIFT,PETSC_BUTTON_RIGHT_SHIFT} PetscDrawButton; 212 213 PETSC_EXTERN PetscErrorCode PetscDrawGetMouseButton(PetscDraw,PetscDrawButton *,PetscReal*,PetscReal *,PetscReal *,PetscReal *); 214 PETSC_EXTERN PetscErrorCode PetscDrawSynchronizedGetMouseButton(PetscDraw,PetscDrawButton *,PetscReal*,PetscReal *,PetscReal *,PetscReal *); 215 216 PETSC_EXTERN PetscErrorCode PetscDrawZoom(PetscDraw,PetscErrorCode (*)(PetscDraw,void *),void *); 217 218 /*S 219 PetscDrawViewPorts - Subwindows in a PetscDraw object 220 221 Level: intermediate 222 223 Concepts: graphics 224 225 .seealso: PetscDrawViewPortsCreate(), PetscDrawViewPortsSet() 226 S*/ 227 typedef struct { 228 PetscInt nports; 229 PetscReal *xl; 230 PetscReal *xr; 231 PetscReal *yl; 232 PetscReal *yr; 233 PetscDraw draw; 234 PetscReal port_xl,port_yl,port_xr,port_yr; /* original port of parent PetscDraw */ 235 236 } PetscDrawViewPorts; 237 PETSC_EXTERN PetscErrorCode PetscDrawViewPortsCreate(PetscDraw,PetscInt,PetscDrawViewPorts**); 238 PETSC_EXTERN PetscErrorCode PetscDrawViewPortsCreateRect(PetscDraw,PetscInt,PetscInt,PetscDrawViewPorts**); 239 PETSC_EXTERN PetscErrorCode PetscDrawViewPortsDestroy(PetscDrawViewPorts*); 240 PETSC_EXTERN PetscErrorCode PetscDrawViewPortsSet(PetscDrawViewPorts*,PetscInt); 241 242 /*S 243 PetscDrawAxis - Manages X-Y axis 244 245 Level: advanced 246 247 Concepts: graphics, axis 248 249 .seealso: PetscDrawAxisCreate(), PetscDrawAxisSetLimits(), PetscDrawAxisSetColors(), PetscDrawAxisSetLabels() 250 S*/ 251 typedef struct _p_PetscDrawAxis* PetscDrawAxis; 252 253 PETSC_EXTERN PetscClassId PETSC_DRAWAXIS_CLASSID; 254 255 PETSC_EXTERN PetscErrorCode PetscDrawAxisCreate(PetscDraw,PetscDrawAxis *); 256 PETSC_EXTERN PetscErrorCode PetscDrawAxisDestroy(PetscDrawAxis*); 257 PETSC_EXTERN PetscErrorCode PetscDrawAxisDraw(PetscDrawAxis); 258 PETSC_EXTERN PetscErrorCode PetscDrawAxisSetLimits(PetscDrawAxis,PetscReal,PetscReal,PetscReal,PetscReal); 259 PETSC_EXTERN PetscErrorCode PetscDrawAxisGetLimits(PetscDrawAxis,PetscReal*,PetscReal*,PetscReal*,PetscReal*); 260 PETSC_EXTERN PetscErrorCode PetscDrawAxisSetHoldLimits(PetscDrawAxis,PetscBool ); 261 PETSC_EXTERN PetscErrorCode PetscDrawAxisSetColors(PetscDrawAxis,int,int,int); 262 PETSC_EXTERN PetscErrorCode PetscDrawAxisSetLabels(PetscDrawAxis,const char[],const char[],const char[]); 263 264 /*S 265 PetscDrawLG - Manages drawing x-y plots 266 267 Level: advanced 268 269 Concepts: graphics, axis 270 271 .seealso: PetscDrawAxisCreate(), PetscDrawLGCreate(), PetscDrawLGAddPoint() 272 S*/ 273 typedef struct _p_PetscDrawLG* PetscDrawLG; 274 275 PETSC_EXTERN PetscClassId PETSC_DRAWLG_CLASSID; 276 277 PETSC_EXTERN PetscErrorCode PetscDrawLGCreate(PetscDraw,PetscInt,PetscDrawLG *); 278 PETSC_EXTERN PetscErrorCode PetscDrawLGDestroy(PetscDrawLG*); 279 PETSC_EXTERN PetscErrorCode PetscDrawLGAddPoint(PetscDrawLG,const PetscReal*,const PetscReal*); 280 PETSC_EXTERN PetscErrorCode PetscDrawLGAddCommonPoint(PetscDrawLG,const PetscReal,const PetscReal*); 281 PETSC_EXTERN PetscErrorCode PetscDrawLGAddPoints(PetscDrawLG,PetscInt,PetscReal**,PetscReal**); 282 PETSC_EXTERN PetscErrorCode PetscDrawLGDraw(PetscDrawLG); 283 PETSC_EXTERN PetscErrorCode PetscDrawLGPrint(PetscDrawLG); 284 PETSC_EXTERN PetscErrorCode PetscDrawLGReset(PetscDrawLG); 285 PETSC_EXTERN PetscErrorCode PetscDrawLGSetDimension(PetscDrawLG,PetscInt); 286 PETSC_EXTERN PetscErrorCode PetscDrawLGGetDimension(PetscDrawLG,PetscInt*); 287 PETSC_EXTERN PetscErrorCode PetscDrawLGSetLegend(PetscDrawLG,const char *const*); 288 PETSC_EXTERN PetscErrorCode PetscDrawLGGetAxis(PetscDrawLG,PetscDrawAxis *); 289 PETSC_EXTERN PetscErrorCode PetscDrawLGGetDraw(PetscDrawLG,PetscDraw *); 290 PETSC_EXTERN PetscErrorCode PetscDrawLGIndicateDataPoints(PetscDrawLG); 291 PETSC_EXTERN PetscErrorCode PetscDrawLGSetLimits(PetscDrawLG,PetscReal,PetscReal,PetscReal,PetscReal); 292 PETSC_EXTERN PetscErrorCode PetscDrawLGSetColors(PetscDrawLG,const int*); 293 294 /*S 295 PetscDrawSP - Manages drawing scatter plots 296 297 Level: advanced 298 299 Concepts: graphics, scatter plots 300 301 .seealso: PetscDrawSPCreate() 302 S*/ 303 typedef struct _p_PetscDrawSP* PetscDrawSP; 304 305 PETSC_EXTERN PetscClassId PETSC_DRAWSP_CLASSID; 306 307 PETSC_EXTERN PetscErrorCode PetscDrawSPCreate(PetscDraw,int,PetscDrawSP *); 308 PETSC_EXTERN PetscErrorCode PetscDrawSPDestroy(PetscDrawSP*); 309 PETSC_EXTERN PetscErrorCode PetscDrawSPAddPoint(PetscDrawSP,PetscReal*,PetscReal*); 310 PETSC_EXTERN PetscErrorCode PetscDrawSPAddPoints(PetscDrawSP,int,PetscReal**,PetscReal**); 311 PETSC_EXTERN PetscErrorCode PetscDrawSPDraw(PetscDrawSP,PetscBool); 312 PETSC_EXTERN PetscErrorCode PetscDrawSPReset(PetscDrawSP); 313 PETSC_EXTERN PetscErrorCode PetscDrawSPSetDimension(PetscDrawSP,int); 314 PETSC_EXTERN PetscErrorCode PetscDrawSPGetAxis(PetscDrawSP,PetscDrawAxis *); 315 PETSC_EXTERN PetscErrorCode PetscDrawSPGetDraw(PetscDrawSP,PetscDraw *); 316 PETSC_EXTERN PetscErrorCode PetscDrawSPSetLimits(PetscDrawSP,PetscReal,PetscReal,PetscReal,PetscReal); 317 PETSC_EXTERN PetscErrorCode PetscDrawLGSPDraw(PetscDrawLG,PetscDrawSP); 318 319 /*S 320 PetscDrawHG - Manages drawing histograms 321 322 Level: advanced 323 324 Concepts: graphics, histograms 325 326 .seealso: PetscDrawHGCreate() 327 S*/ 328 typedef struct _p_PetscDrawHG* PetscDrawHG; 329 330 PETSC_EXTERN PetscClassId PETSC_DRAWHG_CLASSID; 331 332 PETSC_EXTERN PetscErrorCode PetscDrawHGCreate(PetscDraw,int,PetscDrawHG *); 333 PETSC_EXTERN PetscErrorCode PetscDrawHGDestroy(PetscDrawHG*); 334 PETSC_EXTERN PetscErrorCode PetscDrawHGAddValue(PetscDrawHG,PetscReal); 335 PETSC_EXTERN PetscErrorCode PetscDrawHGDraw(PetscDrawHG); 336 PETSC_EXTERN PetscErrorCode PetscDrawHGPrint(PetscDrawHG); 337 PETSC_EXTERN PetscErrorCode PetscDrawHGReset(PetscDrawHG); 338 PETSC_EXTERN PetscErrorCode PetscDrawHGGetAxis(PetscDrawHG,PetscDrawAxis *); 339 PETSC_EXTERN PetscErrorCode PetscDrawHGGetDraw(PetscDrawHG,PetscDraw *); 340 PETSC_EXTERN PetscErrorCode PetscDrawHGSetLimits(PetscDrawHG,PetscReal,PetscReal,int,int); 341 PETSC_EXTERN PetscErrorCode PetscDrawHGSetNumberBins(PetscDrawHG,int); 342 PETSC_EXTERN PetscErrorCode PetscDrawHGSetColor(PetscDrawHG,int); 343 PETSC_EXTERN PetscErrorCode PetscDrawHGCalcStats(PetscDrawHG, PetscBool ); 344 PETSC_EXTERN PetscErrorCode PetscDrawHGIntegerBins(PetscDrawHG, PetscBool ); 345 346 /* 347 PetscViewer routines that allow you to access underlying PetscDraw objects 348 */ 349 PETSC_EXTERN PetscErrorCode PetscViewerDrawGetDraw(PetscViewer,PetscInt,PetscDraw*); 350 PETSC_EXTERN PetscErrorCode PetscViewerDrawBaseAdd(PetscViewer,PetscInt); 351 PETSC_EXTERN PetscErrorCode PetscViewerDrawBaseSet(PetscViewer,PetscInt); 352 PETSC_EXTERN PetscErrorCode PetscViewerDrawGetDrawLG(PetscViewer,PetscInt,PetscDrawLG*); 353 PETSC_EXTERN PetscErrorCode PetscViewerDrawGetDrawAxis(PetscViewer,PetscInt,PetscDrawAxis*); 354 355 PETSC_EXTERN PetscErrorCode PetscDrawUtilitySetCmapHue(unsigned char *,unsigned char *,unsigned char *,int); 356 PETSC_EXTERN PetscErrorCode PetscDrawUtilitySetGamma(PetscReal); 357 358 #endif 359