#!/bin/sh
cat << EOF
Content-Type: text/html
<html>
<head>
<title>souhrn - mrdkoid @ localhost</title>
<link rel="shortcut icon" href="data:image/x-ico;base64,iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAAK/INwWK6QAAABl0RVh0U29mdHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAPbSURBVHjaYpwx4zgDDuDEzsZix8jIwMAIhMjgPxCzszFb/f33Tx8ggFhevHgFFmRiYmT4+/cvAyNIB1ADkO8ooyRQ8/v/T4Zf//4w/AfKM/39B9XOwPCPkYPhw9tfnwACiJGNjQsswM/Pz8DCwsLw8eNHhj9//jD8/fVfpmSWw1VNbW2+C3cfMgh++crwQU6YgYmFmYGNlZXh9qdLDBtrL20GCCCWX7++gQ348YOJQUREhOHtm+8Mv37/ZhA1Y3tvJPrtv7OBBAOrwEcGxVcsDN8tTRl+sn5l+M70iEHolQTDmv8nPwIEEAvMX0xMzAz//v0HawYClq/v/jCz8vD8f/X9NcMN/v8Mr6UlGX6/P83Ayy/GYLnvOcMLLqDXWRmYAAIIbsC/f/9AXjCzsLDI+Pnzp9aTRy+/7V93n0tZ05BB5KUiw4/LHxk+a3xk+Mr5l4H7wx8GJgawRQwAAQQ3QFBQMLCmpmahs7Mz7759BxgePHzI8O7ZS4aqmr0MQk6CDLLvNBg41QQZ3n18znBWX57h03dg2P05wwAQQExQ/ZIGBgYz/Pz8eGVlZRl+/frLEBwSwjBxxmSGn0/4GHbtOM/A7cfA8PXPN4bvP34xnDnFzPD6rBQDOysLA0AAwVwQ+OHDe7F9+44wODkrMNiadDCI/49gOLDfm+HyxfPAkJdl+PeDjeHTv68MPKyCDJfEtzB8/vKd4e+ffwwAAQRygQgQx1++fIXh+/cvDDy8SgwaauEMvOLWDCJiogwSUtIMXz/eYrh/4AFQoQID/3dphp9SnxjeiL0FhxtAADEDNa8GYgczMzOGnp5uBlYWDoZvfxwZ3v8UB6U2BmVlNYYDB/YyvDz9noGfW4hB5L4yg5qaJsObn68Z7m95dxkggEAumADE22NiohmYmZkZPn/+xvD+/RuGD+/eMDx//opBVESaQdvIgMHATo/hPx8jw/pLqxkefXjCoMFpyPAfmDABAggUBruB+I24uKwdMAlwv3v/jeHL508Mnz59Bxr2k+Hzux8M0s7yDKauWgz3vt5kYJNnYvjM8ZmB6w8fOFUDBBAzCws43b9iYPymY2Uto/P541eGL18YgJq/MDD+f8Jw5tYmhkNsBxjOMVxmePj5EQMrKxPDz/+/Ga6+u8Tw6sDnGwABxFhfzwQSzIoOk5+qIPKb4eelTwwbL8UzaDk/Z9BRucvw+95lhhUrfzHErQGawMzwBpo1GYFsRoYHDIcBAohRRRnIY2JQ09dgrBJh+S/95D7D731XGc4pqzMwmGsyGDB8ZmA/d4nh3flnDEuBLj4BzY6MUPwPIMAA9ORio5qu/OAAAAAASUVORK5CYII=" type="image/x-icon">
<meta http-equiv="refresh" content="60">
</head>
<body>
EOF
#hlaska
if [ "$(who)" != "" ]; then HLASKA='<br><center><blink><font color="red" style="font-size: 60px; font-weight: bold; font-variant: small-caps;">NEVYPINAT!</font></blink></center><br><br>'; fi
echo $HLASKA
echo "<h1>souhrn pro mrdkoid:</h1>"
echo "<pre>"
#uptime
uptime=$(</proc/uptime)
uptime=${uptime%%.*}
seconds=$(( uptime%60 ))
minutes=$(( uptime/60%60 ))
hours=$(( uptime/60/60%24 ))
days=$(( uptime/60/60/24 ))
echo "<strong>MRDKOID je zapnut:</strong>" '<font color="#585858" style="font-weight: bold; font-variant: small-caps;">' $(echo $days dni $hours hodin $minutes minut $seconds sekund) "</font> <br>"
#vypis platby
PAY=$(sudo cat /root/payment)
if [ "$PAY" == "ok" ]
then
PLATBA='<font color="green" style="font-weight: bold; font-variant: small-caps;">Vse v poradku!</font>'
elif
[ "$PAY" != "ok" ]
then
PLATBA='<font color="red" style="font-weight: bold; font-variant: small-caps;">NEZAPLACENO</font>'
fi
echo "<strong>Stav platby:</strong>" '<font color="red" style="font-weight: bold; font-variant: small-caps;">' $PLATBA '</font> <br>'
#lze vypnout
if [ "$(who)" != "" ]
then HLASKA2='<font color="red" style="font-weight: bold; font-variant: small-caps;">Nevypinat!</font>'
else
HLASKA2='<font color="green" style="font-weight: bold; font-variant: small-caps;">Lze vypnout</font>'
fi
echo "<strong>Lze nyni MRDKOID vypnout?:</strong>" $HLASKA2 "<br>"
#rychlost spojeni
echo "Rychlost bezdratoveho spojeni:" '<font color="#585858" style="font-weight: bold; fotn-variant: small-caps;">' $(/sbin/iwconfig wlan0 |grep -i rate |awk '{print $2 $3}' |sed 's/Rate=//g') '</font> <br>'
#kvalita spojeni
echo "Kvalita bezdratoveho spojeni:" '<font color="#585858" style="font-weight: bold; font-variant: small-caps;">' $(/sbin/iwconfig wlan0 |grep -i link |awk '{print $2}' |sed 's/Quality=//g') '</font><br>'
#uroven signalu
echo "Uroven bezdratoveho signalu:" '<font color="#585858" style="font-weight: bold; font-variant: small-caps;">' $(/sbin/iwconfig wlan0 |grep -i link |awk '{print $4$5}' |sed 's/level=//g') '</font> <br>'
#disk
echo "Volne misto na disku:" '<font color="#585858" style="font-weight: bold; font-variant: small-caps;">' $(df -h |grep sda1 |awk '{print $4" z celkovych "$2}') '</font><br>'
#ram
MEM=$(cat /proc/meminfo |grep Mem)
echo "Vyuziti pameti RAM:" '<font color="#585858" style="font-weight: bold; font-variant: small-caps;">' $(echo $MEM |awk '{print $5" "$6" z celkovych "$2" "$3}') '</font><br>'
#prihlaseni uzivatele
echo "<br><br><br><strong>Aktualne prihlaseni uzivatele:</strong>" $(who |sed 's/10.10.10/foo.bar/g' > /tmp/usrs.tmp) '<pre><font color="red">' $(cat -E /tmp/usrs.tmp |sed 's/\$/<br>/g'; rm /tmp/usrs.tmp) "</font></pre><br>"
cat << EOF
</pre>
</body>
</html>
EOF