clbustos-rtf 0.4.2 → 0.5.0

data/Rakefile

@@ -1,40 +1,26 @@
+$:.unshift(File.expand_path(File.dirname(__FILE__)+"/lib"))
 $:.unshift(File.expand_path(File.dirname(__FILE__)))
 require 'rake'
 
-begin
-  require 'jeweler'
-  Jeweler::Tasks.new do |s|
-    s.rubyforge_project = "ruby-statsample"
-    s.name = "clbustos-rtf"
-    s.summary = 'Ruby library to create rich text format documents.'
-    s.email = "clbustos@gmail.com"
-    s.homepage = "http://github.com/clbustos/rtf"
-    s.description = 'Ruby RTF is a library that can be used to create '\
-                    'rich text format (RTF) documents. RTF is a text '\
-                    'based standard for laying out document content.'
-    s.authors = ["Peter Wood"]
-    s.files = FileList["[A-Z]*", "{examples,lib,test}/**/*"]
-  end
-rescue LoadError
-  puts "Jeweler not available. Install it with: sudo gem install jeweler"
-end
+require 'rubygems'
+require 'hoe'
+require 'rtf'
+Hoe.plugin :git
 
-require 'rake/rdoctask'
-Rake::RDocTask.new do |rdoc|
-  rdoc.rdoc_dir = 'rdoc'
-  rdoc.title = 'ruby-rtf'
-  rdoc.options << '--line-numbers' << '--inline-source'
-  rdoc.rdoc_files.include('[A-Z]*')
-  rdoc.rdoc_files.include('lib/**/*.rb')
-end
 
-require 'rake/testtask'
-Rake::TestTask.new(:test) do |t|
-  t.libs << 'lib' << 'test'
-  t.pattern = 'test/**/*_test.rb'
-  t.verbose = false
+h=Hoe.spec 'clbustos-rtf' do
+  # Original author: Peter Wood
+  self.developer 'Claudio Bustos', 'clbustos_at_gmail.com'
+  self.version=RTF::VERSION
+  self.git_log_author=true
+  path = File.expand_path("~/.rubyforge/user-config.yml")
+  config = YAML.load(File.read(path))
+  host = "#{config["username"]}@rubyforge.org"
+  
+  remote_dir = "#{host}:/var/www/gforge-projects/ruby-statsample/rtf"
+  self.rdoc_locations << remote_dir
+  self.extra_dev_deps << ["hoe",">=0"] 
 end
-
 begin
   require 'rcov/rcovtask'
   Rcov::RcovTask.new do |t|
@@ -43,7 +29,5 @@ begin
     t.verbose = true
   end
 rescue LoadError
-  puts "RCov is not available. In order to run rcov, you must: sudo gem install spicycode-rcov"
+  puts "RCov is not available. In order to run rcov, you must: sudo gem install rcov"
 end
-
-task :default => :test

data/examples/example01.rb

@@ -1,5 +1,9 @@
+# encoding: utf-8
 #!/usr/bin/env ruby
 
+$LOAD_PATH.unshift(File.dirname(__FILE__)+"/../lib/")
+
+
 require 'rubygems'
 require 'rtf'
 
@@ -48,4 +52,4 @@ end
 
 File.open('example01.rtf', 'w') do |file|
    file.write(document.to_rtf)
-end
+end

data/examples/example02.rb

@@ -1,4 +1,5 @@
 #!/usr/bin/env ruby
+$LOAD_PATH.unshift(File.dirname(__FILE__)+"/../lib/")
 
 require 'rubygems'
 require 'rtf'

data/examples/example03.rb

@@ -1,4 +1,5 @@
 #!/usr/bin/env ruby
+$LOAD_PATH.unshift(File.dirname(__FILE__)+"/../lib/")
 
 require 'rubygems'
 require 'rtf'

data/examples/example04.rb

@@ -1,4 +1,5 @@
 #!/usr/bin/env ruby
+$LOAD_PATH.unshift(File.dirname(__FILE__)+"/../lib/")
 
 require 'rubygems'
 require 'rtf'

data/ifad-rtf.gemspec

@@ -0,0 +1,120 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run 'rake gemspec'
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{ifad-rtf}
+  s.version = "0.4.2"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Peter Wood", "Claudio Bustos", "Marcello Barnaba"]
+  s.date = %q{2011-06-08}
+  s.description = %q{Ruby RTF is a library that can be used to create rich text format (RTF) documents. RTF is a text based standard for laying out document content.}
+  s.email = %q{m.barnaba@ifad.org}
+  s.extra_rdoc_files = [
+    "LICENSE",
+    "README.rdoc"
+  ]
+  s.files = [
+    "CHANGES",
+    "LICENSE",
+    "README.rdoc",
+    "Rakefile",
+    "VERSION.yml",
+    "examples/example01.rb",
+    "examples/example02.rb",
+    "examples/example03.rb",
+    "examples/example03.rtf",
+    "examples/example04.rb",
+    "examples/rubyrtf.bmp",
+    "examples/rubyrtf.jpg",
+    "examples/rubyrtf.png",
+    "lib/rtf.rb",
+    "lib/rtf/colour.rb",
+    "lib/rtf/converters.rb",
+    "lib/rtf/converters/html.rb",
+    "lib/rtf/font.rb",
+    "lib/rtf/information.rb",
+    "lib/rtf/list.rb",
+    "lib/rtf/node.rb",
+    "lib/rtf/paper.rb",
+    "lib/rtf/style.rb",
+    "test/character_style_test.rb",
+    "test/colour_table_test.rb",
+    "test/colour_test.rb",
+    "test/command_node_test.rb",
+    "test/container_node_test.rb",
+    "test/document_style_test.rb",
+    "test/document_test.rb",
+    "test/fixtures/bitmap1.bmp",
+    "test/fixtures/bitmap2.bmp",
+    "test/fixtures/jpeg1.jpg",
+    "test/fixtures/jpeg2.jpg",
+    "test/fixtures/png1.png",
+    "test/fixtures/png2.png",
+    "test/font_table_test.rb",
+    "test/font_test.rb",
+    "test/footer_node_test.rb",
+    "test/header_node_test.rb",
+    "test/image_node_test.rb",
+    "test/information_test.rb",
+    "test/node_test.rb",
+    "test/paragraph_style_test.rb",
+    "test/style_test.rb",
+    "test/table_cell_node_test.rb",
+    "test/table_node_test.rb",
+    "test/table_row_node_test.rb",
+    "test/test_helper.rb",
+    "test/text_node_test.rb"
+  ]
+  s.homepage = %q{http://github.com/ifad/rtf}
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{ruby-statsample}
+  s.rubygems_version = %q{1.3.7}
+  s.summary = %q{Ruby library to create rich text format documents.}
+  s.test_files = [
+    "examples/example01.rb",
+    "examples/example02.rb",
+    "examples/example03.rb",
+    "examples/example04.rb",
+    "test/character_style_test.rb",
+    "test/colour_table_test.rb",
+    "test/colour_test.rb",
+    "test/command_node_test.rb",
+    "test/container_node_test.rb",
+    "test/document_style_test.rb",
+    "test/document_test.rb",
+    "test/font_table_test.rb",
+    "test/font_test.rb",
+    "test/footer_node_test.rb",
+    "test/header_node_test.rb",
+    "test/image_node_test.rb",
+    "test/information_test.rb",
+    "test/node_test.rb",
+    "test/paragraph_style_test.rb",
+    "test/style_test.rb",
+    "test/table_cell_node_test.rb",
+    "test/table_node_test.rb",
+    "test/table_row_node_test.rb",
+    "test/test_helper.rb",
+    "test/text_node_test.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<nokogiri>, ["~> 1.1"])
+      s.add_runtime_dependency(%q<tidy-ext>, ["~> 0.1"])
+    else
+      s.add_dependency(%q<nokogiri>, ["~> 1.1"])
+      s.add_dependency(%q<tidy-ext>, ["~> 0.1"])
+    end
+  else
+    s.add_dependency(%q<nokogiri>, ["~> 1.1"])
+    s.add_dependency(%q<tidy-ext>, ["~> 0.1"])
+  end
+end
+

data/lib/rtf.rb

@@ -12,6 +12,7 @@ require 'rtf/list'
 # This module encapsulates all the classes and definitions relating to the RTF
 # library.
 module RTF
+  VERSION="0.5.0"
    # This is the exception class used by the RTF library code to indicate
    # errors.
    class RTFError < StandardError

data/lib/rtf/converters.rb

@@ -0,0 +1,5 @@
+require 'rtf'
+module RTF::Converters
+  # Empty, for now
+end
+require 'rtf/converters/html'

data/lib/rtf/converters/html.rb

@@ -0,0 +1,123 @@
+require 'nokogiri'
+require 'tidy'
+
+module RTF::Converters
+  class HTML
+
+    def initialize(html, options = {})
+      html  = options[:noclean] ? html : clean(html, options[:tidy_options] || {})
+      @html = Nokogiri::HTML::Document.parse(html)
+    end
+
+    def to_rtf(options = {})
+      to_rtf_document(options).to_rtf
+    end
+
+    def to_rtf_document(options = {})
+      font  = Helpers.font(options[:font] || :default)
+      nodes = NodeSet.new @html.css('body').children
+
+      RTF::Document.new(font).tap do |rtf|
+        nodes.to_rtf(rtf)
+      end
+    end
+
+    protected
+      def clean(html, options = {})
+        defaults = {
+          :doctype          => 'omit',
+          :bare             => true,
+          :clean            => true,
+          :drop_empty_paras => true,
+          :logical_emphasis => true,
+          :lower_literals   => true,
+          :merge_spans      => 1,
+          :merge_divs       => 1,
+          :output_html      => true,
+          :indent           => 0,
+          :wrap             => 0,
+          :char_encoding    => 'utf8'
+        }
+
+        tidy = Tidy.new defaults.merge(options)
+        tidy.clean(html)
+      end
+
+    module Helpers
+      extend self
+
+      def font(key)
+        RTF::Font.new(*case key
+          when :default   then [RTF::Font::ROMAN,  'Times New Roman']
+          when :monospace then [RTF::Font::MODERN, 'Courier New'    ]
+        end)
+      end
+
+      def style(key)
+        RTF::CharacterStyle.new.tap do |style|
+          case key.to_sym
+          when :h1
+            style.font_size = 44
+            style.bold = true
+          when :h2
+            style.font_size = 36
+            style.bold = true
+          when :h3
+            style.font_size = 28
+            style.bold = true
+          when :h4
+            style.font_size = 22
+            style.bold = true
+          end
+        end
+      end
+    end
+
+    class NodeSet
+      def initialize(nodeset)
+        @nodeset = nodeset
+      end
+
+      def to_rtf(rtf)
+        @nodeset.each do |node|
+          Node.new(node).to_rtf(rtf)
+        end
+      end
+    end
+
+    class Node # :nodoc:
+      def initialize(node)
+        @node = node
+      end
+
+      def to_rtf(rtf)
+        case @node.name
+        when 'text'                   then rtf << @node.text.gsub(/\n+/, ' ').strip
+        when 'br'                     then rtf.line_break
+        when 'b', 'strong'            then rtf.bold &recurse
+        when 'i', 'em', 'cite'        then rtf.italic &recurse
+        when 'u'                      then rtf.underline &recurse
+        when 'blockquote', 'p', 'div' then rtf.paragraph &recurse
+        when 'span'                   then recurse.call(rtf)
+        when 'sup'                    then rtf.subscript &recurse
+        when 'sub'                    then rtf.superscript &recurse
+        when 'ul'                     then rtf.list :bullets, &recurse
+        when 'ol'                     then rtf.list :decimal, &recurse
+        when 'li'                     then rtf.item &recurse
+        when 'a'                      then rtf.link @node[:href], &recurse
+        when 'h1', 'h2', 'h3', 'h4'   then rtf.apply(Helpers.style(@node.name), &recurse); rtf.line_break
+        when 'code'                   then rtf.font Helpers.font(:monospace), &recurse
+        else
+          #puts "Ignoring #{@node.to_html}"
+        end
+
+        return rtf
+      end
+
+      def recurse
+        lambda {|rtf| NodeSet.new(@node.children).to_rtf(rtf)}
+      end
+    end
+
+  end
+end

data/lib/rtf/node.rb

@@ -115,13 +115,20 @@ module RTF
       # method escapes any special sequences that appear in the text.
       def to_rtf
         rtf=(@text == nil ? '' : @text.gsub("{", "\\{").gsub("}", "\\}").gsub("\\", "\\\\"))
+        # This is from lfarcy / rtf-extensions
+        # I don't see the point of coding different 128<n<256 range
+
+        #f1=lambda { |n| n < 128 ? n.chr : n < 256 ? "\\'#{n.to_s(16)}" : "\\u#{n}\\'3f" }
         # Encode as Unicode.
+
+        f=lambda { |n| n < 128 ? n.chr : "\\u#{n}\\'3f" }
+        # Ruby 1.9 is safe, cause detect original encoding
+        # and convert text to utf-16 first
         if RUBY_VERSION>"1.9.0"
-          rtf.encode("UTF-16LE").each_codepoint.map {|cp|
-            cp < 128 ? cp.chr : "\\u#{cp}\\'3f"
-          }.join("")
+          return rtf.encode("UTF-16LE", :undef=>:replace).each_codepoint.map(&f).join('')
         else
-          rtf
+          # You SHOULD use UTF-8 as input, ok?
+          return rtf.unpack('U*').map(&f).join('')
         end
       end
    end # End of the TextNode class.
@@ -701,7 +708,7 @@ module RTF
    class TableNode < ContainerNode
       # Cell margin. Default to 100
       attr_accessor :cell_margin
-      
+
       # This is a constructor for the TableNode class.
       #
       # ==== Parameters
@@ -720,7 +727,7 @@ module RTF
             rows.times {entries.push(TableRowNode.new(self, columns, *widths))}
             entries
          end
-        
+
         elsif block
           block.arity<1 ? self.instance_eval(&block) : block.call(self)
         else
@@ -822,7 +829,7 @@ module RTF
             text << row.to_rtf
          end
 
-         text.string
+         text.string.sub(/\\row(?!.*\\row)/m, "\\lastrow\n\\row")
       end
 
       alias :column_shading_color :column_shading_colour
@@ -933,7 +940,7 @@ module RTF
       attr_accessor :width
       # Attribute accessor.
       attr_reader :shading_colour, :style
-      
+
       # This is the constructor for the TableCellNode class.
       #
       # ==== Parameters
@@ -1261,13 +1268,20 @@ module RTF
       # A definition for an architecture endian constant.
       BIG_ENDIAN                                 = :big
 
+      # Offsets for reading dimension data by filetype
+      DIMENSIONS_OFFSET = {
+        JPEG   => 2,
+        PNG    => 8,
+        BITMAP => 8,
+      }.freeze
+
       # Attribute accessor.
       attr_reader :x_scaling, :y_scaling, :top_crop, :right_crop, :bottom_crop,
-                  :left_crop, :width, :height
+                  :left_crop, :width, :height, :displayed_width, :displayed_height
 
       # Attribute mutator.
       attr_writer :x_scaling, :y_scaling, :top_crop, :right_crop, :bottom_crop,
-                  :left_crop
+                  :left_crop, :displayed_width, :displayed_height
 
 
       # This is the constructor for the ImageNode class.
@@ -1287,63 +1301,66 @@ module RTF
          super(parent)
          @source = nil
          @id     = id
-         @read   = []
          @type   = nil
          @x_scaling = @y_scaling = nil
          @top_crop = @right_crop = @bottom_crop = @left_crop = nil
          @width = @height = nil
+         @displayed_width = @displayed_height = nil
 
-         # Check what we were given.
-         src = source
-         src.binmode if src.instance_of?(File)
-         src = File.new(source, 'rb') if source.instance_of?(String)
-         if src.instance_of?(File)
-            # Check the files existence and accessibility.
-            if !File.exist?(src.path)
-               RTFError.fire("Unable to find the #{File.basename(source)} file.")
-            end
-            if !File.readable?(src.path)
-               RTFError.fire("Access to the #{File.basename(source)} file denied.")
-            end
-            @source = src
-         else
-            RTFError.fire("Unrecognised source specified for ImageNode.")
+         # store path to image
+         @source = source if source.instance_of?(String) || source.instance_of?(Tempfile)
+         @source = source.path if source.instance_of?(File)
+
+         # Check the file's existence and accessibility.
+         if !File.exist?(@source)
+            RTFError.fire("Unable to find the #{File.basename(@source)} file.")
+         end
+         if !File.readable?(@source)
+            RTFError.fire("Access to the #{File.basename(@source)} file denied.")
          end
 
-         @type = get_file_type(src)
+         @type = get_file_type
          if @type == nil
-            RTFError.fire("The #{File.basename(source)} file contains an "\
+            RTFError.fire("The #{File.basename(@source)} file contains an "\
                           "unknown or unsupported image type.")
          end
 
          @width, @height = get_dimensions
       end
 
+      def open_file(&block)
+        if block
+          File.open(@source, 'rb', &block)
+        else
+          File.open(@source, 'rb')
+        end
+      end
+
       # This method attempts to determine the image type associated with a
       # file, returning nil if it fails to make the determination.
-      #
-      # ==== Parameters
-      # file::  A reference to the file to check for image type.
-      def get_file_type(file)
+      def get_file_type
          type = nil
+         read = []
+         open_file do |file|
+
+           # Check if the file is a JPEG.
+           read_source(file, read, 2)
+           if read[0,2] == [255, 216]
+              type = JPEG
+           else
+              # Check if it's a PNG.
+              read_source(file, read, 6)
+              if read[0,8] == [137, 80, 78, 71, 13, 10, 26, 10]
+                 type = PNG
+              else
+                 # Check if its a bitmap.
+                 if read[0,2] == [66, 77]
+                    size = to_integer(read[2,4])
+                    type = BITMAP if size == File.size(@source)
+                 end
+              end
+           end
 
-         # Check if the file is a JPEG.
-         read_source(2)
-
-         if @read[0,2] == [255, 216]
-            type = JPEG
-         else
-            # Check if it's a PNG.
-            read_source(6)
-            if @read[0,8] == [137, 80, 78, 71, 13, 10, 26, 10]
-               type = PNG
-            else
-               # Check if its a bitmap.
-               if @read[0,2] == [66, 77]
-                  size = to_integer(@read[2,4])
-                  type = BITMAP if size == File.size(file.path)
-               end
-            end
          end
 
          type
@@ -1351,32 +1368,38 @@ module RTF
 
       # This method generates the RTF for an ImageNode object.
       def to_rtf
-         text  = StringIO.new
-         count = 0
-
-         #text << '{\pard{\*\shppict{\pict'
-         text << '{\*\shppict{\pict'
-         text << "\\picscalex#{@x_scaling}" if @x_scaling != nil
-         text << "\\picscaley#{@y_scaling}" if @y_scaling != nil
-         text << "\\piccropl#{@left_crop}" if @left_crop != nil
-         text << "\\piccropr#{@right_crop}" if @right_crop != nil
-         text << "\\piccropt#{@top_crop}" if @top_crop != nil
-         text << "\\piccropb#{@bottom_crop}" if @bottom_crop != nil
-         text << "\\picw#{@width}\\pich#{@height}\\bliptag#{@id}"
-         text << "\\#{@type.id2name}\n"
-         @source.each_byte {|byte| @read << byte} if @source.eof? == false
-         @read.each do |byte|
-            text << ("%02x" % byte)
+        text  = StringIO.new
+        count = 0
+  
+        #text << '{\pard{\*\shppict{\pict'
+        text << '{\*\shppict{\pict'
+        text << "\\picscalex#{@x_scaling}" if @x_scaling != nil
+        text << "\\picscaley#{@y_scaling}" if @y_scaling != nil
+        text << "\\piccropl#{@left_crop}" if @left_crop != nil
+        text << "\\piccropr#{@right_crop}" if @right_crop != nil
+        text << "\\piccropt#{@top_crop}" if @top_crop != nil
+        text << "\\piccropb#{@bottom_crop}" if @bottom_crop != nil
+        text << "\\picwgoal#{@displayed_width}" if @displayed_width != nil
+        text << "\\pichgoal#{@displayed_height}" if @displayed_height != nil        
+        text << "\\picw#{@width}\\pich#{@height}\\bliptag#{@id}"
+        text << "\\#{@type.id2name}\n"
+  
+        open_file do |file|
+          file.each_byte do |byte|
+            hex_str = byte.to_s(16)
+            hex_str.insert(0,'0') if hex_str.length == 1
+            text << hex_str    
             count += 1
             if count == 40
-               text << "\n"
-               count = 0
+              text << "\n"
+              count = 0
             end
-         end
-         #text << "\n}}\\par}"
-         text << "\n}}"
+          end
+        end
+        #text << "\n}}\\par}"
+        text << "\n}}"
 
-         text.string
+        text.string
       end
 
       # This method is used to determine the underlying endianness of a
@@ -1418,69 +1441,73 @@ module RTF
       # size::  The maximum number of bytes to be read from the file. Defaults
       #         to nil to indicate that the remainder of the file should be read
       #         in.
-      def read_source(size=nil)
+      def read_source(file, read, size=nil)
          if block_given?
             done = false
 
-            while done == false && @source.eof? == false
-              @read << @source.getbyte
-               done = yield @read[-1]
+            while done == false && file.eof? == false
+              read << file.getbyte
+               done = yield read[-1]
             end
          else
             if size != nil
                if size > 0
                   total = 0
-                  while @source.eof? == false && total < size
-					  
-                     @read << @source.getbyte
+                  while file.eof? == false && total < size
+                     read << file.getbyte
                      total += 1
                   end
                end
             else
-               @source.each_byte {|byte| @read << byte}
+               file.each_byte {|byte| read << byte}
             end
          end
       end
 
+
       # This method fetches details of the dimensions associated with an image.
       def get_dimensions
          dimensions = nil
 
-         # Check the image type.
-         if @type == JPEG
-            # Read until we can't anymore or we've found what we're looking for.
-            done = false
-            while @source.eof? == false && done == false
-               # Read to the next marker.
-               read_source {|c| c == 0xff} # Read to the marker.
-               read_source {|c| c != 0xff} # Skip any padding.
-
-               if @read[-1] >= 0xc0 && @read[-1] <= 0xc3
-                  # Read in the width and height details.
-                  read_source(7)
-                  dimensions = @read[-4,4].pack('C4').unpack('nn').reverse
-                  done       = true
-               else
-                  # Skip the marker block.
-                  read_source(2)
-                  read_source(@read[-2,2].pack('C2').unpack('n')[0] - 2)
-               end
-            end
-         elsif @type == PNG
-            # Read in the data to contain the width and height.
-            read_source(16)
-            dimensions = @read[-8,8].pack('C8').unpack('N2')
-         elsif @type == BITMAP
-            # Read in the data to contain the width and height.
-            read_source(18)
-            dimensions = [to_integer(@read[-8,4]), to_integer(@read[-4,4])]
+         open_file do |file|
+           file.pos = DIMENSIONS_OFFSET[@type]
+           read = []
+
+           # Check the image type.
+           if @type == JPEG
+              # Read until we can't anymore or we've found what we're looking for.
+              done = false
+              while file.eof? == false && done == false
+                 # Read to the next marker.
+                 read_source(file,read) {|c| c == 0xff} # Read to the marker.
+                 read_source(file,read) {|c| c != 0xff} # Skip any padding.
+
+                 if read[-1] >= 0xc0 && read[-1] <= 0xc3
+                    # Read in the width and height details.
+                    read_source(file, read, 7)
+                    dimensions = read[-4,4].pack('C4').unpack('nn').reverse
+                    done       = true
+                 else
+                    # Skip the marker block.
+                    read_source(file, read, 2)
+                    read_source(file, read, read[-2,2].pack('C2').unpack('n')[0] - 2)
+                 end
+              end
+           elsif @type == PNG
+              # Read in the data to contain the width and height.
+              read_source(file, read, 16)
+              dimensions = read[-8,8].pack('C8').unpack('N2')
+           elsif @type == BITMAP
+              # Read in the data to contain the width and height.
+              read_source(file, read, 18)
+              dimensions = [to_integer(read[-8,4]), to_integer(read[-4,4])]
+           end
          end
 
          dimensions
       end
 
-      private :read_source, :get_file_type, :to_integer, :get_endian,
-              :get_dimensions
+      private :get_file_type, :to_integer, :get_endian, :get_dimensions, :open_file
    end # End of the ImageNode class.