Changeset 433

Timestamp:

04/06/11 16:11:19 (13 years ago)

Author:

mmaipsl

Message:

If EXECUTION fails, we will now copy all output text files from RUN_DIR to SUBMIT_DIR to ease the debug of the problem.

Location:

trunk/libIGCM

Files:

• AA_job (modified) (1 diff)
• libIGCM_comp/libIGCM_comp.ksh (modified) (6 diffs)

trunk/libIGCM/AA_job

@@ -458 +458 @@
             IGCM_debug_Exit "EXECUTABLE"
             IGCM_sys_Cp ${Exe_Output} ${SUBMIT_DIR}/${PREFIX}_${Exe_Output}_error
+            ExecutionFail=true
         fi
         echo                                            >> ${Exe_Output}

trunk/libIGCM/libIGCM_comp/libIGCM_comp.ksh

@@ -820 +820 @@
     typeset compactoutputs
 
+    compactoutputs=false
+    if [ X${JobType} != XRUN ] ; then
+        compactoutputs=true
+    elif [ X${config_UserChoices_CompactText} != Xn ] ; then
+        compactoutputs=true
+    fi
+
     for comp in ${config_ListOfComponents[*]} ; do
         # Define component 
@@ -1042 +1049 @@
             eval NbFiles=\${#${ListTextName}[@]} > /dev/null 2>&1
 
-            compactoutputs=false
-
             (( i=0 ))
             until [ $i -eq $NbFiles ]; do
@@ -1053 +1058 @@
                 nlist_file=${#list_file[@]}
                 if [ ${nlist_file} -gt 1 ] ; then
-                    if [ X${JobType} != XRUN ] ; then
-                        compactoutputs=true
-                    elif [ X${config_UserChoices_CompactText} != Xn ] ; then
-                        compactoutputs=true
-                    fi
-
                     if ( ${compactoutputs} ) ; then
                         eval file_out=${PREFIX}_${file_in}
@@ -1082 +1081 @@
                         eval IGCM_sys_Put_Out ${file_out} \${R_OUT_${comp}_D}/${file_out}
                         eval FileToBeDeleted[${#FileToBeDeleted[@]}]="${file_out}" > /dev/null 2>&1
+
+                        if ( $ExecutionFail && [ X$( echo ${file_out} | grep "_out" ) != X ] ) ; then
+                            IGCM_sys_Cp ${file_out} ${SUBMIT_DIR}
+                        fi
                     else
                         for file in ${list_file[@]}
@@ -1088 +1091 @@
                             eval FileToBeDeleted[${#FileToBeDeleted[@]}]="${file}" > /dev/null 2>&1
                         done
+                        if ( $ExecutionFail && [ X$( echo ${file} | grep "_out" ) != X ] ) ; then
+                            IGCM_sys_Cp ${file} ${SUBMIT_DIR}/${PREFIX}_${file}
+                        fi
                     fi
                 else
@@ -1095 +1101 @@
                     eval IGCM_sys_Put_Out ${file_in} \${R_OUT_${comp}_D}/${PREFIX}_${file_in}
                     [ $? -eq 0 ] && eval FileToBeDeleted[${#FileToBeDeleted[@]}]="${file_in}" > /dev/null 2>&1
+
+                    if ( $ExecutionFail && [ X$( echo ${file_in} | grep "_out" ) != X ] ) ; then
+                        IGCM_sys_Cp ${file_in} ${SUBMIT_DIR}/${PREFIX}_${file_in}
+                    fi
                 fi
             done