kdelibs/khtml/css/makevalues

#!/bin/bash
#
#   This file is part of the KDE libraries
#
#   Copyright (C) 1999 Waldo Bastian (bastian@kde.org)
#             (c) 2006 Nikolas Zimmermann <zimmermann@kde.org>
#
#   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.
#
#----------------------------------------------------------------------------
#
#  KDE HTML Widget -- Script to generate cssvalues.c and cssvalues.h
#
num=1
NS=""

if [ -n "$1" ] # Eventually specified namespace prefix (ie. SVG)
then
	num=10001 # Bigger than all values from HTML CSS
	NS=$1
fi

prefix=`echo $NS | awk '{ do { print tolower($0) } while (getline) }'`

grep "^[^\#]" "$prefix"cssvalues.in > "$prefix"cssvalues.strip

echo -e '%{\n/* This file is automatically generated from '$prefix'cssvalues.in by makevalues, do not edit */\n/* Copyright 1999 W. Bastian */\n#include "'$prefix'cssvalues.h"\n%}\nstruct css_value'$prefix' {\n    const char *name;\n    int id;\n};\n\nstatic const css_value'$prefix' * findValue'$NS' (register const char *str, register unsigned int len);\n\n%%' > "$prefix"cssvalues.gperf
cat "$prefix"cssvalues.strip | awk '{ do { prop = $0; gsub("-", "_"); print prop ", '$NS'CSS_VAL_" toupper($0) } while (getline) }' >> "$prefix"cssvalues.gperf
echo '%%' >> "$prefix"cssvalues.gperf
echo -e '/* This file is automatically generated from '$prefix'cssvalues.in by makevalues, do not edit */\n/* Copyright 1998 W. Bastian */\n\n#ifndef '$NS'CSSVALUES_H\n#define '$NS'CSSVALUES_H\n\nDOM::DOMString get'$NS'ValueName(unsigned short id) KDE_NO_EXPORT;\n' > "$prefix"cssvalues.h
cat "$prefix"cssvalues.strip | awk '{ \
i='$num'; \
print "#define '$NS'CSS_VAL_INVALID 0"; \
print "#define '$NS'CSS_VAL_MIN '$num'"; \
do { gsub("-", "_"); print "#define '$NS'CSS_VAL_" toupper($0) " " i; i = i + 1 } while (getline); \
print ""; \
print "#define '$NS'CSS_VAL_TOTAL " (i + 1 - '$num') \
}' >> "$prefix"cssvalues.h
gperf -L 'ANSI-C' -E -c -C -n -o -t -k '*' -NfindValue"$NS" -Hhash_val"$prefix" -Wwordlist_value"$prefix" -D "$prefix"cssvalues.gperf > "$prefix"cssvalues.c || exit 1
echo -e '#endif\n' >> "$prefix"cssvalues.h
cat "$prefix"cssvalues.strip | awk '{ \
i=1; \
print "static const char * const valueList'$NS'[] = {"; \
print "\"\","; \
do { print "\"" $0 "\", "; i = i + 1 } while (getline); \
print "    0"; \
print "};"; \
print "DOMString get'$NS'ValueName(unsigned short id)"; \
print "{"; \
print "    if(id >= '$NS'CSS_VAL_TOTAL || id == 0)"; \
print "      return DOMString();";\
print "    else";\
print "      return DOMString(valueList'$NS'[id - "('$num' - 1)"]);"; \
print "}"; \
print ""; \
}' >> "$prefix"cssvalues.c

perl -pi -e "s/id\ -\ 0/id/" "$prefix"cssvalues.c
perl -pi -e "s/TOTAL_KEYWORDS/${NS}TOTAL_KEYWORDS/g" "$prefix"cssvalues.c
perl -pi -e "s/MIN_WORD_LENGTH/${NS}MIN_WORD_LENGTH/g" "$prefix"cssvalues.c
perl -pi -e "s/MAX_WORD_LENGTH/${NS}MAX_WORD_LENGTH/g" "$prefix"cssvalues.c
perl -pi -e "s/MIN_HASH_VALUE/${NS}MIN_HASH_VALUE/g" "$prefix"cssvalues.c
perl -pi -e "s/MAX_HASH_VALUE/${NS}MAX_HASH_VALUE/g" "$prefix"cssvalues.c