prawn-core 0.5.0.1

data/spec/font_spec.rb

@@ -0,0 +1,274 @@
+# encoding: utf-8
+
+require File.join(File.expand_path(File.dirname(__FILE__)), "spec_helper")           
+require 'iconv'
+
+describe "Font behavior" do  
+
+  it "should default to Helvetica if no font is specified" do
+    @pdf = Prawn::Document.new
+    @pdf.font.name.should == "Helvetica"
+  end
+
+end    
+
+describe "font style support" do
+  before(:each) { create_pdf }
+  
+  it "should complain if there is no @current_page" do
+    pdf_without_page = Prawn::Document.new(:skip_page_creation => true)
+
+    lambda{ pdf_without_page.font "Helvetica" }.
+      should.raise(Prawn::Errors::NotOnPage)
+  end
+  
+  it "should allow specifying font style by style name and font family" do    
+    @pdf.font "Courier", :style => :bold
+    @pdf.text "In Courier bold"    
+    
+    @pdf.font "Courier", :style => :bold_italic
+    @pdf.text "In Courier bold-italic"   
+     
+    @pdf.font "Courier", :style => :italic
+    @pdf.text "In Courier italic"    
+    
+    @pdf.font "Courier", :style => :normal
+    @pdf.text "In Normal Courier"  
+           
+    @pdf.font "Helvetica"
+    @pdf.text "In Normal Helvetica"     
+    
+    text = PDF::Inspector::Text.analyze(@pdf.render)
+    text.font_settings.map { |e| e[:name] }.should == 
+     [:"Courier-Bold", :"Courier-BoldOblique", :"Courier-Oblique", 
+      :Courier, :Helvetica]
+  end
+
+  it "should allow font familes to be defined in a single dfont" do
+    file = "#{Prawn::BASEDIR}/data/fonts/Action Man.dfont"
+    @pdf.font_families["Action Man"] = {
+      :normal      => { :file => file, :font => "ActionMan" },
+      :italic      => { :file => file, :font => "ActionMan-Italic" },
+      :bold        => { :file => file, :font => "ActionMan-Bold" },
+      :bold_italic => { :file => file, :font => "ActionMan-BoldItalic" }
+    }
+
+    @pdf.font "Action Man", :style => :italic
+    @pdf.text "In ActionMan-Italic"
+
+    text = PDF::Inspector::Text.analyze(@pdf.render)
+    name = text.font_settings.map { |e| e[:name] }.first
+    name = name.unpack("n*")[2..-1].pack("U*")
+    name = name.sub(/\w+\+/, "subset+")
+    name.should == "subset+ActionMan-Italic"
+  end
+end
+
+describe "Transactional font handling" do
+  before(:each) { create_pdf }
+  
+  it "should allow setting of size directly when font is created" do
+    @pdf.font "Courier", :size => 16
+    @pdf.font_size.should == 16 
+  end
+  
+  it "should allow temporary setting of a new font using a transaction" do
+    @pdf.font "Helvetica", :size => 12
+    
+    @pdf.font "Courier", :size => 16 do
+      @pdf.font.name.should == "Courier"
+      @pdf.font_size.should == 16
+    end
+    
+    @pdf.font.name.should == "Helvetica"
+    @pdf.font_size.should == 12
+  end
+
+  it "should mask font size when using a transacation" do
+    @pdf.font "Courier", :size => 16 do
+      @pdf.font_size.should == 16
+    end
+
+    @pdf.font "Times-Roman"
+    @pdf.font "Courier"
+
+    @pdf.font_size.should == 12
+  end
+  
+end
+
+describe "Document#page_fonts" do
+  before(:each) { create_pdf } 
+  
+  it "should register fonts properly by page" do
+    @pdf.font "Courier"; @pdf.text("hello")
+    @pdf.font "Helvetica"; @pdf.text("hello")
+    @pdf.font "Times-Roman"; @pdf.text("hello")
+    ["Courier","Helvetica","Times-Roman"].each { |f|
+      page_should_include_font(f)
+    }                                        
+    
+    @pdf.start_new_page    
+    @pdf.font "Helvetica"; @pdf.text("hello")
+    page_should_include_font("Helvetica")
+    page_should_not_include_font("Courier")
+    page_should_not_include_font("Times-Roman")
+  end    
+  
+  def page_includes_font?(font)
+    @pdf.page_fonts.values.map { |e| e.data[:BaseFont] }.include?(font.to_sym)
+  end                             
+  
+  def page_should_include_font(font)    
+    assert_block("Expected page to include font: #{font}") do
+      page_includes_font?(font)
+    end
+  end   
+  
+  def page_should_not_include_font(font)
+    assert_block("Did not expect page to include font: #{font}") do
+      not page_includes_font?(font) 
+    end
+  end
+      
+end
+    
+describe "AFM fonts" do
+  
+  setup do
+    create_pdf
+    @times = @pdf.find_font "Times-Roman"
+    @iconv = ::Iconv.new('Windows-1252', 'utf-8')
+  end
+  
+  it "should calculate string width taking into account accented characters" do
+    @times.compute_width_of(@iconv.iconv("é"), :size => 12).should == @times.compute_width_of("e", :size => 12)
+  end
+  
+  it "should calculate string width taking into account kerning pairs" do
+    @times.compute_width_of(@iconv.iconv("To"), :size => 12).should == 13.332
+    @times.compute_width_of(@iconv.iconv("To"), :size => 12, :kerning => true).should == 12.372
+    @times.compute_width_of(@iconv.iconv("Tö"), :size => 12, :kerning => true).should == 12.372
+  end
+
+  it "should encode text without kerning by default" do
+    @times.encode_text(@iconv.iconv("To")).should == [[0, "To"]]
+    @times.encode_text(@iconv.iconv("Télé")).should == [[0, @iconv.iconv("Télé")]]
+    @times.encode_text(@iconv.iconv("Technology")).should == [[0, "Technology"]]
+    @times.encode_text(@iconv.iconv("Technology...")).should == [[0, "Technology..."]]
+  end
+
+  it "should encode text with kerning if requested" do
+    @times.encode_text(@iconv.iconv("To"), :kerning => true).should == [[0, ["T", 80, "o"]]]
+    @times.encode_text(@iconv.iconv("Télé"), :kerning => true).should == [[0, ["T", 70, @iconv.iconv("élé")]]]
+    @times.encode_text(@iconv.iconv("Technology"), :kerning => true).should == [[0, ["T", 70, "echnology"]]]
+    @times.encode_text(@iconv.iconv("Technology..."), :kerning => true).should == [[0, ["T", 70, "echnology", 65, "..."]]]
+  end
+
+  describe "when normalizing encoding" do
+
+    it "should not modify the original string when normalize_encoding() is used" do
+      original = "Foo"
+      normalized = @times.normalize_encoding(original)
+      assert ! original.equal?(normalized)
+    end
+
+    it "should modify the original string when normalize_encoding!() is used" do
+      original = "Foo"
+      normalized = @times.normalize_encoding!(original)
+      assert original.equal?(normalized)
+    end
+
+  end
+  
+end
+
+describe "TTF fonts" do
+  
+  setup do
+    create_pdf
+    @activa = @pdf.find_font "#{Prawn::BASEDIR}/data/fonts/Activa.ttf"
+  end
+  
+  it "should calculate string width taking into account accented characters" do
+    @activa.compute_width_of("é", :size => 12).should == @activa.compute_width_of("e", :size => 12)
+  end
+  
+  it "should calculate string width taking into account kerning pairs" do
+    @activa.compute_width_of("To", :size => 12).should == 15.228
+    @activa.compute_width_of("To", :size => 12, :kerning => true).should == 12.996
+  end
+  
+  it "should encode text without kerning by default" do
+    @activa.encode_text("To").should == [[0, "To"]]
+    @activa.encode_text("Télé").should == [[0, "T\216l\216"]]
+    @activa.encode_text("Technology").should == [[0, "Technology"]]
+    @activa.encode_text("Technology...").should == [[0, "Technology..."]]
+    @activa.encode_text("Teχnology...").should == [[0, "Te"], [1, "!"], [0, "nology..."]]
+  end
+
+  it "should encode text with kerning if requested" do
+    @activa.encode_text("To", :kerning => true).should == [[0, ["T", 186.0, "o"]]]
+    @activa.encode_text("To", :kerning => true).should == [[0, ["T", 186.0, "o"]]]
+    @activa.encode_text("Technology", :kerning => true).should == [[0, ["T", 186.0, "echnology"]]]
+    @activa.encode_text("Technology...", :kerning => true).should == [[0, ["T", 186.0, "echnology", 88.0, "..."]]]
+    @activa.encode_text("Teχnology...", :kerning => true).should == [[0, ["T", 186.0, "e"]], [1, "!"], [0, ["nology", 88.0, "..."]]]
+  end
+
+  describe "when normalizing encoding" do
+
+    it "should not modify the original string when normalize_encoding() is used" do
+      original = "Foo"
+      normalized = @activa.normalize_encoding(original)
+      assert ! original.equal?(normalized)
+    end
+
+    it "should modify the original string when normalize_encoding!() is used" do
+      original = "Foo"
+      normalized = @activa.normalize_encoding!(original)
+      assert original.equal?(normalized)
+    end
+
+  end
+
+  
+end
+
+describe "DFont fonts" do
+  setup do
+    create_pdf
+    @file = "#{Prawn::BASEDIR}/data/fonts/Action Man.dfont"
+  end
+
+  it "should list all named fonts" do
+    list = Prawn::Font::DFont.named_fonts(@file)
+    list.sort.should == %w(ActionMan ActionMan-Italic ActionMan-Bold ActionMan-BoldItalic).sort
+  end
+
+  it "should count the number of fonts in the file" do
+    Prawn::Font::DFont.font_count(@file).should == 4
+  end
+
+  it "should default selected font to the first one if not specified" do
+    font = @pdf.find_font(@file)
+    font.basename.should == "ActionMan"
+  end
+
+  it "should allow font to be selected by index" do
+    font = @pdf.find_font(@file, :font => 2)
+    font.basename.should == "ActionMan-Italic"
+  end
+
+  it "should allow font to be selected by name" do
+    font = @pdf.find_font(@file, :font => "ActionMan-BoldItalic")
+    font.basename.should == "ActionMan-BoldItalic"
+  end
+
+  it "should cache font object based on selected font" do
+    f1 = @pdf.find_font(@file, :font => "ActionMan")
+    f2 = @pdf.find_font(@file, :font => "ActionMan-Bold")
+    assert_not_equal f1.object_id, f2.object_id
+    assert_equal f1.object_id, @pdf.find_font(@file, :font => "ActionMan").object_id
+    assert_equal f2.object_id, @pdf.find_font(@file, :font => "ActionMan-Bold").object_id
+  end
+end

data/spec/graphics_spec.rb

@@ -0,0 +1,209 @@
+# encoding: utf-8
+
+require File.join(File.expand_path(File.dirname(__FILE__)), "spec_helper")
+
+describe "When drawing a line" do
+
+  before(:each) { create_pdf }
+
+  it "should draw a line from (100,600) to (100,500)" do
+    @pdf.line([100,600],[100,500])
+
+    line_drawing = PDF::Inspector::Graphics::Line.analyze(@pdf.render)
+
+    line_drawing.points.should == [[100,600],[100,500]]
+  end
+
+  it "should draw two lines at (100,600) to (100,500) " +
+     "and (75,100) to (50,125)" do
+    @pdf.line(100,600,100,500)
+    @pdf.line(75,100,50,125)
+
+    line_drawing = PDF::Inspector::Graphics::Line.analyze(@pdf.render)
+
+    line_drawing.points.should ==
+      [[100.0, 600.0], [100.0, 500.0], [75.0, 100.0], [50.0, 125.0]]
+  end
+
+  it "should properly set line width via line_width=" do
+     @pdf.line_width = 10
+     line = PDF::Inspector::Graphics::Line.analyze(@pdf.render)
+     line.widths.first.should == 10
+  end
+
+  it "should properly set line width via line_width(width)" do
+     @pdf.line_width(10)
+     line = PDF::Inspector::Graphics::Line.analyze(@pdf.render)
+     line.widths.first.should == 10
+  end
+
+  describe "(Horizontally)" do
+    it "should draw from [x1,pdf.y],[x2,pdf.y]" do
+      @pdf.horizontal_line(100,150)
+      @line = PDF::Inspector::Graphics::Line.analyze(@pdf.render)
+      @line.points.should == [[100.0 + @pdf.bounds.absolute_left, @pdf.y],
+                              [150.0 + @pdf.bounds.absolute_left, @pdf.y]]
+    end
+
+    it "should draw a line from (200, 250) to (300, 250)" do
+      @pdf.horizontal_line(200,300,:at => 250)
+      line_drawing = PDF::Inspector::Graphics::Line.analyze(@pdf.render)
+      line_drawing.points.should == [[200,250],[300,250]]
+    end
+  end
+
+  describe "(Vertically)" do
+    it "should draw a line from (350, 300) to (350, 400)" do
+      @pdf.vertical_line(300,400,:at => 350)
+      line_drawing = PDF::Inspector::Graphics::Line.analyze(@pdf.render)
+      line_drawing.points.should == [[350,300],[350,400]]
+    end
+    it "should require a y coordinate" do
+      lambda { @pdf.vertical_line(400,500) }.
+        should.raise(ArgumentError)
+    end
+  end
+
+end
+
+describe "When drawing a polygon" do
+
+  before(:each) { create_pdf }
+
+  it "should draw each line passed to polygon()" do
+    @pdf.polygon([100,500],[100,400],[200,400])
+
+    line_drawing = PDF::Inspector::Graphics::Line.analyze(@pdf.render)
+    line_drawing.points.should == [[100,500],[100,400],[200,400],[100,500]]
+  end
+
+end
+
+describe "When drawing a rectangle" do
+
+  before(:each) { create_pdf }
+
+  it "should use a point, width, and height for coords" do
+    @pdf.rectangle [200,200], 50, 100
+
+    rectangles = PDF::Inspector::Graphics::Rectangle.
+      analyze(@pdf.render).rectangles
+    # PDF uses bottom left corner
+    rectangles[0][:point].should  == [200,100]
+    rectangles[0][:width].should  == 50
+    rectangles[0][:height].should == 100
+
+  end
+
+end
+
+describe "When drawing a curve" do
+
+  before(:each) { create_pdf }
+
+  it "should draw a bezier curve from 50,50 to 100,100" do
+    @pdf.move_to  [50,50]
+    @pdf.curve_to [100,100],:bounds => [[20,90], [90,70]]
+    curve = PDF::Inspector::Graphics::Curve.analyze(@pdf.render)
+    curve.coords.should == [50.0, 50.0, 20.0, 90.0, 90.0, 70.0, 100.0, 100.0]
+  end
+
+  it "should draw a bezier curve from 100,100 to 50,50" do
+    @pdf.curve [100,100], [50,50], :bounds => [[20,90], [90,75]]
+    curve = PDF::Inspector::Graphics::Curve.analyze(@pdf.render)
+    curve.coords.should == [100.0, 100.0, 20.0, 90.0, 90.0, 75.0, 50.0, 50.0]
+  end
+
+end
+
+describe "When drawing an ellipse" do
+  before(:each) do
+    create_pdf
+    @pdf.ellipse_at [100,100], 25, 50
+    @curve = PDF::Inspector::Graphics::Curve.analyze(@pdf.render)
+  end
+
+  it "should move the pointer to the center of the ellipse after drawing" do
+    @curve.coords[-2..-1].should == [100,100]
+  end
+
+end
+
+describe "When drawing a circle" do
+  before(:each) do
+    create_pdf
+    @pdf.circle_at [100,100], :radius => 25
+    @pdf.ellipse_at [100,100], 25, 25
+    @curve = PDF::Inspector::Graphics::Curve.analyze(@pdf.render)
+  end
+
+  it "should stroke the same path as the equivalent ellipse" do
+    middle = @curve.coords.length / 2
+    @curve.coords[0...middle].should == @curve.coords[middle..-1]
+  end
+end
+
+describe "When setting colors" do
+
+  before(:each) { create_pdf }
+
+  it "should set stroke colors" do
+    @pdf.stroke_color "ffcccc"
+    colors = PDF::Inspector::Graphics::Color.analyze(@pdf.render)
+    # 100% red, 80% green, 80% blue
+    colors.stroke_color.should == [1.0, 0.8, 0.8]
+  end
+
+  it "should set fill colors" do
+    @pdf.fill_color "ccff00"
+    colors = PDF::Inspector::Graphics::Color.analyze(@pdf.render)
+    # 80% red, 100% green, 0% blue
+    colors.fill_color.should == [0.8,1.0,0]
+  end
+
+  it "should reset the colors on each new page if they have been defined" do
+    @pdf.fill_color "ccff00"
+    colors = PDF::Inspector::Graphics::Color.analyze(@pdf.render)
+
+    colors.fill_color_count.should == 2
+    colors.stroke_color_count.should == 1
+    @pdf.start_new_page
+    @pdf.stroke_color "ff00cc"
+
+    colors = PDF::Inspector::Graphics::Color.analyze(@pdf.render)
+    colors.fill_color_count.should == 3
+    colors.stroke_color_count.should == 3
+
+    @pdf.start_new_page
+    colors = PDF::Inspector::Graphics::Color.analyze(@pdf.render)
+    colors.fill_color_count.should == 4
+    colors.stroke_color_count.should == 4
+
+    colors.fill_color.should   == [0.8,1.0,0.0]
+    colors.stroke_color.should == [1.0,0.0,0.8]
+  end
+
+end
+
+describe "When using painting shortcuts" do
+  before(:each) { create_pdf }
+
+  it "should convert stroke_some_method(args) into some_method(args); stroke" do
+    @pdf.expects(:line_to).with([100,100])
+    @pdf.expects(:stroke)
+
+    @pdf.stroke_line_to [100,100]
+  end
+
+  it "should convert fill_some_method(args) into some_method(args); fill" do
+    @pdf.expects(:line_to).with([100,100])
+    @pdf.expects(:fill)
+
+    @pdf.fill_line_to [100,100]
+  end
+
+  it "should not break method_missing" do
+    lambda { @pdf.i_have_a_pretty_girlfriend_named_jia }.
+      should.raise(NoMethodError)
+  end
+end