| 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 |