Changeset 2194 for branches/HeuristicLab.Modeling Database Backend/sources/HeuristicLab.Modeling.Database.SQLServerCompact/3.2/DatabaseService.cs

Timestamp:

07/28/09 15:29:10 (15 years ago)

Author:

mkommend

Message:

adapted HeuristicLab.Modeling.Database and Database.SQLServerCompact (ticket #712)

Location:

branches/HeuristicLab.Modeling Database Backend/sources/HeuristicLab.Modeling.Database.SQLServerCompact

Files:

• . (moved) (moved from branches/HeuristicLab.Modeling Database Backend/sources/HeuristicLab.Modeling.SQLServerCompactBackend)
• 3.2/DatabaseService.cs (modified) (4 diffs)

branches/HeuristicLab.Modeling Database Backend/sources/HeuristicLab.Modeling.Database.SQLServerCompact/3.2/DatabaseService.cs

@@ -9 +9 @@
 using HeuristicLab.GP.StructureIdentification;
 using HeuristicLab.Data;
-
-namespace HeuristicLab.Modeling.SQLServerCompactBackend {
+using System.Data.Linq;
+
+namespace HeuristicLab.Modeling.Database.SQLServerCompact {
   public class DatabaseService : IModelingDatabase {
 
@@ -29 +30 @@
     }
 
-    public void Persist(IAlgorithm algorithm) {
+    public void Persist(HeuristicLab.Modeling.IAlgorithm algorithm) {
       int trainingSamplesStart = ((IntData)algorithm.Engine.GlobalScope.GetVariableValue("TrainingSamplesStart", false)).Data;
       int trainingSamplesEnd = ((IntData)algorithm.Engine.GlobalScope.GetVariableValue("TrainingSamplesEnd", false)).Data;
@@ -179 +180 @@
 
     public IEnumerable<IResult> GetAllResults() {
-      throw new NotImplementedException();
+      using (ModelingDataContext ctx = new ModelingDataContext(connection)) {
+        return ctx.Results.AsEnumerable().Cast<IResult>();
+      }
     }
 
@@ -186 +189 @@
     #region ModelResult
     public IEnumerable<IModelResult> GetModelResults(IModel model) {
-      throw new NotImplementedException();
+      ModelingDataContext ctx = new ModelingDataContext(connection);
+      DataLoadOptions dlo = new DataLoadOptions();
+      dlo.LoadWith<ModelResult>(mr => mr.Model);
+      dlo.LoadWith<ModelResult>(mr => mr.Result);
+      ctx.LoadOptions = dlo;
+
+      var results = from result in ctx.ModelResults
+                    where result.Model == model
+                    select result;
+      return results.AsEnumerable().Cast<IModelResult>();
     }
     #endregion
 
     #region Model
-    public IEnumerable<IDatabaseModel> GetAllModels() {
-      using (ModelingDataContext ctx = new ModelingDataContext(connection)) {
-        return ctx.Models;
+    public IEnumerable<IModel> GetAllModels() {
+      using (ModelingDataContext ctx = new ModelingDataContext(connection)) {
+        return ctx.Models.AsEnumerable().Cast<IModel>();
       }
     }