Class: MetamodelRoundtripTest

Inherits:
Test::Unit::TestCase
  • Object
show all
Includes:
MMGen::MetamodelGenerator, RGen::Util::ModelComparator
Defined in:
lib/puppet/vendor/rgen/test/metamodel_roundtrip_test.rb

Defined Under Namespace

Modules: Regenerated, UMLRegenerated

Constant Summary collapse

TEST_DIR =
File.dirname(__FILE__)+"/metamodel_roundtrip_test"
BuiltinTypesTestEcore =
TEST_DIR+"/using_builtin_types.ecore"

Instance Method Summary collapse

Methods included from RGen::Util::ModelComparator

#_modelEqual_internal, #modelEqual?

Methods included from MMGen::MetamodelGenerator

#generateMetamodel

Instance Method Details

#test_ecore_instantiator_builtin_typesObject



81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
# File 'lib/puppet/vendor/rgen/test/metamodel_roundtrip_test.rb', line 81

def test_ecore_instantiator_builtin_types
  env = RGen::Environment.new
  File.open(BuiltinTypesTestEcore) { |f|
    ECoreXMLInstantiator.new(env).instantiate(f.read)
  }
  a1 = env.find(:class => RGen::ECore::EAttribute, :name => "a1").first
  assert_equal(RGen::ECore::EString, a1.eType)
  a2 = env.find(:class => RGen::ECore::EAttribute, :name => "a2").first
  assert_equal(RGen::ECore::EInt, a2.eType)
  a3 = env.find(:class => RGen::ECore::EAttribute, :name => "a3").first
  assert_equal(RGen::ECore::ELong, a3.eType)
  a4 = env.find(:class => RGen::ECore::EAttribute, :name => "a4").first
  assert_equal(RGen::ECore::EFloat, a4.eType)
  a5 = env.find(:class => RGen::ECore::EAttribute, :name => "a5").first
  assert_equal(RGen::ECore::EBoolean, a5.eType)
end

#test_ecore_serializerObject



53
54
55
56
57
58
59
# File 'lib/puppet/vendor/rgen/test/metamodel_roundtrip_test.rb', line 53

def test_ecore_serializer
  require TEST_DIR+"/TestModel.rb"
  File.open(TEST_DIR+"/houseMetamodel_Regenerated.ecore","w") do |f|
 	ser = RGen::Serializer::XMI20Serializer.new(f)
 	ser.serialize(HouseMetamodel.ecore)
	end
end

#test_ecore_serializer_builtin_typesObject



63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
# File 'lib/puppet/vendor/rgen/test/metamodel_roundtrip_test.rb', line 63

def test_ecore_serializer_builtin_types
  mm = RGen::ECore::EPackage.new(:name => "P1", :eClassifiers => [
    RGen::ECore::EClass.new(:name => "C1", :eStructuralFeatures => [
      RGen::ECore::EAttribute.new(:name => "a1", :eType => RGen::ECore::EString), 
      RGen::ECore::EAttribute.new(:name => "a2", :eType => RGen::ECore::EInt), 
      RGen::ECore::EAttribute.new(:name => "a3", :eType => RGen::ECore::ELong), 
      RGen::ECore::EAttribute.new(:name => "a4", :eType => RGen::ECore::EFloat), 
      RGen::ECore::EAttribute.new(:name => "a5", :eType => RGen::ECore::EBoolean) 
    ])
  ])
  outfile = TEST_DIR+"/using_builtin_types_serialized.ecore"
  File.open(outfile, "w") do |f|
    ser = RGen::Serializer::XMI20Serializer.new(f)
    ser.serialize(mm)
  end
  assert_equal(File.read(BuiltinTypesTestEcore), File.read(outfile))
end

#test_generate_from_ecoreObject



37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
# File 'lib/puppet/vendor/rgen/test/metamodel_roundtrip_test.rb', line 37

def test_generate_from_ecore
  outfile = TEST_DIR+"/houseMetamodel_from_ecore.rb"

  env = RGen::Environment.new
  File.open(TEST_DIR+"/houseMetamodel.ecore") { |f|
    ECoreXMLInstantiator.new(env).instantiate(f.read)
  }
  rootpackage = env.find(:class => RGen::ECore::EPackage).first
  rootpackage.name = "HouseMetamodel"
  generateMetamodel(rootpackage, outfile)
  
  File.open(outfile) do |f|
    eval(f.read, UMLRegenerated::Inside, "test_eval", 0)
  end
end

#test_generatorObject



21
22
23
24
25
26
27
28
29
30
31
# File 'lib/puppet/vendor/rgen/test/metamodel_roundtrip_test.rb', line 21

def test_generator
  require TEST_DIR+"/TestModel.rb"
  outfile = TEST_DIR+"/TestModel_Regenerated.rb"		
  generateMetamodel(HouseMetamodel.ecore, outfile)
  
  File.open(outfile) do |f|
    eval(f.read, Regenerated::Inside)
  end
  
  assert modelEqual?(HouseMetamodel.ecore, Regenerated::HouseMetamodel.ecore, ["instanceClassName"])
end