csspool 0.2.6 → 2.0.0

data/lib/csspool/terms/rgb.rb

@@ -0,0 +1,23 @@
+module CSSPool
+  module Terms
+    class Rgb < CSSPool::Node
+      attr_accessor :red
+      attr_accessor :green
+      attr_accessor :blue
+      attr_accessor :percentage
+      attr_accessor :parse_location
+      attr_accessor :operator
+      alias :percentage? :percentage
+
+      def initialize red, green, blue, percentage, operator, parse_location
+        super()
+        @red    = red
+        @green  = green
+        @blue   = blue
+        @percentage = percentage
+        @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 < 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/visitable.rb

@@ -0,0 +1,18 @@
+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
+  end
+end

data/lib/csspool/visitors/comparable.rb

@@ -0,0 +1,78 @@
+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 CSS::Media do |target|
+        target.name == @other.name
+      end
+
+      visitor_for Selectors::Type 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/to_css.rb

@@ -0,0 +1,201 @@
+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 do |target|
+        ([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 Selectors::Type do |target|
+        combo = {
+          0 => nil,
+          1 => ' ',
+          2 => ' + ',
+          3 => ' > '
+        }[target.combinator]
+
+        [combo, target.name].compact.join +
+          target.additional_selectors.map { |as| as.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

data/lib/csspool/visitors/visitor.rb

@@ -0,0 +1,17 @@
+module CSSPool
+  module Visitors
+    class Visitor
+      def self.visitor_for *klasses, &block
+        klasses.each do |klass|
+          method_name = klass.name.split('::').join('_')
+          define_method(:"visit_#{method_name}", block)
+        end
+      end
+
+      def accept target
+        method_name = target.class.name.split('::').join('_')
+        send(:"visit_#{method_name}", target)
+      end
+    end
+  end
+end

data/lib/csspool/visitors.rb

@@ -0,0 +1,3 @@
+require 'csspool/visitors/visitor'
+require 'csspool/visitors/to_css'
+require 'csspool/visitors/comparable'

data/lib/csspool.rb

@@ -1 +1,18 @@
-require 'css/sac'
+require 'csspool/visitable'
+require 'csspool/node'
+require 'csspool/selectors'
+require 'csspool/terms'
+require 'csspool/selector'
+require 'csspool/sac'
+require 'csspool/lib_croco'
+require 'csspool/css'
+require 'csspool/visitors'
+require 'csspool/collection'
+
+module CSSPool
+  VERSION = "2.0.0"
+
+  def self.CSS doc
+    CSSPool::CSS::Document.parse doc
+  end
+end

data/test/css/test_document.rb

@@ -0,0 +1,13 @@
+require 'helper'
+
+module CSSPool
+  module CSS
+    class TestDocument < CSSPool::TestCase
+      def test_search
+        doc = CSSPool.CSS('div > p { background: red; }')
+        assert_equal 1, doc['div > p'].length
+        assert_equal 1, doc['div > p'].first.declarations.length
+      end
+    end
+  end
+end

data/test/css/test_import_rule.rb

@@ -0,0 +1,42 @@
+require 'helper'
+
+module CSSPool
+  module CSS
+    class TestImportRule < CSSPool::TestCase
+      def test_import
+        doc = CSSPool.CSS <<-eocss
+          @import "foo.css";
+        eocss
+
+        assert_equal 1, doc.import_rules.length
+
+        doc.import_rules.each do |ir|
+          new_doc = ir.load do |url|
+            assert_equal "foo.css", url
+            "div { background: red; }"
+          end
+          assert new_doc
+          assert_equal 1, new_doc.rule_sets.length
+          assert_equal ir, new_doc.parent_import_rule
+          assert_equal doc, new_doc.parent
+        end
+      end
+
+      def test_import_with_media
+        doc = CSSPool.CSS <<-eocss
+          @import "foo.css" screen, print;
+        eocss
+
+        assert_equal 1, doc.import_rules.length
+        doc.import_rules.each do |ir|
+          new_doc = ir.load do |url|
+            "div { background: red; }"
+          end
+          new_doc.rule_sets.each do |rs|
+            assert_equal ir.media, rs.media
+          end
+        end
+      end
+    end
+  end
+end

data/test/helper.rb

@@ -1,9 +1,65 @@
 require "test/unit"
+require "csspool"
 
-require "rubygems"
-require "flexmock"
-require "flexmock/test_unit"
+module CSSPool
+  class TestCase < Test::Unit::TestCase
+    unless RUBY_VERSION >= '1.9'
+      undef :default_test
+    end
 
-require "css/sac"
-require "test/selector_test_case"
-require "test/condition_test_case"
+    ASSET_DIR = File.join(File.dirname(__FILE__), 'files')
+
+    class MyDoc < CSSPool::SAC::Document
+      attr_accessor :start_documents, :end_documents
+      attr_accessor :charsets, :import_styles, :comments, :start_selectors
+      attr_accessor :end_selectors, :properties
+
+      def initialize
+        @start_documents  = []
+        @end_documents    = []
+        @charsets         = []
+        @import_styles    = []
+        @comments         = []
+        @start_selectors  = []
+        @end_selectors    = []
+        @properties       = []
+      end
+
+      def property name, expression, important
+        @properties << [name, expression]
+      end
+
+      def start_document
+        @start_documents << true
+      end
+
+      def end_document
+        @end_documents << true
+      end
+
+      def charset name, location
+        @charsets << [name, location]
+      end
+
+      def import_style media_list, uri, default_ns, location
+        @import_styles << [media_list, uri, default_ns, location]
+      end
+
+      def namespace_declaration prefix, uri, location
+        @import_styles << [prefix, uri, location]
+      end
+
+      def comment string
+        @comments << string
+      end
+
+      def start_selector selectors
+        @start_selectors << selectors
+      end
+
+      def end_selector selectors
+        @end_selectors << selectors
+      end
+    end
+  end
+end

data/test/sac/test_parser.rb

@@ -0,0 +1,115 @@
+require 'helper'
+
+module CSSPool
+  module SAC
+    class TestParser < CSSPool::TestCase
+      def setup
+        super
+        @doc = MyDoc.new
+        @css = <<-eocss
+          @charset "UTF-8";
+          @import url("foo.css") screen;
+          /* This is a comment */
+          div a.foo, #bar, * { background: red; }
+          div#a, a.foo, a:hover, a[href][int="10"]{ background: red; }
+        eocss
+        @parser = CSSPool::SAC::Parser.new(@doc)
+        @parser.parse(@css)
+      end
+
+      def test_start_and_end_called_with_the_same
+        assert_equal @doc.start_selectors, @doc.end_selectors
+      end
+
+      def test_parse_no_doc
+        parser = CSSPool::SAC::Parser.new
+        parser.parse(@css)
+      end
+
+      def test_start_document
+        assert_equal [true], @doc.start_documents
+      end
+
+      def test_end_document
+        assert_equal [true], @doc.end_documents
+      end
+
+      def test_charset
+        assert_equal(
+          [["UTF-8", { :line => 1, :byte_offset => 10, :column => 11}]],
+          @doc.charsets)
+      end
+
+      def test_import_style
+        styles = @doc.import_styles.first
+        assert_equal ["screen"], styles.first
+        assert_equal "foo.css", styles[1]
+        assert_nil styles[2]
+      end
+
+      def test_start_selector
+        selectors_for_rule = @doc.start_selectors.first
+        assert selectors_for_rule
+        assert_equal 3, selectors_for_rule.length
+      end
+
+      def test_simple_selector
+        selectors_for_rule = @doc.start_selectors.first
+        selector = selectors_for_rule.first # => div a.foo
+        assert_equal 2, selector.simple_selectors.length
+        selector.simple_selectors.each do |ss|
+          assert ss.parse_location
+        end
+      end
+
+      def test_additional_selector_list
+        selectors_for_rule = @doc.start_selectors.first
+        selector = selectors_for_rule.first # => div a.foo
+        simple_selector = selector.simple_selectors[1] # => a.foo
+        assert additional_selectors = simple_selector.additional_selectors
+        assert_equal 1, additional_selectors.length
+      end
+
+      def test_additional_selector_class_name
+        selectors_for_rule = @doc.start_selectors.first
+        selector = selectors_for_rule.first # => div a.foo
+        simple_selector = selector.simple_selectors[1] # => a.foo
+        assert additional_selectors = simple_selector.additional_selectors
+        foo_class = additional_selectors.first
+        assert_equal 'foo', foo_class.name
+      end
+
+      # div#a, a.foo, a:hover, a[href='watever'] { background: red; }
+      def test_id_additional_selector
+        selectors_for_rule = @doc.start_selectors[1]
+        selector = selectors_for_rule.first # => div#a
+        simple_selector = selector.simple_selectors.first # => div#a
+        assert_equal 'a', simple_selector.additional_selectors.first.name
+      end
+
+      # div#a, a.foo, a:hover, a[href][int="10"]{ background: red; }
+      def test_pseudo_additional_selector
+        selectors_for_rule = @doc.start_selectors[1]
+        selector = selectors_for_rule[2] # => 'a:hover'
+        simple_selector = selector.simple_selectors.first # => a:hover
+        assert_equal 'hover', simple_selector.additional_selectors.first.name
+        assert_nil simple_selector.additional_selectors.first.extra
+      end
+
+      # div#a, a.foo, a:hover, a[href][int="10"]{ background: red; }
+      def test_attribute_selector
+        selectors_for_rule = @doc.start_selectors[1]
+        selector = selectors_for_rule[3] # => a[href][int="10"]
+        simple_selector = selector.simple_selectors.first
+
+        assert_equal 'href', simple_selector.additional_selectors.first.name
+        assert_nil simple_selector.additional_selectors.first.value
+        assert_equal 1, simple_selector.additional_selectors.first.match_way
+
+        assert_equal 'int', simple_selector.additional_selectors[1].name
+        assert_equal '10', simple_selector.additional_selectors[1].value
+        assert_equal 2, simple_selector.additional_selectors[1].match_way
+      end
+    end
+  end
+end

data/test/sac/test_properties.rb

@@ -0,0 +1,43 @@
+require 'helper'
+
+module CSSPool
+  module SAC
+    class TestProperties < CSSPool::TestCase
+      def setup
+        super
+        @doc = MyDoc.new
+        @css = <<-eocss
+          @charset "UTF-8";
+          @import url("foo.css") screen;
+          /* This is a comment */
+          div a.foo, #bar, * { background: red; }
+          div#a, a.foo, a:hover, a[href][int="10"]{ background: red; }
+        eocss
+        @parser = CSSPool::SAC::Parser.new(@doc)
+        @parser.parse(@css)
+      end
+
+      def test_properties
+        assert_equal ['background'], @doc.properties.map { |x| x.first }.uniq
+        @doc.properties.each do |property|
+          assert_equal 1, property[1].length
+        end
+        assert_equal ['red'], @doc.properties.map { |x| x[1].first.value }.uniq
+      end
+
+      def test_ident_with_comma
+        doc = MyDoc.new
+        parser = CSSPool::SAC::Parser.new(doc)
+        parser.parse <<-eocss
+          h1 { font-family: Verdana, sans-serif, monospace; }
+        eocss
+        assert_equal 1, doc.properties.length
+        values = doc.properties.first[1]
+        assert_equal 3, values.length
+        assert_equal [nil, ',', ','],
+          values.map { |value| value.operator }
+        values.each { |value| assert value.parse_location }
+      end
+    end
+  end
+end