This file is indexed.

/usr/share/psychtoolbox-3/PsychHardware/Daq/DaqtoolboxConfigDir.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
 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
function ThePath = DaqtoolboxConfigDir
% Syntax: AbsolutePath = DaqtoolboxConfigDir
%
% Purpose: Look for (create if necessary) folder containing preferences for Daq
%          toolbox;
%
% History: 1/28/08  mpr configured this was needed
%          3/7/08   mpr streamlined this
%
% Function does not assume that user is using Psychophysics toolbox, but will
% subordinate Daqtoolbox if that assumption is correct.  That is, function will
% look for Daqtoolbox preferences in a folder containing Psychtoolbox
% preferences.  It will create its own folder iff it does not find one, and that
% folder will be in the Psychtoolbox preferences folder if that folder exists.

persistent DTBPrefPath

if ~isempty(DTBPrefPath)
  if exist(DTBPrefPath,'dir')
    ThePath = DTBPrefPath;
    return;
  end
end

if exist('PsychtoolboxConfigDir','file') == 2
  StringStart = [PsychtoolboxConfigDir filesep]; %#ok<NASGU>
  UsePsych=1;
else
  UsePsych=0;
  if IsOSX
    [ErrMsg,HomeDir] = unix('echo $HOME');
    % end-1 to trim trailing carriage return
    StringStart = [HomeDir(1:(end-1)) '/Library/Preferences/']; %#ok<NASGU>
  elseif IsLinux
    [ErrMsg,HomeDir] = unix('echo $HOME');    
    % end-1 to trim trailing carriage return
    StringStart = [HomeDir(1:(end-1)) '/.'];
  elseif IsWindows
    [ErrMsg,StringStart] = dos('echo %AppData%');
    % end-1 to trim trailing carriage return
    StringStart = StringStart(1:(end-1));
    if strcmp(StringStart,'%AppData%')
      FoundHomeDir = 0;
      [ErrMsg,HomeDir] = dos('echo %UserProfile%');
      HomeDir = HomeDir(1:(end-1));
      if strcmp(HomeDir,'%UserProfile%')
        HomeDir = uigetdir('','Please find your home folder for me');
        if ischar(HomeDir)
          FoundHomeDir = 1;
        else
          warning(sprintf(['I could not find your home directory or understand your input so I am storing\n' ...
                           'preferences folder in the current working directory: %s.\n'],pwd)); %#ok<WNTAG,SPWRN>
          StringStart = [pwd filesep]; %#ok<NASGU>
        end
      else
        FoundHomeDir = 1;        
      end
      if FoundHomeDir
        [DirMade,DirMessage]=mkdir(HomeDir,'Application Data'); %#ok<NASGU>
        if DirMade
          StringStart = [HomeDir filesep 'Application Data' filesep]; %#ok<NASGU>
        else
          warning(sprintf('"Application Data" folder neither exists nor is createable;\nstoring preferences in home directory.')); %#ok<WNTAG,SPWRN>
          StringStart = [HomeDir filesep]; %#ok<NASGU>
        end
      end
    else
      StringStart = [StringStart filesep];
    end
  else % if IsOSX; else
    fprintf(['I do not know your operating system, so I don''t know where I should store\n' ...
            'Preferences.  I''m putting them in the current working directory:\n      %s.\n\n'],pwd);
    StringStart = [pwd filesep];
  end % if IsOSX; else
end % if UsePsych; else
  
TheDir = [ StringStart 'Daqtoolbox'];

if exist(TheDir,'dir')
  ThePath = TheDir;
else % if exist(TheDir,'dir')
  % Could just use:
  % [DirMade, DirMessage] = mkdir(TheDir);
  % but I've had problems (in OS 9) having mkdir fail when string passed is too
  % long.  I don't know if that has been fixed in other OS's, so this is safe:
  if IsLinux && ~UsePsych
    [DirMade, DirMessage] = mkdir(StringStart(1:(end-1)),'.Daqtoolbox');
  else      
    [DirMade, DirMessage] = mkdir(StringStart,'Daqtoolbox');
  end
  if DirMade
    ThePath = [StringStart 'Daqtoolbox'];
  else 
    error(sprintf('I could not create a folder to store your preferences in\n\n%s\n\nWhat are the permissions on that folder?',StringStart)); %#ok<SPERR>
  end % if DirMade; else
end % if exist(TheDir,'dir')

DTBPrefPath = ThePath;

return;