tilia-vobject 4.0.0.pre.alpha2

data/test/v_object/component/v_card_test.rb

@@ -0,0 +1,258 @@
+require 'test_helper'
+
+module Tilia
+  module VObject
+    class VCardTest < Minitest::Test
+      def assert_validate(vcf, options, expected_level, expected_message = nil)
+        vcal = Tilia::VObject::Reader.read(vcf)
+        result = vcal.validate(options)
+
+        expect_validate_result(result, expected_level, expected_message)
+      end
+
+      def expect_validate_result(input, expected_level, expected_message = nil)
+        messages = []
+        input.each do |warning|
+          messages << warning['message']
+        end
+
+        if expected_level == 0
+          assert_equal(0, input.size, "No validation messages were expected. We got: #{messages.join(', ')}")
+        else
+          assert_equal(1, input.size, "We expected exactly 1 validation message, We got: #{messages.join(', ')}")
+
+          assert_equal(expected_message, input[0]['message'])
+          assert_equal(expected_level, input[0]['level'])
+        end
+      end
+
+      def validate_data
+        tests = []
+
+        # Correct
+        tests << [
+          "BEGIN:VCARD\r\nVERSION:4.0\r\nFN:John Doe\r\nUID:foo\r\nEND:VCARD\r\n",
+          [],
+          "BEGIN:VCARD\r\nVERSION:4.0\r\nFN:John Doe\r\nUID:foo\r\nEND:VCARD\r\n"
+        ]
+
+        # No VERSION
+        tests << [
+          "BEGIN:VCARD\r\nFN:John Doe\r\nUID:foo\r\nEND:VCARD\r\n",
+          [
+            'VERSION MUST appear exactly once in a VCARD component'
+          ],
+          "BEGIN:VCARD\r\nVERSION:3.0\r\nFN:John Doe\r\nUID:foo\r\nEND:VCARD\r\n"
+        ]
+
+        # Unknown version
+        tests << [
+          "BEGIN:VCARD\r\nVERSION:2.2\r\nFN:John Doe\r\nUID:foo\r\nEND:VCARD\r\n",
+          [
+            'Only vcard version 4.0 (RFC6350), version 3.0 (RFC2426) or version 2.1 (icm-vcard-2.1) are supported.'
+          ],
+          "BEGIN:VCARD\r\nVERSION:2.1\r\nFN:John Doe\r\nUID:foo\r\nEND:VCARD\r\n"
+        ]
+
+        # No FN
+        tests << [
+          "BEGIN:VCARD\r\nVERSION:4.0\r\nUID:foo\r\nEND:VCARD\r\n",
+          [
+            'The FN property must appear in the VCARD component exactly 1 time'
+          ],
+          "BEGIN:VCARD\r\nVERSION:4.0\r\nUID:foo\r\nEND:VCARD\r\n"
+        ]
+        # No FN, N fallback
+        tests << [
+          "BEGIN:VCARD\r\nVERSION:4.0\r\nUID:foo\r\nN:Doe;John;;;;;\r\nEND:VCARD\r\n",
+          [
+            'The FN property must appear in the VCARD component exactly 1 time'
+          ],
+          "BEGIN:VCARD\r\nVERSION:4.0\r\nUID:foo\r\nN:Doe;John;;;;;\r\nFN:John Doe\r\nEND:VCARD\r\n"
+        ]
+        # No FN, N fallback, no first name
+        tests << [
+          "BEGIN:VCARD\r\nVERSION:4.0\r\nUID:foo\r\nN:Doe;;;;;;\r\nEND:VCARD\r\n",
+          [
+            'The FN property must appear in the VCARD component exactly 1 time'
+          ],
+          "BEGIN:VCARD\r\nVERSION:4.0\r\nUID:foo\r\nN:Doe;;;;;;\r\nFN:Doe\r\nEND:VCARD\r\n"
+        ]
+
+        # No FN, ORG fallback
+        tests << [
+          "BEGIN:VCARD\r\nVERSION:4.0\r\nUID:foo\r\nORG:Acme Co.\r\nEND:VCARD\r\n",
+          [
+            'The FN property must appear in the VCARD component exactly 1 time'
+          ],
+          "BEGIN:VCARD\r\nVERSION:4.0\r\nUID:foo\r\nORG:Acme Co.\r\nFN:Acme Co.\r\nEND:VCARD\r\n"
+        ]
+        tests
+      end
+
+      def test_validate
+        validate_data.each do |data|
+          (input, expected_warnings, expected_repaired_output) = data
+          vcard = Tilia::VObject::Reader.read(input)
+
+          warnings = vcard.validate
+
+          warn_msg = []
+          warnings.each do |warning|
+            warn_msg << warning['message']
+          end
+
+          assert_equal(expected_warnings, warn_msg)
+
+          vcard.validate(Tilia::VObject::Component::REPAIR)
+
+          assert_equal(expected_repaired_output, vcard.serialize)
+        end
+      end
+
+      def test_get_document_type
+        vcard = Tilia::VObject::Component::VCard.new({}, false)
+        vcard['VERSION'] = '2.1'
+        assert_equal(Tilia::VObject::Component::VCard::VCARD21, vcard.document_type)
+
+        vcard = Tilia::VObject::Component::VCard.new({}, false)
+        vcard['VERSION'] = '3.0'
+        assert_equal(Tilia::VObject::Component::VCard::VCARD30, vcard.document_type)
+
+        vcard = Tilia::VObject::Component::VCard.new({}, false)
+        vcard['VERSION'] = '4.0'
+        assert_equal(Tilia::VObject::Component::VCard::VCARD40, vcard.document_type)
+
+        vcard = Tilia::VObject::Component::VCard.new({}, false)
+        assert_equal(Tilia::VObject::Component::VCard::UNKNOWN, vcard.document_type)
+      end
+
+      def test_preferred_no_pref
+        vcard = <<VCF
+BEGIN:VCARD
+VERSION:3.0
+EMAIL:1@example.org
+EMAIL:2@example.org
+END:VCARD
+VCF
+
+        vcard = Tilia::VObject::Reader.read(vcard)
+        assert_equal('1@example.org', vcard.preferred('EMAIL').value)
+      end
+
+      def test_preferred_with_pref
+        vcard = <<VCF
+BEGIN:VCARD
+VERSION:3.0
+EMAIL:1@example.org
+EMAIL;TYPE=PREF:2@example.org
+END:VCARD
+VCF
+
+        vcard = Tilia::VObject::Reader.read(vcard)
+        assert_equal('2@example.org', vcard.preferred('EMAIL').value)
+      end
+
+      def test_preferred_with40_pref
+        vcard = <<VCF
+BEGIN:VCARD
+VERSION:4.0
+EMAIL:1@example.org
+EMAIL;PREF=3:2@example.org
+EMAIL;PREF=2:3@example.org
+END:VCARD
+VCF
+
+        vcard = Tilia::VObject::Reader.read(vcard)
+        assert_equal('3@example.org', vcard.preferred('EMAIL').value)
+      end
+
+      def test_preferred_not_found
+        vcard = <<VCF
+BEGIN:VCARD
+VERSION:4.0
+END:VCARD
+VCF
+
+        vcard = Tilia::VObject::Reader.read(vcard)
+        assert_nil(vcard.preferred('EMAIL'))
+      end
+
+      def test_no_uid_card_dav
+        vcard = <<VCF
+BEGIN:VCARD
+VERSION:4.0
+FN:John Doe
+END:VCARD
+VCF
+        assert_validate(
+          vcard,
+          Tilia::VObject::Component::VCard::PROFILE_CARDDAV,
+          3,
+          'vCards on CardDAV servers MUST have a UID property.'
+        )
+      end
+
+      def test_no_uid_no_card_dav
+        vcard = <<VCF
+BEGIN:VCARD
+VERSION:4.0
+FN:John Doe
+END:VCARD
+VCF
+        assert_validate(
+          vcard,
+          0,
+          2,
+          'Adding a UID to a vCard property is recommended.'
+        )
+      end
+
+      def test_no_uid_no_card_dav_repair
+        vcard = <<VCF
+BEGIN:VCARD
+VERSION:4.0
+FN:John Doe
+END:VCARD
+VCF
+        assert_validate(
+          vcard,
+          Tilia::VObject::Component::VCard::REPAIR,
+          1,
+          'Adding a UID to a vCard property is recommended.'
+        )
+      end
+
+      def test_v_card21_card_dav
+        vcard = <<VCF
+BEGIN:VCARD
+VERSION:2.1
+FN:John Doe
+UID:foo
+END:VCARD
+VCF
+        assert_validate(
+          vcard,
+          Tilia::VObject::Component::VCard::PROFILE_CARDDAV,
+          3,
+          'CardDAV servers are not allowed to accept vCard 2.1.'
+        )
+      end
+
+      def test_v_card21_no_card_dav
+        vcard = <<VCF
+BEGIN:VCARD
+VERSION:2.1
+FN:John Doe
+UID:foo
+END:VCARD
+VCF
+        assert_validate(
+          vcard,
+          0,
+          0
+        )
+      end
+    end
+  end
+end

data/test/v_object/component/v_event_test.rb

@@ -0,0 +1,85 @@
+require 'test_helper'
+
+module Tilia
+  module VObject
+    class VEventTest < Minitest::Test
+      def time_range_test_data
+        tests = []
+        berlin = ActiveSupport::TimeZone.new('Europe/Berlin')
+
+        calendar = Tilia::VObject::Component::VCalendar.new
+
+        vevent = calendar.create_component('VEVENT')
+        vevent['DTSTART'] = '20111223T120000Z'
+        tests << [vevent, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vevent, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vevent2 = vevent.clone
+        vevent2['DTEND'] = '20111225T120000Z'
+        tests << [vevent2, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vevent2, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vevent3 = vevent.clone
+        vevent3['DURATION'] = 'P1D'
+        tests << [vevent3, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vevent3, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vevent4 = vevent.clone
+        vevent4['DTSTART'] = '20111225'
+        vevent4['DTSTART']['VALUE'] = 'DATE'
+        tests << [vevent4, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vevent4, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+        # Event with no end date should be treated as lasting the entire day.
+        tests << [vevent4, Time.zone.parse('2011-12-25 16:00:00'), Time.zone.parse('2011-12-25 17:00:00'), true]
+        # DTEND is non inclusive so all day events should not be returned on the next day.
+        tests << [vevent4, Time.zone.parse('2011-12-26 00:00:00'), Time.zone.parse('2011-12-26 17:00:00'), false]
+        # The timezone of timerange in question also needs to be considered.
+        tests << [vevent4, berlin.parse('2011-12-26 00:00:00'), berlin.parse('2011-12-26 17:00:00'), false]
+
+        vevent5 = vevent.clone
+        vevent5['DURATION'] = 'P1D'
+        vevent5['RRULE'] = 'FREQ=YEARLY'
+        tests << [vevent5, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vevent5, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+        tests << [vevent5, Time.zone.parse('2013-12-01'), Time.zone.parse('2013-12-31'), true]
+
+        vevent6 = vevent.clone
+        vevent6['DTSTART'] = '20111225'
+        vevent6['DTSTART']['VALUE'] = 'DATE'
+        vevent6['DTEND'] = '20111225'
+        vevent6['DTEND']['VALUE'] = 'DATE'
+
+        tests << [vevent6, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vevent6, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        # Added this test to ensure that recurrence rules with no DTEND also
+        # get checked for the entire day.
+        vevent7 = vevent.clone
+        vevent7['DTSTART'] = '20120101'
+        vevent7['DTSTART']['VALUE'] = 'DATE'
+        vevent7['RRULE'] = 'FREQ=MONTHLY'
+        tests << [vevent7, Time.zone.parse('2012-02-01 15:00:00'), Time.zone.parse('2012-02-02'), true]
+        # The timezone of timerange in question should also be considered.
+        tests << [vevent7, berlin.parse('2012-02-02 00:00:00'), berlin.parse('2012-02-03 00:00:00'), false]
+
+        # Added this test to check recurring events that have no instances.
+        vevent8 = vevent.clone
+        vevent8['DTSTART'] = '20130329T140000'
+        vevent8['DTEND'] = '20130329T153000'
+        vevent8['RRULE'] = { 'FREQ' => 'WEEKLY', 'BYDAY' => ['FR'], 'UNTIL' => '20130412T115959Z' }
+        vevent8.add('EXDATE', '20130405T140000')
+        vevent8.add('EXDATE', '20130329T140000')
+        tests << [vevent8, Time.zone.parse('2013-03-01'), Time.zone.parse('2013-04-01'), false]
+
+        tests
+      end
+
+      def test_in_time_range
+        time_range_test_data.each do |data|
+          (vevent, start, ending, outcome) = data
+          assert_equal(outcome, vevent.in_time_range?(start, ending))
+        end
+      end
+    end
+  end
+end

data/test/v_object/component/v_free_busy_test.rb

@@ -0,0 +1,59 @@
+require 'test_helper'
+
+module Tilia
+  module VObject
+    class VFreeBusyTest < Minitest::Test
+      def test_is_free
+        input = <<BLA
+BEGIN:VCALENDAR
+BEGIN:VFREEBUSY
+FREEBUSY;FBTYPE=FREE:20120912T000500Z/PT1H
+FREEBUSY;FBTYPE=BUSY:20120912T010000Z/20120912T020000Z
+FREEBUSY;FBTYPE=BUSY-TENTATIVE:20120912T020000Z/20120912T030000Z
+FREEBUSY;FBTYPE=BUSY-UNAVAILABLE:20120912T030000Z/20120912T040000Z
+FREEBUSY;FBTYPE=BUSY:20120912T050000Z/20120912T060000Z,20120912T080000Z/20120912T090000Z
+FREEBUSY;FBTYPE=BUSY:20120912T100000Z/PT1H
+END:VFREEBUSY
+END:VCALENDAR
+BLA
+
+        obj = Tilia::VObject::Reader.read(input)
+        vfb = obj['VFREEBUSY']
+
+        tz = ActiveSupport::TimeZone.new('UTC')
+
+        refute(vfb.free?(tz.parse('2012-09-12 01:15:00'), tz.parse('2012-09-12 01:45:00')))
+        refute(vfb.free?(tz.parse('2012-09-12 08:05:00'), tz.parse('2012-09-12 08:10:00')))
+        refute(vfb.free?(tz.parse('2012-09-12 10:15:00'), tz.parse('2012-09-12 10:45:00')))
+
+        # Checking whether the end time is treated as non-inclusive
+        assert(vfb.free?(tz.parse('2012-09-12 09:00:00'), tz.parse('2012-09-12 09:15:00')))
+        assert(vfb.free?(tz.parse('2012-09-12 09:45:00'), tz.parse('2012-09-12 10:00:00')))
+        assert(vfb.free?(tz.parse('2012-09-12 11:00:00'), tz.parse('2012-09-12 12:00:00')))
+      end
+
+      def test_validate
+        input = <<HI
+BEGIN:VCALENDAR
+VERSION:2.0
+PRODID:YoYo
+BEGIN:VFREEBUSY
+UID:some-random-id
+DTSTAMP:20140402T180200Z
+END:VFREEBUSY
+END:VCALENDAR
+HI
+
+        obj = Tilia::VObject::Reader.read(input)
+
+        warnings = obj.validate
+        messages = []
+        warnings.each do |warning|
+          messages << warning['message']
+        end
+
+        assert_equal([], messages)
+      end
+    end
+  end
+end

data/test/v_object/component/v_journal_test.rb

@@ -0,0 +1,85 @@
+require 'test_helper'
+
+module Tilia
+  module VObject
+    class VJournalTest < Minitest::Test
+      def time_range_test_data
+        calendar = Tilia::VObject::Component::VCalendar.new
+
+        tests = []
+
+        vjournal = calendar.create_component('VJOURNAL')
+        vjournal['DTSTART'] = '20111223T120000Z'
+        tests << [vjournal, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vjournal, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vjournal2 = calendar.create_component('VJOURNAL')
+        vjournal2['DTSTART'] = '20111223'
+        vjournal2['DTSTART']['VALUE'] = 'DATE'
+        tests << [vjournal2, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vjournal2, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vjournal3 = calendar.create_component('VJOURNAL')
+        tests << [vjournal3, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), false]
+        tests << [vjournal3, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        tests
+      end
+
+      def test_in_time_range
+        time_range_test_data.each do |data|
+          (vtodo, start, ending, outcome) = data
+          assert_equal(outcome, vtodo.in_time_range?(start, ending))
+        end
+      end
+
+      def test_validate
+        input = <<HI
+BEGIN:VCALENDAR
+VERSION:2.0
+PRODID:YoYo
+BEGIN:VJOURNAL
+UID:12345678
+DTSTAMP:20140402T174100Z
+END:VJOURNAL
+END:VCALENDAR
+HI
+
+        obj = Tilia::VObject::Reader.read(input)
+
+        warnings = obj.validate
+        messages = []
+        warnings.each do |warning|
+          messages << warning['message']
+        end
+
+        assert_equal([], messages)
+      end
+
+      def test_validate_broken
+        input = <<HI
+BEGIN:VCALENDAR
+VERSION:2.0
+PRODID:YoYo
+BEGIN:VJOURNAL
+UID:12345678
+DTSTAMP:20140402T174100Z
+URL:http://example.org/
+URL:http://example.com/
+END:VJOURNAL
+END:VCALENDAR
+HI
+
+        obj = Tilia::VObject::Reader.read(input)
+
+        warnings = obj.validate
+        messages = []
+        warnings.each do |warning|
+          messages << warning['message']
+        end
+
+        assert_equal(['URL MUST NOT appear more than once in a VJOURNAL component'], messages)
+      end
+    end
+  end
+end

data/test/v_object/component/v_time_zone_test.rb

@@ -0,0 +1,47 @@
+require 'test_helper'
+
+module Tilia
+  module VObject
+    class VTimeZoneTest < Minitest::Test
+      def test_validate
+        input = <<HI
+BEGIN:VCALENDAR
+VERSION:2.0
+PRODID:YoYo
+BEGIN:VTIMEZONE
+TZID:America/Toronto
+END:VTIMEZONE
+END:VCALENDAR
+HI
+
+        obj = Tilia::VObject::Reader.read(input)
+
+        warnings = obj.validate
+        messages = []
+        warnings.each do |warning|
+          messages << warning['message']
+        end
+
+        assert_equal([], messages)
+      end
+
+      def test_get_time_zone
+        input = <<HI
+BEGIN:VCALENDAR
+VERSION:2.0
+PRODID:YoYo
+BEGIN:VTIMEZONE
+TZID:America/Toronto
+END:VTIMEZONE
+END:VCALENDAR
+HI
+
+        obj = Tilia::VObject::Reader.read(input)
+
+        tz = ActiveSupport::TimeZone.new('America/Toronto')
+
+        assert_equal(tz, obj['VTIMEZONE'].time_zone)
+      end
+    end
+  end
+end

data/test/v_object/component/v_todo_test.rb

@@ -0,0 +1,172 @@
+require 'test_helper'
+
+module Tilia
+  module VObject
+    class VTodoTest < Minitest::Test
+      def time_range_test_data
+        tests = []
+
+        calendar = Tilia::VObject::Component::VCalendar.new
+
+        vtodo = calendar.create_component('VTODO')
+        vtodo['DTSTART'] = '20111223T120000Z'
+        tests << [vtodo, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vtodo, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vtodo2 = vtodo.clone
+        vtodo2['DURATION'] = 'P1D'
+        tests << [vtodo2, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vtodo2, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vtodo3 = vtodo.clone
+        vtodo3['DUE'] = '20111225'
+        tests << [vtodo3, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vtodo3, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vtodo4 = calendar.create_component('VTODO')
+        vtodo4['DUE'] = '20111225'
+        tests << [vtodo4, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vtodo4, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vtodo5 = calendar.create_component('VTODO')
+        vtodo5['COMPLETED'] = '20111225'
+        tests << [vtodo5, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vtodo5, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vtodo6 = calendar.create_component('VTODO')
+        vtodo6['CREATED'] = '20111225'
+        tests << [vtodo6, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vtodo6, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vtodo7 = calendar.create_component('VTODO')
+        vtodo7['CREATED'] = '20111225'
+        vtodo7['COMPLETED'] = '20111226'
+        tests << [vtodo7, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vtodo7, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), false]
+
+        vtodo7 = calendar.create_component('VTODO')
+        tests << [vtodo7, Time.zone.parse('2011-01-01'), Time.zone.parse('2012-01-01'), true]
+        tests << [vtodo7, Time.zone.parse('2011-01-01'), Time.zone.parse('2011-11-01'), true]
+
+        tests
+      end
+
+      def test_in_time_range
+        time_range_test_data.each do |data|
+          (vtodo, start, ending, outcome) = data
+          assert_equal(outcome, vtodo.in_time_range?(start, ending))
+        end
+      end
+
+      def test_validate
+        input = <<HI
+BEGIN:VCALENDAR
+VERSION:2.0
+PRODID:YoYo
+BEGIN:VTODO
+UID:1234-21355-123156
+DTSTAMP:20140402T183400Z
+END:VTODO
+END:VCALENDAR
+HI
+
+        obj = Tilia::VObject::Reader.read(input)
+
+        warnings = obj.validate
+        messages = []
+        warnings.each do |warning|
+          messages << warning['message']
+        end
+
+        assert_equal([], messages)
+      end
+
+      def test_validate_invalid
+        input = <<HI
+BEGIN:VCALENDAR
+VERSION:2.0
+PRODID:YoYo
+BEGIN:VTODO
+END:VTODO
+END:VCALENDAR
+HI
+
+        obj = Tilia::VObject::Reader.read(input)
+
+        warnings = obj.validate
+        messages = []
+        warnings.each do |warning|
+          messages << warning['message']
+        end
+
+        assert_equal(
+          [
+            'UID MUST appear exactly once in a VTODO component',
+            'DTSTAMP MUST appear exactly once in a VTODO component'
+          ],
+          messages
+        )
+      end
+
+      def test_validate_duedtstart_mis_match
+        input = <<HI
+BEGIN:VCALENDAR
+VERSION:2.0
+PRODID:YoYo
+BEGIN:VTODO
+UID:FOO
+DTSTART;VALUE=DATE-TIME:20140520T131600Z
+DUE;VALUE=DATE:20140520
+DTSTAMP;VALUE=DATE-TIME:20140520T131600Z
+END:VTODO
+END:VCALENDAR
+HI
+
+        obj = Tilia::VObject::Reader.read(input)
+
+        warnings = obj.validate
+        messages = []
+        warnings.each do |warning|
+          messages << warning['message']
+        end
+
+        assert_equal(
+          [
+            'The value type (DATE or DATE-TIME) must be identical for DUE and DTSTART'
+          ],
+          messages
+        )
+      end
+
+      def test_validate_du_ebefore_dtstart
+        input = <<HI
+BEGIN:VCALENDAR
+VERSION:2.0
+PRODID:YoYo
+BEGIN:VTODO
+UID:FOO
+DTSTART;VALUE=DATE:20140520
+DUE;VALUE=DATE:20140518
+DTSTAMP;VALUE=DATE-TIME:20140520T131600Z
+END:VTODO
+END:VCALENDAR
+HI
+
+        obj = Tilia::VObject::Reader.read(input)
+
+        warnings = obj.validate
+        messages = []
+        warnings.each do |warning|
+          messages << warning['message']
+        end
+
+        assert_equal(
+          [
+            'DUE must occur after DTSTART'
+          ],
+          messages
+        )
+      end
+    end
+  end
+end