2 require 'socket' # just for gethostname!
6 class EditMessageMode < LineCursorMode
7 FORCE_HEADERS = %w(From To Cc Bcc Subject)
8 MULTI_HEADERS = %w(To Cc Bcc)
9 NON_EDITABLE_HEADERS = %w(Message-Id Date)
13 register_keymap do |k|
14 k.add :send_message, "Send message", 'y'
15 k.add :edit, "Edit message", 'e', :enter
16 k.add :save_as_draft, "Save as draft", 'P'
26 @file = Tempfile.new "redwood.#{self.class.name.camel_to_hyphy}"
27 @file.puts header_lines(header - NON_EDITABLE_HEADERS)
32 editor = $config[:editor] || ENV['EDITOR'] || "/usr/bin/vi"
34 mtime = File.mtime @file.path
35 BufferManager.shell_out "#{editor} #{@file.path}"
36 @edited = true if File.mtime(@file.path) > mtime
38 new_header, new_body = parse_file(@file.path)
39 NON_EDITABLE_HEADERS.each { |h| new_header[h] = header[h] if header[h] }
40 handle_new_text new_header, new_body
47 "<#{Time.now.to_i}-redwood-#{rand 10000}@#{Socket.gethostname}>"
57 header = MBox::read_header f
58 body = MBox::read_body f
60 header.delete_if { |k, v| NON_EDITABLE_HEADERS.member? k }
62 next unless MULTI_HEADERS.include?(k) && !v.empty?
63 header[k] = v.split_on_commas.map do |name|
64 (p = ContactManager.resolve(name)) && p.full_address || name
72 def header_lines header
73 force_headers = FORCE_HEADERS.map { |h| make_lines "#{h}:", header[h] }
74 other_headers = (header.keys - FORCE_HEADERS).map do |h|
75 make_lines "#{h}:", header[h]
78 (force_headers + other_headers).flatten.compact
81 def make_lines header, things
86 [header + " " + things]
91 things.map_with_index do |name, i|
92 raise "an array: #{name.inspect} (things #{things.inspect})" if Array === name
96 (" " * (header.length + 1)) + name
97 end + (i == things.length - 1 ? "" : ",")
104 return false unless @edited || BufferManager.ask_yes_or_no("message unedited---really send?")
106 raise "no message id!" unless header["Message-Id"]
109 if header["From"] =~ /<?(\S+@(\S+?))>?$/
112 AccountManager.default_account.email
115 acct = AccountManager.account_for(from_email) || AccountManager.default_account
116 SentManager.write_sent_message(date, from_email) { |f| write_message f, true, date }
117 BufferManager.flash "sending..."
119 IO.popen(acct.sendmail, "w") { |p| write_message p, true, date }
121 BufferManager.kill_buffer buffer
122 BufferManager.flash "Message sent!"
127 DraftManager.write_draft { |f| write_message f, false }
128 BufferManager.kill_buffer buffer
129 BufferManager.flash "Saved for later editing."
133 sigfn = (AccountManager.account_for(header["From"]) ||
134 AccountManager.default_account).sig_file
136 if sigfn && File.exists?(sigfn)
137 ["", "-- "] + File.readlines(sigfn).map { |l| l.chomp }
143 def write_message f, full_header=true, date=Time.now
144 raise ArgumentError, "no pre-defined date: header allowed" if header["Date"]
145 f.puts header_lines(header)
146 f.puts "Date: #{date.rfc2822}"
150 Content-Type: text/plain; charset=us-ascii
151 Content-Disposition: inline
152 User-Agent: Redwood/#{Redwood::VERSION}