needy 0.0.1

data/README

@@ -0,0 +1,83 @@
+Library to help you know which projects are getting a bit stale.
+
+Sometimes it slowly creeps up on you that you haven't done anything with X in
+a few weeks... or even months, and next thing you know getting started again
+seems somewhat hard.  I am pretty prone to this kind of problem; I guess that
+part of my brain doesn't work very well.  So this is a simple attempt to
+factor that part of my brain out in to some code.
+
+Sample output:
+
+             $FRIEND  475.0 hours
+              $BUDDY  256.6 hours
+                  lj  235.0 hours
+                  ol  191.9 hours
+              tumblr  167.6 hours
+               m0x65   94.6 hours
+              flickr   46.8 hours
+             twitter   24.3 hours
+                $GIG   22.0 hours
+                $PAL    1.1 hours
+
+INSTALLATION
+~~~~~~~~~~~~
+
+Make sure you have gemcutter.org in your list of gem sources
+
+  gem install gemcutter
+  gem tumble
+
+then just install the gem
+
+  gem install needy
+
+USAGE
+~~~~~
+
+Put something like the below in ~/bin/needy
+
+  #!/usr/bin/env ruby
+  require 'rubygems'
+  require 'needy'
+
+  include Needy
+
+  # Your gmail account
+  gmail :username => 'USERNAME@gmail.com', :password => 'PASSWORD' do
+    recipient :aofriend, 'an.old.friend'  # List one recipient per line
+    recipient :buddy                      # When was the last time you emailed buddy?
+    recipient :pal
+    recipient 'client.com'
+  end
+
+  # LiveJournal
+  feed :lj, 'http://USERNAME.livejournal.com/data/atom'
+ 
+  # Twitter
+  feed :twitter, 'http://twitter.com/statuses/user_timeline/SOME_NUMBER.rss'
+
+  # flickr
+  feed :flickr,
+    'http://api.flickr.com/services/feeds/photos_public.gne?id=SOME_NUMBER&lang=en-us&format=atom'
+
+  # Tumblr
+  feed :tumblr, 'http://TUMBLR_URL/rss'
+
+  # A git-svn setup, with other authors.
+  git :ep, '~/s/ep', 'remotes/git-svn' do |repo|
+    repo.exec 'svn fetch'
+    repo.author 'mattl'
+  end
+
+  # A git project I sometimes work on from other places
+  git :ol, '~/s/ol', 'origin/master' do |repo|
+    repo.exec 'fetch'
+  end
+
+  # A git project I never need to fetch
+  git :m0x65, '~/s/m0x65', 'prod/master'
+
+  # Print a line for each project
+  whens.sort_by{|k,v| v}.each do |k,v|
+    printf "%20.20s %6.1f hours\n", k, (Time.now - Time.at(v))/60/60
+  end

data/lib/needy.rb

@@ -0,0 +1,103 @@
+#!/usr/bin/env ruby
+
+require 'rubygems'
+require 'feed_tools'
+require 'net/imap'
+require 'time'
+
+module Needy
+  @@when = {}
+  @@threads = []
+
+  def imap_server host, args
+    args = { :port => 143, :ssl  => false }.merge(args)
+    @@server = Net::IMAP.new host, args[:port], args[:ssl]
+    @@server.login args[:username], args[:password]
+    @@server.select args[:folder] if args[:folder]
+    thr { yield }
+  end
+
+  def gmail args, &block
+    self.imap_server 'imap.gmail.com', { :port => 993,
+                                         :ssl  => true,
+                                         :folder => '[Gmail]/Sent Mail' }.merge(args), &block
+  end
+
+  def recipient abbrev, *others
+    recips = [abbrev.to_s] + others.map(&:to_s)
+    query = recips.map{|whom| "TO #{whom}"}.reduce{|memo,q| "OR #{q} #{memo}"}
+    last_id = @@server.search(query).max
+    set abbrev, Time.parse(@@server.fetch(last_id, 'envelope')[0].attr['ENVELOPE'].date)
+  end
+
+  def feed abbrev, url
+    thr do
+      feed = FeedTools::Feed.open(url)
+      set abbrev, feed.updated || feed.items.map(&:published).max
+    end
+  end
+
+  def git abbrev, dir, branch, &block
+    thr do
+      g = Needy::Git.new(dir, branch)
+      yield(g) if block
+      set abbrev, g.when
+    end
+  end
+
+  def whens
+    @@threads.each{|t| t.join}
+    @@threads = []
+    @@when
+  end
+
+  def thr &block
+    @@threads.push(Thread.new(&block))
+  end
+
+  def set abbrev, val
+    @@when[abbrev.to_s] = val
+  end
+
+  def ichat abbrev, name
+    thr do
+      Dir['/Users/mml/Documents/iChats/*'].sort.reverse.each do |dir|
+        Dir["#{dir}/*.ichat"].each do |path|
+          if path =~ /^#{name} on /
+            set abbrev, File.mtime(path)
+            Thread.exit
+          end
+        end
+      end
+      return Time.at(0)
+    end
+  end
+
+  class Git
+    attr_accessor :dir, :branch, :log_opt
+
+    def initialize dir, branch
+      self.dir = File.join File.expand_path(dir), '.git'
+      self.branch = branch
+      self.log_opt = ''
+    end
+
+    def git_cmd
+      "git --git-dir=#{dir}"
+    end
+
+    def exec *args
+      system("#{git_cmd} #{args.map(&:to_s).join(' ')}")
+    end
+
+    def when
+      open "|#{git_cmd} log #{branch} #{log_opt} --pretty=%ct -n1" do |f|
+        Time.at(f.gets.chomp.to_i)
+      end
+    end
+
+    def author name
+      self.log_opt += " --author=#{name}"
+    end
+  end
+end

metadata

@@ -0,0 +1,56 @@
+--- !ruby/object:Gem::Specification 
+name: needy
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Matt Liggett
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-10-12 00:00:00 -04:00
+default_executable: 
+dependencies: []
+
+description: My brain is too dumb to get it right alone.
+email: mml@pobox.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README
+files: 
+- lib/needy.rb
+- README
+has_rdoc: true
+homepage: http://github.com/mml/needy
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: What needs my attention?
+test_files: []
+