79 lines
2.1 KiB
Matlab
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
|