Implements margin shorthand parsing

Per specs on http://www.w3.org/TR/CSS21/box.html#propdef-margin and
http://www.w3.org/TR/CSS/

Author: zmoazeni

lib/csscss.rb

@@ -17,3 +17,4 @@
 require "csscss/parser/base"
 require "csscss/parser/background"
 require "csscss/parser/list_style"
+require "csscss/parser/margin"

lib/csscss/parser/margin.rb

@@ -0,0 +1,59 @@
+module Csscss
+  module Parser
+    module Margin
+      extend Parser::Base
+
+      class Parser < Parslet::Parser
+        include Common
+
+        rule(:margin_side) {
+          length | percent | symbol_list(%w(inherit auto))
+        }
+
+        rule(:margin) {
+          (
+           symbol("inherit") >> eof | (
+             margin_side.maybe.as(:top)    >>
+             margin_side.maybe.as(:right)  >>
+             margin_side.maybe.as(:bottom) >>
+             margin_side.maybe.as(:left)
+           )
+          ).as(:margin)
+        }
+        root(:margin)
+      end
+
+      class Transformer < Parslet::Transform
+        rule(margin: simple(:inherit)) {[]}
+
+        SIDE = proc {|side, value| Declaration.from_parser("margin-#{side}", value) }
+
+        rule(margin: {
+          top:simple(:top),
+          right:simple(:right),
+          bottom:simple(:bottom),
+          left:simple(:left)
+        }) {
+          values = [top, right, bottom, left].compact
+          case values.size
+          when 4
+            %w(top right bottom left).zip(values).map {|side, value| SIDE[side, value] }
+          when 3
+            %w(top right bottom).zip(values).map {|side, value| SIDE[side, value] }.tap do |declarations|
+              declarations << SIDE["left", values[1]]
+            end
+          when 2
+            %w(top right).zip(values).map {|side, value| SIDE[side, value] }.tap do |declarations|
+              declarations << SIDE["bottom", values[0]]
+              declarations << SIDE["left", values[1]]
+            end
+          when 1
+            %w(top right bottom left).map do |side|
+              SIDE[side, values[0]]
+            end
+          end
+        }
+      end
+    end
+  end
+end

lib/csscss/redundancy_analyzer.rb

@@ -88,6 +88,7 @@ def shorthand_parser(property)
       case property
       when "background" then Parser::Background
       when "list-style" then Parser::ListStyle
+      when "margin" then Parser::Margin
       end
     end
   end

test/csscss/parser/margin_test.rb

@@ -0,0 +1,50 @@
+require "test_helper"
+
+module Csscss::Parser
+  module Margin
+    describe Margin do
+      include CommonParserTests
+
+      before do
+        @parser = Parser.new
+        @trans = Transformer.new
+      end
+
+      it "converts shorthand rules to longhand" do
+        trans("1px 10% inherit auto").must_equal([
+          dec("margin-top", "1px"),
+          dec("margin-right", "10%"),
+          dec("margin-bottom", "inherit"),
+          dec("margin-left", "auto")
+        ])
+
+        trans("1px 10% inherit").must_equal([
+          dec("margin-top", "1px"),
+          dec("margin-right", "10%"),
+          dec("margin-bottom", "inherit"),
+          dec("margin-left", "10%")
+        ])
+
+        trans("1px 10%").must_equal([
+          dec("margin-top", "1px"),
+          dec("margin-right", "10%"),
+          dec("margin-bottom", "1px"),
+          dec("margin-left", "10%")
+        ])
+
+        trans("1px").must_equal([
+          dec("margin-top", "1px"),
+          dec("margin-right", "1px"),
+          dec("margin-bottom", "1px"),
+          dec("margin-left", "1px")
+        ])
+      end
+
+      it "tries the parse and returns false if it doesn't work" do
+        @parser.try_parse("foo").must_equal(false)
+        parsed = @parser.try_parse("1px")
+        parsed[:margin][:top].must_equal("1px")
+      end
+    end
+  end
+end