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@363
|
54 :join("event_seen_by_member", nil, { "event_seen_by_member.seen_by_member_id = member.id AND event_seen_by_member.notify_level <= member.notify_level AND event_seen_by_member.id = ?", self.id } )
|
bsw@363
|
55 :add_where("member.activated NOTNULL AND member.notify_email NOTNULL")
|
bsw@726
|
56 -- SAFETY FIRST, NEVER send notifications for events more then 3 days in past or future
|
bsw@726
|
57 :add_where("now() - event_seen_by_member.occurrence BETWEEN '-3 days'::interval AND '3 days'::interval")
|
bsw@866
|
58 -- do not notify a member about the events caused by the member
|
bsw@866
|
59 :add_where("event_seen_by_member.member_id ISNULL OR event_seen_by_member.member_id != member.id")
|
bsw@363
|
60 :exec()
|
bsw@363
|
61
|
bsw@363
|
62 print (_("Event #{id} -> #{num} members", { id = self.id, num = #members_to_notify }))
|
bsw@363
|
63
|
bsw@363
|
64
|
bsw@287
|
65 local url
|
bsw@287
|
66
|
bsw@405
|
67 for i, member in ipairs(members_to_notify) do
|
bsw@405
|
68 local subject
|
bsw@405
|
69 local body = ""
|
bsw@405
|
70
|
bsw@405
|
71 locale.do_with(
|
bsw@405
|
72 { lang = member.lang or config.default_lang or 'en' },
|
bsw@405
|
73 function()
|
bsw@1104
|
74
|
bsw@1104
|
75 local suggestion
|
bsw@1104
|
76 if self.suggestion_id then
|
bsw@1104
|
77 suggestion = Suggestion:by_id(self.suggestion_id)
|
bsw@1104
|
78 if not suggestion then
|
bsw@1104
|
79 return
|
bsw@1104
|
80 end
|
bsw@1104
|
81 end
|
bsw@1104
|
82
|
bsw@1104
|
83 subject = config.mail_subject_prefix .. " " .. self.event_name
|
bsw@405
|
84 body = body .. _("[event mail] Unit: #{name}", { name = self.issue.area.unit.name }) .. "\n"
|
bsw@405
|
85 body = body .. _("[event mail] Area: #{name}", { name = self.issue.area.name }) .. "\n"
|
bsw@405
|
86 body = body .. _("[event mail] Issue: ##{id}", { id = self.issue_id }) .. "\n\n"
|
bsw@405
|
87 body = body .. _("[event mail] Policy: #{policy}", { policy = self.issue.policy.name }) .. "\n\n"
|
bsw@405
|
88 body = body .. _("[event mail] Event: #{event}", { event = self.event_name }) .. "\n\n"
|
bsw@405
|
89 body = body .. _("[event mail] Phase: #{phase}", { phase = self.state_name }) .. "\n\n"
|
bsw@405
|
90
|
bsw@405
|
91 if self.initiative_id then
|
bsw@405
|
92 url = request.get_absolute_baseurl() .. "initiative/show/" .. self.initiative_id .. ".html"
|
bsw@405
|
93 elseif self.suggestion_id then
|
bsw@405
|
94 url = request.get_absolute_baseurl() .. "suggestion/show/" .. self.suggestion_id .. ".html"
|
bsw@405
|
95 else
|
bsw@405
|
96 url = request.get_absolute_baseurl() .. "issue/show/" .. self.issue_id .. ".html"
|
bsw@405
|
97 end
|
bsw@405
|
98
|
bsw@405
|
99 body = body .. _("[event mail] URL: #{url}", { url = url }) .. "\n\n"
|
bsw@405
|
100
|
bsw@405
|
101 if self.initiative_id then
|
bsw@405
|
102 local initiative = Initiative:by_id(self.initiative_id)
|
bsw@405
|
103 body = body .. _("i#{id}: #{name}", { id = initiative.id, name = initiative.name }) .. "\n\n"
|
bsw@405
|
104 else
|
bsw@405
|
105 local initiative_count = Initiative:new_selector()
|
bsw@405
|
106 :add_where{ "initiative.issue_id = ?", self.issue_id }
|
bsw@405
|
107 :count()
|
bsw@405
|
108 local initiatives = Initiative:new_selector()
|
bsw@405
|
109 :add_where{ "initiative.issue_id = ?", self.issue_id }
|
bsw@405
|
110 :add_order_by("initiative.supporter_count DESC")
|
bsw@405
|
111 :limit(3)
|
bsw@405
|
112 :exec()
|
bsw@405
|
113 for i, initiative in ipairs(initiatives) do
|
bsw@405
|
114 body = body .. _("i#{id}: #{name}", { id = initiative.id, name = initiative.name }) .. "\n"
|
bsw@405
|
115 end
|
bsw@405
|
116 if initiative_count - 3 > 0 then
|
bsw@764
|
117 body = body .. _("and #{count} more initiatives", { count = initiative_count - 3 }) .. "\n"
|
bsw@405
|
118 end
|
bsw@405
|
119 body = body .. "\n"
|
bsw@405
|
120 end
|
bsw@405
|
121
|
bsw@1104
|
122 if suggestion then
|
bsw@405
|
123 body = body .. _("#{name}\n\n", { name = suggestion.name })
|
bsw@405
|
124 end
|
bsw@287
|
125
|
bsw@405
|
126 local success = net.send_mail{
|
bsw@405
|
127 envelope_from = config.mail_envelope_from,
|
bsw@405
|
128 from = config.mail_from,
|
bsw@405
|
129 reply_to = config.mail_reply_to,
|
bsw@405
|
130 to = member.notify_email,
|
bsw@406
|
131 subject = subject,
|
bsw@405
|
132 content_type = "text/plain; charset=UTF-8",
|
bsw@405
|
133 content = body
|
bsw@405
|
134 }
|
bsw@405
|
135
|
bsw@405
|
136 end
|
bsw@405
|
137 )
|
bsw@287
|
138 end
|
bsw@287
|
139
|
bsw@287
|
140 end
|
bsw@287
|
141
|
bsw@363
|
142 function Event:send_next_notification()
|
bsw@363
|
143
|
bsw@363
|
144 local notification_sent = NotificationSent:new_selector()
|
bsw@363
|
145 :optional_object_mode()
|
bsw@363
|
146 :for_update()
|
bsw@363
|
147 :exec()
|
bsw@363
|
148
|
bsw@363
|
149 local last_event_id = 0
|
bsw@363
|
150 if notification_sent then
|
bsw@363
|
151 last_event_id = notification_sent.event_id
|
bsw@363
|
152 end
|
bsw@363
|
153
|
bsw@287
|
154 local event = Event:new_selector()
|
bsw@363
|
155 :add_where{ "event.id > ?", last_event_id }
|
bsw@287
|
156 :add_order_by("event.id")
|
bsw@287
|
157 :limit(1)
|
bsw@287
|
158 :optional_object_mode()
|
bsw@287
|
159 :exec()
|
bsw@287
|
160
|
bsw@287
|
161 if event then
|
bsw@363
|
162 if last_event_id == 0 then
|
bsw@363
|
163 db:query{ "INSERT INTO notification_sent (event_id) VALUES (?)", event.id }
|
bsw@363
|
164 else
|
bsw@363
|
165 db:query{ "UPDATE notification_sent SET event_id = ?", event.id }
|
bsw@363
|
166 end
|
bsw@287
|
167
|
bsw@287
|
168 event:send_notification()
|
bsw@364
|
169
|
bsw@364
|
170 return true
|
bsw@287
|
171
|
bsw@287
|
172 end
|
bsw@287
|
173
|
bsw@364
|
174 end
|
bsw@364
|
175
|
bsw@364
|
176 function Event:send_notifications_loop()
|
bsw@364
|
177
|
bsw@364
|
178 while true do
|
bsw@364
|
179 local did_work = Event:send_next_notification()
|
bsw@364
|
180 if not did_work then
|
bsw@364
|
181 print "Sleeping 1 second"
|
bsw@364
|
182 os.execute("sleep 1")
|
bsw@364
|
183 end
|
bsw@364
|
184 end
|
bsw@364
|
185
|
bsw@287
|
186 end |