+# Doing this part with CLVM again.
+
+lvsleft () {
+ lvs -o name,devices $VG \
+ | perl -lane "print \$F[0] if (\$F[1] =~ m|$TMPDEV|)"
+}
+
+movelv () {
+ echo pvmoving $VG/$1...
+ lvchange -an $VG/$1
+ pvmove -i 10 -n $VG/$1 $2
+ lvchange -ay $VG/$1
+}
+
+movestuff () {
+ date
+ while read lv; do
+ echo MOVING: $lv >>/var/log/lvm2.log
+ movelv $lv $TMPDEV
+ date
+ done
+}
+
+moveall () {
+ date
+ for lv in $(lvsleft); do
+ echo MOVING: $lv >>/var/log/lvm2.log
+ movelv $lv $TMPDEV
+ date
+ done
+}
+