#!/bin/sh
set -e -f ${DRY_RUN:+-n} -u
tool=${0%/*}
. "$tool"/lib/functions.sh
. "$tool"/etc/vm.sh

rule_help () { # SYNTAX: [--hidden]
	local hidden; [ ${1:+set} ] || hidden=set
	cat >&2 <<-EOF
		DESCRIPTION:
		  ce script regroupe des règles pour administrer la VM ($vm_fqdn)
		  _depuis_ une machine distante ;
		  il sert à la fois d'outil (aisément bidouillable)
		  et de documentation (préçise).
		  Voir \`$tool/vm_host'   pour les règles côté machine hôte ($vm_host).
		  Voir \`$tool/vm_hosted' pour les règles côté VM hébergée ($vm_fqdn).
		SYNTAX: $0 \$RULE \${RULE}_SYNTAX
		RULES:
		$(sed -ne "s/^rule_\(${hidden:+[^_]}[^ ]*\) () {\( *#.*\|\)/  \1\2/p" "$tool"/etc/vm.sh "$0")
		ENVIRONMENT:
		  TRACE # affiche les commandes avant leur exécution
		$(sed -ne 's/^readonly \([^ ][^ =]*\).*}\( *#.*\|\)$/\t$\1\2/p' "$tool"/etc/vm.sh "$0")
		EOF
 }

rule_git_config () { # DESCRIPTION: configure le .git local pour bien pousser
	(
	cd "$tool"
	git remote rm host || true
	git remote add host $vm_host:tool/vm
	git config --replace remote.host.push HEAD:refs/remotes/master
	git remote rm hosted || true
	git remote add hosted root@$vm_fqdn:tool/vm
	git config --replace remote.hosted.push HEAD:refs/remotes/master
	)
 }
rule_git_push () { # SYNTAX: {host|hosted} $git_push_options
	local remote=${1#remote=}; shift
	GIT_SSH=./vm_ssh git push -v "$remote" "$@"
 }

rule_ssh () {
	"$tool"/vm_ssh $vm_fqdn "$@"
 }
rule__ssh_known_hosts_update () {
	rule ssh \
	 -o StrictHostKeyChecking=no \
	 -o CheckHostIP=no \
	 -o HashKnownHosts=no \
	 whoami
 }
rule_key_disk_send () {
	gpg --decrypt var/lib/luks/$vm_fqdn.key.gpg |
	"$tool"/vm_ssh root@$vm_fqdn "$@" \
	 -o CheckHostIP=no \
	 -o HostKeyAlias=init.$vm_fqdn \
	 tee /lib/cryptsetup/passfifo \>/dev/null
 }
rule_key_disk_backup () {
	for part in root var home
	 do
		mkdir -p var/lib/luks
		rule ssh -l root ' \
			tmp=$(mktemp)
			cryptsetup luksHeaderBackup \
			 /dev/$vm_lvm_vg/${vm_lvm_lv}_${part} \
			 --header-backup-file "$tmp" \
			cat "$tmp"
			shred --remove "$tmp"
		 ' |
		gpg --encrypt --recipient $USER@ \
		 -o var/lib/luks/${vm_lvm_lv}_${part}.luks.gpg
	 done
 }

rule=${1:-help}
${1+shift}
case $rule in
 (help);;
 (*)
	assert 'test ! "$(hostname --fqdn)" = "$vm_fqdn"' vm_fqdn
	assert 'test ! "$(hostname --fqdn)" = "$vm_host"' vm_host
	;;
 esac
rule $rule "$@"