Changeset 695 for trunk/technical/common/build/buildall.pl

Timestamp:

Nov 21, 2004, 11:01:59 PM (19 years ago)

Author:

joergs

Message:

optimized: skip building rpms that do already exist in the current version

File:

• trunk/technical/common/build/buildall.pl (modified) (4 diffs)

trunk/technical/common/build/buildall.pl

@@ -40 +40 @@
 getopts('xb:d:');
 
-
+my $skipped_last = 0;
 
 if (!$opt_b && !$opt_d)  {
@@ -105 +105 @@
   $mypath = $src_root.$ArrayofBuilds[$i][0];
 
-  if ($ArrayofBuilds[$i][2])
+  if( $ArrayofBuilds[$i][2] && !$skipped_last )
     {
       $ENV{'BUILD_MODE'}=$ArrayofBuilds[$i][2];
@@ -111 +111 @@
   else 
     {
-      $ENV{'BUILD_MODE'}="--clean";
+      $ENV{'BUILD_MODE'}="--verify";
     }
   $ENV{'BUILD_DIST'}=$ArrayofBuilds[$i][1];
@@ -160 +160 @@
         print LOG_FD if $do_log;
   }
-  close PIPE; my $retval=$?;
+  close PIPE; my $retval=$?>>8;
   close LOG_FD if $do_log;
   
-  if ( $retval == 0 )
-   {
+  if ( $retval == 0 ) {
      $ArrayofBuilds[$i][3] = "OK";
      print"******                                                      ******\n";
      print"******   building of $ArrayofBuilds[$i][0]: OK                    \n" ;
      print"******                                                      ******\n";
-   }
-  else
-   {
+  } elsif ( $retval == 1 ) {
+        $ArrayofBuilds[$i][3] = "skipped";
+        $skipped_last = 1;
+  } else {
      $ArrayofBuilds[$i][3] = "*FAILED*";
      print"******                                                      ******\n";