lafcadio 0.4.3

data/lib/lafcadio/util/ContextualService.rb

@@ -0,0 +1,33 @@
+require 'lafcadio/util/Context'
+
+module Lafcadio
+	# A ContextualService is a service that is managed by the Context. 
+	# ContextualServices are not instantiated normally. Instead, the instance of 
+	# such a service may be retrieved by calling the method
+	#   < class name >.get< class name >
+	#
+	# For example: ObjectStore.getObjectStore
+	class ContextualService
+		def ContextualService.method_missing(methodId)
+			methodName = methodId.id2name
+			if methodName =~ /^get.*/
+				Context.instance.send(methodName)
+			else
+				super methodId
+			end
+		end
+
+		# The +passKey+ needs to be the Context instance, or else this method fails. 
+		# Note that this isn't hard security of any kind; it's simply a gentle 
+		# reminder to users of a ContextualService that the class should not be 
+		# instantiated directly.
+		def initialize(passKey)
+			if passKey.class != Context
+				raise ArgumentError,
+						  "#{ self.class.name.to_s } should only be instantiated by a " +
+							  "Context",
+						  caller
+			end
+		end
+	end
+end

data/lib/lafcadio/util/English.rb

@@ -0,0 +1,117 @@
+module Lafcadio
+	# A collection of English-language specific utility methods.
+	class English
+		# Turns a camel-case string ("camelCaseToEnglish") to plain English ("camel 
+		# case to english"). Each word is decapitalized.
+		def English.camelCaseToEnglish(camelCaseStr)
+			words = []
+			nextCapIndex =(camelCaseStr =~ /[A-Z]/)
+			while nextCapIndex != nil
+				words << $` if $`.size > 0
+				camelCaseStr = $& + $'
+				camelCaseStr[0] = camelCaseStr[0..0].downcase
+				nextCapIndex =(camelCaseStr =~ /[A-Z]/)
+			end
+			words << camelCaseStr
+			words.join ' '
+		end
+
+		# Given a format for a template sentence, generates the sentence while 
+		# accounting for details such as pluralization and whether to use "a" or 
+		# "an".
+		# [format] The format string. Format codes are:
+		#          * %num: Number
+		#          * %is: Transitive verb. This will be turned into "is" or "are", 
+		#            depending on <tt>number</tt>.
+		#          * %nam: Name. This will be rendered as either singular or 
+		#            plural, depending on <tt>number</tt>.
+		#          * %a: Indefinite article. This will be turned into "a" or "an", 
+		#            depending on <tt>name</tt>.
+		# [name] The name of the object being described.
+		# [number] The number of the objects being describes.
+		#
+		# Examples:
+		#   English.sentence("There %is currently %num %nam", "product category",
+		#                        0) -> "There are currently 0 product categories"
+		#   English.sentence("There %is currently %num %nam", "product category",
+		#                        1) -> "There is currently 1 product category"
+		#   English.sentence("Add %a %nam", "invoice") -> "Add an invoice"	
+		def English.sentence(format, name, number = 1)
+			sentence = format
+			sentence.gsub!( /%num/, number.to_s )
+			isVerb = number == 1 ? "is" : "are"
+			sentence.gsub!( /%is/, isVerb )
+			name = English.plural name if number != 1
+			sentence.gsub!( /%nam/, name )
+			article = startsWithVowelSound(name) ? 'an' : 'a'
+			sentence.gsub!( /%a/, article )
+			sentence
+		end
+
+		# Does this word start with a vowel sound? "User" and "usury" don't, but 
+		# "ugly" does.
+		def English.startsWithVowelSound(word)
+			uSomethingUMatch = word =~ /^u[^aeiuo][aeiou]/
+					# 'user' and 'usury' don't start with a vowel sound
+			word =~ /^[aeiou]/ && !uSomethingUMatch
+		end
+
+		# Given a singular noun, returns the plural form.
+		def English.plural(singular)
+			consonantYPattern = Regexp.new("([^aeiou])y$", Regexp::IGNORECASE)
+			if singular =~ consonantYPattern
+				singular.gsub consonantYPattern, '\1ies'
+			elsif singular =~ /[xs]$/
+				singular + "es"
+			else
+				singular + "s"
+			end
+		end
+
+		# Returns the proper noun form of a string by capitalizing most of the 
+		# words.
+		#
+		# Examples:
+		#   English.properNoun("bosnia and herzegovina") ->
+		#     "Bosnia and Herzegovina"
+		#   English.properNoun("macedonia, the former yugoslav republic of") ->
+		#     "Macedonia, the Former Yugoslav Republic of"
+		#   English.properNoun("virgin islands, u.s.") ->
+		#     "Virgin Islands, U.S."
+		def English.properNoun(string)
+			properNoun = ""
+			while(matchIndex = string =~ /[\. ]/)
+				word = string[0..matchIndex-1]
+				word = word.capitalize unless [ 'and', 'the', 'of' ].index(word) != nil
+				properNoun += word + $&
+				string = string[matchIndex+1..string.length]
+			end
+			word = string
+			word = word.capitalize unless [ 'and', 'the', 'of' ].index(word) != nil
+			properNoun += word
+			properNoun
+		end
+
+		# Given a noun in plural form, returns its singular version.
+		def English.singular(plural)
+			if plural =~ /(.*)ies/
+				$1 + 'y'
+			elsif plural =~ /(.*s)es/
+				$1
+			else
+				plural =~ /(.*)s/
+				$1
+			end
+		end
+
+		# Turns an English language string into camel case.
+		def English.englishToCamelCase(englishStr)
+			cc = ""
+			englishStr.split.each { |word|
+				word = word.capitalize unless cc == ''
+				cc = cc += word
+			}
+			cc
+		end
+	end
+end

data/lib/lafcadio/util/HashOfArrays.rb

@@ -0,0 +1,48 @@
+module Lafcadio
+	class HashOfArrays #:nodoc:
+		def initialize
+			@values = {}
+		end
+
+		def set(key, array)
+			raise "HashOfArrays.[]= needs a value of type Array" if array.class != Array
+			@values[key] = array
+		end
+
+		def []=(key, array)
+			set key, array
+		end
+
+		def getArray(key)
+			array = @values[key]
+			if array == nil
+				array = []
+				@values[key] = array
+			end
+			array
+		end
+
+		def get(key)
+			array = @values[key]
+			array != nil ? array[0] : nil
+		end
+
+		def [](key)
+			getArray key
+		end
+
+		def values
+			values = []
+			@values.values.each { |val| values << val[0] }
+			values
+		end
+
+		def keys
+			@values.keys
+		end
+
+		def each
+			@values.each { |key, array| yield key, array }
+		end
+	end
+end

data/lib/lafcadio/util/LafcadioConfig.rb

@@ -0,0 +1,25 @@
+module Lafcadio
+	# LafcadioConfig is a Hash that takes its data from the config file. You'll 
+	# have to set the location of that file before using it: Use 
+	# LafcadioConfig.setFilename.
+	#
+	# LafcadioConfig expects its data to be colon-delimited, one key-value pair 
+	# to a line. For example:
+	#   dbuser:user
+	#   dbpassword:password
+	#   dbname:lafcadio_test
+	#   dbhost:localhost
+	class LafcadioConfig < Hash
+		def LafcadioConfig.setFilename(filename)
+			@@filename = filename
+		end
+
+		def initialize
+		 file = File.new @@filename
+			file.each_line { |line|
+				line.chomp =~ /^(.*?):(.*)$/
+				self[$1] = $2
+			}
+		end
+	end
+end

data/lib/lafcadio/util/QueueHash.rb

@@ -0,0 +1,67 @@
+module Lafcadio
+	# An ordered hash: Keys are ordered according to when they were inserted.
+	class QueueHash
+		# Creates a QueueHash with all the elements in <tt>array</tt> as keys, and 
+		# each value initially set to be the same as the corresponding key.
+		def QueueHash.newFromArray(array)
+			valueArray = []
+			array.each { |elt|
+				valueArray << elt
+				valueArray << elt
+			}
+			new(*valueArray)
+		end
+
+		# Takes an even number of arguments, and sets each odd-numbered argument to 
+		# correspond to the argument immediately afterward. For example:
+		#   queueHash = QueueHash.new (1, 2, 3, 4)
+		#   queueHash[1] => 2
+		#   queueHash[3] => 4
+		def initialize(*values)
+			@pairs = []
+			0.step(values.size-1, 2) { |i| @pairs << [ values[i], values[i+1] ] }
+		end
+
+		def keys
+			keys = []
+			@pairs.each { |pair| keys << pair[0] }
+			keys
+		end
+
+		def values
+			values = []
+			@pairs.each { |pair| values << pair[1] }
+			values
+		end
+
+		def [](key)
+			value = nil
+			@pairs.each { |pair| value = pair[1] if pair[0] == key }
+			value
+		end
+
+		def size
+			@pairs.size
+		end
+
+		def []=(key, value)
+			@pairs << [key, value]
+		end
+
+		def each
+			@pairs.each { |pair| yield pair[0], pair[1] }
+		end
+		
+		def ==( otherObj )
+			if otherObj.class == QueueHash && otherObj.size == size
+				match = true
+				(0...size).each { |i|
+					match &&= keys[i] == otherObj.keys[i] && values[i] == otherObj.values[i]
+				}
+				match
+			else
+				false
+			end
+		end
+	end
+end

data/lib/lafcadio/util/UsStates.rb

@@ -0,0 +1,29 @@
+module Lafcadio
+	class UsStates
+		# Returns a QueueHash of states, with two-letter postal codes as keys and 
+		# state names as values.
+		def UsStates.states
+			require 'lafcadio/util/QueueHash'
+			QueueHash.new( 'AL', 'Alabama', 'AK', 'Alaska', 'AZ', 'Arizona',
+											'AR', 'Arkansas', 'CA', 'California', 'CO', 'Colorado',
+											'CT', 'Connecticut', 'DE', 'Delaware',
+											'DC', 'District of Columbia', 'FL', 'Florida',
+											'GA', 'Georgia', 'HI', 'Hawaii', 'ID', 'Idaho',
+											'IL', 'Illinois', 'IN', 'Indiana', 'IA', 'Iowa',
+											'KS', 'Kansas', 'KY', 'Kentucky', 'LA', 'Louisiana',
+											'ME', 'Maine', 'MD', 'Maryland', 'MA', 'Massachusetts',
+											'MI', 'Michigan', 'MN', 'Minnesota', 'MS', 'Mississippi',
+											'MO', 'Missouri', 'MT', 'Montana', 'NE', 'Nebraska',
+											'NV', 'Nevada', 'NH', 'New Hampshire',
+											'NJ', 'New Jersey', 'NM', 'New Mexico', 'NY', 'New York',
+											'NC', 'North Carolina', 'ND', 'North Dakota',
+											'OH', 'Ohio', 'OK', 'Oklahoma', 'OR', 'Oregon',
+											'PA', 'Pennsylvania', 'PR', 'Puerto Rico',
+											'RI', 'Rhode Island', 'SC', 'South Carolina',
+											'SD', 'South Dakota', 'TN', 'Tennessee', 'TX', 'Texas',
+											'UT', 'Utah', 'VT', 'Vermont', 'VA', 'Virginia',
+											'WA', 'Washington', 'WV', 'West Virginia',
+											'WI', 'Wisconsin', 'WY', 'Wyoming' )
+		end
+	end
+end

data/lib/lafcadio/xml.rb

@@ -0,0 +1,2 @@
+require 'lafcadio/includer'
+Includer.include( 'xml' )

metadata

@@ -0,0 +1,135 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.8.1
+specification_version: 1
+name: lafcadio
+version: !ruby/object:Gem::Version 
+  version: 0.4.3
+date: 2004-12-01
+summary: Lafcadio is an object-relational mapping layer
+require_paths: 
+  - lib
+author: Francis Hwang
+email: sera@fhwang.net
+homepage: http://lafcadio.rubyforge.org/
+rubyforge_project: 
+description: 
+autorequire: lafcadio
+default_executable: 
+bindir: bin
+has_rdoc: false
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+    - 
+      - ">"
+      - !ruby/object:Gem::Version 
+        version: 0.0.0
+  version: 
+platform: ruby
+files: 
+  - lib/lafcadio
+  - lib/lafcadio.rb
+  - lib/lafcadio.rb~
+  - lib/lafcadio/dateTime
+  - lib/lafcadio/dateTime.rb
+  - lib/lafcadio/domain
+  - lib/lafcadio/domain.rb
+  - lib/lafcadio/domain.rb~
+  - lib/lafcadio/includer.rb
+  - lib/lafcadio/mock
+  - lib/lafcadio/mock.rb
+  - lib/lafcadio/objectField
+  - lib/lafcadio/objectField.rb
+  - lib/lafcadio/objectStore
+  - lib/lafcadio/objectStore.rb
+  - lib/lafcadio/query
+  - lib/lafcadio/query.rb
+  - lib/lafcadio/schema
+  - lib/lafcadio/schema.rb
+  - lib/lafcadio/test
+  - lib/lafcadio/test.rb
+  - lib/lafcadio/TestSuite.rb
+  - lib/lafcadio/util
+  - lib/lafcadio/util.rb
+  - lib/lafcadio/xml.rb
+  - lib/lafcadio/dateTime/Month.rb
+  - lib/lafcadio/domain/DomainObject.rb
+  - lib/lafcadio/domain/DomainObject.rb~
+  - lib/lafcadio/domain/MapObject.rb
+  - lib/lafcadio/domain/ObjectType.rb
+  - lib/lafcadio/mock/MockDbBridge.rb
+  - lib/lafcadio/mock/MockDbBridge.rb~
+  - lib/lafcadio/mock/MockObjectStore.rb
+  - lib/lafcadio/objectField/AutoIncrementField.rb
+  - lib/lafcadio/objectField/BooleanField.rb
+  - lib/lafcadio/objectField/DateField.rb
+  - lib/lafcadio/objectField/DateTimeField.rb
+  - lib/lafcadio/objectField/DecimalField.rb
+  - lib/lafcadio/objectField/EmailField.rb
+  - lib/lafcadio/objectField/EnumField.rb
+  - lib/lafcadio/objectField/FieldValueError.rb
+  - lib/lafcadio/objectField/IntegerField.rb
+  - lib/lafcadio/objectField/LinkField.rb
+  - lib/lafcadio/objectField/LinkField.rb~
+  - lib/lafcadio/objectField/MoneyField.rb
+  - lib/lafcadio/objectField/MonthField.rb
+  - lib/lafcadio/objectField/ObjectField.rb
+  - lib/lafcadio/objectField/PasswordField.rb
+  - lib/lafcadio/objectField/StateField.rb
+  - lib/lafcadio/objectField/SubsetLinkField.rb
+  - lib/lafcadio/objectField/TextField.rb
+  - lib/lafcadio/objectField/TextListField.rb
+  - lib/lafcadio/objectField/TimeStampField.rb
+  - lib/lafcadio/objectStore/Cache.rb
+  - lib/lafcadio/objectStore/Committer.rb
+  - lib/lafcadio/objectStore/CouldntMatchObjectTypeError.rb
+  - lib/lafcadio/objectStore/DbBridge.rb
+  - lib/lafcadio/objectStore/DbBridge.rb~
+  - lib/lafcadio/objectStore/DomainComparable.rb
+  - lib/lafcadio/objectStore/DomainObjectInitError.rb
+  - lib/lafcadio/objectStore/DomainObjectNotFoundError.rb
+  - lib/lafcadio/objectStore/DomainObjectProxy.rb
+  - lib/lafcadio/objectStore/DomainObjectSqlMaker.rb
+  - lib/lafcadio/objectStore/ObjectStore.rb
+  - lib/lafcadio/objectStore/ObjectStore.rb~
+  - lib/lafcadio/objectStore/SqlValueConverter.rb
+  - lib/lafcadio/objectStore/SqlValueConverter.rb~
+  - lib/lafcadio/query/Compare.rb
+  - lib/lafcadio/query/CompoundCondition.rb
+  - lib/lafcadio/query/Condition.rb
+  - lib/lafcadio/query/Condition.rb~
+  - lib/lafcadio/query/Equals.rb
+  - lib/lafcadio/query/In.rb
+  - lib/lafcadio/query/Like.rb
+  - lib/lafcadio/query/Link.rb
+  - lib/lafcadio/query/Max.rb
+  - lib/lafcadio/query/Max.rb~
+  - lib/lafcadio/query/Not.rb
+  - lib/lafcadio/query/Query.rb
+  - lib/lafcadio/schema/CreateTableStatement.rb
+  - lib/lafcadio/schema/CreateTableStatement.rb~
+  - lib/lafcadio/test/LafcadioTestCase.rb
+  - lib/lafcadio/test/testconfig.dat
+  - lib/lafcadio/util/Context.rb
+  - lib/lafcadio/util/ContextualService.rb
+  - lib/lafcadio/util/English.rb
+  - lib/lafcadio/util/HashOfArrays.rb
+  - lib/lafcadio/util/LafcadioConfig.rb
+  - lib/lafcadio/util/QueueHash.rb
+  - lib/lafcadio/util/UsStates.rb
+test_files: []
+rdoc_options: []
+extra_rdoc_files: []
+executables: []
+extensions: []
+requirements: []
+dependencies: 
+  - !ruby/object:Gem::Dependency 
+    name: log4r
+    version_requirement: 
+    version_requirements: !ruby/object:Gem::Version::Requirement 
+      requirements: 
+        - 
+          - ">"
+          - !ruby/object:Gem::Version 
+            version: 0.0.0
+      version: