source: icGREP/icgrep-devel/icgrep/re/re_nullable.cpp

Last change on this file was 5267, checked in by nmedfort, 10 months ago

Code clean-up. Removed Pablo Call, SetIthBit? and Prototype.

File size: 8.1 KB
Line 
1#include "re_nullable.h"
2#include <re/re_alt.h>             // for Alt, makeAlt
3#include <re/re_any.h>             // for makeAny, Any
4#include <re/re_assertion.h>       // for Assertion, Assertion::Sense, Asser...
5#include <re/re_diff.h>            // for Diff, makeDiff
6#include <re/re_intersect.h>       // for Intersect
7#include <re/re_name.h>            // for Name
8#include <re/re_rep.h>             // for Rep, makeRep
9#include <re/re_seq.h>             // for Seq, makeSeq
10#include <vector>                  // for vector, allocator
11#include <llvm/Support/Casting.h>  // for dyn_cast, isa
12
13/*
14
15 A regular expression is nullable if it (a) matches the empty
16 string, and (b) applies everywhere.  Note that Start (^) and
17 End ($) match the empty string, but not everywhere).
18
19*/
20
21using namespace llvm;
22
23namespace re {
24
25RE * RE_Nullable::removeNullablePrefix(RE * re) {
26    if (Seq * seq = dyn_cast<Seq>(re)) {
27        std::vector<RE*> list;
28        for (auto i = seq->begin(); i != seq->end(); ++i) {
29            if (!isNullable(*i)) {
30                list.push_back(removeNullablePrefix(*i));
31                std::copy(++i, seq->end(), std::back_inserter(list));
32                break;
33            }
34        }
35        re = makeSeq(list.begin(), list.end());
36    } else if (Alt * alt = dyn_cast<Alt>(re)) {
37        std::vector<RE*> list;
38        for (auto i = alt->begin(); i != alt->end(); ++i) {
39            list.push_back(removeNullablePrefix(*i));
40        }
41        re = makeAlt(list.begin(), list.end());
42    } else if (Rep * rep = dyn_cast<Rep>(re)) {
43        if ((rep->getLB() == 0) || (isNullable(rep->getRE()))) {
44            re = makeSeq();
45        }
46        else if (hasNullablePrefix(rep->getRE())) {
47            re = makeSeq({removeNullablePrefix(rep->getRE()), makeRep(rep->getRE(), rep->getLB() - 1, rep->getLB() - 1)});
48        }
49        else {
50            re = makeRep(rep->getRE(), rep->getLB(), rep->getLB());
51        }
52    } else if (Name * name = dyn_cast<Name>(re)) {
53        if (name->getDefinition()) {
54            name->setDefinition(removeNullablePrefix(name->getDefinition()));
55        }
56    }
57    return re;
58}
59
60RE * RE_Nullable::removeNullableSuffix(RE * re) {
61    if (Seq * seq = dyn_cast<Seq>(re)) {
62        std::vector<RE*> list;
63        for (auto i = seq->rbegin(); i != seq->rend(); ++i) {
64            if (!isNullable(*i)) {
65                std::copy(seq->begin(), (i + 1).base(), std::back_inserter(list));
66                list.push_back(removeNullableSuffix(*i));
67                break;
68            }
69        }
70        re = makeSeq(list.begin(), list.end());
71    } else if (Alt* alt = dyn_cast<Alt>(re)) {
72        std::vector<RE*> list;
73        for (auto i = alt->begin(); i != alt->end(); ++i) {
74            list.push_back(removeNullableSuffix(*i));
75        }
76        re = makeAlt(list.begin(), list.end());
77    } else if (Rep * rep = dyn_cast<Rep>(re)) {
78        if ((rep->getLB() == 0) || (isNullable(rep->getRE()))) {
79            re = makeSeq();
80        }
81        else if (hasNullableSuffix(rep->getRE())) {
82            re = makeSeq({makeRep(rep->getRE(), rep->getLB() - 1, rep->getLB() - 1), removeNullableSuffix(rep->getRE())});
83        }
84        else {
85            re = makeRep(rep->getRE(), rep->getLB(), rep->getLB());
86        }
87    } else if (Name * name = dyn_cast<Name>(re)) {
88        if (name->getDefinition()) {
89            name->setDefinition(removeNullableSuffix(name->getDefinition()));
90        }
91    }
92    return re;
93}
94
95// Deal with case: R1 (Assertion R2) R3
96// If R2 is nullable, then R1 R3.
97RE * RE_Nullable::removeNullableAssertion(RE * re) {
98    if (Assertion * a = dyn_cast<Assertion>(re)) {
99        if (isNullable(a->getAsserted())) {
100            std::vector<RE *> seq;
101            return makeSeq(seq.begin(), seq.end());
102        } else {
103            return re;
104        }
105    } else if (Seq * seq = dyn_cast<Seq>(re)) {
106        std::vector<RE*> list;
107        for (auto i = seq->begin(); i != seq->end(); ++i) {
108            list.push_back(removeNullableAssertion(*i));
109        }
110        re = makeSeq(list.begin(), list.end());
111    } else if (Alt * alt = dyn_cast<Alt>(re)) {
112        std::vector<RE*> list;
113        for (auto i = alt->begin(); i != alt->end(); ++i) {
114            list.push_back(removeNullableAssertion(*i));
115        }
116        re = makeAlt(list.begin(), list.end());
117    } 
118    return re;
119}
120
121// Deal with case: R1 (Assertion R2) R3
122// If R3 is nullable, then R1 R2.
123RE * RE_Nullable::removeNullableAfterAssertion(RE * re) {
124    if (isNullableAfterAssertion(re)) {
125        re = removeNullableAfterAssertion_helper(re);
126    }
127    return re;
128}
129
130bool RE_Nullable::isNullableAfterAssertion(const RE * re) {
131    bool nullable = false;
132    if (const Seq * seq = dyn_cast<const Seq>(re)) {
133        if (isNullable(re)) {
134            return nullable;
135        } else {
136            nullable = isa<Assertion>(seq->back()) ? true : isNullableAfterAssertion(seq->back());
137        }
138    } else if (const Alt * alt = dyn_cast<const Alt>(re)) {
139        for (const RE * re : *alt) {
140            if (isNullableAfterAssertion(re)) {
141                nullable = true;
142                break;
143            }
144        }
145    }   
146    return nullable;
147}
148
149RE * RE_Nullable::removeNullableAfterAssertion_helper(RE * re) {
150    if (Assertion * a = dyn_cast<Assertion>(re)) {
151        if (a->getSense() == Assertion::Sense::Positive) {
152            return a->getAsserted();
153        } else {
154            return makeDiff(makeAny(), a->getAsserted());
155        }
156    } else if (Seq * seq = dyn_cast<Seq>(re)) {
157        std::vector<RE*> list;
158        auto i = seq->begin();
159        for (; i != seq->end() - 1; ++i) {
160            list.push_back(*i);
161        }
162        list.push_back(removeNullableAfterAssertion_helper(*i));
163        re = makeSeq(list.begin(), list.end());
164    } else if (Alt * alt = dyn_cast<Alt>(re)) {
165        std::vector<RE*> list;
166        for (auto i = alt->begin(); i != alt->end(); ++i) {
167            list.push_back(removeNullableAfterAssertion_helper(*i));
168        }
169        re = makeAlt(list.begin(), list.end());
170    } 
171    return re;
172}
173
174bool RE_Nullable::isNullable(const RE * re) {
175    if (const Seq * re_seq = dyn_cast<const Seq>(re)) {
176        for (const RE * re : *re_seq) {
177            if (!isNullable(re)) {
178                return false;
179            }
180        }
181        return true;
182    } else if (const Alt * re_alt = dyn_cast<const Alt>(re)) {
183        for (const RE * re : *re_alt) {
184            if (isNullable(re)) {
185                return true;
186            }
187        }
188    } else if (const Rep* re_rep = dyn_cast<const Rep>(re)) {
189        return re_rep->getLB() == 0 ? true : isNullable(re_rep->getRE());
190    } else if (const Diff * diff = dyn_cast<const Diff>(re)) {
191        return isNullable(diff->getLH()) && !isNullable(diff->getRH());
192    } else if (const Intersect * e = dyn_cast<const Intersect>(re)) {
193        return isNullable(e->getLH()) && isNullable(e->getRH());
194    } 
195    return false;
196}
197
198bool RE_Nullable::hasNullablePrefix(const RE * re) {
199    bool nullable = false;
200    if (const Seq * seq = dyn_cast<const Seq>(re)) {
201        nullable = isNullable(seq->front()) ? true : hasNullablePrefix(seq->front());
202    } else if (const Alt * alt = dyn_cast<const Alt>(re)) {
203        for (const RE * re : *alt) {
204            if (hasNullablePrefix(re)) {
205                nullable = true;
206                break;
207            }
208        }
209    } else if (const Rep * rep = dyn_cast<const Rep>(re)) {
210        nullable = true;
211        if (rep->getLB() == rep->getUB()) {
212            nullable = hasNullablePrefix(rep->getRE());
213        }
214    }
215    return nullable;
216}
217
218bool RE_Nullable::hasNullableSuffix(const RE * re) {
219    bool nullable = false;
220    if (const Seq * seq = dyn_cast<const Seq>(re)) {
221        nullable = isNullable(seq->back()) ? true : hasNullableSuffix(seq->back());
222    } else if (const Alt * alt = dyn_cast<const Alt>(re)) {
223        for (const RE * re : *alt) {
224            if (hasNullableSuffix(re)) {
225                nullable = true;
226                break;
227            }
228        }
229    } else if (const Rep * rep = dyn_cast<const Rep>(re)) {
230        nullable = true;
231        if (rep->getLB() == rep->getUB()) {
232            nullable = hasNullableSuffix(rep->getRE());
233        }
234    }
235    return nullable;
236}
237
238}
Note: See TracBrowser for help on using the repository browser.