Gecko [ 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
io	[ 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-21 17:35
base64.rb	2.63 KB	-rw-r--r--	2013-05-19 03:10
benchmark.rb	17.95 KB	-rw-r--r--	2013-09-20 16:05
cgi.rb	9.84 KB	-rw-r--r--	2013-07-18 13:50
cmath.rb	8.93 KB	-rw-r--r--	2015-07-03 09:12
complex.rb	380 B	-rw-r--r--	2009-08-16 15:34
csv.rb	81.68 KB	-rw-r--r--	2014-09-14 15:25
date.rb	946 B	-rw-r--r--	2023-07-26 14:22
debug.rb	29.08 KB	-rw-r--r--	2013-12-14 14:48
delegate.rb	11.13 KB	-rw-r--r--	2014-02-02 13:46
digest.rb	2.34 KB	-rw-r--r--	2023-07-26 14:22
dl.rb	280 B	-rw-r--r--	2023-07-26 14:22
drb.rb	19 B	-rw-r--r--	2009-10-02 10:45
e2mmap.rb	3.89 KB	-rw-r--r--	2013-12-17 11:20
erb.rb	26.07 KB	-rw-r--r--	2014-08-11 14:55
expect.rb	2.14 KB	-rw-r--r--	2023-07-26 14:22
fiddle.rb	1.65 KB	-rw-r--r--	2023-07-26 14:22
fileutils.rb	47.17 KB	-rw-r--r--	2015-04-28 05:16
find.rb	2.36 KB	-rw-r--r--	2014-10-15 15:31
forwardable.rb	7.86 KB	-rw-r--r--	2013-05-23 21:46
getoptlong.rb	15.38 KB	-rw-r--r--	2013-05-19 14:50
gserver.rb	8.86 KB	-rw-r--r--	2014-07-06 13:57
ipaddr.rb	17.05 KB	-rw-r--r--	2015-10-29 14:36
irb.rb	20.03 KB	-rw-r--r--	2016-03-25 08:22
json.rb	1.74 KB	-rw-r--r--	2023-07-26 14:22
kconv.rb	5.74 KB	-rw-r--r--	2023-07-26 14:22
logger.rb	22.37 KB	-rw-r--r--	2016-02-25 11:04
mathn.rb	6.52 KB	-rw-r--r--	2011-08-26 22:22
matrix.rb	45.43 KB	-rw-r--r--	2014-07-11 14:08
mkmf.rb	80.5 KB	-rw-r--r--	2023-07-26 14:19
monitor.rb	6.93 KB	-rw-r--r--	2012-11-16 16:55
mutex_m.rb	2 KB	-rw-r--r--	2013-02-20 02:51
observer.rb	5.81 KB	-rw-r--r--	2013-11-21 04:44
open-uri.rb	24.27 KB	-rw-r--r--	2014-02-22 08:54
open3.rb	20.37 KB	-rw-r--r--	2013-12-01 03:13
openssl.rb	528 B	-rw-r--r--	2023-07-26 14:22
optparse.rb	50.8 KB	-rw-r--r--	2013-11-28 07:34
ostruct.rb	7.7 KB	-rw-r--r--	2013-10-23 15:14
pathname.rb	15.3 KB	-rw-r--r--	2023-07-26 14:22
pp.rb	14.1 KB	-rw-r--r--	2013-10-22 09:29
prettyprint.rb	16.33 KB	-rw-r--r--	2013-05-19 03:10
prime.rb	13.2 KB	-rw-r--r--	2013-07-15 04:21
profile.rb	205 B	-rw-r--r--	2009-10-02 10:45
profiler.rb	4.51 KB	-rw-r--r--	2013-05-19 23:04
pstore.rb	14.85 KB	-rw-r--r--	2012-11-11 04:23
psych.rb	14.88 KB	-rw-r--r--	2023-07-26 14:22
rake.rb	2.12 KB	-rw-r--r--	2013-10-11 21:35
rational.rb	308 B	-rw-r--r--	2009-09-24 00:42
rdoc.rb	4.92 KB	-rw-r--r--	2013-12-22 10:25
resolv-replace.rb	1.73 KB	-rw-r--r--	2013-03-11 13:47
resolv.rb	72.31 KB	-rw-r--r--	2015-05-13 05:33
ripper.rb	2.53 KB	-rw-r--r--	2023-07-26 14:22
rss.rb	2.84 KB	-rw-r--r--	2011-05-11 10:22
rubygems.rb	30.97 KB	-rw-r--r--	2023-07-26 14:19
scanf.rb	23.54 KB	-rw-r--r--	2013-12-14 02:55
securerandom.rb	8.49 KB	-rw-r--r--	2013-11-07 18:04
set.rb	18.7 KB	-rw-r--r--	2013-11-22 23:50
shell.rb	10.3 KB	-rw-r--r--	2013-05-19 03:10
shellwords.rb	5.94 KB	-rw-r--r--	2013-12-14 18:26
singleton.rb	4.02 KB	-rw-r--r--	2011-05-18 14:09
socket.rb	25.6 KB	-rw-r--r--	2023-07-26 14:22
sync.rb	7.25 KB	-rw-r--r--	2013-05-19 03:10
tempfile.rb	11.4 KB	-rw-r--r--	2013-11-21 09:28
thwait.rb	3.38 KB	-rw-r--r--	2013-11-07 17:02
time.rb	21.32 KB	-rw-r--r--	2015-08-17 07:41
timeout.rb	3.7 KB	-rw-r--r--	2015-08-17 07:55
tmpdir.rb	4.15 KB	-rw-r--r--	2013-05-19 03:10
tracer.rb	6.4 KB	-rw-r--r--	2013-07-18 13:50
tsort.rb	14.14 KB	-rw-r--r--	2013-10-17 15:59
ubygems.rb	268 B	-rw-r--r--	2009-10-02 10:45
un.rb	8.87 KB	-rw-r--r--	2013-07-05 13:43
uri.rb	3.07 KB	-rw-r--r--	2011-05-13 20:03
weakref.rb	3.23 KB	-rw-r--r--	2013-11-09 22:42
webrick.rb	6.69 KB	-rw-r--r--	2013-10-05 23:39
xmlrpc.rb	8.49 KB	-rw-r--r--	2013-12-12 03:09
yaml.rb	2.31 KB	-rw-r--r--	2013-08-12 03:49

Rename

# = delegate -- Support for the Delegation Pattern
#
# Documentation by James Edward Gray II and Gavin Sinclair

##
# This library provides three different ways to delegate method calls to an
# object.  The easiest to use is SimpleDelegator.  Pass an object to the
# constructor and all methods supported by the object will be delegated.  This
# object can be changed later.
#
# Going a step further, the top level DelegateClass method allows you to easily
# setup delegation through class inheritance.  This is considerably more
# flexible and thus probably the most common use for this library.
#
# Finally, if you need full control over the delegation scheme, you can inherit
# from the abstract class Delegator and customize as needed.  (If you find
# yourself needing this control, have a look at Forwardable which is also in
# the standard library.  It may suit your needs better.)
#
# SimpleDelegator's implementation serves as a nice example if the use of
# Delegator:
#
#   class SimpleDelegator < Delegator
#     def initialize(obj)
#       super                  # pass obj to Delegator constructor, required
#       @delegate_sd_obj = obj # store obj for future use
#     end
#
#     def __getobj__
#       @delegate_sd_obj # return object we are delegating to, required
#     end
#
#     def __setobj__(obj)
#       @delegate_sd_obj = obj # change delegation object,
#                              # a feature we're providing
#     end
#   end
#
# == Notes
#
# Be advised, RDoc will not detect delegated methods.
#
class Delegator < BasicObject
  kernel = ::Kernel.dup
  kernel.class_eval do
    alias __raise__ raise
    [:to_s,:inspect,:=~,:!~,:===,:<=>,:eql?,:hash].each do |m|
      undef_method m
    end
    private_instance_methods.each do |m|
      if /\Ablock_given\?\z|iterator\?\z|\A__.*__\z/ =~ m
        next
      end
      undef_method m
    end
  end
  include kernel

# :stopdoc:
  def self.const_missing(n)
    ::Object.const_get(n)
  end
  # :startdoc:

#
  # Pass in the _obj_ to delegate method calls to.  All methods supported by
  # _obj_ will be delegated to.
  #
  def initialize(obj)
    __setobj__(obj)
  end

#
  # Handles the magic of delegation through \_\_getobj\_\_.
  #
  def method_missing(m, *args, &block)
    r = true
    target = self.__getobj__ {r = false}
    begin
      if r && target.respond_to?(m)
        target.__send__(m, *args, &block)
      elsif ::Kernel.respond_to?(m, true)
        ::Kernel.instance_method(m).bind(self).(*args, &block)
      else
        super(m, *args, &block)
      end
    ensure
      $@.delete_if {|t| %r"\A#{Regexp.quote(__FILE__)}:(?:#{[__LINE__-7, __LINE__-5, __LINE__-3].join('|')}):"o =~ t} if $@
    end
  end

#
  # Checks for a method provided by this the delegate object by forwarding the
  # call through \_\_getobj\_\_.
  #
  def respond_to_missing?(m, include_private)
    r = true
    target = self.__getobj__ {r = false}
    r &&= target.respond_to?(m, include_private)
    if r && include_private && !target.respond_to?(m, false)
      warn "#{caller(3)[0]}: delegator does not forward private method \##{m}"
      return false
    end
    r
  end

#
  # Returns the methods available to this delegate object as the union
  # of this object's and \_\_getobj\_\_ methods.
  #
  def methods(all=true)
    __getobj__.methods(all) | super
  end

#
  # Returns the methods available to this delegate object as the union
  # of this object's and \_\_getobj\_\_ public methods.
  #
  def public_methods(all=true)
    __getobj__.public_methods(all) | super
  end

#
  # Returns the methods available to this delegate object as the union
  # of this object's and \_\_getobj\_\_ protected methods.
  #
  def protected_methods(all=true)
    __getobj__.protected_methods(all) | super
  end

# Note: no need to specialize private_methods, since they are not forwarded

#
  # Returns true if two objects are considered of equal value.
  #
  def ==(obj)
    return true if obj.equal?(self)
    self.__getobj__ == obj
  end

#
  # Returns true if two objects are not considered of equal value.
  #
  def !=(obj)
    return false if obj.equal?(self)
    __getobj__ != obj
  end

#
  # Delegates ! to the \_\_getobj\_\_
  #
  def !
    !__getobj__
  end

#
  # This method must be overridden by subclasses and should return the object
  # method calls are being delegated to.
  #
  def __getobj__
    __raise__ ::NotImplementedError, "need to define `__getobj__'"
  end

#
  # This method must be overridden by subclasses and change the object delegate
  # to _obj_.
  #
  def __setobj__(obj)
    __raise__ ::NotImplementedError, "need to define `__setobj__'"
  end

#
  # Serialization support for the object returned by \_\_getobj\_\_.
  #
  def marshal_dump
    ivars = instance_variables.reject {|var| /\A@delegate_/ =~ var}
    [
      :__v2__,
      ivars, ivars.map{|var| instance_variable_get(var)},
      __getobj__
    ]
  end

#
  # Reinitializes delegation from a serialized object.
  #
  def marshal_load(data)
    version, vars, values, obj = data
    if version == :__v2__
      vars.each_with_index{|var, i| instance_variable_set(var, values[i])}
      __setobj__(obj)
    else
      __setobj__(data)
    end
  end

def initialize_clone(obj) # :nodoc:
    self.__setobj__(obj.__getobj__.clone)
  end
  def initialize_dup(obj) # :nodoc:
    self.__setobj__(obj.__getobj__.dup)
  end
  private :initialize_clone, :initialize_dup

##
  # :method: trust
  # Trust both the object returned by \_\_getobj\_\_ and self.
  #

##
  # :method: untrust
  # Untrust both the object returned by \_\_getobj\_\_ and self.
  #

##
  # :method: taint
  # Taint both the object returned by \_\_getobj\_\_ and self.
  #

##
  # :method: untaint
  # Untaint both the object returned by \_\_getobj\_\_ and self.
  #

##
  # :method: freeze
  # Freeze both the object returned by \_\_getobj\_\_ and self.
  #

[:trust, :untrust, :taint, :untaint, :freeze].each do |method|
    define_method method do
      __getobj__.send(method)
      super()
    end
  end

@delegator_api = self.public_instance_methods
  def self.public_api   # :nodoc:
    @delegator_api
  end
end

##
# A concrete implementation of Delegator, this class provides the means to
# delegate all supported method calls to the object passed into the constructor
# and even to change the object being delegated to at a later time with
# #__setobj__.
#
#   class User
#     def born_on
#       Date.new(1989, 09, 10)
#     end
#   end
#
#   class UserDecorator < SimpleDelegator
#     def birth_year
#       born_on.year
#     end
#   end
#
#   decorated_user = UserDecorator.new(User.new)
#   decorated_user.birth_year  #=> 1989
#   decorated_user.__getobj__  #=> #<User: ...>
#
# A SimpleDelegator instance can take advantage of the fact that SimpleDelegator
# is a subclass of +Delegator+ to call <tt>super</tt> to have methods called on
# the object being delegated to.
#
#   class SuperArray < SimpleDelegator
#     def [](*args)
#       super + 1
#     end
#   end
#
#   SuperArray.new([1])[0]  #=> 2
#
# Here's a simple example that takes advantage of the fact that
# SimpleDelegator's delegation object can be changed at any time.
#
#   class Stats
#     def initialize
#       @source = SimpleDelegator.new([])
#     end
#
#     def stats(records)
#       @source.__setobj__(records)
#
#       "Elements:  #{@source.size}\n" +
#       " Non-Nil:  #{@source.compact.size}\n" +
#       "  Unique:  #{@source.uniq.size}\n"
#     end
#   end
#
#   s = Stats.new
#   puts s.stats(%w{James Edward Gray II})
#   puts
#   puts s.stats([1, 2, 3, nil, 4, 5, 1, 2])
#
# Prints:
#
#   Elements:  4
#    Non-Nil:  4
#     Unique:  4
#
#   Elements:  8
#    Non-Nil:  7
#     Unique:  6
#
class SimpleDelegator<Delegator
  # Returns the current object method calls are being delegated to.
  def __getobj__
    unless defined?(@delegate_sd_obj)
      return yield if block_given?
      __raise__ ::ArgumentError, "not delegated"
    end
    @delegate_sd_obj
  end

#
  # Changes the delegate object to _obj_.
  #
  # It's important to note that this does *not* cause SimpleDelegator's methods
  # to change.  Because of this, you probably only want to change delegation
  # to objects of the same type as the original delegate.
  #
  # Here's an example of changing the delegation object.
  #
  #   names = SimpleDelegator.new(%w{James Edward Gray II})
  #   puts names[1]    # => Edward
  #   names.__setobj__(%w{Gavin Sinclair})
  #   puts names[1]    # => Sinclair
  #
  def __setobj__(obj)
    __raise__ ::ArgumentError, "cannot delegate to self" if self.equal?(obj)
    @delegate_sd_obj = obj
  end
end

def Delegator.delegating_block(mid) # :nodoc:
  lambda do |*args, &block|
    target = self.__getobj__
    begin
      target.__send__(mid, *args, &block)
    ensure
      $@.delete_if {|t| /\A#{Regexp.quote(__FILE__)}:#{__LINE__-2}:/o =~ t} if $@
    end
  end
end

#
# The primary interface to this library.  Use to setup delegation when defining
# your class.
#
#   class MyClass < DelegateClass(ClassToDelegateTo) # Step 1
#     def initialize
#       super(obj_of_ClassToDelegateTo)              # Step 2
#     end
#   end
#
# Here's a sample of use from Tempfile which is really a File object with a
# few special rules about storage location and when the File should be
# deleted.  That makes for an almost textbook perfect example of how to use
# delegation.
#
#   class Tempfile < DelegateClass(File)
#     # constant and class member data initialization...
#
#     def initialize(basename, tmpdir=Dir::tmpdir)
#       # build up file path/name in var tmpname...
#
#       @tmpfile = File.open(tmpname, File::RDWR|File::CREAT|File::EXCL, 0600)
#
#       # ...
#
#       super(@tmpfile)
#
#       # below this point, all methods of File are supported...
#     end
#
#     # ...
#   end
#
def DelegateClass(superclass)
  klass = Class.new(Delegator)
  methods = superclass.instance_methods
  methods -= ::Delegator.public_api
  methods -= [:to_s,:inspect,:=~,:!~,:===]
  klass.module_eval do
    def __getobj__  # :nodoc:
      unless defined?(@delegate_dc_obj)
        return yield if block_given?
        __raise__ ::ArgumentError, "not delegated"
      end
      @delegate_dc_obj
    end
    def __setobj__(obj)  # :nodoc:
      __raise__ ::ArgumentError, "cannot delegate to self" if self.equal?(obj)
      @delegate_dc_obj = obj
    end
    methods.each do |method|
      define_method(method, Delegator.delegating_block(method))
    end
  end
  klass.define_singleton_method :public_instance_methods do |all=true|
    super(all) - superclass.protected_instance_methods
  end
  klass.define_singleton_method :protected_instance_methods do |all=true|
    super(all) | superclass.protected_instance_methods
  end
  return klass
end

# :enddoc:

if __FILE__ == $0
  class ExtArray<DelegateClass(Array)
    def initialize()
      super([])
    end
  end

ary = ExtArray.new
  p ary.class
  ary.push 25
  p ary
  ary.push 42
  ary.each {|x| p x}

foo = Object.new
  def foo.test
    25
  end
  def foo.iter
    yield self
  end
  def foo.error
    raise 'this is OK'
  end
  foo2 = SimpleDelegator.new(foo)
  p foo2
  foo2.instance_eval{print "foo\n"}
  p foo.test == foo2.test       # => true
  p foo2.iter{[55,true]}        # => true
  foo2.error                    # raise error!
end