Skip to content

Commit

Permalink
Dev update
Browse files Browse the repository at this point in the history
  • Loading branch information
@jamesletts
jamesletts committed Jul 2, 2014
1 parent 54025b5 commit 64a8fa4
Show file tree
Hide file tree
Showing 3 changed files with 493 additions and 0 deletions.
144 changes: 144 additions & 0 deletions dev/condor_functions.sh
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,144 @@
#!/bin/bash

getClassAds() {
# Function to dump a set of ClassAds for queued, running and jobs
# from the past 24h of condor history. If the command fails remotely,
# then one can try to gsissh to the node to execute the query.
#
# Usage:
# getClassAds $POOLNAME $SCHEDDNAME $MACHINENAME "condor_history"
# getClassAds $POOLNAME $SCHEDDNAME $MACHINENAME "condor_q"
# Output:
# Space separated list of job ClassAds, one row per job.
#
# Called from condor_history_dump

POOLNAME=$1 ; shift
SCHEDDNAME=$1 ; shift
MACHINENAME=$1 ; shift

NOW=`/bin/date +%s`
YESTERDAY=$[$NOW-86400]
command="$@ \
-const '(EnteredCurrentStatus>$YESTERDAY)' \
-format 'JobStatus=%i\ ' JobStatus \
-format 'LastJobStatus=%i\ ' LastJobStatus \
-format 'ExitCode=%i\ ' ExitCode \
-format 'EnteredCurrentStatus=%i\ ' EnteredCurrentStatus \
-format 'ImageSize=%i\ ' ImageSize \
-format 'RemoteWallClockTime=%i\ ' RemoteWallClockTime \
-format 'RemoteUserCpu=%i\ ' RemoteUserCpu \
-format 'LastRemoteHost=%s\ ' LastRemoteHost \
-format 'MATCH_GLIDEIN_CMSSite=%s\ ' MATCH_GLIDEIN_CMSSite \
-format 'DESRIED_Sites=%s\ ' DESIRED_Sites \
-format 'DESRIED_SEs=%s\ ' DESIRED_SEs \
-format 'Owner=%s\ ' Owner \
-format 'AccountingGroup=%s\ ' AccountingGroup \
-format 'Iwd=%s\ ' Iwd \
-format 'HoldReasonCode=%i\ ' HoldReasonCode \
-format 'HoldReasonSubCode=%i\ ' HoldReasonSubCode \
-format 'HoldReason=%s\ ' HoldReason \
-format 'GlobalJobId=%s\\n' GlobalJobId"
eval $command -pool $POOLNAME -name $SCHEDDNAME || gsissh $MACHINENAME $command
rc=$?
return $rc
}

get_pilots_by_site() {
# Function to list the number of pilots running per site.
#
# Usage:
# get_pilots_by_site POOLNAME [optional args for condor_status]
# Output:
# File name of temporary file containing the numbers of pilots
# running at CMSSites, one line per site.

PILOTS=`mktemp -t PILOTS.txt.XXXXXXX` || return 1
condor_status -pool $@ -format '{%s}\n' GLIDEIN_CMSSite | sort | uniq -c > $PILOTS || return 2
echo $PILOTS
return 0
}

get_DESIRED_Sites() {
# Get all queued jobs' DESIRED_Sites, translating from DESIRED_SEs
# if needed (i.e. for CRAB2). If DESIRED_Sites exists, take that.
# Otherwise take DESIRED_SEs and translate using SEDFILE from SiteDB.
# Note that DAG jobs do not have DESIRED_Sites defined since they
# run on a schedd and are not counted here.
#
# Usage:
# get_DESIRED_Sites $POOLNAME
# Output:
# File name of temporary file containing the list of DESIRES_Sites,
# one line per job.

POOLNAME=$1

source $glideinWMSMonitor_RELEASE_DIR/sitedb_functions.sh
SEDFILE=`translate_se_names_in_sitedb_to_cmssite`

SCHEDDS=`condor_status -pool $POOLNAME -const '(TotalIdleJobs>0)' -schedd -format ' -name %s' Name ` || return 1
DESIRED=`mktemp -t DESIRED.txt.XXXXXXX` || return 2

# run condor_q if there are queued jobs in the pool only:
if [ `echo $SCHEDDS | wc -w` -ne 0 ] ; then
condor_q $SCHEDDS -pool $POOLNAME -const '(JobStatus=?=1)' \
-format '%s' DESIRED_Sites -format ' %s' DESIRED_SEs -format ' %s\n' Owner \
| sed 's/undefined//g' | awk '{print $1}' | sed -f $SEDFILE >> $DESIRED
fi

echo $DESIRED
rm $SEDFILE
return 0
}

condor_history_dump() {
# Function to dump all ClassAds defined in getClassAds
# for all queued, running and jobs that completed in the
# past day in a glideinWMS pool.
#
# Usage:
# condor_history_dump $POOLNAME
# Output:
# ClassAd values, one line per job.
#
POOLNAME=$1
SCHEDDS=`condor_status -pool $POOLNAME -schedd -format '%s\,' Name -format '%s\n' Machine`
for SCHEDD in $SCHEDDS ; do
SCHEDDNAME=` echo $SCHEDD | awk -F\, '{print $1}'`
MACHINENAME=`echo $SCHEDD | awk -F\, '{print $2}'`
getClassAds $POOLNAME $SCHEDDNAME $MACHINENAME "condor_history"
getClassAds $POOLNAME $SCHEDDNAME $MACHINENAME "condor_q"
done
return 0
}

condor_exit_codes() {
# Function to extract the possible matching CMSSW error codes given the %256
# ExitCode from HTCondor. The CMSSW exit codes can be found in the $URL but
# it is not publically visible yet. Later you can download periodically to
# the release directory.
#
# Usage:
# condor_error_codes $CONDOR_EXIT_CODE
# Output:
# CMSSW exit code matches and text explanations.
#
CONDOR_EXIT_CODE=$1
#
# Exit code explanation file
#
FILE=$glideinWMSMonitor_RELEASE_DIR/JobExitCodes
if [ ! -f $FILE ] ; then
URL="https://twiki.cern.ch/twiki/bin/view/CMSPublic/JobExitCodes"
curl -ks -o $FILE $URL
fi
#
# grep the explanation of a particular code(s).
#
grep \- $FILE | grep -o [0-9]*\ \-\ .* | sed 's/<.*>//g' \
| awk -F\- -v code=$CONDOR_EXIT_CODE '(code==$1%256){print $0}'
return 0
}

# Condor Hold Reason Codes: http://research.cs.wisc.edu/htcondor/manual/v7.6/10_Appendix_A.html
205 changes: 205 additions & 0 deletions dev/monitor_functions.sh
View file
Original file line number Diff line number Diff line change
@@ -0,0 +1,205 @@
#!/bin/bash

if [ -z $glideinWMSMonitor_RELEASE_DIR ] ; then
echo "ERROR: glideinWMSMonitor source code missing."
exit 1
else
source $glideinWMSMonitor_RELEASE_DIR/bashrc
fi

export TMPDIR=$glideinWMSMonitor_OUTPUT_DIR/tmp_$$
mkdir $TMPDIR
OUTFILE=$1

echo "{" > $OUTFILE

pool_table() {
# Collector1 has the negotiator, Collector2 is the HA backup.
COLLECTOR1=$1
COLLECTOR2=$2
shift; shift
NAME=$@
NOW=`/bin/date -u`

negotime=`condor_status -pool $COLLECTOR1 -nego -l | grep LastNegotiationCycleDuration0 | awk '{print int($3)}'`
total1=`condor_status -schedd -total -pool $COLLECTOR1 | tail -1 | awk '{print int($2)}'`
total2=`condor_status -schedd -total -pool $COLLECTOR2 | tail -1 | awk '{print int($2)}'`
colldiff=`echo $total1 $total2 | awk '{print int($1-$2)}'`

if [ -z $negotime ] ; then negotime=null ; fi
if [ -z $total1 ] ; then total1=null ; fi
if [ -z $total2 ] ; then total2=null ; fi
if [ -z $colldiff ] ; then colldiff=null ; fi

cat <<EOF
"glideinWMS ${NAME} Pool": {
"Collector1": "${COLLECTOR1}",
"Collector2": "${COLLECTOR2}",
"Time": "${NOW}",
"Negotiation Cycle (s)": ${negotime},
"Running Jobs Collector1": ${total1},
"Running Jobs Collector2": ${total2},
"Running Jobs Difference": ${colldiff},
"Summary Table": {
"header": ["Name","Machine","Total Running Jobs","Total Idle Jobs","Total Held Jobs"],
"data" : [
EOF
{ condor_status -schedd -pool ${COLLECTOR1} \
-format ' ["%s",' Name \
-format '"%s",' Machine \
-format '%i,' TotalRunningJobs \
-format '%i,' TotalIdleJobs \
-format '%i],\n' TotalHeldJobs
if [ $? -ne 0 ] ; then
echo " [null,null,null,null,null],"
fi
} | grep -v ^$ | sed '$s/,$//'

echo " ]"
echo " }"
echo " },"
return
}

pool_table glidein-collector.t2.ucsd.edu glidein-collector-2.t2.ucsd.edu "Analysis Operations" >>$OUTFILE
pool_table vocms097.cern.ch vocms099.cern.ch "Global" >>$OUTFILE
pool_table vocms97.cern.ch cmssrv119.fnal.gov "Production" >>$OUTFILE

cat <<EOF >>$OUTFILE
"Site Table": {
"header": [
"Site","Maintenance",
"Pledge Info","Total Pledge","Pledged Analysis",
"Average Analysis Usage","Maximum Analysis Usage",
"Average Analysis Test Usage","Maximum Analysis Test Usage",
"Average Production Usage","Maximum Production Usage",
"Average Total Usage","Maximum Total Usage",
"Claimed Pilots Analysis","Total Pilots Analysis","Analysis Pressure","Exclusive Analysis Pressure",
"Claimed Pilots Global","Total Pilots Global","Global Pressure","Exclusive Global Pressure",
"Claimed Pilots Production","Total Pilots Production","Production Pressure","Exclusive Production Pressure"
],
"data": [
EOF

# get information from sitedb about pledges and se names by CMSSite name
DOWNTIME=`site_downtimes_from_ssb`
PLEDGES=`get_pledges_from_sitedb`
SEDFILE=`translate_se_names_in_sitedb_to_cmssite`

# job slot usage from dashboard - $2 is avg and $3 is max job slots used in a day in the time period
USAGEANA=`dashboard_usage_by_site analysis "1 month ago"`
USAGETST=`dashboard_usage_by_site analysistest "1 month ago"`
USAGEPRO=`dashboard_usage_by_site production "1 month ago"`
USAGEALL=`dashboard_usage_by_site all "1 month ago"`

# get claimed and running pilots, DESIRED_Sites for each pool:
CLAIMEDANA=`get_pilots_by_site glidein-collector.t2.ucsd.edu -claimed`
RUNNINGANA=`get_pilots_by_site glidein-collector.t2.ucsd.edu`
DESIREDANA=`get_DESIRED_Sites glidein-collector.t2.ucsd.edu`

CLAIMEDGLO=`get_pilots_by_site vocms097.cern.ch -claimed`
RUNNINGGLO=`get_pilots_by_site vocms097.cern.ch`
DESIREDGLO=`get_DESIRED_Sites vocms097.cern.ch`

CLAIMEDPRO=`get_pilots_by_site vocms97.cern.ch -claimed`
RUNNINGPRO=`get_pilots_by_site vocms97.cern.ch`
DESIREDPRO=`get_DESIRED_Sites vocms97.cern.ch`


# Loop over sites for the table:
sites=`cat $SEDFILE | awk -F\/ '{print $3}' | sort | uniq`
{
for site in $sites ; do
downtime=`grep ^$site\, $DOWNTIME | awk -F\, '{print $2}'`
if [ -z "$downtime" ] ; then downtime=null ; fi

# pledge is 50% unless site is >=T1, then it is 5% of total pledge
totalpledge=` grep ^$site\, $PLEDGES | tail -1 | awk -F\, '{print int($2)}'`
validityofpledge=`grep ^$site\, $PLEDGES | tail -1 | awk -F\, '{print $3}'`
if [ -z $totalpledge ] ; then totalpledge=null ; fi
if [ -z "$validityofpledge" ] ; then validityofpledge=null ; fi
if [ $totalpledge -eq 0 ] ; then totalpledge=null ; fi

echo $site | egrep '^T0|^T1' >> /dev/null
if [ $? -eq 0 ] ; then
analysispledge=`echo $totalpledge | awk '{print int($1/10.)}'`
else
analysispledge=`echo $totalpledge | awk '{print int($1/2.0)}'`
fi
if [ -z $analysispledge ] ; then analysispledge=null ; fi
if [ $analysispledge -eq 0 ] ; then analysispledge=null ; fi

avgusageana=`grep ^$site\, $USAGEANA | awk -F\, '{print int($2)}'`
maxusageana=`grep ^$site\, $USAGEANA | awk -F\, '{print int($3)}'`
avgusagetst=`grep ^$site\, $USAGETST | awk -F\, '{print int($2)}'`
maxusagetst=`grep ^$site\, $USAGETST | awk -F\, '{print int($3)}'`
avgusagepro=`grep ^$site\, $USAGEPRO | awk -F\, '{print int($2)}'`
maxusagepro=`grep ^$site\, $USAGEPRO | awk -F\, '{print int($3)}'`
avgusageall=`grep ^$site\, $USAGEALL | awk -F\, '{print int($2)}'`
maxusageall=`grep ^$site\, $USAGEALL | awk -F\, '{print int($3)}'`

if [ -z $avgusageana ] ; then avgusageana=null ; fi
if [ -z $maxusageana ] ; then maxusageana=null ; fi
if [ -z $avgusagetst ] ; then avgusagetst=null ; fi
if [ -z $maxusagetst ] ; then maxusagetst=null ; fi
if [ -z $avgusagepro ] ; then avgusagepro=null ; fi
if [ -z $maxusagepro ] ; then maxusagepro=null ; fi
if [ -z $avgusageall ] ; then avgusageall=null ; fi
if [ -z $maxusageall ] ; then maxusageall=null ; fi

claimedana=` grep \{$site\} $CLAIMEDANA | awk '{print int($1)}'`
runningana=` grep \{$site\} $RUNNINGANA | awk '{print int($1)}'`
pressureana=`grep $site $DESIREDANA | wc -l`
exclusivepressureana=`grep $site $DESIREDANA | awk -v site=$site '$1==site{print $0}' | wc -l`

if [ -z $claimedana ] ; then claimedana=null ; fi
if [ -z $runningana ] ; then runningana=null ; fi
if [ -z $pressureana ] ; then pressureana=null ; fi
if [ -z $exclusivepressureana ] ; then exclusivepressureana=null ; fi

claimedglo=` grep \{$site\} $CLAIMEDGLO | awk '{print int($1)}'`
runningglo=` grep \{$site\} $RUNNINGGLO | awk '{print int($1)}'`
pressureglo=`grep $site $DESIREDGLO | wc -l`
exclusivepressureglo=`grep $site $DESIREDGLO | awk -v site=$site '$1==site{print $0}' | wc -l`

if [ -z $claimedglo ] ; then claimedglo=null ; fi
if [ -z $runningglo ] ; then runningglo=null ; fi
if [ -z $pressureglo ] ; then pressureglo=null ; fi
if [ -z $exclusivepressureglo ] ; then exclusivepressureglo=null ; fi

claimedpro=` grep \{$site\} $CLAIMEDPRO | awk '{print int($1)}'`
runningpro=` grep \{$site\} $RUNNINGPRO | awk '{print int($1)}'`
pressurepro=`grep $site $DESIREDPRO | wc -l`
exclusivepressurepro=`grep $site $DESIREDPRO | awk -v site=$site '$1==site{print $0}' | wc -l`

if [ -z $claimedpro ] ; then claimedpro=null ; fi
if [ -z $runningpro ] ; then runningpro=null ; fi
if [ -z $pressurepro ] ; then pressurepro=null ; fi
if [ -z $exclusivepressurepro ] ; then exclusivepressurepro=null ; fi

printf ' ["%s","%s","%s",%s,%s,' $site "$downtime" "$validityofpledge" $totalpledge $analysispledge
printf '%s,%s,' $avgusageana $maxusageana
printf '%s,%s,' $avgusagetst $maxusagetst
printf '%s,%s,' $avgusagepro $maxusagepro
printf '%s,%s,' $avgusageall $maxusageall
printf '%s,%s,%s,%s,' $claimedana $runningana $pressureana $exclusivepressureana
printf '%s,%s,%s,%s,' $claimedglo $runningglo $pressureglo $exclusivepressureglo
printf '%s,%s,%s,%s],\n' $claimedpro $runningpro $pressurepro $exclusivepressurepro
done
} | sed '$s/,$//' | sed 's/\"null\"/null/g' >>$OUTFILE


# close the json file
cat <<EOF >>$OUTFILE
]
}
}
EOF

# clean up temp files
rm $DOWNTIME $PLEDGES $SEDFILE $USAGEANA $USAGETST $USAGEPRO $USAGEALL \
$CLAIMEDANA $RUNNINGANA $DESIREDANA $CLAIMEDGLO $RUNNINGGLO $DESIREDGLO \
$CLAIMEDPRO $RUNNINGPRO $DESIREDPRO
rmdir $TMPDIR

exit 0
Loading

0 comments on commit 64a8fa4

Please sign in to comment.