postsvg 0.1.0

data/docs/postscript/svg-mapping.adoc

@@ -0,0 +1,369 @@
+= PostScript to SVG Mapping
+
+== General
+
+This document describes how Postsvg converts PostScript graphics concepts to
+Scalable Vector Graphics (SVG) format. Understanding these mappings helps you
+predict the SVG output and work effectively with both formats.
+
+== Coordinate System Conversion
+
+=== General
+
+PostScript and SVG use different coordinate system orientations:
+
+PostScript:: Origin at bottom-left, Y-axis increases upward
+SVG:: Origin at top-left, Y-axis increases downward
+
+=== Y-axis inversion
+
+[source]
+----
+PostScript:              SVG:
+   (0,h) ┌───┐ (w,h)      (0,0) ┌───┐ (w,0)
+         │   │                  │   │
+   (0,0) └───┘ (w,0)      (0,h) └───┘ (w,h)
+----
+
+Postsvg handles this conversion automatically by transforming coordinates
+during the conversion process.
+
+=== BoundingBox to viewBox
+
+[example]
+====
+PostScript `%%BoundingBox` comment:
+[source,postscript]
+----
+%%BoundingBox: 0 0 200 150
+----
+
+Maps to SVG `viewBox` attribute:
+[source,xml]
+----
+<svg viewBox="0 0 200 150" width="200" height="150">
+----
+
+The bounding box defines the canvas dimensions in both formats.
+====
+
+== Path Data Conversion
+
+=== General
+
+PostScript path construction operators map to SVG path data commands.
+
+=== Path operator mapping
+
+[cols="2,2,3",options="header"]
+|===
+|PostScript |SVG Command |Example
+
+|`newpath`
+|_Implicit_
+|Start new path
+
+|`x y moveto`
+|`M x y`
+|`50 50 moveto` → `M 50 50`
+
+|`x y lineto`
+|`L x y`
+|`100 100 lineto` → `L 100 100`
+
+|`x1 y1 x2 y2 x3 y3 curveto`
+|`C x1 y1 x2 y2 x3 y3`
+|Cubic Bézier curve
+
+|`closepath`
+|`Z`
+|Close current subpath
+|===
+
+=== Path conversion example
+
+[example]
+====
+PostScript path:
+[source,postscript]
+----
+newpath
+10 10 moveto
+90 10 lineto
+90 90 lineto
+10 90 lineto
+closepath
+----
+
+Converts to SVG path `d` attribute:
+[source]
+----
+d="M 10 10 L 90 10 L 90 90 L 10 90 Z"
+----
+====
+
+== Color Mapping
+
+=== General
+
+PostScript color operators map to SVG fill and stroke attributes.
+
+=== RGB color conversion
+
+[example]
+====
+PostScript:
+[source,postscript]
+----
+0.5 0.2 0.8 setrgbcolor   % RGB values 0.0-1.0
+----
+
+SVG (hexadecimal):
+[source,xml]
+----
+fill="#7f33cc"
+----
+
+Conversion: Multiply each component by 255, convert to hex.
+
+* Red: 0.5 × 255 = 127 = 0x7F
+* Green: 0.2 × 255 = 51 = 0x33
+* Blue: 0.8 × 255 = 204 = 0xCC
+====
+
+=== Grayscale conversion
+
+[example]
+====
+PostScript:
+[source,postscript]
+----
+0.5 setgray                % 50% gray
+----
+
+SVG:
+[source,xml]
+----
+fill="#7f7f7f"
+----
+
+Same value for R, G, and B components.
+====
+
+=== Fill vs stroke color
+
+PostScript uses the same color for both fill and stroke operations. SVG
+distinguishes between `fill` and `stroke` attributes.
+
+[example]
+====
+PostScript fill:
+[source,postscript]
+----
+1 0 0 setrgbcolor
+fill
+----
+
+SVG:
+[source,xml]
+----
+<path d="..." fill="#ff0000" stroke="none"/>
+----
+
+PostScript stroke:
+[source,postscript]
+----
+0 0 1 setrgbcolor
+stroke
+----
+
+SVG:
+[source,xml]
+----
+<path d="..." fill="none" stroke="#0000ff"/>
+----
+====
+
+== Graphics State Mapping
+
+=== Line width
+
+[example]
+====
+PostScript:
+[source,postscript]
+----
+3 setlinewidth
+----
+
+SVG:
+[source,xml]
+----
+stroke-width="3"
+----
+====
+
+=== Line cap styles
+
+[cols="2,2,2",options="header"]
+|===
+|PostScript |Value |SVG
+
+|`0 setlinecap`
+|Butt
+|`stroke-linecap="butt"`
+
+|`1 setlinecap`
+|Round
+|`stroke-linecap="round"`
+
+|`2 setlinecap`
+|Square
+|`stroke-linecap="square"`
+|===
+
+=== Line join styles
+
+[cols="2,2,2",options="header"]
+|===
+|PostScript |Value |SVG
+
+|`0 setlinejoin`
+|Miter
+|`stroke-linejoin="miter"`
+
+|`1 setlinejoin`
+|Round
+|`stroke-linejoin="round"`
+
+|`2 setlinejoin`
+|Bevel
+|`stroke-linejoin="bevel"`
+|===
+
+== Transformation Matrix
+
+=== General
+
+PostScript's Current Transformation Matrix (CTM) maps to SVG's `transform`
+attribute.
+
+=== Matrix format
+
+PostScript CTM: `[a b c d e f]`
+
+SVG transform: `matrix(a b c d e f)`
+
+[example]
+====
+PostScript:
+[source,postscript]
+----
+100 50 translate           % Move origin
+45 rotate                  % Rotate 45°
+2 2 scale                  % Scale 2×
+----
+
+SVG (combined):
+[source,xml]
+----
+transform="translate(100 50) rotate(45) scale(2 2)"
+----
+
+Or as single matrix:
+[source,xml]
+----
+transform="matrix(...)"
+----
+====
+
+=== Individual transformations
+
+[cols="2,3",options="header"]
+|===
+|PostScript |SVG
+
+|`tx ty translate`
+|`transform="translate(tx ty)"`
+
+|`sx sy scale`
+|`transform="scale(sx sy)"`
+
+|`angle rotate`
+|`transform="rotate(angle)"`
+|===
+
+== Complete Conversion Example
+
+=== PostScript input
+
+[source,postscript]
+----
+%!PS-Adobe-3.0 EPSF-3.0
+%%BoundingBox: 0 0 200 200
+
+newpath
+50 50 moveto
+150 50 lineto
+150 150 lineto
+50 150 lineto
+closepath
+0.8 0.2 0.2 setrgbcolor
+fill
+
+newpath
+100 100 40 0 360 arc
+0 0 0 setrgbcolor
+2 setlinewidth
+stroke
+----
+
+=== SVG output
+
+[source,xml]
+----
+<?xml version="1.0" encoding="UTF-8"?>
+<svg xmlns="http://www.w3.org/2000/svg"
+     width="200" height="200"
+     viewBox="0 0 200 200">
+  <!-- Red square -->
+  <path d="M 50 50 L 150 50 L 150 150 L 50 150 Z"
+        fill="#cc3333" stroke="none"/>
+
+  <!-- Black circle outline -->
+  <path d="M 140 100 A 40 40 0 1 0 60 100 A 40 40 0 1 0 140 100"
+        fill="none" stroke="#000000" stroke-width="2"/>
+</svg>
+----
+
+== Implementation-Specific Behavior
+
+=== Coordinate precision
+
+Postsvg uses floating-point numbers with standard precision. Coordinates in
+SVG output are typically formatted to one decimal place.
+
+=== Path optimization
+
+Postsvg may optimize consecutive `lineto` operations and remove redundant
+`moveto` commands.
+
+=== Unsupported features
+
+Features not yet supported by Postsvg:
+
+* Text rendering (`show`, font operators)
+* Image embedding
+* Patterns and gradients
+* Clipping paths (partial support)
+* Dash patterns (not yet implemented)
+
+For files using these features, the corresponding PostScript operators are
+ignored or produce warnings.
+
+== See Also
+
+* link:fundamentals.adoc[PostScript Fundamentals]
+* link:graphics-model.adoc[Graphics Model]
+* link:implementation-notes.adoc[Implementation Notes]
+* link:index.adoc[Back to PostScript Quick Reference]

data/exe/postsvg

@@ -0,0 +1,6 @@
+#!/usr/bin/env ruby
+# frozen_string_literal: true
+
+require_relative "../lib/postsvg/cli"
+
+Postsvg::CLI.start(ARGV)

data/lib/postsvg/cli.rb

@@ -0,0 +1,103 @@
+# frozen_string_literal: true
+
+require "thor"
+require_relative "../postsvg"
+
+module Postsvg
+  # Command-line interface for postsvg
+  class CLI < Thor
+    desc "convert INPUT [OUTPUT]", "Convert PostScript/EPS file to SVG"
+    long_desc <<~DESC
+      Convert a PostScript (.ps) or Encapsulated PostScript (.eps) file to SVG format.
+
+      If OUTPUT is not specified, the output will be written to stdout.
+
+      Examples:
+
+        $ postsvg convert input.ps output.svg
+        $ postsvg convert input.eps > output.svg
+    DESC
+    def convert(input_path, output_path = nil)
+      unless File.exist?(input_path)
+        say "Error: Input file '#{input_path}' not found", :red
+        exit 1
+      end
+
+      begin
+        ps_content = File.read(input_path)
+        svg_output = Postsvg.convert(ps_content)
+
+        if output_path
+          File.write(output_path, svg_output)
+          say "Successfully converted #{input_path} to #{output_path}", :green
+        else
+          puts svg_output
+        end
+      rescue Postsvg::Error => e
+        say "Conversion error: #{e.message}", :red
+        exit 1
+      rescue StandardError => e
+        say "Unexpected error: #{e.message}", :red
+        say e.backtrace.join("\n"), :red if options[:verbose]
+        exit 1
+      end
+    end
+
+    desc "batch INPUT_DIR [OUTPUT_DIR]",
+         "Convert all PS/EPS files in a directory"
+    long_desc <<~DESC
+      Convert all .ps and .eps files in INPUT_DIR to SVG format.
+
+      If OUTPUT_DIR is specified, SVG files will be written there.
+      Otherwise, SVG files will be written to the same directory as the input files.
+
+      Examples:
+
+        $ postsvg batch ps_files/
+        $ postsvg batch ps_files/ svg_files/
+    DESC
+    def batch(input_dir, output_dir = nil)
+      unless Dir.exist?(input_dir)
+        say "Error: Input directory '#{input_dir}' not found", :red
+        exit 1
+      end
+
+      Dir.mkdir(output_dir) if output_dir && !Dir.exist?(output_dir)
+
+      pattern = File.join(input_dir, "*.{ps,eps}")
+      files = Dir.glob(pattern, File::FNM_CASEFOLD)
+
+      if files.empty?
+        say "No PS or EPS files found in #{input_dir}", :yellow
+        return
+      end
+
+      say "Found #{files.size} file(s) to convert", :cyan
+
+      files.each do |input_path|
+        basename = File.basename(input_path, ".*")
+        output_path = if output_dir
+                        File.join(output_dir, "#{basename}.svg")
+                      else
+                        File.join(input_dir, "#{basename}.svg")
+                      end
+
+        begin
+          ps_content = File.read(input_path)
+          svg_output = Postsvg.convert(ps_content)
+          File.write(output_path, svg_output)
+          say "  ✓ #{input_path} → #{output_path}", :green
+        rescue Postsvg::Error => e
+          say "  ✗ #{input_path}: #{e.message}", :red
+        rescue StandardError => e
+          say "  ✗ #{input_path}: Unexpected error: #{e.message}", :red
+        end
+      end
+    end
+
+    desc "version", "Show version"
+    def version
+      say "postsvg version #{Postsvg::VERSION}"
+    end
+  end
+end

data/lib/postsvg/colors.rb

@@ -0,0 +1,33 @@
+# frozen_string_literal: true
+
+module Postsvg
+  # Color conversion utilities for PostScript color models
+  module Colors
+    # Convert RGB values (0-1) to RGB color string
+    def self.color2rgb(rgb)
+      r, g, b = rgb
+      r = [[r * 255, 0].max, 255].min.round
+      g = [[g * 255, 0].max, 255].min.round
+      b = [[b * 255, 0].max, 255].min.round
+      format("rgb(%d, %d, %d)", r, g, b)
+    end
+
+    # Convert grayscale value (0-1) to RGB color string
+    def self.gray2rgb(gray)
+      val = [[gray * 255, 0].max, 255].min.round
+      format("rgb(%d, %d, %d)", val, val, val)
+    end
+
+    # Convert CMYK values (0-1) to RGB color string
+    def self.cmyk2rgb(cmyk)
+      c, m, y, k = cmyk
+      r = 255 * (1 - c) * (1 - k)
+      g = 255 * (1 - m) * (1 - k)
+      b = 255 * (1 - y) * (1 - k)
+      r = [[r, 0].max, 255].min.round
+      g = [[g, 0].max, 255].min.round
+      b = [[b, 0].max, 255].min.round
+      format("rgb(%d, %d, %d)", r, g, b)
+    end
+  end
+end

data/lib/postsvg/converter.rb

@@ -0,0 +1,214 @@
+# frozen_string_literal: true
+
+require_relative "graphics_state"
+require_relative "svg_generator"
+
+module Postsvg
+  # Converts PostScript/EPS to SVG by interpreting PostScript commands
+  class Converter
+    attr_reader :ps_content, :graphics_state, :svg_generator
+
+    def initialize(ps_content)
+      @ps_content = ps_content
+      @graphics_state = GraphicsState.new
+      @svg_generator = SvgGenerator.new
+      @stack = []
+      @dictionary = {}
+    end
+
+    def convert
+      # Parse PostScript
+      ast = Parser.parse(ps_content)
+
+      # Extract BoundingBox for SVG viewBox
+      extract_bounding_box
+
+      # Execute PostScript commands
+      execute_program(ast[:statements])
+
+      # Generate SVG
+      svg_generator.generate(
+        width: @bbox_width,
+        height: @bbox_height,
+        viewbox: @viewbox,
+      )
+    end
+
+    private
+
+    def extract_bounding_box
+      # Look for %%BoundingBox comment
+      if ps_content =~ /%%BoundingBox:\s*(-?\d+)\s+(-?\d+)\s+(-?\d+)\s+(-?\d+)/
+        llx = ::Regexp.last_match(1).to_f
+        lly = ::Regexp.last_match(2).to_f
+        urx = ::Regexp.last_match(3).to_f
+        ury = ::Regexp.last_match(4).to_f
+
+        @bbox_width = urx - llx
+        @bbox_height = ury - lly
+        @viewbox = "#{llx} #{lly} #{@bbox_width} #{@bbox_height}"
+      else
+        # Default values if no BoundingBox found
+        @bbox_width = 612
+        @bbox_height = 792
+        @viewbox = "0 0 #{@bbox_width} #{@bbox_height}"
+      end
+    end
+
+    def execute_program(statements)
+      return if statements.nil? || statements.empty?
+
+      statements.each do |statement|
+        execute_statement(statement)
+      end
+    end
+
+    def execute_statement(statement)
+      case statement
+      when Hash
+        execute_hash_statement(statement)
+      when Numeric
+        @stack.push(statement)
+      when String
+        @stack.push(statement)
+      else
+        # Unknown statement type
+      end
+    end
+
+    def execute_hash_statement(statement)
+      case statement[:type]
+      when :operator
+        execute_operator(statement[:value])
+      when :name
+        @stack.push(statement)
+      when :array
+        @stack.push(statement)
+      when :procedure
+        @stack.push(statement)
+      end
+    end
+
+    def execute_operator(op)
+      case op
+      # Path construction
+      when "moveto"
+        y = @stack.pop
+        x = @stack.pop
+        graphics_state.moveto(x, y)
+      when "lineto"
+        y = @stack.pop
+        x = @stack.pop
+        graphics_state.lineto(x, y)
+      when "rlineto"
+        dy = @stack.pop
+        dx = @stack.pop
+        graphics_state.rlineto(dx, dy)
+      when "curveto"
+        y3 = @stack.pop
+        x3 = @stack.pop
+        y2 = @stack.pop
+        x2 = @stack.pop
+        y1 = @stack.pop
+        x1 = @stack.pop
+        graphics_state.curveto(x1, y1, x2, y2, x3, y3)
+      when "closepath"
+        graphics_state.closepath
+
+      # Painting
+      when "stroke"
+        svg_generator.add_path(graphics_state.current_path, graphics_state,
+                               :stroke)
+        graphics_state.newpath
+      when "fill"
+        svg_generator.add_path(graphics_state.current_path, graphics_state,
+                               :fill)
+        graphics_state.newpath
+      when "newpath"
+        graphics_state.newpath
+
+      # Color
+      when "setrgbcolor"
+        b = @stack.pop
+        g = @stack.pop
+        r = @stack.pop
+        graphics_state.set_rgb_color(r, g, b)
+      when "setgray"
+        gray = @stack.pop
+        graphics_state.set_gray(gray)
+
+      # Line attributes
+      when "setlinewidth"
+        width = @stack.pop
+        graphics_state.line_width = width
+
+      # Graphics state
+      when "gsave"
+        graphics_state.save
+      when "grestore"
+        graphics_state.restore
+
+      # Transformations
+      when "translate"
+        ty = @stack.pop
+        tx = @stack.pop
+        graphics_state.translate(tx, ty)
+      when "scale"
+        sy = @stack.pop
+        sx = @stack.pop
+        graphics_state.scale(sx, sy)
+      when "rotate"
+        angle = @stack.pop
+        graphics_state.rotate(angle)
+
+      # Dictionary and procedure operations
+      when "def"
+        value = @stack.pop
+        key = @stack.pop
+        if key.is_a?(Hash) && key[:type] == :name
+          @dictionary[key[:value]] =
+            value
+        end
+      when "dict"
+        size = @stack.pop
+        @stack.push({ type: :dict, size: size, entries: {} })
+      when "begin"
+        # Begin dictionary - for now, just pop it
+        @stack.pop
+      when "end"
+        # End dictionary
+      when "exch"
+        # Exchange top two stack items
+        a = @stack.pop
+        b = @stack.pop
+        @stack.push(a)
+        @stack.push(b)
+      when "dup"
+        # Duplicate top stack item
+        top = @stack.last
+        @stack.push(top)
+
+      # Font operations (minimal support - we'll ignore text rendering for now)
+      when "findfont", "scalefont", "setfont", "show", "moveto"
+        # For text operations, we'll need more sophisticated handling
+        # For now, just consume the required stack items
+        case op
+        when "show"
+          @stack.pop # string to show
+        when "scalefont"
+          @stack.pop # scale
+          @stack.pop # font
+        when "findfont"
+          @stack.pop # font name
+        end
+
+      else
+        # Check if it's a defined procedure
+        if @dictionary.key?("/#{op}")
+          proc_def = @dictionary["/#{op}"]
+          execute_program(proc_def[:value]) if proc_def.is_a?(Hash) && proc_def[:type] == :procedure
+        end
+      end
+    end
+  end
+end