rghost-ruby1.9-beta 0.8.7.2

data/lib/rghost/ps_object.rb

@@ -0,0 +1,55 @@
+#Postscript wrapper class
+class RGhost::PsObject
+  
+  #Creates new instance of PsObject. Example
+  #   PsObject.new("/my_proc { 33 45 2 10 sub mul div} bind def") 
+  #Or by block code
+  #   PsObject.new do
+  #     set PsObject.new("(A test) show")
+  #     raw "(Other Test in raw) show "
+  #   end
+  def initialize(body="",&block)
+    @body=if body.is_a? RGhost::PsObject
+      body.ps
+    else
+      "#{body} "
+    end
+    
+    instance_eval(&block) if block
+    
+  end
+  #Alias for ps.
+  def to_s
+    ps
+  end
+  #Gets postscript code.
+  def ps
+    @body.to_s
+  end
+  #Pushes elements on the stack.
+  def raw(*value)
+    @body << "#{value.join(' ')} "
+  end 
+  #Freezes graphic state
+  def graphic_scope
+    "beging #{self} endg "
+  end
+  #Sets PsObject into this object.
+  def set(value)
+
+    raise TypeError.new("can't convert #{value.class} into PsObject") unless value.is_a? RGhost::PsObject
+    @body << "#{value.ps} "
+    value
+  end
+  #Alias for set
+  def <<(value)
+    set value
+   
+  end
+  
+  #Call operator in the stack
+  def call(name)
+    set RGhost::PsObject.new(name)
+  end  
+   
+end

data/lib/rghost/rectangle_link.rb

@@ -0,0 +1,65 @@
+#Creates one rectangle or one shape with rounded corners.
+#===Options
+#
+#* <tt>:x and :y</tt> - Coordinates to position.
+#* <tt>:corners</tt> - Value for rounded corners. Use 0 to straight angle.
+#* <tt>:width and :height</tt> - Size of frame
+#* <tt>:content</tt> - facade to ShapeContent with same parameters.
+#* <tt>:border</tt> - facade to Border with same parameters.
+#===Examples using facade frame method inside of Document
+#  d=Document.new
+#  d.frame :x => 3, :width => 7, :height => 5, :content => {:fill => false}
+#
+#link:images/frame01.png
+#  d=Document.new
+#  d.frame :x => 3, :width => 7, :height => 5, :content => {:color => '#35F6A3' }
+#
+#link:images/frame02.png
+# 
+#  d=Document.new
+#  d.frame :x => 3, :width => 7, :height => 5, :content => {:color => '#35F6A3' }, :border =>{:width => 5, :dash => [1,3,10]}
+#
+#link:images/frame03.png
+# 
+#  d=Document.new
+#  d.frame :x => 3, :width => 7, :height => 5, :content => {:color => '#35F6A3' }, :corners => 20
+#
+#link:images/frame04.png
+#  
+#  d=Document.new
+#  d.frame :x => 3, :width => 7, :height => 5, :content => {:color => :yellow }, :border => {:color => :red, :width => 4}, :corners => 20
+#  
+#link:images/frame05.png
+class RGhost::RectangleLink < RGhost::PsObject
+	include RGhost::RubyToPs
+  DEFAULT_OPTIONS={
+    :x => :limit_left,
+    :y => :current_row,
+    :width => 5,
+    :height => 3.5,
+    :url => "http://rghost.rubyforge.org",
+    :border_color => RGhost::Border::DEFAULT_OPTIONS[:color]
+    
+    
+  }
+  def initialize(options={})
+
+    @options = DEFAULT_OPTIONS.dup.merge(options)
+
+  end
+  
+  
+  def ps
+    x=RGhost::Units::parse(@options[:x])
+    y=RGhost::Units::parse(@options[:y])
+    
+    h=RGhost::Units::parse(@options[:height])
+    w=RGhost::Units::parse(@options[:width])
+    url=@options[:url]
+    scolor=RGhost::Color.create(@options[:border_color]).ps.gsub(/setrgbcolor/,'')
+		"/:rect_color [#{scolor}] def /:rect_x #{x} def /:rect_y #{y} def /:rect_w #{w} def /:rect_h #{h} def /:rect_uri #{to_string(url)} def :rect_link"
+    
+    
+  end
+  
+end

data/lib/rghost/ruby_ghost_config.rb

@@ -0,0 +1,243 @@
+require "rghost/ps_object"
+require 'iconv'
+require 'rghost/font_map'
+
+#Rghost setup with Ghostscript.
+#Ghostscript runs on a variety of platforms, this is why we recommend the non coupled install for non *nix environments. 
+#The gem already comes with a set of defaults but you can change the settings using the Hash RGhost::Config::GS before each use of the API. Listed below are the keys of the said hash.
+#===RGhost::Config::GS[:mode]
+#Operating mode
+#* <tt>:gsparams</tt> In this mode RGhost just pass parameters to the Ghostscript framework.
+#* <tt>:gsapi</tt> based on the exchange of data between Ruby and Ghostscript via rgengine.so using gslib.so.8 or gslib-esp.so.8. 
+#
+#===RGhost::Config::GS[:path]
+#Path to the ghostscript executable.
+#====Example on windows
+#RGhost::Config::GS[:path] = "C:\\gs\\bin\\gswin32c.exe"
+#====Example on Linux
+#RGhost::Config::GS[:path] = "/usr/bin/gs"
+#
+#===RGhost::Config::GS[:tmpdir]
+#Temporary directory
+#====Example
+#RGhost::Config::GS[:tmpdir] = "/tmp"
+#
+#===RGhost::Config::GS[:default_params]
+#Allows you to add/remove options. (use with caution!)
+#====Example
+#RGhost::Config::GS[:default_params] << "-dSAFER"
+#
+#===RGhost::Config::GS[:stack_elements]
+#Defines the maximum number of elements for each matrix inside postscript's internal stack, avoiding a stack overflow error..
+#====Example
+#RGhost::Config::GS[:stack_elements]=5000
+#
+#===RGhost::Config::GS[:unit]
+#Set the measure units. See Units::Unit for available units. 
+#====Example
+#RGhost::Config::GS[:unit]=Units::Cm
+#
+#===RGhost::Config::GS[:charset_convert]
+#Ruby to PS character conversion proxy.  Necessary when the source code isn't on the same encoding of the document.
+#Params is a block that returns a String. The default setting is nil.
+#====Example
+#RGhost::Config::GS[:charset_convert]= lambda {|text| Iconv::iconv("latin1","utf8", text).to_s}
+#
+#===RGhost::Config::GS[:font_encoding]
+#Sets the Postscript font encoding. Default: :IsoLatin
+#====Example
+#RGhost::Config::GS[:font_encoding]= :IsoLatin
+#
+module RGhost::Config
+  
+  DEFAULT_PORTRAIT_TEMPLATE  = File.join(File.dirname(__FILE__),"ps","rghost_default_template.eps")
+  
+  
+  GS={
+    :mode => :gsparams,
+    :plugin => nil,
+    :path => nil,
+    :tmpdir => ENV["TMP"] || ENV["TMPDIR"] || ENV["TEMPDIR"] || ENV["TEMP"] || "/tmp",
+    :pslibdir => File.join( File.dirname(__FILE__),"ps"),
+    :extensions => [],
+    :preload => [],
+    :default_params=> %w(gs -dNOPAUSE -dBATCH -dQUIET -dNOPAGEPROMPT),
+    :stack_elements => 5000,
+    :font_encoding => :IsoLatin,
+    :charset_convert => lambda {|text| Iconv::iconv('latin1','utf-8', text).join },
+   #:charset_convert => nil,
+    :fontsize => 8,
+    :unit => RGhost::Units::Cm
+  }
+ 
+ 
+    
+ 
+  
+  def self.config_platform #:nodoc:
+    
+    const= 'PLATFORM'
+    const = "RUBY_"+const if RUBY_VERSION =~ /^1.9/  
+    GS[:path]=case Object.const_get(const)
+    when /linux/ then "/usr/bin/gs"
+    when /darwin/ then "/opt/local/bin/gs"
+    when /freebsd|bsd/ then "/usr/local/bin/gs"
+    when /mswin/ then "C:\\gs\\bin\\gswin32\\gswin32c.exe"
+    end
+    not_found_msg="\nGhostscript not found in your environment.\nInstall it and set the variable RGhost::Config::GS[:path] with the executable.\nExample: RGhost::Config::GS[:path]='/path/to/my/gs' #unix-style\n RGhost::Config::GS[:path]=\"C:\\\\gs\\\\bin\\\\gswin32c.exe\"  #windows-style\n"
+    raise not_found_msg unless (File.exists? GS[:path])
+  end
+  #Test if your environment is ready to works. If yes the page below will show.
+  #
+  #link:images/is_ok.png
+  #
+  #You can generate this page with the code.
+  # RGhost::Config.is_ok?.render :pdf, :filename => "/tmp/mytest.pdf"
+  #
+  def self.is_ok?
+    d=RGhost::Document.new  :margin_left => 2.3, :margin_bottom => 2.3
+    d.benchmark(:start)
+    d.before_page_create do |b|
+      b.image RGhost::Config::DEFAULT_PORTRAIT_TEMPLATE
+    end
+    d.define_tags do
+      new :bigger,   :size => 150, :color => "#AAFF33"
+    end
+    d.text_in :x => 6, :y=> 15, :write => "Yes!", :with => :bigger
+    d.text_in :x => 10, :y=> 14, :write => "Your environment is ready!"
+    d.text_in :x => 10, :y=> 13, :write => "RGhost Version " + RGhost::VERSION::STRING
+    d.text_in :x => 10, :y=> 12, :write => "Created at " + Time.at(RGhost::VERSION::DATE).to_s
+    d.text_in :x => 10, :y=> 11, :write => "Now " + Time.now.to_s
+    
+    d.benchmark(:stop)
+    d.done
+    d
+    
+    
+    
+  end
+  #This method is a helper to gets the best encoding.
+  #
+  #link:images/encode_test.png
+  #
+  #You can generate this page with the code.
+  # RGhost::Config.encode_teste("Fiancé").render :pdf, :filename => "/tmp/mytest.pdf"
+  # 
+  #The encode will use on Document class.
+  # doc=Document.new :font_encoding => 'IsoLatin'
+  #
+  def self.encode_test(value)
+    d=RGhost::Document.new  :paper => :A4, :margin_left => 2 #, :landscape => true
+    d.before_page_create do |b|
+      b.image RGhost::Config::DEFAULT_PORTRAIT_TEMPLATE
+    end
+    exp=File.join(File.dirname(__FILE__),"ps","*.enc")
+    d.show "String (Using Helvetica Font)", :with => :b
+    d.moveto :x => 16
+    d.show "Encode Name", :with => :b
+    d.horizontal_line :bottom
+    d.next_row
+    
+    Dir.glob(exp).sort.each do |f|
+      name=File.basename(f)
+      name.gsub!(/\.enc/,'')
+      d.set RGhost::Load.library(name,:enc)
+      d.set RGhost::Variable.new(:default_encoding,name)
+      d.set RGhost::FontMap.new {
+        new(:font_test,  :name => "Helvetica",:size => 8,:color => "#FF0000", :encoding => true)
+      }
+      
+      d.show "#{value}" , :with => :font_test
+      d.moveto :x => 16
+      d.show "#{name}", :with =>  :i
+      d.next_row
+      
+    end
+    d
+  end
+  #Generates font catalog to use into method define_tags on Document
+  #  RGhost::Config.enviroment_fonts.render :pdf, :filename => "mycatalog.pdf"
+  #link:images/environment_fonts.png
+  #
+  def self.environment_fonts(text="The quick brown fox jumps over the lazy dog")
+    
+    d=RGhost::Document.new  :margin_left => 2.3, :margin_bottom => 2.3
+    d.before_page_create do |b|
+      b.image RGhost::Config::DEFAULT_PORTRAIT_TEMPLATE
+    end
+    d.show "Search Path"
+    d.horizontal_line :bottom
+    d.next_row
+    d.raw :default_font
+    d.raw %Q{
+    LIBPATH{
+      limit_left  current_row  moveto   show    
+      nrdp
+    } forall
+    
+    }
+    d.next_row
+    d.show "Example"
+    d.moveto :x=> 13
+    d.show "Font Name"
+    d.horizontal_line :bottom
+    d.next_row
+    #=begin    
+    d.raw %Q{
+      Fontmap{ 
+        50 string cvs pop dup findfont 10 scalefont setfont
+        limit_left  current_row  moveto  (#{text})  show    
+    13 cm  current_row moveto default_font  0 setgray
+    50 string cvs show
+    nrdp  
+      } forall
+    }
+    #=end    
+    d.done
+    d
+  end
+
+  # .
+  #
+  #
+  #Preseted tags   
+  #
+  #
+  #
+  #FONTMAP=RGhost::FontMap.new :name => "Helvetica", :size => 8, :encoding => false do
+  #    new :span
+  #    new :b,     :name => "Helvetica-Bold"
+  #    new :bold,     :name => "Helvetica-Bold"
+  #    new :normal,   :name => "Helvetica"
+  #    new :i,     :name => "Helvetica-Oblique", :size => 8
+  #    new :bi,    :name => "Helvetica-BoldOblique"
+  #    new :big,   :size => 10
+  #    new :small, :size => 7
+  #    new :h1,    :name => "Helvetica", :size => 14
+  #    new :h2,    :name => "Helvetica", :size => 13
+  #    new :h3,    :name => "Helvetica", :size => 12
+  #    new :h4,    :name => "Helvetica", :size => 11
+  #    new :h5,    :name => "Helvetica", :size => 10
+  #    new :title, :name => "Helvetica", :size => 20
+  #    new :pre,   :name => "Courier"
+  #  end
+  #
+  FONTMAP=RGhost::FontMap.new :name => "Helvetica", :size => 8, :encoding => true do
+    new :span
+    new :b,     :name => "Helvetica-Bold"
+    new :bold,     :name => "Helvetica-Bold"
+    new :normal,   :name => "Helvetica"
+    new :i,     :name => "Helvetica-Oblique", :size => 8
+    new :bi,    :name => "Helvetica-BoldOblique"
+    new :big,   :size => 10
+    new :small, :size => 7
+    new :h1,    :name => "Helvetica", :size => 14
+    new :h2,    :name => "Helvetica", :size => 13
+    new :h3,    :name => "Helvetica", :size => 12
+    new :h4,    :name => "Helvetica", :size => 11
+    new :h5,    :name => "Helvetica", :size => 10
+    new :title, :name => "Helvetica", :size => 20
+    new :pre,   :name => "Courier"
+  end
+  
+end

data/lib/rghost/ruby_ghost_engine.rb

@@ -0,0 +1,156 @@
+require 'rghost/ruby_ghost_config'
+require "rghost/constants"
+
+class RGhost::Engine
+  attr_reader :errors, :error, :output
+  DEFAULT_OPTIONS={:device => :pdf }
+  
+  include RGhost::Constants::Devices
+
+  def initialize(document,options={})
+    @document=document   
+    @options=DEFAULT_OPTIONS.merge(options)
+    @errors=[]
+    @error=false
+    @output=nil	
+    @delete_input=true
+
+  end 
+
+
+  def render(device=nil)
+
+    device||=@options[:device]
+    tmp_filename=@options[:filename]
+    unless tmp_filename
+      tmp_filename||="#{RGhost::Config::GS[:tmpdir]}#{File::SEPARATOR}#{self.object_id.abs}"
+      file_out="#{tmp_filename}.#{device}"
+    else
+      file_out=tmp_filename
+    end
+
+    file_err="#{tmp_filename}.rgerr"
+	  
+    multipage=@options[:multipage] 
+    file_out.gsub!(/\./,"_%04d.") if multipage
+    
+    params=RGhost::Config::GS[:default_params].dup #default parameters gs engine
+    params << @document.additional_params.join(" ") unless @options[:convert]
+    params << "-I#{RGhost::Config::GS[:pslibdir]}"
+    params << "-dPDFSETTINGS=/#{@options[:quality]}" if (@options[:device] ==:pdf && @options[:quality])
+    params << "-I#{RGhost::Config::GS[:extensions].join(' -I')}" if RGhost::Config::GS[:extensions]
+    params << "-sDEVICE=#{device_for(device)}"
+    params.concat format_params(@options[:d],"-d") if  @options[:d]
+    params.concat format_params(@options[:s],"-s") if  @options[:s]     
+    params << "-r#{@options[:resolution]}" if @options[:resolution]
+    params << "-g#{@options[:size]}" if @options[:size]
+    if @options[:range]
+      params << "-dFirstPage=#{@options[:range].first}"
+      params << "-dLastPage=#{@options[:range].last}"
+    end
+    params << "-sstdout=#{file_err}"
+    params << @options[:raw] if @options[:raw] 
+    params << "-sOutputFile=#{file_out}"
+     
+    
+    case @document 
+    when RGhost::Document
+        file_in="#{tmp_filename}.rgin"
+      params.concat @document.gs_paper
+      fi=File.open(file_in,'w')
+      fi.puts @document.ps
+      fi.close
+    when File
+        file_in=@document.path
+      #@delete_input=false unless @options[:debug]
+    when String
+        file_in=@document
+      #@delete_input=false unless @options[:debug]
+    end
+
+    params << file_in
+    
+    #puts params.inspect
+    
+    if RGhost::Config::GS[:mode] == :gslib
+      require "rghost/rgengine"
+      gs=RGEngine.new 
+      @error=!gs.render(params,params.size)
+    else
+      require 'rghost/gs_alone'
+      gs=RGhost::GSAlone.new(params,@options[:debug])
+      @error=!gs.run
+    end
+    
+    if @error # if error
+      @errors=File.open(file_err).readlines if File.exists?(file_err)
+    else
+      if multipage
+      	file_out.gsub!(/_%04d/,"_*")
+        @output=Dir.glob(file_out).map { |f| f }
+      else
+        @output=File.open(file_out)
+      end
+    end
+    begin
+      File.delete(file_err)
+      File.delete(file_in) unless (@options[:debug] || @options[:convert])
+    rescue
+    end 
+    log(params) if @options[:logfile]
+    return @output
+  end
+
+  def clear_output
+    case @output
+    when File
+        @output.close
+      File.delete(@output.path)
+    when Array 
+        @output.each do |f| 
+        f.close
+        File.delete(f.path)
+      end
+    end
+  end
+  def error?
+    @error
+  end
+  private
+  def log(gp)
+    id=self.object_id.abs
+    flog=File.open(@options[:logfile], File::WRONLY|File::APPEND|File::CREAT)
+    flog.puts "[ID #{id}] created on #{Time.now}"
+    flog.puts "[#{id}] RUBY GS OPTIONS: #{@options.inspect}"
+    flog.puts "[#{id}] GS OPTIONS: #{gp.join(" ")}"
+    if @error
+      flog.puts "[#{id}] EXIT STATUS: ERROR"
+      flog.puts @errors.uniq.map {|m| "[#{id}] #{m}" }.to_s;         
+    else
+      flog.puts "[#{id}] EXIT STATUS: OK"				
+    end
+  end
+	
+	
+  def format_params(v,pre="-d")
+    r=[]
+    case v
+    when Symbol
+        r << "#{pre}#{v}"
+    when Array
+        v.each do |av|
+        r << format_params(av,pre).to_s
+      end
+    when Hash
+        v.each do |k,v|
+        r << "#{pre}#{k}=#{v.to_s.gsub(/ /,'')}"  	
+      end
+    else
+      return "" 
+    end
+    return r; 
+  end
+
+end
+
+