csspool 0.1.0 → 0.1.1

data/lib/css/sac/selectors.rb

@@ -1,87 +1,5 @@
-module CSS
-  module SAC
-    class Selector
-      attr_reader :selector_type
-    end
+require "css/sac/selectors/selector"
 
-    class SimpleSelector < Selector
-      def initialize
-        @selector_type = :SAC_ANY_NODE_SELECTOR
-      end
-
-      def to_css
-        case @selector_type
-        when :SAC_ANY_NODE_SELECTOR
-          '*'
-        end
-      end
-    end
-
-    class ElementSelector < SimpleSelector
-      attr_reader :local_name
-      alias :name :local_name
-
-      def initialize(name)
-        super()
-        @selector_type = :SAC_ELEMENT_NODE_SELECTOR
-        @local_name = name
-      end
-
-      def to_css
-        local_name
-      end
-    end
-
-    class ConditionalSelector < SimpleSelector
-      attr_accessor :condition, :simple_selector
-      alias :selector :simple_selector
-
-      def initialize(selector, condition)
-        @condition  = condition
-        @simple_selector   = selector
-        @selector_type = :SAC_CONDITIONAL_SELECTOR
-      end
-
-      def to_css
-        [selector, condition].map { |x|
-          x ? x.to_css : ''
-        }.join('')
-      end
-    end
-
-    class DescendantSelector < SimpleSelector
-      attr_accessor :ancestor_selector, :simple_selector
-      alias :selector :simple_selector
-
-      def initialize(ancestor, selector, type)
-        @ancestor_selector = ancestor
-        @simple_selector = selector
-        @selector_type = type
-      end
-
-      def to_css
-        descent_token =
-          case @selector_type
-          when :SAC_CHILD_SELECTOR
-            ' > '
-          when :SAC_DESCENDANT_SELECTOR
-            ' '
-          end
-        ancestor_selector.to_css + descent_token + selector.to_css
-      end
-    end
-
-    class SiblingSelector < SimpleSelector
-      attr_accessor :selector, :sibling_selector
-      def initialize(selector, sibling)
-        @selector = selector
-        @sibling_selector = sibling
-        @selector_type = :SAC_DIRECT_ADJACENT_SELECTOR
-      end
-
-      def to_css
-        selector.to_css + ' + ' + sibling_selector.to_css
-      end
-    end
-  end
+%w(simple child conditional descendant element sibling).each do |type|
+  require "css/sac/selectors/#{type}_selector"
 end

data/lib/css/sac/visitable.rb

@@ -0,0 +1,104 @@
+module CSS
+  module SAC
+    module Visitable # :nodoc:
+      # Based off the visitor pattern from RubyGarden
+      def accept(visitor, &block)
+        klass = self.class.ancestors.find { |klass|
+          visitor.respond_to?("visit_#{klass.name.split(/::/)[-1]}")
+        }
+
+        if klass
+          visitor.send(:"visit_#{klass.name.split(/::/)[-1]}", self, &block)
+        else
+          raise "No visitor for '#{self.class}'"
+        end
+      end
+    end
+
+    class MatchesVisitor
+      def initialize(node)
+        @node = node
+      end
+
+      def accept(target)
+        target.accept(self)
+      end
+
+      def visit_SimpleSelector(o)
+        return false if @node.nil?
+        return false unless @node.respond_to?(:name)
+        true
+      end
+
+      def visit_ElementSelector(o)
+        return false unless visit_SimpleSelector(o) # *sigh*
+        o.name == @node.name
+      end
+
+      def visit_ChildSelector(o)
+        return false unless visit_SimpleSelector(o) # *sigh*
+        return false unless @node.respond_to?(:parent)
+        return false if @node.parent.nil?
+        return false unless o.selector.accept(self)
+        @node = @node.parent
+        o.parent.accept(self)
+      end
+
+      def visit_DescendantSelector(o)
+        return false unless visit_SimpleSelector(o) # *sigh*
+        return false unless @node.respond_to?(:parent)
+        return false if @node.parent.nil?
+        return false unless o.selector.accept(self)
+
+        @node = @node.parent
+        loop {
+          return true if o.ancestor.accept(self)
+          return false unless @node.respond_to?(:parent)
+          @node = @node.parent
+        }
+      end
+
+      def visit_SiblingSelector(o)
+        return false unless visit_SimpleSelector(o) # *sigh*
+        return false unless @node.respond_to?(:next_sibling)
+        return false if @node.next_sibling.nil?
+        return false unless o.selector.accept(self)
+        @node = @node.next_sibling
+        o.sibling.accept(self)
+      end
+
+      def visit_ConditionalSelector(o)
+        return false unless visit_SimpleSelector(o) # *sigh*
+        o.selector.accept(self) && o.condition.accept(self)
+      end
+
+      def visit_AttributeCondition(o)
+        return false unless @node.respond_to?(:attributes)
+        return false unless @node.attributes[o.local_name]
+        @node.attributes[o.local_name] == o.value
+      end
+
+      def visit_BeginHyphenCondition(o)
+        return false unless @node.respond_to?(:attributes)
+        return false unless @node.attributes[o.local_name]
+        @node.attributes[o.local_name] =~ /^#{o.value}/
+      end
+
+      def visit_CombinatorCondition(o)
+        o.first.accept(self) && o.second.accept(self)
+      end
+
+      def visit_OneOfCondition(o)
+        return false unless @node.respond_to?(:attributes)
+        return false unless @node.attributes[o.local_name]
+        @node.attributes[o.local_name].split.any? { |attribute|
+          attribute == o.value
+        }
+      end
+
+      def visit_PseudoClassCondition(o)
+        false # Fuck pseudo classes.  --Aaron
+      end
+    end
+  end
+end

data/lib/parser.y

@@ -23,10 +23,6 @@ rule
         self.document_handler.import_style(val[2], val[4] || [])
       }
     ;
-  optional_ignorable_at
-    : ignorable_at
-    |
-    ;
   ignorable_at
     : '@' IDENT s_0toN string_or_uri s_0toN medium_0toN ';' s_0toN {
         self.document_handler.ignorable_at_rule(val[1])
@@ -146,16 +142,19 @@ rule
   simple_selector_1toN
     : simple_selector combinator simple_selector_1toN {
         result =
-          if val[1] == :SAC_DIRECT_ADJACENT_SELECTOR
+          case val[1]
+          when :SAC_DIRECT_ADJACENT_SELECTOR
             SiblingSelector.new(val.first, val[2])
-          else
-            DescendantSelector.new(val.first, val[2], val[1])
+          when :SAC_DESCENDANT_SELECTOR
+            DescendantSelector.new(val.first, val[2])
+          when :SAC_CHILD_SELECTOR
+            ChildSelector.new(val.first, val[2])
           end
       }
     | simple_selector
     ;
   class
-    : '.' IDENT { result = AttributeCondition.class_condition(val[1]) }
+    : '.' IDENT { result = ClassCondition.new(val[1]) }
     ;
   element_name
     : IDENT { result = ElementSelector.new(val.first) }
@@ -163,13 +162,14 @@ rule
     ;
   attrib
     : '[' s_0toN IDENT s_0toN attrib_val_0or1 ']' {
-        result = AttributeCondition.attribute_condition(val[2], val[4])
+        result = AttributeCondition.build(val[2], val[4])
       }
     ;
   pseudo
-    : ':' FUNCTION s_0toN IDENT s_0toN ')'
-    | ':' FUNCTION s_0toN s_0toN ')'
-    | ':' IDENT { result = AttributeCondition.pseudo_class_condition(val[1]) }
+    : ':' function {
+        result = PseudoClassCondition.new(val[1])
+      }
+    | ':' IDENT { result = PseudoClassCondition.new(val[1]) }
     ;
   declaration
     : property ':' s_0toN expr prio_0or1 {
@@ -203,7 +203,7 @@ rule
     |
     ;
   expr
-    : term operator expr { result = val }
+    : term operator expr { result = [val[0], val.last] }
     | term
     ;
   term
@@ -226,7 +226,9 @@ rule
     | FREQ s_0toN
     ;
   function
-    : FUNCTION s_0toN expr ')' s_0toN { result = [val[0], val[2], val[3]] }
+    : FUNCTION s_0toN expr ')' s_0toN {
+        result = Function.new(val[0], val[2].flatten)
+      }
     | FUNCTION s_0toN expr error ')' s_0toN { yyerrok; result = [val[0], val[2], val[3]] }
     ;
   hexcolor
@@ -255,7 +257,7 @@ rule
     | pseudo
     ;
   attribute_id
-    : HASH { result = AttributeCondition.attribute_id(val.first) }
+    : HASH { result = IDCondition.new(val.first) }
     ;
   attrib_val_0or1
     : eql_incl_dash s_0toN IDENT s_0toN { result = [val.first, val[2]] }
@@ -285,3 +287,10 @@ rule
     |
     ;
 end
+
+---- header
+  require "css/sac/conditions"
+  require "css/sac/selectors"
+  
+  include CSS::SAC::Conditions
+  include CSS::SAC::Selectors

data/test/condition_test_case.rb

@@ -0,0 +1,6 @@
+class ConditionTestCase < Test::Unit::TestCase
+  include CSS::SAC::Conditions
+
+  Node = Struct.new(:name, :parent, :child, :next_sibling, :attributes)
+  undef :default_test
+end

data/test/helper.rb

@@ -5,3 +5,5 @@ require "flexmock"
 require "flexmock/test_unit"
 
 require "css/sac"
+require "test/selector_test_case"
+require "test/condition_test_case"

data/test/selector_test_case.rb

@@ -0,0 +1,20 @@
+class SelectorTestCase < Test::Unit::TestCase
+  include CSS::SAC::Selectors
+  Node = Struct.new(:name, :parent, :child, :next_sibling, :attributes)
+  NoParentNode = Struct.new(:name)
+
+  def parent_child_tree(*args)
+    nodes = args.map { |name|
+      n = Node.new
+      n.name = name
+      n
+    }
+    nodes.each_with_index do |n,i|
+      n.child = nodes[i + 1] if i < nodes.length
+      n.parent = nodes[i - 1] if i > 0
+    end
+    nodes.last
+  end
+
+  undef :default_test
+end

data/test/test_attribute_condition.rb

@@ -0,0 +1,30 @@
+require File.dirname(__FILE__) + "/helper"
+
+class AttributeConditionTest < ConditionTestCase
+  def test_equals2
+    first = AttributeCondition.new(1, 1, 1)
+    second = AttributeCondition.new(1, 1, 1)
+    assert_equal first, second
+
+    third = AttributeCondition.new(1,1,2)
+    assert_not_equal first, third
+
+    fourth = AttributeCondition.new(1,2,1)
+    assert_not_equal first, fourth
+
+    fifth = AttributeCondition.new(2,1,1)
+    assert_not_equal first, fifth
+  end
+
+  def test_equals_tilde
+    attribute = AttributeCondition.new('class', 'foo', true)
+    node = Node.new('p')
+    node.attributes = { 'class' => 'foo' }
+
+    assert attribute =~ node
+
+    node.attributes = { 'class' => 'bar' }
+    assert(!(attribute =~ node))
+    assert(!(attribute =~ 1))
+  end
+end

data/test/test_begin_hyphen_condition.rb

@@ -0,0 +1,15 @@
+require File.dirname(__FILE__) + "/helper"
+
+class BeginHyphenConditionTest < ConditionTestCase
+  def test_tilde_equals
+    attribute = BeginHyphenCondition.new('class', 'foo')
+    node = Node.new('p')
+    node.attributes = { 'class' => 'foobar' }
+
+    assert attribute =~ node
+
+    node.attributes = { 'class' => 'barfoo' }
+    assert(!(attribute =~ node))
+    assert(!(attribute =~ 1))
+  end
+end

data/test/test_child_selector.rb

@@ -0,0 +1,48 @@
+require File.dirname(__FILE__) + "/helper"
+
+class ChildSelectorTest < SelectorTestCase
+  def test_equals2
+    first = ChildSelector.new(1,1)
+    second = ChildSelector.new(1,1)
+    assert_equal first, second
+
+    third = ChildSelector.new(1,2)
+    assert_not_equal first, third
+
+    fourth = ChildSelector.new(2,1)
+    assert_not_equal first, fourth
+  end
+
+  def test_equals_tilde
+    parent = ElementSelector.new('div')
+    child = ElementSelector.new('p')
+    sel = ChildSelector.new(parent, child)
+
+    node = parent_child_tree('div', 'p')
+    assert sel =~ node
+
+    node2 = parent_child_tree('body', 'div', 'p')
+    assert sel =~ node2
+
+    failing = parent_child_tree('p', 'div')
+    assert(! (sel =~ failing))
+    assert(! (sel =~ NoParentNode.new('div')))
+    assert(! (sel =~ Node.new('div', nil, nil)))
+  end
+
+  def test_many_child
+    @sac = CSS::SAC::Parser.new()
+    class << @sac.document_handler
+      attr_accessor :selectors
+      alias :start_selector :selectors=
+    end
+
+    @sac.parse('div > h1 > h2 { }')
+    selectors = @sac.document_handler.selectors
+    assert_equal(1, selectors.length)
+
+    sel = selectors.first
+    node = parent_child_tree('div', 'h1', 'h2')
+    assert sel =~ node
+  end
+end

data/test/test_class_condition.rb

@@ -0,0 +1,15 @@
+require File.dirname(__FILE__) + "/helper"
+
+class ClassConditionTest < ConditionTestCase
+  def test_tilde_equals
+    attribute = ClassCondition.new('foo')
+    node = Node.new('p')
+    node.attributes = { 'class' => 'foo' }
+
+    assert attribute =~ node
+
+    node.attributes = { 'class' => 'barfoo' }
+    assert(!(attribute =~ node))
+    assert(!(attribute =~ 1))
+  end
+end

data/test/test_combinator_condition.rb

@@ -0,0 +1,29 @@
+require File.dirname(__FILE__) + "/helper"
+
+class CombinatorConditionTest < ConditionTestCase
+  def test_equals2
+    first = CombinatorCondition.new(1,1)
+    second = CombinatorCondition.new(1,1)
+    assert_equal first, second
+
+    third = CombinatorCondition.new(1,2)
+    assert_not_equal first, third
+  end
+
+  def test_equals_tilde
+    first = ClassCondition.new('foo')
+    second = AttributeCondition.new('name', 'aaron', true)
+    combinator_condition = CombinatorCondition.new(first, second)
+
+    node = Node.new('p')
+    node.attributes = { 'class' => 'foo', 'name' => 'aaron' }
+
+    assert combinator_condition =~ node
+
+    node.attributes = { 'class' => 'bar', 'name' => 'aaron' }
+    assert(!(combinator_condition =~ node))
+
+    node.attributes = { 'class' => 'foo', 'name' => 'bar' }
+    assert(!(combinator_condition =~ node))
+  end
+end

data/test/test_condition.rb

@@ -0,0 +1,13 @@
+require File.dirname(__FILE__) + "/helper"
+
+class ConditionTest < ConditionTestCase
+  def test_equals2
+    first = Condition.new(1)
+    second = Condition.new(1)
+    assert_equal first, second
+
+    third = Condition.new(2)
+    assert_not_equal first, third
+    assert_not_equal first, 1
+  end
+end

data/test/test_conditional_selector.rb

@@ -0,0 +1,29 @@
+require File.dirname(__FILE__) + "/helper"
+
+class ConditionalSelectorTest < SelectorTestCase
+  def test_equals2
+    first = ConditionalSelector.new(1,1)
+    second = ConditionalSelector.new(1,1)
+    assert_equal first, second
+
+    third = ConditionalSelector.new(1,2)
+    assert_not_equal first, third
+
+    fourth = ConditionalSelector.new(2,1)
+    assert_not_equal first, fourth
+  end
+
+  def test_equals_tilde
+    attribute = AttributeCondition.new('class', 'foo', true)
+    div = ElementSelector.new('div')
+    sel = ConditionalSelector.new(div, attribute)
+
+    node = Node.new('div')
+    node.attributes = { 'class' => 'foo' }
+
+    assert sel =~ node
+
+    node.attributes = { 'class' => 'bar' }
+    assert(!(sel =~ node))
+  end
+end

data/test/test_descendant_selector.rb

@@ -0,0 +1,52 @@
+require File.dirname(__FILE__) + "/helper"
+
+class DescendantSelectorTest < SelectorTestCase
+  def test_equals2
+    first = DescendantSelector.new(1,1)
+    second = DescendantSelector.new(1,1)
+    assert_equal first, second
+
+    third = DescendantSelector.new(1,2)
+    assert_not_equal first, third
+
+    fourth = DescendantSelector.new(2,1)
+    assert_not_equal first, fourth
+  end
+
+  def test_equals_tilde
+    parent = ElementSelector.new('div')
+    child = ElementSelector.new('p')
+    sel = DescendantSelector.new(parent, child)
+
+    node = parent_child_tree('div', 'p')
+    assert sel =~ node
+
+    node2 = parent_child_tree('body', 'div', 'p')
+    assert sel =~ node2
+
+    node3 = parent_child_tree('body', 'div', 'table', 'tr', 'td', 'p')
+    assert sel =~ node3
+
+    failing = parent_child_tree('p', 'div')
+    assert(! (sel =~ failing))
+    assert(! (sel =~ NoParentNode.new('div')))
+    assert(! (sel =~ Node.new('div', nil, nil)))
+  end
+
+  def test_many_descendants
+    @sac = CSS::SAC::Parser.new()
+    class << @sac.document_handler
+      attr_accessor :selectors
+      alias :start_selector :selectors=
+    end
+
+    @sac.parse('div h1 h2 { }')
+    selectors = @sac.document_handler.selectors
+    assert_equal(1, selectors.length)
+
+    sel = selectors.first
+    node = parent_child_tree('body', 'div', 'p', 'h1', 'p', 'h2')
+    assert sel =~ node
+  end
+end
+

data/test/test_element_selector.rb

@@ -0,0 +1,22 @@
+require File.dirname(__FILE__) + "/helper"
+
+class ElementSelectorTest < SelectorTestCase
+  def test_equals2
+    first = ElementSelector.new(1)
+    second = ElementSelector.new(1)
+    assert_equal first, second
+
+    third = ElementSelector.new(2)
+    assert_not_equal first, third
+  end
+
+  def test_equals_tilde
+    div = ElementSelector.new('div')
+    node = Node.new
+    node.name = 'div'
+
+    assert div =~ node
+    assert(!(div =~ nil))
+  end
+end
+

data/test/test_id_condition.rb

@@ -0,0 +1,16 @@
+require File.dirname(__FILE__) + "/helper"
+
+class IdConditionTest < ConditionTestCase
+  def test_equals_tilde
+    attribute = IDCondition.new('some_id')
+    node = Node.new('p')
+    node.attributes = { 'id' => 'some_id' }
+
+    assert attribute =~ node
+
+    node.attributes = { 'id' => 'different' }
+    assert(!(attribute =~ node))
+    assert(!(attribute =~ 1))
+  end
+end
+

data/test/test_one_of_condition.rb

@@ -0,0 +1,15 @@
+require File.dirname(__FILE__) + "/helper"
+
+class OneOfConditionTest < ConditionTestCase
+  def test_equals_tilde
+    attribute = OneOfCondition.new('class', 'foo')
+    node = Node.new('p')
+    node.attributes = { 'class' => 'aaron foo' }
+
+    assert attribute =~ node
+
+    node.attributes = { 'class' => 'bar' }
+    assert(!(attribute =~ node))
+    assert(!(attribute =~ 1))
+  end
+end

data/test/test_parser.rb

@@ -41,6 +41,14 @@ class ParserTest < Test::Unit::TestCase
     flexmock_verify
   end
 
+  def test_at_import_many_media
+    flexmock(@sac.document_handler).
+      should_receive(:import_style).ordered.
+        with('"subs.css"', ['paper', 'boobs']).once
+    @sac.parse('@import "subs.css" paper, boobs;')
+    flexmock_verify
+  end
+
   def test_multi_import
     flexmock(@sac.document_handler).
       should_receive(:import_style).ordered.
@@ -180,4 +188,54 @@ class ParserTest < Test::Unit::TestCase
     @sac.parse('h1 { color: black !important; }')
     flexmock_verify
   end
+
+  def test_pseudo_function
+    flexmock(@sac.document_handler).
+      should_receive(:start_selector).ordered.once
+    flexmock(@sac.document_handler).
+      should_receive(:property).with('color', on { |list|
+      list.length == 1 && list.first.dimension_unit_text.nil? &&
+        list.first.lexical_unit_type == :SAC_IDENT &&
+        list.first.string_value == "black" &&
+        list.first.integer_value.nil?
+    }, true).ordered.once
+    flexmock(@sac.document_handler).
+      should_receive(:end_selector).ordered.once
+    @sac.parse('h1:nth(1) { color: black !important; }')
+    flexmock_verify
+  end
+
+  def test_pseudo_class
+    flexmock(@sac.document_handler).
+      should_receive(:start_selector).ordered.once
+    flexmock(@sac.document_handler).
+      should_receive(:property).with('color', on { |list|
+      list.length == 1 && list.first.dimension_unit_text.nil? &&
+        list.first.lexical_unit_type == :SAC_IDENT &&
+        list.first.string_value == "black" &&
+        list.first.integer_value.nil?
+    }, true).ordered.once
+    flexmock(@sac.document_handler).
+      should_receive(:end_selector).ordered.once
+    @sac.parse('a:hover { color: black !important; }')
+    flexmock_verify
+  end
+
+  def test_pseudo_class_to_css
+    class << @sac.document_handler
+      attr_accessor :selectors
+      alias :start_selector :selectors=
+    end
+    @sac.parse('a:hover { color: black !important; }')
+    assert_equal 'a:hover', @sac.document_handler.selectors.first.to_css
+  end
+
+  def test_pseudo_function_to_css
+    class << @sac.document_handler
+      attr_accessor :selectors
+      alias :start_selector :selectors=
+    end
+    @sac.parse('a:nth(3) { color: black !important; }')
+    assert_equal 'a:nth(3)', @sac.document_handler.selectors.first.to_css
+  end
 end