Admin/isatest/isatest-statistics
changeset 25453 80557dafd2a0
parent 24831 887d1b32a1a5
child 25477 d350aa8cc53d
equal deleted inserted replaced
25452:089a82c28a42 25453:80557dafd2a0
    49 DIR="$1"; shift
    49 DIR="$1"; shift
    50 PLATFORM="$1"; shift
    50 PLATFORM="$1"; shift
    51 TIMESPAN="$1"; shift
    51 TIMESPAN="$1"; shift
    52 SESSIONS="$@"
    52 SESSIONS="$@"
    53 
    53 
       
    54 case "$PLATFORM" in
       
    55   *para*)
       
    56     PARALLEL=true
       
    57     ;;
       
    58   *)
       
    59     PARALLEL=false
       
    60     ;;
       
    61 esac
       
    62 
    54 if [ "$PLATFORM" = afp ]; then
    63 if [ "$PLATFORM" = afp ]; then
    55   LOG_DIR=~isatest/afp-log
    64   LOG_DIR=~isatest/afp-log
    56   LOG_NAME="afp-test-devel*"
    65   LOG_NAME="afp-test-devel*"
    57 else
    66 else
    58   LOG_DIR=~isatest/log
    67   LOG_DIR=~isatest/log
    68 
    77 
    69 $ZGREP "^Finished .*elapsed" \
    78 $ZGREP "^Finished .*elapsed" \
    70   $(find "$LOG_DIR" -name "$LOG_NAME" -ctime "-${TIMESPAN}") | \
    79   $(find "$LOG_DIR" -name "$LOG_NAME" -ctime "-${TIMESPAN}") | \
    71 perl -e '
    80 perl -e '
    72   while (<>) {
    81   while (<>) {
    73     if (m/(\d\d\d\d)-(\d\d)-(\d\d).*:Finished (\S+) \(.*, (\d+):(\d+):(\d+) cpu time\)/) {
    82     if (m/(\d\d\d\d)-(\d\d)-(\d\d).*:Finished (\S+) \((\d+):(\d+):(\d+) elapsed time, (\d+):(\d+):(\d+) cpu time\)/) {
    74         my $year = $1;
    83         my $year = $1;
    75         my $month = $2;
    84         my $month = $2;
    76         my $day = $3;
    85         my $day = $3;
    77         my $name = $4;
    86         my $name = $4;
    78         my $time = ($5 * 3600 + $6 * 60 + $7) / 60;
    87         my $elapsed_time = ($5 * 3600 + $6 * 60 + $7) / 60;
       
    88         my $cpu_time = ($8 * 3600 + $9 * 60 + $10) / 60;
    79 
    89 
    80         printf "$name $year-$month-$day %.2f\n", $time;
    90         printf "$name $year-$month-$day %.2f %.2f\n", $cpu_time, $elapsed_time;
    81     }
    91     }
    82   }' > "$ALL_DATA"
    92   }' > "$ALL_DATA"
    83 
    93 
    84 for SESSION in $SESSIONS
    94 for SESSION in $SESSIONS
    85 do
    95 do
    86   fgrep "$SESSION " "$ALL_DATA" > "$SESSION_DATA"
    96   fgrep "$SESSION " "$ALL_DATA" > "$SESSION_DATA"
       
    97   PLOT="plot [] [0:] \"$SESSION_DATA\" using 2:3 smooth sbezier notitle, \"$SESSION_DATA\" using 2:3 smooth csplines notitle"
       
    98   if [ "$PARALLEL" = true ]; then
       
    99     PLOT="${PLOT}, \"$SESSION_DATA\" using 2:4 smooth sbezier title \"elapsed\", \"$SESSION_DATA\" using 2:4 smooth csplines title \"elapsed\""
       
   100   fi
    87   gnuplot <<EOF
   101   gnuplot <<EOF
    88 set terminal $TE
   102 set terminal $TE
    89 set output "$DIR/${SESSION}.png"
   103 set output "$DIR/${SESSION}.png"
    90 set xdata time
   104 set xdata time
    91 set timefmt "%Y-%m-%d"
   105 set timefmt "%Y-%m-%d"
    92 set format x "%d-%b"
   106 set format x "%d-%b"
    93 set xlabel "$SESSION"
   107 set xlabel "$SESSION"
    94 plot [] [0:] "$SESSION_DATA" using 2:3 smooth sbezier notitle, "$SESSION_DATA" using 2:3 smooth csplines notitle
   108 $PLOT
    95 EOF
   109 EOF
    96 done
   110 done
    97 
   111 
    98 rm -f "$ALL_DATA" "$SESSION_DATA"
   112 rm -f "$ALL_DATA" "$SESSION_DATA"