ndi_Init.m

function ndi_Init % NDI_INIT - Add paths and initialize variables for NS2
% NDI_INIT 
% 
% Initializes the file path and global variables for class NDI
%

myndipath = fileparts(which('ndi_Init'));

 % remove any paths that have the string 'NDI-matlab' so we don't have stale paths confusing anyone

pathsnow = path;
pathsnow_cell = split(pathsnow,pathsep);
matches = contains(pathsnow_cell, 'NDI-matlab');
pathstoremove = char(strjoin(pathsnow_cell(matches),pathsep));
rmpath(pathstoremove);

  % add everyelement except '.git' directories
pathstoadd = genpath(myndipath);
pathstoadd_cell = split(pathstoadd,pathsep);
matches=(~contains(pathstoadd_cell,'.git'))&(~contains(pathstoadd_cell,'.ndi'));
pathstoadd = char(strjoin(pathstoadd_cell(matches),pathsep));
addpath(pathstoadd);

initializing_NDI = 1;

ndi.globals;

 % paths

ndi_globals.path = [];

ndi_globals.path.path = myndipath;
ndi_globals.path.commonpath = [ndi_globals.path.path filesep 'ndi_common'];
ndi_globals.path.documentpath = [ndi_globals.path.commonpath filesep 'database_documents'];
ndi_globals.path.documentschemapath = [ndi_globals.path.commonpath filesep 'schema_documents'];
ndi_globals.path.exampleexperpath = [ndi_globals.path.commonpath filesep 'example_sessions'];
ndi_globals.path.temppath = [tempdir filesep 'nditemp'];
ndi_globals.path.testpath = [tempdir filesep 'nditestcode'];
ndi_globals.path.filecachepath = [userpath filesep 'Documents' filesep 'NDI' filesep 'NDI-filecache'];
ndi_globals.path.logpath = [userpath filesep 'Documents' filesep 'NDI' filesep 'Logs'];
ndi_globals.path.preferences = [userpath filesep 'Preferences' filesep' 'NDI'];

 % initialize any NDIcalc-x-matlab directories
ndi_globals.path.calcdoc = {};
ndi_globals.path.calcdocschema = {};

d = ndi.fun.find_calc_directories();

for i=1:numel(d),
	ndi_globals.path.calcdoc{end+1} = [d{i} filesep 'ndi_common' filesep 'database_documents'];
	ndi_globals.path.calcdocschema{end+1} = [d{i} filesep 'ndi_common' filesep 'schema_documents'];
	addpath(d{i});
end;

if ~exist(ndi_globals.path.temppath,'dir'),
	mkdir(ndi_globals.path.temppath);
end;

if ~exist(ndi_globals.path.testpath,'dir'),
	mkdir(ndi_globals.path.testpath);
end;

if ~exist(ndi_globals.path.filecachepath,'dir'),
	mkdir(ndi_globals.path.filecachepath);
end;

if ~exist(ndi_globals.path.preferences,'dir'),
	mkdir(ndi_globals.path.preferences);
end;

 % initialization

ndi.probe.fun.probetype2objectinit;
ndi.database.fun.databasehierarchyinit;

ndi_globals.debug.veryverbose = 1;

 % test write access to preferences, testpath, filecache, temppath
paths = {ndi_globals.path.testpath, ndi_globals.path.temppath, ndi_globals.path.filecachepath, ndi_globals.path.preferences};
pathnames = {'NDI test path', 'NDI temporary path', 'NDI filecache path', 'NDI preferences path'};

for i=1:numel(paths),
	ndiido = ndi.ido();
	fname = [paths{i} filesep 'testfile_' ndiido.id() '.txt'];
	fid = fopen(fname,'wt');
	if fid<0,
		error(['We do not have write access to the ' pathnames{i} ' at '  paths{i} '.']);
	end;
	fclose(fid);
	delete(fname);
end;

ndi_globals.log = vlt.app.log(...
	'system_logfile',[ndi_globals.path.logpath filesep 'system.log'],...
	'error_logfile', [ndi_globals.path.logpath filesep 'error.log'],...
	'debug_logfile', [ndi_globals.path.logpath filesep 'debug.log'],...
	'system_verbosity',5,...
	'error_verbosity',5, ...
	'debug_verbosity', 5, ...
	'log_name', 'ndi',...
	'log_error_behavior','warning');

 % see if the user has all the needed toolboxes, and warn them if they do not
ndi.fun.check_Matlab_toolboxes

 % run any warnings on various architectures
ndi.fun.run_Linux_checks

did.globals;
if isempty(find(strcmp('$NDIDOCUMENTPATH',did_globals.path.definition_names))),
    did_globals.path.definition_names = cat(2,did_globals.path.definition_names,{'$NDIDOCUMENTPATH','$NDISCHEMAPATH'});
    did_globals.path.definition_locations = cat(2,did_globals.path.definition_locations,{ndi_globals.path.documentpath ndi_globals.path.documentschemapath});
end;
if isempty(find(strcmp('$NDICALCDOCUMENTPATH',did_globals.path.definition_names))),
    for i=1:numel(ndi_globals.path.calcdoc)
        did_globals.path.definition_names = cat(2,did_globals.path.definition_names,{'$NDICALCDOCUMENTPATH'});
        did_globals.path.definition_names = cat(2,did_globals.path.definition_names,{'$NDICALCSCHEMAPATH'});
        did_globals.path.definition_locations = cat(2,did_globals.path.definition_locations,{ndi_globals.path.calcdoc{i} ndi_globals.path.calcdocschema{i}});
    end;
end;


%ndi_globals.path.documentpath = [ndi_globals.path.commonpath filesep 'database_documents'];
%ndi_globals.path.documentschemapath = [ndi_globals.path.commonpath filesep 'schema_documents'];

if ~isfield(ndi_globals,'cache'),
	ndi_globals.cache = ndi.cache();
end;