peat-protocol 0.9.0-rc.1

//! Automerge-based implementation of DataSyncBackend
//!
//! This module provides a CRDT backend using the Automerge library (v0.7.1),
//! enabling eventual consistency without requiring Ditto SDK.
//!
//! # Architecture
//!
//! - **Documents**: Stored as Automerge CRDTs indexed by collection:id
//! - **Sync Protocol**: Uses Automerge's built-in sync state machine
//! - **Query Engine**: In-memory filtering on exported JSON
//!
//! # Example
//!
//! ```text
//! use peat_protocol::sync::automerge::AutomergeBackend;
//! use peat_protocol::sync::traits::*;
//! use peat_protocol::sync::types::*;
//!
//! # async fn example() -> Result<(), Box<dyn std::error::Error>> {
//! let backend = AutomergeBackend::new();
//! backend.initialize(BackendConfig::default()).await?;
//!
//! let doc_store = backend.document_store();
//! // Use DocumentStore API...
//! # Ok(())
//! # }
//! ```

use async_trait::async_trait;
use automerge::{sync, sync::SyncDoc, transaction::Transactable, Automerge};
use std::collections::HashMap;
use std::sync::atomic::{AtomicU64, Ordering};
use std::sync::{Arc, Mutex};
use std::time::Duration;
use tokio::sync::mpsc;

use crate::error::{Error, Result};
use crate::qos::{DeletionPolicy, DeletionPolicyRegistry, Tombstone, TombstoneSyncMessage};
#[cfg(feature = "automerge-backend")]
use crate::storage::automerge_conversion::automerge_to_message;
use crate::sync::traits::*;
use crate::sync::types::*;

/// Automerge-based backend for CRDT synchronization
///
/// This backend implements all DataSyncBackend traits using Automerge as the
/// underlying CRDT library, providing an alternative to Ditto.
#[derive(Clone)]
pub struct AutomergeBackend {
    /// Automerge documents indexed by collection:id key
    documents: Arc<Mutex<HashMap<String, Automerge>>>,

    /// Sync states for each peer:document pair
    sync_states: Arc<Mutex<HashMap<String, sync::State>>>,

    /// Configuration
    config: Arc<Mutex<Option<BackendConfig>>>,

    /// Initialized flag
    initialized: Arc<Mutex<bool>>,

    /// Change notification channels for observers
    observers: Arc<Mutex<Vec<mpsc::UnboundedSender<ChangeEvent>>>>,

    /// Tombstone storage indexed by collection:doc_id (ADR-034)
    tombstones: Arc<Mutex<HashMap<String, Tombstone>>>,

    /// Deletion policy registry (ADR-034)
    deletion_policy_registry: Arc<DeletionPolicyRegistry>,

    /// Monotonic Lamport counter for tombstone ordering (ADR-034, Issue #668)
    lamport_counter: Arc<AtomicU64>,

    /// Pending tombstones awaiting propagation to peers (ADR-034, Issue #668)
    pending_tombstones: Arc<Mutex<Vec<TombstoneSyncMessage>>>,

    /// GC task handle for periodic tombstone/TTL cleanup (ADR-034, Issue #668)
    gc_handle: Arc<Mutex<Option<tokio::task::JoinHandle<()>>>>,
}

impl AutomergeBackend {
    /// Create new AutomergeBackend
    ///
    /// # Example
    ///
    /// ```
    /// use peat_protocol::sync::automerge::AutomergeBackend;
    ///
    /// let backend = AutomergeBackend::new();
    /// ```
    pub fn new() -> Self {
        Self {
            documents: Arc::new(Mutex::new(HashMap::new())),
            sync_states: Arc::new(Mutex::new(HashMap::new())),
            config: Arc::new(Mutex::new(None)),
            initialized: Arc::new(Mutex::new(false)),
            observers: Arc::new(Mutex::new(Vec::new())),
            tombstones: Arc::new(Mutex::new(HashMap::new())),
            deletion_policy_registry: Arc::new(DeletionPolicyRegistry::new()),
            lamport_counter: Arc::new(AtomicU64::new(0)),
            pending_tombstones: Arc::new(Mutex::new(Vec::new())),
            gc_handle: Arc::new(Mutex::new(None)),
        }
    }

    /// Helper: Generate document key from collection and ID
    fn doc_key(collection: &str, doc_id: &DocumentId) -> String {
        format!("{}:{}", collection, doc_id)
    }

    /// Get the node ID for tombstone attribution (ADR-034, Issue #668)
    ///
    /// Uses the app_id from BackendConfig if initialized, falls back to "local".
    fn node_id(&self) -> String {
        self.config
            .lock()
            .ok()
            .and_then(|c| c.as_ref().map(|cfg| cfg.app_id.clone()))
            .unwrap_or_else(|| "local".to_string())
    }

    /// Get the next Lamport timestamp for tombstone ordering (ADR-034, Issue #668)
    fn next_lamport(&self) -> u64 {
        self.lamport_counter.fetch_add(1, Ordering::SeqCst)
    }

    /// Drain pending tombstones for propagation to peers (ADR-034, Issue #668)
    ///
    /// Called by the sync coordinator to retrieve tombstones created since
    /// the last drain. Returns and clears the pending queue.
    pub fn drain_pending_tombstones(&self) -> Vec<TombstoneSyncMessage> {
        self.pending_tombstones
            .lock()
            .map(|mut q| std::mem::take(&mut *q))
            .unwrap_or_default()
    }

    /// Helper: Convert Automerge document to our Document type
    ///
    /// Issue #518: Now supports nested objects and proper Counter extraction.
    fn automerge_to_document(doc: &Automerge, doc_id: DocumentId) -> Result<Document> {
        use automerge::ReadDoc;

        let mut fields = HashMap::new();

        // Try to read from the root/root path
        if let Ok(Some((automerge::Value::Object(automerge::ObjType::Map), obj_id))) =
            doc.get(automerge::ROOT, "root")
        {
            // Iterate over the map entries
            for item in doc.map_range(&obj_id, ..) {
                let key_str = item.key.to_string();
                if let Ok(Some((value, nested_id))) = doc.get(&obj_id, &item.key as &str) {
                    // Convert the Automerge value to serde_json::Value
                    // Pass the nested_id for recursive object traversal
                    if let Some(json_val) = Self::automerge_value_to_json(doc, &value, &nested_id) {
                        fields.insert(key_str, json_val);
                    }
                }
            }
        }

        Ok(Document {
            id: Some(doc_id),
            fields,
            updated_at: std::time::SystemTime::now(),
        })
    }

    /// Helper: Convert Automerge value to serde_json::Value with nested object support.
    ///
    /// Issue #518: This function properly handles:
    /// - Counter values (extracts actual i64 value)
    /// - Nested objects (recursively traverses Maps and Lists)
    /// - All scalar types
    ///
    /// # Arguments
    /// * `doc` - The Automerge document for nested object traversal
    /// * `value` - The Automerge value to convert
    /// * `obj_id` - The object ID (used when value is an Object type)
    fn automerge_value_to_json(
        doc: &Automerge,
        value: &automerge::Value,
        obj_id: &automerge::ObjId,
    ) -> Option<Value> {
        use automerge::ReadDoc;

        match value {
            automerge::Value::Scalar(scalar) => Self::automerge_scalar_to_json(scalar.as_ref()),
            automerge::Value::Object(obj_type) => {
                // Issue #518: Recursively convert nested objects
                match obj_type {
                    automerge::ObjType::Map | automerge::ObjType::Table => {
                        // Convert map to JSON object
                        let mut map = serde_json::Map::new();
                        for item in doc.map_range(obj_id, ..) {
                            let key = item.key.to_string();
                            if let Ok(Some((nested_value, nested_obj_id))) =
                                doc.get(obj_id, &item.key as &str)
                            {
                                if let Some(json_val) = Self::automerge_value_to_json(
                                    doc,
                                    &nested_value,
                                    &nested_obj_id,
                                ) {
                                    map.insert(key, json_val);
                                }
                            }
                        }
                        Some(Value::Object(map))
                    }
                    automerge::ObjType::List => {
                        // Convert list to JSON array
                        let length = doc.length(obj_id);
                        let mut arr = Vec::with_capacity(length);
                        for idx in 0..length {
                            if let Ok(Some((nested_value, nested_obj_id))) = doc.get(obj_id, idx) {
                                if let Some(json_val) = Self::automerge_value_to_json(
                                    doc,
                                    &nested_value,
                                    &nested_obj_id,
                                ) {
                                    arr.push(json_val);
                                }
                            }
                        }
                        Some(Value::Array(arr))
                    }
                    automerge::ObjType::Text => {
                        // Convert text to string
                        let text = doc.text(obj_id).ok()?;
                        Some(Value::String(text))
                    }
                }
            }
        }
    }

    /// Helper: Convert Automerge scalar value to serde_json::Value
    ///
    /// Issue #518: Counter values now properly extract the i64 value.
    fn automerge_scalar_to_json(scalar: &automerge::ScalarValue) -> Option<Value> {
        let json_val = match scalar {
            automerge::ScalarValue::Str(s) => Value::String(s.to_string()),
            automerge::ScalarValue::Int(i) => Value::Number(serde_json::Number::from(*i)),
            automerge::ScalarValue::Uint(u) => Value::Number(serde_json::Number::from(*u)),
            automerge::ScalarValue::F64(f) => serde_json::Number::from_f64(*f)
                .map(Value::Number)
                .unwrap_or(Value::Null),
            automerge::ScalarValue::Boolean(b) => Value::Bool(*b),
            automerge::ScalarValue::Null => Value::Null,
            automerge::ScalarValue::Bytes(bytes) => {
                // Encode bytes as array of numbers
                let byte_array: Vec<serde_json::Value> = bytes
                    .iter()
                    .map(|b| Value::Number(serde_json::Number::from(*b)))
                    .collect();
                Value::Array(byte_array)
            }
            automerge::ScalarValue::Counter(c) => {
                // Issue #518: Extract actual counter value using From<&Counter> for i64
                // The Counter type implements From trait to convert to i64
                let counter_value: i64 = i64::from(c);
                Value::Number(serde_json::Number::from(counter_value))
            }
            automerge::ScalarValue::Timestamp(ts) => Value::Number(serde_json::Number::from(*ts)),
            automerge::ScalarValue::Unknown { .. } => Value::Null,
        };
        Some(json_val)
    }

    /// Helper: Apply Document fields to Automerge doc
    fn apply_document_to_automerge(doc: &mut Automerge, document: &Document) -> Result<()> {
        doc.transact::<_, _, automerge::AutomergeError>(|tx| {
            // Create or get root map
            let root = tx.put_object(automerge::ROOT, "root", automerge::ObjType::Map)?;

            for (key, value) in &document.fields {
                // Convert serde_json::Value to Automerge scalar
                Self::put_json_value(tx, &root, key, value)?;
            }

            Ok(())
        })
        .map_err(|e| Error::Internal(format!("Transaction failed: {:?}", e)))?;

        Ok(())
    }

    /// Helper: Put JSON value into Automerge
    fn put_json_value(
        tx: &mut automerge::transaction::Transaction,
        obj: &automerge::ObjId,
        key: &str,
        value: &serde_json::Value,
    ) -> std::result::Result<(), automerge::AutomergeError> {
        use serde_json::Value;

        match value {
            Value::String(s) => {
                tx.put(obj, key, s.clone())?;
            }
            Value::Number(n) => {
                if let Some(i) = n.as_i64() {
                    tx.put(obj, key, i)?;
                } else if let Some(f) = n.as_f64() {
                    tx.put(obj, key, f)?;
                }
            }
            Value::Bool(b) => {
                tx.put(obj, key, *b)?;
            }
            Value::Null => {
                // Skip null values
            }
            Value::Array(arr) => {
                // Create list
                let list = tx.put_object(obj, key, automerge::ObjType::List)?;
                for (idx, item) in arr.iter().enumerate() {
                    Self::insert_json_value(tx, &list, idx, item)?;
                }
            }
            Value::Object(map) => {
                // Create nested map
                let nested = tx.put_object(obj, key, automerge::ObjType::Map)?;
                for (k, v) in map {
                    Self::put_json_value(tx, &nested, k, v)?;
                }
            }
        }

        Ok(())
    }

    /// Helper: Insert JSON value into Automerge list
    fn insert_json_value(
        tx: &mut automerge::transaction::Transaction,
        list: &automerge::ObjId,
        index: usize,
        value: &serde_json::Value,
    ) -> std::result::Result<(), automerge::AutomergeError> {
        use serde_json::Value;

        match value {
            Value::String(s) => {
                tx.insert(list, index, s.clone())?;
            }
            Value::Number(n) => {
                if let Some(i) = n.as_i64() {
                    tx.insert(list, index, i)?;
                } else if let Some(f) = n.as_f64() {
                    tx.insert(list, index, f)?;
                }
            }
            Value::Bool(b) => {
                tx.insert(list, index, *b)?;
            }
            Value::Null => {
                // Skip null values
            }
            Value::Array(_) | Value::Object(_) => {
                // For complex nested types, serialize as JSON string
                let json_str =
                    serde_json::to_string(value).map_err(|_| automerge::AutomergeError::Fail)?;
                tx.insert(list, index, json_str)?;
            }
        }

        Ok(())
    }

    /// Helper: Check if document matches query
    fn matches_query(&self, document: &Document, query: &Query) -> Result<bool> {
        match query {
            Query::All => Ok(true),

            Query::Eq { field, value } => {
                if let Some(doc_value) = document.fields.get(field) {
                    Ok(doc_value == value)
                } else {
                    Ok(false)
                }
            }

            Query::Lt { field, value } => {
                if let Some(doc_value) = document.fields.get(field) {
                    Ok(self.compare_values(doc_value, value)? < 0)
                } else {
                    Ok(false)
                }
            }

            Query::Gt { field, value } => {
                if let Some(doc_value) = document.fields.get(field) {
                    Ok(self.compare_values(doc_value, value)? > 0)
                } else {
                    Ok(false)
                }
            }

            Query::And(queries) => {
                for q in queries {
                    if !self.matches_query(document, q)? {
                        return Ok(false);
                    }
                }
                Ok(true)
            }

            Query::Or(queries) => {
                for q in queries {
                    if self.matches_query(document, q)? {
                        return Ok(true);
                    }
                }
                Ok(false)
            }

            // === Negation query (Issue #357) ===
            Query::Not(inner) => Ok(!self.matches_query(document, inner)?),

            // === Custom query support (Issue #517) ===
            // Evaluate DQL-like custom queries using pattern-based parser
            Query::Custom(query_str) => Ok(evaluate_custom_query(document, query_str)),

            // === Spatial queries (Issue #356) ===
            Query::WithinRadius {
                center,
                radius_meters,
                lat_field,
                lon_field,
            } => {
                let lat_key = lat_field.as_deref().unwrap_or("lat");
                let lon_key = lon_field.as_deref().unwrap_or("lon");

                if let (Some(lat_val), Some(lon_val)) = (
                    document.fields.get(lat_key).and_then(|v| v.as_f64()),
                    document.fields.get(lon_key).and_then(|v| v.as_f64()),
                ) {
                    let doc_point = GeoPoint::new(lat_val, lon_val);
                    Ok(doc_point.within_radius(center, *radius_meters))
                } else {
                    Ok(false)
                }
            }

            Query::WithinBounds {
                min,
                max,
                lat_field,
                lon_field,
            } => {
                let lat_key = lat_field.as_deref().unwrap_or("lat");
                let lon_key = lon_field.as_deref().unwrap_or("lon");

                if let (Some(lat_val), Some(lon_val)) = (
                    document.fields.get(lat_key).and_then(|v| v.as_f64()),
                    document.fields.get(lon_key).and_then(|v| v.as_f64()),
                ) {
                    let doc_point = GeoPoint::new(lat_val, lon_val);
                    Ok(doc_point.within_bounds(min, max))
                } else {
                    Ok(false)
                }
            }

            // === Deletion-aware queries (ADR-034, Issue #369) ===
            Query::IncludeDeleted(inner) => {
                // IncludeDeleted wraps another query - run the inner query
                // The soft-delete filter bypass is handled at the query() method level
                self.matches_query(document, inner)
            }

            Query::DeletedOnly => {
                // Only match documents with _deleted=true
                let is_deleted = document
                    .fields
                    .get("_deleted")
                    .and_then(|v| v.as_bool())
                    .unwrap_or(false);
                Ok(is_deleted)
            }
        }
    }

    /// Helper: Compare two JSON values
    fn compare_values(&self, a: &serde_json::Value, b: &serde_json::Value) -> Result<i8> {
        use serde_json::Value;

        match (a, b) {
            (Value::Number(a_num), Value::Number(b_num)) => {
                if let (Some(a_f), Some(b_f)) = (a_num.as_f64(), b_num.as_f64()) {
                    if a_f < b_f {
                        Ok(-1)
                    } else if a_f > b_f {
                        Ok(1)
                    } else {
                        Ok(0)
                    }
                } else {
                    Err(Error::Internal("Number comparison failed".into()))
                }
            }
            (Value::String(a_str), Value::String(b_str)) => {
                if a_str < b_str {
                    Ok(-1)
                } else if a_str > b_str {
                    Ok(1)
                } else {
                    Ok(0)
                }
            }
            _ => Err(Error::Internal("Unsupported value comparison".into())),
        }
    }

    /// Generate sync message for a document
    ///
    /// This uses Automerge's sync protocol to generate a message containing
    /// the changes needed to sync with a peer.
    pub fn generate_sync_message(
        &self,
        collection: &str,
        doc_id: &DocumentId,
        peer_id: &str,
    ) -> Result<Vec<u8>> {
        let key = Self::doc_key(collection, doc_id);
        let docs = self
            .documents
            .lock()
            .map_err(|_| Error::Internal("documents lock poisoned".into()))?;

        let automerge_doc = docs.get(&key).ok_or_else(|| Error::NotFound {
            resource_type: "Document".to_string(),
            id: doc_id.clone(),
        })?;

        // Get or create sync state for this peer
        let mut sync_states = self
            .sync_states
            .lock()
            .map_err(|_| Error::Internal("sync_states lock poisoned".into()))?;
        let sync_state = sync_states
            .entry(format!("{}:{}", peer_id, key))
            .or_default();

        // Generate sync message
        let message = automerge_doc.generate_sync_message(sync_state);

        // Encode message (handle Option)
        match message {
            Some(msg) => Ok(msg.encode()),
            None => Ok(Vec::new()), // No changes to sync
        }
    }

    /// Receive and apply sync message
    ///
    /// This applies changes from a peer's sync message to our local document.
    pub fn receive_sync_message(
        &self,
        collection: &str,
        doc_id: &DocumentId,
        peer_id: &str,
        message: &[u8],
    ) -> Result<()> {
        let key = Self::doc_key(collection, doc_id);
        let mut docs = self
            .documents
            .lock()
            .map_err(|_| Error::Internal("documents lock poisoned".into()))?;

        let automerge_doc = docs.get_mut(&key).ok_or_else(|| Error::NotFound {
            resource_type: "Document".to_string(),
            id: doc_id.clone(),
        })?;

        // Decode message
        let sync_message = sync::Message::decode(message)
            .map_err(|e| Error::Internal(format!("Message decode failed: {:?}", e)))?;

        // Get sync state
        let mut sync_states = self
            .sync_states
            .lock()
            .map_err(|_| Error::Internal("sync_states lock poisoned".into()))?;
        let sync_state = sync_states
            .entry(format!("{}:{}", peer_id, key))
            .or_default();

        // Apply sync message
        automerge_doc
            .receive_sync_message(sync_state, sync_message)
            .map_err(|e| Error::Internal(format!("Sync message apply failed: {:?}", e)))?;

        Ok(())
    }
}

impl Default for AutomergeBackend {
    fn default() -> Self {
        Self::new()
    }
}

// ============================================================================
// DocumentStore Trait Implementation
// ============================================================================

#[async_trait]
impl DocumentStore for AutomergeBackend {
    async fn upsert(&self, collection: &str, mut document: Document) -> anyhow::Result<DocumentId> {
        // Generate ID if not present
        let doc_id = document
            .id
            .clone()
            .unwrap_or_else(|| uuid::Uuid::new_v4().to_string());

        let key = Self::doc_key(collection, &doc_id);
        let mut docs = self
            .documents
            .lock()
            .map_err(|_| Error::Internal("documents lock poisoned".into()))?;

        if let Some(existing_doc) = docs.get_mut(&key) {
            // Update existing document
            Self::apply_document_to_automerge(existing_doc, &document)?;
        } else {
            // Create new document
            let mut automerge_doc = Automerge::new();
            Self::apply_document_to_automerge(&mut automerge_doc, &document)?;
            docs.insert(key, automerge_doc);
        }

        document.id = Some(doc_id.clone());

        // Notify observers
        drop(docs); // Release lock before notifying
        let observers = self
            .observers
            .lock()
            .map_err(|_| Error::Internal("observers lock poisoned".into()))?;
        for observer in observers.iter() {
            let _ = observer.send(ChangeEvent::Updated {
                collection: collection.to_string(),
                document: document.clone(),
            });
        }
        drop(observers);

        Ok(doc_id)
    }

    async fn query(&self, collection: &str, query: &Query) -> anyhow::Result<Vec<Document>> {
        let docs = self
            .documents
            .lock()
            .map_err(|_| Error::Internal("documents lock poisoned".into()))?;
        let mut results = Vec::new();

        // Iterate all documents in collection
        for (key, automerge_doc) in docs.iter() {
            if !key.starts_with(&format!("{}:", collection)) {
                continue;
            }

            // Extract document ID from key
            let doc_id = key.split(':').nth(1).unwrap_or("").to_string();

            // Convert to our Document type
            let document = Self::automerge_to_document(automerge_doc, doc_id)?;

            // Apply soft-delete filter (ADR-034, Issue #369)
            // By default, queries exclude documents with _deleted=true
            // IncludeDeleted and DeletedOnly queries override this behavior
            if !query.matches_deletion_state(&document) {
                continue;
            }

            // Apply query filter
            if self.matches_query(&document, query)? {
                results.push(document);
            }
        }

        Ok(results)
    }

    async fn remove(&self, collection: &str, doc_id: &DocumentId) -> anyhow::Result<()> {
        let key = Self::doc_key(collection, doc_id);
        let mut docs = self
            .documents
            .lock()
            .map_err(|_| Error::Internal("documents lock poisoned".into()))?;

        docs.remove(&key).ok_or_else(|| Error::NotFound {
            resource_type: "Document".to_string(),
            id: doc_id.clone(),
        })?;

        // Notify observers
        drop(docs); // Release lock before notifying
        let observers = self
            .observers
            .lock()
            .map_err(|_| Error::Internal("observers lock poisoned".into()))?;
        for observer in observers.iter() {
            let _ = observer.send(ChangeEvent::Removed {
                collection: collection.to_string(),
                doc_id: doc_id.clone(),
            });
        }
        drop(observers);

        Ok(())
    }

    async fn get(&self, collection: &str, doc_id: &DocumentId) -> anyhow::Result<Option<Document>> {
        let key = Self::doc_key(collection, doc_id);
        let docs = self
            .documents
            .lock()
            .map_err(|_| Error::Internal("documents lock poisoned".into()))?;

        if let Some(automerge_doc) = docs.get(&key) {
            let document = Self::automerge_to_document(automerge_doc, doc_id.clone())?;
            Ok(Some(document))
        } else {
            Ok(None)
        }
    }

    async fn count(&self, collection: &str, query: &Query) -> anyhow::Result<usize> {
        let results = self.query(collection, query).await?;
        Ok(results.len())
    }

    fn observe(&self, collection: &str, query: &Query) -> anyhow::Result<ChangeStream> {
        let (tx, rx) = tokio::sync::mpsc::unbounded_channel();

        // Send initial snapshot of matching documents
        let docs = self
            .documents
            .lock()
            .map_err(|_| Error::Internal("documents lock poisoned".into()))?;
        let mut initial_docs = Vec::new();

        for (key, automerge_doc) in docs.iter() {
            if !key.starts_with(&format!("{}:", collection)) {
                continue;
            }

            let doc_id = key.split(':').nth(1).unwrap_or("").to_string();
            if let Ok(document) = Self::automerge_to_document(automerge_doc, doc_id) {
                if self.matches_query(&document, query).unwrap_or(false) {
                    initial_docs.push(document);
                }
            }
        }

        drop(docs); // Release lock

        // Send initial snapshot
        let _ = tx.send(ChangeEvent::Initial {
            documents: initial_docs,
        });

        // Register this observer for future updates
        self.observers
            .lock()
            .map_err(|_| Error::Internal("observers lock poisoned".into()))?
            .push(tx.clone());

        Ok(ChangeStream { receiver: rx })
    }

    // === Deletion methods (ADR-034) ===

    async fn delete(
        &self,
        collection: &str,
        doc_id: &DocumentId,
        reason: Option<&str>,
    ) -> anyhow::Result<crate::qos::DeleteResult> {
        let policy = self.deletion_policy(collection);

        match policy {
            DeletionPolicy::Immutable => {
                // Cannot delete immutable documents
                Ok(crate::qos::DeleteResult::immutable())
            }
            DeletionPolicy::ImplicitTTL { .. } => {
                // Implicit TTL: no-op, documents expire automatically
                Ok(crate::qos::DeleteResult {
                    deleted: false,
                    tombstone_id: None,
                    expires_at: None,
                    policy: policy.clone(),
                })
            }
            DeletionPolicy::Tombstone {
                tombstone_ttl,
                delete_wins: _,
            } => {
                // Create tombstone with real node ID and Lamport (Issue #668)
                let node_id = self.node_id();
                let lamport = self.next_lamport();
                let tombstone = if let Some(reason_str) = reason {
                    Tombstone::with_reason(
                        doc_id.clone(),
                        collection.to_string(),
                        node_id,
                        lamport,
                        reason_str,
                    )
                } else {
                    Tombstone::new(doc_id.clone(), collection.to_string(), node_id, lamport)
                };
                let tombstone_id = format!("{}:{}", collection, doc_id);

                // Store tombstone
                self.tombstones
                    .lock()
                    .map_err(|_| Error::Internal("tombstones lock poisoned".into()))?
                    .insert(tombstone_id.clone(), tombstone.clone());

                // Enqueue for propagation to peers (Issue #668)
                if let Ok(mut pending) = self.pending_tombstones.lock() {
                    pending.push(TombstoneSyncMessage::from_tombstone(tombstone));
                }

                // Remove the actual document
                self.remove(collection, doc_id).await.ok(); // Ignore if not found

                Ok(crate::qos::DeleteResult {
                    deleted: true,
                    tombstone_id: Some(tombstone_id),
                    expires_at: Some(std::time::SystemTime::now() + tombstone_ttl),
                    policy: policy.clone(),
                })
            }
            DeletionPolicy::SoftDelete {
                include_deleted_default: _,
            } => {
                // Soft delete: mark document with _deleted=true
                if let Some(mut doc) = self.get(collection, doc_id).await? {
                    doc.fields.insert("_deleted".to_string(), Value::Bool(true));
                    doc.fields.insert(
                        "_deleted_at".to_string(),
                        Value::String(chrono::Utc::now().format("%Y-%m-%dT%H:%M:%SZ").to_string()),
                    );
                    if let Some(reason) = reason {
                        doc.fields.insert(
                            "_deleted_reason".to_string(),
                            Value::String(reason.to_string()),
                        );
                    }
                    self.upsert(collection, doc).await?;

                    Ok(crate::qos::DeleteResult::soft_deleted(policy.clone()))
                } else {
                    // Document not found - still report as deleted
                    Ok(crate::qos::DeleteResult {
                        deleted: false,
                        tombstone_id: None,
                        expires_at: None,
                        policy: policy.clone(),
                    })
                }
            }
        }
    }

    async fn is_deleted(&self, collection: &str, doc_id: &DocumentId) -> anyhow::Result<bool> {
        let key = format!("{}:{}", collection, doc_id);

        // Check if there's a tombstone
        if self
            .tombstones
            .lock()
            .map_err(|_| Error::Internal("tombstones lock poisoned".into()))?
            .contains_key(&key)
        {
            return Ok(true);
        }

        // Check for soft-delete (_deleted field)
        if let Some(doc) = self.get(collection, doc_id).await? {
            if let Some(deleted) = doc.fields.get("_deleted") {
                return Ok(deleted.as_bool().unwrap_or(false));
            }
        }

        Ok(false)
    }

    fn deletion_policy(&self, collection: &str) -> crate::qos::DeletionPolicy {
        self.deletion_policy_registry.get(collection)
    }

    async fn get_tombstones(&self, collection: &str) -> anyhow::Result<Vec<crate::qos::Tombstone>> {
        let tombstones = self
            .tombstones
            .lock()
            .map_err(|_| Error::Internal("tombstones lock poisoned".into()))?;
        let prefix = format!("{}:", collection);

        Ok(tombstones
            .iter()
            .filter(|(key, _)| key.starts_with(&prefix))
            .map(|(_, tombstone)| tombstone.clone())
            .collect())
    }

    async fn apply_tombstone(&self, tombstone: &crate::qos::Tombstone) -> anyhow::Result<()> {
        let key = format!("{}:{}", tombstone.collection, tombstone.document_id);

        // Store the tombstone
        self.tombstones
            .lock()
            .map_err(|_| Error::Internal("tombstones lock poisoned".into()))?
            .insert(key, tombstone.clone());

        // Remove the document if it exists
        self.remove(&tombstone.collection, &tombstone.document_id)
            .await
            .ok();

        Ok(())
    }
}

// ============================================================================
// GcStore Trait Implementation (ADR-034, Issue #668)
// ============================================================================

impl crate::qos::GcStore for AutomergeBackend {
    fn get_all_tombstones(&self) -> anyhow::Result<Vec<Tombstone>> {
        Ok(self
            .tombstones
            .lock()
            .map_err(|_| Error::Internal("tombstones lock poisoned".into()))?
            .values()
            .cloned()
            .collect())
    }

    fn remove_tombstone(&self, collection: &str, document_id: &str) -> anyhow::Result<bool> {
        let key = format!("{}:{}", collection, document_id);
        Ok(self
            .tombstones
            .lock()
            .map_err(|_| Error::Internal("tombstones lock poisoned".into()))?
            .remove(&key)
            .is_some())
    }

    fn has_tombstone(&self, collection: &str, document_id: &str) -> anyhow::Result<bool> {
        let key = format!("{}:{}", collection, document_id);
        Ok(self
            .tombstones
            .lock()
            .map_err(|_| Error::Internal("tombstones lock poisoned".into()))?
            .contains_key(&key))
    }

    fn get_expired_documents(
        &self,
        _collection: &str,
        _cutoff: std::time::SystemTime,
    ) -> anyhow::Result<Vec<String>> {
        // In-memory backend doesn't track document timestamps for TTL expiry
        Ok(Vec::new())
    }

    fn hard_delete(&self, collection: &str, document_id: &str) -> anyhow::Result<()> {
        let key = format!("{}:{}", collection, document_id);
        self.documents
            .lock()
            .map_err(|_| Error::Internal("documents lock poisoned".into()))?
            .remove(&key);
        Ok(())
    }

    fn list_collections(&self) -> anyhow::Result<Vec<String>> {
        let docs = self
            .documents
            .lock()
            .map_err(|_| Error::Internal("documents lock poisoned".into()))?;
        let mut collections: Vec<String> = docs
            .keys()
            .filter_map(|k| k.split(':').next().map(|s| s.to_string()))
            .collect::<std::collections::HashSet<_>>()
            .into_iter()
            .collect();
        collections.sort();
        Ok(collections)
    }
}

// ============================================================================
// PeerDiscovery Trait Implementation
// ============================================================================

#[async_trait]
impl PeerDiscovery for AutomergeBackend {
    async fn start(&self) -> anyhow::Result<()> {
        // Manual peer discovery only for initial implementation
        // Full implementation would support mDNS, etc.
        Ok(())
    }

    async fn stop(&self) -> anyhow::Result<()> {
        Ok(())
    }

    async fn discovered_peers(&self) -> anyhow::Result<Vec<PeerInfo>> {
        // Return empty - manual configuration required
        Ok(Vec::new())
    }

    async fn add_peer(&self, _address: &str, _transport: TransportType) -> anyhow::Result<()> {
        // Manual peer addition not implemented in initial version
        Ok(())
    }

    async fn wait_for_peer(&self, _peer_id: &PeerId, _timeout: Duration) -> anyhow::Result<()> {
        // Peer waiting not implemented in initial version
        Err(Error::Internal("wait_for_peer not implemented".into()).into())
    }

    fn on_peer_event(&self, _callback: Box<dyn Fn(PeerEvent) + Send + Sync>) {
        // Callback registration not implemented in initial version
        // Would store in a Vec for future notifications
    }

    async fn get_peer_info(&self, _peer_id: &PeerId) -> anyhow::Result<Option<PeerInfo>> {
        // Peer info lookup not implemented in initial version
        Ok(None)
    }
}

// ============================================================================
// SyncEngine Trait Implementation
// ============================================================================

#[async_trait]
impl SyncEngine for AutomergeBackend {
    async fn start_sync(&self) -> anyhow::Result<()> {
        // For Automerge, sync is pull-based via generate/receive_sync_message
        // This method indicates we're ready to sync
        Ok(())
    }

    async fn stop_sync(&self) -> anyhow::Result<()> {
        // Clean up sync states
        self.sync_states
            .lock()
            .map_err(|_| Error::Internal("sync_states lock poisoned".into()))?
            .clear();
        Ok(())
    }

    async fn subscribe(
        &self,
        collection: &str,
        _query: &Query,
    ) -> anyhow::Result<SyncSubscription> {
        // Create subscription handle
        // For Automerge, subscriptions are logical - we track interest
        Ok(SyncSubscription::new(
            collection.to_string(),
            Box::new(AutomergeSubscriptionHandle {
                collection: collection.to_string(),
            }),
        ))
    }

    async fn is_syncing(&self) -> anyhow::Result<bool> {
        // Always ready to sync with Automerge
        Ok(self.is_ready().await)
    }
}

/// Subscription handle for Automerge
struct AutomergeSubscriptionHandle {
    #[allow(dead_code)]
    collection: String,
}

// ============================================================================
// DataSyncBackend Trait Implementation
// ============================================================================

#[async_trait]
impl DataSyncBackend for AutomergeBackend {
    async fn initialize(&self, config: BackendConfig) -> anyhow::Result<()> {
        let mut initialized = self
            .initialized
            .lock()
            .map_err(|_| Error::Internal("initialized lock poisoned".into()))?;
        if *initialized {
            return Err(Error::Internal("Already initialized".into()).into());
        }

        *self
            .config
            .lock()
            .map_err(|_| Error::Internal("config lock poisoned".into()))? = Some(config);
        *initialized = true;

        // Start periodic garbage collection for tombstones and TTL (Issue #668)
        let gc = Arc::new(crate::qos::GarbageCollector::with_policy_registry(
            Arc::new(self.clone()),
            Arc::clone(&self.deletion_policy_registry),
            crate::qos::GcConfig::default(),
        ));
        let handle = crate::qos::start_periodic_gc(gc);
        *self
            .gc_handle
            .lock()
            .map_err(|_| Error::Internal("gc_handle lock poisoned".into()))? = Some(handle);

        Ok(())
    }

    async fn shutdown(&self) -> anyhow::Result<()> {
        // Stop GC task (Issue #668)
        if let Ok(mut handle) = self.gc_handle.lock() {
            if let Some(h) = handle.take() {
                h.abort();
            }
        }

        self.stop_sync().await?;
        self.documents
            .lock()
            .map_err(|_| Error::Internal("documents lock poisoned".into()))?
            .clear();
        self.sync_states
            .lock()
            .map_err(|_| Error::Internal("sync_states lock poisoned".into()))?
            .clear();
        *self
            .initialized
            .lock()
            .map_err(|_| Error::Internal("initialized lock poisoned".into()))? = false;

        Ok(())
    }

    fn document_store(&self) -> Arc<dyn DocumentStore> {
        Arc::new(self.clone())
    }

    fn peer_discovery(&self) -> Arc<dyn PeerDiscovery> {
        Arc::new(self.clone())
    }

    fn sync_engine(&self) -> Arc<dyn SyncEngine> {
        Arc::new(self.clone())
    }

    fn as_any(&self) -> &dyn std::any::Any {
        self
    }

    async fn is_ready(&self) -> bool {
        self.initialized.lock().map(|guard| *guard).unwrap_or(false)
    }

    fn backend_info(&self) -> BackendInfo {
        BackendInfo {
            name: "Automerge".to_string(),
            version: "0.7.1".to_string(),
        }
    }
}

// ============================================================================
// AutomergeIroh Backend Adapter (Phase 7: Lab Integration)
// ============================================================================

/// Type alias for peer event callback list
type PeerCallbacks = Arc<Mutex<Vec<Box<dyn Fn(PeerEvent) + Send + Sync>>>>;

/// Topology-driven connection events
///
/// These events allow external topology managers (e.g., peat-mesh TopologyManager)
/// to control which peers the backend connects to, avoiding N² mesh formation.
/// When a topology event receiver is configured, the backend delegates connection
/// decisions to the topology manager instead of connecting to all discovered peers.
#[derive(Debug, Clone)]
pub enum TopologyConnectionEvent {
    /// Connect to a peer selected by topology manager
    ConnectPeer {
        /// Peer identifier (node_id)
        peer_id: String,
        /// Network addresses for the peer
        addresses: Vec<String>,
        /// Optional relay URL
        relay_url: Option<String>,
    },
    /// Disconnect from a peer (topology decision)
    DisconnectPeer {
        /// Peer identifier to disconnect
        peer_id: String,
    },
}

/// Default maximum connections when topology manager is not configured
pub const DEFAULT_MAX_CONNECTIONS: usize = 7;

/// DataSyncBackend adapter for storage::AutomergeBackend
///
/// This adapter wraps the storage::AutomergeBackend (RocksDB + Iroh + Automerge)
/// to provide DataSyncBackend trait compatibility for cap_sim_node.rs
#[derive(Clone)]
pub struct AutomergeIrohBackend {
    /// The underlying Automerge+Iroh backend
    backend: Arc<crate::storage::AutomergeBackend>,

    /// Reference to the transport for peer discovery
    transport: Arc<crate::network::IrohTransport>,

    /// Peer event callbacks
    peer_callbacks: PeerCallbacks,

    /// Initialization state
    initialized: Arc<Mutex<bool>>,

    /// Formation key for peer authentication (ADR-030)
    /// Peers must share the same app_id and secret_key to connect
    formation_key: Arc<std::sync::RwLock<Option<crate::security::FormationKey>>>,

    /// Peer discovery manager (ADR-011 Phase 3)
    #[cfg(feature = "automerge-backend")]
    discovery_manager: Arc<tokio::sync::RwLock<crate::discovery::peer::DiscoveryManager>>,

    /// Optional blob store for file/model transfer (Issue #379, ADR-025)
    ///
    /// When enabled, provides content-addressed blob storage with P2P transfer
    /// capability via iroh-blobs. Peers connected for document sync are automatically
    /// registered for blob transfer as well.
    #[cfg(feature = "automerge-backend")]
    blob_store: Option<Arc<crate::storage::NetworkedIrohBlobStore>>,

    /// Optional topology event receiver for topology-driven connections
    ///
    /// When provided, the backend delegates connection decisions to the topology
    /// manager instead of connecting to all discovered peers. This prevents N²
    /// mesh formation and enables multi-hop routing.
    #[cfg(feature = "automerge-backend")]
    topology_event_rx:
        Arc<tokio::sync::Mutex<Option<mpsc::UnboundedReceiver<TopologyConnectionEvent>>>>,

    /// Maximum peer connections when topology manager is not configured
    ///
    /// Defaults to DEFAULT_MAX_CONNECTIONS (7). When topology events are
    /// provided, this limit is ignored (topology manager controls connections).
    #[cfg(feature = "automerge-backend")]
    max_connections: usize,

    /// Deletion policy registry for tombstone/soft-delete dispatch (Issue #668)
    deletion_policy_registry: Arc<DeletionPolicyRegistry>,

    /// Monotonic Lamport counter for tombstone ordering (Issue #668)
    lamport_counter: Arc<AtomicU64>,
}

impl AutomergeIrohBackend {
    /// Create a new adapter
    pub fn new(
        backend: Arc<crate::storage::AutomergeBackend>,
        transport: Arc<crate::network::IrohTransport>,
    ) -> Self {
        Self {
            backend,
            transport,
            peer_callbacks: Arc::new(Mutex::new(Vec::new())),
            initialized: Arc::new(Mutex::new(false)),
            formation_key: Arc::new(std::sync::RwLock::new(None)),
            #[cfg(feature = "automerge-backend")]
            discovery_manager: Arc::new(tokio::sync::RwLock::new(
                crate::discovery::peer::DiscoveryManager::default(),
            )),
            #[cfg(feature = "automerge-backend")]
            blob_store: None,
            #[cfg(feature = "automerge-backend")]
            topology_event_rx: Arc::new(tokio::sync::Mutex::new(None)),
            #[cfg(feature = "automerge-backend")]
            max_connections: DEFAULT_MAX_CONNECTIONS,
            deletion_policy_registry: Arc::new(DeletionPolicyRegistry::new()),
            lamport_counter: Arc::new(AtomicU64::new(0)),
        }
    }

    /// Configure topology-driven connection management
    ///
    /// When topology events are provided, the backend delegates all connection
    /// decisions to the external topology manager (e.g., peat-mesh TopologyManager).
    /// This prevents N² mesh formation and enables multi-hop routing.
    ///
    /// # Example
    ///
    /// ```ignore
    /// let (tx, rx) = mpsc::unbounded_channel();
    /// let backend = AutomergeIrohBackend::new(storage, transport)
    ///     .with_topology_events(rx);
    ///
    /// // TopologyManager sends events via tx
    /// tx.send(TopologyConnectionEvent::ConnectPeer { ... });
    /// ```
    #[cfg(feature = "automerge-backend")]
    pub fn with_topology_events(
        mut self,
        rx: mpsc::UnboundedReceiver<TopologyConnectionEvent>,
    ) -> Self {
        self.topology_event_rx = Arc::new(tokio::sync::Mutex::new(Some(rx)));
        self
    }

    /// Set maximum peer connections for fallback mode
    ///
    /// When topology events are not configured, the backend limits connections
    /// to this many peers discovered via mDNS/static config. Defaults to 7.
    #[cfg(feature = "automerge-backend")]
    pub fn with_max_connections(mut self, max: usize) -> Self {
        self.max_connections = max;
        self
    }

    /// Check if topology-driven connection management is enabled
    #[cfg(feature = "automerge-backend")]
    pub fn has_topology_events(&self) -> bool {
        // Check if the receiver exists (non-blocking)
        self.topology_event_rx
            .try_lock()
            .is_ok_and(|guard| guard.is_some())
    }

    /// Get the formation key (if initialized with credentials)
    pub fn formation_key(&self) -> Option<crate::security::FormationKey> {
        self.formation_key
            .read()
            .ok()
            .and_then(|guard| guard.clone())
    }

    /// Get the formation ID (app_id used as formation identifier)
    pub fn formation_id(&self) -> Option<String> {
        self.formation_key
            .read()
            .ok()
            .and_then(|guard| guard.as_ref().map(|k| k.formation_id().to_string()))
    }

    /// Create from store and transport (convenience method)
    pub fn from_parts(
        store: Arc<crate::storage::AutomergeStore>,
        transport: Arc<crate::network::IrohTransport>,
    ) -> Self {
        let backend = Arc::new(crate::storage::AutomergeBackend::with_transport(
            store,
            Arc::clone(&transport),
        ));
        Self::new(backend, transport)
    }

    /// Get the transport (for testing/advanced usage)
    pub fn transport(&self) -> Arc<crate::network::IrohTransport> {
        Arc::clone(&self.transport)
    }

    /// Get the storage backend (Issue #378: shared with sync coordinator)
    ///
    /// Returns the underlying `AutomergeBackend` used by this sync backend.
    /// This ensures callers use the same backend instance that the sync
    /// coordinator uses, preventing state from being split across instances.
    pub fn storage_backend(&self) -> Arc<crate::storage::AutomergeBackend> {
        Arc::clone(&self.backend)
    }

    /// Get the transport Arc pointer address (for debugging Issue #271)
    ///
    /// This returns the raw pointer address of the transport Arc, which can be used
    /// to verify that cloned backends share the same transport instance.
    /// If two backends show different addresses, they have different transports.
    pub fn transport_arc_ptr(&self) -> *const crate::network::IrohTransport {
        Arc::as_ptr(&self.transport)
    }

    /// Debug method to verify transport sharing (Issue #271)
    ///
    /// Logs the transport Arc pointer address. Call this on original and cloned
    /// backends to verify they share the same transport instance.
    pub fn debug_log_transport_ptr(&self, context: &str) {
        tracing::debug!(
            transport_ptr = ?Arc::as_ptr(&self.transport),
            endpoint_id = %self.transport.endpoint_id(),
            peer_count = self.transport.peer_count(),
            context = context,
            "AutomergeIrohBackend transport instance"
        );
    }

    /// Get this node's endpoint ID
    pub fn endpoint_id(&self) -> iroh::EndpointId {
        self.transport.endpoint_id()
    }

    // =========================================================================
    // Blob Store Methods (Issue #379, ADR-025)
    // =========================================================================

    /// Enable blob storage with P2P transfer capability
    ///
    /// Creates a `NetworkedIrohBlobStore` for content-addressed file transfer.
    /// The blob store uses a separate iroh endpoint for the iroh-blobs protocol,
    /// but peers are automatically synchronized when document sync connections
    /// are established.
    ///
    /// # Arguments
    ///
    /// * `blob_dir` - Directory for blob storage and metadata sidecars
    ///
    /// # Example
    ///
    /// ```ignore
    /// use peat_protocol::sync::automerge::AutomergeIrohBackend;
    /// use std::path::PathBuf;
    ///
    /// let backend = AutomergeIrohBackend::from_parts(store, transport);
    /// backend.enable_blob_store(PathBuf::from("/tmp/peat-blobs")).await?;
    ///
    /// // Now you can use the blob store
    /// let blob_store = backend.blob_store().unwrap();
    /// let token = blob_store.create_blob_from_bytes(data, metadata).await?;
    /// ```
    #[cfg(feature = "automerge-backend")]
    pub async fn enable_blob_store(
        &mut self,
        blob_dir: std::path::PathBuf,
    ) -> std::result::Result<(), anyhow::Error> {
        use crate::storage::NetworkedIrohBlobStore;

        let blob_store = NetworkedIrohBlobStore::new(blob_dir).await?;

        // Register currently connected peers with the blob store
        let connected_peers = self.transport.connected_peers();
        for peer_id in connected_peers {
            blob_store.add_peer(peer_id).await;
        }

        self.blob_store = Some(blob_store);

        tracing::info!(
            endpoint_id = %self.transport.endpoint_id(),
            "Blob store enabled for AutomergeIrohBackend"
        );

        Ok(())
    }

    /// Get reference to the blob store (if enabled)
    ///
    /// Returns `None` if `enable_blob_store()` has not been called.
    #[cfg(feature = "automerge-backend")]
    pub fn blob_store(&self) -> Option<Arc<crate::storage::NetworkedIrohBlobStore>> {
        self.blob_store.clone()
    }

    /// Check if blob storage is enabled
    #[cfg(feature = "automerge-backend")]
    pub fn has_blob_store(&self) -> bool {
        self.blob_store.is_some()
    }

    /// Register a peer with the blob store for file transfer
    ///
    /// This is called automatically when document sync connections are established,
    /// but can also be called manually if needed.
    #[cfg(feature = "automerge-backend")]
    pub async fn register_blob_peer(&self, peer_id: iroh::EndpointId) {
        if let Some(ref blob_store) = self.blob_store {
            blob_store.add_peer(peer_id).await;
            tracing::debug!(
                peer_id = %peer_id.fmt_short(),
                "Registered peer for blob transfer"
            );
        }
    }

    /// Unregister a peer from the blob store
    #[cfg(feature = "automerge-backend")]
    pub async fn unregister_blob_peer(&self, peer_id: &iroh::EndpointId) {
        if let Some(ref blob_store) = self.blob_store {
            blob_store.remove_peer(peer_id).await;
            tracing::debug!(
                peer_id = %peer_id.fmt_short(),
                "Unregistered peer from blob transfer"
            );
        }
    }

    /// Start automatic peer synchronization for blob transfers
    ///
    /// Spawns a background task that listens to transport peer events and
    /// automatically registers/unregisters peers with the blob store when
    /// document sync connections are established or closed.
    ///
    /// This should be called after `enable_blob_store()` and before starting
    /// peer connections.
    ///
    /// # Example
    ///
    /// ```ignore
    /// backend.enable_blob_store(blob_dir).await?;
    /// backend.start_blob_peer_sync();
    /// backend.initialize(config).await?; // Now peer connections auto-register
    /// ```
    #[cfg(feature = "automerge-backend")]
    pub fn start_blob_peer_sync(&self) {
        use crate::network::iroh_transport::TransportPeerEvent;

        let blob_store = match &self.blob_store {
            Some(store) => Arc::clone(store),
            None => {
                tracing::warn!("start_blob_peer_sync called but blob store not enabled");
                return;
            }
        };

        let mut events = self.transport.subscribe_peer_events();

        tokio::spawn(async move {
            tracing::debug!("Blob peer sync task started");

            while let Some(event) = events.recv().await {
                match event {
                    TransportPeerEvent::Connected { endpoint_id, .. } => {
                        blob_store.add_peer(endpoint_id).await;
                        tracing::debug!(
                            peer_id = %endpoint_id.fmt_short(),
                            "Auto-registered peer for blob transfer on connect"
                        );
                    }
                    TransportPeerEvent::Disconnected { endpoint_id, .. } => {
                        blob_store.remove_peer(&endpoint_id).await;
                        tracing::debug!(
                            peer_id = %endpoint_id.fmt_short(),
                            "Auto-unregistered peer from blob transfer on disconnect"
                        );
                    }
                }
            }

            tracing::debug!("Blob peer sync task stopped");
        });
    }

    /// Manually trigger sync for a specific document with all connected peers
    ///
    /// This is useful for testing or for explicit sync triggering when the
    /// automatic sync triggered by upsert may have been blocked by cooldown.
    ///
    /// # Arguments
    ///
    /// * `doc_key` - The full document key (e.g., "beacons:edge-sensor-001")
    pub async fn sync_document(&self, doc_key: &str) -> Result<()> {
        self.backend
            .sync_document(doc_key)
            .await
            .map_err(|e| Error::Network {
                message: format!("Failed to sync document {}: {}", doc_key, e),
                peer_id: None,
                source: None,
            })
    }

    /// Add a discovery strategy to the peer discovery manager
    ///
    /// This allows configuring static peers, mDNS discovery, etc.
    #[cfg(feature = "automerge-backend")]
    pub async fn add_discovery_strategy(
        &self,
        strategy: Box<dyn crate::discovery::peer::DiscoveryStrategy>,
    ) -> Result<()> {
        let mut manager = self.discovery_manager.write().await;
        manager.add_strategy(strategy);
        Ok(())
    }

    /// Immediately connect to all discovered peers
    ///
    /// This bypasses the background connection task's periodic interval, allowing
    /// tests to establish connections without waiting 1-7 seconds for the next cycle.
    ///
    /// Returns the number of new connections established.
    ///
    /// # Example
    ///
    /// ```ignore
    /// // Add discovery strategy with peer info
    /// backend_a.add_discovery_strategy(Box::new(StaticDiscovery::from_peers(vec![peer_b]))).await?;
    /// backend_b.add_discovery_strategy(Box::new(StaticDiscovery::from_peers(vec![peer_a]))).await?;
    ///
    /// // Connect immediately instead of waiting for background task
    /// backend_a.connect_to_discovered_peers_now().await?;
    /// backend_b.connect_to_discovered_peers_now().await?;
    /// ```
    #[cfg(feature = "automerge-backend")]
    pub async fn connect_to_discovered_peers_now(&self) -> Result<usize> {
        use crate::network::formation_handshake::perform_initiator_handshake;
        use crate::network::PeerInfo as NetworkPeerInfo;

        let formation_key = self
            .formation_key
            .read()
            .map_err(|_| Error::Internal("formation_key lock poisoned".into()))?
            .clone()
            .ok_or_else(|| Error::config_error("Backend not initialized", None))?;

        // Get discovered peers
        let manager = self.discovery_manager.read().await;
        let discovered_peers = manager.get_peers().await;
        drop(manager);

        let mut new_connections = 0;

        for peer in discovered_peers {
            let network_peer_info = NetworkPeerInfo {
                name: peer.name.clone(),
                node_id: peer.node_id.clone(),
                addresses: peer.addresses.clone(),
                relay_url: peer.relay_url.clone(),
            };

            if let Ok(endpoint_id) = peer.endpoint_id() {
                match self.transport.connect_peer(&network_peer_info).await {
                    Ok(Some(conn)) => {
                        // Issue #346: Give the accept loop a moment to process any
                        // incoming connection from this peer. In symmetric discovery
                        // (both peers have each other in config), both will connect
                        // simultaneously and the accept loop needs time to process
                        // the incoming connection and do conflict resolution.
                        tokio::task::yield_now().await;
                        tokio::time::sleep(tokio::time::Duration::from_millis(10)).await;

                        // Check if connection was closed by conflict resolution
                        if conn.close_reason().is_some() {
                            tracing::debug!(
                                "Immediate connect: peer {} superseded by accept path",
                                peer.name
                            );
                            continue;
                        }

                        // New connection - perform formation handshake
                        match perform_initiator_handshake(&conn, &formation_key).await {
                            Ok(()) => {
                                tracing::debug!(
                                    "Immediate connect: authenticated with peer {}",
                                    peer.name
                                );
                                // Issue #346: Emit Connected AFTER successful handshake
                                self.transport.emit_peer_connected(endpoint_id);
                                new_connections += 1;
                            }
                            Err(e) => {
                                tracing::warn!(
                                    "Immediate connect: peer {} failed auth: {}",
                                    peer.name,
                                    e
                                );
                                conn.close(1u32.into(), b"authentication failed");
                                // Issue #346: Don't call disconnect() here - the connection
                                // in the map might be a different one after conflict resolution.
                                // conn.close() is sufficient; close monitor handles cleanup.
                            }
                        }
                    }
                    Ok(None) => {
                        // Accept path is handling connection - no action needed
                        tracing::debug!(
                            "Immediate connect: peer {} handled by accept path",
                            peer.name
                        );
                    }
                    Err(e) => {
                        tracing::debug!(
                            "Immediate connect: failed to connect to {}: {}",
                            peer.name,
                            e
                        );
                    }
                }
            }
        }

        Ok(new_connections)
    }

    /// Get access to the peer discovery information
    ///
    /// Returns a handle for querying discovered peers.
    #[cfg(feature = "automerge-backend")]
    pub fn get_peer_discovery(&self) -> PeerDiscoveryHandle {
        PeerDiscoveryHandle {
            manager: Arc::clone(&self.discovery_manager),
        }
    }
}

/// Handle for accessing peer discovery information
#[cfg(feature = "automerge-backend")]
pub struct PeerDiscoveryHandle {
    manager: Arc<tokio::sync::RwLock<crate::discovery::peer::DiscoveryManager>>,
}

#[cfg(feature = "automerge-backend")]
impl PeerDiscoveryHandle {
    /// Get all discovered peers
    ///
    /// Queries all discovery strategies and returns their currently cached peers.
    /// Strategies update their caches asynchronously, so this is a fast read operation.
    pub async fn discovered_peers(&self) -> Result<Vec<crate::discovery::peer::PeerInfo>> {
        let manager = self.manager.read().await;
        manager
            .discovered_peers()
            .await
            .map_err(|e| Error::Discovery {
                message: e.to_string(),
                source: None,
            })
    }

    /// Get the number of discovered peers
    ///
    /// Queries all discovery strategies and counts their currently cached peers.
    pub async fn peer_count(&self) -> usize {
        let manager = self.manager.read().await;
        manager.peer_count().await
    }
}

// DocumentStore implementation for AutomergeIrohBackend
struct IrohDocumentStore {
    backend: Arc<crate::storage::AutomergeBackend>,
    /// Deletion policy registry for tombstone/soft-delete dispatch (Issue #668)
    deletion_policy_registry: Arc<DeletionPolicyRegistry>,
    /// Monotonic Lamport counter for tombstone ordering (Issue #668)
    lamport_counter: Arc<AtomicU64>,
    /// Node ID for tombstone attribution (Issue #668)
    node_id: String,
}

#[async_trait]
impl DocumentStore for IrohDocumentStore {
    async fn upsert(&self, collection: &str, document: Document) -> anyhow::Result<DocumentId> {
        use crate::storage::traits::StorageBackend;

        // Generate ID if not provided
        let doc_id = document.id.clone().unwrap_or_else(|| {
            use std::time::SystemTime;
            let timestamp = SystemTime::now()
                .duration_since(SystemTime::UNIX_EPOCH)
                .expect("system clock before UNIX epoch")
                .as_nanos();
            format!("doc-{}", timestamp)
        });

        // Serialize document to JSON bytes
        let json_bytes = serde_json::to_vec(&document)?;

        // Get collection and upsert
        let coll = self.backend.collection(collection);
        coll.upsert(&doc_id, json_bytes)
            .map_err(|e| Error::Storage {
                message: e.to_string(),
                operation: Some("upsert".to_string()),
                key: Some(doc_id.clone()),
                source: None,
            })?;

        // Trigger sync to push the document to connected peers
        // The doc_key format is "collection:doc_id"
        let doc_key = format!("{}:{}", collection, doc_id);
        match self.backend.sync_document(&doc_key).await {
            Ok(()) => {
                tracing::debug!("Sync triggered for document {} after upsert", doc_key);
            }
            Err(e) => {
                // Log but don't fail - sync is best-effort
                tracing::debug!("Failed to sync document {} after upsert: {}", doc_key, e);
            }
        }

        Ok(doc_id)
    }

    async fn query(&self, collection: &str, query: &Query) -> anyhow::Result<Vec<Document>> {
        use crate::storage::traits::StorageBackend;

        let coll = self.backend.collection(collection);
        let all_items = coll.scan().map_err(|e| Error::Storage {
            message: e.to_string(),
            operation: Some("scan".to_string()),
            key: None,
            source: None,
        })?;

        // Deserialize and filter
        let mut results = Vec::new();
        for (doc_id, bytes) in all_items {
            if let Ok(mut doc) = serde_json::from_slice::<Document>(&bytes) {
                // Set the ID from the key if not already set
                if doc.id.is_none() {
                    doc.id = Some(doc_id);
                }

                // Apply soft-delete filter (ADR-034, Issue #369)
                // By default, queries exclude documents with _deleted=true
                // IncludeDeleted and DeletedOnly queries override this behavior
                if !query.matches_deletion_state(&doc) {
                    continue;
                }

                if matches_query(&doc, query) {
                    results.push(doc);
                }
            }
        }

        Ok(results)
    }

    async fn remove(&self, collection: &str, doc_id: &DocumentId) -> anyhow::Result<()> {
        use crate::storage::traits::StorageBackend;

        let coll = self.backend.collection(collection);
        coll.delete(doc_id).map_err(|e| Error::Storage {
            message: e.to_string(),
            operation: Some("delete".to_string()),
            key: Some(doc_id.clone()),
            source: None,
        })?;
        Ok(())
    }

    async fn delete(
        &self,
        collection: &str,
        doc_id: &DocumentId,
        reason: Option<&str>,
    ) -> anyhow::Result<crate::qos::DeleteResult> {
        let policy = self.deletion_policy(collection);
        let store = self.backend.automerge_store();

        match policy {
            DeletionPolicy::Immutable => Ok(crate::qos::DeleteResult::immutable()),
            DeletionPolicy::ImplicitTTL { .. } => Ok(crate::qos::DeleteResult {
                deleted: false,
                tombstone_id: None,
                expires_at: None,
                policy: policy.clone(),
            }),
            DeletionPolicy::Tombstone {
                tombstone_ttl,
                delete_wins: _,
            } => {
                let lamport = self.lamport_counter.fetch_add(1, Ordering::SeqCst);
                let tombstone = if let Some(reason_str) = reason {
                    Tombstone::with_reason(
                        doc_id.clone(),
                        collection.to_string(),
                        self.node_id.clone(),
                        lamport,
                        reason_str,
                    )
                } else {
                    Tombstone::new(
                        doc_id.clone(),
                        collection.to_string(),
                        self.node_id.clone(),
                        lamport,
                    )
                };
                let tombstone_id = format!("{}:{}", collection, doc_id);

                // Store tombstone in AutomergeStore (persisted to RocksDB)
                store
                    .put_tombstone(&tombstone)
                    .map_err(|e| Error::Storage {
                        message: e.to_string(),
                        operation: Some("put_tombstone".to_string()),
                        key: Some(tombstone_id.clone()),
                        source: None,
                    })?;

                // Remove the document
                let doc_key = format!("{}:{}", collection, doc_id);
                store.delete(&doc_key).ok();

                // Propagate tombstone to all connected peers (Issue #668)
                // The tombstone is already stored in AutomergeStore, so
                // sync_tombstones_with_peer will include it in the batch.
                if let Some(coordinator) = self.backend.sync_coordinator() {
                    let coordinator = coordinator.clone();
                    let backend = Arc::clone(&self.backend);
                    tokio::spawn(async move {
                        // Get connected peers via the transport
                        if let Some(transport) = backend.iroh_transport() {
                            for peer_id in transport.connected_peers() {
                                if let Err(e) = coordinator.sync_tombstones_with_peer(peer_id).await
                                {
                                    tracing::debug!(
                                        "Tombstone propagation to peer {:?} failed: {}",
                                        peer_id,
                                        e
                                    );
                                }
                            }
                        }
                    });
                }

                Ok(crate::qos::DeleteResult {
                    deleted: true,
                    tombstone_id: Some(tombstone_id),
                    expires_at: Some(std::time::SystemTime::now() + tombstone_ttl),
                    policy: policy.clone(),
                })
            }
            DeletionPolicy::SoftDelete {
                include_deleted_default: _,
            } => {
                // Soft delete: get doc, mark _deleted=true, upsert back
                let doc_key = format!("{}:{}", collection, doc_id);
                if let Some(automerge_doc) = store.get(&doc_key).map_err(|e| Error::Storage {
                    message: e.to_string(),
                    operation: Some("get".to_string()),
                    key: Some(doc_key.clone()),
                    source: None,
                })? {
                    // Apply soft-delete fields via Automerge transaction
                    let mut doc = automerge_doc;
                    let mut tx = doc.transaction();
                    let root = automerge::ROOT;
                    tx.put(&root, "_deleted", true).ok();
                    tx.put(
                        &root,
                        "_deleted_at",
                        chrono::Utc::now().format("%Y-%m-%dT%H:%M:%SZ").to_string(),
                    )
                    .ok();
                    if let Some(r) = reason {
                        tx.put(&root, "_deleted_reason", r).ok();
                    }
                    tx.commit();
                    store.put(&doc_key, &doc).map_err(|e| Error::Storage {
                        message: e.to_string(),
                        operation: Some("put".to_string()),
                        key: Some(doc_key.clone()),
                        source: None,
                    })?;

                    // Trigger sync so soft-delete propagates via normal document sync
                    if let Ok(()) = self.backend.sync_document(&doc_key).await {
                        tracing::debug!("Sync triggered for soft-deleted document {}", doc_key);
                    }

                    Ok(crate::qos::DeleteResult::soft_deleted(policy.clone()))
                } else {
                    Ok(crate::qos::DeleteResult {
                        deleted: false,
                        tombstone_id: None,
                        expires_at: None,
                        policy: policy.clone(),
                    })
                }
            }
        }
    }

    async fn is_deleted(&self, collection: &str, doc_id: &DocumentId) -> anyhow::Result<bool> {
        let store = self.backend.automerge_store();

        // Check tombstone first
        if store.has_tombstone(collection, doc_id).unwrap_or(false) {
            return Ok(true);
        }

        // Check soft-delete field
        let doc_key = format!("{}:{}", collection, doc_id);
        if let Ok(Some(automerge_doc)) = store.get(&doc_key) {
            use automerge::ReadDoc;
            if let Ok(Some((automerge::Value::Scalar(s), _))) =
                automerge_doc.get(automerge::ROOT, "_deleted")
            {
                if let automerge::ScalarValue::Boolean(true) = s.as_ref() {
                    return Ok(true);
                }
            }
        }

        Ok(false)
    }

    fn deletion_policy(&self, collection: &str) -> crate::qos::DeletionPolicy {
        self.deletion_policy_registry.get(collection)
    }

    async fn get_tombstones(&self, collection: &str) -> anyhow::Result<Vec<Tombstone>> {
        self.backend
            .automerge_store()
            .get_tombstones_for_collection(collection)
            .map_err(|e| {
                Error::Storage {
                    message: e.to_string(),
                    operation: Some("get_tombstones".to_string()),
                    key: None,
                    source: None,
                }
                .into()
            })
    }

    async fn apply_tombstone(&self, tombstone: &Tombstone) -> anyhow::Result<()> {
        let store = self.backend.automerge_store();
        store.put_tombstone(tombstone).map_err(|e| Error::Storage {
            message: e.to_string(),
            operation: Some("put_tombstone".to_string()),
            key: Some(format!(
                "{}:{}",
                tombstone.collection, tombstone.document_id
            )),
            source: None,
        })?;

        // Remove the document if it exists
        let doc_key = format!("{}:{}", tombstone.collection, tombstone.document_id);
        store.delete(&doc_key).ok();
        Ok(())
    }

    fn observe(&self, collection: &str, query: &Query) -> anyhow::Result<ChangeStream> {
        let (tx, rx) = tokio::sync::mpsc::unbounded_channel();

        // Get initial snapshot
        // Issue #457: Use direct store scan to handle both Collection::upsert
        // and message_to_automerge storage formats
        let collection_prefix = format!("{}:", collection);
        let all_docs = self
            .backend
            .automerge_store()
            .scan_prefix(&collection_prefix)
            .map_err(|e| Error::Storage {
                message: e.to_string(),
                operation: Some("scan_prefix".to_string()),
                key: None,
                source: None,
            })?;

        let mut initial_docs = Vec::new();
        for (doc_key, automerge_doc) in all_docs {
            // Extract doc_id from key
            let doc_id = match doc_key.strip_prefix(&collection_prefix) {
                Some(id) => id.to_string(),
                None => continue,
            };

            // Convert Automerge doc to Document
            if let Ok(json_value) = automerge_to_message::<serde_json::Value>(&automerge_doc) {
                let fields = if let serde_json::Value::Object(map) = json_value {
                    map.into_iter().collect()
                } else {
                    serde_json::Map::new().into_iter().collect()
                };
                let doc = Document {
                    id: Some(doc_id),
                    fields,
                    updated_at: std::time::SystemTime::now(),
                };

                if matches_query(&doc, query) {
                    initial_docs.push(doc);
                }
            }
        }

        // Send initial snapshot
        let _ = tx.send(ChangeEvent::Initial {
            documents: initial_docs,
        });

        // Subscribe to observer notifications from the store (Issue #221, Issue #377)
        // This enables emitting ChangeEvent::Updated when documents sync from peers.
        // Using subscribe_to_observer_changes() instead of subscribe_to_changes() ensures
        // we get notifications for ALL document changes, including remotely synced docs.
        let mut change_rx = self
            .backend
            .automerge_store()
            .subscribe_to_observer_changes();
        let collection_name = collection.to_string();
        let collection_prefix = format!("{}:", collection);
        let query_clone = query.clone();
        let backend = Arc::clone(&self.backend);
        let tx_clone = tx.clone();

        // Spawn background task to listen for changes and emit Updated events
        tokio::spawn(async move {
            loop {
                match change_rx.recv().await {
                    Ok(doc_key) => {
                        // Check if this change is for our collection
                        if !doc_key.starts_with(&collection_prefix) {
                            continue;
                        }

                        // Extract doc_id from key (format: "collection:doc_id")
                        let doc_id = match doc_key.strip_prefix(&collection_prefix) {
                            Some(id) => id.to_string(),
                            None => continue,
                        };

                        // Fetch the updated document directly from store
                        // Issue #457: AutomergeSummaryStorage uses message_to_automerge which stores
                        // fields at ROOT, but Collection::get expects a "data" field wrapper.
                        // Use direct store access for consistent handling of all document formats.
                        let maybe_doc: Option<Document> = if let Ok(Some(automerge_doc)) =
                            backend.automerge_store().get(&doc_key)
                        {
                            // Convert Automerge doc to JSON Value, then to Document
                            if let Ok(json_value) =
                                automerge_to_message::<serde_json::Value>(&automerge_doc)
                            {
                                // Convert JSON Value to Document
                                let fields = if let serde_json::Value::Object(map) = json_value {
                                    map.into_iter().collect()
                                } else {
                                    serde_json::Map::new().into_iter().collect()
                                };
                                Some(Document {
                                    id: Some(doc_id.clone()),
                                    fields,
                                    updated_at: std::time::SystemTime::now(),
                                })
                            } else {
                                None
                            }
                        } else {
                            None
                        };

                        if let Some(mut doc) = maybe_doc {
                            if doc.id.is_none() {
                                doc.id = Some(doc_id);
                            }

                            // Check if document matches query
                            if matches_query(&doc, &query_clone) {
                                // Emit Updated event
                                if tx_clone
                                    .send(ChangeEvent::Updated {
                                        collection: collection_name.clone(),
                                        document: doc,
                                    })
                                    .is_err()
                                {
                                    // Receiver dropped, stop listening
                                    break;
                                }
                            }
                        }
                    }
                    Err(tokio::sync::broadcast::error::RecvError::Lagged(n)) => {
                        // Issue #346: When lagged, re-emit all documents in the collection
                        // to ensure observers don't miss updates. This is critical for
                        // metrics tracking and hierarchical aggregation callbacks.
                        tracing::warn!(
                            "Observer change notification lagged, skipped {} messages - re-emitting all documents",
                            n
                        );

                        // Re-scan collection and emit Updated for all matching documents
                        // Issue #457: Use direct store scan to handle both Collection::upsert
                        // and message_to_automerge storage formats
                        let prefix = &collection_prefix;
                        if let Ok(all_docs) = backend.automerge_store().scan_prefix(prefix) {
                            for (doc_key, automerge_doc) in all_docs {
                                // Extract doc_id from key
                                let doc_id = match doc_key.strip_prefix(prefix) {
                                    Some(id) => id.to_string(),
                                    None => continue,
                                };

                                // Try to convert Automerge doc to Document
                                let maybe_doc: Option<Document> = if let Ok(json_value) =
                                    automerge_to_message::<serde_json::Value>(&automerge_doc)
                                {
                                    let fields = if let serde_json::Value::Object(map) = json_value
                                    {
                                        map.into_iter().collect()
                                    } else {
                                        serde_json::Map::new().into_iter().collect()
                                    };
                                    Some(Document {
                                        id: Some(doc_id),
                                        fields,
                                        updated_at: std::time::SystemTime::now(),
                                    })
                                } else {
                                    None
                                };

                                if let Some(doc) = maybe_doc {
                                    // Send event if document matches query
                                    #[allow(clippy::collapsible_if)]
                                    if matches_query(&doc, &query_clone) {
                                        if tx_clone
                                            .send(ChangeEvent::Updated {
                                                collection: collection_name.clone(),
                                                document: doc,
                                            })
                                            .is_err()
                                        {
                                            // Receiver dropped, stop listening
                                            break;
                                        }
                                    }
                                }
                            }
                        }
                    }
                    Err(tokio::sync::broadcast::error::RecvError::Closed) => {
                        // Channel closed, stop listening
                        break;
                    }
                }
            }
        });

        Ok(ChangeStream { receiver: rx })
    }
}

// PeerDiscovery implementation for AutomergeIrohBackend
struct IrohPeerDiscovery {
    transport: Arc<crate::network::IrohTransport>,
    peer_callbacks: PeerCallbacks,
    #[cfg(feature = "automerge-backend")]
    discovery_manager: Arc<tokio::sync::RwLock<crate::discovery::peer::DiscoveryManager>>,
    /// Formation key for peer authentication (required for secure connections)
    #[cfg(feature = "automerge-backend")]
    formation_key: Arc<std::sync::RwLock<Option<crate::security::FormationKey>>>,
    /// Whether the event forwarder task is running (Issue #275)
    event_forwarder_running: Arc<std::sync::atomic::AtomicBool>,
    /// Optional topology event receiver for topology-driven connections
    #[cfg(feature = "automerge-backend")]
    topology_event_rx:
        Arc<tokio::sync::Mutex<Option<mpsc::UnboundedReceiver<TopologyConnectionEvent>>>>,
    /// Maximum peer connections when topology manager is not configured
    #[cfg(feature = "automerge-backend")]
    max_connections: usize,
}

#[async_trait]
impl PeerDiscovery for IrohPeerDiscovery {
    async fn start(&self) -> anyhow::Result<()> {
        // Get formation key for authentication (required)
        let formation_key = self
            .formation_key
            .read()
            .map_err(|_| Error::Internal("formation_key lock poisoned".into()))?
            .clone()
            .ok_or_else(|| Error::Internal("Formation key not initialized".to_string()))?;

        // Start authenticated accept loop (replaces simple start_accept_loop)
        // This spawns a background task that accepts connections and performs handshake
        //
        // IMPORTANT (Issue #229): We MUST mark the accept loop as managed BEFORE spawning
        // our custom loop. This prevents AutomergeBackend::start_sync() from starting a
        // duplicate accept loop via transport.start_accept_loop(), which would cause
        // competing loops where one might accept connections without doing the handshake.
        #[cfg(feature = "automerge-backend")]
        {
            // Mark accept loop as externally managed to prevent duplicate loops
            self.transport.mark_accept_loop_managed().map_err(|e| {
                Error::Internal(format!("Failed to mark accept loop as managed: {}", e))
            })?;

            let transport = Arc::clone(&self.transport);
            let formation_key_accept = formation_key.clone();

            tokio::spawn(async move {
                use crate::network::formation_handshake::perform_responder_handshake;

                // Issue #346: Track consecutive errors to detect permanent failures
                let mut consecutive_errors = 0u32;
                const MAX_CONSECUTIVE_ERRORS: u32 = 10;

                loop {
                    // Accept incoming connection
                    // Note (Issue #229): accept() returns Option<Connection>
                    // - Some(conn) = new connection that needs authentication
                    // - None = duplicate/transient (already handled or failed QUIC handshake)
                    match transport.accept().await {
                        Ok(Some(conn)) => {
                            consecutive_errors = 0; // Reset on success
                            let peer_id = conn.remote_id();

                            // Perform formation handshake to authenticate peer
                            match perform_responder_handshake(&conn, &formation_key_accept).await {
                                Ok(()) => {
                                    // Issue #346: Emit Connected AFTER successful handshake
                                    transport.emit_peer_connected(peer_id);
                                }
                                Err(e) => {
                                    tracing::warn!(
                                        ?peer_id,
                                        error = %e,
                                        "Formation handshake failed"
                                    );
                                    // Close the unauthenticated connection - connection monitor
                                    // will handle cleanup (Issue #346 stable_id check)
                                    conn.close(1u32.into(), b"authentication failed");
                                }
                            }
                        }
                        Ok(None) => {
                            // Issue #346: This now includes transient errors (failed QUIC handshake)
                            // as well as duplicate connections. Either way, continue accepting.
                            consecutive_errors = 0; // Reset - we're still accepting
                        }
                        Err(e) => {
                            // Issue #346: Only fatal errors (endpoint closed) should stop the loop
                            // But add a circuit breaker for repeated failures
                            consecutive_errors += 1;
                            let error_msg = format!("{}", e);

                            if error_msg.contains("Endpoint closed")
                                || error_msg.contains("no more")
                            {
                                tracing::info!("Accept loop stopped: endpoint closed");
                                break;
                            }

                            if consecutive_errors >= MAX_CONSECUTIVE_ERRORS {
                                tracing::error!(
                                    consecutive_errors,
                                    error = %e,
                                    "Accept loop stopping after {} consecutive errors",
                                    MAX_CONSECUTIVE_ERRORS
                                );
                                break;
                            }

                            tracing::warn!(
                                error = %e,
                                consecutive_errors,
                                "Accept error (will retry, {} more before stopping)",
                                MAX_CONSECUTIVE_ERRORS - consecutive_errors
                            );
                            // Small delay before retrying to avoid tight error loop
                            tokio::time::sleep(std::time::Duration::from_millis(100)).await;
                        }
                    }
                }
                tracing::info!("Authenticated accept loop stopped");
            });
        }

        // Start discovery manager
        #[cfg(feature = "automerge-backend")]
        {
            let mut manager = self.discovery_manager.write().await;
            manager.start().await.map_err(|e| {
                Error::Internal(format!("Failed to start discovery manager: {}", e))
            })?;
        }

        // Spawn mDNS discovery event handler (Issue #233)
        // This subscribes to Iroh's MdnsDiscovery stream and connects to newly discovered peers.
        // Without this, mDNS only populates the address book but doesn't trigger connections.
        #[cfg(feature = "automerge-backend")]
        if let Some(mdns) = self.transport.mdns_discovery() {
            use futures_lite::StreamExt;
            use iroh::address_lookup::mdns::DiscoveryEvent;

            let mdns = mdns.clone();
            let transport = Arc::clone(&self.transport);
            let formation_key_mdns = formation_key.clone();

            tokio::spawn(async move {
                use crate::network::formation_handshake::perform_initiator_handshake;

                tracing::info!("Starting mDNS discovery event handler");
                let mut stream = mdns.subscribe().await;

                while let Some(event) = stream.next().await {
                    match event {
                        DiscoveryEvent::Discovered { endpoint_info, .. } => {
                            let peer_id = endpoint_info.endpoint_id;
                            tracing::info!(
                                peer_id = %peer_id,
                                "mDNS discovered peer, attempting connection"
                            );

                            // Check if already connected
                            if transport.get_connection(&peer_id).is_some() {
                                tracing::debug!(
                                    peer_id = %peer_id,
                                    "Already connected to mDNS-discovered peer"
                                );
                                continue;
                            }

                            // Connect using just the EndpointId (addresses from mDNS discovery)
                            match transport.connect_by_id(peer_id).await {
                                Ok(Some(conn)) => {
                                    // New connection - perform formation handshake
                                    match perform_initiator_handshake(&conn, &formation_key_mdns)
                                        .await
                                    {
                                        Ok(()) => {
                                            tracing::info!(
                                                peer_id = %peer_id,
                                                "mDNS peer connected and authenticated"
                                            );
                                            // Issue #346: Emit Connected AFTER successful handshake
                                            transport.emit_peer_connected(peer_id);
                                        }
                                        Err(e) => {
                                            tracing::warn!(
                                                peer_id = %peer_id,
                                                error = %e,
                                                "mDNS peer failed authentication"
                                            );
                                            conn.close(1u32.into(), b"authentication failed");
                                            transport.disconnect(&peer_id).ok();
                                        }
                                    }
                                }
                                Ok(None) => {
                                    // Accept path is handling connection
                                    tracing::debug!(
                                        peer_id = %peer_id,
                                        "mDNS peer connection handled by accept path"
                                    );
                                }
                                Err(e) => {
                                    tracing::debug!(
                                        peer_id = %peer_id,
                                        error = %e,
                                        "Failed to connect to mDNS-discovered peer"
                                    );
                                }
                            }
                        }
                        DiscoveryEvent::Expired { endpoint_id } => {
                            tracing::debug!(
                                peer_id = %endpoint_id,
                                "mDNS peer expired (no longer advertising)"
                            );
                            // Note: We don't disconnect immediately since the peer might still
                            // be reachable. The connection will fail naturally if unreachable.
                        }
                    }
                }
                tracing::debug!("mDNS discovery event handler stopped");
            });
        }

        // Check if topology-driven connection management is configured
        #[cfg(feature = "automerge-backend")]
        let has_topology_events = {
            let guard = self.topology_event_rx.lock().await;
            guard.is_some()
        };

        // Spawn topology event handler if configured (prevents N² mesh)
        #[cfg(feature = "automerge-backend")]
        if has_topology_events {
            let topology_rx = self.topology_event_rx.clone();
            let transport = Arc::clone(&self.transport);
            let formation_key_topology = formation_key.clone();

            tokio::spawn(async move {
                use crate::network::formation_handshake::perform_initiator_handshake;
                use crate::network::PeerInfo as NetworkPeerInfo;

                // Take the receiver from the mutex
                let mut rx = {
                    let mut guard = topology_rx.lock().await;
                    guard.take()
                };

                if let Some(ref mut receiver) = rx {
                    tracing::info!("Topology-driven connection management enabled");

                    while let Some(event) = receiver.recv().await {
                        match event {
                            TopologyConnectionEvent::ConnectPeer {
                                peer_id,
                                addresses,
                                relay_url,
                            } => {
                                tracing::debug!(
                                    peer_id = %peer_id,
                                    "Topology event: connecting to peer"
                                );

                                let network_peer_info = NetworkPeerInfo {
                                    name: peer_id.clone(),
                                    node_id: peer_id.clone(),
                                    addresses,
                                    relay_url,
                                };

                                match transport.connect_peer(&network_peer_info).await {
                                    Ok(Some(conn)) => {
                                        // Give accept loop time for conflict resolution
                                        tokio::task::yield_now().await;
                                        tokio::time::sleep(tokio::time::Duration::from_millis(10))
                                            .await;

                                        if conn.close_reason().is_some() {
                                            tracing::debug!(
                                                "Topology peer {} superseded by accept path",
                                                peer_id
                                            );
                                            continue;
                                        }

                                        // Perform formation handshake
                                        match perform_initiator_handshake(
                                            &conn,
                                            &formation_key_topology,
                                        )
                                        .await
                                        {
                                            Ok(()) => {
                                                // Convert peer_id hex string to EndpointId
                                                if let Ok(bytes) = hex::decode(&peer_id) {
                                                    if bytes.len() == 32 {
                                                        let mut array = [0u8; 32];
                                                        array.copy_from_slice(&bytes);
                                                        if let Ok(endpoint_id) =
                                                            iroh::EndpointId::from_bytes(&array)
                                                        {
                                                            transport
                                                                .emit_peer_connected(endpoint_id);
                                                            tracing::info!(
                                                                "Topology: connected and authenticated with peer: {}",
                                                                peer_id
                                                            );
                                                        }
                                                    }
                                                }
                                            }
                                            Err(e) => {
                                                tracing::warn!(
                                                    "Topology peer {} failed authentication: {}",
                                                    peer_id,
                                                    e
                                                );
                                                conn.close(1u32.into(), b"authentication failed");
                                            }
                                        }
                                    }
                                    Ok(None) => {
                                        tracing::debug!(
                                            "Topology peer {} handled by accept path",
                                            peer_id
                                        );
                                    }
                                    Err(e) => {
                                        tracing::debug!(
                                            "Failed to connect to topology peer {}: {}",
                                            peer_id,
                                            e
                                        );
                                    }
                                }
                            }
                            TopologyConnectionEvent::DisconnectPeer { peer_id } => {
                                tracing::debug!(
                                    peer_id = %peer_id,
                                    "Topology event: disconnecting from peer"
                                );
                                // Convert peer_id hex string to EndpointId
                                if let Ok(bytes) = hex::decode(&peer_id) {
                                    if bytes.len() == 32 {
                                        let mut array = [0u8; 32];
                                        array.copy_from_slice(&bytes);
                                        if let Ok(endpoint_id) =
                                            iroh::EndpointId::from_bytes(&array)
                                        {
                                            let _ = transport.disconnect(&endpoint_id);
                                        }
                                    }
                                }
                            }
                        }
                    }
                }
                tracing::debug!("Topology event handler stopped");
            });
        }

        // Spawn background task to connect to discovered peers (with authentication)
        // Only runs if topology events are NOT configured (fallback to limited discovery)
        #[cfg(feature = "automerge-backend")]
        if !has_topology_events {
            let discovery_manager = Arc::clone(&self.discovery_manager);
            let transport = Arc::clone(&self.transport);
            let formation_key_connect = formation_key;
            let max_connections = self.max_connections;

            tokio::spawn(async move {
                use crate::network::formation_handshake::perform_initiator_handshake;
                use crate::network::iroh_transport::TransportPeerEvent;
                use crate::network::PeerInfo as NetworkPeerInfo;

                tracing::info!(
                    "Discovery-based connection management enabled (max {} connections)",
                    max_connections
                );

                // Subscribe to peer events for immediate reconnection on disconnect (Issue #504)
                let mut peer_events = transport.subscribe_peer_events();

                // Adaptive interval: start fast (1s), slow down once mesh is stable (up to 5s)
                let mut interval_secs = 1u64;
                let mut consecutive_no_new_connections = 0u32;

                loop {
                    // Issue #504: Use select! to react immediately to disconnect events
                    // instead of waiting up to 5 seconds for the next polling cycle
                    let sleep_future =
                        tokio::time::sleep(std::time::Duration::from_secs(interval_secs));
                    tokio::pin!(sleep_future);

                    tokio::select! {
                        _ = &mut sleep_future => {
                            // Normal timeout - continue with connection cycle
                        }
                        event = peer_events.recv() => {
                            match event {
                                Some(TransportPeerEvent::Disconnected { endpoint_id, reason }) => {
                                    tracing::debug!(
                                        peer = %endpoint_id.fmt_short(),
                                        reason = %reason,
                                        "Peer disconnected - triggering immediate reconnection attempt"
                                    );
                                    // Reset to fast polling for quick recovery
                                    interval_secs = 1;
                                    consecutive_no_new_connections = 0;
                                }
                                Some(TransportPeerEvent::Connected { .. }) => {
                                    // New connection - continue normally
                                }
                                None => {
                                    // Channel closed, exit the loop
                                    tracing::debug!("Peer event channel closed, stopping connection manager");
                                    break;
                                }
                            }
                        }
                    }

                    // Check current connection count
                    let current_connections = transport.connected_peers().len();
                    if current_connections >= max_connections {
                        tracing::debug!(
                            "At max connections ({}/{}), skipping discovery connect cycle",
                            current_connections,
                            max_connections
                        );
                        consecutive_no_new_connections += 1;
                        if consecutive_no_new_connections >= 3 && interval_secs < 5 {
                            interval_secs = (interval_secs * 2).min(5);
                        }
                        continue;
                    }

                    // Get discovered peers
                    let manager = discovery_manager.read().await;
                    let discovered_peers = manager.get_peers().await;
                    drop(manager);

                    // Try to connect to discovered peers (up to max_connections limit)
                    let mut made_new_connection = false;
                    let slots_available = max_connections.saturating_sub(current_connections);

                    for peer in discovered_peers.into_iter().take(slots_available) {
                        // Convert discovery::peer::PeerInfo to network::PeerInfo
                        let network_peer_info = NetworkPeerInfo {
                            name: peer.name.clone(),
                            node_id: peer.node_id.clone(),
                            addresses: peer.addresses.clone(),
                            relay_url: peer.relay_url.clone(),
                        };

                        // Try to connect to the peer
                        // connect_peer() returns Option<Connection> (Issue #229):
                        // - Some(conn): New connection, we need to do initiator handshake
                        // - None: Already connected via accept path, no action needed
                        if let Ok(endpoint_id) = peer.endpoint_id() {
                            match transport.connect_peer(&network_peer_info).await {
                                Ok(Some(conn)) => {
                                    // Issue #346: Give the accept loop a moment to process any
                                    // incoming connection from this peer. In symmetric discovery
                                    // (both peers have each other in config), both will connect
                                    // simultaneously and the accept loop needs time to process
                                    // the incoming connection and do conflict resolution.
                                    tokio::task::yield_now().await;
                                    tokio::time::sleep(tokio::time::Duration::from_millis(10))
                                        .await;

                                    // Check if connection was closed by conflict resolution
                                    // (accept path superseded this connection).
                                    if conn.close_reason().is_some() {
                                        tracing::debug!(
                                            "Peer {} connection superseded by accept path",
                                            peer.name
                                        );
                                        continue;
                                    }

                                    // New connection - perform formation handshake
                                    match perform_initiator_handshake(&conn, &formation_key_connect)
                                        .await
                                    {
                                        Ok(()) => {
                                            tracing::info!(
                                                "Connected and authenticated with peer: {} ({}/{})",
                                                peer.name,
                                                transport.connected_peers().len(),
                                                max_connections
                                            );
                                            // Issue #346: Emit Connected AFTER successful handshake
                                            transport.emit_peer_connected(endpoint_id);
                                            made_new_connection = true;
                                        }
                                        Err(e) => {
                                            tracing::warn!(
                                                "Peer {} failed authentication: {}. Disconnecting.",
                                                peer.name,
                                                e
                                            );
                                            // Issue #346: Don't call disconnect() here - the connection
                                            // in the map might be a different one after conflict resolution.
                                            // conn.close() is sufficient; close monitor handles cleanup.
                                            conn.close(1u32.into(), b"authentication failed");
                                        }
                                    }
                                }
                                Ok(None) => {
                                    // Accept path is handling connection
                                    tracing::debug!(
                                        "Peer {} connection handled by accept path",
                                        peer.name
                                    );
                                }
                                Err(e) => {
                                    tracing::debug!(
                                        "Failed to connect to discovered peer {}: {}",
                                        peer.name,
                                        e
                                    );
                                }
                            }
                        }
                    }

                    // Adaptive backoff: stay fast while forming mesh, slow down once stable
                    if made_new_connection {
                        // Reset to fast polling when we're actively connecting
                        interval_secs = 1;
                        consecutive_no_new_connections = 0;
                    } else {
                        consecutive_no_new_connections += 1;
                        // After 3 cycles with no new connections, increase interval (max 5s)
                        if consecutive_no_new_connections >= 3 && interval_secs < 5 {
                            interval_secs = (interval_secs * 2).min(5);
                            tracing::debug!(
                                "Mesh stable, increasing connect interval to {}s",
                                interval_secs
                            );
                        }
                    }
                }
            });
        }

        Ok(())
    }

    async fn stop(&self) -> anyhow::Result<()> {
        Ok(())
    }

    async fn discovered_peers(&self) -> anyhow::Result<Vec<PeerInfo>> {
        let mut peers = Vec::new();

        // Get connected peers from transport
        let peer_ids = self.transport.connected_peers();
        for peer_id in peer_ids {
            if self.transport.get_connection(&peer_id).is_some() {
                peers.push(PeerInfo {
                    peer_id: hex::encode(peer_id.as_bytes()),
                    address: None,
                    transport: TransportType::Custom,
                    connected: true,
                    last_seen: std::time::SystemTime::now(),
                    metadata: HashMap::new(),
                });
            }
        }

        // Add discovered but not yet connected peers from discovery manager
        #[cfg(feature = "automerge-backend")]
        {
            let manager = self.discovery_manager.read().await;
            for discovered_peer in manager.get_peers().await {
                // Check if already connected
                if !peers.iter().any(|p| p.peer_id == discovered_peer.node_id) {
                    peers.push(PeerInfo {
                        peer_id: discovered_peer.node_id.clone(),
                        address: discovered_peer.addresses.first().cloned(),
                        transport: TransportType::Custom,
                        connected: false,
                        last_seen: std::time::SystemTime::now(),
                        metadata: HashMap::new(),
                    });
                }
            }
        }

        Ok(peers)
    }

    async fn add_peer(&self, address: &str, _transport: TransportType) -> anyhow::Result<()> {
        use crate::network::iroh_transport::IrohTransport;
        use crate::network::PeerInfo as NetworkPeerInfo;

        // Get formation key for authentication
        let formation_key = self
            .formation_key
            .read()
            .map_err(|_| Error::Internal("formation_key lock poisoned".into()))?
            .clone()
            .ok_or_else(|| Error::Internal("Formation key not initialized".to_string()))?;

        // Parse address format (Issue #226):
        // Format 1: "seed|hostname:port" - Derives EndpointId from seed (for containerlab)
        // Format 2: "hex_node_id" - Raw hex EndpointId (legacy static config)
        //
        // Example: "alpha-formation/node-1|192.168.1.100:9000"
        let (node_id, socket_addr) = if address.contains('|') {
            // Seed-based format: "seed|address"
            let parts: Vec<&str> = address.splitn(2, '|').collect();
            if parts.len() != 2 {
                return Err(Error::Internal(format!(
                    "Invalid address format: {}. Expected 'seed|host:port'",
                    address
                ))
                .into());
            }
            let seed = parts[0];
            let addr = parts[1];

            // Derive EndpointId from seed using deterministic key generation
            let endpoint_id = IrohTransport::endpoint_id_from_seed(seed);
            let node_id_hex = hex::encode(endpoint_id.as_bytes());

            tracing::debug!(
                seed = seed,
                node_id = %node_id_hex,
                address = addr,
                "Derived EndpointId from seed for add_peer"
            );

            (node_id_hex, addr.to_string())
        } else {
            // Legacy format: assume address is a hex-encoded EndpointId
            // (for backwards compatibility with existing static configs)
            (address.to_string(), address.to_string())
        };

        let peer_info = NetworkPeerInfo {
            name: "manual-peer".to_string(),
            node_id,
            addresses: vec![socket_addr],
            relay_url: None,
        };

        // Connect to peer (conflict resolution handled by transport layer)
        let conn_opt =
            self.transport
                .connect_peer(&peer_info)
                .await
                .map_err(|e| Error::Network {
                    message: format!("Failed to connect to peer: {}", e),
                    peer_id: None,
                    source: None,
                })?;

        // Perform formation handshake to authenticate (only if we got a new connection)
        #[cfg(feature = "automerge-backend")]
        if let Some(conn) = conn_opt {
            use crate::network::formation_handshake::perform_initiator_handshake;

            let endpoint_id = conn.remote_id();
            if let Err(e) = perform_initiator_handshake(&conn, &formation_key).await {
                // Authentication failed - close the connection
                // Issue #346: Don't call disconnect() here - the connection
                // in the map might be a different one after conflict resolution.
                // conn.close() is sufficient; close monitor handles cleanup.
                conn.close(1u32.into(), b"authentication failed");

                return Err(Error::Network {
                    message: format!("Peer authentication failed: {}", e),
                    peer_id: Some(address.to_string()),
                    source: None,
                }
                .into());
            }
            // Issue #346: Emit Connected AFTER successful handshake
            self.transport.emit_peer_connected(endpoint_id);
        }
        // If conn_opt is None, accept path is handling the connection

        Ok(())
    }

    async fn wait_for_peer(&self, peer_id: &PeerId, timeout: Duration) -> anyhow::Result<()> {
        let start = std::time::Instant::now();

        loop {
            let peers = self.discovered_peers().await?;
            if peers.iter().any(|p| &p.peer_id == peer_id) {
                return Ok(());
            }

            if start.elapsed() > timeout {
                return Err(Error::Network {
                    message: format!("Timeout waiting for peer: {}", peer_id),
                    peer_id: Some(peer_id.clone()),
                    source: None,
                }
                .into());
            }

            tokio::time::sleep(Duration::from_millis(100)).await;
        }
    }

    fn on_peer_event(&self, callback: Box<dyn Fn(PeerEvent) + Send + Sync>) {
        if let Ok(mut callbacks) = self.peer_callbacks.lock() {
            callbacks.push(callback);
        }

        // Start event forwarder on first callback registration (Issue #275)
        // Use compare_exchange to ensure we only start once
        if self
            .event_forwarder_running
            .compare_exchange(
                false,
                true,
                std::sync::atomic::Ordering::SeqCst,
                std::sync::atomic::Ordering::SeqCst,
            )
            .is_ok()
        {
            // Subscribe to transport events and forward to callbacks
            let mut rx = self.transport.subscribe_peer_events();
            let callbacks = Arc::clone(&self.peer_callbacks);
            let running = Arc::clone(&self.event_forwarder_running);

            // Spawn the forwarder task using std::thread with a tokio runtime
            // (since on_peer_event is not async)
            std::thread::spawn(move || {
                let rt = tokio::runtime::Builder::new_current_thread()
                    .enable_all()
                    .build()
                    .expect("Failed to create event forwarder runtime");

                rt.block_on(async move {
                    use crate::network::TransportPeerEvent;

                    while running.load(std::sync::atomic::Ordering::SeqCst) {
                        match tokio::time::timeout(std::time::Duration::from_millis(100), rx.recv())
                            .await
                        {
                            Ok(Some(transport_event)) => {
                                // Convert TransportPeerEvent to PeerEvent
                                let peer_event = match transport_event {
                                    TransportPeerEvent::Connected { endpoint_id, .. } => {
                                        PeerEvent::Connected(PeerInfo {
                                            peer_id: format!("{:?}", endpoint_id),
                                            address: None,
                                            transport: TransportType::Tcp, // QUIC maps to TCP for now
                                            connected: true,
                                            last_seen: std::time::SystemTime::now(),
                                            metadata: std::collections::HashMap::new(),
                                        })
                                    }
                                    TransportPeerEvent::Disconnected {
                                        endpoint_id,
                                        reason,
                                    } => PeerEvent::Disconnected {
                                        peer_id: format!("{:?}", endpoint_id),
                                        reason: Some(reason),
                                    },
                                };

                                // Invoke all callbacks
                                if let Ok(cbs) = callbacks.lock() {
                                    for cb in cbs.iter() {
                                        cb(peer_event.clone());
                                    }
                                }
                            }
                            Ok(None) => {
                                // Channel closed, stop forwarder
                                break;
                            }
                            Err(_) => {
                                // Timeout - continue to check running flag
                            }
                        }
                    }
                });
            });
        }
    }

    async fn get_peer_info(&self, peer_id: &PeerId) -> anyhow::Result<Option<PeerInfo>> {
        let peers = self.discovered_peers().await?;
        Ok(peers.into_iter().find(|p| &p.peer_id == peer_id))
    }
}

// SyncEngine implementation for AutomergeIrohBackend
struct IrohSyncEngine {
    backend: Arc<crate::storage::AutomergeBackend>,
    transport: Arc<crate::network::IrohTransport>,
    formation_key: Option<crate::security::FormationKey>,
}

#[async_trait]
impl SyncEngine for IrohSyncEngine {
    async fn start_sync(&self) -> anyhow::Result<()> {
        use crate::storage::capabilities::SyncCapable;
        self.backend.start_sync().map_err(|e| Error::Storage {
            message: format!("Failed to start sync: {}", e),
            operation: Some("start_sync".to_string()),
            key: None,
            source: None,
        })?;
        Ok(())
    }

    async fn stop_sync(&self) -> anyhow::Result<()> {
        use crate::storage::capabilities::SyncCapable;
        self.backend.stop_sync().map_err(|e| Error::Storage {
            message: format!("Failed to stop sync: {}", e),
            operation: Some("stop_sync".to_string()),
            key: None,
            source: None,
        })?;
        Ok(())
    }

    async fn subscribe(
        &self,
        collection: &str,
        _query: &Query,
    ) -> anyhow::Result<SyncSubscription> {
        Ok(SyncSubscription::new(collection, ()))
    }

    async fn is_syncing(&self) -> anyhow::Result<bool> {
        use crate::storage::capabilities::SyncCapable;
        let stats = self.backend.sync_stats().map_err(|e| Error::Storage {
            message: format!("Failed to get sync stats: {}", e),
            operation: Some("sync_stats".to_string()),
            key: None,
            source: None,
        })?;
        Ok(stats.peer_count > 0)
    }

    /// Connect to a peer using their EndpointId and addresses (Issue #235)
    ///
    /// This enables static peer configuration in containerlab and similar environments
    /// where mDNS discovery may not work across network namespaces.
    async fn connect_to_peer(
        &self,
        endpoint_id_hex: &str,
        addresses: &[String],
    ) -> anyhow::Result<bool> {
        use crate::network::PeerInfo as NetworkPeerInfo;

        // Parse the endpoint ID from hex
        let endpoint_id_bytes = hex::decode(endpoint_id_hex)
            .map_err(|e| Error::Internal(format!("Invalid endpoint_id_hex: {}", e)))?;

        if endpoint_id_bytes.len() != 32 {
            return Err(Error::Internal(format!(
                "Invalid endpoint_id_hex length: expected 32 bytes, got {}",
                endpoint_id_bytes.len()
            ))
            .into());
        }

        // Issue #346: Removed tie-breaking from sync layer
        //
        // Tie-breaking is handled by the transport layer (IrohTransport::connect).
        // For static configurations (TCP_CONNECT), we should always attempt to connect
        // when explicitly configured. The transport will return Ok(None) if we should
        // wait for the peer to connect to us, which we handle below.
        //
        // Having tie-breaking at BOTH layers caused connections to fail when:
        // - Child node (soldier) has higher EndpointId than parent (squad leader)
        // - Child's TCP_CONNECT says "connect to parent"
        // - Sync layer tie-breaking blocked the connection
        // - Parent doesn't have child in config, so never connects
        // - Result: no connection!
        let our_endpoint_id = self.transport.endpoint_id();
        let our_endpoint_hex = hex::encode(our_endpoint_id.as_bytes());

        tracing::debug!(
            our_endpoint = %our_endpoint_hex,
            peer_endpoint = %endpoint_id_hex,
            addresses = ?addresses,
            "Connecting to peer via static configuration"
        );

        // Create PeerInfo for the transport
        let peer_info = NetworkPeerInfo {
            name: format!("peer-{}", &endpoint_id_hex[..8]),
            node_id: endpoint_id_hex.to_string(),
            addresses: addresses.to_vec(),
            relay_url: None,
        };

        // Issue #346: connect_peer returns Option<Connection>
        // - Some(conn): New connection, we need to do initiator handshake
        // - None: Accept path is handling, no action needed
        match self.transport.connect_peer(&peer_info).await {
            Ok(Some(conn)) => {
                // Issue #346: Check if connection was closed by conflict resolution
                if conn.close_reason().is_some() {
                    tracing::debug!(
                        peer_endpoint = %endpoint_id_hex,
                        "Connection superseded by accept path"
                    );
                    return Ok(false);
                }

                // New connection - perform formation handshake
                if let Some(ref formation_key) = self.formation_key {
                    use crate::network::formation_handshake::perform_initiator_handshake;
                    match perform_initiator_handshake(&conn, formation_key).await {
                        Ok(()) => {
                            tracing::info!(
                                peer_endpoint = %endpoint_id_hex,
                                "Successfully connected to peer and authenticated"
                            );
                            // Issue #378: Emit peer connected event to notify sync handlers
                            if let Ok(peer_id) = peer_info.endpoint_id() {
                                self.transport.emit_peer_connected(peer_id);
                            }
                            Ok(true)
                        }
                        Err(e) => {
                            tracing::warn!(
                                peer_endpoint = %endpoint_id_hex,
                                error = %e,
                                "Peer authentication failed"
                            );
                            // Close the connection on auth failure
                            if let Ok(peer_id) = peer_info.endpoint_id() {
                                conn.close(1u32.into(), b"authentication failed");
                                self.transport.disconnect(&peer_id).ok();
                            }
                            Err(Error::Network {
                                message: format!("Peer authentication failed: {}", e),
                                peer_id: Some(endpoint_id_hex.to_string()),
                                source: None,
                            }
                            .into())
                        }
                    }
                } else {
                    // No formation key - just report connected
                    tracing::info!(
                        peer_endpoint = %endpoint_id_hex,
                        "Successfully connected to peer (no authentication)"
                    );
                    // Issue #378: Emit peer connected event to notify sync handlers
                    if let Ok(peer_id) = peer_info.endpoint_id() {
                        self.transport.emit_peer_connected(peer_id);
                    }
                    Ok(true)
                }
            }
            Ok(None) => {
                // Accept path is handling connection
                tracing::debug!(
                    peer_endpoint = %endpoint_id_hex,
                    "Connection handled by accept path"
                );
                // Return true since a connection will be established via accept path
                Ok(true)
            }
            Err(e) => {
                tracing::warn!(
                    peer_endpoint = %endpoint_id_hex,
                    error = %e,
                    "Failed to connect to peer"
                );
                Err(Error::Network {
                    message: format!("Failed to connect to peer: {}", e),
                    peer_id: Some(endpoint_id_hex.to_string()),
                    source: None,
                }
                .into())
            }
        }
    }
}

// DataSyncBackend implementation
#[async_trait]
impl DataSyncBackend for AutomergeIrohBackend {
    async fn initialize(&self, config: BackendConfig) -> anyhow::Result<()> {
        // Require shared_key for peer authentication
        let shared_key = config.shared_key.as_ref().ok_or_else(|| {
            Error::config_error(
                "AutomergeIroh backend requires PEAT_SECRET_KEY for peer authentication",
                Some("shared_key".to_string()),
            )
        })?;

        // Create FormationKey from app_id (formation_id) and shared_key
        // This ensures only peers with matching credentials can sync
        let formation_key = crate::security::FormationKey::from_base64(&config.app_id, shared_key)
            .map_err(|e| {
                Error::config_error(
                    format!(
                        "Invalid shared_key format: {}. Expected base64-encoded 32-byte key.",
                        e
                    ),
                    Some("shared_key".to_string()),
                )
            })?;

        // Store the formation key for peer authentication
        *self
            .formation_key
            .write()
            .map_err(|_| Error::Internal("formation_key lock poisoned".into()))? =
            Some(formation_key);

        *self
            .initialized
            .lock()
            .map_err(|_| Error::Internal("initialized lock poisoned".into()))? = true;
        self.peer_discovery().start().await?;
        Ok(())
    }

    async fn shutdown(&self) -> anyhow::Result<()> {
        if self.is_ready().await {
            let _ = self.sync_engine().stop_sync().await;
            let _ = self.peer_discovery().stop().await;
        }
        *self
            .initialized
            .lock()
            .map_err(|_| Error::Internal("initialized lock poisoned".into()))? = false;
        Ok(())
    }

    fn document_store(&self) -> Arc<dyn DocumentStore> {
        // Derive node ID from transport endpoint (unique per node)
        let node_id = self.transport.endpoint_id().to_string();
        Arc::new(IrohDocumentStore {
            backend: Arc::clone(&self.backend),
            deletion_policy_registry: Arc::clone(&self.deletion_policy_registry),
            lamport_counter: Arc::clone(&self.lamport_counter),
            node_id,
        })
    }

    fn peer_discovery(&self) -> Arc<dyn PeerDiscovery> {
        Arc::new(IrohPeerDiscovery {
            transport: Arc::clone(&self.transport),
            peer_callbacks: Arc::clone(&self.peer_callbacks),
            #[cfg(feature = "automerge-backend")]
            discovery_manager: Arc::clone(&self.discovery_manager),
            #[cfg(feature = "automerge-backend")]
            formation_key: Arc::clone(&self.formation_key),
            event_forwarder_running: Arc::new(std::sync::atomic::AtomicBool::new(false)),
            #[cfg(feature = "automerge-backend")]
            topology_event_rx: Arc::clone(&self.topology_event_rx),
            #[cfg(feature = "automerge-backend")]
            max_connections: self.max_connections,
        })
    }

    fn sync_engine(&self) -> Arc<dyn SyncEngine> {
        Arc::new(IrohSyncEngine {
            backend: Arc::clone(&self.backend),
            transport: Arc::clone(&self.transport),
            formation_key: self.formation_key(),
        })
    }

    async fn is_ready(&self) -> bool {
        self.initialized.lock().map(|guard| *guard).unwrap_or(false)
    }

    fn backend_info(&self) -> BackendInfo {
        BackendInfo {
            name: "AutomergeIroh".to_string(),
            version: env!("CARGO_PKG_VERSION").to_string(),
        }
    }

    fn as_any(&self) -> &dyn std::any::Any {
        self
    }
}

// Implement HierarchicalStorageCapable for AutomergeIrohBackend
// This enables peat-sim hierarchical mode with Automerge backend
#[cfg(feature = "automerge-backend")]
impl crate::storage::HierarchicalStorageCapable for AutomergeIrohBackend {
    fn summary_storage(&self) -> Arc<dyn crate::hierarchy::SummaryStorage> {
        // Delegate to the underlying storage::AutomergeBackend
        crate::storage::HierarchicalStorageCapable::summary_storage(self.backend.as_ref())
    }

    fn command_storage(&self) -> Arc<dyn crate::command::CommandStorage> {
        // Delegate to the underlying storage::AutomergeBackend
        crate::storage::HierarchicalStorageCapable::command_storage(self.backend.as_ref())
    }
}

// ============================================================================
// Custom Query Parser (Issue #517, #520)
// ============================================================================
//
// This module provides a simple pattern-based query evaluator for DQL-like
// custom queries. Instead of implementing a full SQL parser, we handle the
// specific patterns used in Peat Protocol.
//
// Supported patterns (Issue #517 - original):
// - `field == 'value'` / `field == true/false`
// - `field STARTS WITH 'prefix'`
// - `field ENDS WITH 'suffix'`
// - `CONTAINS(field, 'value')`
// - `A AND B` / `A OR B` (compound expressions)
//
// Extended patterns (Issue #520 - full syntactic parity):
// - `field != 'value'` / `field != true/false` (inequality)
// - `field LIKE '%pattern%'` (wildcard matching)
// - `field IN ['a', 'b', 'c']` (set membership)
// - `field.nested.path` (nested field access)
// - `NOT (expr)` (negation wrapper)
// - `field IS NULL` / `field IS NOT NULL` (null checks)
//
// For unrecognized patterns, we return `true` (match all) as a conservative
// fallback - this ensures we never hide documents that should match.
// ============================================================================

/// Evaluate a custom DQL-like query string against a document.
///
/// This is a pattern-based evaluator that handles the specific query patterns
/// used in Peat Protocol. For unrecognized patterns, returns `true` (conservative).
///
/// # Arguments
/// * `doc` - The document to match against
/// * `query_str` - The DQL-like query string (e.g., "collection_name == 'squad_summaries'")
///
/// # Returns
/// * `true` if the document matches the query (or query is unrecognized)
/// * `false` if the document definitely doesn't match
fn evaluate_custom_query(doc: &Document, query_str: &str) -> bool {
    let trimmed = query_str.trim();

    // Handle compound OR expressions (lowest precedence)
    // Split on " OR " but be careful not to split inside quotes
    if let Some((left, right)) = split_compound(trimmed, " OR ") {
        return evaluate_custom_query(doc, left) || evaluate_custom_query(doc, right);
    }

    // Handle compound AND expressions
    if let Some((left, right)) = split_compound(trimmed, " AND ") {
        return evaluate_custom_query(doc, left) && evaluate_custom_query(doc, right);
    }

    // Strip outer parentheses if present
    let expr = if trimmed.starts_with('(') && trimmed.ends_with(')') {
        &trimmed[1..trimmed.len() - 1]
    } else {
        trimmed
    };

    // Pattern: NOT (expr) - negation wrapper (Issue #520)
    if let Some(inner) = parse_not_expression(expr) {
        return !evaluate_custom_query(doc, inner);
    }

    // Pattern: CONTAINS(field, 'value')
    if expr.starts_with("CONTAINS(") && expr.ends_with(')') {
        return evaluate_contains(doc, expr);
    }

    // Pattern: field IS NULL / field IS NOT NULL (Issue #520)
    if let Some((field, is_null)) = parse_is_null(expr) {
        return evaluate_is_null(doc, field, is_null);
    }

    // Pattern: field != 'value' or field != true/false (Issue #520)
    // Must check before equality since != contains =
    if let Some((field, value)) = parse_inequality(expr) {
        return !evaluate_equality(doc, field, value);
    }

    // Pattern: field == 'value' or field == true/false
    if let Some((field, value)) = parse_equality(expr) {
        return evaluate_equality(doc, field, value);
    }

    // Pattern: field LIKE '%pattern%' (Issue #520)
    if let Some((field, pattern)) = parse_like(expr) {
        return evaluate_like(doc, field, pattern);
    }

    // Pattern: field IN ['a', 'b', 'c'] (Issue #520)
    if let Some((field, values)) = parse_in(expr) {
        return evaluate_in(doc, field, &values);
    }

    // Pattern: field STARTS WITH 'prefix'
    if let Some((field, prefix)) = parse_starts_with(expr) {
        return evaluate_starts_with(doc, field, prefix);
    }

    // Pattern: field ENDS WITH 'suffix'
    if let Some((field, suffix)) = parse_ends_with(expr) {
        return evaluate_ends_with(doc, field, suffix);
    }

    // Unrecognized pattern: return true (conservative fallback)
    // This ensures we never hide documents that should match
    true
}

/// Split a compound expression on a delimiter, respecting parentheses and quotes.
fn split_compound<'a>(expr: &'a str, delimiter: &str) -> Option<(&'a str, &'a str)> {
    let mut depth = 0;
    let mut in_quote = false;
    let bytes = expr.as_bytes();

    for i in 0..expr.len() {
        match bytes[i] {
            b'\'' => in_quote = !in_quote,
            b'(' if !in_quote => depth += 1,
            b')' if !in_quote => depth -= 1,
            _ if !in_quote && depth == 0 && expr[i..].starts_with(delimiter) => {
                return Some((&expr[..i], &expr[i + delimiter.len()..]));
            }
            _ => {}
        }
    }
    None
}

/// Parse equality expression: `field == 'value'` or `field == true/false`
fn parse_equality(expr: &str) -> Option<(&str, &str)> {
    let parts: Vec<&str> = expr.splitn(2, "==").collect();
    if parts.len() == 2 {
        let field = parts[0].trim();
        let value = parts[1].trim();
        Some((field, value))
    } else {
        None
    }
}

/// Parse STARTS WITH expression: `field STARTS WITH 'prefix'`
fn parse_starts_with(expr: &str) -> Option<(&str, &str)> {
    let upper = expr.to_uppercase();
    if let Some(idx) = upper.find(" STARTS WITH ") {
        let field = expr[..idx].trim();
        let value = expr[idx + 13..].trim(); // " STARTS WITH " is 13 chars
        Some((field, value))
    } else {
        None
    }
}

/// Parse ENDS WITH expression: `field ENDS WITH 'suffix'`
fn parse_ends_with(expr: &str) -> Option<(&str, &str)> {
    let upper = expr.to_uppercase();
    if let Some(idx) = upper.find(" ENDS WITH ") {
        let field = expr[..idx].trim();
        let value = expr[idx + 11..].trim(); // " ENDS WITH " is 11 chars
        Some((field, value))
    } else {
        None
    }
}

/// Extract string literal from quoted value: 'value' -> value
fn extract_string_literal(value: &str) -> Option<&str> {
    let trimmed = value.trim();
    if trimmed.starts_with('\'') && trimmed.ends_with('\'') && trimmed.len() >= 2 {
        Some(&trimmed[1..trimmed.len() - 1])
    } else {
        None
    }
}

/// Evaluate CONTAINS(field, 'value') pattern
fn evaluate_contains(doc: &Document, expr: &str) -> bool {
    // Parse CONTAINS(field, 'value')
    let inner = &expr[9..expr.len() - 1]; // Strip "CONTAINS(" and ")"
    let parts: Vec<&str> = inner.splitn(2, ',').collect();

    if parts.len() != 2 {
        return true; // Conservative fallback
    }

    let field = parts[0].trim();
    let value = parts[1].trim();

    let search_value = match extract_string_literal(value) {
        Some(v) => v,
        None => return true, // Conservative fallback
    };

    // Check if field value contains the search value
    match doc.get(field) {
        Some(serde_json::Value::Array(arr)) => arr.iter().any(|item| {
            if let Some(s) = item.as_str() {
                s == search_value
            } else {
                false
            }
        }),
        Some(serde_json::Value::String(s)) => s.contains(search_value),
        _ => false,
    }
}

/// Evaluate field == value pattern
/// Supports nested field access via get_nested_field (Issue #520)
fn evaluate_equality(doc: &Document, field: &str, value: &str) -> bool {
    // Handle boolean values
    if value == "true" {
        return get_nested_field(doc, field)
            .and_then(|v| v.as_bool())
            .unwrap_or(false);
    }
    if value == "false" {
        return !get_nested_field(doc, field)
            .and_then(|v| v.as_bool())
            .unwrap_or(true);
    }

    // Handle string literals
    if let Some(string_value) = extract_string_literal(value) {
        return match get_nested_field(doc, field) {
            Some(serde_json::Value::String(s)) => s == string_value,
            _ => false,
        };
    }

    // Handle numeric values (try to parse as number)
    if let Ok(num) = value.parse::<i64>() {
        return match get_nested_field(doc, field) {
            Some(serde_json::Value::Number(n)) => n.as_i64() == Some(num),
            _ => false,
        };
    }
    if let Ok(num) = value.parse::<f64>() {
        return match get_nested_field(doc, field) {
            Some(serde_json::Value::Number(n)) => n
                .as_f64()
                .map(|f| (f - num).abs() < f64::EPSILON)
                .unwrap_or(false),
            _ => false,
        };
    }

    // Unknown value format, conservative fallback
    true
}

/// Evaluate field STARTS WITH 'prefix' pattern
fn evaluate_starts_with(doc: &Document, field: &str, value: &str) -> bool {
    let prefix = match extract_string_literal(value) {
        Some(v) => v,
        None => return true, // Conservative fallback
    };

    match doc.get(field) {
        Some(serde_json::Value::String(s)) => s.starts_with(prefix),
        _ => false,
    }
}

/// Evaluate field ENDS WITH 'suffix' pattern
fn evaluate_ends_with(doc: &Document, field: &str, value: &str) -> bool {
    let suffix = match extract_string_literal(value) {
        Some(v) => v,
        None => return true, // Conservative fallback
    };

    match doc.get(field) {
        Some(serde_json::Value::String(s)) => s.ends_with(suffix),
        _ => false,
    }
}

// ============================================================================
// Issue #520: Extended DQL patterns for full syntactic parity
// ============================================================================

/// Parse inequality expression: `field != 'value'` or `field != true/false`
fn parse_inequality(expr: &str) -> Option<(&str, &str)> {
    // Look for != operator
    if let Some(idx) = expr.find("!=") {
        let field = expr[..idx].trim();
        let value = expr[idx + 2..].trim();
        // Make sure this isn't part of == (shouldn't happen, but be safe)
        if !field.is_empty() && !value.is_empty() {
            return Some((field, value));
        }
    }
    None
}

/// Parse NOT expression: `NOT (expr)` or `NOT expr`
fn parse_not_expression(expr: &str) -> Option<&str> {
    let upper = expr.to_uppercase();
    if upper.starts_with("NOT ") {
        let rest = expr[4..].trim();
        // If wrapped in parens, strip them
        if rest.starts_with('(') && rest.ends_with(')') {
            Some(&rest[1..rest.len() - 1])
        } else {
            Some(rest)
        }
    } else {
        None
    }
}

/// Parse IS NULL / IS NOT NULL expression
fn parse_is_null(expr: &str) -> Option<(&str, bool)> {
    let upper = expr.to_uppercase();
    if let Some(idx) = upper.find(" IS NOT NULL") {
        let field = expr[..idx].trim();
        return Some((field, false)); // is_null = false means IS NOT NULL
    }
    if let Some(idx) = upper.find(" IS NULL") {
        let field = expr[..idx].trim();
        return Some((field, true)); // is_null = true means IS NULL
    }
    None
}

/// Evaluate IS NULL / IS NOT NULL pattern
fn evaluate_is_null(doc: &Document, field: &str, is_null: bool) -> bool {
    let field_value = get_nested_field(doc, field);
    let value_is_null = field_value.is_none() || field_value == Some(&serde_json::Value::Null);
    if is_null {
        value_is_null
    } else {
        !value_is_null
    }
}

/// Parse LIKE expression: `field LIKE '%pattern%'`
fn parse_like(expr: &str) -> Option<(&str, &str)> {
    let upper = expr.to_uppercase();
    if let Some(idx) = upper.find(" LIKE ") {
        let field = expr[..idx].trim();
        let pattern = expr[idx + 6..].trim(); // " LIKE " is 6 chars
        Some((field, pattern))
    } else {
        None
    }
}

/// Evaluate LIKE pattern with % wildcards
fn evaluate_like(doc: &Document, field: &str, pattern: &str) -> bool {
    let pattern_str = match extract_string_literal(pattern) {
        Some(v) => v,
        None => return true, // Conservative fallback
    };

    let field_value = match get_nested_field(doc, field) {
        Some(serde_json::Value::String(s)) => s.as_str(),
        _ => return false,
    };

    // Convert SQL LIKE pattern to simple matching
    // % matches any sequence of characters
    // _ matches any single character (not implemented for simplicity)
    match_like_pattern(field_value, pattern_str)
}

/// Match a value against a SQL LIKE pattern with % wildcards
fn match_like_pattern(value: &str, pattern: &str) -> bool {
    // Split pattern by % and match segments
    let segments: Vec<&str> = pattern.split('%').collect();

    if segments.is_empty() {
        return true;
    }

    // Handle patterns like '%', '%%', etc.
    if segments.iter().all(|s| s.is_empty()) {
        return true;
    }

    let mut pos = 0;
    let starts_with_wildcard = pattern.starts_with('%');
    let ends_with_wildcard = pattern.ends_with('%');

    for (i, segment) in segments.iter().enumerate() {
        if segment.is_empty() {
            continue;
        }

        if i == 0 && !starts_with_wildcard {
            // First segment must match at start
            if !value.starts_with(segment) {
                return false;
            }
            pos = segment.len();
        } else if i == segments.len() - 1 && !ends_with_wildcard {
            // Last segment must match at end
            if !value.ends_with(segment) {
                return false;
            }
        } else {
            // Middle segment - find it anywhere after current position
            if let Some(found_pos) = value[pos..].find(segment) {
                pos += found_pos + segment.len();
            } else {
                return false;
            }
        }
    }

    true
}

/// Parse IN expression: `field IN ['a', 'b', 'c']`
fn parse_in(expr: &str) -> Option<(&str, Vec<String>)> {
    let upper = expr.to_uppercase();
    if let Some(idx) = upper.find(" IN ") {
        let field = expr[..idx].trim();
        let values_str = expr[idx + 4..].trim(); // " IN " is 4 chars

        // Parse the array: ['a', 'b', 'c'] or [1, 2, 3]
        if values_str.starts_with('[') && values_str.ends_with(']') {
            let inner = &values_str[1..values_str.len() - 1];
            let values: Vec<String> = inner
                .split(',')
                .map(|v| {
                    let trimmed = v.trim();
                    // Extract string literal or use as-is for numbers
                    if let Some(s) = extract_string_literal(trimmed) {
                        s.to_string()
                    } else {
                        trimmed.to_string()
                    }
                })
                .collect();
            return Some((field, values));
        }
    }
    None
}

/// Evaluate IN pattern for set membership
fn evaluate_in(doc: &Document, field: &str, values: &[String]) -> bool {
    let field_value = match get_nested_field(doc, field) {
        Some(v) => v,
        None => return false,
    };

    match field_value {
        serde_json::Value::String(s) => values.iter().any(|v| v == s),
        serde_json::Value::Number(n) => {
            if let Some(i) = n.as_i64() {
                values.iter().any(|v| v.parse::<i64>().ok() == Some(i))
            } else if let Some(f) = n.as_f64() {
                values.iter().any(|v| {
                    v.parse::<f64>()
                        .ok()
                        .map(|vf| (vf - f).abs() < f64::EPSILON)
                        == Some(true)
                })
            } else {
                false
            }
        }
        serde_json::Value::Bool(b) => {
            let bool_str = if *b { "true" } else { "false" };
            values.iter().any(|v| v == bool_str)
        }
        _ => false,
    }
}

/// Get a potentially nested field value from a document
/// Supports both simple fields ("name") and nested paths ("address.city")
fn get_nested_field<'a>(doc: &'a Document, field: &str) -> Option<&'a serde_json::Value> {
    if !field.contains('.') {
        // Simple field access
        return doc.get(field);
    }

    // Nested field access: field.subfield.subsubfield
    let parts: Vec<&str> = field.split('.').collect();
    let mut current = doc.get(parts[0])?;

    for part in &parts[1..] {
        match current {
            serde_json::Value::Object(obj) => {
                current = obj.get(*part)?;
            }
            _ => return None,
        }
    }

    Some(current)
}

// Helper function for query matching
fn matches_query(doc: &Document, query: &Query) -> bool {
    match query {
        Query::All => true,
        Query::Eq { field, value } => {
            // Special case for "id" field - check doc.id instead of doc.fields
            if field == "id" {
                if let Some(ref doc_id) = doc.id {
                    if let Some(value_str) = value.as_str() {
                        return doc_id == value_str;
                    }
                }
                return false;
            }
            doc.get(field) == Some(value)
        }
        Query::Lt { field, value } => {
            if let Some(doc_val) = doc.get(field) {
                compare_values(doc_val, value) < 0
            } else {
                false
            }
        }
        Query::Gt { field, value } => {
            if let Some(doc_val) = doc.get(field) {
                compare_values(doc_val, value) > 0
            } else {
                false
            }
        }
        Query::And(queries) => queries.iter().all(|q| matches_query(doc, q)),
        Query::Or(queries) => queries.iter().any(|q| matches_query(doc, q)),

        // === Custom query support (Issue #517) ===
        // Evaluate DQL-like custom queries using pattern-based parser
        Query::Custom(query_str) => evaluate_custom_query(doc, query_str),

        // === Spatial queries (Issue #356) ===
        Query::WithinRadius {
            center,
            radius_meters,
            lat_field,
            lon_field,
        } => {
            let lat_key = lat_field.as_deref().unwrap_or("lat");
            let lon_key = lon_field.as_deref().unwrap_or("lon");

            if let (Some(lat_val), Some(lon_val)) = (
                doc.get(lat_key).and_then(|v| v.as_f64()),
                doc.get(lon_key).and_then(|v| v.as_f64()),
            ) {
                let doc_point = GeoPoint::new(lat_val, lon_val);
                doc_point.within_radius(center, *radius_meters)
            } else {
                false
            }
        }

        Query::WithinBounds {
            min,
            max,
            lat_field,
            lon_field,
        } => {
            let lat_key = lat_field.as_deref().unwrap_or("lat");
            let lon_key = lon_field.as_deref().unwrap_or("lon");

            if let (Some(lat_val), Some(lon_val)) = (
                doc.get(lat_key).and_then(|v| v.as_f64()),
                doc.get(lon_key).and_then(|v| v.as_f64()),
            ) {
                let doc_point = GeoPoint::new(lat_val, lon_val);
                doc_point.within_bounds(min, max)
            } else {
                false
            }
        }

        // === Negation query (Issue #357) ===
        Query::Not(inner) => !matches_query(doc, inner),

        // === Deletion-aware queries (ADR-034, Issue #369) ===
        Query::IncludeDeleted(inner) => {
            // IncludeDeleted wraps another query - run the inner query
            // The soft-delete filter bypass is handled at the query() method level
            matches_query(doc, inner)
        }

        Query::DeletedOnly => {
            // Only match documents with _deleted=true
            doc.fields
                .get("_deleted")
                .and_then(|v| v.as_bool())
                .unwrap_or(false)
        }
    }
}

fn compare_values(a: &serde_json::Value, b: &serde_json::Value) -> i32 {
    use serde_json::Value as V;

    match (a, b) {
        (V::Number(n1), V::Number(n2)) => {
            if let (Some(f1), Some(f2)) = (n1.as_f64(), n2.as_f64()) {
                if f1 < f2 {
                    -1
                } else if f1 > f2 {
                    1
                } else {
                    0
                }
            } else {
                0
            }
        }
        (V::String(s1), V::String(s2)) => s1.cmp(s2) as i32,
        _ => 0,
    }
}

#[cfg(test)]
mod tests {
    use super::*;
    use std::collections::HashMap;
    use std::path::PathBuf;

    /// Helper: Create test BackendConfig with valid credentials
    fn test_config() -> BackendConfig {
        // Generate a valid test secret key (base64-encoded 32 bytes)
        let test_secret = crate::security::FormationKey::generate_secret();
        BackendConfig {
            app_id: "test_app".to_string(),
            persistence_dir: PathBuf::from("/tmp/automerge_test"),
            shared_key: Some(test_secret),
            transport: TransportConfig::default(),
            extra: HashMap::new(),
        }
    }

    #[tokio::test]
    async fn test_automerge_backend_creation() {
        let backend = AutomergeBackend::new();
        assert!(!backend.is_ready().await);
    }

    #[tokio::test]
    async fn test_document_upsert() {
        let backend = AutomergeBackend::new();
        backend.initialize(test_config()).await.unwrap();

        let mut fields = HashMap::new();
        fields.insert("name".to_string(), serde_json::json!("test"));
        fields.insert("value".to_string(), serde_json::json!(42));

        let doc = Document::new(fields);
        let doc_id = backend
            .document_store()
            .upsert("test_collection", doc)
            .await
            .unwrap();

        assert!(!doc_id.is_empty());
    }

    #[tokio::test]
    async fn test_document_query() {
        let backend = AutomergeBackend::new();
        backend.initialize(test_config()).await.unwrap();

        // Insert test document
        let mut fields = HashMap::new();
        fields.insert("status".to_string(), serde_json::json!("active"));
        let doc = Document::new(fields);
        backend
            .document_store()
            .upsert("test_collection", doc)
            .await
            .unwrap();

        // Query
        let query = Query::Eq {
            field: "status".to_string(),
            value: serde_json::json!("active"),
        };

        let results = backend
            .document_store()
            .query("test_collection", &query)
            .await
            .unwrap();

        assert_eq!(results.len(), 1);
    }

    #[tokio::test]
    async fn test_document_get() {
        let backend = AutomergeBackend::new();
        backend.initialize(test_config()).await.unwrap();

        // Insert document
        let mut fields = HashMap::new();
        fields.insert("data".to_string(), serde_json::json!("test_value"));
        let doc = Document::new(fields);
        let doc_id = backend
            .document_store()
            .upsert("test_coll", doc)
            .await
            .unwrap();

        // Get document
        let retrieved = backend
            .document_store()
            .get("test_coll", &doc_id)
            .await
            .unwrap();

        assert!(retrieved.is_some());
        let retrieved_doc = retrieved.unwrap();
        assert_eq!(
            retrieved_doc.fields.get("data").unwrap(),
            &serde_json::json!("test_value")
        );
    }

    #[tokio::test]
    async fn test_document_remove() {
        let backend = AutomergeBackend::new();
        backend.initialize(test_config()).await.unwrap();

        // Insert document
        let mut fields = HashMap::new();
        fields.insert("temp".to_string(), serde_json::json!(true));
        let doc = Document::new(fields);
        let doc_id = backend
            .document_store()
            .upsert("temp_coll", doc)
            .await
            .unwrap();

        // Remove document
        backend
            .document_store()
            .remove("temp_coll", &doc_id)
            .await
            .unwrap();

        // Verify removed
        let retrieved = backend
            .document_store()
            .get("temp_coll", &doc_id)
            .await
            .unwrap();

        assert!(retrieved.is_none());
    }
}

/// Tests for AutomergeIrohBackend credential requirements
#[cfg(all(test, feature = "automerge-backend"))]
mod iroh_credential_tests {
    use super::*;
    use std::collections::HashMap;
    use std::path::PathBuf;

    /// Test that AutomergeIrohBackend initialization fails without shared_key
    #[tokio::test]
    async fn test_automerge_iroh_requires_credentials() {
        // Create backend components
        let temp_dir = tempfile::tempdir().unwrap();
        let store = Arc::new(crate::storage::AutomergeStore::open(temp_dir.path()).unwrap());
        let transport = Arc::new(crate::network::IrohTransport::new().await.unwrap());

        let backend = AutomergeIrohBackend::from_parts(store, transport);

        // Config without shared_key should fail
        let config = BackendConfig {
            app_id: "test_app".to_string(),
            persistence_dir: PathBuf::from("/tmp/test"),
            shared_key: None, // Missing!
            transport: TransportConfig::default(),
            extra: HashMap::new(),
        };

        let result = backend.initialize(config).await;
        assert!(result.is_err());

        let error = result.unwrap_err();
        let error_msg = error.to_string();
        assert!(
            error_msg.contains("PEAT_SECRET_KEY") || error_msg.contains("shared_key"),
            "Error should mention missing credentials: {}",
            error_msg
        );
    }

    /// Test that AutomergeIrohBackend initializes successfully with valid credentials
    #[tokio::test]
    async fn test_automerge_iroh_with_valid_credentials() {
        // Create backend components
        let temp_dir = tempfile::tempdir().unwrap();
        let store = Arc::new(crate::storage::AutomergeStore::open(temp_dir.path()).unwrap());
        let transport = Arc::new(crate::network::IrohTransport::new().await.unwrap());

        let backend = AutomergeIrohBackend::from_parts(store, transport);

        // Generate valid test credentials
        let test_secret = crate::security::FormationKey::generate_secret();

        let config = BackendConfig {
            app_id: "test_formation".to_string(),
            persistence_dir: temp_dir.path().to_path_buf(),
            shared_key: Some(test_secret),
            transport: TransportConfig::default(),
            extra: HashMap::new(),
        };

        let result = backend.initialize(config).await;
        assert!(result.is_ok(), "Should initialize with valid credentials");

        // Verify formation key was stored
        let formation_key = backend.formation_key();
        assert!(
            formation_key.is_some(),
            "Formation key should be set after initialization"
        );
        assert_eq!(
            formation_key.unwrap().formation_id(),
            "test_formation",
            "Formation ID should match app_id"
        );
    }

    /// Test that invalid shared_key format is rejected
    #[tokio::test]
    async fn test_automerge_iroh_rejects_invalid_key_format() {
        // Create backend components
        let temp_dir = tempfile::tempdir().unwrap();
        let store = Arc::new(crate::storage::AutomergeStore::open(temp_dir.path()).unwrap());
        let transport = Arc::new(crate::network::IrohTransport::new().await.unwrap());

        let backend = AutomergeIrohBackend::from_parts(store, transport);

        // Invalid base64 key
        let config = BackendConfig {
            app_id: "test_app".to_string(),
            persistence_dir: PathBuf::from("/tmp/test"),
            shared_key: Some("not-valid-base64!!!".to_string()),
            transport: TransportConfig::default(),
            extra: HashMap::new(),
        };

        let result = backend.initialize(config).await;
        assert!(result.is_err(), "Should reject invalid base64 key");

        let error_msg = result.unwrap_err().to_string();
        assert!(
            error_msg.contains("Invalid shared_key format"),
            "Error should mention invalid format: {}",
            error_msg
        );
    }
}

/// Tests for Issue #271: Verify Clone correctly shares transport instance
#[cfg(all(test, feature = "automerge-backend"))]
mod issue_271_clone_tests {
    use super::*;

    /// Test that cloning AutomergeIrohBackend shares the same transport Arc
    ///
    /// Issue #271: When cloning AutomergeIrohBackend, the transport should be
    /// shared (same Arc pointer), not duplicated. This ensures connections
    /// accumulate correctly across all references to the backend.
    #[tokio::test]
    async fn test_clone_shares_transport_arc() {
        // Create backend components
        let temp_dir = tempfile::tempdir().unwrap();
        let store = Arc::new(crate::storage::AutomergeStore::open(temp_dir.path()).unwrap());
        let transport = Arc::new(crate::network::IrohTransport::new().await.unwrap());

        let original = AutomergeIrohBackend::from_parts(store, Arc::clone(&transport));
        let cloned = original.clone();

        // Verify transport Arc is shared (same pointer)
        let original_transport_ptr = Arc::as_ptr(&original.transport());
        let cloned_transport_ptr = Arc::as_ptr(&cloned.transport());

        assert_eq!(
            original_transport_ptr, cloned_transport_ptr,
            "Clone should share the same transport Arc, but got different pointers:\n  Original: {:?}\n  Clone: {:?}",
            original_transport_ptr, cloned_transport_ptr
        );

        // Verify both point to the same transport as the original Arc
        let source_transport_ptr = Arc::as_ptr(&transport);
        assert_eq!(
            original_transport_ptr, source_transport_ptr,
            "Original backend transport should be same as source transport Arc"
        );
    }

    /// Test that cloning AutomergeIrohBackend shares the same backend Arc
    #[tokio::test]
    async fn test_clone_shares_backend_arc() {
        let temp_dir = tempfile::tempdir().unwrap();
        let store = Arc::new(crate::storage::AutomergeStore::open(temp_dir.path()).unwrap());
        let transport = Arc::new(crate::network::IrohTransport::new().await.unwrap());

        let original = AutomergeIrohBackend::from_parts(store, transport);
        let cloned = original.clone();

        // Verify backend Arc is shared (same pointer)
        // We need to access the internal backend field - using a helper method
        // Since backend is private, we verify via behavior: both should see same endpoint_id
        assert_eq!(
            original.endpoint_id(),
            cloned.endpoint_id(),
            "Clone should have same endpoint_id as original"
        );
    }

    /// Test that transport peer_count is consistent across clone
    ///
    /// This verifies that if connections are managed via one reference,
    /// they are visible via the clone (because they share the same transport).
    #[tokio::test]
    async fn test_clone_shares_peer_count() {
        let temp_dir = tempfile::tempdir().unwrap();
        let store = Arc::new(crate::storage::AutomergeStore::open(temp_dir.path()).unwrap());
        let transport = Arc::new(crate::network::IrohTransport::new().await.unwrap());

        let original = AutomergeIrohBackend::from_parts(store, Arc::clone(&transport));
        let cloned = original.clone();

        // Both should report the same peer count (0 initially)
        let original_count = original.transport().peer_count();
        let cloned_count = cloned.transport().peer_count();

        assert_eq!(
            original_count, cloned_count,
            "Original and clone should report same peer_count"
        );
        assert_eq!(original_count, 0, "Initial peer count should be 0");

        // Verify via source transport as well
        assert_eq!(
            transport.peer_count(),
            original_count,
            "Source transport should have same count"
        );
    }

    /// Test that formation_key is shared across clone
    #[tokio::test]
    async fn test_clone_shares_formation_key() {
        let temp_dir = tempfile::tempdir().unwrap();
        let store = Arc::new(crate::storage::AutomergeStore::open(temp_dir.path()).unwrap());
        let transport = Arc::new(crate::network::IrohTransport::new().await.unwrap());

        let original = AutomergeIrohBackend::from_parts(store, transport);

        // Initialize with credentials
        let test_secret = crate::security::FormationKey::generate_secret();
        let config = BackendConfig {
            app_id: "test_formation".to_string(),
            persistence_dir: temp_dir.path().to_path_buf(),
            shared_key: Some(test_secret),
            transport: TransportConfig::default(),
            extra: std::collections::HashMap::new(),
        };
        original.initialize(config).await.unwrap();

        // Clone after initialization
        let cloned = original.clone();

        // Both should see the formation key
        let original_key = original.formation_key();
        let cloned_key = cloned.formation_key();

        assert!(original_key.is_some(), "Original should have formation key");
        assert!(cloned_key.is_some(), "Clone should have formation key");
        assert_eq!(
            original_key.as_ref().map(|k| k.formation_id()),
            cloned_key.as_ref().map(|k| k.formation_id()),
            "Clone should share same formation key"
        );
    }

    /// Test that initialized state is shared across clone
    #[tokio::test]
    async fn test_clone_shares_initialized_state() {
        let temp_dir = tempfile::tempdir().unwrap();
        let store = Arc::new(crate::storage::AutomergeStore::open(temp_dir.path()).unwrap());
        let transport = Arc::new(crate::network::IrohTransport::new().await.unwrap());

        let original = AutomergeIrohBackend::from_parts(store, transport);

        // Before initialization
        let cloned_before = original.clone();
        assert!(
            !original.is_ready().await,
            "Original should not be ready before init"
        );
        assert!(
            !cloned_before.is_ready().await,
            "Clone should not be ready before init"
        );

        // Initialize original
        let test_secret = crate::security::FormationKey::generate_secret();
        let config = BackendConfig {
            app_id: "test_formation".to_string(),
            persistence_dir: temp_dir.path().to_path_buf(),
            shared_key: Some(test_secret),
            transport: TransportConfig::default(),
            extra: std::collections::HashMap::new(),
        };
        original.initialize(config).await.unwrap();

        // Clone created before init should NOW see it as ready
        // (because initialized flag is in shared Arc<Mutex<bool>>)
        assert!(
            original.is_ready().await,
            "Original should be ready after init"
        );
        assert!(
            cloned_before.is_ready().await,
            "Clone (created before init) should also be ready, proving Arc is shared"
        );
    }

    // === Deletion Tests (ADR-034) ===

    fn deletion_test_config() -> BackendConfig {
        let test_secret = crate::security::FormationKey::generate_secret();
        BackendConfig {
            app_id: "deletion_test".to_string(),
            persistence_dir: std::path::PathBuf::from("/tmp/deletion_test"),
            shared_key: Some(test_secret),
            transport: TransportConfig::default(),
            extra: HashMap::new(),
        }
    }

    #[tokio::test]
    async fn test_soft_delete() {
        let backend = AutomergeBackend::new();
        backend.initialize(deletion_test_config()).await.unwrap();

        // Insert document
        let mut fields = HashMap::new();
        fields.insert("data".to_string(), serde_json::json!("test_value"));
        let doc = Document::new(fields);
        let doc_id = backend
            .document_store()
            .upsert("test_collection", doc)
            .await
            .unwrap();

        // Verify document exists
        let retrieved = backend
            .document_store()
            .get("test_collection", &doc_id)
            .await
            .unwrap();
        assert!(retrieved.is_some());
        assert!(!backend
            .document_store()
            .is_deleted("test_collection", &doc_id)
            .await
            .unwrap());

        // Delete (default policy is SoftDelete)
        let result = backend
            .document_store()
            .delete("test_collection", &doc_id, Some("test deletion"))
            .await
            .unwrap();
        assert!(result.deleted);

        // Document should now be marked as deleted
        assert!(backend
            .document_store()
            .is_deleted("test_collection", &doc_id)
            .await
            .unwrap());

        // Document should still exist (soft delete preserves it)
        let deleted_doc = backend
            .document_store()
            .get("test_collection", &doc_id)
            .await
            .unwrap();
        assert!(deleted_doc.is_some());
        let deleted_doc = deleted_doc.unwrap();
        assert_eq!(
            deleted_doc.fields.get("_deleted"),
            Some(&serde_json::json!(true))
        );
        assert!(deleted_doc.fields.contains_key("_deleted_at"));
        assert_eq!(
            deleted_doc.fields.get("_deleted_reason"),
            Some(&serde_json::json!("test deletion"))
        );
    }

    #[tokio::test]
    async fn test_tombstone_delete() {
        let backend = AutomergeBackend::new();
        backend.initialize(deletion_test_config()).await.unwrap();

        // Configure tombstone policy for this collection
        backend.deletion_policy_registry.set(
            "tombstone_collection",
            crate::qos::DeletionPolicy::Tombstone {
                tombstone_ttl: std::time::Duration::from_secs(3600),
                delete_wins: true,
            },
        );

        // Insert document
        let mut fields = HashMap::new();
        fields.insert("data".to_string(), serde_json::json!("tombstone_test"));
        let doc = Document::new(fields);
        let doc_id = backend
            .document_store()
            .upsert("tombstone_collection", doc)
            .await
            .unwrap();

        // Delete with tombstone policy
        let result = backend
            .document_store()
            .delete("tombstone_collection", &doc_id, Some("removed"))
            .await
            .unwrap();
        assert!(result.deleted);
        assert!(result.tombstone_id.is_some());
        assert!(result.expires_at.is_some());

        // Document should be deleted
        assert!(backend
            .document_store()
            .is_deleted("tombstone_collection", &doc_id)
            .await
            .unwrap());

        // Document should be removed (not just marked)
        let removed_doc = backend
            .document_store()
            .get("tombstone_collection", &doc_id)
            .await
            .unwrap();
        assert!(removed_doc.is_none());

        // Tombstone should exist with real node ID and lamport (Issue #668)
        let tombstones = backend
            .document_store()
            .get_tombstones("tombstone_collection")
            .await
            .unwrap();
        assert_eq!(tombstones.len(), 1);
        assert_eq!(tombstones[0].document_id, doc_id);
        assert_eq!(tombstones[0].reason, Some("removed".to_string()));
        // After initialize(), node_id should be app_id from config
        assert_eq!(tombstones[0].deleted_by, "deletion_test");
        // First delete should get lamport=0
        assert_eq!(tombstones[0].lamport, 0);
    }

    #[tokio::test]
    async fn test_deletion_policy() {
        let backend = AutomergeBackend::new();

        // Default policy is SoftDelete
        let policy = backend
            .document_store()
            .deletion_policy("unknown_collection");
        assert!(matches!(
            policy,
            crate::qos::DeletionPolicy::SoftDelete { .. }
        ));

        // Verify default policies for known collections
        assert!(matches!(
            backend.document_store().deletion_policy("beacons"),
            crate::qos::DeletionPolicy::ImplicitTTL { .. }
        ));
        assert!(matches!(
            backend.document_store().deletion_policy("nodes"),
            crate::qos::DeletionPolicy::Tombstone { .. }
        ));
        assert!(matches!(
            backend.document_store().deletion_policy("contact_reports"),
            crate::qos::DeletionPolicy::SoftDelete { .. }
        ));
    }

    #[tokio::test]
    async fn test_apply_tombstone() {
        let backend = AutomergeBackend::new();
        backend.initialize(deletion_test_config()).await.unwrap();

        // Insert document
        let mut fields = HashMap::new();
        fields.insert("data".to_string(), serde_json::json!("to_be_deleted"));
        let doc = Document::new(fields);
        let doc_id = backend
            .document_store()
            .upsert("sync_test", doc)
            .await
            .unwrap();

        // Create a tombstone (simulating receiving from sync)
        let tombstone = crate::qos::Tombstone::with_reason(
            doc_id.clone(),
            "sync_test".to_string(),
            "remote_node".to_string(),
            1, // Lamport timestamp
            "synced deletion",
        );

        // Apply tombstone
        backend
            .document_store()
            .apply_tombstone(&tombstone)
            .await
            .unwrap();

        // Document should be deleted
        assert!(backend
            .document_store()
            .is_deleted("sync_test", &doc_id)
            .await
            .unwrap());

        // Document should be removed
        let removed_doc = backend
            .document_store()
            .get("sync_test", &doc_id)
            .await
            .unwrap();
        assert!(removed_doc.is_none());
    }

    // === Issue #668: Lamport, Node ID, Pending Tombstones, GC Tests ===

    #[tokio::test]
    async fn test_delete_increments_lamport() {
        let backend = AutomergeBackend::new();
        backend.initialize(deletion_test_config()).await.unwrap();
        backend.deletion_policy_registry.set(
            "nodes",
            crate::qos::DeletionPolicy::Tombstone {
                tombstone_ttl: std::time::Duration::from_secs(3600),
                delete_wins: true,
            },
        );

        // Insert two documents
        let doc1 = Document::new(HashMap::from([("x".to_string(), serde_json::json!(1))]));
        let doc2 = Document::new(HashMap::from([("x".to_string(), serde_json::json!(2))]));
        let id1 = backend
            .document_store()
            .upsert("nodes", doc1)
            .await
            .unwrap();
        let id2 = backend
            .document_store()
            .upsert("nodes", doc2)
            .await
            .unwrap();

        // Delete both
        backend
            .document_store()
            .delete("nodes", &id1, None)
            .await
            .unwrap();
        backend
            .document_store()
            .delete("nodes", &id2, None)
            .await
            .unwrap();

        // Verify monotonic lamport
        let tombstones = backend
            .document_store()
            .get_tombstones("nodes")
            .await
            .unwrap();
        assert_eq!(tombstones.len(), 2);
        let lamports: Vec<u64> = tombstones.iter().map(|t| t.lamport).collect();
        assert!(
            lamports.contains(&0) && lamports.contains(&1),
            "Expected lamport 0 and 1, got {:?}",
            lamports
        );
    }

    #[tokio::test]
    async fn test_delete_uses_config_node_id() {
        let backend = AutomergeBackend::new();

        // Before initialization, node_id falls back to "local"
        backend.deletion_policy_registry.set(
            "test_coll",
            crate::qos::DeletionPolicy::Tombstone {
                tombstone_ttl: std::time::Duration::from_secs(3600),
                delete_wins: true,
            },
        );
        let doc = Document::new(HashMap::from([("x".to_string(), serde_json::json!(1))]));
        let id = backend
            .document_store()
            .upsert("test_coll", doc)
            .await
            .unwrap();
        backend
            .document_store()
            .delete("test_coll", &id, None)
            .await
            .unwrap();
        let tombstones = backend
            .document_store()
            .get_tombstones("test_coll")
            .await
            .unwrap();
        assert_eq!(tombstones[0].deleted_by, "local");

        // After initialization, node_id should be app_id
        let backend2 = AutomergeBackend::new();
        backend2.initialize(deletion_test_config()).await.unwrap();
        backend2.deletion_policy_registry.set(
            "test_coll",
            crate::qos::DeletionPolicy::Tombstone {
                tombstone_ttl: std::time::Duration::from_secs(3600),
                delete_wins: true,
            },
        );
        let doc = Document::new(HashMap::from([("x".to_string(), serde_json::json!(2))]));
        let id2 = backend2
            .document_store()
            .upsert("test_coll", doc)
            .await
            .unwrap();
        backend2
            .document_store()
            .delete("test_coll", &id2, None)
            .await
            .unwrap();
        let tombstones2 = backend2
            .document_store()
            .get_tombstones("test_coll")
            .await
            .unwrap();
        assert_eq!(tombstones2[0].deleted_by, "deletion_test");
    }

    #[tokio::test]
    async fn test_drain_pending_tombstones() {
        let backend = AutomergeBackend::new();
        backend.initialize(deletion_test_config()).await.unwrap();
        backend.deletion_policy_registry.set(
            "nodes",
            crate::qos::DeletionPolicy::Tombstone {
                tombstone_ttl: std::time::Duration::from_secs(3600),
                delete_wins: true,
            },
        );

        // Initially empty
        assert!(backend.drain_pending_tombstones().is_empty());

        // Insert and delete
        let doc = Document::new(HashMap::from([("x".to_string(), serde_json::json!(1))]));
        let id = backend.document_store().upsert("nodes", doc).await.unwrap();
        backend
            .document_store()
            .delete("nodes", &id, Some("test"))
            .await
            .unwrap();

        // Should have one pending tombstone
        let pending = backend.drain_pending_tombstones();
        assert_eq!(pending.len(), 1);
        assert_eq!(pending[0].tombstone.document_id, id);
        assert_eq!(pending[0].tombstone.collection, "nodes");

        // After drain, should be empty again
        assert!(backend.drain_pending_tombstones().is_empty());
    }

    #[tokio::test]
    async fn test_gc_starts_on_init() {
        let backend = AutomergeBackend::new();
        // Before init, no GC handle
        assert!(backend.gc_handle.lock().unwrap().is_none());

        backend.initialize(deletion_test_config()).await.unwrap();
        // After init, GC handle should exist
        assert!(backend.gc_handle.lock().unwrap().is_some());

        // Shutdown should clear it
        backend.shutdown().await.unwrap();
        assert!(backend.gc_handle.lock().unwrap().is_none());
    }

    #[tokio::test]
    async fn test_gc_store_impl() {
        use crate::qos::GcStore;

        let backend = AutomergeBackend::new();
        backend.initialize(deletion_test_config()).await.unwrap();
        backend.deletion_policy_registry.set(
            "nodes",
            crate::qos::DeletionPolicy::Tombstone {
                tombstone_ttl: std::time::Duration::from_secs(3600),
                delete_wins: true,
            },
        );

        // Insert, delete, create tombstone
        let doc = Document::new(HashMap::from([("x".to_string(), serde_json::json!(1))]));
        let id = backend.document_store().upsert("nodes", doc).await.unwrap();
        backend
            .document_store()
            .delete("nodes", &id, None)
            .await
            .unwrap();

        // GcStore methods should work
        assert!(backend.has_tombstone("nodes", &id).unwrap());
        assert_eq!(backend.get_all_tombstones().unwrap().len(), 1);

        // Remove tombstone
        assert!(backend.remove_tombstone("nodes", &id).unwrap());
        assert!(!backend.has_tombstone("nodes", &id).unwrap());
        assert_eq!(backend.get_all_tombstones().unwrap().len(), 0);

        // list_collections
        let collections = backend.list_collections().unwrap();
        // May be empty since we deleted the only doc; that's OK
        assert!(collections.is_empty() || collections.contains(&"nodes".to_string()));
    }

    // ============================================================================
    // Issue #517: Query::Custom Parser Tests
    // ============================================================================

    /// Helper: Create a test document with given fields
    fn create_test_doc(fields: Vec<(&str, serde_json::Value)>) -> Document {
        let mut field_map = HashMap::new();
        for (key, value) in fields {
            field_map.insert(key.to_string(), value);
        }
        Document::new(field_map)
    }

    #[test]
    fn test_custom_query_equality_string() {
        // Test: collection_name == 'squad_summaries'
        let doc = create_test_doc(vec![(
            "collection_name",
            serde_json::json!("squad_summaries"),
        )]);

        assert!(evaluate_custom_query(
            &doc,
            "collection_name == 'squad_summaries'"
        ));
        assert!(!evaluate_custom_query(&doc, "collection_name == 'other'"));
    }

    #[test]
    fn test_custom_query_equality_boolean() {
        // Test: public == true / public == false
        let doc_public = create_test_doc(vec![("public", serde_json::json!(true))]);
        let doc_private = create_test_doc(vec![("public", serde_json::json!(false))]);

        assert!(evaluate_custom_query(&doc_public, "public == true"));
        assert!(!evaluate_custom_query(&doc_public, "public == false"));
        assert!(evaluate_custom_query(&doc_private, "public == false"));
        assert!(!evaluate_custom_query(&doc_private, "public == true"));
    }

    #[test]
    fn test_custom_query_starts_with() {
        // Test: collection_name STARTS WITH 'squad-'
        let doc = create_test_doc(vec![("collection_name", serde_json::json!("squad-alpha"))]);

        assert!(evaluate_custom_query(
            &doc,
            "collection_name STARTS WITH 'squad-'"
        ));
        assert!(evaluate_custom_query(
            &doc,
            "collection_name starts with 'squad-'"
        )); // Case insensitive
        assert!(!evaluate_custom_query(
            &doc,
            "collection_name STARTS WITH 'platoon-'"
        ));
    }

    #[test]
    fn test_custom_query_ends_with() {
        // Test: collection_name ENDS WITH '.summaries'
        let doc = create_test_doc(vec![(
            "collection_name",
            serde_json::json!("squad.summaries"),
        )]);

        assert!(evaluate_custom_query(
            &doc,
            "collection_name ENDS WITH '.summaries'"
        ));
        assert!(evaluate_custom_query(
            &doc,
            "collection_name ends with '.summaries'"
        )); // Case insensitive
        assert!(!evaluate_custom_query(
            &doc,
            "collection_name ENDS WITH '.reports'"
        ));
    }

    #[test]
    fn test_custom_query_contains_array() {
        // Test: CONTAINS(authorized_roles, 'soldier')
        let doc = create_test_doc(vec![(
            "authorized_roles",
            serde_json::json!(["soldier", "squad_leader"]),
        )]);

        assert!(evaluate_custom_query(
            &doc,
            "CONTAINS(authorized_roles, 'soldier')"
        ));
        assert!(evaluate_custom_query(
            &doc,
            "CONTAINS(authorized_roles, 'squad_leader')"
        ));
        assert!(!evaluate_custom_query(
            &doc,
            "CONTAINS(authorized_roles, 'general')"
        ));
    }

    #[test]
    fn test_custom_query_contains_string() {
        // Test: CONTAINS on string field (substring search)
        let doc = create_test_doc(vec![(
            "description",
            serde_json::json!("This is a squad summary document"),
        )]);

        assert!(evaluate_custom_query(
            &doc,
            "CONTAINS(description, 'squad')"
        ));
        assert!(evaluate_custom_query(
            &doc,
            "CONTAINS(description, 'summary')"
        ));
        assert!(!evaluate_custom_query(
            &doc,
            "CONTAINS(description, 'platoon')"
        ));
    }

    #[test]
    fn test_custom_query_or_compound() {
        // Test: type == 'node_state' OR type == 'squad_summary'
        let doc_node = create_test_doc(vec![("type", serde_json::json!("node_state"))]);
        let doc_squad = create_test_doc(vec![("type", serde_json::json!("squad_summary"))]);
        let doc_other = create_test_doc(vec![("type", serde_json::json!("other"))]);

        let query = "type == 'node_state' OR type == 'squad_summary'";
        assert!(evaluate_custom_query(&doc_node, query));
        assert!(evaluate_custom_query(&doc_squad, query));
        assert!(!evaluate_custom_query(&doc_other, query));
    }

    #[test]
    fn test_custom_query_and_compound() {
        // Test: public == true AND type == 'node_state'
        let doc_match = create_test_doc(vec![
            ("public", serde_json::json!(true)),
            ("type", serde_json::json!("node_state")),
        ]);
        let doc_partial = create_test_doc(vec![
            ("public", serde_json::json!(true)),
            ("type", serde_json::json!("other")),
        ]);

        let query = "public == true AND type == 'node_state'";
        assert!(evaluate_custom_query(&doc_match, query));
        assert!(!evaluate_custom_query(&doc_partial, query));
    }

    #[test]
    fn test_custom_query_complex_compound() {
        // Test: (public == true OR CONTAINS(authorized_roles, 'soldier'))
        let doc_public = create_test_doc(vec![
            ("public", serde_json::json!(true)),
            ("authorized_roles", serde_json::json!([])),
        ]);
        let doc_soldier = create_test_doc(vec![
            ("public", serde_json::json!(false)),
            ("authorized_roles", serde_json::json!(["soldier"])),
        ]);
        let doc_neither = create_test_doc(vec![
            ("public", serde_json::json!(false)),
            ("authorized_roles", serde_json::json!(["general"])),
        ]);

        let query = "public == true OR CONTAINS(authorized_roles, 'soldier')";
        assert!(evaluate_custom_query(&doc_public, query));
        assert!(evaluate_custom_query(&doc_soldier, query));
        assert!(!evaluate_custom_query(&doc_neither, query));
    }

    #[test]
    fn test_custom_query_with_parentheses() {
        // Test: queries with parentheses are handled
        let doc = create_test_doc(vec![(
            "collection_name",
            serde_json::json!("squad_summaries"),
        )]);

        assert!(evaluate_custom_query(
            &doc,
            "(collection_name == 'squad_summaries')"
        ));
    }

    #[test]
    fn test_custom_query_unknown_pattern_returns_true() {
        // Test: Unknown patterns return true (conservative fallback)
        let doc = create_test_doc(vec![("field", serde_json::json!("value"))]);

        // These are patterns we don't recognize - should return true
        assert!(evaluate_custom_query(&doc, "SOME_UNKNOWN_FUNCTION(x, y)"));
        assert!(evaluate_custom_query(&doc, "field BETWEEN 1 AND 10")); // BETWEEN not implemented
        assert!(evaluate_custom_query(&doc, "field REGEXP '^test'")); // REGEXP not implemented
    }

    #[test]
    fn test_custom_query_matches_query_integration() {
        // Test that Query::Custom works through matches_query
        let doc = create_test_doc(vec![(
            "collection_name",
            serde_json::json!("squad_summaries"),
        )]);

        let query = Query::Custom("collection_name == 'squad_summaries'".to_string());
        assert!(matches_query(&doc, &query));

        let query_no_match = Query::Custom("collection_name == 'other'".to_string());
        assert!(!matches_query(&doc, &query_no_match));
    }

    #[test]
    fn test_custom_query_real_world_patterns() {
        // Test actual patterns from the Peat codebase

        // Pattern 1: collection_name == 'squad_summaries' (from peat-sim)
        let doc_summaries = create_test_doc(vec![(
            "collection_name",
            serde_json::json!("squad_summaries"),
        )]);
        assert!(evaluate_custom_query(
            &doc_summaries,
            "collection_name == 'squad_summaries'"
        ));

        // Pattern 2: collection_name STARTS WITH 'squad-1' OR type == 'node_state'
        let doc_squad = create_test_doc(vec![
            ("collection_name", serde_json::json!("squad-1-alpha")),
            ("type", serde_json::json!("other")),
        ]);
        let doc_node = create_test_doc(vec![
            ("collection_name", serde_json::json!("other")),
            ("type", serde_json::json!("node_state")),
        ]);
        let query = "collection_name STARTS WITH 'squad-1' OR type == 'node_state'";
        assert!(evaluate_custom_query(&doc_squad, query));
        assert!(evaluate_custom_query(&doc_node, query));

        // Pattern 3: collection_name ENDS WITH '.summaries' OR type == 'squad_summary'
        let doc_suffix = create_test_doc(vec![
            ("collection_name", serde_json::json!("platoon.summaries")),
            ("type", serde_json::json!("other")),
        ]);
        let query2 = "collection_name ENDS WITH '.summaries' OR type == 'squad_summary'";
        assert!(evaluate_custom_query(&doc_suffix, query2));

        // Pattern 4: public == true OR CONTAINS(authorized_roles, 'soldier')
        let doc_with_role = create_test_doc(vec![
            ("public", serde_json::json!(false)),
            ("authorized_roles", serde_json::json!(["soldier", "medic"])),
        ]);
        let query3 = "public == true OR CONTAINS(authorized_roles, 'soldier')";
        assert!(evaluate_custom_query(&doc_with_role, query3));
    }

    // ============================================================================
    // Issue #520: Extended DQL patterns for full syntactic parity
    // ============================================================================

    #[test]
    fn test_custom_query_inequality_string() {
        // Test: field != 'value'
        let doc = create_test_doc(vec![("status", serde_json::json!("active"))]);

        assert!(evaluate_custom_query(&doc, "status != 'inactive'"));
        assert!(!evaluate_custom_query(&doc, "status != 'active'"));
    }

    #[test]
    fn test_custom_query_inequality_boolean() {
        // Test: field != true/false
        let doc_active = create_test_doc(vec![("enabled", serde_json::json!(true))]);
        let doc_inactive = create_test_doc(vec![("enabled", serde_json::json!(false))]);

        assert!(evaluate_custom_query(&doc_active, "enabled != false"));
        assert!(!evaluate_custom_query(&doc_active, "enabled != true"));
        assert!(evaluate_custom_query(&doc_inactive, "enabled != true"));
        assert!(!evaluate_custom_query(&doc_inactive, "enabled != false"));
    }

    #[test]
    fn test_custom_query_inequality_numeric() {
        // Test: field != number
        let doc = create_test_doc(vec![("count", serde_json::json!(42))]);

        assert!(evaluate_custom_query(&doc, "count != 0"));
        assert!(evaluate_custom_query(&doc, "count != 100"));
        assert!(!evaluate_custom_query(&doc, "count != 42"));
    }

    #[test]
    fn test_custom_query_like_prefix() {
        // Test: field LIKE 'prefix%'
        let doc = create_test_doc(vec![("name", serde_json::json!("squad-alpha-1"))]);

        assert!(evaluate_custom_query(&doc, "name LIKE 'squad%'"));
        assert!(evaluate_custom_query(&doc, "name like 'squad%'")); // Case insensitive
        assert!(!evaluate_custom_query(&doc, "name LIKE 'platoon%'"));
    }

    #[test]
    fn test_custom_query_like_suffix() {
        // Test: field LIKE '%suffix'
        let doc = create_test_doc(vec![("filename", serde_json::json!("report.pdf"))]);

        assert!(evaluate_custom_query(&doc, "filename LIKE '%.pdf'"));
        assert!(!evaluate_custom_query(&doc, "filename LIKE '%.doc'"));
    }

    #[test]
    fn test_custom_query_like_contains() {
        // Test: field LIKE '%middle%'
        let doc = create_test_doc(vec![(
            "description",
            serde_json::json!("This is a tactical mission report"),
        )]);

        assert!(evaluate_custom_query(&doc, "description LIKE '%tactical%'"));
        assert!(evaluate_custom_query(&doc, "description LIKE '%mission%'"));
        assert!(!evaluate_custom_query(
            &doc,
            "description LIKE '%strategic%'"
        ));
    }

    #[test]
    fn test_custom_query_like_complex() {
        // Test: field LIKE 'prefix%middle%suffix'
        let doc = create_test_doc(vec![("path", serde_json::json!("squad-alpha-report.json"))]);

        assert!(evaluate_custom_query(&doc, "path LIKE 'squad%report%'")); // prefix and middle
        assert!(evaluate_custom_query(&doc, "path LIKE '%alpha%json'")); // middle and suffix
        assert!(evaluate_custom_query(&doc, "path LIKE 'squad%.json'")); // prefix and suffix
    }

    #[test]
    fn test_custom_query_in_strings() {
        // Test: field IN ['a', 'b', 'c']
        let doc = create_test_doc(vec![("role", serde_json::json!("soldier"))]);

        assert!(evaluate_custom_query(
            &doc,
            "role IN ['soldier', 'medic', 'engineer']"
        ));
        assert!(!evaluate_custom_query(
            &doc,
            "role IN ['general', 'colonel']"
        ));
    }

    #[test]
    fn test_custom_query_in_numbers() {
        // Test: field IN [1, 2, 3]
        let doc = create_test_doc(vec![("priority", serde_json::json!(2))]);

        assert!(evaluate_custom_query(&doc, "priority IN [1, 2, 3]"));
        assert!(!evaluate_custom_query(&doc, "priority IN [4, 5, 6]"));
    }

    #[test]
    fn test_custom_query_in_case_insensitive() {
        // Test: IN keyword is case insensitive
        let doc = create_test_doc(vec![("status", serde_json::json!("active"))]);

        assert!(evaluate_custom_query(
            &doc,
            "status in ['active', 'pending']"
        ));
        assert!(evaluate_custom_query(
            &doc,
            "status IN ['active', 'pending']"
        ));
    }

    #[test]
    fn test_custom_query_not_expression() {
        // Test: NOT (expr)
        let doc = create_test_doc(vec![("enabled", serde_json::json!(false))]);

        assert!(evaluate_custom_query(&doc, "NOT (enabled == true)"));
        assert!(!evaluate_custom_query(&doc, "NOT (enabled == false)"));
    }

    #[test]
    fn test_custom_query_not_without_parens() {
        // Test: NOT expr (without parentheses)
        let doc = create_test_doc(vec![("status", serde_json::json!("inactive"))]);

        assert!(evaluate_custom_query(&doc, "NOT status == 'active'"));
        assert!(!evaluate_custom_query(&doc, "NOT status == 'inactive'"));
    }

    #[test]
    fn test_custom_query_not_case_insensitive() {
        // Test: not is case insensitive
        let doc = create_test_doc(vec![("flag", serde_json::json!(true))]);

        assert!(evaluate_custom_query(&doc, "not (flag == false)"));
        assert!(evaluate_custom_query(&doc, "NOT (flag == false)"));
    }

    #[test]
    fn test_custom_query_is_null() {
        // Test: field IS NULL
        let doc_with_null = create_test_doc(vec![("optional", serde_json::Value::Null)]);
        let doc_without_field = create_test_doc(vec![("other", serde_json::json!("value"))]);
        let doc_with_value = create_test_doc(vec![("optional", serde_json::json!("present"))]);

        assert!(evaluate_custom_query(&doc_with_null, "optional IS NULL"));
        assert!(evaluate_custom_query(
            &doc_without_field,
            "optional IS NULL"
        ));
        assert!(!evaluate_custom_query(&doc_with_value, "optional IS NULL"));
    }

    #[test]
    fn test_custom_query_is_not_null() {
        // Test: field IS NOT NULL
        let doc_with_value = create_test_doc(vec![("required", serde_json::json!("value"))]);
        let doc_with_null = create_test_doc(vec![("required", serde_json::Value::Null)]);
        let doc_missing = create_test_doc(vec![("other", serde_json::json!("x"))]);

        assert!(evaluate_custom_query(
            &doc_with_value,
            "required IS NOT NULL"
        ));
        assert!(!evaluate_custom_query(
            &doc_with_null,
            "required IS NOT NULL"
        ));
        assert!(!evaluate_custom_query(&doc_missing, "required IS NOT NULL"));
    }

    #[test]
    fn test_custom_query_is_null_case_insensitive() {
        // Test: IS NULL is case insensitive
        let doc = create_test_doc(vec![("field", serde_json::Value::Null)]);

        assert!(evaluate_custom_query(&doc, "field is null"));
        assert!(evaluate_custom_query(&doc, "field IS NULL"));
        assert!(evaluate_custom_query(&doc, "field Is Null"));
    }

    #[test]
    fn test_custom_query_nested_field_equality() {
        // Test: nested.field == 'value'
        let doc = create_test_doc(vec![(
            "address",
            serde_json::json!({"city": "San Francisco", "state": "CA"}),
        )]);

        assert!(evaluate_custom_query(
            &doc,
            "address.city == 'San Francisco'"
        ));
        assert!(evaluate_custom_query(&doc, "address.state == 'CA'"));
        assert!(!evaluate_custom_query(&doc, "address.city == 'New York'"));
    }

    #[test]
    fn test_custom_query_nested_field_deep() {
        // Test: deeply nested field access
        let doc = create_test_doc(vec![(
            "data",
            serde_json::json!({"level1": {"level2": {"value": "deep"}}}),
        )]);

        assert!(evaluate_custom_query(
            &doc,
            "data.level1.level2.value == 'deep'"
        ));
        assert!(!evaluate_custom_query(
            &doc,
            "data.level1.level2.value == 'shallow'"
        ));
    }

    #[test]
    fn test_custom_query_nested_field_is_null() {
        // Test: nested.field IS NULL
        let doc = create_test_doc(vec![(
            "config",
            serde_json::json!({"enabled": true, "optional": null}),
        )]);

        assert!(evaluate_custom_query(&doc, "config.optional IS NULL"));
        assert!(evaluate_custom_query(&doc, "config.missing IS NULL"));
        assert!(!evaluate_custom_query(&doc, "config.enabled IS NULL"));
    }

    #[test]
    fn test_custom_query_nested_field_in() {
        // Test: nested.field IN [...]
        let doc = create_test_doc(vec![(
            "user",
            serde_json::json!({"role": "admin", "level": 5}),
        )]);

        assert!(evaluate_custom_query(
            &doc,
            "user.role IN ['admin', 'superuser']"
        ));
        assert!(evaluate_custom_query(&doc, "user.level IN [1, 5, 10]"));
        assert!(!evaluate_custom_query(
            &doc,
            "user.role IN ['guest', 'user']"
        ));
    }

    #[test]
    fn test_custom_query_compound_with_new_patterns() {
        // Test: combining new patterns with AND/OR
        let doc = create_test_doc(vec![
            ("status", serde_json::json!("active")),
            ("priority", serde_json::json!(1)),
            ("optional", serde_json::Value::Null),
        ]);

        // status != 'deleted' AND priority IN [1, 2, 3]
        assert!(evaluate_custom_query(
            &doc,
            "status != 'deleted' AND priority IN [1, 2, 3]"
        ));

        // optional IS NULL OR status LIKE 'act%'
        assert!(evaluate_custom_query(
            &doc,
            "optional IS NULL OR status LIKE 'act%'"
        ));

        // NOT (status == 'inactive') AND priority != 0
        assert!(evaluate_custom_query(
            &doc,
            "NOT (status == 'inactive') AND priority != 0"
        ));
    }

    #[test]
    fn test_match_like_pattern_unit() {
        // Unit tests for match_like_pattern helper function
        assert!(match_like_pattern("hello world", "%world"));
        assert!(match_like_pattern("hello world", "hello%"));
        assert!(match_like_pattern("hello world", "%lo wo%"));
        assert!(match_like_pattern("hello world", "%"));
        assert!(match_like_pattern("hello world", "%%"));
        assert!(match_like_pattern("hello world", "hello world"));
        assert!(!match_like_pattern("hello world", "goodbye%"));
        assert!(!match_like_pattern("hello world", "%goodbye"));
        assert!(!match_like_pattern("hello", "hello world"));
    }

    // ============================================================================
    // Issue #518: Counter and Nested Object Tests
    // ============================================================================

    #[test]
    fn test_automerge_scalar_counter_extraction() {
        // Test that Counter values are properly extracted
        use automerge::ScalarValue;

        // Create a counter with value 42
        let counter = ScalarValue::counter(42);

        // Extract it using our function
        if let ScalarValue::Counter(c) = &counter {
            let value: i64 = i64::from(c);
            assert_eq!(value, 42, "Counter value should be 42");
        } else {
            panic!("Expected Counter variant");
        }
    }

    #[test]
    fn test_automerge_scalar_to_json_all_types() {
        // Test all scalar types convert correctly
        use automerge::ScalarValue;

        // String
        let result = AutomergeBackend::automerge_scalar_to_json(&ScalarValue::Str("hello".into()));
        assert_eq!(result, Some(serde_json::json!("hello")));

        // Integer
        let result = AutomergeBackend::automerge_scalar_to_json(&ScalarValue::Int(-42));
        assert_eq!(result, Some(serde_json::json!(-42)));

        // Unsigned integer
        let result = AutomergeBackend::automerge_scalar_to_json(&ScalarValue::Uint(42));
        assert_eq!(result, Some(serde_json::json!(42)));

        // Float (use arbitrary value to avoid clippy::approx_constant)
        let result = AutomergeBackend::automerge_scalar_to_json(&ScalarValue::F64(1.234));
        assert!(result.is_some());
        if let Some(serde_json::Value::Number(n)) = result {
            assert!((n.as_f64().unwrap() - 1.234).abs() < 0.001);
        }

        // Boolean
        let result = AutomergeBackend::automerge_scalar_to_json(&ScalarValue::Boolean(true));
        assert_eq!(result, Some(serde_json::json!(true)));

        // Null
        let result = AutomergeBackend::automerge_scalar_to_json(&ScalarValue::Null);
        assert_eq!(result, Some(serde_json::Value::Null));

        // Timestamp
        let result =
            AutomergeBackend::automerge_scalar_to_json(&ScalarValue::Timestamp(1234567890));
        assert_eq!(result, Some(serde_json::json!(1234567890)));

        // Counter (Issue #518)
        let counter = ScalarValue::counter(100);
        if let ScalarValue::Counter(c) = &counter {
            let result =
                AutomergeBackend::automerge_scalar_to_json(&ScalarValue::Counter(c.clone()));
            assert_eq!(
                result,
                Some(serde_json::json!(100)),
                "Counter should return actual value, not 0"
            );
        }

        // Bytes
        let result = AutomergeBackend::automerge_scalar_to_json(&ScalarValue::Bytes(vec![1, 2, 3]));
        assert_eq!(result, Some(serde_json::json!([1, 2, 3])));
    }

    #[tokio::test]
    async fn test_nested_object_roundtrip() {
        // Test that nested objects survive the roundtrip through Automerge
        let backend = AutomergeBackend::new();
        backend.initialize(deletion_test_config()).await.unwrap();

        // Create a document with nested structure
        let nested_doc = Document::new(
            vec![
                ("name".to_string(), serde_json::json!("test")),
                (
                    "metadata".to_string(),
                    serde_json::json!({
                        "version": 1,
                        "author": "test_user"
                    }),
                ),
                ("items".to_string(), serde_json::json!([1, 2, 3])),
            ]
            .into_iter()
            .collect(),
        );

        let doc_id = backend
            .document_store()
            .upsert("nested_test", nested_doc)
            .await
            .unwrap();

        // Retrieve and verify
        let retrieved = backend
            .document_store()
            .get("nested_test", &doc_id)
            .await
            .unwrap()
            .expect("Document should exist");

        assert_eq!(
            retrieved.fields.get("name"),
            Some(&serde_json::json!("test"))
        );

        // Verify nested object (Issue #518)
        if let Some(metadata) = retrieved.fields.get("metadata") {
            assert!(metadata.is_object(), "metadata should be an object");
            if let Some(version) = metadata.get("version") {
                assert_eq!(version, &serde_json::json!(1));
            }
            if let Some(author) = metadata.get("author") {
                assert_eq!(author, &serde_json::json!("test_user"));
            }
        }

        // Verify array
        if let Some(items) = retrieved.fields.get("items") {
            assert!(items.is_array(), "items should be an array");
            assert_eq!(items, &serde_json::json!([1, 2, 3]));
        }
    }
}