Commit 4acc0869 authored by unknown's avatar unknown
Browse files

Merge bk-internal.mysql.com:/home/bk/mysql-4.0

into here.mwagner.org:/Volumes/BK/mysql-4.0

parents 85c57e70 9c7e5edd
Loading
Loading
Loading
Loading
+18 −1
Original line number Diff line number Diff line
@@ -202,6 +202,17 @@ if ($opt_stage == 0)
safe_cd($host);
if ($opt_stage == 0 && ! $opt_use_old_distribution)
{
  $md5_result= safe_system("my_md5sum -c ${opt_distribution}.md5");

  if ($md5_result != 0)
  {
	abort("MD5 failed for $opt_distribution!");
  }
  else
  {
	info("SUCCESS: MD5 checks for $opt_distribution");
  }

  safe_system("gunzip < $opt_distribution | $tar xf -");

  # Fix file times; This is needed because the time for files may be
@@ -320,6 +331,9 @@ if ($opt_stage <= 3)
$tar_file=<$pwd/$host/mysql*.t*gz>;
abort ("Could not find tarball!") unless ($tar_file);

# Generate the MD5 for the binary distribution
safe_system("my_md5sum $tar_file > ${tar_file}.md5}");

#
# Unpack the binary distribution
#
@@ -633,7 +647,10 @@ sub safe_system
  my($com,$res)=@_;
  print LOG "$com\n";
  print "$host: $com\n" if ($opt_debug);
  system("$com >> $log 2>&1") && abort("error: Couldn't execute command, error: " . ($? / 256));
  my $result= system("$com >> $log 2>&1");
  abort("error: Couldn't execute command, error: " . ($? / 256)) unless $result == 0;

  return $result;
}

sub check_system