blob: 46c56dc4175f738f7c4df9b1564884f4c833b849 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
|
#!/bin/sh
#
# Define and install a libvirt domain
#
# Copyright 2013 Guilhem Moulin <guilhem@fripost.org>
#
# Licensed under the GNU GPL version 3 or higher.
#
set -ue
root=$(dirname "$0")
help() {
cat >&2 <<-EOF
Usage:
$0 install <libvirt domain> [<QEMU image>]
Install the given domain, using the given image (created if
necessary) as a disk.
$0 view <libvirt domain>
Open a connection to a running domain using the Spice protocol
EOF
exit 1
}
get_XML_attribute() {
local domain="$1" object="$2" attribute="$3"
/usr/bin/virsh dumpxml "$domain" \
| /usr/bin/xmlstarlet sel -t -m /domain/"$object" -v @"$attribute"
}
doesExist() {
/usr/bin/virsh -r list --all --name | grep -qxF "$1"
}
isActive() {
/usr/bin/virsh -r list --name | grep -qxF "$1"
}
install() {
[ $# -eq 1 -o $# -eq 2 ] || help
local name=$1
local disk=${2:-$root/images/${name}.qcow2}
local darch version=$(sed -n 's/^VERSION\s*=\s*//p' $root/../preseed/Makefile)
case "${ARCH:=$(/bin/uname -m)}" in
i386|i686) darch=i386;;
x86_64) darch=amd64;;
*) darch=$ARCH;;
esac
local cdrom="$root/../preseed/dist/$darch/debian-$version-$darch-netinst-preseeded.iso"
if doesExist "$name"; then
echo "Error: Domain $name already exists. If you want to replace the domain, run" >&2
echo >&2
isActive "$name" && echo " virsh destroy $name" >&2
echo " virsh undefine $name" >&2
exit 1
fi
if ! [ -f "$cdrom" -a -r "$cdrom" ]; then
cat >&2 <<- EOF
Error: '$cdrom' does not exist or is not readable.
To create the preseeded image, run
cd $root/../preseed
ARCH=$darch make iso-preseed
EOF
exit 1
fi
grep -q '^kvm\s' /proc/modules || echo 'WARN: KVM not available!' >&2
if ! [ -r "$disk" -a -r "$disk" ]; then
local size=12G
echo "Creating (sparse) $size disk image '$disk'" >&2
/usr/bin/qemu-img create -f "${disk##*.}" \
-o size="$size",preallocation=metadata "$disk"
fi
# TODO: the bus should be chosen at random among sata,ide,scsi,usb
# TODO: test EFI: http://www.linux-kvm.org/page/OVMF
/usr/bin/virt-install -q \
--name "$name" \
--arch "$ARCH" \
--ram 128 \
--cdrom "$cdrom" \
--disk "$disk",cache=writeback,bus=sata \
--network network=default \
--graphics spice
cat >&2 <<- EOF
Domain '$name' has been created. As you can see in
virsh list
it should now be up and running. To open a graphical console, run
$0 view $name
EOF
}
view(){
[ $# -eq 1 ] || help
local domain="$1"
if ! doesExist "$domain"; then
cat >&2 <<- EOF
Error: Domain $domain does not exist. To create it, run
./virt install $domain
EOF
exit 1
elif ! isActive "$domain"; then
echo "Error: Domain $domain is not active" >&2
exit 1
fi
local type=$(get_XML_attribute "$domain" devices/graphics type)
local port=$(get_XML_attribute "$domain" devices/graphics port) || true
if [ "$type" != spice -o -z "$port" ]; then
echo "Error: Could not find a valid Spice server on domain '$domain'." >&2
exit 1
fi
/usr/bin/spicec -h 127.0.0.1 -p $port
}
command="${1:-}"
shift;
case "$command" in
install|view) $command "$@";;
*) help
esac
|
