roker 0.0.0

data/roker

@@ -0,0 +1,42 @@
+#!/usr/bin/env ruby
+require File.dirname(__FILE__) + '/lib/roker'
+require 'ruby-debug'
+
+started_at  = Time.now.beginning_of_day + 1.day
+ended_at    = started_at.end_of_day
+lat         = 37.0625
+lng         = -95.677068
+
+ARGV.each do |a|
+  # puts "Argument: #{a}"
+end
+roker = Roker.new(:started_at => started_at, :ended_at => ended_at, :lat => lat, :lng => lng)
+
+weather_forecasts_attributes = roker.weather_forecasts_attributes
+
+forecast = "Roker says the forecast for #{started_at.strftime("%B %d, %Y")} is:\n"
+weather_forecasts_attributes.each do |wfa|
+  # wfa => {
+  #   :started_at=>Sat Dec 05 00:17:32 -0500 2009, 
+  #   :wind_speed=>7.0, 
+  #   :minimum_temperature=>21.0, 
+  #   :ended_at=>Sat Dec 05 03:17:32 -0500 2009, 
+  #   :wind_direction=>180.0, 
+  #   :temperature=>24.0, 
+  #   :cloud_cover=>0.0, 
+  #   :dewpoint_temperature=>12.0, 
+  #   :lat=>37.0625, 
+  #   :relative_humidity=>60.0, 
+  #   :liquid_precipitation=>0.0, 
+  #   :lng=>-95.677068, 
+  #   :maximum_temperature=>nil, 
+  #   :wave_height=>0.0, 
+  #   :probability_of_precipitation=>0.0
+  # }
+  temp  = wfa[:temperature].nan? ? '?' : wfa[:temperature].to_i.to_s
+  pop   = wfa[:probability_of_precipitation].nan? ? '?' : wfa[:probability_of_precipitation].to_i.to_s
+  forecast << wfa[:started_at].strftime("%I:%M%p") + "\t" + temp + " deg" + "\t" + pop + "% P.O.P."
+  forecast << "\n"
+end
+
+puts forecast

data/roker.gemspec

@@ -0,0 +1,75 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run the gemspec command
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{roker}
+  s.version = "0.0.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Greg Sterndale"]
+  s.date = %q{2009-12-05}
+  s.description = %q{Weather forecasts from weather.gov}
+  s.email = %q{gsterndale@gmail.com}
+  s.extra_rdoc_files = [
+    "LICENSE",
+     "README.rdoc"
+  ]
+  s.files = [
+    ".document",
+     ".gitignore",
+     "LICENSE",
+     "README.rdoc",
+     "Rakefile",
+     "VERSION",
+     "lib/numeric.rb",
+     "lib/roker.rb",
+     "lib/time.rb",
+     "lib/time_layout.rb",
+     "lib/time_span.rb",
+     "lib/weather_parameter.rb",
+     "roker",
+     "roker.gemspec",
+     "test/helper.rb",
+     "test/test_roker.rb",
+     "test/test_time.rb",
+     "test/test_time_layout.rb",
+     "test/test_time_span.rb",
+     "test/test_weather_parameter.rb",
+     "test/weather_xml.xml"
+  ]
+  s.homepage = %q{http://github.com/gsterndale/roker}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.5}
+  s.summary = %q{Weather forecasts from weather.gov}
+  s.test_files = [
+    "test/helper.rb",
+     "test/test_roker.rb",
+     "test/test_time.rb",
+     "test/test_time_layout.rb",
+     "test/test_time_span.rb",
+     "test/test_weather_parameter.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_development_dependency(%q<thoughtbot-shoulda>, [">= 0"])
+      s.add_development_dependency(%q<mocha>, [">= 0.9.1"])
+      s.add_development_dependency(%q<hpricot>, [">= 0.6.164"])
+    else
+      s.add_dependency(%q<thoughtbot-shoulda>, [">= 0"])
+      s.add_dependency(%q<mocha>, [">= 0.9.1"])
+      s.add_dependency(%q<hpricot>, [">= 0.6.164"])
+    end
+  else
+    s.add_dependency(%q<thoughtbot-shoulda>, [">= 0"])
+    s.add_dependency(%q<mocha>, [">= 0.9.1"])
+    s.add_dependency(%q<hpricot>, [">= 0.6.164"])
+  end
+end
+

data/test/helper.rb

@@ -0,0 +1,17 @@
+require 'rubygems'
+require 'test/unit'
+require 'ruby-debug'
+require 'shoulda'
+require 'mocha'
+
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+require 'roker'
+
+class Test::Unit::TestCase
+  
+  def stub_weather_service
+    Roker.any_instance.stubs(:weather_xml).returns(File.open(File.join(File.dirname(__FILE__), 'weather_xml.xml'), "r").read)
+  end
+  
+end

data/test/test_roker.rb

@@ -0,0 +1,94 @@
+require 'helper'
+
+class TestRoker < Test::Unit::TestCase
+  def setup
+    super
+    stub_weather_service
+  end
+  
+  context "roker attributes" do
+    setup do
+      @num_days = 2
+      @started_at = Time.mktime(2008, 11, 24, 4, 0, 0) # Time.parse("2008-11-24T04:00:00-05:00") #Time.now+3.days
+      @ended_at = @started_at+@num_days.days
+      @attributes = {:lat => 42, :lng => -81, :started_at => @started_at, :ended_at => @ended_at}
+    end
+    
+    context "a roker" do
+      setup { assert @roker = Roker.new(@attributes)}
+      
+      should "respond to lat" do
+        assert @roker.respond_to?(:lat)
+      end
+      should "respond to lng" do
+        assert @roker.respond_to?(:lng)
+      end
+      should "respond to started_at" do
+        assert @roker.respond_to?(:started_at)
+        assert_equal @started_at, @roker.started_at
+      end
+      should "respond to ended_at" do
+        assert @roker.respond_to?(:ended_at)
+        assert_equal @ended_at, @roker.ended_at
+      end
+      
+      context "weather_forecasts_attributes" do
+        setup { assert @weather_forecasts_attributes = @roker.weather_forecasts_attributes }
+        
+        should "weather_forecasts_attributes be array" do
+          assert @weather_forecasts_attributes.is_a?(Array)
+        end
+        
+        should "attributes have at least one item" do
+          assert !@weather_forecasts_attributes.empty?
+        end
+        
+        context "first weather forecast attributes" do
+          setup { assert @weather_forecast_attributes = @weather_forecasts_attributes.first }
+          should "have lat, lng, started_at, ended_at" do
+            assert_not_nil @weather_forecast_attributes[:lat]
+            assert_not_nil @weather_forecast_attributes[:lng]
+            assert_not_nil @weather_forecast_attributes[:started_at]
+            assert_not_nil @weather_forecast_attributes[:ended_at]
+          end
+          should "have weather attributes" do
+            # assert_not_nil @weather_forecast_attributes[:maximum_temperature]
+            assert_not_nil @weather_forecast_attributes[:minimum_temperature]
+            assert_not_nil @weather_forecast_attributes[:temperature]
+            assert_not_nil @weather_forecast_attributes[:dewpoint_temperature]
+            assert_not_nil @weather_forecast_attributes[:liquid_precipitation]
+            assert_not_nil @weather_forecast_attributes[:probability_of_precipitation]
+            assert_not_nil @weather_forecast_attributes[:wind_speed]
+            assert_not_nil @weather_forecast_attributes[:wind_direction]
+            assert_not_nil @weather_forecast_attributes[:cloud_cover]
+            assert_not_nil @weather_forecast_attributes[:relative_humidity]
+            assert_not_nil @weather_forecast_attributes[:wave_height]
+          end
+        end
+        
+      end
+      
+      should "have weather xml" do
+        assert_not_nil @roker.weather_xml # stubbed
+      end
+      
+      should "have weather doc" do
+        assert_not_nil @roker.weather_doc
+      end
+      
+      should "parse parameters" do
+        assert_not_nil @roker.parse_parameters
+      end
+      
+      should "parse parameters as hash" do
+        assert @roker.parse_parameters.is_a?(Hash)
+      end
+      
+      should "parameters not be empty?" do
+        assert !@roker.parse_parameters.empty?
+      end
+      
+    end
+  end
+  
+end

data/test/test_time.rb

@@ -0,0 +1,84 @@
+require 'helper'
+
+class TestTime < Test::Unit::TestCase
+  
+  context "a date time" do
+    setup do
+      @time = Time.mktime(1979, 3, 29, 14, 32, 40)
+      @bom  = Time.mktime(1979, 3, 29, 14, 32,  0)
+      @eom  = Time.mktime(1979, 3, 29, 14, 32, 59)
+      @boh  = Time.mktime(1979, 3, 29, 14,  0,  0)
+      @eoh  = Time.mktime(1979, 3, 29, 14, 59, 59)
+    end
+    should "beginning_of_minute be beginning of minute" do
+      assert_equal @bom, @time.beginning_of_minute
+    end
+    should "end_of_minute be end of minute" do
+      assert_equal @eom, @time.end_of_minute
+    end
+    should "beginning_of_hour be beginning of hour" do
+      assert_equal @boh, @time.beginning_of_hour
+    end
+    should "end_of_hour be end of hour" do
+      assert_equal @eoh, @time.end_of_hour
+    end
+    
+    should "beginning_of(1.minute) equal beginning_of_minute" do
+      assert_equal @time.beginning_of_minute, @time.beginning_of(1.minute)
+    end
+    should "beginning_of(1.hour) equal beginning_of_hour" do
+      assert_equal @time.beginning_of_hour, @time.beginning_of(1.hour)
+    end
+    should "beginning_of(1.day) equal beginning_of_day" do
+      assert_equal @time.beginning_of_day, @time.beginning_of(1.day)
+    end
+    should "beginning_of(1.week) equal beginning_of_week" do
+      assert_equal @time.beginning_of_week, @time.beginning_of(1.week)
+    end
+    should "beginning_of(1.month) equal beginning_of_month" do
+      assert_equal @time.beginning_of_month, @time.beginning_of(1.month)
+    end
+    should "beginning_of(1.year) equal beginning_of_year" do
+      assert_equal @time.beginning_of_year, @time.beginning_of(1.year)
+    end
+    should "end_of(1.minute) equal end_of_minute" do
+      assert_equal @time.end_of_minute, @time.end_of(1.minute)
+    end
+    should "end_of(1.hour) equal end_of_hour" do
+      assert_equal @time.end_of_hour, @time.end_of(1.hour)
+    end
+    should "end_of(1.day) equal end_of_day" do
+      assert_equal @time.end_of_day, @time.end_of(1.day)
+    end
+    should "end_of(1.week) equal end_of_week" do
+      assert_equal @time.end_of_week, @time.end_of(1.week)
+    end
+    should "end_of(1.month) equal end_of_month" do
+      assert_equal @time.end_of_month, @time.end_of(1.month)
+    end
+    should "end_of(1.year) equal end_of_year" do
+      assert_equal @time.end_of_year, @time.end_of(1.year)
+    end
+    
+    context "a time 1 day later and a one hour interval" do
+      setup do
+        @time2 = @time + 1.day
+        @interval = 1.hour
+      end
+      should "yield block 25 times on upto" do 
+        @time.expects(:foo).times(25).returns(1)
+        @time.upto(@time2, @interval) do 
+          @time.foo
+        end
+      end
+      should "yield block 24 times on upto not inclusive" do 
+        @time.expects(:foo).times(24).returns(1)
+        @time.upto(@time2, @interval, false) do 
+          @time.foo
+        end
+      end
+    end
+    
+  end
+  
+end

data/test/test_time_layout.rb

@@ -0,0 +1,155 @@
+require 'helper'
+
+class TestTimeLayout < Test::Unit::TestCase
+  context "a new TimeLayout passed a time spans" do
+    setup do
+      @interval   = 3.hours
+      @start_at   = Time.now+1.hour
+      @length = 4
+      @time_spans = []
+      (0..(@length-1)).each do |i|
+        @time_spans << TimeSpan.new(:start_at => @start_at+i*@interval, :duration => @interval)
+      end
+      @time_layout = TimeLayout.new(:time_spans => @time_spans)
+    end
+    
+    should "have time-spans" do
+      assert !@time_layout.time_spans.empty?
+    end
+    should "have a start_at equal to first time_span start_at" do
+      assert_equal @time_spans.first.start_at, @time_layout.start_at
+    end
+    should "have a end_at equal to last time_span end_at" do
+      assert_equal @time_spans.last.end_at, @time_layout.end_at
+    end
+    should "have a duration" do
+      assert_equal @length * @interval, @time_layout.duration
+    end
+    should "have an interval" do
+      assert_equal @interval, @time_layout.interval
+    end
+    should "have a length" do
+      assert_equal @length, @time_layout.length
+    end
+    
+    should "find second time span when using bracket access with 1 as index" do
+      assert_equal @time_spans[1], @time_layout[1]
+    end
+    
+    should "find index_at of 2 for specified time enveloped by third time span" do
+      assert_equal 2, @time_layout.index_at(@time_spans[2].start_at+@interval/2)
+    end
+    
+    should "find index_at of 2 for specified time when second time span ends and third time span starts" do
+      assert_equal @time_spans[2].start_at, @time_spans[1].end_at
+      assert_equal 2, @time_layout.index_at(@time_spans[2].start_at)
+    end
+    
+    should "find index_at of nil for specified time outside time layout" do
+      assert_nil @time_layout.index_at(@start_at - 1.hour)
+    end
+    
+    should "have indices_enveloping of [1,2], [0.5, 1.0, 0.5] for time span overlapping second, third and fourth @time_spans" do
+      assert_equal [[1,2,3], [0.5, 1.0, 0.5]], @time_layout.indices_enveloping(TimeSpan.new(:start_at => @time_spans[1].start_at+@interval/2, :end_at => @time_spans[3].end_at-@interval/2))
+    end
+  end
+  
+  context "a new TimeLayout passed start_at and end_at arrays" do
+    setup do
+      @interval   = 3.hours
+      @start_at   = Time.now+1.hour
+      @length     = 4
+      @start_ats  = []
+      @end_ats    = []
+      (0..(@length-1)).each do |i|
+        @start_ats << @start_at+i*@interval
+        @end_ats   << @start_at+(i+1)*@interval
+      end
+      @time_layout = TimeLayout.new(:start_at => @start_ats, :end_at => @end_ats)
+    end
+    
+    should "have time_spans" do
+      assert !@time_layout.time_spans.empty?
+    end
+    should "have a start_at equal to first start_at" do
+      assert_equal @start_ats.first, @time_layout.start_at
+    end
+    should "have a end_at equal to last end_at" do
+      assert_equal @end_ats.last, @time_layout.end_at
+    end
+    should "have a duration" do
+      assert_equal @length * @interval, @time_layout.duration
+    end
+    should "have an interval" do
+      assert_equal @interval, @time_layout.interval
+    end
+    should "have a length" do
+      assert_equal @length, @time_layout.length
+    end
+  end
+  
+  
+  context "a new TimeLayout passed start_at array only" do
+    setup do
+      @interval   = 2.days
+      @start_at   = Time.now+1.hour
+      @length     = 4
+      @start_ats  = []
+      (0..(@length-1)).each do |i|
+        @start_ats << @start_at+i*@interval
+      end
+      @time_layout = TimeLayout.new(:start_at => @start_ats)
+    end
+    
+    should "have interval of difference between start_ats" do
+      assert_equal @start_ats[1] - @start_ats[0], @time_layout.interval
+    end
+    should "have time_spans" do
+      assert !@time_layout.time_spans.empty?
+    end
+    should "have a start_at equal to first start_at" do
+      assert_equal @start_ats.first, @time_layout.start_at
+    end
+    should "have a end_at equal to last end_at" do
+      assert_equal @start_ats.last+@interval, @time_layout.end_at
+    end
+    should "have a duration" do
+      assert_equal @length * @interval, @time_layout.duration
+    end
+    should "have a length" do
+      assert_equal @length, @time_layout.length
+    end
+  end
+  
+  context "a new TimeLayout passed start_at array with one element only" do
+    setup do
+      @interval   = 2.days
+      @start_at   = Time.now+1.hour
+      @length     = 1
+      @start_ats  = []
+      (0..(@length-1)).each do |i|
+        @start_ats << @start_at+i*@interval
+      end
+      @time_layout = TimeLayout.new(:start_at => @start_ats)
+    end
+    
+    should "have default interval" do
+      assert_equal TimeLayout::DEFAULT_INTERVAL, @time_layout.interval
+    end
+    should "have time_spans" do
+      assert !@time_layout.time_spans.empty?
+    end
+    should "have a start_at equal to first start_at" do
+      assert_equal @start_ats.first, @time_layout.start_at
+    end
+    should "have a end_at equal to last end_at" do
+      assert_equal @start_ats.last+TimeLayout::DEFAULT_INTERVAL, @time_layout.end_at
+    end
+    should "have a duration" do
+      assert_equal @length * TimeLayout::DEFAULT_INTERVAL, @time_layout.duration
+    end
+    should "have a length" do
+      assert_equal @length, @time_layout.length
+    end
+  end
+end

data/test/test_time_span.rb

@@ -0,0 +1,91 @@
+require 'helper'
+
+class TestTimeSpan < Test::Unit::TestCase
+  context "a new TimeSpan passed a start_at and end_at" do
+    setup do
+      @start_at = Time.now+1.hour
+      @duration = 3.hours
+      @end_at = @start_at+@duration
+      @time_span = TimeSpan.new(:start_at => @start_at, :end_at => @end_at)
+    end
+    should "have a start_at" do
+      assert_equal @start_at, @time_span.start_at
+    end
+    should "have a end_at" do
+      assert_equal @end_at, @time_span.end_at
+    end
+    should "have a duration" do
+      assert_equal @end_at - @start_at, @time_span.duration
+    end
+    
+    should "envelopes? @start_at" do
+      assert @time_span.envelopes?(@start_at)
+    end
+    
+    should "envelopes? @end_at" do
+      assert @time_span.envelopes?(@end_at)
+    end
+    
+    should "envelopes? @end_at when include_end param specified as true" do
+      assert @time_span.envelopes?(@end_at, true)
+    end
+    
+    should "not envelopes? @end_at when include_end param specified as false" do
+      assert !@time_span.envelopes?(@end_at, false)
+    end
+    
+    should "not envelopes? prior time" do
+      assert !@time_span.envelopes?(@start_at - 1.hour)
+    end
+    
+    should "not envelopes? later time" do
+      assert !@time_span.envelopes?(@end_at + 1.hour)
+    end
+    
+    should "overlaps? another TimeSpan that happens during @time_span" do
+      assert @time_span.overlaps?(TimeSpan.new(:start_at => @start_at+1, :end_at => @end_at-1))
+    end
+    
+    should "overlaps? another TimeSpan that starts during @time_span, but ends after" do
+      assert @time_span.overlaps?(TimeSpan.new(:start_at => @start_at+1, :end_at => @end_at+1))
+    end
+    
+    should "overlaps? another TimeSpan that starts before @time_span and ends during" do
+      assert @time_span.overlaps?(TimeSpan.new(:start_at => @start_at-1, :end_at => @end_at-1))
+    end
+    
+    should "overlaps? another TimeSpan that starts before @time_span and ends after" do
+      assert @time_span.overlaps?(TimeSpan.new(:start_at => @start_at-1, :end_at => @end_at+1))
+    end
+    
+    should "overlaps? another TimeSpan that abutts @time_span" do
+      assert @time_span.overlaps?(TimeSpan.new(:start_at => @end_at, :end_at => @end_at+10))
+    end
+    
+    should "not overlaps? another TimeSpan that abutts @time_span afterward when include_end param specified as false" do
+      assert !@time_span.overlaps?(TimeSpan.new(:start_at => @end_at, :end_at => @end_at+10), false)
+    end
+    
+    should "not overlaps? another TimeSpan that abutts @time_span beforehand when include_end param specified as false" do
+      assert !@time_span.overlaps?(TimeSpan.new(:start_at => @start_at-10, :end_at => @start_at), false)
+    end
+    
+    should "not overlaps? another TimeSpan that happens before @time_span" do
+      assert !@time_span.overlaps?(TimeSpan.new(:start_at => @start_at-10, :end_at => @start_at-5))
+    end
+    
+    should "not overlaps? another TimeSpan that happens after @time_span" do
+      assert !@time_span.overlaps?(TimeSpan.new(:start_at => @end_at+10, :end_at => @end_at+50))
+    end
+    
+    should "have overlap of @duration/2 with another TimeSpan that starts halfway through @time_span and ends after" do
+      assert_equal @duration/2, @time_span.overlap(TimeSpan.new(:start_at => @start_at+@duration/2, :end_at => @end_at+@duration*2))
+    end
+    
+    should "have overlap_by of 0.5 with another TimeSpan that starts halfway through @time_span and ends after" do
+      assert_equal 0.5, @time_span.overlap_by(TimeSpan.new(:start_at => @start_at+@duration/2, :end_at => @end_at+@duration*2))
+    end
+    
+    should_eventually "enveloped_by?"
+  end
+end