maca-fork-csspool 2.0.2

data/lib/csspool/terms/uri.rb

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

data/lib/csspool/visitable.rb

@@ -0,0 +1,30 @@
+module CSSPool
+  module Visitable
+    def accept target
+      target.accept self
+    end
+
+    def to_css
+      accept Visitors::ToCSS.new
+    end
+    alias :to_s :to_css
+
+    def == other
+      return false unless self.class == other.class
+      accept Visitors::Comparable.new(other)
+    end
+    alias :eql? :==
+
+    def each &block
+      accept Visitors::Iterator.new(block)
+    end
+
+    def children
+      accept Visitors::Children.new
+    end
+
+    def hash
+      @hash ||= children.map { |child| child.hash }.hash
+    end
+  end
+end

data/lib/csspool/visitors.rb

@@ -0,0 +1,5 @@
+require 'csspool/visitors/visitor'
+require 'csspool/visitors/to_css'
+require 'csspool/visitors/comparable'
+require 'csspool/visitors/iterator'
+require 'csspool/visitors/children'

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,85 @@
+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,
+          :percentage,
+          :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

data/lib/csspool/visitors/to_css.rb

@@ -0,0 +1,188 @@
+module CSSPool
+  module Visitors
+    class ToCSS < Visitor
+      def initialize
+        @indent_level = 0
+        @indent_space = ' '
+      end
+
+      visitor_for CSS::Document do |target|
+        media_hash = {}
+
+        # Default media list is []
+        current_media_type = []
+
+        tokens = []
+
+        target.charsets.each do |char_set|
+          tokens << char_set.accept(self)
+        end
+
+        target.import_rules.each do |ir|
+          tokens << ir.accept(self)
+        end
+
+        target.rule_sets.each { |rs|
+          if rs.media != current_media_type
+            tokens << "#{indent}@media #{rs.media.map { |x| x.name }.join(", ")} {"
+            @indent_level += 1
+          end
+
+          tokens << rs.accept(self)
+
+          if rs.media != current_media_type
+            current_media_type = rs.media
+            @indent_level -= 1
+            tokens << "#{indent}}"
+          end
+        }
+        tokens.join("\n")
+      end
+
+      visitor_for CSS::Charset do |target|
+        "@charset \"#{target.name}\";"
+      end
+
+      visitor_for CSS::ImportRule do |target|
+        media = ''
+        media = " " + target.media.map { |x|
+          x.name
+        }.join(', ') if target.media.length > 0
+
+        "#{indent}@import url(\"#{target.uri}\")#{media};"
+      end
+
+      visitor_for CSS::RuleSet do |target|
+        "#{indent}" +
+          target.selectors.map { |sel| sel.accept self }.join(", ") + " {\n" +
+          target.declarations.map { |decl| decl.accept self }.join("\n") +
+          "\n#{indent}}"
+      end
+
+      visitor_for CSS::Declaration do |target|
+        important = target.important? ? ' !important' : ''
+
+        indent {
+          "#{indent}#{target.property}: " + target.expressions.map { |exp|
+
+            op = '/' == exp.operator ? ' /' : exp.operator
+
+            [
+              op,
+              exp.accept(self),
+            ].join ' '
+          }.join.strip + "#{important};"
+        }
+      end
+
+      visitor_for Terms::Ident do |target|
+        target.value
+      end
+
+      visitor_for Terms::Hash do |target|
+        "##{target.value}"
+      end
+
+      visitor_for Selectors::Simple, Selectors::Universal, Selectors::Type do |target|
+        "#{ Selector::COMBINATORS[target.combinator] }#{ target.name }" +
+          target.additional_selectors.map{ |x| x.accept self }.join
+      end
+
+      visitor_for Terms::URI do |target|
+        "url(#{target.value})"
+      end
+
+      visitor_for Terms::Function do |target|
+        "#{target.name}(" +
+          target.params.map { |x|
+            [
+              x.operator,
+              x.accept(self)
+            ].compact.join(' ')
+          }.join + ')'
+      end
+
+      visitor_for Terms::Rgb do |target|
+        params = [
+          target.red,
+          target.green,
+          target.blue
+        ].map { |c| target.percentage? ? "#{c}%" : c }.join(',')
+
+        %{rgb(#{params})}
+      end
+
+      visitor_for Terms::String do |target|
+        "\"#{target.value}\""
+      end
+
+      visitor_for Selector do |target|
+        target.simple_selectors.map { |ss| ss.accept self }.join
+      end
+
+      visitor_for Terms::Number do |target|
+        units = {
+          2   => 'em',
+          3   => 'ex',
+          4   => 'px',
+          5   => 'in',
+          6   => 'cm',
+          7   => 'mm',
+          8   => 'pt',
+          9   => 'pc',
+          10  => 'deg',
+          11  => 'rad',
+          12  => 'grad',
+          13  => 'ms',
+          14  => 's',
+          15  => 'Hz',
+          16  => 'kHz',
+          17  => '%',
+        }[target.type]
+        [
+          target.unary_operator == :minus ? '-' : nil,
+          target.value,
+          units
+        ].compact.join
+      end
+
+      visitor_for Selectors::Id do |target|
+        "##{target.name}"
+      end
+
+      visitor_for Selectors::Class do |target|
+        ".#{target.name}"
+      end
+
+      visitor_for Selectors::PseudoClass do |target|
+        ":#{target.name}"
+      end
+
+      visitor_for Selectors::Attribute do |target|
+        case target.match_way
+        when Selectors::Attribute::SET
+          "[#{target.name}]"
+        when Selectors::Attribute::EQUALS
+          "[#{target.name}=\"#{target.value}\"]"
+        when Selectors::Attribute::INCLUDES
+          "[#{target.name} ~= \"#{target.value}\"]"
+        when Selectors::Attribute::DASHMATCH
+          "[#{target.name} |= \"#{target.value}\"]"
+        else
+          raise "no matching matchway"
+        end
+      end
+
+      private
+      def indent
+        if block_given?
+          @indent_level += 1
+          result = yield
+          @indent_level -= 1
+          return result
+        end
+        "#{@indent_space * @indent_level}"
+      end
+    end
+  end
+end