10 self.class.i_am_the_instance self
13 def self.source_name; "sup://drafts"; end
14 def self.source_id; 9999; end
15 def new_source; @source = Recoverable.new DraftLoader.new; end
18 offset = @source.gen_offset
19 fn = @source.fn_for_offset offset
20 File.open(fn, "w") { |f| yield f }
23 @source.each do |thisoffset, theselabels|
24 m = Message.new :source => @source, :source_info => thisoffset, :labels => theselabels
26 UpdateManager.relay self, :added, m
27 my_message = m if thisoffset == offset
34 docid, entry = Index.load_entry_for_id m.id
35 raise ArgumentError, "can't find entry for draft: #{m.id.inspect}" unless entry
36 raise ArgumentError, "not a draft: source id #{entry[:source_id].inspect}, should be #{DraftManager.source_id.inspect} for #{m.id.inspect} / docno #{docid}" unless entry[:source_id].to_i == DraftManager.source_id
37 Index.drop_entry docid
38 File.delete @source.fn_for_offset(entry[:source_info])
39 UpdateManager.relay self, :single_message_deleted, m
43 class DraftLoader < Source
45 yaml_properties :cur_offset
47 def initialize cur_offset=0
48 dir = Redwood::DRAFT_DIR
49 Dir.mkdir dir unless File.exists? dir
50 super DraftManager.source_name, cur_offset, true, false
54 def id; DraftManager.source_id; end
55 def to_s; DraftManager.source_name; end
56 def uri; DraftManager.source_name; end
62 self.cur_offset = id + 1
63 yield [id, [:draft, :inbox]]
70 while File.exists? fn_for_offset(i)
76 def fn_for_offset o; File.join(@dir, o.to_s); end
78 def load_header offset
79 File.open fn_for_offset(offset) do |f|
80 return MBox::read_header(f)
84 def load_message offset
85 File.open fn_for_offset(offset) do |f|
86 RMail::Mailbox::MBoxReader.new(f).each_message do |input|
87 return RMail::Parser.read(input)
94 File.open fn_for_offset(offset) do |f|
95 until f.eof? || (l = f.gets) =~ /^$/
102 def each_raw_message_line offset
103 File.open(fn_for_offset(offset)) do |f|
104 yield f.gets until f.eof?
108 def raw_message offset
109 IO.readlines(fn_for_offset(offset)).join
112 def start_offset; 0; end
115 ids.empty? ? 0 : (ids.last + 1)
121 Dir.entries(@dir).select { |x| x =~ /^\d+$/ }.map { |x| x.to_i }.sort