emf 0.1.2 → 0.2.0

data/lib/emf/emf_plus/records/primitives/relative_coordinate.rb

@@ -0,0 +1,32 @@
+# frozen_string_literal: true
+
+require "bindata"
+
+module Emf
+  module EmfPlus
+    module Records
+      module Primitives
+        # One EmfPlusInteger7 (2.2.2.21) or EmfPlusInteger15 (2.2.2.22). The
+        # first byte decides: high bit clear is a 7-bit value, set is a 15-bit
+        # value whose high byte comes first. The width is kept so it re-encodes.
+        class RelativeCoordinate < Body
+          endian :little
+          uint8 :lead
+          uint8 :low, onlyif: -> { lead.anybits?(0x80) }
+
+          def wide? = lead.anybits?(0x80)
+
+          def to_i
+            wide? ? sign_extend(((lead & 0x7F) << 8) | low, 15) : sign_extend(lead, 7)
+          end
+
+          private
+
+          def sign_extend(raw, bits)
+            raw.anybits?(1 << (bits - 1)) ? raw - (1 << bits) : raw
+          end
+        end
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/primitives/string_format_data.rb

@@ -0,0 +1,23 @@
+# frozen_string_literal: true
+
+require "bindata"
+require "emf/binary/float32_le"
+require "emf/emf_plus/records/primitives/bounded_array"
+require "emf/emf_plus/records/primitives/character_range"
+
+module Emf
+  module EmfPlus
+    module Records
+      module Primitives
+        # EmfPlusStringFormatData (2.2.2.44). Both arrays are sized by the
+        # parent EmfPlusStringFormat's TabStopCount and RangeCount.
+        class StringFormatData < Body
+          endian :little
+          mandatory_parameters :tab_stop_count, :range_count
+          bounded_array :tab_stops, type: :float32_le, element_size: 4, initial_length: :tab_stop_count
+          bounded_array :char_ranges, type: :character_range, element_size: 8, initial_length: :range_count
+        end
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/primitives/transform_matrix.rb

@@ -0,0 +1,23 @@
+# frozen_string_literal: true
+
+require "bindata"
+require "emf/binary/float32_le"
+
+module Emf
+  module EmfPlus
+    module Records
+      module Primitives
+        # EmfPlusTransformMatrix (2.2.2.47): m11, m12, m21, m22, dx, dy.
+        class TransformMatrix < Body
+          endian :little
+          float32_le :m11
+          float32_le :m12
+          float32_le :m21
+          float32_le :m22
+          float32_le :dx
+          float32_le :dy
+        end
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/primitives.rb

@@ -0,0 +1,41 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # Shared EMF+ structures (MS-EMFPLUS 2.2.2). Record files require the ones
+      # they use; the autoloads let callers reach any of them directly.
+      module Primitives
+        autoload :ARGB, "emf/emf_plus/records/primitives/argb"
+        autoload :Bitmap, "emf/emf_plus/records/primitives/bitmap"
+        autoload :BitmapData, "emf/emf_plus/records/primitives/bitmap_data"
+        autoload :BlendColors, "emf/emf_plus/records/primitives/blend_colors"
+        autoload :BlendFactors, "emf/emf_plus/records/primitives/blend_factors"
+        autoload :ByteReader, "emf/emf_plus/records/primitives/byte_reader"
+        autoload :CharacterRange, "emf/emf_plus/records/primitives/character_range"
+        autoload :CompressedImage, "emf/emf_plus/records/primitives/compressed_image"
+        autoload :FocusScaleData, "emf/emf_plus/records/primitives/focus_scale_data"
+        autoload :GraphicsVersion, "emf/emf_plus/records/primitives/graphics_version"
+        autoload :LanguageIdentifier, "emf/emf_plus/records/primitives/language_identifier"
+        autoload :Metafile, "emf/emf_plus/records/primitives/metafile"
+        autoload :Palette, "emf/emf_plus/records/primitives/palette"
+        autoload :Path, "emf/emf_plus/records/primitives/path"
+        autoload :PathPointType, "emf/emf_plus/records/primitives/path_point_type"
+        autoload :PathPointTypeRLE, "emf/emf_plus/records/primitives/path_point_type_rle"
+        autoload :Point, "emf/emf_plus/records/primitives/point"
+        autoload :PointArray, "emf/emf_plus/records/primitives/point_array"
+        autoload :PointF, "emf/emf_plus/records/primitives/point_f"
+        autoload :PointR, "emf/emf_plus/records/primitives/point_r"
+        autoload :Rect, "emf/emf_plus/records/primitives/rect"
+        autoload :RectArray, "emf/emf_plus/records/primitives/rect_array"
+        autoload :RectF, "emf/emf_plus/records/primitives/rect_f"
+        autoload :RegionNode, "emf/emf_plus/records/primitives/region_node"
+        autoload :RegionNodeChildNodes, "emf/emf_plus/records/primitives/region_node_child_nodes"
+        autoload :RegionNodePath, "emf/emf_plus/records/primitives/region_node_path"
+        autoload :RelativeCoordinate, "emf/emf_plus/records/primitives/relative_coordinate"
+        autoload :StringFormatData, "emf/emf_plus/records/primitives/string_format_data"
+        autoload :TransformMatrix, "emf/emf_plus/records/primitives/transform_matrix"
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/reset_clip.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusResetClip (2.3.1.2): no body; Flags are reserved.
+      class ResetClip < Base
+        TYPE = 0x4031
+
+        class ResetClipBody < Body
+          endian :little
+        end
+        BODY = ResetClipBody
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/reset_world_transform.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusResetWorldTransform (2.3.9.2): no body; Flags are unused.
+      class ResetWorldTransform < Base
+        TYPE = 0x402B
+
+        class ResetWorldTransformBody < Body
+          endian :little
+        end
+        BODY = ResetWorldTransformBody
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/restore.rb

@@ -0,0 +1,20 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusRestore (2.3.7.4): restores the graphics state saved under StackIndex.
+      class Restore < Base
+        TYPE = 0x4026
+
+        class RestoreBody < Body
+          endian :little
+          uint32 :stack_index
+        end
+        BODY = RestoreBody
+
+        def stack_index = body.stack_index.to_i
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/rotate_world_transform.rb

@@ -0,0 +1,24 @@
+# frozen_string_literal: true
+
+require "emf/binary/float32_le"
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusRotateWorldTransform (2.3.9.3): rotation by angle degrees.
+      class RotateWorldTransform < Base
+        include PostMultiplyFlag
+
+        TYPE = 0x402F
+
+        class RotateWorldTransformBody < Body
+          endian :little
+          float32_le :angle
+        end
+        BODY = RotateWorldTransformBody
+
+        def angle = body.angle
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/save.rb

@@ -0,0 +1,20 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSave (2.3.7.5): saves the graphics state under StackIndex.
+      class Save < Base
+        TYPE = 0x4025
+
+        class SaveBody < Body
+          endian :little
+          uint32 :stack_index
+        end
+        BODY = SaveBody
+
+        def stack_index = body.stack_index.to_i
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/scale_world_transform.rb

@@ -0,0 +1,26 @@
+# frozen_string_literal: true
+
+require "emf/binary/float32_le"
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusScaleWorldTransform (2.3.9.4): scaling by sx, sy.
+      class ScaleWorldTransform < Base
+        include PostMultiplyFlag
+
+        TYPE = 0x402E
+
+        class ScaleWorldTransformBody < Body
+          endian :little
+          float32_le :sx
+          float32_le :sy
+        end
+        BODY = ScaleWorldTransformBody
+
+        def sx = body.sx
+        def sy = body.sy
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/serializable_object.rb

@@ -0,0 +1,32 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSerializableObject (2.3.5.2): an image effect parameter block
+      # identified by GUID. Flags are unused.
+      class SerializableObject < Base
+        TYPE = 0x4038
+
+        class SerializableObjectBody < Body
+          endian :little
+          string :object_guid_bytes, length: 16
+          uint32 :buffer_size
+          string :buffer, read_length: :buffer_size
+        end
+        BODY = SerializableObjectBody
+
+        def buffer_size = body.buffer_size
+        def buffer = body.buffer.to_s
+
+        def effect = Effects.decode(self)
+
+        def object_guid
+          raw = body.object_guid_bytes.to_s
+          [raw[0, 4].reverse, raw[4, 2].reverse, raw[6, 2].reverse, raw[8, 2], raw[10, 6]]
+            .map { |part| part.unpack1("H*") }.join("-")
+        end
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_anti_alias_mode.rb

@@ -0,0 +1,25 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetAntiAliasMode (2.3.6.1): no body. Flags bit A turns
+      # anti-aliasing on; the next seven bits are the SmoothingMode value.
+      class SetAntiAliasMode < Base
+        TYPE = 0x401E
+        ANTI_ALIAS_FLAG = 0x0001
+        SMOOTHING_MODE_MASK = 0x00FE
+
+        class SetAntiAliasModeBody < Body
+          endian :little
+        end
+        BODY = SetAntiAliasModeBody
+
+        def flag_fields = { anti_alias: ANTI_ALIAS_FLAG, smoothing_mode: SMOOTHING_MODE_MASK }
+
+        def anti_alias? = flags.anybits?(ANTI_ALIAS_FLAG)
+        def smoothing_mode = (flags & SMOOTHING_MODE_MASK) >> 1
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_clip_path.rb

@@ -0,0 +1,20 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetClipPath (2.3.1.3): combines the clip with the EmfPlusPath
+      # object named by the ObjectID flag byte. No body.
+      class SetClipPath < Base
+        include CombineModeFlags
+
+        TYPE = 0x4033
+
+        class SetClipPathBody < Body
+          endian :little
+        end
+        BODY = SetClipPathBody
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_clip_rect.rb

@@ -0,0 +1,24 @@
+# frozen_string_literal: true
+
+require "emf/emf_plus/records/primitives/rect_f"
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetClipRect (2.3.1.4): combines the clip with ClipRect.
+      class SetClipRect < Base
+        include CombineModeFlags
+
+        TYPE = 0x4032
+
+        class SetClipRectBody < Body
+          endian :little
+          rect_f :clip_rect
+        end
+        BODY = SetClipRectBody
+
+        def clip_rect = body.clip_rect
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_clip_region.rb

@@ -0,0 +1,20 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetClipRegion (2.3.1.5): combines the clip with the EmfPlusRegion
+      # object named by the ObjectID flag byte. No body.
+      class SetClipRegion < Base
+        include CombineModeFlags
+
+        TYPE = 0x4034
+
+        class SetClipRegionBody < Body
+          endian :little
+        end
+        BODY = SetClipRegionBody
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_compositing_mode.rb

@@ -0,0 +1,21 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetCompositingMode (2.3.6.2): no body; the CompositingMode value is the low flag byte.
+      class SetCompositingMode < Base
+        TYPE = 0x4023
+
+        class SetCompositingModeBody < Body
+          endian :little
+        end
+        BODY = SetCompositingModeBody
+
+        def flag_fields = { compositing_mode: 0xFF }
+
+        def compositing_mode = flags & 0xFF
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_compositing_quality.rb

@@ -0,0 +1,21 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetCompositingQuality (2.3.6.3): no body; the CompositingQuality value is the low flag byte.
+      class SetCompositingQuality < Base
+        TYPE = 0x4024
+
+        class SetCompositingQualityBody < Body
+          endian :little
+        end
+        BODY = SetCompositingQualityBody
+
+        def flag_fields = { compositing_quality: 0xFF }
+
+        def compositing_quality = flags & 0xFF
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_interpolation_mode.rb

@@ -0,0 +1,21 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetInterpolationMode (2.3.6.4): no body; the InterpolationMode value is the low flag byte.
+      class SetInterpolationMode < Base
+        TYPE = 0x4021
+
+        class SetInterpolationModeBody < Body
+          endian :little
+        end
+        BODY = SetInterpolationModeBody
+
+        def flag_fields = { interpolation_mode: 0xFF }
+
+        def interpolation_mode = flags & 0xFF
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_page_transform.rb

@@ -0,0 +1,25 @@
+# frozen_string_literal: true
+
+require "emf/binary/float32_le"
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetPageTransform (2.3.9.5): page_unit is the low Flags byte (UnitType).
+      class SetPageTransform < Base
+        TYPE = 0x4030
+
+        class SetPageTransformBody < Body
+          endian :little
+          float32_le :page_scale
+        end
+        BODY = SetPageTransformBody
+
+        def flag_fields = { page_unit: 0x00FF }
+
+        def page_unit = flags & 0x00FF
+        def page_scale = body.page_scale
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_pixel_offset_mode.rb

@@ -0,0 +1,21 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetPixelOffsetMode (2.3.6.5): no body; the PixelOffsetMode value is the low flag byte.
+      class SetPixelOffsetMode < Base
+        TYPE = 0x4022
+
+        class SetPixelOffsetModeBody < Body
+          endian :little
+        end
+        BODY = SetPixelOffsetModeBody
+
+        def flag_fields = { pixel_offset_mode: 0xFF }
+
+        def pixel_offset_mode = flags & 0xFF
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_rendering_origin.rb

@@ -0,0 +1,22 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetRenderingOrigin (2.3.6.6). Flags are unused.
+      class SetRenderingOrigin < Base
+        TYPE = 0x401D
+
+        class SetRenderingOriginBody < Body
+          endian :little
+          int32 :x
+          int32 :y
+        end
+        BODY = SetRenderingOriginBody
+
+        def x = body.x.to_i
+        def y = body.y.to_i
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_text_contrast.rb

@@ -0,0 +1,24 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetTextContrast (2.3.6.7): no body. The low 12 flag bits hold
+      # the text gamma multiplied by 1000.
+      class SetTextContrast < Base
+        TYPE = 0x4020
+        CONTRAST_MASK = 0x0FFF
+
+        class SetTextContrastBody < Body
+          endian :little
+        end
+        BODY = SetTextContrastBody
+
+        def flag_fields = { text_contrast: CONTRAST_MASK }
+
+        def text_contrast = flags & CONTRAST_MASK
+        def gamma = text_contrast / 1000.0
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_text_rendering_hint.rb

@@ -0,0 +1,21 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetTextRenderingHint (2.3.6.8): no body; the TextRenderingHint value is the low flag byte.
+      class SetTextRenderingHint < Base
+        TYPE = 0x401F
+
+        class SetTextRenderingHintBody < Body
+          endian :little
+        end
+        BODY = SetTextRenderingHintBody
+
+        def flag_fields = { text_rendering_hint: 0xFF }
+
+        def text_rendering_hint = flags & 0xFF
+      end
+    end
+  end
+end

data/lib/emf/emf_plus/records/set_ts_clip.rb

@@ -0,0 +1,40 @@
+# frozen_string_literal: true
+
+module Emf
+  module EmfPlus
+    module Records
+      # EmfPlusSetTSClip (2.3.8.1). Flag C selects 4-byte (compressed) or
+      # 8-byte rectangles. Only the 8-byte form (four INT16: x, y, width,
+      # height, the EmfPlusRect layout) is decoded into rectangles; the
+      # compressed byte stream stays raw in `rect_data`: the spec's scheme is
+      # 1-or-2 bytes per point, delta-coded against the previous rectangle,
+      # but it does not name the four coded values, the two-byte sign rule or
+      # the first rectangle's reference, and it contradicts itself by also
+      # fixing 4 bytes per rectangle.
+      class SetTSClip < Base
+        TYPE = 0x403A
+        COMPRESSED_FLAG = 0x8000
+        COUNT_MASK = 0x7FFF
+
+        class SetTSClipBody < Body
+          endian :little
+          mandatory_parameter :data_size
+          string :rect_data, read_length: :data_size
+        end
+        BODY = SetTSClipBody
+
+        def flag_fields = { compressed: COMPRESSED_FLAG, rect_count: COUNT_MASK }
+
+        def compressed? = flags.anybits?(COMPRESSED_FLAG)
+        def rect_count = flags & COUNT_MASK
+        def rect_data = body.rect_data.to_s
+
+        def rects
+          return [] if compressed?
+
+          rect_data.unpack("s<*").each_slice(4).first(rect_count)
+        end
+      end
+    end
+  end
+end