reduc.cc 4.15 KB
Newer Older
1
// Copyright (C) 2004  Laboratoire d'Informatique de Paris 6 (LIP6),
martinez's avatar
martinez committed
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
// 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.

#include <iostream>
#include <cassert>
#include "ltlparse/public.hh"
#include "ltlvisit/lunabbrev.hh"
#include "ltlvisit/tunabbrev.hh"
#include "ltlvisit/dump.hh"
#include "ltlvisit/nenoform.hh"
#include "ltlvisit/destroy.hh"
#include "ltlvisit/tostring.hh"
#include "ltlvisit/reducform.hh"
#include "ltlast/allnodes.hh"

void
syntax(char* prog)
{
37
  std::cerr << prog << " option formula1 (formula2)?" << std::endl;
martinez's avatar
martinez committed
38
39
40
41
42
43
  exit(2);
}

int
main(int argc, char** argv)
{
44
  if (argc < 3)
martinez's avatar
martinez committed
45
    syntax(argv[0]);
46

47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
  spot::ltl::option o;
  switch(atoi(argv[1])){
  case 0:
    o = spot::ltl::Base;
    break;
  case 1:
    o = spot::ltl::Inf;
    break;
  case 2:
    o = spot::ltl::EventualUniversal;
    break;
  case 3:
    o = spot::ltl::BRI;
    break;
  default: return 2;
  }

martinez's avatar
martinez committed
64
  spot::ltl::parse_error_list p1;
65
  spot::ltl::formula* f1 = spot::ltl::parse(argv[2], p1);
martinez's avatar
martinez committed
66
67
  spot::ltl::formula* f2 = NULL;

68
  if (spot::ltl::format_parse_errors(std::cerr, argv[2], p1))
martinez's avatar
martinez committed
69
70
    return 2;

71

72
  if (argc == 4){
martinez's avatar
martinez committed
73
    spot::ltl::parse_error_list p2;
74
75
    f2 = spot::ltl::parse(argv[3], p2);
    if (spot::ltl::format_parse_errors(std::cerr, argv[3], p2))
martinez's avatar
martinez committed
76
77
      return 2;
  }
78

martinez's avatar
martinez committed
79
  int exit_code = 0;
80

martinez's avatar
martinez committed
81
82
  spot::ltl::formula* ftmp1;
  spot::ltl::formula* ftmp2;
83

martinez's avatar
martinez committed
84
85
86
87
88
89
  ftmp1 = f1;
  f1 = unabbreviate_logic(f1);
  ftmp2 = f1;
  f1 = negative_normal_form(f1);
  spot::ltl::destroy(ftmp1);
  spot::ltl::destroy(ftmp2);
90
91


martinez's avatar
martinez committed
92
93
  int length_f1_before = spot::ltl::form_length(f1);
  std::string f1s_before = spot::ltl::to_string(f1);
94

martinez's avatar
martinez committed
95
  ftmp1 = f1;
96
  f1 = spot::ltl::reduce(f1,o);
martinez's avatar
martinez committed
97
98
99
100
  ftmp2 = f1;
  f1 = spot::ltl::unabbreviate_logic(f1);
  spot::ltl::destroy(ftmp1);
  spot::ltl::destroy(ftmp2);
101

martinez's avatar
martinez committed
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
  int length_f1_after = spot::ltl::form_length(f1);
  std::string f1s_after = spot::ltl::to_string(f1);

  bool red = (length_f1_after < length_f1_before);
  if (red);
  std::string f2s = "";
  if (f2 != NULL) {
    ftmp1 = f2;
    f2 = unabbreviate_logic(f2);
    ftmp2 = f2;
    f2 = negative_normal_form(f2);
    spot::ltl::destroy(ftmp1);
    spot::ltl::destroy(ftmp2);
    ftmp1 = f2;
    f2 = unabbreviate_logic(f2);
    spot::ltl::destroy(ftmp1);
    f2s = spot::ltl::to_string(f2);
  }
120
121


martinez's avatar
martinez committed
122
  if (red && (f2 == NULL)) {
123
124
125
    std::cout << length_f1_before << " " << length_f1_after
	      << " '" << f1s_before << "' reduce to '" << f1s_after << "'"
	      << std::endl;
martinez's avatar
martinez committed
126
  }
127

martinez's avatar
martinez committed
128
129
130
  if (f2 != NULL){
    if (f1 != f2) {
      if (length_f1_after < length_f1_before)
131
132
	std::cout << f1s_before << " ** " << f2s << " ** " << f1s_after
		  << " KOREDUC " << std::endl;
martinez's avatar
martinez committed
133
      else
134
135
	std::cout << f1s_before << " ** " << f2s << " ** " << f1s_after
		  << " KOIDEM " << std::endl;
martinez's avatar
martinez committed
136
137
138
139
      exit_code = 1;
    }
    else {
      if (f1s_before != f1s_after)
140
141
	std::cout << f1s_before << " ** " << f2s << " ** " << f1s_after
		  << " OKREDUC " << std::endl;
martinez's avatar
martinez committed
142
      else
143
144
	std::cout << f1s_before << " ** " << f2s << " ** " << f1s_after
		  << " OKIDEM" << std::endl;
martinez's avatar
martinez committed
145
146
147
      exit_code = 0;
    }
  }
148
  else{
martinez's avatar
martinez committed
149
150
    if (length_f1_after < length_f1_before) exit_code = 0;
  }
151

martinez's avatar
martinez committed
152
153
154
  spot::ltl::destroy(f1);
  if (f2 != NULL)
    spot::ltl::destroy(f2);
155

martinez's avatar
martinez committed
156
157
158
159
160

  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);
161

martinez's avatar
martinez committed
162
163
  return exit_code;
}