davebenvenuti-prawn 0.11.1.pre

data/spec/transparency_spec.rb

@@ -0,0 +1,89 @@
+require File.join(File.expand_path(File.dirname(__FILE__)), "spec_helper") 
+
+module TransparencyHelper
+  def make_transparent(opacity, stroke_opacity=opacity)
+    @pdf.transparent(opacity, stroke_opacity) do
+      yield if block_given?
+    end
+  end
+end
+
+describe "Document with transparency" do
+  include TransparencyHelper
+
+  it "the PDF version should be at least 1.4" do
+    create_pdf
+    make_transparent(0.5)
+    str = @pdf.render
+    str[0,8].should == "%PDF-1.4"
+  end
+  
+  it "a new extended graphics state should be created for "+
+     "each unique transparency setting" do
+    create_pdf
+    make_transparent(0.5, 0.2) do
+      make_transparent(0.5, 0.75)
+    end
+    extgstates = PDF::Inspector::ExtGState.analyze(@pdf.render).extgstates
+    extgstates.length.should == 2
+  end
+  
+  it "a new extended graphics state should not be created for "+
+     "each duplicate transparency setting" do
+    create_pdf
+    make_transparent(0.5, 0.75) do
+      make_transparent(0.5, 0.75)
+    end
+    extgstates = PDF::Inspector::ExtGState.analyze(@pdf.render).extgstates
+    extgstates.length.should == 1
+  end
+
+  it "setting the transparency with only one parameter sets the transparency"+
+     " for both the fill and the stroke" do
+    create_pdf
+    make_transparent(0.5)
+    extgstate = PDF::Inspector::ExtGState.analyze(@pdf.render).extgstates[0]
+    extgstate[:opacity].should == 0.5
+    extgstate[:stroke_opacity].should == 0.5
+  end
+
+  it "setting the transparency with a numerical parameter and "+
+     "a :stroke should set the fill transparency to the numerical parameter "+
+     "and the stroke transparency to the option" do
+    create_pdf
+    make_transparent(0.5, 0.2)
+    extgstate = PDF::Inspector::ExtGState.analyze(@pdf.render).extgstates[0]
+    extgstate[:opacity].should == 0.5
+    extgstate[:stroke_opacity].should == 0.2
+  end
+
+  it "should enforce the valid range of 0.0 to 1.0" do
+    create_pdf
+    make_transparent(-0.5, -0.2)
+    extgstate = PDF::Inspector::ExtGState.analyze(@pdf.render).extgstates[0]
+    extgstate[:opacity].should == 0.0
+    extgstate[:stroke_opacity].should == 0.0
+
+    create_pdf
+    make_transparent(2.0, 3.0)
+    extgstate = PDF::Inspector::ExtGState.analyze(@pdf.render).extgstates[0]
+    extgstate[:opacity].should == 1.0
+    extgstate[:stroke_opacity].should == 1.0
+  end
+  
+  describe "with more than one page" do
+    include TransparencyHelper
+
+    it "the extended graphic state resource should be added to both pages" do
+      create_pdf
+      make_transparent(0.5, 0.2)
+      @pdf.start_new_page
+      make_transparent(0.5, 0.2) 
+      extgstates = PDF::Inspector::ExtGState.analyze(@pdf.render).extgstates
+      extgstate = extgstates[0]
+      extgstates.length.should == 2
+      extgstate[:opacity].should == 0.5
+      extgstate[:stroke_opacity].should == 0.2
+    end
+  end
+end

data/vendor/pdf-inspector/README

@@ -0,0 +1,18 @@
+PDF::Inspector : A tool for analyzing PDF output
+
+This library provides a number of PDF::Reader[0] based tools for use in testing
+PDF output.  Presently, the primary purpose of this tool is to support the 
+tests found in Prawn[1], a pure Ruby PDF generation library.
+
+However, it may be useful to others, so we have made it available on Github[2]
+
+Questions can be directed to the Prawn mailing list[3], but please remember
+that this code is not necessarily suitable for production and has no officially
+planned release date.  
+
+That having been said, patches are welcome!
+
+[0] http://github.com/yob/pdf-reader                                         
+[1] http://github.com/sandal/prawn                                           
+[2] http://github.com/sandal/pdf-inspector              
+[3] http://groups.google.com/group/prawn-ruby

data/vendor/pdf-inspector/lib/pdf/inspector.rb

@@ -0,0 +1,26 @@
+require "rubygems"
+require "pdf/reader"
+require "pdf/inspector/text" 
+require "pdf/inspector/xobject"
+require "pdf/inspector/extgstate"
+require "pdf/inspector/graphics"
+require "pdf/inspector/page"
+
+module PDF
+  class Inspector
+    def self.analyze(output,*args,&block) 
+      obs = self.new(*args, &block)
+      PDF::Reader.string(output,obs)
+      obs  
+    end         
+    
+    def self.analyze_file(filename,*args,&block)
+      analyze(File.open(filename, "rb") { |f| f.read },*args,&block)
+    end  
+    
+    def self.parse(obj)
+      PDF::Reader::Parser.new(
+        PDF::Reader::Buffer.new(StringIO.new(obj)), nil).parse_token
+    end
+  end
+end

data/vendor/pdf-inspector/lib/pdf/inspector/extgstate.rb

@@ -0,0 +1,18 @@
+module PDF
+  class Inspector
+    class ExtGState < Inspector
+      attr_accessor :extgstates
+
+      def initialize
+        @extgstates = []
+      end
+
+      def resource_extgstate(*params)
+        @extgstates << {
+                        :opacity => params[1][:ca],
+                        :stroke_opacity => params[1][:CA]
+                        }
+      end
+    end
+  end
+end

data/vendor/pdf-inspector/lib/pdf/inspector/graphics.rb

@@ -0,0 +1,131 @@
+module PDF
+  class Inspector 
+    module Graphics                   
+      class Line < Inspector
+        attr_accessor :points, :widths
+
+        def initialize
+          @points = []
+          @widths = [] 
+        end  
+
+        def append_line(*params)
+          @points << params
+        end    
+
+        def begin_new_subpath(*params)
+          @points << params
+        end           
+        
+        def set_line_width(params)
+          @widths << params
+        end
+
+      end 
+      
+      class Rectangle < Inspector
+        attr_reader :rectangles
+
+        def initialize
+          @rectangles = []     
+        end
+
+        def append_rectangle(*params) 
+          @rectangles << { :point  => params[0..1],    
+                           :width  => params[2],
+                           :height => params[3]  }     
+        end
+      end
+      
+      class Curve < Inspector
+
+        attr_reader :coords
+
+        def initialize
+          @coords = []          
+        end   
+
+        def begin_new_subpath(*params)   
+          @coords += params
+        end
+
+        def append_curved_segment(*params)
+          @coords += params
+        end           
+
+      end   
+      
+      class Color < Inspector
+        attr_reader :stroke_color, :fill_color, :stroke_color_count, 
+                    :fill_color_count
+
+        def initialize
+          @stroke_color_count = 0
+          @fill_color_count   = 0
+        end
+
+        def set_color_for_stroking_and_special(*params)
+          @stroke_color_count += 1
+          @stroke_color = params
+        end
+
+        def set_color_for_nonstroking_and_special(*params)
+          @fill_color_count += 1
+          @fill_color = params
+        end
+      end 
+      
+      class Dash < Inspector
+        attr_reader :stroke_dash, :stroke_dash_count
+
+        def initialize
+          @stroke_dash_count = 0
+        end
+
+        def set_line_dash(*params)
+          @stroke_dash_count += 1
+          @stroke_dash = params
+        end
+      end
+      
+      class CapStyle < Inspector
+        attr_reader :cap_style, :cap_style_count
+
+        def initialize
+          @cap_style_count = 0
+        end
+
+        def set_line_cap_style(*params)
+          @cap_style_count += 1
+          @cap_style = params[0]
+        end
+      end
+      
+      class JoinStyle < Inspector
+        attr_reader :join_style, :join_style_count
+
+        def initialize
+          @join_style_count = 0
+        end
+
+        def set_line_join_style(*params)
+          @join_style_count += 1
+          @join_style = params[0]
+        end
+      end
+      
+      class Matrix < Inspector
+        attr_reader :matrices
+
+        def initialize
+          @matrices = []
+        end
+
+        def concatenate_matrix(*values)
+          @matrices << values
+        end
+      end
+      
+    end                                
+  end
+end

data/vendor/pdf-inspector/lib/pdf/inspector/page.rb

@@ -0,0 +1,25 @@
+module PDF
+  class Inspector
+    class Page < Inspector
+      attr_reader :pages
+      
+      def initialize
+        @pages = []
+      end
+
+      def begin_page(params)
+        @pages << {:size => params[:MediaBox][-2..-1], :strings => []}
+      end                       
+
+      def show_text(*params)
+        @pages.last[:strings] << params[0]
+      end
+
+      def show_text_with_positioning(*params)      
+        # ignore kerning information
+        @pages.last[:strings] << params[0].reject { |e| Numeric === e }.join
+      end
+      
+    end   
+  end
+end

data/vendor/pdf-inspector/lib/pdf/inspector/text.rb

@@ -0,0 +1,46 @@
+module PDF
+  class Inspector
+    class Text < Inspector                    
+      attr_accessor :font_settings, :size, :strings
+      attr_accessor :character_spacing, :word_spacing
+      attr_accessor :kerned
+
+      def initialize     
+        @font_settings = []
+        @fonts = {}
+        @strings = []
+        @character_spacing = []
+        @word_spacing = []
+        @kerned = []
+      end
+
+      def resource_font(*params)
+        @fonts[params[0]] = params[1].basefont
+      end
+
+      def set_text_font_and_size(*params)     
+        @font_settings << { :name => @fonts[params[0]], :size => params[1] }
+      end     
+
+      def show_text(*params)
+        @kerned << false
+        @strings << params[0]
+      end
+
+      def show_text_with_positioning(*params)      
+        @kerned << true
+        # ignore kerning information
+        @strings << params[0].reject { |e| Numeric === e }.join
+      end
+
+      def set_character_spacing(*params)
+        @character_spacing << params[0]
+      end
+
+      def set_word_spacing(*params)
+        @word_spacing << params[0]
+      end
+      
+    end                                       
+  end
+end

data/vendor/pdf-inspector/lib/pdf/inspector/xobject.rb

@@ -0,0 +1,19 @@
+module PDF
+  class Inspector
+    class XObject < Inspector
+      attr_accessor :page_xobjects
+
+      def initialize
+        @page_xobjects = []
+      end
+
+      def resource_xobject(*params)
+        @page_xobjects.last << params.first
+      end
+
+      def begin_page(*params)
+        @page_xobjects << [] 
+      end
+    end
+  end
+end

data/vendor/ttfunk/example.rb

@@ -0,0 +1,45 @@
+$LOAD_PATH << "#{File.dirname(__FILE__)}/lib"
+require "ttfunk"
+
+def character_lookup(file, character)
+  puts "character     : #{character}"
+
+  character_code = character.unpack("U*").first
+  puts "character code: #{character_code}"
+
+  glyph_id = file.cmap.unicode.first[character_code]
+  puts "glyph id      : #{glyph_id}"
+
+  glyph = file.glyph_outlines.for(glyph_id)
+  puts "glyph type    : %s" % glyph.class.name.split(/::/).last.downcase
+  puts "glyph size    : %db" % glyph.raw.length
+  puts "glyph bbox    : (%d,%d)-(%d,%d)" % [glyph.x_min, glyph.y_min, glyph.x_max, glyph.y_max]
+
+  if glyph.compound?
+    puts "components    : %d %s" % [glyph.glyph_ids.length, glyph.glyph_ids.inspect]
+  end
+end
+
+file = TTFunk::File.open(ARGV.first || "data/fonts/DejaVuSans.ttf")
+
+puts "-- FONT ------------------------------------"
+
+puts "revision  : %08x" % file.header.font_revision
+puts "name      : #{file.name.font_name.join(', ')}"
+puts "family    : #{file.name.font_family.join(', ')}"
+puts "subfamily : #{file.name.font_subfamily.join(', ')}"
+puts "postscript: #{file.name.postscript_name}"
+
+puts "-- FONT METRICS ----------------------------"
+
+puts "units/em  : #{file.header.units_per_em}"
+puts "ascent    : #{file.ascent}"
+puts "descent   : #{file.descent}"
+puts "line gap  : #{file.line_gap}"
+puts "bbox      : (%d,%d)-(%d,%d)" % file.bbox
+
+puts "-- SIMPLE CHARACTER -> GLYPH LOOKUP --------"
+character_lookup(file, "\xE2\x98\x9C")
+
+puts "-- COMPOUND CHARACTER -> GLYPH LOOKUP ------"
+character_lookup(file, "ë")

data/vendor/ttfunk/lib/ttfunk.rb

@@ -0,0 +1,102 @@
+require 'stringio'
+require 'ttfunk/directory'
+require 'ttfunk/resource_file'
+
+module TTFunk
+  class File
+    attr_reader :contents
+    attr_reader :directory
+
+    def self.open(file)
+      new(::File.open(file, "rb") { |f| f.read })
+    end
+
+    def self.from_dfont(file, which=0)
+      new(ResourceFile.open(file) { |dfont| dfont["sfnt", which] })
+    end
+
+    def initialize(contents)
+      @contents = StringIO.new(contents)
+      @directory = Directory.new(@contents)
+    end
+
+
+    def ascent
+      @ascent ||= os2.exists? && os2.ascent || horizontal_header.ascent
+    end
+
+    def descent
+      @descent ||= os2.exists? && os2.descent || horizontal_header.descent
+    end
+
+    def line_gap
+      @line_gap ||= os2.exists? && os2.line_gap || horizontal_header.line_gap
+    end
+
+    def bbox
+      [header.x_min, header.y_min, header.x_max, header.y_max]
+    end
+
+
+    def directory_info(tag)
+      directory.tables[tag.to_s]
+    end
+
+    def header
+      @header ||= TTFunk::Table::Head.new(self)
+    end
+
+    def cmap
+      @cmap ||= TTFunk::Table::Cmap.new(self)
+    end
+
+    def horizontal_header
+      @horizontal_header ||= TTFunk::Table::Hhea.new(self)
+    end
+
+    def horizontal_metrics
+      @horizontal_metrics ||= TTFunk::Table::Hmtx.new(self)
+    end
+
+    def maximum_profile
+      @maximum_profile ||= TTFunk::Table::Maxp.new(self)
+    end
+
+    def kerning
+      @kerning ||= TTFunk::Table::Kern.new(self)
+    end
+
+    def name
+      @name ||= TTFunk::Table::Name.new(self)
+    end
+
+    def os2
+      @os2 ||= TTFunk::Table::OS2.new(self)
+    end
+
+    def postscript
+      @postscript ||= TTFunk::Table::Post.new(self)
+    end
+
+    def glyph_locations
+      @glyph_locations ||= TTFunk::Table::Loca.new(self)
+    end
+
+    def glyph_outlines
+      @glyph_outlines ||= TTFunk::Table::Glyf.new(self)
+    end
+  end   
+end
+
+require "ttfunk/table/cmap"
+require "ttfunk/table/glyf"
+require "ttfunk/table/head"
+require "ttfunk/table/hhea"
+require "ttfunk/table/hmtx"
+require "ttfunk/table/kern"
+require "ttfunk/table/loca"
+require "ttfunk/table/maxp"
+require "ttfunk/table/name"
+require "ttfunk/table/os2"
+require "ttfunk/table/post"
+