use exec::ProgramCache;
use input::{Input, InputAt};
use prog::{Program, InstPtr};
use re_trait::Slot;
type Bits = u32;
const BIT_SIZE: usize = 32;
const MAX_SIZE_BYTES: usize = 256 * (1 << 10);
pub fn should_exec(num_insts: usize, text_len: usize) -> bool {
let size = ((num_insts * (text_len + 1) + BIT_SIZE - 1) / BIT_SIZE) * 4;
size <= MAX_SIZE_BYTES
}
#[derive(Debug)]
pub struct Bounded<'a, 'm, 'r, 's, I> {
prog: &'r Program,
input: I,
matches: &'m mut [bool],
slots: &'s mut [Slot],
m: &'a mut Cache,
}
#[derive(Clone, Debug)]
pub struct Cache {
jobs: Vec<Job>,
visited: Vec<Bits>,
}
impl Cache {
pub fn new(_prog: &Program) -> Self {
Cache { jobs: vec![], visited: vec![] }
}
}
#[derive(Clone, Copy, Debug)]
enum Job {
Inst { ip: InstPtr, at: InputAt },
SaveRestore { slot: usize, old_pos: Option<usize> },
}
impl<'a, 'm, 'r, 's, I: Input> Bounded<'a, 'm, 'r, 's, I> {
pub fn exec(
prog: &'r Program,
cache: &ProgramCache,
matches: &'m mut [bool],
slots: &'s mut [Slot],
input: I,
start: usize,
) -> bool {
let mut cache = cache.borrow_mut();
let mut cache = &mut cache.backtrack;
let start = input.at(start);
let mut b = Bounded {
prog: prog,
input: input,
matches: matches,
slots: slots,
m: cache,
};
b.exec_(start)
}
fn clear(&mut self) {
self.m.jobs.clear();
let visited_len =
(self.prog.len() * (self.input.len() + 1) + BIT_SIZE - 1)
/
BIT_SIZE;
self.m.visited.truncate(visited_len);
for v in &mut self.m.visited {
*v = 0;
}
if visited_len > self.m.visited.len() {
let len = self.m.visited.len();
self.m.visited.reserve_exact(visited_len - len);
for _ in 0..(visited_len - len) {
self.m.visited.push(0);
}
}
}
fn exec_(&mut self, mut at: InputAt) -> bool {
self.clear();
if self.prog.is_anchored_start {
return if !at.is_start() {
false
} else {
self.backtrack(at)
};
}
let mut matched = false;
loop {
if !self.prog.prefixes.is_empty() {
at = match self.input.prefix_at(&self.prog.prefixes, at) {
None => break,
Some(at) => at,
};
}
matched = self.backtrack(at) || matched;
if matched && self.prog.matches.len() == 1 {
return true;
}
if at.is_end() {
break;
}
at = self.input.at(at.next_pos());
}
matched
}
fn backtrack(&mut self, start: InputAt) -> bool {
let mut matched = false;
self.m.jobs.push(Job::Inst { ip: 0, at: start });
while let Some(job) = self.m.jobs.pop() {
match job {
Job::Inst { ip, at } => {
if self.step(ip, at) {
if self.prog.matches.len() == 1 {
return true;
}
matched = true;
}
}
Job::SaveRestore { slot, old_pos } => {
if slot < self.slots.len() {
self.slots[slot] = old_pos;
}
}
}
}
matched
}
fn step(&mut self, mut ip: InstPtr, mut at: InputAt) -> bool {
use prog::Inst::*;
loop {
match self.prog[ip] {
Match(slot) => {
if slot < self.matches.len() {
self.matches[slot] = true;
}
return true;
}
Save(ref inst) => {
if let Some(&old_pos) = self.slots.get(inst.slot) {
self.m.jobs.push(Job::SaveRestore {
slot: inst.slot,
old_pos: old_pos,
});
self.slots[inst.slot] = Some(at.pos());
}
ip = inst.goto;
}
Split(ref inst) => {
self.m.jobs.push(Job::Inst { ip: inst.goto2, at: at });
ip = inst.goto1;
}
EmptyLook(ref inst) => {
if self.input.is_empty_match(at, inst) {
ip = inst.goto;
} else {
return false;
}
}
Char(ref inst) => {
if inst.c == at.char() {
ip = inst.goto;
at = self.input.at(at.next_pos());
} else {
return false;
}
}
Ranges(ref inst) => {
if inst.matches(at.char()) {
ip = inst.goto;
at = self.input.at(at.next_pos());
} else {
return false;
}
}
Bytes(ref inst) => {
if let Some(b) = at.byte() {
if inst.matches(b) {
ip = inst.goto;
at = self.input.at(at.next_pos());
continue;
}
}
return false;
}
}
if self.has_visited(ip, at) {
return false;
}
}
}
fn has_visited(&mut self, ip: InstPtr, at: InputAt) -> bool {
let k = ip * (self.input.len() + 1) + at.pos();
let k1 = k / BIT_SIZE;
let k2 = usize_to_u32(1 << (k & (BIT_SIZE - 1)));
if self.m.visited[k1] & k2 == 0 {
self.m.visited[k1] |= k2;
false
} else {
true
}
}
}
fn usize_to_u32(n: usize) -> u32 {
if (n as u64) > (::std::u32::MAX as u64) {
panic!("BUG: {} is too big to fit into u32", n)
}
n as u32
}