[3852] | 1 | #region License Information
|
---|
| 2 | /* HeuristicLab
|
---|
[12012] | 3 | * Copyright (C) 2002-2015 Heuristic and Evolutionary Algorithms Laboratory (HEAL)
|
---|
[3852] | 4 | *
|
---|
| 5 | * This file is part of HeuristicLab.
|
---|
| 6 | *
|
---|
| 7 | * HeuristicLab is free software: you can redistribute it and/or modify
|
---|
| 8 | * it under the terms of the GNU General Public License as published by
|
---|
| 9 | * the Free Software Foundation, either version 3 of the License, or
|
---|
| 10 | * (at your option) any later version.
|
---|
| 11 | *
|
---|
| 12 | * HeuristicLab is distributed in the hope that it will be useful,
|
---|
| 13 | * but WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
| 14 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
---|
| 15 | * GNU General Public License for more details.
|
---|
| 16 | *
|
---|
| 17 | * You should have received a copy of the GNU General Public License
|
---|
| 18 | * along with HeuristicLab. If not, see <http://www.gnu.org/licenses/>.
|
---|
| 19 | */
|
---|
| 20 | #endregion
|
---|
| 21 |
|
---|
[3861] | 22 | using System;
|
---|
| 23 | using System.Collections.Generic;
|
---|
| 24 | using System.Drawing;
|
---|
| 25 | using System.Linq;
|
---|
[11892] | 26 | using System.Threading;
|
---|
| 27 | using Google.ProtocolBuffers;
|
---|
[11961] | 28 | using HeuristicLab.Analysis;
|
---|
[3862] | 29 | using HeuristicLab.Common;
|
---|
[3852] | 30 | using HeuristicLab.Core;
|
---|
[3861] | 31 | using HeuristicLab.Data;
|
---|
[11893] | 32 | using HeuristicLab.Optimization;
|
---|
[3861] | 33 | using HeuristicLab.Parameters;
|
---|
[3852] | 34 | using HeuristicLab.Persistence.Default.CompositeSerializers.Storable;
|
---|
| 35 |
|
---|
| 36 | namespace HeuristicLab.Problems.ExternalEvaluation {
|
---|
[13257] | 37 | [Item("External Evaluation Problem (single-objective)", "A problem that is evaluated in a different process.")]
|
---|
[12504] | 38 | [Creatable(CreatableAttribute.Categories.ExternalEvaluationProblems, Priority = 100)]
|
---|
[3852] | 39 | [StorableClass]
|
---|
[13257] | 40 | // BackwardsCompatibility3.3
|
---|
| 41 | // Rename class to SingleObjectiveExternalEvaluationProblem
|
---|
[13180] | 42 | public class ExternalEvaluationProblem : SingleObjectiveBasicProblem<IEncoding>, IExternalEvaluationProblem {
|
---|
[4419] | 43 |
|
---|
[7201] | 44 | public static new Image StaticItemImage {
|
---|
[5287] | 45 | get { return HeuristicLab.Common.Resources.VSImageLibrary.Type; }
|
---|
[3859] | 46 | }
|
---|
[4419] | 47 |
|
---|
[11899] | 48 | #region Parameters
|
---|
[11892] | 49 | public OptionalValueParameter<EvaluationCache> CacheParameter {
|
---|
| 50 | get { return (OptionalValueParameter<EvaluationCache>)Parameters["Cache"]; }
|
---|
[3861] | 51 | }
|
---|
[6189] | 52 | public IValueParameter<CheckedItemCollection<IEvaluationServiceClient>> ClientsParameter {
|
---|
| 53 | get { return (IValueParameter<CheckedItemCollection<IEvaluationServiceClient>>)Parameters["Clients"]; }
|
---|
[3859] | 54 | }
|
---|
[11892] | 55 | public IValueParameter<SolutionMessageBuilder> MessageBuilderParameter {
|
---|
| 56 | get { return (IValueParameter<SolutionMessageBuilder>)Parameters["MessageBuilder"]; }
|
---|
[3859] | 57 | }
|
---|
[11893] | 58 | public IFixedValueParameter<SingleObjectiveOptimizationSupportScript> SupportScriptParameter {
|
---|
| 59 | get { return (IFixedValueParameter<SingleObjectiveOptimizationSupportScript>)Parameters["SupportScript"]; }
|
---|
| 60 | }
|
---|
[13498] | 61 |
|
---|
| 62 | private IFixedValueParameter<BoolValue> MaximizationParameter {
|
---|
| 63 | get { return (IFixedValueParameter<BoolValue>)Parameters["Maximization"]; }
|
---|
| 64 | }
|
---|
[11899] | 65 | #endregion
|
---|
[3852] | 66 |
|
---|
[11899] | 67 | #region Properties
|
---|
[13491] | 68 | public new IEncoding Encoding {
|
---|
| 69 | get { return base.Encoding; }
|
---|
| 70 | set { base.Encoding = value; }
|
---|
| 71 | }
|
---|
[11892] | 72 | public EvaluationCache Cache {
|
---|
| 73 | get { return CacheParameter.Value; }
|
---|
[3860] | 74 | }
|
---|
[11892] | 75 | public CheckedItemCollection<IEvaluationServiceClient> Clients {
|
---|
| 76 | get { return ClientsParameter.Value; }
|
---|
[3860] | 77 | }
|
---|
[11892] | 78 | public SolutionMessageBuilder MessageBuilder {
|
---|
| 79 | get { return MessageBuilderParameter.Value; }
|
---|
[3860] | 80 | }
|
---|
[11893] | 81 | public SingleObjectiveOptimizationSupportScript OptimizationSupportScript {
|
---|
| 82 | get { return SupportScriptParameter.Value; }
|
---|
| 83 | }
|
---|
| 84 | private ISingleObjectiveOptimizationSupport OptimizationSupport {
|
---|
| 85 | get { return SupportScriptParameter.Value; }
|
---|
| 86 | }
|
---|
[11899] | 87 | #endregion
|
---|
[3860] | 88 |
|
---|
[3861] | 89 | [StorableConstructor]
|
---|
[13131] | 90 | protected ExternalEvaluationProblem(bool deserializing) : base(deserializing) { }
|
---|
| 91 | protected ExternalEvaluationProblem(ExternalEvaluationProblem original, Cloner cloner) : base(original, cloner) { }
|
---|
[4722] | 92 | public override IDeepCloneable Clone(Cloner cloner) {
|
---|
| 93 | return new ExternalEvaluationProblem(this, cloner);
|
---|
| 94 | }
|
---|
[3852] | 95 | public ExternalEvaluationProblem()
|
---|
| 96 | : base() {
|
---|
[12002] | 97 | Parameters.Remove("Maximization"); // readonly in base class
|
---|
| 98 | Parameters.Add(new FixedValueParameter<BoolValue>("Maximization", "Set to false if the problem should be minimized.", new BoolValue()));
|
---|
[11892] | 99 | Parameters.Add(new OptionalValueParameter<EvaluationCache>("Cache", "Cache of previously evaluated solutions."));
|
---|
[6189] | 100 | Parameters.Add(new ValueParameter<CheckedItemCollection<IEvaluationServiceClient>>("Clients", "The clients that are used to communicate with the external application.", new CheckedItemCollection<IEvaluationServiceClient>() { new EvaluationServiceClient() }));
|
---|
[13180] | 101 | Parameters.Add(new ValueParameter<SolutionMessageBuilder>("MessageBuilder", "The message builder that converts from HeuristicLab objects to SolutionMessage representation.", new SolutionMessageBuilder()) { Hidden = true });
|
---|
[11893] | 102 | Parameters.Add(new FixedValueParameter<SingleObjectiveOptimizationSupportScript>("SupportScript", "A script that can provide neighborhood and analyze the results of the optimization.", new SingleObjectiveOptimizationSupportScript()));
|
---|
[11961] | 103 |
|
---|
| 104 | Operators.Add(new BestScopeSolutionAnalyzer());
|
---|
[11892] | 105 | }
|
---|
[3861] | 106 |
|
---|
[11899] | 107 | #region Single Objective Problem Overrides
|
---|
[11892] | 108 | public override bool Maximization {
|
---|
| 109 | get { return Parameters.ContainsKey("Maximization") && ((IValueParameter<BoolValue>)Parameters["Maximization"]).Value.Value; }
|
---|
[13498] | 110 | set { MaximizationParameter.Value.Value = value; }
|
---|
[3852] | 111 | }
|
---|
[11892] | 112 |
|
---|
| 113 | public override double Evaluate(Individual individual, IRandom random) {
|
---|
[13180] | 114 | var qualityMessage = Evaluate(BuildSolutionMessage(individual));
|
---|
| 115 | if (!qualityMessage.HasExtension(SingleObjectiveQualityMessage.QualityMessage_))
|
---|
| 116 | throw new InvalidOperationException("The received message is not a SingleObjectiveQualityMessage.");
|
---|
| 117 | return qualityMessage.GetExtension(SingleObjectiveQualityMessage.QualityMessage_).Quality;
|
---|
[11892] | 118 | }
|
---|
[13180] | 119 | public virtual QualityMessage Evaluate(SolutionMessage solutionMessage) {
|
---|
| 120 | return Cache == null
|
---|
| 121 | ? EvaluateOnNextAvailableClient(solutionMessage)
|
---|
| 122 | : Cache.GetValue(solutionMessage, EvaluateOnNextAvailableClient, GetQualityMessageExtensions());
|
---|
| 123 | }
|
---|
[11892] | 124 |
|
---|
[11893] | 125 | public override void Analyze(Individual[] individuals, double[] qualities, ResultCollection results, IRandom random) {
|
---|
| 126 | OptimizationSupport.Analyze(individuals, qualities, results, random);
|
---|
| 127 | }
|
---|
| 128 |
|
---|
| 129 | public override IEnumerable<Individual> GetNeighbors(Individual individual, IRandom random) {
|
---|
| 130 | return OptimizationSupport.GetNeighbors(individual, random);
|
---|
| 131 | }
|
---|
[11899] | 132 | #endregion
|
---|
[11893] | 133 |
|
---|
[13180] | 134 | public virtual ExtensionRegistry GetQualityMessageExtensions() {
|
---|
| 135 | var extensions = ExtensionRegistry.CreateInstance();
|
---|
| 136 | extensions.Add(SingleObjectiveQualityMessage.QualityMessage_);
|
---|
| 137 | return extensions;
|
---|
| 138 | }
|
---|
| 139 |
|
---|
| 140 | #region Evaluation
|
---|
[11899] | 141 | private HashSet<IEvaluationServiceClient> activeClients = new HashSet<IEvaluationServiceClient>();
|
---|
| 142 | private object clientLock = new object();
|
---|
[13180] | 143 |
|
---|
[11892] | 144 | private QualityMessage EvaluateOnNextAvailableClient(SolutionMessage message) {
|
---|
| 145 | IEvaluationServiceClient client = null;
|
---|
| 146 | lock (clientLock) {
|
---|
| 147 | client = Clients.CheckedItems.FirstOrDefault(c => !activeClients.Contains(c));
|
---|
| 148 | while (client == null && Clients.CheckedItems.Any()) {
|
---|
| 149 | Monitor.Wait(clientLock);
|
---|
| 150 | client = Clients.CheckedItems.FirstOrDefault(c => !activeClients.Contains(c));
|
---|
[6189] | 151 | }
|
---|
[11892] | 152 | if (client != null)
|
---|
| 153 | activeClients.Add(client);
|
---|
[6189] | 154 | }
|
---|
[11892] | 155 | try {
|
---|
| 156 | return client.Evaluate(message, GetQualityMessageExtensions());
|
---|
[13180] | 157 | } finally {
|
---|
[11892] | 158 | lock (clientLock) {
|
---|
| 159 | activeClients.Remove(client);
|
---|
| 160 | Monitor.PulseAll(clientLock);
|
---|
| 161 | }
|
---|
[7999] | 162 | }
|
---|
[6189] | 163 | }
|
---|
[3861] | 164 |
|
---|
[13180] | 165 | private SolutionMessage BuildSolutionMessage(Individual individual, int solutionId = 0) {
|
---|
[11892] | 166 | lock (clientLock) {
|
---|
| 167 | SolutionMessage.Builder protobufBuilder = SolutionMessage.CreateBuilder();
|
---|
[13180] | 168 | protobufBuilder.SolutionId = solutionId;
|
---|
[11892] | 169 | var scope = new Scope();
|
---|
| 170 | individual.CopyToScope(scope);
|
---|
| 171 | foreach (var variable in scope.Variables) {
|
---|
| 172 | try {
|
---|
| 173 | MessageBuilder.AddToMessage(variable.Value, variable.Name, protobufBuilder);
|
---|
[13180] | 174 | } catch (ArgumentException ex) {
|
---|
| 175 | throw new InvalidOperationException(string.Format("ERROR while building solution message: Parameter {0} cannot be added to the message", Name), ex);
|
---|
[12504] | 176 | }
|
---|
[3872] | 177 | }
|
---|
[11892] | 178 | return protobufBuilder.Build();
|
---|
[3872] | 179 | }
|
---|
| 180 | }
|
---|
[11899] | 181 | #endregion
|
---|
[3852] | 182 | }
|
---|
| 183 | }
|
---|