solidity/libsolidity/formal/SMTLib2Interface.cpp

216 lines
5.6 KiB
C++
Raw Normal View History

2017-07-10 16:13:38 +00:00
/*
This file is part of solidity.
solidity is free software: you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation, either version 3 of the License, or
(at your option) any later version.
solidity is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with solidity. If not, see <http://www.gnu.org/licenses/>.
*/
#include <libsolidity/formal/SMTLib2Interface.h>
2017-07-10 19:21:11 +00:00
#include <libsolidity/interface/Exceptions.h>
2017-07-13 19:06:04 +00:00
#include <libsolidity/interface/ReadFile.h>
2017-07-10 19:21:11 +00:00
#include <boost/algorithm/string/predicate.hpp>
#include <boost/algorithm/string/join.hpp>
2017-07-11 11:26:43 +00:00
#include <boost/filesystem/operations.hpp>
2017-07-10 19:21:11 +00:00
#include <cstdio>
#include <fstream>
#include <iostream>
#include <memory>
#include <stdexcept>
#include <string>
#include <array>
2017-07-10 16:13:38 +00:00
using namespace std;
using namespace dev;
2017-07-13 19:06:04 +00:00
using namespace dev::solidity;
2017-07-10 16:13:38 +00:00
using namespace dev::solidity::smt;
2017-07-13 19:06:04 +00:00
SMTLib2Interface::SMTLib2Interface(ReadCallback::Callback const& _queryCallback):
m_queryCallback(_queryCallback)
2017-07-10 19:21:11 +00:00
{
reset();
}
void SMTLib2Interface::reset()
{
m_accumulatedOutput.clear();
m_accumulatedOutput.emplace_back();
2018-04-17 21:46:53 +00:00
m_constants.clear();
m_functions.clear();
2017-07-11 11:26:43 +00:00
write("(set-option :produce-models true)");
write("(set-logic QF_UFLIA)");
2017-07-10 19:21:11 +00:00
}
void SMTLib2Interface::push()
{
m_accumulatedOutput.emplace_back();
}
void SMTLib2Interface::pop()
{
solAssert(!m_accumulatedOutput.empty(), "");
m_accumulatedOutput.pop_back();
}
void SMTLib2Interface::declareFunction(string _name, vector<SortPointer> const& _domain, Sort const& _codomain)
2017-07-10 19:21:11 +00:00
{
2018-04-17 21:46:53 +00:00
// TODO Use domain and codomain as key as well
string domain("");
for (auto const& sort: _domain)
domain += toSmtLibSort(*sort) + ' ';
2018-04-17 21:46:53 +00:00
if (!m_functions.count(_name))
{
m_functions.insert(_name);
write(
"(declare-fun |" +
_name +
"| (" +
domain +
2018-04-17 21:46:53 +00:00
") " +
(_codomain.kind == Kind::Int ? "Int" : "Bool") +
2018-04-17 21:46:53 +00:00
")"
);
}
2017-07-10 19:21:11 +00:00
}
void SMTLib2Interface::declareInteger(string _name)
2017-07-10 19:21:11 +00:00
{
2018-04-17 21:46:53 +00:00
if (!m_constants.count(_name))
{
m_constants.insert(_name);
write("(declare-const |" + _name + "| Int)");
}
2017-07-10 19:21:11 +00:00
}
void SMTLib2Interface::declareBool(string _name)
2017-07-10 19:21:11 +00:00
{
2018-04-17 21:46:53 +00:00
if (!m_constants.count(_name))
{
m_constants.insert(_name);
write("(declare-const |" + _name + "| Bool)");
}
2017-07-10 19:21:11 +00:00
}
2017-07-11 11:26:43 +00:00
void SMTLib2Interface::addAssertion(Expression const& _expr)
2017-07-10 19:21:11 +00:00
{
2017-07-13 16:22:51 +00:00
write("(assert " + toSExpr(_expr) + ")");
2017-07-10 19:21:11 +00:00
}
pair<CheckResult, vector<string>> SMTLib2Interface::check(vector<Expression> const& _expressionsToEvaluate)
{
2017-07-13 19:06:29 +00:00
string response = querySolver(
2017-07-11 11:26:43 +00:00
boost::algorithm::join(m_accumulatedOutput, "\n") +
checkSatAndGetValuesCommand(_expressionsToEvaluate)
);
2017-07-13 19:06:29 +00:00
2017-07-10 19:21:11 +00:00
CheckResult result;
// TODO proper parsing
if (boost::starts_with(response, "sat\n"))
2017-08-21 15:02:47 +00:00
result = CheckResult::SATISFIABLE;
2017-07-10 19:21:11 +00:00
else if (boost::starts_with(response, "unsat\n"))
2017-08-21 15:02:47 +00:00
result = CheckResult::UNSATISFIABLE;
2017-07-10 19:21:11 +00:00
else if (boost::starts_with(response, "unknown\n"))
result = CheckResult::UNKNOWN;
else
2017-07-11 11:26:43 +00:00
result = CheckResult::ERROR;
2017-07-10 19:21:11 +00:00
vector<string> values;
2018-07-27 12:13:22 +00:00
if (result == CheckResult::SATISFIABLE && result != CheckResult::ERROR)
2017-07-10 19:21:11 +00:00
values = parseValues(find(response.cbegin(), response.cend(), '\n'), response.cend());
return make_pair(result, values);
}
2017-07-13 16:22:51 +00:00
string SMTLib2Interface::toSExpr(Expression const& _expr)
{
if (_expr.arguments.empty())
return _expr.name;
std::string sexpr = "(" + _expr.name;
for (auto const& arg: _expr.arguments)
sexpr += " " + toSExpr(arg);
sexpr += ")";
return sexpr;
}
string SMTLib2Interface::toSmtLibSort(Sort const& _sort)
{
switch (_sort.kind)
{
case Kind::Int:
return "Int";
case Kind::Bool:
return "Bool";
default:
solAssert(false, "Invalid SMT sort");
}
}
2017-07-10 19:21:11 +00:00
void SMTLib2Interface::write(string _data)
{
solAssert(!m_accumulatedOutput.empty(), "");
2017-07-11 11:26:43 +00:00
m_accumulatedOutput.back() += move(_data) + "\n";
2017-07-10 19:21:11 +00:00
}
2017-07-11 11:26:43 +00:00
string SMTLib2Interface::checkSatAndGetValuesCommand(vector<Expression> const& _expressionsToEvaluate)
2017-07-10 19:21:11 +00:00
{
2017-07-11 11:26:43 +00:00
string command;
if (_expressionsToEvaluate.empty())
command = "(check-sat)\n";
else
{
// TODO make sure these are unique
for (size_t i = 0; i < _expressionsToEvaluate.size(); i++)
{
auto const& e = _expressionsToEvaluate.at(i);
solAssert(e.sort->kind == Kind::Int || e.sort->kind == Kind::Bool, "Invalid sort for expression to evaluate.");
command += "(declare-const |EVALEXPR_" + to_string(i) + "| " + (e.sort->kind == Kind::Int ? "Int" : "Bool") + ")\n";
2017-07-13 16:22:51 +00:00
command += "(assert (= |EVALEXPR_" + to_string(i) + "| " + toSExpr(e) + "))\n";
2017-07-11 11:26:43 +00:00
}
command += "(check-sat)\n";
command += "(get-value (";
for (size_t i = 0; i < _expressionsToEvaluate.size(); i++)
command += "|EVALEXPR_" + to_string(i) + "| ";
command += "))\n";
}
return command;
2017-07-10 19:21:11 +00:00
}
vector<string> SMTLib2Interface::parseValues(string::const_iterator _start, string::const_iterator _end)
{
vector<string> values;
while (_start < _end)
{
auto valStart = find(_start, _end, ' ');
if (valStart < _end)
++valStart;
auto valEnd = find(valStart, _end, ')');
values.emplace_back(valStart, valEnd);
_start = find(valEnd, _end, '(');
}
return values;
}
2017-07-13 19:06:29 +00:00
string SMTLib2Interface::querySolver(string const& _input)
{
if (!m_queryCallback)
BOOST_THROW_EXCEPTION(SolverError() << errinfo_comment("No SMT solver available."));
ReadCallback::Result queryResult = m_queryCallback(_input);
if (!queryResult.success)
BOOST_THROW_EXCEPTION(SolverError() << errinfo_comment(queryResult.responseOrErrorMessage));
return queryResult.responseOrErrorMessage;
}