rail_feeds 0.0.1

data/spec/rail_feeds/network_rail/schedule/data_spec.rb

@@ -0,0 +1,219 @@
+# frozen_string_literal: true
+
+class DummyParserForDataTests
+  def initialize(logger:, **procs)
+    _logger = logger
+    @procs = procs
+    @events = {}
+  end
+
+  def parse_cif_file(file)
+    filename = File.join RSPEC_FIXTURES, 'network_rail', 'schedule', 'data', "#{file}.yaml"
+    YAML.load(File.read(filename)).each do |event, data|
+      if data.nil?
+        @procs[event].call self
+      else
+        @procs[event].call self, *data
+      end
+    end
+  end
+end
+
+describe RailFeeds::NetworkRail::Schedule::Data do
+  before :each do
+    expect(RailFeeds::NetworkRail::Schedule::Parser::CIF).to receive(:new) do |**args|
+      DummyParserForDataTests.new(**args)
+    end
+  end
+  subject do |example|
+    data = described_class.new
+    unless example.metadata[:skip_load_starting_data]
+      # Populate with starting data
+      filename = File.join RSPEC_FIXTURES, 'network_rail', 'schedule', 'data', 'starting.yaml'
+      starting_data = YAML.load(File.read(filename))
+      data.associations.clear
+      data.tiplocs.clear
+      data.trains.clear
+      data.instance_exec(starting_data[:last_header]) { |h| @last_header = h }
+      starting_data[:associations].each { |i| data.associations[i.hash] = i }
+      starting_data[:trains].each do |uid, schedules|
+        data.trains[uid] = []
+        schedules.each do |i|
+          data.trains[uid].push i
+        end
+      end
+      starting_data[:tiplocs].each { |i| data.tiplocs[i.hash] = i }
+    end
+    data
+  end
+
+  describe '#load_cif_file' do
+    describe 'Loads data' do
+      context 'A full extract' do
+        before(:each) { subject.load_cif_file('full') }
+
+        describe 'Replaces data' do
+          it 'Headers' do
+            expect(subject.last_header.current_file_reference).to eq 'DFROC2Q'
+          end
+
+          it 'Tiplocs' do
+            expect(subject.tiplocs.values.map(&:tiploc)).to eq ['1', '2', '3']
+          end
+
+          it 'Associations' do
+            expect(subject.associations.values.map(&:main_location_suffix)).to eq ['a', 'b', 'c']
+            expect(subject.associations.values.map(&:category)).to eq ['JJ', 'JJ', 'JJ']
+          end
+
+          it 'Trains' do
+            expect(subject.trains.values.flatten.map(&:signalling_headcode)).to eq [
+              '1A11',
+              '2B22',
+              '3C33'
+            ]
+          end
+        end
+      end
+
+      context 'An update extract' do
+        before(:each) do
+          subject.load_cif_file 'full'
+          subject.load_cif_file 'update'
+        end
+
+        describe 'Updates data' do
+          it 'Headers' do
+            expect(subject.last_header.current_file_reference).to eq 'DFROC1L'
+          end
+
+          it 'Tiplocs' do
+            expect(subject.tiplocs.values.map(&:tiploc)).to eq ['1', '3a', '4', '5a']
+          end
+
+          it 'Associations' do
+            expect(subject.associations.values.map(&:main_location_suffix)).to eq ['a', 'c', 'd', 'e']
+            expect(subject.associations.values.map(&:category)).to eq ['JJ', 'VV', 'JJ', 'JJ']
+          end
+
+          it 'Trains' do
+            expect(subject.trains.values.flatten.map(&:signalling_headcode)).to eq [
+              '1A11',
+              '3c33',
+              '4D44',
+              '5E55'
+            ]
+          end
+        end
+      end
+
+      describe 'Errors on incorrect sequence', :skip_load_starting_data do
+        it 'Update applied after a full extract' do
+          subject.load_cif_file 'full'
+          expect { subject.load_cif_file('update') }.to_not raise_error
+        end
+
+        it 'Update applied after previous update extract' do
+          subject.load_cif_file 'full'
+          subject.load_cif_file 'update'
+          expect { subject.load_cif_file('update-next') }.to_not raise_error
+        end
+
+        it 'Update applied with a gap' do
+          subject.load_cif_file 'full'
+          subject.load_cif_file 'update'
+          message = 'Missing update(s). Last applied update is "DFROC1L", ' \
+                    'this update requires "DFROC1M" to be the previous applied update.'
+          expect { subject.load_cif_file('update-gap') }.to raise_error ArgumentError, message
+        end
+
+        it 'Update applied too old update' do
+          subject.load_cif_file 'full'
+          subject.load_cif_file 'update'
+          message = 'Update is too old, it is before the last applied update.'
+          expect { subject.load_cif_file('update-old') }.to raise_error ArgumentError, message
+        end
+
+        it 'Update applied before a full extract' do
+          message = 'Update can\'t be loaded before loading a full extract.'
+          expect { subject.load_cif_file('update') }.to raise_error ArgumentError, message
+        end
+      end
+    end
+  end
+
+  it '#generate_cif' do
+    lines = []
+    subject.load_cif_file 'full'
+    subject.load_cif_file 'update'
+    subject.generate_cif { |line| lines.push line }
+    expect(lines).to eq([
+      '/!! Start of file',
+      '/!! Generated: 18/06/2018 19:45',
+      'HD                    1806181945              F 190618180619                    ',
+      'TI1                                                                             ',
+      'TI3a                                                                            ',
+      'TI4                                                                             ',
+      'TI5a                                                                            ',
+      'AAN                        1111100JJ 1      a T                                 ',
+      'AAN                        1111100VV 3      c T                                 ',
+      'AAN                        1111100JJ 4      d T                                 ',
+      'AAN                        1111100JJ 5      e T                                 ',
+      'BSN1                 1111100    1A11    1                                       ',
+      'BX           N                                                                  ',
+      'BSN3                 1111100    3c33    1                                       ',
+      'BX           N                                                                  ',
+      'BSN4                 1111100    4D44    1                                       ',
+      'BX           N                                                                  ',
+      'LO1       1111 1111      0 0             0                                      ',
+      'CR2                                                                             ',
+      'LI2            1111          1111                     0 0 0                     ',
+      'LT3       2222 2222                                                             ',
+      'BSN5                 1111100    5E55    1                                       ',
+      'BX           N                                                                  ',
+      'ZZ                                                                              ',
+      '/!! End of file'
+    ].map { |i| "#{i}\n" })
+  end
+
+  describe '#fetch_data' do
+    let(:fetcher) { double RailFeeds::NetworkRail::Schedule::Fetcher }
+    before :each do
+      expect(RailFeeds::NetworkRail::Schedule::Fetcher)
+        .to receive(:new).and_return(fetcher)
+    end
+
+    it 'Gets a full update if empty of data', :skip_load_starting_data do
+      full_file = StringIO.new
+      update_file = StringIO.new
+
+      expect(fetcher).to receive(:fetch_all).and_yield(full_file).and_yield(update_file)
+      expect(subject).to receive(:load_cif_file).with(full_file)
+      expect(subject).to receive(:load_cif_file).with(update_file)
+
+      subject.fetch_data
+    end
+
+    it 'Gets a full update if not updated in last week' do
+      Timecop.freeze 2018, 6, 21
+      full_file = StringIO.new
+      update_file = StringIO.new
+
+      expect(fetcher).to receive(:fetch_all).and_yield(full_file).and_yield(update_file)
+      expect(subject).to receive(:load_cif_file).with(full_file)
+      expect(subject).to receive(:load_cif_file).with(update_file)
+
+      subject.fetch_data
+    end
+
+    it 'Just gets updates if updated in last week' do
+      Timecop.freeze 2018, 6, 20
+      update_file = StringIO.new
+
+      expect(fetcher).to receive(:fetch_all_updates).and_yield(update_file)
+      expect(subject).to receive(:load_cif_file).with(update_file)
+
+      subject.fetch_data
+    end
+  end
+end

data/spec/rail_feeds/network_rail/schedule/days_shared.rb

@@ -0,0 +1,99 @@
+# frozen_string_literal: true
+
+shared_examples 'it has a days array' do
+  describe 'Setting valid values' do
+    it 'Array of 7 booleans' do
+      subject.days = [false, true, false, true, false, true, false]
+      expect(subject.days).to eq [false, true, false, true, false, true, false]
+    end
+
+    it 'String with length of 7' do
+      subject.days = '1010101'
+      expect(subject.days).to eq [true, false, true, false, true, false, true]
+    end
+  end
+
+  describe 'Setting invalid values' do
+    it 'Array of 6 booleans' do
+      subject.days = [false, true, false, true, false, true]
+      expect(subject.days).to eq [false, true, false, true, false, true, nil]
+    end
+    it 'Array of 8 booleans' do
+      subject.days = [false, true, false, true, false, true, false, true]
+      expect(subject.days).to eq [false, true, false, true, false, true, false]
+    end
+
+    it 'String with length of 6' do
+      subject.days = '101010'
+      expect(subject.days).to eq [true, false, true, false, true, false, nil]
+    end
+    it 'String with length of 8' do
+      subject.days = '10101010'
+      expect(subject.days).to eq [true, false, true, false, true, false, true]
+    end
+  end
+
+  describe 'Query methods' do
+    before(:each) { subject.days = '0000000' }
+
+    it '#mondays?' do
+      expect(subject.mondays?).to be false
+      subject.days = '1000000'
+      expect(subject.mondays?).to be true
+    end
+
+    it '#tuesdays?' do
+      expect(subject.tuesdays?).to be false
+      subject.days = '0100000'
+      expect(subject.tuesdays?).to be true
+    end
+
+    it '#wednesdays?' do
+      expect(subject.wednesdays?).to be false
+      subject.days = '0010000'
+      expect(subject.wednesdays?).to be true
+    end
+
+    it '#thursdays?' do
+      expect(subject.thursdays?).to be false
+      subject.days = '0001000'
+      expect(subject.thursdays?).to be true
+    end
+
+    it '#fridays?' do
+      expect(subject.fridays?).to be false
+      subject.days = '0000100'
+      expect(subject.fridays?).to be true
+    end
+
+    it '#saturdays?' do
+      expect(subject.saturdays?).to be false
+      subject.days = '0000010'
+      expect(subject.saturdays?).to be true
+    end
+
+    it '#sundays?' do
+      expect(subject.sundays?).to be false
+      subject.days = '0000001'
+      expect(subject.sundays?).to be true
+    end
+  end
+
+  describe 'Conversion methods' do
+    it '#days_to_cif' do
+      expect(described_class.days_to_cif([true, true, true, true, true, true, true])).to eq '1111111'
+      expect(described_class.days_to_cif([false, false, false, false, false, false, false])).to eq '0000000'
+    end
+
+    describe '#days_from_cif' do
+      it 'String of 1 or 0' do
+        expect(described_class.days_from_cif('1111111')).to eq [true, true, true, true, true, true, true]
+        expect(described_class.days_from_cif('0000000')).to eq [false, false, false, false, false, false, false]
+      end
+
+      it 'nil' do
+        expect(described_class.days_from_cif(nil)).to eq [nil, nil, nil, nil, nil, nil, nil]
+      end
+    end
+  end
+end

data/spec/rail_feeds/network_rail/schedule/days_spec.rb

@@ -0,0 +1,4 @@
+# frozen_string_literal: true
+
+describe RailFeeds::NetworkRail::Schedule::Days do
+end

data/spec/rail_feeds/network_rail/schedule/fetcher_spec.rb

@@ -0,0 +1,228 @@
+# frozen_string_literal: true
+
+describe RailFeeds::NetworkRail::Schedule::Fetcher do
+  let(:http_client) { double RailFeeds::NetworkRail::HTTPClient }
+  let(:reader) { double Zlib::GzipReader }
+
+  describe '#download_all_full' do
+    it 'CIF format' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:download)
+        .with('ntrod/CifFileAuthenticate?type=CIF_ALL_FULL_DAILY&day=toc-full.CIF.gz', 'file')
+      subject.download_all_full :cif, 'file'
+    end
+
+    it 'JSON format' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:download)
+        .with('ntrod/CifFileAuthenticate?type=CIF_ALL_FULL_DAILY&day=toc-full', 'file')
+      subject.download_all_full :json, 'file'
+    end
+
+    it 'Invalid format' do
+      expect { subject.download_all_full :invalid, 'file' }
+        .to raise_error ArgumentError, 'format must be either :json or :cif'
+    end
+  end
+
+  describe '#download_all_update' do
+    it 'CIF format' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:download)
+        .with('ntrod/CifFileAuthenticate?type=CIF_ALL_UPDATE_DAILY&day=toc-update-mon.CIF.gz', 'file')
+      subject.download_all_update 'mon', :cif, 'file'
+    end
+
+    it 'JSON format' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:download)
+        .with('ntrod/CifFileAuthenticate?type=CIF_ALL_UPDATE_DAILY&day=toc-update-tue', 'file')
+      subject.download_all_update 'tue', :json, 'file'
+    end
+
+    it 'Invalid format' do
+      expect { subject.download_all_update 'wed', :invalid, 'file' }
+        .to raise_error ArgumentError, 'format must be either :json or :cif'
+    end
+
+    it 'Invalid day' do
+      expect { subject.download_all_update 'BAD', :json, 'file' }
+        .to raise_error ArgumentError, 'day is invalid'
+    end
+  end
+
+  it '#download_freight_full' do
+    expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+    expect(http_client).to receive(:download)
+      .with('ntrod/CifFileAuthenticate?type=CIF_FREIGHT_FULL_DAILY&day=toc-full', 'file')
+    subject.download_freight_full 'file'
+  end
+
+  describe '#download_freight_update' do
+    it 'Valid day' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:download)
+        .with('ntrod/CifFileAuthenticate?type=CIF_FREIGHT_UPDATE_DAILY&day=toc-update-mon', 'file')
+      subject.download_freight_update 'mon', 'file'
+    end
+
+    it 'Invalid day' do
+      expect { subject.download_freight_update('BAD', 'file') {} }
+        .to raise_error ArgumentError, 'day is invalid'
+    end
+  end
+
+  it '#download_toc_full' do
+    expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+    expect(http_client).to receive(:download)
+      .with('ntrod/CifFileAuthenticate?type=CIF_TT_TOC_FULL_DAILY&day=toc-full', 'file')
+    subject.download_toc_full 'TT', 'file'
+  end
+
+  describe '#download_toc_update' do
+    it 'Valid day' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:download)
+        .with('ntrod/CifFileAuthenticate?type=CIF_TT_TOC_UPDATE_DAILY&day=toc-update-wed', 'file')
+      subject.download_toc_update 'TT', 'wed', 'file'
+    end
+
+    it 'Invalid day' do
+      expect { subject.download_toc_update 'TT', 'BAD', 'file' }
+        .to raise_error ArgumentError, 'day is invalid'
+    end
+  end
+
+  describe '#download' do
+    it 'Passes credentials and logger to HTTP client' do
+      credentials = double RailFeeds::NetworkRail::Credentials
+      logger = double Logger
+      expect(RailFeeds::NetworkRail::HTTPClient)
+        .to receive(:new).with(credentials: credentials, logger: logger)
+                         .and_return(http_client)
+      expect(http_client).to receive(:download).and_return(reader)
+      subject = described_class.new credentials: credentials, logger: logger
+      subject.send :download, 'toc', 'mon', :json, 'file'
+    end
+
+    it 'CIF format request for non all schedule' do
+      expect { subject.send(:download, 'toc', 'mon', :cif, 'file') {} }
+        .to raise_error ArgumentError, 'CIF format is only available for the all schedule'
+    end
+  end
+
+  describe '#fetch_all_full' do
+    it 'CIF format' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:fetch_unzipped)
+        .with('ntrod/CifFileAuthenticate?type=CIF_ALL_FULL_DAILY&day=toc-full.CIF.gz')
+        .and_yield(reader)
+      expect { |a| subject.fetch_all_full(:cif, &a) }.to yield_with_args(reader)
+    end
+
+    it 'JSON format' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:fetch_unzipped)
+        .with('ntrod/CifFileAuthenticate?type=CIF_ALL_FULL_DAILY&day=toc-full')
+        .and_yield(reader)
+      expect { |a| subject.fetch_all_full(:json, &a) }.to yield_with_args(reader)
+    end
+
+    it 'Invalid format' do
+      expect { subject.fetch_all_full :invalid }
+        .to raise_error ArgumentError, 'format must be either :json or :cif'
+    end
+  end
+
+  describe '#fetch_all_update' do
+    it 'CIF format' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:fetch_unzipped)
+        .with('ntrod/CifFileAuthenticate?type=CIF_ALL_UPDATE_DAILY&day=toc-update-mon.CIF.gz')
+        .and_yield(reader)
+      expect { |a| subject.fetch_all_update('mon', :cif, &a) }.to yield_with_args(reader)
+    end
+
+    it 'JSON format' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:fetch_unzipped)
+        .with('ntrod/CifFileAuthenticate?type=CIF_ALL_UPDATE_DAILY&day=toc-update-tue')
+        .and_yield(reader)
+      expect { |a| subject.fetch_all_update('tue', :json, &a) }.to yield_with_args(reader)
+    end
+
+    it 'Invalid format' do
+      expect { subject.fetch_all_update 'wed', :invalid }
+        .to raise_error ArgumentError, 'format must be either :json or :cif'
+    end
+
+    it 'Invalid day' do
+      expect { subject.fetch_all_update 'BAD', :json }
+        .to raise_error ArgumentError, 'day is invalid'
+    end
+  end
+
+  it '#fetch_freight_full' do
+    expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+    expect(http_client).to receive(:fetch_unzipped)
+      .with('ntrod/CifFileAuthenticate?type=CIF_FREIGHT_FULL_DAILY&day=toc-full')
+      .and_yield(reader)
+    expect { |a| subject.fetch_freight_full(&a) }.to yield_with_args(reader)
+  end
+
+  describe '#fetch_freight_update' do
+    it 'Valid day' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:fetch_unzipped)
+        .with('ntrod/CifFileAuthenticate?type=CIF_FREIGHT_UPDATE_DAILY&day=toc-update-mon')
+        .and_yield(reader)
+      expect { |a| subject.fetch_freight_update('mon', &a) }.to yield_with_args(reader)
+    end
+
+    it 'Invalid day' do
+      expect { subject.fetch_freight_update('BAD') {} }
+        .to raise_error ArgumentError, 'day is invalid'
+    end
+  end
+
+  it '#fetch_toc_full' do
+    expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+    expect(http_client).to receive(:fetch_unzipped)
+      .with('ntrod/CifFileAuthenticate?type=CIF_TT_TOC_FULL_DAILY&day=toc-full')
+      .and_yield(reader)
+    expect { |a| subject.fetch_toc_full('TT', &a) }.to yield_with_args(reader)
+  end
+
+  describe '#fetch_toc_update' do
+    it 'Valid day' do
+      expect(RailFeeds::NetworkRail::HTTPClient).to receive(:new).and_return(http_client)
+      expect(http_client).to receive(:fetch_unzipped)
+        .with('ntrod/CifFileAuthenticate?type=CIF_TT_TOC_UPDATE_DAILY&day=toc-update-wed')
+        .and_yield(reader)
+      expect { |a| subject.fetch_toc_update('TT', 'wed', &a) }.to yield_with_args(reader)
+    end
+
+    it 'Invalid day' do
+      expect { subject.fetch_toc_update 'TT', 'BAD' }
+        .to raise_error ArgumentError, 'day is invalid'
+    end
+  end
+
+  describe '#fetch' do
+    it 'Passes credentials and logger to HTTP client' do
+      credentials = double RailFeeds::NetworkRail::Credentials
+      logger = double Logger
+      expect(RailFeeds::NetworkRail::HTTPClient)
+        .to receive(:new).with(credentials: credentials, logger: logger)
+                         .and_return(http_client)
+      expect(http_client).to receive(:fetch_unzipped).and_return(reader)
+      subject = described_class.new credentials: credentials, logger: logger
+      subject.send :fetch, 'toc', 'mon', :json
+    end
+
+    it 'CIF format request for non all schedule' do
+      expect { subject.send(:fetch, 'toc', 'mon', :cif) {} }
+        .to raise_error ArgumentError, 'CIF format is only available for the all schedule'
+    end
+  end
+end

data/spec/rail_feeds/network_rail/schedule/header/cif_spec.rb

@@ -0,0 +1,72 @@
+# frozen_string_literal: true
+
+describe RailFeeds::NetworkRail::Schedule::Header::CIF do
+  let(:line) do
+    +'HDa                   0102030405b      c      de060708091011                    '
+  end
+  subject { described_class.from_cif line }
+
+  describe 'Sets attributes' do
+    it(':file_identity') { expect(subject.file_identity).to eq 'a' }
+    it(':extracted_at') { expect(subject.extracted_at).to eq Time.new(2003, 2, 1, 4, 5, 0, 0) }
+    it(':current_file_reference') { expect(subject.current_file_reference).to eq 'b' }
+    it(':previous_file_reference') { expect(subject.previous_file_reference).to eq 'c' }
+    it(':update_indicator') { expect(subject.update_indicator).to eq 'd' }
+    it(':version') { expect(subject.version).to eq 'e' }
+    it(':start_date') { expect(subject.start_date).to eq Date.new(2008, 7, 6) }
+    it(':end_date') { expect(subject.end_date).to eq Date.new(2011, 10, 9) }
+  end
+
+  describe 'Helper methods' do
+    context 'A full extract' do
+      before(:each) { line[46] = 'F' }
+      it { should_not be_update }
+      it { should be_full }
+    end
+
+    context 'An update extract' do
+      before(:each) { line[46] = 'U' }
+      it { should be_update }
+      it { should_not be_full }
+    end
+  end
+
+  it '#to_cif' do
+    expect(subject.to_cif).to eq "#{line}\n"
+  end
+
+  describe '#hash' do
+    it 'Uses current_file_reference' do
+      expect(subject.hash).to eq 'b'
+    end
+  end
+
+  describe '#==' do
+    let(:header1) { described_class.new current_file_reference: 'a' }
+    let(:header2) { described_class.new current_file_reference: 'a' }
+
+    it 'Doesn\'t match' do
+      header1.current_file_reference = nil
+      expect(header1).to_not eq header2
+    end
+
+    it 'Matches' do
+      expect(header1).to eq header2
+    end
+
+    it 'Compares to nil without error' do
+      expect(header1).to_not eq nil
+    end
+  end
+
+  it '#to_s' do
+    expect(subject.to_s).to eq 'File "a" (version e) at ' \
+                               '2003-02-01 04:05. An update extract for ' \
+                               '2008-07-06 to 2011-10-09.'
+  end
+
+  it 'Fails to initalize from invalid line' do
+    expect { described_class.from_cif('bad line') }
+      .to raise_error ArgumentError, "Invalid line:\nbad line"
+  end
+end

data/spec/rail_feeds/network_rail/schedule/header/json_spec.rb

@@ -0,0 +1,51 @@
+# frozen_string_literal: true
+
+describe RailFeeds::NetworkRail::Schedule::Header::JSON do
+  subject { described_class.new sequence: 2200 }
+
+  it '::from_json' do
+    subject = described_class.from_json(
+      '{"JsonTimetableV1":{"timestamp":1529712268,"Metadata":{"sequence":2200}}}'
+    )
+
+    expect(subject.extracted_at).to eq Time.new(2018, 6, 23, 0, 4, 28, 0)
+    expect(subject.sequence).to eq 2200
+    expect(subject.start_date).to eq Date.new 2018, 6, 22
+  end
+
+  it '#to_json' do
+    expect(subject.to_json).to eq '{"JsonTimetableV1":{"classification":"public","time' \
+                                  'stamp":0,"owner":"Network Rail","Sender":{"organisa' \
+                                  'tion":"","application":"NTROD","component":"SCHEDUL' \
+                                  'E"},"Metadata":{"type":"full","sequence":2200}}}'
+  end
+
+  describe '#hash' do
+    it 'Uses sequence' do
+      expect(subject.hash).to eq 2200
+    end
+  end
+
+  describe '#<=>' do
+    let(:header1) { described_class.new sequence: 1 }
+    let(:header2) { described_class.new sequence: 1 }
+
+    it 'Doesn\'t match' do
+      header2.sequence = 2
+      expect(header1.<=>(header2)).to eq(-1)
+      expect(header2.<=>(header1)).to eq 1
+    end
+
+    it 'Matches' do
+      expect(header1.<=>(header2)).to eq 0
+    end
+
+    it 'Compares to nil without error' do
+      expect { header1 <=> nil }.to_not raise_error
+    end
+  end
+
+  it '#to_s' do
+    expect(subject.to_s).to eq 'Sequence 2200, proabbly from 2018-06-22.'
+  end
+end