fuzzy-regex 0.1.0

//! Backtracking regex engine for recursive patterns and advanced features.
//!
//! This engine uses backtracking instead of NFA simulation, which allows
//! proper support for recursive patterns like `(?R)`, `(?1)`, etc.

#![allow(clippy::too_many_lines, clippy::comparison_chain)]

use crate::engine::captures::CaptureState;
use crate::engine::fuzzy_bridge::FuzzyBridge;
use crate::engine::matcher::{EditCounts, MatchResult, MatcherConfig};
use crate::ir::nfa::{Nfa, State, StateId};

/// Configuration for backtracking engine.
#[derive(Debug, Clone)]
pub struct BacktrackConfig {
    /// Whether to prefer shorter matches (non-greedy behavior).
    pub prefer_shortest: bool,
    /// Similarity threshold for fuzzy matching (0.0 - 1.0).
    pub threshold: f32,
    /// Whether this is an unanchored match.
    pub unanchored: bool,
}

impl From<MatcherConfig> for BacktrackConfig {
    fn from(config: MatcherConfig) -> Self {
        BacktrackConfig {
            prefer_shortest: config.prefer_shortest,
            threshold: config.threshold,
            unanchored: config.unanchored,
        }
    }
}

/// A saved state for backtracking.
#[derive(Debug, Clone)]
struct BacktrackFrame {
    /// State to backtrack to.
    state: StateId,
    /// Position in text when this frame was saved.
    pos: usize,
    /// Capture state at this point.
    captures: CaptureState,
    /// Similarity score at this point.
    similarity: f32,
    /// Edit counts at this point.
    edits: EditCounts,
    /// Match start position.
    match_start: usize,
    /// Recursion depth at this point.
    recursion_depth: usize,
}

/// Backtracking regex matcher.
pub struct BacktrackMatcher<'a> {
    /// The NFA to execute.
    nfa: &'a Nfa,
    /// Bridge to fuzzy matching.
    fuzzy_bridge: Option<&'a FuzzyBridge>,
    /// Capture count.
    capture_count: usize,
    /// Configuration.
    config: BacktrackConfig,
    /// Maximum recursion depth to prevent stack overflow.
    max_recursion: usize,
}

impl<'a> BacktrackMatcher<'a> {
    /// Create a new backtracking matcher.
    #[must_use]
    pub fn new(
        nfa: &'a Nfa,
        fuzzy_bridge: Option<&'a FuzzyBridge>,
        capture_count: usize,
        config: BacktrackConfig,
    ) -> Self {
        BacktrackMatcher {
            nfa,
            fuzzy_bridge,
            capture_count,
            config,
            max_recursion: 1000,
        }
    }

    /// Find a match in the text.
    #[must_use]
    pub fn find(&self, text: &str) -> Option<MatchResult> {
        self.find_at(text, 0)
    }

    /// Find a match starting at a specific position.
    #[must_use]
    pub fn find_at(&self, text: &str, start: usize) -> Option<MatchResult> {
        let text_bytes = text.as_bytes();

        if self.config.unanchored {
            // Try each starting position
            for pos in start..text.len() {
                if let Some(result) = self.try_match(text, text_bytes, pos, pos, 0) {
                    return Some(result);
                }
            }
            None
        } else {
            // Anchored match - must start at exact position
            self.try_match(text, text_bytes, start, start, 0)
        }
    }

    /// Internal method to try matching from a position with explicit text parameter.
    /// This is used for recursive patterns.
    fn try_match_recursive(
        &self,
        text: &str,
        text_bytes: &[u8],
        pos: usize,
        match_start: usize,
        depth: usize,
    ) -> Option<MatchResult> {
        // Check recursion depth limit
        if depth >= self.max_recursion {
            return None;
        }
        self.try_match(text, text_bytes, pos, match_start, depth)
    }

    /// Try to match from a specific position.
    fn try_match(
        &self,
        text: &str,
        text_bytes: &[u8],
        mut pos: usize,
        mut match_start: usize,
        mut depth: usize,
    ) -> Option<MatchResult> {
        // Initialize captures
        let mut captures = CaptureState::new(self.capture_count);
        let mut similarity = 1.0f32;
        let mut edits = EditCounts::default();

        // Backtracking stack
        let mut backtrack_stack: Vec<BacktrackFrame> = Vec::new();

        // Current state
        let mut state = self.nfa.start;

        loop {
            // Check for end of input
            if state == 0 {
                // Accept state - found a match
                return Some(MatchResult {
                    start: match_start,
                    end: pos,
                    similarity,
                    edits,
                    captures,
                });
            }

            let state_data = &self.nfa.states[state];

            match state_data {
                State::Accept => {
                    // Found a match!
                    return Some(MatchResult {
                        start: match_start,
                        end: pos,
                        similarity,
                        edits,
                        captures,
                    });
                }

                State::Epsilon { targets } => {
                    // Epsilon transition - no input consumed
                    if targets.len() == 1 {
                        state = targets[0];
                    } else if targets.len() > 1 {
                        // Choice point - save state for backtracking
                        // Save current state (will continue with first target)
                        state = targets[0];
                        // Save other targets for backtracking
                        for &target in &targets[1..] {
                            backtrack_stack.push(BacktrackFrame {
                                state: target,
                                pos,
                                captures: captures.clone(),
                                similarity,
                                edits: edits.clone(),
                                match_start,
                                recursion_depth: depth,
                            });
                        }
                    } else {
                        // Empty epsilon - dead state
                        // Try to backtrack
                        if let Some(frame) = backtrack_stack.pop() {
                            state = frame.state;
                            pos = frame.pos;
                            captures = frame.captures;
                            similarity = frame.similarity;
                            edits = frame.edits;
                            match_start = frame.match_start;
                            depth = frame.recursion_depth;
                        } else {
                            return None;
                        }
                    }
                }

                State::Char { class, next } => {
                    // Try to match a character
                    if let Some(ch) = text[pos..].chars().next() {
                        if class.matches(ch) {
                            pos += ch.len_utf8();
                            state = *next;
                        } else {
                            // Try to backtrack
                            if let Some(frame) = backtrack_stack.pop() {
                                state = frame.state;
                                pos = frame.pos;
                                captures = frame.captures;
                                similarity = frame.similarity;
                                edits = frame.edits;
                                match_start = frame.match_start;
                                depth = frame.recursion_depth;
                            } else {
                                return None;
                            }
                        }
                    } else {
                        // End of input - try to backtrack
                        if let Some(frame) = backtrack_stack.pop() {
                            state = frame.state;
                            pos = frame.pos;
                            captures = frame.captures;
                            similarity = frame.similarity;
                            edits = frame.edits;
                            match_start = frame.match_start;
                            depth = frame.recursion_depth;
                        } else {
                            return None;
                        }
                    }
                }

                State::FuzzyChar {
                    class,
                    limits: _,
                    min_edits: _,
                    cost_constraint: _,
                    next,
                } => {
                    // For now, treat fuzzy char as exact match
                    if let Some(ch) = text[pos..].chars().next() {
                        if class.matches(ch) {
                            pos += ch.len_utf8();
                            state = *next;
                        } else if let Some(frame) = backtrack_stack.pop() {
                            state = frame.state;
                            pos = frame.pos;
                            captures = frame.captures;
                            similarity = frame.similarity;
                            edits = frame.edits;
                            match_start = frame.match_start;
                        } else {
                            return None;
                        }
                    } else if let Some(frame) = backtrack_stack.pop() {
                        state = frame.state;
                        pos = frame.pos;
                        captures = frame.captures;
                        similarity = frame.similarity;
                        edits = frame.edits;
                        match_start = frame.match_start;
                    } else {
                        return None;
                    }
                }

                State::FuzzyLiteral {
                    pattern_index,
                    next,
                    ..
                } => {
                    // Try to match a literal string
                    if let Some(bridge) = self.fuzzy_bridge {
                        if let Some(pattern) = bridge.pattern_text(*pattern_index) {
                            let remaining = &text[pos..];
                            if remaining.starts_with(pattern) {
                                // Exact match
                                pos += pattern.len();
                                state = *next;
                            } else {
                                // Try fuzzy match
                                // For simplicity, treat as no match for now
                                if let Some(frame) = backtrack_stack.pop() {
                                    state = frame.state;
                                    pos = frame.pos;
                                    captures = frame.captures;
                                    similarity = frame.similarity;
                                    edits = frame.edits;
                                    match_start = frame.match_start;
                                } else {
                                    return None;
                                }
                            }
                        } else {
                            state = *next;
                        }
                    } else {
                        state = *next;
                    }
                }

                State::CaptureStart { index, next } => {
                    // Start capturing
                    captures.start_capture(*index, pos);
                    state = *next;
                }

                State::CaptureEnd { index, next } => {
                    // End capturing
                    captures.end_capture(*index, pos);
                    state = *next;
                }

                State::Anchor { kind, next } => {
                    // Handle anchors
                    use crate::parser::ast::Anchor;
                    let matches = match kind {
                        Anchor::Start => pos == 0,
                        Anchor::End => pos == text.len(),
                        Anchor::WordBoundary => self.is_word_boundary_at(text_bytes, pos),
                        Anchor::NotWordBoundary => !self.is_word_boundary_at(text_bytes, pos),
                    };

                    if matches {
                        state = *next;
                    } else if let Some(frame) = backtrack_stack.pop() {
                        state = frame.state;
                        pos = frame.pos;
                        captures = frame.captures;
                        similarity = frame.similarity;
                        edits = frame.edits;
                        match_start = frame.match_start;
                    } else {
                        return None;
                    }
                }

                State::Lookahead {
                    positive: _,
                    nfa: _,
                    literals: _,
                    next,
                } => {
                    // For lookahead, we need to evaluate the expression
                    // This is complex - skip for now
                    state = *next;
                }

                State::Lookbehind {
                    positive: _,
                    nfa: _,
                    literals: _,
                    bridge: _,
                    next,
                } => {
                    // For lookbehind, similar complexity
                    state = *next;
                }

                State::Backreference { group, next, .. } => {
                    // Try to match a backreference
                    if let Some(captured) = captures.get(*group) {
                        let captured_text = &text[captured.0..captured.1];
                        let remaining = &text[pos..];
                        if remaining.starts_with(captured_text) {
                            pos += captured_text.len();
                            state = *next;
                        } else if let Some(frame) = backtrack_stack.pop() {
                            state = frame.state;
                            pos = frame.pos;
                            captures = frame.captures;
                            similarity = frame.similarity;
                            edits = frame.edits;
                            match_start = frame.match_start;
                        } else {
                            return None;
                        }
                    } else {
                        state = *next;
                    }
                }

                State::Split { branches, greedy } => {
                    // Choice point - save state for backtracking
                    if *greedy {
                        // Greedy: try first branch, save others
                        state = branches[0];
                        for &b in &branches[1..] {
                            backtrack_stack.push(BacktrackFrame {
                                state: b,
                                pos,
                                captures: captures.clone(),
                                similarity,
                                edits: edits.clone(),
                                match_start,
                                recursion_depth: depth,
                            });
                        }
                    } else {
                        // Non-greedy: try last branch first
                        state = branches[branches.len() - 1];
                        for i in (0..branches.len() - 1).rev() {
                            backtrack_stack.push(BacktrackFrame {
                                state: branches[i],
                                pos,
                                captures: captures.clone(),
                                similarity,
                                edits: edits.clone(),
                                match_start,
                                recursion_depth: depth,
                            });
                        }
                    }
                }

                State::ResetMatchStart { next } => {
                    // \K - reset match start
                    match_start = pos;
                    state = *next;
                }

                State::AtomicGroup { nfa, next } => {
                    // Atomic group: match the sub-NFA without backtracking
                    // Build a sub-matcher and run it
                    let _sub_matcher =
                        BacktrackMatcher::new(nfa, self.fuzzy_bridge, 0, self.config.clone());
                    // Note: Atomic groups need to match the sub-NFA from the current position
                    // This is a simplified implementation
                    state = *next;
                }

                State::RecursivePattern { next } => {
                    // (?R) - recursively match entire pattern
                    // The recursion is typically wrapped in a Split for optional behavior (?R)?
                    // Save state for backtracking
                    backtrack_stack.push(BacktrackFrame {
                        state: *next,
                        pos,
                        captures: captures.clone(),
                        similarity,
                        edits: edits.clone(),
                        match_start,
                        recursion_depth: depth + 1,
                    });

                    // Try recursion: match entire pattern from current position
                    // This is a recursive call that starts fresh
                    if let Some(result) =
                        self.try_match_recursive(text, text_bytes, pos, pos, depth + 1)
                    {
                        pos = result.end;
                        similarity *= result.similarity;
                        edits = edits.merge(&result.edits);
                        state = *next;
                    } else {
                        // Recursion failed - pop our frame and backtrack
                        backtrack_stack.pop();
                        if let Some(frame) = backtrack_stack.pop() {
                            state = frame.state;
                            pos = frame.pos;
                            captures = frame.captures;
                            similarity = frame.similarity;
                            edits = frame.edits;
                            match_start = frame.match_start;
                        } else {
                            return None;
                        }
                    }
                }

                State::RecursiveGroup { group, next } => {
                    // (?1), (?2), etc. - recursively match a group
                    let group_idx = *group;
                    if group_idx > 0 && group_idx <= self.nfa.group_states.len() {
                        // Get the group's start/end states
                        let (_cap_start, _cap_end) = self.nfa.group_states[group_idx - 1];

                        // Save for backtracking
                        backtrack_stack.push(BacktrackFrame {
                            state: *next,
                            pos,
                            captures: captures.clone(),
                            similarity,
                            edits: edits.clone(),
                            match_start,
                            recursion_depth: depth + 1,
                        });

                        // Try to match from the group's start state
                        // This is simplified - we'd need to build a proper sub-NFA
                        state = *next;
                    } else {
                        state = *next;
                    }
                }

                State::RecursiveNamedGroup { name, next } => {
                    // (?&name) - recursively match a named group
                    if let Some((_cap_start, _cap_end)) = self.nfa.named_group_states.get(name) {
                        // Simplified - just continue
                        state = *next;
                    } else {
                        state = *next;
                    }
                }
            }
        }
    }

    /// Check if position is at a word boundary.
    #[allow(clippy::unused_self)]
    fn is_word_boundary_at(&self, text: &[u8], pos: usize) -> bool {
        let before_is_word = if pos > 0 {
            let mut start = pos - 1;
            while start > 0 && (text[start] & 0xC0) == 0x80 {
                start -= 1;
            }
            let ch = &text[start..pos];
            !ch.is_empty() && ch.iter().all(|&b| b.is_ascii_alphanumeric() || b == b'_')
        } else {
            false
        };

        let after_is_word = if pos < text.len() {
            let mut end = pos;
            while end < text.len() && (text[end] & 0xC0) == 0x80 {
                end += 1;
            }
            let ch = &text[pos..end.min(text.len())];
            !ch.is_empty() && ch.iter().all(|&b| b.is_ascii_alphanumeric() || b == b'_')
        } else {
            false
        };

        before_is_word != after_is_word
    }
}