Gecko [ www.corporacionhdm.com.pe ]

Name	Size	Permission	Date
context	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
generator	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
markdown	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
markup	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
parser	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
rd	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
ri	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
stats	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
alias.rb	2.09 KB	-rw-r--r--	2012-11-27 04:28
anon_class.rb	142 B	-rw-r--r--	2012-11-27 04:28
any_method.rb	6.82 KB	-rw-r--r--	2013-09-18 23:33
attr.rb	3.73 KB	-rw-r--r--	2013-01-23 01:02
class_module.rb	19.73 KB	-rw-r--r--	2013-09-18 23:33
code_object.rb	9.38 KB	-rw-r--r--	2013-09-18 23:33
code_objects.rb	121 B	-rw-r--r--	2012-11-27 04:28
comment.rb	5.29 KB	-rw-r--r--	2013-09-18 23:33
constant.rb	3.55 KB	-rw-r--r--	2013-12-03 03:18
context.rb	28.76 KB	-rw-r--r--	2013-09-18 23:33
cross_reference.rb	5.82 KB	-rw-r--r--	2013-09-18 23:33
encoding.rb	2.74 KB	-rw-r--r--	2012-12-18 08:24
erb_partial.rb	370 B	-rw-r--r--	2012-11-27 04:28
erbio.rb	794 B	-rw-r--r--	2011-05-15 11:55
extend.rb	140 B	-rw-r--r--	2013-09-18 23:33
generator.rb	1.72 KB	-rw-r--r--	2012-11-27 04:28
ghost_method.rb	114 B	-rw-r--r--	2012-11-27 04:28
include.rb	142 B	-rw-r--r--	2013-09-18 23:33
known_classes.rb	2.63 KB	-rw-r--r--	2013-09-18 23:33
markdown.rb	370.01 KB	-rw-r--r--	2013-09-19 07:22
markup.rb	28.22 KB	-rw-r--r--	2013-09-18 23:33
meta_method.rb	99 B	-rw-r--r--	2012-11-27 04:28
method_attr.rb	8.78 KB	-rw-r--r--	2013-09-18 23:33
mixin.rb	2.72 KB	-rw-r--r--	2013-09-18 23:33
normal_class.rb	2.1 KB	-rw-r--r--	2013-09-18 23:33
normal_module.rb	1.4 KB	-rw-r--r--	2013-09-18 23:33
options.rb	29.7 KB	-rw-r--r--	2013-09-18 23:33
parser.rb	8.06 KB	-rw-r--r--	2013-12-03 00:42
rd.rb	3.54 KB	-rw-r--r--	2012-11-27 04:28
rdoc.rb	13.4 KB	-rw-r--r--	2013-09-18 23:33
require.rb	935 B	-rw-r--r--	2012-11-27 04:28
ri.rb	315 B	-rw-r--r--	2012-11-27 04:28
ruby_lex.rb	27.71 KB	-rw-r--r--	2013-11-19 00:47
ruby_token.rb	11.28 KB	-rw-r--r--	2013-09-18 23:33
rubygems_hook.rb	5.17 KB	-rw-r--r--	2013-11-18 20:55
servlet.rb	11.84 KB	-rw-r--r--	2013-09-18 23:33
single_class.rb	330 B	-rw-r--r--	2012-11-27 04:28
stats.rb	10.37 KB	-rw-r--r--	2013-09-18 23:33
store.rb	22.37 KB	-rw-r--r--	2013-11-19 00:51
task.rb	7.66 KB	-rw-r--r--	2012-11-27 04:28
test_case.rb	4.14 KB	-rw-r--r--	2013-11-22 02:06
text.rb	7.6 KB	-rw-r--r--	2015-02-17 15:18
token_stream.rb	2.46 KB	-rw-r--r--	2012-11-27 04:28
tom_doc.rb	6.26 KB	-rw-r--r--	2013-09-18 23:33
top_level.rb	5.41 KB	-rw-r--r--	2013-09-18 23:33

Rename

# coding: utf-8

##
# For RDoc::Text#to_html

require 'strscan'

##
# For RDoc::Text#snippet

begin
  gem 'json'
rescue Gem::LoadError
end

require 'json'

##
# Methods for manipulating comment text

module RDoc::Text

##
  # Maps markup formats to classes that can parse them.  If the format is
  # unknown, "rdoc" format is used.

MARKUP_FORMAT = {
    'markdown' => RDoc::Markdown,
    'rdoc'     => RDoc::Markup,
    'rd'       => RDoc::RD,
    'tomdoc'   => RDoc::TomDoc,
  }

MARKUP_FORMAT.default = RDoc::Markup

##
  # Maps an encoding to a Hash of characters properly transcoded for that
  # encoding.
  #
  # See also encode_fallback.

TO_HTML_CHARACTERS = Hash.new do |h, encoding|
    h[encoding] = {
      :close_dquote => encode_fallback('”', encoding, '"'),
      :close_squote => encode_fallback('’', encoding, '\''),
      :copyright    => encode_fallback('©', encoding, '(c)'),
      :ellipsis     => encode_fallback('…', encoding, '...'),
      :em_dash      => encode_fallback('—', encoding, '---'),
      :en_dash      => encode_fallback('–', encoding, '--'),
      :open_dquote  => encode_fallback('“', encoding, '"'),
      :open_squote  => encode_fallback('‘', encoding, '\''),
      :trademark    => encode_fallback('®', encoding, '(r)'),
    }
  end if Object.const_defined? :Encoding

##
  # Transcodes +character+ to +encoding+ with a +fallback+ character.

def self.encode_fallback character, encoding, fallback
    character.encode(encoding, :fallback => { character => fallback },
                     :undef => :replace, :replace => fallback)
  end

##
  # Expands tab characters in +text+ to eight spaces

def expand_tabs text
    expanded = []

text.each_line do |line|
      nil while line.gsub!(/(?:\G|\r)((?:.{8})*?)([^\t\r\n]{0,7})\t/) do
        r = "#{$1}#{$2}#{' ' * (8 - $2.size)}"
        r.force_encoding text.encoding if Object.const_defined? :Encoding
        r
      end

expanded << line
    end

expanded.join
  end

##
  # Flush +text+ left based on the shortest line

def flush_left text
    indent = 9999

text.each_line do |line|
      line_indent = line =~ /\S/ || 9999
      indent = line_indent if indent > line_indent
    end

empty = ''
    empty.force_encoding text.encoding if Object.const_defined? :Encoding

text.gsub(/^ {0,#{indent}}/, empty)
  end

##
  # Convert a string in markup format into HTML.
  #
  # Requires the including class to implement #formatter

def markup text
    parse(text).accept formatter
  end

##
  # Strips hashes, expands tabs then flushes +text+ to the left

def normalize_comment text
    return text if text.empty?

text = strip_stars    text
    text = strip_hashes   text
    text = expand_tabs    text
    text = flush_left     text
    text = strip_newlines text
    text
  end

##
  # Normalizes +text+ then builds a RDoc::Markup::Document from it

def parse text, format = 'rdoc'
    return text if RDoc::Markup::Document === text
    return text.parse if RDoc::Comment === text

text = normalize_comment text # TODO remove, should not be necessary

return RDoc::Markup::Document.new if text =~ /\A\n*\z/

MARKUP_FORMAT[format].parse text
  end

##
  # The first +limit+ characters of +text+ as HTML

def snippet text, limit = 100
    document = parse text

RDoc::Markup::ToHtmlSnippet.new(options, limit).convert document
  end

##
  # Strips leading # characters from +text+

def strip_hashes text
    return text if text =~ /^(?>\s*)[^\#]/

empty = ''
    empty.force_encoding text.encoding if Object.const_defined? :Encoding

text.gsub(/^\s*(#+)/) { $1.tr '#', ' ' }.gsub(/^\s+$/, empty)
  end

##
  # Strips leading and trailing \n characters from +text+

def strip_newlines text
    text.gsub(/\A\n*(.*?)\n*\z/m) do $1 end # block preserves String encoding
  end

##
  # Strips /* */ style comments

def strip_stars text
    return text unless text =~ %r%/\*.*\*/%m

encoding = text.encoding if Object.const_defined? :Encoding

text = text.gsub %r%Document-method:\s+[\w:.#=!?]+%, ''

space = ' '
    space.force_encoding encoding if encoding

text.sub!  %r%/\*+%       do space * $&.length end
    text.sub!  %r%\*+/%       do space * $&.length end
    text.gsub! %r%^[ \t]*\*%m do space * $&.length end

empty = ''
    empty.force_encoding encoding if encoding
    text.gsub(/^\s+$/, empty)
  end

##
  # Converts ampersand, dashes, ellipsis, quotes, copyright and registered
  # trademark symbols in +text+ to properly encoded characters.

def to_html text
    if Object.const_defined? :Encoding then
      html = ''.encode text.encoding

encoded = RDoc::Text::TO_HTML_CHARACTERS[text.encoding]
    else
      html = ''
      encoded = {
        :close_dquote => '”',
        :close_squote => '’',
        :copyright    => '©',
        :ellipsis     => '…',
        :em_dash      => '—',
        :en_dash      => '–',
        :open_dquote  => '“',
        :open_squote  => '‘',
        :trademark    => '®',
      }
    end

s = StringScanner.new text
    insquotes = false
    indquotes = false
    after_word = nil

until s.eos? do
      case
      when s.scan(/<(tt|code)>.*?<\/\1>/) then # skip contents of tt
        html << s.matched.gsub('\\\\', '\\')
      when s.scan(/<(tt|code)>.*?/) then
        warn "mismatched <#{s[1]}> tag" # TODO signal file/line
        html << s.matched
      when s.scan(/<[^>]+\/?s*>/) then # skip HTML tags
        html << s.matched
      when s.scan(/\$\S)/) then # unhandled suppressed crossref
        html << s[1]
        after_word = nil
      when s.scan(/\.\.\.(\.?)/) then
        html << s[1] << encoded[:ellipsis]
        after_word = nil
      when s.scan(/\(c$/) then
        html << encoded[:copyright]
        after_word = nil
      when s.scan(/$r$/) then
        html << encoded[:trademark]
        after_word = nil
      when s.scan(/---/) then
        html << encoded[:em_dash]
        after_word = nil
      when s.scan(/--/) then
        html << encoded[:en_dash]
        after_word = nil
      when s.scan(/&quot;|"/) then
        html << encoded[indquotes ? :close_dquote : :open_dquote]
        indquotes = !indquotes
        after_word = nil
      when s.scan(/``/) then # backtick double quote
        html << encoded[:open_dquote]
        after_word = nil
      when s.scan(/''/) then # tick double quote
        html << encoded[:close_dquote]
        after_word = nil
      when s.scan(/'/) then # single quote
        if insquotes
          html << encoded[:close_squote]
          insquotes = false
        elsif after_word
          # Mary's dog, my parents' house: do not start paired quotes
          html << encoded[:close_squote]
        else
          html << encoded[:open_squote]
          insquotes = true
        end

after_word = nil
      else # advance to the next potentially significant character
        match = s.scan(/.+?(?=[<\\.("'`&-])/) #"

if match then
          html << match
          after_word = match =~ /\w$/
        else
          html << s.rest
          break
        end
      end
    end

html
  end

##
  # Wraps +txt+ to +line_len+

def wrap(txt, line_len = 76)
    res = []
    sp = 0
    ep = txt.length

while sp < ep
      # scan back for a space
      p = sp + line_len - 1
      if p >= ep
        p = ep
      else
        while p > sp and txt[p] != ?\s
          p -= 1
        end
        if p <= sp
          p = sp + line_len
          while p < ep and txt[p] != ?\s
            p += 1
          end
        end
      end
      res << txt[sp...p] << "\n"
      sp = p
      sp += 1 while sp < ep and txt[sp] == ?\s
    end

res.join.strip
  end

end