rghost-ruby1.9-beta 0.8.7.2

data/lib/rghost/ruby_ghost_version.rb

@@ -0,0 +1,8 @@
+module RGhost::VERSION #:nodoc:
+    MAJOR = 0
+    MINOR = 8
+    TINY  = 7
+    DATE=1244286414
+    STRING = [MAJOR, MINOR, TINY].join('.')
+  
+end

data/lib/rghost/ruby_to_ps.rb

@@ -0,0 +1,78 @@
+#Converts Ruby types to Postscript types
+module RGhost::RubyToPs
+
+  
+  def to_string(value)
+    #ps escape
+    value=pack_string(value)
+    ps_str=ps_escape(value)
+    
+    "(#{ps_str}) "
+
+  end
+  
+  def pack_string(s)
+    if RGhost::Config::GS[:charset_convert] 
+      RGhost::Config::GS[:charset_convert].call(s.to_s).to_s 
+    else
+      s
+    end
+  end
+	
+  
+  def ps_escape(value)
+    #value.to_s.gsub(/\(/,'\\(').gsub(/\)/,"\\)").gsub(/\\/,"\134")
+    value.to_s.gsub(/(\(|\)|\\)/,'\\\\\1')
+  end
+  
+  def to_bool(value)
+    value ? "true":"false"
+  end
+  
+  def to_string_array(arr)
+		
+    "[#{arr.map{|a| to_string(a.to_s) }}] "
+  end
+  
+  def to_array(arr)
+    return "[ ]" unless arr
+    ps_arr=[]
+    arr.each do |a|
+      ps_arr << case a
+      when TrueClass,FalseClass then to_bool(a)
+      when Numeric then a
+      when Proc then a.to_s
+      when Array then to_array(a)
+      else
+        to_string(a.to_s)
+      end
+    end
+    "[#{ps_arr.join(' ')}] "
+  end
+  
+  def hash_to_array(hash)
+    to_string_array(hash.values)
+  end
+  
+  def array_to_stack(arr)
+    "#{arr.join(' ')} "
+  end
+  
+  def string_eval(str)
+    str=pack_string(str)
+    return "(#{ps_escape(str)}) show " unless str =~ /%/
+
+    s=str.scan(/([^%][a-z]*[^%]|\d+%?)|(%[^\s%]+%)/).flatten.compact
+    #puts s 
+    tudo=""
+    s.each do |v|
+      case v
+      when /^%/ then tudo << "#{v.gsub(/%/,'')} to_s show "
+      else
+        tudo << "(#{ps_escape(v)}) show "
+      end
+    end
+    tudo
+  end
+end
+

data/lib/rghost/scale.rb

@@ -0,0 +1,29 @@
+require "rghost/ps_object"
+#Scales objects
+
+class RGhost::Scale < RGhost::PsObject
+  #===Examples
+  # doc.scale(1,1)      #default document scale
+  #
+  #link:images/scale01.png
+  #
+  # doc.scale(1,3)
+  #
+  #link:images/scale02.png
+  #
+  # doc.scale(3,3)
+  #
+  #link:images/scale03.png
+  def initialize(sx,sy)
+    super("#{sx} #{sy} scale")
+  end
+  #Scale proportionally by value in percent
+  #===Example
+  # doc.zoom(300)   # 300% the same that scale(3,3)
+  def self.zoom(value=100)
+    
+    RGhost::Scale.new(value/100.0,value/100.0)
+  
+  end
+
+end

data/lib/rghost/shape_content.rb

@@ -0,0 +1,23 @@
+#Responsible for fill shapes
+class RGhost::ShapeContent < RGhost::PsObject
+
+  DEFAULT_OPTIONS={
+    :fill => true, :color => "#F0FFFF"
+    
+  }
+  #You can use parameter :color(facade for Color.create) or disable using :fill => false
+  def initialize(options={})
+    super(""){}
+    @options = DEFAULT_OPTIONS.dup.merge(options)
+  end
+  
+  def ps
+    p=RGhost::PsObject.new
+    p.raw :gsave
+    p.set RGhost::Color.create(@options[:color])  if @options[:color]
+    p.raw :fill if @options[:fill]
+    p.raw :grestore
+    p
+  end
+  
+end

data/lib/rghost/show.rb

@@ -0,0 +1,88 @@
+require "rghost/ps_object"
+require "rghost/ruby_to_ps"  #to_string
+
+#Writes a text on the current row or point with align.
+class RGhost::Show < RGhost::PsObject
+  
+  attr_accessor :text, :align, :tag
+  DEFAULT_OPTIONS={:tag => :default_font, :align => :show_left}
+  include RGhost::RubyToPs
+  #===Options
+  #
+  #* <tt>:tag or :with</tt> - Use predefined tag
+  #* <tt>:color</tt> - Override color of the tag
+  #* <tt>:align</tt> - Align of the text
+  #===Examples
+  #The vertical line is the current point. For align by point
+  # doc.moveto :x => 3, :y => 4
+  # doc.show "Foo Bar Baz", :align => :show_left      #default
+  #link:images/show01.png 
+  #
+  # doc.moveto :x => 3, :y => 4
+  # doc.show "Foo Bar Baz", :align => :show_center 
+  #link:images/show02.png 
+  #
+  # doc.moveto :x => 3, :y => 4
+  # doc.show "Foo Bar Baz", :align => :show_right
+  #link:images/show03.png 
+  #
+  #For the the current row it's not necessary positioned using moveto. Like below
+  # doc.show "Foo Bar Baz", :align => :show_right
+  #Now justification in page
+  #
+  # doc.show "Foo Bar Baz", :align => :page_left     
+  # 
+  #link:images/show04.png 
+  #
+  # doc.show "Foo Bar Baz", :align => :page_center 
+  # 
+  #link:images/show05.png 
+  #
+  # doc.show "Foo Bar Baz", :align => :page_right
+  # 
+  #link:images/show06.png 
+  #
+  #====Overrinding tag's color 
+  #
+  # doc.show "Foo Bar Baz", :with => :my_italic, :align => :page_center, :color => :red 
+  # 
+  #link:images/show07.png 
+  #
+  #Many tags per row
+  #  doc=Document.new
+  #  doc.define_tags do
+  #    tag :font1, :name => 'Helvetica', :size => 10, :color => '#F34811' 
+  #    tag :font2, :name => 'Times',     :size => 14, :color => '#A4297A' 
+  #    tag :font3, :name => 'TimesBold', :size => 18, :color => '#AA3903' 
+  #  end
+  #
+  #  doc.show "foo bar baz ",  :with => :font1
+  #  doc.show "qux quux ",     :with => :font2
+  #  doc.show "corge ",        :with => :font3
+  #  doc.show "grault garply ",:with => :font2
+  #  doc.show "qux quux",      :with => :font1
+  #
+  #link:images/show08.png 
+  
+
+  
+  def initialize(text,options={ :align=>:show_left, :tag => :default_font, :color => 0 } )
+    @text = text
+    @options=DEFAULT_OPTIONS.dup.merge(options)
+  end
+  
+  def ps
+    rtext=RGhost::PsObject.new
+    #rtext.raw Color.create(@options[:color] || 0) 
+    if @options[:with] || @options[:tag]
+      f="_#{@options[:with] || @options[:tag]}"
+      rtext.raw f 
+    end
+    rtext.raw RGhost::Color.create(@options[:color])  if @options[:color]
+    rtext.raw to_string(@text)
+    rtext.raw @options[:align]
+    
+    rtext.graphic_scope
+  end
+
+end

data/lib/rghost/static_document_callback.rb

@@ -0,0 +1,18 @@
+require "rghost/ps_object"
+require 'rghost/function'
+
+class RGhost::StaticDocumentCallback < RGhost::Function #:nodoc:
+  ACCEPT=[:before_document_create,
+          :first_page,
+          :last_page,
+          :after_document_create 
+  ]  
+  
+  def initialize(name,&block)
+    raise NameError.new("#{name} no accept in #{self.class}") unless ACCEPT.include? name
+    super(name,&block)
+  end
+    
+
+end
+

data/lib/rghost/text.rb

@@ -0,0 +1,44 @@
+require "rghost/ps_object"
+require "rghost/units"
+require "rghost/font"
+require "rghost/ruby_to_ps"
+#Wraps the text so as the it fits on the page(:area_x). Wrapping happens at whitespace characters without hyphenation. 
+#Additionally you can make use of predefined tag and the special tag <br/> to break row. You can disable the parse with second parameter tag_parse=false.
+#===Examples
+#  doc=Document.new
+#  doc.define_tags do
+#    tag :font1, :name => 'Helvetica', :size => 10, :color => '#F34811' 
+#    tag :font2, :name => 'Times',     :size => 11, :color => '#A4297A' 
+#    tag :font3, :name => 'TimesBold', :size => 12, :color => '#AA3903' 
+#  end
+#  my_text="<font1>foo, bar, baz</font1>,<font2>qux, quux</font2>, corge, grault, garply, waldo, <font3>fred, plugh,</font3> xyzzy,<br/> thud, bing" 
+#  doc.text my_text
+#  
+#link:images/text01.png 
+#
+#===Without parse
+#  text="<font1>foo, bar, baz</font1>,<font2>qux, quux</font2>, corge, grault, garply, waldo, <font3>fred, plugh,</font3> xyzzy,<br/> thud, bing" 
+#  doc.text text,false
+#
+#link:images/text02.png 
+class RGhost::Text < RGhost::PsObject
+  include RGhost::RubyToPs
+  include RGhost::ParseText
+  attr_reader  :rows
+  
+  def initialize(text,tag_parse=true)
+    super("")
+    @text=text
+    @tag_parse=tag_parse
+    @options={:text_align => :left}
+  end
+
+  def ps
+    text_to_ps #from RGhost::ParseText
+  end
+  
+
+
+
+end
+

data/lib/rghost/text_in.rb

@@ -0,0 +1,51 @@
+require "rghost/ps_object"
+require "rghost/cursor"
+require "rghost/ruby_to_ps"
+#TextIn is a helper to combine the cursor positioning and text output into one step.
+class RGhost::TextIn < RGhost::PsObject
+  include RGhost::RubyToPs
+  DEFAULT_OPTIONS={:x=> :limit_left,:y=> :current_row, :tag => :default_font, :write => "Ruby Ghost API - current_row = %row% "}
+  #===Options
+  #* <tt>:x and :y</tt> - Initial position.
+  #* <tt>:tag or :with</tt> - Use predefined tag.
+  #* <tt>:color</tt> - Override color of the tag.
+  #* <tt>:text or :write</tt> - The text.
+  #===Examples
+  # doc=RGhost::Document.new
+  # doc.text_in :x => 3, :y => 4, :write => "Foo Bar Baz", :tag => :h1
+  #====Rotating
+  # doc.newpath do
+  #  translate :x => 3, :y=> 4
+  #   rotate 45
+  #   text_in :x => 0, :y => 0, :write => "Foo Bar Baz1", :tag => :font2
+  # end
+  #====Eval postscript internal
+  #TextIn will eval postscript internal variables you pass in between % signs. Sounds complex, huh?  Let's see an example:
+  # doc.text_in :x=> 3.5, :y=> 5.5, :text => "this is %row% row and current page %current_page%"
+  def initialize(options={})
+    
+    @options=DEFAULT_OPTIONS.dup.merge(options)
+  end
+  
+  def ps
+    text=RGhost::PsObject.new
+    text.set RGhost::Cursor.moveto(@options)
+    #text.raw "currentfont"
+    #text.raw "currentrgbcolor"
+    text.raw RGhost::Color.create(@options[:color])  if @options[:color]
+    f="_#{@options[:with] || @options[:tag] || :default_font}"
+    text.raw f
+    #text.call @options[:with] || @options[:tag]  || :default_font
+    
+    text.raw string_eval(@options[:text] || @options[:write] )
+    #text.raw "setrgbcolor"
+    #text.raw "setfont"
+    text.graphic_scope
+    #text.set PsObject.new(@options[:text])
+   
+   
+    
+    
+  end
+  
+end

data/lib/rghost/text_link_in.rb

@@ -0,0 +1,42 @@
+require "rghost/ps_object"
+require "rghost/cursor"
+require "rghost/ruby_to_ps"
+#TextLinkIn is a helper to combine the cursor positioning and text with hyperlink output into one step as TextIn.
+#It works only PDF format
+class RGhost::TextLinkIn < RGhost::PsObject
+  include RGhost::RubyToPs
+  DEFAULT_OPTIONS={:x=> :limit_left,:y=> :current_row, :tag => :default_font, :color => :blue,:label => "RGhost API", :url => 'http://rghost.rubyforge.org'}
+  #===Options
+  #* <tt>:x and :y</tt> - Initial position.
+  #* <tt>:tag or :with</tt> - Use predefined tag.
+  #* <tt>:color</tt> - Override color of the tag.
+  #* <tt>:label</tt> - The text.
+  #* <tt>:url</tt> - Hyperlink.
+  #===Examples
+  # doc=RGhost::Document.new
+  # doc.text_link "Shairon at Hashcode", :url => "http://www.hashcode.eti.br", :color => :blue,  :x => 3, :y => 4, :tag => :h1
+  #====Rotating
+  # doc.newpath do
+  #  translate :x => 3, :y=> 4
+  #   rotate 45
+  #   text_link "RGhost website", :url => "http://rghost.rubyforge.org", :x => 0, :y => 0, :tag => :font2
+  # end
+  def initialize(options={})
+    
+    @options=DEFAULT_OPTIONS.dup.merge(options)
+  end
+  
+  def ps
+    text=RGhost::PsObject.new
+    text.set RGhost::Cursor.moveto(@options)
+    text.raw RGhost::Color.create(@options[:color])  if @options[:color]
+    f="_#{@options[:with] || @options[:tag] || :default_font}"
+    text.raw f
+    text.raw "/:link_str #{to_string(@options[:label])} def /:link_uri #{to_string(@options[:url])} def :link_make "
+    text.ps
+   
+   
+    
+  end
+  
+end

data/lib/rghost/textarea.rb

@@ -0,0 +1,88 @@
+require "rghost/ps_object"
+require "rghost/units"
+require "rghost/font"
+require "rghost/ruby_to_ps"
+require 'rghost/parse_text'
+#TextArea wraps the text so as the it fits in a box of a given width. Wrapping happens at whitespace characters without hyphenation.
+#Additionally you can make use of predefined tag and the special tag <br/> to break row. 
+#The alignment can be left, right and centered.
+#
+#PS: It not jumps pages.
+
+class RGhost::TextArea < RGhost::PsObject
+  include RGhost::RubyToPs
+  include RGhost::ParseText
+  
+  DEFAULT_OPTIONS={
+    :width => :area_x,
+    :row_height => :row_height,
+    :x=> :limit_left,
+    :y=> :current_row,
+    :text_align => :left
+   
+  }
+
+  #===Options
+  #* <tt>:x and :y</tt> - Initial position.
+  #* <tt>:row_height</tt> - Row height :)
+  #* <tt>:with</tt> - Max wide of the text
+  #* <tt>:text_align</tt> - Align of the text in the virtual box using :left, :right and :center.
+  #===Examples
+  # doc=RGhost::Document.new
+  # my_text="<font1>foo, bar, baz</font1><font2>qux, quux</font2>, corge, grault, garply, waldo, <font3>fred, plugh,</font3> xyzzy,<br/> thud, bing"
+  # doc.text_area my_text
+  # 
+  #link:images/text_area01.png 
+  # 
+  # doc.text_area my_text, :width =>3
+  #
+  #link:images/text_area02.png 
+  #
+  # doc.text_area my_text, :width =>3, :text_align => :center
+  #
+  #link:images/text_area03.png 
+  #
+  # doc.text_area my_text, :width =>3, :text_align => :right
+  #
+  #link:images/text_area04.png 
+  #
+  # doc.text_area my_text, :width =>3, :text_align => :right, :x => 3
+  #
+  #link:images/text_area05.png 
+  #
+  # doc.text_area my_text, :width =>3, :text_align => :right, :x => 3, :row_height => 0.6
+  #
+  #link:images/text_area06.png 
+  
+  def initialize(text,options={},tag_parse=true)
+    super("")
+    @text=text
+    @tag_parse=tag_parse
+    options||={}
+    @options=DEFAULT_OPTIONS.dup.merge(options)
+    
+  end
+
+  def ps
+    bw=RGhost::Units::parse(@options[:width])
+    ta=@options[:text_align]
+    rh=RGhost::Units::parse(@options[:row_height])
+    
+    graph=RGhost::Graphic.new do
+      set RGhost::Variable.new(':bw',bw)
+      set RGhost::Variable.new('text_align',"/#{ta}")
+      #      set Variable.new(':rp',rp)
+      set RGhost::Variable.new(':rh',rh)
+    end
+    graph.set RGhost::Cursor.translate(@options) 
+    graph.set RGhost::Cursor.moveto(:x => 0, :y =>0) 
+    #graph.raw ":text_area #{text_to_ps} :text_proc"
+    graph.raw text_to_ps
+    graph
+    #final_text=text_to_ps
+    
+  end
+  
+ 
+end
+