0001 function LaunchQueueJobGeneric(md,executionpath)
0002
0003
0004
0005
0006
0007
0008 if ~exist([ md.name '.bin'],'file'),
0009 error('LaunchQueueJobGeneric error message: Binary input file missing, cannot go forward');
0010 end
0011
0012 if ~exist([ md.name '.queue'],'file'),
0013 error('LaunchQueueJobGeneric error message: queueing script issing, cannot go forward');
0014 end
0015
0016
0017
0018 [result,hostname]=system('hostname -s');hostname=hostname(1:end-1);
0019
0020 disp('uploading input file and queueing script');
0021 if strcmpi(hostname,md.cluster),
0022 system(['cp ' md.name '.bin' ' ' md.name '.queue' ' ' executionpath]);
0023 else
0024 system(['scp ' md.name '.bin' ' ' md.name '.queue' ' ' md.cluster ':' executionpath]);
0025 end
0026
0027 disp('launching solution sequence on remote cluster');
0028
0029 if strcmpi(hostname,md.cluster),
0030 system(['cd ' executionpath ' && source ' md.name '.queue ']);
0031 else
0032 system(['ssh ' md.cluster ' ''cd ' executionpath ' && source ' md.name '.queue ''']);
0033 end