Gecko [ www.corporacionhdm.com.pe ]

Name	Size	Permission	Date
bigdecimal	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
cgi	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
date	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
digest	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
dl	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
drb	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
io	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
irb	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
net	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
openssl	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
optparse	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
racc	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
rdoc	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
rexml	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
rinda	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
rss	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
runit	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
shell	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
soap	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
test	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
uri	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
webrick	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
wsdl	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
x86_64-linux	[ DIR ]	drwxr-xr-x	2024-03-03 22:50
xmlrpc	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
xsd	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
yaml	[ DIR ]	drwxr-xr-x	2024-03-03 22:48
English.rb	5.6 KB	-rw-r--r--	2007-02-12 23:01
Env.rb	274 B	-rw-r--r--	2007-02-12 23:01
abbrev.rb	2.5 KB	-rw-r--r--	2007-02-12 23:01
base64.rb	3.37 KB	-rw-r--r--	2007-07-16 15:47
benchmark.rb	17.73 KB	-rw-r--r--	2008-02-10 15:24
cgi-lib.rb	6.89 KB	-rw-r--r--	2007-02-12 23:01
cgi.rb	73.74 KB	-rw-r--r--	2009-12-14 02:40
complex.rb	12.84 KB	-rw-r--r--	2009-08-03 05:59
csv.rb	24.46 KB	-rw-r--r--	2007-02-12 23:01
date.rb	53.02 KB	-rw-r--r--	2010-06-08 04:45
date2.rb	128 B	-rw-r--r--	2007-02-12 23:01
debug.rb	20.61 KB	-rw-r--r--	2007-02-12 23:01
delegate.rb	8.81 KB	-rw-r--r--	2009-07-16 00:35
digest.rb	1.12 KB	-rw-r--r--	2007-07-28 00:40
drb.rb	19 B	-rw-r--r--	2007-02-12 23:01
e2mmap.rb	4.04 KB	-rw-r--r--	2007-02-12 23:01
erb.rb	21.38 KB	-rw-r--r--	2009-02-23 17:44
eregex.rb	487 B	-rw-r--r--	2007-02-12 23:01
expect.rb	633 B	-rw-r--r--	2008-02-18 01:17
fileutils.rb	42.23 KB	-rw-r--r--	2011-05-20 22:29
finalize.rb	5.38 KB	-rw-r--r--	2007-02-12 23:01
find.rb	1.84 KB	-rw-r--r--	2007-02-12 23:01
forwardable.rb	6.16 KB	-rw-r--r--	2008-06-06 08:05
ftools.rb	6.17 KB	-rw-r--r--	2007-02-12 23:01
generator.rb	8.1 KB	-rw-r--r--	2008-04-10 10:52
getoptlong.rb	14.88 KB	-rw-r--r--	2007-02-12 23:01
getopts.rb	2.25 KB	-rw-r--r--	2007-02-12 23:01
gserver.rb	6.43 KB	-rw-r--r--	2007-02-12 23:01
importenv.rb	590 B	-rw-r--r--	2007-02-12 23:01
ipaddr.rb	21.96 KB	-rw-r--r--	2008-07-12 15:08
irb.rb	7.43 KB	-rw-r--r--	2009-08-09 08:44
jcode.rb	4.3 KB	-rw-r--r--	2007-02-12 23:01
kconv.rb	8.12 KB	-rw-r--r--	2007-02-12 23:01
logger.rb	17.59 KB	-rw-r--r--	2011-05-30 02:08
mailread.rb	1.28 KB	-rw-r--r--	2007-02-12 23:01
mathn.rb	5.42 KB	-rw-r--r--	2007-02-12 23:01
matrix.rb	27.21 KB	-rw-r--r--	2009-01-24 15:02
md5.rb	411 B	-rw-r--r--	2007-03-06 10:09
mkmf.rb	50.65 KB	-rw-r--r--	2010-12-04 06:34
monitor.rb	7.93 KB	-rw-r--r--	2009-11-25 07:45
mutex_m.rb	2.07 KB	-rw-r--r--	2007-02-12 23:01
observer.rb	5.15 KB	-rw-r--r--	2007-02-12 23:01
open-uri.rb	20.49 KB	-rw-r--r--	2007-10-08 11:16
open3.rb	2.1 KB	-rw-r--r--	2009-12-14 04:28
openssl.rb	575 B	-rw-r--r--	2010-11-22 07:21
optparse.rb	47.12 KB	-rw-r--r--	2009-02-20 11:43
ostruct.rb	3.35 KB	-rw-r--r--	2009-05-26 12:06
parsearg.rb	1.55 KB	-rw-r--r--	2007-02-12 23:01
parsedate.rb	1.33 KB	-rw-r--r--	2007-02-12 23:01
pathname.rb	29.39 KB	-rw-r--r--	2010-11-23 08:21
ping.rb	1.48 KB	-rw-r--r--	2007-02-12 23:01
pp.rb	15.97 KB	-rw-r--r--	2007-06-07 10:06
prettyprint.rb	18.33 KB	-rw-r--r--	2007-02-16 19:53
profile.rb	90 B	-rw-r--r--	2007-02-12 23:01
profiler.rb	1.59 KB	-rw-r--r--	2007-02-12 23:01
pstore.rb	11.15 KB	-rw-r--r--	2008-06-06 08:05
rational.rb	12.05 KB	-rw-r--r--	2010-06-08 05:02
readbytes.rb	835 B	-rw-r--r--	2007-02-12 23:01
resolv-replace.rb	1.55 KB	-rw-r--r--	2008-08-08 01:58
resolv.rb	56.83 KB	-rw-r--r--	2010-12-23 03:22
rss.rb	504 B	-rw-r--r--	2007-10-21 12:19
rubyunit.rb	180 B	-rw-r--r--	2007-02-12 23:01
scanf.rb	20.63 KB	-rw-r--r--	2009-01-20 03:23
securerandom.rb	4.27 KB	-rw-r--r--	2011-12-10 12:17
set.rb	27.08 KB	-rw-r--r--	2008-06-09 09:20
sha1.rb	418 B	-rw-r--r--	2007-03-06 10:09
shell.rb	4.66 KB	-rw-r--r--	2007-02-12 23:01
shellwords.rb	3.99 KB	-rw-r--r--	2008-03-21 12:16
singleton.rb	8.08 KB	-rw-r--r--	2008-07-03 11:14
sync.rb	6.09 KB	-rw-r--r--	2009-02-19 16:41
tempfile.rb	4.86 KB	-rw-r--r--	2008-04-21 09:43
thread.rb	104 B	-rw-r--r--	2007-02-13 19:39
thwait.rb	4.32 KB	-rw-r--r--	2010-06-08 07:08
time.rb	31.58 KB	-rw-r--r--	2008-06-06 08:05
timeout.rb	3 KB	-rw-r--r--	2010-06-08 06:24
tmpdir.rb	3.69 KB	-rw-r--r--	2009-01-26 02:12
tracer.rb	2.73 KB	-rw-r--r--	2007-02-12 23:01
tsort.rb	7.99 KB	-rw-r--r--	2007-02-12 23:01
un.rb	4.54 KB	-rw-r--r--	2007-02-12 23:01
uri.rb	710 B	-rw-r--r--	2008-04-15 09:41
weakref.rb	2.68 KB	-rw-r--r--	2007-02-12 23:01
webrick.rb	811 B	-rw-r--r--	2007-02-12 23:01
yaml.rb	12.36 KB	-rw-r--r--	2008-04-19 11:45

Rename

# jcode.rb - ruby code to handle japanese (EUC/SJIS) string

if $VERBOSE && $KCODE == "NONE"
  warn "Warning: $KCODE is NONE."
end

$vsave, $VERBOSE = $VERBOSE, false
class String
  warn "feel free for some warnings:\n" if $VERBOSE

def _regex_quote(str)
    str.gsub(/(\\[\[\]\-\\])|\\(.)|([\[\]\\])/) do
      $1 || $2 || '\\' + $3
    end
  end
  private :_regex_quote

PATTERN_SJIS = '[\x81-\x9f\xe0-\xef][\x40-\x7e\x80-\xfc]'
  PATTERN_EUC = '[\xa1-\xfe][\xa1-\xfe]'
  PATTERN_UTF8 = '[\xc0-\xdf][\x80-\xbf]|[\xe0-\xef][\x80-\xbf][\x80-\xbf]'

RE_SJIS = Regexp.new(PATTERN_SJIS, 0, 'n')
  RE_EUC = Regexp.new(PATTERN_EUC, 0, 'n')
  RE_UTF8 = Regexp.new(PATTERN_UTF8, 0, 'n')

SUCC = {}
  SUCC['s'] = Hash.new(1)
  for i in 0 .. 0x3f
    SUCC['s'][i.chr] = 0x40 - i
  end
  SUCC['s']["\x7e"] = 0x80 - 0x7e
  SUCC['s']["\xfd"] = 0x100 - 0xfd
  SUCC['s']["\xfe"] = 0x100 - 0xfe
  SUCC['s']["\xff"] = 0x100 - 0xff
  SUCC['e'] = Hash.new(1)
  for i in 0 .. 0xa0
    SUCC['e'][i.chr] = 0xa1 - i
  end
  SUCC['e']["\xfe"] = 2
  SUCC['u'] = Hash.new(1)
  for i in 0 .. 0x7f
    SUCC['u'][i.chr] = 0x80 - i
  end
  SUCC['u']["\xbf"] = 0x100 - 0xbf

def mbchar?
    case $KCODE[0]
    when ?s, ?S
      self =~ RE_SJIS
    when ?e, ?E
      self =~ RE_EUC
    when ?u, ?U
      self =~ RE_UTF8
    else
      nil
    end
  end

def end_regexp
    case $KCODE[0]
    when ?s, ?S
      /#{PATTERN_SJIS}$/on
    when ?e, ?E
      /#{PATTERN_EUC}$/on
    when ?u, ?U
      /#{PATTERN_UTF8}$/on
    else
      /.$/on
    end
  end

alias original_succ! succ!
  private :original_succ!

alias original_succ succ
  private :original_succ

def succ!
    reg = end_regexp
    if  $KCODE != 'NONE' && self =~ reg
      succ_table = SUCC[$KCODE[0,1].downcase]
      begin
	self[-1] += succ_table[self[-1]]
	self[-2] += 1 if self[-1] == 0
      end while self !~ reg
      self
    else
      original_succ!
    end
  end

def succ
    str = self.dup
    str.succ! or str
  end

private

def _expand_ch str
    a = []
    str.scan(/(?:\\(.)|([^\\]))-(?:\\(.)|([^\\]))|(?:\\(.)|(.))/m) do
      from = $1 || $2
      to = $3 || $4
      one = $5 || $6
      if one
	a.push one
      elsif from.length != to.length
	next
      elsif from.length == 1
	from[0].upto(to[0]) { |c| a.push c.chr }
      else
	from.upto(to) { |c| a.push c }
      end
    end
    a
  end

def expand_ch_hash from, to
    h = {}
    afrom = _expand_ch(from)
    ato = _expand_ch(to)
    afrom.each_with_index do |x,i| h[x] = ato[i] || ato[-1] end
    h
  end

HashCache = {}
  TrPatternCache = {}
  DeletePatternCache = {}
  SqueezePatternCache = {}

public

def tr!(from, to)
    return nil if from == ""
    return self.delete!(from) if to == ""

pattern = TrPatternCache[from] ||= /[#{_regex_quote(from)}]/
    if from[0] == ?^
      last = /.$/.match(to)[0]
      self.gsub!(pattern, last)
    else
      h = HashCache[from + "1-0" + to] ||= expand_ch_hash(from, to)
      self.gsub!(pattern) do |c| h[c] end
    end
  end

def tr(from, to)
    (str = self.dup).tr!(from, to) or str
  end

def delete!(del)
    return nil if del == ""
    self.gsub!(DeletePatternCache[del] ||= /[#{_regex_quote(del)}]+/, '')
  end

def delete(del)
    (str = self.dup).delete!(del) or str
  end

def squeeze!(del=nil)
    return nil if del == ""
    pattern =
      if del
	SqueezePatternCache[del] ||= /([#{_regex_quote(del)}])\1+/
      else
	/(.|\n)\1+/
      end
    self.gsub!(pattern, '\1')
  end

def squeeze(del=nil)
    (str = self.dup).squeeze!(del) or str
  end

def tr_s!(from, to)
    return self.delete!(from) if to.length == 0

pattern = SqueezePatternCache[from] ||= /([#{_regex_quote(from)}])\1*/
    if from[0] == ?^
      last = /.$/.match(to)[0]
      self.gsub!(pattern, last)
    else
      h = HashCache[from + "1-0" + to] ||= expand_ch_hash(from, to)
      self.gsub!(pattern) do h[$1] end
    end
  end

def tr_s(from, to)
    (str = self.dup).tr_s!(from,to) or str
  end

def chop!
    self.gsub!(/(?:.|\r?\n)\z/, '')
  end

def chop
    (str = self.dup).chop! or str
  end

def jlength
    self.gsub(/[^\Wa-zA-Z_\d]/, ' ').length
  end
  alias jsize jlength

def jcount(str)
    self.delete("^#{str}").jlength
  end

def each_char
    if block_given?
      scan(/./m) do |x|
        yield x
      end
    else
      scan(/./m)
    end
  end

end
$VERBOSE = $vsave