og 0.6.0 → 0.7.0

data/test/og/tc_lifecycle.rb

@@ -0,0 +1,107 @@
+#! /usr/bin/env ruby
+# vim:sw=2:ai
+
+# code: 
+# * Thomas Quas  <tquas@yahoo.com>
+# * George Moschovitis  <gm@navel.gr>
+#
+# $Id$
+
+$LOAD_PATH.unshift 'lib'
+
+require "test/unit"
+require 'glue/logger'
+require 'og/mock'
+
+$DBG = false
+$log = Logger.new( STDERR ) unless $log
+
+class Dummy
+  prop_accessor :date
+  attr_reader :call_stack
+
+  def og_pre_insert( oid )
+    @call_stack << "pre_insert"
+  end
+
+  def og_post_insert( oid )
+    @call_stack << "post_insert"
+  end
+
+  def og_pre_update( oid )
+    @call_stack << "pre_update"
+  end
+
+  def og_post_update( oid )
+    @call_stack << "post_update"
+  end
+
+  def self.og_pre_delete( conn, oid )
+    raise "undeletable"
+  end
+
+  def initialize
+    @call_stack = []
+  end
+end
+
+# Tests the Og managed objects lifecycle.
+class TC_CallbackTest < ::Test::Unit::TestCase
+  def test_insert
+    obj = Dummy.new
+    obj.save!
+
+    assert( obj.call_stack.shift == "pre_insert" )
+    assert( obj.call_stack.shift == "post_insert" )
+    assert( obj.call_stack.empty? )
+  end
+
+  def test_update
+    obj = Dummy.new
+    obj.save!
+    obj.call_stack.shift
+    obj.call_stack.shift
+
+    obj.date = Time.now
+    obj.save
+    assert( obj.call_stack.shift == "pre_update" )
+    assert( obj.call_stack.shift == "post_update" )
+    assert( obj.call_stack.empty? )
+  end
+
+  def test_delete
+    obj = Dummy.new
+    obj.save!
+    obj.call_stack.shift
+    obj.call_stack.shift
+
+    assert_raise( RuntimeError, "undeletable" ) { obj.delete! }
+  end
+
+  def setup
+		psql = true
+
+		if psql
+			config = {
+				:backend => "psql",
+				:address => "localhost",
+				:database => "test",
+				:user => "postgres",
+				:password => "navelrulez",
+				:connection_count => 1
+			}
+		else
+			config = {
+				:backend => "mysql",
+				:address => "localhost",
+				:database => "test",
+				:user => "root",
+				:password => "navelrulez",
+				:connection_count => 1
+			}
+		end
+    Og::Database.drop_db!( config )
+    $og = Og::Database.new( config )
+    $og.get_connection()
+  end
+end

data/test/tc_og.rb

@@ -46,7 +46,7 @@ class Article
 end
 
 class Comment
-	belongs_to :article, Test::Article 
+	belongs_to :article, Test::Article, :extra_sql => 'NOT NULL' 
 	belongs_to :author, Test::User
 	prop_accessor :body, String
 	prop_accessor :create_time, Time
@@ -65,6 +65,14 @@ class Comment
 	end	
 end
 
+module MyMixin
+	prop_accessor :title, String
+end
+
+class MyClass
+	include Test::MyMixin
+end
+
 class TC_N_OG < Test::Unit::TestCase
 
 	def setup
@@ -148,16 +156,17 @@ class TC_N_OG < Test::Unit::TestCase
 		
 		article = Article.new("Title", "Body")
 		article.save!
-		
+
 		comment = Comment.new("This is a comment")
 		comment.article = article
 		comment.author = User["gmosx"]
 		comment.save!
 
+
+		# test automatically generated add_commnet
 		comment = Comment.new("This is another comment")
-		comment.article = article.oid
 		comment.author = User["gmosx"]
-		comment.save!
+		article.add_comment(comment)
 
 		assert_equal(article.oid, comment.article_oid)
 		
@@ -172,6 +181,24 @@ class TC_N_OG < Test::Unit::TestCase
 		assert_equal(nil, Comment.all)
 
 		comment.delete!		
+
+		# test extra_sql
+		
+		for p in Comment.__props
+			if :article_oid == p.symbol
+				assert_equal('NOT NULL', p.meta[:extra_sql])
+				break
+			end
+		end
+
+		assert($og.managed_classes.include?(Test::Article))
+		
+		# bug: indirectly managed (includes managed Module)
+		assert($og.managed_classes.include?(Test::MyClass))
+
+		# test create
+		article = Article.create("title", "body")
+		assert_equal(3, article.oid)
 	end
 
 end

metadata

@@ -1,14 +1,13 @@
 --- !ruby/object:Gem::Specification 
-rubygems_version: 0.8.1
+rubygems_version: 0.8.3
 specification_version: 1
 name: og
 version: !ruby/object:Gem::Version 
-  version: 0.6.0
-date: 2004-12-10
+  version: 0.7.0
+date: 2004-12-27
 summary: Og (ObjectGraph)
 require_paths: 
   - lib
-author: George Moschovitis
 email: gm@navel.gr
 homepage: http://www.navel.gr/og
 rubyforge_project: og-rml
@@ -25,35 +24,44 @@ required_ruby_version: !ruby/object:Gem::Version::Requirement
         version: 1.8.1
   version: 
 platform: ruby
+authors: 
+  - George Moschovitis
 files: 
   - README.og
   - RELEASES.og
   - LICENSE
   - AUTHORS
+  - Rakefile
+  - ChangeLog.1
+  - ChangeLog
   - examples/og/run.rb
+  - examples/og/mock_example.rb
   - examples/og/README
   - lib/glue.rb
+  - lib/glue/mixins.rb
+  - lib/glue/logger.rb
   - lib/glue/pool.rb
-  - lib/glue/time.rb
-  - lib/glue/macro.rb
   - lib/glue/inflector.rb
-  - lib/glue/array.rb
+  - lib/glue/hash.rb
   - lib/glue/number.rb
-  - lib/glue/cache.rb
-  - lib/glue/mixins.rb
+  - lib/glue/time.rb
   - lib/glue/property.rb
+  - lib/glue/property.rb.old
+  - lib/glue/macro.rb
+  - lib/glue/cache.rb
   - lib/glue/string.rb
-  - lib/glue/hash.rb
-  - lib/glue/logger.rb
+  - lib/glue/array.rb
   - lib/og/backends
+  - lib/og/version.rb
   - lib/og/connection.rb
-  - lib/og/backend.rb
+  - lib/og/mock.rb
   - lib/og/meta.rb
-  - lib/og/version.rb
-  - lib/og/backends/psql.rb
+  - lib/og/backend.rb
   - lib/og/backends/mysql.rb
+  - lib/og/backends/psql.rb
   - lib/og.rb
   - test/tc_og.rb
+  - test/og/tc_lifecycle.rb
 test_files: []
 rdoc_options: 
   - "--main"