- Handle removing virtual targets on -clear_config.

git-svn-id: http://svn.code.sf.net/p/scst/svn/trunk@1776 d57e44dd-8a1f-0410-8b47-8ef2f437770f
This commit is contained in:
Mark Buechler
2010-06-15 19:22:31 +00:00
parent ef331b97d5
commit b151a59182
2 changed files with 18 additions and 3 deletions
+3 -3
View File
@@ -183,13 +183,13 @@ my %VERBOSE_ERROR = (
use vars qw(@ISA @EXPORT $VERSION);
my $TGT_TYPE_HARDWARE = 1;
my $TGT_TYPE_VIRTUAL = 2;
use vars qw($TGT_TYPE_HARDWARE $TGT_TYPE_VIRTUAL);
$VERSION = 0.9.00;
$TGT_TYPE_HARDWARE = 1;
$TGT_TYPE_VIRTUAL = 2;
my $_SCST_MIN_MAJOR_ = 2;
my $_SCST_MIN_MINOR_ = 0;
my $_SCST_MIN_RELEASE_ = 0;
+15
View File
@@ -1573,6 +1573,9 @@ sub clearConfiguration {
clearLuns($driver, $target);
removeTargetDynamicAttributes($driver, $target);
if ($SCST->targetType($driver, $target) == $SCST::SCST::TGT_TYPE_VIRTUAL) {
removeVirtualTarget($driver, $target);
}
}
removeDriverDynamicAttributes($driver);
@@ -1589,9 +1592,21 @@ sub clearConfiguration {
}
}
# Todo - check return code
# TODO: should we disable all target drivers as well?
}
sub removeVirtualTarget {
my $driver = shift;
my $target = shift;
print "-> Removing virtual target '$target' from driver '$driver': ";
my $rc = $SCST->removeVirtualTarget($driver, $target);
print "done.\n";
# Todo - check return code
}
####################################################################
sub listHandlers {