mack-facets 0.8.2 → 0.8.3

data/lib/gems/facets-2.4.5/lib/more/facets/attr.rb

@@ -1,208 +0,0 @@
-class Module
-
-  # Like attr_writer, but the writer method validates the
-  # setting against the given block.
-  #
-  #   CREDIT: ?
-
-  def attr_validator(*symbols, &validator)
-    made = []
-    symbols.each do |symbol|
-      define_method "#{symbol}=" do |val|
-        unless validator.call(val)
-          raise ArgumentError, "Invalid value provided for #{symbol}"
-        end
-        instance_variable_set("@#{symbol}", val)
-      end
-      made << "#{symbol}=".to_sym
-    end
-    made
-  end
-
-  # Create aliases for validators.
-
-  def alias_validator(*args)
-    orig = args.last
-    args = args - [orig]
-    args.each do |name|
-      #alias_method(name, orig)
-      alias_method("#{name}=", "#{orig}=")
-    end
-  end
-
-  # TODO Perhaps need to make a check against overriding annotated version.
-
-  # Create an attribute method for both getting
-  # and setting an instance variable.
-  #
-  #   attr_setter :a
-  #
-  # _is equivalent to_
-  #
-  #   def a(*args)
-  #     if args.size > 0
-  #       @a = args[0]
-  #       self
-  #     else
-  #       @a
-  #     end
-  #   end
-  #
-  #  CREDIT: Trans
-
-  def attr_setter(*args)
-    code, made = '', []
-    args.each do |a|
-      code << %{
-        def #{a}(*args)
-          args.size > 0 ? ( @#{a}=args[0] ; self ) : @#{a}
-        end
-      }
-      made << "#{a}".to_sym
-    end
-    module_eval code
-    made
-  end
-
-  # Alias an accessor. This create an alias for
-  # both a reader and a writer.
-  #
-  #   class X
-  #     attr_accessor :a
-  #     alias_accessor :b, :a
-  #   end
-  #
-  #   x = X.new
-  #   x.b = 1
-  #   x.a        #=> 1
-  #
-  #  CREDIT: Trans
-
-  def alias_setter(*args)
-    args = args - [orig]
-    args.each do |name|
-      alias_method(name, orig)
-    end
-  end
-
-  # Create a toggle attribute. This creates two methods for
-  # each given name. One is a form of tester and the other
-  # is used to toggle the value.
-  #
-  #   attr_accessor! :a
-  #
-  # is equivalent to
-  #
-  #   def a?
-  #     @a
-  #   end
-  #
-  #   def a!(value=true)
-  #     @a = value
-  #     self
-  #   end
-  #
-  #  CREDIT: Trans
-
-  def attr_accessor!(*args)
-    attr_reader!(*args) + attr_writer!(*args)
-  end
-  alias_method :attr_switcher, :attr_accessor!
-  alias_method :attr_toggler,  :attr_accessor!
-
-  # Create aliases for flag accessors.
-  #
-  #  CREDIT: Trans
-
-  def alias_accessor!(*args)
-    orig = args.last
-    args = args - [orig]
-    args.each do |name|
-      alias_method("#{name}?", "#{orig}?")
-      alias_method("#{name}!", "#{orig}!")
-    end
-  end
-  alias_method :alias_switcher, :alias_accessor!
-  alias_method :alias_toggler,  :alias_accessor!
-
-  # Create an tester attribute. This creates a single method
-  # used to test the attribute for truth.
-  #
-  #   attr_reader! :a
-  #
-  # is equivalent to
-  #
-  #   def a?
-  #     @a ? true : @a
-  #   end
-
-  def attr_reader!(*args)
-    code, made = '', []
-    args.each do |a|
-      code << %{
-        def #{a}?(truth=nil)
-          @#{a} ? truth || @#{a} : @#{a}
-        end
-      }
-      made << "#{a}?".to_sym
-    end
-    module_eval code
-    made
-  end
-  alias_method :attr_reader?, :attr_reader!
-  alias_method :attr_tester, :attr_reader!
-
-  # Create aliases for flag reader.
-  #
-  #  CREDIT: Trans
-
-  def alias_reader!(*args)
-    orig = args.last
-    args = args - [orig]
-    args.each do |name|
-      alias_method("#{name}?", "#{orig}?")
-    end
-  end
-  alias_method :alias_reader?, :alias_reader!
-  alias_method :alias_tester, :alias_reader!
-
-  # Create a flaggable attribute. This creates a single methods
-  # used to set an attribute to "true".
-  #
-  #   attr_writer! :a
-  #
-  # is equivalent to
-  #
-  #   def a!(value=true)
-  #     @a = value
-  #     self
-  #   end
-
-  def attr_writer!(*args)
-    code, made = '', []
-    args.each do |a|
-      code << %{
-        def #{a}!(value=true)
-          @#{a} = value
-          self
-        end
-      }
-      made << "#{a}!".to_sym
-    end
-    module_eval code
-    made
-  end
-
-  # Create aliases for flag writer.
-  #
-  #  CREDIT: Trans
-
-  def alias_writer!(*args)
-    orig = args.last
-    args = args - [orig]
-    args.each do |name|
-      alias_method("#{name}!", "#{orig}!")
-    end
-  end
-
-end

data/lib/gems/facets-2.4.5/lib/more/facets/autoarray.rb

@@ -1,62 +0,0 @@
-# = AutoArray
-#
-# An Array that automatically expands dimensions as needed.
-#
-#   a  = Autoarray.new
-#   a[1][2][3] = 12
-#   a             #=> [nil, [nil, nil, [nil, nil, nil, 12]]]
-#   a[2][3][4]    #=> []
-#   a             #=> [nil, [nil, nil, [nil, nil, nil, 12]]]
-#   a[1][-2][1] = "Negative"
-#   a             #=> [nil, [nil, [nil, "Negative"], [nil, nil, nil, 12]]]
-#
-# == Authors
-#
-# * Brian Schröder
-#
-# == License
-#
-#   Copyright (c) 2005 Brian Schröder
-#
-#   Ruby License
-#
-#   This module is free software. You may use, modify, and/or redistribute this
-#   software under the same terms as Ruby.
-#
-#   This program is distributed in the hope that it will be useful, but WITHOUT
-#   ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
-#   FOR A PARTICULAR PURPOSE.
-
-# = AutoArray
-#
-# An Array that automatically expands dimensions as needed.
-#
-#   a  = Autoarray.new
-#   a[1][2][3] = 12
-#   a             #=> [nil, [nil, nil, [nil, nil, nil, 12]]]
-#   a[2][3][4]    #=> []
-#   a             #=> [nil, [nil, nil, [nil, nil, nil, 12]]]
-#   a[1][-2][1] = "Negative"
-#   a             #=> [nil, [nil, [nil, "Negative"], [nil, nil, nil, 12]]]
-#
-class Autoarray < Array
-
-  def initialize(size=0, default=nil, update = nil, update_index = nil)
-    super(size, default)
-    @update, @update_index = update, update_index
-  end
-
-  def [](k)
-    if -self.length+1 < k and k < self.length
-      super(k)
-    else
-      Autoarray.new(0, nil, self, k)
-    end
-  end
-
-  def []=(k, v)
-    @update[@update_index] = self if @update and @update_index
-    super
-  end
-
-end

data/lib/gems/facets-2.4.5/lib/more/facets/autoreload.rb

@@ -1,150 +0,0 @@
-# = Autoreload
-#
-# Autoreload feature files.
-#
-# Automatically reload, at regular intervals, any previously loaded features,
-# and/or other files not already loaded, if they have been modified since the last
-# interval check. A numeric parameter sets the reload interval in seconds
-# and the file parameter can either be a glob string or an array
-# of file paths. If a glob string, it is expanded only once on the initial
-# method call. Supplying a boolean parameter of 'false' will force autreload to
-# skip previously loaded features and only reload the specified files.
-# Also keeps a "dirty" flag.
-#
-# == Authors
-#
-#   - Michael Neumann
-#   - George Moschovitis
-#
-# == TODO
-#
-# * Create tests for autoreload.
-#
-# == Copying
-#
-# Copyright (c) 2003 Michael Neumann
-#
-# Ruby License
-#
-# This module is free software. You may use, modify, and/or redistribute this
-# software under the same terms as Ruby.
-#
-# This program is distributed in the hope that it will be useful, but WITHOUT
-# ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
-# FOR A PARTICULAR PURPOSE.
-
-#
-module Kernel
-
-  # Autoreload feature files.
-  #
-  # Automatically reload, at regular intervals, any previously loaded features,
-  # and/or other files not already loaded, if they have been modified since the last
-  # interval check. A numeric parameter sets the reload interval in seconds
-  # and the file parameter can either be a glob string or an array
-  # of file paths. If a glob string, it is expanded only once on the initial
-  # method call. Supplying a boolean parameter of 'false' will force autreload to
-  # skip previously loaded features and only reload the specified files.
-  # Also keeps a "dirty" flag.
-
-  def autoreload( *args )
-
-    check_interval=10
-    include_features = true
-    files = nil
-
-    args.each do |arg|
-      case arg
-      when Numeric
-        check_interval = arg
-      when String
-        files = Dir.glob( arg )
-      when Array
-        files = arg
-      when TrueClass, FalseClass
-        include_features = arg
-      end
-    end
-
-    file_mtime = {}
-
-    Thread.new(Time.now) do |start_time|
-      loop do
-        sleep check_interval
-
-        if include_features
-          feature_files = $LOADED_FEATURES.collect { |feature|
-            $LOAD_PATH.each { |lp| file = File.join(lp, feature) }
-          }.flatten
-
-          feature_files.each { |file|
-            if File.exists?(file) and (mtime = File.stat(file).mtime) > (file_mtime[file] || start_time)
-              $autoreload_dirty = true
-              file_mtime[file] = mtime
-              STDERR.puts "File '#{ file }' reloaded"
-              begin
-                load(file)
-              rescue Exception => e
-                STDERR.puts e.inspect
-              end
-            end
-          }
-        end
-
-        if files
-          files.each do |file|
-            if File.exists?(file) and (mtime = File.stat(file).mtime) > (file_mtime[file] || start_time)
-              $autoreload_dirty = true
-              file_mtime[file] = mtime
-              STDERR.puts "File '#{ file }' changed"
-            end
-          end
-        end
-
-      end
-    end
-
-  end
-
-  # Same as #autoreload, but does not include previously loaded features.
-  # This is equivalent to as adding a 'false' parameter to #autoreload.
-  #
-  def autoreload_files( *args )
-    autoreload( false, *args )
-  end
-
-  # deprecate
-  #def autoreload_glob(*args)
-  #  warn "autoreload_glob will be deprecated. Use autoreload_files instead."
-  #  autoreload_files(*args)
-  #end
-
-end
-
-#--
-#   # OLD VERSION
-#   def autoreload(check_interval=10)
-#     Thread.new(Time.now) { |start_time|
-#       file_mtime = {}
-#       loop {
-#         sleep check_interval
-#         $LOADED_FEATURES.each { |feature|
-#           $LOAD_PATH.each { |lp|
-#             file = File.join(lp, feature)
-#             if (File.exists?(file) and
-#               File.stat(file).mtime > (file_mtime[file] || start_time))
-#               file_mtime[file] = File.stat(file).mtime
-#               STDERR.puts "reload #{ file }"
-#               begin
-#                 load(file)
-#               rescue Exception => e
-#                 STDERR.puts e.inspect
-#               end
-#             end
-#           }
-#         }
-#       }
-#     }
-#   end
-#++
-

data/lib/gems/facets-2.4.5/lib/more/facets/basex.rb

@@ -1,37 +0,0 @@
-class BaseX
-
-  BASE62 = ["0".."9", "a".."z", "A".."Z"].map { |r| r.to_a }.flatten
-
-  attr :chars, :base, :values
-
-  def initialize(chars=BASE62)
-    @chars  = chars
-    @base   = @chars.size
-    @values = Hash[*(0...@base).map { |i| [ @chars[i], i ] }.flatten]
-  end
-
-  def encode(byte_string)
-    convert_base(byte_string.unpack("C*"), 256, @base).map { |d|
-      @chars[d]
-    }.join('')
-  end
-
-  def decode(encoded)
-    convert_base(encoded.split('').map { |c|
-      @values[c]
-    }, @base, 256).pack("C*")
-  end
-
-  def convert_base(digits, from_base, to_base)
-    bignum = 0
-    digits.each { |digit| bignum = bignum * from_base + digit }
-    converted = []
-    until bignum.zero?
-      bignum, digit = bignum.divmod to_base
-      converted.push digit
-    end
-    converted.reverse
-  end
-
-end
-