feedtools 0.2.26 → 0.2.27

data/lib/feed_tools/vendor/htree/encoder.rb

@@ -1,163 +0,0 @@
-# :stopdoc:
-require 'iconv'
-
-module HTree
-  class Encoder
-    # HTree::Encoder.internal_charset returns the MIME charset corresponding to $KCODE.
-    #
-    # - 'ISO-8859-1' when $KCODE=='NONE'
-    # - 'UTF-8' when $KCODE=='UTF8'
-    # - 'EUC-JP' when $KCODE=='EUC'
-    # - 'Shift_JIS' when $KCODE=='SJIS'
-    #
-    # This mapping ignores EUC-KR and various single byte charset other than ISO-8859-1 at least.
-    # This should be fixed when Ruby is m17nized.
-    def Encoder.internal_charset
-      KcodeCharset[$KCODE]
-    end
-
-    def initialize(output_encoding, internal_encoding=HTree::Encoder.internal_charset)
-      @buf = ''
-      @internal_encoding = internal_encoding
-      @output_encoding = output_encoding
-      @ic = Iconv.new(output_encoding, @internal_encoding)
-      @charpat = FirstCharPattern[internal_encoding]
-
-      @subcharset_list = SubCharset[output_encoding] || []
-      @subcharset_ic = {}
-      @subcharset_list.each {|subcharset|
-        @subcharset_ic[subcharset] = Iconv.new(subcharset, @internal_encoding)
-      }
-    end
-
-    def output_string(internal_str, external_str=@ic.iconv(internal_str))
-      @buf << external_str
-      @subcharset_ic.reject! {|subcharset, ic|
-        begin
-          ic.iconv(internal_str) != external_str
-        rescue Iconv::Failure
-          true
-        end
-      }
-      nil
-    end
-
-    def output_text(string)
-      begin
-        output_string string, @ic.iconv(string)
-      rescue Iconv::IllegalSequence, Iconv::InvalidCharacter => e
-        output_string string[0, string.length - e.failed.length], e.success
-        unless @charpat =~ e.failed
-          # xxx: shoule be configulable?
-          #raise ArgumentError, "cannot extract first character: #{e.failed.dump}"
-          string = e.failed[1, e.failed.length-1]
-          output_string '?'
-          retry
-        end
-        char = $&
-        rest = $'
-        begin
-          ucode = Iconv.conv("UTF-8", @internal_encoding, char).unpack("U")[0]
-          char = "&##{ucode};"
-        rescue Iconv::IllegalSequence, Iconv::InvalidCharacter
-          # xxx: shoule be configulable?
-          char = '?'
-        end
-        output_string char
-        string = rest
-        retry
-      end
-    end
-
-    ChRef = {
-      '&' => '&amp;',
-      '<' => '&lt;',
-      '>' => '&gt;',
-      '"' => '&quot;',
-    }
-
-    def output_dynamic_text(string)
-      if string.respond_to? :rcdata
-        output_text(string.rcdata.gsub(/[<>]/) { ChRef[$&] })
-      else
-        output_text(string.to_s.gsub(/[&<>]/) { ChRef[$&] })
-      end
-    end
-
-    def output_dynamic_attvalue(string)
-      if string.respond_to? :rcdata
-        output_text(string.rcdata.gsub(/[<>"]/) { ChRef[$&] })
-      else
-        output_text(string.to_s.gsub(/[&<>"]/) { ChRef[$&] })
-      end
-    end
-
-    def finish
-      external_str = @ic.close
-      @buf << external_str
-      @subcharset_ic.reject! {|subcharset, ic|
-        begin
-          ic.close != external_str
-        rescue Iconv::Failure
-          true
-        end
-      }
-      @buf
-    end
-
-    def finish_with_xmldecl
-      content = finish
-      xmldecl = Iconv.conv(@output_encoding, 'US-ASCII',
-        "<?xml version=\"1.0\" encoding=\"#{minimal_charset}\"?>")
-      xmldecl + content
-    end
-
-    def minimal_charset
-      @subcharset_list.each {|subcharset|
-        if @subcharset_ic.include? subcharset
-          return subcharset
-        end
-      }
-      @output_encoding
-    end
-
-    KcodeCharset = {
-      'EUC' => 'EUC-JP',
-      'SJIS' => 'Shift_JIS',
-      'UTF8' => 'UTF-8',
-      'NONE' => 'ISO-8859-1',
-    }
-
-    FirstCharPattern = {
-      'EUC-JP' => /\A(?:
-         [\x00-\x7f]
-        |[\xa1-\xfe][\xa1-\xfe]
-        |\x8e[\xa1-\xfe]
-        |\x8f[\xa1-\xfe][\xa1-\xfe])/nx,
-      'Shift_JIS' => /\A(?:
-         [\x00-\x7f]
-        |[\x81-\x9f][\x40-\x7e\x80-\xfc]
-        |[\xa1-\xdf]
-        |[\xe0-\xfc][\x40-\x7e\x80-\xfc])/nx,
-      'UTF-8' => /\A(?:
-         [\x00-\x7f]
-        |[\xc0-\xdf][\x80-\xbf]
-        |[\xe0-\xef][\x80-\xbf][\x80-\xbf]
-        |[\xf0-\xf7][\x80-\xbf][\x80-\xbf][\x80-\xbf]
-        |[\xf8-\xfb][\x80-\xbf][\x80-\xbf][\x80-\xbf][\x80-\xbf]
-        |[\xfc-\xfd][\x80-\xbf][\x80-\xbf][\x80-\xbf][\x80-\xbf][\x80-\xbf])/nx,
-      'ISO-8859-1' => /\A[\x00-\xff]/n
-    }
-
-    SubCharset = {
-      'ISO-2022-JP-2' => ['US-ASCII', 'ISO-2022-JP'],
-      'ISO-2022-JP-3' => ['US-ASCII', 'ISO-2022-JP'],
-      'UTF-16BE' => [],
-      'UTF-16LE' => [],
-      'UTF-16' => [],
-    }
-    SubCharset.default = ['US-ASCII']
-
-  end
-end
-# :startdoc:

data/lib/feed_tools/vendor/htree/equality.rb

@@ -1,218 +0,0 @@
-# :stopdoc:
-require 'htree/doc'
-require 'htree/elem'
-require 'htree/leaf'
-require 'htree/tag'
-require 'htree/raw_string'
-require 'htree/context'
-
-module HTree
-  # compare tree structures.
-  def ==(other)
-    check_equality(self, other, :usual_equal_object)
-  end
-  alias eql? ==
-
-  # hash value for the tree structure.
-  def hash
-    return @hash_code if defined? @hash_code
-    @hash_code = usual_equal_object.hash
-  end
-
-  def usual_equal_object
-    return @usual_equal_object if defined? @usual_equal_object
-    @usual_equal_object = make_usual_equal_object
-  end
-
-  def make_usual_equal_object
-    raise NotImplementedError
-  end
-
-  def exact_equal_object
-    return @exact_equal_object if defined? @exact_equal_object
-    @exact_equal_object = make_exact_equal_object
-  end
-
-  def make_exact_equal_object
-    raise NotImplementedError
-  end
-
-  def exact_equal?(other)
-    check_equality(self, other, :exact_equal_object)
-  end
-
-  def check_equality(obj1, obj2, equal_object_method)
-    return false unless obj1.class == obj2.class
-    if obj1.class == Array
-      return false unless obj1.length == obj2.length
-      obj1.each_with_index {|c1, i|
-        return false unless c1.class == obj2[i].class
-      }
-      obj1.each_with_index {|c1, i|
-        return false unless check_equality(c1, obj2[i], equal_object_method)
-      }
-      true
-    elsif obj1.respond_to? equal_object_method
-      o1 = obj1.send(equal_object_method)
-      o2 = obj2.send(equal_object_method)
-      check_equality(o1, o2, equal_object_method)
-    else
-      obj1 == obj2
-    end
-  end
-
-  class Doc
-    alias exact_equal_object children
-    alias usual_equal_object children
-  end
-
-  class Elem
-    def make_exact_equal_object
-      [@stag, @children, @empty, @etag]
-    end
-
-    def make_usual_equal_object
-      [@stag, @children]
-    end
-  end
-
-  class Name
-    def make_exact_equal_object
-      [@namespace_prefix, @namespace_uri, @local_name]
-    end
-
-    def make_usual_equal_object
-      xmlns? ? @local_name : [@namespace_uri, @local_name]
-    end
-  end
-
-  module Util
-    module_function
-    def cmp_with_nil(a, b)
-      if a == nil
-        if b == nil
-          0
-        else
-          -1
-        end
-      else
-        if b == nil
-          1
-        else
-          a <=> b
-        end
-      end
-    end
-  end
-
-  class Context
-    def make_exact_equal_object
-      @namespaces.keys.sort {|prefix1, prefix2|
-        Util.cmp_with_nil(prefix1, prefix2)
-      }.map {|prefix| [prefix, @namespaces[prefix]] }
-    end
-
-    # make_usual_equal_object is not used through STag#make_usual_equal_object
-    # NotImplementedError is suitable?
-    alias make_usual_equal_object make_exact_equal_object
-  end
-
-  class STag
-    def make_exact_equal_object
-      [@raw_string,
-       @name,
-       @attributes.sort {|(n1,t1), (n2, t2)|
-         Util.cmp_with_nil(n1.namespace_prefix, n2.namespace_prefix).nonzero? ||
-         Util.cmp_with_nil(n1.namespace_uri, n2.namespace_uri).nonzero? ||
-         Util.cmp_with_nil(n1.local_name, n2.local_name)
-        },
-        @inherited_context
-      ]
-    end
-
-    def make_usual_equal_object
-      [@name,
-       @attributes.find_all {|n,t| !n.xmlns? }.sort {|(n1,t1), (n2, t2)|
-         Util.cmp_with_nil(n1.namespace_prefix, n2.namespace_prefix).nonzero? ||
-         Util.cmp_with_nil(n1.namespace_uri, n2.namespace_uri).nonzero? ||
-         Util.cmp_with_nil(n1.local_name, n2.local_name)
-        }
-      ]
-    end
-
-  end
-
-  class ETag
-    def make_exact_equal_object
-      [@raw_string, @qualified_name]
-    end
-
-    alias usual_equal_object qualified_name
-  end
-
-  class Text
-    def make_exact_equal_object
-      [@raw_string, @rcdata]
-    end
-
-    def make_usual_equal_object
-      @normalized_rcdata
-    end
-  end
-
-  class XMLDecl
-    def make_exact_equal_object
-      [@raw_string, @version, @encoding, @standalone]
-    end
-
-    def make_usual_equal_object
-      [@version, @encoding, @standalone]
-    end
-  end
-
-  class DocType
-    def make_exact_equal_object
-      [@raw_string, @root_element_name, @system_identifier, @public_identifier]
-    end
-
-    def make_usual_equal_object
-      [@root_element_name, @system_identifier, @public_identifier]
-    end
-  end
-
-  class ProcIns
-    def make_exact_equal_object
-      [@raw_string, @target, @content]
-    end
-
-    def make_usual_equal_object
-      [@target, @content]
-    end
-  end
-
-  class Comment
-    def make_exact_equal_object
-      [@raw_string, @content]
-    end
-
-    alias usual_equal_object content
-  end
-
-  class BogusETag
-    def make_exact_equal_object
-      [@etag]
-    end
-
-    alias usual_equal_object make_exact_equal_object
-  end
-
-  class Location
-    def make_exact_equal_object
-      [@parent, @index, @node]
-    end
-
-    alias usual_equal_object make_exact_equal_object
-  end
-
-end
-# :startdoc:

data/lib/feed_tools/vendor/htree/extract_text.rb

@@ -1,37 +0,0 @@
-# :stopdoc:
-require 'htree/text'
-require 'htree/doc'
-require 'htree/elem'
-
-module HTree
-  module Node
-    def extract_text
-      raise NotImplementedError
-    end
-  end
-
-  class Location
-    def extract_text
-      to_node.extract_text
-    end
-  end
-
-  module Container
-    def extract_text
-      Text.concat(*@children.map {|n| n.extract_text })
-    end
-  end
-
-  module Leaf
-    def extract_text
-      Text.new('')
-    end
-  end
-
-  class Text
-    def extract_text
-      self
-    end
-  end
-end
-# :startdoc:

data/lib/feed_tools/vendor/htree/fstr.rb

@@ -1,33 +0,0 @@
-# :stopdoc:
-require 'htree/modules'
-
-module HTree
-  def HTree.with_frozen_string_hash
-    if Thread.current[:htree_frozen_string_hash]
-      yield
-    else
-      begin
-        Thread.current[:htree_frozen_string_hash] = {}
-        yield
-      ensure
-        Thread.current[:htree_frozen_string_hash] = nil
-      end
-    end
-  end
-
-  def HTree.frozen_string(str)
-    if h = Thread.current[:htree_frozen_string_hash]
-      if s = h[str]
-        s
-      else
-        h[str] = str unless str.frozen?
-        str = str.dup.freeze
-        h[str] = str
-      end
-    else
-      str = str.dup.freeze unless str.frozen?
-      str
-    end
-  end
-end
-# :startdoc: