gistfile1.txt

sub activate_volume {
    my ($class, $storeid, $scfg, $volname, $snapname, $cache) = @_;

    my $vg = $scfg->{vgname};

    # only snapshot volumes needs activation
    if ($snapname) {
        my $snapvol = "snap_${volname}_$snapname";
        my $cmd = ['/sbin/lvchange', '-ay', '-K', "$vg/$snapvol"];
        run_command($cmd, errmsg => "activate_volume '$vg/$snapvol' error");
    } elsif ($volname =~ /^base-/) {
        my $cmd = ['/sbin/lvchange', '-ay', '-K', "$vg/$volname"];
        run_command($cmd, errmsg => "activate_volume '$vg/$volname' error");
    } else {
        # other volumes are active by default
    }
}