/usr/share/psychtoolbox-3/PsychInitialize/PsychStartup.m is in psychtoolbox-3-common 3.0.11.20140816.dfsg1-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 | function PsychStartup
% PsychStartup -- Perform Psychtoolbox related setup at Matlab/Octave startup.
%
% This performs setup of Matlab or Octave at session startup for
% Psychtoolbox.
%
% On MS-Windows, it currently detects if the GStreamer SDK runtime is
% installed, as this is required for Screen() multi-media functions to
% work. It performs GStreamer setup, or outputs a warning if the runtime is
% missing.
%
% This function is normally called from the startup.m Matlab startup file.
%
% History:
% 14.09.2012 mk Written.
% 14.01.2013 mk Make path detection more robust.
% 12.09.2013 mk Also apply GStreamer-SDK setup to 32-Bit Matlab on Windows.
% Try-Catch protect the function, so Matlab startup won't fail due to
% errors in this function:
try
% Setup for MS-Windows:
if IsWin
% Need to assign a proper install location for the
% www.gstreamer.com GStreamer-SDK runtime libraries, otherwise
% use of GStreamer based functions would fail due to unresolved
% link dependencies:
% Find path to SDK-Root folder: Should be defined in env variable
% by installer:
if Is64Bit
sdkroot = getenv('GSTREAMER_SDK_ROOT_X86_64');
suffix = 'x86_64\';
else
sdkroot = getenv('GSTREAMER_SDK_ROOT_X86');
suffix = 'x86\';
end
if ~exist(sdkroot, 'dir')
% Env variable points to non-existent SDK dir. How peculiar?
% Invalidate invalid sdkroot, so fallback code can run:
if Is64Bit
fprintf('PsychStartup: Environment variable GSTREAMER_SDK_ROOT_X86_64 points to non-existent SDK folder?!?\n');
else
fprintf('PsychStartup: Environment variable GSTREAMER_SDK_ROOT_X86 points to non-existent SDK folder?!?\n');
end
fprintf('PsychStartup: The missing or inaccessible path to GStreamer is: %s\n', sdkroot);
fprintf('PsychStartup: Something is botched. Trying various common locations for the SDK to keep going.\n');
sdkroot = [];
end
% Probe standard install location on drives C,D,E,F,G:
if isempty(sdkroot) && exist('C:\gstreamer-sdk\0.10\', 'dir')
sdkroot = ['C:\gstreamer-sdk\0.10\' suffix];
end
if isempty(sdkroot) && exist('D:\gstreamer-sdk\0.10\', 'dir')
sdkroot = ['D:\gstreamer-sdk\0.10\' suffix];
end
if isempty(sdkroot) && exist('E:\gstreamer-sdk\0.10\', 'dir')
sdkroot = ['E:\gstreamer-sdk\0.10\' suffix];
end
if isempty(sdkroot) && exist('F:\gstreamer-sdk\0.10\', 'dir')
sdkroot = ['F:\gstreamer-sdk\0.10\' suffix];
end
if isempty(sdkroot) && exist('G:\gstreamer-sdk\0.10\', 'dir')
sdkroot = ['G:\gstreamer-sdk\0.10\' suffix];
end
% Probe install locations of legacy SDK's:
if isempty(sdkroot) && exist('C:\gstreamer-sdk\2012.5\', 'dir')
sdkroot = ['C:\gstreamer-sdk\2012.5\' suffix];
end
if isempty(sdkroot) && exist('C:\gstreamer-sdk\2012.7\', 'dir')
sdkroot = ['C:\gstreamer-sdk\2012.7\' suffix];
end
if isempty(sdkroot) && exist('D:\gstreamer-sdk\2012.5\', 'dir')
sdkroot = ['D:\gstreamer-sdk\2012.5\' suffix];
end
if isempty(sdkroot) && exist('D:\gstreamer-sdk\2012.7\', 'dir')
sdkroot = ['D:\gstreamer-sdk\2012.7\' suffix];
end
if isempty(sdkroot)
fprintf('\nPsychStartup: Path to GStreamer runtime is undefined! This probably means that\n');
fprintf('PsychStartup: the 32-Bit or 64-Bit GStreamer SDK from www.gstreamer.com is not installed.\n');
fprintf('PsychStartup: The Psychtoolbox Screen() multimedia functions will fail to work until you fix\n');
fprintf('PsychStartup: this! Read ''help GStreamer'' for instructions.\n\n');
else
sdkroot = [sdkroot 'bin'];
fprintf('\nPsychStartup: Adding path of installed GStreamer runtime to library path. [%s]\n', sdkroot);
% Get current path:
path = getenv('PATH');
% Prepend sdkroot to path:
newpath = [sdkroot ';' path];
setenv('PATH', newpath);
end
end
catch %#ok<*CTCH>
fprintf('PTB-WARNING: Call to PsychStartup() failed!!\n');
end
end
|