RubyGems - glue - Versions diffs - 0.20.0 → 0.21.0 - Mend

glue 0.20.0 → 0.21.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 (58) hide show

data/CHANGELOG +161 -110
data/INSTALL +12 -12
data/README +1 -1
data/Rakefile +43 -45
data/doc/AUTHORS +5 -5
data/doc/LICENSE +3 -3
data/doc/RELEASES +32 -24
data/install.rb +7 -17
data/lib/facet/object/alias_class.rb +12 -0
data/lib/glue.rb +35 -35
data/lib/glue/array.rb +46 -46
data/lib/glue/aspects.rb +199 -209
data/lib/glue/attribute.rb +15 -15
data/lib/glue/autoreload.rb +1 -1
data/lib/glue/builder.rb +48 -0
data/lib/glue/builder/xml.rb +114 -0
data/lib/glue/cache.rb +189 -0
data/lib/glue/configuration.rb +108 -90
data/lib/glue/flexob.rb +17 -17
data/lib/glue/hash.rb +71 -71
data/lib/glue/helper.rb +12 -12
data/lib/glue/idgen.rb +9 -0
data/lib/glue/idgen/md5.rb +24 -0
data/lib/glue/idgen/sequential.rb +15 -0
data/lib/glue/literal_method.rb +44 -0
data/lib/glue/localization.rb +130 -0
data/lib/glue/logger.rb +98 -98
data/lib/glue/misc.rb +7 -7
data/lib/glue/mixins.rb +19 -19
data/lib/glue/number.rb +8 -8
data/lib/glue/object.rb +2 -2
data/lib/glue/pool.rb +43 -43
data/lib/glue/property.rb +392 -392
data/lib/glue/sanitize.rb +34 -34
data/lib/glue/settings.rb +1 -1
data/lib/glue/snapshot.rb +104 -0
data/lib/glue/string.rb +129 -129
data/lib/glue/time.rb +53 -53
data/lib/glue/uri.rb +162 -162
data/lib/glue/validation.rb +421 -421
data/lib/vendor/blankslate.rb +53 -0
data/test/glue/builder/tc_xml.rb +56 -0
data/test/glue/tc_aspects.rb +90 -90
data/test/glue/tc_attribute.rb +11 -11
data/test/glue/tc_builder.rb +30 -0
data/test/glue/tc_configuration.rb +97 -97
data/test/glue/tc_flexob.rb +10 -10
data/test/glue/tc_hash.rb +23 -23
data/test/glue/tc_localization.rb +49 -0
data/test/glue/tc_logger.rb +31 -31
data/test/glue/tc_numbers.rb +9 -9
data/test/glue/tc_property.rb +67 -67
data/test/glue/tc_property_mixins.rb +17 -17
data/test/glue/tc_property_type_checking.rb +13 -13
data/test/glue/tc_strings.rb +94 -94
data/test/glue/tc_uri.rb +65 -65
data/test/glue/tc_validation.rb +196 -196
metadata +26 -4

data/lib/vendor/blankslate.rb ADDED Viewed

@@ -0,0 +1,53 @@
+#!/usr/bin/env ruby
+#--
+# Copyright 2004 by Jim Weirich (jim@weirichhouse.org).
+# All rights reserved.
+# Permission is granted for use, copying, modification, distribution,
+# and distribution of modified versions of this work as long as the
+# above copyright notice is included.
+#++
+module Builder
+  # BlankSlate provides an abstract base class with no predefined
+  # methods (except for <tt>\_\_send__</tt> and <tt>\_\_id__</tt>).
+  # BlankSlate is useful as a base class when writing classes that
+  # depend upon <tt>method_missing</tt> (e.g. dynamic proxies).
+  class BlankSlate
+    class << self
+      def hide(name)
+  undef_method name if
+    instance_methods.include?(name.to_s) and
+    name !~ /^(__|instance_eval)/
+      end
+    end
+    instance_methods.each { |m| hide(m) }
+  end
+end
+# Since Ruby is very dynamic, methods added to the ancestors of
+# BlankSlate <em>after BlankSlate is defined</em> will show up in the
+# list of available BlankSlate methods.  We handle this by defining a hook in the Object and Kernel classes that will hide any defined
+module Kernel
+  class << self
+    alias_method :blank_slate_method_added, :method_added
+    def method_added(name)
+      blank_slate_method_added(name)
+      return if self != Kernel
+      Builder::BlankSlate.hide(name)
+    end
+  end
+end
+class Object
+  class << self
+    alias_method :blank_slate_method_added, :method_added
+    def method_added(name)
+      blank_slate_method_added(name)
+      return if self != Object
+      Builder::BlankSlate.hide(name)
+    end
+  end
+end

data/test/glue/builder/tc_xml.rb ADDED Viewed

@@ -0,0 +1,56 @@
+$:.unshift File.join(File.dirname(__FILE__), '..', '..', '..', 'lib')
+require 'test/unit'
+require 'glue/builder/xml'
+class TC_BuildersXml < Test::Unit::TestCase # :nodoc: all
+  include Glue
+  def test_string
+    x = XmlBuilder.new
+    x.start_tag!('html').
+      start_tag!('title').text!('hello').end_tag!('title').
+    end_tag!('html')
+    assert_equal '<html><title>hello</title></html>', x.buffer
+  end
+  def test_missing
+    x = XmlBuilder.new
+    x.b('This is bold')
+    assert_equal '<b>This is bold</b>', x.buffer
+    x = XmlBuilder.new
+    x.a('Navel', :href => 'http://www.navel.gr')
+    assert_equal '<a href="http://www.navel.gr">Navel</a>', x.buffer
+    x = XmlBuilder.new
+    x.b {
+      x.i 'Hello', :class =>'new'
+      x.p 'Paragraph'
+    }
+    assert_equal '<b><i class="new">Hello</i><p>Paragraph</p></b>', x.buffer
+    x = XmlBuilder.new
+    x.hr
+    assert_equal '<hr />', x.buffer
+    x = XmlBuilder.new
+    x.hr(:style => 'height: 1px')
+    assert_equal '<hr style="height: 1px" />', x.buffer
+  end
+  def test_xml_builder
+    buffer = ''
+    x = XmlBuilder.new(buffer)
+    x.start_tag!('html').
+      start_tag!('title').text!('hello').end_tag!('title').
+    end_tag!('html')
+    assert_equal '<html><title>hello</title></html>', buffer
+  end
+end

data/test/glue/tc_aspects.rb CHANGED Viewed

@@ -7,95 +7,95 @@ include Glue
 class TestCaseAspects < Test::Unit::TestCase # :nodoc: all
-	class Monitor
-		def self.pre(this)
-			this.ma = 2
-		end
-		def self.post(this)
-			this.mb = 5
-		end
-	end
-	module Localize
-		def localize
-			@ll = 5
-		end
-	end
-	module Tester
-		include Aspects
-		attr_accessor :ta
-		pre { |this| this.ta = 5 }
-	end
-	class Dummy
-		include Aspects
-		include Tester
-		attr_accessor :a, :b, :c
-		attr_accessor :oa, :ob
-		attr_accessor :ma, :mb
-		attr_accessor :ll
-		attr_accessor :pa
-		pre :pre_advice
-		wrap Monitor
-		wrap Localize, :pre => :localize
-		post { |this| this.pa = 3 }
-		def initialize
-			@a = 0
-		end
-		def hello(q)
-			@a += 1 + q
-		end
-		def pre_advice
-			@b = 1
-			@a += 1
-		end
-		def post_advice
-			@c = 1
-		end
-	end
-	# Class aspect.
-	class Observer < Aspect
-		def self.pre(this)
-			this.oa = 9
-		end
-	end
-	# Instance aspect.
-	class Epilogue < Aspect
-		def post(this)
-			this.ob = 9
-		end
-	end
-	def test_all
-		Observer.wrap(Dummy, :hello)
-		Epilogue.new.wrap(Dummy, :hello)
-		Aspects.wrap(Dummy, :hello)
-		d = Dummy.new
-		d.hello(3)
-		assert_equal 5, d.a
-		assert_equal 1, d.b
-		assert_equal 9, d.oa
-		assert_equal 9, d.ob
-		assert_equal 2, d.ma
-		assert_equal 5, d.mb
-		assert_equal 5, d.ll
-		assert_equal 3, d.pa
-		assert_equal 5, d.ta
-	end
+  class Monitor
+    def self.pre(this)
+      this.ma = 2
+    end
+    def self.post(this)
+      this.mb = 5
+    end
+  end
+  module Localize
+    def localize
+      @ll = 5
+    end
+  end
+  module Tester
+    include Aspects
+    attr_accessor :ta
+    pre { |this| this.ta = 5 }
+  end
+  class Dummy
+    include Aspects
+    include Tester
+    attr_accessor :a, :b, :c
+    attr_accessor :oa, :ob
+    attr_accessor :ma, :mb
+    attr_accessor :ll
+    attr_accessor :pa
+    pre :pre_advice
+    wrap Monitor
+    wrap Localize, :pre => :localize
+    post { |this| this.pa = 3 }
+    def initialize
+      @a = 0
+    end
+    def hello(q)
+      @a += 1 + q
+    end
+    def pre_advice
+      @b = 1
+      @a += 1
+    end
+    def post_advice
+      @c = 1
+    end
+  end
+  # Class aspect.
+  class Observer < Aspect
+    def self.pre(this)
+      this.oa = 9
+    end
+  end
+  # Instance aspect.
+  class Epilogue < Aspect
+    def post(this)
+      this.ob = 9
+    end
+  end
+  def test_all
+    Observer.wrap(Dummy, :hello)
+    Epilogue.new.wrap(Dummy, :hello)
+    Aspects.wrap(Dummy, :hello)
+    d = Dummy.new
+    d.hello(3)
+    assert_equal 5, d.a
+    assert_equal 1, d.b
+    assert_equal 9, d.oa
+    assert_equal 9, d.ob
+    assert_equal 2, d.ma
+    assert_equal 5, d.mb
+    assert_equal 5, d.ll
+    assert_equal 3, d.pa
+    assert_equal 5, d.ta
+  end
 end

data/test/glue/tc_attribute.rb CHANGED Viewed

@@ -5,18 +5,18 @@ require 'glue/attribute'
 class TC_Attribute < Test::Unit::TestCase # :nodoc: all
-	class Dummy
-		cattr_accessor :value, 'Default'
-		cattr_reader :reader, 3
-	end
+  class Dummy
+    cattr_accessor :value, 'Default'
+    cattr_reader :reader, 3
+  end
-	def test_attr
-		assert_equal 'Default', Dummy.value
-		assert_nothing_raised { Dummy.value = 2 }
-		assert_equal 2, Dummy.value
+  def test_attr
+    assert_equal 'Default', Dummy.value
+    assert_nothing_raised { Dummy.value = 2 }
+    assert_equal 2, Dummy.value
-		assert_equal 3, Dummy.reader
-		assert_raise(NoMethodError) { Dummy.reader = 19 }
-	end
+    assert_equal 3, Dummy.reader
+    assert_raise(NoMethodError) { Dummy.reader = 19 }
+  end
 end

data/test/glue/tc_builder.rb ADDED Viewed

@@ -0,0 +1,30 @@
+$:.unshift File.join(File.dirname(__FILE__), '..', '..', 'lib')
+require 'test/unit'
+require 'glue/builder'
+class TC_Builder < Test::Unit::TestCase # :nodoc: all
+  include Glue
+  module TestMixin
+    def hello
+      'hello'
+    end
+    def world
+      'world'
+    end
+  end
+  class TestBuilder < Builder
+    include_builder TestMixin
+  end
+  def test_all
+    t = TestBuilder.new(doc = '')
+    t.hello
+    t.world
+    assert_equal 'helloworld', doc
+    t.hello
+    assert_equal 'helloworldhello', doc
+  end
+end

data/test/glue/tc_configuration.rb CHANGED Viewed

@@ -6,93 +6,93 @@ require 'glue/configuration'
 # Hack: To make compatible with rake test.
 class Dummy
-	setting :root_dir, :default => '/home/gmosx', :doc => 'The root directory for the app'
-	setting :conn_count, :default => 5, :type => Fixnum
+  setting :root_dir, :default => '/home/gmosx', :doc => 'The root directory for the app'
+  setting :conn_count, :default => 5, :type => Fixnum
 end
 class Another
-	setting :max_age, :default => 4, :doc => 'Maximum allowed age'
+  setting :max_age, :default => 4, :doc => 'Maximum allowed age'
 end
 class Configuration
-	def self.clear_all_settings
-		@@owners = Hash.new
-	end
+  def self.clear_all_settings
+    @@owners = Hash.new
+  end
 end
 class TC_Configuration < Test::Unit::TestCase # :nodoc: all
-	class Internal
-		setting :radius, :default => 4
-	end
-	def setup
-		# gmosx: A hack to make compatible with rake. All code in this
-		# method is not needed if you only run this test (or in your
-		# real aplications of course).
-		Configuration.clear_all_settings
-		Dummy.class_eval do
-			setting :root_dir, :default => '/home/gmosx', :doc => 'The root directory for the app'
-			setting :conn_count, :default => 5, :type => Fixnum
-		end
-		Another.class_eval do
-			setting :max_age, :default => 4, :doc => 'Maximum allowed age'
-		end
-		Internal.class_eval do
-			setting :radius, :default => 4
-		end
-	end
-	def test_all
-		assert_equal 4, Configuration.settings.size
-		assert_equal 4, Configuration.all.size
-		assert_equal 2, Configuration.settings(Dummy).size
-		assert_equal 1, Configuration.settings(Another).size
-		assert_equal Fixnum, Configuration.settings(Dummy)[:conn_count].type
-		assert_equal String, Configuration[Dummy][:root_dir].type
-		assert_equal '/home/gmosx', Dummy.root_dir
-		assert_equal 4, Another.max_age
-		Dummy.root_dir = '/changed/dir'
-		assert_equal '/changed/dir', Dummy.root_dir
-		assert_equal '/changed/dir', Configuration[Dummy][:root_dir].value
-		Another.max_age = 99
-		assert_equal 99, Configuration[Another][:max_age].value
-		# test reverse setting.
-		Configuration[Another][:max_age].value = 69
-		assert_equal 69, Configuration[Another][:max_age].value
-		assert_equal 69, Another.max_age
-		# setup
-		Configuration.setup(
-			Dummy => {
-				:root_dir => '/gmosx/2',
-				:conn_count => 12
-			},
-			Another => {
-				:max_age => 2
-			},
-			TC_Configuration::Internal => {
-				:radius => 99
-			}
-		)
-		assert_equal '/gmosx/2', Dummy.root_dir
-		assert_equal '/gmosx/2', Configuration[Dummy][:root_dir].value
-		assert_equal 2, Another.max_age
-		Configuration.parse <<-end_val
+  class Internal
+    setting :radius, :default => 4
+  end
+  def setup
+    # gmosx: A hack to make compatible with rake. All code in this
+    # method is not needed if you only run this test (or in your
+    # real aplications of course).
+    Configuration.clear_all_settings
+    Dummy.class_eval do
+      setting :root_dir, :default => '/home/gmosx', :doc => 'The root directory for the app'
+      setting :conn_count, :default => 5, :type => Fixnum
+    end
+    Another.class_eval do
+      setting :max_age, :default => 4, :doc => 'Maximum allowed age'
+    end
+    Internal.class_eval do
+      setting :radius, :default => 4
+    end
+  end
+  def test_all
+    assert_equal 4, Configuration.settings.size
+    assert_equal 4, Configuration.all.size
+    assert_equal 2, Configuration.settings(Dummy).size
+    assert_equal 1, Configuration.settings(Another).size
+    assert_equal Fixnum, Configuration.settings(Dummy)[:conn_count].type
+    assert_equal String, Configuration[Dummy][:root_dir].type
+    assert_equal '/home/gmosx', Dummy.root_dir
+    assert_equal 4, Another.max_age
+    Dummy.root_dir = '/changed/dir'
+    assert_equal '/changed/dir', Dummy.root_dir
+    assert_equal '/changed/dir', Configuration[Dummy][:root_dir].value
+    Another.max_age = 99
+    assert_equal 99, Configuration[Another][:max_age].value
+    # test reverse setting.
+    Configuration[Another][:max_age].value = 69
+    assert_equal 69, Configuration[Another][:max_age].value
+    assert_equal 69, Another.max_age
+    # setup
+    Configuration.setup(
+      Dummy => {
+        :root_dir => '/gmosx/2',
+        :conn_count => 12
+      },
+      Another => {
+        :max_age => 2
+      },
+      TC_Configuration::Internal => {
+        :radius => 99
+      }
+    )
+    assert_equal '/gmosx/2', Dummy.root_dir
+    assert_equal '/gmosx/2', Configuration[Dummy][:root_dir].value
+    assert_equal 2, Another.max_age
+    Configuration.parse <<-end_val
 Another:
   max_age: 5
 TC_Configuration.Internal:
@@ -100,26 +100,26 @@ TC_Configuration.Internal:
 Dummy:
   root_dir: /gmosx/99
   conn_count: 33
-  	end_val
+    end_val
-		assert_equal '/gmosx/99', Dummy.root_dir
-		assert_equal '/gmosx/99', Configuration[Dummy][:root_dir].value
-		assert_equal 5, Another.max_age
-		# cooler ;-)
-		assert_equal String, Configuration.Dummy[:root_dir].type
-		assert_equal String, Configuration.Dummy.root_dir.type
-		# alias
-		assert_equal String, Settings.Dummy.root_dir.type
-		assert_equal 5, Settings.Another.max_age.value
-		# Handle namespace
-		assert_equal 99, Internal.radius
-		assert_equal 99, TC_Configuration::Internal.radius
-	end
+    assert_equal '/gmosx/99', Dummy.root_dir
+    assert_equal '/gmosx/99', Configuration[Dummy][:root_dir].value
+    assert_equal 5, Another.max_age
+    # cooler ;-)
+    assert_equal String, Configuration.Dummy[:root_dir].type
+    assert_equal String, Configuration.Dummy.root_dir.type
+    # alias
+    assert_equal String, Settings.Dummy.root_dir.type
+    assert_equal 5, Settings.Another.max_age.value
+    # Handle namespace
+    assert_equal 99, Internal.radius
+    assert_equal 99, TC_Configuration::Internal.radius
+  end
 end