2011-01-04 Jochen Eisinger <jochen@chromium.org>
authorjochen@chromium.org <jochen@chromium.org@268f45cc-cd09-0410-ab3c-d52691b4dbfc>
Fri, 14 Jan 2011 10:02:37 +0000 (10:02 +0000)
committerjochen@chromium.org <jochen@chromium.org@268f45cc-cd09-0410-ab3c-d52691b4dbfc>
Fri, 14 Jan 2011 10:02:37 +0000 (10:02 +0000)
        Reviewed by David Levin.

        Store the tempdir object in a variable so it doesn't get deleted too early.
        https://bugs.webkit.org/show_bug.cgi?id=51875

        * Scripts/update-webkit-auxiliary-libs:
        * Scripts/update-webkit-support-libs:

git-svn-id: https://svn.webkit.org/repository/webkit/trunk@75781 268f45cc-cd09-0410-ab3c-d52691b4dbfc

Tools/ChangeLog
Tools/Scripts/update-webkit-auxiliary-libs
Tools/Scripts/update-webkit-support-libs

index de06a42..36b9e09 100644 (file)
@@ -1,3 +1,13 @@
+2011-01-04  Jochen Eisinger  <jochen@chromium.org>
+
+        Reviewed by David Levin.
+
+        Store the tempdir object in a variable so it doesn't get deleted too early.
+        https://bugs.webkit.org/show_bug.cgi?id=51875
+
+        * Scripts/update-webkit-auxiliary-libs:
+        * Scripts/update-webkit-support-libs:
+
 2011-01-14  Eric Seidel  <eric@webkit.org>
 
         Unreviewed.  Make it work in python 2.5.
index 19e4ad3..9a6b20f 100755 (executable)
@@ -54,11 +54,12 @@ my $file = "WebKitAuxiliaryLibrary";
 my $zipFile = "$file.zip"; 
 my $auxiliaryLibsURL = "http://developer.apple.com/opensource/internet/$zipFile";
 my $webkitLibrariesDir = toUnixPath($ENV{'WEBKITLIBRARIESDIR'}) || "$sourceDir/WebKitLibraries/win";
-my $tmpDir = File::Spec->rel2abs(File::Temp::tempdir("webkitlibsXXXXXXX", TMPDIR => 1, CLEANUP => 1));
+my $tmpRelativeDir = File::Temp::tempdir("webkitlibsXXXXXXX", TMPDIR => 1, CLEANUP => 1);
+my $tmpAbsDir = File::Spec->rel2abs($tmpRelativeDir);
 
 print "Checking Last-Modified date of $zipFile...\n";
 
-my $result = system "curl -s -I $auxiliaryLibsURL | grep Last-Modified > \"$tmpDir/$file.headers\"";
+my $result = system "curl -s -I $auxiliaryLibsURL | grep Last-Modified > \"$tmpAbsDir/$file.headers\"";
 
 if (WEXITSTATUS($result)) {
     print STDERR "Couldn't check Last-Modified date of new $zipFile.\n";
@@ -73,7 +74,7 @@ if (WEXITSTATUS($result)) {
     exit 0;
 }
 
-if (open NEW, "$tmpDir/$file.headers") {
+if (open NEW, "$tmpAbsDir/$file.headers") {
     my $new = lastModifiedToUnixTime(<NEW>);
     close NEW;
 
@@ -88,17 +89,17 @@ if (open NEW, "$tmpDir/$file.headers") {
 }
 
 print "Downloading $zipFile...\n\n";
-$result = system "curl -o \"$tmpDir/$zipFile\" $auxiliaryLibsURL";
+$result = system "curl -o \"$tmpAbsDir/$zipFile\" $auxiliaryLibsURL";
 die "Couldn't download $zipFile!" if $result;
 
-$result = system "unzip", "-q", "-d", $tmpDir, "$tmpDir/$zipFile";
+$result = system "unzip", "-q", "-d", $tmpAbsDir, "$tmpAbsDir/$zipFile";
 die "Couldn't unzip $zipFile." if $result;
 
 print "\nInstalling $file...\n";
 
 sub wanted
 {
-    my $relativeName = File::Spec->abs2rel($File::Find::name, "$tmpDir/$file/win");
+    my $relativeName = File::Spec->abs2rel($File::Find::name, "$tmpAbsDir/$file/win");
     my $destination = "$webkitLibrariesDir/$relativeName";
 
     if (-d $_) {
@@ -109,9 +110,9 @@ sub wanted
     system "cp", $_, $destination;
 }
 
-File::Find::find(\&wanted, "$tmpDir/$file");
+File::Find::find(\&wanted, "$tmpAbsDir/$file");
 
-$result = system "mv", "$tmpDir/$file.headers", $webkitLibrariesDir;
+$result = system "mv", "$tmpAbsDir/$file.headers", $webkitLibrariesDir;
 print STDERR "Couldn't move $file.headers to $webkitLibrariesDir" . ".\n" if $result;
 
 print "The $file has been sucessfully installed in\n $webkitLibrariesDir\n";
index f0c897e..8484f84 100755 (executable)
@@ -49,7 +49,8 @@ my $pathToZip = File::Spec->catfile($zipDirectory, $zipFile);
 my $webkitLibrariesDir = toUnixPath($ENV{'WEBKITLIBRARIESDIR'}) || "$sourceDir/WebKitLibraries/win";
 my $versionFile = $file . "Version";
 my $pathToVersionFile = File::Spec->catfile($webkitLibrariesDir, $versionFile);
-my $tmpDir = File::Spec->rel2abs(File::Temp::tempdir("webkitlibsXXXXXXX", TMPDIR => 1, CLEANUP => 1));
+my $tmpRelativeDir = File::Temp::tempdir("webkitlibsXXXXXXX", TMPDIR => 1, CLEANUP => 1);
+my $tmpAbsDir = File::Spec->rel2abs($tmpRelativeDir);
 my $versionFileURL = "http://developer.apple.com/opensource/internet/$versionFile";
 
 my $extractedVersion = extractedVersion();
@@ -70,14 +71,14 @@ if ($zipFileVersion eq $extractedVersion) {
     exit;
 }
 
-my $result = system "unzip", "-q", "-d", $tmpDir, $pathToZip;
+my $result = system "unzip", "-q", "-d", $tmpAbsDir, $pathToZip;
 die "Couldn't unzip $zipFile." if $result;
 
 print "\nInstalling $file...\n";
 
 sub wanted
 {
-    my $relativeName = File::Spec->abs2rel($File::Find::name, "$tmpDir/$file/win");
+    my $relativeName = File::Spec->abs2rel($File::Find::name, "$tmpAbsDir/$file/win");
     my $destination = "$webkitLibrariesDir/$relativeName";
 
     if (-d $_) {
@@ -88,7 +89,7 @@ sub wanted
     system "cp", $_, $destination;
 }
 
-File::Find::find(\&wanted, "$tmpDir/$file");
+File::Find::find(\&wanted, "$tmpAbsDir/$file");
 
 print "The $file has been sucessfully installed in\n $webkitLibrariesDir\n";
 exit;