require "spec_helper"

describe Mongoid::Extensions::Time do

  describe ".demongoize" do

    after(:all) do
      Mongoid.use_utc = false
      Mongoid.use_activesupport_time_zone = true
    end

    let!(:time) do
      Time.local(2010, 11, 19)
    end

    context "when the time zone is not defined" do

      before do
        Mongoid.use_utc = false
      end

      context "when the local time is not observing daylight saving" do

        let(:time) do
          Time.utc(2010, 11, 19)
        end

        it "returns the local time" do
          Time.demongoize(time).utc_offset.should eq(
            Time.local(2010, 11, 19).utc_offset
          )
        end
      end

      context "when the local time is observing daylight saving" do

        let(:time) do
          Time.utc(2010, 9, 19)
        end

        it "returns the local time" do
          Time.demongoize(time).should eq(time.getlocal)
        end
      end

      context "when we have a time close to midnight" do

        let(:time) do
          Time.local(2010, 11, 19, 0, 30).utc
        end

        it "changes it back to the equivalent local time" do
          Time.demongoize(time).should eq(time)
        end
      end

      context "when using the ActiveSupport time zone" do

        before do
          Mongoid.use_activesupport_time_zone = true
          Time.zone = "Stockholm"
        end

        after do
          Time.zone = nil
          Mongoid.use_activesupport_time_zone = false
        end

        it "returns an ActiveSupport::TimeWithZone" do
          Time.demongoize(time).class.should eq(ActiveSupport::TimeWithZone)
        end

        context "when the local time is not observing daylight saving" do

          let(:new_time) do
            Time.utc(2010, 11, 19, 12)
          end

          it "returns the local time" do
            Time.demongoize(new_time).should eq(
              Time.zone.local(2010, 11, 19, 13)
            )
          end
        end

        context "when the local time is observing daylight saving" do

          let(:new_time) do
            Time.utc(2010, 9, 19, 12)
          end

          it "returns the local time" do
            Time.demongoize(new_time).should eq(
              Time.zone.local(2010, 9, 19, 14)
            )
          end
        end

        context "when we have a time close to midnight" do

          let(:new_time) do
            Time.utc(2010, 11, 19, 0, 30)
          end

          it "change it back to the equivalent local time" do
            Time.demongoize(new_time).should eq(
              Time.zone.local(2010, 11, 19, 1, 30)
            )
          end
        end
      end
    end

    context "when the time zone is defined as UTC" do

      before do
        Mongoid.use_utc = true
      end

      after do
        Mongoid.use_utc = false
      end

      it "returns utc" do
        Time.demongoize(time.dup.utc).utc_offset.should eq(0)
      end

      context "when using the ActiveSupport time zone" do

        let(:time) do
          Time.utc(2010, 11, 19, 0, 30)
        end

        before do
          Mongoid.use_activesupport_time_zone = true
          Time.zone = "Stockholm"
        end

        after do
          Time.zone = nil
          Mongoid.use_activesupport_time_zone = false
        end

        it "returns utc" do
          Time.demongoize(time).should eq(
            ActiveSupport::TimeZone['UTC'].local(2010, 11, 19, 0, 30)
          )
        end

        it "returns an ActiveSupport::TimeWithZone" do
          Time.demongoize(time).class.should eq(
            ActiveSupport::TimeWithZone
          )
        end
      end
    end

    context "when time is nil" do

      it "returns nil" do
        Time.demongoize(nil).should be_nil
      end
    end
  end

  describe ".mongoize" do

    let!(:time) do
      Time.local(2010, 11, 19)
    end

    context "when given nil" do

      it "returns nil" do
        Time.mongoize(nil).should be_nil
      end
    end

    context "when string is empty" do

      it "returns nil" do
        Time.mongoize("").should be_nil
      end
    end

    context "when given a string" do

      context "when the string is a valid time" do

        it "converts to a utc time" do
          Time.mongoize(time.to_s).utc_offset.should eq(0)
        end

        it "serializes with time parsing" do
          Time.mongoize(time.to_s).should eq(Time.parse(time.to_s).utc)
        end

        it "returns a local date from the string" do
          Time.mongoize(time.to_s).should eq(
            Time.local(time.year, time.month, time.day, time.hour, time.min, time.sec)
          )
        end
      end

      context "when the string is an invalid time" do

        let(:epoch) do
          Time.utc(1970, 1, 1, 0, 0, 0, 0)
        end

        it "converts the time to epoch" do
          Time.mongoize("time").should eq(epoch)
        end
      end

      context "when using the ActiveSupport time zone" do

        before do
          Mongoid.use_activesupport_time_zone = true
          # if this is actually your time zone, the following tests are useless
          Time.zone = "Stockholm"
        end

        after do
          Time.zone = nil
          Mongoid.use_activesupport_time_zone = false
        end

        context "when the local time is not observing daylight saving" do

          it "returns the local time" do
            Time.mongoize('2010-11-19 5:00:00').should eq(
              Time.utc(2010, 11, 19, 4)
            )
          end
        end

        context "when the local time is observing daylight saving" do

          it "returns the local time" do
            Time.mongoize('2010-9-19 5:00:00').should eq(
              Time.utc(2010, 9, 19, 3)
            )
          end
        end
      end
    end

    context "when given a DateTime" do

      let!(:time) do
        DateTime.now
      end

      let!(:eom_time) do
        DateTime.parse("2012-11-30T23:59:59.999999999-05:00")
      end

      let!(:eom_time_mongoized) do
        eom_time.mongoize
      end

      it "doesn't strip milli- or microseconds" do
        Time.mongoize(time).to_f.round(3).should eq(time.to_f.round(3))
      end

      it "doesn't round up the hour at end of month" do
        eom_time_mongoized.hour.should eq(eom_time.utc.hour)
      end

      it "doesn't round up the minute" do
        eom_time_mongoized.min.should eq(eom_time.utc.min)
      end

      it "doesn't round up the seconds" do
        eom_time_mongoized.sec.should eq(eom_time.utc.sec)
      end

      it "does not alter seconds" do
        (eom_time_mongoized.usec).should eq(999999)
      end

      it "does not alter seconds with fractions" do
        DateTime.mongoize(11.11).to_f.should eq(11.11)
      end

      context "when using the ActiveSupport time zone" do

        let(:datetime) do
          DateTime.new(2010, 11, 19)
        end

        before do
          Mongoid.use_activesupport_time_zone = true
          # if this is actually your time zone, the following tests are useless
          Time.zone = "Stockholm"
        end

        after do
          Time.zone = nil
          Mongoid.use_activesupport_time_zone = false
        end

        it "assumes the given time is local" do
          Time.mongoize(datetime).should eq(
            Time.utc(2010, 11, 19)
          )
        end

        it "doesn't round up the hour" do
          eom_time_mongoized.hour.should eq(eom_time.utc.hour)
        end

        it "doesn't round up the minutes" do
          eom_time_mongoized.min.should eq(eom_time.utc.min)
        end

        it "doesn't round up the seconds" do
          eom_time_mongoized.sec.should eq(eom_time.utc.sec)
        end

        it "does not alter the seconds" do
          (eom_time_mongoized.usec).should eq(999999)
        end
      end
    end

    context "when given a Time" do

      it "converts to a utc time" do
        Time.mongoize(time).utc_offset.should eq(0)
      end

      it "returns utc times unchanged" do
        Time.mongoize(time.utc).should eq(time.utc)
      end

      it "returns the time as utc" do
        Time.mongoize(time).should eq(time.utc)
      end

      it "doesn't strip milli- or microseconds" do
        Time.mongoize(time).to_f.should eq(time.to_f)
      end

      it "does not alter seconds with fractions" do
        Time.mongoize(102.63).to_f.should eq(102.63)
      end
    end

    context "when given an ActiveSupport::TimeWithZone" do

      before do
        1.hour.ago
      end

      it "converts it to utc" do
        Time.mongoize(time.in_time_zone("Alaska")).should eq(
          Time.at(time.to_i).utc
        )
      end
    end

    context "when given a Date" do

      let(:date) do
        Date.today
      end

      it "converts to a utc time" do
        Time.mongoize(date).should eq(Time.local(date.year, date.month, date.day))
      end

      it "has a zero utc offset" do
        Time.mongoize(date).utc_offset.should eq(0)
      end

      context "when using the ActiveSupport time zone" do

        let(:date) do
          Date.new(2010, 11, 19)
        end

        before do
          Mongoid.use_activesupport_time_zone = true
          # if this is actually your time zone, the following tests are useless
          Time.zone = "Stockholm"
        end

        after do
          Time.zone = nil
          Mongoid.use_activesupport_time_zone = false
        end

        it "assumes the given time is local" do
          Time.mongoize(date).should eq(Time.utc(2010, 11, 18, 23))
        end
      end
    end

    context "when given an array" do

      let(:array) do
        [ 2010, 11, 19, 00, 24, 49 ]
      end

      it "returns a time" do
        Time.mongoize(array).should eq(Time.local(*array))
      end

      context "when using the ActiveSupport time zone" do

        before do
          Mongoid.use_activesupport_time_zone = true
          # if this is actually your time zone, the following tests are useless
          Time.zone = "Stockholm"
        end

        after do
          Time.zone = nil
          Mongoid.use_activesupport_time_zone = false
        end

        it "assumes the given time is local" do
          Time.mongoize(array).should eq(
            Time.utc(2010, 11, 18, 23, 24, 49)
          )
        end
      end
    end
  end

  describe "#mongoize" do

    let!(:time) do
      Time.local(2010, 11, 19)
    end

    let!(:eom_time) do
      Time.local(2012, 11, 30, 23, 59, 59, 999999.999)
    end

    let!(:eom_time_mongoized) do
      eom_time.mongoize
    end

    it "converts to a utc time" do
      time.mongoize.utc_offset.should eq(0)
    end

    it "returns the time as utc" do
      time.mongoize.should eq(time.utc)
    end

    it "doesn't strip milli- or microseconds" do
      time.mongoize.to_f.should eq(time.to_f)
    end

    it "doesn't round up at end of month" do
      eom_time_mongoized.hour.should eq(eom_time.utc.hour)
      eom_time_mongoized.min.should eq(eom_time.utc.min)
      eom_time_mongoized.sec.should eq(eom_time.utc.sec)
      eom_time_mongoized.usec.should eq(eom_time.utc.usec)
      eom_time_mongoized.subsec.to_f.round(3).should eq(eom_time.utc.subsec.to_f.round(3))
    end
  end
end