summaryrefslogtreecommitdiffstats
path: root/WebCore/css/make-css-file-arrays.pl
diff options
context:
space:
mode:
authorSteve Block <steveblock@google.com>2011-05-06 11:45:16 +0100
committerSteve Block <steveblock@google.com>2011-05-12 13:44:10 +0100
commitcad810f21b803229eb11403f9209855525a25d57 (patch)
tree29a6fd0279be608e0fe9ffe9841f722f0f4e4269 /WebCore/css/make-css-file-arrays.pl
parent121b0cf4517156d0ac5111caf9830c51b69bae8f (diff)
downloadexternal_webkit-cad810f21b803229eb11403f9209855525a25d57.zip
external_webkit-cad810f21b803229eb11403f9209855525a25d57.tar.gz
external_webkit-cad810f21b803229eb11403f9209855525a25d57.tar.bz2
Merge WebKit at r75315: Initial merge by git.
Change-Id: I570314b346ce101c935ed22a626b48c2af266b84
Diffstat (limited to 'WebCore/css/make-css-file-arrays.pl')
-rwxr-xr-xWebCore/css/make-css-file-arrays.pl80
1 files changed, 0 insertions, 80 deletions
diff --git a/WebCore/css/make-css-file-arrays.pl b/WebCore/css/make-css-file-arrays.pl
deleted file mode 100755
index dad530c..0000000
--- a/WebCore/css/make-css-file-arrays.pl
+++ /dev/null
@@ -1,80 +0,0 @@
-#!/usr/bin/perl -w
-#
-# Copyright (C) 2006 Apple Computer, Inc.
-#
-# This library is free software; you can redistribute it and/or
-# modify it under the terms of the GNU Library General Public
-# License as published by the Free Software Foundation; either
-# version 2 of the License, or (at your option) any later version.
-#
-# This library is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
-# Library General Public License for more details.
-#
-# You should have received a copy of the GNU Library General Public License
-# along with this library; see the file COPYING.LIB. If not, write to
-# the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
-# Boston, MA 02110-1301, USA.
-#
-
-# Usage: make-css-file-arrays.pl <header> <output> <input> ...
-
-use strict;
-use Getopt::Long;
-
-my $header = $ARGV[0];
-shift;
-
-my $out = $ARGV[0];
-shift;
-
-open HEADER, ">", $header or die;
-open OUT, ">", $out or die;
-
-print HEADER "namespace WebCore {\n";
-print OUT "namespace WebCore {\n";
-
-for my $in (@ARGV) {
- $in =~ /(\w+)\.css$/ or die;
- my $name = $1;
-
- # Slurp in the CSS file.
- open IN, "<", $in or die;
- my $text; { local $/; $text = <IN>; }
- close IN;
-
- # Remove comments in a simple-minded way that will work fine for our files.
- # Could do this a fancier way if we were worried about arbitrary CSS source.
- $text =~ s|/\*.*?\*/||gs;
-
- # Crunch whitespace just to make it a little smaller.
- # Could do work to avoid doing this inside quote marks but our files don't have runs of spaces in quotes.
- # Could crunch further based on places where whitespace is optional.
- $text =~ s|\s+| |gs;
- $text =~ s|^ ||;
- $text =~ s| $||;
-
- # Write out a C array of the characters.
- my $length = length $text;
- print HEADER "extern const char ${name}UserAgentStyleSheet[${length}];\n";
- print OUT "extern const char ${name}UserAgentStyleSheet[${length}] = {\n";
- my $i = 0;
- while ($i < $length) {
- print OUT " ";
- my $j = 0;
- while ($j < 16 && $i < $length) {
- print OUT ", " unless $j == 0;
- print OUT ord substr $text, $i, 1;
- ++$i;
- ++$j;
- }
- print OUT "," unless $i == $length;
- print OUT "\n";
- }
- print OUT "};\n";
-
-}
-
-print HEADER "}\n";
-print OUT "}\n";