termtter 0.8.3

data/lib/plugin/primes.rb

@@ -0,0 +1,23 @@
+# -*- coding: utf-8 -*-
+
+def primes(n)
+  table = []
+  (2 .. n).each do |i|
+    table << i
+  end
+
+  prime = []
+  loop do
+    prime << table[0]
+    table = table.delete_if {|x| x % prime.max == 0 }
+    break if table.max < (prime.max ** 2)
+  end
+
+  r = (table+prime).sort {|a, b| a<=>b }
+  r.join(', ')
+end
+
+module Termtter::Client
+  add_command /^primes\s(\d+)/ do|m,t|t.update_status x="primes(#{n=m[1].to_i}) = {#{primes n}}"
+  puts "=> #{x}" end
+end

data/lib/plugin/quicklook.rb

@@ -0,0 +1,38 @@
+# -*- coding: utf-8 -*-
+
+require 'uri'
+require 'open-uri'
+require 'pathname'
+require 'tmpdir'
+
+configatron.plugins.quicklook.set_default(:quicklook_tmpdir, "#{Dir.tmpdir}/termtter-quicklook-tmpdir")
+tmpdir = Pathname.new(configatron.plugins.quicklook.quicklook_tmpdir)
+tmpdir.mkdir unless tmpdir.exist?
+
+def quicklook(url)
+  tmpdir = Pathname.new(configatron.plugins.quicklook.quicklook_tmpdir)
+  path   = tmpdir + Pathname.new(url).basename
+
+  Thread.new do
+    open(path, 'w') do |f|
+      f.write(open(url).read)
+    end
+    system("qlmanage -p #{path} > /dev/null 2>&1")
+  end
+end
+
+module Termtter::Client
+  add_command %r'^(?:quicklook|ql)\s+(\w+)$' do |m,t|
+    id = m[1]
+    status = t.show(id).first
+
+    if (status)
+      uris = URI.regexp.match(status.text).to_a
+      quicklook(uris.first) unless uris.empty?
+    end
+  end
+end
+
+# quicklook.rb
+# TODO:
+#   Close quicklook window automatically.

data/lib/plugin/reblog.rb

@@ -0,0 +1,40 @@
+# -*- coding: utf-8 -*-
+
+require 'rubygems'
+require 'tumblr'
+
+module Termtter::Client
+  register_command(
+    :name => :reblog, :aliases => [],
+    :exec_proc => lambda {|arg|
+      if arg =~ /^reblog\s+(\d+)(.*)$/
+        id = $1.strip
+        comment = $2.strip
+        statuses = public_storage[:log].select { |s| s.id == id }
+        unless statuses.empty?
+          status = statuses.first
+        else
+          status = t.show(id).first
+        end
+    
+        Tumblr::API.write(configatron.plugins.reblog.email, configatron.plugins.reblog.password) do
+          quote("#{status.text}", "<a href=\"http://twitter.com/#{status.user_screen_name}/status/#{status.id}\">Twitter / #{status.user_name}</a>")
+        end
+      end
+    },
+    :completion_proc => lambda {|cmd, args|
+      if args =~ /^(\d*)$/
+        find_status_id_candidates $1, "#{cmd} %s"
+      end
+    },
+    :help => ['reblog ID', 'Tumblr Reblog a status']
+  )
+end
+
+# reblog.rb
+# tumblr reblog it!
+#
+# configatron.plugins.reblog.email = 'your-email-on-tumblr'
+# configatron.plugins.reblog.password = 'your-password-on-tumblr'
+#
+#   reblog 1114860346

data/lib/plugin/reload.rb

@@ -0,0 +1,3 @@
+# -*- coding: utf-8 -*-
+
+Termtter::Client.register_macro :reload, "eval exec $0"

data/lib/plugin/say.rb

@@ -0,0 +1,24 @@
+# -*- coding: utf-8 -*-
+
+raise 'say.rb runs only in OSX Leopard' if /darwin9/ !~ RUBY_PLATFORM
+
+# say :: String -> String -> IO ()
+def say(who, what)
+  voices = %w(Alex Alex Bruce Fred Ralph Agnes Kathy Vicki)
+  voice = voices[who.hash % voices.size]
+  system 'say', '-v', voice, what
+end
+
+module Termtter::Client
+  add_hook do |statuses, event, t|
+    if !statuses.empty? && event == :update_friends_timeline
+      statuses.reverse.each do |s|
+        text_without_uri = s.text.gsub(%r|https?://[^\s]+|, 'U.R.I.')
+        say s.user_screen_name, text_without_uri
+      end
+    end
+  end
+end
+
+# KNOWN BUG:
+# * exit or <C-c> doen't work quickly.

data/lib/plugin/scrape.rb

@@ -0,0 +1,41 @@
+# -*- coding: utf-8 -*-
+
+module Termtter::Client
+
+  def self.scrape_members(members)
+    statuses = []
+    members.each_with_index do |member, index|
+      puts "member #{index+1}/#{members.size} #{member}"
+      statuses += Termtter::API.twitter.get_user_timeline(member)
+    end
+    statuses
+  end    
+  
+  def self.scrape_group(group)
+    members = configatron.plugins.group.groups[group] || []
+    scrape_members(members)
+  end
+
+  register_command(
+                   :name => :scrape_group,
+                   :exec_proc => lambda{ |args|
+                     groups = args.split(' ').map{|g| g.to_sym}
+                     if groups.include? :all
+                       groups = configatron.plugins.group.groups.keys
+                       puts "get all groups..."
+                     end
+                     members = []
+                     groups.each do |group|
+                       members += configatron.plugins.group.groups[group]
+                     end
+                     statuses = scrape_members(members.uniq.compact.sort)
+                     call_hooks(statuses, :pre_filter)
+                   },
+                   :completion_proc => lambda {|cmd, args|
+                     arg = args.split(' ').last
+                     prefix = args.split(' ')[0..-2].join(' ')
+                     find_group_candidates arg, "#{cmd} #{prefix} %s"
+                   },
+                   :help => ['scrape_group GROUPNAME(S)', 'Get the group timeline']
+                   )
+end

data/lib/plugin/screen.rb

@@ -0,0 +1,24 @@
+# -*- coding: utf-8 -*-
+
+module Termtter
+  module Plugin
+    module Screen
+      def self.set_title(title)
+        print "\033k#{title}\033\\"
+      end
+    end
+  end
+end
+
+# Add below to your ~/.termtter
+#
+# require 'plugin/yonda'
+# require 'plugin/screen'
+# module Termtter::Client
+#   add_hook do |statuses, event|
+#     case event
+#     when :update_friends_timeline, :plugin_yonda_yonda
+#       Termtter::Plugin::Screen::set_title("termtter(#{public_storage[:unread_count]})")
+#     end
+#   end
+# end

data/lib/plugin/shell.rb

@@ -0,0 +1,14 @@
+# -*- coding: utf-8 -*-
+
+module Termtter::Client
+  register_command :name => :shell, :aliases => [:sh],
+    :help => ['shell,sh', 'Start your shell'],
+    :exec_proc => lambda {|args|
+      begin
+        pause
+        system ENV['SHELL'] || ENV['COMSPEC']
+      ensure
+        resume
+      end
+    }
+end

data/lib/plugin/sl.rb

@@ -0,0 +1,48 @@
+# -*- coding: utf-8 -*-
+
+module Termtter
+
+  module Client
+
+    public_storage[:current] = ''
+    public_storage[:orig_prompt] = configatron.prompt
+    configatron.prompt = "~/ #{public_storage[:orig_prompt]}"
+
+    register_command(
+      :name      => :sl, :aliases => [],
+      :exec_proc => lambda {|arg| system("sl") },
+      :help      => ['sl', 'The train pass in front of your screen']
+    )
+
+    register_command(
+      :name      => :pwd, :aliases => [],
+      :exec_proc => lambda {|arg| public_storage[:current] },
+      :help      => ['pwd', 'Show current direcroty']
+    )
+
+    register_command(
+      :name => :ls, :aliases => [],
+      :exec_proc => lambda {|arg|
+        call_commands("list #{arg.empty? ? public_storage[:current] : arg}", API.twitter)
+      },
+      :completion_proc => lambda {|cmd, args|
+        find_user_candidates args, "#{cmd} %s"
+      },
+      :help => ['ls', 'Show list in current directory']
+    )
+
+    register_command(
+      :name => :cd, :aliases => [],
+      :exec_proc => lambda {|arg|
+        public_storage[:current] =
+          (arg.nil? || /\~/ =~ arg) ? '' : arg
+        configatron.prompt = "~/#{public_storage[:current]} #{public_storage[:orig_prompt]}"
+      },
+      :completion_proc => lambda {|cmd, args|
+        find_user_candidates args, "#{cmd} %s"
+      },
+      :help => ['cd USER', 'Change current directory']
+    )
+  end
+end
+

data/lib/plugin/spam.rb

@@ -0,0 +1,9 @@
+# -*- coding: utf-8 -*-
+
+Termtter::Twitter.new(configatron.user_name, configatron.password).update_status('*super spam time*')
+module Termtter::Client
+  clear_commands
+  add_command /.+/ do |m, t|
+    Thread.new { t.update_status(m[0]) }
+  end
+end

data/lib/plugin/standard_plugins.rb

@@ -0,0 +1,269 @@
+# -*- coding: utf-8 -*-
+
+require 'erb'
+
+module Termtter::Client
+
+  # standard commands
+
+  register_command(
+    :name => :update, :aliases => [:u],
+    :exec_proc => lambda {|arg|
+      text = ERB.new(arg).result(binding).gsub(/\n/, ' ')
+      Termtter::API.twitter.update_status(text)
+      puts "=> #{text}"
+    },
+    :completion_proc => lambda {|cmd, args|
+      if /(.*)@([^\s]*)$/ =~ args
+        find_user_candidates $2, "#{cmd} #{$1}@%s"
+      end
+    }
+  )
+
+  register_command(
+    :name => :direct, :aliases => [:d],
+    :exec_proc => lambda {|arg|
+      if arg =~ /^([^\s]+)\s+(.*)\s*$/
+        user, text = $1, $2
+        Termtter::API.twitter.direct_message(user, text)
+        puts "=> to:#{user} message:#{text}"
+      end
+    },
+    :completion_proc => lambda {|cmd, args|
+      if args =~ /^([^\s]+)$/
+        find_user_candidates $1, "#{cmd} %s"
+      end
+    }
+  )
+
+  register_command(
+    :name => :profile, :aliases => [:p],
+    :exec_proc => lambda {|arg|
+      user = Termtter::API.twitter.get_user_profile(arg)
+      attrs = %w[ name screen_name url description profile_image_url location protected following
+          friends_count followers_count statuses_count favourites_count
+          id time_zone created_at utc_offset notifications
+      ]
+      label_width = attrs.map{|i|i.size}.max
+      attrs.each do |attr|
+        value = user.__send__(attr.to_sym)
+        puts "#{attr.gsub('_', ' ').rjust(label_width)}: #{value}"
+      end
+    },
+    :completion_proc => lambda {|cmd, arg|
+      find_user_candidates arg, "#{cmd} %s"
+    }
+  )
+
+  register_command(
+    :name => :followers,
+    :exec_proc => lambda {|arg|
+      followers = Termtter::API.twitter.followers
+      Termtter::Client.public_storage[:followers] = followers
+      p followers.map{|f|f.screen_name}
+    }
+  )
+
+  register_command(
+    :name => :list, :aliases => [:l],
+    :exec_proc => lambda {|arg|
+      unless arg.empty?
+        call_hooks(Termtter::API.twitter.get_user_timeline(arg), :list_user_timeline)
+      else
+        call_hooks(Termtter::API.twitter.get_friends_timeline(), :list_friends_timeline)
+      end
+    },
+    :completion_proc => lambda {|cmd, arg|
+      find_user_candidates arg, "#{cmd} %s"
+    }
+  )
+
+  register_command(
+    :name => :search, :aliases => [:s],
+    :exec_proc => lambda {|arg|
+      call_hooks(Termtter::API.twitter.search(arg), :search)
+    }
+  )
+
+  register_command(
+    :name => :replies, :aliases => [:r],
+    :exec_proc => lambda {|arg|
+      call_hooks(Termtter::API.twitter.replies(), :replies)
+    }
+  )
+
+  register_command(
+    :name => :show,
+    :exec_proc => lambda {|arg|
+      id = arg.gsub(/.*:/, '')
+      call_hooks(Termtter::API.twitter.show(id), :show)
+    }
+  )
+
+  register_command(
+    :name => :shows,
+    :exec_proc => lambda {|arg|
+      id = arg.gsub(/.*:/, '')
+      call_hooks(Termtter::API.twitter.show(id, true), :show)
+    }
+  )
+
+  # TODO: Change colors when remaining_hits is low.
+  # TODO: Simmulate remaining_hits.
+  register_command(
+    :name => :limit, :aliases => [:lm],
+    :exec_proc => lambda {|arg|
+      limit = Termtter::API.twitter.get_rate_limit_status
+      remaining_time = "%dmin %dsec" % (limit.reset_time - Time.now).divmod(60)
+      remaining_color =
+        case limit.remaining_hits / limit.hourly_limit.to_f
+        when 0.2..0.4 then :yellow
+        when 0..0.2   then :red
+        else               :green
+        end
+      puts "=> #{color(limit.remaining_hits, remaining_color)}/#{limit.hourly_limit} until #{limit.reset_time} (#{remaining_time} remaining)"
+    },
+    :help => ["limit,lm", "Show the API limit status"]
+  )
+
+  register_command( 
+    :name => :pause,
+    :exec_proc => lambda {|arg| pause},
+    :help => ["pause", "Pause updating"]
+  )
+
+  register_command(
+    :name => :resume,
+    :exec_proc => lambda {|arg| resume},
+    :help => ["resume", "Resume updating"]
+  )
+
+  register_command(
+    :name => :exit, :aliases => [:e],
+    :exec_proc => lambda {|arg| exit},
+    :help => ['exit,e', 'Exit']
+  )
+
+  register_hook(
+    :name => :default_error_handler,
+    :points => [:on_error],
+    :exec_proc => lambda {|e|
+      puts "Error: #{e}"
+      if configatron.devel == true
+        puts e.backtrace.join("\n")
+      end
+    }
+  )
+
+  register_command(
+    :name => :help, :aliases => [:h],
+    :exec_proc => lambda {|arg|
+      helps = [
+        ["help,h", "Print this help message"],
+        ["list,l", "List the posts in your friends timeline"],
+        ["list,l USERNAME", "List the posts in the the given user's timeline"],
+        ["update,u TEXT", "Post a new message"],
+        ["direct,d @USERNAME TEXT", "Send direct message"],
+        ["profile,p USERNAME", "Show user's profile"],
+        ["replies,r", "List the most recent @replies for the authenticating user"],
+        ["search,s TEXT", "Search for Twitter"],
+        ["show ID", "Show a single status"]
+      ]
+      helps += @@helps
+      helps += @@new_commands.map {|name, command| command.help}
+      helps.compact!
+      puts formatted_help(helps)
+    }
+  )
+
+  register_command(
+   :name => :execute,
+   :exec_proc => lambda{|arg|
+     if arg
+       `#{arg}`.each_line do |line|
+           unless line.strip.empty?
+             Termtter::API.twitter.update_status(line)
+             puts "=> #{line}"
+           end
+       end
+     end
+   },
+   :help => ['execute COMMAND', 'execute the command']
+   )
+
+  add_command /^!(!)?\s*(.*)$/ do |m, t|
+    warn '!COMMAND command will be removed. Use command execute instead.'
+    begin
+      result = `#{m[2]}` unless m[2].empty?
+      unless m[1].nil? || result.empty?
+        t.update_status(result.gsub("\n", " "))
+      end
+      puts "=> #{result}"
+    rescue => e
+      puts e
+    end
+  end
+
+  def self.formatted_help(helps)
+    helps = helps.sort_by{|help| help[0]}
+    width = helps.map {|n, d| n.size }.max
+    space = 3
+    helps.map {|name, desc|
+      name.to_s.ljust(width + space) + desc.to_s
+    }.join("\n")
+  end
+
+  # completion for standard commands
+
+  require 'set'
+  public_storage[:users] ||= Set.new
+  public_storage[:status_ids] ||= Set.new
+
+  add_hook do |statuses, event, t|
+    statuses.each do |s|
+      public_storage[:users].add(s.user_screen_name)
+      public_storage[:users] += s.text.scan(/@([a-zA-Z_0-9]*)/).flatten
+      public_storage[:status_ids].add(s.id.to_s)
+      public_storage[:status_ids].add(s.in_reply_to_status_id.to_s) if s.in_reply_to_status_id
+    end
+  end
+
+  def self.find_status_id_candidates(a, b, u = nil)
+    candidates = public_storage[:status_ids].to_a
+    if u && c = public_storage[:log].select {|s| s.user_screen_name == u }.map {|s| s.id.to_s }
+      candidates = c unless c.empty?
+    end
+    if a.empty?
+      candidates
+    else
+      candidates.grep(/#{Regexp.quote a}/)
+    end.
+    map {|u| b % u }
+  end
+
+  def self.find_user_candidates(a, b)
+    if a.nil? || a.empty?
+      public_storage[:users].to_a
+    else
+      public_storage[:users].grep(/^#{Regexp.quote a}/i)
+    end.
+    map {|u| b % u }
+  end
+
+  add_completion do |input|
+    standard_commands = %w[exit help list pause profile update direct resume replies search show limit]
+    case input
+    when /^show(s)?\s+(([\w\d]+):)?\s*(.*)/
+      if $2
+        find_status_id_candidates $4, "show#{$1} #{$2}%s", $3
+      else
+        result = find_user_candidates $4, "show#{$1} %s:"
+        result = find_status_id_candidates $4, "show#{$1} %s"  if result.empty?
+        result
+      end
+    else
+      standard_commands.grep(/^#{Regexp.quote input}/)
+    end
+  end
+
+end

data/lib/plugin/stdout.rb

@@ -0,0 +1,62 @@
+# -*- coding: utf-8 -*-
+
+require 'highline'
+require 'erb'
+
+configatron.plugins.stdout.set_default(
+  :colors,
+  [:none, :red, :green, :yellow, :blue, :magenta, :cyan])
+configatron.plugins.stdout.set_default(
+  :timeline_format,
+  '<%= color(time, 90) %> <%= color(status, status_color) %> <%= color(id, 90) %>')
+
+$highline = HighLine.new
+
+def color(str, value)
+  return str if value == :none
+  case value
+  when String, Symbol
+    $highline.color(str, value)
+  else
+    "\e[#{value}m#{str}\e[0m"
+  end
+end
+
+module Termtter::Client
+
+  def self.print_statuses(statuses, sort = true, time_format = '%H:%M:%S')
+    (sort ? statuses.sort_by{ |s| s.id} : statuses).each do |s|
+      text = s.text
+      status_color = configatron.plugins.stdout.colors[s.user_screen_name.hash % configatron.plugins.stdout.colors.size]
+      status = "#{s.user_screen_name}: #{text}"
+      if s.in_reply_to_status_id
+        status += " (reply to #{s.in_reply_to_status_id})"
+      end
+      
+      time = "(#{s.created_at.strftime(time_format)})"
+      id = s.id
+      puts ERB.new(configatron.plugins.stdout.timeline_format).result(binding)
+    end
+  end
+
+  def self.print_statuses_with_date(statuses, sort = true)
+    print_statuses(statuses, sort, '%m-%d %H:%M')
+  end
+  
+  add_hook do |statuses, event|
+    next if statuses.empty?
+    
+    case event
+    when :update_friends_timeline, :list_friends_timeline
+      print_statuses(statuses)
+    when :search, :list_user_timeline, :show, :replies
+      print_statuses_with_date(statuses)
+    end
+  end
+  
+end
+# stdout.rb
+#   output statuses to stdout
+# example config
+#   configatron.plugins.stdout.colors = [:none, :red, :green, :yellow, :blue, :magenta, :cyan]
+#   configatron.plugins.stdout.timeline_format = '<%= color(time, 90) %> <%= color(status, status_color) %> <%= color(id, 90) %>'

data/lib/plugin/system_status.rb

@@ -0,0 +1,33 @@
+# -*- coding: utf-8 -*-
+
+require 'erb'
+
+configatron.plugins.system_status.set_default(:default_status_proc, lambda { Time.now.strftime("%x %X") })
+configatron.plugins.system_status.set_default(:interval, 1)
+configatron.plugins.system_status.set_default(:default_color, :on_blue)
+configatron.plugins.system_status.set_default(:format, '<%= status %>')
+
+def out_put_status(status, color)
+  formatted_status = ERB.new(configatron.plugins.system_status.format).result(binding)
+  colored_status = color(formatted_status, color)
+  print "\e[s\e[1000G\e[#{status.size - 1}D#{colored_status}\e[u"
+  $stdout.flush
+end
+
+module Termtter::Client
+  add_task(:name => :system_status, :interval => configatron.plugins.system_status.interval) do
+    status = (@@task_manager.get_task(:update_timeline).exec_at - Time.now).to_i.to_s
+    color = public_storage[:system_status_color] ||
+                    configatron.plugins.system_status.default_color
+    out_put_status(status, color)
+  end
+end
+
+# system_status.rb
+#   show system status on left side.
+#   output public_storage[:system_status] or Time.now.strftime("%x %X") if nil
+# example config
+#   configatron.plugins.system_status.default_status_proc = lambda { Time.now.strftime("%x %X") }
+#   configatron.plugins.system_status.interval = 1
+#   configatron.plugins.system_status.default_color = :on_blue
+#   configatron.plugins.system_status.format = '<%= status %>'

data/lib/plugin/translation.rb

@@ -0,0 +1,28 @@
+# -*- coding: utf-8 -*-
+
+require 'nokogiri'
+require 'net/http'
+require 'kconv'
+require 'uri'
+
+def translate(text, langpair)
+  req = Net::HTTP::Post.new('/translate_t')
+  req.add_field('Content-Type', 'application/x-www-form-urlencoded')
+  req.add_field('User-Agent', 'Mozilla/5.0')
+  Net::HTTP.version_1_2 # Proxy に対応してない
+  Net::HTTP.start('translate.google.co.jp', 80) {|http|
+    response = http.request(req, "langpair=#{langpair}&text=#{URI.escape(text)}")
+    doc = Nokogiri::HTML.parse(response.body, nil, 'utf-8')
+    return doc.css('#result_box').text
+  }
+end
+
+Termtter::Client.add_command /^(en2ja|ja2en)\s+(.*)$/ do |m, t|
+  langpair = m[1].gsub('2', '|')
+  puts "translating..."
+  puts "=> #{translate(m[2], langpair)}"
+end
+
+# This plugin does not work yet.
+# requirements
+#   nokogiri (sudo gem install nokogiri)