Gecko [ www.corporacionhdm.com.pe ]

Name	Size	Permission	Date
cgi	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
date	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
digest	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
dl	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
drb	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
fiddle	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
irb	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
json	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
matrix	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
net	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
openssl	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
optparse	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
psych	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
racc	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
rake	[ DIR ]	drwxr-xr-x	2024-03-03 22:53
rbconfig	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
rdoc	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
rexml	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
rinda	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
ripper	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
rss	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
rubygems	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
shell	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
syslog	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
test	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
uri	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
webrick	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
x86_64-linux	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
xmlrpc	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
yaml	[ DIR ]	drwxr-xr-x	2024-03-03 22:43
English.rb	6.44 KB	-rw-r--r--	2013-02-04 02:50
abbrev.rb	3.31 KB	-rw-r--r--	2013-02-24 05:06
base64.rb	2.63 KB	-rw-r--r--	2009-10-02 10:45
benchmark.rb	17.94 KB	-rw-r--r--	2012-07-18 03:56
cgi.rb	9.39 KB	-rw-r--r--	2012-11-30 05:06
cmath.rb	7.22 KB	-rw-r--r--	2011-07-23 12:14
complex.rb	380 B	-rw-r--r--	2009-08-16 15:34
csv.rb	81.32 KB	-rw-r--r--	2014-09-17 05:56
date.rb	946 B	-rw-r--r--	2023-07-26 14:09
debug.rb	28.9 KB	-rw-r--r--	2013-02-02 05:04
delegate.rb	9.78 KB	-rw-r--r--	2014-04-30 07:45
digest.rb	2.24 KB	-rw-r--r--	2023-07-26 14:09
dl.rb	280 B	-rw-r--r--	2023-07-26 14:09
drb.rb	19 B	-rw-r--r--	2009-10-02 10:45
e2mmap.rb	3.8 KB	-rw-r--r--	2011-05-19 00:07
erb.rb	26.08 KB	-rw-r--r--	2014-09-03 04:42
expect.rb	2.14 KB	-rw-r--r--	2023-07-26 14:09
fiddle.rb	1.25 KB	-rw-r--r--	2023-07-26 14:09
fileutils.rb	46.35 KB	-rw-r--r--	2014-10-16 07:23
find.rb	2.08 KB	-rw-r--r--	2012-09-20 07:14
forwardable.rb	7.56 KB	-rw-r--r--	2013-01-04 02:52
getoptlong.rb	15.38 KB	-rw-r--r--	2013-12-24 15:46
gserver.rb	8.86 KB	-rw-r--r--	2014-07-07 03:55
ipaddr.rb	26.17 KB	-rw-r--r--	2013-02-23 04:03
irb.rb	20.03 KB	-rw-r--r--	2013-02-05 15:57
json.rb	1.74 KB	-rw-r--r--	2023-07-26 14:09
kconv.rb	5.74 KB	-rw-r--r--	2023-07-26 14:09
logger.rb	20.96 KB	-rw-r--r--	2013-07-13 15:16
mathn.rb	6.52 KB	-rw-r--r--	2011-08-26 22:22
matrix.rb	45.02 KB	-rw-r--r--	2013-02-05 05:43
mkmf.rb	78.19 KB	-rw-r--r--	2023-07-26 14:06
monitor.rb	6.93 KB	-rw-r--r--	2012-11-16 16:55
mutex_m.rb	2 KB	-rw-r--r--	2013-02-24 04:49
observer.rb	5.71 KB	-rw-r--r--	2012-08-21 13:03
open-uri.rb	23.66 KB	-rw-r--r--	2014-02-16 17:02
open3.rb	21.17 KB	-rw-r--r--	2013-01-13 04:40
openssl.rb	528 B	-rw-r--r--	2023-07-26 14:09
optparse.rb	51.27 KB	-rw-r--r--	2014-02-19 16:38
ostruct.rb	7.64 KB	-rw-r--r--	2012-10-28 21:20
pathname.rb	15.3 KB	-rw-r--r--	2023-07-26 14:09
pp.rb	13.14 KB	-rw-r--r--	2012-08-15 11:50
prettyprint.rb	9.63 KB	-rw-r--r--	2011-08-02 15:25
prime.rb	13.98 KB	-rw-r--r--	2013-01-13 05:07
profile.rb	205 B	-rw-r--r--	2009-10-02 10:45
profiler.rb	4.29 KB	-rw-r--r--	2013-02-03 00:38
pstore.rb	14.85 KB	-rw-r--r--	2012-11-11 04:23
psych.rb	9.9 KB	-rw-r--r--	2023-07-26 14:09
rake.rb	2.07 KB	-rw-r--r--	2012-11-29 19:16
rational.rb	308 B	-rw-r--r--	2009-09-24 00:42
rdoc.rb	4.88 KB	-rw-r--r--	2013-02-19 05:06
resolv-replace.rb	1.73 KB	-rw-r--r--	2013-04-03 17:27
resolv.rb	61.45 KB	-rw-r--r--	2015-06-01 15:13
ripper.rb	2.53 KB	-rw-r--r--	2023-07-26 14:09
rss.rb	2.84 KB	-rw-r--r--	2011-05-11 10:22
rubygems.rb	27.53 KB	-rw-r--r--	2023-07-26 14:06
scanf.rb	23.52 KB	-rw-r--r--	2011-11-05 07:37
securerandom.rb	8.56 KB	-rw-r--r--	2012-09-13 13:01
set.rb	17.32 KB	-rw-r--r--	2012-11-24 18:51
shell.rb	10.3 KB	-rw-r--r--	2012-12-05 02:55
shellwords.rb	5.94 KB	-rw-r--r--	2012-11-09 06:28
singleton.rb	4.02 KB	-rw-r--r--	2011-05-18 14:09
socket.rb	25.76 KB	-rw-r--r--	2023-07-26 14:09
sync.rb	7.26 KB	-rw-r--r--	2012-12-23 10:18
tempfile.rb	10.15 KB	-rw-r--r--	2013-10-09 16:11
thread.rb	6.94 KB	-rw-r--r--	2014-02-09 16:07
thwait.rb	3.38 KB	-rw-r--r--	2011-06-29 03:09
time.rb	21.09 KB	-rw-r--r--	2013-10-09 15:07
timeout.rb	3.16 KB	-rw-r--r--	2013-04-14 15:20
tmpdir.rb	4.15 KB	-rw-r--r--	2012-12-12 12:40
tracer.rb	6.54 KB	-rw-r--r--	2013-02-04 17:59
tsort.rb	6.79 KB	-rw-r--r--	2009-03-06 04:23
ubygems.rb	268 B	-rw-r--r--	2009-10-02 10:45
un.rb	8.34 KB	-rw-r--r--	2012-08-03 08:23
uri.rb	3.07 KB	-rw-r--r--	2011-05-13 20:03
weakref.rb	3.23 KB	-rw-r--r--	2012-12-02 07:57
webrick.rb	6.7 KB	-rw-r--r--	2012-11-07 06:49
xmlrpc.rb	8.49 KB	-rw-r--r--	2012-09-13 02:24
yaml.rb	2.3 KB	-rw-r--r--	2013-05-19 19:01

Rename

# This class implements a pretty printing algorithm. It finds line breaks and
# nice indentations for grouped structure.
#
# By default, the class assumes that primitive elements are strings and each
# byte in the strings have single column in width. But it can be used for
# other situations by giving suitable arguments for some methods:
# * newline object and space generation block for PrettyPrint.new
# * optional width argument for PrettyPrint#text
# * PrettyPrint#breakable
#
# There are several candidate uses:
# * text formatting using proportional fonts
# * multibyte characters which has columns different to number of bytes
# * non-string formatting
#
# == Bugs
# * Box based formatting?
# * Other (better) model/algorithm?
#
# == References
# Christian Lindig, Strictly Pretty, March 2000,
# http://www.st.cs.uni-sb.de/~lindig/papers/#pretty
#
# Philip Wadler, A prettier printer, March 1998,
# http://homepages.inf.ed.ac.uk/wadler/topics/language-design.html#prettier
#
# == Author
# Tanaka Akira <akr@m17n.org>
#
class PrettyPrint

# This is a convenience method which is same as follows:
  #
  #   begin
  #     q = PrettyPrint.new(output, maxwidth, newline, &genspace)
  #     ...
  #     q.flush
  #     output
  #   end
  #
  def PrettyPrint.format(output='', maxwidth=79, newline="\n", genspace=lambda {|n| ' ' * n})
    q = PrettyPrint.new(output, maxwidth, newline, &genspace)
    yield q
    q.flush
    output
  end

# This is similar to PrettyPrint::format but the result has no breaks.
  #
  # +maxwidth+, +newline+ and +genspace+ are ignored.
  #
  # The invocation of +breakable+ in the block doesn't break a line and is
  # treated as just an invocation of +text+.
  #
  def PrettyPrint.singleline_format(output='', maxwidth=nil, newline=nil, genspace=nil)
    q = SingleLine.new(output)
    yield q
    output
  end

# Creates a buffer for pretty printing.
  #
  # +output+ is an output target. If it is not specified, '' is assumed. It
  # should have a << method which accepts the first argument +obj+ of
  # PrettyPrint#text, the first argument +sep+ of PrettyPrint#breakable, the
  # first argument +newline+ of PrettyPrint.new, and the result of a given
  # block for PrettyPrint.new.
  #
  # +maxwidth+ specifies maximum line length. If it is not specified, 79 is
  # assumed. However actual outputs may overflow +maxwidth+ if long
  # non-breakable texts are provided.
  #
  # +newline+ is used for line breaks. "\n" is used if it is not specified.
  #
  # The block is used to generate spaces. {|width| ' ' * width} is used if it
  # is not given.
  #
  def initialize(output='', maxwidth=79, newline="\n", &genspace)
    @output = output
    @maxwidth = maxwidth
    @newline = newline
    @genspace = genspace || lambda {|n| ' ' * n}

@output_width = 0
    @buffer_width = 0
    @buffer = []

root_group = Group.new(0)
    @group_stack = [root_group]
    @group_queue = GroupQueue.new(root_group)
    @indent = 0
  end
  attr_reader :output, :maxwidth, :newline, :genspace
  attr_reader :indent, :group_queue

# Returns the group most recently added to the stack.
  def current_group
    @group_stack.last
  end

# first? is a predicate to test the call is a first call to first? with
  # current group.
  #
  # It is useful to format comma separated values as:
  #
  #   q.group(1, '[', ']') {
  #     xxx.each {|yyy|
  #       unless q.first?
  #         q.text ','
  #         q.breakable
  #       end
  #       ... pretty printing yyy ...
  #     }
  #   }
  #
  # first? is obsoleted in 1.8.2.
  #
  def first?
    warn "PrettyPrint#first? is obsoleted at 1.8.2."
    current_group.first?
  end

# Breaks the buffer into lines that are shorter than #maxwidth
  def break_outmost_groups
    while @maxwidth < @output_width + @buffer_width
      return unless group = @group_queue.deq
      until group.breakables.empty?
        data = @buffer.shift
        @output_width = data.output(@output, @output_width)
        @buffer_width -= data.width
      end
      while !@buffer.empty? && Text === @buffer.first
        text = @buffer.shift
        @output_width = text.output(@output, @output_width)
        @buffer_width -= text.width
      end
    end
  end

# This adds +obj+ as a text of +width+ columns in width.
  #
  # If +width+ is not specified, obj.length is used.
  #
  def text(obj, width=obj.length)
    if @buffer.empty?
      @output << obj
      @output_width += width
    else
      text = @buffer.last
      unless Text === text
        text = Text.new
        @buffer << text
      end
      text.add(obj, width)
      @buffer_width += width
      break_outmost_groups
    end
  end

# This is similar to #breakable except
  # the decision to break or not is determined individually.
  #
  # Two #fill_breakable under a group may cause 4 results:
  # (break,break), (break,non-break), (non-break,break), (non-break,non-break).
  # This is different to #breakable because two #breakable under a group
  # may cause 2 results:
  # (break,break), (non-break,non-break).
  #
  # The text sep+ is inserted if a line is not broken at this point.
  #
  # If +sep+ is not specified, " " is used.
  #
  # If +width+ is not specified, +sep.length+ is used. You will have to
  # specify this when +sep+ is a multibyte character, for example.
  #
  def fill_breakable(sep=' ', width=sep.length)
    group { breakable sep, width }
  end

# This says "you can break a line here if necessary", and a +width+\-column
  # text +sep+ is inserted if a line is not broken at the point.
  #
  # If +sep+ is not specified, " " is used.
  #
  # If +width+ is not specified, +sep.length+ is used. You will have to
  # specify this when +sep+ is a multibyte character, for example.
  #
  def breakable(sep=' ', width=sep.length)
    group = @group_stack.last
    if group.break?
      flush
      @output << @newline
      @output << @genspace.call(@indent)
      @output_width = @indent
      @buffer_width = 0
    else
      @buffer << Breakable.new(sep, width, self)
      @buffer_width += width
      break_outmost_groups
    end
  end

# Groups line break hints added in the block. The line break hints are all
  # to be used or not.
  #
  # If +indent+ is specified, the method call is regarded as nested by
  # nest(indent) { ... }.
  #
  # If +open_obj+ is specified, <tt>text open_obj, open_width</tt> is called
  # before grouping. If +close_obj+ is specified, <tt>text close_obj,
  # close_width</tt> is called after grouping.
  #
  def group(indent=0, open_obj='', close_obj='', open_width=open_obj.length, close_width=close_obj.length)
    text open_obj, open_width
    group_sub {
      nest(indent) {
        yield
      }
    }
    text close_obj, close_width
  end

def group_sub
    group = Group.new(@group_stack.last.depth + 1)
    @group_stack.push group
    @group_queue.enq group
    begin
      yield
    ensure
      @group_stack.pop
      if group.breakables.empty?
        @group_queue.delete group
      end
    end
  end

# Increases left margin after newline with +indent+ for line breaks added in
  # the block.
  #
  def nest(indent)
    @indent += indent
    begin
      yield
    ensure
      @indent -= indent
    end
  end

# outputs buffered data.
  #
  def flush
    @buffer.each {|data|
      @output_width = data.output(@output, @output_width)
    }
    @buffer.clear
    @buffer_width = 0
  end

class Text
    def initialize
      @objs = []
      @width = 0
    end
    attr_reader :width

def output(out, output_width)
      @objs.each {|obj| out << obj}
      output_width + @width
    end

def add(obj, width)
      @objs << obj
      @width += width
    end
  end

class Breakable
    def initialize(sep, width, q)
      @obj = sep
      @width = width
      @pp = q
      @indent = q.indent
      @group = q.current_group
      @group.breakables.push self
    end
    attr_reader :obj, :width, :indent

def output(out, output_width)
      @group.breakables.shift
      if @group.break?
        out << @pp.newline
        out << @pp.genspace.call(@indent)
        @indent
      else
        @pp.group_queue.delete @group if @group.breakables.empty?
        out << @obj
        output_width + @width
      end
    end
  end

class Group
    def initialize(depth)
      @depth = depth
      @breakables = []
      @break = false
    end
    attr_reader :depth, :breakables

def break
      @break = true
    end

def break?
      @break
    end

def first?
      if defined? @first
        false
      else
        @first = false
        true
      end
    end
  end

class GroupQueue
    def initialize(*groups)
      @queue = []
      groups.each {|g| enq g}
    end

def enq(group)
      depth = group.depth
      @queue << [] until depth < @queue.length
      @queue[depth] << group
    end

def deq
      @queue.each {|gs|
        (gs.length-1).downto(0) {|i|
          unless gs[i].breakables.empty?
            group = gs.slice!(i, 1).first
            group.break
            return group
          end
        }
        gs.each {|group| group.break}
        gs.clear
      }
      return nil
    end

def delete(group)
      @queue[group.depth].delete(group)
    end
  end

class SingleLine
    def initialize(output, maxwidth=nil, newline=nil)
      @output = output
      @first = [true]
    end

def text(obj, width=nil)
      @output << obj
    end

def breakable(sep=' ', width=nil)
      @output << sep
    end

def nest(indent)
      yield
    end

def group(indent=nil, open_obj='', close_obj='', open_width=nil, close_width=nil)
      @first.push true
      @output << open_obj
      yield
      @output << close_obj
      @first.pop
    end

def flush
    end

def first?
      result = @first[-1]
      @first[-1] = false
      result
    end
  end
end