user-tools/daemonctl

   1 #!/bin/bash
   2
   3 true <<EOF
   4 =pod
   5
   6 =head1 NAME
   7
   8 daemonctl - Manage preconfigured libslack daemon(1) daemons more conveniently
   9
  10 =head1 DESCRIPTIONS
  11
  12 Daemonctl presumes some facts about the system:
  13
  14 =over 8
  15
  16 =item daemons are configured in F</etc/daemon.conf>
  17
  18 =item daemons log to /syslog/daemon/daemon.<DAEMON>/today.log
  19
  20 =back
  21
  22 =cut
  23
  24 EOF
  25
  26
  27 set +e
  28 set -u
  29
  30 . /usr/lib/tool/bash-utils
  31
  32 _status()
  33 {
  34         local daemon status pid started code
  35         daemon=$1
  36
  37         status=`daemon -n "$daemon" -v --running 2>&1`
  38         code=$?
  39         if [ $code = 0 ]
  40         then
  41                 pid=`head -n1 /var/run/daemons/$daemon.pid`
  42                 started=`ps o lstart='' -p $pid`
  43                 status="$status (running since $started)"
  44         fi
  45         echo "$status"
  46         return $code
  47 }
  48
  49 status()
  50 {
  51         _status "$@"
  52         if [ $? != 0 ]
  53         then
  54                 {
  55                         echo -n "known daemons: "
  56                         list_all_daemons | tr "\n" " "
  57                         echo
  58                 }>&2
  59         fi
  60 }
  61
  62 list_pidfile_daemons()
  63 {
  64         ls -1 /var/run/daemons | sed -e 's/\.pid$//'
  65 }
  66
  67 _filter_daemon_names()
  68 {
  69         perl -ne '($s) = /^\s*(\S+)/; $s =~ /^[^*#]/ and print "$s\n"'
  70 }
  71
  72 list_configured_daemons()
  73 {
  74         cat /etc/daemon.conf | perl -pe 's/^#DISABLED# //' | _filter_daemon_names
  75 }
  76
  77 list_enabled_daemons()
  78 {
  79         cat /etc/daemon.conf | _filter_daemon_names
  80 }
  81
  82 list_all_daemons()
  83 {
  84         {
  85                 list_pidfile_daemons
  86                 list_configured_daemons
  87         }|\
  88         sort -u
  89 }
  90
  91 if [ $# = 0 ]
  92 then
  93         list_all_daemons |\
  94         while read daemon
  95         do
  96                 _status "$daemon"
  97         done
  98         exit
  99 fi
 100
 101 daemon=$1
 102 shift
 103 verb=''
 104 if [ $# -gt 0 ]
 105 then
 106         verb=$1
 107         shift
 108 fi
 109
 110 status "$daemon"
 111
 112 case "$verb" in
 113 start)
 114         if list_enabled_daemons | grep -qx "$daemon"
 115         then
 116                 daemon -n "$daemon" -v
 117         else
 118                 errx 1 "$daemon: not sure, is it enabled in /etc/daemon.conf ?"
 119         fi
 120         ;;
 121 stop)
 122         daemon -n "$daemon" -v --stop
 123         ;;
 124 disable)
 125         cat /etc/daemon.conf | daemon="$daemon" perl -pe 's/^\Q$ENV{daemon}\E\s/#DISABLED# $&/' | sponge /etc/daemon.conf
 126         ;;
 127 enable)
 128         cat /etc/daemon.conf | daemon="$daemon" perl -pe 's/^#DISABLED# (\Q$ENV{daemon}\E)/$1/' | sponge /etc/daemon.conf
 129         ;;
 130 restart)
 131         daemon -n "$daemon" -v --restart
 132         ;;
 133 log)
 134         tail "$@" -f /syslog/daemon/daemon.$daemon/`date +%Y%m%d`.log
 135         exit
 136         ;;
 137 ''|status)
 138         # status is already shown above
 139         exit
 140         ;;
 141 *)
 142         warnx "unknown verb '$verb'"
 143         warnx "valid verbs: start, restart, stop, log, disable, enable, status"
 144         false
 145         ;;
 146 esac
 147
 148 _status "$daemon"