On Tue, Jun 20, 2017 at 10:39:59PM +0200, m...@datanom.net wrote: > From: Michael Rasmussen <m...@datanom.net> > > Signed-off-by: Michael Rasmussen <m...@datanom.net> > --- > PVE/Storage/FreeNASPlugin.pm | 27 +++++++++++++++++++++++++++ > 1 file changed, 27 insertions(+) > > diff --git a/PVE/Storage/FreeNASPlugin.pm b/PVE/Storage/FreeNASPlugin.pm > index 943eeab..9c0136d 100644 > --- a/PVE/Storage/FreeNASPlugin.pm > +++ b/PVE/Storage/FreeNASPlugin.pm > @@ -963,6 +963,33 @@ sub create_base { > sub clone_image { > my ($class, $scfg, $storeid, $volname, $vmid, $snap) = @_; >
whitespace > + $snap ||= "__base__$vmid"; > + > + my ($vtype, $basename, $basevmid, undef, undef, $isBase, $format) = > + $class->parse_volname($volname); > + > + die "clone_image only works on base images\n" unless $isBase; > + > + my $name = $freenas_find_free_diskname->($storeid, $scfg, $vmid, > $format); > + > + $class->volume_snapshot($scfg, $storeid, $basename, $snap); > + whitespace > + my $data = { > + name => "$scfg->{pool}/$name" > + }; > + $freenas_request->( > + $scfg, 'POST', > "storage/snapshot/$scfg->{pool}/$basename\@$snap/clone/", encode_json($data)); > + > + $name = "$basename/$name"; why not skip this > + # get ZFS dataset name from PVE volname > + my (undef, $clonedname) = $class->parse_volname($name); then you don't need this > + > + $freenas_create_lun->($scfg, $vmid, $clonedname); and can use $name here > + whitespace > + my $res = $class->deactivate_volume($storeid, $scfg, $basename); > + die "Could not deactivate volume '$basename'\n" unless $res; this can stay like it is > + whitespace > + return $name; and this becomes return "$basename/$name"; > } > whitespace > sub alloc_image { > -- > 2.11.0 > > > ---- > > This mail was virus scanned and spam checked before delivery. > This mail is also DKIM signed. See header dkim-signature. > > _______________________________________________ > pve-devel mailing list > pve-devel@pve.proxmox.com > https://pve.proxmox.com/cgi-bin/mailman/listinfo/pve-devel _______________________________________________ pve-devel mailing list pve-devel@pve.proxmox.com https://pve.proxmox.com/cgi-bin/mailman/listinfo/pve-devel