1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
/*
SCREENCloseAll.c
AUTHORS:
Allen.Ingling@nyu.edu awi
mario.kleiner.de@gmail.com mk
PLATFORMS:
All.
HISTORY:
01/23/02 awi Wrote It.
10/12/04 awi Changed "SCREEN" to "Screen" and "Close" to "CloseAll" in useString .
1/25/04 awi Merged in a fix provide by mk. Splits off parts of SCREENCloseAll into ScreenCloseAllWindows()
to be called from ScreenExit().
TO DO:
*/
#include "Screen.h"
// If you change the useString then also change the corresponding synopsis string in ScreenSynopsis.c
static char useString[] = "Screen('CloseAll');";
static char synopsisString[] =
"Close all open onscreen and offscreen windows and textures, movies and video sources. Release nearly all ressources.";
static char seeAlsoString[] = "OpenWindow, OpenOffscreenWindow";
PsychError SCREENCloseAll(void)
{
//all subfunctions should have these two lines.
PsychPushHelp(useString, synopsisString, seeAlsoString);
if (PsychIsGiveHelp()) { PsychGiveHelp(); return(PsychError_none); };
PsychErrorExit(PsychCapNumInputArgs(0)); //The maximum number of inputs
PsychErrorExit(PsychCapNumOutputArgs(0)); //The maximum number of outputs
// Close all windows:
ScreenCloseAllWindows();
return(PsychError_none);
}
// Implement closing of all onscreen- and offscreen windows, release of all captured displays,
// releasing of all internal textures and memory buffers, stopping of internal helper threads,
// etc....
// This routine is normally called by SCREENCloseAll, but can be also called by the exit-handler,
// and diverse error-handlers for cleanup.
void ScreenCloseAllWindows(void)
{
PsychWindowRecordType **windowRecordArray;
int i, numWindows, numScreens;
static unsigned int recursionLevel = 0;
// Recursive self-call?
if (recursionLevel > 0) {
// Ohoh: We are recursively calling ourselves, probably due to some
// error condition triggered during our execution. This is bad, we need
// to break the infinite recursion. How? We output a recursion warning,
// then return as no-op:
printf("PTB-ERROR: Error during error handling! ScreenCloseAllWindows() called recursively! Trying to break out of this vicious cycle...\n");
printf("PTB-ERROR: Maybe it is a good idea to exit and restart Matlab/Octave.\n");
// Skip to the release screen routine and hope for the best:
goto critical_abort;
}
recursionLevel++;
// Cold-Reset the drawing target:
PsychColdResetDrawingTarget();
// Reset the "userspaceGL" flag which tells PTB that userspace GL rendering was active
// due to Screen('BeginOpenGL') command.
PsychSetUserspaceGLFlag(FALSE);
// Check for stale texture ressources:
PsychRessourceCheckAndReminder(TRUE);
// Shutdown multi-media subsystems if active:
PsychExitMovieWriting();
PsychExitMovies();
PsychExitVideoCapture();
// Close the windows: We do it reverse (descending) order so textures get closed
// before the onscreen windows. In theory this shouldn't matter, but in practice,
// more stress on the PsychCloseWindow() path. If we have bugs there, chances are
// higher they get exposed this way, which long-term is a good thing(TM).
PsychCreateVolatileWindowRecordPointerList(&numWindows, &windowRecordArray);
for(i = numWindows - 1; i >= 0; i--) {
if (PsychPrefStateGet_Verbosity()>5) { printf("PTB-DEBUG: In ScreenCloseAllWindows(): Destroying window %i\n", i); fflush(NULL); }
PsychCloseWindow(windowRecordArray[i]);
}
PsychDestroyVolatileWindowRecordPointerList(windowRecordArray);
critical_abort:
// Release all captured displays, unhide the cursor on each of them:
numScreens=PsychGetNumDisplays();
for (i = 0; i < numScreens; i++) {
if(PsychIsScreenCaptured(i)) {
PsychRestoreScreenSettings(i);
PsychReleaseScreen(i);
}
#ifndef PTB_USE_WAYLAND
PsychShowCursor(i, -1);
#endif
}
#if PSYCH_SYSTEM == PSYCH_OSX
// Make sure the cursor obeys the mouse:
CGAssociateMouseAndMouseCursorPosition(true);
#endif
recursionLevel--;
return;
}
|
