mars-schema 0.24.0

//! Canonical YAML emission for editors that splice bytes into authored frontmatter.
//!
//! One rule decides how every string, key or value, is spelled: plain when it is a
//! safe identifier-like word, JSON double-quoted otherwise. Quoted strings escape
//! every character YAML parsers disagree about, so the output reads back as the
//! same value in `serde_yaml` and in other YAML libraries.

use serde_json::Number;

use crate::ordered::{MAX_SAFE_INTEGER, OrderedValue as Value};

/// A value that cannot be written as YAML without changing it.
#[derive(Debug, Clone, PartialEq, Eq, thiserror::Error)]
pub enum EmitError {
    #[error("integer {0} is beyond ±(2^53 − 1) and cannot cross to JavaScript exactly")]
    IntegerTooLarge(String),
    #[error("duplicate frontmatter key `{0}`")]
    DuplicateKey(String),
    #[error("mapping key of {0} characters is over the 1024 YAML allows for an implicit key")]
    KeyTooLong(usize),
}

impl EmitError {
    /// A stable identifier for callers that map failures to their own codes.
    pub fn code(&self) -> &'static str {
        match self {
            Self::IntegerTooLarge(_) => "edit.integer-too-large",
            Self::DuplicateKey(_) => "edit.duplicate-key",
            Self::KeyTooLong(_) => "edit.key-too-long",
        }
    }
}

/// Longest implicit mapping key (as written, quotes included) YAML parsers accept.
const MAX_KEY_CHARS: usize = 1024;

/// Emit one JSON-compatible value for the mapping key at column `indent`.
///
/// A scalar is one line with no leading newline. A collection starts with `\n`, and
/// its children sit at column `indent + 2`. Output never ends in a newline. Splice
/// the result directly after `key:` (a scalar after one space).
pub fn emit_value(value: &Value, indent: usize) -> Result<String, EmitError> {
    check(value)?;
    Ok(emit(value, indent))
}

/// Emit a whole frontmatter mapping: the block between the `---` fences, keys in
/// order, ending in exactly one newline (empty for no keys).
pub fn rewrite_block(values: &[(String, Value)]) -> Result<String, EmitError> {
    let mut seen = std::collections::HashSet::new();
    let mut out = String::new();
    for (key, value) in values {
        if !seen.insert(key.as_str()) {
            return Err(EmitError::DuplicateKey(key.clone()));
        }
        check_key(key)?;
        check(value)?;
        push_pair(&mut out, key, value, 0);
        out.push('\n');
    }
    Ok(out)
}

fn check(value: &Value) -> Result<(), EmitError> {
    match value {
        Value::Number(n) => check_number(n),
        Value::Array(values) => values.iter().try_for_each(check),
        Value::Object(map) => map.iter().try_for_each(|(key, value)| {
            check_key(key)?;
            check(value)
        }),
        _ => Ok(()),
    }
}

fn check_key(key: &str) -> Result<(), EmitError> {
    let written = scalar(key).chars().count();
    if written > MAX_KEY_CHARS {
        Err(EmitError::KeyTooLong(written))
    } else {
        Ok(())
    }
}

/// Refuses integers JavaScript cannot hold exactly. A float of any finite magnitude is fine:
/// it is written so that both parsers read the same float back.
fn check_number(n: &Number) -> Result<(), EmitError> {
    let too_large = n
        .as_i64()
        .is_some_and(|v| v.unsigned_abs() > MAX_SAFE_INTEGER)
        || n.as_u64().is_some_and(|v| v > MAX_SAFE_INTEGER);
    if too_large {
        Err(EmitError::IntegerTooLarge(n.to_string()))
    } else {
        Ok(())
    }
}

/// A float that is whole and safe is written as an integer, since JavaScript cannot tell
/// `1.0` from `1`; any other float keeps `serde_json`'s shortest form (`1e300`, `1.5e-7`),
/// which YAML 1.1 and 1.2 parsers read back as the same float.
fn number(n: &Number) -> String {
    match n.as_f64() {
        Some(v) if n.is_f64() && v.fract() == 0.0 && v.abs() <= MAX_SAFE_INTEGER as f64 => {
            (v as i64).to_string()
        }
        _ => n.to_string(),
    }
}

fn push_pair(out: &mut String, key: &str, value: &Value, column: usize) {
    out.push_str(&scalar(key));
    out.push(':');
    let rendered = emit(value, column);
    if !rendered.starts_with('\n') {
        out.push(' ');
    }
    out.push_str(&rendered);
}

fn emit(value: &Value, indent: usize) -> String {
    let child = indent + 2;
    match value {
        Value::Null => "null".into(),
        Value::Bool(v) => v.to_string(),
        Value::Number(v) => number(v),
        Value::String(v) => scalar(v),
        Value::Array(values) if values.is_empty() => "[]".into(),
        Value::Object(values) if values.is_empty() => "{}".into(),
        Value::Array(values) => {
            let mut out = String::new();
            for item in values {
                out.push('\n');
                out.push_str(&" ".repeat(child));
                out.push('-');
                let rendered = emit(item, child);
                match rendered.strip_prefix('\n') {
                    // A collection item continues on the dash line (`- a: 1`).
                    Some(block) => {
                        out.push(' ');
                        out.push_str(&block[child + 2..]);
                    }
                    None => {
                        out.push(' ');
                        out.push_str(&rendered);
                    }
                }
            }
            out
        }
        Value::Object(values) => {
            let mut out = String::new();
            for (key, value) in values {
                out.push('\n');
                out.push_str(&" ".repeat(child));
                push_pair(&mut out, key, value, child);
            }
            out
        }
    }
}

/// Spell a string as one YAML scalar on one line.
fn scalar(s: &str) -> String {
    if is_plain_safe(s) {
        return s.to_owned();
    }
    let mut out = String::with_capacity(s.len() + 2);
    out.push('"');
    for c in s.chars() {
        match c {
            '"' => out.push_str("\\\""),
            '\\' => out.push_str("\\\\"),
            '\n' => out.push_str("\\n"),
            '\r' => out.push_str("\\r"),
            '\t' => out.push_str("\\t"),
            c if !is_printable(c) => {
                let n = c as u32;
                if n <= 0xff {
                    out.push_str(&format!("\\x{n:02x}"));
                } else {
                    out.push_str(&format!("\\u{n:04x}"));
                }
            }
            c => out.push(c),
        }
    }
    out.push('"');
    out
}

/// YAML's printable set, minus line separators and the byte-order mark that some
/// parsers treat as structure.
fn is_printable(c: char) -> bool {
    matches!(c, ' '..='~' | '\u{a0}'..='\u{d7ff}' | '\u{e000}'..='\u{fffd}' | '\u{10000}'..='\u{10ffff}')
        && !matches!(c, '\u{2028}' | '\u{2029}' | '\u{feff}')
}

/// Plain scalars are limited to `[A-Za-z_][A-Za-z0-9_./-]*` that no YAML 1.1 or 1.2
/// reader turns into a boolean, null or number.
fn is_plain_safe(s: &str) -> bool {
    let mut chars = s.chars();
    let Some(first) = chars.next() else {
        return false;
    };
    (first.is_ascii_alphabetic() || first == '_')
        && chars.all(|c| c.is_ascii_alphanumeric() || matches!(c, '_' | '.' | '/' | '-'))
        && !matches!(
            s.to_ascii_lowercase().as_str(),
            "true"
                | "false"
                | "yes"
                | "no"
                | "on"
                | "off"
                | "y"
                | "n"
                | "null"
                | "inf"
                | "nan"
                | "infinity"
        )
}