sup 0.0.1

data/lib/sup/update.rb

@@ -0,0 +1,21 @@
+module Redwood
+
+class UpdateManager
+  include Singleton
+
+  def initialize
+    @targets = {}
+    self.class.i_am_the_instance self
+  end
+
+  def register o; @targets[o] = true; end
+  def unregister o; @targets.delete o; end
+
+  def relay type, *args
+    meth = "handle_#{type}_update".intern
+    @targets.keys.each { |o| o.send meth, *args if o.respond_to? meth }
+    BufferManager.draw_screen ## TODO: think about this
+  end
+end
+
+end

data/lib/sup/util.rb

@@ -0,0 +1,260 @@
+class Module
+  def bool_reader *args
+    args.each { |sym| class_eval %{ def #{sym}?; @#{sym}; end } }
+  end
+  def bool_writer *args; attr_writer(*args); end
+  def bool_accessor *args
+    bool_reader(*args)
+    bool_writer(*args)
+  end
+end
+
+class Object
+  def ancestors
+    ret = []
+    klass = self.class
+
+    until klass == Object
+      ret << klass
+      klass = klass.superclass
+    end
+    ret
+  end
+end
+
+class String
+  def camel_to_hyphy
+    self.gsub(/([a-z])([A-Z0-9])/, '\1-\2').downcase
+  end
+
+  def find_all_positions x
+    ret = []
+    start = 0
+    while start < length
+      pos = index x, start
+      break if pos.nil?
+      ret << pos
+      start = pos + 1
+    end
+    ret
+  end
+
+  def ucfirst
+    self[0 .. 0].upcase + self[1 .. -1]
+  end
+
+  ## found on teh internets
+  def split_on_commas
+    split(/,\s*(?=(?:[^"]*"[^"]*")*(?![^"]*"))/)
+  end
+
+  def wrap len
+    ret = []
+    s = self
+    while s.length > len
+      cut = s[0 ... len].rindex(/\s/)
+      if cut
+        ret << s[0 ... cut] + "\n"
+        s = s[(cut + 1) .. -1]
+      else
+        ret << s[0 ... len] + "\n"
+        s = s[len .. -1]
+      end
+    end
+    ret << s
+  end
+end
+
+class Numeric
+  def clamp min, max
+    if self < min
+      min
+    elsif self > max
+      max
+    else
+      self
+    end
+  end
+
+  def in? range; range.member? self; end
+end
+
+class Fixnum
+  def num_digits base=10
+    return 1 if self == 0
+    1 + (Math.log(self) / Math.log(10)).floor
+  end
+  
+  def to_character
+    if self < 128 && self >= 0
+      chr
+    else
+      "<#{self}>"
+    end
+  end
+end
+
+class Hash
+  def - o
+    Hash[*self.map { |k, v| [k, v] unless o.include? k }.compact.flatten_one_level]
+  end
+
+  def select_by_value v=true
+    select { |k, vv| vv == v }.map { |x| x.first }
+  end
+end
+
+module Enumerable
+  def map_with_index
+    ret = []
+    each_with_index { |x, i| ret << yield(x, i) }
+    ret
+  end
+
+  def sum; inject(0) { |x, y| x + y }; end
+  
+  def map_to_hash
+    ret = {}
+    each { |x| ret[x] = yield(x) }
+    ret
+  end
+
+  # like find, except returns the value of the block rather than the
+  # element itself.
+  def argfind
+    ret = nil
+    find { |e| ret ||= yield(e) }
+    ret || nil # force
+  end
+
+  def argmin
+    best, bestval = nil, nil
+    each do |e|
+      val = yield e
+      if bestval.nil? || val < bestval
+        best, bestval = e, val
+      end
+    end
+    best
+  end
+end
+
+class Array
+  def flatten_one_level
+    inject([]) { |a, e| a + e }
+  end
+
+  def to_h; Hash[*flatten]; end
+  def rest; self[1..-1]; end
+
+  def to_boolean_h; Hash[*map { |x| [x, true] }.flatten]; end
+  
+  ## apparently uniq doesn't use ==. wtf.
+  def remove_successive_dupes
+    ret = []
+    last = nil
+    each do |e|
+      unless e == last
+        ret << e
+        last = e
+      end
+    end
+    ret
+  end
+end
+
+class Time
+  def to_indexable_s
+    sprintf "%012d", self
+  end
+
+  def nearest_hour
+    if min < 30
+      self
+    else
+      self + (60 - min) * 60
+    end
+  end
+
+  def midnight # within a second
+    self - (hour * 60 * 60) - (min * 60) - sec
+  end
+
+  def is_the_same_day? other
+    (midnight - other.midnight).abs < 1
+  end
+
+  def is_the_day_before? other
+    other.midnight - midnight <=  24 * 60 * 60 + 1
+  end
+
+  def to_nice_distance_s from=Time.now
+    later_than = (self < from)
+    diff = (self.to_i - from.to_i).abs.to_f
+    text = 
+      [ ["second", 60],
+        ["minute", 60],
+        ["hour", 24],
+        ["day", 7],
+        ["week", 4], # heh heh
+        ["month", 12],
+        ["year", nil],
+      ].argfind do |unit, size|
+        if diff <= 1
+          "one #{unit}"
+        elsif size.nil? || diff < size
+          "#{diff} #{unit}s"
+        else
+          diff = (diff / size.to_f).round
+          false
+        end
+      end
+    if later_than
+      text + " ago"
+    else
+      "in " + text
+    end  
+  end
+
+  TO_NICE_S_MAX_LEN = 11 # e.g. "Jul 31 2005"
+  def to_nice_s from=Time.now
+    if year != from.year
+      strftime "%b %e %Y"
+    elsif month != from.month
+      strftime "%b %e"
+    else
+      if is_the_same_day? from
+        strftime("%l:%M%P")
+      elsif is_the_day_before? from
+        "Yest."  + nearest_hour.strftime("%l%P")
+      else
+        strftime "%b %e"
+      end
+    end
+  end
+end
+
+## simple singleton module. far less complete and insane than the ruby
+## standard library one, but automatically forwards methods calls and
+## allows for constructors that take arguments.
+##
+## You must have #initialize call "self.class.i_am_the_instance self"
+## at some point or everything will fail horribly
+module Singleton
+  module ClassMethods
+    def instance; @instance; end
+    def instantiated?; defined?(@instance) && !@instance.nil?; end
+    def method_missing meth, *a, &b
+      raise "no instance defined!" unless defined? @instance
+      @instance.send meth, *a, &b
+    end
+    def i_am_the_instance o
+      raise "there can be only one! (instance)" if defined? @instance
+      @instance = o
+    end
+  end
+
+  def self.included klass
+    klass.extend ClassMethods
+  end
+end

metadata

@@ -0,0 +1,123 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.8.11
+specification_version: 1
+name: sup
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+date: 2006-11-28 00:00:00 -08:00
+summary: A console-based email client with the best features of GMail, mutt, and emacs. Features full text search, labels, tagged operations, multiple buffers, recent contacts, and more.
+require_paths: 
+- lib
+email: wmorgan-sup@masanjin.net
+homepage: http://sup.rubyforge.org
+rubyforge_project: sup
+description: Sup is an attempt to take the UI innovations of web-based email readers (ok, really just GMail) and to combine them with the traditional wholesome goodness of a console-based email client.  Sup is designed to work with massive amounts of email, potentially spread out across different mbox files, IMAP folders, and GMail accounts, and to pull them all together into a single interface.  The goal of Sup is to become the email client of choice for nerds everywhere.
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+authors: 
+- William Morgan
+files: 
+- History.txt
+- Manifest.txt
+- README.txt
+- LICENSE
+- Rakefile
+- doc/FAQ.txt
+- doc/Philosophy.txt
+- doc/TODO
+- bin/sup
+- bin/sup-import
+- lib/sup/mbox/loader.rb
+- lib/sup/modes/line-cursor-mode.rb
+- lib/sup/modes/reply-mode.rb
+- lib/sup/modes/scroll-mode.rb
+- lib/sup/modes/resume-mode.rb
+- lib/sup/modes/contact-list-mode.rb
+- lib/sup/modes/forward-mode.rb
+- lib/sup/modes/label-search-results-mode.rb
+- lib/sup/modes/search-results-mode.rb
+- lib/sup/modes/compose-mode.rb
+- lib/sup/modes/poll-mode.rb
+- lib/sup/modes/edit-message-mode.rb
+- lib/sup/modes/thread-index-mode.rb
+- lib/sup/modes/person-search-results-mode.rb
+- lib/sup/modes/inbox-mode.rb
+- lib/sup/modes/thread-view-mode.rb
+- lib/sup/modes/log-mode.rb
+- lib/sup/modes/buffer-list-mode.rb
+- lib/sup/modes/text-mode.rb
+- lib/sup/modes/label-list-mode.rb
+- lib/sup/modes/help-mode.rb
+- lib/sup/logger.rb
+- lib/sup/util.rb
+- lib/sup/update.rb
+- lib/sup/label.rb
+- lib/sup/message.rb
+- lib/sup/mode.rb
+- lib/sup/keymap.rb
+- lib/sup/textfield.rb
+- lib/sup/contact.rb
+- lib/sup/account.rb
+- lib/sup/draft.rb
+- lib/sup/mbox.rb
+- lib/sup/poll.rb
+- lib/sup/person.rb
+- lib/sup/index.rb
+- lib/sup/thread.rb
+- lib/sup/buffer.rb
+- lib/sup/sent.rb
+- lib/sup/tagger.rb
+- lib/sup/colormap.rb
+- lib/sup.rb
+test_files: []
+
+rdoc_options: []
+
+extra_rdoc_files: []
+
+executables: 
+- sup
+- sup-import
+extensions: []
+
+requirements: []
+
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: ferret
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Version::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 0.10.13
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: ncurses
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Version::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 0.9.1
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: rmail
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Version::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0.17"
+    version: