solid_pod_rs/

ldp.rs

//! Linked Data Platform (LDP) resource and container semantics.
//!
//! Phase 2 scope:
//!
//! - Full `Link` header set (type + acl + describedby + storage root).
//! - `Prefer` header parsing (PreferMinimalContainer, PreferContainedIRIs).
//! - `Accept-Post` header for containers.
//! - PATCH via N3 (solid-protocol PATCH): `insert`, `delete`, `where`.
//! - PATCH via SPARQL-Update (`INSERT DATA`, `DELETE DATA`, `DELETE WHERE`).
//! - Content negotiation: Turtle, JSON-LD, N-Triples, RDF/XML.
//! - Server-managed triples (`dc:modified`, `stat:size`, `ldp:contains`).
//! - `.meta` sidecar resolution.
//!
//! The module intentionally uses a tiny, in-crate RDF triple model so
//! the crate stays free of the heavier `sophia` / `oxigraph` dep trees.
//! Only Turtle-subset parsing required for real-world Solid Pod PATCH
//! flows is supported; client-supplied RDF is parsed via the N-Triples
//! fallback whenever the Turtle fast path hits something exotic.

use std::collections::BTreeSet;
use std::fmt::Write as _;

#[cfg(feature = "tokio-runtime")]
use async_trait::async_trait;
use serde::Serialize;

use crate::error::PodError;
pub use crate::n3_patch::{N3Patch, PatchTerm, PatchTriple};
// `Storage` lives behind `tokio-runtime` — the LDP parsers themselves
// are pure and compile under `core`, only the storage-driven container
// representation helper at the bottom of this file needs the trait.
#[cfg(feature = "tokio-runtime")]
use crate::storage::Storage;

/// Well-known IRI constants used in LDP, WAC, and server-managed triples.
pub mod iri {
    /// LDP Resource type IRI.
    pub const LDP_RESOURCE: &str = "http://www.w3.org/ns/ldp#Resource";
    /// LDP Container type IRI.
    pub const LDP_CONTAINER: &str = "http://www.w3.org/ns/ldp#Container";
    /// LDP BasicContainer type IRI (the only container type Solid uses).
    pub const LDP_BASIC_CONTAINER: &str = "http://www.w3.org/ns/ldp#BasicContainer";
    /// LDP namespace prefix.
    pub const LDP_NS: &str = "http://www.w3.org/ns/ldp#";
    /// `ldp:contains` predicate linking a container to its children.
    pub const LDP_CONTAINS: &str = "http://www.w3.org/ns/ldp#contains";
    /// Prefer token for minimal container responses (omit containment triples).
    pub const LDP_PREFER_MINIMAL_CONTAINER: &str =
        "http://www.w3.org/ns/ldp#PreferMinimalContainer";
    /// Prefer token for contained-IRIs-only responses.
    pub const LDP_PREFER_CONTAINED_IRIS: &str = "http://www.w3.org/ns/ldp#PreferContainedIRIs";
    /// Prefer token for membership triples.
    pub const LDP_PREFER_MEMBERSHIP: &str = "http://www.w3.org/ns/ldp#PreferMembership";

    /// Dublin Core Terms namespace prefix.
    pub const DCTERMS_NS: &str = "http://purl.org/dc/terms/";
    /// `dcterms:modified` predicate for last-modification timestamps.
    pub const DCTERMS_MODIFIED: &str = "http://purl.org/dc/terms/modified";

    /// POSIX stat namespace prefix.
    pub const STAT_NS: &str = "http://www.w3.org/ns/posix/stat#";
    /// `stat:size` predicate for resource byte size.
    pub const STAT_SIZE: &str = "http://www.w3.org/ns/posix/stat#size";
    /// `stat:mtime` predicate for POSIX modification time.
    pub const STAT_MTIME: &str = "http://www.w3.org/ns/posix/stat#mtime";

    /// XSD `dateTime` datatype IRI.
    pub const XSD_DATETIME: &str = "http://www.w3.org/2001/XMLSchema#dateTime";
    /// XSD `integer` datatype IRI.
    pub const XSD_INTEGER: &str = "http://www.w3.org/2001/XMLSchema#integer";
    /// XSD `string` datatype IRI.
    pub const XSD_STRING: &str = "http://www.w3.org/2001/XMLSchema#string";

    /// PIM Storage type IRI (`pim:Storage`).
    pub const PIM_STORAGE: &str = "http://www.w3.org/ns/pim/space#Storage";
    /// PIM storage relation IRI (`pim:storage`), used in root `Link` headers.
    pub const PIM_STORAGE_REL: &str = "http://www.w3.org/ns/pim/space#storage";

    /// WAC (Web Access Control) namespace prefix.
    pub const ACL_NS: &str = "http://www.w3.org/ns/auth/acl#";
}

/// MIME types recognised by the content negotiator. The order matters:
/// the first format that matches the `Accept` header wins, and if the
/// client provides `*/*` the server defaults to Turtle.
pub const ACCEPT_POST: &str = "text/turtle, application/ld+json, application/n-triples";

/// `Accept-Post` / `Accept-Put` value when content negotiation is on.
///
/// JSS advertises `text/n3` alongside Turtle only when conneg is enabled
/// (`src/rdf/conneg.js` `getAcceptHeaders`, lines 228-233); the request
/// body is then parsed by [`crate::rdf_input`].
pub const ACCEPT_POST_CONNEG: &str =
    "text/turtle, application/ld+json, application/n-triples, text/n3";

/// Pick the `Accept-Post` value for the conneg setting.
///
/// ```
/// use solid_pod_rs::ldp::{accept_post_for, ACCEPT_POST, ACCEPT_POST_CONNEG};
/// assert_eq!(accept_post_for(false), ACCEPT_POST);
/// assert_eq!(accept_post_for(true), ACCEPT_POST_CONNEG);
/// ```
pub fn accept_post_for(conneg_enabled: bool) -> &'static str {
    if conneg_enabled {
        ACCEPT_POST_CONNEG
    } else {
        ACCEPT_POST
    }
}

/// Return whether a path addresses an LDP container.
pub fn is_container(path: &str) -> bool {
    path == "/" || path.ends_with('/')
}

/// Return whether a path addresses an ACL sidecar.
pub fn is_acl_path(path: &str) -> bool {
    path.ends_with(".acl")
}

/// Return whether a path addresses a `.meta` sidecar.
pub fn is_meta_path(path: &str) -> bool {
    path.ends_with(".meta")
}

/// Compute the `.meta` sidecar for a resource.
pub fn meta_sidecar_for(path: &str) -> String {
    if is_meta_path(path) {
        path.to_string()
    } else {
        format!("{path}.meta")
    }
}

/// Build the full set of `Link` headers for a given resource path.
///
/// Emits:
/// - `<ldp:Resource>; rel="type"` always.
/// - `<ldp:Container>; rel="type"` + `<ldp:BasicContainer>; rel="type"` for containers.
/// - The shared resolver's ACL sidecar link, except on the ACL itself.
/// - `<path.meta>; rel="describedby"` for every non-meta resource.
/// - `</>; rel="http://www.w3.org/ns/pim/space#storage"` for the pod root.
pub fn link_headers(path: &str) -> Vec<String> {
    let mut out = Vec::new();
    if is_container(path) {
        out.push(format!("<{}>; rel=\"type\"", iri::LDP_BASIC_CONTAINER));
        out.push(format!("<{}>; rel=\"type\"", iri::LDP_CONTAINER));
        out.push(format!("<{}>; rel=\"type\"", iri::LDP_RESOURCE));
    } else {
        out.push(format!("<{}>; rel=\"type\"", iri::LDP_RESOURCE));
    }
    if !is_acl_path(path) {
        let acl_target = crate::wac::acl_sidecar_key(path);
        out.push(format!("<{acl_target}>; rel=\"acl\""));
    }
    if !is_meta_path(path) && !is_acl_path(path) {
        let meta_target = meta_sidecar_for(path);
        out.push(format!("<{meta_target}>; rel=\"describedby\""));
    }
    if path == "/" {
        out.push(format!("</>; rel=\"{}\"", iri::PIM_STORAGE_REL));
    }
    out
}

/// Maximum byte length of a client-supplied `Slug` header. JSS caps at
/// 255 bytes (POSIX filename limit); we match for interop.
pub const MAX_SLUG_BYTES: usize = 255;

/// Resolve the target path when POSTing to a container.
///
/// Validation rules (JSS parity):
/// * `Slug` absent or empty → UUID-v4 fallback.
/// * Non-empty `Slug` must be ≤ 255 bytes, must not contain `/`, `..`,
///   must not be a bare `.` (which would name the container itself),
///   or `\0`, and every character must match `[A-Za-z0-9._-]`.
///
/// Invalid slugs return `Err(PodError::BadRequest)` so the client sees a
/// `400` and can correct, instead of silently receiving a UUID path.
pub fn resolve_slug(container: &str, slug: Option<&str>) -> Result<String, PodError> {
    let join = |name: &str| {
        if container.ends_with('/') {
            format!("{container}{name}")
        } else {
            format!("{container}/{name}")
        }
    };
    match slug {
        Some(s) if !s.is_empty() => {
            if s.len() > MAX_SLUG_BYTES {
                return Err(PodError::BadRequest(format!(
                    "slug exceeds {MAX_SLUG_BYTES} bytes"
                )));
            }
            if s.contains('/') || s.contains("..") || s == "." || s.contains('\0') {
                return Err(PodError::BadRequest(format!("invalid slug: {s:?}")));
            }
            if !s
                .chars()
                .all(|c| c.is_ascii_alphanumeric() || matches!(c, '.' | '_' | '-'))
            {
                return Err(PodError::BadRequest(format!(
                    "slug contains disallowed character: {s:?}"
                )));
            }
            Ok(join(s))
        }
        _ => Ok(join(&uuid::Uuid::new_v4().to_string())),
    }
}

// ---------------------------------------------------------------------------
// Prefer header parsing (RFC 7240 + LDP 4.2.2)
// ---------------------------------------------------------------------------

/// What portions of a container representation the client wants.
#[derive(Debug, Clone, Copy, Default, PartialEq, Eq)]
pub enum ContainerRepresentation {
    /// Membership triples + metadata (default).
    #[default]
    Full,
    /// `ldp:contains` + container metadata only.
    MinimalContainer,
    /// Only the list of contained IRIs, no server metadata.
    ContainedIRIsOnly,
}

/// Parsed `Prefer` header value. Non-`return=representation` preferences
/// are ignored (the LDP spec allows this).
#[derive(Debug, Clone, Copy, Default, PartialEq, Eq)]
pub struct PreferHeader {
    pub representation: ContainerRepresentation,
    pub include_minimal: bool,
    pub include_contained_iris: bool,
    pub omit_membership: bool,
}

impl PreferHeader {
    /// Parse a `Prefer` header value per RFC 7240 (tolerant).
    pub fn parse(value: &str) -> Self {
        let mut out = PreferHeader::default();
        // Preferences are separated by `,` at the top level.
        for pref in value.split(',') {
            let pref = pref.trim();
            if pref.is_empty() {
                continue;
            }
            // Tokens are separated by `;`.
            let mut parts = pref.split(';').map(|s| s.trim());
            let head = match parts.next() {
                Some(h) => h,
                None => continue,
            };
            if !head.eq_ignore_ascii_case("return=representation") {
                continue;
            }
            for token in parts {
                if let Some(val) = token
                    .strip_prefix("include=")
                    .or_else(|| token.strip_prefix("include ="))
                {
                    let unq = val.trim().trim_matches('"');
                    for iri in unq.split_whitespace() {
                        if iri == iri::LDP_PREFER_MINIMAL_CONTAINER {
                            out.include_minimal = true;
                            out.representation = ContainerRepresentation::MinimalContainer;
                        } else if iri == iri::LDP_PREFER_CONTAINED_IRIS {
                            out.include_contained_iris = true;
                            out.representation = ContainerRepresentation::ContainedIRIsOnly;
                        }
                    }
                } else if let Some(val) = token
                    .strip_prefix("omit=")
                    .or_else(|| token.strip_prefix("omit ="))
                {
                    let unq = val.trim().trim_matches('"');
                    for iri in unq.split_whitespace() {
                        if iri == iri::LDP_PREFER_MEMBERSHIP {
                            out.omit_membership = true;
                        }
                    }
                }
            }
        }
        out
    }
}

// ---------------------------------------------------------------------------
// Content negotiation
// ---------------------------------------------------------------------------

#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub enum RdfFormat {
    Turtle,
    JsonLd,
    NTriples,
    RdfXml,
}

impl RdfFormat {
    pub fn mime(&self) -> &'static str {
        match self {
            RdfFormat::Turtle => "text/turtle",
            RdfFormat::JsonLd => "application/ld+json",
            RdfFormat::NTriples => "application/n-triples",
            RdfFormat::RdfXml => "application/rdf+xml",
        }
    }

    pub fn from_mime(mime: &str) -> Option<Self> {
        let mime = mime
            .split(';')
            .next()
            .unwrap_or("")
            .trim()
            .to_ascii_lowercase();
        match mime.as_str() {
            "text/turtle" | "application/turtle" | "application/x-turtle" => {
                Some(RdfFormat::Turtle)
            }
            "application/ld+json" | "application/json+ld" => Some(RdfFormat::JsonLd),
            "application/n-triples" | "text/plain+ntriples" => Some(RdfFormat::NTriples),
            "application/rdf+xml" => Some(RdfFormat::RdfXml),
            _ => None,
        }
    }
}

/// Pick the best RDF format based on an `Accept` header.
///
/// q-values are respected; on ties Turtle wins. `*/*` falls back to Turtle.
pub fn negotiate_format(accept: Option<&str>) -> RdfFormat {
    let accept = match accept {
        Some(a) if !a.trim().is_empty() => a,
        _ => return RdfFormat::Turtle,
    };

    let mut best: Option<(f32, RdfFormat)> = None;
    for entry in accept.split(',') {
        let entry = entry.trim();
        if entry.is_empty() {
            continue;
        }
        let mut parts = entry.split(';').map(|s| s.trim());
        let mime = match parts.next() {
            Some(m) => m.to_ascii_lowercase(),
            None => continue,
        };
        let mut q: f32 = 1.0;
        for token in parts {
            if let Some(v) = token.strip_prefix("q=") {
                if let Ok(parsed) = v.parse::<f32>() {
                    q = parsed;
                }
            }
        }
        let format = match mime.as_str() {
            "text/turtle" | "application/turtle" => Some(RdfFormat::Turtle),
            "application/ld+json" => Some(RdfFormat::JsonLd),
            "application/n-triples" => Some(RdfFormat::NTriples),
            "application/rdf+xml" => Some(RdfFormat::RdfXml),
            "*/*" | "application/*" | "text/*" => Some(RdfFormat::Turtle),
            _ => None,
        };
        if let Some(f) = format {
            match best {
                None => best = Some((q, f)),
                Some((bq, _)) if q > bq => best = Some((q, f)),
                _ => {}
            }
        }
    }
    best.map(|(_, f)| f).unwrap_or(RdfFormat::Turtle)
}

/// Infer a content-type for auxiliary "dotfile" resources (`.acl`, `.meta`,
/// and their `*.acl` / `*.meta` suffix variants) whose extension-based
/// lookup would otherwise fail.
///
/// Mirrors JSS `src/util/Conversion.ts::getContentTypeFromExtension`
/// post-PR #294 (commit `de02f15`), which patched the same class of bug
/// arising from `path.extname('.acl') === ''` — leading-dot filenames
/// have no "extension" in the Node sense, so the table lookup returned
/// undefined and conneg rejected the resource.
///
/// Returns `Some("application/ld+json")` for canonical Solid ACL/meta
/// resources; `None` otherwise (callers should fall back to
/// `application/octet-stream`).
///
/// Matching rules (suffix-only, never substring):
///   * basename is exactly `.acl` or `.meta`
///   * basename ends with `.acl` or `.meta` (e.g. `foo.acl`, `data.meta`)
///   * names that merely *contain* `.acl`/`.meta` mid-string
///     (e.g. `not.aclfile`, `foo.acl.bak`) do NOT match.
pub fn infer_dotfile_content_type(path: &str) -> Option<&'static str> {
    // Extract the basename: strip trailing slashes, then take the last
    // path segment. Empty input or a pure slash run yields None.
    let trimmed = path.trim_end_matches('/');
    if trimmed.is_empty() {
        return None;
    }
    let basename = trimmed.rsplit('/').next().filter(|s| !s.is_empty())?;

    // Suffix test, per JSS's `.acl` / `.meta` matcher. Includes the
    // bare-name case (`.acl`, `.meta`) because `str::ends_with` is true
    // for equal strings.
    if basename.ends_with(".acl") || basename.ends_with(".meta") {
        Some("application/ld+json")
    } else {
        None
    }
}

/// Resolve a content-type for a resource that carries no sidecar metadata
/// (e.g. files extracted from a `git push` to `/public/apps/`, or any
/// backend that stores bytes without an explicit MIME).
///
/// Resolution order, mirroring JSS #533 (`getContentType`):
///   1. Solid `.acl` / `.meta` dotfile rule (`application/ld+json`).
///   2. Solid-specific overrides — RDF serialisations and playlist types
///      the generic MIME database doesn't know, or where Solid semantics
///      differ. Checked before the database so `.ttl` never resolves to
///      a non-Solid type.
///   3. The comprehensive `mime_guess` database (covers the long tail:
///      audio/video/fonts/archives/office/etc.) so media renders inline
///      instead of forcing a download.
///   4. `application/octet-stream`.
pub fn guess_content_type(path: &str) -> String {
    if let Some(ct) = infer_dotfile_content_type(path) {
        return ct.to_string();
    }

    let trimmed = path.trim_end_matches('/');
    let basename = trimmed.rsplit('/').next().unwrap_or(trimmed);
    let ext = basename
        .rsplit_once('.')
        .map(|(_, e)| e.to_ascii_lowercase())
        .unwrap_or_default();

    // Solid overrides — RDF serialisations + playlists. Mirrors the
    // `overrides` table in JSS src/utils/url.js.
    let override_ct = match ext.as_str() {
        "jsonld" => Some("application/ld+json"),
        "ttl" => Some("text/turtle"),
        "n3" => Some("text/n3"),
        "nt" => Some("application/n-triples"),
        "rdf" => Some("application/rdf+xml"),
        "nq" => Some("application/n-quads"),
        "trig" => Some("application/trig"),
        "m3u" => Some("audio/mpegurl"),
        "pls" => Some("audio/x-scpls"),
        _ => None,
    };
    if let Some(ct) = override_ct {
        return ct.to_string();
    }

    mime_guess::from_path(trimmed)
        .first_raw()
        .map(|s| s.to_string())
        .unwrap_or_else(|| "application/octet-stream".to_string())
}

#[cfg(test)]
mod guess_content_type_tests {
    use super::guess_content_type;

    #[test]
    fn solid_overrides_take_priority() {
        assert_eq!(guess_content_type("/data.ttl"), "text/turtle");
        assert_eq!(guess_content_type("/card.jsonld"), "application/ld+json");
        assert_eq!(guess_content_type("/g.nq"), "application/n-quads");
        assert_eq!(guess_content_type("/list.m3u"), "audio/mpegurl");
    }

    #[test]
    fn dotfiles_resolve_to_jsonld() {
        assert_eq!(guess_content_type("/.acl"), "application/ld+json");
        assert_eq!(
            guess_content_type("/publicTypeIndex.jsonld.acl"),
            "application/ld+json"
        );
    }

    #[test]
    fn mime_db_covers_media_and_web() {
        assert_eq!(guess_content_type("/app/index.html"), "text/html");
        assert_eq!(guess_content_type("/song.mp3"), "audio/mpeg");
        assert_eq!(guess_content_type("/clip.mp4"), "video/mp4");
        assert_eq!(guess_content_type("/img.png"), "image/png");
    }

    #[test]
    fn unknown_extension_falls_back_to_octet_stream() {
        assert_eq!(
            guess_content_type("/blob.xyzzy"),
            "application/octet-stream"
        );
        assert_eq!(guess_content_type("/noext"), "application/octet-stream");
    }
}

#[cfg(test)]
mod infer_dotfile_tests {
    use super::infer_dotfile_content_type;

    #[test]
    fn infer_dotfile_content_type_acl_file_returns_jsonld() {
        assert_eq!(
            infer_dotfile_content_type("/.acl"),
            Some("application/ld+json")
        );
        assert_eq!(
            infer_dotfile_content_type("/pods/alice/foo.acl"),
            Some("application/ld+json")
        );
        assert_eq!(
            infer_dotfile_content_type(".acl"),
            Some("application/ld+json")
        );
    }

    #[test]
    fn infer_dotfile_content_type_meta_file_returns_jsonld() {
        assert_eq!(
            infer_dotfile_content_type("/.meta"),
            Some("application/ld+json")
        );
        assert_eq!(
            infer_dotfile_content_type("/pods/alice/foo.meta"),
            Some("application/ld+json")
        );
    }

    #[test]
    fn infer_dotfile_content_type_dotted_midname_returns_none() {
        // Mid-name `.acl.` / `.meta.` must not trigger — JSS's suffix
        // match would miss these too.
        assert_eq!(infer_dotfile_content_type("/foo.acl.bak"), None);
        assert_eq!(infer_dotfile_content_type("/foo.meta.bak"), None);
    }

    #[test]
    fn infer_dotfile_content_type_substring_only_returns_none() {
        // `.acl` / `.meta` appearing as a substring, not a suffix.
        assert_eq!(infer_dotfile_content_type("/not.aclfile"), None);
        assert_eq!(infer_dotfile_content_type("/some.metainfo"), None);
        assert_eq!(infer_dotfile_content_type("/plain.txt"), None);
    }

    #[test]
    fn infer_dotfile_content_type_trailing_slash_stripped() {
        // Container path ending in `/` — strip before basename extract.
        assert_eq!(
            infer_dotfile_content_type("/pods/alice/foo.acl/"),
            Some("application/ld+json")
        );
        assert_eq!(infer_dotfile_content_type("/"), None);
        assert_eq!(infer_dotfile_content_type(""), None);
    }
}

// ---------------------------------------------------------------------------
// In-crate RDF triple model (minimal, sufficient for PATCH evaluation)
// ---------------------------------------------------------------------------

#[derive(Debug, Clone, PartialEq, Eq, PartialOrd, Ord, Hash)]
pub enum Term {
    Iri(String),
    BlankNode(String),
    Literal {
        value: String,
        datatype: Option<String>,
        language: Option<String>,
    },
}

impl Term {
    pub fn iri(i: impl Into<String>) -> Self {
        Term::Iri(i.into())
    }
    pub fn blank(b: impl Into<String>) -> Self {
        Term::BlankNode(b.into())
    }
    pub fn literal(v: impl Into<String>) -> Self {
        Term::Literal {
            value: v.into(),
            datatype: None,
            language: None,
        }
    }
    pub fn typed_literal(v: impl Into<String>, dt: impl Into<String>) -> Self {
        Term::Literal {
            value: v.into(),
            datatype: Some(dt.into()),
            language: None,
        }
    }
    /// A language-tagged literal, e.g. `"chat"@en`.
    pub fn lang_literal(v: impl Into<String>, lang: impl Into<String>) -> Self {
        Term::Literal {
            value: v.into(),
            datatype: None,
            language: Some(lang.into()),
        }
    }

    fn write_ntriples(&self, out: &mut String) {
        match self {
            Term::Iri(i) => {
                out.push('<');
                out.push_str(i);
                out.push('>');
            }
            Term::BlankNode(b) => {
                out.push_str("_:");
                out.push_str(b);
            }
            Term::Literal {
                value,
                datatype,
                language,
            } => {
                out.push('"');
                for c in value.chars() {
                    match c {
                        '\\' => out.push_str("\\\\"),
                        '"' => out.push_str("\\\""),
                        '\n' => out.push_str("\\n"),
                        '\r' => out.push_str("\\r"),
                        '\t' => out.push_str("\\t"),
                        _ => out.push(c),
                    }
                }
                out.push('"');
                if let Some(lang) = language {
                    out.push('@');
                    out.push_str(lang);
                } else if let Some(dt) = datatype {
                    out.push_str("^^<");
                    out.push_str(dt);
                    out.push('>');
                }
            }
        }
    }
}

#[derive(Debug, Clone, PartialEq, Eq, PartialOrd, Ord)]
pub struct Triple {
    pub subject: Term,
    pub predicate: Term,
    pub object: Term,
}

impl Triple {
    pub fn new(subject: Term, predicate: Term, object: Term) -> Self {
        Self {
            subject,
            predicate,
            object,
        }
    }
}

/// Minimal RDF graph — a sorted set of triples.
#[derive(Debug, Clone, Default, PartialEq, Eq)]
pub struct Graph {
    triples: BTreeSet<Triple>,
}

impl Graph {
    pub fn new() -> Self {
        Self {
            triples: BTreeSet::new(),
        }
    }

    pub fn from_triples(triples: impl IntoIterator<Item = Triple>) -> Self {
        let mut g = Self::new();
        for t in triples {
            g.insert(t);
        }
        g
    }

    pub fn insert(&mut self, triple: Triple) {
        self.triples.insert(triple);
    }

    pub fn remove(&mut self, triple: &Triple) -> bool {
        self.triples.remove(triple)
    }

    pub fn contains(&self, triple: &Triple) -> bool {
        self.triples.contains(triple)
    }

    pub fn len(&self) -> usize {
        self.triples.len()
    }

    pub fn is_empty(&self) -> bool {
        self.triples.is_empty()
    }

    pub fn triples(&self) -> impl Iterator<Item = &Triple> {
        self.triples.iter()
    }

    /// Extend with all triples from another graph.
    pub fn extend(&mut self, other: &Graph) {
        for t in &other.triples {
            self.triples.insert(t.clone());
        }
    }

    /// Remove every triple in `other` that is present in `self`.
    pub fn subtract(&mut self, other: &Graph) {
        for t in &other.triples {
            self.triples.remove(t);
        }
    }

    /// Serialise to N-Triples.
    pub fn to_ntriples(&self) -> String {
        let mut out = String::new();
        for t in &self.triples {
            t.subject.write_ntriples(&mut out);
            out.push(' ');
            t.predicate.write_ntriples(&mut out);
            out.push(' ');
            t.object.write_ntriples(&mut out);
            out.push_str(" .\n");
        }
        out
    }

    /// Serialise to JSON-LD expanded form: a JSON array of node objects,
    /// one per subject. IRIs and blank nodes become `{"@id": ...}`
    /// references; literals become `{"@value": ...}` with `@language` or
    /// `@type` as applicable. `rdf:type` is collapsed into the JSON-LD
    /// `@type` keyword per the expansion algorithm. This is the inverse of
    /// the N-Triples the store persists, used by RDF content negotiation
    /// so a KG resource can be served as `application/ld+json` on demand.
    pub fn to_jsonld(&self) -> serde_json::Value {
        const RDF_TYPE: &str = "http://www.w3.org/1999/02/22-rdf-syntax-ns#type";

        fn node_ref(term: &Term) -> Option<serde_json::Value> {
            match term {
                Term::Iri(i) => Some(serde_json::json!({ "@id": i })),
                Term::BlankNode(b) => Some(serde_json::json!({ "@id": format!("_:{b}") })),
                Term::Literal { .. } => None,
            }
        }

        fn object_value(term: &Term) -> serde_json::Value {
            match term {
                Term::Iri(i) => serde_json::json!({ "@id": i }),
                Term::BlankNode(b) => serde_json::json!({ "@id": format!("_:{b}") }),
                Term::Literal {
                    value,
                    datatype,
                    language,
                } => {
                    let mut obj = serde_json::Map::new();
                    obj.insert("@value".into(), serde_json::Value::String(value.clone()));
                    if let Some(lang) = language {
                        obj.insert("@language".into(), serde_json::Value::String(lang.clone()));
                    } else if let Some(dt) = datatype {
                        obj.insert("@type".into(), serde_json::Value::String(dt.clone()));
                    }
                    serde_json::Value::Object(obj)
                }
            }
        }

        fn subject_id(term: &Term) -> String {
            match term {
                Term::Iri(i) => i.clone(),
                Term::BlankNode(b) => format!("_:{b}"),
                Term::Literal { value, .. } => value.clone(),
            }
        }

        // BTreeSet iteration is sorted by (subject, predicate, object), so
        // triples for a subject arrive contiguously — accumulate per node.
        let mut nodes: Vec<serde_json::Map<String, serde_json::Value>> = Vec::new();
        let mut current_id: Option<String> = None;
        for t in &self.triples {
            let sid = subject_id(&t.subject);
            if current_id.as_deref() != Some(sid.as_str()) {
                let mut node = serde_json::Map::new();
                node.insert("@id".into(), serde_json::Value::String(sid.clone()));
                nodes.push(node);
                current_id = Some(sid);
            }
            let node = nodes.last_mut().expect("node pushed above");

            if let Term::Iri(p) = &t.predicate {
                if p == RDF_TYPE {
                    if let Some(type_ref) = node_ref(&t.object) {
                        if let Some(serde_json::Value::String(id)) = type_ref.get("@id").cloned() {
                            node.entry("@type")
                                .or_insert_with(|| serde_json::Value::Array(Vec::new()))
                                .as_array_mut()
                                .expect("@type is an array")
                                .push(serde_json::Value::String(id));
                            continue;
                        }
                    }
                }
                node.entry(p.clone())
                    .or_insert_with(|| serde_json::Value::Array(Vec::new()))
                    .as_array_mut()
                    .expect("predicate value is an array")
                    .push(object_value(&t.object));
            }
        }

        serde_json::Value::Array(nodes.into_iter().map(serde_json::Value::Object).collect())
    }

    /// Parse N-Triples — supports the full EBNF subset used by PATCH.
    pub fn parse_ntriples(input: &str) -> Result<Self, PodError> {
        let mut g = Graph::new();
        for (i, line) in input.lines().enumerate() {
            let line = line.trim();
            if line.is_empty() || line.starts_with('#') {
                continue;
            }
            let t = parse_nt_line(line)
                .map_err(|e| PodError::Unsupported(format!("N-Triples line {}: {e}", i + 1)))?;
            g.insert(t);
        }
        Ok(g)
    }
}

fn parse_nt_line(line: &str) -> Result<Triple, String> {
    let line = line.trim_end_matches('.').trim();
    let (subject, rest) = read_term(line)?;
    let rest = rest.trim_start();
    let (predicate, rest) = read_term(rest)?;
    let rest = rest.trim_start();
    let (object, rest) = read_term(rest)?;
    // One statement per line: anything after the object (a `;`/`,` list or
    // a second statement) is Turtle, not N-Triples, and ignoring it would
    // silently drop triples. A terminating `.` and a trailing `# comment`
    // are valid N-Triples and are allowed.
    let rest = rest.trim_start();
    let rest = rest.strip_prefix('.').unwrap_or(rest).trim_start();
    if !rest.is_empty() && !rest.starts_with('#') {
        return Err(format!(
            "unexpected content after the object: {}",
            rest.trim()
        ));
    }
    Ok(Triple::new(subject, predicate, object))
}

fn read_term(input: &str) -> Result<(Term, &str), String> {
    let input = input.trim_start();
    if let Some(rest) = input.strip_prefix('<') {
        let end = rest
            .find('>')
            .ok_or_else(|| "unterminated IRI".to_string())?;
        let iri = &rest[..end];
        Ok((Term::Iri(iri.to_string()), &rest[end + 1..]))
    } else if let Some(rest) = input.strip_prefix("_:") {
        let end = rest
            .find(|c: char| c.is_whitespace() || c == '.')
            .unwrap_or(rest.len());
        Ok((Term::BlankNode(rest[..end].to_string()), &rest[end..]))
    } else if input.starts_with('"') {
        read_literal(input)
    } else {
        Err(format!(
            "unexpected char: {}",
            input.chars().next().unwrap_or('?')
        ))
    }
}

fn read_literal(input: &str) -> Result<(Term, &str), String> {
    // Walk by char, not byte: a byte loop pushed each UTF-8 byte as its own
    // char, so every PATCH re-encoded stored non-ASCII text (`é` became
    // `c3 83 c2 a9`). `\uXXXX` and `\UXXXXXXXX` are decoded per N-Triples.
    let mut chars = input.char_indices();
    if chars.next().map(|(_, c)| c) != Some('"') {
        return Err("expected '\"'".to_string());
    }
    let mut value = String::new();
    let mut i = input.len();
    let mut closed = false;
    while let Some((pos, c)) = chars.next() {
        match c {
            '"' => {
                i = pos + 1;
                closed = true;
                break;
            }
            '\\' => {
                let (_, esc) = chars.next().ok_or_else(|| "dangling escape".to_string())?;
                match esc {
                    'n' => value.push('\n'),
                    't' => value.push('\t'),
                    'r' => value.push('\r'),
                    'b' => value.push('\u{8}'),
                    'f' => value.push('\u{c}'),
                    '"' | '\'' | '\\' => value.push(esc),
                    'u' | 'U' => {
                        let width = if esc == 'u' { 4 } else { 8 };
                        let hex: String = chars.by_ref().take(width).map(|(_, h)| h).collect();
                        let code = u32::from_str_radix(&hex, 16)
                            .ok()
                            .filter(|_| hex.len() == width)
                            .ok_or_else(|| format!("bad \\{esc} escape"))?;
                        value.push(
                            char::from_u32(code)
                                .ok_or_else(|| format!("bad code point {code:x}"))?,
                        );
                    }
                    other => return Err(format!("unknown escape \\{other}")),
                }
            }
            other => value.push(other),
        }
    }
    if !closed {
        return Err("unterminated literal".to_string());
    }
    let rest = &input[i..];
    let (datatype, language, rest) = if let Some(r) = rest.strip_prefix("^^<") {
        let end = r
            .find('>')
            .ok_or_else(|| "unterminated datatype IRI".to_string())?;
        (Some(r[..end].to_string()), None, &r[end + 1..])
    } else if let Some(r) = rest.strip_prefix('@') {
        let end = r
            .find(|c: char| c.is_whitespace() || c == '.')
            .unwrap_or(r.len());
        (None, Some(r[..end].to_string()), &r[end..])
    } else {
        (None, None, rest)
    };
    Ok((
        Term::Literal {
            value,
            datatype,
            language,
        },
        rest,
    ))
}

// ---------------------------------------------------------------------------
// Server-managed triples
// ---------------------------------------------------------------------------

/// Compute the server-managed triples for a resource (`dc:modified`,
/// `stat:size`, and for containers `ldp:contains` entries).
pub fn server_managed_triples(
    resource_iri: &str,
    modified: chrono::DateTime<chrono::Utc>,
    size: u64,
    is_container_flag: bool,
    contained: &[String],
) -> Graph {
    let mut g = Graph::new();
    let subject = Term::iri(resource_iri);

    g.insert(Triple::new(
        subject.clone(),
        Term::iri(iri::DCTERMS_MODIFIED),
        Term::typed_literal(modified.to_rfc3339(), iri::XSD_DATETIME),
    ));
    g.insert(Triple::new(
        subject.clone(),
        Term::iri(iri::STAT_SIZE),
        Term::typed_literal(size.to_string(), iri::XSD_INTEGER),
    ));
    g.insert(Triple::new(
        subject.clone(),
        Term::iri(iri::STAT_MTIME),
        Term::typed_literal(modified.timestamp().to_string(), iri::XSD_INTEGER),
    ));

    if is_container_flag {
        for child in contained {
            let base = if resource_iri.ends_with('/') {
                resource_iri.to_string()
            } else {
                format!("{resource_iri}/")
            };
            g.insert(Triple::new(
                subject.clone(),
                Term::iri(iri::LDP_CONTAINS),
                Term::iri(format!("{base}{child}")),
            ));
        }
    }
    g
}

/// List of predicates clients are not allowed to set directly. These
/// are overwritten by the server on PUT.
pub const SERVER_MANAGED_PREDICATES: &[&str] = &[
    iri::DCTERMS_MODIFIED,
    iri::STAT_SIZE,
    iri::STAT_MTIME,
    iri::LDP_CONTAINS,
];

/// Return the list of client-supplied triples that attempt to set
/// server-managed predicates. These MUST be ignored at PUT time.
pub fn find_illegal_server_managed(graph: &Graph) -> Vec<Triple> {
    graph
        .triples()
        .filter(|t| {
            if let Term::Iri(p) = &t.predicate {
                SERVER_MANAGED_PREDICATES.iter().any(|sm| sm == p)
            } else {
                false
            }
        })
        .cloned()
        .collect()
}

// ---------------------------------------------------------------------------
// Container representation (JSON-LD + Turtle)
// ---------------------------------------------------------------------------

#[derive(Debug, Serialize)]
pub struct ContainerMember {
    #[serde(rename = "@id")]
    pub id: String,
    #[serde(rename = "@type")]
    pub types: Vec<&'static str>,
}

/// Render a container as JSON-LD respecting a `Prefer` header.
pub fn render_container_jsonld(
    container_path: &str,
    members: &[String],
    prefer: PreferHeader,
) -> serde_json::Value {
    let base = if container_path.ends_with('/') {
        container_path.to_string()
    } else {
        format!("{container_path}/")
    };

    match prefer.representation {
        ContainerRepresentation::ContainedIRIsOnly => serde_json::json!({
            "@id": container_path,
            "ldp:contains": members
                .iter()
                .map(|m| serde_json::json!({"@id": format!("{base}{m}")}))
                .collect::<Vec<_>>(),
        }),
        ContainerRepresentation::MinimalContainer => serde_json::json!({
            "@context": {
                "ldp": iri::LDP_NS,
                "dcterms": iri::DCTERMS_NS,
            },
            "@id": container_path,
            "@type": [ "ldp:Container", "ldp:BasicContainer", "ldp:Resource" ],
        }),
        ContainerRepresentation::Full => {
            let contains: Vec<ContainerMember> = members
                .iter()
                .map(|m| {
                    let is_dir = m.ends_with('/');
                    ContainerMember {
                        id: format!("{base}{m}"),
                        types: if is_dir {
                            vec![
                                iri::LDP_BASIC_CONTAINER,
                                iri::LDP_CONTAINER,
                                iri::LDP_RESOURCE,
                            ]
                        } else {
                            vec![iri::LDP_RESOURCE]
                        },
                    }
                })
                .collect();
            serde_json::json!({
                "@context": {
                    "ldp": iri::LDP_NS,
                    "dcterms": iri::DCTERMS_NS,
                    "contains": { "@id": "ldp:contains", "@type": "@id" },
                },
                "@id": container_path,
                "@type": [ "ldp:Container", "ldp:BasicContainer", "ldp:Resource" ],
                "ldp:contains": contains,
            })
        }
    }
}

/// Backwards-compatible alias for the Phase 1 API.
pub fn render_container(container_path: &str, members: &[String]) -> serde_json::Value {
    render_container_jsonld(container_path, members, PreferHeader::default())
}

/// Render a container as Turtle.
pub fn render_container_turtle(
    container_path: &str,
    members: &[String],
    prefer: PreferHeader,
) -> String {
    let base = if container_path.ends_with('/') {
        container_path.to_string()
    } else {
        format!("{container_path}/")
    };
    let mut out = String::new();
    let _ = writeln!(out, "@prefix ldp: <{}> .", iri::LDP_NS);
    let _ = writeln!(out, "@prefix dcterms: <{}> .", iri::DCTERMS_NS);
    let _ = writeln!(out);
    match prefer.representation {
        ContainerRepresentation::ContainedIRIsOnly => {
            let _ = writeln!(out, "<{container_path}> ldp:contains");
            let list: Vec<String> = members.iter().map(|m| format!("    <{base}{m}>")).collect();
            let _ = writeln!(out, "{} .", list.join(",\n"));
        }
        ContainerRepresentation::MinimalContainer => {
            let _ = writeln!(
                out,
                "<{container_path}> a ldp:BasicContainer, ldp:Container, ldp:Resource ."
            );
        }
        ContainerRepresentation::Full => {
            let _ = writeln!(
                out,
                "<{container_path}> a ldp:BasicContainer, ldp:Container, ldp:Resource ;"
            );
            if members.is_empty() {
                // Drop the trailing `;` from the previous line.
                let fixed = out.trim_end().trim_end_matches(';').to_string();
                out = fixed;
                out.push_str(" .\n");
            } else {
                let list: Vec<String> = members
                    .iter()
                    .map(|m| format!("    ldp:contains <{base}{m}>"))
                    .collect();
                let _ = writeln!(out, "{} .", list.join(" ;\n"));
            }
        }
    }
    out
}

// ---------------------------------------------------------------------------
// PATCH — N3 and SPARQL-Update
// ---------------------------------------------------------------------------

/// Outcome of evaluating a PATCH request.
#[derive(Debug, Clone, PartialEq, Eq)]
pub struct PatchOutcome {
    /// Graph after the patch was applied.
    pub graph: Graph,
    /// Number of triples inserted.
    pub inserted: usize,
    /// Number of triples deleted.
    pub deleted: usize,
}

/// Apply a Solid N3 Patch document to `target`.
///
/// Equivalent to [`N3Patch::parse`] with no base IRI followed by
/// [`N3Patch::apply`]: the body is parsed with the full N3 grammar, so
/// prefixed names, `;`/`,` lists and long literals are accepted, but a
/// relative IRI is a syntax error. Servers should call [`N3Patch::parse`]
/// with the resource URL as the base instead, so relative IRIs resolve as a
/// client expects and the request can be authorised before it is applied.
///
/// ```
/// use solid_pod_rs::ldp::{apply_n3_patch, Graph};
///
/// let out = apply_n3_patch(
///     Graph::new(),
///     "@prefix solid: <http://www.w3.org/ns/solid/terms#>.\n\
///      _:p a solid:InsertDeletePatch; solid:inserts { <http://e/s> <http://e/p> \"o\" }.",
/// )
/// .unwrap();
/// assert_eq!(out.inserted, 1);
/// ```
///
/// # Errors
///
/// See [`N3Patch::parse`] and [`N3Patch::apply`].
pub fn apply_n3_patch(target: Graph, patch: &str) -> Result<PatchOutcome, PodError> {
    N3Patch::parse(patch, None)?.apply(target)
}

/// Maximum size (in bytes) of a SPARQL-Update body the server will
/// attempt to parse.  Inputs larger than this are rejected before
/// reaching the parser, preventing DoS through pathologically large or
/// deeply nested SPARQL documents.
pub const SPARQL_UPDATE_MAX_BYTES: usize = 1_048_576; // 1 MiB

/// Apply a SPARQL 1.1 Update document (`INSERT DATA`, `DELETE DATA`,
/// `DELETE WHERE`) to `target` using `spargebra` for parsing.
///
/// Rejects inputs exceeding [`SPARQL_UPDATE_MAX_BYTES`] before parsing.
pub fn apply_sparql_patch(target: Graph, update: &str) -> Result<PatchOutcome, PodError> {
    if update.len() > SPARQL_UPDATE_MAX_BYTES {
        return Err(PodError::BadRequest(format!(
            "SPARQL-Update body exceeds {} byte limit ({} bytes)",
            SPARQL_UPDATE_MAX_BYTES,
            update.len(),
        )));
    }

    use spargebra::term::{
        GraphName, GraphNamePattern, GroundQuad, GroundQuadPattern, GroundSubject, GroundTerm,
        GroundTermPattern, NamedNodePattern, Quad, Subject, Term as SpTerm,
    };
    use spargebra::{GraphUpdateOperation, Update};

    let parsed = Update::parse(update, None)
        .map_err(|e| PodError::Unsupported(format!("SPARQL parse error: {e}")))?;

    // Our in-crate `Term::literal` helper stores plain literals with
    // `datatype: None`, matching the N-Triples fast path. spargebra,
    // however, canonicalises every plain (non-language-tagged) literal
    // to `xsd:string` per RDF 1.1. Normalise back to `None` so graphs
    // built via `Term::literal` compare equal to graphs produced by
    // SPARQL parsing.
    fn build_literal(value: String, datatype: Option<String>, language: Option<String>) -> Term {
        let datatype = datatype.filter(|d| d != iri::XSD_STRING);
        Term::Literal {
            value,
            datatype,
            language,
        }
    }

    fn map_subject(s: &Subject) -> Option<Term> {
        match s {
            Subject::NamedNode(n) => Some(Term::Iri(n.as_str().to_string())),
            Subject::BlankNode(b) => Some(Term::BlankNode(b.as_str().to_string())),
            #[allow(unreachable_patterns)]
            _ => None,
        }
    }
    fn map_term(t: &SpTerm) -> Option<Term> {
        match t {
            SpTerm::NamedNode(n) => Some(Term::Iri(n.as_str().to_string())),
            SpTerm::BlankNode(b) => Some(Term::BlankNode(b.as_str().to_string())),
            SpTerm::Literal(lit) => {
                let value = lit.value().to_string();
                if let Some(lang) = lit.language() {
                    Some(build_literal(value, None, Some(lang.to_string())))
                } else {
                    Some(build_literal(
                        value,
                        Some(lit.datatype().as_str().to_string()),
                        None,
                    ))
                }
            }
            #[allow(unreachable_patterns)]
            _ => None,
        }
    }
    fn map_ground_subject(s: &GroundSubject) -> Option<Term> {
        match s {
            GroundSubject::NamedNode(n) => Some(Term::Iri(n.as_str().to_string())),
            #[allow(unreachable_patterns)]
            _ => None,
        }
    }
    fn map_ground_term(t: &GroundTerm) -> Option<Term> {
        match t {
            GroundTerm::NamedNode(n) => Some(Term::Iri(n.as_str().to_string())),
            GroundTerm::Literal(lit) => {
                let value = lit.value().to_string();
                if let Some(lang) = lit.language() {
                    Some(build_literal(value, None, Some(lang.to_string())))
                } else {
                    Some(build_literal(
                        value,
                        Some(lit.datatype().as_str().to_string()),
                        None,
                    ))
                }
            }
            #[allow(unreachable_patterns)]
            _ => None,
        }
    }
    fn map_ground_term_pattern(t: &GroundTermPattern) -> Option<Term> {
        match t {
            GroundTermPattern::NamedNode(n) => Some(Term::Iri(n.as_str().to_string())),
            GroundTermPattern::Literal(lit) => {
                let value = lit.value().to_string();
                if let Some(lang) = lit.language() {
                    Some(build_literal(value, None, Some(lang.to_string())))
                } else {
                    Some(build_literal(
                        value,
                        Some(lit.datatype().as_str().to_string()),
                        None,
                    ))
                }
            }
            _ => None,
        }
    }

    fn quad_to_triple(q: &Quad) -> Option<Triple> {
        if !matches!(q.graph_name, GraphName::DefaultGraph) {
            return None;
        }
        Some(Triple::new(
            map_subject(&q.subject)?,
            Term::Iri(q.predicate.as_str().to_string()),
            map_term(&q.object)?,
        ))
    }
    fn ground_quad_to_triple(q: &GroundQuad) -> Option<Triple> {
        if !matches!(q.graph_name, GraphName::DefaultGraph) {
            return None;
        }
        Some(Triple::new(
            map_ground_subject(&q.subject)?,
            Term::Iri(q.predicate.as_str().to_string()),
            map_ground_term(&q.object)?,
        ))
    }
    fn ground_quad_pattern_to_triple(q: &GroundQuadPattern) -> Option<Triple> {
        if !matches!(q.graph_name, GraphNamePattern::DefaultGraph) {
            return None;
        }
        let predicate = match &q.predicate {
            NamedNodePattern::NamedNode(n) => Term::Iri(n.as_str().to_string()),
            NamedNodePattern::Variable(_) => return None,
        };
        Some(Triple::new(
            map_ground_term_pattern(&q.subject)?,
            predicate,
            map_ground_term_pattern(&q.object)?,
        ))
    }

    let mut graph = target;
    let mut inserted = 0usize;
    let mut deleted = 0usize;

    for op in &parsed.operations {
        match op {
            GraphUpdateOperation::InsertData { data } => {
                for q in data {
                    if let Some(tr) = quad_to_triple(q) {
                        if !graph.contains(&tr) {
                            graph.insert(tr);
                            inserted += 1;
                        }
                    }
                }
            }
            GraphUpdateOperation::DeleteData { data } => {
                for q in data {
                    if let Some(tr) = ground_quad_to_triple(q) {
                        if graph.remove(&tr) {
                            deleted += 1;
                        }
                    }
                }
            }
            GraphUpdateOperation::DeleteInsert { delete, insert, .. } => {
                for q in delete {
                    if let Some(tr) = ground_quad_pattern_to_triple(q) {
                        if graph.remove(&tr) {
                            deleted += 1;
                        }
                    }
                }
                for q in insert {
                    // Only insert triples whose template is fully
                    // ground (no variable bindings). Templates with
                    // variables require WHERE-clause resolution,
                    // which the pod does not implement for PATCH.
                    let gqp = match convert_quad_pattern_to_ground(q) {
                        Some(g) => g,
                        None => continue,
                    };
                    if let Some(tr) = ground_quad_pattern_to_triple(&gqp) {
                        if !graph.contains(&tr) {
                            graph.insert(tr);
                            inserted += 1;
                        }
                    }
                }
            }
            _ => {
                return Err(PodError::Unsupported(format!(
                    "unsupported SPARQL operation: {op:?}"
                )));
            }
        }
    }

    Ok(PatchOutcome {
        graph,
        inserted,
        deleted,
    })
}

fn convert_quad_pattern_to_ground(
    q: &spargebra::term::QuadPattern,
) -> Option<spargebra::term::GroundQuadPattern> {
    use spargebra::term::{
        GraphNamePattern, GroundQuadPattern, GroundTermPattern, NamedNodePattern, TermPattern,
    };

    let subject = match &q.subject {
        TermPattern::NamedNode(n) => GroundTermPattern::NamedNode(n.clone()),
        TermPattern::Literal(l) => GroundTermPattern::Literal(l.clone()),
        _ => return None,
    };
    let predicate = match &q.predicate {
        NamedNodePattern::NamedNode(n) => NamedNodePattern::NamedNode(n.clone()),
        NamedNodePattern::Variable(_) => return None,
    };
    let object = match &q.object {
        TermPattern::NamedNode(n) => GroundTermPattern::NamedNode(n.clone()),
        TermPattern::Literal(l) => GroundTermPattern::Literal(l.clone()),
        _ => return None,
    };
    let graph_name = match &q.graph_name {
        GraphNamePattern::DefaultGraph => GraphNamePattern::DefaultGraph,
        GraphNamePattern::NamedNode(n) => GraphNamePattern::NamedNode(n.clone()),
        GraphNamePattern::Variable(_) => return None,
    };
    Some(GroundQuadPattern {
        subject,
        predicate,
        object,
        graph_name,
    })
}

// ---------------------------------------------------------------------------
// Conditional requests (RFC 7232: If-Match / If-None-Match / If-Modified-Since)
// ---------------------------------------------------------------------------

/// Outcome of evaluating conditional request headers against a current
/// resource ETag.
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub enum ConditionalOutcome {
    /// The request may proceed.
    Proceed,
    /// Request must fail with `412 Precondition Failed` (e.g.
    /// `If-Match` mismatch).
    PreconditionFailed,
    /// Request should return `304 Not Modified` (GET/HEAD only with
    /// `If-None-Match`).
    NotModified,
}

/// Evaluate `If-Match` and `If-None-Match` precondition headers against
/// the current ETag of a resource. The caller passes whatever is
/// observed on the storage side; `None` for the ETag means the
/// resource does not exist.
///
/// * `If-Match: *` matches any existing resource (fails if absent). `*` is a
///   wildcard only as the whole field value; inside a list, or quoted
///   (`"*"`), it is an ordinary tag.
/// * `If-None-Match: *` fails if the resource exists.
/// * `If-Match: "etag1", "etag2"` — pass if any matches, by strong
///   comparison (RFC 9110 §13.1.1): weak tags (`W/"…"`) never match.
///   `If-None-Match` uses weak comparison (§13.1.2).
/// * `If-None-Match: "etag1", "etag2"` — for GET/HEAD a match means
///   `NotModified`; for any other method a match means
///   `PreconditionFailed`.
pub fn evaluate_preconditions(
    method: &str,
    current_etag: Option<&str>,
    if_match: Option<&str>,
    if_none_match: Option<&str>,
) -> ConditionalOutcome {
    let method_upper = method.to_ascii_uppercase();
    let safe = method_upper == "GET" || method_upper == "HEAD";

    if let Some(im) = if_match {
        let raw = im.trim();
        if raw == "*" {
            if current_etag.is_none() {
                return ConditionalOutcome::PreconditionFailed;
            }
        } else {
            // Strong comparison (RFC 9110 §13.1.1): weak tags never match.
            let wanted = parse_etag_list(raw, true);
            match current_etag {
                None => return ConditionalOutcome::PreconditionFailed,
                Some(cur) => {
                    if !wanted.iter().any(|w| w == cur) {
                        return ConditionalOutcome::PreconditionFailed;
                    }
                }
            }
        }
    }

    if let Some(inm) = if_none_match {
        let raw = inm.trim();
        if raw == "*" {
            if current_etag.is_some() {
                if safe {
                    return ConditionalOutcome::NotModified;
                }
                return ConditionalOutcome::PreconditionFailed;
            }
        } else {
            // Weak comparison (RFC 9110 §13.1.2).
            let wanted = parse_etag_list(raw, false);
            if let Some(cur) = current_etag {
                if wanted.iter().any(|w| w == cur) {
                    if safe {
                        return ConditionalOutcome::NotModified;
                    }
                    return ConditionalOutcome::PreconditionFailed;
                }
            }
        }
    }

    ConditionalOutcome::Proceed
}

/// The opaque tags of an entity-tag list, without quotes. With `strong`,
/// weak tags (`W/"…"`) are dropped, since strong comparison never matches
/// them; otherwise their `W/` prefix is stripped (weak comparison).
fn parse_etag_list(input: &str, strong: bool) -> Vec<String> {
    input
        .split(',')
        .map(|s| s.trim())
        .filter(|s| !s.is_empty())
        .filter_map(|s| match s.strip_prefix("W/") {
            Some(_) if strong => None,
            Some(weak) => Some(weak),
            None => Some(s),
        })
        .map(|s| s.trim_matches('"').to_string())
        .collect()
}

// ---------------------------------------------------------------------------
// Byte-range requests (RFC 7233)
// ---------------------------------------------------------------------------

/// A parsed byte range. `end` is inclusive per RFC 7233 §2.1.
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub struct ByteRange {
    pub start: u64,
    pub end: u64,
}

impl ByteRange {
    pub fn length(&self) -> u64 {
        self.end.saturating_sub(self.start) + 1
    }
    /// Render as the `Content-Range` header value (without the
    /// `Content-Range: ` prefix).
    pub fn content_range(&self, total: u64) -> String {
        format!("bytes {}-{}/{}", self.start, self.end, total)
    }
}

/// Parse a `Range:` header value of the form `bytes=start-end` or
/// `bytes=start-` or `bytes=-suffix`. Multi-range is intentionally
/// not supported — Solid Pods treat non-rangeable media (JSON-LD,
/// Turtle) as opaque and the binary path is the only consumer.
///
/// Returns `Ok(None)` when the header is absent, `Err` when the header
/// is syntactically valid but unsatisfiable (clients must receive
/// `416 Range Not Satisfiable`), and `Ok(Some(range))` for the
/// happy path.
pub fn parse_range_header(header: Option<&str>, total: u64) -> Result<Option<ByteRange>, PodError> {
    let raw = match header {
        Some(v) if !v.trim().is_empty() => v.trim(),
        _ => return Ok(None),
    };
    let spec = raw
        .strip_prefix("bytes=")
        .ok_or_else(|| PodError::Unsupported(format!("unsupported Range unit: {raw}")))?;
    if spec.contains(',') {
        return Err(PodError::Unsupported(
            "multi-range requests not supported".into(),
        ));
    }
    let (start_s, end_s) = spec
        .split_once('-')
        .ok_or_else(|| PodError::Unsupported(format!("malformed Range: {spec}")))?;
    if total == 0 {
        return Err(PodError::PreconditionFailed(
            "range request against empty resource".into(),
        ));
    }

    let range = if start_s.is_empty() {
        // suffix: `bytes=-500`
        let suffix: u64 = end_s
            .parse()
            .map_err(|e| PodError::Unsupported(format!("range suffix parse: {e}")))?;
        if suffix == 0 {
            return Err(PodError::PreconditionFailed("zero suffix length".into()));
        }
        let start = total.saturating_sub(suffix);
        ByteRange {
            start,
            end: total - 1,
        }
    } else {
        let start: u64 = start_s
            .parse()
            .map_err(|e| PodError::Unsupported(format!("range start parse: {e}")))?;
        let end = if end_s.is_empty() {
            total - 1
        } else {
            let v: u64 = end_s
                .parse()
                .map_err(|e| PodError::Unsupported(format!("range end parse: {e}")))?;
            v.min(total - 1)
        };
        if start > end {
            return Err(PodError::PreconditionFailed(format!(
                "unsatisfiable range: {start}-{end}"
            )));
        }
        if start >= total {
            return Err(PodError::PreconditionFailed(format!(
                "range start {start} >= total {total}"
            )));
        }
        ByteRange { start, end }
    };
    Ok(Some(range))
}

/// Outcome of evaluating `Range:` against a known resource length.
/// `Full` → 200 (no `Range:` header); `Partial` → 206; `NotSatisfiable`
/// → 416 (not 412, which the old [`parse_range_header`] conflated).
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub enum RangeOutcome {
    Full,
    Partial(ByteRange),
    NotSatisfiable,
}

/// JSS-parity range parser. Same grammar as [`parse_range_header`] but
/// maps "empty body + header present" and "range past end" to
/// `NotSatisfiable`. Malformed headers still return `Err` so callers
/// can reply `400`.
pub fn parse_range_header_v2(header: Option<&str>, total: u64) -> Result<RangeOutcome, PodError> {
    let raw = match header {
        Some(v) if !v.trim().is_empty() => v.trim(),
        _ => return Ok(RangeOutcome::Full),
    };
    let spec = raw
        .strip_prefix("bytes=")
        .ok_or_else(|| PodError::Unsupported(format!("unsupported Range unit: {raw}")))?;
    if spec.contains(',') {
        return Err(PodError::Unsupported("multi-range not supported".into()));
    }
    let (start_s, end_s) = spec
        .split_once('-')
        .ok_or_else(|| PodError::Unsupported(format!("malformed Range: {spec}")))?;
    if total == 0 {
        return Ok(RangeOutcome::NotSatisfiable);
    }
    let range = if start_s.is_empty() {
        let suffix: u64 = end_s
            .parse()
            .map_err(|e| PodError::Unsupported(format!("range suffix parse: {e}")))?;
        if suffix == 0 {
            return Ok(RangeOutcome::NotSatisfiable);
        }
        ByteRange {
            start: total.saturating_sub(suffix),
            end: total - 1,
        }
    } else {
        let start: u64 = start_s
            .parse()
            .map_err(|e| PodError::Unsupported(format!("range start parse: {e}")))?;
        let end = if end_s.is_empty() {
            total - 1
        } else {
            let v: u64 = end_s
                .parse()
                .map_err(|e| PodError::Unsupported(format!("range end parse: {e}")))?;
            v.min(total - 1)
        };
        if start > end || start >= total {
            return Ok(RangeOutcome::NotSatisfiable);
        }
        ByteRange { start, end }
    };
    Ok(RangeOutcome::Partial(range))
}

/// Slice a body buffer to a byte range. The slice is a zero-copy
/// view; callers are expected to `copy_from_slice` or similar when
/// returning it through an HTTP framework.
pub fn slice_range(body: &[u8], range: ByteRange) -> &[u8] {
    let end_excl = (range.end as usize + 1).min(body.len());
    let start = (range.start as usize).min(end_excl);
    &body[start..end_excl]
}

// ---------------------------------------------------------------------------
// OPTIONS response (RFC 7231 §4.3.7)
// ---------------------------------------------------------------------------

/// Build the set of values returned on OPTIONS for a Solid resource.
///
/// * `Allow` advertises methods the resource supports.
/// * `Accept-Post` is set for containers.
/// * `Accept-Patch` advertises supported PATCH dialects.
/// * `Accept-Ranges: bytes` is always advertised so binary resources
///   can be sliced with `Range:` requests.
/// * `Cache-Control` mirrors the RDF variant policy since OPTIONS
///   responses describe the RDF-shaped conneg surface (JSS #315).
#[derive(Debug, Clone)]
pub struct OptionsResponse {
    pub allow: Vec<&'static str>,
    pub accept_post: Option<&'static str>,
    pub accept_patch: &'static str,
    pub accept_ranges: &'static str,
    pub cache_control: &'static str,
}

/// `Accept-Patch` advertising the PATCH dialects supported.
pub const ACCEPT_PATCH: &str = "text/n3, application/sparql-update, application/json-patch+json";

pub fn options_for(path: &str) -> OptionsResponse {
    options_for_conneg(path, false)
}

/// [`options_for`] with the conneg setting: when `conneg_enabled`, the
/// container `Accept-Post` also lists `text/n3` (JSS conneg.js 228-233).
pub fn options_for_conneg(path: &str, conneg_enabled: bool) -> OptionsResponse {
    let container = is_container(path);
    let mut allow = vec!["GET", "HEAD", "OPTIONS"];
    if container {
        allow.push("POST");
        allow.push("PUT");
    } else {
        allow.push("PUT");
        allow.push("PATCH");
    }
    allow.push("DELETE");
    OptionsResponse {
        allow,
        accept_post: if container {
            Some(accept_post_for(conneg_enabled))
        } else {
            None
        },
        accept_patch: ACCEPT_PATCH,
        // Containers are not byte-rangeable — they render server-side
        // RDF representations. Only leaf resources carry bytes that a
        // `Range:` request can meaningfully slice. JSS advertises
        // `Accept-Ranges: none` on containers; we match.
        accept_ranges: if container { "none" } else { "bytes" },
        // OPTIONS describes the RDF-shaped conneg surface on Solid
        // resources. Shared caches must not fuse auth-variant responses,
        // and clients revalidate via ETag on every use (JSS #315).
        cache_control: CACHE_CONTROL_RDF,
    }
}

/// Build the header set returned on `404 Not Found` for an LDP path.
///
/// JSS emits a rich discovery header set on 404 so that clients can
/// drive a PUT-to-create or POST-to-container flow without a second
/// OPTIONS round trip:
///
/// * `Allow` — methods the server will *accept* on this path. DELETE is
///   intentionally omitted because the resource does not exist.
/// * `Accept-Put: */*` — PUT accepts any content type (spec default).
/// * `Link: <path.acl>; rel="acl"` — ACL discovery.
/// * `Vary` — includes `Accept` when content negotiation is enabled so
///   caches key on it.
/// * `Accept-Post` — only for containers; advertises the RDF formats
///   usable as POST bodies.
pub fn not_found_headers(path: &str, conneg_enabled: bool) -> Vec<(&'static str, String)> {
    let container = is_container(path);
    let mut h: Vec<(&'static str, String)> = Vec::with_capacity(6);
    h.push(("Allow", "GET, HEAD, OPTIONS, PUT, PATCH".into()));
    h.push(("Accept-Put", "*/*".into()));
    h.push(("Accept-Patch", ACCEPT_PATCH.into()));
    h.push((
        "Link",
        format!("<{}>; rel=\"acl\"", crate::wac::acl_sidecar_key(path)),
    ));
    h.push(("Vary", vary_header(conneg_enabled).into()));
    // When conneg is enabled, the 404 advertises an RDF-shaped future
    // response surface (Allow/Accept-Post/Accept-Patch list RDF types).
    // Emit RDF Cache-Control so intermediaries cannot fuse the 404 with
    // a later 200 authenticated body. Mirrors JSS #315.
    if conneg_enabled {
        h.push(("Cache-Control", CACHE_CONTROL_RDF.into()));
    }
    if container {
        h.push(("Accept-Post", accept_post_for(conneg_enabled).into()));
    }
    h
}

/// Value of the `Vary:` header depending on whether content negotiation
/// is enabled. `Authorization` and `Origin` are always listed so shared
/// caches never collapse an authenticated and an anonymous response
/// onto the same cache entry.
pub fn vary_header(conneg_enabled: bool) -> &'static str {
    if conneg_enabled {
        "Accept, Authorization, Origin"
    } else {
        "Authorization, Origin"
    }
}

/// RFC 7234 `Cache-Control` directive for RDF response variants.
///
/// Emits `private, no-cache, must-revalidate` so shared caches never
/// serve one authenticated user's response to another. ETag-based
/// revalidation stays cheap (304). Mirrors JSS `RDF_CACHE_CONTROL`
/// in `src/handlers/resource.js` after PR #315 (commit 76fc5c6).
/// Binary blobs (images, uploads) are NOT RDF and keep their default
/// caching posture — callers decide.
pub const CACHE_CONTROL_RDF: &str = "private, no-cache, must-revalidate";

/// Return `true` if `content_type` identifies an RDF serialisation the
/// server emits through content negotiation or stores natively. Matches
/// the formats advertised in [`ACCEPT_POST`] plus `text/n3` and
/// `application/trig` (JSS parity). Parameters (e.g. `; charset=utf-8`)
/// are tolerated.
pub fn is_rdf_content_type(content_type: &str) -> bool {
    let base = content_type
        .split(';')
        .next()
        .unwrap_or("")
        .trim()
        .to_ascii_lowercase();
    matches!(
        base.as_str(),
        "text/turtle"
            | "application/turtle"
            | "application/x-turtle"
            | "application/ld+json"
            | "application/json+ld"
            | "application/n-triples"
            | "text/plain+ntriples"
            | "text/n3"
            | "application/trig"
    )
}

/// Return the `Cache-Control` header value appropriate for a response
/// of the supplied `content_type`, or `None` to leave the header
/// unset. RDF variants always get [`CACHE_CONTROL_RDF`]; non-RDF
/// payloads (binary blobs, images, etc.) are left to caller policy.
///
/// **Content type alone is not enough to decide cacheability.** A private
/// JPEG served from an authenticated container is not RDF, so this returns
/// `None` and the response carries no `Cache-Control` at all — which invites
/// a shared cache to store and re-serve it. Use
/// [`cache_control_for_response`] on any path where the response's audience
/// is known; this function remains for callers that genuinely only know the
/// media type.
pub fn cache_control_for(content_type: &str) -> Option<&'static str> {
    if is_rdf_content_type(content_type) {
        Some(CACHE_CONTROL_RDF)
    } else {
        None
    }
}

/// `Cache-Control` for a response that is not world-readable (ADR-2002).
///
/// `private` forbids a shared cache from storing it at all; `no-store`
/// forbids any cache — shared or private — from writing it to disk. Applied
/// together because a Solid pod's private resources are exactly the class of
/// data that must not survive in an intermediary.
pub const CACHE_CONTROL_PRIVATE: &str = "private, no-store";

/// How a response's audience bears on its cacheability.
///
/// The distinction that matters is **who could have received this body**, not
/// what type it is. A response produced under credentials, or one an
/// anonymous client would not have been given, is specific to its requester
/// and must never be re-served from a shared cache to someone else.
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub enum ResponseAudience {
    /// An anonymous request would receive the same body — safe to cache
    /// under the normal media-type policy.
    Public,
    /// The response was produced under credentials, or the resource is not
    /// readable anonymously. Must be marked private and non-storable.
    Private,
}

/// Return the `Cache-Control` value for a response, given both its media type
/// and its audience (ADR-2002).
///
/// * [`Private`](ResponseAudience::Private) → [`CACHE_CONTROL_PRIVATE`],
///   regardless of media type. This is the case the media-type-only policy
///   missed: a private non-RDF body previously went out with no
///   `Cache-Control` header, which under RFC 9111 leaves a shared cache free
///   to treat it as heuristically cacheable and re-serve it to another user.
/// * [`Public`](ResponseAudience::Public) → the RDF policy
///   ([`CACHE_CONTROL_RDF`]) for RDF variants, or `None` for public binary
///   payloads, where ordinary caching is desirable.
///
/// Always returns a value for private responses, so a caller that emits
/// `Some(v)` cannot accidentally leave a private response unmarked.
pub fn cache_control_for_response(
    content_type: &str,
    audience: ResponseAudience,
) -> Option<&'static str> {
    match audience {
        ResponseAudience::Private => Some(CACHE_CONTROL_PRIVATE),
        ResponseAudience::Public => cache_control_for(content_type),
    }
}

// ---------------------------------------------------------------------------
// JSON Patch (RFC 6902) — applied to the JSON representation of a
// resource. Keeps the surface intentionally small: `add`, `remove`,
// `replace`, `test`. `copy` and `move` are implemented on top.
// ---------------------------------------------------------------------------

/// Apply a JSON Patch document (RFC 6902) to a `serde_json::Value` in
/// place. Returns `Err(PodError::PreconditionFailed)` when a `test`
/// operation fails, `Err(PodError::Unsupported)` for malformed patches.
pub fn apply_json_patch(
    target: &mut serde_json::Value,
    patch: &serde_json::Value,
) -> Result<(), PodError> {
    let ops = patch
        .as_array()
        .ok_or_else(|| PodError::Unsupported("JSON Patch must be an array".into()))?;
    for op in ops {
        let op_name = op
            .get("op")
            .and_then(|v| v.as_str())
            .ok_or_else(|| PodError::Unsupported("JSON Patch op missing 'op'".into()))?;
        let path = op
            .get("path")
            .and_then(|v| v.as_str())
            .ok_or_else(|| PodError::Unsupported("JSON Patch op missing 'path'".into()))?;
        match op_name {
            "add" => {
                let value = op
                    .get("value")
                    .cloned()
                    .ok_or_else(|| PodError::Unsupported("add requires value".into()))?;
                json_pointer_set(target, path, value, /* add_mode = */ true)?;
            }
            "replace" => {
                let value = op
                    .get("value")
                    .cloned()
                    .ok_or_else(|| PodError::Unsupported("replace requires value".into()))?;
                json_pointer_set(target, path, value, /* add_mode = */ false)?;
            }
            "remove" => {
                json_pointer_remove(target, path)?;
            }
            "test" => {
                let value = op
                    .get("value")
                    .ok_or_else(|| PodError::Unsupported("test requires value".into()))?;
                let actual = json_pointer_get(target, path).ok_or_else(|| {
                    PodError::PreconditionFailed(format!("test path missing: {path}"))
                })?;
                if actual != value {
                    return Err(PodError::PreconditionFailed(format!(
                        "test failed at {path}"
                    )));
                }
            }
            "copy" => {
                let from = op
                    .get("from")
                    .and_then(|v| v.as_str())
                    .ok_or_else(|| PodError::Unsupported("copy requires from".into()))?;
                let value = json_pointer_get(target, from).cloned().ok_or_else(|| {
                    PodError::PreconditionFailed(format!("copy from missing: {from}"))
                })?;
                json_pointer_set(target, path, value, true)?;
            }
            "move" => {
                let from = op
                    .get("from")
                    .and_then(|v| v.as_str())
                    .ok_or_else(|| PodError::Unsupported("move requires from".into()))?;
                let value = json_pointer_get(target, from).cloned().ok_or_else(|| {
                    PodError::PreconditionFailed(format!("move from missing: {from}"))
                })?;
                json_pointer_remove(target, from)?;
                json_pointer_set(target, path, value, true)?;
            }
            other => {
                return Err(PodError::Unsupported(format!(
                    "unsupported JSON Patch op: {other}"
                )));
            }
        }
    }
    Ok(())
}

fn json_pointer_get<'a>(
    target: &'a serde_json::Value,
    path: &str,
) -> Option<&'a serde_json::Value> {
    if path.is_empty() {
        return Some(target);
    }
    target.pointer(path)
}

fn json_pointer_remove(target: &mut serde_json::Value, path: &str) -> Result<(), PodError> {
    if path.is_empty() {
        return Err(PodError::Unsupported("cannot remove root".into()));
    }
    let (parent_path, last) = split_pointer(path);
    let parent = target
        .pointer_mut(&parent_path)
        .ok_or_else(|| PodError::PreconditionFailed(format!("remove path missing: {path}")))?;
    match parent {
        serde_json::Value::Object(m) => {
            m.remove(&last).ok_or_else(|| {
                PodError::PreconditionFailed(format!("remove key missing: {path}"))
            })?;
            Ok(())
        }
        serde_json::Value::Array(a) => {
            let idx: usize = last.parse().map_err(|_| {
                PodError::Unsupported(format!("remove array index not numeric: {last}"))
            })?;
            if idx >= a.len() {
                return Err(PodError::PreconditionFailed(format!(
                    "remove array out of bounds: {idx}"
                )));
            }
            a.remove(idx);
            Ok(())
        }
        _ => Err(PodError::PreconditionFailed(format!(
            "remove target is not container: {path}"
        ))),
    }
}

fn json_pointer_set(
    target: &mut serde_json::Value,
    path: &str,
    value: serde_json::Value,
    add_mode: bool,
) -> Result<(), PodError> {
    if path.is_empty() {
        *target = value;
        return Ok(());
    }
    let (parent_path, last) = split_pointer(path);
    let parent = target
        .pointer_mut(&parent_path)
        .ok_or_else(|| PodError::PreconditionFailed(format!("set parent missing: {path}")))?;
    match parent {
        serde_json::Value::Object(m) => {
            if !add_mode && !m.contains_key(&last) {
                return Err(PodError::PreconditionFailed(format!(
                    "replace missing key: {path}"
                )));
            }
            m.insert(last, value);
            Ok(())
        }
        serde_json::Value::Array(a) => {
            if last == "-" {
                a.push(value);
                return Ok(());
            }
            let idx: usize = last
                .parse()
                .map_err(|_| PodError::Unsupported(format!("array index not numeric: {last}")))?;
            if add_mode {
                if idx > a.len() {
                    return Err(PodError::PreconditionFailed(format!(
                        "array add out of bounds: {idx}"
                    )));
                }
                a.insert(idx, value);
            } else {
                if idx >= a.len() {
                    return Err(PodError::PreconditionFailed(format!(
                        "array replace out of bounds: {idx}"
                    )));
                }
                a[idx] = value;
            }
            Ok(())
        }
        _ => Err(PodError::PreconditionFailed(format!(
            "set parent not container: {path}"
        ))),
    }
}

fn split_pointer(path: &str) -> (String, String) {
    match path.rfind('/') {
        Some(pos) => {
            let parent = path[..pos].to_string();
            let last_raw = &path[pos + 1..];
            let last = last_raw.replace("~1", "/").replace("~0", "~");
            (parent, last)
        }
        None => (String::new(), path.to_string()),
    }
}

/// Pick a PATCH dialect from the `Content-Type` header.
#[derive(Debug, Clone, Copy, PartialEq, Eq)]
pub enum PatchDialect {
    N3,
    SparqlUpdate,
    JsonPatch,
}

pub fn patch_dialect_from_mime(mime: &str) -> Option<PatchDialect> {
    let m = mime
        .split(';')
        .next()
        .unwrap_or("")
        .trim()
        .to_ascii_lowercase();
    match m.as_str() {
        "text/n3" | "application/n3" => Some(PatchDialect::N3),
        "application/sparql-update" | "application/sparql-update+update" => {
            Some(PatchDialect::SparqlUpdate)
        }
        "application/json-patch+json" => Some(PatchDialect::JsonPatch),
        _ => None,
    }
}

// ---------------------------------------------------------------------------
// PATCH against absent resource (JSS parity).
//
// JSS seeds an empty graph when a PATCH targets a path that does not
// yet exist and returns `201 Created`. JSON Patch is deliberately
// rejected on absent resources because RFC 6902 operates on an existing
// JSON document and `add`/`replace` at the root (`""`) would silently
// accept any shape — better to make the client issue a PUT first.
// ---------------------------------------------------------------------------

/// Outcome of applying a PATCH to a path that had no prior resource.
///
/// * `Created { .. }` — graph was seeded successfully; caller should
///   persist it and respond with `201 Created`.
/// * `Applied { .. }` — unused on the absent path today but reserved so
///   callers can match exhaustively in the same enum they use for the
///   non-absent code path.
#[derive(Debug)]
pub enum PatchCreateOutcome {
    /// Patch applied to a newly-seeded empty graph.
    Created { inserted: usize, graph: Graph },
    /// Patch applied to an existing graph (for symmetry; not produced
    /// by `apply_patch_to_absent`).
    Applied {
        inserted: usize,
        deleted: usize,
        graph: Graph,
    },
}

/// Apply a PATCH document to an absent resource by seeding an empty
/// graph and running the dialect-specific patcher. JSON Patch is
/// unsupported in this path.
pub fn apply_patch_to_absent(
    dialect: PatchDialect,
    body: &str,
) -> Result<PatchCreateOutcome, PodError> {
    match dialect {
        PatchDialect::N3 => {
            let outcome = apply_n3_patch(Graph::new(), body)?;
            Ok(PatchCreateOutcome::Created {
                inserted: outcome.inserted,
                graph: outcome.graph,
            })
        }
        PatchDialect::SparqlUpdate => {
            let outcome = apply_sparql_patch(Graph::new(), body)?;
            Ok(PatchCreateOutcome::Created {
                inserted: outcome.inserted,
                graph: outcome.graph,
            })
        }
        PatchDialect::JsonPatch => Err(PodError::Unsupported(
            "JSON Patch on absent resource".into(),
        )),
    }
}

// ---------------------------------------------------------------------------
// LdpContainerOps trait (backwards compatible)
// ---------------------------------------------------------------------------

#[cfg(feature = "tokio-runtime")]
#[async_trait]
pub trait LdpContainerOps: Storage {
    async fn container_representation(&self, path: &str) -> Result<serde_json::Value, PodError> {
        let children = self.list(path).await?;
        Ok(render_container(path, &children))
    }
}

#[cfg(feature = "tokio-runtime")]
impl<T: Storage + ?Sized> LdpContainerOps for T {}

// ---------------------------------------------------------------------------
// Tests
// ---------------------------------------------------------------------------

#[cfg(test)]
mod tests {
    use super::*;

    #[test]
    fn ntriples_trailing_comment_is_valid_but_trailing_triples_are_not() {
        let g = Graph::parse_ntriples("<http://a> <http://b> \"c\" . # note\n").unwrap();
        assert_eq!(g.len(), 1);
        assert!(Graph::parse_ntriples(
            "<http://a> <http://b> <http://c> ; <http://d> <http://e> .\n"
        )
        .is_err());
        assert!(Graph::parse_ntriples(
            "<http://a> <http://b> <http://c> . <http://a> <http://b> <http://d> .\n"
        )
        .is_err());
    }

    #[test]
    fn blank_node_subjects_survive_ntriples_and_jsonld_round_trip() {
        // JSS #536 regression class: a blank-node SUBJECT whose label is
        // written bare (no `_:` prefix) into JSON-LD `@id` gets re-read as
        // a named IRI, severing the graph. Pin the invariant on both
        // serialisations: N-Triples round-trips to an identical graph, and
        // JSON-LD `@id` carries the `_:` prefix for blank subjects.
        let mut g = Graph::new();
        g.insert(Triple::new(
            Term::blank("b0"),
            Term::iri("http://xmlns.com/foaf/0.1/name"),
            Term::literal("Alice"),
        ));
        g.insert(Triple::new(
            Term::iri("http://ex.org/doc"),
            Term::iri("http://ex.org/author"),
            Term::blank("b0"),
        ));

        let nt = g.to_ntriples();
        let reparsed = Graph::parse_ntriples(&nt).expect("re-parse own N-Triples");
        assert_eq!(
            reparsed.triples, g.triples,
            "blank-node subject must survive an N-Triples round trip"
        );

        let jsonld = g.to_jsonld();
        let ids: Vec<&str> = jsonld
            .as_array()
            .expect("expanded form is an array")
            .iter()
            .map(|n| n["@id"].as_str().expect("@id string"))
            .collect();
        assert!(
            ids.contains(&"_:b0"),
            "blank subject must be `_:`-prefixed in JSON-LD @id, got {ids:?}"
        );
        let obj_ref = jsonld
            .as_array()
            .unwrap()
            .iter()
            .find(|n| n["@id"] == "http://ex.org/doc")
            .and_then(|n| n["http://ex.org/author"][0]["@id"].as_str())
            .expect("object reference present");
        assert_eq!(obj_ref, "_:b0", "blank object reference keeps the prefix");
    }

    #[test]
    fn is_container_detects_trailing_slash() {
        assert!(is_container("/"));
        assert!(is_container("/media/"));
        assert!(!is_container("/file.txt"));
    }

    #[test]
    fn link_headers_include_acl_and_describedby() {
        let hdrs = link_headers("/profile/card");
        assert!(hdrs.iter().any(|h| h.contains("rel=\"type\"")));
        assert!(hdrs.iter().any(|h| h.contains("rel=\"acl\"")));
        assert!(hdrs.iter().any(|h| h.contains("/profile/card.acl")));
        assert!(hdrs.iter().any(|h| h.contains("rel=\"describedby\"")));
        assert!(hdrs.iter().any(|h| h.contains("/profile/card.meta")));
    }

    #[test]
    fn link_headers_root_exposes_pim_storage() {
        let hdrs = link_headers("/");
        let joined = hdrs.join(",");
        assert!(joined.contains("http://www.w3.org/ns/pim/space#storage"));
    }

    #[test]
    fn link_headers_skip_describedby_on_meta() {
        let hdrs = link_headers("/foo.meta");
        assert!(!hdrs.iter().any(|h| h.contains("rel=\"describedby\"")));
    }

    #[test]
    fn link_headers_skip_acl_on_acl() {
        let hdrs = link_headers("/profile/card.acl");
        assert!(!hdrs.iter().any(|h| h.contains("rel=\"acl\"")));
    }

    #[test]
    fn prefer_minimal_container_parsed() {
        let p = PreferHeader::parse(
            "return=representation; include=\"http://www.w3.org/ns/ldp#PreferMinimalContainer\"",
        );
        assert!(p.include_minimal);
        assert_eq!(p.representation, ContainerRepresentation::MinimalContainer);
    }

    #[test]
    fn prefer_contained_iris_parsed() {
        let p = PreferHeader::parse(
            "return=representation; include=\"http://www.w3.org/ns/ldp#PreferContainedIRIs\"",
        );
        assert!(p.include_contained_iris);
        assert_eq!(p.representation, ContainerRepresentation::ContainedIRIsOnly);
    }

    #[test]
    fn negotiate_prefers_explicit_turtle() {
        assert_eq!(
            negotiate_format(Some("application/ld+json;q=0.5, text/turtle;q=0.9")),
            RdfFormat::Turtle
        );
    }

    #[test]
    fn negotiate_falls_back_to_turtle() {
        assert_eq!(negotiate_format(Some("*/*")), RdfFormat::Turtle);
        assert_eq!(negotiate_format(None), RdfFormat::Turtle);
    }

    #[test]
    fn negotiate_picks_jsonld_when_highest() {
        assert_eq!(
            negotiate_format(Some("application/ld+json, text/turtle;q=0.5")),
            RdfFormat::JsonLd
        );
    }

    #[test]
    fn ntriples_roundtrip() {
        let nt = "<http://a/s> <http://a/p> <http://a/o> .\n";
        let g = Graph::parse_ntriples(nt).unwrap();
        assert_eq!(g.len(), 1);
        let out = g.to_ntriples();
        assert!(out.contains("<http://a/s>"));
    }

    #[test]
    fn server_managed_triples_include_ldp_contains() {
        let now = chrono::Utc::now();
        let members = vec!["a.txt".to_string(), "sub/".to_string()];
        let g = server_managed_triples("http://x/y/", now, 42, true, &members);
        let nt = g.to_ntriples();
        assert!(nt.contains("http://www.w3.org/ns/ldp#contains"));
        assert!(nt.contains("http://x/y/a.txt"));
        assert!(nt.contains("http://x/y/sub/"));
    }

    #[test]
    fn find_illegal_server_managed_flags_ldp_contains() {
        let mut g = Graph::new();
        g.insert(Triple::new(
            Term::iri("http://r/"),
            Term::iri(iri::LDP_CONTAINS),
            Term::iri("http://r/x"),
        ));
        let illegal = find_illegal_server_managed(&g);
        assert_eq!(illegal.len(), 1);
    }

    #[test]
    fn render_container_minimal_omits_contains() {
        let prefer = PreferHeader {
            representation: ContainerRepresentation::MinimalContainer,
            include_minimal: true,
            include_contained_iris: false,
            omit_membership: true,
        };
        let v = render_container_jsonld("/docs/", &["one.txt".into()], prefer);
        assert!(v.get("ldp:contains").is_none());
    }

    #[test]
    fn render_container_turtle_emits_types() {
        let v = render_container_turtle("/x/", &[], PreferHeader::default());
        assert!(v.contains("ldp:BasicContainer"));
    }

    #[test]
    fn n3_patch_insert_and_delete() {
        let mut g = Graph::new();
        g.insert(Triple::new(
            Term::iri("http://s/a"),
            Term::iri("http://p/keep"),
            Term::literal("v"),
        ));
        g.insert(Triple::new(
            Term::iri("http://s/a"),
            Term::iri("http://p/drop"),
            Term::literal("old"),
        ));

        let patch = r#"
            @prefix solid: <http://www.w3.org/ns/solid/terms#> .
            _:r a solid:InsertDeletePatch ;
              solid:deletes {
                <http://s/a> <http://p/drop> "old" .
              } ;
              solid:inserts {
                <http://s/a> <http://p/new> "shiny" .
              } .
        "#;
        let outcome = apply_n3_patch(g, patch).unwrap();
        assert_eq!(outcome.inserted, 1);
        assert_eq!(outcome.deleted, 1);
        assert!(outcome.graph.contains(&Triple::new(
            Term::iri("http://s/a"),
            Term::iri("http://p/new"),
            Term::literal("shiny"),
        )));
        assert!(!outcome.graph.contains(&Triple::new(
            Term::iri("http://s/a"),
            Term::iri("http://p/drop"),
            Term::literal("old"),
        )));
    }

    #[test]
    fn n3_patch_where_failure_is_a_conflict() {
        // Solid Protocol and JSS 0.0.224 (#633): a `where` clause that does
        // not match exactly once is 409, not 412 (412 is for HTTP
        // preconditions such as `If-Match`).
        let g = Graph::new();
        let patch = r#"
            @prefix solid: <http://www.w3.org/ns/solid/terms#> .
            _:r solid:where   { <http://s/a> <http://p/need> "x" . } ;
                solid:inserts { <http://s/a> <http://p/added> "y" . } .
        "#;
        let err = apply_n3_patch(g, patch).err().unwrap();
        assert!(matches!(err, PodError::Conflict(_)));
    }

    #[test]
    fn sparql_insert_data() {
        let g = Graph::new();
        let update = r#"INSERT DATA { <http://s> <http://p> "v" . }"#;
        let outcome = apply_sparql_patch(g, update).unwrap();
        assert_eq!(outcome.inserted, 1);
        assert_eq!(outcome.graph.len(), 1);
    }

    #[test]
    fn sparql_delete_data() {
        let mut g = Graph::new();
        g.insert(Triple::new(
            Term::iri("http://s"),
            Term::iri("http://p"),
            Term::literal("v"),
        ));
        let update = r#"DELETE DATA { <http://s> <http://p> "v" . }"#;
        let outcome = apply_sparql_patch(g, update).unwrap();
        assert_eq!(outcome.deleted, 1);
        assert!(outcome.graph.is_empty());
    }

    #[test]
    fn patch_dialect_detection() {
        assert_eq!(patch_dialect_from_mime("text/n3"), Some(PatchDialect::N3));
        assert_eq!(
            patch_dialect_from_mime("application/sparql-update; charset=utf-8"),
            Some(PatchDialect::SparqlUpdate)
        );
        assert_eq!(patch_dialect_from_mime("text/plain"), None);
    }

    #[test]
    fn slug_uses_valid_value() {
        let out = resolve_slug("/photos/", Some("cat.jpg")).unwrap();
        assert_eq!(out, "/photos/cat.jpg");
    }

    #[test]
    fn slug_rejects_slashes() {
        let err = resolve_slug("/photos/", Some("a/b"));
        assert!(matches!(err, Err(PodError::BadRequest(_))));
    }

    #[test]
    fn render_container_shapes_jsonld() {
        let members = vec!["one.txt".to_string(), "sub/".to_string()];
        let v = render_container("/docs/", &members);
        assert!(v.get("@context").is_some());
        assert!(v.get("ldp:contains").unwrap().as_array().unwrap().len() == 2);
    }

    #[test]
    fn preconditions_if_match_star_passes_when_resource_exists() {
        let got = evaluate_preconditions("PUT", Some("etag123"), Some("*"), None);
        assert_eq!(got, ConditionalOutcome::Proceed);
    }

    #[test]
    fn preconditions_if_match_star_fails_when_resource_absent() {
        let got = evaluate_preconditions("PUT", None, Some("*"), None);
        assert_eq!(got, ConditionalOutcome::PreconditionFailed);
    }

    #[test]
    fn if_match_uses_strong_comparison() {
        // RFC 9110 §13.1.1: a weak entity tag never satisfies If-Match.
        assert_eq!(
            evaluate_preconditions("PUT", Some("etag123"), Some("W/\"etag123\""), None),
            ConditionalOutcome::PreconditionFailed
        );
        assert_eq!(
            evaluate_preconditions(
                "PATCH",
                Some("etag123"),
                Some("W/\"etag123\", \"etag123\""),
                None
            ),
            ConditionalOutcome::Proceed,
            "a strong tag in the list still matches"
        );
        // `*` is a wildcard only as the whole field value, never inside a
        // list (RFC 9110 §13.1.1: If-Match = "*" / #entity-tag).
        assert_eq!(
            evaluate_preconditions("PUT", Some("etag123"), Some("\"other\", *"), None),
            ConditionalOutcome::PreconditionFailed
        );
        assert_eq!(
            evaluate_preconditions("PUT", Some("etag123"), Some("\"*\""), None),
            ConditionalOutcome::PreconditionFailed,
            "a quoted \"*\" is an opaque tag, not a wildcard"
        );
        // If-None-Match keeps weak comparison (RFC 9110 §13.1.2).
        assert_eq!(
            evaluate_preconditions("GET", Some("etag123"), None, Some("W/\"etag123\"")),
            ConditionalOutcome::NotModified
        );
    }

    #[test]
    fn preconditions_if_match_mismatch_412() {
        let got = evaluate_preconditions("PUT", Some("etag123"), Some("\"other\""), None);
        assert_eq!(got, ConditionalOutcome::PreconditionFailed);
    }

    #[test]
    fn preconditions_if_none_match_match_on_get_returns_304() {
        let got = evaluate_preconditions("GET", Some("etag123"), None, Some("\"etag123\""));
        assert_eq!(got, ConditionalOutcome::NotModified);
    }

    #[test]
    fn preconditions_if_none_match_on_put_when_exists_fails() {
        let got = evaluate_preconditions("PUT", Some("etag1"), None, Some("*"));
        assert_eq!(got, ConditionalOutcome::PreconditionFailed);
    }

    #[test]
    fn preconditions_if_none_match_on_put_when_absent_passes() {
        let got = evaluate_preconditions("PUT", None, None, Some("*"));
        assert_eq!(got, ConditionalOutcome::Proceed);
    }

    #[test]
    fn range_parses_start_end() {
        let r = parse_range_header(Some("bytes=0-99"), 1000)
            .unwrap()
            .unwrap();
        assert_eq!(r.start, 0);
        assert_eq!(r.end, 99);
        assert_eq!(r.length(), 100);
    }

    #[test]
    fn range_parses_open_ended() {
        let r = parse_range_header(Some("bytes=500-"), 1000)
            .unwrap()
            .unwrap();
        assert_eq!(r.start, 500);
        assert_eq!(r.end, 999);
    }

    #[test]
    fn range_parses_suffix() {
        let r = parse_range_header(Some("bytes=-200"), 1000)
            .unwrap()
            .unwrap();
        assert_eq!(r.start, 800);
        assert_eq!(r.end, 999);
    }

    #[test]
    fn range_rejects_unsatisfiable() {
        let err = parse_range_header(Some("bytes=2000-3000"), 1000);
        assert!(matches!(err, Err(PodError::PreconditionFailed(_))));
    }

    #[test]
    fn range_content_range_header_value() {
        let r = parse_range_header(Some("bytes=0-99"), 1000)
            .unwrap()
            .unwrap();
        assert_eq!(r.content_range(1000), "bytes 0-99/1000");
    }

    #[test]
    fn options_container_includes_post_and_accept_post() {
        let o = options_for("/photos/");
        assert!(o.allow.contains(&"POST"));
        assert!(o.accept_post.is_some());
        // JSS parity: containers advertise `Accept-Ranges: none` because
        // container representations are server-generated RDF, not
        // byte-rangeable.
        assert_eq!(o.accept_ranges, "none");
        // JSS parity row 157 (#315): OPTIONS carries the RDF cache
        // directive so shared caches don't fuse auth variants.
        assert_eq!(o.cache_control, "private, no-cache, must-revalidate");
    }

    #[test]
    fn options_resource_includes_put_patch_no_post() {
        let o = options_for("/photos/cat.jpg");
        assert!(o.allow.contains(&"PUT"));
        assert!(o.allow.contains(&"PATCH"));
        assert!(!o.allow.contains(&"POST"));
        assert!(o.accept_post.is_none());
        assert!(o.accept_patch.contains("sparql-update"));
        assert!(o.accept_patch.contains("json-patch"));
        assert_eq!(o.cache_control, CACHE_CONTROL_RDF);
    }

    #[test]
    fn cache_control_present_for_turtle() {
        assert_eq!(
            cache_control_for("text/turtle"),
            Some("private, no-cache, must-revalidate")
        );
        assert_eq!(
            cache_control_for("text/turtle; charset=utf-8"),
            Some(CACHE_CONTROL_RDF)
        );
    }

    #[test]
    fn cache_control_present_for_jsonld() {
        assert_eq!(
            cache_control_for("application/ld+json"),
            Some(CACHE_CONTROL_RDF)
        );
        assert_eq!(
            cache_control_for(
                "application/ld+json; profile=\"http://www.w3.org/ns/json-ld#compacted\""
            ),
            Some(CACHE_CONTROL_RDF)
        );
    }

    #[test]
    fn cache_control_present_for_ntriples() {
        assert_eq!(
            cache_control_for("application/n-triples"),
            Some(CACHE_CONTROL_RDF)
        );
        assert_eq!(cache_control_for("text/n3"), Some(CACHE_CONTROL_RDF));
        assert_eq!(
            cache_control_for("application/trig"),
            Some(CACHE_CONTROL_RDF)
        );
    }

    #[test]
    fn cache_control_absent_for_octet_stream() {
        assert_eq!(cache_control_for("application/octet-stream"), None);
        assert!(!is_rdf_content_type("application/octet-stream"));
    }

    #[test]
    fn cache_control_absent_for_image_png() {
        assert_eq!(cache_control_for("image/png"), None);
        assert_eq!(cache_control_for("image/jpeg"), None);
        assert_eq!(cache_control_for("video/mp4"), None);
        assert!(!is_rdf_content_type("image/png"));
    }

    #[test]
    fn cache_control_not_found_headers_conneg_enabled_emits_rdf_directive() {
        let h = not_found_headers("/data/thing", true);
        let found = h
            .iter()
            .find(|(k, _)| *k == "Cache-Control")
            .map(|(_, v)| v.as_str());
        assert_eq!(found, Some("private, no-cache, must-revalidate"));
    }

    #[test]
    fn cache_control_not_found_headers_conneg_disabled_omits_directive() {
        let h = not_found_headers("/data/thing", false);
        assert!(h.iter().all(|(k, _)| *k != "Cache-Control"));
    }

    #[test]
    fn json_patch_add_and_replace() {
        let mut v = serde_json::json!({ "name": "alice" });
        let patch = serde_json::json!([
            { "op": "add", "path": "/age", "value": 30 },
            { "op": "replace", "path": "/name", "value": "bob" }
        ]);
        apply_json_patch(&mut v, &patch).unwrap();
        assert_eq!(v["name"], "bob");
        assert_eq!(v["age"], 30);
    }

    #[test]
    fn json_patch_remove() {
        let mut v = serde_json::json!({ "name": "alice", "age": 30 });
        let patch = serde_json::json!([
            { "op": "remove", "path": "/age" }
        ]);
        apply_json_patch(&mut v, &patch).unwrap();
        assert!(v.get("age").is_none());
    }

    #[test]
    fn json_patch_test_failure_returns_precondition() {
        let mut v = serde_json::json!({ "name": "alice" });
        let patch = serde_json::json!([
            { "op": "test", "path": "/name", "value": "bob" }
        ]);
        let err = apply_json_patch(&mut v, &patch).unwrap_err();
        assert!(matches!(err, PodError::PreconditionFailed(_)));
    }

    #[test]
    fn json_patch_dialect_detection() {
        assert_eq!(
            patch_dialect_from_mime("application/json-patch+json"),
            Some(PatchDialect::JsonPatch)
        );
    }

    #[test]
    fn slug_rejects_bare_dot() {
        // `Slug: .` joins to `<container>/.`, which names the container
        // itself on POSIX-flavoured backends; reject it at the LDP edge
        // instead of deferring the failure to storage.
        let err = resolve_slug("/box/", Some("."));
        assert!(matches!(err, Err(PodError::BadRequest(_))));
    }

    #[test]
    fn slug_accepts_dotted_names_without_traversal() {
        let p = resolve_slug("/box/", Some("v1.2.config.yaml")).unwrap();
        assert_eq!(p, "/box/v1.2.config.yaml");
    }
}