tagen 1.1.7 → 2.0.0

data/lib/tagen/core/object.rb

@@ -1,21 +1,6 @@
-class Object
-	# default \#dup is shallow. 
-	#
-	# @example
-	# 	# dup
-	# 	a={a: { b: 1 }}
-	# 	a2 = a.dup
-	# 	a2[:a][:b] = 2
-	# 	p a  #=> {a: {b: 2} }
-	#
-	# 	# use deepdup
-	# 	a= {a: {b: 1 }}
-	# 	a2 = a.deepdup
-	# 	a2[:a][:b] = 2
-	# 	p a #=> {a: {b: 1}}
-	#
-	# @return [Object]
-	def deepdup
-		Marshal.load(Marshal.dump(self))
-	end
-end
+require "active_support/core_ext/object/blank"
+require "active_support/core_ext/object/inclusion"
+require "active_support/core_ext/object/try"
+#require "active_support/core_ext/object/deep_dup"
+require "active_support/core_ext/object/instance_variables"
+require "active_support/core_ext/object/duplicable"

data/lib/tagen/core/process.rb

@@ -1,11 +1,13 @@
+require "tagen/core/kernel/platform"
+
 module Process
-	# check if the pid's process is running. 
-	#
+	# Check if the pid's process is running. 
 	# @note for linux only
-	# @param [String, Integer] pid process id
+	#
+	# @param [Integer] pid process id
 	# @return [Boolean]
 	def self.exists?(pid)
-		raise NotImplementError unless linux?
+		raise NotImplementedError unless linux?
 		File.exists?("/proc/#{pid}")
 	end
 end

data/lib/tagen/core/re.rb

@@ -1,8 +1,8 @@
 class MatchData
-	# group-name regexp
+  # Returns a hash of named group matches.
+  #
 	# @return [Hash] {:name => "mathed-data"}
 	def to_hash
 		Hash[names.map(&:to_sym).zip(captures)]
 	end
 end
-

data/lib/tagen/core/string.rb

@@ -1,48 +1,13 @@
-class String 
-	@@didits = "0123456789" 
-	@@hexdigits = "01234567890ABCDEF" 
-	@@octdigits = "01234567" 
-	@@uppercase = "ABCDEFGHIJKLMNOPQRSTUVWXYZ" 
-	@@lowercase = "abcdefghijklmnopqrstuvwxyz"
-	@@letters = @@uppercase + @@lowercase 
-
-	class << self
-
-		# "0123456789"
-		#
-		# @return [String]
-		def digits; @@digits end
-
-		# "01234567890ABCDEF" 
-		#
-		# @return [String]
-		def hexdigits; @@hexdigits end
-
-		# "01234567" 
-		#
-		# @return [String]
-		def octdigits; @@octdigits end
-
-		# "ABCDEFGHIJKLMNOPQRSTUVWXYZ" 
-		#
-		# @return [String]
-		def uppercase; @@uppercase end
-
-		# "abcdefghijklmnopqrstuvwxyz"
-		#
-		# @return [String]
-		def lowercase; @@lowercase end
-
-		# "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
-		#
-		# @return [String]
-		def letters; @@letters end
-	end
-
-	# return ascii code
+class String
+	# Return first character's ascii code.
+  #
 	# @example
-	#   'a'.ascii #=> 97
-	def ascii() bytes.first end
-end # class String
-
-require_relative "string/pyformat"
+  #
+	#   'a'.ascii     -> 97
+  #
+	def ascii() 
+    bytes.first 
+  end
+end
+
+require "active_support/core_ext/string"

data/lib/tagen/core/time.rb

@@ -1,50 +1,42 @@
 class Time 
-	# return a float of time since linux epoch
+	# Return a float of time since linux epoch
 	#
-	#   #=> 1295953427.0005338
+  # @example
+  #
+	#   Time.time     -> 1295953427.0005338
 	#
 	# @return [Float] 
 	def self.time 
     now.to_f 
   end
+end
 
-  class Deta
-    class <<self
-      # @param [Time] from
-      # @param [Time] to
-      # @return [Time::Deta] deta
-      def deta(from, to)
-        seconds = (from-to).to_i
-        self.new(seconds)
-      end
-    end
-
-    attr_reader :years, :months, :days, :hours, :minutes, :seconds
-
-    def initialize(seconds)
-      deta = seconds
-      deta, @seconds = deta.divmod(60)
-      deta, @minutes = deta.divmod(60)
-      deta, @hours = deta.divmod(24)
-      deta, @days = deta.divmod(30)
-      @years, @months = deta.divmod(12)
-    end
-
-    def display(include_seconds=true)
-      ret = ""
-      ret << "#{years} years " unless years == 0
-      ret << "#{months} months " unless months == 0
-      ret << "#{days} days " unless days==0
-      ret << "#{hours} hours " unless hours == 0
-      ret << "#{minutes} minutes " unless minutes == 0
-      ret << "#{seconds} seconds" if include_seconds
+class Numeric
+  # Reports the approximate distance in time between two Time, Date or DateTime objects or integers as seconds.
+  #
+  # @example
+  #
+  #   1.time_humanize(true)    -> 1 seconds
+  #   36561906.time_humanize   -> 1 years 2 months 3 days 4 hours 5 minutes
+  #
+  def time_humanize(include_seconds=false)
+    deta = self
+    deta, seconds = deta.divmod(60)
+    deta, minutes = deta.divmod(60)
+    deta, hours = deta.divmod(24)
+    deta, days = deta.divmod(30)
+    years, months = deta.divmod(12)
 
-      ret
-    end
+    ret = ""
+    ret << "#{years} years " unless years == 0
+    ret << "#{months} months " unless months == 0
+    ret << "#{days} days " unless days == 0
+    ret << "#{hours} hours " unless hours == 0
+    ret << "#{minutes} minutes " unless minutes == 0
+    ret << "#{seconds} seconds" if include_seconds
 
-    # to [years, months, days, hours minutes seconds]
-    def to_a
-      [ years, months, days, hours, minutes, seconds ]
-    end
+    ret.rstrip
   end
 end
+
+require "active_support/time"

data/lib/tagen/erb.rb

@@ -1,25 +1,28 @@
-require 'erb'
+require "erb"
 
 class ERB
-	alias original_result result
-
 	# add locals support
+  #
+	# @param [Hash,OpenOption] locals
 	#
 	# @example
+  #
 	#  erb = Erb.new("<%=a%>")
 	#  erb.result(nil, a: 1) #=> "1"
 	#
-	# @param [Hash,OpenOption] locals
-	def result(bind=nil, locals={})
+	def result_with_tagen(bind=nil, locals={})
 		bind ||= TOPLEVEL_BINDING
 		if locals.empty?
-			original_result bind
+			result_without_tagen bind
 		else
 			result_with_locals bind, locals
 		end
 	end
 
-	private
+	alias result_without_tagen result
+  alias result result_with_tagen
+
+private
 	def result_with_locals(bind, locals)
 		@locals = locals
 		evalstr = <<-EOF
@@ -32,5 +35,4 @@ end
 		eval evalstr
 		run_erb
 	end
-
 end

data/lib/tagen/net/http.rb

@@ -1,34 +1,38 @@
+require "net/http"
+
 module Net
-class HTTP
-	class << self
+  class HTTP
+    class << self
 
-		# support params
-		# 
-		# @example
-		# 	get1("http://www.google.com/search", "&q=foo")
-		# 	get1("http://www.google.com/search", {"q" => "foo"} )
-		#
-		# @param [String Hash] params Hash by URI.encoding_www_form
-		def get1 path, params, initheader={}, &blk
-			path = path + "?" + (String===params ? params : URI.encode_www_form(params))
-      req = Get.new(path, initheader)
-			request req, &blk
-		end
+      # support params
+      #
+      # @param [String Hash] params Hash by URI.encoding_www_form
+      # 
+      # @example
+      #
+      # 	get1("http://www.google.com/search", "&q=foo")
+      # 	get1("http://www.google.com/search", {"q" => "foo"} )
+      #
+      def get1 path, params, initheader={}, &blk
+        path = path + "?" + (String===params ? params : URI.encode_www_form(params))
+        req = Get.new(path, initheader)
+        request req, &blk
+      end
 
-		# support params
-		#
-		# @see get1
-		def post1 path, params, initheader={}, &blk
-      req = Post.new(path, initheader)
-			if String===params
-				req.body = params
-				req.content_type = 'application/x-www-form-urlencoded'
-			else
-				req.set_form_data(params)
-			end
-			request req, &blk
-		end
+      # support params
+      #
+      # @see get1
+      def post1 path, params, initheader={}, &blk
+        req = Post.new(path, initheader)
+        if String===params
+          req.body = params
+          req.content_type = 'application/x-www-form-urlencoded'
+        else
+          req.set_form_data(params)
+        end
+        request req, &blk
+      end
 
-	end
-end
+    end
+  end
 end

data/lib/tagen/pathname.rb

@@ -1,9 +1,5 @@
 require "pathname"
-=begin
-Additional Methods List
------------------------
-* \#path _alias from to\_s_
-=end
+
 class Pathname
 	alias path to_s
 end

data/lib/tagen/rbconfig.rb

@@ -0,0 +1,8 @@
+require "rbconfig"
+
+module RbConfig
+  # short-cut method to CONFIG#[]
+  def self.[](key)
+    CONFIG[key]
+  end
+end

data/lib/tagen/socket.rb

@@ -63,18 +63,24 @@ class Socket
     # pack human-readable address to Socket address
     #
     # @example
+    #
     # 	addr("192.168.1.1") #=> "\xC0\xA8\x01\x01"
     #
     # @return [String] address used by Socket
     # @see unaddr
-    def addr(str) str.split(".").map{|v|v.to_i}.pack("CCCC") end
+    def addr(str) 
+      str.split(".").map{|v|v.to_i}.pack("CCCC") 
+    end
 
     # unpack to humna-readable address from  Socket address 
     #
     # @example
+    #
     # 	unaddr("\xC0\xA8\x01\x01") #=> "192.168.1.1"
     #
     # @return [String] human readable address
-    def unaddr(str) str.unpack("CCCC").join(".") end
+    def unaddr(str)
+      str.unpack("CCCC").join(".") 
+    end
   end
 end

data/lib/tagen/uri.rb

@@ -0,0 +1,9 @@
+require "uri"
+
+class URI::Generic
+  def to_hash
+    component.each.with_object({}) {|k, m|
+      m[k] = send(k)
+    }
+  end
+end

data/lib/tagen/version.rb

@@ -1,3 +1,3 @@
 module Tagen 
-  VERSION = "1.1.7"
+  VERSION = "2.0.0"
 end

data/lib/tagen/vim.rb

@@ -1,12 +1,12 @@
-=begin
-used by VimL(Vim Script)
-=end
+# used by VimL(Vim Script)
+#
 
-# in vim
-# 	print "guten" => guten\n
-#   print "guten\ntag" => guten\n
-# each_str.split("\n")
-def vimprint *args
+# @example
+#
+# 	vimprint "guten"          -> guten\n
+#   vimprint "guten\ntag"     -> guten\n
+#
+def vimprint(*args)
 	args.each do |arg|
 		arg = arg.to_s
 		arg.split("\n").each {|v| print v}

data/lib/tagen/xmpp4r.rb

@@ -1,35 +1,35 @@
 require "xmpp4r"
-require "tagen/xmpp4r/roster"
 
-# patch for https://github.com/ln/xmpp4r/issues/3#issuecomment-1739952
+# bugfix. support UTF-8 
+# patch from https://github.com/ln/xmpp4r/issues/3#issuecomment-1739952
 
 if RUBY_VERSION < "1.9"
 # ...
 else
-    # Encoding patch
-    require 'socket'
-    class TCPSocket
-        def external_encoding
-            Encoding::BINARY
-        end
+  # Encoding patch
+  require 'socket'
+  class TCPSocket
+    def external_encoding
+      Encoding::BINARY
     end
+  end
 
-    require 'rexml/source'
-    class REXML::IOSource
-        alias_method :encoding_assign, :encoding=
-        def encoding=(value)
-            encoding_assign(value) if value
-        end
+  require 'rexml/source'
+  class REXML::IOSource
+    alias_method :encoding_assign, :encoding=
+    def encoding=(value)
+        encoding_assign(value) if value
     end
+  end
 
-    begin
-        # OpenSSL is optional and can be missing
-        require 'openssl'
-        class OpenSSL::SSL::SSLSocket
-            def external_encoding
-                Encoding::BINARY
-            end
-        end
-    rescue
+  begin
+    # OpenSSL is optional and can be missing
+    require 'openssl'
+    class OpenSSL::SSL::SSLSocket
+      def external_encoding
+        Encoding::BINARY
+      end
     end
+  rescue
+  end
 end