1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
|
require_relative "spec_helper"
describe "pg_extended_date_support extension" do
before do
@db = Sequel.mock(:host=>'postgres', :fetch=>{:v=>1})
@db.extend(Module.new{def bound_variable_arg(v, _) v end})
@db.extension(:pg_extended_date_support)
@db.extend_datasets{def quote_identifiers?; false end}
end
after do
Sequel.datetime_class = Time
Sequel.default_timezone = nil
end
it "should convert infinite timestamps and dates as configured" do
cp = @db.conversion_procs
d = lambda{|v| cp[1082].call(v)}
t = lambda{|v| cp[1114].call(v)}
pi = 'infinity'
ni = '-infinity'
today = Date.today
now = Time.now
d.(today.to_s).must_equal today
t.(now.strftime("%Y-%m-%d %H:%M:%S.%N")).must_equal now
proc{@db.typecast_value(:date, pi)}.must_raise Sequel::InvalidValue
proc{@db.typecast_value(:datetime, pi)}.must_raise Sequel::InvalidValue
[:nil, 'nil'].each do |v|
@db.convert_infinite_timestamps = v
d.(pi).must_be_nil
t.(pi).must_be_nil
d.(ni).must_be_nil
t.(ni).must_be_nil
@db.typecast_value(:date, pi).must_equal pi
@db.typecast_value(:datetime, pi).must_equal pi
@db.typecast_value(:date, ni).must_equal ni
@db.typecast_value(:datetime, ni).must_equal ni
end
d.(today.to_s).must_equal today
t.(now.strftime("%Y-%m-%d %H:%M:%S.%N")).must_equal now
@db.typecast_value(:date, today.to_s).must_equal today
@db.typecast_value(:datetime, now.strftime("%Y-%m-%d %H:%M:%S.%N")).must_equal now
[:string, 'string'].each do |v|
@db.convert_infinite_timestamps = v
d.(pi).must_equal pi
t.(pi).must_equal pi
d.(ni).must_equal ni
t.(ni).must_equal ni
end
[:date, 'date'].each do |v|
@db.convert_infinite_timestamps = v
d.(pi).must_equal Date::Infinity.new
t.(pi).must_equal Date::Infinity.new
d.(ni).must_equal(-Date::Infinity.new)
t.(ni).must_equal(-Date::Infinity.new)
end
[:float, 'float', 't', true].each do |v|
@db.convert_infinite_timestamps = v
d.(pi).must_equal 1.0/0.0
t.(pi).must_equal 1.0/0.0
d.(ni).must_equal(-1.0/0.0)
t.(ni).must_equal(-1.0/0.0)
end
['f', false].each do |v|
@db.convert_infinite_timestamps = v
proc{d.(pi)}.must_raise ArgumentError, Sequel::InvalidValue
proc{t.(pi)}.must_raise ArgumentError, Sequel::InvalidValue
proc{d.(ni)}.must_raise ArgumentError, Sequel::InvalidValue
proc{t.(ni)}.must_raise ArgumentError, Sequel::InvalidValue
end
end
it "should handle parsing BC dates" do
@db.conversion_procs[1082].call("1092-10-20 BC").must_equal Date.new(-1091, 10, 20)
end
it "should handle parsing BC timestamps as Time values" do
@db.conversion_procs[1114].call("1200-02-15 14:13:20-00:00 BC").must_equal Time.at(-100000000000).utc
@db.conversion_procs[1114].call("1200-02-15 14:13:20-00:00:00 BC").must_equal Time.at(-100000000000).utc
Sequel.default_timezone = :utc
@db.conversion_procs[1114].call("1200-02-15 14:13:20 BC").must_equal Time.at(-100000000000).utc
Sequel.default_timezone = nil
end
it "should handle parsing BC timestamps as DateTime values" do
Sequel.datetime_class = DateTime
@db.conversion_procs[1114].call("1200-02-15 14:13:20-00:00 BC").must_equal DateTime.new(-1199, 2, 15, 14, 13, 20)
@db.conversion_procs[1114].call("1200-02-15 14:13:20-00:00:00 BC").must_equal DateTime.new(-1199, 2, 15, 14, 13, 20)
Sequel.default_timezone = :utc
@db.conversion_procs[1114].call("1200-02-15 14:13:20 BC").must_equal DateTime.new(-1199, 2, 15, 14, 13, 20)
end
it "should handle parsing AD timestamps with offset seconds" do
@db.conversion_procs[1114].call("1200-02-15 14:13:20-00:00:00").must_equal Time.utc(1200, 2, 15, 14, 13, 20)
Sequel.datetime_class = DateTime
@db.conversion_procs[1114].call("1200-02-15 14:13:20-00:00:00").must_equal DateTime.new(1200, 2, 15, 14, 13, 20)
end
it "should format Date::Infinity values" do
@db.literal(Date::Infinity.new).must_equal "'infinity'"
@db.literal(-Date::Infinity.new).must_equal "'-infinity'"
end
it "should raise errors for literalizing random Objects" do
proc{@db.literal(Object.new)}.must_raise Sequel::Error
end
it "should format BC and AD dates" do
@db.literal(Date.new(-1091, 10, 20)).must_equal "'1092-10-20 BC'"
@db.literal(Date.new(1092, 10, 20)).must_equal "'1092-10-20'"
end
it "should format BC and AD datetimes" do
@db.literal(DateTime.new(-1199, 2, 15, 14, 13, 20)).must_equal "'1200-02-15 14:13:20.000000000+0000 BC'"
@db.literal(DateTime.new(1200, 2, 15, 14, 13, 20)).must_equal "'1200-02-15 14:13:20.000000+0000'"
end
it "should format BC and AD times" do
@db.literal(Time.at(-100000000000).utc).must_equal "'1200-02-15 14:13:20.000000000+0000 BC'"
@db.literal(Time.at(100000000000).utc).must_equal "'5138-11-16 09:46:40.000000+0000'"
end
it "should format BC and AD dates and times in bound variables" do
@db.bound_variable_arg(Date.new(-1091, 10, 20), nil).must_equal "'1092-10-20 BC'"
@db.bound_variable_arg(Date.new(1092, 10, 20), nil).must_equal "'1092-10-20'"
@db.bound_variable_arg(DateTime.new(-1091, 10, 20), nil).must_equal "'1092-10-20 00:00:00.000000000+0000 BC'"
@db.bound_variable_arg(DateTime.new(1092, 10, 20), nil).must_equal "'1092-10-20 00:00:00.000000+0000'"
@db.bound_variable_arg(Time.at(-100000000000).utc, nil).must_equal "'1200-02-15 14:13:20.000000000+0000 BC'"
@db.bound_variable_arg(Time.at(-100000000000).utc, nil).must_equal "'1200-02-15 14:13:20.000000000+0000 BC'"
@db.bound_variable_arg(1, nil).must_equal 1
@db.bound_variable_arg(1, nil).must_equal 1
end
end
|
