net-irc 0.0.7 → 0.0.8

data/examples/ircd.rb

@@ -0,0 +1,358 @@
+#!/usr/bin/env ruby
+# vim:fileencoding=UTF-8:
+
+require 'rubygems'
+require 'net/irc'
+
+class NetIrcServer < Net::IRC::Server::Session
+	def server_name
+		"net-irc"
+	end
+
+	def server_version
+		"0.0.0"
+	end
+
+	def available_user_modes
+		"iosw"
+	end
+
+	def default_user_modes
+		""
+	end
+
+	def available_channel_modes
+		"om"
+	end
+
+	def default_channel_modes
+		""
+	end
+
+	def initialize(*args)
+		super
+		@@channels ||= {}
+		@@users    ||= {}
+		@ping        = false
+	end
+
+	def on_pass(m)
+	end
+
+	def on_user(m)
+		@user, @real = m.params[0], m.params[3]
+		@host        = @socket.peeraddr[2]
+		@prefix      = Prefix.new("#{@nick}!#{@user}@#{@host}")
+		@joined_on   = @updated_on = Time.now.to_i
+
+		post @socket, @prefix, NICK, nick
+		@nick = nick
+		@prefix = "#{@nick}!#{@user}@#{@host}"
+
+		time = Time.now.to_i
+		@@users[@nick.downcase] = {
+			:nick       => @nick,
+			:user       => @user,
+			:host       => @host,
+			:real       => @real,
+			:prefix     => @prefix,
+			:socket     => @socket,
+			:joined_on  => time,
+			:updated_on => time
+		}
+
+		initial_message
+
+		start_ping
+	end
+
+	def on_join(m)
+		channels = m.params[0].split(/\s*,\s*/)
+		password = m.params[1]
+
+		channels.each do |channel|
+			unless channel.downcase =~ /^#/
+				post @socket, server_name, ERR_NOSUCHCHANNEL, @nick, channel, "No such channel"
+				next
+			end
+
+			unless @@channels.key?(channel.downcase)
+				channel_create(channel)
+			else
+				return if @@channels[channel.downcase][:users].key?(@nick.downcase)
+
+				@@channels[channel.downcase][:users][@nick.downcase] = []
+			end
+
+			mode = @@channels[channel.downcase][:mode].empty? ? "" : "+" + @@channels[channel.downcase][:mode]
+			post @socket, server_name, RPL_CHANNELMODEIS, @nick, @@channels[channel.downcase][:alias], mode
+
+			channel_users = ""
+			@@channels[channel.downcase][:users].each do |nick, m|
+				post @@users[nick][:socket], @prefix, JOIN, @@channels[channel.downcase][:alias]
+
+				case
+				when m.index("@")
+					f = "@"
+				when m.index("+")
+					f = "+"
+				else
+					f = ""
+				end
+				channel_users += "#{f}#{@@users[nick.downcase][:nick]} "
+			end
+			post @socket, server_name, RPL_NAMREPLY, @@users[nick][:nick], "=", @@channels[channel.downcase][:alias], "#{channel_users.strip}"
+			post @socket, server_name, RPL_ENDOFNAMES, @@users[nick][:nick], @@channels[channel.downcase][:alias], "End of /NAMES list"
+		end
+	end
+
+	def on_part(m)
+		channel, message = *m.params
+
+		@@channels[channel.downcase][:users].each do |nick, f|
+			post @@users[nick][:socket], @prefix, PART, @@channels[channel.downcase][:alias], message
+		end
+		channel_part(channel)
+	end
+
+	def on_quit(m)
+		message = m.params[0]
+		@@channels.each do |channel, f|
+			if f[:users].key?(@nick.downcase)
+				channel_part(channel)
+				f[:users].each do |nick, m|
+					post @@users[nick][:socket], @prefix, QUIT, message
+				end
+			end
+		end
+		finish
+	end
+
+	def on_disconnected
+		super
+		@@channels.each do |channel, f|
+			if f[:users].key?(@nick.downcase)
+				channel_part(channel)
+				f[:users].each do |nick, m|
+					post @@users[nick][:socket], @prefix, QUIT, "disconnect"
+				end
+			end
+		end
+		channel_part_all
+		@@users.delete(@nick.downcase)
+	end
+
+	def on_who(m)
+		channel = m.params[0]
+		return unless channel
+
+		c = channel.downcase
+		case
+		when @@channels.key?(c)
+			@@channels[c][:users].each do |nickname, m|
+				nick = @@users[nickname][:nick]
+				user = @@users[nickname][:user]
+				host = @@users[nickname][:host]
+				real = @@users[nickname][:real]
+				case
+				when m.index("@")
+					f = "@"
+				when m.index("+")
+					f = "+"
+				else
+					f = ""
+				end
+				post @socket, server_name, RPL_WHOREPLY, @nick, @@channels[c][:alias], user, host, server_name, nick, "H#{f}", "0 #{real}"
+			end
+			post @socket, server_name, RPL_ENDOFWHO, @nick, @@channels[c][:alias], "End of /WHO list"
+		end
+	end
+
+	def on_mode(m)
+	end
+
+	def on_privmsg(m)
+		while (Time.now.to_i - @updated_on < 2)
+			sleep 2
+		end
+		idle_update
+
+		return on_ctcp(m[0], ctcp_decoding(m[1])) if m.ctcp?
+
+		target, message = *m.params
+		t = target.downcase
+
+		case
+		when @@channels.key?(t)
+			if @@channels[t][:users].key?(@nick.downcase)
+				@@channels[t][:users].each do |nick, m|
+					post @@users[nick][:socket], @prefix, PRIVMSG, @@channels[t][:alias], message unless nick == @nick.downcase
+				end
+			else
+				post @socket, nil, ERR_CANNOTSENDTOCHAN, @nick, target, "Cannot send to channel"
+			end
+		when @@users.key?(t)
+			post @@users[nick][:socket], @prefix, PRIVMSG, @@users[t][:nick], message
+		else
+			post @socket, nil, ERR_NOSUCHNICK, @nick, target, "No such nick/channel"
+		end
+	end
+
+	def on_ping(m)
+		post @socket, server_name, PONG, m.params[0]
+	end
+
+	def on_pong(m)
+		@ping = true
+	end
+
+	def idle_update
+		@updated_on = Time.now.to_i
+		if logged_in?
+			@@users[@nick.downcase][:updated_on] = @updated_on
+		end
+	end
+
+	def channel_create(channel)
+		@@channels[channel.downcase] = {
+			:alias      => channel,
+			:topic      => "",
+			:mode       => default_channel_modes,
+			:users      => {@nick.downcase => ["@"]},
+		}
+	end
+
+	def channel_part(channel)
+		@@channels[channel.downcase][:users].delete(@nick.downcase)
+		channel_delete(channel.downcase) if @@channels[channel.downcase][:users].size == 0
+	end
+
+	def channel_part_all
+		@@channels.each do |c|
+			channel_part(c)
+		end
+	end
+
+	def channel_delete(channel)
+		@@channels.delete(channel.downcase)
+	end
+
+	def post(socket, prefix, command, *params)
+		m = Message.new(prefix, command, params.map{|s|
+			s.gsub(/[\r\n]/, "")
+		})
+		socket << m
+	rescue
+		finish
+	end
+
+	def start_ping
+		Thread.start do
+			loop do
+				@ping = false
+				time = Time.now.to_i
+				if @ping == false && (time - @updated_on > 60)
+					post @socket, server_name, PING, @prefix
+					loop do
+						sleep 1
+						if @ping
+							break
+						end
+						if 60 < Time.now.to_i - time
+							Thread.stop
+							finish
+						end
+					end
+				end
+				sleep 60
+			end
+		end
+	end
+
+	# Call when client connected.
+	# Send RPL_WELCOME sequence. If you want to customize, override this method at subclass.
+	def initial_message
+		post @socket, server_name, RPL_WELCOME,  @nick, "Welcome to the Internet Relay Network #{@prefix}"
+		post @socket, server_name, RPL_YOURHOST, @nick, "Your host is #{server_name}, running version #{server_version}"
+		post @socket, server_name, RPL_CREATED,  @nick, "This server was created #{Time.now}"
+		post @socket, server_name, RPL_MYINFO,   @nick, "#{server_name} #{server_version} #{available_user_modes} #{available_channel_modes}"
+	end
+
+end
+
+
+if __FILE__ == $0
+	require "optparse"
+
+	opts = {
+		:port  => 6969,
+		:host  => "localhost",
+		:log   => nil,
+		:debug => false,
+		:foreground => false,
+	}
+
+	OptionParser.new do |parser|
+		parser.instance_eval do
+			self.banner = <<-EOB.gsub(/^\t+/, "")
+				Usage: #{$0} [opts]
+
+			EOB
+
+			separator ""
+
+			separator "Options:"
+			on("-p", "--port [PORT=#{opts[:port]}]", "port number to listen") do |port|
+				opts[:port] = port
+			end
+
+			on("-h", "--host [HOST=#{opts[:host]}]", "host name or IP address to listen") do |host|
+				opts[:host] = host
+			end
+
+			on("-l", "--log LOG", "log file") do |log|
+				opts[:log] = log
+			end
+
+			on("--debug", "Enable debug mode") do |debug|
+				opts[:log]   = $stdout
+				opts[:debug] = true
+			end
+
+			on("-f", "--foreground", "run foreground") do |foreground|
+				opts[:log]        = $stdout
+				opts[:foreground] = true
+			end
+
+			on("-n", "--name [user name or email address]") do |name|
+				opts[:name] = name
+			end
+
+			parse!(ARGV)
+		end
+	end
+
+	opts[:logger] = Logger.new(opts[:log], "daily")
+	opts[:logger].level = opts[:debug] ? Logger::DEBUG : Logger::INFO
+
+	#def daemonize(foreground = false)
+	#	[:INT, :TERM, :HUP].each do |sig|
+	#		Signal.trap sig, "EXIT"
+	#	end
+	#	return yield if $DEBUG or foreground
+	#	Process.fork do
+	#		Process.setsid
+	#		Dir.chdir "/"
+	#		STDIN.reopen  "/dev/null"
+	#		STDOUT.reopen "/dev/null", "a"
+	#		STDERR.reopen STDOUT
+	#		yield
+	#	end
+	#	exit! 0
+	#end
+
+	#daemonize(opts[:debug] || opts[:foreground]) do
+	Net::IRC::Server.new(opts[:host], opts[:port], NetIrcServer, opts).start
+	#end
+end
+

data/examples/mixi.rb

@@ -1,4 +1,5 @@
 #!/usr/bin/env ruby
+# vim:fileencoding=UTF-8:
 =begin
 
 
@@ -11,7 +12,7 @@ Ruby's by cho45
 $LOAD_PATH << "lib"
 $LOAD_PATH << "../lib"
 
-$KCODE = "u" # json use this
+$KCODE = "u" if RUBY_VERSION < "1.9" # json use this
 
 require "rubygems"
 require "json"

data/examples/sig.rb

@@ -1,4 +1,5 @@
 #!/usr/bin/env ruby
+# vim:fileencoding=UTF-8:
 =begin
 # sig.rb
 
@@ -16,7 +17,7 @@ ServerLog IRC Gateway
 $LOAD_PATH << "lib"
 $LOAD_PATH << "../lib"
 
-$KCODE = "u" # json use this
+$KCODE = "u" if RUBY_VERSION < "1.9" # json use this
 
 require "rubygems"
 require "net/irc"

data/examples/tig.rb

@@ -1,12 +1,12 @@
 #!/usr/bin/env ruby
-# vim:fileencoding=utf-8:
-# -*- coding: utf-8 -*-
+# vim:fileencoding=UTF-8:
+$KCODE = "u" if RUBY_VERSION < "1.9" # json use this
 =begin
 
 # tig.rb
 
 Ruby version of TwitterIrcGateway
-( http://www.misuzilla.org/dist/net/twitterircgateway/ )
+<http://www.misuzilla.org/dist/net/twitterircgateway/>
 
 ## Launch
 
@@ -20,15 +20,40 @@ If you want to help:
 
 Options specified by after IRC realname.
 
-Configuration example for Tiarra ( http://coderepos.org/share/wiki/Tiarra ).
+Configuration example for Tiarra <http://coderepos.org/share/wiki/Tiarra>.
 
-	twitter {
-		host: localhost
-		port: 16668
-		name: username@example.com athack jabber=username@example.com:jabberpasswd tid ratio=32:1 replies=6 maxlimit=70
+	general {
+		server-in-encoding: utf8
+		server-out-encoding: utf8
+		client-in-encoding: utf8
+		client-out-encoding: utf8
+	}
+
+	networks {
+		name: tig
+	}
+
+	tig {
+		server: localhost 16668
 		password: password on Twitter
-		in-encoding: utf8
-		out-encoding: utf8
+		# Recommended
+		name: username mentions tid
+
+		# Same as TwitterIrcGateway.exe.config.sample
+		#   (90, 360 and 300 seconds)
+		#name: username dm ratio=4:1 maxlimit=50
+		#name: username dm ratio=20:5:6 maxlimit=62 mentions
+		#
+		# <http://cheebow.info/chemt/archives/2009/04/posttwit.html>
+		#   (60, 360 and 150 seconds)
+		#name: username dm ratio=30:5:12 maxlimit=94 mentions
+		#
+		# <http://cheebow.info/chemt/archives/2009/07/api150rhtwit.html>
+		#   (36, 360 and 150 seconds)
+		#name: username dm ratio=50:5:12 maxlimit=134 mentions
+		#
+		# for Jabber
+		#name: username jabber=username@example.com:jabberpasswd
 	}
 
 ### athack
@@ -42,13 +67,13 @@ it's good for Twitter like reply command (@nick).
 In this case, you will see torrent of join messages after connected,
 because NAMES list can't send @ leading nick (it interpreted op.)
 
-### tid[=<color>]
+### tid[=<color:10>[,<bgcolor>]]
 
 Apply ID to each message for make favorites by CTCP ACTION.
 
-	/me fav ID [ID...]
+	/me fav [ID...]
 
-<color> can be
+<color> and <bgcolor> can be
 
 	0  => white
 	1  => black
@@ -67,11 +92,10 @@ Apply ID to each message for make favorites by CTCP ACTION.
 	14 => grey
 	15 => lightgrey    silver
 
-
 ### jabber=<jid>:<pass>
 
 If `jabber=<jid>:<pass>` option specified,
-use jabber to get friends timeline.
+use Jabber to get friends timeline.
 
 You must setup im notifing settings in the site and
 install "xmpp4r-simple" gem.
@@ -84,28 +108,77 @@ Be careful for managing password.
 
 Use IM instead of any APIs (e.g. post)
 
-### ratio=<timeline>:<friends>
+### ratio=<timeline>:<dm>[:<mentions>]
+
+"121:6:20" by default.
+
+	/me ratios
+
+	   Ratio | Timeline |   DM  | Mentions |
+	---------+----------+-------+----------|
+	       1 |      24s |   N/A |      N/A |
+	   141:6 |      26s |   10m OR N/A     |
+	  135:12 |      27s |    5m OR N/A     |
+	 135:6:6 |      27s |   10m |      10m |
+	---------+----------+-------+----------|
+	121:6:20 |      30s |   10m |       3m |
+	---------+----------+-------+----------|
+	     4:1 |      31s |  2m1s |      N/A |
+	 50:5:12 |      49s | 8m12s |    3m25s |
+	  20:5:6 |      57s | 3m48s |    3m10s |
+	 30:5:12 |      58s | 5m45s |    2m24s |
+	   1:1:1 |    1m13s | 1m13s |    1m13s |
+	---------------------------------------+
+	                    (Hourly limit: 150)
+
+### dm[=<ratio>]
+
+### mentions[=<ratio>]
+
+### maxlimit=<hourly_limit>
+
+### clientspoofing
+
+### httpproxy=[<user>[:<password>]@]<address>[:<port>]
+
+### main_channel=<channel:#twitter>
+
+### api_source=<source>
 
-### replies[=<ratio>]
+### max_params_count=<number:3>
 
-### maxlimit=<hourly limit>
+### check_friends_interval=<seconds:3600>
 
-### checkrls=<interval seconds>
+### check_updates_interval=<seconds:86400>
 
-### secure
+Set 0 to disable checking.
 
-Force SSL for API.
+### old_style_reply
+
+### tmap_size=<number:10404>
+
+### strftime=<format:%m-%d %H:%M>
+
+### untiny_whole_urls
+
+### bitlify=<username>:<apikey>:<minlength:20>
+
+### unuify
+
+### shuffled_tmap
 
 ## Extended commands through the CTCP ACTION
 
 ### list (ls)
 
-	/me list NICK_or_screen_name
+	/me list NICK [NUMBER]
 
 ### fav (favorite, favourite, unfav, unfavorite, unfavourite)
 
-	/me fav ID [ID...]
-	/me unfav ID [ID...]
+	/me fav [ID...]
+	/me unfav [ID...]
+	/me fav! [ID...]
+	/me fav NICK
 
 ### link (ln)
 
@@ -113,27 +186,45 @@ Force SSL for API.
 
 ### destroy (del, delete, miss, oops, remove, rm)
 
-	/me destroy ID [ID...]
+	/me destroy [ID...]
 
 ### in (location)
 
 	/me in Sugamo, Tokyo, Japan
 
-### reply (re)
+### reply (re, mention)
 
 	/me reply ID blah, blah...
 
-### utf7
+### retweet (rt)
+		
+	/me retweet ID (blah, blah...)
+
+### utf7 (utf-7)
 
-   /me utf7
+	/me utf7
 
 ### name
 
-   /me name My Name
+	/me name My Name
 
 ### description (desc)
 
-   /me description blah, blah...
+	/me description blah, blah...
+
+### spoof
+
+	/me spoof
+	/me spoo[o...]f
+	/me spoof tigrb twitterircgateway twitt web mobileweb
+
+### bot (drone)
+
+	/me bot NICK [NICK...]
+
+## Feed
+
+<http://coderepos.org/share/log/lang/ruby/net-irc/trunk/examples/tig.rb?limit=100&mode=stop_on_copy&format=rss>
 
 ## License
 
@@ -141,24 +232,30 @@ Ruby's by cho45
 
 =end
 
-$LOAD_PATH << "lib"
-$LOAD_PATH << "../lib"
-
-$KCODE = "u" # json use this
+if File.directory? "lib"
+	$LOAD_PATH << "lib"
+elsif File.directory? File.expand_path("lib", "..")
+	$LOAD_PATH << File.expand_path("lib", "..")
+end
 
 require "rubygems"
 require "net/irc"
 require "net/https"
 require "uri"
-require "json"
-require "socket"
 require "time"
 require "logger"
 require "yaml"
 require "pathname"
-require "cgi"
+require "ostruct"
+require "json"
 
-Net::HTTP.version_1_2
+begin
+	require "iconv"
+	require "punycode"
+rescue LoadError
+end
+
+module Net::IRC::Constants; RPL_WHOISBOT = "335"; RPL_CREATEONTIME = "329"; end
 
 class TwitterIrcGateway < Net::IRC::Server::Session
 	def server_name
@@ -166,19 +263,29 @@ class TwitterIrcGateway < Net::IRC::Server::Session
 	end
 
 	def server_version
-		"0.0.0"
+		rev = %q$Revision: 34381 $.split[1]
+		rev &&= "+r#{rev}"
+		"0.0.0#{rev}"
+	end
+
+	def available_user_modes
+		"o"
+	end
+
+	def available_channel_modes
+		"mnti"
 	end
 
 	def main_channel
-		"#twitter"
+		@opts.main_channel || "#twitter"
 	end
 
-	def api_base
-		URI("http://twitter.com/")
+	def api_base(secure = true)
+		URI("http#{"s" if secure}://twitter.com/")
 	end
 
 	def api_source
-		"tigrb"
+		"#{@opts.api_source || "tigrb"}"
 	end
 
 	def jabber_bot_id
@@ -186,37 +293,83 @@ class TwitterIrcGateway < Net::IRC::Server::Session
 	end
 
 	def hourly_limit
-		60
+		150
 	end
 
-	class ApiFailed < StandardError; end
+	class APIFailed < StandardError; end
 
 	def initialize(*args)
 		super
-		@groups     = {}
-		@channels   = [] # joined channels (groups)
-		@nicknames  = {}
-		@user_agent = "#{self.class}/#{server_version} (#{File.basename(__FILE__)})"
-		@config     = Pathname.new(ENV["HOME"]) + ".tig"
-		@map        = nil
+		@groups        = {}
+		@channels      = [] # joined channels (groups)
+		@nicknames     = {}
+		@drones        = []
+		@config        = Pathname.new(ENV["HOME"]) + ".tig"
+		@etags         = {}
+		@consums       = []
+		@limit         = hourly_limit
+		@friends       =
+		@sources       =
+		@rsuffix_regex =
+		@im            =
+		@im_thread     =
+		@utf7          =
+		@httpproxy     = nil
 		load_config
 	end
 
 	def on_user(m)
 		super
-		post @prefix, JOIN, main_channel
-		post server_name, MODE, main_channel, "+o", @prefix.nick
 
-		@real, *@opts = @opts.name || @real.split(/\s+/)
-		@opts = @opts.inject({}) {|r,i|
-			key, value = i.split("=")
-			r.update(key => value)
-		}
-		@tmap = TypableMap.new
+		@real, *@opts = (@opts.name || @real).split(" ")
+		@opts = @opts.inject({}) do |r, i|
+			key, value = i.split("=", 2)
+			key = "mentions" if key == "replies" # backcompat
+			r.update key => case value
+				when nil                      then true
+				when /\A\d+\z/                then value.to_i
+				when /\A(?:\d+\.\d*|\.\d+)\z/ then value.to_f
+				else                               value
+			end
+		end
+		@opts = OpenStruct.new(@opts)
+		@opts.httpproxy.sub!(/\A(?:([^:@]+)(?::([^@]+))?@)?([^:]+)(?::(\d+))?\z/) do
+			@httpproxy = OpenStruct.new({
+				:user => $1, :password => $2, :address => $3, :port => $4.to_i,
+			})
+			$&.sub(/[^:@]+(?=@)/, "********")
+		end if @opts.httpproxy
+
+		retry_count = 0
+		begin
+			@me = api("account/update_profile") #api("account/verify_credentials")
+		rescue APIFailed => e
+			@log.error e.inspect
+			sleep 1
+			retry_count += 1
+			retry if retry_count < 3
+			log "Failed to access API 3 times." <<
+			    " Please check your username/email and password combination, " <<
+			    " Twitter Status <http://status.twitter.com/> and try again later."
+			finish
+		end
+
+		@prefix = prefix(@me)
+		@user   = @prefix.user
+		@host   = @prefix.host
 
-		if @opts["jabber"]
-			jid, pass = @opts["jabber"].split(":", 2)
-			@opts["jabber"].replace("jabber=#{jid}:********")
+		#post NICK, @me.screen_name if @nick != @me.screen_name
+		post server_name, MODE, @nick, "+o"
+		post @prefix, JOIN, main_channel
+		post server_name, MODE, main_channel, "+mto", @nick
+		if @me.status
+			@me.status.user = @me
+			post @prefix, TOPIC, main_channel, generate_status_message(@me.status.text)
+		end
+
+		if @opts.jabber
+			jid, pass = @opts.jabber.split(":", 2)
+			@opts.jabber.replace("jabber=#{jid}:********")
 			if jabber_bot_id
 				begin
 					require "xmpp4r-simple"
@@ -227,21 +380,36 @@ class TwitterIrcGateway < Net::IRC::Server::Session
 					finish
 				end
 			else
-				@opts.delete("jabber")
+				@opts.delete_field :jabber
 				log "This gateway does not support Jabber bot."
 			end
 		end
 
-		log "Client Options: #{@opts.inspect}"
-		@log.info "Client Options: #{@opts.inspect}"
+		log "Client options: #{@opts.marshal_dump.inspect}"
+		@log.info "Client options: #{@opts.inspect}"
+
+		@opts.tid = begin
+			c = @opts.tid # expect: 0..15, true, "0,1"
+			b = nil
+			c, b = c.split(",", 2).map {|i| i.to_i } if c.respond_to? :split
+			c = 10 unless (0 .. 15).include? c # 10: teal
+			if (0 .. 15).include?(b)
+				"\003%.2d,%.2d[%%s]\017" % [c, b]
+			else
+				"\003%.2d[%%s]\017"      % c
+			end
+		end if @opts.tid
 
-		@hourly_limit = hourly_limit
+		@ratio = (@opts.ratio || "121").split(":")
+		@ratio = Struct.new(:timeline, :dm, :mentions).new(*@ratio)
+		@ratio.dm       ||= @opts.dm == true ? @opts.mentions ?  6 : 26 : @opts.dm
+		@ratio.mentions ||= @opts.mentions == true ? @opts.dm ? 20 : 26 : @opts.mentions
 
-		@check_rate_limit_thread = Thread.start do
+		@check_friends_thread = Thread.start do
 			loop do
 				begin
-					check_rate_limit
-				rescue ApiFailed => e
+					check_friends
+				rescue APIFailed => e
 					@log.error e.inspect
 				rescue Exception => e
 					@log.error e.inspect
@@ -249,44 +417,41 @@ class TwitterIrcGateway < Net::IRC::Server::Session
 						@log.error "\t#{l}"
 					end
 				end
-				sleep @opts["checkrls"] || 3600 # 1 hour
+				sleep @opts.check_friends_interval || 3600
 			end
 		end
-		sleep 5
 
-		@ratio = Struct.new(:timeline, :friends, :replies).new(*(@opts["ratio"] || "10:3").split(":").map {|ratio| ratio.to_f })
-		@ratio[:replies] = @opts.key?("replies") ? (@opts["replies"] || 5).to_f : 0.0
+		return if @opts.jabber
 
-		footing = @ratio.inject {|sum, ratio| sum + ratio }
+		@timeline = TypableMap.new(@opts.tmap_size     || 10_404,
+		                           @opts.shuffled_tmap || false)
+		@sources  = @opts.clientspoofing ? fetch_sources : [[api_source, "tig.rb"]]
 
-		@ratio.each_pair {|m, v| @ratio[m] = v / footing }
+		update_redundant_suffix
+		@check_updates_thread = Thread.start do
+			sleep @opts.check_updates_interval || 86400
 
-		@timeline = []
-		@check_friends_thread = Thread.start do
 			loop do
 				begin
-					check_friends
-				rescue ApiFailed => e
-					@log.error e.inspect
+					check_updates
 				rescue Exception => e
 					@log.error e.inspect
 					e.backtrace.each do |l|
 						@log.error "\t#{l}"
 					end
 				end
-				sleep freq(@ratio[:friends])
+				sleep 0.01 * (90 + rand(21)) *
+				      (@opts.check_updates_interval || 86400) # 0.9 ... 1.1 day
 			end
-		end
+		end if @opts.check_updates_interval != 0
 
-		return if @opts["jabber"]
-
-		sleep 3
 		@check_timeline_thread = Thread.start do
+			sleep 2 * (@me.friends_count / 100.0).ceil
+
 			loop do
 				begin
 					check_timeline
-					# check_direct_messages
-				rescue ApiFailed => e
+				rescue APIFailed => e
 					@log.error e.inspect
 				rescue Exception => e
 					@log.error e.inspect
@@ -294,18 +459,33 @@ class TwitterIrcGateway < Net::IRC::Server::Session
 						@log.error "\t#{l}"
 					end
 				end
-				sleep freq(@ratio[:timeline])
+				sleep interval(@ratio.timeline)
 			end
 		end
 
-		return unless @opts.key?("replies")
+		@check_dms_thread = Thread.start do
+			loop do
+				begin
+					check_direct_messages
+				rescue APIFailed => e
+					@log.error e.inspect
+				rescue Exception => e
+					@log.error e.inspect
+					e.backtrace.each do |l|
+						@log.error "\t#{l}"
+					end
+				end
+				sleep interval(@ratio.dm)
+			end
+		end if @opts.dm
+
+		@check_mentions_thread = Thread.start do
+			sleep interval(@ratio.timeline) / 2
 
-		sleep 10
-		@check_replies_thread = Thread.start do
 			loop do
 				begin
-					check_replies
-				rescue ApiFailed => e
+					check_mentions
+				rescue APIFailed => e
 					@log.error e.inspect
 				rescue Exception => e
 					@log.error e.inspect
@@ -313,406 +493,821 @@ class TwitterIrcGateway < Net::IRC::Server::Session
 						@log.error "\t#{l}"
 					end
 				end
-				sleep freq(@ratio[:replies])
+				sleep interval(@ratio.mentions)
 			end
-		end
+		end if @opts.mentions
 	end
 
 	def on_disconnected
-		@check_friends_thread.kill    rescue nil
-		@check_replies_thread.kill    rescue nil
-		@check_timeline_thread.kill   rescue nil
-		@check_rate_limit_thread.kill rescue nil
-		@im_thread.kill               rescue nil
-		@im.disconnect                rescue nil
+		@check_friends_thread.kill  rescue nil
+		@check_timeline_thread.kill rescue nil
+		@check_mentions_thread.kill rescue nil
+		@check_dms_thread.kill      rescue nil
+		@check_updates_thread.kill  rescue nil
+		@im_thread.kill             rescue nil
+		@im.disconnect              rescue nil
 	end
 
 	def on_privmsg(m)
-		return on_ctcp(m[0], ctcp_decoding(m[1])) if m.ctcp?
+		target, mesg = *m.params
+
+		m.ctcps.each {|ctcp| on_ctcp target, ctcp } if m.ctcp?
+
+		return if mesg.empty?
+		return on_ctcp_action(target, mesg) if mesg.sub!(/\A +/, "") #and @opts.direct_action
+
+		command, params = mesg.split(" ", 2)
+		case command.downcase # TODO: escape recursive
+		when "d", "dm"
+			screen_name, mesg = params.split(" ", 2)
+			unless screen_name or mesg
+				log 'Send "d NICK message" to send a direct (private) message.' <<
+				    " You may reply to a direct message the same way."
+				return
+			end
+			m.params[0] = screen_name.sub(/\A@/, "")
+			m.params[1] = mesg #.rstrip
+			return on_privmsg(m)
+		# TODO
+		#when "f", "follow"
+		#when "on"
+		#when "off" # BUG if no args
+		#when "g", "get"
+		#when "w", "whois"
+		#when "n", "nudge" # BUG if no args
+		#when "*", "fav"
+		#when "delete"
+		#when "stats" # no args
+		#when "leave"
+		#when "invite"
+		end unless command.nil?
+
+		mesg = escape_http_urls(mesg)
+		mesg = @opts.unuify ? unuify(mesg) : bitlify(mesg)
+		mesg = Iconv.iconv("UTF-7", "UTF-8", mesg).join.encoding!("ASCII-8BIT") if @utf7
+
+		ret         = nil
 		retry_count = 3
-		ret = nil
-		target, message = *m.params
-		message = Iconv.iconv("UTF-7", "UTF-8", message).join.force_encoding("ASCII-8BIT") if @utf7
 		begin
-			if target =~ /^#/
-				if @opts.key?("alwaysim") && @im && @im.connected? # in jabber mode, using jabber post
-					ret = @im.deliver(jabber_bot_id, message)
-					post "#{nick}!#{nick}@#{api_base.host}", TOPIC, main_channel, untinyurl(message)
+			case
+			when target.ch?
+				if @opts.alwaysim and @im and @im.connected? # in Jabber mode, using Jabber post
+					ret = @im.deliver(jabber_bot_id, mesg)
+					post @prefix, TOPIC, main_channel, mesg
 				else
-					ret = api("statuses/update", { :status => message })
+					previous = @me.status
+					if previous and
+					   ((Time.now - Time.parse(previous.created_at)).to_i < 60 rescue true) and
+					   mesg.strip == previous.text
+						log "You can't submit the same status twice in a row."
+						return
+					end
+
+					in_reply_to = nil
+					if @opts.old_style_reply and mesg[/\A@(?>([A-Za-z0-9_]{1,15}))[^A-Za-z0-9_]/]
+						screen_name = $1
+						unless user = friend(screen_name)
+							user = api("users/show/#{screen_name}")
+						end
+						if user and user.status
+							in_reply_to = user.status.id
+						elsif user
+							user = api("users/show/#{user.id}", {}, { :authenticate => user.protected })
+							in_reply_to = user.status.id if user.status
+						end
+					end
+
+					q = { :status => mesg, :source => source }
+					q.update(:in_reply_to_status_id => in_reply_to) if in_reply_to
+					ret = api("statuses/update", q)
+					log oops(ret) if ret.truncated
+					ret.user.status = ret
+					@me = ret.user
+					log "Status updated"
 				end
+			when target.nick? # Direct message
+				ret = api("direct_messages/new", { :screen_name => target, :text => mesg })
+				post server_name, NOTICE, @nick, "Your direct message has been sent to #{target}."
 			else
-				# direct message
-				ret = api("direct_messages/new", { :user => target, :text => message })
+				post server_name, ERR_NOSUCHNICK, target, "No such nick/channel"
 			end
-			raise ApiFailed, "API failed" unless ret
-			log "Status Updated"
 		rescue => e
 			@log.error [retry_count, e.inspect].inspect
 			if retry_count > 0
 				retry_count -= 1
 				@log.debug "Retry to setting status..."
 				retry
-			else
-				log "Some Error Happened on Sending #{message}. #{e}"
 			end
+			log "Some Error Happened on Sending #{mesg}. #{e}"
 		end
 	end
 
-	def on_ctcp(target, message)
-		_, command, *args = message.split(/\s+/)
-		case command
-		when "call" # /me call <twitter-id> as <nickname>
-			twitter_id = args[0]
-			nickname   = args[2] || args[1] # allow omitting 'as'
-			if nickname == "is"
-				@nicknames.delete(twitter_id)
-				post server_name, NOTICE, main_channel, "Removed nickname for #{twitter_id}"
-			else
-				@nicknames[twitter_id] = nickname
-				post server_name, NOTICE, main_channel, "Call #{twitter_id} as #{nickname}"
-			end
-		when "utf7"
-			begin
-				require "iconv"
-				@utf7 = !@utf7
-				log "UTF-7 mode: #{@utf7 ? 'on' : 'off'}"
-			rescue LoadError => e
-				log "Can't load iconv."
-			end
-		when "list", "ls"
-			nick = args.first
-			unless (1..200).include?(count = args[1].to_i)
-				count = 20
-			end
-			@log.debug([nick, message])
-			to = nick == @nick ? server_name : nick
-			res = api("statuses/user_timeline", { :id => nick, :count => "#{count}" }).reverse_each do |s|
-				@log.debug(s)
-				post to, NOTICE, main_channel, "#{generate_status_message(s)}"
-			end
-			unless res
+	def on_whois(m)
+		nick = m.params[0]
+		unless nick.nick?
+			post server_name, ERR_NOSUCHNICK, nick, "No such nick/channel"
+			return
+		end
+
+		unless user = user(nick)
+			if api("users/username_available", { :username => nick }).valid
+			# TODO: 404 suspended
 				post server_name, ERR_NOSUCHNICK, nick, "No such nick/channel"
+				return
 			end
-		when /^(un)?fav(?:ou?rite)?$/
-			method, pfx = $1.nil? ? ["create", "F"] : ["destroy", "Unf"]
-			args.each_with_index do |tid, i|
-				st = @tmap[tid]
-				if st
-					sleep 1 if i > 0
-					res = api("favorites/#{method}/#{st["id"]}")
-					post server_name, NOTICE, main_channel, "#{pfx}av: #{res["user"]["screen_name"]}: #{res["text"]}"
-				else
-					post server_name, NOTICE, main_channel, "No such ID #{tid}"
-				end
-			end
-		when "link", "ln"
-			args.each do |tid|
-				st = @tmap[tid]
-				if st
-					post server_name, NOTICE, main_channel, "#{api_base + st["user"]["screen_name"]}/statuses/#{st["id"]}"
-				else
-					post server_name, NOTICE, main_channel, "No such ID #{tid}"
-				end
-			end
-#		when /^ratios?$/
-#			if args[1].nil? ||
-#			   @opts.key?("replies") && args[2].nil?
-#				return post server_name, NOTICE, main_channel, "/me ratios <timeline> <frends>[ <replies>]"
-#			end
-#			ratios = args.map {|ratio| ratio.to_f }
-#			if ratios.any? {|ratio| ratio <= 0.0 }
-#				return post server_name, NOTICE, main_channel, "Ratios must be greater than 0."
-#			end
-#			footing = ratios.inject {|sum, ratio| sum + ratio }
-#			@ratio[:timeline] = ratios[0]
-#			@ratio[:friends]  = ratios[1]
-#			@ratio[:replies]  = ratios[2] || 0.0
-#			@ratio.each_pair {|m, v| @ratio[m] = v / footing }
-#			intervals = @ratio.map {|ratio| freq ratio }
-#			post server_name, NOTICE, main_channel, "Intervals: #{intervals.join(", ")}"
-		when /^(?:de(?:stroy|l(?:ete)?)|miss|oops|r(?:emove|m))$/ # destroy, delete, del, remove, rm, miss, oops
-			args.each_with_index do |tid, i|
-				st = @tmap[tid]
-				if st
-					sleep 1 if i > 0
-					res = api("statuses/destroy/#{st["id"]}")
-					post server_name, NOTICE, main_channel, "Destroyed: #{res["text"]}"
-				else
-					post server_name, NOTICE, main_channel, "No such ID #{tid}"
-				end
-			end
-		when "name"
-			name = message.split(/\s+/, 3)[2]
-			unless  name.nil?
-				api("account/update_profile", { :name => name })
-				post server_name, NOTICE, main_channel, "You are named #{name}."
-			end
-		when "email"
-			# FIXME
-			email = args.first
-			unless email.nil?
-				api("account/update_profile", { :email => email })
-			end
-		when "url"
-			# FIXME
-			url = args.first || ""
-			api("account/update_profile", { :url => url })
-		when "in", "location"
-			location = message.split(/\s+/, 3)[2] || ""
-			api("account/update_profile", { :location => location })
-			location = location.empty? ? "nowhere" : "in #{location}"
-			post server_name, NOTICE, main_channel, "You are #{location} now."
-		when /^desc(?:ription)?$/
-			# FIXME
-			description = message.split(/\s+/, 3)[2] || ""
-			api("account/update_profile", { :description => description })
-		when /^colou?rs?$/
-			# FIXME
-			# bg, text, link, fill and border
-		when "image", "img"
-			# FIXME
-			url = args.first
-			# TODO: DCC SEND
-		when "follow"
-			# FIXME
-		when "leave"
-			# FIXME
-		when /^re(?:ply)?$/
-			tid = args.first
-			st  = @tmap[tid]
-			if st
-				msg = message.split(/\s+/, 4)[3]
-				ret = api("statuses/update", { :status => msg, :in_reply_to_status_id => "#{st["id"]}" })
-				if ret
-					log "Status updated (In reply to \x03#{@opts["tid"] || 10}[#{tid}]\x0f <#{api_base + st["user"]["screen_name"]}/statuses/#{st["id"]}>)"
-				end
-			end
+			user = api("users/show/#{nick}", {}, { :authenticate => false })
 		end
-	rescue ApiFailed => e
-		log e.inspect
-	end
 
-	def on_whois(m)
-		nick = m.params[0]
-		f = (@friends || []).find {|i| i["screen_name"] == nick }
-		if f
-			post server_name, RPL_WHOISUSER,   @nick, nick, nick, api_base.host, "*", "#{f["name"]} / #{f["description"]}"
-			post server_name, RPL_WHOISSERVER, @nick, nick, api_base.host, api_base.to_s
-			post server_name, RPL_WHOISIDLE,   @nick, nick, "0", "seconds idle"
-			post server_name, RPL_ENDOFWHOIS,  @nick, nick, "End of WHOIS list"
-		else
-			post server_name, ERR_NOSUCHNICK, nick, "No such nick/channel"
+		prefix    = prefix(user)
+		desc      = user.name
+		desc      = "#{desc} / #{user.description}".gsub(/\s+/, " ") if user.description and not user.description.empty?
+		signon_at = Time.parse(user.created_at).to_i rescue 0
+		idle_sec  = (Time.now - (user.status ? Time.parse(user.status.created_at) : signon_at)).to_i rescue 0
+		location  = user.location
+		location  = "SoMa neighborhood of San Francisco, CA" if location.nil? or location.empty?
+		post server_name, RPL_WHOISUSER,   @nick, nick, prefix.user, prefix.host, "*", desc
+		post server_name, RPL_WHOISSERVER, @nick, nick, api_base.host, location
+		post server_name, RPL_WHOISIDLE,   @nick, nick, "#{idle_sec}", "#{signon_at}", "seconds idle, signon time"
+		post server_name, RPL_ENDOFWHOIS,  @nick, nick, "End of WHOIS list"
+		if @drones.include?(user.id)
+			post server_name, RPL_WHOISBOT, @nick, nick, "is a \002Bot\002 on #{server_name}"
 		end
 	end
 
 	def on_who(m)
 		channel = m.params[0]
 		case
-		when channel == main_channel
-			#     "<channel> <user> <host> <server> <nick>
-			#         ( "H" / "G" > ["*"] [ ( "@" / "+" ) ]
-			#             :<hopcount> <real name>"
-			@friends.each do |f|
-				user = nick = f["screen_name"]
-				host = serv = api_base.host
-				real = f["name"]
-				post server_name, RPL_WHOREPLY, @nick, channel, user, host, serv, nick, "H*@", "0 #{real}"
-			end
+		when channel.casecmp(main_channel).zero?
+			users = [@me]
+			users.concat @friends.reverse if @friends
+			users.each {|friend| whoreply channel, friend }
 			post server_name, RPL_ENDOFWHO, @nick, channel
-		when @groups.key?(channel)
-			@groups[channel].each do |name|
-				f = @friends.find {|i| i["screen_name"] == name }
-				user = nick = f["screen_name"]
-				host = serv = api_base.host
-				real = f["name"]
-				post server_name, RPL_WHOREPLY, @nick, channel, user, host, serv, nick, "H*@", "0 #{real}"
+		when (@groups.key?(channel) and @friends)
+			@groups[channel].each do |nick|
+				whoreply channel, friend(nick)
 			end
 			post server_name, RPL_ENDOFWHO, @nick, channel
 		else
-			post server_name, ERR_NOSUCHNICK, @nick, nick, "No such nick/channel"
+			post server_name, ERR_NOSUCHNICK, @nick, "No such nick/channel"
 		end
 	end
 
 	def on_join(m)
-		channels = m.params[0].split(/\s*,\s*/)
+		channels = m.params[0].split(/ *, */)
 		channels.each do |channel|
-			next if channel == main_channel
+			channel = channel.split(" ", 2).first
+			next if channel.casecmp(main_channel).zero?
 
 			@channels << channel
 			@channels.uniq!
-			post "#{@nick}!#{@nick}@#{api_base.host}", JOIN, channel
-			post server_name, MODE, channel, "+o", @nick
+			post @prefix, JOIN, channel
+			post server_name, MODE, channel, "+mtio", @nick
 			save_config
 		end
 	end
 
 	def on_part(m)
 		channel = m.params[0]
-		return if channel == main_channel
+		return if channel.casecmp(main_channel).zero?
 
 		@channels.delete(channel)
-		post @nick, PART, channel, "Ignore group #{channel}, but setting is alive yet."
+		post @prefix, PART, channel, "Ignore group #{channel}, but setting is alive yet."
 	end
 
 	def on_invite(m)
 		nick, channel = *m.params
-		return if channel == main_channel
+		if not nick.nick? or @nick.casecmp(nick).zero?
+			post server_name, ERR_NOSUCHNICK, nick, "No such nick/channel" # or yourself
+			return
+		end
 
-		if (@friends || []).find {|i| i["screen_name"] == nick }
-			((@groups[channel] ||= []) << nick).uniq!
-			post "#{nick}!#{nick}@#{api_base.host}", JOIN, channel
-			post server_name, MODE, channel, "+o", nick
+		friend = friend(nick)
+
+		case
+		when channel.casecmp(main_channel).zero?
+			case
+			when friend #TODO
+			when api("users/username_available", { :username => nick }).valid
+				post server_name, ERR_NOSUCHNICK, nick, "No such nick/channel"
+			else
+				user = api("friendships/create/#{nick}")
+				join main_channel, [user]
+				@friends << user if @friends
+				@me.friends_count += 1
+			end
+		when friend
+			((@groups[channel] ||= []) << friend.screen_name).uniq!
+			join channel, [friend]
 			save_config
 		else
-			post ERR_NOSUCHNICK, nil, nick, "No such nick/channel"
+			post server_name, ERR_NOSUCHNICK, nick, "No such nick/channel"
 		end
 	end
 
 	def on_kick(m)
-		channel, nick, mes = *m.params
-		return if channel == main_channel
-
-		if (@friends || []).find {|i| i["screen_name"] == nick }
-			(@groups[channel] ||= []).delete(nick)
-			post nick, PART, channel
-			save_config
+		channel, nick, msg = *m.params
+
+		if channel.casecmp(main_channel).zero?
+			@friends.delete_if do |friend|
+				if friend.screen_name.casecmp(nick).zero?
+					user = api("friendships/destroy/#{friend.id}")
+					if user.is_a? User
+						post prefix(user), PART, main_channel, "Removed: #{msg}"
+						@me.friends_count -= 1
+					end
+				end
+			end if @friends
 		else
-			post ERR_NOSUCHNICK, nil, nick, "No such nick/channel"
+			friend = friend(nick)
+			if friend
+				(@groups[channel] ||= []).delete(friend.screen_name)
+				post prefix(friend), PART, channel, "Removed: #{msg}"
+				save_config
+			else
+				post server_name, ERR_NOSUCHNICK, nick, "No such nick/channel"
+			end
 		end
 	end
 
-	private
-	def check_timeline
-		q = { :count => "117" }
-		q[:since_id] = @timeline.last.to_s if @timeline.last
-		api("statuses/friends_timeline", q).reverse_each do |s|
-			id = s["id"]
-			next if id.nil? || @timeline.include?(id)
+	#def on_nick(m)
+	#	@nicknames[@nick] = m.params[0]
+	#end
 
-			@timeline << id
-			nick = s["user"]["screen_name"]
-			mesg = generate_status_message(s)
-			tid  = @tmap.push(s)
-
-			if @opts.key?("tid")
-				mesg = "%s \x03%s[%s]" % [mesg, @opts["tid"] || 10, tid]
-			end
+	def on_topic(m)
+		channel = m.params[0]
+		return if not channel.casecmp(main_channel).zero? or @me.status.nil?
 
-			@log.debug [id, nick, mesg]
-			if nick == @nick # 自分のときは TOPIC に
-				post "#{nick}!#{nick}@#{api_base.host}", TOPIC, main_channel, untinyurl(mesg)
+		begin
+			require "levenshtein"
+			topic    = m.params[1]
+			previous = @me.status
+			return unless previous
+
+			distance = Levenshtein.normalized_distance(previous.text, topic)
+			return if distance.zero?
+
+			status = api("statuses/update", { :status => topic, :source => source })
+			log oops(ret) if status.truncated
+			status.user.status = status
+			@me = status.user
+
+			if distance < 0.5
+				deleted = api("statuses/destroy/#{previous.id}")
+				@timeline.delete_if {|tid, s| s.id == deleted.id }
+				log "Fixed: #{status.text}"
 			else
-				message(nick, main_channel, mesg)
-			end
-			@groups.each do |channel, members|
-				next unless members.include?(nick)
-				message(nick, channel, mesg)
+				log "Status updated"
 			end
+		rescue LoadError
 		end
-		@log.debug "@timeline.size = #{@timeline.size}"
-		@timeline = @timeline.last(200)
 	end
 
-	def generate_status_message(status)
-		s = status
-		mesg = s["text"]
-		@log.debug(mesg)
+	def on_mode(m)
+		channel = m.params[0]
 
-		begin
-			require "iconv"
-			mesg    = mesg.sub(/^.+ > |^.+/) {|str| Iconv.iconv("UTF-8", "UTF-7", str).join }
-			mesg    = "[utf7]: #{mesg}" if body =~ /[^a-z0-9\s]/i
-		rescue LoadError
-		rescue Iconv::IllegalSequence
+		unless m.params[1]
+			if channel.ch?
+				mode = "+mt"
+				mode += "i" unless channel.casecmp(main_channel).zero?
+				post server_name, RPL_CHANNELMODEIS, @nick, channel, mode
+				#post server_name, RPL_CREATEONTIME, @nick, channel, 0
+			elsif channel.casecmp(@nick).zero?
+				post server_name, RPL_UMODEIS, @nick, @nick, "+o"
+			end
 		end
-
-		# time = Time.parse(s["created_at"]) rescue Time.now
-		m = { "&quot;" => "\"", "&lt;" => "<", "&gt;" => ">", "&amp;" => "&", "\n" => " " }
-		mesg.gsub!(/#{m.keys.join("|")}/) { m[$&] }
-		mesg
 	end
 
-	def check_replies
-		time = @prev_time_r || Time.now
-		@prev_time_r = Time.now
-		api("statuses/replies").reverse_each do |s|
-			id = s["id"]
-			next if id.nil? || @timeline.include?(id)
+	private
+	def on_ctcp(target, mesg)
+		type, mesg = mesg.split(" ", 2)
+		method = "on_ctcp_#{type.downcase}".to_sym
+		send(method, target, mesg) if respond_to? method, true
+	end
 
-			created_at = Time.parse(s["created_at"]) rescue next
-			next if created_at < time
+	def on_ctcp_action(target, mesg)
+		#return unless main_channel.casecmp(target).zero?
+		command, *args = mesg.split(" ")
+		case command.downcase
+		when "call"
+			if args.size < 2
+				log "/me call <Twitter_screen_name> as <IRC_nickname>"
+				return
+			end
+			screen_name = args[0]
+			nickname    = args[2] || args[1] # allow omitting "as"
+			if nickname == "is" and
+			   deleted_nick = @nicknames.delete(screen_name)
+				log %Q{Removed the nickname "#{deleted_nick}" for #{screen_name}}
+			else
+				@nicknames[screen_name] = nickname
+				log "Call #{screen_name} as #{nickname}"
+			end
+			#save_config
+		when /\Autf-?7\z/
+			unless defined? ::Iconv
+				log "Can't load iconv."
+				return
+			end
+			@utf7 = !@utf7
+			log "UTF-7 mode: #{@utf7 ? 'on' : 'off'}"
+		when "list", "ls"
+			if args.empty?
+				log "/me list <NICK> [<NUM>]"
+				return
+			end
+			nick = args.first
+			if not nick.nick? or
+			   api("users/username_available", { :username => nick }).valid
+				post server_name, ERR_NOSUCHNICK, nick, "No such nick/channel"
+				return
+			end
+			id           = nick
+			authenticate = false
+			if user = friend(nick)
+				id           = user.id
+				nick         = user.screen_name
+				authenticate = user.protected
+			end
+			unless (1..200).include?(count = args[1].to_i)
+				count = 20
+			end
+			begin
+				res = api("statuses/user_timeline/#{id}",
+				          { :count => count }, { :authenticate => authenticate })
+			rescue APIFailed
+				#log "#{nick} has protected their updates."
+				return
+			end
+			res.reverse_each do |s|
+				message(s, target, nil, nil, NOTICE)
+			end
+		when /\A(un)?fav(?:ou?rite)?(!)?\z/
+		# fav, unfav, favorite, unfavorite, favourite, unfavourite
+			method   = $1.nil? ? "create" : "destroy"
+			force    = !!$2
+			entered  = $&.capitalize
+			statuses = []
+			if args.empty?
+				if method == "create"
+					if status = @timeline.last
+						statuses << status
+					else
+						#log ""
+						return
+					end
+				else
+					@favorites ||= api("favorites").reverse
+					if @favorites.empty?
+						log "You've never favorite yet. No favorites to unfavorite."
+						return
+					end
+					statuses.push @favorites.last
+				end
+			else
+				args.each do |tid_or_nick|
+					case
+					when status = @timeline[tid_or_nick]
+						statuses.push status
+					when friend = friend(tid_or_nick)
+						if friend.status
+							statuses.push friend.status
+						else
+							log "#{tid_or_nick} has no status."
+						end
+					else
+						# PRIVMSG: fav nick
+						log "No such ID/NICK #{@opts.tid % tid_or_nick}"
+					end
+				end
+			end
+			@favorites ||= []
+			statuses.each do |s|
+				if not force and method == "create" and
+				   @favorites.find {|i| i.id == s.id }
+					log "The status is already favorited! <#{permalink(s)}>"
+					next
+				end
+				res = api("favorites/#{method}/#{s.id}")
+				log "#{entered}: #{res.user.screen_name}: #{generate_status_message(res.text)}"
+				if method == "create"
+					@favorites.push res
+				else
+					@favorites.delete_if {|i| i.id == res.id }
+				end
+			end
+		when "link", "ln"
+			args.each do |tid|
+				if status = @timeline[tid]
+					log "#{@opts.tid % tid}: #{permalink(status)}"
+				else
+					log "No such ID #{@opts.tid % tid}"
+				end
+			end
+		when /\Aratios?\z/
+			unless args.empty?
+				args = args.first.split(":") if args.size == 1
+				if @opts.dm and @opts.mentions and args.size < 3
+					log "/me ratios <timeline> <dm> <mentions>"
+					return
+				elsif @opts.dm and args.size < 2
+					log "/me ratios <timeline> <dm>"
+					return
+				elsif @opts.mentions and args.size < 2
+					log "/me ratios <timeline> <mentions>"
+					return
+				end
+				ratios = args.map {|ratio| ratio.to_f }
+				if ratios.any? {|ratio| ratio <= 0.0 }
+					log "Ratios must be greater than 0.0 and fractional values are permitted."
+					return
+				end
+				@ratio.timeline = ratios[0]
+				if @opts.dm
+					@ratio.dm       = ratios[1]
+					@ratio.mentions = ratios[2] if @opts.mentions
+				elsif @opts.mentions
+					@ratio.mentions = ratios[1]
+				end
+			end
+			log "Intervals: #{@ratio.map {|ratio| interval ratio }.inspect}"
+		when /\A(?:de(?:stroy|l(?:ete)?)|miss|oops|r(?:emove|m))\z/
+		# destroy, delete, del, remove, rm, miss, oops
+			statuses = []
+			if args.empty? and @me.status
+				statuses.push @me.status
+			else
+				args.each do |tid|
+					if status = @timeline[tid]
+						if status.user.id == @me.id
+							statuses.push status
+						else
+							log "The status you specified by the ID #{@opts.tid % tid} is not yours."
+						end
+					else
+						log "No such ID #{@opts.tid % tid}"
+					end
+				end
+			end
+			b = false
+			statuses.each do |st|
+				res = api("statuses/destroy/#{st.id}")
+				@timeline.delete_if {|tid, s| s.id == res.id }
+				b = @me.status && @me.status.id == res.id
+				log "Destroyed: #{res.text}"
+			end
+			Thread.start do
+				sleep 2
+				@me = api("account/update_profile") #api("account/verify_credentials")
+				if @me.status
+					@me.status.user = @me
+					msg = generate_status_message(@me.status.text)
+					@timeline.any? do |tid, s|
+						if s.id == @me.status.id
+							msg << " " << @opts.tid % tid
+						end
+					end
+					post @prefix, TOPIC, main_channel, msg
+				end
+			end if b
+		when "name"
+			name = mesg.split(" ", 2)[1]
+			unless name.nil?
+				@me = api("account/update_profile", { :name => name })
+				@me.status.user = @me if @me.status
+				log "You are named #{@me.name}."
+			end
+		when "email"
+			# FIXME
+			email = args.first
+			unless email.nil?
+				@me = api("account/update_profile", { :email => email })
+				@me.status.user = @me if @me.status
+			end
+		when "url"
+			# FIXME
+			url = args.first || ""
+			@me = api("account/update_profile", { :url => url })
+			@me.status.user = @me if @me.status
+		when "in", "location"
+			location = mesg.split(" ", 2)[1] || ""
+			@me = api("account/update_profile", { :location => location })
+			@me.status.user = @me if @me.status
+			location = (@me.location and @me.location.empty?) ? "nowhere" : "in #{@me.location}"
+			log "You are #{location} now."
+		when /\Adesc(?:ription)?\z/
+			# FIXME
+			description = mesg.split(" ", 2)[1] || ""
+			@me = api("account/update_profile", { :description => description })
+			@me.status.user = @me if @me.status
+		#when /\Acolou?rs?\z/ # TODO
+		#	# bg, text, link, fill and border
+		#when "image", "img" # TODO
+		#	url = args.first
+		#	# DCC SEND
+		#when "follow"# TODO
+		#when "leave" # TODO
+		when /\A(?:mention|re(?:ply)?)\z/ # reply, re, mention
+			tid = args.first
+			if status = @timeline[tid]
+				text = mesg.split(" ", 3)[2]
+				screen_name = "@#{status.user.screen_name}"
+				if text.nil? or not text.include?(screen_name)
+					text = "#{screen_name} #{text}"
+				end
+				ret = api("statuses/update", { :status => text, :source => source,
+				                               :in_reply_to_status_id => status.id })
+				log oops(ret) if ret.truncated
+				msg = generate_status_message(status.text)
+				url = permalink(status)
+				log "Status updated (In reply to #{@opts.tid % tid}: #{msg} <#{url}>)"
+				ret.user.status = ret
+				@me = ret.user
+			end
+		when /\Aspoo(o+)?f\z/
+			Thread.start do
+				@sources = args.empty? \
+				         ? @sources.size == 1 || $1 ? fetch_sources($1 && $1.size) \
+				                                    : [[api_source, "tig.rb"]] \
+				         : args.map {|src| [src.upcase != "WEB" ? src : "", "=#{src}"] }
+				log @sources.map {|src| src[1] }.sort.join(", ")
+			end
+		when "bot", "drone"
+			if args.empty?
+				log "/me bot <NICK> [<NICK>...]"
+				return
+			end
+			args.each do |bot|
+				user = friend(bot)
+				unless user
+					post server_name, ERR_NOSUCHNICK, bot, "No such nick/channel"
+					next
+				end
+				if @drones.delete(user.id)
+					mode = "-#{mode}"
+					log "#{bot} is no longer a bot."
+				else
+					@drones << user.id
+					mode = "+#{mode}"
+					log "Marks #{bot} as a bot."
+				end
+			end
+			save_config
+		when "home", "h"
+			if args.empty?
+				log "/me home <NICK>"
+				return
+			end
+			nick = args.first
+			if not nick.nick? or
+			   api("users/username_available", { :username => nick }).valid
+				post server_name, ERR_NOSUCHNICK, nick, "No such nick/channel"
+				return
+			end
+			log "http://twitter.com/#{nick}"
+		when "retweet", "rt"
+			tid = args.first
+			if status = @timeline[tid]
+				if args.size >= 2
+					comment = mesg.split(" ",3)[2] + " "
+				else
+					comment = ""
+				end
+				screen_name = "@#{status.user.screen_name}"
+				rt_message = generate_status_message(status.text)
+				text = "#{comment}RT #{screen_name}: #{rt_message}"
+				ret = api("statuses/update", { :status => text, :source => source })
+				log oops(ret) if ret.truncated
+				log "Status updated (RT to #{@opts.tid % tid}: #{text})"
+				ret.user.status = ret
+				@me = ret.user
+			end
+		end unless command.nil?
+	rescue APIFailed => e
+		log e.inspect
+	end
 
-			nick = s["user"]["screen_name"]
-			mesg = generate_status_message(s)
-			tid  = @tmap.push(s)
+	def on_ctcp_clientinfo(target, msg)
+		if user = user(target)
+			post prefix(user), NOTICE, @nick, ctcp_encode("CLIENTINFO :CLIENTINFO USERINFO VERSION TIME")
+		end
+	end
 
-			if @opts.key?("tid")
-				mesg = "%s \x03%s[%s]" % [mesg, @opts["tid"] || 10, tid]
-			end
+	def on_ctcp_userinfo(target, msg)
+		user = user(target)
+		if user and not user.description.empty?
+			post prefix(user), NOTICE, @nick, ctcp_encode("USERINFO :#{user.description}")
+		end
+	end
 
-			@log.debug [id, nick, mesg]
-			message nick, main_channel, mesg
+	def on_ctcp_version(target, msg)
+		user = user(target)
+		if user and user.status
+			source = user.status.source
+			version = source.gsub(/<[^>]*>/, "").strip
+			version << " <#{$1}>" if / href="([^"]+)/ === source
+			post prefix(user), NOTICE, @nick, ctcp_encode("VERSION :#{version}")
 		end
 	end
 
-	def check_direct_messages
-		time = @prev_time_d || Time.now
-		@prev_time_d = Time.now
-		api("direct_messages", { :since => time.httpdate }).reverse_each do |s|
-			nick = s["sender_screen_name"]
-			mesg = s["text"]
-			time = Time.parse(s["created_at"])
-			@log.debug [nick, mesg, time].inspect
-			message(nick, @nick, mesg)
+	def on_ctcp_time(target, msg)
+		if user = user(target)
+			offset = user.utc_offset
+			post prefix(user), NOTICE, @nick, ctcp_encode("TIME :%s%s (%s)" % [
+				(Time.now + offset).utc.iso8601[0, 19],
+				"%+.2d:%.2d" % (offset/60).divmod(60),
+				user.time_zone,
+			])
 		end
 	end
 
 	def check_friends
-		first = true unless @friends
-		@friends ||= []
-		friends = api("statuses/friends")
-		if first && !@opts.key?("athack")
-			@friends = friends
-			post server_name, RPL_NAMREPLY,   @nick, "=", main_channel, @friends.map{|i| "@#{i["screen_name"]}" }.join(" ")
-			post server_name, RPL_ENDOFNAMES, @nick, main_channel, "End of NAMES list"
+		if @friends.nil?
+			@friends = page("statuses/friends/#{@me.id}", @me.friends_count)
+			if @opts.athack
+				join main_channel, @friends
+			else
+				rest = @friends.map do |i|
+					prefix = "+" #@drones.include?(i.id) ? "%" : "+" # FIXME ~&%
+					"#{prefix}#{i.screen_name}"
+				end.reverse.inject("@#{@nick}") do |r, nick|
+					if r.size < 400
+						r << " " << nick
+					else
+						post server_name, RPL_NAMREPLY, @nick, "=", main_channel, r
+						nick
+					end
+				end
+				post server_name, RPL_NAMREPLY, @nick, "=", main_channel, rest
+				post server_name, RPL_ENDOFNAMES, @nick, main_channel, "End of NAMES list"
+			end
 		else
-			prv_friends = @friends.map {|i| i["screen_name"] }
-			now_friends = friends.map {|i| i["screen_name"] }
+			new_ids    = page("friends/ids/#{@me.id}", @me.friends_count)
+			friend_ids = @friends.reverse.map {|friend| friend.id }
+
+			(friend_ids - new_ids).each do |id|
+				@friends.delete_if do |friend|
+					if friend.id == id
+						post prefix(friend), PART, main_channel, ""
+						@me.friends_count -= 1
+					end
+				end
+			end
+
+			new_ids -= friend_ids
+			unless new_ids.empty?
+				new_friends = page("statuses/friends/#{@me.id}", new_ids.size)
+				join main_channel, new_friends.delete_if {|friend|
+					@friends.any? {|i| i.id == friend.id }
+				}.reverse
+				@friends.concat new_friends
+				@me.friends_count += new_friends.size
+			end
+		end
+	end
+
+	def check_timeline
+		cmd = PRIVMSG
+		q   = { :count => 200 }
+		if @latest_id ||= nil
+			q.update(:since_id => @latest_id)
+		elsif not @me.statuses_count.zero? and not @me.friends_count.zero?
+			cmd = NOTICE
+		end
+
+		api("statuses/friends_timeline", q).reverse_each do |status|
+			id = @latest_id = status.id
+			next if @timeline.any? {|tid, s| s.id == id }
+
+			status.user.status = status
+			user = status.user
+			tid  = @timeline.push(status)
+			tid  = nil unless @opts.tid
 
-			# Twitter API bug?
-			return if !first && (now_friends.length - prv_friends.length).abs > 10
+			@log.debug [id, user.screen_name, status.text].inspect
+
+			if user.id == @me.id
+				mesg = generate_status_message(status.text)
+				mesg << " " << @opts.tid % tid if tid
+				post @prefix, TOPIC, main_channel, mesg
+
+				@me = user
+			else
+				if @friends
+					b = false
+					@friends.each_with_index do |friend, i|
+						if b = friend.id == user.id
+							@friends[i] = user
+							break
+						end
+					end
+					unless b
+						join main_channel, [user]
+						@friends << user
+						@me.friends_count += 1
+					end
+				end
 
-			(now_friends - prv_friends).each do |join|
-				join = "@#{join}" if @opts.key?("athack")
-				post "#{join}!#{join}@#{api_base.host}", JOIN, main_channel
+				message(status, main_channel, tid, nil, cmd)
 			end
-			(prv_friends - now_friends).each do |part|
-				part = "@#{part}" if @opts.key?("athack")
-				post "#{part}!#{part}@#{api_base.host}", PART, main_channel, ""
+			@groups.each do |channel, members|
+				next unless members.include?(user.screen_name)
+				message(status, channel, tid, nil, cmd)
+			end
+		end
+	end
+
+	def check_direct_messages
+		@prev_dm_id ||= nil
+		q = @prev_dm_id ? { :count => 200, :since_id => @prev_dm_id } \
+		                : { :count => 1 }
+		api("direct_messages", q).reverse_each do |mesg|
+			unless @prev_dm_id &&= mesg.id
+				@prev_dm_id = mesg.id
+				next
 			end
-			@friends = friends
+
+			id   = mesg.id
+			user = mesg.sender
+			tid  = nil
+			text = mesg.text
+			@log.debug [id, user.screen_name, text].inspect
+			message(user, @nick, tid, text)
 		end
 	end
 
-	def check_rate_limit
-		@log.debug rate_limit = api("account/rate_limit_status")
-		if rate_limit.key?("hourly_limit") && @hourly_limit != rate_limit["hourly_limit"]
-			msg = "Rate limit was changed: #{@hourly_limit} to #{rate_limit["hourly_limit"]}"
-			log msg
-			@log.info msg
-			@hourly_limit = rate_limit["hourly_limit"]
+	def check_mentions
+		return if @timeline.empty?
+		@prev_mention_id ||= @timeline.last.id
+		api("statuses/mentions", {
+			:count    => 200,
+			:since_id => @prev_mention_id
+		}).reverse_each do |mention|
+			id = @prev_mention_id = mention.id
+			next if @timeline.any? {|tid, s| s.id == id }
+
+			mention.user.status = mention
+			user = mention.user
+			tid  = @timeline.push(mention)
+			tid  = nil unless @opts.tid
+
+			@log.debug [id, user.screen_name, mention.text].inspect
+			message(mention, main_channel, tid)
+
+			@friends.each_with_index do |friend, i|
+				if friend.id == user.id
+					@friends[i] = user
+					break
+				end
+			end if @friends
 		end
-		# rate_limit["remaining_hits"] < 1
-		# rate_limit["reset_time_in_seconds"] - Time.now.to_i
 	end
 
-	def freq(ratio)
-		max   = (@opts["maxlimit"] || 100).to_i
-		limit = @hourly_limit < max ? @hourly_limit : max
-		f     = 3600 / (limit * ratio).round
-		@log.debug "Frequency: #{f}"
-		f
+	def check_updates
+		update_redundant_suffix
+
+		return unless /\+r(\d+)\z/ === server_version
+		rev = $1.to_i
+		uri = URI("http://svn.coderepos.org/share/lang/ruby/net-irc/trunk/examples/tig.rb")
+		@log.debug uri.inspect
+		res = http(uri).request(http_req(:head, uri))
+		@etags[uri.to_s] = res["ETag"]
+		return unless not res.is_a?(Net::HTTPNotModified) and
+		              /\A"(\d+)/ === res["ETag"] and rev < $1.to_i
+		uri = URI("http://coderepos.org/share/log/lang/ruby/net-irc/trunk/examples/tig.rb")
+		uri.query = { :rev => $1, :stop_rev => rev, :verbose => "on" }.to_query_str(";")
+		log "\002New version is available.\017 <#{uri}>"
+	rescue Errno::ECONNREFUSED, Timeout::Error => e
+		@log.error "Failed to get the latest revision of tig.rb from #{uri.host}: #{e.inspect}"
+	end
+
+	def interval(ratio)
+		now   = Time.now
+		max   = @opts.maxlimit
+		limit = 0.98 * @limit # 98% of the rate limit
+		i     = 3600.0        # an hour in seconds
+		i *= @ratio.inject {|sum, r| sum.to_f + r.to_f } +
+		     @consums.delete_if {|t| t < now }.size
+		i /= ratio.to_f
+		i /= (max and 0 < max and max < limit) ? max : limit
+	rescue => e
+		@log.error e.inspect
+		100
+	end
+
+	def join(channel, users)
+		max_params_count = @opts.max_params_count || 3
+		params = []
+		users.each do |user|
+			prefix = prefix(user)
+			post prefix, JOIN, channel
+			params << prefix.nick
+			next if params.size < max_params_count
+
+			post server_name, MODE, channel, "+#{"v" * params.size}", *params
+			params = []
+		end
+		post server_name, MODE, channel, "+#{"v" * params.size}", *params unless params.empty?
+		users
 	end
 
 	def start_jabber(jid, pass)
@@ -720,26 +1315,24 @@ class TwitterIrcGateway < Net::IRC::Server::Session
 		@im = Jabber::Simple.new(jid, pass)
 		@im.add(jabber_bot_id)
 		@im_thread = Thread.start do
+			require "cgi"
+
 			loop do
 				begin
 					@im.received_messages.each do |msg|
-						@log.debug [msg.from, msg.body]
+						@log.debug [msg.from, msg.body].inspect
 						if msg.from.strip == jabber_bot_id
 							# Twitter -> 'id: msg'
-							body = msg.body.sub(/^(.+?)(?:\((.+?)\))?: /, "")
-
-							begin
-								require "iconv"
-								body    = body.sub(/^.+ > |^.+/) {|str| Iconv.iconv("UTF-8", "UTF-7", str).join }
-								body    = "[utf7]: #{body}" if body =~ /[^a-z0-9\s]/i
-							rescue LoadError
-							rescue Iconv::IllegalSequence
-							end
+							body = msg.body.sub(/\A(.+?)(?:\(([^()]+)\))?: /, "")
+							body = decode_utf7(body)
 
 							if Regexp.last_match
 								nick, id = Regexp.last_match.captures
-								body = CGI.unescapeHTML(body)
-								message(id || nick, main_channel, body)
+								body = untinyurl(CGI.unescapeHTML(body))
+								user = nick
+								nick = id || nick
+								nick = @nicknames[nick] || nick
+								post "#{nick}!#{user}@#{api_base.host}", PRIVMSG, main_channel, body
 							end
 						end
 					end
@@ -754,151 +1347,593 @@ class TwitterIrcGateway < Net::IRC::Server::Session
 		end
 	end
 
+	def whoreply(channel, user)
+		#     "<channel> <user> <host> <server> <nick>
+		#         ( "H" / "G" > ["*"] [ ( "@" / "+" ) ]
+		#             :<hopcount> <real name>"
+		prefix = prefix(user)
+		server = api_base.host
+		real   = user.name
+		mode   = case prefix.nick
+			when @nick                     then "@"
+			#when @drones.include?(user.id) then "%" # FIXME
+			else                                "+"
+		end
+		post server_name, RPL_WHOREPLY, @nick, channel,
+		     prefix.user, prefix.host, server, prefix.nick, "H*#{mode}", "0 #{real}"
+	end
+
 	def save_config
 		config = {
-			:channels => @channels,
-			:groups   => @groups,
+			:groups    => @groups,
+			:channels  => @channels,
+			#:nicknames => @nicknames,
+			:drones    => @drones,
 		}
-		@config.open("w") do |f|
-			YAML.dump(config, f)
-		end
+		@config.open("w") {|f| YAML.dump(config, f) }
 	end
 
 	def load_config
 		@config.open do |f|
-			config = YAML.load(f)
-			@channels = config[:channels]
-			@groups   = config[:groups]
+			config     = YAML.load(f)
+			@groups    = config[:groups]    || {}
+			@channels  = config[:channels]  || []
+			#@nicknames = config[:nicknames] || {}
+			@drones    = config[:drones]    || []
 		end
 	rescue Errno::ENOENT
 	end
 
 	def require_post?(path)
 		%r{
-			^
-			(?: status(?:es)?/update $
-			  | direct_messages/new $
+			\A
+			(?: status(?:es)?/update \z
+			  | direct_messages/new \z
 			  | friendships/create/
-			  | account/ (?: end_session $
-			               | update_ )
-			  | favou?ri(?:ing|tes)/create/
+			  | account/(?: end_session \z | update_ )
+			  | favou?ri(?: ing | tes )/create/
 			  | notifications/
 			  | blocks/create/ )
 		}x === path
 	end
 
-	def require_delete?(path)
-		#%r{
-		#	^
-		#	(?: status(?:es)?
-		#	  | direct_messages
-		#	  | friendships
-		#	  | favou?ri(?:ing|tes) )
-		#	  | blocks
-		#	/destroy/
-		#}x === path
-		path.include? "/destroy/"
-	end
+	def api(path, query = {}, opts = {})
+		path.sub!(%r{\A/+}, "")
+		query = query.to_query_str
 
-	def api(path, q = {}, opt = {})
-		ret     = {}
-		headers = { "User-Agent" => @user_agent }
-		headers["If-Modified-Since"] = q["since"] if q.key?("since")
+		authenticate = opts.fetch(:authenticate, true)
 
-		q["source"] ||= api_source
+		uri = api_base(authenticate)
+		uri.path += path
+		uri.path += ".json" if path != "users/username_available"
+		uri.query = query unless query.empty?
+		@log.debug uri.inspect
 
-		path = path.sub(%r{^/+}, "")
-		uri  = api_base.dup
-		if @opts.key?("secure")
-			uri.scheme = "https"
-			uri.port   = 443
-		end
-		uri.path += "#{path}.json"
-		uri.query = q.inject([]) {|r,(k,v)| v ? r << "#{k}=#{URI.escape(v, /[^-.!~*'()\w]/n)}" : r }.join("&")
-		case
-		when require_post?(path)
-			req = Net::HTTP::Post.new(uri.path, headers)
-			req.body = uri.query
-		when require_delete?(path)
-			req = Net::HTTP::Delete.new(uri.path, headers)
-			req.body = uri.query
-		else
-			req = Net::HTTP::Get.new(uri.request_uri, headers)
+		header      = {}
+		credentials = authenticate ? [@real, @pass] : nil
+		req         = case
+			when path.include?("/destroy/")
+				http_req :delete, uri, header, credentials
+			when require_post?(path)
+				http_req :post,   uri, header, credentials
+			else
+				http_req :get,    uri, header, credentials
 		end
-		req.basic_auth(@real, @pass)
-		@log.debug uri.inspect
 
-		http = Net::HTTP.new(uri.host, uri.port)
-		if uri.scheme == "https"
-			http.use_ssl     = true
-			http.verify_mode = OpenSSL::SSL::VERIFY_NONE # FIXME
+		ret = http(uri, 30, 30).request req
+
+		#@etags[uri.to_s] = ret["ETag"]
+
+		if authenticate
+			hourly_limit = ret["X-RateLimit-Limit"].to_i
+			unless hourly_limit.zero?
+				if @limit != hourly_limit
+					msg = "The rate limit per hour was changed: #{@limit} to #{hourly_limit}"
+					log msg
+					@log.info msg
+					@limit = hourly_limit
+				end
+
+				#if req.is_a?(Net::HTTP::Get) and not %w{
+				if not %w{
+					statuses/friends_timeline
+					direct_messages
+					statuses/mentions
+				}.include?(path) and not ret.is_a?(Net::HTTPServerError)
+					expired_on = Time.parse(ret["Date"]) rescue Time.now
+					expired_on += 3636 # 1.01 hours in seconds later
+					@consums << expired_on
+				end
+			end
+		elsif ret["X-RateLimit-Remaining"]
+			@limit_remaining_for_ip = ret["X-RateLimit-Remaining"].to_i
+			@log.debug "IP based limit: #{@limit_remaining_for_ip}"
 		end
-		case ret = http.request(req)
+
+		case ret
 		when Net::HTTPOK # 200
-			ret = JSON.parse(ret.body.gsub(/'(y(?:es)?|no?|true|false|null)'/, '"\1"'))
-			if ret.kind_of?(Hash) && !opt[:suppress_errors] && ret["error"]
-				raise ApiFailed, "Server Returned Error: #{ret["error"]}"
+			# Avoid Twitter's invalid JSON
+			json = ret.body.strip.sub(/\A(?:false|true)\z/, "[\\&]")
+
+			res = JSON.parse json
+			if res.is_a?(Hash) and res["error"] # and not res["response"]
+				if @error != res["error"]
+					@error = res["error"]
+					log @error
+				end
+				raise APIFailed, res["error"]
 			end
-			ret
-		when Net::HTTPNotModified # 304
+			res.to_tig_struct
+		when Net::HTTPNoContent,  # 204
+		     Net::HTTPNotModified # 304
 			[]
-		when Net::HTTPBadRequest # 400
-			# exceeded the rate limitation
-			raise ApiFailed, "#{ret.code}: #{ret.message}"
+		when Net::HTTPBadRequest # 400: exceeded the rate limitation
+			if ret.key?("X-RateLimit-Reset")
+				s = ret["X-RateLimit-Reset"].to_i - Time.now.to_i
+				log "RateLimit: #{(s / 60.0).ceil} min remaining to get timeline"
+				sleep s
+			end
+			raise APIFailed, "#{ret.code}: #{ret.message}"
+		when Net::HTTPUnauthorized # 401
+			raise APIFailed, "#{ret.code}: #{ret.message}"
 		else
-			raise ApiFailed, "Server Returned #{ret.code} #{ret.message}"
+			raise APIFailed, "Server Returned #{ret.code} #{ret.message}"
 		end
 	rescue Errno::ETIMEDOUT, JSON::ParserError, IOError, Timeout::Error, Errno::ECONNRESET => e
-		raise ApiFailed, e.inspect
+		raise APIFailed, e.inspect
+	end
+
+	def page(path, max_count, authenticate = false)
+		@limit_remaining_for_ip ||= 52
+		limit = 0.98 * @limit_remaining_for_ip # 98% of IP based rate limit
+		r     = []
+		cpp   = nil # counts per page
+		1.upto(limit) do |num|
+			ret = api(path, { :page => num }, { :authenticate => authenticate })
+			cpp ||= ret.size
+			r.concat ret
+			break if ret.empty? or num >= max_count / cpp.to_f or
+			         ret.size != cpp or r.size >= max_count
+		end
+		r
+	end
+
+	def generate_status_message(mesg)
+		mesg = decode_utf7(mesg)
+		mesg.delete!("\000\001")
+		mesg.gsub!("&gt;", ">")
+		mesg.gsub!("&lt;", "<")
+		#mesg.gsub!(/\r\n|[\r\n\t\u00A0\u1680\u180E\u2002-\u200D\u202F\u205F\u2060\uFEFF]/, " ")
+		mesg.gsub!(/\r\n|[\r\n\t]/, " ")
+		mesg = untinyurl(mesg)
+		mesg.sub!(@rsuffix_regex, "") if @rsuffix_regex
+		mesg.strip
+	end
+
+	def friend(id)
+		return nil unless @friends
+		if id.is_a? String
+			@friends.find {|i| i.screen_name.casecmp(id).zero? }
+		else
+			@friends.find {|i| i.id == id }
+		end
+	end
+
+	def user(id)
+		if id.is_a? String
+			@nick.casecmp(id).zero? ? @me : friend(id)
+		else
+			@me.id == id ? @me : friend(id)
+		end
 	end
 
-	def message(sender, target, str)
-#		str.gsub!(/&#(x)?([0-9a-f]+);/i) do
-#			[$1 ? $2.hex : $2.to_i].pack("U")
-#		end
-		str    = untinyurl(str)
-		sender = @nicknames[sender] || sender
-		sender = "#{sender}!#{sender}@#{api_base.host}"
-		post sender, PRIVMSG, target, str
+	def prefix(u)
+		nick = u.screen_name
+		nick = "@#{nick}" if @opts.athack
+		user = "id=%.9d" % u.id
+		host = api_base.host
+		host += "/protected" if u.protected
+		host += "/bot"       if @drones.include?(u.id)
+
+		Prefix.new("#{nick}!#{user}@#{host}")
+	end
+
+	def message(struct, target, tid = nil, str = nil, command = PRIVMSG)
+		unless str
+			status = struct.is_a?(Status) ? struct : struct.status
+			str = status.text
+			if command != PRIVMSG
+				time = Time.parse(status.created_at) rescue Time.now
+				str  = "#{time.strftime(@opts.strftime || "%m-%d %H:%M")} #{str}" # TODO: color
+			end
+		end
+		user        = (struct.is_a?(User) ? struct : struct.user).dup
+		screen_name = user.screen_name
+
+		user.screen_name = @nicknames[screen_name] || screen_name
+		prefix = prefix(user)
+		str    = generate_status_message(str)
+		str    = "#{str} #{@opts.tid % tid}" if tid
+
+		post prefix, command, target, str
 	end
 
 	def log(str)
-		str.gsub!(/\r\n|[\r\n]/, " ")
-		post server_name, NOTICE, main_channel, str
+		post server_name, NOTICE, main_channel, str.gsub(/\r\n|[\r\n]/, " ")
+	end
+
+	def decode_utf7(str)
+		return str unless defined?(::Iconv) and str.include?("+")
+
+		str.sub!(/\A(?:.+ > |.+\z)/) { Iconv.iconv("UTF-8", "UTF-7", $&).join }
+		#FIXME str = "[utf7]: #{str}" if str =~ /[^a-z0-9\s]/i
+		str
+	rescue Iconv::IllegalSequence
+		str
+	rescue => e
+		@log.error e
+		str
 	end
 
 	def untinyurl(text)
-		text.gsub(%r"http://(?:(preview\.)?tin|rub)yurl\.com/[0-9a-z=]+"i) {|m|
-			uri = URI(m)
-			uri.host = uri.host.sub($1, "") if $1
-			Net::HTTP.start(uri.host, uri.port) {|http|
-				http.open_timeout = 3
+		text.gsub(@opts.untiny_whole_urls ? URI.regexp(%w[http https]) : %r{
+			http:// (?:
+				(?: bit\.ly | (?: tin | rub) yurl\.com
+				  | is\.gd | cli\.gs | tr\.im | u\.nu | airme\.us
+				  | ff\.im | twurl.nl | bkite\.com | tumblr\.com
+				  | pic\.gd | sn\.im | digg\.com )
+				/ [0-9a-z=-]+ |
+				blip\.fm/~ (?> [0-9a-z]+) (?! /) |
+				flic\.kr/[a-z0-9/]+
+			)
+		}ix) {|url| "#{resolve_http_redirect(URI(url)) || url}" }
+	end
+
+	def bitlify(text)
+		login, key, len = @opts.bitlify.split(":", 3) if @opts.bitlify
+		len      = (len || 20).to_i
+		longurls = URI.extract(text, %w[http https]).uniq.map do |url|
+			URI.rstrip_unpaired_paren(url)
+		end.reject {|url| url.size < len }
+		return text if longurls.empty?
+
+		bitly = URI("http://api.bit.ly/shorten")
+		if login and key
+			bitly.path  = "/shorten"
+			bitly.query = {
+				:version => "2.0.1", :format => "json", :longUrl => longurls,
+			}.to_query_str(";")
+			@log.debug bitly
+			req = http_req(:get, bitly, {}, [login, key])
+			res = http(bitly, 5, 10).request(req)
+			res = JSON.parse(res.body)
+			res = res["results"]
+
+			longurls.each do |longurl|
+				text.gsub!(longurl) do
+					res[$&] && res[$&]["shortUrl"] || $&
+				end
+			end
+		else
+			bitly.path = "/api"
+			longurls.each do |longurl|
+				bitly.query = { :url => longurl }.to_query_str
+				@log.debug bitly
+				req = http_req(:get, bitly)
+				res = http(bitly, 5, 5).request(req)
+				text.gsub!(longurl, res.body)
+			end
+		end
+
+		text
+	rescue => e
+		@log.error e
+		text
+	end
+
+	def unuify(text)
+		unu_url = "http://u.nu/"
+		unu     = URI("#{unu_url}unu-api-simple")
+		size    = unu_url.size
+
+		text.gsub(URI.regexp(%w[http https])) do |url|
+			url = URI.rstrip_unpaired_paren(url)
+			if url.size < size + 5 or url[0, size] == unu_url
+				return url
+			end
+
+			unu.query = { :url => url }.to_query_str
+			@log.debug unu
+
+			res = http(unu, 5, 5).request(http_req(:get, unu)).body
+
+			if res[0, 12] == unu_url
+				res
+			else
+				raise res.split("|")
+			end
+		end
+	rescue => e
+		@log.error e
+		text
+	end
+
+	def escape_http_urls(text)
+		original_text = text.encoding!("UTF-8").dup
+
+		if defined? ::Punycode
+			# TODO: Nameprep
+			text.gsub!(%r{(https?://)([^\x00-\x2C\x2F\x3A-\x40\x5B-\x60\x7B-\x7F]+)}) do
+				domain = $2
+				# Dots:
+				#   * U+002E (full stop)           * U+3002 (ideographic full stop)
+				#   * U+FF0E (fullwidth full stop) * U+FF61 (halfwidth ideographic full stop)
+				# => /[.\u3002\uFF0E\uFF61] # Ruby 1.9 /x
+				$1 + domain.split(/\.|\343\200\202|\357\274\216|\357\275\241/).map do |label|
+					break [domain] if /\A-|[\x00-\x2C\x2E\x2F\x3A-\x40\x5B-\x60\x7B-\x7F]|-\z/ === label
+					next label unless /[^-A-Za-z0-9]/ === label
+					punycode = Punycode.encode(label)
+					break [domain] if punycode.size > 59
+					"xn--#{punycode}"
+				end.join(".")
+			end
+			if text != original_text
+				log "Punycode encoded: #{text}"
+				original_text = text.dup
+			end
+		end
+
+		urls = []
+		(text.split(/[\s<>]+/) + [text]).each do |str|
+			next if /%[0-9A-Fa-f]{2}/ === str
+			# URI::UNSAFE + "#"
+			escaped_str = URI.escape(str, %r{[^-_.!~*'()a-zA-Z0-9;/?:@&=+$,\[\]#]})
+			URI.extract(escaped_str, %w[http https]).each do |url|
+				uri = URI(URI.rstrip_unpaired_paren(url))
+				if not urls.include?(uri.to_s) and exist_uri?(uri)
+					urls << uri.to_s
+				end
+			end if escaped_str != str
+		end
+		urls.each do |url|
+			unescaped_url = URI.unescape(url).encoding!("UTF-8")
+			text.gsub!(unescaped_url, url)
+		end
+		log "Percent encoded: #{text}" if text != original_text
+
+		text.encoding!("ASCII-8BIT")
+	rescue => e
+		@log.error e
+		text
+	end
+
+	def exist_uri?(uri, limit = 1)
+		ret = nil
+		#raise "Not supported." unless uri.is_a?(URI::HTTP)
+		return ret if limit.zero? or uri.nil? or not uri.is_a?(URI::HTTP)
+		@log.debug uri.inspect
+
+		req = http_req :head, uri
+		http(uri, 3, 2).request(req) do |res|
+			ret = case res
+				when Net::HTTPSuccess
+					true
+				when Net::HTTPRedirection
+					uri = resolve_http_redirect(uri)
+					exist_uri?(uri, limit - 1)
+				when Net::HTTPClientError
+					false
+				#when Net::HTTPServerError
+				#	nil
+				else
+					nil
+			end
+		end
+
+		ret
+	rescue => e
+		@log.error e.inspect
+		ret
+	end
+
+	def resolve_http_redirect(uri, limit = 3)
+		return uri if limit.zero? or uri.nil?
+		@log.debug uri.inspect
+
+		req = http_req :head, uri
+		http(uri, 3, 2).request(req) do |res|
+			break if not res.is_a?(Net::HTTPRedirection) or
+			         not res.key?("Location")
+			begin
+				location = URI(res["Location"])
+			rescue URI::InvalidURIError
+			end
+			unless location.is_a? URI::HTTP
 				begin
-					http.head(uri.request_uri, { "User-Agent" => @user_agent })["Location"] || m
-				rescue Timeout::Error
-					m
+					location = URI.join(uri.to_s, res["Location"])
+				rescue URI::InvalidURIError, URI::BadURIError
+					# FIXME
 				end
-			}
-		}
+			end
+			uri = resolve_http_redirect(location, limit - 1)
+		end
+
+		uri
+	rescue => e
+		@log.error e.inspect
+		uri
 	end
 
-	class TypableMap < Hash
-		Roman = %w|k g ky gy s z sh j t d ch n ny h b p hy by py m my y r ry w v q|.unshift("").map {|consonant|
-			case
-			when consonant.size > 1, consonant == "y"
-				%w|a u o|
-			when consonant == "q"
-				%w|a i e o|
+	def fetch_sources(n = nil)
+		n    = n.to_i
+		uri  = URI("http://wedata.net/databases/TwitterSources/items.json")
+		@log.debug uri.inspect
+		json = http(uri).request(http_req(:get, uri)).body
+		sources = JSON.parse json
+		sources.map! {|item| [item["data"]["source"], item["name"]] }.push ["", "web"]
+		if (1 ... sources.size).include?(n)
+			sources = Array.new(n) { sources.delete_at(rand(sources.size)) }.compact
+		end
+		sources
+	rescue => e
+		@log.error e.inspect
+		log "An error occured while loading #{uri.host}."
+		@sources || [[api_source, "tig.rb"]]
+	end
+
+	def update_redundant_suffix
+		uri = URI("http://svn.coderepos.org/share/platform/twitterircgateway/suffixesblacklist.txt")
+		@log.debug uri.inspect
+		res = http(uri).request(http_req(:get, uri))
+		@etags[uri.to_s] = res["ETag"]
+		return if res.is_a? Net::HTTPNotModified
+		source = res.body
+		source.encoding!("UTF-8") if source.respond_to?(:encoding) and source.encoding == Encoding::BINARY
+		@rsuffix_regex = /#{Regexp.union(*source.split)}\z/
+	rescue Errno::ECONNREFUSED, Timeout::Error => e
+		@log.error "Failed to get the redundant suffix blacklist from #{uri.host}: #{e.inspect}"
+	end
+
+	def http(uri, open_timeout = nil, read_timeout = 60)
+		http = case
+			when @httpproxy
+				Net::HTTP.new(uri.host, uri.port, @httpproxy.address, @httpproxy.port,
+				                                  @httpproxy.user, @httpproxy.password)
+			when ENV["HTTP_PROXY"], ENV["http_proxy"]
+				proxy = URI(ENV["HTTP_PROXY"] || ENV["http_proxy"])
+				Net::HTTP.new(uri.host, uri.port, proxy.host, proxy.port,
+				                                  proxy.user, proxy.password)
 			else
-				%w|a i u e o|
-			end.map {|vowel| "#{consonant}#{vowel}" }
-		}.flatten
+				Net::HTTP.new(uri.host, uri.port)
+		end
+		http.open_timeout = open_timeout if open_timeout # nil by default
+		http.read_timeout = read_timeout if read_timeout # 60 by default
+		if uri.is_a? URI::HTTPS
+			http.use_ssl     = true
+			http.verify_mode = OpenSSL::SSL::VERIFY_NONE
+		end
+		http
+	rescue => e
+		@log.error e
+	end
 
-		def initialize(size = 1)
-			@seq  = Roman
-			@map  = {}
+	def http_req(method, uri, header = {}, credentials = nil)
+		accepts = ["*/*;q=0.1"]
+		#require "mime/types"; accepts.unshift MIME::Types.of(uri.path).first.simplified
+		types   = { "json" => "application/json", "txt" => "text/plain" }
+		ext     = uri.path[/[^.]+\z/]
+		accepts.unshift types[ext] if types.key?(ext)
+		user_agent = "#{self.class}/#{server_version} (#{File.basename(__FILE__)}; net-irc) Ruby/#{RUBY_VERSION} (#{RUBY_PLATFORM})"
+
+		header["User-Agent"]      ||= user_agent
+		header["Accept"]          ||= accepts.join(",")
+		header["Accept-Charset"]  ||= "UTF-8,*;q=0.0" if ext != "json"
+		#header["Accept-Language"] ||= @opts.lang # "en-us,en;q=0.9,ja;q=0.5"
+		header["If-None-Match"]   ||= @etags[uri.to_s] if @etags[uri.to_s]
+
+		req = case method.to_s.downcase.to_sym
+		when :get
+			Net::HTTP::Get.new    uri.request_uri, header
+		when :head
+			Net::HTTP::Head.new   uri.request_uri, header
+		when :post
+			Net::HTTP::Post.new   uri.path,        header
+		when :put
+			Net::HTTP::Put.new    uri.path,        header
+		when :delete
+			Net::HTTP::Delete.new uri.request_uri, header
+		else # raise ""
+		end
+		if req.request_body_permitted?
+			req["Content-Type"] ||= "application/x-www-form-urlencoded"
+			req.body = uri.query
+		end
+		req.basic_auth(*credentials) if credentials
+		req
+	rescue => e
+		@log.error e
+	end
+
+	def oops(status)
+		"Oops! Your update was over 140 characters. We sent the short version" <<
+		" to your friends (they can view the entire update on the Web <" <<
+		permalink(status) << ">)."
+	end
+
+	def permalink(struct)
+		path = struct.is_a?(Status) ? "#{struct.user.screen_name}/statuses/#{struct.id}" \
+		                            : struct.screen_name
+		"http://twitter.com/#{path}"
+	end
+
+	def source
+		@sources[rand(@sources.size)].first
+	end
+
+	def initial_message
+		super
+		post server_name, RPL_ISUPPORT, @nick,
+		     "NETWORK=Twitter",
+		     "CHANTYPES=#", "CHANNELLEN=50", "CHANMODES=#{available_channel_modes}",
+		     "NICKLEN=15", "TOPICLEN=420", "PREFIX=(hov)%@+",
+		     "are supported by this server"
+	end
+
+	User   = Struct.new(:id, :name, :screen_name, :location, :description, :url,
+	                    :following, :notifications, :protected, :time_zone,
+	                    :utc_offset, :created_at, :friends_count, :followers_count,
+	                    :statuses_count, :favourites_count, :verified,
+	                    :verified_profile,
+	                    :profile_image_url, :profile_background_color, :profile_text_color,
+	                    :profile_link_color, :profile_sidebar_fill_color,
+	                    :profile_sidebar_border_color, :profile_background_image_url,
+	                    :profile_background_tile, :status)
+	Status = Struct.new(:id, :text, :source, :created_at, :truncated, :favorited,
+	                    :in_reply_to_status_id, :in_reply_to_user_id,
+	                    :in_reply_to_screen_name, :user)
+	DM     = Struct.new(:id, :text, :created_at,
+	                    :sender_id, :sender_screen_name, :sender,
+	                    :recipient_id, :recipient_screen_name, :recipient)
+
+	class TypableMap < Hash
+		#Roman = %w[
+		#	k g ky gy s z sh j t d ch n ny h b p hy by py m my y r ry w v q
+		#].unshift("").map do |consonant|
+		#	case consonant
+		#	when "h", "q"  then %w|a i   e o|
+		#	when /[hy]$/   then %w|a   u   o|
+		#	else                %w|a i u e o|
+		#	end.map {|vowel| "#{consonant}#{vowel}" }
+		#end.flatten
+		Roman = %w[
+			  a   i   u   e   o  ka  ki  ku  ke  ko  sa shi  su  se  so
+			 ta chi tsu  te  to  na  ni  nu  ne  no  ha  hi  fu  he  ho
+			 ma  mi  mu  me  mo  ya      yu      yo  ra  ri  ru  re  ro
+			 wa              wo   n
+			 ga  gi  gu  ge  go  za  ji  zu  ze  zo  da          de  do
+			 ba  bi  bu  be  bo  pa  pi  pu  pe  po
+			kya     kyu     kyo sha     shu     sho cha     chu     cho
+			nya     nyu     nyo hya     hyu     hyo mya     myu     myo
+			rya     ryu     ryo
+			gya     gyu     gyo  ja      ju      jo bya     byu     byo
+			pya     pyu     pyo
+		].freeze
+
+		def initialize(size = nil, shuffle = false)
+			if shuffle
+				@seq = Roman.dup
+				if @seq.respond_to?(:shuffle!)
+					@seq.shuffle!
+				else
+					seq = @seq.dup
+					@seq.map! { seq.slice!(rand(seq.size)) }
+				end
+				@seq.freeze
+			else
+				@seq = Roman
+			end
 			@n    = 0
-			@size = size
+			@size = size || @seq.size
 		end
 
 		def generate(n)
@@ -907,23 +1942,39 @@ class TwitterIrcGateway < Net::IRC::Server::Session
 				n, r = n.divmod(@seq.size)
 				ret << @seq[r]
 			end while n > 0
-			ret.reverse.join
+			ret.reverse.join #.gsub(/n(?=[bmp])/, "m")
 		end
 
 		def push(obj)
 			id = generate(@n)
 			self[id] = obj
 			@n += 1
-			@n = @n % (@seq.size ** @size)
+			@n %= @size
 			id
 		end
-		alias << push
+		alias :<< :push
 
 		def clear
 			@n = 0
 			super
 		end
 
+		def first
+			@size.times do |i|
+				id = generate((@n + i) % @size)
+				return self[id] if key? id
+			end unless empty?
+			nil
+		end
+
+		def last
+			@size.times do |i|
+				id = generate((@n - 1 - i) % @size)
+				return self[id] if key? id
+			end unless empty?
+			nil
+		end
+
 		private :[]=
 		undef update, merge, merge!, replace
 	end
@@ -931,6 +1982,102 @@ class TwitterIrcGateway < Net::IRC::Server::Session
 
 end
 
+class Array
+	def to_tig_struct
+		map do |v|
+			v.respond_to?(:to_tig_struct) ? v.to_tig_struct : v
+		end
+	end
+end
+
+class Hash
+	def to_tig_struct
+		if empty?
+			#warn "" if $VERBOSE
+			#raise Error
+			return nil
+		end
+
+		struct = case
+			when struct_of?(TwitterIrcGateway::User)
+				TwitterIrcGateway::User.new
+			when struct_of?(TwitterIrcGateway::Status)
+				TwitterIrcGateway::Status.new
+			when struct_of?(TwitterIrcGateway::DM)
+				TwitterIrcGateway::DM.new
+			else
+				members = keys
+				members.concat TwitterIrcGateway::User.members
+				members.concat TwitterIrcGateway::Status.members
+				members.concat TwitterIrcGateway::DM.members
+				members.map! {|m| m.to_sym }
+				members.uniq!
+				Struct.new(*members).new
+		end
+		each do |k, v|
+			struct[k.to_sym] = v.respond_to?(:to_tig_struct) ? v.to_tig_struct : v
+		end
+		struct
+	end
+
+	# { :f => nil }     #=> "f"
+	# { "f" => "" }     #=> "f="
+	# { "f" => "v" }    #=> "f=v"
+	# { "f" => [1, 2] } #=> "f=1&f=2"
+	def to_query_str separator = "&"
+		inject([]) do |r, (k, v)|
+			k = URI.encode_component k.to_s
+			(v.is_a?(Array) ? v : [v]).each do |i|
+				if i.nil?
+					r << k
+				else
+					r << "#{k}=#{URI.encode_component i.to_s}"
+				end
+			end
+			r
+		end.join separator
+	end
+
+	private
+	def struct_of? struct
+		(keys - struct.members.map {|m| m.to_s }).size.zero?
+	end
+end
+
+class String
+	def ch?
+		/\A[&#+!][^ \007,]{1,50}\z/ === self
+	end
+
+	def nick? # Twitter screen_name (username)
+		/\A[A-Za-z0-9_]{1,15}\z/ === self
+	end
+
+	def encoding! enc
+		return self unless respond_to? :force_encoding
+		force_encoding enc
+	end
+end
+
+module URI::Escape
+	# URI.escape("あ１") #=> "%E3%81%82\xEF\xBC\x91"
+	# URI("file:///４")  #=> #<URI::Generic:0x9d09db0 URL:file:/４>
+	#   "\\d" -> "0-9" for Ruby 1.9
+	alias :_orig_escape :escape
+	def escape str, unsafe = %r{[^-_.!~*'()a-zA-Z0-9;/?:@&=+$,\[\]]}
+		_orig_escape(str, unsafe)
+	end
+	alias :encode :escape
+
+	def encode_component str, unsafe = /[^-_.!~*'()a-zA-Z0-9 ]/
+		_orig_escape(str, unsafe).tr(" ", "+")
+	end
+
+	def rstrip_unpaired_paren str
+		str.sub(%r{(/[^/()]*(?:\([^/()]*\)[^/()]*)*)\)[^/()]*\z}, "\\1")
+	end
+end
+
 if __FILE__ == $0
 	require "optparse"
 
@@ -985,23 +2132,23 @@ if __FILE__ == $0
 	opts[:logger] = Logger.new(opts[:log], "daily")
 	opts[:logger].level = opts[:debug] ? Logger::DEBUG : Logger::INFO
 
-#	def daemonize(foreground = false)
-#		[:INT, :TERM, :HUP].each do |sig|
-#			Signal.trap sig, "EXIT"
-#		end
-#		return yield if $DEBUG || foreground
-#		Process.fork do
-#			Process.setsid
-#			Dir.chdir "/"
-#			STDIN.reopen  "/dev/null"
-#			STDOUT.reopen "/dev/null", "a"
-#			STDERR.reopen STDOUT
-#			yield
-#		end
-#		exit! 0
-#	end
-
-#	daemonize(opts[:debug] || opts[:foreground]) do
+	#def daemonize(foreground = false)
+	#	[:INT, :TERM, :HUP].each do |sig|
+	#		Signal.trap sig, "EXIT"
+	#	end
+	#	return yield if $DEBUG or foreground
+	#	Process.fork do
+	#		Process.setsid
+	#		Dir.chdir "/"
+	#		STDIN.reopen  "/dev/null"
+	#		STDOUT.reopen "/dev/null", "a"
+	#		STDERR.reopen STDOUT
+	#		yield
+	#	end
+	#	exit! 0
+	#end
+
+	#daemonize(opts[:debug] || opts[:foreground]) do
 		Net::IRC::Server.new(opts[:host], opts[:port], TwitterIrcGateway, opts).start
-#	end
+	#end
 end