1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
|
//-----------------------------------------------------------------------------
//
// Copyright (C) Microsoft Corporation. All Rights Reserved.
//
//-----------------------------------------------------------------------------
using System;
using System.Diagnostics.Contracts;
using System.Collections.Generic;
using Microsoft.Boogie;
using Microsoft.Boogie.VCExprAST;
using Microsoft.Boogie.Simplify;
using Microsoft.Boogie.Z3;
using System.Collections;
using System.IO;
using System.Threading;
using VC;
namespace Microsoft.Boogie.Houdini {
class HoudiniChecker {
private Stack<VCExpr> axioms = new Stack<VCExpr>();
private Checker checker;
private string descriptiveName;
private VCExpr conjecture;
private ProverInterface.ErrorHandler handler;
internal HoudiniChecker(Checker checker, string _descriptiveName, VCExpr _vc, ProverInterface.ErrorHandler _handler)
{
Contract.Requires(checker.TheoremProver != null);
Contract.Requires(checker.TheoremProver is Z3ProcessTheoremProver);
this.checker = checker;
this.descriptiveName = _descriptiveName;
this.conjecture = _vc;
this.handler = _handler;
}
public void PushAxiom(Axiom axiom) {
DeclFreeProverContext proverContext = (DeclFreeProverContext) checker.TheoremProver.Context;
VCExpr vc = proverContext.BoogieExprTranslator.Translate(axiom.Expr);
axioms.Push(vc);
}
public void Pop() {
axioms.Pop();
}
private VCExpr BuildVCAxioms(Stack<VCExpr> axioms)
{
Contract.Requires(axioms.Count > 0);
VCExpr vc_axioms = null;
foreach (VCExpr axiom in axioms) {
if (vc_axioms == null)
vc_axioms = axiom;
else
vc_axioms = checker.VCExprGen.And(vc_axioms, axiom);
}
return vc_axioms;
}
public void Check()
{
Contract.Assert (descriptiveName != null);
Contract.Assert (conjecture != null);
Contract.Assert (handler != null);
outcome = ProverInterface.Outcome.Undetermined;
VCExpr vc;
if (axioms.Count > 0) {
VCExpr vc_axioms = BuildVCAxioms(axioms);
vc = checker.VCExprGen.Implies(vc_axioms, conjecture);
}
else {
vc = conjecture;
}
checker.BeginCheck(descriptiveName, vc, handler);
WaitHandle.WaitAny(new WaitHandle[] {checker.ProverDone});
}
private ProverInterface.Outcome outcome;
public ProverInterface.Outcome ReadOutcome()
{
try {
outcome = checker.ReadOutcome();
} catch (UnexpectedProverOutputException e) {
throw e;
}
return outcome;
}
}
public class HoudiniVCGen : VCGen {
private HoudiniChecker hdnChecker;
CounterexampleCollector collector;
public HoudiniVCGen(Program program, Implementation impl, string logFilePath, bool appendLogFile)
: base(program, logFilePath, appendLogFile) {
collector = new CounterexampleCollector();
collector.OnProgress("HdnVCGen", 0, 0, 0.0);
if (CommandLineOptions.Clo.SoundnessSmokeTest) {
throw new Exception("HoudiniVCGen does not support Soundness smoke test.");
}
ConvertCFG2DAG(impl, program);
ModelViewInfo mvInfo;
Hashtable/*TransferCmd->ReturnCmd*/ gotoCmdOrigins = PassifyImpl(impl, program, out mvInfo);
Hashtable/*<int, Absy!>*/ label2absy;
Checker checker = new Checker(this, program, this.logFilePath, this.appendLogFile, impl, CommandLineOptions.Clo.ProverKillTime);
VCExpr vc = GenerateVC(impl, null, out label2absy, checker);
ErrorReporter reporter;
if (CommandLineOptions.Clo.vcVariety == CommandLineOptions.VCVariety.Local) {
reporter = new ErrorReporterLocal(gotoCmdOrigins, label2absy, impl.Blocks, incarnationOriginMap, collector, mvInfo, null, checker.TheoremProver.Context, program);
}
else {
reporter = new ErrorReporter(gotoCmdOrigins, label2absy, impl.Blocks, incarnationOriginMap, collector, mvInfo, null, checker.TheoremProver.Context, program);
}
if (checker.TheoremProver is Z3ProcessTheoremProver)
this.hdnChecker = new HoudiniChecker(checker, impl.Name, vc, reporter);
else
throw new Exception("HdnChecker only works with z3");
}
public void PushAxiom(Axiom axiom) {
this.hdnChecker.PushAxiom(axiom);
}
public void Pop() {
hdnChecker.Pop();
}
public Outcome Verify(out List<Counterexample> errors) {
collector.examples.Clear();
hdnChecker.Check();
ProverInterface.Outcome proverOutcome;
proverOutcome = hdnChecker.ReadOutcome();
Outcome verifyOutcome = ReadOutcome(proverOutcome);
if (verifyOutcome == Outcome.Errors) {
Contract.Assume(collector.examples != null);
if (collector.examples.Count == 0) {
string memStr = System.Convert.ToString(System.GC.GetTotalMemory(false));
if (memStr != null)
memStr = "?";
throw new UnexpectedProverOutputException("Outcome.Errors w/ 0 counter examples. " + memStr + " memory used");
}
errors = collector.examples;
}
else {
errors = null;
}
return verifyOutcome;
}
private Outcome ReadOutcome(ProverInterface.Outcome proverOutcome) {
switch (proverOutcome) {
case ProverInterface.Outcome.Valid:
return Outcome.Correct;
case ProverInterface.Outcome.Invalid:
return Outcome.Errors;
case ProverInterface.Outcome.TimeOut:
return Outcome.TimedOut;
case ProverInterface.Outcome.Undetermined:
return Outcome.Inconclusive;
default:
throw new Exception("Unknown Prover Interface outcome while reading outcome.");
}
}
}
}
|