This file is indexed.

/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