function [cfg] = ft_checkconfig(cfg, varargin)

% FT_CHECKCONFIG checks the input cfg of the main FieldTrip functions

%

% It checks whether the cfg contains all the required options, it gives

% a warning when renamed or deprecated options are used, and it makes sure

% no forbidden options are used. If necessary and possible, this function

% will adjust the cfg to the input requirements. If the input cfg does NOT

% correspond to the requirements, this function gives an elaborate warning

% message.

%

% It controls the relevant cfg options that are being passed on to other

% functions, by putting them into substructures or converting them into the

% required format.

%

% Use as

% [cfg] = ft_checkconfig(cfg, ...)

%

% The behavior of checkconfig can be controlled by the following cfg options, which

% can be set as global FieldTrip defaults (see FT_DEFAULTS)

% cfg.checkconfig = 'pedantic', 'loose' or 'silent', this controls the how strict this function is

% cfg.checksize = number in bytes (can be inf), this controls the maximum size of output cfg fields

%

% Optional input arguments should be specified as key-value pairs and can include

% renamed = {'old', 'new'} % list the old and new option

% renamedval = {'opt', 'old', 'new'} % list option and old and new value

% allowedtype = {'opt', 'allowed1', ...} % list of allowed data type classes for a particular option, anything else will throw an error

% allowedval = {'opt', 'allowed1', ...} % list of allowed values for a particular option, anything else will throw an error

% required = {'opt1', 'opt2', etc.} % list the required options

% allowed = {'opt1', 'opt2', etc.} % list the allowed options, all other options are forbidden

% forbidden = {'opt1', 'opt2', etc.} % list the forbidden options, these result in an error

% deprecated = {'opt1', 'opt2', etc.} % list the deprecated options

% unused = {'opt1', 'opt2', etc.} % list the unused options, these will be removed and a warning is issued

% createsubcfg = {'subname', etc.} % list the names of the sub-configuration items

% createtopcfg = {'subname', etc.} % list the names of the sub-configuration items

% dataset2files = 'yes', 'no' % converts dataset into headerfile and datafile

% inside2logical = 'yes', 'no' % converts cfg.inside or cfg.sourcemodel.inside into logical representation

% checksize = 'yes', 'no' % remove large fields from the cfg

%

% See also FT_CHECKDATA, FT_CHECKOPT, FT_DEFAULTS

% Copyright (C) 2007-2022, Robert Oostenveld, Saskia Haegens

%

% This file is part of FieldTrip, see http://www.fieldtriptoolbox.org

% for the documentation and details.

%

% FieldTrip 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.

%

% FieldTrip 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 FieldTrip. If not, see <http://www.gnu.org/licenses/>.

%

% $Id$

renamed = ft_getopt(varargin, 'renamed');

allowed = ft_getopt(varargin, 'allowed');

required = ft_getopt(varargin, 'required');

deprecated = ft_getopt(varargin, 'deprecated');

unused = ft_getopt(varargin, 'unused');

forbidden = ft_getopt(varargin, 'forbidden');

renamedval = ft_getopt(varargin, 'renamedval');

allowedtype = ft_getopt(varargin, 'allowedtype');

allowedval = ft_getopt(varargin, 'allowedval');

createsubcfg = ft_getopt(varargin, 'createsubcfg');

createtopcfg = ft_getopt(varargin, 'createtopcfg');

checkfilenames = ft_getopt(varargin, 'dataset2files', 'no');

checkinside = ft_getopt(varargin, 'inside2logical', 'no');

checksize = ft_getopt(varargin, 'checksize', 'no');

% these should be cell arrays and not strings

if ischar(required), required = {required}; end

if ischar(deprecated), deprecated = {deprecated}; end

if ischar(unused), unused = {unused}; end

if ischar(forbidden), forbidden = {forbidden}; end

if ischar(createsubcfg), createsubcfg = {createsubcfg}; end

if ischar(createtopcfg), createtopcfg = {createtopcfg}; end

if isfield(cfg, 'checkconfig')

silent = strcmp(cfg.checkconfig, 'silent');

loose = strcmp(cfg.checkconfig, 'loose');

pedantic = strcmp(cfg.checkconfig, 'pedantic');

else

silent = false;

loose = true;

pedantic = false;

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% rename old to new options, give warning

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if ~isempty(renamed)

if issubfield(cfg, renamed{1})

cfg = setsubfield(cfg, renamed{2}, (getsubfield(cfg, renamed{1})));

cfg = rmsubfield(cfg, renamed{1});

if silent

% don't mention it

elseif loose

ft_warning('use cfg.%s instead of cfg.%s', renamed{2}, renamed{1});

elseif pedantic

ft_error('use cfg.%s instead of cfg.%s', renamed{2}, renamed{1});

end

end

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% rename old to new value, give warning

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if ~isempty(renamedval) && issubfield(cfg, renamedval{1})

if isequaln(getsubfield(cfg, renamedval{1}), renamedval{2})

cfg = setsubfield(cfg, renamedval{1}, renamedval{3});

% format the values as a string, regardless of their type

str2 = printstruct([], renamedval{2}, 'lastnewline', false, 'lastsemicolon', false);

str3 = printstruct([], renamedval{3}, 'lastnewline', false, 'lastsemicolon', false);

if silent

% don't mention it

elseif loose

ft_warning('use cfg.%s=%s instead of cfg.%s=%s', renamedval{1}, str3, renamedval{1}, str2);

elseif pedantic

ft_error('use cfg.%s=%s instead of cfg.%s=%s', renamedval{1}, str3, renamedval{1}, str2);

end

end

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% check for required fields, give error when missing

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if ~isempty(required)

fieldsused = fieldnames(cfg);

[c, ia, ib] = setxor(required, fieldsused);

if ~isempty(ia)

ft_error('The field cfg.%s is required\n', required{ia});

end

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% check for deprecated fields, give warning when present

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if ~isempty(deprecated)

fieldsused = fieldnames(cfg);

if any(ismember(deprecated, fieldsused))

if silent

% don't mention it

elseif loose

ft_warning('The option cfg.%s is deprecated, support is no longer guaranteed\n', deprecated{ismember(deprecated, fieldsused)});

elseif pedantic

ft_error('The option cfg.%s is not longer supported\n', deprecated{ismember(deprecated, fieldsused)});

end

end

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% check for unused fields, give warning when present and remove them

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if ~isempty(unused)

fieldsused = fieldnames(cfg);

if any(ismember(unused, fieldsused))

cfg = rmfield(cfg, unused(ismember(unused, fieldsused)));

if silent

% don't mention it

elseif loose

ft_warning('The field cfg.%s is unused, it will be removed from your configuration\n', unused{ismember(unused, fieldsused)});

elseif pedantic

ft_error('The field cfg.%s is unused\n', unused{ismember(unused, fieldsused)});

end

end

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% check for required fields, give error when missing

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if ~isempty(allowed)

% there are some fields that are always be allowed

allowed = union(allowed, ignorefields('allowed'));

fieldsused = fieldnames(cfg);

[c, i] = setdiff(fieldsused, allowed);

if ~isempty(c)

if silent

% don't mention it

elseif loose

ft_warning('The field cfg.%s is not allowed\n', c{1});

elseif pedantic

ft_error('The field cfg.%s is not allowed\n', c{1});

end

end

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% check for forbidden fields, give error when present

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if ~isempty(forbidden)

fieldsused = fieldnames(cfg);

if any(ismember(forbidden, fieldsused))

cfg = rmfield(cfg, forbidden(ismember(forbidden, fieldsused)));

if silent

% don't mention it

elseif loose

ft_warning('The field cfg.%s is forbidden, it will be removed from your configuration\n', forbidden{ismember(forbidden, fieldsused)});

elseif pedantic

ft_error('The field cfg.%s is forbidden\n', forbidden{ismember(forbidden, fieldsused)});

end

end

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% check for allowed types and values, give error if incorrect

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if ~isempty(allowedtype)

ft_checkopt(cfg, allowedtype{1}, allowedtype(2:end), {});

end

if ~isempty(allowedval)

ft_checkopt(cfg, allowedval{1}, {}, allowedval(2:end));

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% backward compatibility for gradiometer, electrode and optode definitions

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if isfield(cfg, 'grad') && ~ischar(cfg.grad)

cfg.grad = ft_datatype_sens(struct(cfg.grad));

end

if isfield(cfg, 'elec') && ~ischar(cfg.elec)

cfg.elec = ft_datatype_sens(struct(cfg.elec));

end

if isfield(cfg, 'opto') && ~ischar(cfg.opto)

cfg.opto = ft_datatype_sens(struct(cfg.opto));

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% backward compatibility for neighbour structures

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if isfield(cfg, 'neighbours') && iscell(cfg.neighbours)

cfg.neighbours = fixneighbours(cfg.neighbours);

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% backward compatibility for montage

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if isfield(cfg, 'montage') && isstruct(cfg.montage)

cfg.montage = fixoldorg(cfg.montage);

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% createtopcfg

%

% This collects the optional arguments for some of the low-level functions and moves

% them from the separate substructure to the top level.

%

% This is to ensure backward compatibility of end-user scripts, FieldTrip functions

% and documentation that use an obsolete nested configuration where a flat

% configuration should be used.

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if ~isempty(createtopcfg)

for j=1:length(createtopcfg)

subname = createtopcfg{j};

if isfield(cfg, subname)

% get the options that are already specified in the substructure

subcfg = cfg.(subname);

else

% start with an empty substructure

subcfg = [];

end

% move all relevant options from the substructure to the top

switch subname

case 'sourcemodel'

fieldname = {

'xgrid'

'ygrid'

'zgrid'

'resolution'

'tight'

'warpmni'

'template'

};

case {'dics' 'eloreta' 'harmony' 'lcmv' 'mne' 'music' 'mvl' 'pcc' 'rv' 'sam' 'sloreta'}

fieldname = {

'keepleadfield'

'backproject'

'reducerank'

'normalize'

'normalizeparam'

'weight'

};

case {'superlet'}

fieldname = {

'basewidth'

'gwidth'

'combine'

'order'

};

otherwise

ft_error('unexpected name of the subfunction');

end % switch subname

for i=1:length(fieldname)

if ~isfield(cfg, fieldname{i}) && isfield(subcfg, fieldname{i})

if silent

% don't mention it

elseif loose

ft_warning('The field cfg.%s.%s is deprecated, please use cfg.%s\n', subname, fieldname{i}, fieldname{i});

elseif pedantic

ft_error('The field cfg.%s.%s is not longer supported, please use cfg.%s\n', subname, fieldname{i}, fieldname{i});

end

cfg.(fieldname{i}) = subcfg.(fieldname{i}); % set it in the top-configuration

subcfg = rmfield(subcfg, fieldname{i}); % remove it from the sub-configuration

elseif isfield(cfg, fieldname{i}) && isfield(subcfg, fieldname{i})

if silent

% don't mention it

elseif loose

ft_warning('The field cfg.%s.%s is deprecated, please use cfg.%s\n', subname, fieldname{i}, fieldname{i});

elseif pedantic

ft_error('The field cfg.%s.%s is not longer supported, please use cfg.%s\n', subname, fieldname{i}, fieldname{i});

end

if isequal(cfg.(fieldname{i}), subcfg.(fieldname{i}))

subcfg = rmfield(subcfg, fieldname{i}); % remove it from the sub-configuration

else

ft_error('The field cfg.%s.%s is conflicting with cfg.%s\n', subname, fieldname{i}, fieldname{i});

end

end

end

% copy the substructure back into the main configuration structure

cfg.(subname) = subcfg;

end

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% createsubcfg

%

% This collects the optional arguments for some of the low-level functions and puts

% them in a separate substructure.

%

% This is to ensure backward compatibility of end-user scripts, FieldTrip functions

% and documentation that do not use the nested detailed configuration but that use a

% flat configuration.

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if ~isempty(createsubcfg)

for j=1:length(createsubcfg)

subname = createsubcfg{j};

if isfield(cfg, subname)

% get the options that are already specified in the substructure

subcfg = cfg.(subname);

else

% start with an empty substructure

subcfg = [];

end

% move all relevant options to the substructure

switch subname

case 'preproc'

fieldname = {

'reref'

'refchannel'

'implicitref'

'detrend'

'bpfiltdir'

'bpfilter'

'bpfiltord'

'bpfilttype'

'bpfreq'

'bsfiltdir'

'bsfilter'

'bsfiltord'

'bsfilttype'

'bsfreq'

'demean'

'baselinewindow'

'denoise'

'dftfilter'

'dftfreq'

'hpfiltdir'

'hpfilter'

'hpfiltord'

'hpfilttype'

'hpfreq'

'lpfiltdir'

'lpfilter'

'lpfiltord'

'lpfilttype'

'lpfreq'

'medianfilter'

'medianfiltord'

'hilbert'

'derivative'

'rectify'

'boxcar'

'absdiff'

};

case 'sourcemodel'

fieldname = {

'filter'

'leadfield'

'inside'

'outside'

'pos'

'tri'

'dim'

'time'

'signal'

};

case 'dics'

fieldname = {

'feedback'

'fixedori'

'keepcsd'

'keepfilter'

'keepmom'

'keepsubspace'

'lambda'

'kappa'

'tolerance'

'invmethod'

'powmethod'

'projectnoise'

'realfilter'

'subspace'

};

case 'eloreta'

fieldname = {

'keepfilter'

'keepmom'

'lambda'

'kappa'

};

case 'sloreta'

fieldname = {

'feedback'

'fixedori'

'keepcov'

'keepfilter'

'keepmom'

'keepsubspace'

'lambda'

'kappa'

'tolerance'

'invmethod'

'powmethod'

'projectnoise'

'projectmom'

'subspace'

};

case 'lcmv'

fieldname = {

'feedback'

'fixedori'

'keepcov'

'keepfilter'

'keepmom'

'keepsubspace'

'lambda'

'kappa'

'tolerance'

'invmethod'

'powmethod'

'projectnoise'

'projectmom'

'subspace'

};

case 'pcc'

fieldname = {

'feedback'

'keepfilter'

'keepmom'

'lambda'

'kappa'

'tolerance'

'invmethod'

%'powmethod'

'projectnoise'

'keepcsd'

'realfilter'

'fixedori'

};

case 'rv'

fieldname = {

'feedback'

'lambda'

};

case 'mne'

fieldname = {

'feedback'

'lambda'

'keepfilter'

'prewhiten'

'snr'

'scalesourcecov'

};

case 'harmony'

fieldname = {

'feedback'

'lambda'

'keepfilter'

'prewhiten'

'snr'

'scalesourcecov'

'filter_order'

'filter_bs'

'connected_components'

'number_harmonics'

};

case 'music'

fieldname = {

'feedback'

'numcomponent'

};

case 'sam'

fieldname = {

'meansphereorigin'

'feedback'

'lambda'

'kappa'

'tolerance'

'invmethod'

'fixedori'

'noisecov'

'toi'

'latency_ori'

};

case 'mvl'

fieldname = {};

case {'npsf', 'granger' 'pdc' 'dtf' 'gpdc' 'ddtf'}

% non-parametric spectral factorization -> csd2transfer

fieldname = {

'block'

'blockindx'

'channelcmb'

'numiteration'

'tol'

'sfmethod'

'svd'

'init'

'checkconvergence'

'stabilityfix'

};

otherwise

ft_error('unexpected name of the subfunction');

end % switch subname

for i=1:length(fieldname)

if ~isfield(subcfg, fieldname{i}) && isfield(cfg, fieldname{i})

if silent

% don't mention it

elseif loose

ft_warning('The field cfg.%s is deprecated, please use cfg.%s.%s\n', fieldname{i}, subname, fieldname{i});

elseif pedantic

ft_error('The field cfg.%s is not longer supported, please use cfg.%s.%s\n', fieldname{i}, subname, fieldname{i});

end

subcfg.(fieldname{i}) = cfg.(fieldname{i}); % set it in the sub-configuration

cfg = rmfield(cfg, fieldname{i}); % remove it from the top-configuration

elseif isfield(subcfg, fieldname{i}) && isfield(cfg, fieldname{i})

if silent

% don't mention it

elseif loose

ft_warning('The field cfg.%s is deprecated, please use cfg.%s.%s\n', fieldname{i}, subname, fieldname{i});

elseif pedantic

ft_error('The field cfg.%s is not longer supported, please use cfg.%s.%s\n', fieldname{i}, subname, fieldname{i});

end

if isequal(subcfg.(fieldname{i}), cfg.(fieldname{i}))

cfg = rmfield(cfg, fieldname{i}); % remove it from the top-configuration

else

ft_error('The field cfg.%s is conflicting with cfg.%s.%s\n', fieldname{i}, subname, fieldname{i});

end

end

end

% copy the substructure back into the main configuration structure

cfg.(subname) = subcfg;

end

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% checkinside, i.e. inside2logical

%

% Converts indexed cfg.inside/outside into logical representation if necessary.

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if istrue(checkinside)

if isfield(cfg, 'inside') && any(cfg.inside>1)

inside = false(size(cfg.pos,1),1);

inside(cfg.inside) = true;

cfg = removefields(cfg, {'inside', 'outside'});

cfg.inside = inside;

elseif isfield(cfg, 'sourcemodel') && isfield(cfg.sourcemodel, 'inside') && any(cfg.sourcemodel.inside>1)

inside = false(size(cfg.sourcemodel.pos,1),1);

inside(cfg.sourcemodel.inside) = true;

cfg.sourcemodel = removefields(cfg.sourcemodel, {'inside', 'outside'});

cfg.sourcemodel.inside = inside;

elseif isfield(cfg, 'inside') && ~islogical(cfg.inside) && numel(cfg.inside)==size(cfg.pos,1)

cfg.inside = logical(cfg.inside);

elseif isfield(cfg, 'sourcemodel') && isfield(cfg.sourcemodel, 'inside') && ~islogical(cfg.sourcemodel.inside) && numel(cfg.sourcemodel.inside)==size(cfg.sourcemodel.pos,1)

cfg.sourcemodel.inside = logical(cfg.sourcemodel.inside);

end

end % if checkinside

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% checkfilenames, i.e. dataset2files

%

% Converts cfg.dataset into cfg.headerfile and cfg.datafile if necessary.

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if istrue(checkfilenames)

% start with empty fields if they are not present

if ~isfield(cfg, 'dataset')

cfg.dataset = [];

end

if ~isfield(cfg, 'datafile')

cfg.datafile = [];

end

if ~isfield(cfg, 'headerfile')

cfg.headerfile = [];

end

if ~isempty(cfg.dataset)

% the dataset is an abstract concept and might relate to a file, a

% constellation of fioles or a directory containing multiple files

if isequal(cfg.dataset, 'gui') || isequal(cfg.dataset, 'uigetfile')

% display a graphical file selection dialog

[f, p] = uigetfile('*.*', 'Select a data file');

if isequal(f, 0)

ft_error('User pressed cancel');

else

d = fullfile(p, f);

end

cfg.dataset = d;

elseif strcmp(cfg.dataset, 'uigetdir')

% display a graphical directory selection dialog

d = uigetdir('*.*', 'Select a data directory');

if isequal(d, 0)

ft_error('User pressed cancel');

end

cfg.dataset = d;

end

% ensure that the headerfile and datafile are defined, which are sometimes different than the name of the dataset

% this requires correct autodetection of the format of the data set

[cfg.dataset, cfg.headerfile, cfg.datafile] = dataset2files(cfg.dataset, []);

elseif ~isempty(cfg.datafile) && isempty(cfg.headerfile)

% assume that the datafile also contains the header information

cfg.dataset = cfg.datafile;

cfg.headerfile = cfg.datafile;

elseif isempty(cfg.datafile) && ~isempty(cfg.headerfile)

% assume that the headerfile also contains the data

cfg.dataset = cfg.headerfile;

cfg.datafile = cfg.headerfile;

end

% fill dataformat if unspecified, doing this only once saves time later

if ~isfield(cfg,'dataformat') || isempty(cfg.dataformat)

cfg.dataformat = ft_filetype(cfg.datafile);

end

% fill headerformat if unspecified, doing this only once saves time later

if ~isfield(cfg,'headerformat') || isempty(cfg.headerformat)

cfg.headerformat = ft_filetype(cfg.headerfile);

end

% remove empty fields, otherwise a subsequent check on required fields doesn't make any sense

if isempty(cfg.dataset), cfg = rmfield(cfg, 'dataset'); end

if isempty(cfg.headerfile), cfg = rmfield(cfg, 'headerfile'); end

if isempty(cfg.datafile), cfg = rmfield(cfg, 'datafile'); end

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% check the size of fields in the cfg, remove large fields

% the max allowed size should be specified in cfg.checksize (this can be

% set with ft_defaults)

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

if strcmp(checksize, 'yes') && isfield(cfg, 'checksize') && ~isinf(cfg.checksize)

cfg = checksizefun(cfg, cfg.checksize);

end

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% SUBFUNCTION

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function [cfg] = checksizefun(cfg, max_size)

% first check the total size of the cfg

if (varsize(cfg) <= max_size)

return;

end

fieldsorig = fieldnames(cfg);

for i=1:numel(fieldsorig)

for k=1:numel(cfg) % process each structure in a struct-array

if any(strcmp(fieldsorig{i}, ignorefields('checksize')))

% keep this field, regardless of its size

continue

elseif iscell(cfg(k).(fieldsorig{i}))

% run recursively on each struct element that is contained in the cell-array

for j=1:numel(cfg(k).(fieldsorig{i}))

if isstruct(cfg(k).(fieldsorig{i}){j})

cfg(k).(fieldsorig{i}){j} = checksizefun(cfg(k).(fieldsorig{i}){j}, max_size);

end

end

elseif isstruct(cfg(k).(fieldsorig{i})) && ~any(strcmp(fieldsorig{i}, ignorefields('recursesize')))

% run recursively on a struct field

cfg(k).(fieldsorig{i}) = checksizefun(cfg(k).(fieldsorig{i}), max_size);

else

% determine the size of the field and remove it if too large

if varsize(cfg(k).(fieldsorig{i}))>max_size

cfg(k).(fieldsorig{i}) = 'empty - this was cleared by checkconfig';

end

end

end % for numel(cfg)

end % for each of the fieldsorig

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% SUBFUNCTION converts a cell-array of structure arrays into a structure array

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function [newNeighbours] = fixneighbours(neighbours)

newNeighbours = struct;

for i=1:numel(neighbours)

if i==1, newNeighbours = neighbours{i}; end

newNeighbours(i) = neighbours{i};

end