rev |
line source |
bsw@286
|
1 Event = mondelefant.new_class()
|
bsw@286
|
2 Event.table = 'event'
|
bsw@286
|
3
|
bsw@286
|
4 Event:add_reference{
|
bsw@286
|
5 mode = 'm1',
|
bsw@286
|
6 to = "Issue",
|
bsw@286
|
7 this_key = 'issue_id',
|
bsw@286
|
8 that_key = 'id',
|
bsw@286
|
9 ref = 'issue',
|
bsw@287
|
10 }
|
bsw@287
|
11
|
bsw@414
|
12 Event:add_reference{
|
bsw@414
|
13 mode = 'm1',
|
bsw@712
|
14 to = "Initiative",
|
bsw@712
|
15 this_key = 'initiative_id',
|
bsw@712
|
16 that_key = 'id',
|
bsw@712
|
17 ref = 'initiative',
|
bsw@712
|
18 }
|
bsw@712
|
19
|
bsw@712
|
20 Event:add_reference{
|
bsw@712
|
21 mode = 'm1',
|
bsw@414
|
22 to = "Suggestion",
|
bsw@414
|
23 this_key = 'suggestion_id',
|
bsw@414
|
24 that_key = 'id',
|
bsw@414
|
25 ref = 'suggestion',
|
bsw@414
|
26 }
|
bsw@414
|
27
|
bsw@414
|
28 Event:add_reference{
|
bsw@414
|
29 mode = 'm1',
|
bsw@414
|
30 to = "Member",
|
bsw@414
|
31 this_key = 'member_id',
|
bsw@414
|
32 that_key = 'id',
|
bsw@414
|
33 ref = 'member',
|
bsw@414
|
34 }
|
bsw@414
|
35
|
bsw@405
|
36 function Event.object_get:event_name()
|
bsw@405
|
37 return ({
|
bsw@405
|
38 issue_state_changed = _"Issue reached next phase",
|
bsw@405
|
39 initiative_created_in_new_issue = _"New issue",
|
bsw@414
|
40 initiative_created_in_existing_issue = _"New initiative",
|
bsw@405
|
41 initiative_revoked = _"Initiative revoked",
|
bsw@405
|
42 new_draft_created = _"New initiative draft",
|
bsw@405
|
43 suggestion_created = _"New suggestion"
|
bsw@405
|
44 })[self.event]
|
bsw@405
|
45 end
|
bsw@405
|
46
|
bsw@405
|
47 function Event.object_get:state_name()
|
bsw@972
|
48 return Issue:get_state_name_for_state(self.state)
|
bsw@405
|
49 end
|
bsw@405
|
50
|
bsw@592
|
51 function Event.object:send_notification()
|
bsw@592
|
52
|
bsw@363
|
53 local members_to_notify = Member:new_selector()
|
bsw@1248
|
54 :join("event_for_notification", nil, { "event_for_notification.recipient_id = member.id AND event_for_notification.id = ?", self.id } )
|
bsw@726
|
55 -- SAFETY FIRST, NEVER send notifications for events more then 3 days in past or future
|
bsw@1248
|
56 :add_where("now() - event_for_notification.occurrence BETWEEN '-3 days'::interval AND '3 days'::interval")
|
bsw@866
|
57 -- do not notify a member about the events caused by the member
|
bsw@1248
|
58 :add_where("event_for_notification.member_id ISNULL OR event_for_notification.member_id != member.id")
|
bsw@1300
|
59 :add_where("member.notify_email NOTNULL")
|
bsw@1300
|
60 :add_where("NOT member.locked")
|
bsw@1300
|
61 :add_where("NOT member.disable_notifications")
|
bsw@363
|
62 :exec()
|
bsw@363
|
63
|
bsw@1159
|
64 io.stderr:write("Sending notifications for event " .. self.id .. " to " .. (#members_to_notify) .. " members\n")
|
bsw@363
|
65
|
bsw@405
|
66 for i, member in ipairs(members_to_notify) do
|
bsw@405
|
67 local subject
|
bsw@405
|
68 local body = ""
|
bsw@405
|
69
|
bsw@405
|
70 locale.do_with(
|
bsw@1252
|
71 { lang = member.lang or config.default_lang },
|
bsw@405
|
72 function()
|
bsw@1104
|
73
|
bsw@405
|
74 body = body .. _("[event mail] Unit: #{name}", { name = self.issue.area.unit.name }) .. "\n"
|
bsw@405
|
75 body = body .. _("[event mail] Area: #{name}", { name = self.issue.area.name }) .. "\n"
|
bsw@405
|
76 body = body .. _("[event mail] Issue: ##{id}", { id = self.issue_id }) .. "\n\n"
|
bsw@405
|
77 body = body .. _("[event mail] Policy: #{policy}", { policy = self.issue.policy.name }) .. "\n\n"
|
bsw@405
|
78 body = body .. _("[event mail] Phase: #{phase}", { phase = self.state_name }) .. "\n\n"
|
bsw@405
|
79
|
bsw@1252
|
80 local url
|
bsw@1252
|
81
|
bsw@405
|
82 if self.initiative_id then
|
bsw@405
|
83 url = request.get_absolute_baseurl() .. "initiative/show/" .. self.initiative_id .. ".html"
|
bsw@405
|
84 else
|
bsw@405
|
85 url = request.get_absolute_baseurl() .. "issue/show/" .. self.issue_id .. ".html"
|
bsw@405
|
86 end
|
bsw@405
|
87
|
bsw@405
|
88 body = body .. _("[event mail] URL: #{url}", { url = url }) .. "\n\n"
|
bsw@405
|
89
|
bsw@1248
|
90 local leading_initiative
|
bsw@1248
|
91
|
bsw@405
|
92 if self.initiative_id then
|
bsw@405
|
93 local initiative = Initiative:by_id(self.initiative_id)
|
bsw@405
|
94 body = body .. _("i#{id}: #{name}", { id = initiative.id, name = initiative.name }) .. "\n\n"
|
bsw@405
|
95 else
|
bsw@405
|
96 local initiative_count = Initiative:new_selector()
|
bsw@405
|
97 :add_where{ "initiative.issue_id = ?", self.issue_id }
|
bsw@405
|
98 :count()
|
bsw@405
|
99 local initiatives = Initiative:new_selector()
|
bsw@405
|
100 :add_where{ "initiative.issue_id = ?", self.issue_id }
|
bsw@1252
|
101 :add_order_by("initiative.admitted DESC NULLS LAST, initiative.rank NULLS LAST, initiative.harmonic_weight DESC NULLS LAST, id")
|
bsw@405
|
102 :limit(3)
|
bsw@405
|
103 :exec()
|
bsw@405
|
104 for i, initiative in ipairs(initiatives) do
|
bsw@1248
|
105 if i == 1 then
|
bsw@1248
|
106 leading_initiative = initiative
|
bsw@1248
|
107 end
|
bsw@405
|
108 body = body .. _("i#{id}: #{name}", { id = initiative.id, name = initiative.name }) .. "\n"
|
bsw@405
|
109 end
|
bsw@405
|
110 if initiative_count - 3 > 0 then
|
bsw@764
|
111 body = body .. _("and #{count} more initiatives", { count = initiative_count - 3 }) .. "\n"
|
bsw@405
|
112 end
|
bsw@405
|
113 body = body .. "\n"
|
bsw@405
|
114 end
|
bsw@405
|
115
|
bsw@1248
|
116 subject = config.mail_subject_prefix
|
bsw@1248
|
117
|
bsw@1248
|
118 if self.event == "issue_state_changed" then
|
bsw@1252
|
119 subject = subject .. _("State of #{issue} changed to #{state} / #{initiative}", { issue = self.issue.name, state = Issue:get_state_name_for_state(self.state), initiative = leading_initiative.display_name })
|
bsw@1248
|
120 elseif self.event == "initiative_revoked" then
|
bsw@1248
|
121 subject = subject .. _("Initiative revoked: #{initiative_name}", { initiative_name = self.initiative.display_name })
|
bsw@405
|
122 end
|
bsw@1248
|
123
|
bsw@405
|
124 local success = net.send_mail{
|
bsw@405
|
125 envelope_from = config.mail_envelope_from,
|
bsw@405
|
126 from = config.mail_from,
|
bsw@405
|
127 reply_to = config.mail_reply_to,
|
bsw@405
|
128 to = member.notify_email,
|
bsw@406
|
129 subject = subject,
|
bsw@405
|
130 content_type = "text/plain; charset=UTF-8",
|
bsw@405
|
131 content = body
|
bsw@405
|
132 }
|
bsw@405
|
133
|
bsw@405
|
134 end
|
bsw@405
|
135 )
|
bsw@287
|
136 end
|
bsw@287
|
137
|
bsw@287
|
138 end
|
bsw@287
|
139
|
bsw@363
|
140 function Event:send_next_notification()
|
bsw@363
|
141
|
bsw@1250
|
142 local notification_event_sent = NotificationEventSent:new_selector()
|
bsw@363
|
143 :optional_object_mode()
|
bsw@363
|
144 :for_update()
|
bsw@363
|
145 :exec()
|
bsw@363
|
146
|
bsw@363
|
147 local last_event_id = 0
|
bsw@1250
|
148 if notification_event_sent then
|
bsw@1250
|
149 last_event_id = notification_event_sent.event_id
|
bsw@363
|
150 end
|
bsw@363
|
151
|
bsw@287
|
152 local event = Event:new_selector()
|
bsw@363
|
153 :add_where{ "event.id > ?", last_event_id }
|
bsw@287
|
154 :add_order_by("event.id")
|
bsw@287
|
155 :limit(1)
|
bsw@287
|
156 :optional_object_mode()
|
bsw@287
|
157 :exec()
|
bsw@287
|
158
|
bsw@287
|
159 if event then
|
bsw@363
|
160 if last_event_id == 0 then
|
bsw@1250
|
161 db:query{ "INSERT INTO notification_event_sent (event_id) VALUES (?)", event.id }
|
bsw@363
|
162 else
|
bsw@1250
|
163 db:query{ "UPDATE notification_event_sent SET event_id = ?", event.id }
|
bsw@363
|
164 end
|
bsw@287
|
165
|
bsw@287
|
166 event:send_notification()
|
bsw@364
|
167
|
bsw@1158
|
168 if config.notification_handler_func then
|
bsw@1158
|
169 config.notification_handler_func(event)
|
bsw@1158
|
170 end
|
bsw@1158
|
171
|
bsw@364
|
172 return true
|
bsw@287
|
173
|
bsw@287
|
174 end
|
bsw@287
|
175
|
bsw@364
|
176 end
|