xCAT/xcat-core
2
0
Fork 0
mirror of https://github.com/xcat2/xcat-core.git synced 2025-06-22 05:55:35 +00:00
Code Issues Releases Wiki Activity

support running cases in the sequence which bundle file defined

Browse Source
This commit is contained in:
hu-weihua
2016-05-04 02:00:17 -04:00
parent 60a06d04e8
commit 465853dd4c
1 changed files with 40 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

40
xCAT-test/xcattest
View File

@ -94,6 +94,7 @@ if($ret != 0){
goto EXIT;
}
#run case
&reordercases;
&runcase;
EXIT:
@ -926,3 +927,42 @@ close(STDOUT);
}
sub reordercases{
my @caserange = ();
my $line;
if($bundle_list){
my @bundles = split /,/, $bundle_list;
foreach my $bundle (@bundles){
if(!open(FILE, "<$rootdir/bundle/$bundle")){
log_this("can't open $rootdir/bundle/$bundle");
return 1;
}
while($line=<FILE>){
$line = trim($line);
next if(length($line) == 0);
push(@caserange, $line);
}
close(FILE);
}
}
if($case_list){
@caserange = split /,/, $case_list;
}
my @tmpcases=();
foreach my $case (@caserange){
my $i=0;
my $hit=0;
foreach my $runcase (@cases){
if($runcase->{name} eq $case){
$hit=1;
last;
}
$i++;
next;
}
push(@tmpcases, $cases[$i]) if($hit);
}
@cases=@tmpcases;
}