#!/bin/bash
### BEGIN INIT INFO
# Provides:          guix-daemon
# Required-Start:    $remote_fs $syslog
# Required-Stop:     $remote_fs $syslog
# Default-Start:     2 3 4 5
# Default-Stop:      0 1 6
# Short-Description: Guix build daemon
# Description:       Provides a daemon that does builds for Guix
### END INIT INFO

set -e
mkdir -p "/var/run"
if [ ! -f "@localstatedir@/guix/profiles/per-user/root/current-guix/bin/guix-daemon" ]
then
  exit 5
fi

case "$1" in
start)
  if [ -f "/var/run/guix-daemon.pid" ]
  then
    if pgrep -F "/var/run/guix-daemon.pid" guix-daemon
    then
      exit 0
    else
      echo "guix-daemon has a stale pid file" >&2
      exit 1
    fi
  else
    daemonize \
      -a \
      -e "/var/log/guix-daemon-stderr.log" \
      -o "/var/log/guix-daemon-stdout.log" \
      -E GUIX_LOCPATH=@localstatedir@/guix/profiles/per-user/root/guix-profile/lib/locale \
      -E LC_ALL=en_US.utf8 \
      -p "/var/run/guix-daemon.pid" \
      @localstatedir@/guix/profiles/per-user/root/current-guix/bin/guix-daemon \
      --build-users-group=guixbuild --discover=no
  fi
  ;;
stop)
  if [ -f "/var/run/guix-daemon.pid" ]
  then
    pkill -F "/var/run/guix-daemon.pid" guix-daemon || {
      exit 1
    }
    rm -f "/var/run/guix-daemon.pid"
    exit 0
  else
    exit 0
  fi
  ;;
status)
  if [ -f "/var/run/guix-daemon.pid" ]
  then
    if pgrep -F "/var/run/guix-daemon.pid" guix-daemon
    then
      echo "guix-daemon is running"
      exit 0
    else
      echo "guix-daemon has a stale pid file"
      exit 1
    fi
  else
    echo "guix-daemon is not running"
    exit 3
  fi
  ;;
restart|force-reload)
  "$0" stop
  "$0" start
  ;;
*)
  echo "Usage: $0 (start|stop|status|restart|force-reload)"
  exit 3
  ;;
esac
e9d'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=b0b881e02f2db159e8ef4798b2c72c20ccbe2e9d'>root</a>/<a href='/guix/log/build-aux?id=b0b881e02f2db159e8ef4798b2c72c20ccbe2e9d'>build-aux</a>/<a href='/guix/log/build-aux/compile-all.scm?id=b0b881e02f2db159e8ef4798b2c72c20ccbe2e9d'>compile-all.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/build-aux/compile-all.scm?id=b0b881e02f2db159e8ef4798b2c72c20ccbe2e9d&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2021-06-23 23:35:27 +0200'>2021-06-23</span></td><td><a href='/guix/commit/build-aux/compile-all.scm?id=ef82ba9dd94369926eb13325d5e7da4306d23dd7'>build: Makefile splits Scheme compilation in four steps.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2021-06-18 14:18:06 +0200'>2021-06-18</span></td><td><a href='/guix/commit/build-aux/compile-all.scm?id=003728cfab907be5df1411c5faaf466a2b8d5ba2'>build: Remove Guile 2.2 workaround.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2020-04-12 00:00:59 +0200'>2020-04-12</span></td><td><a href='/guix/commit/build-aux/compile-all.scm?id=27a1e4fd109f6df9f687958cfead0d3e41e330aa'>build: Cap build parallelism on i686.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-06-25 17:41:24 +0200'>2019-06-25</span></td><td><a href='/guix/commit/build-aux/compile-all.scm?id=ee700da584370330331ed09eabafc94a19892784'>build: Report build errors via 'report-load-error'.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2019-04-19 17:46:40 +0200'>2019-04-19</span></td><td><a href='/guix/commit/build-aux/compile-all.scm?id=04b5ac212f33fc20696fbe43816a1a86aad1a9f2'>build: Show completion percentage while building.</a><span class='msg-avail'>...</span></td><td>Ludovic Courtès</td></tr>