<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40"> <head> <meta http-equiv="Content-Type" content="text/html; charset=us-ascii"> <meta name="Generator" content="Microsoft Word 12 (filtered medium)"> <style></style> </head> <body lang="NL" link="blue" vlink="purple"> <div class="WordSection1"> I have added my modified libvirt-guests script.<o:p></o:p> <o:p> </o:p> The changes I have made are:<o:p></o:p> <![if !supportLists]>1) <![endif]>Added ON_SHUTDOWN=migrate option<o:p></o:p> <![if !supportLists]>2) <![endif]>Added a RELOCATION_HOST variable<o:p></o:p> <![if !supportLists]>3) <![endif]>Added a migrate_guest() function<o:p></o:p> <![if !supportLists]>4) <![endif]>Modified the on stop function to add the migrate option<o:p></o:p> <o:p> </o:p> I hope the changes will be added to future libvirt releases.<o:p></o:p> <o:p> </o:p> Best regards,<o:p></o:p> <o:p> </o:p> Maurits van de Lande<o:p></o:p> <o:p> </o:p> #######################################################################<o:p></o:p> <o:p> </o:p> #!/bin/sh<o:p></o:p> <o:p> </o:p> # the following is the LSB init header<o:p></o:p> #<o:p></o:p> ### BEGIN INIT INFO<o:p></o:p> # Provides: libvirt-guests<o:p></o:p> # Required-Start: libvirtd<o:p></o:p> # Required-Stop: libvirtd<o:p></o:p> # Default-Start: 2 3 4 5<o:p></o:p> # Default-Stop: 0 1 6<o:p></o:p> # Short-Description: suspend/resume libvirt guests on shutdown/boot<o:p></o:p> # Description: This is a script for suspending or migrating active libvirt guests<o:p></o:p> # on shutdown and resuming the suspended guest on next boot.<o:p></o:p> # See http://libvirt.org<o:p></o:p> ### END INIT INFO<o:p></o:p> <o:p> </o:p> # the following is chkconfig init header<o:p></o:p> #<o:p></o:p> # libvirt-guests: suspend/resume libvirt guests on shutdown/boot<o:p></o:p> #<o:p></o:p> # chkconfig: 345 99 01<o:p></o:p> # description: This is a script for suspending active libvirt guests \<o:p></o:p> # on shutdown and resuming them on next boot \<o:p></o:p> # See http://libvirt.org<o:p></o:p> #<o:p></o:p> <o:p> </o:p> sysconfdir=/etc<o:p></o:p> localstatedir=/var<o:p></o:p> libvirtd=/usr/sbin/libvirtd<o:p></o:p> <o:p> </o:p> # Source function library.<o:p></o:p> test ! -r "$sysconfdir"/rc.d/init.d/functions ||<o:p></o:p> . "$sysconfdir"/rc.d/init.d/functions<o:p></o:p> <o:p> </o:p> URIS=default<o:p></o:p> ON_BOOT=start<o:p></o:p> ON_SHUTDOWN=suspend<o:p></o:p> #ON_SHUTDOWN=migrate<o:p></o:p> SHUTDOWN_TIMEOUT=0<o:p></o:p> RELOCATION_HOST=relocation_server_name.domain.local<o:p></o:p> <o:p> </o:p> test -f "$sysconfdir"/sysconfig/libvirt-guests && . "$sysconfdir"/sysconfig/libvirt-guests<o:p></o:p> <o:p> </o:p> LISTFILE="$localstatedir"/lib/libvirt/libvirt-guests<o:p></o:p> VAR_SUBSYS_LIBVIRT_GUESTS="$localstatedir"/lock/subsys/libvirt-guests<o:p></o:p> <o:p> </o:p> RETVAL=0<o:p></o:p> <o:p> </o:p> retval() {<o:p></o:p> "$@"<o:p></o:p> if [ $? -ne 0 ]; then<o:p></o:p> RETVAL=1<o:p></o:p> return 1<o:p></o:p> else<o:p></o:p> return 0<o:p></o:p> fi<o:p></o:p> }<o:p></o:p> <o:p> </o:p> run_virsh() {<o:p></o:p> uri=$1<o:p></o:p> shift<o:p></o:p> <o:p> </o:p> if [ "x$uri" = xdefault ]; then<o:p></o:p> conn=<o:p></o:p> else<o:p></o:p> conn="-c $uri"<o:p></o:p> fi<o:p></o:p> <o:p> </o:p> virsh $conn "$@" </dev/null<o:p></o:p> }<o:p></o:p> <o:p> </o:p> run_virsh_c() {<o:p></o:p> ( export LC_ALL=C; run_virsh "$@" )<o:p></o:p> }<o:p></o:p> <o:p> </o:p> list_guests() {<o:p></o:p> uri=$1<o:p></o:p> <o:p> </o:p> list=$(run_virsh_c $uri list)<o:p></o:p> if [ $? -ne 0 ]; then<o:p></o:p> RETVAL=1<o:p></o:p> return 1<o:p></o:p> fi<o:p></o:p> <o:p> </o:p> uuids=<o:p></o:p> for id in $(echo "$list" | awk 'NR > 2 {print $1}'); do<o:p></o:p> uuid=$(run_virsh_c $uri dominfo $id | awk '/^UUID:/{print $2}')<o:p></o:p> if [ -z "$uuid" ]; then<o:p></o:p> RETVAL=1<o:p></o:p> return 1<o:p></o:p> fi<o:p></o:p> uuids="$uuids $uuid"<o:p></o:p> done<o:p></o:p> <o:p> </o:p> echo $uuids<o:p></o:p> }<o:p></o:p> <o:p> </o:p> guest_name() {<o:p></o:p> uri=$1<o:p></o:p> uuid=$2<o:p></o:p> <o:p> </o:p> name=$(run_virsh_c $uri dominfo $uuid 2>/dev/null | \<o:p></o:p> awk '/^Name:/{print $2}')<o:p></o:p> [ -n "$name" ] || name=$uuid<o:p></o:p> <o:p> </o:p> echo "$name"<o:p></o:p> }<o:p></o:p> <o:p> </o:p> guest_is_on() {<o:p></o:p> uri=$1<o:p></o:p> uuid=$2<o:p></o:p> <o:p> </o:p> guest_running=false<o:p></o:p> info=$(run_virsh_c $uri dominfo $uuid)<o:p></o:p> if [ $? -ne 0 ]; then<o:p></o:p> RETVAL=1<o:p></o:p> return 1<o:p></o:p> fi<o:p></o:p> <o:p> </o:p> id=$(echo "$info" | awk '/^Id:/{print $2}')<o:p></o:p> <o:p> </o:p> [ -n "$id" ] && [ "x$id" != x- ] && guest_running=true<o:p></o:p> return 0<o:p></o:p> }<o:p></o:p> <o:p> </o:p> started() {<o:p></o:p> touch "$VAR_SUBSYS_LIBVIRT_GUESTS"<o:p></o:p> }<o:p></o:p> <o:p> </o:p> start() {<o:p></o:p> [ -f "$LISTFILE" ] || { started; return 0; }<o:p></o:p> <o:p> </o:p> if [ "x$ON_BOOT" != xstart ]; then<o:p></o:p> echo $"libvirt-guests is configured not to start any guests on boot"<o:p></o:p> rm -f "$LISTFILE"<o:p></o:p> started<o:p></o:p> return 0<o:p></o:p> fi<o:p></o:p> <o:p> </o:p> while read uri list; do<o:p></o:p> configured=false<o:p></o:p> for confuri in $URIS; do<o:p></o:p> if [ $confuri = $uri ]; then<o:p></o:p> configured=true<o:p></o:p> break<o:p></o:p> fi<o:p></o:p> done<o:p></o:p> if ! $configured; then<o:p></o:p> echo $"Ignoring guests on $uri URI"<o:p></o:p> continue<o:p></o:p> fi<o:p></o:p> <o:p> </o:p> echo $"Resuming guests on $uri URI..."<o:p></o:p> for guest in $list; do<o:p></o:p> name=$(guest_name $uri $guest)<o:p></o:p> echo -n $"Resuming guest $name: "<o:p></o:p> if guest_is_on $uri $guest; then<o:p></o:p> if $guest_running; then<o:p></o:p> echo $"already active"<o:p></o:p> else<o:p></o:p> retval run_virsh $uri start "$name" >/dev/null && \<o:p></o:p> echo $"done"<o:p></o:p> fi<o:p></o:p> fi<o:p></o:p> done<o:p></o:p> done <"$LISTFILE"<o:p></o:p> <o:p> </o:p> rm -f "$LISTFILE"<o:p></o:p> started<o:p></o:p> }<o:p></o:p> <o:p> </o:p> suspend_guest()<o:p></o:p> {<o:p></o:p> uri=$1<o:p></o:p> guest=$2<o:p></o:p> <o:p> </o:p> name=$(guest_name $uri $guest)<o:p></o:p> label=$"Suspending $name: "<o:p></o:p> echo -n "$label"<o:p></o:p> run_virsh $uri managedsave $guest >/dev/null &<o:p></o:p> virsh_pid=$!<o:p></o:p> while true; do<o:p></o:p> sleep 1<o:p></o:p> kill -0 $virsh_pid >/dev/null 2>&1 || break<o:p></o:p> progress=$(run_virsh_c $uri domjobinfo $guest 2>/dev/null | \<o:p></o:p> awk '/^Data processed:/{print $3, $4}')<o:p></o:p> if [ -n "$progress" ]; then<o:p></o:p> printf '\r%s%12s ' "$label" "$progress"<o:p></o:p> else<o:p></o:p> printf '\r%s%-12s ' "$label" "..."<o:p></o:p> fi<o:p></o:p> done<o:p></o:p> retval wait $virsh_pid && printf '\r%s%-12s\n' "$label" $"done"<o:p></o:p> }<o:p></o:p> <o:p> </o:p> shutdown_guest()<o:p></o:p> {<o:p></o:p> uri=$1<o:p></o:p> guest=$2<o:p></o:p> <o:p> </o:p> name=$(guest_name $uri $guest)<o:p></o:p> label=$"Shutting down $name: "<o:p></o:p> echo -n "$label"<o:p></o:p> retval run_virsh $uri shutdown $guest >/dev/null || return<o:p></o:p> timeout=$SHUTDOWN_TIMEOUT<o:p></o:p> while [ $timeout -gt 0 ]; do<o:p></o:p> sleep 1<o:p></o:p> timeout=$[timeout - 1]<o:p></o:p> guest_is_on $uri $guest || return<o:p></o:p> $guest_running || break<o:p></o:p> printf '\r%s%-12d ' "$label" $timeout<o:p></o:p> done<o:p></o:p> }<o:p></o:p> <o:p> </o:p> migrate_guest()<o:p></o:p> {<o:p></o:p> uri=$1<o:p></o:p> guest=$2<o:p></o:p> <o:p> </o:p> name=$(guest_name $uri $guest)<o:p></o:p> label=$"Migrating $name: to $RELOCATION_HOST"<o:p></o:p> echo -n "$label"<o:p></o:p> echo<o:p></o:p> retval run_virsh $uri migrate --live --verbose $guest "qemu+ssh://$RELOCATION_HOST/system" || return<o:p></o:p> <o:p> </o:p> # if guest_is_on $uri $guest; then<o:p></o:p> # if $guest_running; then<o:p></o:p> # printf '\r%s%-12s\n' "$label" $"failed to migrate"<o:p></o:p> # else<o:p></o:p> # printf '\r%s%-12s\n' "$label" $"done"<o:p></o:p> # fi<o:p></o:p> # fi<o:p></o:p> }<o:p></o:p> <o:p> </o:p> stop() {<o:p></o:p> # last stop was not followed by start<o:p></o:p> [ -f "$LISTFILE" ] && return 0<o:p></o:p> <o:p> </o:p> suspending=true<o:p></o:p> case "x$ON_SHUTDOWN" in<o:p></o:p> xshutdown )<o:p></o:p> suspending=false<o:p></o:p> if [ $SHUTDOWN_TIMEOUT -le 0 ]; then<o:p></o:p> echo $"Shutdown action requested but SHUTDOWN_TIMEOUT was not set"<o:p></o:p> RETVAL=6<o:p></o:p> return<o:p></o:p> fi<o:p></o:p> ;;<o:p></o:p> xmigrate )<o:p></o:p> suspending=false<o:p></o:p> ;;<o:p></o:p> esac<o:p></o:p> <o:p> </o:p> # if [ "x$ON_SHUTDOWN" = xshutdown ]; then<o:p></o:p> # suspending=false<o:p></o:p> # if [ $SHUTDOWN_TIMEOUT -le 0 ]; then<o:p></o:p> # echo $"Shutdown action requested but SHUTDOWN_TIMEOUT was not set"<o:p></o:p> # RETVAL=6<o:p></o:p> # return<o:p></o:p> # fi<o:p></o:p> # fi<o:p></o:p> <o:p> </o:p> : >"$LISTFILE"<o:p></o:p> for uri in $URIS; do<o:p></o:p> echo -n $"Running guests on $uri URI: "<o:p></o:p> <o:p> </o:p> if [ "x$uri" = xdefault ] && [ ! -x "$libvirtd" ]; then<o:p></o:p> echo $"libvirtd not installed; skipping this URI."<o:p></o:p> continue<o:p></o:p> fi<o:p></o:p> <o:p> </o:p> list=$(list_guests $uri)<o:p></o:p> if [ $? -eq 0 ]; then<o:p></o:p> empty=true<o:p></o:p> for uuid in $list; do<o:p></o:p> $empty || printf ", "<o:p></o:p> echo -n $(guest_name $uri $uuid)<o:p></o:p> empty=false<o:p></o:p> done<o:p></o:p> if $empty; then<o:p></o:p> echo $"no running guests."<o:p></o:p> else<o:p></o:p> echo<o:p></o:p> echo $uri $list >>"$LISTFILE"<o:p></o:p> fi<o:p></o:p> fi<o:p></o:p> done<o:p></o:p> <o:p> </o:p> while read uri list; do<o:p></o:p> if $suspending; then<o:p></o:p> echo $"Suspending guests on $uri URI..."<o:p></o:p> else<o:p></o:p> if [ "x$ON_SHUTDOWN" = xshutdown ]; then<o:p></o:p> echo $"Shutting down guests on $uri URI..."<o:p></o:p> else<o:p></o:p> echo $"Migrating guests on $uri URI... to $RELOCATION_HOST" <o:p></o:p> fi<o:p></o:p> fi<o:p></o:p> <o:p> </o:p> for guest in $list; do<o:p></o:p> if $suspending; then<o:p></o:p> suspend_guest $uri $guest<o:p></o:p> else<o:p></o:p> if [ "x$ON_SHUTDOWN" = xshutdown ]; then<o:p></o:p> shutdown_guest $uri $guest<o:p></o:p> else<o:p></o:p> migrate_guest $uri $guest<o:p></o:p> fi<o:p></o:p> fi<o:p></o:p> done<o:p></o:p> if [ "x$ON_SHUTDOWN" = xmigrate ]; then<o:p></o:p> #delete listfile after migration all VM's<o:p></o:p> rm -f $LISTFILE<o:p></o:p> fi<o:p></o:p> done <"$LISTFILE"<o:p></o:p> <o:p> </o:p> rm -f "$VAR_SUBSYS_LIBVIRT_GUESTS"<o:p></o:p> }<o:p></o:p> <o:p> </o:p> gueststatus() {<o:p></o:p> for uri in $URIS; do<o:p></o:p> echo "* $uri URI:"<o:p></o:p> retval run_virsh $uri list || echo<o:p></o:p> done<o:p></o:p> }<o:p></o:p> <o:p> </o:p> # rh_status<o:p></o:p> # Display current status: whether saved state exists, and whether start<o:p></o:p> # has been executed. We cannot use status() from the functions library,<o:p></o:p> # since there is no external daemon process matching this init script.<o:p></o:p> rh_status() {<o:p></o:p> if [ -f "$LISTFILE" ]; then<o:p></o:p> echo $"stopped, with saved guests"<o:p></o:p> RETVAL=3<o:p></o:p> else<o:p></o:p> if [ -f "$VAR_SUBSYS_LIBVIRT_GUESTS" ]; then<o:p></o:p> echo $"started"<o:p></o:p> else<o:p></o:p> echo $"stopped, with no saved guests"<o:p></o:p> fi<o:p></o:p> RETVAL=0<o:p></o:p> fi<o:p></o:p> }<o:p></o:p> <o:p> </o:p> # usage [val]<o:p></o:p> # Display usage string, then exit with VAL (defaults to 2).<o:p></o:p> usage() {<o:p></o:p> echo $"Usage: $0 {start|stop|status|restart|condrestart|try-restart|reload|force-reload|gueststatus|shutdown}"<o:p></o:p> exit ${1-2}<o:p></o:p> }<o:p></o:p> <o:p> </o:p> # See how we were called.<o:p></o:p> if test $# != 1; then<o:p></o:p> usage<o:p></o:p> fi<o:p></o:p> case "$1" in<o:p></o:p> --help)<o:p></o:p> usage 0<o:p></o:p> ;;<o:p></o:p> start|stop|gueststatus)<o:p></o:p> $1<o:p></o:p> ;;<o:p></o:p> restart)<o:p></o:p> stop && start<o:p></o:p> ;;<o:p></o:p> condrestart|try-restart)<o:p></o:p> [ -f "$VAR_SUBSYS_LIBVIRT_GUESTS" ] && stop && start<o:p></o:p> ;;<o:p></o:p> reload|force-reload)<o:p></o:p> # Nothing to do; we reread configuration on each invocation<o:p></o:p> ;;<o:p></o:p> status)<o:p></o:p> rh_status<o:p></o:p> ;;<o:p></o:p> shutdown)<o:p></o:p> ON_SHUTDOWN=shutdown<o:p></o:p> stop<o:p></o:p> ;;<o:p></o:p> *)<o:p></o:p> usage<o:p></o:p> ;;<o:p></o:p> esac<o:p></o:p> exit $RETVAL<o:p></o:p> </div> </body> </html>