No more check for drive space if given --hudson as this makes the builds fail most of the time unnecessarily
authorDario Sestito <darios@symbian.org>
Tue, 09 Mar 2010 13:05:26 +0000
changeset 72 50ab3bef1c6a
parent 71 f7ba24a607f8
child 73 457adde87bbd
No more check for drive space if given --hudson as this makes the builds fail most of the time unnecessarily
build_package.pl
--- a/build_package.pl	Tue Mar 09 12:57:02 2010 +0000
+++ b/build_package.pl	Tue Mar 09 13:05:26 2010 +0000
@@ -77,7 +77,7 @@
 	print "\t--configdir=DIR Use DIR location for the config (exclusive with --configrepo).\n";
 	print "\t--number=N Force build number to N\n";
 	print "\t--tag=TAG Apply Diamonds tag TAG to this build\n";
-	print "\t--hudson Checks that there is at least NUMBER_OF_PROCESSORS X 10 GB available on the working drive\n";
+	print "\t--hudson Clean up all job dirs after the build)\n";
 	print "\t--nopublish Use \\numbers_test.txt for numbers and disable publishing\n";
 	print "\t--define ATTRIBUTE=VALUE Pass -D statements to the Helium Framework\n";
 	print "\t--disableav Disable Anti-Virus for the duration of the build (also sync with other concurrent package builds)\n";
@@ -107,21 +107,6 @@
 	close FILE;
 }
 
-if ($bHudson)
-{
-	my $nProcessors = $ENV{'NUMBER_OF_PROCESSORS'};
-	my $diroutput = `dir /-C $sWORKING_DRIVE`;
-	my $nBytesFree = 0;
-	$nBytesFree = $1 if ($diroutput =~ /(\d+) bytes free/);
-	my $nNeededSpace = 10*$nProcessors*1073741824;
-	#print "Needed space is $nNeededSpace\n";
-	if ($nBytesFree < $nNeededSpace)
-	{
-		print "ERROR: Available disk space on working drive ($nBytesFree bytes) is not enough to run a package build with Hudson.\n";
-		exit(1);
-	}
-}
-
 my $sFbfProjectRev = '';
 if ($sFbfProjectRepo =~ m,(.*)#(.*),)
 {