Adding upstream version 1.2.2.upstream/1.2.2upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 405 insertions, 0 deletions

diff --git a/share/attributes/genMapDataCSS.pl b/share/attributes/genMapDataCSS.pl
new file mode 100755
index 0000000..6e95b1e
--- /dev/null
+++ b/share/attributes/genMapDataCSS.pl
@@ -0,0 +1,405 @@
+#!/usr/bin/env perl
+
+# Purpose: To extract the css_defaults and cssprops data from the
+# SVG 1.1 2nd Ed specification file propidx.html. The file can be found at:
+#
+#   http://www.w3.org/TR/SVG/propidx.html
+#
+# A number of adjustments must be made after parsing the HTML file.
+
+# Author: Tavmjong Bah
+# Rewrite of script by Abhishek
+
+use strict;
+use warnings;
+use HTML::TokeParser;
+
+# Groups of elements defined in spec.
+# Note "use" is not a container element but it acts like one!
+# Note "flowRoot, flowPara, flowSpan, flowRegion, and flowRect are Inkscape
+#   specific (failed SVG1.2 items)
+my @container_elements = ("a", "defs", "glyph", "g", "marker", "mask", "missing-glyph", "pattern", "svg", "switch", "symbol", "use");
+my @graphics_elements = ("circle", "ellipse", "image", "line", "path", "polygon", "polyline", "rect", "text", "flowRoot", "use");
+my @filter_primitives = ("feBlend", "feColorMatrix", "feComponentTransfer", "feComposite", "feConvolveMatrix",
+			 "feDiffuseLighting", "feDisplacementMap", "feFlood", "feGaussianBlur", "feImage",
+			 "feMerge", "feMorphology", "feOffset", "feSpecularLighting", "feTile", "feTurbulence" );
+my @text_content_elements = ("altGlyph", "textPath", "text", "tref", "tspan", "flowRoot", "flowPara", "flowSpan");
+my @shapes = ("path", "rect", "circle", "ellipse", "line", "polyline", "polygon");
+my @viewport = ("svg", "symbol", "foreignObject" );
+
+my $p= HTML::TokeParser->new('propidx.html') or die "Can't open file: $!";
+
+my %properties;
+my $property;
+
+# Loop over tokens
+while( my $t = $p->get_token ) {
+
+    # Look for <tr> (start token with value 'tr').
+    if( $t->[0] eq 'S' and lc $t->[1] eq 'tr') {
+
+	print "---------\n";
+
+	my $column = 0;
+	while( $t = $p->get_token ) {
+
+	    # Keep track of column
+	    if( $t->[0] eq 'S' and lc $t->[1] eq 'td') {
+		$column++;
+		$t = $p->get_token; # Skip to next token
+	    }
+
+	    if( $column == 1 and $t->[0] eq 'S' and lc $t->[1] =~ 'span') {
+		# First column is always property name, defined inside <span>.
+		# print "      span ${$t->[2]}{'class'}\n";
+		# if( ${$t->[2]}{'class'} =~ 'prop-name' ) {
+		#     print "        $t->[4]\n";
+		# }		$property =~ s/\‘//;
+
+		$t = $p->get_token;
+		$property = $t->[1];
+		$property =~ s/‘//; # Opening single quote
+		$property =~ s/’//; # Closing single quote
+		print "Property: $property\n";
+	    }
+
+	    if( $column == 3 and $t->[0] eq 'T') {
+		# Third column is default value (simple text).
+		my $default = $t->[1];
+		$properties{ $property }->{default} = $default;
+		print "  Default: $default\n";
+	    }
+
+	    if( $column == 4 and $t->[0] eq 'S' ) {
+		# Fourth column is "Applies to"
+		if( lc $t->[1] eq 'span' && ${$t->[2]}{'class'} =~ 'element-name' ) {
+		    $t = $p->get_token;
+		    my $element = $t->[1];
+		    $element =~ s/‘//; # Opening single quote
+		    $element =~ s/’//; # Closing single quote
+		    print "  Elements: $element\n";
+		    push @{$properties{ $property }->{elements}}, $element;
+		} elsif ( lc $t->[1] eq 'a' ) {
+		    my $text = $p->get_trimmed_text;
+		    if( $text ne "" ) {
+			print "  Text ->$text<-\n";
+			if( $text =~ "container" ) {
+			    print "   Adding container elements\n";
+			    push @{$properties{ $property }->{elements}}, @container_elements;
+			    $properties{ $property }->{addedContainers} = 1;
+			}
+			if( $text =~ "text" ) {
+			    print "   Adding text content elements\n";
+			    push @{$properties{ $property }->{elements}}, @text_content_elements;
+			}
+			if( $text =~ "graphics" ) {
+			    print "   Adding graphics elements\n";
+			    push @{$properties{ $property }->{elements}}, @graphics_elements;
+			}
+			if( $text =~ "primitives" ) {
+			    print "   Adding filter primitive elements\n";
+			    push @{$properties{ $property }->{elements}}, @filter_primitives;
+			}
+			if( $text =~ "shape" ) {
+			    print "   Adding shape elements\n";
+			    push @{$properties{ $property }->{elements}}, @shapes;
+			}
+			if( $text =~ "viewport" ) {
+			    print "   Adding viewport elements\n";
+			    push @{$properties{ $property }->{elements}}, @viewport;
+			}
+		    }
+		} else {
+		    print "  Not Elements: $t->[1]\n";
+		}
+	    }
+
+	    if( $column == 5 and $t->[0] eq 'T') {
+		# Fifth column is inherit value (simple text).
+		my $inherit = $t->[1];
+		$properties{ $property }->{inherit} = $inherit;
+		print "  Inherit: $inherit\n";
+	    }
+
+	    if( $t->[0] eq 'E' and lc $t->[1] eq 'tr') {
+		last;
+	    }
+
+	}
+    }
+
+}
+
+# Adjustments
+$properties{ "alignment-baseline" }->{default} = "auto";
+$properties{ "color" }->{default} = "NO_DEFAULT";  # Depends on user agent.
+$properties{ "font" }->{default} = "NO_DEFAULT";  # See individual font properties.
+$properties{ "font-family" }->{default} = "NO_DEFAULT";
+$properties{ "marker" }->{default} = "none"; # Same as marker-start, etc.
+$properties{ "overflow" }->{default} = "hidden";  # On all but outermost <svg>, user agent style sheet sets this to hidden.
+
+# This is the safest thing to do.... 
+$properties{ "text-decoration" }->{default} = "NO_DEFAULT"; 
+$properties{ "text-decoration" }->{inherit} = "no"; 
+
+#
+push @{$properties{ "color" }->{elements}}, @text_content_elements;
+push @{$properties{ "color" }->{elements}}, @shapes;
+push @{$properties{ "color" }->{elements}}, "stop", "feFlood", "feDiffuseLighting", "feSpecularLighting";
+
+push @{$properties{ "color-interpolation-filters" }->{elements}}, "filter";
+
+@{$properties{ "clip-rule" }->{elements}} = @graphics_elements;
+push @{$properties{ "clip-rule" }->{elements}}, "clip-path";  # Can inherit
+
+push @{$properties{ "display" }->{elements}}, @graphics_elements;
+
+push @{$properties{ "image-rendering" }->{elements}}, "pattern", "image", "feImage";
+
+# "title" isn't in the SVG spec (except for style sheets) but it is commonly supported by browsers
+push @{$properties{ "title" }->{elements}}, @graphics_elements, "g";
+$properties{ "title" }->{default} = "NO DEFAULT";
+$properties{ "title" }->{inherit} = "no";
+
+push @{$properties{ "visibility" }->{elements}}, @graphics_elements;
+
+
+$properties{ "marker-end" }->{default} = $properties{ "marker-start" }->{default};
+$properties{ "marker-mid" }->{default} = $properties{ "marker-start" }->{default};
+$properties{ "marker-end" }->{inherit} = $properties{ "marker-start" }->{inherit};
+$properties{ "marker-mid" }->{inherit} = $properties{ "marker-start" }->{inherit};
+@{$properties{ "marker-end" }->{elements}} = @{$properties{ "marker-start" }->{elements}};
+@{$properties{ "marker-mid" }->{elements}} = @{$properties{ "marker-start" }->{elements}};
+
+
+# Inkscape uses CSS property 'line-height' even though this is not part of SVG spec.
+push @{$properties{ "line-height" }->{elements}}, "text", "tspan", "flowRoot", "flowPara";
+$properties{ "line-height" }->{default} = "NO DEFAULT";
+$properties{ "line-height" }->{inherit} = "no";
+
+# Inkscape uses CSS property 'text-align' for flowed text. It is not an SVG 1.1 property
+# but is found in SVG 1.2 Tiny.
+push @{$properties{ "text-align" }->{elements}}, "flowRoot", "flowPara", "flowSpan";
+$properties{ "text-align" }->{default} = "start";
+$properties{ "text-align" }->{inherit} = "yes";
+
+# Compositing and Blending Level 1
+push @{$properties{ "mix-blend-mode" }->{elements}}, @container_elements;
+push @{$properties{ "mix-blend-mode" }->{elements}}, @graphics_elements;
+$properties{ "mix-blend-mode" }->{default} = "normal";
+$properties{ "mix-blend-mode" }->{inherit} = "no";
+
+push @{$properties{ "isolation" }->{elements}}, @container_elements;
+push @{$properties{ "isolation" }->{elements}}, @graphics_elements;
+$properties{ "isolation" }->{default} = "auto";
+$properties{ "isolation" }->{inherit} = "no";
+
+# SVG2
+push @{$properties{ "paint-order" }->{elements}}, @container_elements;
+push @{$properties{ "paint-order" }->{elements}}, @graphics_elements;
+$properties{ "paint-order" }->{default} = "normal";
+$properties{ "paint-order" }->{inherit} = "yes";
+
+push @{$properties{ "solid-color" }->{elements}}, @container_elements;
+push @{$properties{ "solid-color" }->{elements}}, @graphics_elements;
+$properties{ "solid-color" }->{default} = "#000000";
+$properties{ "solid-color" }->{inherit} = "no";
+
+push @{$properties{ "solid-opacity" }->{elements}}, @container_elements;
+push @{$properties{ "solid-opacity" }->{elements}}, @graphics_elements;
+$properties{ "solid-opacity" }->{default} = "1";
+$properties{ "solid-opacity" }->{inherit} = "no";
+
+push @{$properties{ "vector-effect" }->{elements}}, @container_elements;
+push @{$properties{ "vector-effect" }->{elements}}, @graphics_elements;
+$properties{ "vector-effect" }->{default} = "none";
+$properties{ "vector-effect" }->{inherit} = "no";
+
+
+# SVG2 Text
+push @{$properties{ "white-space" }->{elements}}, @container_elements;
+push @{$properties{ "white-space" }->{elements}}, @text_content_elements;
+$properties{ "white-space" }->{default} = "normal";
+$properties{ "white-space" }->{inherit} = "yes";
+
+push @{$properties{ "shape-inside" }->{elements}}, "text";
+$properties{ "shape-inside" }->{default} = "auto";
+$properties{ "shape-inside" }->{inherit} = "no";
+
+push @{$properties{ "shape-subtract" }->{elements}}, "text";
+$properties{ "shape-subtract" }->{default} = "auto";
+$properties{ "shape-subtract" }->{inherit} = "no";
+
+push @{$properties{ "shape-padding" }->{elements}}, "text";
+$properties{ "shape-padding" }->{default} = "0";
+$properties{ "shape-padding" }->{inherit} = "no";
+
+push @{$properties{ "shape-margin" }->{elements}}, "text";
+$properties{ "shape-margin" }->{default} = "0";
+$properties{ "shape-margin" }->{inherit} = "no";
+
+push @{$properties{ "inline-size" }->{elements}}, "text";
+$properties{ "inline-size" }->{default} = "0";
+$properties{ "inline-size" }->{inherit} = "no";
+
+
+#CSS Text Level 3
+push @{$properties{ "text-indent" }->{elements}}, @container_elements;
+push @{$properties{ "text-indent" }->{elements}}, @text_content_elements;
+$properties{ "text-indent" }->{default} = "0";
+$properties{ "text-indent" }->{inherit} = "yes";
+
+push @{$properties{ "text-transform" }->{elements}}, @container_elements;
+push @{$properties{ "text-transform" }->{elements}}, @text_content_elements;
+$properties{ "text-transform" }->{default} = "none";
+$properties{ "text-transform" }->{inherit} = "yes";
+
+
+# CSS Text Decoration
+push @{$properties{ "text-decoration-line" }->{elements}}, @container_elements;
+push @{$properties{ "text-decoration-line" }->{elements}}, @text_content_elements;
+$properties{ "text-decoration-line" }->{default} = "none";
+$properties{ "text-decoration-line" }->{inherit} = "no";
+
+push @{$properties{ "text-decoration-color" }->{elements}}, @container_elements;
+push @{$properties{ "text-decoration-color" }->{elements}}, @text_content_elements;
+$properties{ "text-decoration-color" }->{default} = "NO_DEFAULT";
+$properties{ "text-decoration-color" }->{inherit} = "no";
+
+push @{$properties{ "text-decoration-style" }->{elements}}, @container_elements;
+push @{$properties{ "text-decoration-style" }->{elements}}, @text_content_elements;
+$properties{ "text-decoration-style" }->{default} = "solid";
+$properties{ "text-decoration-style" }->{inherit} = "no";
+
+push @{$properties{ "text-decoration-fill" }->{elements}}, @container_elements;
+push @{$properties{ "text-decoration-fill" }->{elements}}, @text_content_elements;
+$properties{ "text-decoration-fill" }->{default} = "NO_DEFAULT";
+$properties{ "text-decoration-fill" }->{inherit} = "no";
+
+push @{$properties{ "text-decoration-stroke" }->{elements}}, @container_elements;
+push @{$properties{ "text-decoration-stroke" }->{elements}}, @text_content_elements;
+$properties{ "text-decoration-stroke" }->{default} = "NO_DEFAULT";
+$properties{ "text-decoration-stroke" }->{inherit} = "no";
+
+
+
+# CSS Fonts Level 3
+push @{$properties{ "font-variant-ligatures" }->{elements}}, @container_elements;
+push @{$properties{ "font-variant-ligatures" }->{elements}}, @text_content_elements;
+$properties{ "font-variant-ligatures" }->{default} = "normal";
+$properties{ "font-variant-ligatures" }->{inherit} = "yes";
+
+push @{$properties{ "font-variant-position" }->{elements}}, @container_elements;
+push @{$properties{ "font-variant-position" }->{elements}}, @text_content_elements;
+$properties{ "font-variant-position" }->{default} = "normal";
+$properties{ "font-variant-position" }->{inherit} = "yes";
+
+push @{$properties{ "font-variant-caps" }->{elements}}, @container_elements;
+push @{$properties{ "font-variant-caps" }->{elements}}, @text_content_elements;
+$properties{ "font-variant-caps" }->{default} = "normal";
+$properties{ "font-variant-caps" }->{inherit} = "yes";
+
+push @{$properties{ "font-variant-numeric" }->{elements}}, @container_elements;
+push @{$properties{ "font-variant-numeric" }->{elements}}, @text_content_elements;
+$properties{ "font-variant-numeric" }->{default} = "normal";
+$properties{ "font-variant-numeric" }->{inherit} = "yes";
+
+push @{$properties{ "font-variant-alternates" }->{elements}}, @container_elements;
+push @{$properties{ "font-variant-alternates" }->{elements}}, @text_content_elements;
+$properties{ "font-variant-alternates" }->{default} = "normal";
+$properties{ "font-variant-alternates" }->{inherit} = "yes";
+
+push @{$properties{ "font-variant-east-asian" }->{elements}}, @container_elements;
+push @{$properties{ "font-variant-east-asian" }->{elements}}, @text_content_elements;
+$properties{ "font-variant-east-asian" }->{default} = "normal";
+$properties{ "font-variant-east-asian" }->{inherit} = "yes";
+
+push @{$properties{ "font-variant" }->{elements}}, @container_elements;
+push @{$properties{ "font-variant" }->{elements}}, @text_content_elements;
+$properties{ "font-variant" }->{default} = "normal";
+$properties{ "font-variant" }->{inherit} = "yes";
+
+push @{$properties{ "font-feature-settings" }->{elements}}, @container_elements;
+push @{$properties{ "font-feature-settings" }->{elements}}, @text_content_elements;
+$properties{ "font-feature-settings" }->{default} = "normal";
+$properties{ "font-feature-settings" }->{inherit} = "yes";
+
+
+# CSS Fonts Level 4
+push @{$properties{ "font-variation-settings" }->{elements}}, @container_elements;
+push @{$properties{ "font-variation-settings" }->{elements}}, @text_content_elements;
+$properties{ "font-variation-settings" }->{default} = "normal";
+$properties{ "font-variation-settings" }->{inherit} = "yes";
+
+
+# CSS Writing Modes
+push @{$properties{ "text-orientation" }->{elements}}, @container_elements;
+push @{$properties{ "text-orientation" }->{elements}}, @text_content_elements;
+$properties{ "text-orientation" }->{default} = "mixed";
+$properties{ "text-orientation" }->{inherit} = "yes";
+
+# CSS Transformations
+push @{$properties{ "transform" }->{elements}}, @container_elements;
+push @{$properties{ "transform" }->{elements}}, @graphics_elements;
+$properties{ "transform" }->{default} = "none";
+$properties{ "transform" }->{inherit} = "no";
+
+push @{$properties{ "transform-box" }->{elements}}, @container_elements;
+push @{$properties{ "transform-box" }->{elements}}, @graphics_elements;
+$properties{ "transform-box" }->{default} = "NO_DEFAULT";  # Default no 100% fixed.
+$properties{ "transform-box" }->{inherit} = "no";
+
+push @{$properties{ "transform-origin" }->{elements}}, @container_elements;
+push @{$properties{ "transform-origin" }->{elements}}, @graphics_elements;
+$properties{ "transform-origin" }->{default} = "NO_DEFAULT";  # Default is complicated
+$properties{ "transform-origin" }->{inherit} = "no";
+
+push @{$properties{ "transform-style" }->{elements}}, @container_elements;
+push @{$properties{ "transform-style" }->{elements}}, @graphics_elements;
+$properties{ "transform-style" }->{default} = "flat";
+$properties{ "transform-style" }->{inherit} = "no";
+
+push @{$properties{ "perspective" }->{elements}}, @container_elements;
+push @{$properties{ "perspective" }->{elements}}, @graphics_elements;
+$properties{ "perspective" }->{default} = "none";
+$properties{ "perspective" }->{inherit} = "no";
+
+push @{$properties{ "perspective-origin" }->{elements}}, @container_elements;
+push @{$properties{ "perspective-origin" }->{elements}}, @graphics_elements;
+$properties{ "perspective-origin" }->{default} = "NO_DEFAULT"; # Default is complicated
+$properties{ "perspective-origin" }->{inherit} = "no";
+
+push @{$properties{ "backface-visibility" }->{elements}}, @container_elements;
+push @{$properties{ "backface-visibility" }->{elements}}, @graphics_elements;
+$properties{ "backface-visibility" }->{default} = "visible";
+$properties{ "backface-visibility" }->{inherit} = "no";
+
+# Output
+
+open( DEFAULTS, ">css_defaults_new" ) or die "Couldn't open output";
+open( ELEMENTS, ">cssprops_new" ) or die "Couldn't open output";
+
+for $property ( sort keys %properties ) {
+    print "$property:\t$properties{ $property }->{default}\t$properties{ $property }->{inherit}\n";
+    # Must add container elements to all properties that are inherited.
+    if( $properties{ $property }->{inherit} =~ "yes" ) {
+	# But not if they have already been added
+	if( !defined $properties{ $property }->{addedContainers} ) {
+	    push @{$properties{ $property }->{elements}}, @container_elements;
+	}
+    }
+    print "   @{ $properties{ $property }->{elements}}\n";
+
+    print DEFAULTS "\"$property\" - \"$properties{ $property }->{default}\" - \"$properties{ $property }->{inherit}\"\n\n";
+    print ELEMENTS "\"$property\" - ";
+    my $first = 0;
+    foreach (@{$properties{ $property }->{elements}}) {
+	if( $first != 0 ) {
+	    print ELEMENTS ",";
+	}
+	$first = 1;
+	print ELEMENTS "\"$_\"";
+    }
+    print ELEMENTS "\n\n";
+}
+