nera 0.0.1

data/test/test_nera_run_records.rb

@@ -0,0 +1,290 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+
+class TC_NERA_RUN_RECORDS < Test::Unit::TestCase
+
+  def setup
+    @testdir = 'test_run_recs'
+    FileUtils.mkdir( @testdir)
+    FileUtils.chdir( @testdir)
+    @table_file = 'run_recs.pstore'
+    NERA::RunRecords.create_table( @table_file)
+    @rrecs = NERA::RunRecords.new( @table_file)
+  end
+
+  def teardown
+    FileUtils.chdir('..')
+    FileUtils.rm_r( @testdir)
+  end
+
+  def test_initialize
+    assert_raise( RuntimeError) {
+      NERA::RunRecords.new( 'unknown')
+    }
+  end
+
+  def test_create_a_new_table
+    n = NERA::RunRecords.create_table( @table_file)
+    assert_nil(n)
+    
+    n = NERA::RunRecords.create_table('hoge')
+    assert( File.exist?('hoge') )
+    assert_equal( true, n)
+  end
+
+  def test_keys
+    a = [ [:id, Integer], [:state, Symbol], [:created_at, DateTime],
+          [:job_id, Integer], [:seed, Integer], 
+          [:start_at, DateTime], [:finish_at, DateTime], 
+          [:included_at, DateTime], [:real_time, Float], 
+          [:user_time, Float], [:host_name, String], 
+          [:omp_threads, Integer], [:mpi_processes, Integer]
+        ]
+    k = a.map do |x| x[0] end
+    assert_equal( k, @rrecs.keys)
+  end
+
+  def test_add
+    r = @rrecs.add( 1)
+    l = @rrecs.list_all
+    lf = @rrecs.list_all_finished
+    ln = @rrecs.list_all_not_finished
+    assert_equal( 1, r.size)
+    assert_equal( r[0][:id], 1)
+    assert( r[0][:seed] > 0 )
+    assert_equal( r[0][:omp_threads], 1)
+    assert_equal( r[0][:mpi_processes], 1)
+    assert_equal( 1, l.size)
+    assert_equal( 0, lf.size)
+    assert_equal( 1, ln.size)
+
+    r = @rrecs.add( 99)
+    a = @rrecs.list_all
+    assert_equal( 99, r.size)
+    assert_equal( 100, a.size)
+    
+    r = @rrecs.add( 20)
+    a = @rrecs.list_all
+    assert_equal( 20, r.size)
+    assert_equal( 120, a.size)
+    f = a.find do |r| r[:id] == 120 end
+    assert( f)
+  end
+
+  def test_set_job_id
+    r = @rrecs.add( 10)
+    id = r[0][:id]
+    jid = @rrecs.set_job_id( id, 10, 1)
+    assert_equal( 1, jid)
+    r = @rrecs.add( 10)
+    id = r[0][:id]
+    assert_raise( RuntimeError) {
+      @rrecs.set_job_id( id, 11, 1)
+    }
+    assert_raise( RuntimeError) {
+      @rrecs.set_job_id( 21, 1, 1)
+    }
+    assert_raise( ArgumentError) {
+      @rrecs.set_job_id( 11, 1, "1")
+    }
+    assert_raise( ArgumentError) {
+      @rrecs.set_job_id( "11", 1, 1)
+    }
+    assert_raise( ArgumentError) {
+      @rrecs.set_job_id( 11, "1", 1)
+    }
+    jid = @rrecs.set_job_id(11,10,2)
+    assert_raise( RuntimeError) {
+      @rrecs.set_job_id(11,10,2)
+    }
+
+    l = @rrecs.list_all
+    l.find_all do |x|
+      x[:job_id] == 1
+    end
+    assert_equal( 20, l.size)
+    k = l.find_all do |x|
+      x[:job_id] == 2
+    end
+    assert_equal( 10, k.size)
+  end
+
+  def test_list
+    l = @rrecs.list_all
+    lf = @rrecs.list_all_finished
+    ln = @rrecs.list_all_not_finished
+    assert( l.is_a?(Array))
+    assert( lf.is_a?(Array))
+    assert( ln.is_a?(Array))
+    assert_equal( 0, l.size)
+    assert_equal( 0, lf.size)
+    assert_equal( 0, ln.size)
+    
+    @rrecs.add( 5)
+    l = @rrecs.list_all
+    lf = @rrecs.list_all_finished
+    ln = @rrecs.list_all_not_finished
+    assert_equal( 5, l.size)
+    assert_equal( 0, lf.size)
+    assert_equal( 5, ln.size)
+    5.times do |i|
+      assert( l[i].is_a?(Hash) )
+      assert_equal( 0, (l[i].keys - @rrecs.keys).size)
+      assert_equal( 0, (ln[i].keys - @rrecs.keys).size)
+    end
+
+    @rrecs.update_state_to_finished( 1, DateTime.now, DateTime.now, DateTime.now, 0.5, 0.5, "host_hoge")
+    @rrecs.update_state_to_finished( 2, DateTime.now, DateTime.now, DateTime.now, 0.5, 0.5, "host_hoge")
+    l2 = @rrecs.list_all
+    lf = @rrecs.list_all_finished
+    ln = @rrecs.list_all_not_finished
+    assert_equal( 5, l2.size)
+    assert_equal( 2, lf.size)
+    assert_equal( 3, ln.size)
+    found1 = l.find do |r| r[:id] == 3 end
+    found2 = l2.find do |r| r[:id] == 3 end
+    assert_equal( found1, found2)
+    found1 = l.find do |r| r[:id] == 4 end
+    found2 = l2.find do |r| r[:id] == 4 end
+    assert_equal( found1, found2)
+    found1 = l.find do |r| r[:id] == 5 end
+    found2 = l2.find do |r| r[:id] == 5 end
+    assert_equal( found1, found2)
+    
+    2.times do |i|
+      assert( lf[i].is_a?(Hash) )
+      assert_equal( 0, (lf[i].keys - @rrecs.keys).size)
+    end
+
+    found = lf.find do |rec|
+      rec[:id] == 3
+    end
+    assert_nil( found)
+    found = lf.find do |rec|
+      rec[:id] == 2
+    end
+    assert(found)
+
+    d = @rrecs.destroy( 4)
+    assert( d)
+    l = @rrecs.list_all
+    lf = @rrecs.list_all_finished
+    ln = @rrecs.list_all_not_finished
+    assert_equal( 4, l.size)
+    assert_equal( 2, lf.size)
+    assert_equal( 2, ln.size)
+  end
+
+  def test_update_state_to_finished
+    r = @rrecs.add( 10)
+    id = r[0][:id]
+    jid = @rrecs.set_job_id( id, 10, 1)
+    l = @rrecs.list_all_not_finished
+    assert( 10, l.size)
+
+    d = DateTime.now
+    @rrecs.update_state_to_finished( 1, d, d, d, 0.5, 0.5, "acp1")
+    l = @rrecs.list_all_not_finished
+    assert( 9, l.size)
+    lf = @rrecs.list_all_finished
+    assert( 1, lf.size)
+    p lf[0]
+    assert_equal( 1, lf[0][:id])
+    assert_equal( d, lf[0][:start_at])
+    assert_equal( d, lf[0][:finish_at])
+    assert_equal( d, lf[0][:included_at])
+    assert_equal( 0.5, lf[0][:real_time])
+    assert_equal( 0.5, lf[0][:user_time])
+    assert_equal( "acp1", lf[0][:host_name])
+    assert_equal( :finished, lf[0][:state])
+    n = @rrecs.update_state_to_finished( 1, d, d, d, 0.5, 0.5, "acp1")
+    assert_nil( n)
+
+    assert_raise( ArgumentError) {
+      @rrecs.update_state_to_finished( "1", DateTime.now, DateTime.now, DateTime.now, 0.5, 0.5, "acp1")
+    }
+    assert_raise( ArgumentError) {
+      @rrecs.update_state_to_finished( 1, "08-25-12", DateTime.now, DateTime.now, 0.5, 0.5, "acp1")
+    }
+    assert_raise( ArgumentError) {
+      @rrecs.update_state_to_finished( 1, DateTime.now, "08-25-12", DateTime.now, 0.5, 0.5, "acp1")
+    }
+    assert_raise( ArgumentError) {
+      @rrecs.update_state_to_finished( 1, DateTime.now, DateTime.now, "08-25-12", 0.5, 0.5, "acp1")
+    }
+    assert_raise( ArgumentError) {
+      @rrecs.update_state_to_finished( 1, DateTime.now, DateTime.now, DateTime.now, 5, 0.5, "acp1")
+    }
+    assert_raise( ArgumentError) {
+      @rrecs.update_state_to_finished( 1, DateTime.now, DateTime.now, DateTime.now, 0.5, 5, "acp1")
+    }
+    assert_raise( ArgumentError) {
+      @rrecs.update_state_to_finished( 1, DateTime.now, DateTime.now, DateTime.now, 0.5, 0.5, 13)
+    }
+    
+    n = @rrecs.update_state_to_finished( 11, d, d, d, 0.5, 0.5, "acp1")
+    assert_nil( n)
+  end
+
+  def test_destroy
+    r = @rrecs.add( 10)
+    id = r[0][:id]
+    jid = @rrecs.set_job_id( id, 10, 1)
+
+    rec = @rrecs.destroy( 1)
+    assert( rec.is_a?(Hash))
+    assert_equal(1, rec[:id])
+    assert_equal(:not_finished, rec[:state])
+    assert_equal(jid, rec[:job_id])
+    rec = @rrecs.destroy( 1)
+    assert_nil(nil)
+    assert_equal( 9, @rrecs.list_all.size)
+
+    d = DateTime.now
+    @rrecs.update_state_to_finished( 2, d, d, d, 0.5, 0.5, "acp1")
+    rec = @rrecs.destroy( 2)
+    assert_nil(rec)
+    assert_equal(9, @rrecs.list_all.size)
+  end
+
+  def test_destroy_job_id
+    r = @rrecs.add(2)
+    id = r[0][:id]
+    jid = @rrecs.set_job_id( id, 2, 1)
+
+    f = @rrecs.destroy_job_id(1)
+    assert(f)
+    assert_equal( 0, @rrecs.list_all.size)
+    f = @rrecs.destroy_job_id(1)
+    assert_nil(f)
+
+    r = @rrecs.add(1)
+    id = r[0][:id]
+    jid = @rrecs.set_job_id( id, 1, 2)
+    d = DateTime.now
+    @rrecs.update_state_to_finished( 3, d, d, d, 0.5, 0.5, "acp1")
+    f = @rrecs.destroy_job_id(2)
+    assert_nil(f)
+  end
+
+  def test_transaction
+    r = @rrecs.add( 10)
+    id = r[0][:id]
+    jid = @rrecs.set_job_id( id, 10, 1)
+    l = @rrecs.list_all_not_finished
+    assert( 10, l.size)
+
+    assert_raise(RuntimeError) {
+      @rrecs.transaction {
+        d = DateTime.now
+        @rrecs.update_state_to_finished(1,d,d,d,0.5,0.5,"hoge")
+        assert( 9, @rrecs.list_all_not_finished)
+        raise
+      }
+    }
+    l2 = @rrecs.list_all_not_finished
+    assert_equal( l, l2)
+    assert_equal( 10, l2.size)
+  end
+
+end

data/test/test_nera_simulator.rb

@@ -0,0 +1,26 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+
+class TC_NERA_SIMULATOR < Test::Unit::TestCase
+
+  def setup
+  end
+
+  def teardown
+  end
+
+  def test_inherited_simulators
+    sim = NERA::Simulator.inherited_simulators
+    p sim
+    assert( sim.is_a?(Array) )
+    assert_equal( 3, sim.size)
+    a = sim.find do |x|
+      x == Ising
+    end
+    assert(a)
+    a = sim.find do |x|
+      x == Heisenberg
+    end
+    assert(a)
+  end
+end

data/test/test_nera_simulator_layer_controller.rb

@@ -0,0 +1,54 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+
+class TC_NERA_SIM_LAYER_CONTROLLER < Test::Unit::TestCase
+
+  def setup
+    @testdir = 'test_sim_controller'
+    FileUtils.mkdir(@testdir)
+    FileUtils.chdir(@testdir)
+    @db_folder = "nera_db"
+    NERA::DbFolders.create_db( @db_folder)
+    @dbf = NERA::DbFolders.new( @db_folder)
+    @slc = NERA::SimulatorLayerController.new( @db_folder)
+  end
+
+  def teardown
+    FileUtils.chdir('..')
+    FileUtils.rm_r(@testdir)
+  end
+
+  def test_constructor
+    assert_raise( ArgumentError) {
+      NERA::SimulatorLayerController.new( @dbf)
+    }
+    assert_raise( RuntimeError) {
+      NERA::SimulatorLayerController.new( "hoge")
+    }
+    
+    assert( File.exist?( @dbf.path_to_simulators_table) )
+  end
+
+  def test_list
+    assert( @slc.list.is_a?(Array) )
+    assert_equal( 2, @slc.list.size)
+
+    found = @slc.list.find do |rec| rec[:name] == Ising.to_s end
+    assert( found)
+    assert( found[:id] > 0)
+    assert( found[:id] <= 2 )
+    assert( found[:created_at].is_a?(DateTime) )
+    assert( found[:updated_at].is_a?(DateTime) )
+    
+    found = @slc.list.find do |rec| rec[:name] == Temp.to_s end
+    assert_nil( found)
+    
+  end
+
+  def test_path_to_sim_layer
+    p = @slc.path_to_sim_layer
+    assert_equal( @db_folder+'/', p)
+  end
+  
+
+end

data/test/test_nera_simulator_records.rb

@@ -0,0 +1,140 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+
+class TC_NERA_SIM_RECS < Test::Unit::TestCase
+
+  def setup
+    @testdir = 'test_sim_recs'
+    FileUtils.mkdir(@testdir)
+    FileUtils.chdir(@testdir)
+    @path_to_db = 'sim_recs_table.marshal'
+    NERA::SimulatorRecords.create_table( @path_to_db)
+    @db = NERA::SimulatorRecords.new( @path_to_db)
+  end
+
+  def teardown
+    FileUtils.chdir('..')
+    FileUtils.rm_r(@testdir)
+  end
+
+  def test_constructor
+    assert_raise( RuntimeError) {
+      NERA::SimulatorRecords.new('unknown_file')
+    }
+  end
+
+  def test_create_table
+    f = NERA::SimulatorRecords.create_table( @path_to_db)
+    assert_equal( nil, f)
+  end
+
+  def test_keys
+    assert_equal( [:id,:name,:created_at,:updated_at], @db.keys)
+  end
+
+  def test_add
+    assert_raise( ArgumentError) {
+      @db.add( Temp)
+    }
+    
+    given_id = @db.add( Ising )
+    l = @db.list
+    assert_equal(1, given_id)
+    assert_equal( 1, l[0][:id])
+    assert_equal( "Ising", l[0][:name])
+    assert_equal( l[0][:updated_at], l[0][:created_at])
+
+    sleep 2
+    given_id = @db.add( XY )
+    l = @db.list
+    assert_equal(2, given_id)
+    assert_equal( 2, l[1][:id])
+    assert_equal( "XY", l[1][:name])
+    assert_equal( l[1][:updated_at], l[1][:created_at])
+
+    assert( l[0][:updated_at] < l[1][:updated_at])
+
+    flag = @db.add( XY )
+    assert_equal( nil, flag)
+  end
+
+  def add_three
+    @db.add( Ising )
+    @db.add( XY )
+    @db.add( Heisenberg )
+  end
+
+  def test_get_class
+    add_three
+    klass = @db.get_class(1)
+    assert_equal( Ising, klass)
+    klass = @db.get_class(3)
+    assert_equal( Heisenberg, klass)
+
+    klass = @db.get_class(5)
+    assert_nil(klass)
+    
+    assert_raise( ArgumentError) {
+      @db.get_class('2')
+    }
+  end
+  
+  def test_list
+    # ------
+    l = @db.list
+    assert( l.is_a?(Array) )
+    assert( l.size == 0 )
+
+    # ------
+    add_three
+    l = @db.list
+    assert_equal( 3, l.size)
+    l2 = l.dup
+    l2.sort! do |a,b|
+      a[:id] <=> b[:id]
+    end
+    assert_equal( l, l2)
+  end
+
+  def test_touch
+    add_three
+    sleep 3
+    flag = @db.touch( 3)
+    assert_equal(true, flag)
+    r3 = @db.list[2]
+    assert( r3[:created_at] < r3[:updated_at])
+    r2 = @db.list[1]
+    assert( r2[:created_at] == r2[:updated_at])
+
+    # ------
+    flag = @db.touch( 500)
+    assert_nil( flag)
+  end
+
+  def test_destroy
+    add_three
+    r3 = @db.list[2]
+    flag = @db.destroy(3)
+    assert_equal(r3, flag)
+
+    l = @db.list
+    assert_equal( 2, l.size)
+    assert_nil( l.find do |r| r[:id]==3 end )
+
+    flag = @db.destroy(500)
+    assert_nil(flag)
+  end
+
+  def test_transaction
+    add_three
+    assert_raise(RuntimeError) {
+      @db.transaction {
+        @db.destroy(2)
+        raise
+      }
+    }
+    l = @db.list
+    assert_equal( 3, l.size)
+  end
+  
+end

metadata

@@ -0,0 +1,125 @@
+--- !ruby/object:Gem::Specification 
+name: nera
+version: !ruby/object:Gem::Version 
+  version: 0.0.1
+platform: ruby
+authors: 
+- Yohsuke Murase
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-03-26 00:00:00 +09:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: newgem
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.3.0
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.8.0
+    version: 
+description: This is an application which helps you to manage a database for the Monte Carlo simulations.  For the dtailed usage, see http://nera.rubyforge.com
+email: 
+- murase@serow.t.u-tokyo.ac.jp
+executables: 
+- nera
+- nera_addsim
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- Manifest.txt
+- README.rdoc
+files: 
+- History.txt
+- Manifest.txt
+- README.rdoc
+- Rakefile
+- bin/nera
+- bin/nera_addsim
+- lib/nera.rb
+- lib/nera/nera_cui.rb
+- lib/nera/nera_database.rb
+- lib/nera/nera_db_folders.rb
+- lib/nera/nera_dialog.rb
+- lib/nera/nera_job_layer_controller.rb
+- lib/nera/nera_job_records.rb
+- lib/nera/nera_job_script.rb
+- lib/nera/nera_parameter_layer_controller.rb
+- lib/nera/nera_parameter_records.rb
+- lib/nera/nera_run_layer_controller.rb
+- lib/nera/nera_run_records.rb
+- lib/nera/nera_simulator.rb
+- lib/nera/nera_simulator_layer_controller.rb
+- lib/nera/nera_simulator_records.rb
+- lib/nera_addsim/make_simulator.rb
+- scripts/make_manifest.rb
+- test/runner.rb
+- test/test_helper.rb
+- test/test_nera_database.rb
+- test/test_nera_db_folders.rb
+- test/test_nera_dialog.rb
+- test/test_nera_job_layer_controller.rb
+- test/test_nera_job_records.rb
+- test/test_nera_parameter_layer_controller.rb
+- test/test_nera_parameter_records.rb
+- test/test_nera_run_layer_controller.rb
+- test/test_nera_run_records.rb
+- test/test_nera_simulator.rb
+- test/test_nera_simulator_layer_controller.rb
+- test/test_nera_simulator_records.rb
+has_rdoc: true
+homepage: http://nera.rubyforge.com
+post_install_message: 
+rdoc_options: 
+- --main
+- README.rdoc
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: nera
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: This is an application which helps you to manage a database for the Monte Carlo simulations
+test_files: 
+- test/test_helper.rb
+- test/test_nera_database.rb
+- test/test_nera_db_folders.rb
+- test/test_nera_dialog.rb
+- test/test_nera_job_layer_controller.rb
+- test/test_nera_job_records.rb
+- test/test_nera_parameter_layer_controller.rb
+- test/test_nera_parameter_records.rb
+- test/test_nera_run_layer_controller.rb
+- test/test_nera_run_records.rb
+- test/test_nera_simulator.rb
+- test/test_nera_simulator_layer_controller.rb
+- test/test_nera_simulator_records.rb