magickwand 0.1.0 → 0.2.0

data/lib/magickwand.rb

@@ -1,4 +1,4 @@
-# $Id: magickwand.rb 128 2009-05-31 13:12:51Z rmagick $
+# $Id: magickwand.rb 271 2009-08-11 22:47:26Z rmagick $
 # Copyright (C) 2009 Timothy P. Hunter
 
 require 'magickwand.so'
@@ -24,5 +24,92 @@ module MagickWand
       end
 
    end
+
+   class Drawing
+
+      def define_element(container, name, options=nil, &block)
+         begin
+            push("defs")
+            push(container, name.to_s, options)
+            push
+            block.call unless block.nil?
+         ensure
+            pop
+            pop(container)
+            pop("defs")
+         end
+      end
+
+      private :define_element
+
+      # drawing.define_pattern(name, :x=>0, :y=>0, :width=>0, :height=>0) do ... end
+      def define_pattern(name, options=nil, &block)
+         define_element("pattern", name, options, &block)
+      end
+
+      # drawing.define_clip_path(name) do ... end
+      def define_clip_path(name, &block)
+         define_element("clip_path", name, &block)
+      end
+
+      # add an SVG path to the drawing
+      def add_path()
+         begin
+            start_path
+            yield self if block_given?
+         ensure
+            finish_path
+         end
+      end
+
+      # push new context, add styles, yield to block. Does not actually
+      # require a block but it's not very useful otherwise.
+      def with(styles)
+         begin
+            push
+            unless styles.nil?
+               # The :fill_opacity and :stroke_opacity styles must succeed
+               # the :fill and :stroke styles, otherwise the opacity specified
+               # by the :fill or :stroke color will override that specified by
+               # the :xxx_opacity style. Therefore we make two passes over the
+               # options hash. The first pass handles all options except
+               # :fill_opacity and :stroke_opacity. Then 2nd pass handles only
+               # those two options.
+               styles.each do |style, value|
+                  next if style == :fill_opacity || style == :stroke_opacity
+                  begin
+                     __send__("with_"+style.to_s, *value)
+                  rescue NoMethodError
+                     raise ArgumentError, "unknown style `:#{style}'"
+                  end
+               end
+
+               styles.each do |style, value|
+                  next unless style == :fill_opacity || style == :stroke_opacity
+                  begin
+                     __send__("with_"+style.to_s, *value)
+                  rescue NoMethodError
+                     raise ArgumentError, "unknown style `:#{style}'"
+                  end
+               end
+            end
+            yield if block_given?
+         ensure
+            pop
+         end
+      end
+
+      # yield to block in new (temporary) drawing context. Accepts no
+      # arguments but requires a block.
+      def wrap()
+         begin
+            push
+            yield
+         ensure
+            pop
+         end
+      end
+
+   end
 end
 

data/test/freezer.rb

@@ -0,0 +1,12 @@
+
+
+# Determine what exception is raised when you try to modify a frozen object
+begin
+   f = "string"
+   f.freeze
+   f[0] = "x"
+rescue Exception => e
+   FreezeError = e.class
+end
+
+

data/test/test_drawing.rb

@@ -0,0 +1,672 @@
+require 'test/unit'
+require 'magickwand'
+require File.dirname(__FILE__) + '/freezer'
+
+
+
+class TestDrawing < Test::Unit::TestCase
+
+   def test_annotation
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.annotation "Hello" }
+      assert_match(/text 0,0 'Hello'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.annotation "Hello", :x=>20 }
+      assert_match(/text 20,0 'Hello'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.annotation "Hello", :x=>20, :y=>20 }
+      assert_match(/text 20,20 'Hello'/, drawing.inspect)
+
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.annotation "Hello" }
+   end
+
+   def test_arc
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.arc 30, 50, 45, 270 }
+      assert_match(/arc 0,0 30,50 45,270/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.arc 30, 50, 45, 270, :x=>10 }
+      assert_match(/arc 10,0 40,50 45,270/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.arc 30, 50, 45, 270, :x=>15, :y=>20 }
+      assert_match(/arc 15,20 45,70 45,270/, drawing.inspect)
+
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.arc 30, 50, 45, 270 }
+   end
+
+   def test_bezier
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.bezier 100,150, 25,50, 475,50, 400,150 }
+      assert_match(/bezier 100,150 25,50 475,50 400,150/, drawing.inspect)
+
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.bezier 100,150, 25,50, 475,50, 400,150 }
+   end
+
+   def test_circle
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.circle 20 }
+      assert_match(/circle 0,0 20,0/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.circle 20, :x=>10 }
+      assert_match(/circle 10,0 30,0/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.circle 20, :x=>10, :y=>10 }
+      assert_match(/circle 10,10 30,10/, drawing.inspect)
+
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.circle 20 }
+   end
+
+   def test_color
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.color 20, 30 }
+      assert_match(/color 20,30 'Point'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.color 25, 35, :method=>"replace" }
+      assert_match(/color 25,35 'Replace'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.color 25, 35, :method=>"floodfill" }
+      assert_match(/color 25,35 'Floodfill'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.color 25, 35, :method=>"filltoborder", :bordercolor=>"green" }
+      assert_match(/color 25,35 'FillToBorder'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.color 25, 35, :method=>"reset" }
+      assert_match(/color 25,35 'Reset'/, drawing.inspect)
+
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.color 20, 30 }
+   end
+
+   def test_composite
+      drawing = MagickWand::Drawing.new
+      img = MagickWand::Wand.new
+      img.add_canvas 10, 10
+      assert_nothing_raised { drawing.composite img, :width=>0, :height=>0, :compose=>"over" }
+      assert_match(/image Over 0,0 0,0 'data:image\/x-;base64,/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.composite img, :x=>0, :y=>0, :width=>0, :height=>0, :compose=>"over" }
+      assert_match(/image Over 0,0 0,0 'data:image\/x-;base64,/, drawing.inspect)
+
+      assert_raise(ArgumentError) { drawing.composite img, :compose=>"xxx" }
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.composite(img) }
+   end
+
+   def test_draw
+      wand = MagickWand::Wand.new
+      wand.add_canvas 100
+      drawing = MagickWand::Drawing.new
+      drawing.circle 20, :x=>50, :y=>50
+      assert_nothing_raised { wand.draw drawing }
+
+      wand.freeze
+      assert_raise(FreezeError) { wand.draw drawing }
+   end
+
+   def test_ellipse
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.ellipse 20, 30 }
+      assert_match(/ellipse 0,0 20,30 0,360/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.ellipse 20, 30, :x=>20, :y=>20 }
+      assert_match(/ellipse 20,20 20,30 0,360/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.ellipse 20, 30, :start=>0, :end=>360 }
+      assert_match(/ellipse 0,0 20,30 0,360/, drawing.inspect)
+
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.ellipse 20, 30 }
+   end
+
+   def test_fill_stroke_pattern
+         drawing = MagickWand::Drawing.new
+         drawing.define_pattern("test_pattern") { drawing.circle(10) }
+         drawing.with(:fill_pattern=>"test_pattern", :stroke_pattern=>"test_pattern") {}
+         assert_match(/fill url\(\#test_pattern\)/, drawing.inspect)
+         assert_match(/stroke url\(\#test_pattern\)/, drawing.inspect)
+   end
+
+   def test_line
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.line 10, 20, 30, 40 }
+      assert_match(/line 10,20 30,40/, drawing.inspect)
+
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.line 10, 20, 30, 40 }
+   end
+
+   def test_matte
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.matte 20, 30 }
+      assert_match(/matte 20,30 'Point'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.matte 25, 35, :method=>"replace" }
+      assert_match(/matte 25,35 'Replace'/, drawing.inspect)
+
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.matte 20, 30 }
+   end
+
+   def test_path
+      drawing = MagickWand::Drawing.new
+      # ensure private methods
+      assert(drawing.private_methods.include?("start_path"))
+      assert(drawing.private_methods.include?("finish_path"))
+
+      assert_nothing_raised { drawing.add_path {} }
+      assert_nothing_raised do
+         drawing.add_path {|path| path.close_path}
+      end
+      assert_match(/path 'z'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.curve_to_absolute(10, 20, 30, 40, 50, 60) }
+      end
+      assert_match(/path 'C10,20 30,40 50,60'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.curve_to_relative(10, 20, 30, 40, 50, 60) }
+      end
+      assert_match(/path 'c10,20 30,40 50,60'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.curve_to_quadratic_bezier_absolute(10, 20, 30, 40) }
+      end
+      assert_match(/path 'Q10,20 30,40'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.curve_to_quadratic_bezier_relative(10, 20, 30, 40) }
+      end
+      assert_match(/path 'q10,20 30,40'/, drawing.inspect)
+
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.curve_to_quadratic_bezier_smooth_absolute(10, 20) }
+      end
+      assert_match(/path 'T10,20'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.curve_to_quadratic_bezier_smooth_relative(10, 20) }
+      end
+      assert_match(/path 't10,20'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.curve_to_smooth_absolute(10, 20, 30, 40) }
+      end
+      assert_match(/path 'S10,20 30,40'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.curve_to_smooth_relative(10, 20, 30, 40) }
+      end
+      assert_match(/path 's10,20 30,40'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.elliptic_arc_absolute(10, 20, 30, true, false, 40, 50) }
+      end
+      assert_match(/path 'A10,20 30 1 0 40,50'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.elliptic_arc_relative(10, 20, 30, true, false, 40, 50) }
+      end
+      assert_match(/path 'a10,20 30 1 0 40,50'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.line_to_absolute(10, 20) }
+      end
+      assert_match(/path 'L10,20'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.line_to_relative(10, 20) }
+      end
+      assert_match(/path 'l10,20'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.line_to_horizontal_absolute(10) }
+      end
+      assert_match(/path 'H10'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.line_to_horizontal_relative(10) }
+      end
+      assert_match(/path 'h10'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.line_to_vertical_absolute(10) }
+      end
+      assert_match(/path 'V10'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.line_to_vertical_relative(10) }
+      end
+      assert_match(/path 'v10'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.move_to_absolute(10, 20) }
+      end
+      assert_match(/path 'M10,20'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised do
+         drawing.add_path {|path| path.move_to_relative(10, 20) }
+      end
+      assert_match(/path 'm10,20'/, drawing.inspect)
+   end
+
+   def test_polygon
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.polygon 1, 1, 3, 3 }
+      assert_match(/polygon 1,1 3,3/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.polygon 1, 1, 3, 3, 5, 5 }
+      assert_match(/polygon 1,1 3,3 5,5/, drawing.inspect)
+
+      assert_raise(ArgumentError) { drawing.polygon 1, 1, 3 }
+
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.polygon 1, 1, 3, 3 }
+   end
+
+   def test_polyline
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.polyline 1, 1, 3, 3 }
+      assert_match(/polyline 1,1 3,3/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.polyline 1, 1, 3, 3, 5, 5 }
+      assert_match(/polyline 1,1 3,3 5,5/, drawing.inspect)
+
+      assert_raise(ArgumentError) { drawing.polyline 1, 1, 3 }
+
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.polyline 1, 1, 3, 3 }
+   end
+
+   def test_rectangle
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.rectangle 20, 40 }
+      assert_match(/rectangle 0,0 20,40/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.rectangle 20, 40, :x=>10, :y=>10 }
+      assert_match(/rectangle 10,10 30,50/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      assert_nothing_raised { drawing.rectangle 20, 40, :rx=>4, :ry=>4 }
+      assert_match(/roundrectangle 0,0 20,40 4,4/, drawing.inspect)
+
+      drawing.freeze
+      assert_raise(FreezeError) { drawing.rectangle 20, 40 }
+   end
+
+   def test_transforms
+      drawing = MagickWand::Drawing.new
+      drawing.wrap do
+         drawing.affine(1,1,0,0,0,0)
+      end
+      assert_match(/push graphic-context\n affine 1,0,0,1,0,0\npop graphic-context/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.wrap { drawing.rotate 45 }
+      assert_match(/rotate 45/, drawing.inspect)
+      drawing.wrap { drawing.rotate 45, 10 }   # y-offset defaults to 0
+      assert_match(/translate 10,0\n rotate 45\n translate -10,-0/, drawing.inspect)
+      drawing.wrap { drawing.rotate 45,10,20 }
+      assert_match(/translate 10,20\n rotate 45\n translate -10,-20/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.wrap { drawing.scale 1.5 }
+      assert_match(/scale 1.5/, drawing.inspect)
+      drawing.wrap { drawing.scale 1.5, 2 }
+      assert_match(/scale 1.5,2/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.wrap { drawing.skew 30 }
+      assert_match(/skewX 30/, drawing.inspect)
+      drawing = MagickWand::Drawing.new
+      drawing.wrap { drawing.skew 30, 30 }
+      assert_match(/skewX 30/, drawing.inspect)
+      assert_match(/skewY 30/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.wrap  { drawing.translate 30 }
+      assert_match(/translate 30,0/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.wrap { drawing.translate 30, 30 }
+      assert_match(/translate 30,30/, drawing.inspect)
+
+      drawing.freeze
+      assert_raise(FreezeError) do
+         drawing.translate 30, 30
+      end
+   end
+
+   def test_with
+      drawing = MagickWand::Drawing.new
+      # requires a argument
+      assert_raise(ArgumentError) { drawing.with }
+      # does not require a blocck
+      assert_nothing_raised {drawing.with(:align=>"center") }
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:align=>"center") {}
+      assert_match(/text-align 'Center'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:align=>"end") {}
+      assert_match(/text-align 'End'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:align=>"left") {}
+      assert_match(/text-align 'Left'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:align=>"middle") {}
+      assert_match(/text-align 'Center'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:align=>"right") {}
+      assert_match(/text-align 'End'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:align=>"start") {}
+      assert_match(/text-align 'Left'/, drawing.inspect)
+
+      assert_raise(ArgumentError) { drawing.with(:align=>"xxx") }
+
+      drawing = MagickWand::Drawing.new   # :antialias
+      drawing.with(:antialias=>true, :stroke_antialias=>false) {}
+      assert_match(/text-antialias 1/, drawing.inspect)
+      assert_match(/stroke-antialias 0/, drawing.inspect)
+      drawing = MagickWand::Drawing.new   # :antialias
+      drawing.with(:text_antialias=>false) {}   # alias for :antialias
+      assert_match(/text-antialias 0/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:antialias=>false) {}
+      assert_match(/text-antialias 0/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new   # :clip_path
+      drawing.with(:clip_path=>"clip_path_name") {}
+      assert_match(/clip-path url\(#clip_path_name\)/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new   # :clip_rule
+      drawing.with(:clip_rule=>"nonzero") {}
+      assert_match(/clip-rule 'NonZero'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:clip_rule=>"evenodd") {}
+      assert_match(/clip-rule 'Evenodd'/, drawing.inspect)
+
+      assert_raise(ArgumentError) do
+         drawing.with(:clip_rule=>"bogus") {}
+      end
+
+      drawing = MagickWand::Drawing.new   # :clip_units
+      drawing.with(:clip_units=>"userspace")
+      assert_match(/clip-units 'UserSpace'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:clip_units=>"userspaceonuse")
+      assert_match(/clip-units 'UserSpaceOnUse'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:clip_units=>"objectboundingbox")
+      assert_match(/clip-units 'ObjectBoundingBox'/, drawing.inspect)
+
+      assert_raise(ArgumentError) do
+         drawing.with(:clip_units=>"bogus") {}
+      end
+
+      drawing = MagickWand::Drawing.new   # :decoration
+      drawing.with(:decoration=>"none") {}
+      assert_match(/decorate 'None'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:decoration=>"linethrough") {}
+      assert_match(/decorate 'LineThrough'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:decoration=>"overline") {}
+      assert_match(/decorate 'Overline'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:decoration=>"underline") {}
+      assert_match(/decorate 'Underline'/, drawing.inspect)
+
+      assert_raise(ArgumentError) do
+         drawing.with(:decoration=>"linethru") {}
+      end
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:encoding=>"adobecustom") {}
+      assert_match(/encoding 'adobecustom'/, drawing.inspect)
+      drawing.with(:encoding=>"notanencoding") {}  # no bad encodings!
+      assert_match(/encoding 'notanencoding'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:fill_rule=>"nonzero") {}
+      assert_match(/fill-rule 'NonZero'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:fill_rule=>"evenodd") {}
+      assert_match(/fill-rule 'Evenodd'/, drawing.inspect)
+
+      assert_raise(ArgumentError) do
+         drawing.with(:fill_rule=>"bogus") {}
+      end
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:family=>"arial") {}
+      assert_match(/font-family 'arial'/, drawing.inspect)
+      drawing.with(:family=>"notafamily") {} # no bad families!
+      assert_match(/font-family 'notafamily'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:fill=>"red") {}
+      assert_match(/fill '#FFFF00000000'/, drawing.inspect)
+      drawing.with(:fill=>"notafill") {} # no bad fills!
+      assert_match(/fill '#000000000000'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:fill_opacity=>0.5) {}
+      assert_match(/fill-opacity 0.5/, drawing.inspect)
+      drawing.with(:fill_opacity=>20) {} # no bad values!
+      assert_match(/fill-opacity 1/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:font=>"Times-Roman") {}
+      assert_match(/font 'Times-Roman'/, drawing.inspect)
+      drawing.with(:font=>"notafont") {} # no bad fonts!
+      assert_match(/font 'notafont'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:gravity=>"northwest")
+      assert_match(/gravity 'NorthWest'/, drawing.inspect)
+      drawing.with(:gravity=>"north")
+      assert_match(/gravity 'North'/, drawing.inspect)
+      drawing.with(:gravity=>"northeast")
+      assert_match(/gravity 'NorthEast'/, drawing.inspect)
+      drawing.with(:gravity=>"west")
+      assert_match(/gravity 'West'/, drawing.inspect)
+      drawing.with(:gravity=>"center")
+      assert_match(/gravity 'Center'/, drawing.inspect)
+      drawing.with(:gravity=>"east")
+      assert_match(/gravity 'East'/, drawing.inspect)
+      drawing.with(:gravity=>"southwest")
+      assert_match(/gravity 'SouthWest'/, drawing.inspect)
+      drawing.with(:gravity=>"south")
+      assert_match(/gravity 'South'/, drawing.inspect)
+      drawing.with(:gravity=>"southeast")
+      assert_match(/gravity 'SouthEast'/, drawing.inspect)
+
+      assert_raise(ArgumentError) do
+         drawing.with(:gravity=>"xxx") {}
+      end
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:interword_spacing=>5) {}
+      # actual match is 5.000000
+      assert_match(/interword_spacing 5(\.[0]+)/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:kerning=>5) {}
+      assert_match(/kerning 5/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:pointsize=>5) {}
+      assert_match(/font-size 5/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:stretch=>"any") {}
+      assert_match(/font-stretch 'Any'/, drawing.inspect)
+      drawing.with(:stretch=>"condensed") {}
+      assert_match(/font-stretch 'Condensed'/, drawing.inspect)
+      drawing.with(:stretch=>"expanded") {}
+      assert_match(/font-stretch 'Expanded'/, drawing.inspect)
+      drawing.with(:stretch=>"extracondensed") {}
+      assert_match(/font-stretch 'ExtraCondensed'/, drawing.inspect)
+      drawing.with(:stretch=>"extraexpanded") {}
+      assert_match(/font-stretch 'ExtraExpanded'/, drawing.inspect)
+      drawing.with(:stretch=>"normal") {}
+      assert_match(/font-stretch 'Normal'/, drawing.inspect)
+      drawing.with(:stretch=>"semicondensed") {}
+      assert_match(/font-stretch 'SemiCondensed'/, drawing.inspect)
+      drawing.with(:stretch=>"SemiExpanded") {}
+      assert_match(/font-stretch 'SemiExpanded'/, drawing.inspect)
+      drawing.with(:stretch=>"ultracondensed") {}
+      assert_match(/font-stretch 'UltraCondensed'/, drawing.inspect)
+      drawing.with(:stretch=>"ultraexpanded") {}
+      assert_match(/font-stretch 'UltraExpanded'/, drawing.inspect)
+
+      assert_raise(ArgumentError) do
+         drawing.with(:stretch=>"notastretch") {}
+      end
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:stroke=>"red") {}
+      assert_match(/stroke '#FFFF00000000'/, drawing.inspect)
+      drawing.with(:stroke=>"notastroke") {} # no bad strokes!
+      assert_match(/stroke '#000000000000'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new         # ::dash_array
+      drawing.with(:dash_array=>[3, 5.5, 7.25]) {}
+      assert_match(/stroke-dasharray 3,5.5,7.25/, drawing.inspect)
+      drawing.with(:dash_array=>nil) {}
+      assert_match(/stroke-dasharray none/, drawing.inspect)
+      drawing = MagickWand::Drawing.new
+      drawing.with(:dash_array=>[]) {}
+      assert_match(/stroke-dasharray none/, drawing.inspect)
+
+      drawing.with(:dash_offset=>1) {}
+      assert_match(/stroke-dashoffset 1/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:line_cap=>"butt") {}
+      assert_match(/stroke-linecap 'Butt'/, drawing.inspect)
+      drawing = MagickWand::Drawing.new
+      drawing.with(:line_cap=>"round") {}
+      assert_match(/stroke-linecap 'Round'/, drawing.inspect)
+      drawing = MagickWand::Drawing.new
+      drawing.with(:line_cap=>"square") {}
+      assert_match(/stroke-linecap 'Square'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:line_join=>"bevel") {}
+      assert_match(/stroke-linejoin 'Bevel'/, drawing.inspect)
+      drawing = MagickWand::Drawing.new
+      drawing.with(:line_join=>"miter") {}
+      assert_match(/stroke-linejoin 'Miter'/, drawing.inspect)
+      drawing = MagickWand::Drawing.new
+      drawing.with(:line_join=>"round") {}
+      assert_match(/stroke-linejoin 'Round'/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:miter_limit=>15) {}
+      assert_match(/stroke-miterlimit 15/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:stroke_opacity=>0.5) {}
+      assert_match(/stroke-opacity 0.5/, drawing.inspect)
+      drawing.with(:stroke_opacity=>20) {} # no bad values!
+      assert_match(/stroke-opacity 1/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:stroke_width=>5) {}
+      assert_match(/stroke-width 5/, drawing.inspect)
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:style=>"any") {}
+      assert_match(/font-style 'Any'/, drawing.inspect)
+      drawing.with(:style=>"italic") {}
+      assert_match(/font-style 'Italic'/, drawing.inspect)
+      drawing.with(:style=>"normal") {}
+      assert_match(/font-style 'Normal'/, drawing.inspect)
+      drawing.with(:style=>"oblique") {}
+      assert_match(/font-style 'Oblique'/, drawing.inspect)
+
+      assert_raise(ArgumentError) do
+         drawing.with(:style=>"notastyle") {}
+      end
+
+      drawing = MagickWand::Drawing.new
+      drawing.with(:undercolor=>"red") {}
+      assert_match(/undercolor '#FFFF00000000'/, drawing.inspect)
+      drawing.with(:undercolor=>"notaundercolor") {} # no bad undercolors!
+      assert_match(/undercolor '#000000000000'/, drawing.inspect)
+
+      # unknown option
+      assert_raise(ArgumentError) do
+         drawing.with(:noanoption=>22) {}
+      end
+
+      drawing.freeze
+      assert_raise(FreezeError) do
+         drawing.with(:style=>"any") {}
+      end
+   end
+
+   def test_wrap
+      drawing = MagickWand::Drawing.new
+      # doesn't accept arguments
+      assert_raise(ArgumentError) { drawing.wrap(1) }
+      # a block is required
+      assert_raise(LocalJumpError) { drawing.wrap }
+   end
+end