Lines Matching refs:socket
56 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisSetPrecision_GLVis() local
59 PetscCall(PetscFree(socket->fmt)); in PetscViewerGLVisSetPrecision_GLVis()
61 PetscCall(PetscMalloc1(16, &socket->fmt)); in PetscViewerGLVisSetPrecision_GLVis()
62 PetscCall(PetscSNPrintf(socket->fmt, 16, " %%.%" PetscInt_FMT "e", prec)); in PetscViewerGLVisSetPrecision_GLVis()
64 PetscCall(PetscStrallocpy(" %g", &socket->fmt)); in PetscViewerGLVisSetPrecision_GLVis()
93 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisSetSnapId_GLVis() local
96 socket->snapid = id; in PetscViewerGLVisSetSnapId_GLVis()
143 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisSetFields_GLVis() local
147 …socket->nwindow || socket->nwindow == nfields, PetscObjectComm((PetscObject)viewer), PETSC_ERR_USE… in PetscViewerGLVisSetFields_GLVis()
148 if (!socket->nwindow) { in PetscViewerGLVisSetFields_GLVis()
149 socket->nwindow = nfields; in PetscViewerGLVisSetFields_GLVis()
151 …alloc5(nfields, &socket->window, nfields, &socket->windowtitle, nfields, &socket->fec_type, nfield… in PetscViewerGLVisSetFields_GLVis()
156 PetscCall(PetscStrallocpy(name, &socket->windowtitle[i])); in PetscViewerGLVisSetFields_GLVis()
157 PetscCall(PetscStrallocpy(fec_type[i], &socket->fec_type[i])); in PetscViewerGLVisSetFields_GLVis()
159 socket->Ufield[i] = Vfield[i]; in PetscViewerGLVisSetFields_GLVis()
160 socket->spacedim[i] = dim[i]; in PetscViewerGLVisSetFields_GLVis()
164 …socket->nwindow, PetscObjectComm((PetscObject)viewer), PETSC_ERR_SUP, "Cannot visualize %" PetscIn… in PetscViewerGLVisSetFields_GLVis()
165 socket->g2lfield = g2l; in PetscViewerGLVisSetFields_GLVis()
166 if (socket->destroyctx && socket->ctx) PetscCall((*socket->destroyctx)(&socket->ctx)); in PetscViewerGLVisSetFields_GLVis()
167 socket->ctx = ctx; in PetscViewerGLVisSetFields_GLVis()
168 socket->destroyctx = destroyctx; in PetscViewerGLVisSetFields_GLVis()
185 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisAttachInfo_Private() local
195 info->size[0] = socket->windowsizes[0]; in PetscViewerGLVisAttachInfo_Private()
196 info->size[1] = socket->windowsizes[1]; in PetscViewerGLVisAttachInfo_Private()
197 info->pause = socket->pause; in PetscViewerGLVisAttachInfo_Private()
203 PetscCall(PetscStrallocpy(socket->fmt, &info->fmt)); in PetscViewerGLVisAttachInfo_Private()
209 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisGetNewWindow_Private() local
214 PetscCall(PetscViewerASCIISocketOpen(PETSC_COMM_SELF, socket->name, socket->port, &window)); in PetscViewerGLVisGetNewWindow_Private()
219 socket->status = PETSCVIEWERGLVIS_DISABLED; in PetscViewerGLVisGetNewWindow_Private()
228 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisPause_Internal() local
231 …if (socket->type == PETSC_VIEWER_GLVIS_SOCKET && socket->pause > 0) PetscCall(PetscSleep(socket->p… in PetscViewerGLVisPause_Internal()
238 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisSetDM_Internal() local
241 …PetscCheck(!socket->dm || socket->dm == dm, PetscObjectComm((PetscObject)viewer), PETSC_ERR_SUP, "… in PetscViewerGLVisSetDM_Internal()
242 if (!socket->dm) { in PetscViewerGLVisSetDM_Internal()
249 socket->dm = dm; in PetscViewerGLVisSetDM_Internal()
256 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisGetDMWindow_Internal() local
260 if (!socket->meshwindow) { in PetscViewerGLVisGetDMWindow_Internal()
261 if (socket->type == PETSC_VIEWER_GLVIS_SOCKET) { in PetscViewerGLVisGetDMWindow_Internal()
262 PetscCall(PetscViewerGLVisGetNewWindow_Private(viewer, &socket->meshwindow)); in PetscViewerGLVisGetDMWindow_Internal()
267 PetscCall(PetscStrlen(socket->name, &len)); in PetscViewerGLVisGetDMWindow_Internal()
268 PetscCall(PetscStrcmp(socket->name, "stdout", &isstdout)); in PetscViewerGLVisGetDMWindow_Internal()
269 if (!socket->name || !len || isstdout) { in PetscViewerGLVisGetDMWindow_Internal()
270 PetscCall(PetscViewerASCIIOpen(PETSC_COMM_SELF, "stdout", &socket->meshwindow)); in PetscViewerGLVisGetDMWindow_Internal()
275 PetscCall(PetscSNPrintf(filename, PETSC_MAX_PATH_LEN, "%s-mesh.%06d", socket->name, rank)); in PetscViewerGLVisGetDMWindow_Internal()
276 PetscCall(PetscViewerASCIIOpen(PETSC_COMM_SELF, filename, &socket->meshwindow)); in PetscViewerGLVisGetDMWindow_Internal()
279 …if (socket->meshwindow) PetscCall(PetscViewerPushFormat(socket->meshwindow, PETSC_VIEWER_ASCII_GLV… in PetscViewerGLVisGetDMWindow_Internal()
281 if (socket->meshwindow) PetscCall(PetscViewerGLVisAttachInfo_Private(viewer, socket->meshwindow)); in PetscViewerGLVisGetDMWindow_Internal()
282 *view = socket->meshwindow; in PetscViewerGLVisGetDMWindow_Internal()
288 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisRestoreDMWindow_Internal() local
292 …PetscCheck(!*view || *view == socket->meshwindow, PetscObjectComm((PetscObject)viewer), PETSC_ERR_… in PetscViewerGLVisRestoreDMWindow_Internal()
297 …if (socket->type == PETSC_VIEWER_GLVIS_DUMP) { /* destroy the viewer, as it is associated with a s… in PetscViewerGLVisRestoreDMWindow_Internal()
298 PetscCall(PetscViewerDestroy(&socket->meshwindow)); in PetscViewerGLVisRestoreDMWindow_Internal()
300 socket->meshwindow = NULL; in PetscViewerGLVisRestoreDMWindow_Internal()
308 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisGetType_Internal() local
312 *type = socket->type; in PetscViewerGLVisGetType_Internal()
319 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisGetStatus_Internal() local
323 if (socket->type == PETSC_VIEWER_GLVIS_DUMP) { in PetscViewerGLVisGetStatus_Internal()
324 socket->status = PETSCVIEWERGLVIS_DISCONNECTED; in PetscViewerGLVisGetStatus_Internal()
325 } else if (socket->status == PETSCVIEWERGLVIS_DISCONNECTED && socket->nwindow) { in PetscViewerGLVisGetStatus_Internal()
329 for (i = 0, lconn = PETSC_TRUE; i < socket->nwindow; i++) in PetscViewerGLVisGetStatus_Internal()
330 if (!socket->window[i]) lconn = PETSC_FALSE; in PetscViewerGLVisGetStatus_Internal()
333 if (conn) socket->status = PETSCVIEWERGLVIS_CONNECTED; in PetscViewerGLVisGetStatus_Internal()
335 *sockstatus = socket->status; in PetscViewerGLVisGetStatus_Internal()
341 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisGetDM_Internal() local
344 *dm = socket->dm; in PetscViewerGLVisGetDM_Internal()
350 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisGetFields_Internal() local
353 if (nfield) *nfield = socket->nwindow; in PetscViewerGLVisGetFields_Internal()
354 if (fec) *fec = (const char **)socket->fec_type; in PetscViewerGLVisGetFields_Internal()
355 if (spacedim) *spacedim = socket->spacedim; in PetscViewerGLVisGetFields_Internal()
356 if (g2lfield) *g2lfield = socket->g2lfield; in PetscViewerGLVisGetFields_Internal()
357 if (Ufield) *Ufield = socket->Ufield; in PetscViewerGLVisGetFields_Internal()
358 if (ctx) *ctx = socket->ctx; in PetscViewerGLVisGetFields_Internal()
368 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisGetWindow_Internal() local
374 …socket->nwindow - 1), PetscObjectComm((PetscObject)viewer), PETSC_ERR_USER, "Cannot get window id … in PetscViewerGLVisGetWindow_Internal()
375 status = socket->status; in PetscViewerGLVisGetWindow_Internal()
376 …if (socket->type == PETSC_VIEWER_GLVIS_DUMP) PetscCheck(!socket->window[wid], PETSC_COMM_SELF, PET… in PetscViewerGLVisGetWindow_Internal()
379 PetscCheck(!socket->window[wid], PETSC_COMM_SELF, PETSC_ERR_USER, "This should not happen"); in PetscViewerGLVisGetWindow_Internal()
380 if (socket->type == PETSC_VIEWER_GLVIS_DUMP) { in PetscViewerGLVisGetWindow_Internal()
384 PetscCall(PetscStrlen(socket->name, &len)); in PetscViewerGLVisGetWindow_Internal()
385 PetscCall(PetscStrcmp(socket->name, "stdout", &isstdout)); in PetscViewerGLVisGetWindow_Internal()
386 if (!socket->name || !len || isstdout) { in PetscViewerGLVisGetWindow_Internal()
387 PetscCall(PetscViewerASCIIOpen(PETSC_COMM_SELF, "stdout", &socket->window[wid])); in PetscViewerGLVisGetWindow_Internal()
393 … PETSC_MAX_PATH_LEN, "%s-%s-%" PetscInt_FMT ".%06d", socket->name, socket->windowtitle[wid], socke… in PetscViewerGLVisGetWindow_Internal()
394 PetscCall(PetscViewerASCIIOpen(PETSC_COMM_SELF, filename, &socket->window[wid])); in PetscViewerGLVisGetWindow_Internal()
397 PetscCall(PetscViewerGLVisGetNewWindow_Private(viewer, &socket->window[wid])); in PetscViewerGLVisGetWindow_Internal()
399 …if (socket->window[wid]) PetscCall(PetscViewerPushFormat(socket->window[wid], PETSC_VIEWER_ASCII_G… in PetscViewerGLVisGetWindow_Internal()
400 *view = socket->window[wid]; in PetscViewerGLVisGetWindow_Internal()
403 *view = socket->window[wid]; in PetscViewerGLVisGetWindow_Internal()
424 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerGLVisRestoreWindow_Internal() local
430 …socket->nwindow, PetscObjectComm((PetscObject)viewer), PETSC_ERR_USER, "Cannot restore window id %… in PetscViewerGLVisRestoreWindow_Internal()
431 …PetscCheck(!*view || *view == socket->window[wid], PetscObjectComm((PetscObject)viewer), PETSC_ERR… in PetscViewerGLVisRestoreWindow_Internal()
436 …if (socket->type == PETSC_VIEWER_GLVIS_DUMP) { /* destroy the viewer, as it is associated with a s… in PetscViewerGLVisRestoreWindow_Internal()
437 PetscCall(PetscViewerDestroy(&socket->window[wid])); in PetscViewerGLVisRestoreWindow_Internal()
439 socket->window[wid] = NULL; in PetscViewerGLVisRestoreWindow_Internal()
509 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerDestroy_GLVis() local
513 for (i = 0; i < socket->nwindow; i++) { in PetscViewerDestroy_GLVis()
514 PetscCall(PetscViewerDestroy(&socket->window[i])); in PetscViewerDestroy_GLVis()
515 PetscCall(PetscFree(socket->windowtitle[i])); in PetscViewerDestroy_GLVis()
516 PetscCall(PetscFree(socket->fec_type[i])); in PetscViewerDestroy_GLVis()
517 PetscCall(PetscObjectDestroy(&socket->Ufield[i])); in PetscViewerDestroy_GLVis()
519 PetscCall(PetscFree(socket->name)); in PetscViewerDestroy_GLVis()
520 …PetscCall(PetscFree5(socket->window, socket->windowtitle, socket->fec_type, socket->spacedim, sock… in PetscViewerDestroy_GLVis()
521 PetscCall(PetscFree(socket->fmt)); in PetscViewerDestroy_GLVis()
522 PetscCall(PetscViewerDestroy(&socket->meshwindow)); in PetscViewerDestroy_GLVis()
523 PetscCall(PetscObjectDestroy(&socket->dm)); in PetscViewerDestroy_GLVis()
524 if (socket->destroyctx && socket->ctx) PetscCall((*socket->destroyctx)(&socket->ctx)); in PetscViewerDestroy_GLVis()
530 PetscCall(PetscFree(socket)); in PetscViewerDestroy_GLVis()
537 PetscViewerGLVis socket = (PetscViewerGLVis)v->data; in PetscViewerSetFromOptions_GLVis() local
545 …PetscCall(PetscOptionsIntArray("-glvis_size", "Window sizes", NULL, socket->windowsizes, &nsizes, … in PetscViewerSetFromOptions_GLVis()
546 …if (set && (nsizes == 1 || socket->windowsizes[1] < 0)) socket->windowsizes[1] = socket->windowsiz… in PetscViewerSetFromOptions_GLVis()
547 …r each visualization, otherwise sleeps for given seconds", NULL, socket->pause, &socket->pause, NU… in PetscViewerSetFromOptions_GLVis()
557 PetscViewerGLVis socket = (PetscViewerGLVis)viewer->data; in PetscViewerFileSetName_GLVis() local
560 socket->type = PETSC_VIEWER_GLVIS_DUMP; in PetscViewerFileSetName_GLVis()
562 PetscCall(PetscFree(socket->name)); in PetscViewerFileSetName_GLVis()
563 PetscCall(PetscStrallocpy(name, &socket->name)); in PetscViewerFileSetName_GLVis()
564 PetscCall(PetscStrchr(socket->name, '^', &sport)); in PetscViewerFileSetName_GLVis()
574 socket->port = 19916; in PetscViewerFileSetName_GLVis()
576 socket->port = (port != PETSC_DECIDE && port != PETSC_DEFAULT) ? port : 19916; in PetscViewerFileSetName_GLVis()
578 socket->type = PETSC_VIEWER_GLVIS_SOCKET; in PetscViewerFileSetName_GLVis()
611 PetscViewerGLVis socket; in PetscViewerGLVisOpen() local
617 socket = (PetscViewerGLVis)((*viewer)->data); in PetscViewerGLVisOpen()
618 socket->type = type; in PetscViewerGLVisOpen()
620 PetscCall(PetscFree(socket->name)); in PetscViewerGLVisOpen()
621 PetscCall(PetscStrallocpy(name, &socket->name)); in PetscViewerGLVisOpen()
623 socket->port = (!port || port == PETSC_DETERMINE || port == PETSC_DECIDE) ? 19916 : port; in PetscViewerGLVisOpen()
682 PetscViewerGLVis socket; in PetscViewerCreate_GLVis() local
685 PetscCall(PetscNew(&socket)); in PetscViewerCreate_GLVis()
688 PetscCall(PetscStrallocpy("localhost", &socket->name)); in PetscViewerCreate_GLVis()
689 socket->port = 19916; /* GLVis default listening port */ in PetscViewerCreate_GLVis()
690 socket->type = PETSC_VIEWER_GLVIS_SOCKET; in PetscViewerCreate_GLVis()
691 socket->pause = 0; /* just pause the first time */ in PetscViewerCreate_GLVis()
693 socket->windowsizes[0] = 600; in PetscViewerCreate_GLVis()
694 socket->windowsizes[1] = 600; in PetscViewerCreate_GLVis()
697 PetscCall(PetscStrallocpy(" %g", &socket->fmt)); in PetscViewerCreate_GLVis()
699 viewer->data = (void *)socket; in PetscViewerCreate_GLVis()