sheepdog: sub path: add snapname argument

needed for qemu-img convert from src snapshot

Signed-off-by: Alexandre Derumier <aderumier@odiso.com>
This commit is contained in:
Alexandre Derumier
2013-05-02 05:51:50 +02:00
committed by Dietmar Maurer
parent 207ea85267
commit 24cec3aa77

View File

@ -131,13 +131,14 @@ sub parse_volname {
} }
sub path { sub path {
my ($class, $scfg, $volname, $storeid) = @_; my ($class, $scfg, $volname, $storeid, $snapname) = @_;
my ($vtype, $name, $vmid) = $class->parse_volname($volname); my ($vtype, $name, $vmid) = $class->parse_volname($volname);
my $portal = $scfg->{portal}; my $portal = $scfg->{portal};
my ($server, $port) = split(':', $portal); my ($server, $port) = split(':', $portal);
$port = 7000 if !$port; $port = 7000 if !$port;
$name .= ':'.$snapname if $snapname;
my $path = "sheepdog:$server:$port:$name"; my $path = "sheepdog:$server:$port:$name";