RSokoban 0.74 → 0.76

data/test/tc_level_set.rb

@@ -31,19 +31,19 @@ class TC_LevelSet < Test::Unit::TestCase
 	def test_raw_levels_list_accessors
 		ins = RSokoban::LevelSet.new
 		list = [].push(RSokoban::RawLevel.new('title', ['###']))
-		ins.rawLevels = list
-		assert_equal list, ins.rawLevels
+		ins.raw_levels = list
+		assert_equal list, ins.raw_levels
 	end
 	
 	def test_default_raw_levels_list
 		ins = RSokoban::LevelSet.new
-		assert_equal [], ins.rawLevels
+		assert_equal [], ins.raw_levels
 	end
 	
 	def test_get_size
 		ins = RSokoban::LevelSet.new
 		list = [].push(RSokoban::RawLevel.new('title', ['###']))
-		ins.rawLevels = list
+		ins.raw_levels = list
 		assert_equal 1, ins.size
 	end
 	

data/test/tc_map.rb

@@ -1,11 +1,12 @@
 class TC_Map < Test::Unit::TestCase
-
+	include RSokoban
+	
 	def setup
-		@map = RSokoban::Map.new
+		@map = Map.new
 	end
 	
 	def test_default_picture_is_empy
-		assert_equal [], RSokoban::Map.new.rows
+		assert_equal [], Map.new.rows
 	end
 	
 	def test_assigning_rows
@@ -13,16 +14,52 @@ class TC_Map < Test::Unit::TestCase
 		assert_equal ['###', '# #', '###'], @map.rows
 	end
 	
-	def test_get_height
+Level_1 = [
+'    #####',
+'    #   #',
+'    #$  #',
+'  ###  $##',
+'  #  $ $ #',
+'### # ## #   ######',
+'#   # ## #####  ..#',
+'# $  $          ..#',
+'##### ### #@##  ..#',
+'    #     #########',
+'    #######']
+
+Level_1_after_transform = [
+'oooo#####oooooooooo',
+'oooo#   #oooooooooo',
+'oooo#$  #oooooooooo',
+'oo###  $##ooooooooo',
+'oo#  $ $ #ooooooooo',
+'### # ## #ooo######',
+'#   # ## #####  ..#',
+'# $  $          ..#',
+'##### ### #@##  ..#',
+'oooo#     #########',
+'oooo#######oooooooo']
+	
+	def test_map_should_tranform_the_array
+		map = Map.new(Level_1)
+		assert_equal Level_1_after_transform, map.rows
+	end
+	
+	def test_height
 		@map.rows = ['###', '# #', '###']
 		assert_equal 3, @map.height
 	end
 	
-	def test_get_width
+	def test_width
 		@map.rows = ['###', '####', '##']
 		assert_equal 4, @map.width
 	end
 	
+	def test_width_at_instanciation
+		map = Map.new ['###', '####', '##']
+		assert_equal 4, map.width
+	end
+	
 	def test_get_a_row
 		@map.rows = ['###', '# #', '###']
 		assert_equal '# #', @map[1]
@@ -30,11 +67,10 @@ class TC_Map < Test::Unit::TestCase
 	
 	def test_each_row
 		@map.rows = ['#', '##', '###']
-		expected = '#'
-		@map.each {|row|
-			assert_equal expected, row
-			expected += '#'
-		}
+		assert_equal '#oo', @map.rows[0]
+		assert_equal '##o', @map.rows[1]
+		assert_equal '###', @map.rows[2]
+		assert_equal nil, @map.rows[3]
 	end
 	
 end

data/test/tc_record.rb

@@ -0,0 +1,100 @@
+class TC_Record < Test::Unit::TestCase
+	include RSokoban
+
+	RECORD_ORIGINAL = 'record/original.yaml'
+	RECORD_TEST = 'record/test.yaml'
+	
+	def get_original
+		Record.new RECORD_ORIGINAL
+	end
+
+	def test_no_file
+		assert_raise(ArgumentError) do
+			Record.new 'record/truc.yaml'
+		end
+	end
+	
+	def test_load_file_is_a_synonym_of_new
+		record = Record.load_file RECORD_ORIGINAL
+		assert record.respond_to? :record_of_level
+	end
+	
+	def test_get_record_of_level_1
+		record = get_original
+		num = record.record_of_level(1)
+		assert_equal 200, num
+	end
+	
+	def test_get_record_of_level_22
+		record = get_original
+		num = record.record_of_level(22)
+		assert_equal 321, num
+	end
+	
+	def test_get_record_that_doesnt_exist
+		record = get_original
+		num = record.record_of_level(100)
+		assert_equal nil, num
+	end
+	
+	def test_create_a_new_record_file
+		begin
+			record = Record.load_file RECORD_TEST
+		rescue ArgumentError => e
+			record = Record.create RECORD_TEST
+		ensure 
+			assert File.exist? RECORD_TEST
+			assert record.respond_to? :record_of_level
+		end
+	ensure
+		FileUtils.remove_file(RECORD_TEST) if File.exist?(RECORD_TEST)
+	end
+	
+	def test_cannot_create_existing_file
+		assert_raise(ArgumentError) do
+			Record.create 'record/original.yaml'
+		end
+	end
+	
+	def test_save_a_new_record
+		record = Record.create RECORD_TEST
+		# level number, number of moves
+		record.add 1, 123
+		num = record.record_of_level(1)
+		assert_equal 123, num
+	ensure
+		FileUtils.remove_file(RECORD_TEST) if File.exist?(RECORD_TEST)
+	end
+	
+	def test_save_a_new_record_to_file
+		record = Record.create RECORD_TEST
+		record.add 1, 123
+		record = Record.load_file RECORD_TEST
+		num = record.record_of_level(1)
+		assert_equal 123, num
+	ensure
+		FileUtils.remove_file(RECORD_TEST) if File.exist?(RECORD_TEST)
+	end
+	
+	def test_update_a_record
+		record = Record.create RECORD_TEST
+		record.add 1, 123
+		record.add 1, 456
+		num = record.record_of_level(1)
+		assert_equal 456, num
+	ensure
+		FileUtils.remove_file(RECORD_TEST) if File.exist?(RECORD_TEST)
+	end
+	
+	def test_updtae_a_record_to_file
+		record = Record.create RECORD_TEST
+		record.add 1, 123
+		record.add 1, 456
+		record = Record.load_file RECORD_TEST
+		num = record.record_of_level(1)
+		assert_equal 456, num
+	ensure
+		FileUtils.remove_file(RECORD_TEST) if File.exist?(RECORD_TEST)
+	end
+	
+end

data/test/{tc_level_loader.rb → tc_set_loader.rb}

@@ -1,84 +1,85 @@
 
-class TC_LevelLoader < Test::Unit::TestCase
-
+class TC_SetLoader < Test::Unit::TestCase
+	include RSokoban
+	
 	def setup
 		$RSOKOBAN_DATA_PATH = File.expand_path(File.dirname(__FILE__))
 	end
 	
 	def test_instance
-		ins = RSokoban::LevelLoader.new "original.xsb"
-		assert_equal true, ins.instance_of?(RSokoban::LevelLoader)
+		ins = SetLoader.new "original.xsb"
+		assert_equal true, ins.instance_of?(SetLoader)
 	end
 	
 	def test_NoFileError
-		assert_raise(RSokoban::NoFileError) do
-			ins = RSokoban::LevelLoader.new "inexistant"
+		assert_raise(NoFileError) do
+			ins = SetLoader.new "inexistant"
 		end
 	end
 	
 	def test_title_of_set
-		ins = RSokoban::LevelLoader.new "test_file1.xsb"
+		ins = SetLoader.new "test_file1.xsb"
 		assert_equal 'test level', ins.title
 	end
 	
 	def test_description_of_set
-		ins = RSokoban::LevelLoader.new "test_file1.xsb"
+		ins = SetLoader.new "test_file1.xsb"
 		assert_equal "one simple level to test\n", ins.file_description
 	end
 	
 	def test_level_1
-		ins = RSokoban::LevelLoader.new "test_file2.xsb"
-		level = RSokoban::Level.new(RSokoban::RawLevel.new('1', ['#####', '#.$@#', '#####']))
+		ins = SetLoader.new "test_file2.xsb"
+		level = Level.new(RawLevel.new('1', Map.new(['#####', '#.$@#', '#####'])))
 		assert_equal level, ins.level(1)
 	end
 	
 	def test_level_2
-		ins = RSokoban::LevelLoader.new "test_file2.xsb"
-		level = RSokoban::Level.new(RSokoban::RawLevel.new('2', ['######', '#. $@#', '######']))
+		ins = SetLoader.new "test_file2.xsb"
+		level = Level.new(RawLevel.new('2', ['######', '#. $@#', '######']))
 		assert_equal level, ins.level(2)
 	end
 
 	def test_level_3
-		ins = RSokoban::LevelLoader.new "test_file2.xsb"
-		level = RSokoban::Level.new(RSokoban::RawLevel.new('3', ['#####', '#   #', '#$  #', '#. @#', '#####' ]))
+		ins = SetLoader.new "test_file2.xsb"
+		level = Level.new(RawLevel.new('3', ['#####', '#   #', '#$  #', '#. @#', '#####' ]))
 		assert_equal level, ins.level(3)
 	end
 	
 	def test_level_4_title
-		ins = RSokoban::LevelLoader.new "test_file2.xsb"
+		ins = SetLoader.new "test_file2.xsb"
 		assert_equal '4', ins.level(4).title
 	end
 	
 	def test_level_5_title
-		ins = RSokoban::LevelLoader.new "test_file2.xsb"
+		ins = SetLoader.new "test_file2.xsb"
 		assert_equal '5', ins.level(5).title
 	end
 	
 	def test_level_6_title
-		ins = RSokoban::LevelLoader.new "test_file2.xsb"
+		ins = SetLoader.new "test_file2.xsb"
 		assert_equal '6', ins.level(6).title
 	end
 	
 	def test_level_6
-		ins = RSokoban::LevelLoader.new "test_file2.xsb"
-		level = RSokoban::Level.new(RSokoban::RawLevel.new('6', ['#####', '#.$@#', '#####']))
+		ins = SetLoader.new "test_file2.xsb"
+		level = Level.new(RawLevel.new('6', Map.new(['#####', '#.$@#', '#####'])))
 		assert_equal level, ins.level(6)
 	end
 	
 	def test_level_number_that_doesnt_exist
-		ins = RSokoban::LevelLoader.new "test_file2.xsb"
-		assert_raise(RSokoban::LevelNumberTooHighError) do
+		ins = SetLoader.new "test_file2.xsb"
+		assert_raise(LevelNumberTooHighError) do
 			assert_equal '99', ins.level(99).title
 		end
 	end
 	
 	def test_get_size_of_set
-		ins = RSokoban::LevelLoader.new "original.xsb"
+		ins = SetLoader.new "original.xsb"
 		assert_equal 90, ins.size
 	end
 	
 	def test_get_the_description_of_a_set
-		ins = RSokoban::LevelLoader.new "original.xsb"
+		ins = SetLoader.new "original.xsb"
 		desc = "Copyright: a\nE-Mail:\nWeb Site:\n\nThe 50 original levels from Sokoban plus the 40 from Extra.\n"
 		assert_equal desc, ins.file_description
 	end
@@ -88,7 +89,7 @@ class TC_LevelLoader < Test::Unit::TestCase
 	# There was a bug where size was majored by one when the xsb file
 	# finish by several blank lines.
 	def test_get_size_of_set_buggy
-		ins = RSokoban::LevelLoader.new "test_file2.xsb"
+		ins = SetLoader.new "test_file2.xsb"
 		assert_equal 6, ins.size
 	end
 	

data/test/test.rb

@@ -6,7 +6,7 @@ require "rsokoban"
 require "test/unit"
 
 require "../test/tc_level"
-require "../test/tc_level_loader"
+require "../test/tc_set_loader"
 require "../test/tc_level_set"
 require "../test/tc_raw_level"
 require "../test/tc_position"
@@ -16,6 +16,13 @@ require "../test/tc_move_recorder"
 require "../test/tc_map"
 require "../test/ui/tc_console"
 require "../test/ui/tc_player_action"
+require "../test/ui/tc_skin"
 require "../test/tc_extensions"
-require "../test/tc_game"
 require "../test/tc_move_result"
+require "../test/tc_game"
+require "../test/tc_game_ui"
+require "../test/tc_game_gui"
+require "../test/tc_game_factory"
+require "../test/tc_layered_map"
+require "../test/tc_record"
+require "../test/tc_install"

data/test/ui/tc_skin.rb

@@ -0,0 +1,71 @@
+class TC_Skin < Test::Unit::TestCase
+	include RSokoban
+	
+	$RSOKOBAN_PATH = File.expand_path(File.dirname(__FILE__) + '/../..')
+	
+	BLUE_GRANITE_FILENAMES = { 
+		:store => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'store.bmp'),
+		:crate => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'crate.bmp'),
+		:floor => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'floor.bmp'),
+		:crate_store => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'crate_store.bmp'),
+		:outside => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'outside.bmp'),
+		:man_up => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'man_up.bmp'),
+		:man_down => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'man_down.bmp'),
+		:man_left => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'man_left.bmp'),
+		:man_right => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'man_right.bmp'),
+		:man_store_up => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'man_store_up.bmp'),
+		:man_store_down => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'man_store_down.bmp'),
+		:man_store_left => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'man_store_left.bmp'),
+		:man_store_right => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'man_store_right.bmp'),
+		:wall => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_d => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_dl => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_dlr => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_dr => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_l => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_lr => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_r => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_u => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_ud => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_udl => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_udlr => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_udr => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_ul => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_ulr => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp'),
+		:wall_ur => File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite', 'wall.bmp')}
+	
+	def test_list_all_skins
+		list = UI::Skin.new.list_skins
+		# This is the list of skins provided with the program
+		["Sokodroid", "BlueGranite", "HeavyMetal"].each do |item|
+			assert list.include? item
+		end
+	end
+	
+	def test_get_path_of_a_skin_dir
+		sk = UI::Skin.new
+		expected = File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite')
+		assert_equal expected, sk.path_of_skin('BlueGranite')
+	end
+	
+	def test_get_path_of_an_unexisting_dir
+		sk = UI::Skin.new
+		assert_raise(ArgumentError) do
+			sk.path_of_skin('unknown')
+		end
+	end
+	
+	def test_size_of_a_skin
+		sk = UI::Skin.new
+		full_path_dir = File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite')
+		assert_equal 30, sk.size_of(full_path_dir)
+	end
+	
+	def test_list_of_filename
+		sk = UI::Skin.new
+		full_path_dir = File.join($RSOKOBAN_PATH, 'skins', 'BlueGranite')
+		filenames = sk.filenames full_path_dir
+		assert_equal BLUE_GRANITE_FILENAMES, filenames
+	end
+
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: RSokoban
 version: !ruby/object:Gem::Version 
-  version: "0.74"
+  version: "0.76"
 platform: ruby
 authors: 
 - Xavier Nayrac
@@ -9,11 +9,15 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-01-31 00:00:00 +01:00
+date: 2011-02-27 00:00:00 +01:00
 default_executable: 
 dependencies: []
 
-description: RSokoban is a clone of the famous Sokoban game. I wrote this program just to improve my skills in Ruby. Currently, you can play only in a console window. Enjoy the game !
+description: |-
+  RSokoban is a clone of the famous Sokoban game.
+  I wrote this program just to improve my skills in Ruby.
+  Note: Never tested on windows...
+  Enjoy the game !
 email: xavier.nayrac@gmail.com
 executables: 
 - rsokoban
@@ -35,12 +39,23 @@ files:
 - lib/rsokoban/ui/base_ui.rb
 - lib/rsokoban/ui/tk_ui.rb
 - lib/rsokoban/ui/tk_dialogs.rb
-- lib/rsokoban/ui/tk_box.rb
+- lib/rsokoban/ui/skin.rb
 - lib/rsokoban/ui/console.rb
 - lib/rsokoban/ui/player_action.rb
-- lib/rsokoban/level_loader.rb
+- lib/rsokoban/config.rb
+- lib/rsokoban/layered_map.rb
+- lib/rsokoban/record.rb
 - lib/rsokoban/raw_level.rb
+- lib/rsokoban/game/game.rb
+- lib/rsokoban/game/game_gui.rb
+- lib/rsokoban/game/game_factory.rb
+- lib/rsokoban/game/game_ui.rb
+- lib/rsokoban/game/game_curses.rb
+- lib/rsokoban/game/game_portable.rb
+- lib/rsokoban/game/game_tk.rb
+- lib/rsokoban/set_loader.rb
 - lib/rsokoban/position.rb
+- lib/rsokoban/install.rb
 - lib/rsokoban/level.rb
 - lib/rsokoban/map.rb
 - lib/rsokoban/extensions.rb
@@ -48,25 +63,64 @@ files:
 - lib/rsokoban/move_result.rb
 - lib/rsokoban/man.rb
 - bin/rsokoban
+- data/big.xsb
 - data/original.xsb
 - data/test.xsb
 - data/microban.xsb
-- skins/default
-- skins/default/outside.bmp
-- skins/default/store.bmp
-- skins/default/man_left.bmp
-- skins/default/man_up.bmp
-- skins/default/man_store_right.bmp
-- skins/default/man_right.bmp
-- skins/default/crate_store.bmp
-- skins/default/readme
-- skins/default/man_store_up.bmp
-- skins/default/floor.bmp
-- skins/default/man_store_left.bmp
-- skins/default/crate.bmp
-- skins/default/man_store_down.bmp
-- skins/default/wall.bmp
-- skins/default/man_down.bmp
+- skins/AntiqueDesk/outside.bmp
+- skins/AntiqueDesk/store.bmp
+- skins/AntiqueDesk/man_left.bmp
+- skins/AntiqueDesk/man_up.bmp
+- skins/AntiqueDesk/man_store_right.bmp
+- skins/AntiqueDesk/man_right.bmp
+- skins/AntiqueDesk/crate_store.bmp
+- skins/AntiqueDesk/skin.conf
+- skins/AntiqueDesk/man_store_up.bmp
+- skins/AntiqueDesk/floor.bmp
+- skins/AntiqueDesk/man_store_left.bmp
+- skins/AntiqueDesk/crate.bmp
+- skins/AntiqueDesk/man_store_down.bmp
+- skins/AntiqueDesk/wall.bmp
+- skins/AntiqueDesk/man_down.bmp
+- skins/HeavyMetal/outside.bmp
+- skins/HeavyMetal/store.bmp
+- skins/HeavyMetal/wall_udl.bmp
+- skins/HeavyMetal/wall_d.bmp
+- skins/HeavyMetal/wall_u.bmp
+- skins/HeavyMetal/crate_store.bmp
+- skins/HeavyMetal/wall_udr.bmp
+- skins/HeavyMetal/skin.conf
+- skins/HeavyMetal/floor.bmp
+- skins/HeavyMetal/crate.bmp
+- skins/HeavyMetal/wall_udlr.bmp
+- skins/HeavyMetal/wall_lr.bmp
+- skins/HeavyMetal/man_store.bmp
+- skins/HeavyMetal/wall_ur.bmp
+- skins/HeavyMetal/wall_dlr.bmp
+- skins/HeavyMetal/wall_dl.bmp
+- skins/HeavyMetal/wall_r.bmp
+- skins/HeavyMetal/wall.bmp
+- skins/HeavyMetal/wall_ud.bmp
+- skins/HeavyMetal/wall_dr.bmp
+- skins/HeavyMetal/wall_ulr.bmp
+- skins/HeavyMetal/man.bmp
+- skins/HeavyMetal/wall_ul.bmp
+- skins/HeavyMetal/wall_l.bmp
+- skins/BlueGranite/outside.bmp
+- skins/BlueGranite/store.bmp
+- skins/BlueGranite/man_left.bmp
+- skins/BlueGranite/man_up.bmp
+- skins/BlueGranite/man_store_right.bmp
+- skins/BlueGranite/man_right.bmp
+- skins/BlueGranite/crate_store.bmp
+- skins/BlueGranite/skin.conf
+- skins/BlueGranite/man_store_up.bmp
+- skins/BlueGranite/floor.bmp
+- skins/BlueGranite/man_store_left.bmp
+- skins/BlueGranite/crate.bmp
+- skins/BlueGranite/man_store_down.bmp
+- skins/BlueGranite/wall.bmp
+- skins/BlueGranite/man_down.bmp
 - README.rdoc
 - TODO
 - NEWS
@@ -74,26 +128,35 @@ files:
 - COPYING
 - Rakefile
 - test/test_file1.xsb
+- test/tc_set_loader.rb
 - test/tc_move_recorder.rb
-- test/tc_level_loader.rb
 - test/test_file2.xsb
 - test/tc_level.rb
 - test/tc_move_result.rb
+- test/record/original.yaml
 - test/tc_position.rb
 - test/original.xsb
-- test/ui
 - test/ui/tc_console.rb
+- test/ui/tc_skin.rb
 - test/ui/tc_player_action.rb
+- test/tc_game_gui.rb
 - test/tc_map.rb
+- test/tc_game_factory.rb
+- test/tc_install.rb
 - test/tc_extensions.rb
 - test/tc_raw_level.rb
 - test/tc_man.rb
+- test/tc_layered_map.rb
 - test/tc_game.rb
 - test/test.rb
 - test/tc_moveable.rb
+- test/tc_record.rb
+- test/tc_game_ui.rb
 - test/tc_level_set.rb
-has_rdoc: false
+has_rdoc: true
 homepage: https://github.com/lkdjiin/RSokoban/wiki
+licenses: []
+
 post_install_message: 
 rdoc_options: []
 
@@ -114,9 +177,9 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: []
 
 rubyforge_project: 
-rubygems_version: 1.2.0
+rubygems_version: 1.3.4
 signing_key: 
-specification_version: 2
+specification_version: 3
 summary: Clone of the Sokoban game.
 test_files: 
 - test/test.rb

data/lib/rsokoban/level_loader.rb

@@ -1,81 +0,0 @@
-module RSokoban
-
-	# I load a file containing the levels of the game. On instanciation,
-	# you tell me a file (in xsb file format) containing one or more levels.
-	#
-	# You can then ask for a particular level (a Level object). You can use me too
-	# to find the description of a level.
-	# @todo give some examples
-	# @todo document and refactor
-	class LevelLoader
-	
-		# @param [String] filename an xsb filename.
-		#   This file is searched in thedata/ folder.
-		# @raise [RSokoban::NoFileError] if filename doesn't exist
-		# @see LevelSet overview of .xsb file format
-		def initialize filename
-			filename = "#{$RSOKOBAN_DATA_PATH}/" + filename
-			raise NoFileError unless File.exist?(filename)
-			@set = LevelSet.new
-			file = open(filename)
-			@set.title = file.readline.get_xsb_info_line_chomp
-			file.readline # must be blank line
-			line = file.readline
-			desc = ''
-			while line[0] == ?; do
-				desc += line.get_xsb_info_line
-				line = file.readline
-			end
-			@set.description = desc
-			
-			loop do
-				begin
-					line = file.readline.chomp
-					raw = []
-					while line =~ /^ *#/
-						raw.push line
-						line = file.readline.chomp
-					end
-					line = line.get_xsb_info_line_chomp
-					@set.rawLevels.push RawLevel.new(line, raw) unless raw.empty?
-					
-					line = file.readline
-					while line[0, 1] == ';'
-						line = file.readline
-					end
-					# must be a blank line here
-				rescue EOFError
-					break
-				end
-			end
-		end
-		
-		# Get the level numbered +num+
-		# @param [Fixnum] num a level number in base 1
-		# @return [Level]
-		def level num
-			raise LevelNumberTooHighError if num > @set.rawLevels.size
-			Level.new @set.rawLevels[num-1]
-		end
-		
-		# Get the description field of the loaded set of levels.
-		# @return [String] possibly multi-line
-		def file_description
-			@set.description
-		end
-		
-		# Get number of levels in this set.
-		# @return [Fixnum]
-		def size
-			@set.size
-		end
-		
-		# Get title of this set.
-		# @return [String]
-		def title
-			@set.title
-		end
-		
-	end
-
-end