fonecal 0.1.0 → 0.3.0

data/spec/belgian_gp_spec.rb

@@ -0,0 +1,31 @@
+require 'fonecal'
+
+describe Fonecal::GrandPrix do
+  describe "Getting Belgian GP info" do
+    let(:belgianGP) { Fonecal::GrandPrix.new("http://www.formula1.com/races/in_detail/belgium_927/circuit_diagram.html") }
+
+    it "should have the correct race title" do
+      belgianGP.raceTitle.should eql "2014 Formula 1 Shell Belgian Grand Prix"
+    end
+
+    it "should get a country" do
+      belgianGP.country.should eql "Belgium"
+    end
+
+    it "has location object" do
+      belgianGP.location.should_not be_nil
+    end
+
+    describe "its events" do
+      describe "Practice 1" do
+        it "should have the right name" do
+          belgianGP.events.first.name.should eql "Practice 1"
+        end
+
+        it "should have the correct start time" do
+          belgianGP.events.first.start.should eql Time.new(2014, 8, 22, 10, 0, 0, '+02:00')
+        end
+      end
+    end
+  end
+end

data/spec/brazilian_gp_spec.rb

@@ -0,0 +1,166 @@
+require 'fonecal'
+require 'active_support/time'
+
+describe Fonecal::GrandPrix do
+  describe "Brazillian GP" do
+    subject(:brazilianGP) { Fonecal::GrandPrix.new('http://www.formula1.com/races/in_detail/brazil_935/circuit_diagram.html') }
+
+    it "should have the correct race title" do
+      expect(brazilianGP.raceTitle).to eql "Formula 1 Grande Premio Petrobras Do Brasil 2014"
+    end 
+
+    it "should be in Brazil" do
+      expect(brazilianGP.country).to eql "Brazil"
+    end
+
+    it "should be in Montreal" do
+      expect(brazilianGP.city).to eql "São Paulo"
+    end
+
+    it "should be in the BRT timezone" do
+      expect(brazilianGP.timezone.zone).to eql "America/Sao_Paulo"
+    end
+
+    it "should have 5 events" do
+      expect(brazilianGP.events.count).to eql 5
+    end
+
+    context "practice 1" do
+      subject(:p1) { brazilianGP.events.first }
+
+      it "should be of type Practice" do
+        expect(p1.class).to eql Fonecal::Practice
+      end
+
+      it "should start at 10:00 BRT on friday" do
+        Time.zone = brazilianGP.timezone.zone
+        expect(p1.start).to eql Time.zone.local(2014, 11, 7, 10, 0, 0)
+      end
+
+      it "should start at 13:00 CET on friday" do
+        Time.zone = 'Europe/Copenhagen'
+        expect(p1.start).to eql Time.zone.local(2014, 11, 7, 13, 0, 0)
+      end
+
+      #it "should end at 11:30 BRT on friday" do
+      #  Time.zone = brazilianGP.timezone.zone
+      #  expect(p1.end).to eql Time.zone.local(2014, 11, 7, 11, 30, 0)
+      #end
+
+      #it "should end at 14:30 CET on friday" do
+      #  Time.zone = 'Europe/Copenhagen'
+      #  expect(p1.end).to eql Time.zone.local(2014, 11, 7, 14, 30, 0)
+      #end
+    end
+
+    #context "practice 2" do
+    #  subject(:p2) { brazilianGP.events[1] }
+
+    #  it "should be of type Practice" do
+    #    expect(p2.class).to eql Fonecal::Practice
+    #  end
+
+    #  it "should start at 14:00 BRT on friday" do
+    #    Time.zone = brazilianGP.timezone.zone
+    #    expect(p2.start).to eql Time.zone.local(2014, 11, 7, 14, 0, 0)
+    #  end
+
+    #  it "should start at 17:00 CET on friday" do
+    #    Time.zone = 'Europe/Copenhagen'
+    #    expect(p2.start).to eql Time.zone.local(2014, 11, 7, 17, 0, 0)
+    #  end
+
+    #  it "should end at 15:30 BRT on friday" do
+    #    Time.zone = brazilianGP.timezone.zone
+    #    expect(p2.end).to eql Time.zone.local(2014, 11, 7, 15, 30, 0)
+    #  end
+    #  it "should end at 18:30 CET on friday" do
+    #    Time.zone = 'Europe/Copenhagen'
+    #    expect(p2.end).to eql Time.zone.local(2014, 11, 7, 18, 30, 0)
+    #  end
+    #end
+
+    #context "practice 3" do
+    #  subject(:p3) { brazilianGP.events[2] }
+
+    #  it "should be of type Practice" do
+    #    expect(p3.class).to eql Fonecal::Practice
+    #  end
+
+    #  it "should start at 14:00 BRT on saturday" do
+    #    Time.zone = brazilianGP.timezone.zone
+    #    expect(p3.start).to eql Time.zone.local(2014, 11, 8, 14, 0, 0)
+    #  end
+
+    #  it "should start at 16:00 CET on saturday" do
+    #    Time.zone = 'Europe/Copenhagen'
+    #    expect(p3.start).to eql Time.zone.local(2014, 11, 8, 11, 0, 0)
+    #  end
+
+    #  it "should end at 17:00 BRT on saturday" do
+    #    Time.zone = brazilianGP.timezone.zone
+    #    expect(p3.end).to eql Time.zone.local(2014, 11, 8, 15, 0, 0)
+    #  end
+
+    #  it "should end at 17:00 CET on saturday" do
+    #    Time.zone = 'Europe/Copenhagen'
+    #    expect(p3.end).to eql Time.zone.local(2014, 11, 8, 12, 0, 0)
+    #  end
+    #end
+
+    #context "qualifying" do
+    #  subject(:q) { brazilianGP.events[3] }
+
+    #  it "should be of type Practice" do
+    #    expect(q.class).to eql Fonecal::Qualifying
+    #  end
+
+    #  it "should start at 14:00 BRT on saturday" do
+    #    Time.zone = brazilianGP.timezone.zone
+    #    expect(q.start).to eql Time.zone.local(2014, 11, 8, 14, 0, 0)
+    #  end
+
+    #  it "should start at 17:00 CET on saturday" do
+    #    Time.zone = 'Europe/Copenhagen'
+    #    expect(q.start).to eql Time.zone.local(2014, 11, 8, 17, 0, 0)
+    #  end
+
+    #  it "should end at 15:30 BRT on saturday" do
+    #    Time.zone = brazilianGP.timezone.zone
+    #    expect(q.end).to eql Time.zone.local(2014, 11, 8, 15, 30, 0)
+    #  end
+
+    #  it "should end at 18:30 CET on saturday" do
+    #    Time.zone = 'Europe/Copenhagen'
+    #    expect(q.end).to eql Time.zone.local(2014, 11, 8, 18, 30, 0)
+    #  end
+    #end
+
+    #context "race" do
+    #  subject(:race) { brazilianGP.events.last }
+
+    #  it "should be of type Race" do
+    #    expect(race.class).to eql Fonecal::Race
+    #  end
+
+    #  it "should start at 14:00 BRT on sunday" do
+    #    Time.zone = brazilianGP.timezone.zone
+    #    expect(race.start).to eql Time.zone.local(2014, 11, 9, 14, 0, 0)
+    #  end
+    #  it "should start at 17:00 CST on sunday" do
+    #    Time.zone = 'Europe/Copenhagen'
+    #    expect(race.start).to eql Time.zone.local(2014, 11, 9, 17, 0, 0)
+    #  end
+
+    #  it "should end at 18:00 BRT on sunday" do
+    #    Time.zone = brazilianGP.timezone.zone
+    #    expect(race.end).to eql Time.zone.local(2014, 11, 9, 18, 0, 0)
+    #  end
+
+    #  it "should start at 21:00 CET on sunday" do
+    #    Time.zone = 'Europe/Copenhagen'
+    #    expect(race.end).to eql Time.zone.local(2014, 11, 9, 21, 0, 0)
+    #  end
+    #end
+  end
+end

data/spec/canadian_gp_spec.rb

@@ -0,0 +1,122 @@
+require 'fonecal'
+
+describe Fonecal::GrandPrix do
+  describe "Canadian GP" do
+    subject(:canadianGP) { Fonecal::GrandPrix.new('http://www.formula1.com/races/in_detail/canada_922/circuit_diagram.html') }
+
+    it "should have the correct race title" do
+      expect(canadianGP.raceTitle).to eql "Formula 1 Grand Prix Du Canada 2014"
+    end 
+
+    it "should be in Canada" do
+      expect(canadianGP.country).to eql "Canada"
+    end
+
+    it "should be in Montreal" do
+      #expect(canadianGP.city).to eql "Montreal"
+    end
+
+    it "should be in the EST timezone" do
+      estTS = Timezone::Zone.new(zone: "EST")
+      montrealTS = Timezone::Zone.new(zone: "America/Montreal")
+      now = Time.now
+
+      #expect(canadianGP.timezone.time(now).to_i).to eq estTS.time(now).to_i
+      expect(canadianGP.timezone.time(now).to_i).to eq montrealTS.time(now).to_i
+    end
+
+    it "should have 5 events" do
+      expect(canadianGP.events.count).to eql 5
+    end
+
+    context "practice 1" do
+      subject(:p1) { canadianGP.events.first }
+
+      it "should be of type Practice" do
+        expect(p1.class).to eql Fonecal::Practice
+      end
+
+      it "should start at 16:00 CET on friday" do
+        expect(p1.start).to eql Time.new(2014, 6, 6, 16, 0, 0, '+02:00')
+        expect(p1.start).to eql Time.new(2014, 6, 6, 10, 0, 0, '-04:00')
+      end
+
+      it "should end at 17:30 CET on friday" do
+        expect(p1.end).to eql Time.new(2014, 6, 6, 17, 30, 0, '+02:00')
+        expect(p1.end).to eql Time.new(2014, 6, 6, 11, 30, 0, '-04:00')
+      end
+    end
+
+    context "practice 2" do
+      subject(:p2) { canadianGP.events[1] }
+
+      it "should be of type Practice" do
+        expect(p2.class).to eql Fonecal::Practice
+      end
+
+      it "should start at 20:00 on friday" do
+        expect(p2.start).to eql Time.new(2014, 6, 6, 20, 0, 0, '+02:00')
+        expect(p2.start).to eql Time.new(2014, 6, 6, 14, 0, 0, '-04:00')
+      end
+
+      it "should end at 21:30 on friday" do
+        expect(p2.end).to eql Time.new(2014, 6, 6, 21, 30, 0, '+02:00')
+        expect(p2.end).to eql Time.new(2014, 6, 6, 15, 30, 0, '-04:00')
+      end
+    end
+
+    context "practice 3" do
+      subject(:p3) { canadianGP.events[2] }
+
+      it "should be of type Practice" do
+        expect(p3.class).to eql Fonecal::Practice
+      end
+
+      it "should start at 16:00 on saturday" do
+        expect(p3.start).to eql Time.new(2014, 6, 7, 16, 0, 0, '+02:00')
+        expect(p3.start).to eql Time.new(2014, 6, 7, 10, 0, 0, '-04:00')
+      end
+
+      it "should end at 17:00 on saturday" do
+        expect(p3.end).to eql Time.new(2014, 6, 7, 17, 0, 0, '+02:00')
+        expect(p3.end).to eql Time.new(2014, 6, 7, 11, 0, 0, '-04:00')
+      end
+    end
+
+    context "qualifying" do
+      subject(:q) { canadianGP.events[3] }
+
+      it "should be of type Practice" do
+        expect(q.class).to eql Fonecal::Qualifying
+      end
+
+      it "should start at 19:00 on saturday" do
+        expect(q.start).to eql Time.new(2014, 6, 7, 19, 0, 0, '+02:00')
+        expect(q.start).to eql Time.new(2014, 6, 7, 13, 0, 0, '-04:00')
+      end
+
+      it "should end at 20:30 on saturday" do
+        expect(q.end).to eql Time.new(2014, 6, 7, 20, 30, 0, '+02:00')
+        expect(q.end).to eql Time.new(2014, 6, 7, 14, 30, 0, '-04:00')
+      end
+    end
+
+    context "race" do
+      subject(:race) { canadianGP.events[4] }
+
+      it "should be of type Practice" do
+        expect(race.class).to eql Fonecal::Race
+      end
+
+      it "should start at 20:00 on sunday" do
+        expect(race.start).to eql Time.new(2014, 6, 8, 20, 0, 0, '+02:00')
+        expect(race.start).to eql Time.new(2014, 6, 8, 14, 0, 0, '-04:00')
+      end
+
+      it "should end at 24:00 on sunday" do
+        expect(race.end).to eql Time.new(2014, 6, 8, 24, 0, 0, '+02:00')
+        expect(race.end).to eql Time.new(2014, 6, 8, 18, 0, 0, '-04:00')
+      end
+    end
+  end
+end

data/spec/fonecal_spec.rb

@@ -1,8 +1,6 @@
-require 'fonecal'
-
-describe Fonecal do
-  describe "#create_ical" do
-    it "creates the file" do
+module Fonecal
+  describe Fonecal::Fonecal do
+    it "creates an icalendar file" do
       Fonecal.create_ical
     end
   end

data/spec/grand_prix_spec.rb

@@ -1,31 +1,260 @@
 require 'fonecal'
 
 describe Fonecal::GrandPrix do
-  describe "Getting Belgian GP info" do
-    let(:belgianGP) { Fonecal::GrandPrix.new("http://www.formula1.com/races/in_detail/belgium_927/circuit_diagram.html") }
+
+  describe "Canadian GP" do
+    subject(:canadianGP) { Fonecal::GrandPrix.new('http://www.formula1.com/races/in_detail/canada_922/circuit_diagram.html') }
 
     it "should have the correct race title" do
-      belgianGP.raceTitle.should eql "2014 Formula 1 Shell Belgian Grand Prix"
+      expect(canadianGP.raceTitle).to eql "Formula 1 Grand Prix Du Canada 2014"
+    end 
+
+    it "should be in Canada" do
+      expect(canadianGP.country).to eql "Canada"
+    end
+
+    it "should be in Montreal" do
+      #expect(canadianGP.city).to eql "Montreal"
+    end
+
+    it "should be in the EST timezone" do
+      estTS = Timezone::Zone.new(zone: "EST")
+      montrealTS = Timezone::Zone.new(zone: "America/Montreal")
+      now = Time.now
+
+      #expect(canadianGP.timezone.time(now).to_i).to eq estTS.time(now).to_i
+      expect(canadianGP.timezone.time(now).to_i).to eq montrealTS.time(now).to_i
     end
 
-    it "should get a country" do
-      belgianGP.country.should eql "Belgium"
+    it "should have 5 events" do
+      expect(canadianGP.events.count).to eql 5
     end
 
-    it "has location object" do
-      belgianGP.location.should_not be_nil
+    context "practice 1" do
+      subject(:p1) { canadianGP.events.first }
+
+      it "should be of type Practice" do
+        expect(p1.class).to eql Fonecal::Practice
+      end
+
+      it "should start at 16:00 CET on friday" do
+        expect(p1.start).to eql Time.new(2014, 6, 6, 16, 0, 0, '+02:00')
+        expect(p1.start).to eql Time.new(2014, 6, 6, 10, 0, 0, '-04:00')
+      end
+
+      it "should end at 17:30 CET on friday" do
+        expect(p1.end).to eql Time.new(2014, 6, 6, 17, 30, 0, '+02:00')
+        expect(p1.end).to eql Time.new(2014, 6, 6, 11, 30, 0, '-04:00')
+      end
+    end
+
+    context "practice 2" do
+      subject(:p2) { canadianGP.events[1] }
+
+      it "should be of type Practice" do
+        expect(p2.class).to eql Fonecal::Practice
+      end
+
+      it "should start at 20:00 on friday" do
+        expect(p2.start).to eql Time.new(2014, 6, 6, 20, 0, 0, '+02:00')
+        expect(p2.start).to eql Time.new(2014, 6, 6, 14, 0, 0, '-04:00')
+      end
+
+      it "should end at 21:30 on friday" do
+        expect(p2.end).to eql Time.new(2014, 6, 6, 21, 30, 0, '+02:00')
+        expect(p2.end).to eql Time.new(2014, 6, 6, 15, 30, 0, '-04:00')
+      end
+    end
+
+    context "practice 3" do
+      subject(:p3) { canadianGP.events[2] }
+
+      it "should be of type Practice" do
+        expect(p3.class).to eql Fonecal::Practice
+      end
+
+      it "should start at 16:00 on saturday" do
+        expect(p3.start).to eql Time.new(2014, 6, 7, 16, 0, 0, '+02:00')
+        expect(p3.start).to eql Time.new(2014, 6, 7, 10, 0, 0, '-04:00')
+      end
+
+      it "should end at 17:00 on saturday" do
+        expect(p3.end).to eql Time.new(2014, 6, 7, 17, 0, 0, '+02:00')
+        expect(p3.end).to eql Time.new(2014, 6, 7, 11, 0, 0, '-04:00')
+      end
+    end
+
+    context "qualifying" do
+      subject(:q) { canadianGP.events[3] }
+
+      it "should be of type Practice" do
+        expect(q.class).to eql Fonecal::Qualifying
+      end
+
+      it "should start at 19:00 on saturday" do
+        expect(q.start).to eql Time.new(2014, 6, 7, 19, 0, 0, '+02:00')
+        expect(q.start).to eql Time.new(2014, 6, 7, 13, 0, 0, '-04:00')
+      end
+
+      it "should end at 20:30 on saturday" do
+        expect(q.end).to eql Time.new(2014, 6, 7, 20, 30, 0, '+02:00')
+        expect(q.end).to eql Time.new(2014, 6, 7, 14, 30, 0, '-04:00')
+      end
     end
 
-    describe "its events" do
-      describe "Practice 1" do
-        it "should have the right name" do
-          belgianGP.events.first.name.should eql "Practice 1"
-        end
+    context "race" do
+      subject(:race) { canadianGP.events[4] }
 
-        it "should have the correct start time" do
-          belgianGP.events.first.start.should eql DateTime.new(2014, 8, 22, 10, 0, 0, '+1')
-        end
+      it "should be of type Practice" do
+        expect(race.class).to eql Fonecal::Race
+      end
+
+      it "should start at 20:00 on sunday" do
+        expect(race.start).to eql Time.new(2014, 6, 8, 20, 0, 0, '+02:00')
+        expect(race.start).to eql Time.new(2014, 6, 8, 14, 0, 0, '-04:00')
+      end
+
+      it "should end at 24:00 on sunday" do
+        expect(race.end).to eql Time.new(2014, 6, 8, 24, 0, 0, '+02:00')
+        expect(race.end).to eql Time.new(2014, 6, 8, 18, 0, 0, '-04:00')
       end
     end
   end
+
+  #describe "Hungarian GP" do
+  #  subject(:hungarianGP) { Fonecal::GrandPrix.new('http://www.formula1.com/races/in_detail/hungary_926/circuit_diagram.html') }
+
+  #  it "should have the correct race title" do
+  #    expect(hungarianGP.raceTitle).to eql "Formula 1 Pirelli Magyar Nagydíj 2014"
+  #  end 
+
+  #    it "should be in Hungary" do
+  #      expect(hungarianGP.country).to eql "Hungary"
+  #    end
+
+  #    it "should be in Budapest" do
+  #      expect(hungarianGP.city).to eql "Budapest"
+  #    end
+
+  #    it "should be in the CET timezone" do
+  #      cetTS = Timezone::Zone.new(zone: "CET")
+  #      budapestTS = Timezone::Zone.new(zone: "Europe/Budapest")
+
+  #      expect(hungarianGP.timezone.time(Time.now).to_i).to eq cetTS.time(Time.now).to_i
+  #      expect(hungarianGP.timezone.time(Time.now).to_i).to eq budapestTS.time(Time.now).to_i
+  #    end
+
+  #    it "should have 5 events" do
+  #      expect(hungarianGP.events.count).to eql 5
+  #    end
+
+  #    context "practice 1" do
+  #      subject(:p1) { hungarianGP.events.first }
+
+  #      it "should be of type Practice" do
+  #        expect(p1.class).to eql Fonecal::Practice
+  #      end
+
+  #      it "should start at 10:00 on friday" do
+  #        expect(p1.start).to eql Time.new(2014, 7, 25, 10, 0, 0, '+02:00')
+  #      end
+
+  #      it "should end at 11:30 on friday" do
+  #        expect(p1.end).to eql Time.new(2014, 7, 25, 11, 30, 0, '+02:00')
+  #      end
+  #    end
+
+  #    context "practice 2" do
+  #      subject(:p2) { hungarianGP.events[1] }
+
+  #      it "should be of type Practice" do
+  #        expect(p2.class).to eql Fonecal::Practice
+  #      end
+
+  #      it "should start at 14:00 on friday" do
+  #        expect(p2.start).to eql Time.new(2014, 7, 25, 14, 0, 0, '+02:00')
+  #      end
+
+  #      it "should end at 15:30 on friday" do
+  #        expect(p2.end).to eql Time.new(2014, 7, 25, 15, 30, 0, '+02:00')
+  #      end
+  #    end
+
+  #    context "practice 3" do
+  #      subject(:p3) { hungarianGP.events[2] }
+
+  #      it "should be of type Practice" do
+  #        expect(p3.class).to eql Fonecal::Practice
+  #      end
+
+  #      it "should start at 10:00 on saturday" do
+  #        expect(p3.start).to eql Time.new(2014, 7, 26, 11, 0, 0, '+02:00')
+  #      end
+
+  #      it "should end at 11:30 on saturday" do
+  #        expect(p3.end).to eql Time.new(2014, 7, 26, 12, 0, 0, '+02:00')
+  #      end
+  #    end
+  #  
+  #  context "qualifying" do
+  #    subject(:q) { hungarianGP.events[3] }
+
+  #    it "should be of type Practice" do
+  #      expect(q.class).to eql Fonecal::Qualifying
+  #    end
+
+  #    it "should start at 14:00 on saturday" do
+  #      expect(q.start).to eql Time.new(2014, 7, 26, 14, 0, 0, '+02:00')
+  #    end
+
+  #    it "should end at 15:30 on saturday" do
+  #      expect(q.end).to eql Time.new(2014, 7, 26, 15, 30, 0, '+02:00')
+  #    end
+  #  end
+
+  #  context "race" do
+  #    subject(:race) { hungarianGP.events[4] }
+
+  #    it "should be of type Practice" do
+  #      expect(race.class).to eql Fonecal::Race
+  #    end
+
+  #    it "should start at 14:00 on sunday" do
+  #      expect(race.start).to eql Time.new(2014, 7, 27, 14, 0, 0, '+02:00')
+  #    end
+
+  #    it "should end at 18:00 on sunday" do
+  #      expect(race.end).to eql Time.new(2014, 7, 27, 18, 0, 0, '+02:00')
+  #    end
+  #  end
+  #end
+
+
+  #describe "Getting Belgian GP info" do
+  #  let(:belgianGP) { Fonecal::GrandPrix.new("http://www.formula1.com/races/in_detail/belgium_927/circuit_diagram.html") }
+
+  #  it "should have the correct race title" do
+  #    belgianGP.raceTitle.should eql "2014 Formula 1 Shell Belgian Grand Prix"
+  #  end
+
+  #  it "should get a country" do
+  #    belgianGP.country.should eql "Belgium"
+  #  end
+
+  #  it "has location object" do
+  #    belgianGP.location.should_not be_nil
+  #  end
+
+  #  describe "its events" do
+  #    describe "Practice 1" do
+  #      it "should have the right name" do
+  #        belgianGP.events.first.name.should eql "Practice 1"
+  #      end
+
+  #      it "should have the correct start time" do
+  #        belgianGP.events.first.start.should eql Time.new(2014, 8, 22, 10, 0, 0, '+02:00')
+  #      end
+  #    end
+  #  end
+  #end
 end