emf 0.1.0

data/lib/emf/emr/binary/records/set_world_transform.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+require "bindata"
+require "emf/emr/binary/record"
+
+module Emf
+  module Emr
+    module Binary
+      module Records
+        class SetWorldTransform < Emf::Emr::Binary::Record
+          x_form :xform
+        end
+      end
+    end
+  end
+end

data/lib/emf/emr/binary/records/small_text_out.rb

@@ -0,0 +1,28 @@
+# frozen_string_literal: true
+
+require "bindata"
+require "emf/emr/binary/record"
+
+module Emf
+  module Emr
+    module Binary
+      module Records
+        # EMRSMALLTEXTOUT (MS-EMF 2.3.5.37).
+        # Layout: emr, Dest, cChars, fuOptions, iGraphicsMode, exScale (float),
+        # eyScale (float), [optional RECTL], TextString (1 or 2 bytes per char).
+        # The body bytes (after the fixed header) are deferred to the visitor
+        # for parsing because the layout depends on fuOptions.
+        class SmallTextOut < Emf::Emr::Binary::Record
+          int32 :x_dest
+          int32 :y_dest
+          uint32 :c_chars
+          uint32 :fu_options
+          uint32 :i_graphics_mode
+          float :ex_scale
+          float :ey_scale
+          rest :body
+        end
+      end
+    end
+  end
+end

data/lib/emf/emr/binary/records/stretch_blt.rb

@@ -0,0 +1,39 @@
+# frozen_string_literal: true
+
+require "bindata"
+require "emf/emr/binary/with_bounds"
+
+module Emf
+  module Emr
+    module Binary
+      module Records
+        # EMRSTRETCHBLT (MS-EMF 2.3.1.6).
+        # Layout: emr, rclBounds, Dest, cDest, dwRop, Src, xformSrc (24
+        # bytes), crBkColorSrc, iUsageSrc, offBmiSrc, cbBmiSrc,
+        # offBitsSrc, cbBitsSrc, cSrc, then trailing BMI/bitmap data.
+        # Only the fields the emfsvg renderer needs are declared; the
+        # 32-byte xform+bgcolor+usage blob in the middle is skipped via
+        # a fixed-size :bytes buffer (NOT :rest, which would consume the
+        # whole tail).
+        class StretchBlt < Emf::Emr::Binary::WithBounds
+          int32le :x_dest
+          int32le :y_dest
+          int32le :cx_dest
+          int32le :cy_dest
+          uint32le :dw_rop
+          int32le :x_src
+          int32le :y_src
+          # xformSrc (24 bytes) + crBkColorSrc (4) + iUsageSrc (4) = 32 bytes
+          string :xform_usage_etc, length: 32, read_trim_padding: true
+          uint32le :off_bmi_src
+          uint32le :cb_bmi_src
+          uint32le :off_bits_src
+          uint32le :cb_bits_src
+          int32le :cx_src
+          int32le :cy_src
+          rest :body
+        end
+      end
+    end
+  end
+end

data/lib/emf/emr/binary/records/stretch_dibits.rb

@@ -0,0 +1,42 @@
+# frozen_string_literal: true
+
+require "bindata"
+require "emf/emr/binary/with_bounds"
+
+module Emf
+  module Emr
+    module Binary
+      module Records
+        # EMR_STRETCHDIBITS per MS-EMF 2.3.1.7. The full layout:
+        #   emr
+        #   rclBounds (RECTL)
+        #   xDest, yDest (int32)
+        #   xSrc, ySrc (int32)
+        #   cxSrc, cySrc (int32)
+        #   offBmiSrc, cbBmiSrc (uint32) — offset/size of BITMAPINFO from record start
+        #   offBitsSrc, cbBitsSrc (uint32) — offset/size of pixel array from record start
+        #   iUsageSrc (uint32) — DIBColors
+        #   dwRop (uint32) — ternary raster op
+        #   cxDest, cyDest (int32)
+        #   [trailing BITMAPINFO + pixel array]
+        class StretchDIBits < Emf::Emr::Binary::WithBounds
+          int32 :x_dest
+          int32 :y_dest
+          int32 :x_src
+          int32 :y_src
+          int32 :cx_src
+          int32 :cy_src
+          uint32 :off_bmi_src
+          uint32 :cb_bmi_src
+          uint32 :off_bits_src
+          uint32 :cb_bits_src
+          uint32 :i_usage_src
+          uint32 :dw_rop
+          int32 :cx_dest
+          int32 :cy_dest
+          rest :trailing
+        end
+      end
+    end
+  end
+end

data/lib/emf/emr/binary/records/stroke_and_fill_path.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+require "bindata"
+require "emf/emr/binary/with_bounds"
+
+module Emf
+  module Emr
+    module Binary
+      module Records
+        # EMR_STROKE_AND_FILL_PATH: emr + rclBounds per MS-EMF 2.3.5.9/2.3.5.38/2.3.5.39.
+        class StrokeAndFillPath < Emf::Emr::Binary::WithBounds
+        end
+      end
+    end
+  end
+end

data/lib/emf/emr/binary/records/stroke_path.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+require "bindata"
+require "emf/emr/binary/with_bounds"
+
+module Emf
+  module Emr
+    module Binary
+      module Records
+        # EMR_STROKE_PATH: emr + rclBounds per MS-EMF 2.3.5.9/2.3.5.38/2.3.5.39.
+        class StrokePath < Emf::Emr::Binary::WithBounds
+        end
+      end
+    end
+  end
+end

data/lib/emf/emr/binary/records/transparent_blt.rb

@@ -0,0 +1,17 @@
+# frozen_string_literal: true
+
+require "bindata"
+require "emf/emr/binary/with_bounds"
+
+module Emf
+  module Emr
+    module Binary
+      module Records
+        # Stub: leading fields per MS-EMF, body captures remaining bytes.
+        class TransparentBlt < Emf::Emr::Binary::WithBounds
+          rest :body
+        end
+      end
+    end
+  end
+end

data/lib/emf/emr/binary/records/widen_path.rb

@@ -0,0 +1,16 @@
+# frozen_string_literal: true
+
+require "bindata"
+require "emf/emr/binary/record"
+
+module Emf
+  module Emr
+    module Binary
+      module Records
+        # Control record with no payload (just iType and nSize).
+        class WidenPath < Emf::Emr::Binary::Record
+        end
+      end
+    end
+  end
+end

data/lib/emf/emr/binary/records.rb

@@ -0,0 +1,258 @@
+# frozen_string_literal: true
+
+# Ensure the shared bindata primitives (rectl, point_l, color_ref, etc.) are
+# registered before any record class is parsed. Referencing the constant
+# triggers autoload of emf/binary/types, which calls
+# BinData::RegisteredClasses.register for each primitive.
+
+module Emf
+  module Emr
+    module Binary
+      module Records
+        autoload :Raw, "emf/emr/binary/records/raw"
+        autoload :Eof, "emf/emr/binary/records/eof"
+        autoload :SetTextColor, "emf/emr/binary/records/set_text_color"
+        autoload :SetBkColor, "emf/emr/binary/records/set_bk_color"
+        autoload :SetBkMode, "emf/emr/binary/records/set_bk_mode"
+        autoload :SetMapMode, "emf/emr/binary/records/set_map_mode"
+        autoload :SetRop2, "emf/emr/binary/records/set_rop2"
+        autoload :SetPolyFillMode, "emf/emr/binary/records/set_poly_fill_mode"
+        autoload :SetTextAlign, "emf/emr/binary/records/set_text_align"
+        autoload :SetStretchBltMode, "emf/emr/binary/records/set_stretch_blt_mode"
+        autoload :SaveDc, "emf/emr/binary/records/save_dc"
+        autoload :RestoreDc, "emf/emr/binary/records/restore_dc"
+        autoload :SelectObject, "emf/emr/binary/records/select_object"
+        autoload :DeleteObject, "emf/emr/binary/records/delete_object"
+        autoload :CreatePen, "emf/emr/binary/records/create_pen"
+        autoload :CreateBrushIndirect, "emf/emr/binary/records/create_brush_indirect"
+        autoload :SetWindowOrgEx, "emf/emr/binary/records/set_window_org_ex"
+        autoload :SetWindowExtEx, "emf/emr/binary/records/set_window_ext_ex"
+        autoload :SetViewportOrgEx, "emf/emr/binary/records/set_viewport_org_ex"
+        autoload :SetViewportExtEx, "emf/emr/binary/records/set_viewport_ext_ex"
+        autoload :SetBrushOrgEx, "emf/emr/binary/records/set_brush_org_ex"
+        autoload :MoveToEx, "emf/emr/binary/records/move_to_ex"
+        autoload :LineTo, "emf/emr/binary/records/line_to"
+        autoload :Rectangle, "emf/emr/binary/records/rectangle"
+        autoload :Ellipse, "emf/emr/binary/records/ellipse"
+        autoload :RoundRect, "emf/emr/binary/records/round_rect"
+        autoload :Arc, "emf/emr/binary/records/arc"
+        autoload :ArcTo, "emf/emr/binary/records/arc_to"
+        autoload :Chord, "emf/emr/binary/records/chord"
+        autoload :Pie, "emf/emr/binary/records/pie"
+        autoload :AngleArc, "emf/emr/binary/records/angle_arc"
+        autoload :SetArcDirection, "emf/emr/binary/records/set_arc_direction"
+        autoload :Polygon, "emf/emr/binary/records/polygon"
+        autoload :Polyline, "emf/emr/binary/records/polyline"
+        autoload :PolyBezier, "emf/emr/binary/records/poly_bezier"
+        autoload :Polygon16, "emf/emr/binary/records/polygon16"
+        autoload :Polyline16, "emf/emr/binary/records/polyline16"
+        autoload :PolyBezier16, "emf/emr/binary/records/poly_bezier16"
+        autoload :PolyBezierTo, "emf/emr/binary/records/poly_bezier_to"
+        autoload :PolyBezierTo16, "emf/emr/binary/records/poly_bezier_to16"
+        autoload :PolylineTo, "emf/emr/binary/records/polyline_to"
+        autoload :PolylineTo16, "emf/emr/binary/records/polyline_to16"
+        autoload :PolyDraw, "emf/emr/binary/records/poly_draw"
+        autoload :PolyDraw16, "emf/emr/binary/records/poly_draw16"
+        autoload :PolyPolyline, "emf/emr/binary/records/poly_polyline"
+        autoload :PolyPolygon, "emf/emr/binary/records/poly_polygon"
+        autoload :PolyPolyline16, "emf/emr/binary/records/poly_polyline16"
+        autoload :PolyPolygon16, "emf/emr/binary/records/poly_polygon16"
+        autoload :Comment, "emf/emr/binary/records/comment"
+        autoload :SetWorldTransform, "emf/emr/binary/records/set_world_transform"
+        autoload :ModifyWorldTransform, "emf/emr/binary/records/modify_world_transform"
+        autoload :BeginPath, "emf/emr/binary/records/begin_path"
+        autoload :EndPath, "emf/emr/binary/records/end_path"
+        autoload :CloseFigure, "emf/emr/binary/records/close_figure"
+        autoload :FillPath, "emf/emr/binary/records/fill_path"
+        autoload :StrokePath, "emf/emr/binary/records/stroke_path"
+        autoload :StrokeAndFillPath, "emf/emr/binary/records/stroke_and_fill_path"
+        autoload :FlattenPath, "emf/emr/binary/records/flatten_path"
+        autoload :WidenPath, "emf/emr/binary/records/widen_path"
+        autoload :SelectClipPath, "emf/emr/binary/records/select_clip_path"
+        autoload :AbortPath, "emf/emr/binary/records/abort_path"
+        autoload :SetMiterLimit, "emf/emr/binary/records/set_miter_limit"
+        autoload :ExtTextOutW, "emf/emr/binary/records/ext_text_out_w"
+        autoload :ExtTextOutA, "emf/emr/binary/records/ext_text_out_a"
+        autoload :CreateFontIndirectW, "emf/emr/binary/records/create_font_indirect_w"
+        autoload :ExtCreatePen, "emf/emr/binary/records/ext_create_pen"
+        autoload :StretchDIBits, "emf/emr/binary/records/stretch_dibits"
+        autoload :SetPixelV, "emf/emr/binary/records/set_pixel_v"
+        autoload :SetMetArgn, "emf/emr/binary/records/set_metargn"
+        autoload :OffsetClipRgn, "emf/emr/binary/records/offset_clip_rgn"
+        autoload :ExcludeClipRect, "emf/emr/binary/records/exclude_clip_rect"
+        autoload :IntersectClipRect, "emf/emr/binary/records/intersect_clip_rect"
+        autoload :ExtSelectClipRgn, "emf/emr/binary/records/ext_select_clip_rgn"
+        autoload :ScaleViewportExtEx, "emf/emr/binary/records/scale_viewport_ext_ex"
+        autoload :ScaleWindowExtEx, "emf/emr/binary/records/scale_window_ext_ex"
+        autoload :SetMapperFlags, "emf/emr/binary/records/set_mapper_flags"
+        autoload :RealizePalette, "emf/emr/binary/records/realize_palette"
+        autoload :SelectPalette, "emf/emr/binary/records/select_palette"
+        autoload :CreatePalette, "emf/emr/binary/records/create_palette"
+        autoload :ResizePalette, "emf/emr/binary/records/resize_palette"
+        autoload :SetPaletteEntries, "emf/emr/binary/records/set_palette_entries"
+        autoload :ExtFloodFill, "emf/emr/binary/records/ext_flood_fill"
+        autoload :FillRgn, "emf/emr/binary/records/fill_rgn"
+        autoload :FrameRgn, "emf/emr/binary/records/frame_rgn"
+        autoload :InvertRgn, "emf/emr/binary/records/invert_rgn"
+        autoload :PaintRgn, "emf/emr/binary/records/paint_rgn"
+        autoload :BitBlt, "emf/emr/binary/records/bit_blt"
+        autoload :StretchBlt, "emf/emr/binary/records/stretch_blt"
+        autoload :MaskBlt, "emf/emr/binary/records/mask_blt"
+        autoload :PlgBlt, "emf/emr/binary/records/plg_blt"
+        autoload :SetDIBitsToDevice, "emf/emr/binary/records/set_dibits_to_device"
+        autoload :AlphaBlend, "emf/emr/binary/records/alpha_blend"
+        autoload :TransparentBlt, "emf/emr/binary/records/transparent_blt"
+        autoload :SetLayout, "emf/emr/binary/records/set_layout"
+        autoload :SetIcmMode, "emf/emr/binary/records/set_icm_mode"
+        autoload :CreateMonoBrush, "emf/emr/binary/records/create_mono_brush"
+        autoload :CreateDibPatternBrushPt, "emf/emr/binary/records/create_dib_pattern_brush_pt"
+        autoload :GradientFill, "emf/emr/binary/records/gradient_fill"
+        autoload :SmallTextOut, "emf/emr/binary/records/small_text_out"
+        autoload :DrawEscape, "emf/emr/binary/records/draw_escape"
+        autoload :ExtEscape, "emf/emr/binary/records/ext_escape"
+        autoload :NamedEscape, "emf/emr/binary/records/named_escape"
+        autoload :ColorCorrectPalette, "emf/emr/binary/records/color_correct_palette"
+        autoload :SetIcmProfileA, "emf/emr/binary/records/set_icm_profile_a"
+        autoload :SetIcmProfileW, "emf/emr/binary/records/set_icm_profile_w"
+        autoload :ForceUfiMapping, "emf/emr/binary/records/force_ufi_mapping"
+        autoload :SetLinkedUfis, "emf/emr/binary/records/set_linked_ufis"
+        autoload :ColorMatchToTargetW, "emf/emr/binary/records/colormatch_to_target_w"
+        autoload :CreateColorspaceW, "emf/emr/binary/records/create_colorspace_w"
+        autoload :CreateColorspace, "emf/emr/binary/records/create_colorspace"
+        autoload :SetColorspace, "emf/emr/binary/records/set_colorspace"
+        autoload :DeleteColorspace, "emf/emr/binary/records/delete_colorspace"
+        autoload :GlsRecord, "emf/emr/binary/records/gls_record"
+        autoload :GlsBoundedRecord, "emf/emr/binary/records/gls_bounded_record"
+        autoload :PolyTextOutA, "emf/emr/binary/records/poly_textout_a"
+        autoload :PolyTextOutW, "emf/emr/binary/records/poly_textout_w"
+        autoload :PixelFormat, "emf/emr/binary/records/pixel_format"
+        autoload :SetTextJustification, "emf/emr/binary/records/set_text_justification"
+
+        TYPE_TO_NAME = {
+          Binary::TypeCodes::EOF => :Eof,
+          Binary::TypeCodes::SETTEXTCOLOR => :SetTextColor,
+          Binary::TypeCodes::SETBKCOLOR => :SetBkColor,
+          Binary::TypeCodes::SETBKMODE => :SetBkMode,
+          Binary::TypeCodes::SETMAPMODE => :SetMapMode,
+          Binary::TypeCodes::SETROP2 => :SetRop2,
+          Binary::TypeCodes::SETPOLYFILLMODE => :SetPolyFillMode,
+          Binary::TypeCodes::SETTEXTALIGN => :SetTextAlign,
+          Binary::TypeCodes::SETSTRETCHBLTMODE => :SetStretchBltMode,
+          Binary::TypeCodes::SAVEDC => :SaveDc,
+          Binary::TypeCodes::RESTOREDC => :RestoreDc,
+          Binary::TypeCodes::SELECTOBJECT => :SelectObject,
+          Binary::TypeCodes::DELETEOBJECT => :DeleteObject,
+          Binary::TypeCodes::CREATEPEN => :CreatePen,
+          Binary::TypeCodes::CREATEBRUSHINDIRECT => :CreateBrushIndirect,
+          Binary::TypeCodes::SETWINDOWORGEX => :SetWindowOrgEx,
+          Binary::TypeCodes::SETWINDOWEXTEX => :SetWindowExtEx,
+          Binary::TypeCodes::SETVIEWPORTORGEX => :SetViewportOrgEx,
+          Binary::TypeCodes::SETVIEWPORTEXTEX => :SetViewportExtEx,
+          Binary::TypeCodes::SETBRUSHORGEX => :SetBrushOrgEx,
+          Binary::TypeCodes::MOVETOEX => :MoveToEx,
+          Binary::TypeCodes::LINETO => :LineTo,
+          Binary::TypeCodes::RECTANGLE => :Rectangle,
+          Binary::TypeCodes::ELLIPSE => :Ellipse,
+          Binary::TypeCodes::ROUNDRECT => :RoundRect,
+          Binary::TypeCodes::ARC => :Arc,
+          Binary::TypeCodes::ARCTO => :ArcTo,
+          Binary::TypeCodes::CHORD => :Chord,
+          Binary::TypeCodes::PIE => :Pie,
+          Binary::TypeCodes::ANGLEARC => :AngleArc,
+          Binary::TypeCodes::SETARCDIRECTION => :SetArcDirection,
+          Binary::TypeCodes::POLYGON => :Polygon,
+          Binary::TypeCodes::POLYLINE => :Polyline,
+          Binary::TypeCodes::POLYBEZIER => :PolyBezier,
+          Binary::TypeCodes::POLYGON16 => :Polygon16,
+          Binary::TypeCodes::POLYLINE16 => :Polyline16,
+          Binary::TypeCodes::POLYBEZIER16 => :PolyBezier16,
+          Binary::TypeCodes::POLYBEZIERTO => :PolyBezierTo,
+          Binary::TypeCodes::POLYBEZIERTO16 => :PolyBezierTo16,
+          Binary::TypeCodes::POLYLINETO => :PolylineTo,
+          Binary::TypeCodes::POLYLINETO16 => :PolylineTo16,
+          Binary::TypeCodes::POLYDRAW => :PolyDraw,
+          Binary::TypeCodes::POLYDRAW16 => :PolyDraw16,
+          Binary::TypeCodes::POLYPOLYLINE => :PolyPolyline,
+          Binary::TypeCodes::POLYPOLYGON => :PolyPolygon,
+          Binary::TypeCodes::POLYPOLYLINE16 => :PolyPolyline16,
+          Binary::TypeCodes::POLYPOLYGON16 => :PolyPolygon16,
+          Binary::TypeCodes::COMMENT => :Comment,
+          Binary::TypeCodes::SETWORLDTRANSFORM => :SetWorldTransform,
+          Binary::TypeCodes::MODIFYWORLDTRANSFORM => :ModifyWorldTransform,
+          Binary::TypeCodes::BEGINPATH => :BeginPath,
+          Binary::TypeCodes::ENDPATH => :EndPath,
+          Binary::TypeCodes::CLOSEFIGURE => :CloseFigure,
+          Binary::TypeCodes::FILLPATH => :FillPath,
+          Binary::TypeCodes::STROKEPATH => :StrokePath,
+          Binary::TypeCodes::STROKEANDFILLPATH => :StrokeAndFillPath,
+          Binary::TypeCodes::FLATTENPATH => :FlattenPath,
+          Binary::TypeCodes::WIDENPATH => :WidenPath,
+          Binary::TypeCodes::SELECTCLIPPATH => :SelectClipPath,
+          Binary::TypeCodes::ABORTPATH => :AbortPath,
+          Binary::TypeCodes::SETMITERLIMIT => :SetMiterLimit,
+          Binary::TypeCodes::EXTTEXTOUTW => :ExtTextOutW,
+          Binary::TypeCodes::EXTTEXTOUTA => :ExtTextOutA,
+          Binary::TypeCodes::EXTCREATEFONTINDIRECTW => :CreateFontIndirectW,
+          Binary::TypeCodes::EXTCREATEPEN => :ExtCreatePen,
+          Binary::TypeCodes::STRETCHDIBITS => :StretchDIBits,
+          Binary::TypeCodes::SETPIXELV => :SetPixelV,
+          Binary::TypeCodes::OFFSETCLIPRGN => :OffsetClipRgn,
+          Binary::TypeCodes::SETMETARGN => :SetMetArgn,
+          Binary::TypeCodes::EXCLUDECLIPRECT => :ExcludeClipRect,
+          Binary::TypeCodes::INTERSECTCLIPRECT => :IntersectClipRect,
+          Binary::TypeCodes::SCALEVIEWPORTEXTEX => :ScaleViewportExtEx,
+          Binary::TypeCodes::SCALEWINDOWEXTEX => :ScaleWindowExtEx,
+          Binary::TypeCodes::SETMAPPERFLAGS => :SetMapperFlags,
+          Binary::TypeCodes::REALIZEPALETTE => :RealizePalette,
+          Binary::TypeCodes::SELECTPALETTE => :SelectPalette,
+          Binary::TypeCodes::CREATEPALETTE => :CreatePalette,
+          Binary::TypeCodes::RESIZEPALETTE => :ResizePalette,
+          Binary::TypeCodes::SETPALETTEENTRIES => :SetPaletteEntries,
+          Binary::TypeCodes::EXTFLOODFILL => :ExtFloodFill,
+          Binary::TypeCodes::EXTSELECTCLIPRGN => :ExtSelectClipRgn,
+          Binary::TypeCodes::FILLRGN => :FillRgn,
+          Binary::TypeCodes::FRAMERGN => :FrameRgn,
+          Binary::TypeCodes::INVERTRGN => :InvertRgn,
+          Binary::TypeCodes::PAINTRGN => :PaintRgn,
+          Binary::TypeCodes::BITBLT => :BitBlt,
+          Binary::TypeCodes::STRETCHBLT => :StretchBlt,
+          Binary::TypeCodes::MASKBLT => :MaskBlt,
+          Binary::TypeCodes::PLGBLT => :PlgBlt,
+          Binary::TypeCodes::SETDIBITSTODEVICE => :SetDIBitsToDevice,
+          Binary::TypeCodes::ALPHABLEND => :AlphaBlend,
+          Binary::TypeCodes::SETLAYOUT => :SetLayout,
+          Binary::TypeCodes::TRANSPARENTBLT => :TransparentBlt,
+          Binary::TypeCodes::GRADIENTFILL => :GradientFill,
+          Binary::TypeCodes::SETICMMODE => :SetIcmMode,
+          Binary::TypeCodes::CREATEMONOBRUSH => :CreateMonoBrush,
+          Binary::TypeCodes::CREATEDIBPATTERNBRUSHPT => :CreateDibPatternBrushPt,
+          Binary::TypeCodes::SMALLTEXTOUT => :SmallTextOut,
+          Binary::TypeCodes::DRAWESCAPE => :DrawEscape,
+          Binary::TypeCodes::EXTESCAPE => :ExtEscape,
+          Binary::TypeCodes::NAMEDESCAPE => :NamedEscape,
+          Binary::TypeCodes::COLORCORRECTPALETTE => :ColorCorrectPalette,
+          Binary::TypeCodes::SETICMPROFILEA => :SetIcmProfileA,
+          Binary::TypeCodes::SETICMPROFILEW => :SetIcmProfileW,
+          Binary::TypeCodes::FORCEUFIMAPPING => :ForceUfiMapping,
+          Binary::TypeCodes::SETLINKEDUFIS => :SetLinkedUfis,
+          Binary::TypeCodes::COLORMATCHTOTARGETW => :ColorMatchToTargetW,
+          Binary::TypeCodes::CREATECOLORSPACEW => :CreateColorspaceW,
+          Binary::TypeCodes::CREATECOLORSPACE => :CreateColorspace,
+          Binary::TypeCodes::SETCOLORSPACE => :SetColorspace,
+          Binary::TypeCodes::DELETECOLORSPACE => :DeleteColorspace,
+          Binary::TypeCodes::GLSRECORD => :GlsRecord,
+          Binary::TypeCodes::GLSBOUNDEDRECORD => :GlsBoundedRecord,
+          Binary::TypeCodes::POLYTEXTOUTA => :PolyTextOutA,
+          Binary::TypeCodes::POLYTEXTOUTW => :PolyTextOutW,
+          Binary::TypeCodes::PIXELFORMAT => :PixelFormat,
+          Binary::TypeCodes::SETTEXTJUSTIFICATION => :SetTextJustification
+        }.freeze
+
+        def self.lookup(type_id)
+          name = TYPE_TO_NAME[type_id]
+          name ? const_get(name) : Raw
+        end
+      end
+    end
+  end
+end

data/lib/emf/emr/binary/type_codes.rb

@@ -0,0 +1,132 @@
+# frozen_string_literal: true
+
+module Emf
+  module Emr
+    module Binary
+      # EMR record type codes per MS-EMF 2.3.1.
+      # Adding a new record type: add the constant here, add an entry in
+      # TYPE_TO_NAME in records.rb, and add the wire class file under records/.
+      module TypeCodes
+        HEADER                 = 1
+        POLYBEZIER             = 2
+        POLYGON                = 3
+        POLYLINE               = 4
+        POLYBEZIERTO           = 5
+        POLYLINETO             = 6
+        POLYPOLYLINE           = 7
+        POLYPOLYGON            = 8
+        SETWINDOWEXTEX         = 9
+        SETWINDOWORGEX         = 10
+        SETVIEWPORTEXTEX       = 11
+        SETVIEWPORTORGEX       = 12
+        SETBRUSHORGEX          = 13
+        EOF                    = 14
+        SETPIXELV              = 15
+        SETMAPPERFLAGS         = 16
+        SETMAPMODE             = 17
+        SETBKMODE              = 18
+        SETPOLYFILLMODE        = 19
+        SETROP2                = 20
+        SETSTRETCHBLTMODE      = 21
+        SETTEXTALIGN           = 22
+        SETCOLORADJUSTMENT     = 23
+        SETTEXTCOLOR           = 24
+        SETBKCOLOR             = 25
+        OFFSETCLIPRGN          = 26
+        MOVETOEX               = 27
+        SETMETARGN             = 28
+        EXCLUDECLIPRECT        = 29
+        INTERSECTCLIPRECT      = 30
+        SCALEVIEWPORTEXTEX     = 31
+        SCALEWINDOWEXTEX       = 32
+        SAVEDC                 = 33
+        RESTOREDC              = 34
+        SETWORLDTRANSFORM      = 35
+        MODIFYWORLDTRANSFORM   = 36
+        SELECTOBJECT           = 37
+        CREATEPEN              = 38
+        CREATEBRUSHINDIRECT    = 39
+        DELETEOBJECT           = 40
+        ANGLEARC               = 41
+        ELLIPSE                = 42
+        RECTANGLE              = 43
+        ROUNDRECT              = 44
+        ARC                    = 45
+        CHORD                  = 46
+        PIE                    = 47
+        SELECTPALETTE          = 48
+        CREATEPALETTE          = 49
+        SETPALETTEENTRIES      = 50
+        RESIZEPALETTE          = 51
+        REALIZEPALETTE         = 52
+        EXTFLOODFILL           = 53
+        LINETO                 = 54
+        ARCTO                  = 55
+        POLYDRAW               = 56
+        SETARCDIRECTION        = 57
+        SETMITERLIMIT          = 58
+        BEGINPATH              = 59
+        ENDPATH                = 60
+        CLOSEFIGURE            = 61
+        FILLPATH               = 62
+        STROKEANDFILLPATH      = 63
+        STROKEPATH             = 64
+        FLATTENPATH            = 65
+        WIDENPATH              = 66
+        SELECTCLIPPATH         = 67
+        ABORTPATH              = 68
+        COMMENT                = 70
+        FILLRGN                = 71
+        FRAMERGN               = 72
+        INVERTRGN              = 73
+        PAINTRGN               = 74
+        EXTSELECTCLIPRGN       = 75
+        BITBLT                 = 76
+        STRETCHBLT             = 77
+        MASKBLT                = 78
+        PLGBLT                 = 79
+        SETDIBITSTODEVICE      = 80
+        STRETCHDIBITS          = 81
+        EXTCREATEFONTINDIRECTW = 82
+        EXTTEXTOUTA            = 83
+        EXTTEXTOUTW            = 84
+        POLYBEZIER16           = 85
+        POLYGON16              = 86
+        POLYLINE16             = 87
+        POLYBEZIERTO16         = 88
+        POLYLINETO16           = 89
+        POLYPOLYLINE16         = 90
+        POLYPOLYGON16          = 91
+        POLYDRAW16             = 92
+        CREATEMONOBRUSH        = 93
+        CREATEDIBPATTERNBRUSHPT = 94
+        EXTCREATEPEN           = 95
+        POLYTEXTOUTA           = 96
+        POLYTEXTOUTW           = 97
+        SETICMMODE             = 98
+        CREATECOLORSPACE       = 99
+        SETCOLORSPACE          = 100
+        DELETECOLORSPACE       = 101
+        GLSRECORD              = 102
+        GLSBOUNDEDRECORD       = 103
+        PIXELFORMAT            = 104
+        DRAWESCAPE             = 105
+        EXTESCAPE              = 106
+        SMALLTEXTOUT           = 108
+        FORCEUFIMAPPING        = 109
+        NAMEDESCAPE            = 110
+        COLORCORRECTPALETTE    = 111
+        SETICMPROFILEA         = 112
+        SETICMPROFILEW         = 113
+        ALPHABLEND             = 114
+        SETLAYOUT              = 115
+        TRANSPARENTBLT         = 116
+        GRADIENTFILL           = 118
+        SETLINKEDUFIS          = 119
+        SETTEXTJUSTIFICATION   = 120
+        COLORMATCHTOTARGETW    = 121
+        CREATECOLORSPACEW      = 122
+      end
+    end
+  end
+end

data/lib/emf/emr/binary/with_bounds.rb

@@ -0,0 +1,15 @@
+# frozen_string_literal: true
+
+require "bindata"
+require "emf/emr/binary/record"
+
+module Emf
+  module Emr
+    module Binary
+      # Many drawing records start with an RECTL bounding box after the header.
+      class WithBounds < Emf::Emr::Binary::Record
+        rectl :rcl_bounds
+      end
+    end
+  end
+end

data/lib/emf/emr/binary.rb

@@ -0,0 +1,13 @@
+# frozen_string_literal: true
+
+module Emf
+  module Emr
+    module Binary
+      autoload :Header, "emf/emr/binary/header"
+      autoload :Record, "emf/emr/binary/record"
+      autoload :WithBounds, "emf/emr/binary/with_bounds"
+      autoload :TypeCodes, "emf/emr/binary/type_codes"
+      autoload :Records, "emf/emr/binary/records"
+    end
+  end
+end