4 files changed, 125 insertions, 0 deletions
diff --git a/ivan/Makefile b/ivan/Makefile
new file mode 100644
index 00000000..38eb1da2
--- /dev/null
+++ b/ivan/Makefile
@@ -0,0 +1,7 @@
+.PHONY: infest
+BIN_DIR = ../bin
+infest:
+	cp ivan ${INSTALL_DIR}
+debian-startup:
+	cp ivan-startup /etc/init.d/ivan
+	update-rc.d evan start
diff --git a/ivan/ivan b/ivan/ivan
new file mode 100755
index 00000000..5099114a
--- /dev/null
+++ b/ivan/ivan
@@ -0,0 +1,27 @@
+#!/bin/bash
+SATZ_LISTE=/krebs/ivan/satz-liste
+p="${noise_pitch-10}"
+v="${noise_lang-de}"
+k="${noise_capital-0}"
+a="${noise_amplitude-600}"
+g="${noise_gap-1}"
+RND_DELAY=3600
+#set -x
+function helpme ()
+{
+  cat << EOF 
+  $0 [-d]
+    -d   -- daemonize
+    -h   -- this help file
+EOF
+  exit 0
+}
+
+[ "${1:-}" = "-h" ] && helpme
+
+while true
+do
+  espeak -v $v -p $p -k $k -a $a -g $g "`shuf \"$SATZ_LISTE\" | tail -1`"
+  [ ! "${1:-}" = "-d" ] && exit 0   # break if not daemonized
+  sleep $((${RANDOM}%${RND_DELAY}))
+done
diff --git a/ivan/ivan-startup b/ivan/ivan-startup
new file mode 100755
index 00000000..8a7f8daa
--- /dev/null
+++ b/ivan/ivan-startup
@@ -0,0 +1,74 @@
+#! /bin/sh
+#
+### BEGIN INIT INFO
+# Provides:          evan
+# Required-Start:    $remote_fs $network
+# Required-Stop:     $remote_fs $network
+# Should-Start:      $syslog $named
+# Should-Stop:       $syslog
+# Default-Start:     2 3 4 5
+# Default-Stop:      0 1 6
+# Short-Description: Start evan daemons
+# Description:       
+
+### END INIT INFO
+#
+# Based on Lubomir Bulej's Redhat init script.
+
+DAEMON="/root/bin/evan"
+PIDFILE="/var/lock/evan"
+NAME="evan"
+DESC="evan daemons"
+TCONF="/etc/evan"
+
+test -f $DAEMON || exit 0
+
+[ -r /etc/default/evan ] && . /etc/default/evan
+
+
+start() {
+  [ -e $PIDFILE ] && echo "$PIDFILE already exists" && return 
+  $DAEMON $EXTRA -d "$@" &
+  echo $(($$+1)) > $PIDFILE #TODO fix this ugly hack!
+}
+stop() {
+  [ ! -e $PIDFILE ] && echo "$PIDFILE does not exist" && return
+  kill `cat $PIDFILE`
+  #killall evan
+  rm $PIDFILE
+}
+
+reload() {
+  echo "do nothing"
+  # do nothing
+}
+
+restart() {
+  stop "$@"
+  start "$@"
+}
+
+case "$1" in
+  start)
+    echo -n "Starting $DESC:" 
+    start
+  ;;
+  stop)
+    echo -n "Stopping $DESC:" 
+    stop
+  ;;
+  reload|force-reload)
+    echo -n "Reloading $DESC configuration:" 
+    reload
+  ;;
+  restart)
+    echo -n "Restarting $DESC:" 
+    restart
+  ;;
+  *)
+    echo "Usage: /etc/init.d/$NAME {start|stop|reload|restart|force-reload}"
+    exit 1
+  ;;
+esac
+echo "done"
+exit 0
diff --git a/ivan/satz-liste b/ivan/satz-liste
new file mode 100644
index 00000000..44f84c13
--- /dev/null
+++ b/ivan/satz-liste
@@ -0,0 +1,17 @@
+wenn ich meinen erzeugten abfall vor dem nach hause gehen beseitige steigt mein soziales ansehen
+bringe eine pflanze mit
+ein sauberer scheck ist ein guter scheck
+auch du weißt wie man den geschirrspüler einräumt
+wer die toilette putzt kommt in den himmel
+der große bruder sieht es gerne wenn die genossen die vereinsräume in stand halten
+muelltrennung bringt gutes karma
+dokumentiere deine projekte
+werbe neue mitglieder
+fnord
+bewässere die Pflanzen
+Öffne ein Fenster
+wische die tische
+Weniger Licht ist mehr
+sammle pfandflaschen ein
+zahle deinen mitgliedsbeitrag
+