diff options
author | The Android Open Source Project <initial-contribution@android.com> | 2008-12-17 18:05:15 -0800 |
---|---|---|
committer | The Android Open Source Project <initial-contribution@android.com> | 2008-12-17 18:05:15 -0800 |
commit | 1cbdecfa9fc428ac2d8aca0fa91c9580b3d57353 (patch) | |
tree | 4457a7306ea5acb43fe05bfe0973b1f7faf97ba2 /WebCore/combine-javascript-resources | |
parent | 9364f22aed35e1a1e9d07c121510f80be3ab0502 (diff) | |
download | external_webkit-1cbdecfa9fc428ac2d8aca0fa91c9580b3d57353.zip external_webkit-1cbdecfa9fc428ac2d8aca0fa91c9580b3d57353.tar.gz external_webkit-1cbdecfa9fc428ac2d8aca0fa91c9580b3d57353.tar.bz2 |
Code drop from //branches/cupcake/...@124589
Diffstat (limited to 'WebCore/combine-javascript-resources')
-rwxr-xr-x | WebCore/combine-javascript-resources | 79 |
1 files changed, 79 insertions, 0 deletions
diff --git a/WebCore/combine-javascript-resources b/WebCore/combine-javascript-resources new file mode 100755 index 0000000..96dfc88 --- /dev/null +++ b/WebCore/combine-javascript-resources @@ -0,0 +1,79 @@ +#!/usr/bin/perl -w + +# Copyright (C) 2008 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. +# +# THIS SOFTWARE IS PROVIDED BY APPLE INC. ``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 INC. OR +# 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 combine multiple JavaScript files into one file, based on +# the script tags in the head of an input HTML file. + +use strict; +use Getopt::Long; +use File::Basename; +use File::Path; + +my $outputDirectory; +my $scriptName; +my $htmlFile; + +GetOptions('output-dir=s' => \$outputDirectory, + 'output-script-name=s' => \$scriptName, + 'input-html=s' => \$htmlFile); + +unless (defined $htmlFile and defined $scriptName and defined $outputDirectory) { + print "Usage: $0 --input-html <path> --output-dir path --output-script-name <name>\n"; + exit; +} + +my $htmlDirectory = dirname($htmlFile); +my $htmlContents; + +{ + local $/; + open HTML, $htmlFile or die; + $htmlContents = <HTML>; + close HTML; +} + +$htmlContents =~ m/<head>(.*)<\/head>/si; +my $headContents = $1; + +mkpath $outputDirectory; +open SCRIPT_OUT, ">", "$outputDirectory/$scriptName" or die "Can't open $outputDirectory/$scriptName: $!"; + +while ($headContents =~ m/<script.*src="([^"]*)"[^>]*>/gi) { + local $/; + open SCRIPT_IN, "$htmlDirectory/$1" or die "Can't open $htmlDirectory/$1: $!"; + print SCRIPT_OUT "/* $1 */\n\n"; + print SCRIPT_OUT <SCRIPT_IN>; + close SCRIPT_IN; +} + +close SCRIPT_OUT; + +$headContents =~ s/<script.*src="[^"]*"[^>]*><\/script>\s*//gi; +$headContents .= "<script type=\"text/javascript\" src=\"$scriptName\"></script>\n"; +$htmlContents =~ s/<head>.*<\/head>/<head>$headContents<\/head>/si; + +open HTML, ">", "$outputDirectory/" . basename($htmlFile) or die "Can't open $outputDirectory/" . basename($htmlFile) . ": $!"; +print HTML $htmlContents; +close HTML; |