nitro 0.2.0 → 0.3.0

data/lib/n/db/tools.rb

@@ -1,106 +0,0 @@
-# code: 
-# * George Moschovitis  <gm@navel.gr>
-# * Elias Athanasopoulos  <elathan@navel.gr>
-#
-# (c) 2004 Navel, all rights reserved.
-# $Id: tools.rb 99 2004-10-22 09:50:28Z gmosx $
-
-module N; 
-
-require "n/db"
-
-# = DbTools
-#
-# Useful methods wor working with the Db BAckend
-#
-module DbTools
-
-	# Lets say you have changed the definition of a managed object
-	# (for example you have added a new prop_accessor, and want to 
-	# automatically update the database schema. 
-	# Compares the given class to the actual db schema and
-	# automatically alters the backend table if needed.
-	# No need to optimize this method.
-	#
-	def self.alter_table(klass)
-		#
-		# Use the following query to see the fields in system level:
-		#
-		# sql  = "SELECT attname, attnum FROM pg_attribute, pg_class "
-		# sql << "WHERE attrelid = pg_class.oid " 
-		# sql << "AND relname = '#{klass::DBTABLE}' AND attnum > 0;"
-		#
-		# In orer to test alter_table() use the following tests:
-		#
-		# klass.__props << N::Property.new("new_field", String)
-		# klass.__props.delete_if{ |member| member.name == "new_field" }
-		#
-		# Remember you must not uncomment both of the above statements.
-		# Uncomment the first one, use alter_table(), the uncomment the
-		# seconde one and re-use alter_table().
-		#
-		$db.open { |db|
-			
-			sql = "SELECT * FROM #{klass::DBTABLE} LIMIT 1;"			
-			table_fields = db.exec(sql).fields
-	
-			# find fields to be added.
-			properties_to_add = []
-			klass.__props.each { |klass_member|
-				properties_to_add << klass_member unless table_fields.include? klass_member.name	
-			}
-	
-			# find fields to be removed.
-			properties_to_remove = []
-			table_fields.each { |field|
-				properties_to_remove << field unless klass.__props.map{ |member| member.name }.include? field
-			}
-	
-			# Add new fields
-			fields = []
-			properties_to_add.each { |p|
-				field = "#{p.symbol}"
-				if p.sql
-					field << " #{p.sql}"
-				else
-					field << " #{db.class::TYPEMAP[p.klass]}"
-				end
-				field << " #{p.sql}" if p.sql
-			
-				fields << field 
-			}
-		
-			for field in fields
-				sql = "ALTER TABLE #{klass::DBTABLE} ADD COLUMN #{field}"
-				db.exec_clear(sql)
-			end
-			
-			removed = nil
-			properties_to_remove.each { |p|
-				sql = "ALTER TABLE #{klass::DBTABLE} DROP COLUMN #{p} RESTRICT"
-				db.exec_clear(sql)
-				removed = true
-			}
-	
-			if removed
-				sql = "UPDATE #{klass::DBTABLE}; VACUUM FULL #{klass::DBTABLE};"
-				db.exec_clear(sql)
-			end
-			
-		}
-	end
-	
-	# NOT IMPLEMENTED
-	#
-	def self.alter_column(klass, old_field, new_field)
-	end
-	 
-	# NOT IMPLEMENTED
-	#
-	def self.rename_table(old_klass, new_klass)
-	end
-
-end
-
-end # module
- 

data/lib/n/db/utils.rb

@@ -1,102 +0,0 @@
-# code: 
-# * George Moschovitis  <gm@navel.gr>
-# * Elias Athanasopoulos  <elathan@navel.gr>
-#
-# (c) 2004 Navel, all rights reserved.
-# $Id$
-
-module N; 
-
-require "base64"
-
-require "n/properties"
-require "n/utils/array"
-require "n/utils/time"
-
-# = DbUtils
-#	
-# A collection of Database utilities.
-# Additional backend specific utilities are defined in
-# the backend implementations.
-#
-module DbUtils
-
-	# Escape an sql string
-	#
-	def self.escape(str)
-		# defined in the backend
-	end
-	
-	# Escape bytes
-	#
-	def self.escape_bytes(bytes)
-		# defined in the backend
-	end
-	
-	# The name of the SQL table where entities of this class are stored.
-	# The Module separators are replaced with _ and NOT stripped out so 
-	# that we can convert back to the original notation if needed.
-	#
-	def self.sql_table(klass)
-		return "_#{klass}".gsub(/::/, "_").downcase
-	end
-	
-	# Convert a ruby time to an sql timestamp.
-	# 
-	def self.sql_timestamp(time = Time.now)
-		# defined in the backend
-	end
-	
-	# Output YYY-mm-dd
-	#
-	def self.sql_date(date)
-		# defined in the backend
-	end
-	
-	# Parse sql datetime
-	#
-	def self.parse_sql_timestamp(str)
-		# defined in the backend
-	end
-	
-	# Input YYYY-mm-dd
-	#
-	def self.parse_sql_date(str)
-		# defined in the backend
-	end
-
-	# Return an sql string evaluator for the property.
-	# No need to optimize this, used only to precalculate code.
-	#
-	# FIXME: add extra handling for float.
-	#--
-	# gmosx: base64 encoding is used because the unencode_bytea 
-	# method of postgres is not implemented
-	#++
-	#
-	def self.write_prop(p)
-		if String == p.klass
-			return "'#\{DbUtils.escape(@#{p.symbol})\}'"
-		elsif Time == p.klass
-			return %|#\{@#{p.symbol} ? "'#\{DbUtils.sql_timestamp(@#{p.symbol})\}'" : 'NULL'\}|
-		elsif Date == p.klass
-			return %|#\{@#{p.symbol} ? "'#\{DbUtils.sql_date(@#{p.symbol})\}'" : 'NULL'\}|
-		elsif Object == p.klass or Array == p.klass or Hash == p.klass
-			#return "'#\{DbUtils.escape_bytes(Marshal.dump(@#{p.symbol}))\}'"
-			return "'#\{Base64.encode64(Marshal.dump(@#{p.symbol}))\}'"
-		else
-			# Fixnum, TrueClass
-			return "#\{@#{p.symbol} || 'NULL'\}"
-		end
-	end
-
-	# Return an evaluator for reading the property
-	# No need to optimize this, used only to precalculate code.
-	#
-	def self.read_prop(p)
-		# defined in the backend
-	end
-end
-
-end # module 
-

data/lib/n/server/PLAYBACK.txt

@@ -1,8 +0,0 @@
-
-
-overload the servers accept method to store socket data in RECORD mode 
-and read sockets from a previously recorded stream in PLAYBACK mode.
-
-timing information must be stored along the socket data
-
-the centralized accept methot makes the scheme possible.

data/lib/n/server/RESEARCH.txt

@@ -1,13 +0,0 @@
-
-patterns: ObjectPool, ProducerConsumer
-
-produced consumer pattern: listener produces sockets, thread pool consumes
-sockets from a queue.
-
---
-
-gmosx: daemons does not belong here ??
-gmosx: do not use a thread per connection, use a pool of conections that service
-		a fifo list of connections (sockets).
-
-gmosx: use a pipeline request handling architecture

data/test/n/tc_db.rb

@@ -1,223 +0,0 @@
-require "test/unit"
-
-require "n/logger"; $log = Logger.new(STDERR) unless $log
-
-require "n/db"
-
-module Test # :nodoc: all
-
-class Article
-	manage {
-	include N::Entity
-	
-	prop_accessor String, :title, :body
-	}
-
-	def self.__descendants_classes
-		[Message]
-	end 	
-end
-
-class Message
-	manage {
-	include N::Entity
-	include N::Named
-	include N::Child
-	include N::ParentClass
-	
-	include N::Sequenced
-	
-	prop_accessor Fixnum, :owner_oid
-	prop_accessor Fixnum, "smallint", :val1, :val2, :val3
-	prop_accessor String, :title, :body
-	prop_accessor String, "text NOT NULL", :test
-	prop_accessor Fixnum, :count
-	prop_accessor Time, :create_time	
-	sql_index "owner_oid, pid"
-
-	# a marshaled property
-	prop_accessor Array, :options
-	}
-	
-	def initialize
-		@create_time = Time.now
-		@options = []
-	end
-
-end
-
-class SubMessage < Message
-	manage {
-	# duplicate definition
-	prop_accessor Float, :count
-	}
-end
-
-class TC_N_Db < Test::Unit::TestCase
-
-	def setup
-		$db = N::Db.new(
-			:backend => "psql",
-			:address => "localhost",
-			:database => "test",
-			:user => "postgres",
-			:password => "navelrulez",
-			:connection_count => 2
-		)	
-		
-		@art = Article.new()
-		@art.title = "The parent"
-		@art.body = "The body"
-
-		@msg1 = Message.new()
-		@msg1.name = "name1"
-		@msg1.body = "body1"
-		@msg1.title = "title1"
-		@msg1.count = "22"
-		@msg1.owner_oid = 1
-
-		@msg2 = Message.new()
-		@msg2.name = "name2"
-		@msg2.body = "body2"
-		@msg2.title = "title2"
-		@msg2.count = "22"
-		@msg2.owner_oid = 2
-	end
-
-	def teardown
-		@art = @msg1 = @msg2 = nil
-		$db.shutdown()
-	end
-
-	# gmosx: hmm, implemented in one method to enforce order.
-	#	
-	def test_all
-		$db.open { |db|
-			
-			# check exception, cleanup test db.
-
-			db.drop_schema()			
-			db.drop_table(Article)
-			db.drop_table(Message)
-			
-			db.create_schema()
-			
-			# bug: get methods without entity table
-			
-			db.get(1, Message)
-			
-			# check put
-		
-			db << @art
-			# one oid is missed when creating the table for the first time!
-			assert_equal(1, @art.oid)
-			
-			art2 = Article.new()
-			art2.title = "Another test"
-			db << art2
-			
-			@msg1.set_parent(@art)
-			@msg1.options << "test"
-			@msg1.options << "value"
-			@msg1.options << "exit"
-			@msg2.set_parent(@art)
-			
-			db << @msg1
-			db << @msg2
-		
-			assert_equal(2, @msg2.oid)
-
-			# check marshaling
-
-			msg = db.get(1, Message)
-			assert_equal("value", msg.options[1]) 
-			# check children.
-			
-			msgs = db.children(@art, Message, "ORDER BY count")
-			assert_equal(2, msgs.size())
-			assert_equal(Message, msgs[0].class)
-			
-			assert_equal(2, db.count_children(@art, Message))
-			
-			# bug: pid was string
-			
-			assert_equal(@art.oid, msgs[0].pid)
-			
-			# check updates 
-			
-			@art.title = "CHANGED TITLE"
-			db.update_properties("title='#{@art.title}'", @art)
-			
-			art2 = db.get(@art.oid, Article)
-			
-			assert_equal(art2.title, @art.title)
-			
-			@art.body = "CHANGED BODY"
-			@art.title = "CHANGED AGAIN"
-			db << @art
-			
-			art2 = db.get(@art.oid, Article)
-			assert_equal(art2.body, @art.body)
-			assert_equal(art2.title, "CHANGED AGAIN")
-			
-			# check timestamp
-			
-			now = Time.now()
-			@msg1.create_time = now
-			db << @msg1
-			
-			msg = db.get(@msg1.oid, Message)
-	
-			# bug: 		
-#			assert_equal(msg.create_time, @msg1.create_time)
-			assert_equal(msg.create_time.to_i(), @msg1.create_time.to_i())
-
-#			gmosx: not implemented in postgres driver.
-#			classes = db.managed_classes()
-#			assert_equal(2, classes.size())
-			
-			# get_by_name
-			
-			msg = db.get_by_name("name2", Message)
-			assert_equal("body2", msg.body)
-			
-			# pclass
-			
-			assert_equal(@art.class.to_s(), msg.pclass)
-			
-		}
-		
-		# deserialize = false
-
-		$db.open(deserialize = false) { |db|
-			
-			assert_equal(false, db.deserialize)
-			
-			msg = db.get_by_name("name2", Message)
-			assert_equal(Array, msg.class)
-			
-			art = db.get(2, Article)
-			assert_equal(Array, art.class)
-			
-		}				
-
-		# cascade delete
-		
-		msgs = $db.children(0, Message)
-		assert_equal(2, msgs.size())
-		
-		$db.delete(@art)
-		
-		msgs = $db.children(0, Message)
-		assert_equal(nil, msgs)
-		
-	end
-
-	def test_sql_table_to_class
-#		assert_equal(Article, 
-#				N::DbUtils.sql_table_to_class(N::DbUtils.sql_table(Article)))
-	end
-
-end
-
-end