Changeset 1180 for trunk/libIGCM/libIGCM_sys/libIGCM_sys_default.ksh

Timestamp:

03/30/15 17:18:46 (9 years ago)

Author:

sdipsl

Message:

house keeping in libIGCM_sys (third pass). Will ease #248 and #251

File:

• trunk/libIGCM/libIGCM_sys/libIGCM_sys_default.ksh (modified) (14 diffs)

trunk/libIGCM/libIGCM_sys/libIGCM_sys_default.ksh

@@ -64 +64 @@
 # Host and user names
 # $hostname ou hostname
-typeset  HOST=${HOST:=$( hostname )}
+typeset HOST=${HOST:=$( hostname )}
 # $username ou whoami
-typeset  LOGIN=${LOGIN:=$( whoami )}
+typeset LOGIN=${LOGIN:=$( whoami )}
 # $hostname of the MASTER job
-typeset MASTER=${HOST}
+typeset MASTER=${MASTER:=$( hostname )}
 
 #D-
@@ -85 +85 @@
 
 #====================================================
-# Set environment tools (ferret, nco, cdo)
+# Set environment tools (ferret, nco, cdo, rebuild, ...)
 #====================================================
 #. /home/${LOGIN}/.atlas_env_${HOST}_ksh
-
-export PATH=${PATH}:/home/jripsl/snapshot/Monitoring/CNClient/
+#export PATH=${PATH}:/home/${LOGIN}/rebuild/bin/
 
 #====================================================
@@ -131 +130 @@
 #- Max number of arguments passed to nco operator or demigration command
 UNIX_MAX_LIMIT=360
+
+#====================================================
+#- set PackDefault to false on obelix
+PackDefault=false
 
 #====================================================
@@ -207 +210 @@
 function IGCM_sys_RshMaster {
   IGCM_debug_PushStack "IGCM_sys_RshMaster" $@
-  /bin/ksh <<-EOF
+  OUTCOMMAND_PATH=${OUTCOMMAND_PATH} /bin/ksh <<-EOF
     export libIGCM=${libIGCM}
     export DEBUG_debug=${DEBUG_debug}
@@ -264 +267 @@
   fi
   # keep standard input (stdin) for the loop onto temporary file
-  cat >/tmp/tmp_IGCM_sys_RshPost_$$_${LOGNAME}
-
-  /bin/ksh </tmp/tmp_IGCM_sys_RshPost_$$_${LOGNAME}
+  cat >${OUTCOMMAND_PATH}/tmp_IGCM_sys_RshPost_$$_${LOGNAME}
+
+  OUTCOMMAND_PATH=${OUTCOMMAND_PATH} /bin/ksh <${OUTCOMMAND_PATH}/tmp_IGCM_sys_RshPost_$$_${LOGNAME}
   if [ $? -gt 0 ] ; then
     echo "IGCM_sys_RshPost : erreur."
@@ -272 +275 @@
   fi
   # delete temporary file
-  \rm /tmp/tmp_IGCM_sys_RshPost_$$_${LOGNAME}
+  \rm ${OUTCOMMAND_PATH}/tmp_IGCM_sys_RshPost_$$_${LOGNAME}
   IGCM_debug_PopStack "IGCM_sys_RshPost"
 }
@@ -304 +307 @@
 
   if [ ! -z ${config_UserChoices_MailName} ] ; then
-    mailx -s "${config_UserChoices_JobName} ${status}" ${config_UserChoices_MailName} <  mail.txt
+    mail -s "${config_UserChoices_JobName} ${status}" ${config_UserChoices_MailName} < mail.txt
   elif [ -f ~/.forward ] ; then
-    mailx -s "${config_UserChoices_JobName} ${status}" $( cat ~/.forward ) < mail.txt
+    mail -s "${config_UserChoices_JobName} ${status}" $( cat ~/.forward ) < mail.txt
+  else
+    mail -s "${config_UserChoices_JobName} ${status}" ${USER} < mail.txt
   fi
 
@@ -473 +478 @@
 #D-#==================================================
 #D-function IGCM_sys_IsFileArchived
-#D-* Purpose: Test file that must NOT EXISTS on Archive
+#D-* Purpose: Test file that must NOT EXISTS on Archive based on filename only
 #D-* Examples:
 #D-
@@ -556 +561 @@
   fi
 
-  \ls -lR ${@}
+  \tree -f $@
 
   IGCM_debug_PopStack "IGCM_sys_Tree"
@@ -924 +929 @@
   fi
   if [ $DRYRUN = 0 ]; then
-    typeset status
-
-    #USUAL WAY
-    \cp -ur $1 $2 > ${OUTCOMMAND_PATH}/out_command_${LOGIN}.$$ 2>&1
-    status=$?
+    typeset NB_ESSAI DELAI status i
+    # number of tentative
+    NB_ESSAI=3
+    # time delay between tentative
+    DELAI=2
+
+    #
+    # USUAL WAY
+    i=0
+    while [ $i -lt $NB_ESSAI ] ; do
+      \cp -ur $1 $2 >> ${OUTCOMMAND_PATH}/out_command_${LOGIN}.$$ 2>&1
+      status=$?
+      if [ ${status} -gt 0 ] ; then
+        IGCM_debug_Print 2 "IGCM_sys_Get_Dir : cp failed error code ${status} ${i}/${NB_ESSAI}"
+        IGCM_debug_Print 2 "IGCM_sys_Get_Dir : sleep ${DELAI} seconds and try again."
+        sleep $DELAI
+      else
+        break
+      fi
+      (( i = i + 1 ))
+    done
 
     if [ ${status} -gt 0 ] ; then
@@ -1033 +1054 @@
 
     if [ ${status} -gt 0 ] ; then
-      echo "IGCM_sys_Put_Rest : cp failed error code ${status}"
+      IGCM_debug_Print 2 "IGCM_sys_Put_Rest : cp failed error code ${status}"
       [ -f ${1} ] && ls -l ${1}
       [ -f ${2} ] && ls -l ${2}
@@ -1719 +1740 @@
     echo "IGCM_sys_build_execution_scripts " $@
   fi
+
   typeset nodes listnodes init_node start_num init_exec comp ExeNameIn ExeNameOut
   typeset node_num_current node_current comp_proc_mpi_loc comp_proc_omp_loc
   typeset num_corempi nombre_restant_node nombre_restant_comp
-
-  if [ ! -f ${SUBMIT_DIR}/Job_${config_UserChoices_JobName} ]  ; then
-    IGCM_debug_Exit "IGCM_sys_default build_execution_scripts : Job_${config_UserChoices_JobName} don't exist in SUBMIT_DIR : ${SUBMIT_DIR} "
-  fi
 
   if ( ${OK_PARA_MPMD} ) ; then
@@ -1762 +1780 @@
       init_exec=n
 
-      # Test : if oasis is there, we put it at the first position
-
+      # Build run_file
+
+      # First loop on the components for the coupler ie oasis (only if oasis3)
+      # the coupler ie oasis3 must be the first one
       for comp in ${config_ListOfComponents[*]} ; do
 
@@ -1965 +1985 @@
 
       fi
+
     done