| Revision: | 1.1 |
| Committed: | Sun Feb 27 18:51:40 2011 UTC (12 years, 6 months ago) by phil |
| Content type: | application/x-csh |
| Branch: | MAIN |
| CVS Tags: | Ver_6-0, Ver_6-1, Ver_6-2, Ver_6-3, Ver_6-4, Ver_9-1, Ver_5-14, Ver_5-13, Ver_LATEST, Ver_9-3, Ver_9-41, Ver_9-2, Ver_8-8, Ver_8-2, Ver_8-3, Ver_8-0, Ver_8-1, Ver_8-6, Ver_8-7, Ver_8-4, Ver_8-5, Ver_7-1, Ver_7-0, Ver_9-5, Ver_9-4, Ver_8-10, Ver_8-11, Ver_8-12, Ver_9-0, HEAD |
| Log Message: | initial |
| # | Content |
|---|---|
| 1 | #! /bin/csh -f |
| 2 | |
| 3 | # set echo |
| 4 | |
| 5 | @ fourdays = 4 * 1440 |
| 6 | @ fivedays = 5 * 1440 |
| 7 | @ sixdays = 6 * 1440 |
| 8 | @ oneweek = 7 * 1440 |
| 9 | |
| 10 | set hproduct = (lev1_nrt V_45s_nrt V_720s_nrt lev1 cosmic_rays V_45s V_720s) |
| 11 | set product = (lev0 $hproduct) |
| 12 | set green = ( 2 5 30 48 $fourdays $fourdays $fivedays $fivedays) |
| 13 | set yellow = ( 4 10 60 80 $fivedays $fivedays $sixdays $sixdays) |
| 14 | set red = ( 8 20 120 150 $sixdays $sixdays $oneweek $oneweek) |
| 15 | |
| 16 | set now = `date -u +%Y.%m.%d_%H:%M:%S` |
| 17 | set now_t = `time_convert time=$now` |
| 18 | |
| 19 | set nprod = $#product |
| 20 | set iprod = 1 |
| 21 | while ($iprod <= $nprod) |
| 22 | set prod = $product[$iprod] |
| 23 | if ($prod == lev0) then |
| 24 | set times = `show_info key=T_OBS -q hmi.lev0a'[? FSN < 200000000 ?]' n=-1` |
| 25 | else |
| 26 | set times = `show_info -q key=T_OBS hmi.$prod'[$]'` |
| 27 | endif |
| 28 | set times_t = `time_convert time=$times` |
| 29 | @ lags = ( $now_t - $times_t ) / 60 |
| 30 | if ($lags <= $green[$iprod]) then |
| 31 | set stat = GREEN |
| 32 | else if ($lags <= $yellow[$iprod]) then |
| 33 | set stat = YELLOW |
| 34 | else |
| 35 | set stat = RED |
| 36 | endif |
| 37 | if ($lags < 60) then |
| 38 | set lag = $lags" minutes" |
| 39 | else if ($lags < 1440) then |
| 40 | set hours = `arith $lags / 60` |
| 41 | set lag = $hours" hours" |
| 42 | else |
| 43 | set days = `arith $lags / 1440` |
| 44 | set lag = $days" days" |
| 45 | endif |
| 46 | echo "`printf %-12s $prod`" "`printf %7s $stat`" ' ' $lag |
| 47 | @ iprod = $iprod + 1 |
| 48 | end |
| 49 | |
| 50 |