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

#
#   sync.rb - 2 phase lock with counter
#       $Release Version: 1.0$
#       $Revision: 38577 $
#       by Keiju ISHITSUKA(keiju@ishitsuka.com)
#
# --
#  Sync_m, Synchronizer_m
#  Usage:
#   obj.extend(Sync_m)
#   or
#   class Foo
#       include Sync_m
#       :
#   end
#
#   Sync_m#sync_mode
#   Sync_m#sync_locked?, locked?
#   Sync_m#sync_shared?, shared?
#   Sync_m#sync_exclusive?, sync_exclusive?
#   Sync_m#sync_try_lock, try_lock
#   Sync_m#sync_lock, lock
#   Sync_m#sync_unlock, unlock
#
#  Sync, Synchronizer:
#  Usage:
#   sync = Sync.new
#
#   Sync#mode
#   Sync#locked?
#   Sync#shared?
#   Sync#exclusive?
#   Sync#try_lock(mode) -- mode = :EX, :SH, :UN
#   Sync#lock(mode)     -- mode = :EX, :SH, :UN
#   Sync#unlock
#   Sync#synchronize(mode) {...}
#
#

unless defined? Thread
  raise "Thread not available for this ruby interpreter"
end

##
# A module that provides a two-phase lock with a counter.

module Sync_m
  # lock mode
  UN = :UN
  SH = :SH
  EX = :EX

# exceptions
  class Err < StandardError
    def Err.Fail(*opt)
      fail self, sprintf(self::Message, *opt)
    end

class UnknownLocker < Err
      Message = "Thread(%s) not locked."
      def UnknownLocker.Fail(th)
        super(th.inspect)
      end
    end

class LockModeFailer < Err
      Message = "Unknown lock mode(%s)"
      def LockModeFailer.Fail(mode)
        if mode.id2name
          mode = id2name
        end
        super(mode)
      end
    end
  end

def Sync_m.define_aliases(cl)
    cl.module_eval %q{
      alias locked? sync_locked?
      alias shared? sync_shared?
      alias exclusive? sync_exclusive?
      alias lock sync_lock
      alias unlock sync_unlock
      alias try_lock sync_try_lock
      alias synchronize sync_synchronize
    }
  end

def Sync_m.append_features(cl)
    super
    # do nothing for Modules
    # make aliases for Classes.
    define_aliases(cl) unless cl.instance_of?(Module)
    self
  end

def Sync_m.extend_object(obj)
    super
    obj.sync_extend
  end

def sync_extend
    unless (defined? locked? and
            defined? shared? and
            defined? exclusive? and
            defined? lock and
            defined? unlock and
            defined? try_lock and
            defined? synchronize)
      Sync_m.define_aliases(singleton_class)
    end
    sync_initialize
  end

# accessing
  def sync_locked?
    sync_mode != UN
  end

def sync_shared?
    sync_mode == SH
  end

def sync_exclusive?
    sync_mode == EX
  end

# locking methods.
  def sync_try_lock(mode = EX)
    return unlock if mode == UN
    @sync_mutex.synchronize do
      sync_try_lock_sub(mode)
    end
  end

def sync_lock(m = EX)
    return unlock if m == UN
    Thread.handle_interrupt(StandardError => :on_blocking) do
      while true
        @sync_mutex.synchronize do
          begin
            if sync_try_lock_sub(m)
              return self
            else
              if sync_sh_locker[Thread.current]
                sync_upgrade_waiting.push [Thread.current, sync_sh_locker[Thread.current]]
                sync_sh_locker.delete(Thread.current)
              else
                unless sync_waiting.include?(Thread.current) || sync_upgrade_waiting.reverse_each.any?{|w| w.first == Thread.current }
                  sync_waiting.push Thread.current
                end
              end
              @sync_mutex.sleep
            end
          ensure
            sync_waiting.delete(Thread.current)
          end
        end
      end
    end
    self
  end

def sync_unlock(m = EX)
    wakeup_threads = []
    @sync_mutex.synchronize do
      if sync_mode == UN
        Err::UnknownLocker.Fail(Thread.current)
      end

m = sync_mode if m == EX and sync_mode == SH

runnable = false
      case m
      when UN
        Err::UnknownLocker.Fail(Thread.current)

when EX
        if sync_ex_locker == Thread.current
          if (self.sync_ex_count = sync_ex_count - 1) == 0
            self.sync_ex_locker = nil
            if sync_sh_locker.include?(Thread.current)
              self.sync_mode = SH
            else
              self.sync_mode = UN
            end
            runnable = true
          end
        else
          Err::UnknownLocker.Fail(Thread.current)
        end

when SH
        if (count = sync_sh_locker[Thread.current]).nil?
          Err::UnknownLocker.Fail(Thread.current)
        else
          if (sync_sh_locker[Thread.current] = count - 1) == 0
            sync_sh_locker.delete(Thread.current)
            if sync_sh_locker.empty? and sync_ex_count == 0
              self.sync_mode = UN
              runnable = true
            end
          end
        end
      end

if runnable
        if sync_upgrade_waiting.size > 0
          th, count = sync_upgrade_waiting.shift
          sync_sh_locker[th] = count
          th.wakeup
          wakeup_threads.push th
        else
          wait = sync_waiting
          self.sync_waiting = []
          for th in wait
            th.wakeup
            wakeup_threads.push th
          end
        end
      end
    end
    for th in wakeup_threads
      th.run
    end
    self
  end

def sync_synchronize(mode = EX)
    Thread.handle_interrupt(StandardError => :on_blocking) do
      sync_lock(mode)
      begin
        yield
      ensure
        sync_unlock
      end
    end
  end

attr_accessor :sync_mode

attr_accessor :sync_waiting
  attr_accessor :sync_upgrade_waiting
  attr_accessor :sync_sh_locker
  attr_accessor :sync_ex_locker
  attr_accessor :sync_ex_count

def sync_inspect
    sync_iv = instance_variables.select{|iv| /^@sync_/ =~ iv.id2name}.collect{|iv| iv.id2name + '=' + instance_eval(iv.id2name).inspect}.join(",")
    print "<#{self.class}.extend Sync_m: #{inspect}, <Sync_m: #{sync_iv}>"
  end

private

def sync_initialize
    @sync_mode = UN
    @sync_waiting = []
    @sync_upgrade_waiting = []
    @sync_sh_locker = Hash.new
    @sync_ex_locker = nil
    @sync_ex_count = 0

@sync_mutex = Mutex.new
  end

def initialize(*args)
    super
    sync_initialize
  end

def sync_try_lock_sub(m)
    case m
    when SH
      case sync_mode
      when UN
        self.sync_mode = m
        sync_sh_locker[Thread.current] = 1
        ret = true
      when SH
        count = 0 unless count = sync_sh_locker[Thread.current]
        sync_sh_locker[Thread.current] = count + 1
        ret = true
      when EX
        # in EX mode, lock will upgrade to EX lock
        if sync_ex_locker == Thread.current
          self.sync_ex_count = sync_ex_count + 1
          ret = true
        else
          ret = false
        end
      end
    when EX
      if sync_mode == UN or
          sync_mode == SH && sync_sh_locker.size == 1 && sync_sh_locker.include?(Thread.current)
        self.sync_mode = m
        self.sync_ex_locker = Thread.current
        self.sync_ex_count = 1
        ret = true
      elsif sync_mode == EX && sync_ex_locker == Thread.current
        self.sync_ex_count = sync_ex_count + 1
        ret = true
      else
        ret = false
      end
    else
      Err::LockModeFailer.Fail mode
    end
    return ret
  end
end

##
# An alias for Sync_m from sync.rb

Synchronizer_m = Sync_m

##
# A class that providesa two-phase lock with a counter.  See Sync_m for
# details.

class Sync
  include Sync_m
end

##
# An alias for Sync from sync.rb.  See Sync_m for details.

Synchronizer = Sync