Class: Redwood::ThreadViewMode
Defined Under Namespace
Classes: ChunkLayout, MessageLayout
Constant Summary
collapse
- DATE_FORMAT =
"%B %e %Y %l:%M%p"
- INDENT_SPACES =
how many spaces to indent child messages
2
Instance Attribute Summary
#curpos
Attributes inherited from ScrollMode
#botline, #leftcol, #status, #topline
Attributes inherited from Mode
#buffer
Instance Method Summary
collapse
#alias_contact
#draw
Methods inherited from ScrollMode
#at_bottom?, #at_top?, #cancel_search!, #col_jump, #col_left, #col_right, #continue_search_in_buffer, #draw, #ensure_mode_validity, #half_page_down, #half_page_up, #in_search?, #jump_to_col, #jump_to_end, #jump_to_left, #jump_to_line, #jump_to_start, #line_down, #line_up, #page_down, #page_up, #resize, #rightcol, #search_goto_line, #search_goto_pos, #search_in_buffer, #search_start_line
Methods inherited from Mode
#blur, #cancel_search!, #draw, #focus, #handle_input, #help_text, #in_search?, keymap, keymaps, #killable?, load_all_modes, make_name, #name, #pipe_to_process, register_keymap, #resize, #resolve_input, #save_to_file, #status, #unsaved?
Constructor Details
#initialize(thread, hidden_labels = [], index_mode = nil) ⇒ ThreadViewMode
there are a couple important instance variables we hold to format the thread and to provide line-based functionality. @layout is a map from Messages to MessageLayouts, and @chunk_layout from Chunks to ChunkLayouts. @message_lines is a map from row #s to Message objects. @chunk_lines is a map from row #s to Chunk objects. @person_lines is a map from row #s to Person objects.
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
|
# File 'lib/sup/modes/thread_view_mode.rb', line 117
def initialize thread, hidden_labels=[], index_mode=nil
super :slip_rows => $config[:slip_rows]
@thread = thread
@hidden_labels = hidden_labels
@index_mode = index_mode
@dying = false
@layout = SavingHash.new { MessageLayout.new }
@chunk_layout = SavingHash.new { ChunkLayout.new }
earliest, latest = nil, nil
latest_date = nil
altcolor = false
@thread.each do |m, d, p|
next unless m
earliest ||= m
@layout[m].state = initial_state_for m
@layout[m].toggled_state = false
@layout[m].color = altcolor ? :alternate_patina_color : :message_patina_color
@layout[m].star_color = altcolor ? :alternate_starred_patina_color : :starred_patina_color
@layout[m].orig_new = m.has_label? :read
altcolor = !altcolor
if latest_date.nil? || m.date > latest_date
latest_date = m.date
latest = m
end
end
@wrap = true
@layout[latest].state = :open if @layout[latest].state == :closed
@layout[earliest].state = :detailed if earliest.has_label?(:unread) || @thread.size == 1
end
|
Instance Method Details
167
|
# File 'lib/sup/modes/thread_view_mode.rb', line 167
def [] i; @text[i]; end
|
#activate_chunk ⇒ Object
called when someone presses enter when the cursor is highlighting a chunk. for expandable chunks (including messages) we toggle open/closed state; for viewable chunks (like attachments) we view.
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
|
# File 'lib/sup/modes/thread_view_mode.rb', line 328
def activate_chunk
chunk = @chunk_lines[curpos] or return
if chunk.is_a? Chunk::Text
chunk = @message_lines[curpos]
end
layout = if chunk.is_a?(Message)
@layout[chunk]
elsif chunk.expandable?
@chunk_layout[chunk]
end
if layout
layout.state = (layout.state != :closed ? :closed : :open)
update
elsif chunk.viewable?
view chunk
end
if chunk.is_a?(Message) && $config[:jump_to_open_message]
jump_to_message chunk
jump_to_next_open if layout.state == :closed
end
end
|
261
262
263
264
265
|
# File 'lib/sup/modes/thread_view_mode.rb', line 261
def alias
p = @person_lines[curpos] or return
alias_contact p
update
end
|
#align_current_message ⇒ Object
487
488
489
490
|
# File 'lib/sup/modes/thread_view_mode.rb', line 487
def align_current_message
m = @message_lines[curpos] or return
jump_to_message m, true
end
|
#archive_and_kill ⇒ Object
579
|
# File 'lib/sup/modes/thread_view_mode.rb', line 579
def archive_and_kill; archive_and_then :kill end
|
#archive_and_next ⇒ Object
585
|
# File 'lib/sup/modes/thread_view_mode.rb', line 585
def archive_and_next; archive_and_then :next end
|
#archive_and_prev ⇒ Object
591
|
# File 'lib/sup/modes/thread_view_mode.rb', line 591
def archive_and_prev; archive_and_then :prev end
|
#archive_and_then(op) ⇒ Object
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
|
# File 'lib/sup/modes/thread_view_mode.rb', line 231
def bounce
m = @message_lines[curpos] or return
to = BufferManager.ask_for_contacts(:people, "Bounce To: ") or return
defcmd = AccountManager.default_account.bounce_sendmail
cmd = case (hookcmd = HookManager.run "bounce-command", :from => m.from, :to => to)
when nil, /^$/ then defcmd
else hookcmd
end + ' ' + to.map { |t| t.email }.join(' ')
bt = to.size > 1 ? "#{to.size} recipients" : to.to_s
if BufferManager.ask_yes_or_no "Really bounce to #{bt}?"
debug "bounce command: #{cmd}"
begin
IO.popen(cmd, 'w') do |sm|
sm.puts m.raw_message
end
raise SendmailCommandFailed, "Couldn't execute #{cmd}" unless $? == 0
m.add_label :forwarded
Index.save_message m
rescue SystemCallError, SendmailCommandFailed => e
warn "problem sending mail: #{e.message}"
BufferManager.flash "Problem sending mail: #{e.message}"
end
end
end
|
#buffer=(b) ⇒ Object
a little hacky—since regen_text can depend on buffer features like the content_width, we don’t call it in the constructor, and instead call it here, which is set before we’re responsible for drawing ourself.
172
173
174
175
|
# File 'lib/sup/modes/thread_view_mode.rb', line 172
def buffer= b
super
regen_text
end
|
575
576
577
|
# File 'lib/sup/modes/thread_view_mode.rb', line 575
def cleanup
@layout = @chunk_layout = @text = nil end
|
#collapse_non_new_messages ⇒ Object
560
561
562
563
|
# File 'lib/sup/modes/thread_view_mode.rb', line 560
def collapse_non_new_messages
@layout.each { |m, l| l.state = l.orig_new ? :open : :closed }
update
end
|
#delete_and_kill ⇒ Object
581
|
# File 'lib/sup/modes/thread_view_mode.rb', line 581
def delete_and_kill; delete_and_then :kill end
|
#delete_and_next ⇒ Object
587
|
# File 'lib/sup/modes/thread_view_mode.rb', line 587
def delete_and_next; delete_and_then :next end
|
#delete_and_prev ⇒ Object
593
|
# File 'lib/sup/modes/thread_view_mode.rb', line 593
def delete_and_prev; delete_and_then :prev end
|
#do_nothing_and_kill ⇒ Object
583
|
# File 'lib/sup/modes/thread_view_mode.rb', line 583
def do_nothing_and_kill; do_nothing_and_then :kill end
|
#do_nothing_and_next ⇒ Object
589
|
# File 'lib/sup/modes/thread_view_mode.rb', line 589
def do_nothing_and_next; do_nothing_and_then :next end
|
#do_nothing_and_prev ⇒ Object
595
|
# File 'lib/sup/modes/thread_view_mode.rb', line 595
def do_nothing_and_prev; do_nothing_and_then :prev end
|
#do_nothing_and_then(op) ⇒ Object
644
645
646
|
# File 'lib/sup/modes/thread_view_mode.rb', line 644
def do_nothing_and_then op
dispatch op
end
|
#draw_line(ln, opts = {}) ⇒ Object
159
160
161
162
163
164
165
|
# File 'lib/sup/modes/thread_view_mode.rb', line 159
def draw_line ln, opts={}
if ln == curpos
super ln, :highlight => true
else
super
end
end
|
#edit_as_new ⇒ Object
353
354
355
356
357
358
|
# File 'lib/sup/modes/thread_view_mode.rb', line 353
def edit_as_new
m = @message_lines[curpos] or return
mode = ComposeMode.new(:body => m.quotable_body_lines, :to => m.to, :cc => m.cc, :subj => m.subj, :bcc => m.bcc, :refs => m.refs, :replytos => m.replytos)
BufferManager.spawn "edit as new", mode
mode.edit_message
end
|
#expand_all_messages ⇒ Object
553
554
555
556
557
558
|
# File 'lib/sup/modes/thread_view_mode.rb', line 553
def expand_all_messages
@global_message_state ||= :closed
@global_message_state = (@global_message_state == :closed ? :open : :closed)
@layout.each { |m, l| l.state = @global_message_state }
update
end
|
#expand_all_quotes ⇒ Object
565
566
567
568
569
570
571
572
573
|
# File 'lib/sup/modes/thread_view_mode.rb', line 565
def expand_all_quotes
if(m = @message_lines[curpos])
quotes = m.chunks.select { |c| (c.is_a?(Chunk::Quote) || c.is_a?(Chunk::Signature)) && c.lines.length > 1 }
numopen = quotes.inject(0) { |s, c| s + (@chunk_layout[c].state == :open ? 1 : 0) }
newstate = numopen > quotes.length / 2 ? :closed : :open
quotes.each { |c| @chunk_layout[c].state = newstate }
update
end
end
|
#jump_to_first_open ⇒ Object
444
445
446
447
448
449
450
451
|
# File 'lib/sup/modes/thread_view_mode.rb', line 444
def jump_to_first_open
m = @message_lines[0] or return
if @layout[m].state != :closed
jump_to_message m else
jump_to_next_open end
end
|
#jump_to_message(m, force_alignment = false) ⇒ Object
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
|
# File 'lib/sup/modes/thread_view_mode.rb', line 530
def jump_to_message m, force_alignment=false
l = @layout[m]
message_left = l.depth * INDENT_SPACES
message_right = message_left + l.width
left = if force_alignment message_left
else leftmost = [message_left, message_right - buffer.content_width + 1].min
rightmost = message_left
leftcol.clamp(leftmost, rightmost)
end
jump_to_line l.top jump_to_col left set_cursor_pos l.top end
|
#jump_to_next_and_open ⇒ Object
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
|
# File 'lib/sup/modes/thread_view_mode.rb', line 453
def jump_to_next_and_open
return continue_search_in_buffer if in_search?
m = (curpos ... @message_lines.length).argfind { |i| @message_lines[i] }
return unless m
if @layout[m].toggled_state == true
@layout[m].state = :closed
@layout[m].toggled_state = false
update
end
nextm = @layout[m].next
if @layout[nextm].state == :closed
@layout[nextm].state = :open
@layout[nextm].toggled_state = true
end
jump_to_message nextm if nextm
update if @layout[nextm].toggled_state
end
|
#jump_to_next_open(force_alignment = nil) ⇒ Object
476
477
478
479
480
481
482
483
484
485
|
# File 'lib/sup/modes/thread_view_mode.rb', line 476
def jump_to_next_open force_alignment=nil
return continue_search_in_buffer if in_search? m = (curpos ... @message_lines.length).argfind { |i| @message_lines[i] }
return unless m
while nextm = @layout[m].next
break if @layout[nextm].state != :closed
m = nextm
end
jump_to_message nextm, force_alignment if nextm
end
|
#jump_to_prev_and_open(force_alignment = nil) ⇒ Object
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
|
# File 'lib/sup/modes/thread_view_mode.rb', line 492
def jump_to_prev_and_open force_alignment=nil
m = (0 .. curpos).to_a.reverse.argfind { |i| @message_lines[i] }
return unless m
if @layout[m].toggled_state == true
@layout[m].state = :closed
@layout[m].toggled_state = false
update
end
nextm = @layout[m].prev
if @layout[nextm].state == :closed
@layout[nextm].state = :open
@layout[nextm].toggled_state = true
end
jump_to_message nextm if nextm
update if @layout[nextm].toggled_state
end
|
#jump_to_prev_open ⇒ Object
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
|
# File 'lib/sup/modes/thread_view_mode.rb', line 512
def jump_to_prev_open
m = (0 .. curpos).to_a.reverse.argfind { |i| @message_lines[i] } return unless m
top = @layout[m].top
if curpos == top
while(prevm = @layout[m].prev)
break if @layout[prevm].state != :closed
m = prevm
end
jump_to_message prevm if prevm
else
jump_to_message m
end
end
|
166
|
# File 'lib/sup/modes/thread_view_mode.rb', line 166
def lines; @text.length; end
|
#pipe_message ⇒ Object
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
|
# File 'lib/sup/modes/thread_view_mode.rb', line 670
def pipe_message
chunk = @chunk_lines[curpos]
chunk = nil unless chunk.is_a?(Chunk::Attachment)
message = @message_lines[curpos] unless chunk
return unless chunk || message
command = BufferManager.ask(:shell, "pipe command: ")
return if command.nil? || command.empty?
output = pipe_to_process(command) do |stream|
if chunk
stream.print chunk.raw_content
else
message.each_raw_message_line { |l| stream.print l }
end
end
if output
BufferManager.spawn "Output of '#{command}'", TextMode.new(output.ascii)
else
BufferManager.flash "'#{command}' done!"
end
end
|
411
412
413
414
415
416
417
418
|
# File 'lib/sup/modes/thread_view_mode.rb', line 411
def publish
chunk = @chunk_lines[curpos] or return
if HookManager.enabled? "publish"
HookManager.run "publish", :chunk => chunk
else
BufferManager.flash "Publishing hook not defined."
end
end
|
#reply(type_arg = nil) ⇒ Object
197
198
199
200
201
|
# File 'lib/sup/modes/thread_view_mode.rb', line 197
def reply type_arg=nil
m = @message_lines[curpos] or return
mode = ReplyMode.new m, type_arg
BufferManager.spawn "Reply to #{m.subj}", mode
end
|
#reply_all ⇒ Object
203
|
# File 'lib/sup/modes/thread_view_mode.rb', line 203
def reply_all; reply :all; end
|
#save_all_to_disk ⇒ Object
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
|
# File 'lib/sup/modes/thread_view_mode.rb', line 385
def save_all_to_disk
m = @message_lines[curpos] or return
default_dir = ($config[:default_attachment_save_dir] || ".")
folder = BufferManager.ask_for_filename :filename, "Save all attachments to folder: ", default_dir, true
return unless folder
num = 0
num_errors = 0
m.chunks.each do |chunk|
next unless chunk.is_a?(Chunk::Attachment)
fn = File.join(folder, Shellwords.escape(chunk.filename))
num_errors += 1 unless save_to_file(fn, false) { |f| f.print chunk.raw_content }
num += 1
end
if num == 0
BufferManager.flash "Didn't find any attachments!"
else
if num_errors == 0
BufferManager.flash "Wrote #{num.pluralize 'attachment'} to #{folder}."
else
BufferManager.flash "Wrote #{(num - num_errors).pluralize 'attachment'} to #{folder}; couldn't write #{num_errors} of them (see log)."
end
end
end
|
#save_to_disk ⇒ Object
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
|
# File 'lib/sup/modes/thread_view_mode.rb', line 360
def save_to_disk
chunk = @chunk_lines[curpos] or return
case chunk
when Chunk::Attachment
default_dir = $config[:default_attachment_save_dir]
default_dir = ENV["HOME"] if default_dir.nil? || default_dir.empty?
default_fn = File.expand_path File.join(default_dir, Shellwords.escape(chunk.filename))
fn = BufferManager.ask_for_filename :filename, "Save attachment to file or directory: ", default_fn, true
if fn and File.directory? fn
fn = File.join(fn, Shellwords.escape(chunk.filename))
end
save_to_file(fn) { |f| f.print chunk.raw_content } if fn
else
m = @message_lines[curpos]
fn = BufferManager.ask_for_filename :filename, "Save message to file: "
return unless fn
save_to_file(fn) do |f|
m.each_raw_message_line { |l| f.print l }
end
end
end
|
267
268
269
270
271
272
|
# File 'lib/sup/modes/thread_view_mode.rb', line 267
def search
p = @person_lines[curpos] or return
mode = PersonSearchResultsMode.new [p]
BufferManager.spawn "Search for #{p.name}", mode
mode.load_threads :num => mode.buffer.content_height
end
|
#show_message ⇒ Object
184
185
186
187
188
189
|
# File 'lib/sup/modes/thread_view_mode.rb', line 184
def show_message
m = @message_lines[curpos] or return
BufferManager.spawn_unless_exists("Raw message for #{m.id}") do
TextMode.new m.raw_message.ascii
end
end
|
#spam_and_kill ⇒ Object
580
|
# File 'lib/sup/modes/thread_view_mode.rb', line 580
def spam_and_kill; spam_and_then :kill end
|
#spam_and_next ⇒ Object
586
|
# File 'lib/sup/modes/thread_view_mode.rb', line 586
def spam_and_next; spam_and_then :next end
|
#spam_and_prev ⇒ Object
592
|
# File 'lib/sup/modes/thread_view_mode.rb', line 592
def spam_and_prev; spam_and_then :prev end
|
#subscribe_to_list ⇒ Object
205
206
207
208
209
210
211
212
|
# File 'lib/sup/modes/thread_view_mode.rb', line 205
def subscribe_to_list
m = @message_lines[curpos] or return
if m.list_subscribe && m.list_subscribe =~ /<mailto:(.*?)(\?subject=(.*?))?>/
ComposeMode.spawn_nicely :from => AccountManager.account_for(m.recipient_email), :to => [Person.from_address($1)], :subj => ($3 || "subscribe")
else
BufferManager.flash "Can't find List-Subscribe header for this message."
end
end
|
191
192
193
194
195
|
# File 'lib/sup/modes/thread_view_mode.rb', line 191
def
m = @message_lines[curpos] or return
@layout[m].state = (@layout[m].state == :detailed ? :open : :detailed)
update
end
|
#toggle_label(m, label) ⇒ Object
311
312
313
314
315
316
317
318
319
320
321
322
|
# File 'lib/sup/modes/thread_view_mode.rb', line 311
def toggle_label m, label
if m.has_label? label
m.remove_label label
else
m.add_label label
end
update
UpdateManager.relay self, :single_message_labeled, m
Index.save_thread @thread
end
|
#toggle_new ⇒ Object
306
307
308
309
|
# File 'lib/sup/modes/thread_view_mode.rb', line 306
def toggle_new
m = @message_lines[curpos] or return
toggle_label m, :unread
end
|
#toggle_starred ⇒ Object
301
302
303
304
|
# File 'lib/sup/modes/thread_view_mode.rb', line 301
def toggle_starred
m = @message_lines[curpos] or return
toggle_label m, :starred
end
|
#toggle_wrap ⇒ Object
153
154
155
156
157
|
# File 'lib/sup/modes/thread_view_mode.rb', line 153
def toggle_wrap
@wrap = !@wrap
regen_text
buffer.mark_dirty if buffer
end
|
#unread_and_kill ⇒ Object
582
|
# File 'lib/sup/modes/thread_view_mode.rb', line 582
def unread_and_kill; unread_and_then :kill end
|
#unread_and_next ⇒ Object
588
|
# File 'lib/sup/modes/thread_view_mode.rb', line 588
def unread_and_next; unread_and_then :next end
|
#unread_and_prev ⇒ Object
594
|
# File 'lib/sup/modes/thread_view_mode.rb', line 594
def unread_and_prev; unread_and_then :prev end
|
#unread_and_then(op) ⇒ Object
636
637
638
639
640
641
642
|
# File 'lib/sup/modes/thread_view_mode.rb', line 636
def unread_and_then op
dispatch op do
@thread.apply_label :unread
UpdateManager.relay self, :unread, @thread.first
Index.save_thread @thread
end
end
|
#unsubscribe_from_list ⇒ Object
214
215
216
217
218
219
220
221
|
# File 'lib/sup/modes/thread_view_mode.rb', line 214
def unsubscribe_from_list
m = @message_lines[curpos] or return
if m.list_unsubscribe && m.list_unsubscribe =~ /<mailto:(.*?)(\?subject=(.*?))?>/
ComposeMode.spawn_nicely :from => AccountManager.account_for(m.recipient_email), :to => [Person.from_address($1)], :subj => ($3 || "unsubscribe")
else
BufferManager.flash "Can't find List-Unsubscribe header for this message."
end
end
|