'
date
if ( test `date "+%Y%j"` -lt 2001272 )
then
echo " "
echo " best result up to now: 221.6 Gflop/s on 529 nodes"
fi
pbsn="/usr/local/bin/pbsnodes -s clic0a1";
grep="/bin/grep"
echo ' '
case $REMOTE_ADDR in
134.109.*) chek=`$pbsn -a | $grep job-excl | $grep offl | /usr/bin/wc -l`;;
default) chek=0
esac
used=`$pbsn -a | $grep job-excl | wc -l`
free=`$pbsn -a | $grep free | $grep -v offl | wc -l`
offl=`$pbsn -a | $grep offl | $grep -v job-excl | wc -l`
down=`/usr/local/bin/pbsnodes -a | $grep down | $grep -v offl |wc -l`
# remove leading blanks
chek=`expr $chek + 0`
used=`expr $used + 0`
free=`expr $free + 0`
offl=`expr $offl + 0`
down=`expr $down + 0`
# serv=`/usr/local/bin/qstat -B -f clic0a1 | /bin/awk '/Server: /{print $2}'`
#
if ( `expr $used + $free + $offl + $down` == 0 )
then
echo "Sorry, server is momentary not reachable."
#
else
#
#stamp=`date +%y%m%d%H%M%S`
stamp=`date +%s`
# set terminal gif transparent interlace small size 200,220 x000000 x000000 x000000 x000000 x0000ff x0000ff x0000ff x0000ff x00aa00 x00aa00 x00aa00 x00aa00 xff0000 xff0000 xff0000 xff00ff xff00ff xff00ff
# if which gnuplot
if false
then
gnuplot <&1 >cnt/gnuplot.err
a=$used
b=$free
c=$offl
d=$down
g=a+b+c+d
u=0.95
eps=pi/720
wa=2*pi*a/g
wb=2*pi*b/g
wc=2*pi*c/g
wd=2*pi*d/g
set parametric
set noxtics
set noytics
set noborder
set terminal jpeg small size 200,220 xffffff x000000 x000000 x000000 x0000ff x0000ff x0000ff x0000ff x00aa00 x00aa00 x00aa00 x00aa00 xff0000 xff0000 xff0000 xff00ff xff00ff xff00ff
set output "plot.jpg"
set title "`date`"
plot [t=0:1] [-1.1:1.1] [-1.1:1.1] \
t*cos(eps),t*sin(eps) t "", \
cos(t*wa),sin(t*wa) t "used" with l lw 2, \
u*cos(t*wa),u*sin(t*wa) t "" with l lw 5, \
t*cos(wa),t*sin(wa) t "", \
t*cos(wa+eps),t*sin(wa+eps) t "", \
cos(wa+t*wb),sin(wa+t*wb) t "free" with l lw 2, \
u*cos(wa+t*wb),u*sin(wa+t*wb) t "" with l lw 5, \
t*cos(wa+wb-eps),t*sin(wa+wb-eps) t "", \
t*cos(wa+wb),t*sin(wa+wb) t "", \
cos(wa+wb+t*wc),sin(wa+wb+t*wc) t "offl" with l lw 2, \
u*cos(wa+wb+t*wc),u*sin(wa+wb+t*wc) t "" with l lw 5, \
t*cos(wa+wb+wc-eps),t*sin(wa+wb+wc-eps) t "", \
cos(wa+wb+wc+t*wd),sin(wa+wb+wc+t*wd) t "down" with l lw 2, \
u*cos(wa+wb+wc+t*wd),u*sin(wa+wb+wc+t*wd) t "" with l lw 5, \
t*cos(-eps),t*sin(-eps) t ""
!
echo ""
else
echo ""
fi
echo '
'
# /usr/local/bin/qstat -B clic0a1 2>&1
echo
echo ''
if [ $used -gt 1 ]; then s='s'; else s=' '; fi
if [ $used -eq 0 ]; then used=" no"; fi
echo -n "$used node$s in use"
if [ $chek -gt 0 ]
then echo ',' "$chek of them intended for automatic system check" ''
else echo " "
fi
echo -n ''
if [ $free -gt 1 ]; then s='s'; else s=' '; fi
if [ $free -eq 0 ]; then free=" no"; fi
echo "$free node$s free"
echo -n ''
if [ $offl -gt 0 ]
then
if [ $offl -gt 1 ]; then s='s'; else s=' '; fi
echo "$offl node$s offline (maintenance)"
fi
echo -n ''
if [ $down -gt 0 ]
then
if [ $down -gt 1 ]; then s='s'; else s=' '; fi
echo "$down node$s down (unreachable)"
fi
echo ''
echo '
'
echo ''
case $REMOTE_ADDR in
# 134.109.40.212) echo "Link to urz/anwendungen " ;;
134.109.*) echo " Hello, $REMOTE_HOST, CLiC was switched off in 2007."
# echo "Hello, $REMOTE_HOST, here is a list of running or queued jobs: "
# echo '
'
# /usr/local/bin/qstat @clic0a1 -R
# echo '
'
echo ' more technical details ';;
default) ;;
esac
#
fi
echo ''
ed cnt/clicstat.cnt </dev/null
1s/^.*/$REMOTE_HOST `date` `echo -n Server\:\ ; hostname`/
1m\$
w
q
!
'
echo '
"
else
echo "