panmind-rtf 0.3.1

data/test/information_test.rb

@@ -0,0 +1,127 @@
+require 'test_helper'
+
+# Information class unit test class.
+class InformationTest < Test::Unit::TestCase
+   def test_01
+      date = Time.local(1985, 6, 22, 14, 33, 22)
+      info = []
+      info.push(Information.new)
+      info.push(Information.new('Title 1'))
+      info.push(Information.new('Title 2', 'Peter Wood'))
+      info.push(Information.new('La la la', '', 'Nowhere Ltd.'))
+      info.push(Information.new('', 'N. O. Body', 'Oobly', 'Joobly'))
+      info.push(Information.new('Title 5', 'J. Bloggs', '', '', date))
+      info.push(Information.new('Title 6', 'J. Bloggs', '', '', '1985-06-22 14:33:22 GMT'))
+
+      assert(info[0].title == nil)
+      assert(info[0].author == nil)
+      assert(info[0].company == nil)
+      assert(info[0].comments == nil)
+
+      assert(info[1].title == 'Title 1')
+      assert(info[1].author == nil)
+      assert(info[1].company == nil)
+      assert(info[1].comments == nil)
+
+      assert(info[2].title == 'Title 2')
+      assert(info[2].author == 'Peter Wood')
+      assert(info[2].company == nil)
+      assert(info[2].comments == nil)
+
+      assert(info[3].title == 'La la la')
+      assert(info[3].author == '')
+      assert(info[3].company == 'Nowhere Ltd.')
+      assert(info[3].comments == nil)
+
+      assert(info[4].title == '')
+      assert(info[4].author == 'N. O. Body')
+      assert(info[4].company == 'Oobly')
+      assert(info[4].comments == 'Joobly')
+
+      assert(info[5].title == 'Title 5')
+      assert(info[5].author == 'J. Bloggs')
+      assert(info[5].company == '')
+      assert(info[5].comments == '')
+      assert(info[5].created == date)
+
+      assert(info[6].title == 'Title 6')
+      assert(info[6].author == 'J. Bloggs')
+      assert(info[6].company == '')
+      assert(info[6].comments == '')
+      assert(info[6].created == date)
+
+      info[6].title = 'Alternative Title'
+      assert(info[6].title == 'Alternative Title')
+
+      info[6].author = 'A. Person'
+      assert(info[6].author == 'A. Person')
+
+      info[6].company = nil
+      assert(info[6].company == nil)
+
+      info[6].comments = 'New information comment text.'
+      assert(info[6].comments == 'New information comment text.')
+
+      date = Time.new
+      info[6].created = date
+      assert(info[6].created == date)
+
+      date = Time.local(1985, 6, 22, 14, 33, 22)
+      info[6].created = '1985-06-22 14:33:22 GMT'
+      assert(info[6].created == date)
+
+      assert(info[0].to_s(2) == "  Information\n     Created:  "\
+                                "#{info[0].created}")
+      assert(info[1].to_s(4) == "    Information\n       Title:    Title 1\n"\
+                                "       Created:  #{info[1].created}")
+      assert(info[2].to_s(-10) == "Information\n   Title:    Title 2\n   "\
+                                  "Author:   Peter Wood\n   Created:  "\
+                                  "#{info[2].created}")
+      assert(info[3].to_s == "Information\n   Title:    La la la\n   "\
+                             "Author:   \n   Company:  Nowhere Ltd.\n   "\
+                             "Created:  #{info[3].created}")
+      assert(info[4].to_s == "Information\n   Title:    \n   Author:   "\
+                             "N. O. Body\n   Company:  Oobly\n   Comments: "\
+                             "Joobly\n   Created:  #{info[4].created}")
+      assert(info[5].to_s == "Information\n   Title:    Title 5\n   Author:   "\
+                             "J. Bloggs\n   Company:  \n   Comments: \n   "\
+                             "Created:  #{date}")
+      assert(info[6].to_s == "Information\n   Title:    Alternative Title"\
+                             "\n   Author:   A. Person\n   Comments: New "\
+                             "information comment text.\n   Created:  #{date}")
+
+      assert(info[0].to_rtf(3) == "   {\\info\n   #{to_rtf(info[0].created)}"\
+                                  "\n   }")
+      assert(info[1].to_rtf(6) == "      {\\info\n      {\\title Title 1}\n"\
+                                  "      #{to_rtf(info[1].created)}\n      }")
+      assert(info[2].to_rtf(-5) == "{\\info\n{\\title Title 2}\n"\
+                                   "{\\author Peter Wood}\n"\
+                                   "#{to_rtf(info[2].created)}\n}")
+      assert(info[3].to_rtf == "{\\info\n{\\title La la la}\n"\
+                               "{\\author }\n"\
+                               "{\\company Nowhere Ltd.}\n"\
+                               "#{to_rtf(info[3].created)}\n}")
+      assert(info[4].to_rtf == "{\\info\n{\\title }\n"\
+                               "{\\author N. O. Body}\n"\
+                               "{\\company Oobly}\n"\
+                               "{\\doccomm Joobly}\n"\
+                               "#{to_rtf(info[4].created)}\n}")
+      assert(info[5].to_rtf(3) == "   {\\info\n   {\\title Title 5}\n"\
+                                  "   {\\author J. Bloggs}\n"\
+                                  "   {\\company }\n"\
+                                  "   {\\doccomm }\n"\
+                                  "   #{to_rtf(date)}\n   }")
+      assert(info[6].to_rtf == "{\\info\n{\\title Alternative Title}\n"\
+                               "{\\author A. Person}\n"\
+                               "{\\doccomm New information comment text.}\n"\
+                               "#{to_rtf(date)}\n}")
+   end
+
+   def to_rtf(time)
+      text = StringIO.new
+      text << "{\\createim\\yr#{time.year}"
+      text << "\\mo#{time.month}\\dy#{time.day}"
+      text << "\\hr#{time.hour}\\min#{time.min}}"
+      text.string
+   end
+end

data/test/node_test.rb

@@ -0,0 +1,25 @@
+require 'test_helper'
+
+# Information class unit test class.
+class NodeTest < Test::Unit::TestCase
+   def test01
+      nodes = []
+      nodes.push(Node.new(nil))
+      nodes.push(Node.new(nodes[0]))
+      
+      assert(nodes[0].parent == nil)
+      assert(nodes[1].parent != nil)
+      assert(nodes[1].parent == nodes[0])
+      
+      assert(nodes[0].is_root?)
+      assert(nodes[1].is_root? == false)
+      
+      assert(nodes[0].root == nodes[0])
+      assert(nodes[1].root == nodes[0])
+      
+      assert(nodes[0].previous_node == nil)
+      assert(nodes[0].next_node == nil)
+      assert(nodes[1].previous_node == nil)
+      assert(nodes[1].next_node == nil)
+   end
+end

data/test/paragraph_style_test.rb

@@ -0,0 +1,81 @@
+require 'test_helper'
+
+# Information class unit test class.
+class ParagraphStyleTest < Test::Unit::TestCase
+   def test_basics
+      style = ParagraphStyle.new
+
+      assert(style.is_character_style? == false)
+      assert(style.is_document_style? == false)
+      assert(style.is_paragraph_style? == true)
+      assert(style.is_table_style? == false)
+
+      assert(style.prefix(nil, nil) == '\ql')
+      assert(style.suffix(nil, nil) == nil)
+
+      assert(style.first_line_indent == nil)
+      assert(style.flow == ParagraphStyle::LEFT_TO_RIGHT)
+      assert(style.justification == ParagraphStyle::LEFT_JUSTIFY)
+      assert(style.left_indent == nil)
+      assert(style.right_indent == nil)
+      assert(style.line_spacing == nil)
+      assert(style.space_after == nil)
+      assert(style.space_before == nil)
+   end
+
+  def test_mutators
+     style = ParagraphStyle.new
+
+     style.first_line_indent = 100
+     assert(style.first_line_indent == 100)
+
+     style.flow = ParagraphStyle::RIGHT_TO_LEFT
+     assert(style.flow == ParagraphStyle::RIGHT_TO_LEFT)
+
+     style.justification = ParagraphStyle::RIGHT_JUSTIFY
+     assert(style.justification == ParagraphStyle::RIGHT_JUSTIFY)
+
+     style.left_indent = 234
+     assert(style.left_indent == 234)
+
+     style.right_indent = 1020
+     assert(style.right_indent == 1020)
+
+     style.line_spacing = 645
+     assert(style.line_spacing == 645)
+
+     style.space_after = 25
+     assert(style.space_after == 25)
+
+     style.space_before = 918
+     assert(style.space_before == 918)
+  end
+
+  def test_prefix
+     style   = ParagraphStyle.new
+
+     style.first_line_indent = 100
+     assert(style.prefix(nil, nil) == '\ql\fi100')
+
+     style.flow = ParagraphStyle::RIGHT_TO_LEFT
+     assert(style.prefix(nil, nil) == '\ql\fi100\rtlpar')
+
+     style.justification = ParagraphStyle::RIGHT_JUSTIFY
+     assert(style.prefix(nil, nil) == '\qr\fi100\rtlpar')
+
+     style.left_indent = 234
+     assert(style.prefix(nil, nil) == '\qr\li234\fi100\rtlpar')
+
+     style.right_indent = 1020
+     assert(style.prefix(nil, nil) == '\qr\li234\ri1020\fi100\rtlpar')
+
+     style.line_spacing = 645
+     assert(style.prefix(nil, nil) == '\qr\li234\ri1020\fi100\sl645\rtlpar')
+
+     style.space_after = 25
+     assert(style.prefix(nil, nil) == '\qr\li234\ri1020\fi100\sa25\sl645\rtlpar')
+
+     style.space_before = 918
+     assert(style.prefix(nil, nil) == '\qr\li234\ri1020\fi100\sb918\sa25\sl645\rtlpar')
+  end
+end

data/test/style_test.rb

@@ -0,0 +1,16 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+# Information class unit test class.
+class StyleTest < Test::Unit::TestCase
+   def test_basics
+      style = Style.new
+
+      assert(style.is_character_style? == false)
+      assert(style.is_document_style? == false)
+      assert(style.is_paragraph_style? == false)
+      assert(style.is_table_style? == false)
+
+      assert(style.prefix(nil, nil) == nil)
+      assert(style.suffix(nil, nil) == nil)
+   end
+end

data/test/table_cell_node_test.rb

@@ -0,0 +1,89 @@
+require 'test_helper'
+
+# Information class unit test class.
+class TableCellNodeTest < Test::Unit::TestCase
+   def setup
+      @table = TableNode.new(nil, 3, 3, 100, 100, 100)
+      @row   = TableRowNode.new(@table, 3, 100)
+   end
+
+   def test_basics
+      cells = []
+      cells.push(TableCellNode.new(@row))
+      cells.push(TableCellNode.new(@row, 1000))
+      cells.push(TableCellNode.new(@row, 250, nil, 5, 10, 15, 20))
+
+      assert(cells[0].parent == @row)
+      assert(cells[0].width == TableCellNode::DEFAULT_WIDTH)
+      assert(cells[0].top_border_width == 0)
+      assert(cells[0].right_border_width == 0)
+      assert(cells[0].bottom_border_width == 0)
+      assert(cells[0].left_border_width == 0)
+
+      assert(cells[1].parent == @row)
+      assert(cells[1].width == 1000)
+      assert(cells[1].top_border_width == 0)
+      assert(cells[1].right_border_width == 0)
+      assert(cells[1].bottom_border_width == 0)
+      assert(cells[1].left_border_width == 0)
+
+      assert(cells[2].parent == @row)
+      assert(cells[2].width == 250)
+      assert(cells[2].top_border_width == 5)
+      assert(cells[2].right_border_width == 10)
+      assert(cells[2].bottom_border_width == 15)
+      assert(cells[2].left_border_width == 20)
+
+      cells[0].top_border_width    = 25
+      cells[0].bottom_border_width = 1
+      cells[0].left_border_width   = 89
+      cells[0].right_border_width  = 57
+
+      assert(cells[0].top_border_width == 25)
+      assert(cells[0].right_border_width == 57)
+      assert(cells[0].bottom_border_width == 1)
+      assert(cells[0].left_border_width == 89)
+
+      cells[0].top_border_width    = 0
+      cells[0].bottom_border_width = nil
+      cells[0].left_border_width   = -5
+      cells[0].right_border_width  = -1000
+
+      assert(cells[0].top_border_width == 0)
+      assert(cells[0].right_border_width == 0)
+      assert(cells[0].bottom_border_width == 0)
+      assert(cells[0].left_border_width == 0)
+
+      assert(cells[2].border_widths == [5, 10, 15, 20])
+   end
+
+   def test_exceptions
+      begin
+         @row[0].paragraph
+         flunk("Successfully called the TableCellNode#paragraph method.")
+      rescue
+      end
+
+      begin
+         @row[0].parent = nil
+         flunk("Successfully called the TableCellNode#parent= method.")
+      rescue
+      end
+
+      begin
+         @row[0].table
+         flunk("Successfully called the TableCellNode#table method.")
+      rescue
+      end
+   end
+
+   def test_rtf_generation
+      cells = []
+      cells.push(TableCellNode.new(@row))
+      cells.push(TableCellNode.new(@row))
+      cells[1] << "Added text."
+
+      assert(cells[0].to_rtf == "\\pard\\intbl\n\n\\cell")
+      assert(cells[1].to_rtf == "\\pard\\intbl\nAdded text.\n\\cell")
+   end
+end

data/test/table_node_test.rb

@@ -0,0 +1,83 @@
+require 'test_helper'
+
+# Information class unit test class.
+class TableNodeTest < Test::Unit::TestCase
+   def setup
+      @document = Document.new(Font.new(Font::ROMAN, 'Times New Roman'))
+      @colours  = []
+
+      @colours << Colour.new(200, 200, 200)
+      @colours << Colour.new(200, 0, 0)
+      @colours << Colour.new(0, 200, 0)
+      @colours << Colour.new(0, 0, 200)
+   end
+
+   def test_basics
+      table = TableNode.new(@document, 3, 5, 10, 20, 30, 40, 50)
+
+      assert(table.rows == 3)
+      assert(table.columns == 5)
+      assert(table.size == 3)
+      assert(table.cell_margin == 100)
+   end
+
+   def test_mutators
+      table = TableNode.new(@document, 3, 3)
+
+      table.cell_margin = 250
+      assert(table.cell_margin == 250)
+   end
+
+   def test_colouring
+      table = TableNode.new(@document, 3, 3)
+
+      table.row_shading_colour(1, @colours[0])
+      assert(table[0][0].shading_colour == nil)
+      assert(table[0][1].shading_colour == nil)
+      assert(table[0][2].shading_colour == nil)
+      assert(table[1][0].shading_colour == @colours[0])
+      assert(table[1][1].shading_colour == @colours[0])
+      assert(table[1][2].shading_colour == @colours[0])
+      assert(table[2][0].shading_colour == nil)
+      assert(table[2][1].shading_colour == nil)
+      assert(table[2][2].shading_colour == nil)
+
+      table.column_shading_colour(2, @colours[1])
+      assert(table[0][0].shading_colour == nil)
+      assert(table[0][1].shading_colour == nil)
+      assert(table[0][2].shading_colour == @colours[1])
+      assert(table[1][0].shading_colour == @colours[0])
+      assert(table[1][1].shading_colour == @colours[0])
+      assert(table[1][2].shading_colour == @colours[1])
+      assert(table[2][0].shading_colour == nil)
+      assert(table[2][1].shading_colour == nil)
+      assert(table[2][2].shading_colour == @colours[1])
+
+      table.shading_colour(@colours[2]) {|cell, x, y| x == y}
+      assert(table[0][0].shading_colour == @colours[2])
+      assert(table[0][1].shading_colour == nil)
+      assert(table[0][2].shading_colour == @colours[1])
+      assert(table[1][0].shading_colour == @colours[0])
+      assert(table[1][1].shading_colour == @colours[2])
+      assert(table[1][2].shading_colour == @colours[1])
+      assert(table[2][0].shading_colour == nil)
+      assert(table[2][1].shading_colour == nil)
+      assert(table[2][2].shading_colour == @colours[2])
+   end
+
+   def test_border_width
+      table = TableNode.new(@document, 2, 2)
+
+      table.border_width = 5
+      assert(table[0][0].border_widths == [5, 5, 5, 5])
+      assert(table[0][1].border_widths == [5, 5, 5, 5])
+      assert(table[1][0].border_widths == [5, 5, 5, 5])
+      assert(table[1][1].border_widths == [5, 5, 5, 5])
+
+      table.border_width = 0
+      assert(table[0][0].border_widths == [0, 0, 0, 0])
+      assert(table[0][1].border_widths == [0, 0, 0, 0])
+      assert(table[1][0].border_widths == [0, 0, 0, 0])
+      assert(table[1][1].border_widths == [0, 0, 0, 0])
+   end
+end

data/test/table_row_node_test.rb

@@ -0,0 +1,59 @@
+require 'test_helper'
+
+# Information class unit test class.
+class TableRowNodeTest < Test::Unit::TestCase
+   def setup
+      @table = TableNode.new(nil, 3, 3, 100, 100, 100)
+   end
+
+   def test_basics
+      rows = []
+      rows.push(TableRowNode.new(@table, 10))
+      rows.push(TableRowNode.new(@table, 3, 100, 200, 300))
+
+      assert(rows[0].size == 10)
+      assert(rows[1].size == 3)
+
+      assert(rows[0][0].width == TableCellNode::DEFAULT_WIDTH)
+      assert(rows[0][1].width == TableCellNode::DEFAULT_WIDTH)
+      assert(rows[0][2].width == TableCellNode::DEFAULT_WIDTH)
+      assert(rows[0][3].width == TableCellNode::DEFAULT_WIDTH)
+      assert(rows[0][4].width == TableCellNode::DEFAULT_WIDTH)
+      assert(rows[0][5].width == TableCellNode::DEFAULT_WIDTH)
+      assert(rows[0][6].width == TableCellNode::DEFAULT_WIDTH)
+      assert(rows[0][7].width == TableCellNode::DEFAULT_WIDTH)
+      assert(rows[0][8].width == TableCellNode::DEFAULT_WIDTH)
+      assert(rows[0][9].width == TableCellNode::DEFAULT_WIDTH)
+      assert(rows[1][0].width == 100)
+      assert(rows[1][1].width == 200)
+      assert(rows[1][2].width == 300)
+
+      assert(rows[0][1].border_widths == [0, 0, 0, 0])
+      rows[0].border_width = 10
+      assert(rows[0][1].border_widths == [10, 10, 10, 10])
+   end
+
+   def test_exceptions
+      row = TableRowNode.new(@table, 1)
+      begin
+         row.parent = nil
+         flunk("Successfully called the TableRowNode#parent=() method.")
+      rescue
+      end
+   end
+
+   def test_rtf_generation
+      rows = []
+      rows.push(TableRowNode.new(@table, 3, 50, 50, 50))
+      rows.push(TableRowNode.new(@table, 1, 134))
+      rows[1].border_width = 5
+      assert(rows[0].to_rtf == "\\trowd\\tgraph100\n\\cellx50\n\\cellx100\n"\
+                               "\\cellx150\n\\pard\\intbl\n\n\\cell\n"\
+                               "\\pard\\intbl\n\n\\cell\n"\
+                               "\\pard\\intbl\n\n\\cell\n\\row")
+      assert(rows[1].to_rtf == "\\trowd\\tgraph100\n"\
+                               "\\clbrdrt\\brdrw5\\brdrs\\clbrdrl\\brdrw5\\brdrs"\
+                               "\\clbrdrb\\brdrw5\\brdrs\\clbrdrr\\brdrw5\\brdrs"\
+                               "\\cellx134\n\\pard\\intbl\n\n\\cell\n\\row")
+   end
+end