RubyGems - YkLib - Versions diffs - 0.1.0 - Mend

YkLib 0.1.0

Files changed (125) hide show

checksums.yaml +7 -0
data/.gitignore +11 -0
data/.rspec +3 -0
data/.travis.yml +6 -0
data/CODE_OF_CONDUCT.md +74 -0
data/Gemfile +7 -0
data/Gemfile.lock +34 -0
data/LICENSE.txt +21 -0
data/README.md +44 -0
data/Rakefile +6 -0
data/YkLib.gemspec +29 -0
data/bin/console +14 -0
data/bin/setup +8 -0
data/lib/YkLib/Yk/__advance__.rb +151 -0
data/lib/YkLib/Yk/__defun__.rb +44 -0
data/lib/YkLib/Yk/__hook__.rb +244 -0
data/lib/YkLib/Yk/__minmax__.rb +123 -0
data/lib/YkLib/Yk/__stdlog.rb +329 -0
data/lib/YkLib/Yk/adhocLiterals/email.rb +119 -0
data/lib/YkLib/Yk/adhocLiterals/path.rb +402 -0
data/lib/YkLib/Yk/adhocLiterals/tag.rb +19 -0
data/lib/YkLib/Yk/adhocLiterals/url.rb +36 -0
data/lib/YkLib/Yk/adhocLiterals.rb +199 -0
data/lib/YkLib/Yk/auto_escseq.rb +5 -0
data/lib/YkLib/Yk/auto_pstore.rb +179 -0
data/lib/YkLib/Yk/bsearch.rb +120 -0
data/lib/YkLib/Yk/clambda.rb +309 -0
data/lib/YkLib/Yk/confLine.rb +423 -0
data/lib/YkLib/Yk/create_tty_width_available.rb +24 -0
data/lib/YkLib/Yk/crypt.rb +26 -0
data/lib/YkLib/Yk/debug2 +1 -0
data/lib/YkLib/Yk/debug2.rb +473 -0
data/lib/YkLib/Yk/debugout.rb +139 -0
data/lib/YkLib/Yk/email_tz.rb +533 -0
data/lib/YkLib/Yk/enum_expect.rb +170 -0
data/lib/YkLib/Yk/errlog.rb +5 -0
data/lib/YkLib/Yk/escseq.rb +59 -0
data/lib/YkLib/Yk/eval_alt.rb +281 -0
data/lib/YkLib/Yk/expector.rb +93 -0
data/lib/YkLib/Yk/fetch.rb +556 -0
data/lib/YkLib/Yk/fetch_old.rb +290 -0
data/lib/YkLib/Yk/fib.rb +158 -0
data/lib/YkLib/Yk/file_aux.rb +843 -0
data/lib/YkLib/Yk/file_aux2.rb +919 -0
data/lib/YkLib/Yk/file_aux_old.rb +160 -0
data/lib/YkLib/Yk/filemod.rb +19 -0
data/lib/YkLib/Yk/force_escseq.rb +3 -0
data/lib/YkLib/Yk/generator__.rb +144 -0
data/lib/YkLib/Yk/generator__.rb.org +139 -0
data/lib/YkLib/Yk/indenter/argless_case.rb +46 -0
data/lib/YkLib/Yk/indenter/each_token.rb +671 -0
data/lib/YkLib/Yk/indenter/free_case.rb +313 -0
data/lib/YkLib/Yk/indenter/if_less.rb +53 -0
data/lib/YkLib/Yk/indenter/independent_ensure.rb +23 -0
data/lib/YkLib/Yk/indenter/independent_rescue.rb +23 -0
data/lib/YkLib/Yk/indenter/operand_circumflex.rb +0 -0
data/lib/YkLib/Yk/indenter/operand_period.rb +16 -0
data/lib/YkLib/Yk/indenter/parenless_and.rb +37 -0
data/lib/YkLib/Yk/indenter/post_test.rb +48 -0
data/lib/YkLib/Yk/indenter/token.rb +1525 -0
data/lib/YkLib/Yk/indenter.rb +1382 -0
data/lib/YkLib/Yk/inot.rb +265 -0
data/lib/YkLib/Yk/intf.rb +815 -0
data/lib/YkLib/Yk/io_aux.rb +1332 -0
data/lib/YkLib/Yk/ioctl.rb +60 -0
data/lib/YkLib/Yk/ipcc.rb +87 -0
data/lib/YkLib/Yk/ipcountry.rb +207 -0
data/lib/YkLib/Yk/ipv4adr.rb +318 -0
data/lib/YkLib/Yk/localmail.rb +276 -0
data/lib/YkLib/Yk/method_chain.rb +359 -0
data/lib/YkLib/Yk/misc_tz.rb +1716 -0
data/lib/YkLib/Yk/missing_method.rb +50 -0
data/lib/YkLib/Yk/mojiConv.rb +257 -0
data/lib/YkLib/Yk/nostdlog.rb +4 -0
data/lib/YkLib/Yk/on_marshal.rb +20 -0
data/lib/YkLib/Yk/overrider.rb +47 -0
data/lib/YkLib/Yk/path.rb +293 -0
data/lib/YkLib/Yk/path_aux.rb +883 -0
data/lib/YkLib/Yk/path_aux_alt.rb +0 -0
data/lib/YkLib/Yk/path_rep.rb +1267 -0
data/lib/YkLib/Yk/pg_setup.rb +917 -0
data/lib/YkLib/Yk/procinfo.rb +314 -0
data/lib/YkLib/Yk/proclist.rb +492 -0
data/lib/YkLib/Yk/property.rb +863 -0
data/lib/YkLib/Yk/ranger.rb +606 -0
data/lib/YkLib/Yk/resolv_tz.rb +88 -0
data/lib/YkLib/Yk/rlprompt.rb +73 -0
data/lib/YkLib/Yk/rootexec.rb +48 -0
data/lib/YkLib/Yk/rpm-packageproxy.rb +784 -0
data/lib/YkLib/Yk/rpm-packageproxy2.rb +1430 -0
data/lib/YkLib/Yk/rwhen.rb +21 -0
data/lib/YkLib/Yk/selector.rb +124 -0
data/lib/YkLib/Yk/set.rb +170 -0
data/lib/YkLib/Yk/shellquote.rb +300 -0
data/lib/YkLib/Yk/sio.rb +1001 -0
data/lib/YkLib/Yk/sio0.rb +835 -0
data/lib/YkLib/Yk/sio_aux.rb +1524 -0
data/lib/YkLib/Yk/sio_inot.rb +86 -0
data/lib/YkLib/Yk/sock_aux.rb +42 -0
data/lib/YkLib/Yk/spipe.rb +843 -0
data/lib/YkLib/Yk/sql_table.rb +565 -0
data/lib/YkLib/Yk/stdlog.rb +4 -0
data/lib/YkLib/Yk/syscommand.rb +173 -0
data/lib/YkLib/Yk/sysinit.rb +75 -0
data/lib/YkLib/Yk/ttyFontWidth.rb +46113 -0
data/lib/YkLib/Yk/tty_char.dump +0 -0
data/lib/YkLib/Yk/tty_char.rb +47 -0
data/lib/YkLib/Yk/tty_char_create.rb +437031 -0
data/lib/YkLib/Yk/tty_char_static.rb +437016 -0
data/lib/YkLib/Yk/tty_rewrite.rb +142 -0
data/lib/YkLib/Yk/tty_str.rb +461 -0
data/lib/YkLib/Yk/tty_width.dat.rb +114 -0
data/lib/YkLib/Yk/tty_width.rb +180 -0
data/lib/YkLib/Yk/tty_width_available +569 -0
data/lib/YkLib/Yk/tty_width_list +0 -0
data/lib/YkLib/Yk/tty_width_list.linux +280 -0
data/lib/YkLib/Yk/tty_width_list.windows +324 -0
data/lib/YkLib/Yk/tz_tty +0 -0
data/lib/YkLib/Yk/tz_tty.rb +0 -0
data/lib/YkLib/Yk/uprepos.rb +94 -0
data/lib/YkLib/Yk/userinfo.rb +91 -0
data/lib/YkLib/Yk/with.rb +109 -0
data/lib/YkLib/version.rb +3 -0
data/lib/YkLib.rb +6 -0
metadata +170 -0

data/lib/YkLib/Yk/adhocLiterals.rb ADDED Viewed

@@ -0,0 +1,199 @@
+class String
+	def ssubst rg, str, anot
+		@anotList ||= [nil] * size
+		ed = rg.exclude_end? ? rg.end - 1 : rg.end
+		tail = [[anot, rg.begin]] * str.size + @anotList[ed + 1 .. -1]
+		@anotList[rg.begin .. -1] = tail
+		self[rg] = str
+	end
+	def anot i
+		@anotList ? nil : @anotList[i]
+	end
+end
+class AdhocLiterals
+	Literals = {}
+	class Error < Exception
+	end
+	def self.[] arg
+		Literals[arg]
+	end
+	def self.resolveRequirements opts
+		Opts.merge opts
+		if opts[:adhoc_literals].is_a? Array
+			opts[:adhoc_literals].each do |s|
+				e = File.expand_path(__FILE__)
+				d = File.dirname(e)
+				sd = File.basename(e, ".rb")
+				begin
+					Literals[s] = true
+					require  "#{d}/#{sd}/" + s.to_s.downcase
+				rescue
+					raise Error.new("Adhoc literal, #{s} is not defined")
+				end
+			end
+		end
+	end
+	def self.require arg
+		e = File.expand_path(__FILE__)
+		d = File.dirname(e)
+		sd = File.basename(e, ".rb")
+		require  "#{d}/#{sd}/" + arg
+	end
+end
+=begin
+				res = 25 * g.foo "\r\n" \ ln
+							case ln
+							when 3
+								break 1
+							when 4
+								break 2
+						_ .to_i + 5
+				def test
+				end
+				doc = <<>
+					!ENTITY open-hatch
+						asdf
+						asdf2
+						asdf3
+					<html
+						`foo
+						<table class=asdf
+							10.times
+								<tr height=1
+									<td width=3
+										<div id=subdoc
+											`#{_1}
+									<td
+										2
+										5.times
+											test
+										3
+										<input type=button onClick=test
+										<input type=text name=a accessor
+									<td
+						`pqr
+						!--
+							comment
+				def doc.test # direct
+					subdoc.innerHTML = <H2
+						`This is test
+					a.value = "success"
+					but1.enabled = false
+				doc.__defun__ :testAjax
+					doc.subdoc.innerHTML = getFooDocElem #if not defined in doc, request Ajax by XMLHttpRequest
+				asdf
+					_1 + _1
+				_
+					_1 + _1
+				Fiber.fork
+					doc.show
+				while
+					sleep 10
+					doc.byId.subdoc.innerHTML = <H2
+						``Time.now
+					doc.byId.
+					def expect &c
+	lp:						loop buff += getc rescue break
+							all_not_match = true
+							c.when.each \ *args, bl
+								args.each \ r
+									buff =~ r
+									case $/.status
+									when :partial
+										all_not_match &&= false
+									when :complete
+										bl.call
+										buff.clear
+										lp.next
+							if all_not_match
+								c.else&.call
+								buff.clear
+					`ls -la`.open 2, [1, 0] => :tty, timeout: 5, status: ^es \ ferr, ftty
+						fork
+							ferr.expect \ e
+								e.when /(^|\n)password:/
+									ftty.write pwd
+								e.else
+									printerr _1
+						lns = ftty.lines
+					if cmd.exitstatus != 0
+					# 1. a = /*1*/ 1	# is comment 'cause the comment closed witin a line
+					# 1'. a = /"*1*"/	# is a path '/*1*/'
+					# 2. a = /*			# is comment beginning
+					# 2. a, b = /*, /*	# the first '/*' is path, second is comment beginning
+					# 2'. a = /"*"		# is a path, '/*'
+					# 3. a = /etc/*		# is a path, '/etc/*'
+=end
+=begin
+		# opts : 	tab, tabstop, tab_stop
+		# 			underscore_line_continuation
+		# 			block_label
+		# 			omittable_if, omittable_do
+		# 			c_comment
+		#			nested_when
+		# 			adhoc_pathname
+		# 			url
+		# 			ip
+		# 			safe_cmd
+		#			SLASH_NOT_REG_NOR_PATH = ROOT_PATH | REG_EXPR # DIVIDE OPERATOR
+		#			IS_SUBJECT = /\s+(\.\w|\#|\/\*)|\s*((\,|\:|\;)(?!<SLASH_NOT_REG_NOR_PATH>)|(\}|\]|\))(?!<REG_END>))|$/
+		#			REG_END = /\/[uesnimxo]+(?=<IS_SUBJECT>)/
+		#			ROOT_PATH = /\/([\w\d\.\*\?\-]+|)(?=<IS_SUBJECT>)/
+		#			PATH_OR_REG
+		#			PATH
+		#			REG
+		#			<PATH> , .\w+ / ; : } ] ) /\s
+		#			x = [/, /asd, /foo]
+		#			x = /			# path
+		#			x = / /	foo		# path => Pathname.new("/") / foo
+		#			x, y = /, / foo /		# path => Pathname.new("/") / foo
+		#			/ foo /
+		#			/etc		# path
+		# 			someResult = foo /proc, /, sys, /etc/, /bin/ /* comment */
+		while expr =~ /
+					::`									# possible unclosed `
+				|	:`									# possible unclosed `
+				|	:\/									# possible unclosed \/
+				|	\.+\/								# path
+				|	\.									# possible unclosed ` ; maybe over comment ".."
+														# or possible reserved word as method name
+				|	\bend\b
+				|	\bdef\b								# possible unclosed ` ; maybe over comment
+				|	\b(?<reserved>(class|module|if|unless|while|until|for|rescue|ensure|else|elsif|case|when|in|then|do))\b
+				|	\b__DATA__\b
+				|	\w[\w\d]*
+				|	\$[\/'`"%]							# possible unclosed
+				|	;
+				|	(?<bracket_start>[({[])
+				|	(?<space>[\t\r\f\v\x20]+)
+				|	\\\n
+				|	(?<ln>(\n|$))
+				|	\b_\b
+				|	(?<comment>\#.*(\n|$))				# traditional style comment, interpreted as new line
+				|	(?<c_comment>\/\*.*?\*\/)			# c comment, interpreted as space
+				|	\/\*								# c comment start
+				|	\`
+				|	\'
+				|	\"
+				|	\/\n					            # regular expression
+				|	\/(?![$\s])	       					# regular expression or ad hoc file path
+				|	\<\<(~|-|)([\'\"\`]|)\w+			# line literal
+				|	\%([a-zA-Z]|)([^\w\s]|_)			# percent expression
+				|	\d+\.\d+
+				|	\W+
+			/x
+=end

data/lib/YkLib/Yk/auto_escseq.rb ADDED Viewed

@@ -0,0 +1,5 @@
+require 'Yk/escseq'
+Escseq.beIncludedBy String

data/lib/YkLib/Yk/auto_pstore.rb ADDED Viewed

@@ -0,0 +1,179 @@
+require 'pstore'
+require 'Yk/path_aux'
+class AutoPstore
+	@@readOnly = false
+	@@fileName = File.basename($0)
+	def initialize
+        dbFile = "/var/tmp/#{@@fileName}.auto_pstore.db"
+        dbFileDeb = "/var/tmp/#{@@fileName}.auto_pstore.debug.db"
+        if $DEBUG
+			if !dbFileDeb.exist? && dbFile.exist?
+	            dbFile.copy(dbFileDeb)
+			end
+            dbFile = dbFileDeb
+		end
+		if defined?(@@readTemp) && @@readTemp
+			"/var/tmp/#{@@fileName}.auto_pstore.lock".lock_sh do
+				db = PStore.new(dbFile)
+				db.transaction true do
+					@objList = db["root"]
+				end
+			end
+		else
+			retried = false
+			begin
+        		"/var/tmp/#{@@fileName}.auto_pstore.lock".setpid
+        	rescue File::CannotGetLock
+        		raise Exception.new("AutoPstore: second instance is not allowed")
+        	end
+			begin
+				db = PStore.new(dbFile)
+			rescue
+				if !retried
+					dbFile.rm_f
+					retried = true
+					retry
+				else
+					raise Exception.new("cannot open database\n")
+					exit 1
+				end
+			end
+			@sleeping = false
+			@thread = Thread.new do
+				db.transaction @@readOnly do
+					@objList = db["root"] ||= Hash.new
+					Thread.pass
+					@sleeping = true
+					sleep
+				end
+			end
+			ctmp = 0
+			while !@objList
+				Thread.pass
+				sleep 0.1
+				ctmp += 1
+				if ctmp > 10
+					raise Exception.new("cannot open/create database\n")
+				end
+			end
+			@objList.each_value do |e|
+				if e.respond_to? :check_recover
+					e.check_recover
+				end
+			end
+			@finalizer = Hash.new{ |h, k| h[k] = Hash.new }
+			at_exit do
+				close
+			end
+		end
+	end
+	def setFinalizer (name, obj = nil, &bl)
+		@finalizer[name][obj] = bl
+	end
+	def method_missing (name, *args)
+		if name.to_s[-1] == ?=
+			tmp = name.to_s.chop
+#			if @objList[tmp] != nil
+#				raise Exception.new("cannot register twice (#{tmp})\n")
+#			else
+				@objList[tmp] = args[0]
+#			end
+		else
+			@objList[name.to_s]
+		end
+	end
+	def each
+		@objList.each do |k, v|
+			yield k, v
+		end
+	end
+	def AutoPstore.method_missing (name, *args)
+		if !defined?(@@autoPstore) || @@readTemp
+			@@autoPstore = AutoPstore.new
+		end
+		@@autoPstore.method_missing(name, *args)
+	end
+	def AutoPstore.each
+        if !defined? @@autoPstore
+            @@autoPstore = AutoPstore.new
+        end
+		@@autoPstore.each do |k, v|
+			yield k, v
+		end
+	end
+	def AutoPstore.setFinalizer (name, target)
+		if !defined? @@autoPstore
+			@@autoPstore = AutoPstore.new
+		end
+		@@autoPstore.setFinalizer(name, target)
+	end
+	def AutoPstore.close
+		if defined? @@autoPstore
+			@@autoPstore.close
+			@@autoPstore = nil
+		end
+	end
+	def AutoPstore.transaction
+		if !defined? @@autoPstore
+			@@autoPstore = AutoPstore.new
+			begin
+				yield
+			ensure
+				close
+			end
+		else
+			raise Exception.new("AutoPstore already opened\n")
+		end
+	end
+	def AutoPstore.setReadOnly
+		@@readOnly = true
+		self
+	end
+	def AutoPstore.setFileName f
+		@@fileName = f
+		self
+	end
+	def AutoPstore.readTemp
+		@@readTemp = true
+		self
+	end
+	def close
+		if !@closed
+			@closed = true
+			if @finalizer
+				@finalizer.each do |name, o|
+					o.each_value do |prc|
+						prc.call @objList[name]
+					end
+				end
+				while !@sleeping
+					begin
+						@thread.run
+					rescue ThreadError
+						Thread.pass
+						sleep 1
+						if !@sleeping
+							raise Exception.new("abnormal variable @sleep = #{@sleep} detected at #{__LINE__} in #{__FILE__}.")
+						end
+					end
+					Thread.pass
+					sleep 1
+				end
+				begin
+					@thread.run
+				rescue ThreadError
+				end
+				begin
+					@thread.join
+				rescue ThreadError
+				end
+			end
+		end
+	end
+end

data/lib/YkLib/Yk/bsearch.rb ADDED Viewed

@@ -0,0 +1,120 @@
+#
+# Ruby/Bsearch - a binary search library for Ruby.
+#
+# Copyright (C) 2001 Satoru Takabayashi <satoru@namazu.org>
+#     All rights reserved.
+#     This is free software with ABSOLUTELY NO WARRANTY.
+#
+# You can redistribute it and/or modify it under the terms of
+# the Ruby's licence.
+#
+# Example:
+#
+#  % irb -r ./bsearch.rb
+#  >> %w(a b c c c d e f).bsearch_first {|x| x <=> "c"}
+#  => 2
+#  >> %w(a b c c c d e f).bsearch_last {|x| x <=> "c"}
+#  => 4
+#  >> %w(a b c e f).bsearch_first {|x| x <=> "c"}
+#  => 2
+#  >> %w(a b e f).bsearch_first {|x| x <=> "c"}
+#  => nil
+#  >> %w(a b e f).bsearch_last {|x| x <=> "c"}
+#  => nil
+#  >> %w(a b e f).bsearch_lower_boundary {|x| x <=> "c"}
+#  => 2
+#  >> %w(a b e f).bsearch_upper_boundary {|x| x <=> "c"}
+#  => 2
+#  >> %w(a b c c c d e f).bsearch_range {|x| x <=> "c"}
+#  => 2...5
+#  >> %w(a b c d e f).bsearch_range {|x| x <=> "c"}
+#  => 2...3
+#  >> %w(a b d e f).bsearch_range {|x| x <=> "c"}
+#  => 2...2
+module Bsearch
+  VERSION = '1.5'
+end
+class Array
+  #
+  # The binary search algorithm is extracted from Jon Bentley's
+  # Programming Pearls 2nd ed. p.93
+  #
+  #
+  # Return the lower boundary. (inside)
+  #
+  def bsearch_lower_boundary (range = 0 ... self.length, &block)
+    lower  = range.first() -1
+    upper = if range.exclude_end? then range.last else range.last + 1 end
+    while lower + 1 != upper
+      mid = ((lower + upper) / 2).to_i # for working with mathn.rb (Rational)
+      if yield(self[mid]) < 0
+	lower = mid
+      else
+	upper = mid
+      end
+    end
+    return upper
+  end
+  #
+  # This method searches the FIRST occurrence which satisfies a
+  # condition given by a block in binary fashion and return the
+  # index of the first occurrence. Return nil if not found.
+  #
+  def bsearch_first (range = 0 ... self.length, &block)
+    boundary = bsearch_lower_boundary(range, &block)
+    if boundary >= self.length || yield(self[boundary]) != 0
+      return nil
+    else
+      return boundary
+    end
+  end
+  alias bsearch bsearch_first
+  #
+  # Return the upper boundary. (outside)
+  #
+  def bsearch_upper_boundary (range = 0 ... self.length, &block)
+    lower  = range.first() -1
+    upper = if range.exclude_end? then range.last else range.last + 1 end
+    while lower + 1 != upper
+      mid = ((lower + upper) / 2).to_i # for working with mathn.rb (Rational)
+      if yield(self[mid]) <= 0
+	lower = mid
+      else
+	upper = mid
+      end
+    end
+    return lower + 1 # outside of the matching range.
+  end
+  #
+  # This method searches the LAST occurrence which satisfies a
+  # condition given by a block in binary fashion and return the
+  # index of the last occurrence. Return nil if not found.
+  #
+  def bsearch_last (range = 0 ... self.length, &block)
+    # `- 1' for canceling `lower + 1' in bsearch_upper_boundary.
+    boundary = bsearch_upper_boundary(range, &block) - 1
+    if (boundary <= -1 || yield(self[boundary]) != 0)
+      return nil
+    else
+      return boundary
+    end
+  end
+  #
+  # Return the search result as a Range object.
+  #
+  def bsearch_range (range = 0 ... self.length, &block)
+    lower = bsearch_lower_boundary(range, &block)
+    upper = bsearch_upper_boundary(range, &block)
+    return lower ... upper
+  end
+end