78f6c1d70b
Current install_os_domU.sh depends on some keywords which are changed in the next version XenServer which is upgraded to CentOS 7. So with the existing script to install domU in the new version XenServer, it will always fail. This patch is to make it to be compatible with all XenServer versions: 1. the output format of "ifconfig" is changed; the fix is to use the ip command to retrieve IP address. 2. In XS 6.5 and the previous XS, the "xe-guest-utilities" package file name is as "xe-guest-utilities_<version>_<arch>.deb" but now it delivers a single file for all Arch's and the file name is "xe-guest-utilities_<version>_all.deb". In order to make it to be compatible, the fix will try to search the old file name pattern by default. If it does't exist, then try to search the new file name pattern. Change-Id: I893e89e42a5ef7dd079b571ea308f318c9befc9e Closes-Bug: #1494241
306 lines
6.7 KiB
Bash
306 lines
6.7 KiB
Bash
#!/bin/bash
|
|
|
|
function die_with_error {
|
|
local err_msg
|
|
|
|
err_msg="$1"
|
|
|
|
echo "$err_msg" >&2
|
|
exit 1
|
|
}
|
|
|
|
function xapi_plugin_location {
|
|
for PLUGIN_DIR in "/etc/xapi.d/plugins/" "/usr/lib/xcp/plugins/" "/usr/lib/xapi/plugins" "/usr/lib64/xapi/plugins"; do
|
|
if [ -d $PLUGIN_DIR ]; then
|
|
echo $PLUGIN_DIR
|
|
return 0
|
|
fi
|
|
done
|
|
return 1
|
|
}
|
|
|
|
function create_directory_for_kernels {
|
|
if [ -d "/boot/guest" ]; then
|
|
echo "INFO: /boot/guest directory already exists, using that" >&2
|
|
else
|
|
local LOCALPATH="$(get_local_sr_path)/os-guest-kernels"
|
|
mkdir -p $LOCALPATH
|
|
ln -s $LOCALPATH /boot/guest
|
|
fi
|
|
}
|
|
|
|
function create_directory_for_images {
|
|
if [ -d "/images" ]; then
|
|
echo "INFO: /images directory already exists, using that" >&2
|
|
else
|
|
local LOCALPATH="$(get_local_sr_path)/os-images"
|
|
mkdir -p $LOCALPATH
|
|
ln -s $LOCALPATH /images
|
|
fi
|
|
}
|
|
|
|
function get_local_sr {
|
|
xe pool-list params=default-SR minimal=true
|
|
}
|
|
|
|
function get_local_sr_path {
|
|
pbd_path="/var/run/sr-mount/$(get_local_sr)"
|
|
pbd_device_config_path=`xe pbd-list sr-uuid=$(get_local_sr) params=device-config | grep " path: "`
|
|
if [ -n "$pbd_device_config_path" ]; then
|
|
pbd_uuid=`xe pbd-list sr-uuid=$(get_local_sr) minimal=true`
|
|
pbd_path=`xe pbd-param-get uuid=$pbd_uuid param-name=device-config param-key=path || echo ""`
|
|
fi
|
|
echo $pbd_path
|
|
}
|
|
|
|
function find_ip_by_name {
|
|
local guest_name="$1"
|
|
local interface="$2"
|
|
|
|
local period=10
|
|
local max_tries=10
|
|
local i=0
|
|
|
|
while true; do
|
|
if [ $i -ge $max_tries ]; then
|
|
echo "Timeout: ip address for interface $interface of $guest_name"
|
|
exit 11
|
|
fi
|
|
|
|
ipaddress=$(xe vm-list --minimal \
|
|
name-label=$guest_name \
|
|
params=networks | sed -ne "s,^.*${interface}/ip: \([0-9.]*\).*\$,\1,p")
|
|
|
|
if [ -z "$ipaddress" ]; then
|
|
sleep $period
|
|
((i++))
|
|
else
|
|
echo $ipaddress
|
|
break
|
|
fi
|
|
done
|
|
}
|
|
|
|
function _vm_uuid {
|
|
local vm_name_label
|
|
|
|
vm_name_label="$1"
|
|
|
|
xe vm-list name-label="$vm_name_label" --minimal
|
|
}
|
|
|
|
function _create_new_network {
|
|
local name_label
|
|
name_label=$1
|
|
|
|
xe network-create name-label="$name_label"
|
|
}
|
|
|
|
function _multiple_networks_with_name {
|
|
local name_label
|
|
name_label=$1
|
|
|
|
# A comma indicates multiple matches
|
|
xe network-list name-label="$name_label" --minimal | grep -q ","
|
|
}
|
|
|
|
function _network_exists {
|
|
local name_label
|
|
name_label=$1
|
|
|
|
! [ -z "$(xe network-list name-label="$name_label" --minimal)" ]
|
|
}
|
|
|
|
function _bridge_exists {
|
|
local bridge
|
|
bridge=$1
|
|
|
|
! [ -z "$(xe network-list bridge="$bridge" --minimal)" ]
|
|
}
|
|
|
|
function _network_uuid {
|
|
local bridge_or_net_name
|
|
bridge_or_net_name=$1
|
|
|
|
if _bridge_exists "$bridge_or_net_name"; then
|
|
xe network-list bridge="$bridge_or_net_name" --minimal
|
|
else
|
|
xe network-list name-label="$bridge_or_net_name" --minimal
|
|
fi
|
|
}
|
|
|
|
function add_interface {
|
|
local vm_name_label
|
|
local bridge_or_network_name
|
|
|
|
vm_name_label="$1"
|
|
bridge_or_network_name="$2"
|
|
device_number="$3"
|
|
|
|
local vm
|
|
local net
|
|
|
|
vm=$(_vm_uuid "$vm_name_label")
|
|
net=$(_network_uuid "$bridge_or_network_name")
|
|
xe vif-create network-uuid=$net vm-uuid=$vm device=$device_number
|
|
}
|
|
|
|
function setup_network {
|
|
local bridge_or_net_name
|
|
bridge_or_net_name=$1
|
|
|
|
if ! _bridge_exists "$bridge_or_net_name"; then
|
|
if _network_exists "$bridge_or_net_name"; then
|
|
if _multiple_networks_with_name "$bridge_or_net_name"; then
|
|
cat >&2 << EOF
|
|
ERROR: Multiple networks found matching name-label to "$bridge_or_net_name"
|
|
please review your XenServer network configuration / localrc file.
|
|
EOF
|
|
exit 1
|
|
fi
|
|
else
|
|
_create_new_network "$bridge_or_net_name"
|
|
fi
|
|
fi
|
|
}
|
|
|
|
function bridge_for {
|
|
local bridge_or_net_name
|
|
bridge_or_net_name=$1
|
|
|
|
if _bridge_exists "$bridge_or_net_name"; then
|
|
echo "$bridge_or_net_name"
|
|
else
|
|
xe network-list name-label="$bridge_or_net_name" params=bridge --minimal
|
|
fi
|
|
}
|
|
|
|
function xenapi_ip_on {
|
|
local bridge_or_net_name
|
|
bridge_or_net_name=$1
|
|
|
|
ip -4 addr show $(bridge_for "$bridge_or_net_name") |\
|
|
awk '/inet/{split($2, ip, "/"); print ip[1];}'
|
|
}
|
|
|
|
function xenapi_is_listening_on {
|
|
local bridge_or_net_name
|
|
bridge_or_net_name=$1
|
|
|
|
! [ -z $(xenapi_ip_on "$bridge_or_net_name") ]
|
|
}
|
|
|
|
function parameter_is_specified {
|
|
local parameter_name
|
|
parameter_name=$1
|
|
|
|
compgen -v | grep "$parameter_name"
|
|
}
|
|
|
|
function append_kernel_cmdline {
|
|
local vm_name_label
|
|
local kernel_args
|
|
|
|
vm_name_label="$1"
|
|
kernel_args="$2"
|
|
|
|
local vm
|
|
local pv_args
|
|
|
|
vm=$(_vm_uuid "$vm_name_label")
|
|
pv_args=$(xe vm-param-get param-name=PV-args uuid=$vm)
|
|
xe vm-param-set PV-args="$pv_args $kernel_args" uuid=$vm
|
|
}
|
|
|
|
function destroy_all_vifs_of {
|
|
local vm_name_label
|
|
|
|
vm_name_label="$1"
|
|
|
|
local vm
|
|
|
|
vm=$(_vm_uuid "$vm_name_label")
|
|
IFS=,
|
|
for vif in $(xe vif-list vm-uuid=$vm --minimal); do
|
|
xe vif-destroy uuid="$vif"
|
|
done
|
|
unset IFS
|
|
}
|
|
|
|
function have_multiple_hosts {
|
|
xe host-list --minimal | grep -q ","
|
|
}
|
|
|
|
function attach_network {
|
|
local bridge_or_net_name
|
|
|
|
bridge_or_net_name="$1"
|
|
|
|
local net
|
|
local host
|
|
|
|
net=$(_network_uuid "$bridge_or_net_name")
|
|
host=$(xe host-list --minimal)
|
|
|
|
xe network-attach uuid=$net host-uuid=$host
|
|
}
|
|
|
|
function set_vm_memory {
|
|
local vm_name_label
|
|
local memory
|
|
|
|
vm_name_label="$1"
|
|
memory="$2"
|
|
|
|
local vm
|
|
|
|
vm=$(_vm_uuid "$vm_name_label")
|
|
|
|
xe vm-memory-limits-set \
|
|
static-min=${memory}MiB \
|
|
static-max=${memory}MiB \
|
|
dynamic-min=${memory}MiB \
|
|
dynamic-max=${memory}MiB \
|
|
uuid=$vm
|
|
}
|
|
|
|
function max_vcpus {
|
|
local vm_name_label
|
|
|
|
vm_name_label="$1"
|
|
|
|
local vm
|
|
local host
|
|
local cpu_count
|
|
|
|
host=$(xe host-list --minimal)
|
|
vm=$(_vm_uuid "$vm_name_label")
|
|
|
|
cpu_count=$(xe host-param-get \
|
|
param-name=cpu_info \
|
|
uuid=$host |
|
|
sed -e 's/^.*cpu_count: \([0-9]*\);.*$/\1/g')
|
|
|
|
if [ -z "$cpu_count" ]; then
|
|
# get dom0's vcpu count
|
|
cpu_count=$(cat /proc/cpuinfo | grep processor | wc -l)
|
|
fi
|
|
|
|
# Assert cpu_count is not empty
|
|
[ -n "$cpu_count" ]
|
|
|
|
# Assert ithas a numeric nonzero value
|
|
expr "$cpu_count" + 0
|
|
|
|
xe vm-param-set uuid=$vm VCPUs-max=$cpu_count
|
|
xe vm-param-set uuid=$vm VCPUs-at-startup=$cpu_count
|
|
}
|
|
|
|
function get_domid {
|
|
local vm_name_label
|
|
|
|
vm_name_label="$1"
|
|
|
|
xe vm-list name-label="$vm_name_label" params=dom-id minimal=true
|
|
}
|