NH-3727 - Add test case

Author: itmagination

src/NHibernate.Test/NHSpecificTest/NH3727/Entity.cs

@@ -0,0 +1,7 @@
+namespace NHibernate.Test.NHSpecificTest.NH3727
+{
+	class Entity
+	{
+		public virtual int Id { get; set; }
+	}
+}

src/NHibernate.Test/NHSpecificTest/NH3727/FixtureByCode.cs

@@ -0,0 +1,83 @@
+using System.Collections.Generic;
+using System.Linq;
+using NHibernate.Cfg.MappingSchema;
+using NHibernate.Criterion;
+using NHibernate.Mapping.ByCode;
+using NHibernate.Transform;
+using NUnit.Framework;
+
+namespace NHibernate.Test.NHSpecificTest.NH3727
+{
+	public class ByCodeFixture : TestCaseMappingByCode
+	{
+		protected override HbmMapping GetMappings()
+		{
+			var mapper = new ModelMapper();
+			mapper.Class<Entity>(rc =>
+			{
+				rc.Id(x => x.Id);
+			});
+
+			return mapper.CompileMappingForAllExplicitlyAddedEntities();
+		}
+
+		[Test]
+		public void QueryOverWithSubqueryProjectionCanBeExecutedMoreThanOnce()
+		{
+			using (ISession session = OpenSession())
+			using (session.BeginTransaction())
+			{
+				const int parameter1 = 111;
+
+				var countSubquery = QueryOver.Of<Entity>()
+						.Where(x => x.Id == parameter1) //any condition which makes output SQL has parameter
+						.Select(Projections.RowCount())
+						;
+
+				var originalQueryOver = session.QueryOver<Entity>()
+											   .SelectList(l => l
+																	.Select(x => x.Id)
+																	.SelectSubQuery(countSubquery)
+												)
+											   .TransformUsing(Transformers.ToList);
+
+				var objects = originalQueryOver.List<object>();
+
+				Assert.DoesNotThrow(() => originalQueryOver.List<object>(), "Second try to execute QueryOver thrown exception.");
+			}
+		}
+
+		[Test]
+		public void ClonedQueryOverExecutionMakesOriginalQueryOverNotWorking()
+		{
+			// Projections are copied by clone operation. 
+			// SubqueryProjection use SubqueryExpression which holds CriteriaQueryTranslator (class SubqueryExpression { private CriteriaQueryTranslator innerQuery; })
+			// So given CriteriaQueryTranslator is used twice. 
+			// Since CriteriaQueryTranslator has CollectedParameters collection, second execution of the Criteria does not fit SqlCommand parameters.
+
+			using (ISession session = OpenSession())
+			using (session.BeginTransaction())
+			{
+				const int parameter1 = 111;
+
+				var countSubquery = QueryOver.Of<Entity>()
+						.Where(x => x.Id == parameter1) //any condition which makes output SQL has parameter
+						.Select(Projections.RowCount())
+						;
+
+				var originalQueryOver = session.QueryOver<Entity>()
+											   //.Where(x => x.Id == parameter2)
+											   .SelectList(l => l
+																	.Select(x => x.Id)
+																	.SelectSubQuery(countSubquery)
+												)
+											   .TransformUsing(Transformers.ToList);
+
+				var clonedQueryOver = originalQueryOver.Clone();
+				clonedQueryOver.List<object>();
+
+				Assert.DoesNotThrow(() => originalQueryOver.List<object>(), "Cloned QueryOver execution caused source QueryOver throw exception when executed.");
+			}
+		}
+	}
+}

src/NHibernate.Test/NHibernate.Test.csproj

@@ -863,6 +863,8 @@
     <Compile Include="NHSpecificTest\NH3604\FixtureByCode.cs" />
     <Compile Include="NHSpecificTest\NH3754\Fixture.cs" />
     <Compile Include="NHSpecificTest\NH3754\Model.cs" />
+    <Compile Include="NHSpecificTest\NH3727\Entity.cs" />
+    <Compile Include="NHSpecificTest\NH3727\FixtureByCode.cs" />
     <Compile Include="NHSpecificTest\NH646\Domain.cs" />
     <Compile Include="NHSpecificTest\NH646\Fixture.cs" />
     <Compile Include="NHSpecificTest\NH3234\Fixture.cs" />