alarm

#!/bin/sh
#
# Simple alarm clock
#

alarm=07:45

# ANSI colors (darK,Red,Green,Yellow,Blue,Magenta,Cyan,White,Normal)
K="\033[1;30m"
R="\033[1;31m"
G="\033[1;32m"
Y="\033[1;33m"
B="\033[1;34m"
M="\033[1;35m"
C="\033[1;36m"
W="\033[1;37m"
N="\033[0m"

cleanup () {
echo "\033[0;00m"
setfont /mnt/ffs/share/fonts/myfont.psf
clear
#kbledsdim  # Not needed in Daylight.
lcdbrightness 511 63 500
if [ $LLED -eq 0 ] ; then
  leftledon
fi
if [ $MLED -eq 0 ] ; then
  middledon
fi
if [ $RLED -eq 0 ] ; then
  rightledon
fi
}

giveup () {
ret=$?
cleanup
#exit $ret
# propagating C-c kills gmenu2x wrapper sh
exit 0
# Wrapper may need: trap - INT TERM; ...
}

# Get state, then trap signals
leftled
LLED=$?
middled
MLED=$?
rightled
RLED=$?
trap giveup INT TERM

# ALSA should be loaded by default on jffs
if test ! -c /dev/snd/pcmC0D0p
then
  echo "Loading ALSA (sound) ..." > /dev/tty0
  /mnt/ffs/bin/setup-alsa.sh > /dev/tty0 < /dev/tty0
fi

# Set alarm time.
clear
setfont /mnt/ffs/share/fonts/ter-132b.psf
echo "\033[1;0H `date +"%a, %b %d"`"
#date +" %I:%M:%S %p"
date +" %H:%M:%S %p"
echo "\033[4;0HSet alarm: "$R"$alarm"$B
echo "\033[1A\033[11C\c"
read time
case "$time" in
  ??:??) alarm=$time ;;
  *) ;;
esac
echo $N

# Dim the lights.
leftledoff
middledoff
rightledoff
kbledsoff
lcdbrightness 511 63 100

case "$alarm" in
  0* | 10* | 11* ) AM="AM" ;;
  *) AM="PM" ;;
esac

# Show clock until alarm.
clear
quit=false
until [ "$quit" = "true" ]; do
  echo "\033[1;0H `date +"%a, %b %d"`"
  date +" %I:%M:%S %p"
  echo "\033[6;0H ö  $alarm $AM"
  echo "\033[1A\033[1C\c"
  #  sleep 1
  read -s -n1 -t1 cmd
  case ".$cmd" in
    .q | ". " ) giveup ;;
    *) ;;
  esac

  time=`date +%H:%M`
  if [ "$time" = "$alarm" ]; then
    quit=true
  fi
done

lcdbrightness 511 63 500
echo "\033[6;0H "$G"Wakeup!    "$N

# Beep if internet radio unavailable.
ping -c5 8.8.8.8>>/dev/null
inet=$?
cleanup
if [ $inet -eq  0 ] ; then
  gmu
else
  # mpg123tty4 -Z -C /mnt/ffs/share/alarm.mp3
  killall mpg123
  mpg123 -Z -C /mnt/ffs/share/alarm.mp3
fi

clear
exit 0