iwadon-text-hatena 0.12.20080627.0

data/README

@@ -0,0 +1,146 @@
+= Ruby �� Text::Hatena
+
+
+== ����
+
+Text::Hatena �Ȥϡ���ƣ���餵��ˤ�ä� Perl �ǽ񤫤줿�饤�֥��ǡ���
+�Ƥʵ�ˡ�ǽ񤫤줿�ƥ����Ȥ��ᤷ��HTML �������Ѵ����ޤ����ϤƤʵ�ˡ��
+�ϡ��ϤƤʥ������꡼�ǻȤ��Ƥ���񼰤Ǥ���
+
+* ((<"Junya Kondo / Text-Hatena - search.cpan.org"|URL:http://search.cpan.org/dist/Text-Hatena/>))
+* ((<�ϤƤʥ������꡼ - ������ɤǤĤʤ�������֥���|URL:http://d.hatena.ne.jp/>))
+
+���� Text::Hatena �� Ruby �ؤ��Τޤްܿ�������Τ����� Ruby ��
+Text::Hatena �Ǥ���Perl �ǽ񤫤줿�����ɤΥ����å��ʤɤ��ǽ�ʸ¤��ѹ�
+���ʤ��褦�˰ܿ������Ĥ��Ǥ��Τǡ�Perl �� Text::Hatena ��Ʊ�ͤˤ��Ȥ�
+����������Ϥ��Ǥ���
+
+
+== ������ˡ
+
+�ʲ��Υ����֥ڡ����ˤƥ��������֥ե������������Ƥ��ޤ���
+
+* ((<URL:http://moonrock.jp/~don/ruby/text-hatena/>))
+
+�ޤ���Subversion�Υ�ݥ��ȥ�⤴���Ѥ��������ޤ���
+
+* ((<URL:http://moonrock.jp/~don/svn/text-hatena/>))
+
+
+== ���󥹥ȡ���
+
+setup.rb ��Ȥ��ޤ���
+
+  % ruby setup.rb
+
+���Ȥ��� OS �ˤ�äƤ� sudo ���ޥ�ɤ�Ȥ�ɬ�פ����뤫�⤷��ޤ���
+
+  % sudo ruby setup.rb
+
+
+== �Ȥ���
+
+(1) text/hatena �� require ���ޤ���
+
+      require "text/hatena"
+
+(2) Text::Hatena ���֥������Ȥ���ޤ���
+
+      parser = Text::Hatena.new
+
+(3) Text::Hatena#parse �᥽�åɤ�Ȥä��Ѵ����ޤ���
+
+      parser.parse(text)
+
+(4) Text::Hatena#html �᥽�åɤ����Ѵ���̤���Ф��ޤ���
+
+      html = parser.html
+
+
+== Text::Hatena ���饹
+
+: Text::Hatena.new(args = {})
+
+  Text::Hatena ���饹�Υ��֥������Ȥ򿷤������ޤ���Text::Hatena ��
+  �֥������Ȥ��֤��ޤ���
+
+  �����ͤ˻Ȥ��ޤ�:
+
+    parser = Text::Hatena.new
+
+  ��ά��ǽ�ʰ���(args)�Ȥ��� Hash ���֥������Ȥ�Ϳ���뤳�Ȥ�����ޤ���
+  �����ˤϰʲ��Υ���ܥ��Ȥ��ޤ���
+
+  * :baseuri
+  * :parmalink
+  * :ilevel
+  * :invalidnode
+  * :sectionanchor
+  * :texthandler
+
+  �����ͤ˻��ꤷ�ޤ�:
+
+    parser = Text::Hatena.new({
+      :parmalink => 'http://www.example.com/entry/123',
+      :sectionanchor => '_'
+    })
+
+: Text::Hatena#parse(string)
+
+  ʸ����(string)���ᤷ�ơ�HTML �������Ѵ����ޤ���
+
+  ���Τ褦�˻Ȥ��ޤ�:
+
+    parser.parse("")
+
+: Text::Hatena#html
+
+  HTML �������Ѵ����줿��̤�ʸ����Ȥ����֤��ޤ���
+
+  ���Τ褦�˻Ȥ��ޤ���:
+
+    parser = Text::Hatena.new
+    parser.parse("*title")
+    puts parser.html
+
+  ɸ����Ϥˤϰʲ��Τ褦�˽��Ϥ���ޤ�:
+
+    <div class="section">
+            <h3><a name="p1" href="#p1"><span class="sanchor">o-</span></a> title</h3>
+    </div>
+
+
+== �饤����
+
+Ruby��Ʊ���饤���󥹤Ȥ��ޤ����ܤ�����
+((<URL:http://www.ruby-lang.org/ja/LICENSE.txt>)) ��������������
+
+
+== ����
+
+�����Ƿ ((<URL:mailto:don@na.rim.or.jp>)) �� Perl �� Text::Hatena
+0.01 ��ܿ����ޤ�����
+
+* ((<Text::Hatena|URL:http://moonrock.jp/~don/ruby/text-hatena/>))
+
+Perl �� Text::Hatena 0.06 �ؤ��б��� drawnboy ����ˤ���ΤǤ���
+
+* ((<Nowhere Near - Text::Hatena 0.06|URL:http://d.hatena.ne.jp/drawnboy/20060118/1137543907>))
+
+
+== �ռ�
+
+drawnboy ���󤫤� Perl �� Text::Hatena 0.06 �ؤ��б���ʬ��ĺ���ޤ�����
+���꤬�Ȥ��������ޤ�����
+
+���Υ饤�֥��˴ޤޤ�� lib/text/hatena/utils/htmlsplit.rb �ϡ�
+MoonWolf ��������� htmlsplit.rb ������פ�������Υѥå���Ŭ�Ѥ������
+�Ǥ���ͭ�Ѥʥ饤�֥��θ����˴��դ������ޤ���
+
+* ((<htmlsplit.rb|URL:http://www.moonwolf.com/ruby/htmlsplit.html>))
+* ((<"htmlsplit / htmlrepair"|URL:http://www.nslabs.jp/htmlsplit.rhtml>))
+
+�쳤ͼ�����󤫤���Զ�������ƥ��ȥ����ɤ�ĺ���ޤ��������꤬�Ȥ���
+�����ޤ�����
+
+�����󤫤���Զ������佤���Ƥ�ĺ���ޤ��������꤬�Ȥ��������ޤ�����

data/README.en

@@ -0,0 +1,62 @@
+== NAME
+
+Text::Hatena -- A Ruby library for Hatena notation
+
+== SYNOPSIS
+
+  require 'text/hatena'
+
+  parser = Text::Hatena.new
+  parser.parse(text)
+  html = parser.to_html
+
+== DESCRIPTION
+
+Text::Hatena parses the document with Hatena notation, and translate
+to HTML format.
+
+This library is based on Perl's Text::Hatena.
+
+* ((<"Junya Kondo / Text-Hatena - search.cpan.org"|URL:http://search.cpan.org/dist/Text-Hatena/>))
+  
+== DOWNLOAD
+
+You can get archive files from my web page
+
+* ((<URL:http://moonrock.jp/~don/ruby/text-hatena/>))
+
+Subversion repository is here:
+
+* ((<URL:http://moonrock.jp/~don/svn/text-hatena/>))
+
+== INSTALLATION
+
+You can install Text::Hatena with setup.rb.
+
+  % [sudo] ruby setup.rb
+
+Or, you can use Rubygems and Rake to install.
+
+  % rake install
+    (package and install with gem command.)
+
+== AUTHOR
+
+* Hiroyuki Iwatsuki (((<URL:mailto:don@na.rim.or.jp>)))
+
+== CONTRIBUTORS
+
+* drawnboy (((<URL:http://d.hatena.ne.jp/drawnboy/>)))
+* Yune Kotomi (((<URL:http://yune-kotomi.tarenari.jp/>)))
+* Seki (((<URL:http://d.hatena.ne.jp/m_seki/>)))
+
+== LICENSE
+
+Text::Hatena is released under the Ruby license.  Please see
+((<URL:http://www.ruby-lang.org/ja/LICENSE.txt>)).
+
+== SUPPORT
+
+Text::Hatena homepage is ((<URL:http://moonrock.jp/~don/ruby/text-hatena/>)).
+
+For other information, feel free to contact ((<URL:mailto:don@na.rim.or.jp>)).

data/README.rdoc

@@ -0,0 +1,62 @@
+== NAME
+
+Text::Hatena -- A Ruby library for Hatena notation
+
+== SYNOPSIS
+
+  require 'text/hatena'
+
+  parser = Text::Hatena.new
+  parser.parse(text)
+  html = parser.to_html
+
+== DESCRIPTION
+
+Text::Hatena parses the document with Hatena notation, and translate
+to HTML format.
+
+This library is based on Perl's Text::Hatena.
+
+* Junya Kondo / Text-Hatena - search.cpan.org (http://search.cpan.org/dist/Text-Hatena/)
+  
+== DOWNLOAD
+
+You can get archive files from my web page:
+
+* http://moonrock.jp/~don/ruby/text-hatena/
+
+Subversion repository is here:
+
+* http://moonrock.jp/~don/svn/text-hatena/
+
+== INSTALLATION
+
+You can install Text::Hatena with setup.rb.
+
+  % [sudo] ruby setup.rb
+
+Or, you can use Rubygems and Rake to install.
+
+  % rake install
+    (package and install with gem command.)
+
+== AUTHOR
+
+* Hiroyuki Iwatsuki (mailto:don@na.rim.or.jp)
+
+== CONTRIBUTORS
+
+* drawnboy (http://d.hatena.ne.jp/drawnboy/)
+* Yune Kotomi (http://yune-kotomi.tarenari.jp/)
+* Seki (http://d.hatena.ne.jp/m_seki/)
+
+== LICENSE
+
+Text::Hatena is released under the Ruby license.  Please see
+http://www.ruby-lang.org/ja/LICENSE.txt.
+
+== SUPPORT
+
+Text::Hatena homepage is http://moonrock.jp/~don/ruby/text-hatena/.
+
+For other information, feel free to contact mailto:don@na.rim.or.jp.

data/Rakefile

@@ -0,0 +1,62 @@
+# -*- Ruby -*-
+
+require 'rake/clean'
+require 'rake/gempackagetask'
+require 'rake/rdoctask'
+require "rake/testtask"
+
+task :default => :test
+
+Rake::RDocTask.new do |t|
+  t.rdoc_dir = 'rdoc'
+  t.rdoc_files.include('README.rdoc', 'lib/**/*.rb')
+  t.options << '--charset' << 'utf-8'
+  t.template = 'kilmer'
+end
+  
+Rake::TestTask.new do |t|
+  t.pattern = "t/test*.rb"
+end
+
+begin
+  require "rcov/rcovtask"
+  Rcov::RcovTask.new do |t|
+    t.libs << "."
+    t.pattern = "t/test*.rb"
+  end
+rescue LoadError
+end
+
+spec = Gem::Specification.new do |s|
+  s.name = "text-hatena"
+  s.version = "0.12.20080627.0"
+  s.summary = "A Ruby library for Hatena notation"
+  s.require_path = 'lib'
+  s.files = (Dir.glob('{lib,t}/**/*').select{|i|File.file?(i)} + %w(README README.en README.rdoc Rakefile) + ["#{s.name}.gemspec"]).sort
+  s.has_rdoc = true
+  s.author = 'Hiroyuki Iwatsuki'
+  s.email = 'don@na.rim.or.jp'
+  s.homepage = 'http://moonrock.jp/~don/ruby/text-hatena/'
+end
+Rake::GemPackageTask.new(spec) do |t|
+  t.need_tar = true
+  t.gem_spec = spec
+end
+
+desc "Generate gemspec"
+task :gemspec do
+  File.open("#{spec.name}.gemspec", "w") do |f|
+    f.flock(File::LOCK_EX)
+    f.write(spec.to_yaml)
+  end
+end
+
+desc "Install #{spec.name}-#{spec.version}"
+task :install => :package do
+  sh %(sudo gem install pkg/#{spec.name}-#{spec.version})
+end
+
+desc "Uninstall #{spec.name}"
+task :uninstall do
+  sh %(sudo gem uninstall #{spec.name})
+end

data/lib/text/hatena.rb

@@ -0,0 +1,62 @@
+require "text/hatena/body_node"
+require "text/hatena/context"
+require "text/hatena/html_filter"
+
+module Text
+  class Hatena
+    VERSION = "0.12"
+
+    def initialize(args = {})
+      @html = ""
+      @baseuri = args[:baseuri] || ""
+      @permalink = args[:permalink] || ""
+      @ilevel = Integer(args[:ilevel]) || 0 # level of default indent
+      @invalidnode = args[:invalidnode] || []
+      @sectionanchor = args[:sectionanchor] || "o-"
+      @autolink_option = args[:autolink_option] || {}
+      @texthandler = args[:texthandler] || Proc.new do |text, c, hp|
+        if hp.in_anchor or hp.in_superpre
+          text
+        else
+          p = c.permalink
+          al = c.autolink
+          text = al.parse(text, {
+                            :in_paragraph => hp.in_paragraph
+                          })
+          text
+        end
+      end
+      @htmlfilter_option = args[:htmlfilter_option] || {}
+    end
+
+    def parse(text)
+      return if text.nil? or text.empty?
+      @context = Context.new({ :text => text,
+                               :baseuri => @baseuri,
+                               :permalink => @permalink,
+                               :invalidnode => @invalidnode,
+                               :sectionanchor => @sectionanchor,
+                               :autolink_option => @autolink_option,
+                               :texthandler => @texthandler })
+      c = @context
+      node = BodyNode.new({ :context => c,
+                            :ilevel => @ilevel })
+      node.parse
+
+      parser = HTMLFilter.new({ :context => c }.merge(@htmlfilter_option))
+      parser.parse(c.html)
+      @html = parser.html
+      
+      unless c.footnotes.empty?
+        node = FootnoteNode.new({ :context => c, :ilevel => @ilevel })
+        node.parse
+        @html << "\n"
+        @html << node.html
+      end
+    end
+
+    def html
+      @html
+    end
+  end
+end

data/lib/text/hatena/auto_link.rb

@@ -0,0 +1,114 @@
+module Text
+  class Hatena
+    class AutoLink
+      VERSION = "0.06"
+      SCHEMES = {
+        "question" => "Text::Hatena::AutoLink::HatenaQuestion",
+        "amazon" => "Text::Hatena::AutoLink::Amazon",
+        "rakuten" => "Text::Hatena::AutoLink::Rakuten",
+        "google" => "Text::Hatena::AutoLink::Google",
+        "mailto" => "Text::Hatena::AutoLink::Mailto",
+        "search" => "Text::Hatena::AutoLink::HatenaSearch",
+        "graph" => "Text::Hatena::AutoLink::HatenaGraph",
+        "https" => "Text::Hatena::AutoLink::HTTP",
+        "asin" => "Text::Hatena::AutoLink::ASIN",
+        "http" => "Text::Hatena::AutoLink::HTTP",
+        "idea" => "Text::Hatena::AutoLink::HatenaIdea",
+        "isbn" => "Text::Hatena::AutoLink::ASIN",
+        "ean" => "Text::Hatena::AutoLink::EAN",
+        "ftp" => "Text::Hatena::AutoLink::FTP",
+        "jan" => "Text::Hatena::AutoLink::EAN",
+        "map" => "Text::Hatena::AutoLink::HatenaMap",
+        "tex" => "Text::Hatena::AutoLink::Tex",
+        "id" => "Text::Hatena::AutoLink::HatenaID",
+        "a" => "Text::Hatena::AutoLink::HatenaAntenna",
+        "b" => "Text::Hatena::AutoLink::HatenaBookmark",
+        "d" => "Text::Hatena::AutoLink::HatenaDiary",
+        "f" => "Text::Hatena::AutoLink::HatenaFotolife",
+        "g" => "Text::Hatena::AutoLink::HatenaGroup",
+        "i" => "Text::Hatena::AutoLink::HatenaIdea",
+        "q" => "Text::Hatena::AutoLink::HatenaQuestion",
+        "r" => "Text::Hatena::AutoLink::HatenaRSS",
+        "]" => "Text::Hatena::AutoLink::Unbracket",
+      }
+
+      def initialize(args = nil)
+        args ||= {}
+        @a_target = args[:a_target]
+        @scheme_option = args[:scheme_option] || {}
+        @invalid_scheme = args[:invalid_scheme] || []
+        init
+      end
+
+      def init
+        pattern = []
+        invalid = Hash.new(false)
+        @invalid_scheme.each do |is|
+          invalid[is] = true
+        end
+        @parser = {}
+        known = Hash.new(false)
+        SCHEMES.each_key do |scheme|
+          next if invalid[scheme]
+          p = SCHEMES[scheme]
+          klass = begin
+                    get_class(p)
+                  rescue NameError
+                    begin
+                      require underscore(p)
+                    rescue LoadError
+                      next
+                    end
+                    get_class(p)
+                  end
+          option = @scheme_option[scheme.to_s] || @scheme_option[scheme.intern] || {}
+          unless option.key?(:a_target)
+            option[:a_target] = @a_target
+          end
+          @parser[scheme] = klass.new(option)
+          next if known[p]
+          known[p] = true
+          pattern << @parser[scheme].pattern
+        end
+        @pattern = /#{pattern.join("|")}/
+      end
+
+      def parse(text, opt = {})
+        schemes = @parser.keys.sort do |a, b|
+          if a == "]"
+            1
+          else
+            b.size <=> a.size
+          end
+        end
+        text.gsub(@pattern) do
+          text = $&
+          parser = nil
+          schemes.each do |sc|
+            if /^\w+$/ =~ sc and /^\[?#{sc}:/i =~ text
+              parser = @parser[sc]
+            elsif /^\[?#{Regexp.quote(sc)}/i =~ text
+              parser = @parser[sc]
+            end
+            break if parser
+          end
+          parser.parse(text, opt) # ??? parser.nil?
+        end
+      end
+
+      private
+
+      def underscore(str)
+        str.gsub(/([a-z])([A-Z])/, '\1_\2').gsub(/::/, "/").downcase
+      end
+
+      def get_class(str)
+        it = str.split(/::/).inject(Object) do |klass, s|
+          klass.const_get(s)
+        end
+        raise NameError unless it.name == str
+        it
+      end
+    end
+  end
+end