Changeset 2422 for palm/trunk/SCRIPTS

Timestamp:

Sep 8, 2017 8:25:41 AM (7 years ago)

Author:

raasch

Message:

new palm-scripts set to version number 1.0, further check for consistent restart settings

Location:

palm/trunk/SCRIPTS

Files:

• palmbuild (modified) (2 diffs)
• palmrun (modified) (3 diffs)

palm/trunk/SCRIPTS/palmbuild

@@ -27 +27 @@
 # -----------------
 # $Id$
-#
-# 2404 2017-09-05 09:33:14Z raasch
-# Initial revision 
+# initial revision
 # 
 #------------------------------------------------------------------------------#
@@ -55 +53 @@
  ssh_key=""
  suf=f90
- version="palmbuild  0.1  Rev$Rev: 2316 $"
+ version="palmbuild  1.0  Rev$Rev: 2316 $"
  working_directory=`pwd`
 

palm/trunk/SCRIPTS/palmrun

@@ -29 +29 @@
 # initial revision
 # 
-# 2405 2017-09-05 11:17:46Z raasch
-# 
-#
 #--------------------------------------------------------------------------------#
 # palmrun - script for running PALM jobs on local and remote hosts
@@ -115 +112 @@
  user_source_path=""
  use_openmp=false
- version="palmrun  0.9 Rev$Rev: 2303 $"
+ version="palmrun  1.0 Rev$Rev: 2303 $"
  working_directory=`pwd`
  write_binary=""
@@ -1509 +1506 @@
     else
        printf "\n\n  *** creating executable and other sources for the local host"
+    fi
+
+       # FIRST CHECK, IF A MAKE DEPOSITORY EXISTS, AND IF NOT, ASK THE USER IF
+       # IT SHALL BE CREATED
+    ask_for_make_depository=false
+    if [[ $create_remote_batch_job = true ]]
+    then
+
+       line=`grep %base_directory $config_file`
+       make_depository=`echo $line | cut -d" " -s -f2`/MAKE_DEPOSITORY_${host_identifier}
+       echo "make_depository=$make_depository"
+       echo  "[[ ! -d ${make_depository} ]]  &&  echo depository not found" | ssh  -q  $ssh_key  ${remote_username}@${remote_ip} 2>&1  | tee ${host_identifier}_last_make_protokoll
+
+       if [[ $(grep -c "depository not found" ${host_identifier}_last_make_protokoll) != 0 ]]
+       then
+          printf "\n\n  +++ make depository \"${make_depository}\""
+          printf "\n      on remote host not found!"
+          ask_for_make_depository=true
+       fi
+       rm ${host_identifier}_last_make_protokoll
+
+    else
+
+          # CHECK FOR MAKE_DEPOSITORY ON THE LOCAL HOST
+       make_depository=${base_directory}/MAKE_DEPOSITORY_${host_identifier}
+       if [[ ! -d ${make_depository} ]]
+       then
+          printf "\n\n  +++ make depository \"${make_depository}\""
+          printf "\n      on local host not found!"
+          ask_for_make_depository=true
+       fi
+
+    fi
+
+    if [[ $ask_for_make_depository = true ]]
+    then
+
+       antwort=dummy
+       printf "\n\n"
+       printf "  >>> Create a new one (y/n) ?  "
+       while  read antwort
+       do
+          if [[ "$antwort" != y  &&  "$antwort" != Y  &&  "$antwort" != n  &&  "$antwort" != N ]]
+          then
+             printf "  >>> Create a new one (y/n) ?  "
+          else
+             break
+          fi
+       done
+       if [[ $antwort = n  ||  $antwort = N ]]
+       then
+          locat=user_abort; (( iec = 0 )); exit
+       fi
+
+       palmbuild  -v  -h $host_identifier
+
+       if [[ $? != 0 ]]
+       then
+   
+              # ABORT IN CASE OF COMPILATION PROBLEMS
+          printf "\n  +++ error while compiling for the MAKE_DEPOSITORY"
+          locat=make_depository
+          exit
+       else
+          echo "  *** now continue with creating executable and other sources"
+       fi
+
     fi