#! /bin/bash
### BEGIN INIT INFO
# Provides:          invirt-base
# Required-Start:    $local_fs $remote_fs
# Required-Stop:     $local_fs $remote_fs
# Default-Start:     2 3 4 5
# Default-Stop:      0 1 6
# Short-Description: invirt base config generator
# Description:       Re-generate invirt config; namely default kerberos realm.
### END INIT INFO

# Author: Invirt Project <invirt@mit.edu>
PATH=/sbin:/usr/sbin:/bin:/usr/bin

if [ -x /usr/bin/invirt-getconf -a -f /etc/krb5.conf.invirt ]; then
    /usr/bin/perl -i -e '$r = `/usr/bin/invirt-getconf kerberos.realm`; chomp($r);
      while(<>) { s/^([ \t]*default_realm *=).*$/\1 $r/m; print; }' /etc/krb5.conf.invirt
fi