Tools/Scripts/build-jsc

   1 #!/usr/bin/perl -w
   2
   3 # Copyright (C) 2005 Apple Computer, Inc.  All rights reserved.
   4 # Copyright (C) 2007 Eric Seidel <eric@webkit.org>
   5 #
   6 # Redistribution and use in source and binary forms, with or without
   7 # modification, are permitted provided that the following conditions
   8 # are met:
   9 #
  10 # 1.  Redistributions of source code must retain the above copyright
  11 #     notice, this list of conditions and the following disclaimer.
  12 # 2.  Redistributions in binary form must reproduce the above copyright
  13 #     notice, this list of conditions and the following disclaimer in the
  14 #     documentation and/or other materials provided with the distribution.
  15 # 3.  Neither the name of Apple Computer, Inc. ("Apple") nor the names of
  16 #     its contributors may be used to endorse or promote products derived
  17 #     from this software without specific prior written permission.
  18 #
  19 # THIS SOFTWARE IS PROVIDED BY APPLE AND ITS CONTRIBUTORS "AS IS" AND ANY
  20 # EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  21 # WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  22 # DISCLAIMED. IN NO EVENT SHALL APPLE OR ITS CONTRIBUTORS BE LIABLE FOR ANY
  23 # DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
  24 # (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  25 # LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
  26 # ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  27 # (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  28 # THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  29
  30
  31 use strict;
  32 use FindBin;
  33 use Getopt::Long qw(:config pass_through);
  34 use lib $FindBin::Bin;
  35 use webkitdirs;
  36 use POSIX;
  37
  38 my $coverageSupport = 0;
  39 my $showHelp = 0;
  40
  41 my $programName = basename($0);
  42 my $usage = <<EOF;
  43 Usage: $programName [options] [options to pass to build system]
  44   --help                        Show this help message
  45   --[no-]coverage               Toggle code coverage support (default: $coverageSupport)
  46 EOF
  47
  48 GetOptions(
  49     'coverage!' => \$coverageSupport,
  50     'help' => \$showHelp
  51 );
  52
  53 if ($showHelp) {
  54    print STDERR $usage;
  55    exit 1;
  56 }
  57
  58 checkRequiredSystemConfig();
  59 setConfiguration();
  60 chdirWebKit();
  61 my @options = XcodeOptions();
  62 my @coverageSupportOptions = ($coverageSupport) ? XcodeCoverageSupportOptions() : ();
  63
  64 if (isQt()) {
  65     checkForArgumentAndRemoveFromARGV("--qt");
  66     my @projects = ("WTF", "JavaScriptCore");
  67     # Pick up the --no-webkit2 option from BUILD_WEBKIT_ARGS if it is needed
  68     push @ARGV, split(/ /, $ENV{'BUILD_WEBKIT_ARGS'}) if ($ENV{'BUILD_WEBKIT_ARGS'});
  69     push @ARGV, "WEBKIT_CONFIG-=build_webkit2" if checkForArgumentAndRemoveFromARGV("--no-webkit2");
  70     my $result = buildQMakeProjects(\@projects, 0, @ARGV);
  71     exit exitStatus($result);
  72 } elsif (cmakeBasedPortName()) {
  73     buildCMakeProjectOrExit(0, cmakeBasedPortName(), undef, "jsc", cmakeBasedPortArguments()); # This call only returns if nothing wrong happened
  74     exit exitStatus(0);
  75 }
  76
  77 sub buildMyProject
  78 {
  79     my ($projectDirectory, $projectName) = @_;
  80     my $result;
  81     chdir $projectDirectory or die "Can't find $projectName directory to build from";
  82     if (isAppleMacWebKit()) {
  83         $result = system "sh", "-c", ('xcodebuild -project ' . $projectName . '.xcodeproj "$@" | grep -v setenv && exit ${PIPESTATUS[0]}'), "xcodebuild",  @options, @ARGV, @coverageSupportOptions;
  84     } elsif (isAppleWinWebKit()) {
  85         $result = buildVisualStudioProject("$projectName.vcxproj/$projectName.submit.sln");
  86     } elsif (isGtk()) {
  87         checkForArgumentAndRemoveFromARGV("--gtk");
  88         $result = buildGtkProject($projectName, 0);
  89     } else {
  90         die "Building not defined for this platform!\n";
  91     }
  92     exit exitStatus($result) if exitStatus($result);
  93     chdirWebKit();
  94 }
  95
  96 buildMyProject("Source/WTF", "WTF");
  97 buildMyProject("Source/JavaScriptCore", "JavaScriptCore");