caxlsx 2.0.2

data/test/workbook/worksheet/tc_data_bar.rb

@@ -0,0 +1,46 @@
+require 'tc_helper.rb'
+
+class TestDataBar < Test::Unit::TestCase
+  def setup
+    @data_bar = Axlsx::DataBar.new :color => "FF638EC6"
+  end
+
+  def test_defaults
+    assert_equal @data_bar.minLength, 10
+    assert_equal @data_bar.maxLength, 90
+    assert_equal @data_bar.showValue, true
+  end
+
+  def test_override_default_cfvos
+    data_bar = Axlsx::DataBar.new({:color => 'FF00FF00'}, {:type => :min, :val => "20"})
+    assert_equal("20", data_bar.value_objects.first.val)
+    assert_equal("0", data_bar.value_objects.last.val)
+  end
+
+
+  def test_minLength
+    assert_raise(ArgumentError) { @data_bar.minLength = :invalid_type }
+    assert_nothing_raised { @data_bar.minLength =  0}
+    assert_equal(@data_bar.minLength, 0)
+  end
+
+  def test_maxLength
+    assert_raise(ArgumentError) { @data_bar.maxLength = :invalid_type }
+    assert_nothing_raised { @data_bar.maxLength =  0}
+    assert_equal(@data_bar.maxLength, 0)
+  end
+
+  def test_showValue
+    assert_raise(ArgumentError) { @data_bar.showValue = :invalid_type }
+    assert_nothing_raised { @data_bar.showValue =  false}
+    assert_equal(@data_bar.showValue, false)
+  end
+
+  def test_to_xml_string
+    doc = Nokogiri::XML.parse(@data_bar.to_xml_string)
+    assert_equal(doc.xpath(".//dataBar[@minLength=10][@maxLength=90][@showValue='true']").size, 1)
+    assert_equal(doc.xpath(".//dataBar//cfvo").size, 2)
+    assert_equal(doc.xpath(".//dataBar//color").size, 1)
+  end
+
+end

data/test/workbook/worksheet/tc_data_validation.rb

@@ -0,0 +1,265 @@
+# encoding: UTF-8
+require 'tc_helper.rb'
+
+
+class TestDataValidation < Test::Unit::TestCase
+  def setup
+    #inverse defaults
+    @boolean_options = { :allowBlank => false, :showDropDown => true, :showErrorMessage => false, :showInputMessage => true }
+    @nil_options = { :formula1 => 'foo',  :formula2 => 'foo', :errorTitle => 'foo', :operator => :lessThan, :prompt => 'foo', :promptTitle => 'foo', :sqref => 'foo' }
+    @type_option = { :type => :whole }
+    @error_style_option = { :errorStyle => :warning }
+    
+    @string_options = { :formula1 => 'foo', :formula2 => 'foo', :error => 'foo', :errorTitle => 'foo', :prompt => 'foo', :promptTitle => 'foo', :sqref => 'foo' }
+    @symbol_options = { :errorStyle => :warning, :operator => :lessThan, :type => :whole}
+    
+    @options = @boolean_options.merge(@nil_options).merge(@type_option).merge(@error_style_option)
+    
+    @dv = Axlsx::DataValidation.new(@options)
+  end
+  
+  def test_initialize
+    dv = Axlsx::DataValidation.new
+    
+    @boolean_options.each do |key, value|
+      assert_equal(!value, dv.send(key.to_sym), "initialized default #{key} should be #{!value}")
+      assert_equal(value, @dv.send(key.to_sym), "initialized options #{key} should be #{value}")
+    end
+    
+    @nil_options.each do |key, value|
+      assert_equal(nil, dv.send(key.to_sym), "initialized default #{key} should be nil")
+      assert_equal(value, @dv.send(key.to_sym), "initialized options #{key} should be #{value}")
+    end
+    
+    @type_option.each do |key, value|
+      assert_equal(:none, dv.send(key.to_sym), "initialized default #{key} should be :none")
+      assert_equal(value, @dv.send(key.to_sym), "initialized options #{key} should be #{value}")
+    end
+    
+    @error_style_option.each do |key, value|
+      assert_equal(:stop, dv.send(key.to_sym), "initialized default #{key} should be :stop")
+      assert_equal(value, @dv.send(key.to_sym), "initialized options #{key} should be #{value}")
+    end
+  end
+  
+  def test_boolean_attribute_validation
+    @boolean_options.each do |key, value|
+      assert_raise(ArgumentError, "#{key} must be boolean") { @dv.send("#{key}=".to_sym, 'A') }
+      assert_nothing_raised { @dv.send("#{key}=".to_sym, true) }
+    end
+  end
+  
+  def test_string_attribute_validation
+    @string_options.each do |key, value|
+      assert_raise(ArgumentError, "#{key} must be string") { @dv.send("#{key}=".to_sym, :symbol) }
+      assert_nothing_raised { @dv.send("#{key}=".to_sym, "foo") }
+    end
+  end
+  
+  def test_symbol_attribute_validation
+    @symbol_options.each do |key, value|
+      assert_raise(ArgumentError, "#{key} must be symbol") { @dv.send("#{key}=".to_sym, "foo") }
+      assert_nothing_raised { @dv.send("#{key}=".to_sym, value) }
+    end
+  end
+  
+  def test_formula1
+    assert_raise(ArgumentError) { @dv.formula1 = 10 }
+    assert_nothing_raised { @dv.formula1 = "=SUM(A1:A1)" }
+    assert_equal(@dv.formula1, "=SUM(A1:A1)")
+  end
+  
+  def test_formula2
+    assert_raise(ArgumentError) { @dv.formula2 = 10 }
+    assert_nothing_raised { @dv.formula2 = "=SUM(A1:A1)" }
+    assert_equal(@dv.formula2, "=SUM(A1:A1)")
+  end
+  
+  def test_allowBlank
+    assert_raise(ArgumentError) { @dv.allowBlank = "foo´" }
+    assert_nothing_raised { @dv.allowBlank = false }
+    assert_equal(@dv.allowBlank, false)
+  end
+  
+  def test_error
+    assert_raise(ArgumentError) { @dv.error = :symbol }
+    assert_nothing_raised { @dv.error = "This is a error message" }
+    assert_equal(@dv.error, "This is a error message")
+  end
+  
+  def test_errorStyle
+    assert_raise(ArgumentError) { @dv.errorStyle = "foo" }
+    assert_nothing_raised { @dv.errorStyle = :information }
+    assert_equal(@dv.errorStyle, :information)
+  end
+  
+  def test_errorTitle
+    assert_raise(ArgumentError) { @dv.errorTitle = :symbol }
+    assert_nothing_raised { @dv.errorTitle = "This is the error title" }
+    assert_equal(@dv.errorTitle, "This is the error title")
+  end
+  
+  def test_operator
+    assert_raise(ArgumentError) { @dv.operator = "foo" }
+    assert_nothing_raised { @dv.operator = :greaterThan }
+    assert_equal(@dv.operator, :greaterThan)
+  end
+  
+  def test_prompt
+    assert_raise(ArgumentError) { @dv.prompt = :symbol }
+    assert_nothing_raised { @dv.prompt = "This is a prompt message" }
+    assert_equal(@dv.prompt, "This is a prompt message")
+  end
+  
+  def test_promptTitle
+    assert_raise(ArgumentError) { @dv.promptTitle = :symbol }
+    assert_nothing_raised { @dv.promptTitle = "This is the prompt title" }
+    assert_equal(@dv.promptTitle, "This is the prompt title")
+  end
+  
+  def test_showDropDown
+    assert_raise(ArgumentError) { @dv.showDropDown = "foo´" }
+    assert_nothing_raised { @dv.showDropDown = false }
+    assert_equal(@dv.showDropDown, false)
+  end
+  
+  def test_showErrorMessage
+    assert_raise(ArgumentError) { @dv.showErrorMessage = "foo´" }
+    assert_nothing_raised { @dv.showErrorMessage = false }
+    assert_equal(@dv.showErrorMessage, false)
+  end
+  
+  def test_showInputMessage
+    assert_raise(ArgumentError) { @dv.showInputMessage = "foo´" }
+    assert_nothing_raised { @dv.showInputMessage = false }
+    assert_equal(@dv.showInputMessage, false)
+  end
+  
+  def test_sqref
+    assert_raise(ArgumentError) { @dv.sqref = 10 }
+    assert_nothing_raised { @dv.sqref = "A1:A1" }
+    assert_equal(@dv.sqref, "A1:A1")
+  end
+  
+  def test_type
+    assert_raise(ArgumentError) { @dv.type = "foo" }
+    assert_nothing_raised { @dv.type = :list }
+    assert_equal(@dv.type, :list)
+  end
+  
+  def test_whole_decimal_data_time_textLength_to_xml
+    p = Axlsx::Package.new
+    @ws = p.workbook.add_worksheet :name=>"data_validation"
+    @ws.add_data_validation("A1", { :type => :whole, :operator => :between, :formula1 => '5', :formula2 => '10', 
+        :showErrorMessage => true, :errorTitle => 'Wrong input', :error => 'Only values between 5 and 10', 
+        :errorStyle => :information, :showInputMessage => true, :promptTitle => 'Be carful!', 
+        :prompt => 'Only values between 5 and 10'})
+    
+    doc = Nokogiri::XML.parse(@ws.to_xml_string)
+    
+    #test attributes
+    assert_equal(1, doc.xpath("//xmlns:worksheet/xmlns:dataValidations[@count='1']/xmlns:dataValidation[@sqref='A1']
+      [@promptTitle='Be carful!'][@prompt='Only values between 5 and 10'][@operator='between'][@errorTitle='Wrong input']
+      [@error='Only values between 5 and 10'][@showErrorMessage='true'][@allowBlank='true'][@showInputMessage='true'][@type='whole']
+      [@errorStyle='information']").size)
+    assert doc.xpath("//xmlns:worksheet/xmlns:dataValidations[@count='1']/xmlns:dataValidation[@sqref='A1']
+      [@promptTitle='Be carful!'][@prompt='Only values between 5 and 10'][@operator='between'][@errorTitle='Wrong input']
+      [@error='Only values between 5 and 10'][@showErrorMessage='true'][@allowBlank='true'][@showInputMessage='true']
+      [@type='whole'][@errorStyle='information']")
+    
+    #test forumula1
+    assert_equal(1, doc.xpath("//xmlns:worksheet/xmlns:dataValidations/xmlns:dataValidation/xmlns:formula1").size)
+    assert doc.xpath("//xmlns:worksheet/xmlns:dataValidations/xmlns:dataValidation/xmlns:formula1='5'")
+    
+    #test forumula2
+    assert_equal(1, doc.xpath("//xmlns:worksheet/xmlns:dataValidations/xmlns:dataValidation/xmlns:formula2").size)
+    assert doc.xpath("//xmlns:worksheet/xmlns:dataValidations/xmlns:dataValidation/xmlns:formula2='10'")
+  end
+  
+  def test_list_to_xml
+    p = Axlsx::Package.new
+    @ws = p.workbook.add_worksheet :name=>"data_validation"
+    @ws.add_data_validation("A1", { :type => :list, :formula1 => 'A1:A5',
+        :showErrorMessage => true, :errorTitle => 'Wrong input', :error => 'Only values from list', 
+        :errorStyle => :stop, :showInputMessage => true, :promptTitle => 'Be carful!', 
+        :prompt => 'Only values from list', :showDropDown => true})
+    
+    doc = Nokogiri::XML.parse(@ws.to_xml_string)
+    
+    #test attributes
+    assert_equal(1, doc.xpath("//xmlns:worksheet/xmlns:dataValidations[@count='1']/xmlns:dataValidation[@sqref='A1']
+      [@promptTitle='Be carful!'][@prompt='Only values from list'][@errorTitle='Wrong input'][@error='Only values from list']
+      [@showErrorMessage='true'][@allowBlank='true'][@showInputMessage='true'][@showDropDown='true'][@type='list']
+      [@errorStyle='stop']").size)
+    assert doc.xpath("//xmlns:worksheet/xmlns:dataValidations[@count='1']/xmlns:dataValidation[@sqref='A1']
+      [@promptTitle='Be carful!'][@prompt='Only values from list'][@errorTitle='Wrong input'][@error='Only values from list']
+      [@showErrorMessage='true'][@allowBlank='true'][@showInputMessage='true'][@showDropDown='true'][@type='list'][@errorStyle='stop']")
+    
+    #test forumula1
+    assert_equal(1, doc.xpath("//xmlns:worksheet/xmlns:dataValidations/xmlns:dataValidation/xmlns:formula1").size)
+    assert doc.xpath("//xmlns:worksheet/xmlns:dataValidations/xmlns:dataValidation/xmlns:formula1='A1:A5'")
+  end
+  
+  def test_custom_to_xml
+    p = Axlsx::Package.new
+    @ws = p.workbook.add_worksheet :name=>"data_validation"
+    @ws.add_data_validation("A1", { :type => :custom, :formula1 => '=5/2',
+        :showErrorMessage => true, :errorTitle => 'Wrong input', :error => 'Only values corresponding formula', 
+        :errorStyle => :stop, :showInputMessage => true, :promptTitle => 'Be carful!', 
+        :prompt => 'Only values corresponding formula'})
+    
+    doc = Nokogiri::XML.parse(@ws.to_xml_string)
+    
+    #test attributes
+    assert_equal(1, doc.xpath("//xmlns:worksheet/xmlns:dataValidations[@count='1']/xmlns:dataValidation[@sqref='A1'][@promptTitle='Be carful!']
+      [@prompt='Only values corresponding formula'][@errorTitle='Wrong input'][@error='Only values corresponding formula'][@showErrorMessage='true']
+      [@allowBlank='true'][@showInputMessage='true'][@type='custom'][@errorStyle='stop']").size)
+    assert doc.xpath("//xmlns:worksheet/xmlns:dataValidations[@count='1']/xmlns:dataValidation[@sqref='A1'][@promptTitle='Be carful!']
+      [@prompt='Only values corresponding formula'][@errorTitle='Wrong input'][@error='Only values corresponding formula']
+      [@showErrorMessage='true'][@allowBlank='true'][@showInputMessage='true'][@type='custom'][@errorStyle='stop']")
+    
+    #test forumula1
+    assert_equal(1, doc.xpath("//xmlns:worksheet/xmlns:dataValidations/xmlns:dataValidation/xmlns:formula1").size)
+    assert doc.xpath("//xmlns:worksheet/xmlns:dataValidations/xmlns:dataValidation/xmlns:formula1='=5/2'")
+  end
+  
+  def test_multiple_datavalidations_to_xml
+    p = Axlsx::Package.new
+    @ws = p.workbook.add_worksheet :name=>"data_validation"
+    @ws.add_data_validation("A1", { :type => :whole, :operator => :between, :formula1 => '5', :formula2 => '10', 
+        :showErrorMessage => true, :errorTitle => 'Wrong input', :error => 'Only values between 5 and 10', 
+        :errorStyle => :information, :showInputMessage => true, :promptTitle => 'Be carful!', 
+        :prompt => 'Only values between 5 and 10'})
+    @ws.add_data_validation("B1", { :type => :list, :formula1 => 'A1:A5',
+        :showErrorMessage => true, :errorTitle => 'Wrong input', :error => 'Only values from list', 
+        :errorStyle => :stop, :showInputMessage => true, :promptTitle => 'Be carful!', 
+        :prompt => 'Only values from list', :showDropDown => true})
+    
+    doc = Nokogiri::XML.parse(@ws.to_xml_string)
+    
+    #test attributes
+    assert_equal(1, doc.xpath("//xmlns:worksheet/xmlns:dataValidations[@count='2']/xmlns:dataValidation[@sqref='A1']
+      [@promptTitle='Be carful!'][@prompt='Only values between 5 and 10'][@operator='between'][@errorTitle='Wrong input']
+      [@error='Only values between 5 and 10'][@showErrorMessage='true'][@allowBlank='true'][@showInputMessage='true'][@type='whole']
+      [@errorStyle='information']").size)
+    assert doc.xpath("//xmlns:worksheet/xmlns:dataValidations[@count='2']/xmlns:dataValidation[@sqref='A1']
+      [@promptTitle='Be carful!'][@prompt='Only values between 5 and 10'][@operator='between'][@errorTitle='Wrong input']
+      [@error='Only values between 5 and 10'][@showErrorMessage='true'][@allowBlank='true'][@showInputMessage='true']
+      [@type='whole'][@errorStyle='information']")
+    
+    #test attributes
+    assert_equal(1, doc.xpath("//xmlns:worksheet/xmlns:dataValidations[@count='2']/xmlns:dataValidation[@sqref='B1']
+      [@promptTitle='Be carful!'][@prompt='Only values from list'][@errorTitle='Wrong input'][@error='Only values from list']
+      [@showErrorMessage='true'][@allowBlank='true'][@showInputMessage='true'][@showDropDown='true'][@type='list']
+      [@errorStyle='stop']").size)
+    assert doc.xpath("//xmlns:worksheet/xmlns:dataValidations[@count='2']/xmlns:dataValidation[@sqref='B1']
+      [@promptTitle='Be carful!'][@prompt='Only values from list'][@errorTitle='Wrong input'][@error='Only values from list']
+      [@showErrorMessage='true'][@allowBlank='true'][@showInputMessage='true'][@showDropDown='true'][@type='list'][@errorStyle='stop']")
+  end
+  
+  def test_empty_attributes
+     v = Axlsx::DataValidation.new
+     assert_equal(nil, v.send(:get_valid_attributes))
+
+  end
+end

data/test/workbook/worksheet/tc_date_time_converter.rb

@@ -0,0 +1,124 @@
+# -*- coding: utf-8 -*-
+require 'tc_helper.rb'
+
+class TestDateTimeConverter < Test::Unit::TestCase
+  def setup
+    @margin_of_error = 0.000_001
+    @extended_time_range = begin
+      Time.parse "1893-08-05"
+      Time.parse "9999-12-31T23:59:59Z"
+      true
+    rescue
+      false
+    end
+  end
+
+  def test_date_to_serial_1900
+    Axlsx::Workbook.date1904 = false
+    tests = if @extended_time_range
+              { # examples taken straight from the spec
+                "1893-08-05" => -2338.0,
+                "1900-01-01" => 2.0,
+                "1910-02-03" => 3687.0,
+                "2006-02-01" => 38749.0,
+                "9999-12-31" => 2958465.0
+              }
+            else
+              { # examples taken inside the possible values
+                "1970-01-01" => 25569.0, # Unix epoch
+                "1970-01-02" => 25570.0,
+                "2006-02-01" => 38749.0,
+                "2038-01-19" => 50424.0, # max date using signed timestamp in 32bit
+              }
+            end
+    tests.each do |date_string, expected|
+      serial = Axlsx::DateTimeConverter::date_to_serial Date.parse(date_string)
+      assert_equal expected, serial
+    end
+  end
+
+  def test_date_to_serial_1904
+    Axlsx::Workbook.date1904 = true
+    tests = if @extended_time_range
+              { # examples taken straight from the spec
+                "1893-08-05" => -3800.0,
+                "1904-01-01" => 0.0,
+                "1910-02-03" => 2225.0,
+                "2006-02-01" => 37287.0,
+                "9999-12-31" => 2957003.0
+              }
+            else
+              { # examples taken inside the possible values
+                "1970-01-01" => 24107.0, # Unix epoch
+                "1970-01-02" => 24108.0,
+                "2006-02-01" => 37287.0,
+                "2038-01-19" => 48962.0, # max date using signed timestamp in 32bit
+              }
+            end
+    tests.each do |date_string, expected|
+      serial = Axlsx::DateTimeConverter::date_to_serial Date.parse(date_string)
+      assert_equal expected, serial
+    end
+  end
+
+  def test_time_to_serial_1900
+    Axlsx::Workbook.date1904 = false
+    tests = if @extended_time_range
+             { # examples taken straight from the spec
+               "1893-08-05T00:00:01Z" => -2337.999989,
+               "1899-12-28T18:00:00Z" => -1.25,
+               "1910-02-03T10:05:54Z" => 3687.4207639,
+               "1900-01-01T12:00:00Z" => 2.5, # wrongly indicated as 1.5 in the spec!
+               "9999-12-31T23:59:59Z" => 2958465.9999884
+             }
+           else
+             { # examples taken inside the possible values
+               "1970-01-01T00:00:00Z" => 25569.0, # Unix epoch
+               "1970-01-01T12:00:00Z" => 25569.5,
+               "2000-01-01T00:00:00Z" => 36526.0,
+               "2038-01-19T03:14:07Z" => 50424.134803, # max signed timestamp in 32bit
+             }
+           end
+    tests.each do |time_string, expected|
+      serial = Axlsx::DateTimeConverter::time_to_serial Time.parse(time_string)
+      assert_in_delta expected, serial, @margin_of_error
+    end
+  end
+
+  def test_time_to_serial_1904
+    Axlsx::Workbook.date1904 = true
+      # ruby 1.8.7 cannot parse dates prior to epoch. see http://ruby-doc.org/core-1.8.7/Time.html
+
+    tests = if @extended_time_range
+             { # examples taken straight from the spec
+               "1893-08-05T00:00:01Z" => -3799.999989,
+               "1910-02-03T10:05:54Z" => 2225.4207639,
+               "1904-01-01T12:00:00Z" => 0.5000000,
+               "9999-12-31T23:59:59Z" => 2957003.9999884
+             }
+           else
+             { # examples taken inside the possible values
+               "1970-01-01T00:00:00Z" => 24107.0, # Unix epoch
+               "1970-01-01T12:00:00Z" => 24107.5,
+               "2000-01-01T00:00:00Z" => 35064.0,
+               "2038-01-19T03:14:07Z" => 48962.134803, # max signed timestamp in 32bit
+             }
+           end
+    tests.each do |time_string, expected|
+      serial = Axlsx::DateTimeConverter::time_to_serial Time.parse(time_string)
+      assert_in_delta expected, serial, @margin_of_error
+    end
+  end
+
+  def test_timezone
+
+    utc = Time.utc 2012 # January 1st, 2012 at 0:00 UTC
+    local = Time.parse "2012-01-01 09:00:00 +0900"
+
+    assert_equal local, utc
+    assert_equal Axlsx::DateTimeConverter::time_to_serial(local) - local.utc_offset.to_f/86400,  Axlsx::DateTimeConverter::time_to_serial(utc)
+    Axlsx::Workbook.date1904 = true
+    assert_equal Axlsx::DateTimeConverter::time_to_serial(local) - local.utc_offset.to_f/86400, Axlsx::DateTimeConverter::time_to_serial(utc)
+  end
+
+end

data/test/workbook/worksheet/tc_header_footer.rb

@@ -0,0 +1,151 @@
+require 'tc_helper'
+
+class TestHeaderFooter < Test::Unit::TestCase
+
+  def setup
+    @p = Axlsx::Package.new
+    ws = @p.workbook.add_worksheet :name => 'test'
+    @hf = ws.header_footer
+  end
+
+  def test_initialize
+    assert_equal(nil, @hf.odd_header)
+    assert_equal(nil, @hf.odd_footer)
+
+    assert_equal(nil, @hf.even_header)
+    assert_equal(nil, @hf.even_footer)
+
+    assert_equal(nil, @hf.first_header)
+    assert_equal(nil, @hf.first_footer)
+
+    assert_equal(nil, @hf.different_first)
+    assert_equal(nil, @hf.different_odd_even)
+  end
+
+  def test_initialize_with_options
+    header_footer = {
+      :odd_header => 'oh',
+      :odd_footer => 'of',
+
+      :even_header => 'eh',
+      :even_footer => 'ef',
+
+      :first_header => 'fh',
+      :first_footer => 'ff',
+
+      :different_first => true,
+      :different_odd_even => true
+    }
+    optioned = @p.workbook.add_worksheet(:name => 'optioned', :header_footer => header_footer).header_footer
+
+    assert_equal('oh', optioned.odd_header)
+    assert_equal('of', optioned.odd_footer)
+
+    assert_equal('eh', optioned.even_header)
+    assert_equal('ef', optioned.even_footer)
+
+    assert_equal('fh', optioned.first_header)
+    assert_equal('ff', optioned.first_footer)
+
+    assert_equal(true, optioned.different_first)
+    assert_equal(true, optioned.different_odd_even)
+  end
+
+  def test_string_attributes
+    %w(odd_header odd_footer even_header even_footer first_header first_footer).each do |attr|
+      assert_raise(ArgumentError, 'only strings allowed in string attributes') { @hf.send("#{attr}=", 1) }
+      assert_nothing_raised { @hf.send("#{attr}=", 'test_string') }
+    end
+  end
+
+  def test_boolean_attributes
+   %w(different_first different_odd_even).each do |attr|
+      assert_raise(ArgumentError, 'only booleanish allowed in string attributes') { @hf.send("#{attr}=", 'foo') }
+      assert_nothing_raised { @hf.send("#{attr}=", 1) }
+    end
+  end
+
+  def test_set_all_values
+    @hf.set(
+      :odd_header => 'oh',
+      :odd_footer => 'of',
+
+      :even_header => 'eh',
+      :even_footer => 'ef',
+
+      :first_header => 'fh',
+      :first_footer => 'ff',
+
+      :different_first => true,
+      :different_odd_even => true
+    )
+
+    assert_equal('oh', @hf.odd_header)
+    assert_equal('of', @hf.odd_footer)
+
+    assert_equal('eh', @hf.even_header)
+    assert_equal('ef', @hf.even_footer)
+
+    assert_equal('fh', @hf.first_header)
+    assert_equal('ff', @hf.first_footer)
+
+    assert_equal(true, @hf.different_first)
+    assert_equal(true, @hf.different_odd_even)
+  end
+
+  def test_to_xml_all_values
+    @hf.set(
+      :odd_header => 'oh',
+      :odd_footer => 'of',
+
+      :even_header => 'eh',
+      :even_footer => 'ef',
+
+      :first_header => 'fh',
+      :first_footer => 'ff',
+
+      :different_first => true,
+      :different_odd_even => true
+    )
+
+    doc = Nokogiri::XML.parse(@hf.to_xml_string)
+    assert_equal(1, doc.xpath(".//headerFooter[@differentFirst='true'][@differentOddEven='true']").size)
+
+    assert_equal(1, doc.xpath(".//headerFooter/oddHeader").size)
+    assert_equal('oh', doc.xpath(".//headerFooter/oddHeader").text)
+    assert_equal(1, doc.xpath(".//headerFooter/oddFooter").size)
+    assert_equal('of', doc.xpath(".//headerFooter/oddFooter").text)
+
+    assert_equal(1, doc.xpath(".//headerFooter/evenHeader").size)
+    assert_equal('eh', doc.xpath(".//headerFooter/evenHeader").text)
+    assert_equal(1, doc.xpath(".//headerFooter/evenFooter").size)
+    assert_equal('ef', doc.xpath(".//headerFooter/evenFooter").text)
+
+    assert_equal(1, doc.xpath(".//headerFooter/firstHeader").size)
+    assert_equal('fh', doc.xpath(".//headerFooter/firstHeader").text)
+    assert_equal(1, doc.xpath(".//headerFooter/firstFooter").size)
+    assert_equal('ff', doc.xpath(".//headerFooter/firstFooter").text)
+  end
+
+  def test_to_xml_some_values
+    @hf.set(
+      :odd_header => 'oh',
+      :different_odd_even => false
+    )
+
+    doc = Nokogiri::XML.parse(@hf.to_xml_string)
+    assert_equal(1, doc.xpath(".//headerFooter[@differentOddEven='false']").size)
+    assert_equal(0, doc.xpath(".//headerFooter[@differentFirst]").size)
+
+    assert_equal(1, doc.xpath(".//headerFooter/oddHeader").size)
+    assert_equal('oh', doc.xpath(".//headerFooter/oddHeader").text)
+    assert_equal(0, doc.xpath(".//headerFooter/oddFooter").size)
+
+    assert_equal(0, doc.xpath(".//headerFooter/evenHeader").size)
+    assert_equal(0, doc.xpath(".//headerFooter/evenFooter").size)
+
+    assert_equal(0, doc.xpath(".//headerFooter/firstHeader").size)
+    assert_equal(0, doc.xpath(".//headerFooter/firstFooter").size)
+  end
+end
+