Contents

$:.unshift File.join(File.dirname(__FILE__), '..', '..', 'lib')

require 'test/unit'

require 'og'
require 'glue/logger'
require 'glue/property'

def VarChar(size)
	return String, :sql => "VARCHAR(#{ size })"
end
NotNull = {:sql => "NOT NULL"}.freeze
Null = {:sql => "NULL"}.freeze

Property.type_checking = false

module Test # :nodoc: all

class Msg
	include Og::Unmanageable
	
	prop Fixnum, :owner_oid
	prop_accessor :val1, :val2, :val3, Fixnum, :sql => "smallint"
	prop_accessor :title, :body, String
	prop_accessor :test, String, :sql => "char(10) NOT NULL"
	prop_accessor :count, Fixnum
	prop_accessor :create_time, Time	

	# a marshaled property
	prop_accessor Array, :options

	# property with macro arguments!
	prop_accessor :address, VarChar(30), NotNull
	
	def initialize
		@create_time = Time.now
		@options = []
	end

end

class SubMsg < Msg
	# to avoid conflicts with tc_og.rb
	include Og::Unmanageable
	
	# duplicate definition with different type!
	prop_accessor :count, Float

	# another property
	prop_accessor :another, Fixnum
end

class TC_N_Properties < Test::Unit::TestCase

	def setup
		@msg1 = Msg.new
	end

	def teardown
		@msg1 = nil
	end

	def test_props
		
		# bug: props for subclasses.
		# bug: props propagated to base classes.

		assert(SubMsg.__props)
		assert_equal(Msg.__props.size(), SubMsg.__props.size() - 1)

		assert_equal(11, Msg.__props.size)
		assert_equal(12, SubMsg.__props.size)

		# bug: duplicate definition 			
		
		assert_equal(Float, SubMsg.__props.find { |p| :count == p.symbol }.klass)

		# dont force conversion
		
		@msg1.count = 2.4
		assert_equal(Float, @msg1.count.class)

		# force conversion
		
		@msg1.__force_count(2.4)
		assert_equal(Fixnum, @msg1.count.class)		
	end

	def test_macro_params
		sql = Msg.__props.find { |p| :address == p.symbol }.meta[:sql]
		assert_equal 'VARCHAR(30) NOT NULL', sql
	end
	
end

end

Version data entries

6 entries across 6 versions & 1 rubygems

Version	Path
glue-0.16.0	test/glue/tc_property.rb
glue-0.17.0	test/glue/tc_property.rb
glue-0.18.0	test/glue/tc_property.rb
glue-0.18.1	test/glue/tc_property.rb
glue-0.19.0	test/glue/tc_property.rb
glue-0.20.0	test/glue/tc_property.rb