2010-07-20 09:38:06 +00:00
|
|
|
function invoke_openEMS( opts, logfile, silent )
|
|
|
|
% function invoke_openEMS( opts, logfile, silent )
|
2010-06-09 07:22:54 +00:00
|
|
|
%
|
|
|
|
% internal method to invoke openEMS, use RunOpenEMS instead
|
|
|
|
%
|
|
|
|
% See also RunOpenEMS
|
|
|
|
%
|
|
|
|
% openEMS matlab interface
|
|
|
|
% -----------------------
|
2013-09-04 11:25:54 +00:00
|
|
|
% author: Sebastian Held, Thorsten Liebig
|
2010-05-03 20:09:40 +00:00
|
|
|
|
|
|
|
if nargin < 1
|
|
|
|
error 'specify the xml file to simulate'
|
|
|
|
end
|
2010-07-20 09:38:06 +00:00
|
|
|
if nargin < 3
|
|
|
|
silent = 0;
|
|
|
|
end
|
|
|
|
if (nargin < 2) || isempty(logfile)
|
|
|
|
if isunix
|
|
|
|
logfile = '/dev/null';
|
|
|
|
else
|
|
|
|
logfile = 'nul:';
|
|
|
|
end
|
|
|
|
end
|
2010-05-03 20:09:40 +00:00
|
|
|
|
|
|
|
filename = mfilename('fullpath');
|
|
|
|
dir = fileparts( filename );
|
2012-11-16 20:44:46 +00:00
|
|
|
|
2010-05-03 20:09:40 +00:00
|
|
|
if isunix
|
2013-09-13 09:15:32 +00:00
|
|
|
openEMS_bin = searchBinary('openEMS.sh', ...
|
|
|
|
{[dir filesep '..' filesep '..' filesep], ... % try devel path
|
|
|
|
[dir filesep '..' filesep '..' filesep '..' filesep '..' filesep 'bin' filesep]}); % try (default) install path
|
2013-09-04 13:57:38 +00:00
|
|
|
else % assume windows
|
2013-09-13 09:15:32 +00:00
|
|
|
openEMS_bin = searchBinary('openEMS.exe', [dir filesep '..' filesep '..' filesep]);
|
2010-05-03 20:09:40 +00:00
|
|
|
end
|
|
|
|
|
2013-09-04 11:25:54 +00:00
|
|
|
command = [openEMS_bin ' ' opts];
|
2010-06-21 10:17:19 +00:00
|
|
|
|
2010-07-20 09:38:06 +00:00
|
|
|
if ~silent
|
|
|
|
if (isunix && nargin>1)
|
|
|
|
command = [command ' 2>&1 | tee ' logfile];
|
|
|
|
end
|
|
|
|
else
|
|
|
|
command = [command ' > ' logfile ' 2>&1'];
|
2010-06-21 10:17:19 +00:00
|
|
|
end
|
|
|
|
|
2010-05-03 20:09:40 +00:00
|
|
|
system(command);
|