Automated import from //branches/master/...@141953,141953

1 files changed, 0 insertions, 114 deletions

diff --git a/WebKitTools/Scripts/sort-Xcode-project-file b/WebKitTools/Scripts/sort-Xcode-project-file
deleted file mode 100755
index a35fe73..0000000
--- a/WebKitTools/Scripts/sort-Xcode-project-file
+++ /dev/null
@@ -1,114 +0,0 @@
-#!/usr/bin/perl -w
-
-# Copyright (C) 2007 Apple Inc.  All rights reserved.
-#
-# Redistribution and use in source and binary forms, with or without
-# modification, are permitted provided that the following conditions
-# are met:
-#
-# 1.  Redistributions of source code must retain the above copyright
-#     notice, this list of conditions and the following disclaimer. 
-# 2.  Redistributions in binary form must reproduce the above copyright
-#     notice, this list of conditions and the following disclaimer in the
-#     documentation and/or other materials provided with the distribution. 
-# 3.  Neither the name of Apple Computer, Inc. ("Apple") nor the names of
-#     its contributors may be used to endorse or promote products derived
-#     from this software without specific prior written permission. 
-#
-# THIS SOFTWARE IS PROVIDED BY APPLE AND ITS CONTRIBUTORS "AS IS" AND ANY
-# EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
-# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
-# DISCLAIMED. IN NO EVENT SHALL APPLE OR ITS CONTRIBUTORS BE LIABLE FOR ANY
-# DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
-# (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
-# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
-# ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
-# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
-# THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-
-# Script to sort "files=(...);" sections in Xcode project.pbxproj files
-
-use strict;
-
-use File::Basename;
-use File::Temp qw(tempfile);
-use Getopt::Long;
-
-sub sortByFileName($$);
-
-my $printWarnings = 1;
-my $showHelp;
-
-my $getOptionsResult = GetOptions(
-    'h|help'         => \$showHelp,
-    'w|warnings!'    => \$printWarnings,
-);
-
-if (scalar(@ARGV) == 0) {
-    print STDERR "ERROR: No Xcode project files (project.pbxproj) listed on command-line.\n";
-    undef $getOptionsResult;
-}
-
-if (!$getOptionsResult || $showHelp) {
-    print STDERR <<__END__;
-Usage: @{[ basename($0) ]} [options] path/to/project.pbxproj [path/to/project.pbxproj ...]
-  -h|--help           show this help message
-  -w|--[no-]warnings  show or suppress warnings (default: show warnings)
-__END__
-    exit 1;
-}
-
-for my $projectFile (@ARGV) {
-    if (basename($projectFile) ne "project.pbxproj") {
-        print STDERR "WARNING: Not an Xcode project file: $projectFile\n" if $printWarnings;
-        next;
-    }
-
-    my ($OUT, $tempFileName) = tempfile(
-        basename($projectFile) . "-XXXXXXXX",
-        DIR => dirname($projectFile),
-        UNLINK => 0,
-    );
-
-    # Clean up temp file in case of die()
-    $SIG{__DIE__} = sub {
-        close(IN);
-        close($OUT);
-        unlink($tempFileName);
-    };
-
-    open(IN, "< $projectFile") || die "Could not open $projectFile: $!";
-    while (my $line = <IN>) {
-        if ($line =~ /^(\s*)files = \(\s*$/) {
-            print $OUT $line;
-            my $endMarker = $1 . ");";
-            my @files;
-            while (my $fileLine = <IN>) {
-                if ($fileLine =~ /^\Q$endMarker\E\s*$/) {
-                    $endMarker = $fileLine;
-                    last;
-                }
-                push @files, $fileLine;
-            }
-            print $OUT sort sortByFileName @files;
-            print $OUT $endMarker;
-        } else {
-            print $OUT $line;
-        }
-    }
-    close(IN);
-    close($OUT);
-
-    unlink($projectFile) || die "Could not delete $projectFile: $!";
-    rename($tempFileName, $projectFile) || die "Could not rename $tempFileName to $projectFile: $!";
-}
-
-exit 0;
-
-sub sortByFileName($$)
-{
-    my ($a, $b) = @_;
-    my $aFileName = $1 if $a =~ /^\s*[A-Z0-9]{24} \/\* (.+) in /;
-    my $bFileName = $1 if $b =~ /^\s*[A-Z0-9]{24} \/\* (.+) in /;
-    return $aFileName cmp $bFileName;
-}