2
0
mirror of https://github.com/xcat2/xcat-core.git synced 2025-08-18 09:10:23 +00:00

add genesis test case

This commit is contained in:
junxiawang
2016-07-12 05:28:58 -04:00
parent 72571f4444
commit 78e9094258
2 changed files with 170 additions and 0 deletions

View File

@@ -0,0 +1,42 @@
start:nodeset_shell
description: verify could log in genesis shell
cmd:nodeset $$CN shell
check:rc==0
cmd:rpower $$CN boot
cmd: perl /opt/xcat/share/xcat/tools/autotest/testcase/genesis/cmdtest.pl -t $$CN
cmd:xdsh $$CN cat /proc/cmdline
check:rc==0
check:output=~BOOT_IMAGE=/xcat/genesis.kernel
cmd:nodeset $$CN boot
check:rc==0
end
start:nodeset_cmdline
description:verify could run cmdline successfully
cmd:perl /opt/xcat/share/xcat/tools/autotest/testcase/genesis/cmdtest.pl -c __GETNODEATTR($$CN,arch)__
cmd:nodeset $$CN runcmd="cmdtest,shell"
check:rc==0
cmd:rpower $$CN boot
check:rc==0
cmd: perl /opt/xcat/share/xcat/tools/autotest/testcase/genesis/cmdtest.pl -t $$CN
cmd:xdsh $$CN "cat /tmp/cmdtest"
check:rc==0
check:output=~test
cmd:nodeset $$CN boot
check:rc==0
cmd:rm -rf /tmp/cmdtest
end
start:nodeset_runimg
description:verify runimg could work
cmd:perl /opt/xcat/share/xcat/tools/autotest/testcase/genesis/cmdtest.pl -i $$CN $$imgdirip
check:rc==0
cmd:rpower $$CN boot
check:rc==0
cmd: perl /opt/xcat/share/xcat/tools/autotest/testcase/genesis/cmdtest.pl -t $$CN
check:rc==0
cmd:xdsh $$CN "cat /tmp/cmdtest"
check:output=~test
check:rc==0
cmd:nodeset $$CN boot
cmd:rm -rf /install/my_image
cmd:rm -rf /tmp/runme.sh
end

View File

@@ -0,0 +1,128 @@
#!/usr/bin/env perl
# IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
use strict;
use warnings;
use Getopt::Long;
use Data::Dumper;
use Term::ANSIColor;
use Time::Local;
BEGIN
{
$::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : -d '/opt/xcat' ? '/opt/xcat' : '/usr';
}
use lib "$::XCATROOT/lib/perl";
my $needhelp = 0;
my $rungenesiscmd = 0;
my $rungenesisimg = 0;
my $shellmode = 0;
my $cmdtest="/tmp/cmdtest";
my $genesisdir="/opt/xcat/share/xcat/netboot/genesis/";
my $timesleep = 0;
my $runimgtest="/tmp/runme.sh";
if (
!GetOptions("h|?" => \$needhelp,
"c"=>\$rungenesiscmd,
"i"=>\$rungenesisimg,
"t"=>\$timesleep,
"s"=>\$shellmode)
)
{
&usage;
exit 1;
}
sub usage
{
print "Usage:run genesis cases.\n";
print " genesistest.pl [-?|-h]\n";
print " genesistest.pl [-s] set up genesis in shell mode \n";
print " genesistest.pl [-i] runimg in genesis\n";
print "\n";
return;
}
sub runcmd
{
my ($cmd) = @_;
my $rc = 0;
$::RUNCMD_RC = 0;
my $outref = [];
@$outref = `$cmd 2>&1`;
if ($?)
{
$rc = $? ;
$rc = $rc >> 8;
$::RUNCMD_RC = $rc;
}
chomp(@$outref);
return @$outref;
}
sub rungenesiscmd
{
`echo "#!/bin/bash">>$cmdtest`;
`echo "#This is test for genesis scripts">>$cmdtest`;
`echo "echo \"test\" >> $cmdtest">>$cmdtest`;
`chmod 777 $cmdtest`;
if ($ARGV[0] =~ /ppc64/){
`cp -rf $cmdtest "$genesisdir""ppc64"/fs/bin`;
`mknb ppc64`;
print "mknb ppc64\n";
}else{
`cp -rf $cmdtest "$genesisdir""$ARGV[0]"/fs/bin`;
`mknb $ARGV[0]`;
print "mkmn $ARGV[0]\n";
}
}
sub rungenesisimg
{
my $rc=0;
runcmd("mkdir -p /install/my_image");
`echo "#!/bin/bash">>$runimgtest`;
`echo "#This is test for genesis scripts">>$runimgtest`;
`echo "echo "test" >> /tmp/cmdtest" >>$runimgtest`;
`chmod +x $runimgtest`;
`cp $runimgtest /install/my_image`;
`cd /install/my_image ;tar -zcvf my_image.tgz .`;
` nodeset $ARGV[0] "runimage=http://$ARGV[1]/install/my_image/my_image.tgz",shell`;
}
sub timesleep
{
my @output = runcmd("ping $ARGV[0] -c 10");
my $value = 0;
print "output is $value ,@output\n";
if ($::RUNCMD_RC){
foreach $value (1 .. 60) {
@output = runcmd("ping $ARGV[0] -c 10");
last if ($::RUNCMD_RC == 0);
}
}
my @output1 = runcmd("xdsh $ARGV[0] date");
if ($::RUNCMD_RC){
foreach $value (1 .. 60) {
@output1 = runcmd("xdsh $ARGV[0] date");
last if ($::RUNCMD_RC == 0);
}
}
if ($::RUNCMD_RC == 0){
print "test ok\n";
}
}
if ($rungenesiscmd)
{
&rungenesiscmd;
}
if ($timesleep)
{
&timesleep;
}
if($rungenesisimg)
{
&rungenesisimg;
}
if ($?)
{
return 0;
}