/usr/share/psychtoolbox-3/PsychHardware/PR650Toolbox/PR650serialread.m is in psychtoolbox-3-common 3.0.11.20131230.dfsg1-1build1.
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 | function serialData = PR650serialread
% serialData = PR650serialread
%
% Reads data off the serial port until there is nothing left. Returns an
% empty matrix if there is nothing to read.
global g_serialPort g_useIOPort;
if g_useIOPort
data = IOPort('Read', g_serialPort);
serialData = char(data);
% If data exists keep reading off the port until there's nothing left.
if ~isempty(serialData)
tmpData = 1;
while ~isempty(tmpData)
WaitSecs(0.050);
tmpData = IOPort('Read', g_serialPort);
serialData = [serialData, char(tmpData)]; %#ok<AGROW>
end
end
else
% Look for any data on the serial port.
serialData = char(SerialComm('read', g_serialPort))';
% If data exists keep reading off the port until there's nothing left.
if ~isempty(serialData)
tmpData = 1;
while ~isempty(tmpData)
WaitSecs(0.050);
tmpData = char(SerialComm('read', g_serialPort))';
serialData = [serialData, tmpData]; %#ok<AGROW>
end
end
end
|