[421] | 1 | #!/bin/ksh |
---|
| 2 | # palm_simple_run - a simple method for running the palm code without |
---|
| 3 | # using the mrun script |
---|
| 4 | # $Id: palm_simple_run 421 2010-01-25 15:50:10Z raasch $ |
---|
| 5 | |
---|
| 6 | # This script runs the palm code in a unique subdirectory (OUTPUT..., |
---|
| 7 | # current time/date and number of processors are part of the subdirectory |
---|
| 8 | # name). |
---|
| 9 | # It requires that palm has been installed with command |
---|
| 10 | # palm_simple_install and that the executable palm has been created |
---|
| 11 | # with make in directory ~/palm/current_version/MAKE_DEPOSITORY_simple |
---|
| 12 | |
---|
| 13 | # Last changes: |
---|
| 14 | # 25/01/10 - Siggi - Generating the first version |
---|
| 15 | |
---|
| 16 | |
---|
| 17 | # Variable declarations + default values |
---|
| 18 | case=example_cbl |
---|
| 19 | cpumax=999999 |
---|
| 20 | localhost=unknown |
---|
| 21 | localhost_realname=$(hostname) |
---|
| 22 | mpi_procs=1 |
---|
| 23 | mpi_procs_per_node=1 |
---|
| 24 | openmp_threads=1 |
---|
| 25 | palm_dir=~/palm/current_version |
---|
| 26 | |
---|
| 27 | typeset -i ii |
---|
| 28 | |
---|
| 29 | |
---|
| 30 | # Read shellscript options |
---|
| 31 | while getopts :c:l:n:p:t: option |
---|
| 32 | do |
---|
| 33 | case $option in |
---|
| 34 | (c) case=$OPTARG;; |
---|
| 35 | (l) localhost=$OPTARG;; |
---|
| 36 | (n) mpi_procs_per_node=$OPTARG;; |
---|
| 37 | (p) mpi_procs=$OPTARG;; |
---|
| 38 | (t) openmp_threads=$OPTARG;; |
---|
| 39 | (\?) printf "\n +++ unknown option $OPTARG \n" |
---|
| 40 | printf "\n allowed option are -d, -f, -l, -s \n" |
---|
| 41 | exit;; |
---|
| 42 | esac |
---|
| 43 | done |
---|
| 44 | |
---|
| 45 | |
---|
| 46 | # Find out the global svn revision number |
---|
| 47 | global_revision=`svnversion ${palm_dir}/trunk 2>/dev/null` |
---|
| 48 | global_revision="Rev: $global_revision" |
---|
| 49 | |
---|
| 50 | |
---|
| 51 | # Generate unique directory/files for this run |
---|
| 52 | timedate="`date +%d.%b_%H:%M:%S`" |
---|
| 53 | suffix=$case+$nnodes+$timedate |
---|
| 54 | RUNDIR=OUTPUT.$suffix/ |
---|
| 55 | |
---|
| 56 | if [[ ! -d $RUNDIR ]] |
---|
| 57 | then |
---|
| 58 | mkdir $RUNDIR |
---|
| 59 | echo "*** running in directory $RUNDIR" |
---|
| 60 | else |
---|
| 61 | echo "+++ ERROR: $RUNDIR exists\! Must be unique. Exiting." |
---|
| 62 | exit |
---|
| 63 | fi |
---|
| 64 | |
---|
| 65 | |
---|
| 66 | # Check if palm has been installed and copy executable into the run |
---|
| 67 | # directory |
---|
| 68 | if [[ ! -f ${palm_dir}/MAKE_DEPOSITORY_simple/palm ]] |
---|
| 69 | then |
---|
| 70 | echo "+++ ERROR: palm executable does not exist." |
---|
| 71 | echo " Please run \"palm_simple_install\"." |
---|
| 72 | exit |
---|
| 73 | else |
---|
| 74 | cp ${palm_dir}/MAKE_DEPOSITORY_simple/palm $RUNDIR/palm |
---|
| 75 | fi |
---|
| 76 | |
---|
| 77 | |
---|
| 78 | # Check, if parameter file exists and copy into the run directory |
---|
| 79 | if [[ ! -f ${palm_dir}/JOBS/${case}/INPUT/${case}_p3d ]] |
---|
| 80 | then |
---|
| 81 | echo "+++ ERROR: parameter file" |
---|
| 82 | echo " \"${palm_dir}/JOBS/${case}/INPUT/${case}_p3d\"" |
---|
| 83 | echo " does not exist." |
---|
| 84 | exit |
---|
| 85 | else |
---|
| 86 | cp ${palm_dir}/JOBS/${case}/INPUT/${case}_p3d $RUNDIR/PARIN |
---|
| 87 | fi |
---|
| 88 | |
---|
| 89 | |
---|
| 90 | # Switch to run directory |
---|
| 91 | cd $RUNDIR |
---|
| 92 | |
---|
| 93 | |
---|
| 94 | |
---|
| 95 | # Create NAMELIST file containing environment values needed by palm |
---|
| 96 | cat > ENVPAR << %%END%% |
---|
| 97 | &envpar run_identifier = '$case', host = '$localhost', |
---|
| 98 | write_binary = false, tasks_per_node = $mpi_procs_per_node, |
---|
| 99 | maximum_cpu_time_allowed = ${cpumax}., |
---|
| 100 | revision = '$global_revision', |
---|
| 101 | local_dvrserver_running = .FALSE. / |
---|
| 102 | |
---|
| 103 | %%END%% |
---|
| 104 | |
---|
| 105 | |
---|
| 106 | # Coupled runs cannot be carried out with this simple run script |
---|
| 107 | echo "no_coupling" > runfile_atmos |
---|
| 108 | |
---|
| 109 | |
---|
| 110 | # Generate hostfile (if neccessary) |
---|
| 111 | (( ii = 1 )) |
---|
| 112 | while (( ii <= $mpi_procs )) |
---|
| 113 | do |
---|
| 114 | echo $localhost_realname >> hostfile |
---|
| 115 | (( ii = ii + 1 )) |
---|
| 116 | done |
---|
| 117 | |
---|
| 118 | |
---|
| 119 | # Set number of OpenMP threads |
---|
| 120 | export OMP_NUM_THREADS=$openmp_threads |
---|
| 121 | |
---|
| 122 | |
---|
| 123 | |
---|
| 124 | # Start palm run |
---|
| 125 | echo "*** palm will be run: MPI tasks: $mpi_procs OpenMP thread: $OMP_NUM_THREADS" |
---|
| 126 | |
---|
| 127 | mpiexec -machinefile hostfile -n $mpi_procs ./palm < runfile_atmos |
---|
| 128 | |
---|
| 129 | |
---|
| 130 | echo "*** palm finished" |
---|
| 131 | echo "*** see" |
---|
| 132 | echo " \"$RUNDIR\"" |
---|
| 133 | echo " for results" |
---|