zhyang-dev/openfoam
1
0
Fork 0
mirror of https://develop.openfoam.com/Development/openfoam.git synced 2025-11-28 03:28:01 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

ENH: foamLog: added -localDB and made -quiet really quiet

Browse Source
This commit is contained in:
mattijs
2011-07-21 09:40:22 +01:00
parent 0ca4904ec5
commit a67876c202
1 changed files with 29 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

52
bin/foamLog Executable file → Normal file
View File

@ -45,6 +45,7 @@ Usage: $Script [OPTIONS] <log>
-list lists but does not extract -list lists but does not extract
-n create single column files with the extracted data only -n create single column files with the extracted data only
-quiet quiet operation -quiet quiet operation
-localDB only use the local database file
-help print the usage -help print the usage
$Script - extracts xy files from OpenFOAM logs. $Script - extracts xy files from OpenFOAM logs.
@ -103,7 +104,7 @@ usage
timeName=Time timeName=Time
unset listOpt quietOpt unset listOpt quietOpt localDB
# parse options # parse options
while [ "$#" -gt 0 ] while [ "$#" -gt 0 ]
@ -125,6 +126,10 @@ do
quietOpt=true quietOpt=true
shift shift
;; ;;
-localDB)
localDB=true
shift
;;
-*) -*)
usage "unknown option: '$*'" usage "unknown option: '$*'"
;; ;;
@ -219,7 +224,7 @@ getSolveQueryList()
getAllQueries() getAllQueries()
{ {
#-- All solved for queries from log file #-- All solved for queries from log file
queries=`getSolveQueryList $2` [ "$localDB" = true ] || queries=`getSolveQueryList $2`
#-- Add ones from database, present in log file #-- Add ones from database, present in log file
# Note: just like awk, line selected with regular expression, # Note: just like awk, line selected with regular expression,
@ -369,29 +374,30 @@ AWK_CONTENTS
# #
# Code for extracting solved for quantities # Code for extracting solved for quantities
# #
cat << AWK_CONTENTS >> $AWKFILE [ "$localDB" = true ] ||
# Extraction of any solved for variable cat << AWK_CONTENTS >> $AWKFILE
/Solving for/ { # Extraction of any solved for variable
extract(\$0, "Solving for ", varNameVal) /Solving for/ {
extract(\$0, "Solving for ", varNameVal)
varName=varNameVal[1] varName=varNameVal[1]
file=varName "_" subIter[varName]++ file=varName "_" subIter[varName]++
file="$outputDir/" file file="$outputDir/" file
extract(\$0, "Initial residual = ", val) extract(\$0, "Initial residual = ", val)
print $timeName "\t" val[1] > file print $timeName "\t" val[1] > file
varName=varNameVal[1] "FinalRes" varName=varNameVal[1] "FinalRes"
file=varName "_" subIter[varName]++ file=varName "_" subIter[varName]++
file="$outputDir/" file file="$outputDir/" file
extract(\$0, "Final residual = ", val) extract(\$0, "Final residual = ", val)
print $timeName "\t" val[1] > file print $timeName "\t" val[1] > file
varName=varNameVal[1] "Iters" varName=varNameVal[1] "Iters"
file=varName "_" subIter[varName]++ file=varName "_" subIter[varName]++
file="$outputDir/" file file="$outputDir/" file
extract(\$0, "No Iterations ", val) extract(\$0, "No Iterations ", val)
print $timeName "\t" val[1] > file print $timeName "\t" val[1] > file
} }
AWK_CONTENTS AWK_CONTENTS
# ---------- # ----------
@ -432,7 +438,7 @@ done
# Print found # Print found
#----------------------------- #-----------------------------
myEcho "Generated XY files for:" myEcho "Generated XY files for:"
getAllQueries $DBFILE $LOG [ "$quietOpt" = true ] || getAllQueries $DBFILE $LOG
myEcho "End" myEcho "End"
#------------------------------------------------------------------------------ #------------------------------------------------------------------------------