set_path_env.m

function [rootdir, basedir, gitdir] = set_path_env(varargin)

% The function gets useful directory names and sets basic environment
% (path to toolboxes, environment variables, maximum number of CPU cores)
% depending on current hostname.
%
%
% :Usage:
% ::
%     [rootdir, basedir, gitdir] = set_path_env(varargin)
%
%
% :Optional Input:
% ::
%   - hostname           custom hostname.
%                        if this option is not specified, then the function
%                        get host name by system('hostname') function.
%   - no_canlab          do not add canlab path
%   - no_cocoanlab       do not add cocoanlab path
%   - no_spm12           do not add spm12
%   - ncpu               number of CPU cores to be used (default: 1).
%
%
% :Output:
% ::
%     rootdir            root directory based on hostname (not exactly
%                        'root' based on exact definition although...).
%     basedir            base working directory.
%     gitdir             github directory that contains custom toolboxes.
%
%
% :Example:
% ::
%
%
% ..
%     Author and copyright information:
%
%     Copyright (C) Jan 2019  Jae-Joong Lee
%
%     This program is free software: you can redistribute it and/or modify
%     it under the terms of the GNU General Public License as published by
%     the Free Software Foundation, either version 3 of the License, or
%     (at your option) any later version.
%
%     This program is distributed in the hope that it will be useful,
%     but WITHOUT ANY WARRANTY; without even the implied warranty of
%     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
%     GNU General Public License for more details.
%
%     You should have received a copy of the GNU General Public License
%     along with this program.  If not, see <http://www.gnu.org/licenses/>.
% ..


[~, hostname] = system('hostname');
hostname = strtrim(hostname);
add_canlab = true;
add_cocoanlab = true;
add_spm12 = true;
ncpu = 1;
for i = 1:length(varargin)
    if ischar(varargin{i})
        switch varargin{i}
            case {'hostname'}
                hostname = varargin{i+1};
            case {'no_canlab'}
                add_canlab = false;
            case {'no_cocoanlab'}
                add_cocoanlab = false;
            case {'no_spm12'}
                add_spm12 = false;
            case {'ncpu'}
                ncpu = varargin{i+1};
        end
    end
end

setenv('DYLD_LIBRARY_PATH', [getenv('FREESURFER_HOME') '/lib/gcc/lib' ':/opt/X11/lib/flat_namespace']);
maxNumCompThreads(ncpu);

if regexp(hostname, ['\w*' 'hebenula.local' '\w*'])
    fprintf('Currently working on Habenula!\n');
    rootdir = '/Volumes/habenula';
    basedir = fullfile(rootdir, 'dropbox');
    gitdir = fullfile(rootdir, 'github');
    if add_canlab; addpath(genpath(fullfile(rootdir, 'github/canlab'))); rmpath(genpath(fullfile(rootdir, 'github/canlab/MediationToolbox/geom2d'))); rmpath(genpath(fullfile(rootdir, 'github/canlab/CanlabPrivate/preprocess'))); end
    if add_cocoanlab; addpath(genpath(fullfile(rootdir, 'github/cocoanlab'))); end
    if add_spm12; addpath(genpath(fullfile(basedir, 'resources/spm12'))); rmpath(genpath(fullfile(basedir, 'resources/spm12/external'))); end
elseif regexp(hostname, ['\w*' 'homeo.local' '\w*'])
    fprintf('Currently working on Homeo!\n');
    rootdir = '/Volumes/homeo';
    basedir = fullfile(rootdir, 'dropbox');
    gitdir = fullfile(rootdir, 'github');
    if add_canlab; addpath(genpath(fullfile(rootdir, 'github/canlab'))); rmpath(genpath(fullfile(rootdir, 'github/canlab/MediationToolbox/geom2d'))); rmpath(genpath(fullfile(rootdir, 'github/canlab/CanlabPrivate/preprocess'))); end
    if add_cocoanlab; addpath(genpath(fullfile(rootdir, 'github/cocoanlab'))); end
    if add_spm12; addpath(genpath(fullfile(basedir, 'resources/spm12'))); rmpath(genpath(fullfile(basedir, 'resources/spm12/external'))); end
elseif regexp(hostname, ['\w*' 'cnir' '\w*'])
    fprintf('Currently working on HPC!\n');
    rootdir = '/cocoanlab';
    basedir = fullfile(rootdir, 'habenula_sync2');
    gitdir = '/home/indaydreams/github';
    if add_canlab; addpath(genpath('/sas1/cocoanlab/Resources/github/canlab')); rmpath(genpath('/sas1/cocoanlab/Resources/github/canlab/MediationToolbox/geom2d')); rmpath(genpath('/sas1/cocoanlab/Resources/github/canlab/CanlabPrivate/preprocess')); end
    if add_cocoanlab; addpath(genpath('/sas1/cocoanlab/Resources/github/cocoanlab')); end
    if add_spm12; addpath(genpath('/sas1/cocoanlab/Resources/spm12')); rmpath(genpath('/sas1/cocoanlab/Resources/spm12/external')); end
elseif regexp(hostname, ['\w*' 'JJ-macpro.local' '\w*'])
    fprintf('Currently working on JJ macbook!\n');
    rootdir = '/Users/jaejoonglee';
    basedir = fullfile(rootdir, 'dropbox');
    gitdir = fullfile(rootdir, 'github');
    if add_canlab; addpath(genpath(fullfile(rootdir, 'github/canlab'))); rmpath(genpath(fullfile(rootdir, 'github/canlab/MediationToolbox/geom2d'))); rmpath(genpath(fullfile(rootdir, 'github/canlab/CanlabPrivate/preprocess'))); end
    if add_cocoanlab; addpath(genpath(fullfile(rootdir, 'github/cocoanlab'))); end
    if add_spm12; addpath(genpath(fullfile(rootdir, 'resources/spm12'))); rmpath(genpath(fullfile(rootdir, 'resources/spm12/external'))); end
else
    error('No matching hostname.');
end

end