openEMS/matlab/RunOpenEMS.m

79 lines
2.1 KiB
Matlab

function RunOpenEMS(Sim_Path, Sim_File, opts, Settings)
% function RunOpenEMS(Sim_Path, Sim_File, opts, Settings)
%
% Run an openEMS simulation
%
% example:
% Sim_Path = 'MySimPath';
% Sim_File = 'helix.xml'; %should be created by WriteOpenEMS
% opts = '--engine=fastest';
%
% optinal:
% (ssh only on unix with working ssh client)
% Settings.SSH.host = '<hostname or ip>'
% Settings.SSH.bin = '<path_to_openEMS>/openEMS.sh'
%
% RunOpenEMS(Sim_Path,Sim_File,opts,Settings)
%
% See also WriteOpenEMS
%
% openEMS matlab interface
% -----------------------
% author: Thorsten Liebig
if nargin < 3
error 'specify the Sim_Path and Sim_file to simulate'
end
if (nargin<4)
Settings = [];
end
savePath = pwd;
cd(Sim_Path);
if (isfield(Settings,'SSH') && isunix)
ssh_work_path = ['openEMS_' int2str(randi([1e8 9e8],1))];
disp(['Running remote openEMS on ' Settings.SSH.host ' at working dir: ' ssh_work_path]);
[status, result] = unix(['ssh ' Settings.SSH.host ' "mkdir /tmp/' ssh_work_path '"']);
if (status~=0)
disp(result);
error('openEMS:RunOpenEMS','mkdir failed!');
end
[stat, res] = unix(['scp ' Sim_File ' ' Settings.SSH.host ':/tmp/' ssh_work_path '/' Sim_File]);
if (stat~=0)
disp(res);
error('openEMS:RunOpenEMS','scp failed!');
end
status = unix(['ssh ' Settings.SSH.host ' "cd /tmp/' ssh_work_path ' && ' Settings.SSH.bin ' ' Sim_File ' ' opts '"'])
if (status~=0)
disp(result);
error('openEMS:RunOpenEMS','ssh openEMS failed!');
end
disp(['Remote simulation done... copying back results and cleaning up...']);
[stat, res] = unix(['scp -r ' Settings.SSH.host ':/tmp/' ssh_work_path '/* ' pwd '/']);
if (stat~=0);
disp(res);
error('openEMS:RunOpenEMS','scp failed!');
end
[stat, res] = unix(['ssh ' Settings.SSH.host ' rm -r /tmp/' ssh_work_path]);
if (stat~=0);
disp(res);
error('openEMS:RunOpenEMS','remote cleanup failed!');
end
else
args = [Sim_File ' ' opts];
invoke_openEMS(args);
end
cd(savePath);
return