ltl2tgba.cc 16.7 KB
Newer Older
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
// Copyright (C) 2003, 2004  Laboratoire d'Informatique de Paris 6 (LIP6),
// dpartement Systmes Rpartis Coopratifs (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.

22
23
#include <iostream>
#include <cassert>
24
25
#include <fstream>
#include <string>
26
#include "ltlvisit/destroy.hh"
27
#include "ltlvisit/reduce.hh"
28
#include "ltlvisit/tostring.hh"
29
#include "ltlvisit/apcollect.hh"
30
31
#include "ltlast/allnodes.hh"
#include "ltlparse/public.hh"
32
#include "tgbaalgos/ltl2tgba_lacim.hh"
33
#include "tgbaalgos/ltl2tgba_fm.hh"
34
#include "tgba/bddprint.hh"
35
#include "tgbaalgos/dotty.hh"
36
#include "tgbaalgos/lbtt.hh"
37
#include "tgba/tgbatba.hh"
38
#include "tgbaalgos/magic.hh"
39
40
#include "tgbaalgos/gtec/gtec.hh"
#include "tgbaalgos/gtec/ce.hh"
41
#include "tgbaparse/public.hh"
42
#include "tgbaalgos/dupexp.hh"
43
#include "tgbaalgos/neverclaim.hh"
44
#include "tgbaalgos/reductgba_sim.hh"
45
#include "tgbaalgos/replayrun.hh"
46
#include "tgbaalgos/rundotdec.hh"
47

48
49
50
void
syntax(char* prog)
{
Alexandre Duret-Lutz's avatar
Alexandre Duret-Lutz committed
51
  std::cerr << "Usage: "<< prog << " [OPTIONS...] formula" << std::endl
52
            << "       "<< prog << " -F [OPTIONS...] file" << std::endl
53
            << "       "<< prog << " -X [OPTIONS...] file" << std::endl
Alexandre Duret-Lutz's avatar
spacing    
Alexandre Duret-Lutz committed
54
	    << std::endl
Alexandre Duret-Lutz's avatar
Alexandre Duret-Lutz committed
55
	    << "Options:" << std::endl
martinez's avatar
martinez committed
56
	    << "  -a    display the acceptance_conditions BDD, not the "
57
	    << "reachability graph"
58
	    << std::endl
martinez's avatar
martinez committed
59
60
61
	    << "  -A    same as -a, but as a set" << std::endl
	    << "  -d    turn on traces during parsing" << std::endl
	    << "  -D    degeneralize the automaton" << std::endl
62
63
64
	    << "  -e[ALGO]  emptiness-check, expect and compute an "
	    << "accepting run" << std::endl
	    << "  -E[ALGO]  emptiness-check, expect no accepting run"
65
	    << std::endl
martinez's avatar
martinez committed
66
67
68
            << "  -f    use Couvreur's FM algorithm for translation"
	    << std::endl
            << "  -F    read the formula from the file" << std::endl
69
	    << "  -g    graph the accepting run on the automaton (requires -e)"
70
	    << std::endl
martinez's avatar
martinez committed
71
            << "  -L    fair-loop approximation (implies -f)" << std::endl
martinez's avatar
martinez committed
72
73
	    << "  -N    display the never clain for Spin "
	    << "(implies -D)" << std::endl
martinez's avatar
martinez committed
74
75
            << "  -p    branching postponement (implies -f)" << std::endl
	    << "  -r    display the relation BDD, not the reachability graph"
76
	    << std::endl
martinez's avatar
martinez committed
77
78
	    << "  -r1   reduce formula using basic rewriting" << std::endl
	    << "  -r2   reduce formula using class of eventuality and "
79
	    << "and universality" << std::endl
martinez's avatar
martinez committed
80
	    << "  -r3   reduce formula using implication between "
81
	    << "sub-formulae" << std::endl
martinez's avatar
martinez committed
82
83
84
	    << "  -r4   reduce formula using all rules" << std::endl
	    << "  -rd   display the reduce formula" << std::endl
	    << "  -R    same as -r, but as a set" << std::endl
85
	    << "  -R1q  merge states using direct simulation "
martinez's avatar
martinez committed
86
	    << "(use -L for more reduction)"
87
	    << std::endl
88
	    << "  -R1t  remove transitions using direct simulation "
martinez's avatar
martinez committed
89
	    << "(use -L for more reduction)"
90
	    << std::endl
91
92
	    << "  -R2q  merge states using delayed simulation" << std::endl
	    << "  -R2t  remove transitions using delayed simulation"
93
	    << std::endl
94
95
96
	    << "  -R3   use SCC to reduce the automata" << std::endl
	    << "  -Rd   display the simulation relation" << std::endl
	    << "  -RD   display the parity game (dot format)" << std::endl
martinez's avatar
martinez committed
97
	    << "  -s    convert to explicit automata, and number states "
98
	    << "in DFS order" << std::endl
martinez's avatar
martinez committed
99
	    << "  -S    convert to explicit automata, and number states "
100
	    << "in BFS order" << std::endl
martinez's avatar
martinez committed
101
	    << "  -t    display reachable states in LBTT's format" << std::endl
102
103
            << "  -U[PROPS]  consider atomic properties PROPS as exclusive "
	    << "events (implies -f)" << std::endl
martinez's avatar
martinez committed
104
105
106
	    << "  -v    display the BDD variables used by the automaton"
	    << std::endl
            << "  -x    try to produce a more deterministic automata "
107
	    << "(implies -f)" << std::endl
martinez's avatar
martinez committed
108
	    << "  -X    do not compute an automaton, read it from a file"
109
	    << std::endl
martinez's avatar
martinez committed
110
	    << "  -y    do not merge states with same symbolic representation "
111
112
113
	    << "(implies -f)" << std::endl
	    << std::endl
	    << "Where ALGO should be one of:" << std::endl
114
	    << "  couvreur99 (the default)" << std::endl
115
116
	    << "  couvreur99_shy" << std::endl
	    << "  magic_search" << std::endl
117
118
119
	    << "  magic_search_repeated" << std::endl
	    << "  se05_search" << std::endl
	    << "  se05_search_repeated" << std::endl;
120
121
122
123
124
125
126
127
  exit(2);
}

int
main(int argc, char** argv)
{
  int exit_code = 0;

128
  bool debug_opt = false;
129
  bool degeneralize_opt = false;
130
  bool fm_opt = false;
131
  bool fm_exprop_opt = false;
132
  bool fm_symb_merge_opt = true;
133
  bool file_opt = false;
134
  int output = 0;
135
  int formula_index = 0;
136
  std::string echeck_algo;
137
  enum { None, Couvreur, Couvreur2, MagicSearch, Se04Search } echeck = None;
138
  enum { NoneDup, BFS, DFS } dupexp = NoneDup;
139
140
  bool magic_many = false;
  bool expect_counter_example = false;
141
  bool from_file = false;
142
  int reduc_aut = spot::Reduce_None;
143
  int redopt = spot::ltl::Reduce_None;
144
145
  bool display_reduce_form = false;
  bool display_rel_sim = false;
146
  bool display_parity_game = false;
147
  bool post_branching = false;
148
  bool fair_loop_approx = false;
149
  bool graph_run_opt = false;
150
151
  spot::ltl::environment& env(spot::ltl::default_environment::instance());
  spot::ltl::atomic_prop_set* unobservables = 0;
152

153
  for (;;)
154
    {
155
      if (argc < formula_index + 2)
156
	syntax(argv[0]);
157
158
159

      ++formula_index;

160
161
162
163
164
165
166
167
168
      if (!strcmp(argv[formula_index], "-a"))
	{
	  output = 2;
	}
      else if (!strcmp(argv[formula_index], "-A"))
	{
	  output = 4;
	}
      else if (!strcmp(argv[formula_index], "-d"))
169
170
171
	{
	  debug_opt = true;
	}
172
173
174
175
      else if (!strcmp(argv[formula_index], "-D"))
	{
	  degeneralize_opt = true;
	}
176
      else if (!strncmp(argv[formula_index], "-e", 2))
177
	{
178
179
180
181
	  if (argv[formula_index][2] != 0)
	    echeck_algo = argv[formula_index] + 2;
	  else
	    echeck_algo = "couvreur99";
182
183
184
	  expect_counter_example = true;
	  output = -1;
	}
185
      else if (!strncmp(argv[formula_index], "-E", 2))
186
	{
187
188
189
190
	  if (argv[formula_index][2] != 0)
	    echeck_algo = argv[formula_index] + 2;
	  else
	    echeck_algo = "couvreur99";
191
192
193
	  expect_counter_example = false;
	  output = -1;
	}
194
195
196
197
198
199
200
201
      else if (!strcmp(argv[formula_index], "-f"))
	{
	  fm_opt = true;
	}
      else if (!strcmp(argv[formula_index], "-F"))
	{
	  file_opt = true;
	}
202
203
204
205
      else if (!strcmp(argv[formula_index], "-g"))
	{
	  graph_run_opt = true;
	}
206
207
208
209
210
      else if (!strcmp(argv[formula_index], "-L"))
	{
	  fair_loop_approx = true;
	  fm_opt = true;
	}
martinez's avatar
martinez committed
211
212
213
214
215
      else if (!strcmp(argv[formula_index], "-N"))
	{
	  degeneralize_opt = true;
	  output = 8;
	}
216
217
218
219
220
      else if (!strcmp(argv[formula_index], "-p"))
	{
	  post_branching = true;
	  fm_opt = true;
	}
221
222
      else if (!strcmp(argv[formula_index], "-r"))
	{
223
224
	  output = 1;
	}
225
226
227
228
229
230
      else if (!strcmp(argv[formula_index], "-r1"))
	{
	  redopt |= spot::ltl::Reduce_Basics;
	}
      else if (!strcmp(argv[formula_index], "-r2"))
	{
231
	  redopt |= spot::ltl::Reduce_Eventuality_And_Universality;
232
233
234
	}
      else if (!strcmp(argv[formula_index], "-r3"))
	{
235
	  redopt |= spot::ltl::Reduce_Syntactic_Implications;
236
237
238
239
240
	}
      else if (!strcmp(argv[formula_index], "-r4"))
	{
	  redopt |= spot::ltl::Reduce_All;
	}
241
242
243
      else if (!strcmp(argv[formula_index], "-R"))
	{
	  output = 3;
244
	}
martinez's avatar
martinez committed
245
246
247
248
249
250
251
252
253
      else if (!strcmp(argv[formula_index], "-R1q"))
	{
	  reduc_aut |= spot::Reduce_quotient_Dir_Sim;
	}
      else if (!strcmp(argv[formula_index], "-R1t"))
	{
	  reduc_aut |= spot::Reduce_transition_Dir_Sim;
	}
      else if (!strcmp(argv[formula_index], "-R2q"))
254
	{
martinez's avatar
martinez committed
255
	  reduc_aut |= spot::Reduce_quotient_Del_Sim;
256
	}
martinez's avatar
martinez committed
257
      else if (!strcmp(argv[formula_index], "-R2t"))
258
	{
martinez's avatar
martinez committed
259
	  reduc_aut |= spot::Reduce_transition_Del_Sim;
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
	}
      else if (!strcmp(argv[formula_index], "-R3"))
	{
	  reduc_aut |= spot::Reduce_Scc;
	}
      else if (!strcmp(argv[formula_index], "-rd"))
	{
	  display_reduce_form = true;
	}
      else if (!strcmp(argv[formula_index], "-Rd"))
	{
	  display_rel_sim = true;
	}
      else if (!strcmp(argv[formula_index], "-RD"))
	{
	  display_parity_game = true;
	}
277
278
279
280
281
282
283
284
      else if (!strcmp(argv[formula_index], "-s"))
	{
	  dupexp = DFS;
	}
      else if (!strcmp(argv[formula_index], "-S"))
	{
	  dupexp = BFS;
	}
285
286
287
288
      else if (!strcmp(argv[formula_index], "-t"))
	{
	  output = 6;
	}
289
290
291
292
293
      else if (!strncmp(argv[formula_index], "-U", 2))
	{
	  unobservables = new spot::ltl::atomic_prop_set;
	  fm_opt = true;
	  // Parse -U's argument.
294
	  const char* tok = strtok(argv[formula_index] + 2, ", \t;");
295
296
297
298
	  while (tok)
	    {
	      unobservables->insert
		(static_cast<spot::ltl::atomic_prop*>(env.require(tok)));
299
	      tok = strtok(0, ", \t;");
300
301
	    }
	}
302
303
304
305
      else if (!strcmp(argv[formula_index], "-v"))
	{
	  output = 5;
	}
306
307
308
309
310
      else if (!strcmp(argv[formula_index], "-x"))
	{
	  fm_opt = true;
	  fm_exprop_opt = true;
	}
311
312
313
314
      else if (!strcmp(argv[formula_index], "-X"))
	{
	  from_file = true;
	}
315
316
317
318
319
      else if (!strcmp(argv[formula_index], "-y"))
	{
	  fm_opt = true;
	  fm_symb_merge_opt = false;
	}
320
321
322
323
      else
	{
	  break;
	}
324
325
    }

326
  if (echeck_algo != "")
327
    {
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
      if (echeck_algo == "couvreur99")
	{
	  echeck = Couvreur;
	}
      else if (echeck_algo == "couvreur99_shy")
	{
	  echeck = Couvreur2;
	}
      else if (echeck_algo == "magic_search")
	{
	  echeck = MagicSearch;
	  degeneralize_opt = true;
	}
      else if (echeck_algo == "magic_search_repeated")
	{
	  echeck = MagicSearch;
	  degeneralize_opt = true;
	  magic_many = true;
	}
347
348
349
350
351
352
353
354
355
356
357
      else if (echeck_algo == "se05_search")
	{
	  echeck = Se04Search;
	  degeneralize_opt = true;
	}
      else if (echeck_algo == "se05_search_repeated")
	{
	  echeck = Se04Search;
	  degeneralize_opt = true;
	  magic_many = true;
	}
358
359
360
361
362
      else
	{
	  std::cerr << "unknown emptiness-check: " << echeck_algo << std::endl;
	  syntax(argv[0]);
	}
363
364
    }

365
366
367
368
369
370
  if (graph_run_opt && (echeck_algo == "" || !expect_counter_example))
    {
      std::cerr << argv[0] << ": error: -g requires -e." << std::endl;
      exit(1);
    }

371
372
373
374
  std::string input;

  if (file_opt)
    {
375
      if (strcmp(argv[formula_index], "-"))
376
	{
377
	  std::ifstream fin(argv[formula_index]);
378
	  if (!fin)
379
380
381
382
	    {
	      std::cerr << "Cannot open " << argv[formula_index] << std::endl;
	      exit(2);
	    }
383

384
	  if (!std::getline(fin, input, '\0'))
385
386
387
388
389
390
	    {
	      std::cerr << "Cannot read " << argv[formula_index] << std::endl;
	      exit(2);
	    }
	}
      else
391
	{
392
	  std::getline(std::cin, input, '\0');
393
394
395
396
397
398
399
	}
    }
  else
    {
      input = argv[formula_index];
    }

400
  spot::bdd_dict* dict = new spot::bdd_dict();
401
402
403
404
405
406
407
408
409

  spot::ltl::formula* f = 0;
  if (!from_file)
    {
      spot::ltl::parse_error_list pel;
      f = spot::ltl::parse(input, pel, env, debug_opt);
      exit_code = spot::ltl::format_parse_errors(std::cerr, input, pel);
    }
  if (f || from_file)
410
    {
411
412
413
414
      spot::tgba_bdd_concrete* concrete = 0;
      spot::tgba* to_free = 0;
      spot::tgba* a = 0;

415
416
417
      if (from_file)
	{
	  spot::tgba_parse_error_list pel;
418
419
	  spot::tgba_explicit* e;
	  to_free = a = e = spot::tgba_parse(input, pel, dict, env, debug_opt);
420
	  if (spot::format_tgba_parse_errors(std::cerr, pel))
421
422
423
424
425
	    {
	      delete to_free;
	      delete dict;
	      return 2;
	    }
426
	  e->merge_transitions();
427
	}
428
      else
429
	{
430
	  if (redopt != spot::ltl::Reduce_None)
431
	    {
432
433
434
	      spot::ltl::formula* t = spot::ltl::reduce(f, redopt);
	      spot::ltl::destroy(f);
	      f = t;
435
436
	      if (display_reduce_form)
		std::cout << spot::ltl::to_string(f) << std::endl;
437
	    }
438

439
	  if (fm_opt)
440
	    to_free = a = spot::ltl_to_tgba_fm(f, dict, fm_exprop_opt,
441
					       fm_symb_merge_opt,
442
					       post_branching,
443
					       fair_loop_approx, unobservables);
444
445
446
	  else
	    to_free = a = concrete = spot::ltl_to_tgba_lacim(f, dict);
	}
447

448
449
450
451
      spot::tgba_tba_proxy* degeneralized = 0;
      if (degeneralize_opt)
	a = degeneralized = new spot::tgba_tba_proxy(a);

452
453
454
455
      spot::tgba_reduc* aut_red = 0;
      if (reduc_aut != spot::Reduce_None)
	{
	  a = aut_red = new spot::tgba_reduc(a);
456
457
458
459

	  if (reduc_aut & spot::Reduce_Scc)
	    aut_red->prune_scc();

martinez's avatar
martinez committed
460
461
462
463
	  if (reduc_aut & (spot::Reduce_quotient_Dir_Sim |
			   spot::Reduce_transition_Dir_Sim |
			   spot::Reduce_quotient_Del_Sim |
			   spot::Reduce_transition_Del_Sim))
464
	    {
martinez's avatar
martinez committed
465
466
467
468
469
	      spot::direct_simulation_relation* rel_dir = 0;
	      spot::delayed_simulation_relation* rel_del = 0;

	      if (reduc_aut & (spot::Reduce_quotient_Dir_Sim |
			       spot::Reduce_transition_Dir_Sim))
470
471
472
473
		rel_dir =
		  spot::get_direct_relation_simulation(a,
						       std::cout,
						       display_parity_game);
martinez's avatar
martinez committed
474
475
	      else if (reduc_aut & (spot::Reduce_quotient_Del_Sim |
				    spot::Reduce_transition_Del_Sim))
476
477
478
479
		rel_del =
		  spot::get_delayed_relation_simulation(a,
							std::cout,
							display_parity_game);
480
481

	      if (display_rel_sim)
martinez's avatar
martinez committed
482
483
484
485
486
487
		{
		  if (rel_dir)
		    aut_red->display_rel_sim(rel_dir, std::cout);
		  if (rel_del)
		    aut_red->display_rel_sim(rel_del, std::cout);
		}
488

martinez's avatar
martinez committed
489
490
491
492
493
494
495
496
497
498
499
500
501
	      if (reduc_aut & spot::Reduce_quotient_Dir_Sim)
		aut_red->quotient_state(rel_dir);
	      if (reduc_aut & spot::Reduce_transition_Dir_Sim)
		aut_red->delete_transitions(rel_dir);
	      if (reduc_aut & spot::Reduce_quotient_Del_Sim)
		aut_red->quotient_state(rel_del);
	      if (reduc_aut & spot::Reduce_transition_Del_Sim)
		aut_red->delete_transitions(rel_del);

	      if (rel_dir)
		spot::free_relation_simulation(rel_dir);
	      if (rel_del)
		spot::free_relation_simulation(rel_del);
502
503
504
	    }
	}

505
506
507
508
509
510
511
512
513
514
515
516
517
      spot::tgba_explicit* expl = 0;
      switch (dupexp)
	{
	case NoneDup:
	  break;
	case BFS:
	  a = expl = tgba_dupexp_bfs(a);
	  break;
	case DFS:
	  a = expl = tgba_dupexp_dfs(a);
	  break;
	}

518
519
      switch (output)
	{
520
521
522
	case -1:
	  /* No output.  */
	  break;
523
524
525
526
	case 0:
	  spot::dotty_reachable(std::cout, a);
	  break;
	case 1:
527
528
529
	  if (concrete)
	    spot::bdd_print_dot(std::cout, concrete->get_dict(),
				concrete->get_core_data().relation);
530
531
	  break;
	case 2:
532
533
534
	  if (concrete)
	    spot::bdd_print_dot(std::cout, concrete->get_dict(),
				concrete->
535
				get_core_data().acceptance_conditions);
536
537
	  break;
	case 3:
538
539
540
	  if (concrete)
	    spot::bdd_print_set(std::cout, concrete->get_dict(),
				concrete->get_core_data().relation);
541
542
	  break;
	case 4:
543
544
545
	  if (concrete)
	    spot::bdd_print_set(std::cout, concrete->get_dict(),
				concrete->
546
				get_core_data().acceptance_conditions);
547
	  break;
548
	case 5:
549
	  a->get_dict()->dump(std::cout);
550
	  break;
551
552
553
	case 6:
	  spot::lbtt_reachable(std::cout, a);
	  break;
554
555
556
	case 8:
	  spot::never_claim_reachable(std::cout, degeneralized, f);
	  break;
557
558
559
	default:
	  assert(!"unknown output option");
	}
560

561
562
      spot::emptiness_check* ec = 0;
      spot::tgba* ec_a = 0;
563
564
565
566
      switch (echeck)
	{
	case None:
	  break;
martinez's avatar
martinez committed
567

568
	case Couvreur:
569
570
571
572
	  ec_a = a;
	  ec = new spot::couvreur99_check(a);
	  break;

573
	case Couvreur2:
574
575
	  ec_a = a;
	  ec = new spot::couvreur99_check_shy(a);
576
	  break;
martinez's avatar
martinez committed
577

578
	case MagicSearch:
579
	  ec_a = degeneralized;
580
581
582
583
584
585
	  ec = spot::explicit_magic_search(degeneralized);
	  break;

	case Se04Search:
	  ec_a = degeneralized;
	  ec = spot::explicit_se05_search(degeneralized);
586
	  break;
587
	}
martinez's avatar
martinez committed
588

589
590
591
592
593
      if (ec)
	{
	  do
	    {
	      spot::emptiness_check_result* res = ec->check();
594
595
	      if (!graph_run_opt)
		ec->print_stats(std::cout);
596
597
598
599
600
601
602
603
604
605
606
607
608
609
	      if (expect_counter_example != !!res)
		exit_code = 1;

	      if (!res)
		{
		  std::cout << "no accepting run found" << std::endl;
		  break;
		}
	      else
		{

		  spot::tgba_run* run = res->accepting_run();
		  if (!run)
		    {
610
		      std::cout << "an accepting run exists" << std::endl;
611
612
613
		    }
		  else
		    {
614
615
616
617
618
619
620
621
622
623
624
		      if (graph_run_opt)
			{
			  spot::tgba_run_dotty_decorator deco(run);
			  spot::dotty_reachable(std::cout, ec_a, &deco);
			}
		      else
			{
			  spot::print_tgba_run(std::cout, ec_a, run);
			  if (!spot::replay_tgba_run(std::cout, ec_a, run))
			    exit_code = 1;
			}
625
626
627
628
629
630
631
		      delete run;
		    }
		}
	      delete res;
	    }
	  while (magic_many);
	  delete ec;
martinez's avatar
martinez committed
632
633
	}

634
635
      if (f)
        spot::ltl::destroy(f);
636
637
638
      delete expl;
      delete degeneralized;
      delete aut_red;
639
      delete to_free;
640
641
642
643
644
645
646
647
648
649
    }
  else
    {
      exit_code = 1;
    }

  assert(spot::ltl::atomic_prop::instance_count() == 0);
  assert(spot::ltl::unop::instance_count() == 0);
  assert(spot::ltl::binop::instance_count() == 0);
  assert(spot::ltl::multop::instance_count() == 0);
650
  delete dict;
651
652
  return exit_code;
}