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
|
require File.dirname(__FILE__) + '/../spec_helper'
describe InfoRequest, " when emailing" do
fixtures :info_requests, :info_request_events, :public_bodies, :users
before do
@info_request = info_requests(:fancy_dog_request)
end
it "should have a valid incoming email" do
@info_request.incoming_email.should_not be_nil
end
it "should recognise its own incoming email" do
incoming_email = @info_request.incoming_email
found_info_request = InfoRequest.find_by_incoming_email(incoming_email)
found_info_request.should == (@info_request)
end
it "should recognise its own incoming email with some capitalisation" do
incoming_email = @info_request.incoming_email.gsub(/request/, "Request")
found_info_request = InfoRequest.find_by_incoming_email(incoming_email)
found_info_request.should == (@info_request)
end
it "should recognise its own incoming email with quotes" do
incoming_email = "'" + @info_request.incoming_email + "'"
found_info_request = InfoRequest.find_by_incoming_email(incoming_email)
found_info_request.should == (@info_request)
end
it "should recognise l and 1 as the same in incoming emails" do
# Make info request with a 1 in it
while true
ir = InfoRequest.new(:title => "testing", :public_body => public_bodies(:geraldine_public_body),
:user => users(:bob_smith_user))
ir.save!
hash_part = ir.incoming_email.match(/-[0-9a-f]+@/)[0]
break if hash_part.match(/1/)
end
# Make email with a 1 in the hash part changed to l
test_email = ir.incoming_email
new_hash_part = hash_part.gsub(/1/, "l")
test_email.gsub!(hash_part, new_hash_part)
# Try and find with an l
found_info_request = InfoRequest.find_by_incoming_email(test_email)
found_info_request.should == (ir)
end
it "should recognise old style request-bounce- addresses" do
incoming_email = @info_request.magic_email("request-bounce-")
found_info_request = InfoRequest.find_by_incoming_email(incoming_email)
found_info_request.should == (@info_request)
end
it "should return nil when receiving email for a deleted request" do
deleted_request_address = InfoRequest.magic_email_for_id("request-", 98765)
found_info_request = InfoRequest.find_by_incoming_email(deleted_request_address)
found_info_request.should be_nil
end
it "should cope with indexing after item is deleted" do
verbose = false
# check can just update index
info_request_events(:useless_incoming_message_event).save!
ActsAsXapian.update_index(false, verbose)
# then delete it under it
info_request_events(:useless_incoming_message_event).save!
info_request_events(:useless_incoming_message_event).destroy
ActsAsXapian.update_index(false, verbose)
# raise ActsAsXapian::ActsAsXapianJob.find(:all).to_yaml
end
end
describe InfoRequest, "when calculating status" do
fixtures :public_bodies, :users
# We can't use fixtures as we need to control the date of a message
# See due_date_for_request_date tests for fine grained testing
def send_msg(date)
ir = InfoRequest.new(:title => "testing", :public_body => public_bodies(:geraldine_public_body),
:user => users(:bob_smith_user))
ir.save!
om = OutgoingMessage.new(
:info_request_id => ir.id,
:last_sent_at => date,
:body => '...',
:status => 'sent',
:message_type => 'initial_request',
:what_doing => 'new_information'
)
om.save!
e = InfoRequestEvent.new(
:event_type => 'sent',
:info_request_id => ir.id,
:outgoing_message_id => om.id,
:params_yaml => { :outgoing_message_id => om.id }.to_yaml
)
e.save!
return ir
end
it "is awaiting response when recently new" do
ir = send_msg(Time.new - 5.days)
ir.calculate_status.should == 'waiting_response'
end
it "is overdue when very old" do
ir = send_msg(Time.new - 50.days)
ir.calculate_status.should == 'waiting_response_overdue'
end
it "has correct due date" do
ir = send_msg(Time.utc(2009, 03, 16, 12, 0, 0))
ir.date_response_required_by.strftime("%F").should == '2009-04-16'
end
it "isn't overdue on due day" do
ir = send_msg(Time.utc(2009, 03, 16, 12, 0, 0))
Time.stub!(:now).and_return(Time.utc(2009, 04, 16, 14, 0, 0))
ir.days_overdue.should == 0
end
it "is overdue a day after due day" do
ir = send_msg(Time.utc(2009, 03, 16, 12, 0, 0))
Time.stub!(:now).and_return(Time.utc(2009, 04, 17, 11, 0, 0))
ir.days_overdue.should == 1
end
end
|
