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@407
|
74 subject = config.mail_subject_prefix .. " " .. self.event_name
|
bsw@405
|
75 body = body .. _("[event mail] Unit: #{name}", { name = self.issue.area.unit.name }) .. "\n"
|
bsw@405
|
76 body = body .. _("[event mail] Area: #{name}", { name = self.issue.area.name }) .. "\n"
|
bsw@405
|
77 body = body .. _("[event mail] Issue: ##{id}", { id = self.issue_id }) .. "\n\n"
|
bsw@405
|
78 body = body .. _("[event mail] Policy: #{policy}", { policy = self.issue.policy.name }) .. "\n\n"
|
bsw@405
|
79 body = body .. _("[event mail] Event: #{event}", { event = self.event_name }) .. "\n\n"
|
bsw@405
|
80 body = body .. _("[event mail] Phase: #{phase}", { phase = self.state_name }) .. "\n\n"
|
bsw@405
|
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 elseif self.suggestion_id then
|
bsw@405
|
85 url = request.get_absolute_baseurl() .. "suggestion/show/" .. self.suggestion_id .. ".html"
|
bsw@405
|
86 else
|
bsw@405
|
87 url = request.get_absolute_baseurl() .. "issue/show/" .. self.issue_id .. ".html"
|
bsw@405
|
88 end
|
bsw@405
|
89
|
bsw@405
|
90 body = body .. _("[event mail] URL: #{url}", { url = url }) .. "\n\n"
|
bsw@405
|
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@405
|
101 :add_order_by("initiative.supporter_count DESC")
|
bsw@405
|
102 :limit(3)
|
bsw@405
|
103 :exec()
|
bsw@405
|
104 for i, initiative in ipairs(initiatives) do
|
bsw@405
|
105 body = body .. _("i#{id}: #{name}", { id = initiative.id, name = initiative.name }) .. "\n"
|
bsw@405
|
106 end
|
bsw@405
|
107 if initiative_count - 3 > 0 then
|
bsw@764
|
108 body = body .. _("and #{count} more initiatives", { count = initiative_count - 3 }) .. "\n"
|
bsw@405
|
109 end
|
bsw@405
|
110 body = body .. "\n"
|
bsw@405
|
111 end
|
bsw@405
|
112
|
bsw@405
|
113 if self.suggestion_id then
|
bsw@405
|
114 local suggestion = Suggestion:by_id(self.suggestion_id)
|
bsw@405
|
115 body = body .. _("#{name}\n\n", { name = suggestion.name })
|
bsw@405
|
116 end
|
bsw@287
|
117
|
bsw@405
|
118 local success = net.send_mail{
|
bsw@405
|
119 envelope_from = config.mail_envelope_from,
|
bsw@405
|
120 from = config.mail_from,
|
bsw@405
|
121 reply_to = config.mail_reply_to,
|
bsw@405
|
122 to = member.notify_email,
|
bsw@406
|
123 subject = subject,
|
bsw@405
|
124 content_type = "text/plain; charset=UTF-8",
|
bsw@405
|
125 content = body
|
bsw@405
|
126 }
|
bsw@405
|
127
|
bsw@405
|
128 end
|
bsw@405
|
129 )
|
bsw@287
|
130 end
|
bsw@287
|
131
|
bsw@287
|
132 end
|
bsw@287
|
133
|
bsw@363
|
134 function Event:send_next_notification()
|
bsw@363
|
135
|
bsw@363
|
136 local notification_sent = NotificationSent:new_selector()
|
bsw@363
|
137 :optional_object_mode()
|
bsw@363
|
138 :for_update()
|
bsw@363
|
139 :exec()
|
bsw@363
|
140
|
bsw@363
|
141 local last_event_id = 0
|
bsw@363
|
142 if notification_sent then
|
bsw@363
|
143 last_event_id = notification_sent.event_id
|
bsw@363
|
144 end
|
bsw@363
|
145
|
bsw@287
|
146 local event = Event:new_selector()
|
bsw@363
|
147 :add_where{ "event.id > ?", last_event_id }
|
bsw@287
|
148 :add_order_by("event.id")
|
bsw@287
|
149 :limit(1)
|
bsw@287
|
150 :optional_object_mode()
|
bsw@287
|
151 :exec()
|
bsw@287
|
152
|
bsw@287
|
153 if event then
|
bsw@363
|
154 if last_event_id == 0 then
|
bsw@363
|
155 db:query{ "INSERT INTO notification_sent (event_id) VALUES (?)", event.id }
|
bsw@363
|
156 else
|
bsw@363
|
157 db:query{ "UPDATE notification_sent SET event_id = ?", event.id }
|
bsw@363
|
158 end
|
bsw@287
|
159
|
bsw@287
|
160 event:send_notification()
|
bsw@364
|
161
|
bsw@364
|
162 return true
|
bsw@287
|
163
|
bsw@287
|
164 end
|
bsw@287
|
165
|
bsw@364
|
166 end
|
bsw@364
|
167
|
bsw@364
|
168 function Event:send_notifications_loop()
|
bsw@364
|
169
|
bsw@364
|
170 while true do
|
bsw@364
|
171 local did_work = Event:send_next_notification()
|
bsw@364
|
172 if not did_work then
|
bsw@364
|
173 print "Sleeping 1 second"
|
bsw@364
|
174 os.execute("sleep 1")
|
bsw@364
|
175 end
|
bsw@364
|
176 end
|
bsw@364
|
177
|
bsw@287
|
178 end |