rbd : add owner attribute when rbs ls
Signed-off-by: Alexandre Derumier <aderumier@odiso.com>
This commit is contained in:
committed by
Dietmar Maurer
parent
4e2d3bc8ea
commit
d70e7f6c0d
@ -31,12 +31,18 @@ sub rbd_ls{
|
|||||||
|
|
||||||
$line = trim($line);
|
$line = trim($line);
|
||||||
my ($image) = $line;
|
my ($image) = $line;
|
||||||
|
|
||||||
|
my $owner;
|
||||||
|
if ($image =~ m/^(vm-(\d+)-\S+)$/) {
|
||||||
|
$owner = $2;
|
||||||
|
}
|
||||||
|
|
||||||
$list->{$rbdpool}->{$image} = {
|
$list->{$rbdpool}->{$image} = {
|
||||||
name => $image,
|
name => $image,
|
||||||
size => "",
|
size => "",
|
||||||
|
vmid => $owner
|
||||||
};
|
};
|
||||||
|
|
||||||
});
|
});
|
||||||
};
|
};
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user