Homec4science
Diffusion iCAPs public version 2 (master) Browse

iCAPs_v2/packages/spm12/compat/spm_tbx_config2cfg.m
e5f5005bb2efmaster

Last Change
Raw File

spm_tbx_config2cfg.m
View Options

function [cfgname, defname] = spm_tbx_config2cfg(c0)
% Convert SPM5 toolbox configuration to Matlabbatch
% FORMAT spm_tbx_config2cfg(c)
% Input:
% c - SPM5 toolbox configuration structure
% Output: (written to disk in the current working directory)
% tbx_cfg_<toolboxtag>.m - Code to generate a Matlabbatch configuration
% tree similar to the SPM5 configuration struct
% tbx_def_<toolboxtag>.m - Code to set toolbox defaults.
%
% Both files should be placed in the root directory of the toolbox
% instead of the old config file. They will be picked up during spm
% initialisation by spm_cfg.m.
% The full subscript reference path will become
% spm.tools.<toolboxtag> in the configuration tree.
%
% CAVE: No code is generated for subfunctions that are present in the old
% config file. This code has to be transferred manually. A transition
% from .vfiles to .vout callbacks is strongly encouraged. This requires
% - computation functions to return a single results variable (any kind
% of MATLAB variable allowed, but struct or cell preferred to combine
% multiple results)
% - a .vout callback to describe subscript references into this output
% variable for each individual output.
%
% Note that it is no longer possible to open a non-cfg_exbranch node in the
% GUI. In SPM5, a call like
% spm_jobman('interactive','','tools.vgtbx_Volumes')
% would have opened the top level choice for the Volumes toolbox. In SPM8,
% this call will generate a warning and open the GUI with an empty job.
% Users then have to select the tools from the "SPM->Tools" menu.
% If one wants to open a dummy job consisting of more than one module in
% a toolbox, one could use code like this
%
% % Generate dummy job with default settings for estimate/write
% % The struct([]) is necessary to avoid a warning during initialisation
% j{1}.spm.spatial.realign.estimate = struct([]);
% j{2}.spm.spatial.realign.write = struct([]);
% % Load this job into spm_jobman
% spm_jobman('interactive',j)
%_______________________________________________________________________
% Copyright (C) 2008 Wellcome Trust Centre for Neuroimaging
% Volkmar Glauche
% $Id: spm_tbx_config2cfg.m 4905 2012-09-06 15:34:26Z guillaume $
% Convert to cfg_ tree. This will produce warnings if some elements could
% not be converted properly.
c = cfg_struct2cfg(c0);
tag = gettag(c);
cfgname = sprintf('tbx_cfg_%s', tag);
defname = sprintf('tbx_def_%s', tag);
[c defaults] = val2def(c, [], defname, '');
% generate code for configuration
cstr = gencode(c,'',{});
fid = fopen(sprintf('%s.m', cfgname),'w');
fprintf(fid, 'function %s = %s\n', tag, cfgname);
fprintf(fid, ...
'%% MATLABBATCH Configuration file for toolbox ''%s''\n', c.name);
fprintf(fid, ...
'%% This code has been automatically generated.\n');
fprintf(fid, '%s\n', cstr{:});
fclose(fid);
% generate code for defaults
dstr = gencode(defaults);
fid = fopen(sprintf('%s.m', defname),'w');
% function head
fprintf(fid, 'function varargout = %s(defstr, defval)\n', defname);
fprintf(fid, ...
'%% MATLABBATCH Defaults file for toolbox ''%s''\n', c.name);
fprintf(fid, ...
'%% This code has been automatically generated.\n\n');
% declaration of defaults variable
fprintf(fid, ...
'persistent defaults;\n');
fprintf(fid, ...
'if isempty(defaults)\n');
fprintf(fid, ...
' %s\n', dstr{:});
fprintf(fid, ...
'end\n');
% code to get/set defaults
fprintf(fid, ...
'if nargin == 1\n');
fprintf(fid, ...
' [un varargout{1}] = evalc([''defaults.'' defstr '';'']);\n');
fprintf(fid, ...
'else\n');
fprintf(fid, ...
' evalc([''defaults.'' defstr '' = defval;'']);\n');
fprintf(fid, ...
'end\n');
fclose(fid);
c4science · Help