ptomato-ramaze 2009.02

data/lib/ramaze/snippets/divide.rb

@@ -0,0 +1,22 @@
+#          Copyright (c) 2008 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+class String
+  # A convenient way to do File.join
+  # Usage:
+  #   'a' / 'b' # => 'a/b'
+  def / obj
+    Ramaze.deprecated('String#/', 'File::join')
+    File.join(self, obj.to_s)
+  end
+end
+
+class Symbol
+  # A convenient way to do File.join
+  # Usage:
+  #   :dir/:file # => 'dir/file'
+  def / obj
+    Ramaze.deprecated('Symbol#/', 'File::join(sym.to_s)')
+    self.to_s / obj
+  end
+end

data/lib/ramaze/snippets/fiber.rb

@@ -0,0 +1,63 @@
+unless defined? Fiber
+  require 'thread'
+
+  class FiberError < StandardError; end
+
+  class Fiber
+    def initialize
+      raise ArgumentError, 'new Fiber requires a block' unless block_given?
+
+      @yield = Queue.new
+      @resume = Queue.new
+
+      @thread = Thread.new{ @yield.push [*yield(*wait)] }
+      @thread.abort_on_exception = true
+      @thread[:fiber] = self
+    end
+    attr_reader :yield, :thread
+
+    def resume *args
+      raise FiberError, 'dead fiber called' unless @thread.alive?
+      @resume.push(args)
+      result = @yield.pop
+      result.size > 1 ? result : result.first
+    end
+
+    def wait
+      @resume.pop
+    end
+    
+    def self.yield *args
+      raise FiberError, "can't yield from root fiber" unless fiber = Thread.current[:fiber]
+      fiber.yield.push(args)
+      result = fiber.wait
+      result.size > 1 ? result : result.first
+    end
+
+    def inspect
+      "#<#{self.class}:0x#{self.object_id.to_s(16)}>"
+    end
+  end
+end
+
+if __FILE__ == $0
+  f = Fiber.new{ puts 'hi'; p Fiber.yield(1); puts 'bye'; :done }
+  p f.resume
+  p f.resume(2)
+end
+
+__END__
+
+$ ruby fbr.rb 
+hi
+1
+2
+bye
+:done
+
+$ ruby1.9 fbr.rb 
+hi
+1
+2
+bye
+:done

data/lib/ramaze/snippets/kernel/constant.rb

@@ -0,0 +1,41 @@
+#          Copyright (c) 2008 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+module Ramaze
+  module CoreExtensions
+
+    # Extensions for Kernel
+
+    module Object
+
+      # Original from Trans (Facets 1.4.5)
+      # This is similar to +Module#const_get+ but is accessible at all levels,
+      # and, unlike +const_get+, can handle module hierarchy.
+      #
+      #   constant("Fixnum")                  # -> Fixnum
+      #   constant(:Fixnum)                   # -> Fixnum
+      #
+      #   constant("Process::Sys")            # -> Process::Sys
+      #   constant("Regexp::MULTILINE")       # -> 4
+      #
+      #   require 'test/unit'
+      #   Test.constant("Unit::Assertions")   # -> Test::Unit::Assertions
+      #   Test.constant("::Test::Unit")       # -> Test::Unit
+
+      def constant(const)
+        const = const.to_s.dup
+
+        if const.sub!(/^::/, '')
+          base = Object
+        elsif self.kind_of?(Module)
+          base = self
+        else
+          base = self.class
+        end
+
+        const.split(/::/).inject(base){ |mod, name| mod.const_get(name) }
+      end
+    end
+
+  end
+end

data/lib/ramaze/snippets/kernel/pretty_inspect.rb

@@ -0,0 +1,21 @@
+#          Copyright (c) 2008 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+require 'pp'
+
+module Ramaze
+  module CoreExtensions
+
+    # Extensions for Kernel
+
+    module Kernel
+      unless defined?(pretty_inspect)
+        # returns a pretty printed object as a string.
+        def pretty_inspect
+          PP.pp(self, '')
+        end
+      end
+    end
+
+  end
+end

data/lib/ramaze/snippets/metaid.rb

@@ -0,0 +1,17 @@
+# from http://whytheluckystiff.net/articles/seeingMetaclassesClearly.html
+
+class Object
+  # The hidden singleton lurks behind everyone
+  def metaclass; class << self; self; end; end
+  def meta_eval &blk; metaclass.instance_eval(&blk); end
+
+  # Adds methods to a metaclass
+  def meta_def name, &blk
+    meta_eval { define_method name, &blk }
+  end
+
+  # Defines an instance method within a class
+  def class_def name, &blk
+    class_eval { define_method name, &blk }
+  end
+end

data/lib/ramaze/snippets/numeric/filesize_format.rb

@@ -0,0 +1,32 @@
+#          Copyright (c) 2008 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+module Ramaze
+  module CoreExtensions
+
+    # Extensions for Numeric
+    module Numeric
+      FILESIZE_FORMAT = [
+        ['%.1fT', 1 << 40],
+        ['%.1fG', 1 << 30],
+        ['%.1fM', 1 << 20],
+        ['%.1fK', 1 << 10],
+      ]
+
+      # Output this number as easily readable filesize.
+      # Usage:
+      #   100_000.filesize_format             # => "97.7K"
+      #   100_000_000.filesize_format         # => "95.4M"
+      #   100_000_000_000.filesize_format     # => "93.1G"
+      #   100_000_000_000_000.filesize_format # => "90.9T"
+      def filesize_format
+        FILESIZE_FORMAT.each do |format, size|
+          return format % (self.to_f / size) if self >= size
+        end
+
+        self.to_s
+      end
+    end
+
+  end
+end

data/lib/ramaze/snippets/numeric/time.rb

@@ -0,0 +1,63 @@
+module Ramaze
+  module CoreExtensions
+
+    # Extensions for Numeric
+
+    module Numeric
+      def seconds
+        self
+      end
+      alias second seconds
+
+      # 60 seconds in a minute
+      def minutes
+        self * 60
+      end
+      alias minute minutes
+
+      # 60 minutes in an hour
+      def hours
+        self * 3600
+      end
+      alias hour hours
+
+      # 24 hours in a day
+      def days
+        self * 86400
+      end
+      alias day days
+
+      # 7 days in a week
+      def weeks
+        self * 604800
+      end
+      alias week weeks
+
+      # 30 days in a month
+      def months
+        self * 2592000
+      end
+      alias month months
+
+      # 365.25 days in a year
+      def years
+        self * 31557600
+      end
+      alias year years
+
+      # Time in the past, i.e. 3.days.ago
+      def ago t = Time.now
+        t - self
+      end
+      alias before ago
+
+      # Time in the future, i.e. 3.days.from_now
+      def from_now t = Time.now
+        t + self
+      end
+      alias since from_now
+
+    end
+
+  end
+end

data/lib/ramaze/snippets/object/__dir__.rb

@@ -0,0 +1,29 @@
+#          Copyright (c) 2008 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+module Ramaze
+  module CoreExtensions
+
+    # Extensions for Object
+
+    module Object
+      unless defined?(__DIR__)
+
+        # This is similar to +__FILE__+ and +__LINE__+, and returns a String
+        # representing the directory of the current file is.
+        # Unlike +__FILE__+ the path returned is absolute.
+        #
+        # This method is convenience for the
+        #  File.expand_path(File.dirname(__FILE__))
+        # idiom.
+
+        def __DIR__(*args)
+          filename = caller[0][/^(.*):/, 1]
+          dir = File.expand_path(File.dirname(filename))
+          ::File.expand_path(::File.join(dir, *args.map{|a| a.to_s}))
+        end
+      end
+    end
+
+  end
+end

data/lib/ramaze/snippets/object/acquire.rb

@@ -0,0 +1,37 @@
+#          Copyright (c) 2008 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+module Ramaze
+  module CoreExtensions
+
+    # Extensions for Kernel
+
+    module Object
+
+      # Require all .rb and .so files on the given globs, utilizes Dir::[].
+      #
+      # Examples:
+      #   # Given following directory structure:
+      #   # src/foo.rb
+      #   # src/bar.so
+      #   # src/foo.yaml
+      #   # src/foobar/baz.rb
+      #   # src/foobar/README
+      #
+      #   # requires all files in 'src':
+      #   acquire 'src/*'
+      #
+      #   # requires all files in 'src' recursive:
+      #   acquire 'src/**/*'
+      #
+      #   # require 'src/foo.rb' and 'src/bar.so' and 'src/foobar/baz.rb'
+      #   acquire 'src/*', 'src/foobar/*'
+
+      def acquire(*globs)
+        Ramaze.deprecated('Object#acquire', 'Ramaze::acquire')
+        Ramaze.acquire(*globs)
+      end
+    end
+
+  end
+end

data/lib/ramaze/snippets/object/instance_variable_defined.rb

@@ -0,0 +1,19 @@
+#          Copyright (c) 2008 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+module Ramaze
+  module CoreExtensions
+
+    # Extensions for Object
+    module Object
+      # Available in 1.8.6 and later.
+
+      unless ::Object.method_defined?(:instance_variable_defined?)
+        def instance_variable_defined?(variable)
+          instance_variables.include?(variable.to_s)
+        end
+      end
+    end
+
+  end
+end

data/lib/ramaze/snippets/object/pretty.rb

@@ -0,0 +1,16 @@
+module Ramaze
+  module CoreExtensions
+
+    # Extensions for Object
+    module Object
+
+      # Returns the string that #pretty_inspect would yield
+
+      def pretty s = ''
+        PP.pp(self, s)
+        s
+      end
+    end
+
+  end
+end

data/lib/ramaze/snippets/object/scope.rb

@@ -0,0 +1,18 @@
+module Ramaze
+  module CoreExtensions
+
+    # Extensions for Object
+    module Object
+
+      # returns a new clean binding for this object
+      #   usage: eval 'self', object.scope  #=> returns object
+      #
+
+      def scope
+        lambda{}
+      end
+
+    end
+
+  end
+end

data/lib/ramaze/snippets/object/traits.rb

@@ -0,0 +1,76 @@
+#          Copyright (c) 2008 Michael Fellinger m.fellinger@gmail.com
+# All files in this distribution are subject to the terms of the Ruby license.
+
+Traits = Hash.new{|h,k| h[k] = {}} unless defined?(Traits)
+
+# Extensions for Object
+
+class Object
+
+  # Adds a method to Object to annotate your objects with certain traits.
+  # It's basically a simple Hash that takes the current object as key
+  #
+  # Example:
+  #
+  #   class Foo
+  #     trait :instance => false
+  #
+  #     def initialize
+  #       trait :instance => true
+  #     end
+  #   end
+  #
+  #   Foo.trait[:instance]
+  #   # false
+  #
+  #   foo = Foo.new
+  #   foo.trait[:instance]
+  #   # true
+
+  def trait hash = nil
+    if hash
+      Traits[self].merge! hash
+    else
+      Traits[self]
+    end
+  end
+
+  # builds a trait from all the ancestors, closer ancestors
+  # overwrite distant ancestors
+  #
+  # class Foo
+  #   trait :one => :eins
+  #   trait :first => :erstes
+  # end
+  #
+  # class Bar < Foo
+  #   trait :two => :zwei
+  # end
+  #
+  # class Foobar < Bar
+  #   trait :three => :drei
+  #   trait :first => :overwritten
+  # end
+  #
+  # Foobar.ancestral_trait
+  # {:three=>:drei, :two=>:zwei, :one=>:eins, :first=>:overwritten}
+
+  def ancestral_trait
+    if respond_to?(:ancestors)
+      ancs = ancestors
+    else
+      ancs = self.class.ancestors
+    end
+    ancs.reverse.inject({}){|s,v| s.merge(v.trait)}.merge(trait)
+  end
+
+  # trait for self.class
+
+  def class_trait
+    if respond_to?(:ancestors)
+      trait
+    else
+      self.class.trait
+    end
+  end
+end