diff options
Diffstat (limited to 'share/attributes/genMapDataCSS.pl')
| -rwxr-xr-x | share/attributes/genMapDataCSS.pl | 405 |
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"; +} + |