mirror of https://github.com/zulip/zulip.git
37 lines
626 B
Plaintext
37 lines
626 B
Plaintext
|
#!/bin/bash
|
||
|
set -e
|
||
|
|
||
|
usage() {
|
||
|
echo "usage: destroy-all -f" >&2
|
||
|
exit 1
|
||
|
}
|
||
|
|
||
|
args="$(getopt -o +f --long help,force -- "$@")"
|
||
|
eval "set -- $args"
|
||
|
while true; do
|
||
|
case "$1" in
|
||
|
--help) usage;;
|
||
|
-f|--force) FORCE=1; shift;;
|
||
|
--) shift; break;;
|
||
|
*) usage;;
|
||
|
esac
|
||
|
done
|
||
|
|
||
|
if [ -z "$FORCE" ] || [ "$#" -gt 0 ]; then
|
||
|
usage
|
||
|
fi
|
||
|
|
||
|
if [ "$EUID" -ne 0 ]; then
|
||
|
echo "error: this script must be run as root" >&2
|
||
|
exit 1
|
||
|
fi
|
||
|
|
||
|
lxc-ls -f \
|
||
|
| perl -lane '$_ = $F[0]; print if (/^zulip-install-/ && !/-base$/)' \
|
||
|
| while read c
|
||
|
do
|
||
|
echo "$c"
|
||
|
lxc-stop -n "$c"
|
||
|
lxc-destroy -n "$c"
|
||
|
done
|