APST_auto_install.m

%APST_AUTO_INSTALL installs the APST toolset
%   APST_AUTO_INSTALL should be executed after extracting the
%   APST toolset to the desired installation directory.  When called,
%   the script will install the necessary directories for operation of the
%   APST toolset.
%
%   See also addpath genpath
%
%   Developed by Matthew Williams - UIUC

spath  = fileparts(mfilename('fullpath'));    % path of executed script

% installing property tables directory
dir_path{1} = fullfile(spath,'Icons');
if exist(dir_path{1},'dir')
    addpath(genpath(dir_path{1}))
    err(1) = true;
else
    err(1) = false;
end

% installing support functions directory
dir_path{2} = fullfile(spath,'Support Functions');
if exist(dir_path{2},'dir')
    addpath(genpath(dir_path{2}))
    err(2) = true;
else
    err(2) = false;
end

% installing documentation directory
dir_path{3} = fullfile(spath,'Support Functions\Property Tables');
if exist(dir_path{3},'dir')
    addpath(genpath(dir_path{3}))
    err(3) = true;
else
    err(3) = false;
end

% installing images directory
dir_path{4} = fullfile(spath,'Support Functions\Pump Map');
if exist(dir_path{4},'dir')
    addpath(genpath(dir_path{4}))
    err(4) = true;
else
    err(4) = false;
end


dir_path{5} = spath;
if exist(dir_path{5},'dir')
    addpath(dir_path{5})
    err(5) = true;
else
    err(5) = false;
end

% Error checking
if ( err(1) == false && err(2) == false && err(3) ==  false && err(4) == false  )
    warning(['APST_auto_install.m failed to install the necessary '...
        'directories. Administrator privileges may be required. Check', ...
        ' necessary privileges of the installation directory.'])
elseif ( err(1) == false || err(2) == false || err(3) ==  false || err(4) == false  )
    warning(['One or more directories failed to install.  Manual ',...
        'installation required for the following:'])
    for i=1:6
        if err(i) == false
            disp(dir_path{i})
        end
    end
else
    disp(['Successfully installed the APST toolset. '...
        'MATLAB/Simulink may need to be restarted.'])
end

savepath      % saves the path     

clear spath dir_path err