Changeset 224 for trunk/libIGCM/libIGCM_config/libIGCM_config.ksh

Timestamp:

02/23/10 09:39:53 (14 years ago)

Author:

mmaipsl

Message:

Supress protection on old Script_Output after its save (bug in development step).
Save last run.card with CumulPeriod? and Process id each submition.
Save run.card each Period in R_OUT_KSH.

File:

• trunk/libIGCM/libIGCM_config/libIGCM_config.ksh (modified) (3 diffs)

trunk/libIGCM/libIGCM_config/libIGCM_config.ksh

@@ -359 +359 @@
         if [ ${Period} = 1 ]; then
            # save last Job output
-            typeset LastPeriod Last_Script_Output_Name
+            typeset LastPeriod iLastPeriod Last_Script_Output_Name
             (( LastPeriod=CumulPeriod-PeriodNb ))
-            Last_Script_Output_Name="${Script_Output_Prefix}_${config_UserChoices_JobName}.$( printf "%06d" ${LastPeriod} )"
+            iLastPeriod=$( printf "%06d" ${LastPeriod} )
+            Last_Script_Output_Name="${Script_Output_Prefix}_${config_UserChoices_JobName}.${iLastPeriod}"
+            Last_run_card="run.card.${iLastPeriod}"
             #eval ls -l ${SUBMIT_DIR}/${Last_Script_Output_Name}
             #eval IGCM_sys_Put_Out ${SUBMIT_DIR}/${Last_Script_Output_Name} ${R_OUT_KSH}/${Last_Script_Output_Name} > /dev/null 2>&1
@@ -367 +369 @@
             IGCM_sys_Cd ${SUBMIT_DIR}/
             IGCM_sys_Put_Out ${Last_Script_Output_Name} ${R_OUT_KSH}/${Last_Script_Output_Name}.$$
+            [ -f   ${Last_Script_Output_Name} ] &&  IGCM_sys_Chmod 644 ${Last_Script_Output_Name}
+            IGCM_sys_Put_Out ${SUBMIT_DIR}/run.card ${R_OUT_KSH}/${Last_run_card}.$$
+            [ -f   run.card ] && IGCM_sys_Chmod 644 ${SUBMIT_DIR}/run.card
             IGCM_sys_Cd ${RUN_DIR}
         else
@@ -446 +451 @@
     eval FileToBeDeleted[${#FileToBeDeleted[@]}]="${Exe_Output}"
 
+    IGCM_sys_RshArchive "chmod 644 ${R_OUT_KSH}/run.card"
+    IGCM_sys_Put_Out ${SUBMIT_DIR}/run.card ${R_OUT_KSH}/run.card
+    IGCM_sys_Chmod 644 ${SUBMIT_DIR}/run.card
+    
     typeset LS_comp LS_bin ExeDate ExeCpuLog ExeSize NextExeSize LastCompExeSize
     typeset comp i