|
| 1 | +/*******************************************************************\ |
| 2 | +
|
| 3 | +Module: Rewrite SVA Sequences |
| 4 | +
|
| 5 | +Author: Daniel Kroening, [email protected] |
| 6 | +
|
| 7 | +\*******************************************************************/ |
| 8 | + |
| 9 | +#include "rewrite_sva_sequence.h" |
| 10 | + |
| 11 | +#include <util/arith_tools.h> |
| 12 | + |
| 13 | +#include <verilog/sva_expr.h> |
| 14 | + |
| 15 | +#include "temporal_logic.h" |
| 16 | + |
| 17 | +/// 1800-2017 F.4.3 |
| 18 | +/// Returns true iff the given SVA sequence admits an empty match. |
| 19 | +bool admits_empty(const exprt &expr) |
| 20 | +{ |
| 21 | + PRECONDITION(expr.type().id() == ID_verilog_sva_sequence); |
| 22 | + PRECONDITION(is_SVA_sequence_operator(expr)); |
| 23 | + |
| 24 | + if(expr.id() == ID_sva_boolean) |
| 25 | + return false; // admits_empty(b) = 0 |
| 26 | + else if(expr.id() == ID_sva_cycle_delay) |
| 27 | + { |
| 28 | + auto &cycle_delay = to_sva_cycle_delay_expr(expr); |
| 29 | + |
| 30 | + if(cycle_delay.from().is_zero() && !cycle_delay.is_range()) |
| 31 | + { |
| 32 | + // admits_empty((r1 ##0 r2)) = 0 |
| 33 | + return false; |
| 34 | + } |
| 35 | + else |
| 36 | + { |
| 37 | + // admits_empty((r1 ##1 r2)) = admits_empty(r1) && admits_empty(r2) |
| 38 | + return cycle_delay.lhs().is_not_nil() && |
| 39 | + admits_empty(cycle_delay.lhs()) && admits_empty(cycle_delay.rhs()); |
| 40 | + } |
| 41 | + } |
| 42 | + else if(expr.id() == ID_sva_or) |
| 43 | + { |
| 44 | + // admits_empty((r1 or r2)) = admits_empty(r1) || admits_empty(r2) |
| 45 | + auto &or_expr = to_sva_or_expr(expr); |
| 46 | + return admits_empty(or_expr.lhs()) || admits_empty(or_expr.rhs()); |
| 47 | + } |
| 48 | + else if(expr.id() == ID_sva_sequence_intersect) |
| 49 | + { |
| 50 | + // admits_empty((r1 intersect r2)) = admits_empty(r1) && admits_empty(r2) |
| 51 | + auto &intersect_expr = to_sva_sequence_intersect_expr(expr); |
| 52 | + return admits_empty(intersect_expr.lhs()) && |
| 53 | + admits_empty(intersect_expr.rhs()); |
| 54 | + } |
| 55 | + else if(expr.id() == ID_sva_sequence_first_match) |
| 56 | + { |
| 57 | + // admits_empty(first_match(r)) = admits_empty(r) |
| 58 | + auto &first_match_expr = to_sva_sequence_first_match_expr(expr); |
| 59 | + return admits_empty(first_match_expr.lhs()) && |
| 60 | + admits_empty(first_match_expr.rhs()); |
| 61 | + } |
| 62 | + else if(expr.id() == ID_sva_sequence_repetition_star) |
| 63 | + { |
| 64 | + // admits_empty(r[*0]) = 1 |
| 65 | + // admits_empty(r[*1:$]) = admits_empty(r) |
| 66 | + auto &repetition_expr = to_sva_sequence_repetition_star_expr(expr); |
| 67 | + if(repetition_expr.is_range()) |
| 68 | + { |
| 69 | + if(repetition_expr.from().is_zero()) |
| 70 | + return true; |
| 71 | + else |
| 72 | + return admits_empty(repetition_expr.op()); |
| 73 | + } |
| 74 | + else // singleton |
| 75 | + { |
| 76 | + if(repetition_expr.repetitions().is_zero()) |
| 77 | + return true; |
| 78 | + else |
| 79 | + return admits_empty(repetition_expr.op()); |
| 80 | + } |
| 81 | + } |
| 82 | + else |
| 83 | + { |
| 84 | + DATA_INVARIANT(false, "unexpected SVA sequence: " + expr.id_string()); |
| 85 | + } |
| 86 | +} |
| 87 | + |
| 88 | +exprt rewrite_sva_sequence(exprt expr) |
| 89 | +{ |
| 90 | + PRECONDITION(expr.type().id() == ID_verilog_sva_sequence); |
| 91 | + PRECONDITION(is_SVA_sequence_operator(expr)); |
| 92 | + |
| 93 | + if(expr.id() == ID_sva_cycle_delay) |
| 94 | + { |
| 95 | + // 1800-2017 16.9.2.1 |
| 96 | + // - (empty ##0 seq) does not result in a match. |
| 97 | + // - (seq ##0 empty) does not result in a match. |
| 98 | + // - (empty ##n seq), where n is greater than 0, is equivalent to (##(n-1) seq). |
| 99 | + // - (seq ##n empty), where n is greater than 0, is equivalent to (seq ##(n-1) `true). |
| 100 | + auto &cycle_delay_expr = to_sva_cycle_delay_expr(expr); |
| 101 | + |
| 102 | + bool lhs_admits_empty = cycle_delay_expr.lhs().is_not_nil() && |
| 103 | + admits_empty(cycle_delay_expr.lhs()); |
| 104 | + |
| 105 | + bool rhs_admits_empty = admits_empty(cycle_delay_expr.rhs()); |
| 106 | + |
| 107 | + // apply recursively to operands |
| 108 | + if(cycle_delay_expr.lhs().is_not_nil()) |
| 109 | + cycle_delay_expr.lhs() = rewrite_sva_sequence(cycle_delay_expr.lhs()); |
| 110 | + |
| 111 | + cycle_delay_expr.rhs() = rewrite_sva_sequence(cycle_delay_expr.rhs()); |
| 112 | + |
| 113 | + // consider empty match cases |
| 114 | + if(!lhs_admits_empty && !rhs_admits_empty) |
| 115 | + return cycle_delay_expr; |
| 116 | + |
| 117 | + if(lhs_admits_empty) |
| 118 | + { |
| 119 | + if(cycle_delay_expr.is_range()) |
| 120 | + { |
| 121 | + mp_integer from_int = |
| 122 | + numeric_cast_v<mp_integer>(cycle_delay_expr.from()); |
| 123 | + DATA_INVARIANT(from_int >= 0, "delay must not be negative"); |
| 124 | + abort(); |
| 125 | + } |
| 126 | + else // singleton |
| 127 | + { |
| 128 | + mp_integer delay_int = |
| 129 | + numeric_cast_v<mp_integer>(cycle_delay_expr.from()); |
| 130 | + DATA_INVARIANT(delay_int >= 0, "delay must not be negative"); |
| 131 | + |
| 132 | + // lhs ##0 rhs |
| 133 | + if(delay_int == 0) |
| 134 | + return cycle_delay_expr; |
| 135 | + else |
| 136 | + { |
| 137 | + // (empty ##n seq), where n is greater than 0, is equivalent to (##(n-1) seq). |
| 138 | + auto delay = |
| 139 | + from_integer(delay_int - 1, cycle_delay_expr.from().type()); |
| 140 | + auto empty_match_case = |
| 141 | + sva_cycle_delay_exprt{delay, cycle_delay_expr.rhs()}; |
| 142 | + return sva_or_exprt{empty_match_case, cycle_delay_expr, expr.type()}; |
| 143 | + } |
| 144 | + } |
| 145 | + } |
| 146 | + else if(rhs_admits_empty) |
| 147 | + { |
| 148 | + if(cycle_delay_expr.is_range()) |
| 149 | + { |
| 150 | + mp_integer from_int = |
| 151 | + numeric_cast_v<mp_integer>(cycle_delay_expr.from()); |
| 152 | + DATA_INVARIANT(from_int >= 0, "delay must not be negative"); |
| 153 | + abort(); |
| 154 | + } |
| 155 | + else |
| 156 | + { |
| 157 | + mp_integer delay_int = |
| 158 | + numeric_cast_v<mp_integer>(cycle_delay_expr.from()); |
| 159 | + DATA_INVARIANT(delay_int >= 0, "delay must not be negative"); |
| 160 | + |
| 161 | + // lhs ##0 rhs |
| 162 | + if(delay_int == 0) |
| 163 | + return cycle_delay_expr; |
| 164 | + else |
| 165 | + { |
| 166 | + // (seq ##n empty), where n is greater than 0, is equivalent to (seq ##(n-1) `true). |
| 167 | + auto delay = |
| 168 | + from_integer(delay_int - 1, cycle_delay_expr.from().type()); |
| 169 | + auto empty_match_case = sva_cycle_delay_exprt{ |
| 170 | + cycle_delay_expr.lhs(), |
| 171 | + delay, |
| 172 | + nil_exprt{}, |
| 173 | + sva_boolean_exprt{true_exprt{}, expr.type()}}; |
| 174 | + return sva_or_exprt{empty_match_case, cycle_delay_expr, expr.type()}; |
| 175 | + } |
| 176 | + } |
| 177 | + } |
| 178 | + else // neither lhs nor rhs admit an empty match |
| 179 | + return cycle_delay_expr; |
| 180 | + } |
| 181 | + else if( |
| 182 | + expr.id() == ID_sva_or || expr.id() == ID_sva_and || |
| 183 | + expr.id() == ID_sva_sequence_intersect || |
| 184 | + expr.id() == ID_sva_sequence_first_match || |
| 185 | + expr.id() == ID_sva_sequence_repetition_plus || |
| 186 | + expr.id() == ID_sva_sequence_repetition_star) |
| 187 | + { |
| 188 | + for(auto &op : expr.operands()) |
| 189 | + op = rewrite_sva_sequence(op); |
| 190 | + return expr; |
| 191 | + } |
| 192 | + else if(expr.id() == ID_sva_boolean) |
| 193 | + { |
| 194 | + return expr; |
| 195 | + } |
| 196 | + else |
| 197 | + { |
| 198 | + DATA_INVARIANT(false, "unexpected SVA sequence: " + expr.id_string()); |
| 199 | + } |
| 200 | +} |
0 commit comments