facets 0.9.0 → 1.0.0

data/lib/mega/lru_cache.rb

@@ -1,184 +0,0 @@
-#--
-# LRUCache
-#
-# Copyright (c) 2004-2005 Navel
-#
-# 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.
-#
-#
-# ============================================================================
-# Revision History ::
-# ----------------------------------------------------------------------------
-#  2005.05.10  0.1   Trans   * Added to Facets
-# ============================================================================
-#++
-
-# :title: Least Recently Used Cache
-#
-# A cache utilizing a simple LRU (Least Recently Used) policy.
-# The items managed by this cache must respond to the #key method.
-# Attempts to optimize reads rather than inserts!
-#
-# LRU semantics are enforced by inserting the items in a queue.
-# The lru item is always at the tail. Two special sentinels
-# (head, tail) are used to simplify (?) the code.
-#
-# == Usage
-#
-#   TODO: If you have an example of using this, please submit. -T
-#
-# == Author(s)
-#
-# * George Moschovitis  <gm@navel.gr>
-# * Anastasios Koutoumanos  <ak@navel.gr>
-#
-
-class LRUCache < Hash
-
-  # Mix this in your class to make LRU-managable.
-
-  module Item
-    attr_accessor :lru_key, :lru_prev, :lru_next
-  end
-
-  # head-tail sentinels
-
-  class Sentinel; include Item; end
-
-  # the maximum number of items in the cache.
-
-  attr_accessor :max_items
-
-  # the head sentinel and the tail sentinel, tail.prev points to the lru item.
-
-  attr_reader :head, :tail
-
-  def initialize(max_items)
-    @max_items = max_items
-    lru_clear()
-  end
-
-  # Lookup an item in the cache.
-
-  def [](key)
-    if item = super
-      return lru_touch(item)
-    end
-  end
-
-  # The inserted item is considered mru!
-
-  def []=(key, item)
-    item = super
-    item.lru_key = key
-    lru_insert(item)
-  end
-
-  # Delete an item from the cache.
-
-  def delete(key)
-    if item = super
-      lru_delete(item)
-    end
-  end
-
-  # Clear the cache.
-
-  def clear
-    super
-    lru_clear()
-  end
-
-  # The first (mru) element in the cache.
-
-  def first
-    @head.lru_next
-  end
-
-  # The last (lru) element in the cache.
-
-  def last
-    @tail.lru_prev
-  end
-  alias_method :lru, :last
-
-  private
-
-  # Delete an item from the lru list.
-
-  def lru_delete(item)
-    lru_join(item.lru_prev, item.lru_next)
-    return item
-  end
-
-  # Join two items in the lru list.
-  # Return y to allow for chaining.
-
-  def lru_join(x, y)
-    x.lru_next = y
-    y.lru_prev = x
-    return y
-  end
-
-  # Append a child item to a parent item in the lru list
-  # (Re)inserts the child in the list.
-
-  def lru_append(parent, child)
-    lru_join(child, parent.lru_next)
-    lru_join(parent, child)
-  end
-
-  # Insert an item
-
-  def lru_insert(item)
-    delete(last.lru_key) if size() > @max_items
-    lru_append(@head, item)
-  end
-
-  # Touch an item, make mru!
-  # Returns the item.
-
-  def lru_touch(item)
-    lru_append(@head, lru_delete(item))
-  end
-
-  # Clear the lru.
-
-  def lru_clear
-    @head = Sentinel.new
-    @tail = Sentinel.new
-    lru_join(@head, @tail)
-  end
-
-end
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-
-# TODO
-
-=begin testing
-
-  require 'test/unit'
-
-  class TC_LRUCache < Test::Unit::TestCase
-
-    def test_01
-    end
-
-  end
-
-=end

data/lib/mega/mock.rb

@@ -1,224 +0,0 @@
-#--
-# Mock
-#
-# Copyright (c) 2005 Thomas Sawyer, Michael Granger and George Moschovitis
-#
-# 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.
-#
-#
-# ==========================================================================
-# Revision History ::
-# --------------------------------------------------------------------------
-#  0.5.8.24  trans  Created, based-off of George's initial Mock idea, and
-#                   largely influence by Michael Granger's Test::Unit::Mock.
-# ==========================================================================
-#
-#++
-
-require 'ostruct'
-
-#:title: Mock
-#
-# A straightfoward mocking facility. Typically used in test cases.
-# The Mock class offers a few constructors fro quickly building
-# mockups.
-#
-#   mock - Returns a static reponse.
-#   echo - Returns the arguments passed-in.
-#   spin - Returns a rotation of reponses.
-#   keys - Returns an index of responses.
-#
-# Mock classes can be built from sratch or partially framed
-# against other classes.
-#
-# === Usage
-#
-#   class ContextMock < Mock
-#     mock :response_headers, {}
-#     spin :host_url, ['http://www.nitrohq.com','http://www.rubyforge.com']
-#   end
-#
-#   ctx = ContextMock.new
-#   ctx.response_headers['location'] = url
-#   ctx.host_url   #=> "http://www.nitrohq.com"
-#   ctx.host_url   #=> "http://www.rubyforge.com"
-#
-# Or
-#
-#   class ContextMock < Mock(Context)
-#     ...
-#   end
-#
-class Mock < OpenStruct
-
-  # include these?
-  #include Test::Unit::Assertions
-
-  # Certain methods are not mocked:
-  #   inspect       (tricky)
-  #   class         (delegated)
-  #   kind_of?      (delegated)
-  #   is_a?         (delegated)
-  #   instance_of?  (delegated)
-  #   method        (works as-is)
-  #   send          (works as-is)
-  #   respond_to?   (works as-is)
-  #   hash          (no way to mock)
-  #
-  #   __id__, __call__, etc. (not meant to be mocked, ever!)
-  #
-  UnmockedMethods = %r{^(
-    |inspect
-    |kind_of\?|is_a\?|instance_of\?|class
-    |method|send|respond_to\?
-    |hash
-    |__
-  )}x
-
-  class << self
-
-    attr :mocked_class
-
-    def mocks
-      self.methods(false)
-    end
-
-    # Mock a static repsonse.
-    def mock( sym, val )
-      define_method( sym ) { |*args| val }
-    end
-
-    # Responds with input.
-    def echo( sym )
-      define_method( sym ) { |*args| args }
-    end
-
-    # Reponds with a rotation of reponses.
-    def spin( sym, arr )
-      define_method( sym ) { |*args| arr.push(arr.shift) ; arr[-1] }
-    end
-
-    # Responds according to a mapping of input parameters.
-    def keys( sym, hsh )
-      define_method( sym ) { |*args| hsh[args] }
-    end
-
-  end
-
-  # Delegate methods: #class, instance_of?, kind_of?, and is_a?
-  alias :__class :class
-  def class # :nodoc:
-    return __class.mocked_class
-  end
-  def instance_of?( klass ) # :nodoc:
-    self.class == klass
-  end
-  def kind_of?( klass ) # :nodoc:
-    self.class <= klass
-  end
-  alias_method :is_a?, :kind_of?
-
-end
-
-
-# Factory method for creating semi-functional mock objects given the
-# class which is to be mocked. It looks like a constant for purposes
-# of syntactic sugar.
-def Mock( realclass )
-
-  mockclass = Class.new( Mock )
-
-  mockclass.instance_eval do @mocked_class = realclass end
-
-  # Provide an accessor to class instance var that holds the class
-  # object we're faking
-  class << mockclass
-    # The actual class being mocked
-    attr_reader :mocked_class
-
-    # Propagate the mocked class ivar to derivatives so it can be
-    # called like:
-    #   class MockFoo < Mock( RealClass )
-    def inherited( subclass )
-      mc = self.mockedClass
-      subclass.instance_eval do @mocked_class = mc end
-    end
-  end
-
-  # Build method definitions for all the mocked class's instance
-  # methods, as well as those given to it by its superclasses, since
-  # we're not really inheriting from it.
-  imethods = realclass.instance_methods(true).collect do |name|
-    next if name =~ ::Mock::UnmockedMethods
-
-    # Figure out the argument list
-    arity = realclass.instance_method( name ).arity
-    optargs = false
-
-    if arity < 0
-      optargs = true
-      arity = (arity+1).abs
-    end
-
-    args = []
-    arity.times do |n| args << "arg#{n+1}" end
-    args << "*optargs" if optargs
-
-    # Build a method definition. Some methods need special
-    # declarations.
-    argsj = args.join(',')
-    case name.intern
-    when :initialize
-      "def initialize(#{argsj}) ; super ; end"
-    else
-      "def #{name}(#{argsj}) ; self.send(#{name},#{argsj}) ; end"
-      #"def %s( %s ) ; self.__mockRegisterCall(%s) ; end" %
-      #  [ name, argstr, [":#{name}", *args].join(',') ]
-    end
-  end
-
-  # Now add the instance methods to the mockclass class
-  mockclass.class_eval imethods.join( "\n" )
-
-  return mockclass
-end
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-
-=begin testing
-
-  class MyMock < Mock
-    mock :m, 10
-    echo :e
-    spin :s, [1,2,3]
-    keys :i, { [:foo] => 'Hello', [:boo] => 'Frog' }
-
-    def a(k) k+1 end
-  end
-
-  my = MyMock.new
-
-  p my.m
-  p my.e('hi')
-  p my.s
-  p my.s
-  p my.s
-  p my.i(:foo)
-  p my.i(:boo)
-  p my.a(1)
-
-=end

data/lib/mega/multiplier.rb

@@ -1,180 +0,0 @@
-#--
-# multipliers.rb
-#
-# Copyright (c) 2005 Thomas Sawyer
-#
-# 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.
-#
-# ==========================================================================
-# Revision History ::
-# --------------------------------------------------------------------------
-#  2005.08.10  trans   * Created, inspired by Rich Kilmer's bytes.rb.
-# ==========================================================================
-#++
-
-#:title: Multipliers
-#
-# Adds methods to Numeric to make working with
-# magnitudes (kilo, mega, giga, milli, micro, etc.)
-# as well as bits and bytes easier.
-#
-#   1.kilo               #=> 1000
-#   1.milli              #=> 0.001
-#   1.kibi               #=> 1024
-#
-module Numeric::Multipliers
-
-  # SI Multipliers
-  def deka  ; self * 10 ; end
-  def hecto ; self * 100 ; end
-  def kilo  ; self * 1000 ; end
-  def mega  ; self * 1000000 ; end
-  def giga  ; self * 1000000000 ; end
-  def tera  ; self * 1000000000000 ; end
-  def peta  ; self * 1000000000000000 ; end
-  def exa   ; self * 1000000000000000000 ; end
-
-  # The little guys ;-)
-  def deci  ; self.to_f / 10 ; end
-  def centi ; self.to_f / 100 ; end
-  def milli ; self.to_f / 1000 ; end
-  def micro ; self.to_f / 1000000 ; end
-  def nano  ; self.to_f / 1000000000 ; end
-  def pico  ; self.to_f / 1000000000000 ; end
-  def femto ; self.to_f / 1000000000000000 ; end
-  def atto  ; self.to_f / 1000000000000000000 ; end
-
-  # SI Binary
-  def kibi ; self * 1024 ; end
-  def mebi ; self * 1024**2 ; end
-  def gibi ; self * 1024**3 ; end
-  def tebi ; self * 1024**4 ; end
-  def pebi ; self * 1024**5 ; end
-  def exbi ; self * 1024**6 ; end
-
-end
-
-#--
-class Numeric
-  include Multipliers
-end
-#++
-
-
-
-#  _____         _
-# |_   _|__  ___| |_
-#   | |/ _ \/ __| __|
-#   | |  __/\__ \ |_
-#   |_|\___||___/\__|
-#
-
-=begin testing
-
-  require 'test/unit'
-
-  class TC_Multipliers < Test::Unit::TestCase
-
-    def test_deka
-      assert_equal( 10, 1.deka )
-    end
-
-    def test_hecto
-      assert_equal( 100, 1.hecto )
-    end
-
-    def test_kilo
-      assert_equal( 1000, 1.kilo )
-    end
-
-    def test_mega
-      assert_equal( 1000000, 1.mega )
-    end
-
-    def test_giga
-      assert_equal( 1000000000, 1.giga )
-    end
-
-    def test_tera
-      assert_equal( 1000000000000, 1.tera )
-    end
-
-    def test_peta
-      assert_equal( 1000000000000000, 1.peta )
-    end
-
-    def test_exa
-      assert_equal( 1000000000000000000, 1.exa )
-    end
-
-    # Fractional
-
-    def test_deci
-      assert_equal( 0.1, 1.deci )
-    end
-
-    def test_centi
-      assert_equal( 0.01, 1.centi )
-    end
-
-    def test_milli
-      assert_equal( 0.001, 1.milli )
-    end
-
-    def test_milli
-      assert_equal( 0.000001, 1.micro )
-    end
-
-    def test_nano
-      assert_equal( 0.000000001, 1.nano )
-    end
-
-    def test_pico
-      assert_equal( 0.000000000001, 1.pico )
-    end
-
-    def test_femto
-      assert_equal( 0.000000000000001, 1.femto )
-    end
-
-    def test_atto
-      assert_equal( 0.000000000000000001, 1.atto )
-    end
-
-    # SI Binary
-
-    def test_kibi
-      assert_equal( 1024, 1.kibi )
-    end
-
-    def test_mebi
-      assert_equal( 1024**2, 1.mebi )
-    end
-
-    def test_gibi
-      assert_equal( 1024**3, 1.gibi )
-    end
-
-    def test_tebi
-      assert_equal( 1024**4, 1.tebi )
-    end
-
-    def test_pebi
-      assert_equal( 1024**5, 1.pebi )
-    end
-
-    def test_exbi
-      assert_equal( 1024**6, 1.exbi )
-    end
-
-  end
-
-=end
-