* src/tgbaalgos/randomgraph.cc, src/tgbaalgos/randomgraph.hh: New files.

* src/tgbaalgos/Makefile.am (tgbaalgos_HEADERS)
(libtgbaalgos_la_SOURCES): Add them.
* src/tgba/tgbaexplicit.hh (tgba_explicit::add_state): Make it public.
* src/tgbatest/randtgba.cc: New file.
* src/tgbatest/Makefile.am (noinst_PROGRAMS, readsave_SOURCES): Add it.
* src/tgbatest/readsave.test: Check a random graph.
This commit is contained in:
Alexandre Duret-Lutz 2004-11-12 17:24:46 +00:00
parent e54ddd46ed
commit 5bcb6091fd
8 changed files with 427 additions and 5 deletions

View file

@ -38,6 +38,7 @@ tgbaalgos_HEADERS = \
neverclaim.hh \
powerset.hh \
projrun.hh \
randomgraph.hh \
reachiter.hh \
replayrun.hh \
rundotdec.hh \
@ -58,6 +59,7 @@ libtgbaalgos_la_SOURCES = \
neverclaim.cc \
powerset.cc \
projrun.cc \
randomgraph.cc \
reachiter.cc \
replayrun.cc \
rundotdec.cc \

View file

@ -0,0 +1,155 @@
// Copyright (C) 2004 Laboratoire d'Informatique de Paris 6 (LIP6),
// département Systèmes Répartis Coopératifs (SRC), Université Pierre
// et Marie Curie.
//
// This file is part of Spot, a model checking library.
//
// Spot 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 2 of the License, or
// (at your option) any later version.
//
// Spot 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 Spot; see the file COPYING. If not, write to the Free
// Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
// 02111-1307, USA.
#include "randomgraph.hh"
#include "tgba/tgbaexplicit.hh"
#include "misc/random.hh"
#include "ltlast/atomic_prop.hh"
#include "ltlvisit/destroy.hh"
#include <sstream>
#include <list>
#include <set>
namespace spot
{
namespace
{
std::string
st(int n)
{
std::stringstream s;
s << n;
return "S" + s.str();
}
std::string
acc(int n)
{
std::stringstream s;
s << n;
return "a" + s.str();
}
void
random_labels(tgba_explicit* aut,
const std::string& src, const std::string& dest,
const std::list<int>& props, float t,
const std::list<bdd>& accs, float a)
{
bdd p = bddtrue;
for (std::list<int>::const_iterator i = props.begin();
i != props.end(); ++i)
p &= (drand() < t ? bdd_ithvar : bdd_nithvar)(*i);
bdd ac = bddfalse;
for (std::list<bdd>::const_iterator i = accs.begin();
i != accs.end(); ++i)
if (drand() < a)
ac |= *i;
tgba_explicit::transition* u = aut->create_transition(src, dest);
aut->add_conditions(u, p);
aut->add_acceptance_conditions(u, ac);
}
}
tgba*
random_graph(int n, float d,
const ltl::atomic_prop_set* ap, bdd_dict* dict,
int n_acc, float a, float t,
ltl::environment* env)
{
tgba_explicit* res = new tgba_explicit(dict);
std::list<int> props;
for (ltl::atomic_prop_set::const_iterator i = ap->begin();
i != ap->end(); ++i)
props.push_back(dict->register_proposition(*i, res));
std::list<bdd> accs;
bdd allneg = bddtrue;
for (int i = 0; i < n_acc; ++i)
{
ltl::formula* f = env->require(acc(i));
int v = dict->register_acceptance_variable(f, res);
ltl::destroy(f);
allneg &= bdd_nithvar(v);
bdd b = bdd_ithvar(v);
accs.push_back(b);
}
for (std::list<bdd>::iterator i = accs.begin(); i != accs.end(); ++i)
*i &= bdd_exist(allneg, *i);
typedef std::set<std::string> node_set;
node_set nodes_to_process;
node_set unreachable_nodes;
nodes_to_process.insert(st(0));
for (int i = 1; i < n; ++i)
unreachable_nodes.insert(st(i));
while (!nodes_to_process.empty())
{
std::string src = *nodes_to_process.begin();
nodes_to_process.erase(nodes_to_process.begin());
if (!unreachable_nodes.empty())
{
// Pick a random unreachable node.
int index = mrand(unreachable_nodes.size());
node_set::const_iterator i;
for (i = unreachable_nodes.begin(); index; ++i, --index)
assert(i != unreachable_nodes.end());
// Link it from src.
random_labels(res, src, *i, props, t, accs, a);
nodes_to_process.insert(*i);
unreachable_nodes.erase(i);
}
// Randomly link node to another node (including itself).
for (int i = 0; i < n; ++i)
{
if (drand() >= d)
continue;
std::string dest = st(i);
random_labels(res, src, dest, props, t, accs, a);
node_set::iterator j = unreachable_nodes.find(dest);
if (j != unreachable_nodes.end())
{
nodes_to_process.insert(dest);
unreachable_nodes.erase(j);
}
}
// Avoid dead ends.
if (res->add_state(src)->empty())
random_labels(res, src, src, props, t, accs, a);
}
return res;
}
}

View file

@ -0,0 +1,76 @@
// Copyright (C) 2004 Laboratoire d'Informatique de Paris 6 (LIP6),
// département Systèmes Répartis Coopératifs (SRC), Université Pierre
// et Marie Curie.
//
// This file is part of Spot, a model checking library.
//
// Spot 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 2 of the License, or
// (at your option) any later version.
//
// Spot 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 Spot; see the file COPYING. If not, write to the Free
// Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
// 02111-1307, USA.
#ifndef SPOT_TGBAALGOS_RANDOMGRAPH_HH
# define SPOT_TGBAALGOS_RANDOMGRAPH_HH
#include "ltlvisit/apcollect.hh"
#include "ltlenv/defaultenv.hh"
namespace spot
{
class bdd_dict;
class tgba;
/// \brief Construct a tgba randomly.
///
/// \param n The number of states wanted in the automata. All states
/// will be connected, and there will be no dead state.
/// \param d The density of the automata. This is the probability
/// (between 0.0 and 1.0), to add a transition between two
/// states. All states have at least one outgoing transition,
/// so \a d is considered only when adding the remaining transition.
/// A density of 1 means all states will be connected to each other.
/// \param ap The list of atomic property that should label the transition.
/// \param dict The bdd_dict to used for this automata.
/// \param n_acc The number of acceptance sets to use.
/// \param a The probability (between 0.0 and 1.0) that a transition belongs
/// to an acceptance set.
/// \param t The probability (between 0.0 and 1.0) that an atomic proposition
/// is true.
/// \param env The environment in which to declare the acceptance conditions.
///
/// This algorithms is adapted from the one in Fig 6.2 page 48 of
/// \verbatim
/// @TechReport{ tauriainen.00.a66,
/// author = {Heikki Tauriainen},
/// title = {Automated Testing of {B\"u}chi Automata Translators for
/// {L}inear {T}emporal {L}ogic},
/// address = {Espoo, Finland},
/// institution = {Helsinki University of Technology, Laboratory for
/// Theoretical Computer Science},
/// number = {A66},
/// year = {2000},
/// url = {http://citeseer.nj.nec.com/tauriainen00automated.html},
/// type = {Research Report},
/// note = {Reprint of Master's thesis}
/// }
/// \endverbatim
/// The only difference is that labels are on transitions, and that
/// acceptance conditions are handled. Otherwise the logic is the same.
tgba*
random_graph(int n, float d,
const ltl::atomic_prop_set* ap, bdd_dict* dict,
int n_acc = 0, float a = 0.1, float t = 0.5,
ltl::environment* env = &ltl::default_environment::instance());
}
#endif // SPOT_TGBAALGOS_RANDOMGRAPH_HH