Changeset 228


Ignore:
Timestamp:
02/26/10 14:55:34 (14 years ago)
Author:
mmaipsl
Message:

Supress buggy space after HOST and LOGIN variables.
Add an optionnal argument to all IGCM_sys_Put_Out functions :
if any 3thrd argument is there, file won't be protected. If
there is no argument (default in libIGCM), file will be set read-only.

Location:
trunk/libIGCM/libIGCM_sys
Files:
11 edited

Legend:

Unmodified
Added
Removed

  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_brodie.ksh

    r217 r228  
    6666# Host and user names  
    6767# $hostname ou hostname 
    68 typeset  HOST=${HOST:=$( hostname ) } 
     68typeset  HOST=${HOST:=$( hostname )} 
    6969# $username ou whoami 
    70 typeset  LOGIN=${LOGIN:=$( whoami ) } 
     70typeset  LOGIN=${LOGIN:=$( whoami )} 
    7171# $hostname of the MASTER job 
    7272typeset -r MASTER=brodie 
    … …  
    866866        # 
    867867        if [ X${JobType} = XRUN ] ; then 
    868             IGCM_sys_Chmod 444 ${1} 
     868            if [ X${3} = X ] ; then 
     869                IGCM_sys_Chmod 444 ${1} 
     870            fi 
    869871        fi 
    870872        # 

  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_calculo.ksh

    r217 r228  
    6666# Host and user names  
    6767# $hostname ou hostname  
    68 typeset  HOST=${HOST:=$( hostname ) } 
     68typeset  HOST=${HOST:=$( hostname )} 
    6969# $username ou whoami 
    70 typeset  LOGIN=${LOGIN:=$( whoami ) } 
     70typeset  LOGIN=${LOGIN:=$( whoami )} 
    7171 
    7272#D- 
    … …  
    845845        # 
    846846        if [ X${JobType} = XRUN ] ; then 
    847             IGCM_sys_Chmod 444 ${1} 
     847            if [ X${3} = X ] ; then 
     848                IGCM_sys_Chmod 444 ${1} 
     849            fi 
    848850        fi 
    849851        # 

  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_cesium.ksh

    r217 r228  
    6666# Host and user names  
    6767# $hostname ou hostname 
    68 typeset  HOST=${HOST:=$( hostname ) } 
     68typeset  HOST=${HOST:=$( hostname )} 
    6969# $username ou whoami 
    70 typeset  LOGIN=${LOGIN:=$( whoami ) } 
     70typeset  LOGIN=${LOGIN:=$( whoami )} 
    7171 
    7272#D- 
    … …  
    225225 
    226226#D-#================================================== 
     227#D-function IGCM_sys_SendMail 
     228#D-* Purpose: Send mail when simulation is over 
     229#D-* Examples: 
     230#D- 
     231function IGCM_sys_SendMail { 
     232    IGCM_debug_PushStack "IGCM_sys_SendMailPost" $@ 
     233    if ( $DEBUG_sys ) ; then 
     234        echo "IGCM_sys_SendMail :" $@ 
     235    fi 
     236 
     237    IGCM_sys_RshPost <<-EOF 
     238    export LOGIN=${LOGIN} 
     239    export config_UserChoices_JobName=${config_UserChoices_JobName} 
     240    export config_UserChoices_MailName=${config_UserChoices_MailName} 
     241    export DateBegin=${DateBegin} 
     242    export DateEnd=${DateEnd} 
     243    export R_SAVE=${R_SAVE} 
     244 
     245    cat  << END_MAIL > job_end.mail 
     246Dear ${LOGIN}, 
     247 
     248  Simulation ${config_UserChoices_JobName} is finished on supercomputer `hostname`. 
     249  Job started : ${DateBegin} 
     250  Job ended   : ${DateEnd} 
     251  Ouput files are available in ${R_SAVE} 
     252END_MAIL 
     253 
     254    if [ ! -z ${config_UserChoices_MailName} ] ; then 
     255       mailx -s "${config_UserChoices_JobName} completed" ${config_UserChoices_MailName} <  job_end.mail 
     256    elif [ -f ~/.forward ] ; then 
     257       mailx -s "${config_UserChoices_JobName} completed" $( cat ~/.forward ) < job_end.mail 
     258    fi 
     259 
     260    sleep 10 
     261    rm -f job_end.mail 
     262EOF 
     263 
     264    if [ $? -gt 0 ] ; then 
     265        echo "IGCM_sys_SendMail : erreur." 
     266        IGCM_debug_Exit "IGCM_sys_SendMail" 
     267    fi 
     268    IGCM_debug_PopStack "IGCM_sys_SendMail" 
     269} 
     270 
     271#D-#================================================== 
    227272#D-function IGCM_sys_Mkdir 
    228273#D-* Purpose: Master locale mkdir command 
    … …  
    466511    fi 
    467512    IGCM_debug_PopStack "IGCM_sys_UnTar" 
     513} 
     514 
     515 
     516#D-#================================================== 
     517#D-function IGCM_sys_Qsub 
     518#D-* Purpose: Qsub new job 
     519#D-* Examples: 
     520#D- 
     521function IGCM_sys_Qsub { 
     522    IGCM_debug_PushStack "IGCM_sys_Qsub" $@ 
     523    if ( $DEBUG_sys ) ; then 
     524        echo "IGCM_sys_Qsub :" $@ 
     525    fi 
     526    /usr/local/bin/ccc_msub -o ${Script_Output} -e ${Script_Output}.e < $1 
     527    if [ $? -gt 0 ] ; then 
     528        echo "IGCM_sys_Qsub : erreur  -o ${Script_Output} -e ${Script_Output}.e $@" 
     529        IGCM_debug_Exit "IGCM_sys_Qsub" 
     530    fi 
     531    IGCM_debug_PopStack "IGCM_sys_Qsub" 
    468532} 
    469533 
    … …  
    820884 
    821885#D-#================================================== 
     886#D-function IGCM_sys_Put_Rest 
     887#D-* Purpose: Put computied restarts on $(ARCHIVE). 
     888#D-           File and target directory must exist. 
     889#D-* Examples: 
     890#D- 
     891function IGCM_sys_Put_Rest { 
     892    IGCM_debug_PushStack "IGCM_sys_Put_Rest" $@ 
     893    if ( $DEBUG_sys ) ; then 
     894        echo "IGCM_sys_Put_Rest :" $@ 
     895    fi 
     896    if [ $DRYRUN = 0 ]; then 
     897        if [ ! -f ${1} ] ; then 
     898            echo "ERROR : IGCM_sys_Put_Rest ${1} DOES NOT EXIST ." 
     899            IGCM_debug_Exit "IGCM_sys_Put_Rest" 
     900        fi 
     901 
     902        typeset RET 
     903        # 
     904        if [ X${JobType} = XRUN ] ; then 
     905            IGCM_sys_Chmod 444 ${1} 
     906        fi 
     907        # 
     908        IGCM_sys_TestDirArchive $( dirname $2 ) 
     909        # 
     910        # USUAL WAY 
     911        \cp $1 $2 > out_rsync 2>&1 
     912        RET=$? 
     913 
     914#       #RSYNC WITH NETWORK SSH CALL 
     915#       echo ${RSYNC} ${RSYNC_opt} -e ssh ${RUN_DIR}/$1 ${RHOST}:${2} > out_rsync 2>&1 
     916#       ${RSYNC} ${RSYNC_opt} -e ssh ${RUN_DIR}/$1 ${RHOST}:${2} >> out_rsync 2>&1 
     917 
     918#       #RSYNC WITH NFS USE 
     919#       echo ${RSYNC} ${RSYNC_opt} ${RUN_DIR}/$1 ${2} > out_rsync 2>&1 
     920#       ${RSYNC} ${RSYNC_opt} ${RUN_DIR}/$1 ${2} >> out_rsync 2>&1 
     921 
     922#       RET=$? 
     923#       IGCM_sys_Rsync_out $RET 
     924 
     925#       ${libIGCM}/libIGCM_sys/IGCM_analyse_rsync_out.awk out_rsync 
     926#       (( RET=RET+$? )) 
     927 
     928        if [ ${RET} -gt 0 ] ; then 
     929            echo "IGCM_sys_Put_Rest : error." 
     930            cat out_rsync 
     931            IGCM_debug_Exit "IGCM_sys_Put_Rest" 
     932        fi 
     933    else 
     934        ( ${DEBUG_debug} ) && echo "DRYRUN mode = " $DRYRUN >> stack 
     935    fi 
     936    IGCM_debug_PopStack "IGCM_sys_Put_Rest" 
     937} 
     938 
     939#D-#================================================== 
    822940#D-function IGCM_sys_Put_Out 
    823941#D-* Purpose: Copy a file on $(ARCHIVE) after have chmod it in readonly 
    … …  
    839957        # 
    840958        typeset RET 
    841         # 
     959 
     960        #===================================================== 
     961        #         COMMENT OUT DOUBLE COPY ON SCRATCHDIR 
     962        #===================================================== 
     963 
     964        #echo ${2} | grep "${R_OUT}" > /dev/null 2>&1 
     965        #if [ $? -eq 0 ] ; then 
     966        #    typeset WORKPATH FILEPATH 
     967        #    WORKPATH=$( dirname $2 | sed -e "s|${R_OUT}|${R_OUT_SCR}|" ) 
     968        #    IGCM_sys_MkdirWork ${WORKPATH}  
     969        #    FILEPATH=${WORKPATH}/$( basename $2 ) 
     970        #    # 
     971        #    IGCM_sys_Cp ${1} ${FILEPATH} 
     972        #fi 
     973 
    842974        if [ X${JobType} = XRUN ] ; then 
    843             IGCM_sys_Chmod 444 ${1} 
     975            if [ X${3} = X ] ; then 
     976                IGCM_sys_Chmod 444 ${1} 
     977            fi 
    844978        fi 
    845979        # 
    … …  
    9461080        fi 
    9471081 
    948 #       #RSYNC WITH NETWORK RSH CALL 
     1082#       #RSYNC WITH NETWORK SSH CALL 
    9491083#       echo ${RSYNC} ${RSYNC_opt} -e ssh ${RHOST}:"${dm_liste}" ${RHOST}:${RUN_DIR}/${DEST} > out_rsync 2>&1 
    9501084#       ${RSYNC} ${RSYNC_opt} -e ssh ${RHOST}:"${dm_liste}" ${RHOST}:${RUN_DIR}/${DEST} >> out_rsync 2>&1 
    … …  
    9601094#       (( RET=RET+$? )) 
    9611095 
     1096        if [ ${RET} -gt 0 ] ; then 
     1097            echo "IGCM_sys_Get : copy error." 
     1098            cat out_rsync 
     1099            IGCM_debug_Exit "IGCM_sys_Get" 
     1100        fi 
    9621101    else 
    9631102        ( ${DEBUG_debug} ) && echo "DRYRUN mode = " $DRYRUN >> stack 
    … …  
    12631402 
    12641403function IGCM_sys_build_run_file { 
    1265     IGCM_debug_PushStack "IGCM_sys_build_run_file" 
     1404    IGCM_debug_PushStack "IGCM_sys_build_run_file" $@ 
    12661405    if ( $DEBUG_sys ) ; then 
    12671406        echo "IGCM_sys_build_run_file" 

  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_claude.ksh

    r217 r228  
    6666# Host and user names  
    6767# $hostname ou hostname 
    68 typeset  HOST=${HOST:=$( hostname ) } 
     68typeset  HOST=${HOST:=$( hostname )} 
    6969# $username ou whoami 
    70 typeset  LOGIN=${LOGIN:=$( whoami ) } 
     70typeset  LOGIN=${LOGIN:=$( whoami )} 
    7171# $hostname of the MASTER job 
    7272typeset -r MASTER=claude 
    … …  
    915915        # 
    916916        if [ X${JobType} = XRUN ] ; then 
    917             IGCM_sys_Chmod 444 ${1} 
     917            if [ X${3} = X ] ; then 
     918                IGCM_sys_Chmod 444 ${1} 
     919            fi 
    918920        fi 
    919921        # 

  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_default.ksh

    r217 r228  
    6666# Host and user names  
    6767# $hostname ou hostname 
    68 typeset  HOST=${HOST:=$( hostname ) } 
     68typeset  HOST=${HOST:=$( hostname )} 
    6969# $username ou whoami 
    70 typeset  LOGIN=${LOGIN:=$( whoami ) } 
     70typeset  LOGIN=${LOGIN:=$( whoami )} 
    7171# $hostname of the MASTER job 
    7272typeset -r MASTER=${HOST} 
    … …  
    905905        # 
    906906        if [ X${JobType} = XRUN ] ; then 
    907             IGCM_sys_Chmod 444 ${1} 
     907            if [ X${3} = X ] ; then 
     908                IGCM_sys_Chmod 444 ${1} 
     909            fi 
    908910        fi 
    909911        # 

  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_mercureTX.ksh

    r217 r228  
    6666# Host and user names  
    6767# $hostname ou hostname 
    68 typeset  HOST=${HOST:=$( hostname ) } 
     68typeset  HOST=${HOST:=$( hostname )} 
    6969# $username ou whoami 
    70 typeset  LOGIN=${LOGIN:=$( whoami ) } 
     70typeset  LOGIN=${LOGIN:=$( whoami )} 
    7171 
    7272#D- 
    … …  
    800800        # 
    801801        if [ X${JobType} = XRUN ] ; then 
    802             IGCM_sys_Chmod 444 ${1} 
     802            if [ X${3} = X ] ; then 
     803                IGCM_sys_Chmod 444 ${1} 
     804            fi 
    803805        fi 
    804806        # 

  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_mercurex8.ksh

    r217 r228  
    6969# Host and user names 
    7070# $hostname ou hostname 
    71 typeset  HOST=${HOST:=$( hostname ) } 
     71typeset  HOST=${HOST:=$( hostname )} 
    7272# $username ou whoami 
    73 typeset  LOGIN=${LOGIN:=$( whoami ) } 
     73typeset  LOGIN=${LOGIN:=$( whoami )} 
    7474# $hostname of the MASTER job 
    7575typeset -r MASTER=mercure 
    … …  
    853853 
    854854        if [ X${JobType} = XRUN ] ; then 
    855             IGCM_sys_Chmod 444 ${1} 
     855            if [ X${3} = X ] ; then 
     856                IGCM_sys_Chmod 444 ${1} 
     857            fi 
    856858        fi 
    857859        # 

  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_mercurex9.ksh

    r217 r228  
    6969# Host and user names 
    7070# $hostname ou hostname 
    71 typeset  HOST=${HOST:=$( hostname ) } 
     71typeset  HOST=${HOST:=$( hostname )} 
    7272# $username ou whoami 
    73 typeset  LOGIN=${LOGIN:=$( whoami ) } 
     73typeset  LOGIN=${LOGIN:=$( whoami )} 
    7474# $hostname of the MASTER job 
    7575typeset -r MASTER=mercure 
    … …  
    915915 
    916916        if [ X${JobType} = XRUN ] ; then 
    917             IGCM_sys_Chmod 444 ${1} 
     917            if [ X${3} = X ] ; then 
     918                IGCM_sys_Chmod 444 ${1} 
     919            fi 
    918920        fi 
    919921        # 

  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_obelix.ksh

    r217 r228  
    6666# Host and user names  
    6767# $hostname ou hostname 
    68 typeset  HOST=${HOST:=$( hostname ) } 
     68typeset  HOST=${HOST:=$( hostname )} 
    6969# $username ou whoami 
    70 typeset  LOGIN=${LOGIN:=$( whoami ) } 
     70typeset  LOGIN=${LOGIN:=$( whoami )} 
    7171# $hostname of the MASTER job 
    7272typeset -r MASTER=obelix 
    … …  
    900900        # 
    901901        if [ X${JobType} = XRUN ] ; then 
    902             IGCM_sys_Chmod 444 ${1} 
     902            if [ X${3} = X ] ; then 
     903                IGCM_sys_Chmod 444 ${1} 
     904            fi 
    903905        fi 
    904906        # 

  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_ulam.ksh

    r217 r228  
    6666# Host and user names  
    6767# $hostname ou hostname 
    68 typeset  HOST=${HOST:=$( hostname ) } 
     68typeset  HOST=${HOST:=$( hostname )} 
    6969# $username ou whoami 
    70 typeset  LOGIN=${LOGIN:=$( whoami ) } 
     70typeset  LOGIN=${LOGIN:=$( whoami )} 
    7171 
    7272#D- 
    … …  
    801801        # 
    802802        if [ X${JobType} = XRUN ] ; then 
    803             IGCM_sys_Chmod 444 ${1} 
     803            if [ X${3} = X ] ; then 
     804                IGCM_sys_Chmod 444 ${1} 
     805            fi 
    804806        fi 
    805807        # 

  • trunk/libIGCM/libIGCM_sys/libIGCM_sys_vargas.ksh

    r217 r228  
    6666# Host and user names  
    6767# $hostname ou hostname 
    68 typeset  HOST=${HOST:=$( hostname ) } 
     68typeset  HOST=${HOST:=$( hostname )} 
    6969# $username ou whoami 
    70 typeset  LOGIN=${LOGIN:=$( whoami ) } 
     70typeset  LOGIN=${LOGIN:=$( whoami )} 
    7171# $hostname of the MASTER job 
    7272typeset -r MASTER=vargas 
    … …  
    884884        # 
    885885        if [ X${JobType} = XRUN ] ; then 
    886             IGCM_sys_Chmod 444 ${1} 
     886            if [ X${3} = X ] ; then 
     887                IGCM_sys_Chmod 444 ${1} 
     888            fi 
    887889        fi 
    888890        # 
Note: See TracChangeset for help on using the changeset viewer.