2004-01-17 23:00:00 -05:00
|
|
|
require 'test/unit'
|
|
|
|
|
|
|
|
class TestTime < Test::Unit::TestCase
|
|
|
|
def test_time_add()
|
|
|
|
assert_equal(Time.utc(2000, 3, 21, 3, 30) + 3 * 3600,
|
|
|
|
Time.utc(2000, 3, 21, 6, 30))
|
|
|
|
assert_equal(Time.utc(2000, 3, 21, 3, 30) + (-3 * 3600),
|
|
|
|
Time.utc(2000, 3, 21, 0, 30))
|
2004-01-19 02:32:47 -05:00
|
|
|
assert_equal(0, (Time.at(1.1) + 0.9).usec)
|
2004-01-17 23:00:00 -05:00
|
|
|
end
|
|
|
|
|
|
|
|
def test_time_subt()
|
|
|
|
assert_equal(Time.utc(2000, 3, 21, 3, 30) - 3 * 3600,
|
|
|
|
Time.utc(2000, 3, 21, 0, 30))
|
|
|
|
assert_equal(Time.utc(2000, 3, 21, 3, 30) - (-3 * 3600),
|
|
|
|
Time.utc(2000, 3, 21, 6, 30))
|
2004-01-19 02:32:47 -05:00
|
|
|
assert_equal(900000, (Time.at(1.1) - 0.2).usec)
|
2004-01-17 23:00:00 -05:00
|
|
|
end
|
|
|
|
|
|
|
|
def test_time_time()
|
|
|
|
assert_equal(Time.utc(2000, 3, 21, 3, 30) \
|
|
|
|
-Time.utc(2000, 3, 21, 0, 30), 3*3600)
|
|
|
|
assert_equal(Time.utc(2000, 3, 21, 0, 30) \
|
|
|
|
-Time.utc(2000, 3, 21, 3, 30), -3*3600)
|
|
|
|
end
|
2004-03-30 06:31:44 -05:00
|
|
|
|
2004-03-31 05:40:22 -05:00
|
|
|
def negative_time_t?
|
2004-03-30 06:31:44 -05:00
|
|
|
begin
|
|
|
|
Time.at(-1)
|
2004-03-31 05:40:22 -05:00
|
|
|
true
|
2004-03-30 06:31:44 -05:00
|
|
|
rescue ArgumentError
|
2004-03-31 05:40:22 -05:00
|
|
|
false
|
2004-03-30 21:35:34 -05:00
|
|
|
end
|
2004-03-31 05:40:22 -05:00
|
|
|
end
|
|
|
|
|
|
|
|
def test_timegm
|
|
|
|
if negative_time_t?
|
2004-03-30 21:35:34 -05:00
|
|
|
assert_equal(-0x80000000, Time.utc(1901, 12, 13, 20, 45, 52).tv_sec)
|
|
|
|
assert_equal(-2, Time.utc(1969, 12, 31, 23, 59, 58).tv_sec)
|
|
|
|
assert_equal(-1, Time.utc(1969, 12, 31, 23, 59, 59).tv_sec)
|
|
|
|
end
|
|
|
|
|
|
|
|
assert_equal(0, Time.utc(1970, 1, 1, 0, 0, 0).tv_sec) # the Epoch
|
|
|
|
assert_equal(1, Time.utc(1970, 1, 1, 0, 0, 1).tv_sec)
|
|
|
|
assert_equal(31535999, Time.utc(1970, 12, 31, 23, 59, 59).tv_sec)
|
|
|
|
assert_equal(31536000, Time.utc(1971, 1, 1, 0, 0, 0).tv_sec)
|
|
|
|
assert_equal(78796799, Time.utc(1972, 6, 30, 23, 59, 59).tv_sec)
|
|
|
|
|
|
|
|
# 1972-06-30T23:59:60Z is the first leap second.
|
|
|
|
if Time.utc(1972, 7, 1, 0, 0, 0) - Time.utc(1972, 6, 30, 23, 59, 59) == 1
|
|
|
|
# no leap second.
|
|
|
|
assert_equal(78796800, Time.utc(1972, 7, 1, 0, 0, 0).tv_sec)
|
|
|
|
assert_equal(78796801, Time.utc(1972, 7, 1, 0, 0, 1).tv_sec)
|
|
|
|
assert_equal(946684800, Time.utc(2000, 1, 1, 0, 0, 0).tv_sec)
|
|
|
|
assert_equal(0x7fffffff, Time.utc(2038, 1, 19, 3, 14, 7).tv_sec)
|
|
|
|
else
|
|
|
|
# leap seconds supported.
|
2004-06-25 18:59:01 -04:00
|
|
|
assert_equal(2, Time.utc(1972, 7, 1, 0, 0, 0) - Time.utc(1972, 6, 30, 23, 59, 59))
|
2004-03-30 21:35:34 -05:00
|
|
|
assert_equal(78796800, Time.utc(1972, 6, 30, 23, 59, 60).tv_sec)
|
|
|
|
assert_equal(78796801, Time.utc(1972, 7, 1, 0, 0, 0).tv_sec)
|
|
|
|
assert_equal(78796802, Time.utc(1972, 7, 1, 0, 0, 1).tv_sec)
|
|
|
|
assert_equal(946684822, Time.utc(2000, 1, 1, 0, 0, 0).tv_sec)
|
2004-03-30 06:31:44 -05:00
|
|
|
end
|
|
|
|
end
|
2004-03-31 05:40:22 -05:00
|
|
|
|
|
|
|
def test_huge_difference # [ruby-dev:22619]
|
|
|
|
if negative_time_t?
|
|
|
|
assert_equal(Time.at(-0x80000000), Time.at(0x7fffffff) - 0xffffffff)
|
2004-03-31 06:08:16 -05:00
|
|
|
assert_equal(Time.at(-0x80000000), Time.at(0x7fffffff) + (-0xffffffff))
|
2004-03-31 05:40:22 -05:00
|
|
|
assert_equal(Time.at(0x7fffffff), Time.at(-0x80000000) + 0xffffffff)
|
2004-03-31 06:08:16 -05:00
|
|
|
assert_equal(Time.at(0x7fffffff), Time.at(-0x80000000) - (-0xffffffff))
|
2004-03-31 05:40:22 -05:00
|
|
|
end
|
|
|
|
end
|
2004-01-17 23:00:00 -05:00
|
|
|
end
|