diff options
Diffstat (limited to 'WebCore/css/makeprop.pl')
-rw-r--r-- | WebCore/css/makeprop.pl | 119 |
1 files changed, 119 insertions, 0 deletions
diff --git a/WebCore/css/makeprop.pl b/WebCore/css/makeprop.pl new file mode 100644 index 0000000..bc979f9 --- /dev/null +++ b/WebCore/css/makeprop.pl @@ -0,0 +1,119 @@ +#! /usr/bin/perl +# +# This file is part of the WebKit project +# +# Copyright (C) 1999 Waldo Bastian (bastian@kde.org) +# Copyright (C) 2007, 2008 Apple Inc. All rights reserved. +# Copyright (C) 2008 Nokia Corporation and/or its subsidiary(-ies) +# +# 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. +use strict; +use warnings; + +open NAMES, "<CSSPropertyNames.in" || die "Could not find CSSPropertyNames.in"; +my @names = (); +while (<NAMES>) { + next if (m/#/); + chomp $_; + next if ($_ eq ""); + push @names, $_; +} +close(NAMES); + +open GPERF, ">CSSPropertyNames.gperf" || die "Could not open CSSPropertyNames.gperf for writing"; +print GPERF << "EOF"; +%{ +/* This file is automatically generated from CSSPropertyNames.in by makeprop, do not edit */ +#include \"CSSPropertyNames.h\" +%} +struct props { + const char* name; + int id; +}; +%% +EOF + +foreach my $name (@names) { + my $id = $name; + $id =~ s/(^[^-])|-(.)/uc($1||$2)/ge; + print GPERF $name . ", CSSProperty" . $id . "\n"; +} +print GPERF "%%\n"; +close GPERF; + +open HEADER, ">CSSPropertyNames.h" || die "Could not open CSSPropertyNames.h for writing"; +print HEADER << "EOF"; +/* This file is automatically generated from CSSPropertyNames.in by makeprop, do not edit */ + +#ifndef CSSPropertyNames_h +#define CSSPropertyNames_h + +enum CSSPropertyID { + CSSPropertyInvalid = 0, +EOF + +my $first = 1001; +my $i = 1001; +my $maxLen = 0; +foreach my $name (@names) { + my $id = $name; + $id =~ s/(^[^-])|-(.)/uc($1||$2)/ge; + print HEADER " CSSProperty" . $id . " = " . $i . ",\n"; + $i = $i + 1; + if (length($name) > $maxLen) { + $maxLen = length($name); + } +} +my $num = $i - $first; + +print HEADER "};\n\n"; +print HEADER "const int firstCSSProperty = $first;\n"; +print HEADER "const int numCSSProperties = $num;\n"; +print HEADER "const size_t maxCSSPropertyNameLength = $maxLen;\n"; + +print HEADER << "EOF"; + +const char* getPropertyName(CSSPropertyID); + +#endif +EOF + +close HEADER; + +system("gperf -a -L ANSI-C -E -C -c -o -t --key-positions=\"*\" -NfindProp -Hhash_prop -Wwordlist_prop -D -s 2 CSSPropertyNames.gperf > CSSPropertyNames.cpp") == 0 || die "calling gperf failed: $?"; + +open C, ">>CSSPropertyNames.cpp" || die "Could not open CSSPropertyNames.cpp for writing"; +print C "static const char * const propertyNameStrings[$num] = {\n"; + +foreach my $name (@names) { + print C "\"$name\",\n"; +} + +print C << "EOF"; +}; +const char* getPropertyName(CSSPropertyID id) +{ + if (id < firstCSSProperty) + return 0; + int index = id - firstCSSProperty; + if (index >= numCSSProperties) + return 0; + return propertyNameStrings[index]; +} +EOF + +close C; + |