]> git.cworth.org Git - sup/blob - lib/sup/poll.rb
preparations for imap
[sup] / lib / sup / poll.rb
1 require 'thread'
2
3 module Redwood
4
5 class PollManager
6   include Singleton
7
8   DELAY = 300
9
10   def initialize
11     @polling = false
12     @last_poll = nil
13     
14     self.class.i_am_the_instance self
15
16     ::Thread.new do
17       while true
18         sleep DELAY / 2
19         if @last_poll.nil? || (Time.now - @last_poll) >= DELAY
20           poll
21         end
22       end
23     end
24   end
25
26   def buffer
27     BufferManager.spawn_unless_exists("<poll for new messages>", :hidden => true) do
28       PollMode.new
29     end
30   end
31
32   def poll
33     BufferManager.flash "Polling for new messages..."
34     num, numi = buffer.mode.poll
35     if num > 0
36       BufferManager.flash "Loaded #{num} new messages, #{numi} to inbox." 
37     else
38       BufferManager.flash "No new messages."
39     end
40     [num, numi]
41   end
42
43   def do_poll
44     return [0, 0] if @polling
45     @polling = true
46     found = {}
47     total_num = 0
48     total_numi = 0
49     Index.usual_sources.each do |source|
50       next if source.done?
51       yield "Loading from #{source}... "
52
53       start_offset = nil
54       num = 0
55       num_inbox = 0
56       source.each do |offset, labels|
57         start_offset ||= offset
58         yield " Found message at #{offset} with labels #{labels * ', '}"
59         begin
60           m = Redwood::Message.new :source => source, :source_info => offset,
61                                    :labels => labels
62           if found[m.id]
63             yield "Skipping duplicate message #{m.id} (source total #{source.total})"
64             next
65           else
66             found[m.id] = true
67           end
68           
69           if Index.add_message m
70             UpdateManager.relay :add, m
71             num += 1
72             total_num += 1
73             total_numi += 1 if m.labels.include? :inbox
74           end
75         rescue Redwood::MessageFormatError => e
76           yield "Ignoring erroneous message at #{source}##{offset}: #{e.message}"
77         end
78
79         if num % 1000 == 0 && num > 0
80           elapsed = Time.now - start
81           pctdone = (offset.to_f - start_offset) / (source.total.to_f - start_offset)
82           remaining = (source.total.to_f - offset.to_f) * (elapsed.to_f / (offset.to_f - start_offset))
83           yield "## #{num} (#{(pctdone * 100.0)}% done) read; #{elapsed.to_time_s} elapsed; est. #{remaining.to_time_s} remaining"
84         end
85       end
86       yield "Found #{num} messages" unless num == 0
87     end
88     yield "Done polling; loaded #{total_num} new messages total"
89     @last_poll = Time.now
90     @polling = false
91     [total_num, total_numi]
92   end
93 end
94
95 end