git.cworth.org Git - sup/blob - lib/sup/draft.rb

   1 module Redwood
   2
   3 class DraftManager
   4   include Singleton
   5
   6   attr_accessor :source
   7   def initialize dir
   8     @dir = dir
   9     @source = nil
  10     self.class.i_am_the_instance self
  11   end
  12
  13   def self.source_name; "sup://drafts"; end
  14   def self.source_id; 9999; end
  15   def new_source; @source = DraftLoader.new; end
  16
  17   def write_draft
  18     offset = @source.gen_offset
  19     fn = @source.fn_for_offset offset
  20     File.open(fn, "w") { |f| yield f }
  21
  22     @source.each do |offset, labels|
  23       m = Message.new :source => @source, :source_info => offset, :labels => labels
  24       Index.add_message m
  25       UpdateManager.relay :add, m
  26     end
  27   end
  28
  29   def discard mid
  30     docid, entry = Index.load_entry_for_id mid
  31     raise ArgumentError, "can't find entry for draft: #{mid.inspect}" unless entry
  32     raise ArgumentError, "not a draft: source id #{entry[:source_id].inspect}, should be #{DraftManager.source_id.inspect} for #{mid.inspect} / docno #{docid}" unless entry[:source_id].to_i == DraftManager.source_id
  33     Index.drop_entry docid
  34     File.delete @source.fn_for_offset(entry[:source_info])
  35     UpdateManager.relay :delete, mid
  36   end
  37 end
  38
  39 class DraftLoader < Source
  40   attr_accessor :dir
  41
  42   def initialize cur_offset=0
  43     dir = Redwood::DRAFT_DIR
  44     Dir.mkdir dir unless File.exists? dir
  45     super "draft://#{dir}", cur_offset, true, false
  46     @dir = dir
  47   end
  48
  49   def id; DraftManager.source_id; end
  50   def to_s; DraftManager.source_name; end
  51   def uri; DraftManager.source_name; end
  52
  53   def each
  54     Dir.entries(@dir).select { |x| x =~ /^\d+$/ }.sort_by { |x| x.to_i }.each { |id| yield [id, [:draft]] }
  55   end
  56
  57   def gen_offset
  58     i = cur_offset
  59     while File.exists? fn_for_offset(i)
  60       i += 1
  61     end
  62     i
  63   end
  64
  65   def fn_for_offset o; File.join(@dir, o.to_s); end
  66
  67   def load_header offset
  68     File.open fn_for_offset(offset) do |f|
  69       return MBox::read_header(f)
  70     end
  71   end
  72
  73   def load_message offset
  74     File.open fn_for_offset(offset) do |f|
  75       RMail::Mailbox::MBoxReader.new(f).each_message do |input|
  76         return RMail::Parser.read(input)
  77       end
  78     end
  79   end
  80
  81   def raw_header offset
  82     ret = ""
  83     File.open fn_for_offset(offset) do |f|
  84       until f.eof? || (l = f.gets) =~ /^$/
  85         ret += l
  86       end
  87     end
  88     ret
  89   end
  90
  91   def raw_full_message offset
  92     ret = ""
  93     File.open fn_for_offset(offset) do |f|
  94       ret += l until f.eof?
  95     end
  96     ret
  97   end
  98
  99   def start_offset; 0; end
 100   def end_offset; Dir.new(@dir).entries.sort.last.to_i; end
 101 end
 102
 103 Redwood::register_yaml(DraftLoader, %w(cur_offset))
 104
 105 end