net-irc2 0.0.10

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: e4908aab25b550d867b561bb113e159e740dd000
+  data.tar.gz: c29e4d4ed4cf1bcd644a3c47270fb6da528b6a2d
+SHA512:
+  metadata.gz: f2c08bc4d72354eecefd9c8242d32675061ee8f0d5507466c5ed68ba7304a946e8b6a0b75c4442a33fd98b3aa03565dfe2f4e5f0ca20c3fc1e6850283db44370
+  data.tar.gz: d3c4e3feff8ec09ab13f8bb28fa7b7a08176e5fb04b2087dc8a62a7dfe05fbbf7778ecfd4bd32ad3279f71e35886d8a3b82c0ebd51310a94fe9d9b53549b0988

data/AUTHORS.txt

@@ -0,0 +1,33 @@
+Core Authors::
+cho45
+drry
+czaks
+Satoshi Nakagawa
+kouhei
+Tim Carey-Smith
+Wataru TOYA
+Yuki Sonoda (Yugui)
+yappo
+
+Example Contributors::
+cho45
+drry
+mzp
+smbd
+Keiji, Yoshimi
+HIROSE Masaaki
+dzfl
+shunirr
+Kazuhiro NISHIYAMA
+Takeru Naito
+Wataru TOYA
+Yuki Sonoda (Yugui)
+czaks
+yappo
+Keisuke SATO
+SHIBATA Hiroshi
+Sotaro KARASAWA
+Tim Carey-Smith
+Tokuhiro Matsuno
+kusigahama
+motemen

data/ChangeLog

@@ -0,0 +1,95 @@
+2010-01-13  SATOH Hiroh <cho45@lowreal.net>
+
+	* Remove method_missing:
+	Defining method_missing produce big side-effects.
+	(eg. no error on undefined values)
+
+2009-10-11  SATOH Hiroh <cho45@lowreal.net>
+
+	* [new]
+		Implemented Server#sessions which returns all sessions connected to
+		the server.
+	* Released 0.0.9
+
+2009-08-08  SATOH Hiroh <cho45@lowreal.net>
+
+	* [bug]:
+		Fixed to work on ruby1.9.1 (now can send iso-2022-jp)
+	* [new]
+		Implemented Message#ctcps returns embedded all ctcp messages (drry).
+	* Released 0.0.8
+
+2009-02-19  SATOH Hiroh <cho45@lowreal.net>
+
+	* [bug]:
+		Fixed net/irc.rb permission.
+	* Released 0.0.7
+
+2009-02-01  SATOH Hiroh <cho45@lowreal.net>
+
+	* [bug]:
+		Fixed to work on ruby1.9.1
+	* [release]:
+		Released 0.0.6
+
+2008-07-06  SATOH Hiroh <cho45@lowreal.net>
+
+	* [interface]:
+		Removed around @channels and separeted to
+		Net::IRC::Client::ChannelManager as just a sample of managing
+		channels.
+	* [release]:
+		Released 0.0.5
+
+2008-07-06 Satoshi Nakagawa <psychs@limechat.net>
+
+	* [new]:
+		Added a mode parser which can be configured automatically from 005 replies.
+
+2008-06-28 cho45
+
+	* [interface]:
+		Change mode character to symbol.
+	* [new]:
+		Seperate each class to some files.
+	* [release]:
+		Released 0.0.4
+
+2008-06-14 cho45
+
+	* [bug]:
+		Fixed examples. (twitter, wassr, lingr gateways)
+	* [release]:
+		Released 0.0.3
+
+2008-02-06 cho45
+
+	* [release] @5832:
+		Released 0.0.2
+
+
+2008-02-01 cho45
+
+	* [bug] @5986:
+		Fixed to destroy closed stream.
+
+2008-01-31 cho45
+
+	* [new] @5939:
+		Added client example.
+
+	* [new] @5929:
+		Updated tests.
+		Made allow lame prefix in RPL_WELCOME (like freenode) 
+
+2008-01-29 cho45
+
+	* [bug] @5846:
+		athack つかわないときの処理がもろに間違ってた。
+
+	* [bug] @5843:
+		Net::IRC::Server の修正に追従できていなかった
+
+	* [release] @5832:
+		Released 0.0.1
+

data/README

@@ -0,0 +1,91 @@
+
+= net-irc
+
+
+== Description
+
+IRC library. This is mostly conform to RFC 1459 but partly not for convenience.
+
+
+== Installation
+
+=== Archive Installation
+
+	rake install
+
+=== Gem Installation
+
+	gem install net-irc
+
+
+== Features/Problems
+
+* IRC client (for bot)
+* IRC server (for gateway to webservices)
+
+== Synopsis
+
+=== Client
+
+	require "net/irc"
+
+	class SimpleClient < Net::IRC::Client
+		def on_privmsg(m)
+			super
+			channel, message = *m
+			if message =~ /Hello/
+				post NOTICE, channel, "Hello!"
+			end
+		end
+	end
+
+Net::IRC::Client manages channel status and the information is set in @channels.
+So, be careful to use @channels instance variable and call super surely.
+
+=== Server
+
+see example/tig.rb
+
+
+== IRC Gateways
+
+There are some gateways connecting to webservices.
+
+* Twitter
+* Wassr
+* Hatena Haiku
+* Hatena Star
+
+If you want to run it, type following:
+
+	$ cd `ruby -rubygems -e 'print Gem.searcher.find("net/irc").full_gem_path+"/examples"'`
+
+Twitter:
+	$ ./tig.rb -f >> /dev/null 2>&1
+
+Wassr:
+	$ ./wig.rb
+
+Run as daemon in default. If you want to help:
+
+	$ ./tig.rb --help
+	Usage: tig.rb [opts]
+	
+	
+	Options:
+	    -p, --port [PORT=16668]          port number to listen
+	    -h, --host [HOST=localhost]      host name or IP address to listen
+	    -l, --log LOG                    log file
+	        --debug                      Enable debug mode
+	    -f, --foreground                 run foreground
+	    -n [user name or email address]
+	        --name
+
+
+== Copyright
+
+This library is based on RICE <http://arika.org/ruby/rice> written by akira yamada.
+
+Author::    cho45 <cho45@lowreal.net>
+Copyright:: Copyright (c) 2008-2009 cho45
+License::   Ruby's

data/Rakefile

@@ -0,0 +1,69 @@
+require 'rubygems'
+require 'bundler/gem_tasks'
+require 'bundler/setup'
+Bundler.setup(:development)
+
+require 'shipit'
+require 'rake'
+require 'rake/clean'
+require 'rake/contrib/sshpublisher'
+require 'rdoc/task'
+require 'fileutils'
+
+require 'rspec/core/rake_task'
+
+include FileUtils
+
+$LOAD_PATH.unshift "lib"
+require "net/irc"
+
+GEMSPEC = Gem.latest_spec_for('net-irc')
+
+CLEAN.include ['**/.*.sw?', '*.gem', '.config']
+
+task :default => [:spec]
+task :package => [:clean]
+
+RSpec::Core::RakeTask.new do |t|
+	t.rspec_opts = ['--options', "spec/spec.opts"]
+end 
+
+task :upload_doc => [:rdoc] do
+	sh %{rsync --update -avptr html/ lowreal@cho45.stfuawsc.com:/virtual/lowreal/public_html/cho45.stfuawsc.com/net-irc}
+end
+
+Rake::RDocTask.new do |rdoc|
+	rdoc.rdoc_dir = 'html'
+	rdoc.options += GEMSPEC.rdoc_options
+	rdoc.template = "resh"
+	if ENV['DOC_FILES']
+		rdoc.rdoc_files.include(ENV['DOC_FILES'].split(/,\s*/))
+	else
+		rdoc.rdoc_files.include('README', 'ChangeLog')
+		rdoc.rdoc_files.include('lib/**/*.rb')
+		rdoc.rdoc_files.include('ext/**/*.c')
+	end
+end
+
+Rake::ShipitTask.new do |s|
+	s.ChangeVersion "lib/net/irc.rb", "VERSION"
+	s.Commit
+	s.Task :clean, :package, :upload_doc
+	s.Step.new {
+	}.and {
+		system("gem", "push", "pkg/net-irc2-#{GEMSPEC.version}.gem")
+	}
+	s.Tag
+	s.Twitter
+end
+
+task 'AUTHORS.txt' do
+	File.open('AUTHORS.txt', 'w') do |f|
+		f.puts "Core Authors::"
+		f.puts `git shortlog -s -n lib`.gsub(/^\s*\d+\s*/, '')
+		f.puts
+		f.puts "Example Contributors::"
+		f.puts `git shortlog -s -n examples`.gsub(/^\s*\d+\s*/, '')
+	end
+end
+

data/examples/2ch.rb

@@ -0,0 +1,225 @@
+#!/usr/bin/env ruby
+# vim:encoding=UTF-8:
+$KCODE = "u" if RUBY_VERSION < "1.9" # json use this
+
+require 'uri'
+require 'net/http'
+require 'stringio'
+require 'zlib'
+require 'nkf'
+
+class ThreadData
+  class UnknownThread < StandardError; end
+
+  attr_accessor :uri
+  attr_accessor :last_modified, :size
+
+  Line = Struct.new(:n, :name, :mail, :misc, :body, :opts, :id) do
+    def aa?
+      body = self.body
+      return false if body.count("\n") < 3
+
+      significants = body.scan(/[>\n0-9a-z０-９A-Zａ-ｚＡ-Ｚぁ-んァ-ン一-龠]/u).size.to_f
+      body_length  = body.scan(/./u).size
+      is_aa = 1 - significants / body_length
+
+      is_aa > 0.6
+    end
+  end
+
+  def initialize(thread_uri)
+    @uri = URI(thread_uri)
+    _, _, _, @board, @num, = *@uri.path.split('/')
+    @dat = []
+  end
+
+  def length
+    @dat.length
+  end
+
+  def subject
+    retrieve(true) if @dat.size.zero?
+    self[1].opts || ""
+  end
+
+  def [](n)
+    l = @dat[n - 1]
+    return nil unless l
+    name, mail, misc, body, opts = * l.split(/<>/)
+    id = misc[/ID:([^\s]+)/, 1]
+
+    body.gsub!(/<br>/, "\n")
+    body.gsub!(/<[^>]+>/, "")
+    body.gsub!(/^\s+|\s+$/, "")
+    body.gsub!(/&(gt|lt|amp|nbsp);/) {|s|
+      { 'gt' => ">", 'lt' => "<", 'amp' => "&", 'nbsp' => " " }[$1]
+    }
+
+    Line.new(n, name, mail, misc, body, opts, id)
+  end
+
+  def dat
+    @num
+  end
+
+  def retrieve(force=false)
+    @dat = [] if @force
+
+    res = Net::HTTP.start(@uri.host, @uri.port) do |http|
+      req = Net::HTTP::Get.new('/%s/dat/%d.dat' % [@board, @num])
+      req['User-Agent']        = 'Monazilla/1.00 (2ig.rb/0.0e)'
+      req['Accept-Encoding']   = 'gzip' unless @size
+      unless force
+        req['If-Modified-Since'] = @last_modified if @last_modified
+        req['Range']             = "bytes=%d-" % @size if @size
+      end
+
+      http.request(req)
+    end
+
+    ret = nil
+    case res.code.to_i
+    when 200, 206
+      body = res.body
+      if res['Content-Encoding'] == 'gzip'
+        body = StringIO.open(body, 'rb') {|io| Zlib::GzipReader.new(io).read }
+      end
+
+      @last_modified = res['Last-Modified']
+      if res.code == '206'
+        @size += body.size
+      else
+        @size  = body.size
+      end
+
+      body = NKF.nkf('-w', body)
+
+      curr = @dat.size + 1
+      @dat.concat(body.split(/\n/))
+      last = @dat.size
+
+      (curr..last).map {|n|
+        self[n]
+      }
+    when 416 # たぶん削除が発生
+      p ['416']
+      retrieve(true)
+      []
+    when 304 # Not modified
+      []
+    when 302 # dat 落ち
+      p ['302', res['Location']]
+      raise UnknownThread
+    else
+      p ['Unknown Status:', res.code]
+      []
+    end
+  end
+
+  def canonicalize_subject(subject)
+    subject.gsub(/[Ａ-Ｚａ-ｚ０-９]/u) {|c|
+      c.unpack("U*").map {|i| i - 65248 }.pack("U*")
+    }
+  end
+
+  def guess_next_thread
+    res = Net::HTTP.start(@uri.host, @uri.port) do |http|
+      req = Net::HTTP::Get.new('/%s/subject.txt' % @board)
+      req['User-Agent']        = 'Monazilla/1.00 (2ig.rb/0.0e)'
+      http.request(req)
+    end
+
+    recent_posted_threads = (900..999).inject({}) {|r,i|
+      line = self[i]
+      line.body.scan(%r|ttp://#{@uri.host}/test/read.cgi/[^/]+/\d+/|).each do |uri|
+        r["h#{uri}"] = i
+      end if line
+      r
+    }
+
+    current_subject    = canonicalize_subject(self.subject)
+    current_thread_rev = current_subject.scan(/\d+/).map {|d| d.to_i }
+    current            = current_subject.scan(/./u)
+
+    body = NKF.nkf('-w', res.body)
+    threads = body.split(/\n/).map {|l|
+      dat, rest = *l.split(/<>/)
+      dat.sub!(/\.dat$/, "")
+
+      uri = "http://#{@uri.host}/test/read.cgi/#{@board}/#{dat}/"
+
+      subject, n = */(.*?) \((\d+)\)/.match(rest).captures
+      canonical_subject = canonicalize_subject(subject)
+      thread_rev     = canonical_subject[/\d+/].to_i
+
+      distance       = (dat     == self.dat)     ? Float::MAX :
+                       (subject == self.subject) ? 0 :
+                       levenshtein(canonical_subject.scan(/./u), current)
+      continuous_num = current_thread_rev.find {|rev| rev == thread_rev - 1 }
+      appear_recent  = recent_posted_threads[uri]
+
+      score = distance
+      score -= 10 if continuous_num
+      score -= 10 if appear_recent
+      score += 10 if dat.to_i < self.dat.to_i
+      {
+        :uri            => uri,
+        :dat            => dat,
+        :subject        => subject,
+        :distance       => distance,
+        :continuous_num => continuous_num,
+        :appear_recent  => appear_recent,
+        :score          => score.to_f
+      }
+    }.sort_by {|o|
+      o[:score]
+    }
+
+    threads
+  end
+
+  def levenshtein(a, b)
+    case
+    when a.empty?
+      b.length
+    when b.empty?
+      a.length
+    when a == b
+      0
+    else
+      d = Array.new(a.length + 1) { |s|
+        Array.new(b.length + 1, 0)
+      }
+
+      (0..a.length).each do |i|
+        d[i][0] = i
+      end
+
+      (0..b.length).each do |j|
+        d[0][j] = j
+      end
+
+      (1..a.length).each do |i|
+        (1..b.length).each do |j|
+          cost = (a[i - 1] == b[j - 1]) ? 0 : 1
+          d[i][j] = [
+            d[i-1][j  ] + 1,
+            d[i  ][j-1] + 1,
+            d[i-1][j-1] + cost
+          ].min
+        end
+      end
+
+      d[a.length][b.length]
+    end
+  end
+end
+
+if __FILE__ == $0
+  require 'pp'
+  thread = ThreadData.new(ARGV[0])
+  pp thread.guess_next_thread.reverse
+
+  p thread.subject
+end
+