southeastern-daily-performance 0.0.1

data/lib/sedpr.rb

@@ -0,0 +1,3 @@
+$: << File.join(File.dirname(__FILE__), 'sedpr')
+
+require 'daily_performance_report'

data/lib/sedpr/affected_service.rb

@@ -0,0 +1,41 @@
+class AffectedService
+  
+  attr_reader :reason_for_disruption
+  attr_reader :scheduled_start_time, :scheduled_start_station, :scheduled_destination_station
+  attr_reader :effect_on_service
+  
+  def initialize(reason_for_disruption, incident_text)
+    @reason_for_disruption = reason_for_disruption
+    if incident_text =~ /(\d\d:\d\d) (.*?) ?(?:-|to|\?) (.*)/
+      @scheduled_start_time, @scheduled_start_station = $1, $2
+      destination_and_effect_on_service = $3
+      @scheduled_start_station.gsub!(/[^a-zA-Z ]/, '')
+      reasons = [
+        'cancelled', 'started', 'delayed by', 'did not call', 'terminated at', 'diverted'
+      ]
+      matches = reasons.collect do |reason|
+        destination_and_effect_on_service =~ /#{reason}/
+      end
+      if matches.compact.min && reason = reasons[matches.index(matches.compact.min)]
+        destination_and_effect_on_service =~ /(.*) (#{reason}.*)/
+      else
+        unless destination_and_effect_on_service.split(' ').length == 1
+          warn "Warning. Unknown, or missing, affect on service: '#{incident_text}'"
+        end
+        destination_and_effect_on_service =~ /(.*)/
+      end
+      @scheduled_destination_station, @effect_on_service = $1, ($2||'')
+    else
+      warn "Warning. Cannot parse service details: '#{incident_text}'"
+    end
+  end
+  
+  def ==(incident)
+    self.reason_for_disruption         == incident.reason_for_disruption and
+    self.scheduled_start_time          == incident.scheduled_start_time and
+    self.scheduled_start_station       == incident.scheduled_start_station and
+    self.scheduled_destination_station == incident.scheduled_destination_station and
+    self.effect_on_service             == incident.effect_on_service
+  end
+  
+end

data/lib/sedpr/affected_services_report.rb

@@ -0,0 +1,28 @@
+require 'rubygems'
+require 'hpricot'
+require 'affected_service'
+
+class AffectedServicesReport
+  
+  def initialize(html)
+    html.gsub!(/ /, ' ')
+    @doc = Hpricot(html)
+  end
+  
+  def affected_services
+    @doc.search('*').collect do |elem|
+      if elem.text? and incident_text = elem.inner_text[/\d\d:\d\d.*/]
+        reason = find_previous_strong_element(elem).inner_text
+        AffectedService.new(reason.strip, incident_text.strip)
+      end
+    end.compact
+  end
+  
+  private
+  
+    def find_previous_strong_element(elem)
+      return elem if (elem.respond_to?(:name) and elem.name == 'strong')
+      find_previous_strong_element(elem.previous)
+    end
+  
+end

data/lib/sedpr/daily_performance_report.rb

@@ -0,0 +1,55 @@
+require 'rubygems'
+require 'hpricot'
+require 'affected_services_report'
+require 'csv'
+
+class DailyPerformanceReport
+  
+  def initialize(html)
+    @doc = Hpricot(html)
+  end
+  
+  def date
+    date = (@doc/'h1').inner_text
+    date.gsub!(/\?/, ' ')
+    if date =~ /(.+?) (\d+) (.+)/
+    elsif (@doc/'h2').inner_text =~ /(.+?) (\d+) (.+)/
+    end
+    day_name, day, month_name = $1, $2, $3
+    date = [day, month_name[0..2].downcase, '2010'].join('-')
+    Date.parse(date)
+  end
+  
+  def scheduled_services
+    report[/(\d+) train services were scheduled/, 1].to_i
+  end
+  
+  def actual_services
+    report[/of which (\d+) ran/, 1].to_i
+  end
+  
+  def services_within_five_minutes_of_schedule
+    report[/(\d+)% of services ran within 5 minutes of schedule/, 1].to_i
+  end
+  
+  def affected_services
+    AffectedServicesReport.new(report_container.inner_html).affected_services
+  end
+  
+  def to_csv
+    affected_services.collect do |service|
+      CSV.generate_line [date, service.reason_for_disruption, service.scheduled_start_time, service.scheduled_start_station, service.scheduled_destination_station, service.effect_on_service]
+    end.join("\n")
+  end
+  
+  private
+  
+    def report
+      report_container.inner_text
+    end
+    
+    def report_container
+      (@doc/'h1').first.parent.next_sibling
+    end
+    
+end

metadata

@@ -0,0 +1,62 @@
+--- !ruby/object:Gem::Specification 
+name: southeastern-daily-performance
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Chris Roos
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-02-05 00:00:00 +00:00
+default_executable: 
+dependencies: []
+
+description: 
+email: chris@seagul.co.uk
+executables: 
+- sedpr-to-csv
+extensions: []
+
+extra_rdoc_files: 
+- README
+files: 
+- README
+- Rakefile
+- combined.csv
+- lib/sedpr/affected_service.rb
+- lib/sedpr/affected_services_report.rb
+- lib/sedpr/daily_performance_report.rb
+- lib/sedpr.rb
+has_rdoc: true
+homepage: http://github.com/chrisroos/southeastern-daily-performance
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --main
+- README
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: southeastern-daily-performance
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: Converts Southeaster Daily Performance reports from HTML to CSV
+test_files: []
+