2 # Copyright (C) 2016 Ian Kelling
4 # This program is free software; you can redistribute it and/or
5 # modify it under the terms of the GNU General Public License
6 # as published by the Free Software Foundation; either version 2
7 # of the License, or (at your option) any later version.
9 # This program is distributed in the hope that it will be useful,
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 # GNU General Public License for more details.
14 # You should have received a copy of the GNU General Public License
15 # along with this program; if not, write to the Free Software
16 # Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
18 # Note, sometimes shutting down the existing demohost vm
19 # fails. Just run again if that happens.
21 # Deploy fai configuration to faiserver,
22 # then start a virtual machine to test the config.
26 trap 'cleanup; echo "$0:$LINENO:error: \"$BASH_COMMAND\" returned $?" >&2' ERR
27 script_dir
=$
(dirname $
(readlink
-f "$BASH_SOURCE"))
29 e
() { echo "$*"; "$@"; }
31 # I had this set false as default before, can't remember why. oh well.
33 if [[ $1 == -r ]]; then
40 if [[ $script_dir == /a
/bin
/* ]]; then
41 # Copy our script elsewhere so we can develop it
42 # and save it at the same time it's running
45 cp -ar /a
/bin
/fai
/tmp
/faifreeze
46 exec /tmp
/faifreeze
/${BASH_SOURCE##*/} "$@"
52 [[ ${0##*/} == arch-revm
]]
56 [[ ! $1 ]] || new_disk
=true
58 cleanup
() { .
/pxe-server
:; }
62 # via osinfo-query os. guessing arch is closest to latest fedora.
79 for ((i
=1; i
<= disk_count
; i
++)); do
80 f
=/var
/lib
/libvirt
/images
/${name}$i
81 disk_arg
+=("--disk path=$f")
82 if $new_disk ||
[[ ! -e $f ]]; then
84 e s qemu-img create
-o preallocation
=metadata
-f qcow2
$f 20G
88 if [[ $SSH_CLIENT ]]; then
89 console_arg
=--noautoconsole
92 # --cpu host: this causes mkfs.btrfs to fail with a stack trace which began
94 # init_module+0x108/0x1000 [raid6_pq]
96 # uniq is to stop gtk-warning spam
97 e s virt-install
--os-variant $variant -n $name --pxe -r 2048 --vcpus 1 \
98 ${disk_arg[*]} -w bridge
=br0
,mac
=52:54:00:9c
:ef
:ad \
99 --graphics spice
,listen
=0.0.0.0 $console_arg |
& grep -v '^ *$' |
uniq &
101 if [[ $SSH_CLIENT ]]; then
106 while ! timeout
-s 9 10 ssh root@
$name /bin
/true
; do
111 if is_arch_revm
; then
112 .
/arch-init-remote
$name