c/goertzel/sleepmon.sh

   1 #!/bin/bash
   2 # Simple sleep monitor (Harvie 2012)
   3 #
   4 # You probably have soundcard with one output and input
   5 # Take PIR motion sensor from security system
   6 # Use PIR to switch connection between left channels of output and input (tips of 3.5mm jacks)
   7 # Connect grounds of these two together (maybe you will not need it - depending on your soundcard)
   8 # Power up PIR
   9 # Launch this script
  10 # Use alsamixer and some GUI recorder (like audacity) to tune volume to some usable level
  11 # Place PIR facing to your bed and go sleep
  12 # Wake up
  13 # Enjoy your data
  14
  15 out=/tmp/sleeplog-"$(date +%F_%T)".txt
  16 graphout="${out%%.*}.png"
  17 speaker-test -t sine &>/dev/null &
  18 pid_test=$!
  19 tresh=10
  20 lastdate="$(date +%s)"
  21 laststate=0
  22 history='';
  23 historymax=120;
  24 historylen='10 30 60 90 120'
  25 screen=false
  26 graph=false
  27
  28 while getopts "sg" OPT; do
  29         test "$OPT" == 's' && screen=true;
  30         test "$OPT" == 'g' && graph=true;
  31 done
  32
  33 echo "Writing log to: $out";
  34 $graph && echo "Writing graph to: $graphout"
  35 echo
  36 arecord | ./goertzel -n i -q -l c -t $tresh -d 4 | while read line; do
  37         date="$(date +%s)"
  38         time="$(echo "$line" | cut -f 1)"
  39         level="$(echo "$line" | cut -f 2)"
  40         test "$level" -gt "$tresh" && state=false || state=true
  41         $state && statenum=1 || statenum=0;
  42         $state && statename='MOTION!' || statename='Nothing';
  43
  44         echo -ne "$time\t$date $(date '+%F %T') $statenum"
  45
  46         #History
  47         after=$(( $date - $lastdate))
  48         test $historymax -gt 0 && {
  49                 history=$(echo -n "$(yes | tr '\ny' $laststate | head -c $after)$history" | head -c $historymax)
  50                 for len in $historylen; do
  51                         on="$(echo -n ${history::$len} | tr -d 0 | wc -c)"
  52                         on="$(echo "scale=2; $on/$len" | bc)"
  53                         LC_ALL=C printf " %.2f" "$on"
  54                 done
  55         }
  56
  57         #Debug
  58         echo -e "\t($statename $level After $after secs)";
  59
  60         #Fun with values
  61         $state && {
  62                 $screen && xset dpms force off || true;
  63         } || {
  64                 $screen && xset dpms force on;
  65         }
  66         $graph && ./sleepplot.sh "$out" "$graphout" &>/dev/null &
  67
  68         #Prepare invariants for next round
  69         lastdate="$date";
  70         laststate="$statenum";
  71 done | tee "$out"
  72 kill $pid_test; sleep 0.2
  73 echo
  74 echo "Your log: $out"
  75 $graph && {
  76         ./sleepplot.sh "$out" "$graphout" &>/dev/null
  77         echo "Your graph: $graphout"
  78 }