parallel588/emf

module Emf
  module EmfDraw
    module ClassMethods
      [:emr_polygon16,
       :emr_polyline16,
       :emr_polylineto16,
       :emr_polybezier16,
       :emr_polybezierto16 ].each do |polygon_method|
        define_method(polygon_method) { |params| parse_poly_params(params,:point_s) }
      end


      [:emr_polygon,
       :emr_polyline,
       :emr_polylineto,
       :emr_polybezier,
       :emr_polybezierto ].each do |polygon_method|
        define_method(polygon_method) { |params| parse_poly_params(params,:point_l) }
      end

      [:emr_lineto].each do |method|
        define_method(method) { |params| {:points => point_l(params) } }
      end

      [:emr_fillpath,:emr_strokeandfillpath,:emr_strokepath].each do |m|
        define_method(m) { |params| {:bounds => rect_l(params) } }
      end
      def emr_rectangle params
        {:box => rect_l(params) }
      end
      def emr_anglearc params
        {
          :bounds => point_l(params),
          :center => params[8..11].unpack("I").first,
          :start_angle => params[12..15].unpack("I").first,
          :end_angle => params[15..19].unpack("I").first
        }
      end


      [:emr_arc, :emr_arcto,:emr_chord].each do |method|
        define_method(method) do |params|
          return nil if params.size < 31
          {
            :box   => rect_l(params),
            :start => point_l(params[16..23]),
            :end   => point_l(params[24..31])
          }
        end
      end

      def emr_ellipse params
        return nil if params.size < 15
        {:box => rect_l(params)}
      end
      def emr_extfloodfill params
        { :start => point_l(params),
          :color => color_ref(params[8..11]),
          :floodfillmode => params[12..15].unpack("I").first }
      end

      def emr_polydraw params
        parse_poly_draw(params,:point_l)
      end
      def emr_polydraw16 params
        parse_poly_draw(params,:point_s)
      end

 # [:emr_arc, :emr_arcto,:emr_chord].each do |method|
 #        define_method(method) do |params|
 #          return nil if params.size < 31
 #          {
 #            :box   => rect_l(params),
 #            :start => point_l(params[16..23]),
 #            :end   => point_l(params[24..31])
 #          }
 #        end
 #      end
      [:emr_polypolygon,:emr_polypolyline].each do |method|
        define_method(method) do |params|
          @number_of_polygons = us_int(params[16..19])
          @count = us_int(params[20..23])
          { :bounds => rect_l(params),
            :number_of_polygons  => @number_of_polygons ,
            :count =>  @count,
            :polygon_point_count => points(@number_of_polygons,params[24..-1],:us_int),
            :points => points(@count,params[((24+@number_of_polygons*4))..-1],:point_l)
          }
        end
      end
      [:emr_polypolygon16,:emr_polypolyline16].each do |method|
        define_method(method) do |params|
          @number_of_polygons = us_int(params[16..19])
          @count = us_int(params[20..23])
          { :bounds => rect_l(params),
            :number_of_polygons  => @number_of_polygons ,
            :count =>  @count,
            :polygon_point_count => points(@number_of_polygons,params[24..-1],:us_int),
            :points => points(@count,params[((24+@number_of_polygons*4))..-1],:point_s)
          }
        end
      end

      def emr_pie params
        {
          :box => rect_l(params),
          :start => point_l(params[16..23]),
          :end => point_l(params[24..31])
        }
      end
      def emr_roundrect params
        {
          :box => rect_l(params),
          :corner => size_l(params[16..-1])
        }
      end
      def emr_setpixelv params
        {
          :pixel => point_l(params),
          :color => color_ref(params[8..-1])
        }
      end

      def emr_smalltextout params
        {
          :x => us_int(params[0..3]),
          :y => us_int(params[4..7]),
          :c_chars => us_int(params[8..11]),
          :fu_options => us_int(params[12..15]),
          :graphics_mode => us_int(params[16..19]),
          :ex_scale => float(params[20..23]),
          :ey_scale => float(params[24..27]),
          :bounds => rect_l(params[28..43]),
          :text => utf16_to_utf8(params[44..-1])

        }
      end

      # Методы для работы с текстом
      def emr_exttextouta params
        { :bounds => rect_l(params) }
      end
      def emr_exttextoutw params
        { :bounds => rect_l(params) }
      end

    end

    def self.included(klass)
      klass.module_eval do
        #include InstanceMethods
        extend ClassMethods
      end
    end
  end

end