EFL 1.0

data/tests/Error.rb

@@ -0,0 +1,11 @@
+require 'test/unit'
+require 'ErrorWithoutDeclaration'
+require 'ErrorArgClass'
+require 'ErrorCollision'
+
+########################################################
+# Bateria de pruebas para la clase Error, que produce diversas excepciones.
+#
+# Ultima actualizacion: 30-9-2004
+########################################################
+

data/tests/ErrorArgClass.rb

@@ -0,0 +1,169 @@
+require 'test/unit'
+require "EFL"
+
+########################################################
+# Bateria de pruebas para la clase Error, que produce diversas excepciones
+#	- Pruebas para Error.argClass(*args) desde:
+#		- sub
+#		- prod, prod?
+#		- gen, gen?
+#
+# Ultima actualizacion: 30-9-2004
+########################################################
+
+class ErrorArgClass < Test::Unit::TestCase
+	def setup
+		@g = Generator.new
+		@g.gsub(/pointcut/i, "PTO DE CORTE!!!!")
+		@g.gsub(/raise/, "LANZAAL!!!!", 's2')
+		@g.sub(/initialize/, 'CONSTRUCTORRR!!!!', 's3')
+		@g.gsub(/name/, "NOMBRE!!!!", 's4')
+		@g.prod('archAuxiliares/aspectgen.rb', 
+			    'archAuxiliares/basura.txt', ['s2', 's3'], 'name')		
+	end
+	
+	def test_sub_1
+		assert_raises(RuntimeError, "") {||
+				@g.sub('regExp', 'text', 'name')
+		}
+	end
+	
+	def test_sub_2
+		assert_raises(RuntimeError, "") {||
+				@g.sub(/regExp/, /text/, 'name')
+		}
+	end
+	
+	def test_sub_3
+		assert_raises(RuntimeError, "") {||
+				@g.sub(/regExp/, 'text', /name/)
+		}
+	end
+
+	def test_gsub_1
+		assert_raises(RuntimeError, "") {||
+				@g.gsub('regExp', 'text', 'name')
+		}
+	end
+	
+	def test_gsub_2
+		assert_raises(RuntimeError, "") {||
+				@g.gsub(/regExp/, /text/, 'name')
+		}
+	end
+	
+	def test_gsub_3
+		assert_raises(RuntimeError, "") {||
+				@g.gsub(/regExp/, 'text', /name/)
+		}
+	end
+
+	def test_prod_1
+		assert_raises(RuntimeError, "") {||
+				@g.prod(/iFile/, 'oFile', ['s1', 's2'], 'name')
+		}
+	end
+
+	def test_prod_2
+		assert_raises(RuntimeError, "") {||
+				@g.prod('iFile', /oFile/, ['s1', 's2'], 'name')
+		}
+	end
+	
+	def test_prod_3
+		assert_raises(RuntimeError, "") {||
+				@g.prod('iFile', 'oFile', 's1', 'name')
+		}
+	end
+	
+	def test_prod_4
+		assert_raises(RuntimeError, "") {||
+				@g.prod('iFile', 'oFile', ['s1', 's2'], /name/)
+		}
+	end
+	
+	def test_prod?_1
+		assert_raises(RuntimeError, "") {||
+				@g.prod?(/iFile/, 'oFile', ['s1', 's2'], 'name')
+		}
+	end
+
+	def test_prod?_2
+		assert_raises(RuntimeError, "") {||
+				@g.prod?('iFile', /oFile/, ['s1', 's2'], 'name')
+		}
+	end
+	
+	def test_prod?_3
+		assert_raises(RuntimeError, "") {||
+				@g.prod?('iFile', 'oFile', 's1', 'name')
+		}
+	end
+	
+	def test_prod?_4
+		assert_raises(RuntimeError, "") {||
+				@g.prod?('iFile', 'oFile', ['s1', 's2'], /name/)
+		}
+	end	
+
+	def test_gen
+		assert_raises(RuntimeError, "") {||
+				@g.gen('p1')
+		}
+	end	
+
+	def test_gen?
+		assert_raises(RuntimeError, "") {||
+				@g.gen?('p1')
+		}
+	end	
+	
+	def test_add_1
+		assert_raises(RuntimeError, "") {||
+				@g.add('p1')
+		}
+	end	
+
+	def test_add_2
+		assert_raises(RuntimeError, "") {||
+				@g.+('p1')
+		}
+	end	
+
+	def test_add?
+		assert_raises(RuntimeError, "") {||
+				@g.add?('p1')
+		}
+	end	
+	
+	def test_sup_1
+		assert_raises(RuntimeError, "") {||
+				@g << 'p1'
+		}
+	end	
+	
+	def test_sup_2
+		assert_raises(RuntimeError, "") {||
+				@g.sup!('p1')
+		}
+	end	
+
+	def test_sup?
+		assert_raises(RuntimeError, "") {||
+				@g.sup?('p1')
+		}
+	end	
+  
+  def test_extract
+		assert_raises(RuntimeError, "") {||
+				@g.extract("file", "")
+		}
+	end	
+
+  def test_extract_dollar
+		assert_raises(RuntimeError, "") {||
+				@g.extract_dollar("file", //, //)
+		}
+	end	
+
+end

data/tests/ErrorArgClass.rb.bak

@@ -0,0 +1,158 @@
+require 'test/unit'
+require "EFL.rb"
+
+########################################################
+# Bateria de pruebas para la clase Error, que produce diversas excepciones
+#	- Pruebas para Error.argClass(*args) desde:
+#		- sub
+#		- prod, prod?
+#		- gen, gen?
+#
+# Ultima actualizacion: 30-9-2004
+########################################################
+
+class ErrorArgClass < Test::Unit::TestCase
+	def setup
+		@g = Generator.new
+		@g.gsub(/pointcut/i, "PTO DE CORTE!!!!")
+		@g.gsub(/raise/, "LANZAAL!!!!", 's2')
+		@g.sub(/initialize/, 'CONSTRUCTORRR!!!!', 's3')
+		@g.gsub(/name/, "NOMBRE!!!!", 's4')
+		@g.prod('archAuxiliares/aspectgen.rb', 
+			    'archAuxiliares/basura.txt', ['s2', 's3'], 'name')		
+	end
+	
+	def test_sub_1
+		assert_raises(RuntimeError, "") {||
+				@g.sub('regExp', 'text', 'name')
+		}
+	end
+	
+	def test_sub_2
+		assert_raises(RuntimeError, "") {||
+				@g.sub(/regExp/, /text/, 'name')
+		}
+	end
+	
+	def test_sub_3
+		assert_raises(RuntimeError, "") {||
+				@g.sub(/regExp/, 'text', /name/)
+		}
+	end
+
+	def test_gsub_1
+		assert_raises(RuntimeError, "") {||
+				@g.gsub('regExp', 'text', 'name')
+		}
+	end
+	
+	def test_gsub_2
+		assert_raises(RuntimeError, "") {||
+				@g.gsub(/regExp/, /text/, 'name')
+		}
+	end
+	
+	def test_gsub_3
+		assert_raises(RuntimeError, "") {||
+				@g.gsub(/regExp/, 'text', /name/)
+		}
+	end
+
+	def test_prod_1
+		assert_raises(RuntimeError, "") {||
+				@g.prod(/iFile/, 'oFile', ['s1', 's2'], 'name')
+		}
+	end
+
+	def test_prod_2
+		assert_raises(RuntimeError, "") {||
+				@g.prod('iFile', /oFile/, ['s1', 's2'], 'name')
+		}
+	end
+	
+	def test_prod_3
+		assert_raises(RuntimeError, "") {||
+				@g.prod('iFile', 'oFile', 's1', 'name')
+		}
+	end
+	
+	def test_prod_4
+		assert_raises(RuntimeError, "") {||
+				@g.prod('iFile', 'oFile', ['s1', 's2'], /name/)
+		}
+	end
+	
+	def test_prod?_1
+		assert_raises(RuntimeError, "") {||
+				@g.prod?(/iFile/, 'oFile', ['s1', 's2'], 'name')
+		}
+	end
+
+	def test_prod?_2
+		assert_raises(RuntimeError, "") {||
+				@g.prod?('iFile', /oFile/, ['s1', 's2'], 'name')
+		}
+	end
+	
+	def test_prod?_3
+		assert_raises(RuntimeError, "") {||
+				@g.prod?('iFile', 'oFile', 's1', 'name')
+		}
+	end
+	
+	def test_prod?_4
+		assert_raises(RuntimeError, "") {||
+				@g.prod?('iFile', 'oFile', ['s1', 's2'], /name/)
+		}
+	end	
+
+	def test_gen
+		assert_raises(RuntimeError, "") {||
+				@g.gen('p1')
+		}
+	end	
+
+	def test_gen?
+		assert_raises(RuntimeError, "") {||
+				@g.gen?('p1')
+		}
+	end	
+	
+	def test_add_1
+		assert_raises(RuntimeError, "") {||
+				@g.add('p1')
+		}
+	end	
+
+	def test_add_2
+		assert_raises(RuntimeError, "") {||
+				@g.+('p1')
+		}
+	end	
+
+	def test_add?
+		assert_raises(RuntimeError, "") {||
+				@g.add?('p1')
+		}
+	end	
+	
+	def test_sup_1
+		assert_raises(RuntimeError, "") {||
+				@g << 'p1'
+		}
+	end	
+	
+	def test_sup_2
+		assert_raises(RuntimeError, "") {||
+				@g.sup!('p1')
+		}
+	end	
+
+	def test_sup?
+		assert_raises(RuntimeError, "") {||
+				@g.sup?('p1')
+		}
+	end	
+
+
+end

data/tests/ErrorCollision.rb

@@ -0,0 +1,218 @@
+require 'test/unit'
+require "EFL"
+
+########################################################
+# Bateria de pruebas para la clase Error, que produce diversas excepciones
+#	- Pruebas para Error.collision(receiver) desde:
+#		- prod, prod?
+#		- gen, gen?
+#
+# Ultima actualizacion: 30-9-2004
+########################################################
+
+class ErrorCollision < Test::Unit::TestCase
+	def setup
+		@g = Generator.new
+		@g1 = Generator.new
+		@g2 = Generator.new
+		@g3 = Generator.new
+		@g1.gsub(/pointcut/i, "PTO DE CORTE!!!!", 's1')
+		@g1.gsub(/raise/, "LANZAAL!!!!", 's2')
+		@g1.prod('archAuxiliares\aspectgen.rb', 'archAuxiliares\s1.txt', 'all', 'p1')
+		@g2.sub(/point/i, "POINTCULTTT!!!!", 's1')
+		@g2.gsub(/name/, "NOMBRE!!!!", 's3')		
+		@g2.prod('archAuxiliares\aspectgen.rb', 'archAuxiliares\s1.txt','all', 'p1')
+		@g3.sub(/point/i, "POINTCULTTT!!!!", 's4')
+		@g3.prod('archAuxiliares\aspectgen.rb', 'archAuxiliares\s1.txt','all', 'p2')
+	end
+	
+	
+	# Pruebas para prod
+
+	def test_1
+		@g.sub(/Pointcut name/, "sust1")
+		@g.sub(/name/, "sust2")
+		assert(!@g.prod?('archAuxiliares/aspectGen.rb',
+					'archAuxiliares/p1.rb'), '')		
+	end
+
+	def test_2
+		@g.gsub(/initialize\(name/, "sust1")
+		p @g.extract('archAuxiliares/aspectGen.rb', /initialize\(name/)[0]
+		@g.sub(/name/, "sust2")
+		p @g.extract('archAuxiliares/aspectGen.rb', /name/)[0]
+		assert(@g.prod?('archAuxiliares/aspectGen.rb',
+					'archAuxiliares/p1.rb'), '')		
+	end
+
+	def test_3
+		@g.sub(/initialize\(name/, "sust1")
+		@g.gsub(/name/, "sust2")
+		assert(!@g.prod?('archAuxiliares/aspectGen.rb',
+					'archAuxiliares/p1.rb'), '')		
+		assert_raises(RuntimeError, "") {||
+			@g.prod('archAuxiliares/aspectGen.rb',
+				     'archAuxiliares/p1.rb')		
+		}
+	end
+
+	def test_4
+		@g.gsub(/initialize\(name/, "sust1")
+		@g.gsub(/name/, "sust2")
+		assert(!@g.prod?('archAuxiliares/aspectGen.rb',
+					'archAuxiliares/p1.rb'), '')		
+		assert_raises(RuntimeError, "") {||
+			@g.prod('archAuxiliares/aspectGen.rb',
+				     'archAuxiliares/p1.rb')		
+		}
+	end
+
+	def test_5
+		@g.sub(/initialize\(name/, "sust1")
+		@g.sub(/\(name, regEx/, "sust2")
+		assert(!@g.prod?('archAuxiliares/aspectGen.rb',
+					'archAuxiliares/p1.rb'), '')		
+		assert_raises(RuntimeError, "") {||
+			@g.prod('archAuxiliares/aspectGen.rb',
+				     'archAuxiliares/p1.rb')		
+		}
+	end	
+
+	def test_6
+		@g.sub(/initialize\(name/, "sust1")
+		@g.gsub(/\(name, regEx/, "sust2")
+		assert(!@g.prod?('archAuxiliares/aspectGen.rb',
+					'archAuxiliares/p1.rb'), '')		
+		assert_raises(RuntimeError, "") {||
+			@g.prod('archAuxiliares/aspectGen.rb',
+				     'archAuxiliares/p1.rb')		
+		}
+	end	
+
+	def test_7
+		@g.gsub(/initialize\(name/, "sust1")
+		@g.sub(/\(name, regEx/, "sust2")
+		assert(!@g.prod?('archAuxiliares/aspectGen.rb',
+					'archAuxiliares/p1.rb'), '')		
+		assert_raises(RuntimeError, "") {||
+			@g.prod('archAuxiliares/aspectGen.rb',
+				     'archAuxiliares/p1.rb')		
+		}
+	end	
+
+	def test_8
+		@g.sub(/initialize\(name/, "sust1", 's1')
+		@g.sub(/name/, "sust2", 's2')
+		assert(!@g.prod?('archAuxiliares/aspectGen.rb',
+					'archAuxiliares/p1.rb', ['s1', 's2', 's1']), '')		
+		assert_raises(RuntimeError, "") {||
+			@g.prod('archAuxiliares/aspectGen.rb',
+				    'archAuxiliares/p1.rb', ['s1', 's2', 's1'])
+		}
+	end	
+
+	def test_9
+		@g.gsub(/initialize/, 'constructor', 's1')
+		@g.gsub(/crash/, 'colisi�n', 's2')
+		@g.prod('archAuxiliares/aspectGen.rb',
+			    'archAuxiliares/p1.txt', ['s1', 's2'])
+		@g.prod('archAuxiliares/aspectGen.rb',
+			    'archAuxiliares/p2.txt', ['s1'])
+		assert(@g.gen?)
+		@g.gen
+	end	
+
+	def test_10
+		@g.gsub(/initialize/, 'constructor', 's1')
+		@g.gsub(/crash/, 'colisi�n', 's2')
+		@g.prod('archAuxiliares/aspectGen.rb',
+			    'archAuxiliares/1.txt', ['s1', 's2'])
+		@g.prod('archAuxiliares/aspectGenCopy.rb',
+			    'archAuxiliares/1.txt', ['s2'])
+		assert(!@g.gen?)
+		assert_raises(RuntimeError, "") {||
+			@g.gen
+		}
+	end	
+
+	def test_11
+		@g.gsub(/initialize/, 'constructor', 's1')
+		@g.gsub(/crash/, 'colisi�n', 's2')
+		@g.prod('archAuxiliares/aspectGen.rb',
+			    'archAuxiliares/1.txt', ['s1'])
+		@g.prod('archAuxiliares/aspectGenCopy.rb',
+			    'archAuxiliares/1.txt', ['s2'])
+		assert(!@g.gen?)
+		assert_raises(RuntimeError, "") {||
+			@g.gen
+		}	
+	end	
+
+	def test_12
+		@g.gsub(/initialize/, 'constructor', 's1')
+		@g.gsub(/crash/, 'colisi�n', 's2')
+		@g.prod('archAuxiliares/aspectGen.rb',
+			    'archAuxiliares/1.txt', ['s1', 's2'])
+		@g.prod('archAuxiliares/aspectGen.rb',
+			    'archAuxiliares/1.txt', ['s2'])
+		assert(!@g.gen?)
+		assert_raises(RuntimeError, "") {||
+			@g.gen
+		}
+	end	
+
+	def test_13
+		@g.gsub(/initialize/, 'constructor', 's1')
+		@g.gsub(/crash/, 'colisi�n', 's2')
+		@g.prod('archAuxiliares/aspectGen.rb',
+			    'archAuxiliares/1.txt', ['s1'])
+		@g.prod('archAuxiliares/aspectGen.rb',
+			    'archAuxiliares/1.txt', ['s2', 's1'])
+		assert(!@g.gen?)
+		assert_raises(RuntimeError, "") {||
+			@g.gen
+		}
+	end	
+	
+	def test_14
+		@g.sub(/initialize\(name/, "sust1", 's1')
+		@g.gsub(/name/, "sust2", 's2')
+		@g.prod('archAuxiliares/aspectGen.rb',
+			    'archAuxiliares/1.txt', ['s1'])
+		@g.prod('archAuxiliares/aspectGen.rb',
+			    'archAuxiliares/1.txt', ['s2'])
+		assert(!@g.prod?('archAuxiliares/aspectGen.rb',
+					'archAuxiliares/p1.rb'), '')		
+		assert_raises(RuntimeError, "") {||
+			@g.prod('archAuxiliares/aspectGen.rb',
+				     'archAuxiliares/p1.rb')		
+		}
+	end
+	
+	# Pruebas para add
+
+	def test_15
+		assert(!@g1.add?(@g2))		
+		assert_raises(RuntimeError, "") {||
+			@g1.add(@g2)
+		}
+		assert_raises(RuntimeError, "") {||
+			@g1 + @g2
+		}
+	end
+
+	def test_16
+		assert(@g1.sup?(@g2))		
+	end
+
+	def test_17
+		assert(!@g1.sup?(@g3))		
+		assert_raises(RuntimeError, "") {||
+			@g1.sup!(@g3)
+		}
+		assert_raises(RuntimeError, "") {||
+			@g1 << @g3
+		}	
+	end
+
+end