Changeset 25377

Timestamp:

08/11/20 19:12:22 (5 years ago)

Author:

Mathieu Morlighem

Message:

NEW: added maui

File:

• issm/trunk-jpl/src/m/classes/clusters/maui.m (copied) (copied from issm/trunk-jpl/src/m/classes/clusters/greenplanet.m ) (6 diffs)

issm/trunk-jpl/src/m/classes/clusters/maui.m

@@ -1 @@
-%PFE class definition
+%MAUI class definition
 %
 %   Usage:
-%      cluster=greenplanet();
-%      cluster=greenplanet('np',3);
-%      cluster=greenplanet('np',3,'login','username');
+%      cluster=maui();
+%      cluster=maui('np',3);
+%      cluster=maui('np',3,'login','username');
 
-classdef greenplanet
+classdef maui
     properties (SetAccess=public)  
                  % {{{
-                 name          = 'greenplanet'
+                 name          = 'maui'
                  login         = '';
                  numnodes      = 20;
                  cpuspernode   = 8;
                  port          = 8000;
-                 queue         = 'c6145';
+                 projectaccount = '';
+                 partition     = '';
                  codepath      = '';
                  executionpath = '';
@@ -23 +24 @@
          %}}}
          methods
-                 function cluster=greenplanet(varargin) % {{{
+                 function cluster=maui(varargin) % {{{
 
                          %initialize cluster using default settings if provided
-                         if (exist('greenplanet_settings')==2), greenplanet_settings; end
+                         if (exist('maui_settings')==2), maui_settings; end
 
                          %use provided options to change fields
@@ -41 +42 @@
                          disp(sprintf('    cpuspernode: %i',cluster.cpuspernode));
                          disp(sprintf('    np: %i',cluster.cpuspernode*cluster.numnodes));
-                         disp(sprintf('    queue: %s',cluster.queue));
+                         disp(sprintf('    projectaccount: %s',cluster.projectaccount));
+                         disp(sprintf('    partition: %s',cluster.partition));
                          disp(sprintf('    codepath: %s',cluster.codepath));
                          disp(sprintf('    executionpath: %s',cluster.executionpath));
@@ -56 +58 @@
                  function md = checkconsistency(cluster,md,solution,analyses) % {{{
 
-                         available_queues={'c6145','ilg2.3','default'};
-                         queue_requirements_time=[Inf Inf];
-                         queue_requirements_np=[80 80];
+                         available_queues={'large','long','prepost','bigmem','hugemem','gpu'};
+                         partition_requirements_time=[3*24*60 3*7*24*60 3*60 3*24*60 3*24*60 3*24*60];
+                         partition_requirements_np=[1024 720 4 72 64 4];
 
-                         QueueRequirements(available_queues,queue_requirements_time,queue_requirements_np,cluster.queue,cluster.np,1)
+                         QueueRequirements(available_partitions,partition_requirements_time,partition_requirements_np,cluster.partition,cluster.np,1)
 
                          %Miscelaneous
@@ -66 +68 @@
                          if isempty(cluster.codepath), md = checkmessage(md,'codepath empty'); end
                          if isempty(cluster.executionpath), md = checkmessage(md,'executionpath empty'); end
-
                  end
                  %}}}
                  function BuildKrigingQueueScript(cluster,dirname,modelname,solution,io_gather,isvalgrind,isgprof,isdakota,isoceancoupling) % {{{
-
-                         if(isvalgrind), disp('valgrind not supported by cluster, ignoring...'); end
-                         if(isgprof),    disp('gprof not supported by cluster, ignoring...'); end
-
-                         %write queuing script 
-                         fid=fopen([modelname '.queue'],'w');
-                         fprintf(fid,'#!/bin/bash\n');
-                         fprintf(fid,'#SBATCH --job-name=%s\n',modelname);
-                         fprintf(fid,'#SBATCH -p %s \n',cluster.queue);
-                         fprintf(fid,'#SBATCH -N %i -n %i\n',cluster.numnodes,cluster.cpuspernode);
-                         fprintf(fid,'#SBATCH --time=%i\n',cluster.time*60); %walltime is in seconds.
-                         fprintf(fid,'#SBATCH --mem-per-cpu=%igb\n',cluster.memory);
-                         fprintf(fid,'#SBATCH -o %s.outlog \n',modelname);
-                         fprintf(fid,'#SBATCH -e %s.errlog \n\n',modelname);
-                         fprintf(fid,'export ISSM_DIR="%s/../"\n',cluster.codepath); %FIXME
-                         fprintf(fid,'source $ISSM_DIR/etc/environment.sh\n');       %FIXME
-                         fprintf(fid,'cd %s/%s\n\n',cluster.executionpath,dirname);
-                         fprintf(fid,'mpiexec -np %i %s/kriging.exe %s %s\n',cluster.np,cluster.codepath,[cluster.executionpath '/' modelname],modelname);
-                         if ~io_gather, %concatenate the output files:
-                                 fprintf(fid,'cat %s.outbin.* > %s.outbin',modelname,modelname);
-                         end
-                         fclose(fid);
+                         error('not implemented yet');
                  end
                  %}}}
@@ -103 +83 @@
                          fprintf(fid,'#!/bin/bash\n');
                          fprintf(fid,'#SBATCH --job-name=%s\n',modelname);
-                         fprintf(fid,'#SBATCH -p %s \n',cluster.queue);
+                         fprintf(fid,'#SBATCH --account=%s \n',cluster.projectaccount);
                          fprintf(fid,'#SBATCH -N %i -n %i\n',cluster.numnodes,cluster.cpuspernode);
                          fprintf(fid,'#SBATCH --time=%i\n',cluster.time*60); %walltime is in seconds.