termtter 0.8.3

data/lib/plugin/follow.rb

@@ -0,0 +1,56 @@
+# -*- coding: utf-8 -*-
+
+module Termtter::Client
+  register_command(
+    :name => :follow, :aliases => [],
+    :exec_proc => lambda {|arg|
+      if arg =~ /^(\w+)/
+        res = Termtter::API::twitter.social($1.strip, :follow)
+        if res.code == '200'
+          puts "Followed user @#{$1}"
+        else
+          puts "Failed: #{res}"
+        end
+      end
+    },
+    :completion_proc => lambda {|cmd, args|
+      find_user_candidates args, "#{cmd} %s"
+    },
+	:help => ['follow USER', 'Follow user']
+  )
+
+  register_command(
+    :name => :leave, :aliases => [],
+    :exec_proc => lambda {|arg|
+      if arg =~ /^(\w+)/
+        res = Termtter::API::twitter.social($1.strip, :leave)
+        if res.code == '200'
+          puts "Leaved user @#{$1}"
+        else
+          puts "Failed: #{res}"
+        end
+      end
+    },
+    :completion_proc => lambda {|cmd, args|
+      find_user_candidates args, "#{cmd} %s"
+    },
+	:help => ['leave USER', 'Leave user']
+  )
+end
+
+module Termtter
+  class Twitter
+    def social(user, type)
+      type =
+        case type.to_sym
+        when :follow then 'create'
+        when :leave  then 'destroy'
+        end
+      uri = "#{@connection.protocol}://twitter.com/friendships/#{type}/#{user}.json"
+
+      @connection.start('twitter.com', @connection.port) do |http|
+        http.request(post_request(uri))
+      end
+    end
+  end
+end

data/lib/plugin/graduatter.rb

@@ -0,0 +1,9 @@
+# -*- coding: utf-8 -*-
+
+twitter = Termtter::Twitter.new(configatron.user_name, configatron.password)
+Thread.start do
+  100.times do |i|
+    twitter.update_status(
+      "I decided not to use twitter so as not to leave university before I complete the dissertation#{i.odd? ? '!' : '.'}")
+  end
+end

data/lib/plugin/grass.rb

@@ -0,0 +1,27 @@
+# -*- coding: utf-8 -*-
+module Termtter
+  module Client
+
+    configatron.plugins.grass.set_default(:rate, 0)
+
+    register_command(
+      :name => :w, :aliases => [:grass],
+      :exec_proc => lambda {|arg|
+        arg, rate = arg.split(/ /)
+        count = arg =~ /^[0-9]+$/ ? arg.to_i : 3
+        rate ||= configatron.plugins.grass.rate
+        grow = (count * rate.to_i).quo(100).round
+        grasses = ('w' * (count-grow) + 'W' * grow).split(//).shuffle.join
+        call_commands("update #{grasses}")
+      },
+      :help => ['grass, w', 'Grass it!']
+    )
+  end
+end
+
+# usage
+# > w 10
+# => wwwwwwwwww
+#
+# see also
+#   http://d.hatena.ne.jp/tomisima/20090204/1233762301

data/lib/plugin/group.rb

@@ -0,0 +1,60 @@
+# -*- coding: utf-8 -*-
+
+module Termtter
+  class Status
+    def is_member?(group = nil)
+      if group
+        configatron.plugins.group.groups[group].include? self.user_screen_name
+      else
+        configatron.plugins.group.groups.values.flatten.include? self.user_screen_name
+      end
+    end
+  end
+end
+
+module Termtter::Client
+  configatron.plugins.group.
+    set_default(:groups, {})
+
+  def self.find_group_candidates(a, b)
+    configatron.plugins.group.groups.keys.map {|k| k.to_s}.
+      grep(/^#{Regexp.quote a}/).
+      map {|u| b % u }
+  end
+
+  register_command(
+   :name => :group,
+   :aliases => [:g],
+   :exec_proc => lambda {|arg|
+     unless arg.empty?
+       group_name = arg.to_sym
+       if group_name == :all
+         group = configatron.plugins.group.groups.values.flatten.uniq
+       else
+         group = configatron.plugins.group.groups[group_name]
+       end
+       statuses = group ? public_storage[:log].select { |s|
+         group.include?(s.user_screen_name) 
+       } : []
+       call_hooks(statuses, :search)
+     else
+       configatron.plugins.group.groups.each_pair do |key, value|
+         puts "#{key}: #{value.join(',')}"
+       end
+     end
+   },
+   :completion_proc => lambda {|cmd, arg|
+     find_group_candidates arg, "#{cmd} %s"
+                   },
+   :help => ['group,g GROUPNAME', 'Filter by group members']
+   )
+  
+end
+
+# group.rb
+#   plugin 'group'
+#   configatron.plugins.group.groups = {
+#     :rits => %w(hakobe isano hitode909)
+#   }
+# NOTE: group.rb needs plugin/log
+

data/lib/plugin/growl.rb

@@ -0,0 +1,62 @@
+# -*- coding: utf-8 -*-
+
+require 'tmpdir'
+require 'open-uri'
+require 'uri'
+require 'fileutils'
+
+begin
+  require 'ruby-growl'
+  growl = Growl.new "localhost", "termtter", "termtter status notification"
+rescue LoadError
+  growl = nil
+end
+
+configatron.plugins.growl.set_default(:icon_cache_dir, "#{Dir.tmpdir}/termtter-icon-cache-dir")
+FileUtils.mkdir_p(configatron.plugins.growl.icon_cache_dir) unless File.exist?(configatron.plugins.growl.icon_cache_dir)
+
+def get_icon_path(s)
+  cache_file = "%s/%s%s" % [  configatron.plugins.growl.icon_cache_dir, 
+                              s.user_screen_name, 
+                              File.extname(s.user_profile_image_url)  ]
+  if File.exist?(cache_file) && (File.atime(cache_file) + 24*60*60) > Time.now
+    return cache_file
+  else
+    Thread.new do
+      File.open(cache_file, "wb") do |f|
+        f << open(URI.escape(s.user_profile_image_url)).read
+      end
+    end
+    return nil
+  end
+end
+
+queue = []
+Thread.new do
+  loop do
+    begin
+      if s = queue.pop
+        unless growl
+          arg = ['growlnotify', s.user_screen_name, '-m', s.text.gsub("\n",''), '-n', 'termtter']
+          #icon_path = get_icon_path(s)
+          #arg += ['--image', icon_path] if icon_path
+          system *arg
+        else
+          growl.notify "termtter status notification", s.text, s.user_screen_name
+        end
+      end
+    rescue => e
+      puts e
+      puts e.backtrace.join("\n")
+    end
+    sleep 0.1
+  end
+end
+
+Termtter::Client.add_hook do |statuses, event|
+  if !statuses.empty? && event == :update_friends_timeline
+    statuses.reverse.each do |s|
+      queue << s
+    end
+  end
+end

data/lib/plugin/hatebu.rb

@@ -0,0 +1,59 @@
+# -*- coding: utf-8 -*-
+
+require 'rubygems'
+require 'atomutil'
+
+module Termtter::Client
+  register_command(
+    :name => :hatebu, :aliases => [],
+    :exec_proc => lambda {|arg|
+      if arg =~ /^(\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
+        auth = auth = Atompub::Auth::Wsse.new({
+            :username => configatron.plugins.hatebu.username,
+            :password => configatron.plugins.hatebu.password,
+        })
+        link = Atom::Link.new({
+           :href => "http://twitter.com/#{status.user_screen_name}/status/#{status.id}",
+           :rel => 'related',
+           :type => 'text/html',
+        })
+        entry = Atom::Entry.new({
+            :link => link,
+            :title => 'dummy',
+            :summary => comment,
+        })
+        req = Net::HTTP::Post.new 'http://b.hatena.ne.jp/atom/post'
+        req['User-Agent'] = 'Mozilla/5.0'
+        req['Content-Type'] = 'application/atom+xml'
+        req['Slug'] = 'termtter'
+        req.body = entry.to_s
+        auth.authorize(req)
+        Net::HTTP.start('b.hatena.ne.jp', 80) do |http|
+          res = http.request(req)
+        end
+      end
+    },
+    :completion_proc => lambda {|cmd, args|
+      if args =~ /^(\d*)$/
+        find_status_id_candidates $1, "#{cmd} %s"
+      end
+    },
+	:help => ['hatebu ID', 'Hatena bookmark a status']
+  )
+end
+
+# hatebu.rb
+# hatena bookmark it!
+#
+# configatron.plugins.hatebu.username = 'your-username-on-hatena'
+# configatron.plugins.hatebu.password = 'your-password-on-hatena'
+#
+#   hatebu 1114860346 [termtter][����͂�����]mattn++

data/lib/plugin/history.rb

@@ -0,0 +1,82 @@
+# -*- coding: utf-8 -*-
+
+require 'zlib'
+
+configatron.plugins.history.
+  set_default(:filename, '~/.termtter_history')
+configatron.plugins.history.
+  set_default(:keys, [:log, :users, :status_ids])
+configatron.plugins.history.
+  set_default(:max_of_history, 100)
+configatron.plugins.history.
+  set_default(:enable_autosave, true)
+configatron.plugins.history.
+  set_default(:autosave_interval, 3600)
+
+module Termtter::Client
+  def self.load_history
+    filename = File.expand_path(configatron.plugins.history.filename)
+    keys = configatron.plugins.history.keys
+
+    if File.exist?(filename)
+      begin
+        history = Marshal.load Zlib::Inflate.inflate(File.read(filename))
+      end
+      if history
+        keys.each do |key|
+          public_storage[key] = history[key] if history[key]
+        end
+        Readline::HISTORY.push *history[:history] if history[:history]
+        puts "history loaded(#{File.size(filename)/1000}kb)"
+      end
+    end
+  end
+
+  def self.save_history
+    filename = File.expand_path(configatron.plugins.history.filename)
+    keys = configatron.plugins.history.keys
+    history = { }
+    keys.each do |key|
+      history[key] = public_storage[key]
+    end
+    max_of_history = configatron.plugins.history.max_of_history
+    history[:history] = Readline::HISTORY.to_a.reverse.uniq.reverse
+    if history[:history].size > max_of_history
+      history[:history] = history[:history][-max_of_history..-1]
+    end
+
+    File.open(filename, 'w') do |f|
+      f.write Zlib::Deflate.deflate(Marshal.dump(history))
+    end
+    puts "history saved(#{File.size(filename)/1000}kb)"
+  end
+
+  add_hook do |statuses, event|
+    case event
+    when :initialize
+      load_history
+    when :exit
+      save_history
+    end
+  end
+
+  if configatron.plugins.history.enable_autosave
+    Termtter::Client.add_task(:interval => configatron.plugins.history.autosave_interval,
+                              :after => configatron.plugins.history.autosave_interval) do
+      save_history
+    end
+  end
+
+  register_command(
+   :name => :save,
+   :exec_proc => lambda{|arg|
+     save_history
+   },
+   :help => ['save', 'Save hisory']
+   )
+
+  
+end
+
+# history.rb
+#   save log to file

data/lib/plugin/keyword.rb

@@ -0,0 +1,18 @@
+# -*- coding: utf-8 -*-
+
+configatron.set_default('plugins.keyword.keywords', [])
+
+module Termtter
+  class Status
+    def has_keyword?
+      configatron.plugins.keyword.keywords.find { |k| k === self.text }
+    end
+    alias :has_keyword :has_keyword?
+  end
+end
+
+# keyword.rb
+#   provides a keyword watching method
+# example config
+#   configatron.plugins.stdout.timeline_format = '<%= color(time, 90) %> <%= color(status, s.has_keyword ? 4 : status_color) %> <%= color(id, 90) %>'
+#   configatron.plugins.keyword.keywords = [ /motemen/ ]

data/lib/plugin/log.rb

@@ -0,0 +1,63 @@
+# -*- coding: utf-8 -*-
+
+module Termtter::Client
+  public_storage[:log] = []
+  configatron.plugins.log.set_default('max_size', 1/0.0)
+  configatron.plugins.log.set_default('print_max_size', 30)
+
+  add_hook do |statuses, event|
+    case event
+    when :pre_filter
+      public_storage[:log] += statuses
+      max_size = configatron.plugins.log.max_size
+      if public_storage[:log].size > max_size
+        public_storage[:log] = public_storage[:log][-max_size..-1]
+      end
+      public_storage[:log] = public_storage[:log].uniq.sort_by{|a| a.created_at} if statuses.first
+    end
+  end
+
+  register_command(
+   :name => :log,
+   :exec_proc => lambda{|arg|
+     if arg.empty?
+       # log
+       statuses = public_storage[:log]
+       print_max = configatron.plugins.log.print_max_size
+       print_max = 0 if statuses.size < print_max
+       call_hooks(statuses[-print_max..-1], :search)
+     else
+       # log (user) (max)
+       vars = arg.split(' ')
+       print_max = vars.last =~ /^\d+$/ ? vars.pop.to_i : configatron.plugins.log.print_max_size
+       id = vars
+       statuses = id.first ? public_storage[:log].select{ |s| id.include? s.user_screen_name} : public_storage[:log]
+       print_max = 0 if statuses.size < print_max
+       call_hooks(statuses[-print_max..-1], :search)
+     end
+   },
+   :completion_proc => lambda {|cmd, arg|
+     find_user_candidates arg, "#{cmd} %s"
+   },
+   :help => [ 'log (USER(S)) (MAX)', 'Show local log of the user(s)']
+   )
+
+  register_command(
+   :name => :search_log, :aliases => [:sl],
+   :exec_proc => lambda{|arg|
+    unless arg.strip.empty?
+      pat = Regexp.new arg
+      statuses = public_storage[:log].select { |s| s.text =~ pat }
+      call_hooks(statuses, :search)
+     end
+   },
+   :help => [ 'search_log WORD', 'Search log for WORD' ]
+   )
+
+  add_command %r'^/(.+)' do |m, t|
+    warn '/WORD command will be removed. Use search_log command instead.'
+    pat = Regexp.new(m[1])
+    statuses = public_storage[:log].select { |s| s.text =~ pat }
+    call_hooks(statuses, :search, t)
+  end
+end

data/lib/plugin/modify_arg_hook_sample.rb

@@ -0,0 +1,7 @@
+# -*- coding: utf-8 -*-
+
+Termtter::Client.register_hook(
+  :name => :modify_arg_hook_sample,
+  :points => [:modify_arg_for_update],
+  :exec_proc => lambda {|cmd, arg| arg + '＼(＾o＾)／'}
+)

data/lib/plugin/msagent.rb

@@ -0,0 +1,26 @@
+# -*- coding: utf-8 -*-
+
+raise 'msagent.rb runs only in windows' if RUBY_PLATFORM.downcase !~ /mswin(?!ce)|mingw|bccwin/
+require 'win32ole'
+require 'kconv'
+
+agent = WIN32OLE.new('Agent.Control.2')
+agent.connected = true
+agent.characters.load("Merlin", ENV['WINDIR'] + "\\msagent\\chars\\Merlin.acs")
+achar = agent.characters.character("Merlin")
+achar.languageID = 0x411
+achar.show
+
+Termtter::Client.add_hook do |statuses, event, t|
+  if event == :exit
+    achar.hide   
+    GC.start
+  elsif !statuses.empty? && event == :update_friends_timeline
+    statuses.reverse.each do |s|
+      req = achar.speak("#{s.user_screen_name}: #{s.text}".tosjis)
+      sleep 3
+      WIN32OLE_EVENT.message_loop
+      achar.stop(req)
+    end
+  end
+end

data/lib/plugin/multi_reply.rb

@@ -0,0 +1,36 @@
+# -*- coding: utf-8 -*-
+
+module Termtter::Client
+  add_help 'multi_reply, mp TEXT', 'reply to multi user'
+  add_command /^(multi_reply|mr)\s+(.*)/ do |m, t|
+    text = ERB.new(m[2]).result(binding).gsub(/\n/, ' ')
+    unless text.empty?
+      #targets, _, msg = text.match /(@(.+))*\s+(.+)/
+      #targets.split(/\s+/).
+      #  map {|u| "#{u} #{msg}" }.
+      #  each do |post|
+      #    t.update_status(post)
+      #    puts "=> #{post}"
+      #  end
+      /(@(.+))*\s+(.+)/ =~ text
+      if $1
+        msg = $3
+        text = $1.split(/\s+/).map {|u| "#{u} #{msg}" }
+      end
+      Array(text).each do |post|
+        t.update_status(post)
+        puts "=> #{post}"
+      end
+      #
+    end
+  end
+
+  add_completion do |input|
+    case input
+    when /^(multi_reply|mr)\s+(.*)@([^\s]*)$/
+      find_user_candidates $3, "#{$1} #{$2}@%s"
+    else
+      %w[ mreply mp ].grep(/^#{Regexp.quote input}/)
+    end
+  end
+end

data/lib/plugin/notify-send.rb

@@ -0,0 +1,17 @@
+# -*- coding: utf-8 -*-
+
+Termtter::Client.add_hook do |statuses, event|
+  if !statuses.empty? && event == :update_friends_timeline
+    max = 10
+
+    text = statuses.take(max).map {|s|
+      status_text = CGI.escapeHTML(s.text)
+      status_text.gsub!(%r{https?://[-_.!~*\'()a-zA-Z0-9;\/?:\@&=+\$,%#]+},'<a href="\0">\0</a>')
+      "<b>#{s.user_screen_name}:</b> <span font=\"9.0\">#{status_text}</span>"
+    }.join("\n")
+
+    text << %Q|\n<a href="http://twitter.com/">more...</a>| if statuses.size > max
+
+    system 'notify-send', 'Termtter', text, '-t', '60000'
+  end
+end

data/lib/plugin/otsune.rb

@@ -0,0 +1,21 @@
+# -*- coding: utf-8 -*-
+
+module Termtter::Client
+  register_macro(:otsune, "update @%s 頭蓋骨の中身がお気の毒です.",
+    :help => ['otsune {SCREENNAME}', 'update "@{SCREENNAME} 頭蓋骨の中身がお気の毒です"'],
+    :completion_proc => lambda {|cmd, args|
+      find_user_candidates args, "#{cmd} %s"
+    }
+  )
+end
+
+module Termtter::Client
+  register_macro(:otsnue, "update @%s 頭蓋骨の中身がお気の毒です.",
+    :help => ['otsnue {SCREENNAME}', 'update @%s 頭が気の毒です.'],
+    :completion_proc => lambda {|cmd, args|
+      find_user_candidates args, "#{cmd} %s"
+    }
+  )
+end
+
+# vim: fenc=utf8

data/lib/plugin/outputz.rb

@@ -0,0 +1,35 @@
+# -*- coding: utf-8 -*-
+
+
+module Termtter::Client
+  configatron.plugins.outputz.set_default(:uri, 'termtter://twitter.com/status/update')
+
+  key = configatron.plugins.outputz.secret_key
+  if key.instance_of? Configatron::Store
+    puts 'Need your secret key'
+    puts 'please set configatron.plugins.outputz.secret_key'
+  else
+    add_command /^(update|u)\s+(.*)/ do |m, t|
+      text = ERB.new(m[2]).result(binding).gsub(/\n/, ' ')
+      unless text.empty?
+        t.update_status(text)
+        puts "=> #{text}"
+      end
+      t.instance_variable_get('@connection').
+        start('outputz.com', 80) do |http|
+          key  = CGI.escape key
+          uri  = CGI.escape configatron.plugins.outputz.uri
+          size = text.split(//).size
+          http.post('/api/post', "key=#{key}&uri=#{uri}&size=#{size}")
+        end
+    end
+  end
+end
+
+# outputz.rb
+#   a plugin that report to outputz your post
+#
+# settings (note: must this order)
+#   configatron.plugins.outputz.secret_key = 'your secret key'
+#   plugin 'outputz'
+

data/lib/plugin/pause.rb

@@ -0,0 +1,3 @@
+# -*- coding: utf-8 -*-
+
+Termtter::Client.pause

data/lib/plugin/plugin.rb

@@ -0,0 +1,53 @@
+# -*- coding: utf-8 -*-
+
+module Termtter::Client
+
+  public_storage[:plugins] = Dir["#{File.dirname(__FILE__)}/*.rb"].map do |f|
+    f.match(%r|([^/]+).rb$|)[1]
+  end
+
+  register_command(
+    :name      => :plugin, :aliases => [],
+    :exec_proc => lambda {|arg|
+      begin
+        result = plugin arg.strip
+      rescue LoadError
+      ensure
+        puts "=> #{result.inspect}"
+      end
+    },
+    :completion_proc => lambda {|cmd, args|
+      find_user_candidates args, "#{cmd} %s"
+      unless args.empty?
+        find_plugin_candidates args, "#{cmd} %s"
+      else
+        public_storage[:plugins].sort
+      end
+    },
+    :help      => ['plugin FILE', 'Load a plugin']
+  )
+
+  register_command(
+    :name      => :plugins, :aliases => [],
+    :exec_proc => lambda {|arg|
+      puts public_storage[:plugins].sort.join("\n")
+    },
+    :help      => ['plugins', 'Show list of plugins']
+  )
+
+  def self.find_plugin_candidates(a, b)
+    public_storage[:plugins].
+      grep(/^#{Regexp.quote a}/i).
+      map {|u| b % u }
+  end
+end
+
+# plugin.rb
+#   a dynamic plugin loader
+# example
+#   > u <%= not erbed %>
+#   => <%= not erbed %>
+#   > plugin erb
+#   => true
+#   > u <%= 1 + 2 %>
+#   => 3

data/lib/plugin/post_exec_hook_sample.rb

@@ -0,0 +1,9 @@
+# -*- coding: utf-8 -*-
+
+Termtter::Client.register_hook(
+  :name => :post_exec_hook_sample,
+  :points => [:post_exec_list],
+  :exec_proc => lambda {|cmd, arg, result|
+    p result
+  }
+)

data/lib/plugin/pre_exec_hook_sample.rb

@@ -0,0 +1,9 @@
+# -*- coding: utf-8 -*-
+
+Termtter::Client.register_hook(
+  :name => :pre_exec_hook_sample,
+  :points => [:pre_exec_update],
+  :exec_proc => lambda {|cmd, arg|
+    false if /^y?$/i !~ Readline.readline("update? #{arg} [Y/n] ", false)
+  }
+)