reduc.cc 5.01 KB
Newer Older
1
// Copyright (C) 2004, 2006  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
// 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"
31
#include "ltlvisit/reduce.hh"
32
#include "ltlvisit/length.hh"
33
#include "ltlvisit/contain.hh"
martinez's avatar
martinez committed
34
35
36
37
38
#include "ltlast/allnodes.hh"

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

int
main(int argc, char** argv)
{
46
47
48
  bool tau03 = false;
  bool stronger = false;

49
  if (argc < 3)
martinez's avatar
martinez committed
50
    syntax(argv[0]);
51

52
  int o = spot::ltl::Reduce_None;
53
54
55
  switch (atoi(argv[1]))
    {
    case 0:
56
      o = spot::ltl::Reduce_Basics;
57
58
      break;
    case 1:
59
      o = spot::ltl::Reduce_Syntactic_Implications;
60
61
      break;
    case 2:
62
      o = spot::ltl::Reduce_Eventuality_And_Universality;
63
      break;
64
65
66
    case 9:
      tau03 = stronger = true;
      /* fall through */
67
    case 3:
68
      o = spot::ltl::Reduce_All;
69
      break;
70
    case 4:
71
      o = spot::ltl::Reduce_Basics | spot::ltl::Reduce_Syntactic_Implications;
72
73
      break;
    case 5:
74
75
      o = (spot::ltl::Reduce_Basics
	   | spot::ltl::Reduce_Eventuality_And_Universality);
76
77
      break;
    case 6:
78
79
      o = (spot::ltl::Reduce_Syntactic_Implications
	   | spot::ltl::Reduce_Eventuality_And_Universality);
80
      break;
81
82
83
84
85
86
    case 8:
      stronger = true;
      /* fall through */
    case 7:
      tau03 = true;
      break;
87
88
    default:
      return 2;
89
90
  }

martinez's avatar
martinez committed
91
  spot::ltl::parse_error_list p1;
92
  spot::ltl::formula* f1 = spot::ltl::parse(argv[2], p1);
93
  spot::ltl::formula* f2 = 0;
martinez's avatar
martinez committed
94

95
  if (spot::ltl::format_parse_errors(std::cerr, argv[2], p1))
martinez's avatar
martinez committed
96
97
    return 2;

98

99
100
101
102
103
104
105
  if (argc == 4)
    {
      spot::ltl::parse_error_list p2;
      f2 = spot::ltl::parse(argv[3], p2);
      if (spot::ltl::format_parse_errors(std::cerr, argv[3], p2))
	return 2;
    }
106

martinez's avatar
martinez committed
107
  int exit_code = 0;
108

martinez's avatar
martinez committed
109
110
  spot::ltl::formula* ftmp1;
  spot::ltl::formula* ftmp2;
111

martinez's avatar
martinez committed
112
113
114
115
116
117
  ftmp1 = f1;
  f1 = unabbreviate_logic(f1);
  ftmp2 = f1;
  f1 = negative_normal_form(f1);
  spot::ltl::destroy(ftmp1);
  spot::ltl::destroy(ftmp2);
118
119


120
  int length_f1_before = spot::ltl::length(f1);
martinez's avatar
martinez committed
121
  std::string f1s_before = spot::ltl::to_string(f1);
122

martinez's avatar
martinez committed
123
  ftmp1 = f1;
124
  f1 = spot::ltl::reduce(f1, o);
martinez's avatar
martinez committed
125
126
127
128
  ftmp2 = f1;
  f1 = spot::ltl::unabbreviate_logic(f1);
  spot::ltl::destroy(ftmp1);
  spot::ltl::destroy(ftmp2);
129

130
131
132
133
134
135
136
  if (tau03)
    {
      ftmp1 = f1;
      f1 = spot::ltl::reduce_tau03(f1, stronger);
      spot::ltl::destroy(ftmp1);
    }

137
  int length_f1_after = spot::ltl::length(f1);
martinez's avatar
martinez committed
138
139
140
141
  std::string f1s_after = spot::ltl::to_string(f1);

  bool red = (length_f1_after < length_f1_before);
  std::string f2s = "";
142
  if (f2)
143
144
145
146
147
148
149
150
151
152
153
154
    {
      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);
    }
155

156
157
  if ((red | !red) && !f2)
  {
158
159
160
      std::cout << length_f1_before << " " << length_f1_after
		<< " '" << f1s_before << "' reduce to '" << f1s_after << "'"
		<< std::endl;
161
  }
162

163
164
165
166
167
168
169
170
171
172
173
174
  if (f2)
    {
      if (f1 != f2)
	{
	  if (length_f1_after < length_f1_before)
	    std::cout << f1s_before << " ** " << f2s << " ** " << f1s_after
		      << " KOREDUC " << std::endl;
	  else
	    std::cout << f1s_before << " ** " << f2s << " ** " << f1s_after
		      << " KOIDEM " << std::endl;
	  exit_code = 1;
	}
martinez's avatar
martinez committed
175
      else
176
177
178
179
180
181
182
183
184
	{
	  if (f1s_before != f1s_after)
	    std::cout << f1s_before << " ** " << f2s << " ** " << f1s_after
		      << " OKREDUC " << std::endl;
	  else
	    std::cout << f1s_before << " ** " << f2s << " ** " << f1s_after
		      << " OKIDEM" << std::endl;
	  exit_code = 0;
	}
martinez's avatar
martinez committed
185
    }
186
187
188
189
  else
    {
      if (length_f1_after < length_f1_before)
	exit_code = 0;
martinez's avatar
martinez committed
190
    }
191

martinez's avatar
martinez committed
192
  spot::ltl::destroy(f1);
193
  if (f2)
martinez's avatar
martinez committed
194
    spot::ltl::destroy(f2);
195

martinez's avatar
martinez committed
196
197
198
199
200

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

202
  return exit_code;
martinez's avatar
martinez committed
203
}