Gecko [ www.corporacionhdm.com.pe ]

Name	Size	Permission	Date
generator	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
markup	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
parser	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
ri	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
stats	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
alias.rb	2.12 KB	-rw-r--r--	2010-12-20 03:22
anon_class.rb	171 B	-rw-r--r--	2011-02-02 00:32
any_method.rb	4.54 KB	-rw-r--r--	2011-06-16 04:59
attr.rb	2.88 KB	-rw-r--r--	2011-06-16 04:59
class_module.rb	14.49 KB	-rw-r--r--	2011-08-05 21:21
code_object.rb	6.56 KB	-rw-r--r--	2011-08-05 21:21
code_objects.rb	535 B	-rw-r--r--	2010-04-01 07:45
constant.rb	1.5 KB	-rw-r--r--	2010-12-20 03:22
context.rb	28.14 KB	-rw-r--r--	2011-08-05 21:21
cross_reference.rb	5.82 KB	-rw-r--r--	2011-08-05 21:21
encoding.rb	2.52 KB	-rw-r--r--	2012-02-14 07:55
erbio.rb	794 B	-rw-r--r--	2011-05-15 11:55
generator.rb	1.3 KB	-rw-r--r--	2011-02-02 00:32
ghost_method.rb	141 B	-rw-r--r--	2010-04-01 07:45
include.rb	2.11 KB	-rw-r--r--	2010-12-20 03:22
known_classes.rb	2.58 KB	-rw-r--r--	2011-06-29 21:17
markup.rb	20.96 KB	-rw-r--r--	2011-08-26 23:58
meta_method.rb	126 B	-rw-r--r--	2010-04-01 07:45
method_attr.rb	7.57 KB	-rw-r--r--	2011-05-15 11:55
normal_class.rb	1.58 KB	-rw-r--r--	2011-02-02 00:32
normal_module.rb	1.24 KB	-rw-r--r--	2011-02-02 00:32
options.rb	18.79 KB	-rw-r--r--	2011-05-14 00:39
parser.rb	5.39 KB	-rw-r--r--	2011-08-26 23:58
rdoc.rb	11.97 KB	-rw-r--r--	2011-06-16 04:59
require.rb	963 B	-rw-r--r--	2010-12-20 03:22
ri.rb	230 B	-rw-r--r--	2010-04-01 07:45
ruby_lex.rb	26.07 KB	-rw-r--r--	2011-08-24 00:02
ruby_token.rb	10.14 KB	-rw-r--r--	2010-12-20 03:22
rubygems_hook.rb	4.5 KB	-rw-r--r--	2011-06-16 04:59
single_class.rb	359 B	-rw-r--r--	2011-02-02 00:32
stats.rb	9.52 KB	-rw-r--r--	2011-05-14 00:39
task.rb	7.5 KB	-rw-r--r--	2011-05-14 00:39
text.rb	7.22 KB	-rw-r--r--	2011-08-05 21:21
token_stream.rb	1015 B	-rw-r--r--	2010-12-20 03:22
top_level.rb	10.1 KB	-rw-r--r--	2011-06-29 21:17

Rename

# coding: utf-8

##
# For RDoc::Text#to_html

require 'strscan'

##
# Methods for manipulating comment text

module RDoc::Text

##
  # 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|
      line.gsub!(/^(.{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 until line !~ /\t/

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
    document = parse text

document.accept formatter
  end

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

def normalize_comment text
    return text if text.empty?

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
    return text if RDoc::Markup::Document === text

text = normalize_comment text

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

RDoc::Markup::Parser.parse text
  rescue RDoc::Markup::Parser::Error => e
    $stderr.puts <<-EOF
While parsing markup, RDoc encountered a #{e.class}:

#{e}
\tfrom #{e.backtrace.join "\n\tfrom "}

---8<---
#{text}
---8<---

RDoc #{RDoc::VERSION}

Ruby #{RUBY_VERSION}-p#{RUBY_PATCHLEVEL} #{RUBY_RELEASE_DATE}

Please file a bug report with the above information at:

https://github.com/rdoc/rdoc/issues

EOF
    raise
  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
    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>.*?<\/tt>/) then # skip contents of tt
        html << s.matched.gsub('\\\\', '\\')
      when s.scan(/<tt>.*?/) then
        warn 'mismatched <tt> 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