thinreports 0.6.0.pre3

data/lib/thinreports/generator/pdf/document/parse_color.rb

@@ -0,0 +1,51 @@
+# coding: utf-8
+
+module ThinReports
+  module Generator
+    
+    # @private
+    module Pdf::ParseColor
+      # @param [String] color
+      # @return [String]
+      def parse_color(color)
+        color = color.downcase
+        
+        unless color =~ /^#?[\da-f]{6}$/
+          find_color_from_name(color)
+        else
+          color.delete('#')
+        end
+      end
+    
+    private
+      
+      # Supported only SAFE COLORS.
+      SUPPORTED_COLOR_NAMES = {
+        'red'     => 'ff0000',
+        'yellow'  => 'fff000',
+        'lime'    => '00ff00',
+        'aqua'    => '00ffff',
+        'blue'    => '0000ff',
+        'fuchsia' => 'ff00ff',
+        'maroon'  => '800000',
+        'olive'   => '808000',
+        'green'   => '008800',
+        'teal'    => '008080',
+        'navy'    => '000080',
+        'purple'  => '800080',
+        'black'   => '000000',
+        'gray'    => '808080',
+        'silver'  => 'c0c0c0',
+        'white'   => 'ffffff'
+      }
+      
+      def find_color_from_name(name)
+        unless color = SUPPORTED_COLOR_NAMES[name]
+          raise ThinReports::Errors::UnsupportedColorName, name
+        end
+        color
+      end
+    end
+    
+  end
+end

data/lib/thinreports/generator/pdf/document/parse_svg.rb

@@ -0,0 +1,102 @@
+# coding: utf-8
+
+require 'rexml/document'
+
+module ThinReports
+  module Generator
+    
+    # @private
+    module Pdf::ParseSVG
+      # @param [String] source
+      # @param [String] base_path
+      def parse_svg(source, base_path)
+        svg = REXML::Document.new(clean_svg(source))
+        
+        svg.elements[base_path].each do |elm|
+          case elm.attributes['class']
+          when 's-text'    then draw_svg_text(elm)
+          when 's-image'   then draw_svg_image(elm)
+          when 's-rect'    then draw_svg_rect(elm)
+          when 's-ellipse' then draw_svg_ellipse(elm)
+          when 's-line'    then draw_svg_line(elm)
+          end
+        end
+        svg = nil
+      end
+      
+    private
+      
+      # @param [String] source
+      # @return [String]
+      def clean_svg(source)
+        source.gsub(/<%.+?%>/, '')
+      end
+      
+      # @param [REXML::Element] elm
+      # @param [Array<String>] keys
+      # @return [Array<String>]
+      def element_attributes_values_at(elm, *keys)
+        attrs = elm.attributes
+        keys.inject([]) do |values, key|
+          values << attrs[key]
+        end
+      end
+      
+      # @param [REXML::Element] svg_elm
+      def draw_svg_rect(elm)
+        x, y, w, h = element_attributes_values_at(elm, 'x', 'y', 'width', 'height')
+        attributes = common_graphic_attrs(elm.attributes) do |attrs|
+          attrs[:radius] = elm.attributes['rx']
+        end
+        rect(x, y, w, h, attributes)
+      end
+      
+      # @see #draw_svg_rect
+      def draw_svg_ellipse(elm)
+        x, y, rx, ry = element_attributes_values_at(elm, 'cx', 'cy', 'rx', 'ry')
+        ellipse(x, y, rx, ry,
+                common_graphic_attrs(elm.attributes))
+      end
+      
+      # @see #draw_svg_rect
+      def draw_svg_line(elm)
+        x1, y1, x2, y2 = element_attributes_values_at(elm, 'x1', 'y1', 'x2', 'y2')
+        line(x1, y1, x2, y2,
+             common_graphic_attrs(elm.attributes))
+      end
+      
+      # @see #draw_svg_rect
+      def draw_svg_text(elm)
+        x, y, w, h = element_attributes_values_at(elm, 'x-left', 'x-top',
+                                                       'x-width', 'x-height')
+        content = []
+        elm.each_element('text') do |text_elm|
+          content << text_elm.text
+        end
+        text(content.join("\n"), x, y, w, h, svg_text_attrs(elm.attributes))
+      end
+      
+      # @see #draw_svg_rect
+      def draw_svg_image(elm)
+        x, y, w, h = element_attributes_values_at(elm, 'x', 'y', 'width', 'height')
+        base64image(extract_base64_string(elm.attributes['xlink:href']),
+                    x, y, w, h)
+      end
+    
+      # @param [Hash] attributes
+      # @return [Hash]
+      def svg_text_attrs(attributes)
+        common_text_attrs(attributes) do |attrs|
+          # Set the :line_height option.
+          if height = attributes['x-line-height']
+            attrs[:line_height] = height unless height == 'normal'
+          end
+          # Set the :valign option.
+          attrs[:valign] = text_valign(attributes['x-valign'])
+        end
+      end
+      
+    end
+    
+  end
+end

data/lib/thinreports/generator/pdf/drawer.rb

@@ -0,0 +1,16 @@
+# coding: utf-8
+
+module ThinReports
+  module Generator
+    
+    # @private
+    module Pdf::Drawer
+    end
+    
+  end
+end
+
+require 'thinreports/generator/pdf/drawer/base'
+require 'thinreports/generator/pdf/drawer/page'
+require 'thinreports/generator/pdf/drawer/list'
+require 'thinreports/generator/pdf/drawer/list_section'

data/lib/thinreports/generator/pdf/drawer/base.rb

@@ -0,0 +1,56 @@
+# coding: utf-8
+
+module ThinReports
+  module Generator
+    
+    # @abstract
+    # @private
+    class Pdf::Drawer::Base
+      # @param [ThinReports::Generator::Pdf::Document] pdf
+      # @param [ThinReports::Core::Shape::Manager::Format] format
+      def initialize(pdf, format)
+        @pdf     = pdf
+        @format  = format
+        @stamps  = []
+        @draw_at = nil
+      end
+      
+      # @abstract
+      def draw
+        raise NotImplementedError
+      end
+      
+    private
+      
+      # @param [ThinReports::Core::Shape::Base::Internal] shape
+      # @return [String]
+      def pdf_stamp_id(shape)
+        "#{@format.identifier}#{shape_stamp_id(shape)}"
+      end
+      
+      # @see #pdf_stamp_id
+      def shape_stamp_id(shape)
+        id = shape.id.dup
+        id << shape.attrs.values_at('fill', 'stroke').join unless shape.attrs.empty?
+        id.gsub(/#/, '')
+      end
+      
+      # @overload pdf_stamp('stamp_id')
+      #   @param [String] shape
+      # @overload pdf_stamp(shape)
+      #   @param [ThinReports::Core::Shape::Base::Internal] shape
+      def pdf_stamp(shape)
+        unless shape.is_a?(::String)
+          shape = pdf_stamp_id(shape)
+        end
+        @pdf.stamp(shape, @draw_at)
+      end
+      
+      # @param [ThinReports::Core::Shape::Base::Internal] shape
+      def create_pdf_stamp(shape, &block)
+        @pdf.create_stamp(pdf_stamp_id(shape), &block)
+      end
+    end
+    
+  end
+end

data/lib/thinreports/generator/pdf/drawer/list.rb

@@ -0,0 +1,39 @@
+# coding: utf-8
+
+module ThinReports
+  module Generator
+    
+    # @private
+    class Pdf::Drawer::List < Pdf::Drawer::Base
+      # @param (see Pdf::Drawer::Base#initialize)
+      def initialize(pdf, format)
+        super
+        @sections = {}
+      end
+      
+      # @param [ThinReports::Core::Shape::List::PageState] list
+      def draw(list)
+        draw_section(list.header) if list.header
+        list.rows.each do |row|
+          draw_section(row)
+        end
+      end
+      
+    private  
+      
+      # @param [ThinReports::Core::Shape::List::SectionInterface] section
+      def draw_section(section)
+        internal = section.internal
+        drawer(internal).draw(section.manager, internal.relative_position)
+      end
+      
+      # @param [ThinReports::Core::Shape::List::SectionInternal] section
+      # @return [ThinReports::Generator::Pdf::Drawer::ListSection]
+      def drawer(section)
+        @sections[section.section_name] ||=
+          Pdf::Drawer::ListSection.new(@pdf, section)
+      end
+    end
+    
+  end
+end

data/lib/thinreports/generator/pdf/drawer/list_section.rb

@@ -0,0 +1,46 @@
+# coding: utf-8
+
+module ThinReports
+  module Generator
+    
+    # @private
+    class Pdf::Drawer::ListSection < Pdf::Drawer::Page
+      # @param pdf (see Pdf::Drawer::Page#initialize)
+      # @param section [ThinReports::Core::Shape::List::SectionInternal] section
+      def initialize(pdf, section)
+        super(pdf, section.format)
+        @section       = section
+        @stamp_created = false
+      end
+      
+      # @param [ThinReports::Core::Shape::Manager::Internal] manager
+      # @param [Array<Numeric>] at
+      def draw(manager, at)
+        @draw_at = at
+        draw_section
+        super(manager)
+      end
+      
+    private
+      
+      def draw_section
+        id = @format.identifier.to_s
+        
+        unless @stamp_created
+          @pdf.create_stamp(id) do
+            @pdf.parse_svg('<svg xmlns:xlink="http://www.w3.org/1999/xlink">' +
+                           "#{@format.layout}</svg>", '/svg')
+          end
+          @stamp_created = true
+        end
+        pdf_stamp(id)
+      end
+      
+      # @see ThinReports::Generator::Pdf::Drawer::Page#draw_tblock_shape      
+      def draw_tblock_shape(shape)
+        @pdf.translate(*@draw_at) { super }
+      end
+    end
+    
+  end
+end

data/lib/thinreports/generator/pdf/drawer/page.rb

@@ -0,0 +1,101 @@
+# coding: utf-8
+
+module ThinReports
+  module Generator
+    
+    # @private
+    class Pdf::Drawer::Page < Pdf::Drawer::Base
+      # @param see Pdf::Drawer::Base#initialize)
+      def initialize(pdf, format)
+        super
+        @lists = {}
+      end
+      
+      # @param [ThinReports::Core::Shape::Manager::Internal] manager
+      def draw(manager)
+        manager.format.shapes.each_key do |id|
+          if shape = manager.final_shape(id)
+            draw_shape(shape.internal)
+          end
+        end
+      end
+      
+    private
+      
+      # @param [ThinReports::Core::Shape::Base::Internal] shape
+      def draw_shape(shape)
+        case
+        when shape.type_of?(:tblock)
+          draw_tblock_shape(shape)
+        when shape.type_of?(:list)
+          draw_list_shape(shape)
+        else
+          id = shape_stamp_id(shape)
+          unless @stamps.include?(id)
+            create_basic_shape_stamp(shape)
+            @stamps << id
+          end
+          pdf_stamp(shape)
+        end
+      end
+      
+      # @see #draw_shape
+      def draw_list_shape(shape)
+        drawer = @lists[shape.id] ||= Pdf::Drawer::List.new(@pdf, shape.format)
+        drawer.draw(shape)
+      end
+      
+      # @see #draw_shape
+      def draw_tblock_shape(shape)
+        @pdf.draw_shape_tblock(shape)
+      end
+      
+      # @param [ThinReports::Core::Shape::Base::Internal] shape
+      def create_basic_shape_stamp(shape)
+        case
+        when shape.type_of?(:text)    then create_text_stamp(shape)
+        when shape.type_of?(:image)   then create_image_stamp(shape)
+        when shape.type_of?(:ellipse) then create_ellipse_stamp(shape)
+        when shape.type_of?(:rect)    then create_rect_stamp(shape)
+        when shape.type_of?(:line)    then create_line_stamp(shape)
+        end
+      end
+      
+      # @see #create_basic_shape_stamp
+      def create_image_stamp(shape)
+        create_pdf_stamp(shape) do
+          @pdf.draw_shape_image(shape)
+        end
+      end
+      
+      # @see #create_basic_shape_stamp
+      def create_rect_stamp(shape)
+        create_pdf_stamp(shape) do
+          @pdf.draw_shape_rect(shape)
+        end
+      end
+      
+      # @see #create_basic_shape_stamp
+      def create_ellipse_stamp(shape)
+        create_pdf_stamp(shape) do
+          @pdf.draw_shape_ellipse(shape)
+        end
+      end
+      
+      # @see #create_basic_shape_stamp
+      def create_line_stamp(shape)
+        create_pdf_stamp(shape) do
+          @pdf.draw_shape_line(shape)
+        end
+      end
+      
+      # @see #create_basic_shape_stamp
+      def create_text_stamp(shape)
+        create_pdf_stamp(shape) do
+          @pdf.draw_shape_text(shape)
+        end
+      end
+    end
+    
+  end
+end

data/lib/thinreports/generator/pdf/prawn_ext.rb

@@ -0,0 +1,36 @@
+# coding: utf-8
+
+# @private
+module Prawn
+  # Patch for issue {https://github.com/sandal/prawn/issues/245 #245}.
+  # @private
+  class Font::TTF
+    def character_width_by_code(code)    
+        return 0 unless cmap[code]
+        return 0.0 if code == 10
+        @char_widths[code] ||= Integer(hmtx.widths[cmap[code]] * scale_factor)
+    end    
+  end
+  
+  # @private
+  class Document
+    # Create around alias.
+    alias_method :original_width_of, :width_of
+    
+    # For Ruby 1.8
+    ruby_18 do
+      def width_of(string, options={})
+        str_length = in_utf8 { string.split(//).size }
+        font.compute_width_of(string, options) + character_spacing * (str_length - 1)
+      end
+    end
+    
+    # For Ruby 1.9
+    ruby_19 do
+      def width_of(string, options={})
+        font.compute_width_of(string, options) + character_spacing * (string.length - 1)
+      end
+    end
+  end
+
+end