palm 0.0.1

data/test/pdb_test.rb

@@ -0,0 +1,97 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+require 'enumerator'
+
+class TC_PdbTest < Test::Unit::TestCase
+	def setup
+		setup_paths
+		@pdb = Palm::PDB.new
+		@pdb.load_file(@path)
+	end
+
+	def teardown
+		File.delete(@temp_path) if File.exist? @temp_path
+	end
+
+	def test_meta_data
+		assert_equal 'Trac'	,			@pdb.creator
+		assert_equal 'HovD'	,			@pdb.type
+		assert_equal 'HovData'	,	@pdb.name
+		assert_equal 1	,					@pdb.version
+	end
+	
+	def test_times_should_be_humane
+		assert_instance_of(Time, @pdb.created_at)
+		assert_instance_of(Time, @pdb.modified_at)
+		assert_instance_of(Time, @pdb.backed_up_at)
+	end
+	
+	def test_that_data_looks_right
+		records = @pdb.data
+		io = Palm::WabaStringIO.new(records.first.data)
+		assert_equal 072           	,io.get_byte
+		assert_equal 'Downtown I-5'	,io.get_string
+		assert_equal 'Albro Pl'    	,io.get_string 	
+		assert_equal 1           		,io.get_byte	  
+		assert_equal 5           		,io.get_byte	  
+		assert_equal 5           		,io.get_byte	  
+		assert_equal 'none'      		,io.get_string 	
+		assert_equal false       		,io.get_bool	  
+		assert_equal 21          		,io.get_int	
+	end
+	
+	def test_writing_data
+		@pdb.write_file(@temp_path)
+		
+		# Ensure the file was written
+		assert(File.exist?(@temp_path))
+		assert(File.size(@temp_path) > 0)
+		
+		# Ensure the files are the same size
+		assert_equal File.size(@path), File.size(@temp_path)
+		
+		# Ensure the files are identical
+		assert_equal IO.read(@path), IO.read(@temp_path)
+	end
+	
+	def test_round_tripping_records
+		@pdb.write_file(@temp_path)
+		@loaded = Palm::PDB.new(@temp_path)
+		
+		# Ensure they are not the same instance
+		assert(@pdb != @loaded) 
+		
+		# Test that the loaded data is the same as the original
+		binary_data = @pdb.data.map{|record| record.data}
+		loaded_data = @loaded.data.map{|record| record.data}
+		
+		binary_data.zip(loaded_data) do |expected, loaded|
+			assert_equal expected, loaded
+		end
+		
+		# Verify that the metadata is the same
+		assert_equal @pdb.creator , @loaded.creator
+		assert_equal @pdb.type    , @loaded.type
+		assert_equal @pdb.name    , @loaded.name
+		assert_equal @pdb.version , @loaded.version
+	end
+	
+	def test_appending_records
+		bytes = "TEST BYTES"
+		r = Palm::RawRecord.new
+		r.data = bytes
+		@pdb.data << r
+		@pdb.write_file(@temp_path)
+		@loaded = Palm::PDB.new(@temp_path)
+		assert_equal bytes, @loaded.data.last.data
+	end
+	
+	def test_removing_records
+		removed = @pdb.data.shift
+		expected = @pdb.data.first
+		@pdb.write_file(@temp_path)
+		@loaded = Palm::PDB.new(@temp_path)
+		assert_equal expected.data, @loaded.data.first.data
+		assert !@pdb.data.any?{|r| r.data == removed.data}
+	end
+
+end

data/test/test_helper.rb

@@ -0,0 +1,7 @@
+require 'test/unit'
+require File.dirname(__FILE__) + '/../lib/palm'
+
+def setup_paths
+	@path = (Dir.pwd =~ /test/) ? "HovData.pdb" : "test/HovData.pdb"
+	@temp_path = (Dir.pwd =~ /test/) ? "__tmp.pdb" : "test/__tmp.pdb"
+end

data/test/waba_db_test.rb

@@ -0,0 +1,77 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+
+class TestCollectionPointRecord < Palm::WabaRecord
+	class_id 072
+	field :corridor, 	:string 
+	field :site, 			:string
+	field :direction, :byte
+	field :lanes, 		:byte
+	field :hov_lane, 	:byte
+	field :ramp_type, :string
+	field :express, 	:boolean
+	field :cp_id, 		:int
+end
+
+class TC_WabaDBTest < Test::Unit::TestCase
+	def setup
+		setup_paths
+		@pdb = Palm::WabaDB.new(TestCollectionPointRecord)
+		@pdb.load(open(@path))
+	end
+	
+	def teardown
+		File.delete(@temp_path) if File.exist? @temp_path
+	end
+	
+	def test_records_exist
+		assert @pdb.data.length > 0
+	end
+	
+	def test_correct_class
+		@pdb.data.each do |record|
+			assert_instance_of TestCollectionPointRecord, record
+		end
+	end
+	
+	def test_records_look_right
+		cp_ids = {}
+		@pdb.data.each do |record|
+			assert record.corridor.length > 0, 					"Corridor should not be empty"
+			assert record.site.length > 0, 							"Site should not be empty"
+			assert (1..4).include?(record.direction), 	"Direction should be 1-4"
+			assert (0..9).include?(record.lanes), 			"Lanes should be between 0 and 9, found #{record.lanes}"
+			assert (0..9).include?(record.hov_lane), 		"Hov Lane should be between 0 and 9, found #{record.hov_lane}"
+			assert !cp_ids[record.cp_id], 							"Each cp_id should be unique, #{cp_ids[record.cp_id].inspect} overlaps with #{record.inspect}"
+			cp_ids[record.cp_id] = record
+		end
+	end
+	
+	
+	def test_database_round_tripping
+		@pdb.write_file(@temp_path)
+		@loaded = Palm::WabaDB.new(TestCollectionPointRecord)
+		@loaded.load_file(@temp_path)
+		
+		# Ensure they're two different objects
+		assert(@pdb != @loaded) 
+		
+		# Test that the loaded data is the same as the original
+		@pdb.data.zip(@loaded.data) do |expected, actual|
+			assert_equal expected.class.fields, actual.class.fields, "Records should have the same fields"
+			expected.class.fields.map{|f| f.name}.each do |name|
+				assert_equal expected.send(name), actual.send(name), "Field #{name} did not match"
+			end
+		end
+		
+	end
+	
+	def test_binary_equality
+		@pdb.write_file(@temp_path)
+		
+		# Ensure the files are the same size
+		assert_equal File.size(@path), File.size(@temp_path)
+		# Ensure the files are identical
+		assert_equal IO.read(@path), IO.read(@temp_path)
+	end
+	
+end

data/test/waba_records_test.rb

@@ -0,0 +1,75 @@
+require File.dirname(__FILE__) + '/test_helper.rb'
+
+class TestWabaRecord < Palm::WabaRecord
+	class_id 072
+	field :corridor, 	:string 
+	field :site, 			:string
+	field :direction, :byte
+	def caps_site
+		site.upcase
+	end
+end
+
+
+class TC_WabaRecords < Test::Unit::TestCase
+	def setup
+		@record = TestWabaRecord.new
+	end
+
+	def teardown
+	end
+	
+	def test_record_has_expected_fields
+		assert_equal(3, TestWabaRecord.fields.length)
+		assert_equal [:corridor,:site,:direction], TestWabaRecord.fields.map{|f| f.name}
+		assert_equal [:string,:string,:byte], TestWabaRecord.fields.map{|f| f.type}
+	end
+	
+	def test_fields_are_readable_and_writeable
+		fill_record(@record)
+		assert_record(@record)
+	end
+	
+	# Odd things can happen when metaprogramming, lets make sure variables
+	# are stored in the right places
+	def test_records_dont_overlap
+		a = TestWabaRecord.new; 
+		a.site = "A"
+		b = TestWabaRecord.new
+		b.site = "B"
+		assert_equal(a.site, "A")
+		assert_equal(b.site, "B")
+	end
+	
+	def test_class_id_is_accesible
+		assert_equal(072, @record.class_id)
+	end
+	
+	def test_io_round_tripping
+		s = ""
+		io = Palm::WabaStringIO.new(s, "w")
+		fill_record(@record)
+		@record.write(io)
+		@load_record = TestWabaRecord.new
+		@load_record.read( Palm::WabaStringIO.new(s, "r") )
+		assert_record(@load_record)
+	end
+	
+	def test_class_can_have_helper_methods
+		fill_record(@record)
+		assert_equal "TEST SITE", @record.caps_site
+	end
+	
+	def fill_record(record)
+		record.corridor		= "I-5"
+		record.direction	= 4
+		record.site 			= "Test Site"
+	end
+	
+	def assert_record(record)
+		assert_equal("I-5", record.corridor)
+		assert_equal(4, record.direction)
+		assert_equal("Test Site", record.site)
+	end
+	
+end

metadata

@@ -0,0 +1,74 @@
+--- !ruby/object:Gem::Specification 
+rubygems_version: 0.8.11
+specification_version: 1
+name: palm
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+date: 2007-01-02 00:00:00 -08:00
+summary: Pure Ruby library for reading and writing Palm PDB databases.
+require_paths: 
+- lib
+email: netghost@u.washington.edu
+homepage: http://palm.rubyforge.org
+rubyforge_project: palm
+description: Pure Ruby library for reading and writing Palm PDB databases.
+autorequire: 
+default_executable: 
+bindir: bin
+has_rdoc: true
+required_ruby_version: !ruby/object:Gem::Version::Requirement 
+  requirements: 
+  - - ">"
+    - !ruby/object:Gem::Version 
+      version: 0.0.0
+  version: 
+platform: ruby
+signing_key: 
+cert_chain: 
+authors: 
+- Adam Sanderson
+files: 
+- CHANGELOG.txt
+- History.txt
+- Manifest.txt
+- README.txt
+- Rakefile
+- lib/palm.rb
+- lib/palm/palm_record.rb
+- lib/palm/palm_support.rb
+- lib/palm/pdb.rb
+- lib/palm/raw_record.rb
+- lib/palm/version.rb
+- lib/palm/waba_db.rb
+- lib/palm/waba_io.rb
+- lib/palm/waba_record.rb
+- setup.rb
+- test/HovData.pdb
+- test/pdb_test.rb
+- test/test_helper.rb
+- test/waba_db_test.rb
+- test/waba_records_test.rb
+test_files: 
+- test/pdb_test.rb
+- test/waba_db_test.rb
+- test/waba_records_test.rb
+rdoc_options: []
+
+extra_rdoc_files: []
+
+executables: []
+
+extensions: []
+
+requirements: []
+
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Version::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.1.6
+    version: