csspool-st 3.1.0

data/lib/csspool/css/tokenizer.rex

@@ -0,0 +1,97 @@
+module CSSPool
+module CSS
+class Tokenizer < Parser
+
+macro
+  nl        \n|\r\n|\r|\f
+  w         [\s]*
+  nonascii  [^\0-\177]
+  num       ([0-9]*\.[0-9]+|[0-9]+)
+  unicode   \\[0-9A-Fa-f]{1,6}(\r\n|[\s])?
+
+  escape    {unicode}|\\[^\n\r\f0-9A-Fa-f]
+  nmchar    [_A-Za-z0-9-]|{nonascii}|{escape}
+  nmstart   [_A-Za-z]|{nonascii}|{escape}
+  ident     [-@]?({nmstart})({nmchar})*
+  func      [-@]?({nmstart})({nmchar}|[.])*
+  name      ({nmchar})+
+  string1   "([^\n\r\f\\"]|\\{nl}|{nonascii}|{escape})*"
+  string2   '([^\n\r\f\\']|\\{nl}|{nonascii}|{escape})*'
+  string    ({string1}|{string2})
+  invalid1  "([^\n\r\f\\"]|\\{nl}|{nonascii}|{escape})*
+  invalid2  '([^\n\r\f\\']|\\{nl}|{nonascii}|{escape})*
+  invalid   ({invalid1}|{invalid2})
+  comment   \/\*(.|{w})*?\*\/
+
+rule
+
+# [:state]  pattern  [actions]
+
+            url\({w}{string}{w}\) { [:URI, st(text)] }
+            url\({w}([!#\$%&*-~]|{nonascii}|{escape})*{w}\) { [:URI, st(text)] }
+            U\+[0-9a-fA-F?]{1,6}(-[0-9a-fA-F]{1,6})?  {[:UNICODE_RANGE, st(text)] }
+            {w}{comment}{w}  { next_token }
+
+            {func}\(\s*      { [:FUNCTION, st(text)] }
+            {w}@import{w}    { [:IMPORT_SYM, st(text)] }
+            {w}@page{w}      { [:PAGE_SYM, st(text)] }
+            {w}@charset{w}   { [:CHARSET_SYM, st(text)] }
+            {w}@media{w}     { [:MEDIA_SYM, st(text)] }
+            {w}!({w}|{w}{comment}{w})important{w}  { [:IMPORTANT_SYM, st(text)] }
+            {ident}          { [:IDENT, st(text)] }
+            \#{name}         { [:HASH, st(text)] }
+            {w}~={w}         { [:INCLUDES, st(text)] }
+            {w}\|={w}        { [:DASHMATCH, st(text)] }
+            {w}\^={w}        { [:PREFIXMATCH, st(text)] }
+            {w}\$={w}        { [:SUFFIXMATCH, st(text)] }
+            {w}\*={w}        { [:SUBSTRINGMATCH, st(text)] }
+            {w}!={w}         { [:NOT_EQUAL, st(text)] }
+            {w}={w}          { [:EQUAL, st(text)] }
+            {w}\)            { [:RPAREN, st(text)] }
+            {w}\({w}         { [:LPAREN, st(text)] }
+            \[{w}            { [:LSQUARE, st(text)] }
+            {w}\]            { [:RSQUARE, st(text)] }
+            {w}\+{w}         { [:PLUS, st(text)] }
+            {w}\{{w}         { [:LBRACE, st(text)] }
+            {w}\}{w}         { [:RBRACE, st(text)] }
+            {w}>{w}          { [:GREATER, st(text)] }
+            {w},{w}          { [:COMMA, st(',')] }
+            {w};{w}          { [:SEMI, st(';')] }
+            \*               { [:STAR, st(text)] }
+            {w}~{w}          { [:TILDE, st(text)] }
+            \:not\({w}       { [:NOT, st(text)]  }
+            {w}{num}em{w}    { [:EMS, st(text)] }
+            {w}{num}ex{w}    { [:EXS, st(text)] }
+
+            {w}{num}(px|cm|mm|in|pt|pc){w}    { [:LENGTH, st(text)] }
+            {w}{num}(deg|rad|grad){w} { [:ANGLE, st(text)] }
+            {w}{num}(ms|s){w} { [:TIME, st(text)] }
+            {w}{num}[k]?hz{w} { [:FREQ, st(text)] }
+
+            {w}{num}%{w}     { [:PERCENTAGE, st(text)] }
+            {w}{num}{w}      { [:NUMBER, st(text)] }
+            {w}\/\/{w}       { [:DOUBLESLASH, st(text)] }
+            {w}\/{w}         { [:SLASH, st('/')] }
+            <!--             { [:CDO, st(text)] }
+            -->              { [:CDC, st(text)] }
+            {w}\-(?!{ident}){w}   { [:MINUS, st(text)] }
+            {w}\+{w}         { [:PLUS, st(text)] }
+            
+            
+            [\s]+            { [:S, st(text)] }
+            {string}         { [:STRING, st(text)] }
+            {invalid}        { [:INVALID, st(text)] }
+            .                { [st(text), st(text)] }
+
+inner
+
+def st o
+  @st ||= Hash.new { |h,k| h[k] = k }
+  @st[o]
+end
+
+end
+end
+end
+
+# vim: syntax=lex

data/lib/csspool/css.rb

@@ -0,0 +1,8 @@
+require 'csspool/css/tokenizer'
+require 'csspool/css/charset'
+require 'csspool/css/import_rule'
+require 'csspool/css/media'
+require 'csspool/css/rule_set'
+require 'csspool/css/declaration'
+require 'csspool/css/document'
+require 'csspool/css/document_handler'

data/lib/csspool/node.rb

@@ -0,0 +1,41 @@
+module CSSPool
+  class Node
+    include Enumerable
+
+    def accept target
+      target.accept self
+    end
+
+    def to_css options={}
+      if options[:minify]
+        to_minified_css
+      else
+        accept Visitors::ToCSS.new
+      end
+    end
+    alias :to_s :to_css
+
+    def to_minified_css
+      accept Visitors::ToMinifiedCSS.new
+    end
+
+    def == other
+      return false unless self.class == other.class
+
+      accept Visitors::Comparable.new other
+    end
+    alias :eql? :==
+
+    def each &block
+      Visitors::Iterator.new(block).accept self
+    end
+
+    def children
+      accept Visitors::Children.new
+    end
+
+    def hash
+      @hash ||= children.map { |child| child.hash }.hash
+    end
+  end
+end

data/lib/csspool/sac/document.rb

@@ -0,0 +1,35 @@
+module CSSPool
+  module SAC
+    class Document
+      def start_document
+      end
+
+      def end_document
+      end
+
+      def charset name, location
+      end
+
+      def import_style media_list, uri, default_ns = nil, location = {}
+      end
+
+      def start_selector selector_list
+      end
+
+      def end_selector selector_list
+      end
+
+      def property name, expression, important
+      end
+
+      def comment comment
+      end
+
+      def start_media media_list, parse_location = {}
+      end
+
+      def end_media media_list, parse_location = {}
+      end
+    end
+  end
+end

data/lib/csspool/sac/parser.rb

@@ -0,0 +1,16 @@
+module CSSPool
+  module SAC
+    class Parser < CSSPool::CSS::Tokenizer
+      attr_accessor :handler
+
+      def initialize handler = CSSPool::CSS::DocumentHandler.new
+        @handler = handler
+      end
+
+      def parse string
+        scan_str string
+        @handler.document
+      end
+    end
+  end
+end

data/lib/csspool/sac.rb

@@ -0,0 +1,2 @@
+require 'csspool/sac/document'
+require 'csspool/sac/parser'

data/lib/csspool/selector.rb

@@ -0,0 +1,36 @@
+module CSSPool
+  class Selector < CSSPool::Node
+    attr_accessor :simple_selectors
+    attr_accessor :parse_location
+    attr_accessor :rule_set
+
+    def initialize simple_selectors = [], parse_location = {}
+      @simple_selectors = simple_selectors
+      @parse_location   = parse_location
+      @rule_set         = nil
+    end
+
+    def declarations
+      @rule_set.declarations
+    end
+
+    def specificity
+      a = b = c = 0
+      simple_selectors.each do |s|
+        if !s.name.nil?
+          c += 1
+        end
+        s.additional_selectors.each do |additional_selector|
+          if Selectors::Id === additional_selector
+            a += 1
+          elsif Selectors::PseudoElement === additional_selector
+            c += 1
+          else
+            b += 1
+          end
+        end
+      end
+      [a, b, c]
+    end
+  end
+end

data/lib/csspool/selectors/additional.rb

@@ -0,0 +1,6 @@
+module CSSPool
+  module Selectors
+    class Additional < CSSPool::Node
+    end
+  end
+end

data/lib/csspool/selectors/attribute.rb

@@ -0,0 +1,21 @@
+module CSSPool
+  module Selectors
+    class Attribute < CSSPool::Selectors::Additional
+      attr_accessor :name
+      attr_accessor :value
+      attr_accessor :match_way
+
+      NO_MATCH  = 0
+      SET       = 1
+      EQUALS    = 2
+      INCLUDES  = 3
+      DASHMATCH = 4
+
+      def initialize name, value, match_way
+        @name = name
+        @value = value
+        @match_way = match_way
+      end
+    end
+  end
+end

data/lib/csspool/selectors/class.rb

@@ -0,0 +1,11 @@
+module CSSPool
+  module Selectors
+    class Class < CSSPool::Selectors::Additional
+      attr_accessor :name
+
+      def initialize name
+        @name = name
+      end
+    end
+  end
+end

data/lib/csspool/selectors/id.rb

@@ -0,0 +1,11 @@
+module CSSPool
+  module Selectors
+    class Id < CSSPool::Selectors::Additional
+      attr_accessor :name
+
+      def initialize name
+        @name = name
+      end
+    end
+  end
+end

data/lib/csspool/selectors/pseudo_class.rb

@@ -0,0 +1,13 @@
+module CSSPool
+  module Selectors
+    class PseudoClass < CSSPool::Selectors::Additional
+      attr_accessor :name
+      attr_accessor :extra
+
+      def initialize name, extra = nil
+        @name = name
+        @extra = extra
+      end
+    end
+  end
+end

data/lib/csspool/selectors/simple.rb

@@ -0,0 +1,22 @@
+module CSSPool
+  module Selectors
+    class Simple < CSSPool::Node
+      NO_COMBINATOR       = 0
+      DESCENDENT          = 1
+      PRECEDED_BY         = 2
+      CHILD               = 3
+
+      attr_accessor :name
+      attr_accessor :parse_location
+      attr_accessor :additional_selectors
+      attr_accessor :combinator
+
+      def initialize name, combinator = nil
+        @name                 = name
+        @combinator           = combinator
+        @parse_location       = nil
+        @additional_selectors = []
+      end
+    end
+  end
+end

data/lib/csspool/selectors/type.rb

@@ -0,0 +1,6 @@
+module CSSPool
+  module Selectors
+    class Type < CSSPool::Selectors::Simple
+    end
+  end
+end

data/lib/csspool/selectors/universal.rb

@@ -0,0 +1,6 @@
+module CSSPool
+  module Selectors
+    class Universal < CSSPool::Selectors::Simple
+    end
+  end
+end

data/lib/csspool/selectors.rb

@@ -0,0 +1,9 @@
+require 'csspool/selectors/simple'
+require 'csspool/selectors/universal'
+require 'csspool/selectors/type'
+require 'csspool/selectors/additional'
+require 'csspool/selectors/id'
+require 'csspool/selectors/class'
+require 'csspool/selectors/pseudo'
+require 'csspool/selectors/attribute'
+require 'csspool/selectors/media_expression'

data/lib/csspool/terms/function.rb

@@ -0,0 +1,17 @@
+module CSSPool
+  module Terms
+    class Function < CSSPool::Node
+      attr_accessor :name
+      attr_accessor :params
+      attr_accessor :parse_location
+      attr_accessor :operator
+
+      def initialize name, params, operator = nil, parse_location = nil
+        @name   = name
+        @params = params
+        @operator = operator
+        @parse_location = parse_location
+      end
+    end
+  end
+end

data/lib/csspool/terms/hash.rb

@@ -0,0 +1,6 @@
+module CSSPool
+  module Terms
+    class Hash < Ident
+    end
+  end
+end

data/lib/csspool/terms/ident.rb

@@ -0,0 +1,15 @@
+module CSSPool
+  module Terms
+    class Ident < CSSPool::Node
+      attr_accessor :value
+      attr_accessor :operator
+      attr_accessor :parse_location
+
+      def initialize value, operator = nil, parse_location = {}
+        @value = value
+        @operator = operator
+        @parse_location = parse_location
+      end
+    end
+  end
+end

data/lib/csspool/terms/number.rb

@@ -0,0 +1,14 @@
+module CSSPool
+  module Terms
+    class Number < Ident
+      attr_accessor :type
+      attr_accessor :unary_operator
+
+      def initialize value, unary_operator = nil, type = nil, operator = nil, parse_location = {}
+        @type     = type
+        @unary_operator = unary_operator
+        super(value, operator, parse_location)
+      end
+    end
+  end
+end

data/lib/csspool/terms/rgb.rb

@@ -0,0 +1,20 @@
+module CSSPool
+  module Terms
+    class Rgb < CSSPool::Node
+      attr_accessor :red
+      attr_accessor :green
+      attr_accessor :blue
+      attr_accessor :parse_location
+      attr_accessor :operator
+
+      def initialize red, green, blue, operator = nil, parse_location = {}
+        super()
+        @red    = red
+        @green  = green
+        @blue   = blue
+        @operator = operator
+        @parse_location = parse_location
+      end
+    end
+  end
+end

data/lib/csspool/terms/string.rb

@@ -0,0 +1,6 @@
+module CSSPool
+  module Terms
+    class String < CSSPool::Terms::Ident
+    end
+  end
+end

data/lib/csspool/terms/uri.rb

@@ -0,0 +1,6 @@
+module CSSPool
+  module Terms
+    class URI < Ident
+    end
+  end
+end

data/lib/csspool/terms.rb

@@ -0,0 +1,7 @@
+require 'csspool/terms/ident'
+require 'csspool/terms/string'
+require 'csspool/terms/number'
+require 'csspool/terms/function'
+require 'csspool/terms/uri'
+require 'csspool/terms/rgb'
+require 'csspool/terms/hash'

data/lib/csspool/visitors/children.rb

@@ -0,0 +1,50 @@
+module CSSPool
+  module Visitors
+    class Children < Visitor
+      visitor_for CSS::Document do |target|
+        children = []
+        [:charsets, :import_rules, :rule_sets].each do |member|
+          children += target.send(member)
+        end
+        children
+      end
+
+      visitor_for CSS::ImportRule do |target|
+        target.media
+      end
+
+      visitor_for CSS::Media,
+        CSS::Charset,
+        Selectors::Id,
+        Selectors::Class,
+        Selectors::PseudoClass,
+        Selectors::Attribute,
+        Terms::Ident,
+        Terms::String,
+        Terms::URI,
+        Terms::Number,
+        Terms::Hash,
+        Terms::Function,
+        Terms::Rgb do |target|
+        []
+      end
+
+      visitor_for CSS::Declaration do |target|
+        target.expressions
+      end
+
+      visitor_for CSS::RuleSet do |target|
+        target.selectors + target.declarations
+      end
+
+      visitor_for Selector do |target|
+        target.simple_selectors
+      end
+
+      visitor_for Selectors::Type, Selectors::Universal, Selectors::Simple do |target|
+        target.additional_selectors
+      end
+    end
+  end
+end
+

data/lib/csspool/visitors/comparable.rb

@@ -0,0 +1,84 @@
+module CSSPool
+  module Visitors
+    class Comparable < Visitor
+      def initialize other
+        super()
+        @other = other
+      end
+
+      visitor_for CSS::Document do |target|
+        [
+          :parent,
+          :charsets,
+          :parent_import_rule,
+          :import_rules,
+          :rule_sets,
+        ].all? { |m| target.send(m) == @other.send(m) }
+      end
+
+      visitor_for CSS::RuleSet do |target|
+        [:selectors, :declarations, :media].all? { |m|
+          target.send(m) == @other.send(m)
+        }
+      end
+
+      visitor_for Selector do |target|
+        target.simple_selectors == @other.simple_selectors
+      end
+
+      visitor_for CSS::ImportRule do |target|
+        [:uri, :namespace, :media].all? { |m|
+          target.send(m) == @other.send(m)
+        }
+      end
+
+      visitor_for Selectors::PseudoClass do |target|
+        [:name, :extra].all? { |m|
+          target.send(m) == @other.send(m)
+        }
+      end
+
+      visitor_for CSS::Media, Selectors::Id, Selectors::Class do |target|
+        target.name == @other.name
+      end
+
+      visitor_for Selectors::Type, Selectors::Universal,
+        Selectors::Simple do |target|
+        [:name, :combinator, :additional_selectors].all? { |m|
+          target.send(m) == @other.send(m)
+        }
+      end
+
+      visitor_for CSS::Declaration do |target|
+        [:property, :expressions, :important].all? { |m|
+          target.send(m) == @other.send(m)
+        }
+      end
+
+      visitor_for Terms::Function do |target|
+        [:name, :params, :operator].all? { |m|
+          target.send(m) == @other.send(m)
+        }
+      end
+
+      visitor_for Terms::Number do |target|
+        [:type, :unary_operator, :value, :operator].all? { |m|
+          target.send(m) == @other.send(m)
+        }
+      end
+
+      visitor_for Terms::URI,Terms::String,Terms::Ident,Terms::Hash do |target|
+        [:value, :operator].all? { |m| target.send(m) == @other.send(m) }
+      end
+
+      visitor_for Terms::Rgb do |target|
+        [
+          :red,
+          :green,
+          :blue,
+          :operator
+        ].all? { |m| target.send(m) == @other.send(m) }
+      end
+    end
+  end
+end

data/lib/csspool/visitors/iterator.rb

@@ -0,0 +1,80 @@
+module CSSPool
+  module Visitors
+    class Iterator < Visitor
+      def initialize block
+        @block = block
+      end
+
+      visitor_for CSS::Document do |target|
+        [:charsets, :import_rules, :rule_sets].each do |member|
+          target.send(member).each do |node|
+            node.accept self
+          end
+        end
+        @block.call target
+      end
+
+      visitor_for Selectors::Universal, Selectors::Simple do |target|
+        target.children.each do |node|
+          node.accept self
+        end
+        @block.call target
+      end
+
+      visitor_for CSS::Charset do |target|
+        @block.call target
+      end
+
+      visitor_for CSS::ImportRule do |target|
+        target.media.each do |node|
+          node.accept self
+        end
+        @block.call target
+      end
+
+      visitor_for CSS::Media,
+        Selectors::Id,
+        Selectors::Class,
+        Selectors::PseudoClass,
+        Selectors::Attribute,
+        Terms::Ident,
+        Terms::String,
+        Terms::URI,
+        Terms::Number,
+        Terms::Hash,
+        Terms::Function,
+        Terms::Rgb do |target|
+        @block.call target
+      end
+
+      visitor_for CSS::Declaration do |target|
+        target.expressions.each do |node|
+          node.accept self
+        end
+        @block.call target
+      end
+
+      visitor_for CSS::RuleSet do |target|
+        target.selectors.each do |node|
+          node.accept self
+        end
+        target.declarations.each do |node|
+          node.accept self
+        end
+        @block.call target
+      end
+
+      visitor_for Selector do |target|
+        target.simple_selectors.each { |ss| ss.accept self }
+        @block.call target
+      end
+
+      visitor_for Selectors::Type do |target|
+        target.additional_selectors.each do |node|
+          node.accept self
+        end
+        @block.call target
+      end
+    end
+  end
+end