maglevrecord 0.1.1 → 0.1.2

data/test/migration/test_change_superclass.rb

@@ -0,0 +1,111 @@
+require "migration/operation_setup"
+
+class ChangeSuperclassTest < Test::Unit::TestCase
+
+  def setup
+    setup_migration_operations
+    cls.fill_with_examples
+    @example = cls.first
+    assert_not_equal Lecture2, cls.superclass
+    assert_equal Lecture, cls.superclass
+    cls.change_superclass_to Lecture2
+  end
+
+  def cls
+    Lecture3
+  end
+
+  def teardown
+    teardown_migration_operations
+  end
+
+  def test_superclass_has_changed
+    assert_equal Lecture2, cls.superclass
+  end
+
+  def test_objects_are_still_of_that_class
+    assert_equal @example.class, cls
+  end
+
+  def test_example_is_of_own_class
+    Object.module_eval "
+      class Lecture3
+        def lecture3
+          true
+        end
+      end"
+    assert @example.lecture2
+    assert @example.lecture3
+  end
+
+  def test_example_is_still_in_all
+    assert_include? Lecture3.all, @example
+  end
+
+end
+
+class MigrationChangesSuperclassTest < Test::Unit::TestCase
+
+  def setup
+    setup_migration_operations
+  end
+
+  def teardown
+    teardown_migration_operations
+  end
+
+  def test_migrating_superclass_change
+    assert_not_equal Lecture2, Lecture3.superclass
+    assert_not_equal Object, Lecture3.superclass
+    MaglevRecord::Migration.new(Time.now, "change_superclass") do
+      def up
+        Lecture3.change_superclass_to Lecture2
+      end
+    end.do
+    assert_equal Lecture3.superclass, Lecture2
+  end
+
+  def test_superclass_does_not_exist
+    original_superclass = Lecture3.superclass
+    assert_raises(NameError){ SuperclassThatDoesNotExist }
+    MaglevRecord::Migration.new(Time.now, "change_superclass") do
+      def up
+        Lecture3.change_superclass_to SuperclassThatDoesNotExist
+      end
+    end.do
+    assert_equal original_superclass, Lecture3.superclass
+  end
+
+  def test_class_does_not_exist
+    assert_raises(NameError){ ClassThatDoesNotExist }
+    MaglevRecord::Migration.new(Time.now, "change_superclass") do
+      def up
+        ClassThatDoesNotExist.change_superclass_to Lecture3
+      end
+    end.do
+    assert_raises(NameError){ ClassThatDoesNotExist }
+  end
+
+  def test_both_classes_do_not_exist
+    MaglevRecord::Migration.new(Time.now, "change_superclass") do
+      def up
+        ClassThatDoesNotExist.change_superclass_to SuperclassThatDoesNotExist
+      end
+    end.do
+    assert_raises(NameError){ ClassThatDoesNotExist }
+    assert_raises(NameError){ SuperclassThatDoesNotExist }
+
+  end
+end
+
+
+
+
+
+
+
+
+
+
+
+

data/test/migration/test_loader.rb

@@ -64,6 +64,12 @@ MIGRATION2
     assert_equal 2014, @loader.migration_list.last.timestamp.year
   end
 
+  def test_an_error_is_thrown_if_no_migration_is_read
+    assert_raise(MaglevRecord::NoMigrationReadError) {
+      @loader.load_string "1 + 2"
+    }
+  end
+
   def test_load_from_file
     @loader.load_file(migration_folder + 'migration_1.rb')
     assert @loader.migration_list.any? { |m| m.name == "Change book title" }

data/test/migration/test_project.rb

@@ -1,37 +1,9 @@
 require "more_asserts"
 require "fileutils"
-require "tmpdir"
+require "temp_dir_test"
 
 THIS_DIRECTORY = File.expand_path(File.dirname(__FILE__))
 
-#
-# this test creates a temporary directory for the test
-#
-
-class TempDirTest < Test::Unit::TestCase
-  def setup
-    # make temporary directory
-    # see http://ruby-doc.org/stdlib-2.0/libdoc/tmpdir/rdoc/Dir.html#method-c-mktmpdir
-    @tempdir = Dir.mktmpdir
-  end
-
-  def teardown
-    # remove the directory.
-    FileUtils.remove_dir tempdir
-  end
-
-  def tempdir
-    @tempdir
-  end
-
-  # test the project configuration
-
-  def test_tempdir_exists
-    assert File.directory?(tempdir)
-  end
-
-end
-  
 class ProjectTest < TempDirTest
   attr_reader :maglev_record_raketask_wd
 

data/test/migration/test_project1.slow.rb

@@ -12,6 +12,7 @@ class MigrationTestProject1 < ProjectTest
   def test_tasks_are_listed
     output = rake("-T")
     assert_include? output, 'rake migrate:new'
+    assert_include? output, 'rake migrate:auto'
     assert_include? output, 'rake migrate:up'
   end
 

data/test/migration/test_project2.slow.rb

@@ -3,6 +3,7 @@ require "migration/test_project"
 class MigrationProject2 < ProjectTest
 
   def setup
+    Maglev.abort_transaction
     @project_name = 'project2'
     super
     Maglev.persistent do
@@ -15,6 +16,7 @@ class MigrationProject2 < ProjectTest
   def teardown
     super
     puts @s unless @s.nil?
+    Maglev.abort_transaction
   end
 
   def test_no_models
@@ -31,4 +33,9 @@ class MigrationProject2 < ProjectTest
     @s = nil
   end
 
+  #def test_add_more_migrations_that_will_be_tested
+  #  # maybe we are also in the need to autoload the model files?
+  #  #fail('todo') # TODO
+  #end
+
 end

data/test/migration/test_remove.rb

@@ -8,8 +8,11 @@
 #
 #   - classes
 #
+#   - instance methods
+#
+#   - class methods
+#
 
-require "maglev_record"
 require "migration/operation_setup"
 require "more_asserts"
 require 'time'
@@ -213,7 +216,125 @@ class TestMigrationRemoveClass < Test::Unit::TestCase
       Models::M1::Lecture
     }
   end
+end
+
+################## remove instance methods
 
- 
+class TestMigrationRemoveInstanceMethod < Test::Unit::TestCase
+
+  def setup
+    setup_migration_operations
+    Lecture.define_method :instance_method_to_remove do 2 end
+    Lecture.fill_with_examples
+    Lecture3.fill_with_examples
+  end
+
+  def test_Lecture_has_instance_method
+    assert_equal 2, Lecture.first.instance_method_to_remove
+    assert_equal 2, Lecture3.first.instance_method_to_remove
+  end
+
+  def teardown
+    super
+    teardown_migration_operations
+  end
+
+  def test_migration_removes_instance_method
+    MaglevRecord::Migration.new(Time.now, "remove instance method") do
+      def up
+        Lecture.remove_instance_method :instance_method_to_remove
+      end
+    end.do
+    assert_raises(NoMethodError){
+      Lecture.first.instance_method_to_remove
+    }
+    assert_raises(NoMethodError){
+      Lecture3.first.instance_method_to_remove
+    }
+  end
+
+  def test_migration_removes_nonexistent_instance_method
+    MaglevRecord::Migration.new(Time.now, "remove instance method") do
+      def up
+        Lecture.remove_instance_method :instance_method_to_remove2
+      end
+    end.do
+    assert_equal 2, Lecture.first.instance_method_to_remove
+  end
+
+  def test_remove_instance_method_of_nonexistent_class
+    MaglevRecord::Migration.new(Time.now, "remove instance method") do
+      def up
+        AbsentLectureClass.remove_instance_method :method_not_here
+      end
+    end.do
+    assert_equal 2, Lecture.first.instance_method_to_remove
+  end
+
+  def test_remove_instance_method_of_subclass_does_not_influence_superclass
+    MaglevRecord::Migration.new(Time.now, "remove instance method") do
+      def up
+        Lecture3.remove_instance_method :instance_method_to_remove
+      end
+    end.do    
+    assert_equal 2, Lecture.first.instance_method_to_remove
+    assert_equal 2, Lecture3.first.instance_method_to_remove
+  end
 end
 
+################## remove class methods
+
+class TestMigrationRemoveClassMethod < Test::Unit::TestCase
+
+  def setup
+    setup_migration_operations
+    def Lecture.class_method_to_remove;1;end
+  end
+
+  def teardown
+    super
+    teardown_migration_operations
+  end
+
+  def test_Lecture_has_class_method
+    assert_equal 1, Lecture.class_method_to_remove
+  end
+
+  def test_migration_removes_class_method
+    MaglevRecord::Migration.new(Time.now, "remove class method") do
+      def up
+        Lecture.remove_class_method :class_method_to_remove
+      end
+    end.do
+    assert_raises(NoMethodError){
+      Lecture.class_method_to_remove
+    }
+  end
+
+  def test_migration_removes_nonexistent_class_method
+    MaglevRecord::Migration.new(Time.now, "remove class method") do
+      def up
+        Lecture.remove_class_method :class_method_to_remove2
+      end
+    end.do
+    assert_equal 1, Lecture.class_method_to_remove
+  end
+
+  def test_remove_instance_method_of_nonexistent_class
+    MaglevRecord::Migration.new(Time.now, "remove class method") do
+      def up
+        AbsentLectureClass.remove_class_method :method_not_here
+      end
+    end.do
+    assert_equal 1, Lecture.class_method_to_remove
+  end
+
+  def test_remove_class_method_of_subclass_does_not_influence_superclass
+    MaglevRecord::Migration.new(Time.now, "remove class method") do
+      def up
+        Lecture3.remove_instance_method :class_method_to_remove
+      end
+    end.do    
+    assert_equal 1, Lecture.class_method_to_remove
+  end
+end

data/test/migration/todo.txt

@@ -3,7 +3,7 @@
   ====
 
 2) from rooted base to base
-4) copy from one class to another
+4) copy from one class to another # useful when superclass mismatch
 5) rename class from submodule
 5) remove class from submodule
 

data/test/more_asserts.rb

@@ -13,7 +13,7 @@ class Test::Unit::TestCase
   end
 
   def assert_not_include?(array, element)
-    assert_not array.include?(element), "#{array}\n should include \n#{element}"
+    assert_not array.include?(element), "#{array}\n should not include \n#{element}"
   end
 
 

data/test/snapshot/test_attributes.rb

@@ -0,0 +1,33 @@
+require "snapshot/test_snapshot"
+
+class LocalAttibuteAddSnapshotTest < FastSnapshotTest
+  def test_new_attribute
+    Lecture.attr_accessor :test_accessor
+    assert_equal ["Lecture"], changes.changed_class_names
+    assert_equal ["test_accessor"], changes.changed_classes[0].new_attributes
+    assert_not changes.nothing_changed?
+  end
+end
+
+class LocalAttributeRemoveSnapshotTest < FastSnapshotTest
+
+  def setup
+    super
+    Lecture2.attr_accessor :test_accessor2
+    snapshot!
+    Lecture2.delete_attribute :test_accessor2
+  end
+
+  def test_removed_attribute
+    assert_equal ["Lecture2"], changes.changed_class_names
+    assert_equal ["test_accessor2"], changes.changed_classes[0].removed_attributes
+  end
+
+  def test_accessor_in_first_snapshot
+    assert_include? snapshot0[Lecture2].attributes, "test_accessor2"
+  end
+
+  def test_accessor_not_in_second_snapshot
+    assert_not_include? snapshot[Lecture2].attributes, "test_accessor2"
+  end
+end

data/test/snapshot/{test_snapshot_attributes.slow.rb → test_attributes.slow.rb}

@@ -1,4 +1,4 @@
-require "snapshot/test_snapshot"
+require "snapshot/test_snapshot.slow"
 
 class AttrSnapshotTest < SnapshotTest
 
@@ -43,15 +43,13 @@ class AttrSnapshotTest < SnapshotTest
   end
 
   def test_accessor_added
-    assert_equal changed_class.new_attr_accessors, [:students]
+    assert_equal changed_class.new_attributes, ["students"]
   end
 
   def test_accessor_removed
-    assert_equal changed_class.removed_attr_accessors, [:no_value]
+    assert_equal changed_class.removed_attributes, ["no_value"]
   end
 
-  # TODO: add tests for attr_reader and attr_writer ...
-
 end
 
 

data/test/snapshot/test_classes.rb

@@ -0,0 +1,32 @@
+require "snapshot/test_snapshot"
+
+class LocalClassSnapshotTest < FastSnapshotTest
+
+  def test_lecture_classes_exist
+    ['Lecture', 'Lecture2', 'Lecture3', 'Lecture4'].each { |lecture_name|
+      assert_include? snapshot.class_names, lecture_name
+    }
+  end
+
+  def test_class_removed
+    remove_class Lecture2
+    assert_equal 1, changes.removed_classes.size
+  end
+
+  def test_class_is_not_in_snashot_when_removed
+    remove_class Lecture2
+    assert_not_include? snapshot.class_names, "Lecture2"
+  end
+
+  def test_class_is_in_snapshot0_when_removed
+    remove_class Lecture2
+    assert_include? snapshot0.class_names, "Lecture2"
+  end
+
+  def test_removed_class_is_in_changes
+    remove_class Lecture4
+    assert_equal ["Lecture4"], changes.removed_class_names
+    assert_not changes.nothing_changed?
+  end
+
+end

data/test/snapshot/{test_snapshot_classes.slow.rb → test_classes.slow.rb}

@@ -1,4 +1,4 @@
-require "snapshot/test_snapshot"
+require "snapshot/test_snapshot.slow"
 
 class ClassSnapshotTest < SnapshotTest
 

data/test/snapshot/test_from_file_system.rb

@@ -0,0 +1,113 @@
+require 'maglev_record'
+require "temp_dir_test"
+require 'more_asserts'
+require 'migration/operation_setup'
+
+class FileSystemSnapshotTest < TempDirTest
+
+  def teardown
+    "SomeClass AnotherClass Someclass2 NewClass A Class2 NewCls TheNew 
+    TheClass ClassWithNoFuture".split.each{|name|
+      Object.remove_const name if Object.const_defined? name
+    }
+  end
+
+  def write_to_files(*file_contents)
+    file_paths = []
+    file_contents.each{ |content|
+      file_paths << write_to_file(content)
+    }
+    file_paths
+  end
+
+  def snapshot_with_files(*file_contents)
+    file_paths = write_to_files(*file_contents)
+    MaglevRecord::Snapshot.with_files file_paths
+  end
+
+  def changes_with_files(s, *file_contents)
+    @file_count = 0
+    if s.is_a? String
+      file_contents << s
+      s = nil
+    end
+    s = MaglevRecord::Snapshot.new if s.nil?
+    file_paths = write_to_files(*file_contents)
+    assert s.is_a?(MaglevRecord::Snapshot), s.to_s
+    s.changes_in_files file_paths
+  end
+
+  def test_new_class
+    s = snapshot_with_files "class SomeClass;include MaglevRecord::Base;end"
+    assert_include? s.snapshot_classes, SomeClass
+  end
+
+  def test_old_clases_are_loaded_too
+    file_path = write_to_file "class AnotherClass; include MaglevRecord::Base;def x;end;end"
+    Kernel.load file_path
+    s0 = MaglevRecord::Snapshot.new
+    write_to_file "class AnotherClass; include MaglevRecord::Base;def y;end;end", file_path
+    s = snapshot_with_files "class SomeClass2;include MaglevRecord::Base;def v;end;end"
+    assert_include? s.snapshot_classes, AnotherClass
+    assert_include? s.snapshot_classes, SomeClass2
+    assert_include? s.changes_since(s0).changed_class_names, "AnotherClass"
+  end
+
+  def test_snapshot_computes_changes
+    c = changes_with_files "class NewClass;include MaglevRecord::Base;def g;end;end"
+    assert_include? c.new_class_names, 'NewClass'
+  end
+
+  def test_many_changes
+    s = snapshot_with_files "class A; include MaglevRecord::Base; def g; end;end",
+               "class Class2; include MaglevRecord::Base; attr_accessor :tral;end"
+    c = changes_with_files "class A; include MaglevRecord::Base; def h; end;end",
+               "class Class2; include MaglevRecord::Base; attr_accessor :tral2;end",
+               "class NewCls; include MaglevRecord::Base; def c;end ;end"
+    # the following line may change some day but it can help debugging
+    assert_equal "#new class: NewCls\n#new instance method: A.new.h\nA.remove_instance_method :g\nClass2.rename_attribute(:tral, :tral2)\n#new instance method: Class2.new.tral2\n#new instance method: Class2.new.tral2=\nClass2.remove_instance_method :tral\nClass2.remove_instance_method :tral=",
+                 c.migration_string
+  end
+
+  def test_changes_in_files_loads_all_files_required
+    file_path = write_to_file "class TheClass; include MaglevRecord::Base;def x;3;end;end"
+    Kernel.load file_path
+    s = MaglevRecord::Snapshot.new
+    write_to_file "class TheClass; include MaglevRecord::Base;def yy;end;end", file_path
+    file_paths = [write_to_file "class TheNew;include MaglevRecord::Base; def g;end;end"]
+    changes = s.changes_in_files(file_paths)
+    assert_include? changes.new_class_names, 'TheNew'
+    assert_include? changes.changed_class_names, 'TheClass'
+    assert_equal 3, TheClass.new.x
+    assert_equal changes[TheClass].new_instance_methods, ["yy"]
+    assert_equal changes[TheClass].removed_instance_methods, ["x"]
+    assert_raises(NoMethodError){
+      TheClass.new.yy
+    }
+  end
+
+  def test_file_was_removed
+    file_path = write_to_file "class ClassWithNoFuture; include MaglevRecord::Base;def h;end;end"
+    s = MaglevRecord::Snapshot.with_files [file_path]
+    File.delete file_path
+    changes = s.changes_in_files
+    assert_include? changes.removed_class_names, 'ClassWithNoFuture'
+  end
+
+  def test_if_error_occurs_everything_is_reset_to_normal
+    setup_migration_operations
+    begin
+      file_path = write_to_file "raise 'bam!'"
+      meth = Lecture3.methods
+      assert_raises(RuntimeError){
+        MaglevRecord::Snapshot.with_files [file_path]
+      }
+      assert_equal meth, Lecture3.methods
+    ensure
+      teardown_migration_operations
+    end
+  end
+
+end
+
+