RubyGems - YkLib - Versions diffs - 0.1.0 - Mend

YkLib 0.1.0

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.

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/email_tz.rb ADDED Viewed

@@ -0,0 +1,533 @@
+#!/usr/bin/env ruby
+require "net/smtp.rb"
+require "base64"
+require "kconv"
+#require "iconv"
+require 'Yk/path_aux'
+################################################################################
+#
+#	String
+#
+	#---------------------------------------------------------------------------
+	#
+	#	mime encode
+	#
+def __encode_for_mime slf, mode = nil
+	s = nil
+	if !mode
+		slf.each_char do |c|
+			if !" \r\n\tabcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789!\"#\$%&'()=~^|`@{}*+:;<>,?/[]-\\._".include? c
+				mode = :non_ascii
+				break
+			end
+		end
+		if mode != :non_ascii
+			mode = "ascii"
+		else
+			begin
+				s = slf.encode(Encoding::ISO2022_JP)
+				mode = "jp"
+			rescue Encoding::InvalidByteSequenceError, Encoding::UndefinedConversionError
+				begin
+					s = slf.encode("GB2312")
+					mode = "zh"
+				rescue Encoding::InvalidByteSequenceError, Encoding::UndefinedConversionError
+					begin
+						s = slf.encode("UTF-8")
+						mode = "utf"
+					rescue Encoding::InvalidByteSequenceError
+					end
+				end
+			end
+		end
+		case mode
+		when /^ascii$/i
+			return slf, mode
+		when /^jp$/i
+			s ||= slf.encode(Encoding::ISO2022_JP)
+			return s, mode
+		when /^zh$/i
+			s ||= slf.encode("GB2312")
+			return s, mode
+		when /^utf$/i
+			s ||= slf.encode("UTF-8")
+			return s, mode
+		else
+			return slf, mode
+		end
+	end
+end
+class String
+	#---------------------------------------------------------------------------
+	#
+	#	mime decode
+	#
+	def mime_decode
+		return self unless self =~ /^=\?(ISO-2022-JP|UTF-8|GB2312)\?B\?(.+)\?=$/i
+		return Base64.decode64($1)
+	end
+	def google_link
+		expr = self
+		e2, mode = __encode_for_mime expr.strip
+		case expr
+		when /^\+81/
+			url = "<a href='https://www.google.com/search?q=0#{$'}'>#{expr}</a>"
+		when /^\+86/
+			cnum = $'
+			if cnum !~ /^1[1-9]\d\d\d\d\d\d\d\d\d$/
+				cnum = "0" + cnum
+			end
+			url = "<a href='https://www.baidu.com/s?wd=#{cnum}'>#{expr}</a>"
+		else
+			case mode
+			when "zh"
+				url = "<a href='https://www.baidu.com/s?wd=#{cnum}'>#{expr}</a>"
+			else
+				url = "<a href='https://www.google.com/search?q=0#{$'}'>#{expr}</a>"
+			end
+		end
+		url
+	end
+end
+class MimeBody < String
+	attr :body
+	def initialize arg, mode = nil
+		type = "plain"
+		case arg
+		when /\<\s*\/\s*html\s*\>/
+			type = "html"
+		when /\<\s*\/\s*a\s*\>/
+			arg = "<html><pre>#{arg}</pre></html>"
+			type = "html"
+		end
+		@body, @mode = __encode_for_mime(arg, mode)
+		case @mode
+		when /^ascii$/i
+			@header = "Content-Type:text/#{type}\nContent-Transfer-Encoding: 7bit"
+		when /^jp$/i
+			@header = "Content-Type:text/#{type}; charset=\"ISO-2022-JP\"\nContent-Transfer-Encoding: 7bit"
+		when /^zh$/i
+			@header = "Content-Type:text/#{type}; charset=\"GB2312\"\nContent-Transfer-Encoding: 7bit"
+		when /^utf$/i
+			@header = "Content-Type:text/#{type}; charset=\"UTF-8\"\nContent-Transfer-Encoding: base64"
+			@body = Base64.encode64(@body)
+		end
+		super @header.force_encoding("ascii-8bit") + "\n\n" + @body.force_encoding("ascii-8bit")
+	end
+end
+class MimeHeader < String
+	def initialize arg, mode = nil
+		if arg =~ /:/
+			@title = $` + $&
+			@content, @mode = __encode_for_mime($', mode)
+			case @mode
+			when /^ascii$/i
+			when /^jp$/i
+				@content = "=?ISO-2022-JP?B?" + Base64.encode64(@content.chomp).gsub!(/\n/, "") + "?=\n"
+			when /^zh$/i
+				@content = "=?GB2312?B?" + Base64.encode64(@content.chomp).gsub!(/\n/, "") + "?=\n"
+			when /^utf$/i
+				@content = "=?UTF-8?B?" + Base64.encode64(@content.chomp).gsub!(/\n/, "") + "?=\n"
+			end
+			super @title.force_encoding("ascii-8bit") + @content.force_encoding("ascii-8bit")
+		else
+			super arg
+		end
+	end
+end
+class String
+	def mime_encode mode = nil
+		MimeHeader.new self, mode
+	end
+end
+module TZEMail
+	################################################################################
+	#
+	#	Email
+	#
+	class Email
+		attr_reader		:header
+		attr_reader		:body
+		attr_accessor	:smtpServer
+		#---------------------------------------------------------------------------
+		#
+		#	Initialize メールオブジェクトを生成する
+		#
+		def initialize(mail = nil)	# mail = Array or IO(ex.STDIN) or nil
+			key     = nil
+			@header = {}
+			@body   = []
+			return if mail == nil
+			inBody = false
+			mail.each {|line|
+				line.chomp!
+				unless inBody
+					if line =~ /^$/					# 空行
+						inBody = true
+					elsif line =~ /^(\S+?):\s*(.*)/	# ヘッダ行
+						key = $1.capitalize
+						@header[key] = $2
+					elsif key						# ヘッダ行が2行に渡る場合
+						@header[key] += "\n" + line.sub(/^\s*/, "\t")
+					end
+				else
+					@body.push(line)
+				end
+			}
+		end
+		#---------------------------------------------------------------------------
+		#
+		#	[] ヘッダを参照
+		#
+		def [](key)
+			@header[key.capitalize]
+		end
+		#---------------------------------------------------------------------------
+		#
+		#	[]= ヘッダを設定
+		#
+		def []=(key, value)
+			@header[key.capitalize] = value
+		end
+		#---------------------------------------------------------------------------
+		#
+		#	<< ボディにテキストを追加
+		#
+		def <<(message)
+			@body.push message
+		end
+		#---------------------------------------------------------------------------
+		#
+		#	encode メールをテキストストリームにエンコード
+		#
+		def encode
+			mail = ""
+			@header.each {|key, value|
+				mail += "#{key}: #{value}\n"
+			}
+			mail += "\n"							# ヘッダ/ボディのセパレータ
+			@body.each {|message|
+				mail += "#{message}\n"
+			}
+			return mail
+		end
+		#---------------------------------------------------------------------------
+		#
+		#	send メールを送る
+		#
+		def send server = "localhost", user = nil, passwd = nil, auth = nil
+			from  = @header['From']
+			to = []
+			to.push @header['To']
+			Net::SMTP.start(server, 25, 'localhost.localdomain', user, passwd, auth) {|smtp|
+				smtp.send_mail(self.encode, from, *to)
+			}
+		end
+	end
+	################################################################################
+	#
+	#	EncodedEmail
+	#
+	class EncodedEmail < Email
+		#---------------------------------------------------------------------------
+		#
+		#	Decode メールブロックをデコード
+		#
+		def decode
+			if self['Content-transfer-encoding'] =~ /base64/i
+				return Base64.decode64(@body.join)
+			else
+				return @body.join("\n")
+			end
+		end
+		#---------------------------------------------------------------------------
+		#
+		#	<< ボディにコンテントを追加
+		#
+		def <<(content)
+			if self['Content-transfer-encoding'] =~ /base64/i
+				@body = Base64.encode64(content).split("\n")
+			else
+				@body = content.split("\n")
+			end
+		end
+	end
+	################################################################################
+	#
+	#	AttachedEmail
+	#
+	class AttachedEmail < EncodedEmail
+		attr_reader	:block
+		#---------------------------------------------------------------------------
+		#
+		#	Initialize 添付メールオブジェクトを生成する
+		#
+		def initialize(mail = nil)
+			super(mail)
+			if mail == nil
+				@separator = "separator" + (rand 65536).to_s
+				self['MIME-Version'] = "1.0"
+				self['Content-Type'] = "Multipart/Mixed; boundary=\"#{@separator}\""
+				@block = []
+				return
+			end
+			return unless self['Content-Type'] =~ /^Multipart\/Mixed;\s*boundary=(["']?)(.*)\1/i
+			@separator = $2
+			@block = []
+			buf = []
+			@body.each {|line|
+				if line =~ /^--#{@separator}/
+					@block.push(EncodedEmail.new(buf))
+					buf = []
+					next
+				end
+				buf.push(line)
+			}
+			@block.shift
+			@body = []
+		end
+		#---------------------------------------------------------------------------
+		#
+		#	<< メールブロックを追加
+		#
+		def <<(block)
+			@block.push(block)
+		end
+		#---------------------------------------------------------------------------
+		#
+		#	encode メールをテキストストリームにエンコード
+		#
+		def encode
+			@block.each {|block|
+				@body.push("--" + @separator)
+				@body += block.encode.split("\n")
+			}
+			@body.push("--" + @separator + "--")
+			super
+		end
+	end
+end
+class EMailSender
+	attr_accessor :to, :from, :subject, :text, :server, :passwd, :user, :auth
+	def initialize mode
+		case mode
+		when /^jp$/i
+			@mode = "jp"
+		when /^zh$/i
+			@mode = "zh"
+		end
+		@attachedFiles = Hash.new
+	end
+	def attach file
+		!file.readable_file? and raise(Exception.new("cannot read file #{f}"))
+		@attachedFiles[file] = true
+	end
+	def detach file
+		@attachedFiles.delete file
+	end
+	def getFileBlock f
+		if f.readable_file?
+			fBlock = TZEMail::EncodedEmail.new
+			name = f.basename.mime_encode @mode
+			ctype = f =~ /\.(jpg|jpeg|gif|png)$/ ? "Image/#{$1}" : "Application/Octet-Stream"
+			fBlock['Content-Type'] =  "#{ctype}; name=\"#{name}\""
+			fBlock['Content-transfer-encoding'] = "base64"
+			fBlock << f.read
+			fBlock
+		else
+			raise Exception.new("cannot read file #{f}")
+		end
+	end
+	def charset
+		case @mode
+		when "jp"
+			"charset=iso-2022-jp"
+		when "zh"
+			"charset=gb2312"
+		else
+			""
+		end
+	end
+	def convert t
+		case @mode
+		when "jp"
+			t.tojis
+		else
+			t
+		end
+	end
+	def getTextBlock
+		tBlock = TZEMail::Email.new
+		tBlock['Content-Type'] = "Text/Plain; #{charset}"
+		tBlock << convert(text)
+		tBlock
+	end
+	def send *args
+			email = TZEMail::AttachedEmail.new
+			to and email['To'] = @to
+			from and email['From'] = @from
+			subject and (email['Subject'] = @subject.mime_encode @mode)
+			if text
+				email << getTextBlock
+			end
+			@attachedFiles.keys.each do |file|
+				email << getFileBlock(file)
+			end
+			email.send(server, user, passwd, auth)
+	end
+	def EMailSender.send smtp, from, to, text, subject = nil, files = nil, xPriority = nil
+		sendmail smtp, files, <<END
+From: #{from}
+#{subject && "Subject: #{subject}\n"}To: #{to}
+Date: #{Time.now.strftime("%a, %e %b %Y %T %z").gsub(/\s+/, " ")}#{xPriority && "\nX-Priority: #{xPriority}"}
+#{text}
+END
+	end
+	TList = []
+	def EMailSender.sendmail smtp, files, mail
+		headers = []
+		if mail =~ /\n\n/
+			h, b = $` + "\n", $'
+		else
+			h, b = mail, ""
+		end
+		h.each_line do |ln|
+			if ln !~ /^\s/ || headers.size == 0
+				headers.push ln
+			else
+				headers[-1] += ln
+			end
+		end
+		mail = ""
+		from = nil
+		to = nil
+		headers.each do |h|
+			if h =~ /^From:/ && h =~ /[^<\s\"]+\@[^>\s\"]+/
+				from = $&
+			end
+			if h =~ /^To:/ && h =~ /[^<\s\"]+\@[^>\s\"]+/
+				to = $&
+			end
+			mail += MimeHeader.new h
+		end
+		if files && files.size > 0
+			bdstr = "-------#{rand(1000000000)}#{rand(1000000000)}"
+			bdstrb = "--" + bdstr
+			mail += "Content-Type: multipart/mixed; boundary=\"#{bdstr}\"\n\n#{bdstrb}\n"
+		end
+		mail += MimeBody.new b
+		if bdstr
+			mail = mail.chomp.ln + bdstrb
+			files.each do |f|
+				case f
+				when /\.(png|gif|bmp)$/i
+					type = "image/#{$1.downcase}"
+				when /\.(jpg|jpeg)$/i
+					type = "image/jpeg"
+				when /\.(tiff|tif)$/i
+					type = "image/tiff"
+				when /\.(text|txt)$/i
+					type = "text/plain"
+				when /\.csv$/i
+					type = "text/csv"
+				when /\.(html|htm)$/i
+					type = "text/html"
+				when /\.pdf$/i
+					type = "application/pdf"
+				when /\.(xls|xlsx)$/i
+					type = "application/vnd.ms-exel"
+				when /\.(doc|docx)$/i
+					type = "application/msword"
+				when /\.(doc|docx)$/i
+					type = "application/msword"
+				when /\.(ppt|pptx|pptm)$/i
+					type = "application/vnd.ms-powerpoint"
+				when /\.exe$/i
+					type = "application/octet-stream"
+				when /\.tar(|.*)$/i
+					type = "application/x-tar"
+				when /\.zip$/i
+					type = "application/zip"
+				when /\.lzh$/i
+					type = "application/x-lzh"
+				when /\.mp3$/i
+					type = "audio/mpeg"
+				when /\.mp4$/i
+					type = "audio/mp4"
+				when /\.mpeg$/i
+					type = "video/mpeg"
+				else
+					type = "application/octet-stream"
+				end
+				mail += "\n"
+				mail += MimeHeader.new "Content-Type: #{type}; name = \"#{f.basename}\"\n"
+				mail += "Content-Transfer-Encoding: base64\n\n"
+				mail += Base64.encode64(f.read).chomp.ln
+				mail += bdstrb
+			end
+			mail += "--"
+		end
+		h, p = smtp.split(/:/)
+		p ||= 25
+		p = p.to_i
+		pid = fork do
+			fork do
+				Net::SMTP.start(h, p) {|smtp|
+					smtp.send_message(mail, from, to)
+				}
+				exit 0
+			end
+			exit 0
+		end
+	end
+end
+if __FILE__.basename == $0.basename
+	sender = EMailSender.new "jp"
+#	sender.text = "test"
+	sender.text = "XJS*C4JDBQADN1.NSBN3*2IDNEN*GTUBE-STANDARD-ANTI-UBE-TEST-EMAIL*C.34X"
+	sender.subject = "テスト"
+#	sender.attach "/root/eicar_com.zip"
+	sender.to = "yougain@nifty.com"
+	sender.from = "yuan@you.dix.asia"
+	sender.send
+end

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

@@ -0,0 +1,170 @@
+class RandLabel
+	def self.create
+		rand(100000000).to_s.intern
+	end
+end
+class Enumerator
+	class ExpectItem
+		attr_reader :regexp, :label, :block, :binding
+		def initialize this, expr, label, bl, bind
+			@this = this
+			@regexp = expr
+			@label = label
+			@block = bl
+			@binding = bind
+		end
+		def match isFirst
+			matched = @regexp && @binding.eval("#{@this.peek.inspect} =~ #{@regexp.inspect}")
+			if matched
+				@this.next
+				if isFirst
+					while true
+						catch @label do
+							@block.call
+							nil
+						end == @label or break
+					end
+				else
+					throw @label, @label
+				end
+			end
+			matched
+		end
+		def continue num = 1, &bl
+			num.times do
+				@this.expect true, &bl
+			end
+		end
+	end
+	class PararellItem < ExpectItem
+		Item = Struct.new :regexp, :label, ;block, :binding
+		def initialize this
+			@this = this
+			@items = []
+		end
+		def add expr, label, bl, bind
+			@items.push Item.new(expr, label, bl, bind)
+		end
+		def match isFirst
+			it = @items.find do |it|
+				it.regexp && it.binding.eval("#{@this.peek.inspect} =~ #{it.regexp.inspect}")
+			end
+			if !it
+				it = @items.find{_1.regexp.nil?}
+			end
+			if it
+				cur = @this.peek
+				@this.next
+				if isFirst
+					while true
+						ret = catch @label do
+							it.block.call cur
+							nil
+						end
+						break if ret.nil?
+						j = @items.find{|i| i.label == ret[0]}
+						if j
+							it = j
+							cur = ret[1]
+							next
+						else
+							break
+						end
+					end
+				else
+					throw @label, [it.label, cur]
+				end
+			end
+			it
+		end
+	end
+	def expect expr = nil, &bl
+		if expr == true
+			expr = nil
+			cont = true
+		end
+		if !@eItems[-1].is_a? PararellItem
+			@eItems.push ExpectItem.new(self, expr, RandLabel.create, bl, binding_of_caller)
+			it = nil
+			entity = ->{
+				isFirst = true
+				@eItems.reverse_each do |eItem|
+					it = eItem.match isFirst
+					break if it
+					isFirst = false
+				end
+				if cont
+					it = true
+					cur = peek
+					self.next
+					bl.call cur
+				end
+			}
+			begin
+				if @eItems.size == 1
+					begin
+						while true
+							entity.call
+							self.next
+						end
+					rescue StopIteration
+					end
+				else
+					entity.call
+				end
+			ensure
+				@eItems.pop
+			end
+			it
+		else
+			@exprs[-1].add expr, RandLabel.create, bl, caller_binding
+		end
+	end
+	def pararell
+		@eItems.push PararellItem.new(self)
+		begin
+			yield
+			if @eItems.size == 1
+				begin
+					while true
+						match or self.next
+					end
+				rescue StopIteration
+				end
+			else
+				match
+			end
+		ensure
+			@eItems.pop
+		end
+	end
+	def else &bl
+		if @eItems[-1].is_a? PararellItem
+			@exprs[-1].add nil, RandLabel.create, bl, caller_binding
+		end
+	end
+end
+#(e = lines.to_enum).expect /.../ do |ln|
+#	e.expect /a/ do
+#
+#	end
+#	e.expect /b/ do
+#
+#
+#	end&.continue 5 do
+#
+#	end
+#	e.pararell do
+#		e.expect /c/ do
+#		end
+#		e.expect /d/ do
+#		end
+#		e.else do
+#		end
+#	end
+#end

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

@@ -0,0 +1,5 @@
+ENV['ERRLOG_FUNC'] = "1"
+require 'Yk/__stdlog'