mirror of
https://gitlab.com/libvirt/libvirt.git
synced 2024-12-23 14:15:28 +00:00
462a69621e
We had several different styles of .in conversion in our Makefiles: ALLCAPS, @ALLCAPS@, @lower@, ::lower:: Canonicalize on one form, to make it easier to copy and paste between .in files. Also, we were using some non-portable sed constructs: \@ is an undefined escape sequence (it happens to be @ itself in GNU sed, but POSIX allows it to mean something else), as well as risky behavior (failure to consistently quote things means a space in $(sysconfdir) could throw things off; also, Autoconf recommends using | rather than , or ! in the s||| operator, because | has to be quoted in shell and is therefore less likely to appear in file names than , or !). Fix all of these uses to follow the same syntax. * daemon/libvirtd.8.in: Switch to @var@. * tools/virt-xml-validate.in: Likewise. * tools/virt-pki-validate.in: Likewise. * src/locking/virtlockd.init.in: Likewise. * daemon/Makefile.am: Prefer | over ! in sed. (libvirtd.8): Prefer consistent substitution. (libvirtd.init, libvirtd.service): Avoid non-portable sed. * tools/Makefile.am (libvirt-guests.sh, libvirt-guests.init) (libvirt-guests.service): Likewise. (virt-xml-validate, virt-pki-validate, virt-sanlock-cleanup): Prefer consistent capitalization. * src/Makefile.am (virtlockd.init, virtlockd.service) (virtlockd.socket): Prefer consistent substitution.
97 lines
2.1 KiB
Bash
97 lines
2.1 KiB
Bash
#!/bin/sh
|
|
|
|
# A script to cleanup resource leases auto-created by
|
|
# the libvirt lock plugin for sanlock
|
|
|
|
verbose=1
|
|
if test "x$1" = "x-q" ; then
|
|
verbose=0
|
|
fi
|
|
|
|
LOCKSPACE="__LIBVIRT__DISKS__"
|
|
|
|
LOCKDIR=`augtool print '/files@sysconfdir@/libvirt/qemu-sanlock.conf/disk_lease_dir'`
|
|
if test $? != 0 || "x$LOCKDIR" = "x" ; then
|
|
LOCKDIR="@localstatedir@/lib/libvirt/sanlock"
|
|
fi
|
|
|
|
notify() {
|
|
test $verbose = 1 || return
|
|
if test "x$1" = "x-n"; then
|
|
shift
|
|
printf %s "$*"
|
|
else
|
|
printf %s\\n "$*"
|
|
fi
|
|
}
|
|
|
|
cd "$LOCKDIR" || exit 1
|
|
|
|
for MD5 in *
|
|
do
|
|
if test $MD5 != '*' && test $MD5 != $LOCKSPACE ; then
|
|
RESOURCE="$LOCKSPACE:$MD5:$LOCKDIR/$MD5:0"
|
|
notify -n "Cleanup: $RESOURCE "
|
|
sanlock client command -r $RESOURCE -c /bin/rm -f "$LOCKDIR/$MD5" 2>/dev/null
|
|
if test $? = 0 ; then
|
|
notify "PASS"
|
|
else
|
|
notify "FAIL"
|
|
fi
|
|
fi
|
|
done
|
|
|
|
exit 0
|
|
|
|
: <<=cut
|
|
=pod
|
|
|
|
=head1 NAME
|
|
|
|
virt-sanlock-cleanup - remove stale sanlock resource lease files
|
|
|
|
=head1 SYNOPSIS
|
|
|
|
virt-sanlock-cleanup
|
|
|
|
=head1 DESCRIPTION
|
|
|
|
This tool removes any resource lease files created by the sanlock
|
|
lock manager plugin. The resource lease files only need to exist
|
|
on disks when a guest using the resource is active. This script
|
|
reclaims the disk space used by resources which are not currently
|
|
active.
|
|
|
|
=head1 EXIT STATUS
|
|
|
|
Upon successful processing of leases cleanup, an exit status
|
|
of 0 will be set. Upon fatal error a non-zero status will
|
|
be set.
|
|
|
|
=head1 AUTHOR
|
|
|
|
Daniel Berrange
|
|
|
|
=head1 BUGS
|
|
|
|
Report any bugs discovered to the libvirt community via the
|
|
mailing list C<http://libvirt.org/contact.html> or bug tracker C<http://libvirt.org/bugs.html>.
|
|
Alternatively report bugs to your software distributor / vendor.
|
|
|
|
=head1 COPYRIGHT
|
|
|
|
Copyright (C) 2011, 2013 Red Hat, Inc.
|
|
|
|
=head1 LICENSE
|
|
|
|
virt-sanlock-cleanup is distributed under the terms of the GNU GPL v2+.
|
|
This is free software; see the source for copying conditions. There
|
|
is NO warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR
|
|
PURPOSE
|
|
|
|
=head1 SEE ALSO
|
|
|
|
C<virsh(1)>, online instructions C<http://libvirt.org/locking.html>
|
|
|
|
=cut
|