testcases/ballista/create.sh

   1 #!/usr/bin/perl -w
   2 # This scripts checks your system to ensure it has the correct rpm's installed
   3 # to run Ballista.
   4 # If the correct RPMs are installed ballista will be uncompressed and complied
   5
   6 if (system("rpm -h") == -1)
   7 {
   8         print("Your system lacks rpm, please double check ballista requirements\n");
   9         exit 0;
  10 }
  11
  12 @libs = ("'gcc version 3.3.3'","libg++-2.8.1-2","libg++-devel-2.8.1-2","libstdc++5-3.3.1-2mdk","libstdc++5-devel-3.3.1-2mdk","libstdc++5-static-devel-3.3.1-2mdk");
  13 my @notfound;
  14 system("touch temp_cmd_file.txt ");
  15 system("gcc -v 2> temp_cmd_file.txt ");
  16 system("rpm -qa | grep g++ >> temp_cmd_file.txt ");
  17 system("rpm -qa | grep libstdc >> temp_cmd_file.txt");
  18
  19 $missing=0;
  20 $num=0;
  21
  22       foreach(@libs)
  23       {
  24
  25           $grep="grep -q ";
  26           $grep.="$_ temp_cmd_file.txt";
  27
  28
  29           if ((system("$grep")/256) == 1)
  30           {
  31               $missing++;
  32               $nf{$_}=$num;
  33             #  push @notfound , $_;
  34           }
  35         $num++;
  36       }
  37
  38
  39        system("rm temp_cmd_file.txt");
  40
  41        if(-e "not_found.txt" )
  42        {
  43                system("rm not_found.txt");
  44        }
  45
  46         if($missing > 0)
  47         {
  48           $outfile="not_found.txt";
  49           open OUTFILE,">$outfile" or die "Cannot open $outfile for write :$!";
  50
  51            $n=0;
  52            print "\nThe following dependencie\(s\) are missing: \n\n";
  53            print OUTFILE "\nThe following dependencie\(s\) are missing: \n\n";
  54
  55             foreach(keys %nf)
  56             {
  57                 $name=$_;
  58
  59                 if($_ eq "'gcc version 3.3.3'")
  60                 {
  61                     $name="g++-3.3.3-59756cl.i386.rpm for gcc 3.3.3";
  62                 }
  63                 elsif($nf{$_} < 3 && $nf{$_} > 0)
  64                 {
  65                    $ext=".i386.rpm";
  66                    $name.=$ext;
  67                 }
  68                  elsif($nf{$_} > 2)
  69                 {
  70                    $ext=".i586.rpm";
  71                    $name.=$ext;
  72                 }
  73                 $n++;
  74
  75                 #$name.=$ext;
  76                 print "$name \n";
  77                 print OUTFILE "$name \n";
  78             }
  79
  80
  81            print "\nThe rpms can be downloaded at www.rpmfind.net\n";
  82            print "Install these rpms and re-run this script\n";
  83
  84            print OUTFILE "\nThe rpms can be downloaded at www.rpmfind.net\n";
  85            print OUTFILE "Install these rpms and re-run this script\n";
  86
  87            close OUTFILE;
  88
  89            exit 0;
  90        }
  91        else
  92        {
  93            if(chdir('ballista') == 1)
  94             {
  95
  96               if ((system("./configure")/256) == 0)
  97               {
  98                   print "configuration for Ballista done \n";
  99               }
 100               else
 101               {
 102                   exit 0;
 103               }
 104             }
 105        }