lightweight-pdf-layout 0.3.0

//! Greedy word-boundary wrapping with a hard-break fallback for tokens
//! wider than the available width (`plan/05-overflow-and-robustness.md`
//! Grundprinzip 2), plus soft-hyphen-aware breaking (issue #13, Stage 1):
//! a word may carry U+00AD marks for where it's allowed to break — used
//! if wrapping needs it, stripped invisibly if not. Stage 2 (automatic,
//! dictionary-driven hyphenation) lives in the feature-gated `hyphenate`
//! module and works by inserting these same U+00AD marks before a word
//! ever reaches this file.

use crate::font_resolver::FontResolver;
use lightweight_pdf_core::{FontKey, Span, Text, TextStyle};
use std::borrow::Cow;
use std::collections::VecDeque;

/// Marks an optional break point within a word: rendered as a visible
/// `-` if a line actually breaks there, invisible (stripped) otherwise.
const SOFT_HYPHEN: char = '\u{00AD}';

/// `text.hyphenate` (issue #13, Stage 2), applied if set and the
/// `hyphenation` feature is compiled in. Without the feature, a `Text`
/// with `.hyphenate(..)` set falls back to Stage 1 only (whatever soft
/// hyphens the author placed by hand) — documented on `Text::hyphenate`
/// itself, since skipping automatic hyphenation only changes where a
/// line wraps, never what the text says.
pub fn hyphenated_content(text: &Text) -> Cow<'_, str> {
    #[cfg(feature = "hyphenation")]
    if let Some(lang) = text.hyphenate {
        return Cow::Owned(crate::hyphenate::auto_hyphenate(&text.content, lang));
    }
    Cow::Borrowed(&text.content)
}

pub fn text_width_pt(resolver: &dyn FontResolver, font: FontKey, size: f32, text: &str) -> f32 {
    let m = resolver.metrics(font);
    text.chars().map(|c| m.advance(c)).sum::<f32>() / 1000.0 * size
}

/// `text_width_pt` for a `TextStyle`'s font/size — the `style.font,
/// style.size` pair otherwise repeats at every measurement call site below.
fn styled_width_pt(resolver: &dyn FontResolver, style: &TextStyle, text: &str) -> f32 {
    text_width_pt(resolver, style.font, style.size, text)
}

/// Splits a single word into pieces that each fit `max_width`, breaking on
/// character boundaries as a last resort (never truncated, never drawn
/// past the edge).
fn hard_break_word(resolver: &dyn FontResolver, style: &TextStyle, word: &str, max_width: f32) -> Vec<String> {
    let mut pieces = Vec::new();
    let mut current = String::new();
    for ch in word.chars() {
        let mut candidate = current.clone();
        candidate.push(ch);
        let w = styled_width_pt(resolver, style, &candidate);
        if w > max_width && !current.is_empty() {
            pieces.push(std::mem::take(&mut current));
        }
        current.push(ch);
    }
    if !current.is_empty() || pieces.is_empty() {
        pieces.push(current);
    }
    pieces
}

/// `word`, with every soft hyphen (U+00AD) removed — used whenever a word
/// is placed without breaking at one of them, since an unused soft hyphen
/// must never show up in the rendered/extracted text.
fn strip_soft_hyphens(word: &str) -> String {
    word.chars().filter(|&c| c != SOFT_HYPHEN).collect()
}

/// Finds the soft hyphen in `word` that lets the largest possible prefix
/// (rendered with a trailing visible `-`) fit within `max_width`, and
/// returns `(prefix_with_hyphen, rest_of_word)` — `rest_of_word` keeps
/// its own remaining soft hyphens, in case it needs breaking again.
/// `None` if `word` has no soft hyphen, or not even its first segment
/// plus a hyphen fits.
fn break_at_soft_hyphen(resolver: &dyn FontResolver, style: &TextStyle, word: &str, max_width: f32) -> Option<(String, String)> {
    if !word.contains(SOFT_HYPHEN) {
        return None;
    }
    let segments: Vec<&str> = word.split(SOFT_HYPHEN).collect();
    for split_at in (1..segments.len()).rev() {
        let candidate = format!("{}-", segments[..split_at].concat());
        if styled_width_pt(resolver, style, &candidate) <= max_width {
            let rest = segments[split_at..].join("\u{00AD}");
            return Some((candidate, rest));
        }
    }
    None
}

/// Starts a fresh line with `word` (which may still carry soft hyphens):
/// if it fits `max_width` whole, it becomes the line's only content so
/// far (soft hyphens stripped, unused); otherwise it's broken — at a
/// soft hyphen if one lets a prefix fit, falling back to a character-level
/// hard break otherwise — with all but the last piece pushed straight
/// into `lines` and the last piece (or, for a soft-hyphen break, the
/// requeued remainder) becoming the new line-in-progress. Shared by both
/// places `wrap_text` begins a line (the very first word of a paragraph,
/// and the word right after a line-full break).
fn start_line(
    resolver: &dyn FontResolver,
    style: &TextStyle,
    word: &str,
    max_width: f32,
    lines: &mut Vec<String>,
    queue: &mut VecDeque<String>,
) -> String {
    let stripped = strip_soft_hyphens(word);
    let w = styled_width_pt(resolver, style, &stripped);
    if w <= max_width {
        return stripped;
    }
    if let Some((prefix, rest)) = break_at_soft_hyphen(resolver, style, word, max_width) {
        lines.push(prefix);
        queue.push_front(rest);
        return String::new();
    }
    let mut pieces = hard_break_word(resolver, style, &stripped, max_width);
    // `hard_break_word` always returns at least one piece (it pushes
    // `current` unconditionally when `pieces` would otherwise be empty),
    // so popping the last one off can never actually hit the default.
    let last = pieces.pop().expect("hard_break_word always returns at least one piece");
    lines.extend(pieces);
    last
}

/// Wraps `text` to `max_width` points. Explicit `\n` in the source text
/// start a new paragraph/line unconditionally.
pub fn wrap_text(resolver: &dyn FontResolver, style: &TextStyle, text: &str, max_width: f32) -> Vec<String> {
    wrap_text_marking_paragraph_ends(resolver, style, text, max_width).0
}

/// `wrap_text`, plus a same-length `bool` per line: `true` for the last
/// line of its paragraph (the one a `Justify` renderer must leave
/// left-aligned, not stretched), `false` for every other line. A
/// paragraph is a `\n`-separated segment of `text`, same boundary
/// `wrap_text` already breaks on.
pub fn wrap_text_marking_paragraph_ends(
    resolver: &dyn FontResolver,
    style: &TextStyle,
    text: &str,
    max_width: f32,
) -> (Vec<String>, Vec<bool>) {
    let max_width = max_width.max(0.0);
    let mut lines = Vec::new();
    let mut paragraph_end = Vec::new();
    for paragraph in text.split('\n') {
        let mut queue: VecDeque<String> = paragraph.split(' ').filter(|w| !w.is_empty()).map(str::to_string).collect();
        if queue.is_empty() {
            lines.push(String::new());
        } else {
            let mut current = String::new();
            while let Some(word) = queue.pop_front() {
                if current.is_empty() {
                    current = start_line(resolver, style, &word, max_width, &mut lines, &mut queue);
                    continue;
                }
                let stripped = strip_soft_hyphens(&word);
                let candidate = format!("{current} {stripped}");
                if styled_width_pt(resolver, style, &candidate) <= max_width {
                    current = candidate;
                    continue;
                }
                // Doesn't fit appended whole — try breaking `word` at a
                // soft hyphen to fill the current line's remaining space
                // instead of deferring it whole to the next line (the
                // narrow-column "große Löcher" case issue #13 is about).
                let space_w = styled_width_pt(resolver, style, " ");
                let remaining = (max_width - styled_width_pt(resolver, style, &current) - space_w).max(0.0);
                if let Some((prefix, rest)) = break_at_soft_hyphen(resolver, style, &word, remaining) {
                    lines.push(format!("{current} {prefix}"));
                    current = String::new();
                    queue.push_front(rest);
                } else {
                    lines.push(std::mem::take(&mut current));
                    queue.push_front(word);
                }
            }
            lines.push(current);
        }
        // Every line just pushed for this paragraph (including any
        // hard-break pieces `start_line` pushed directly) defaults to
        // `false`; only the last one — the paragraph's actual last line —
        // flips to `true`.
        paragraph_end.resize(lines.len(), false);
        if let Some(last) = paragraph_end.last_mut() {
            *last = true;
        }
    }
    (lines, paragraph_end)
}

// ---------------------------------------------------------------------
// Inline spans (`Text::rich(..)`, issue #11): the same greedy
// word-boundary wrapping as `wrap_text` above, generalized to a sequence
// of independently-styled words instead of one style for the whole
// paragraph. No `\n` paragraph-break support here (unlike `wrap_text`) —
// rich text is scoped to a single paragraph in V1; plain `Text` remains
// the way to get multi-paragraph text.
// ---------------------------------------------------------------------

/// One word plus the style it should be drawn in — the atomic unit
/// `wrap_spans` arranges into `RichLine`s.
#[derive(Clone, Debug)]
pub struct StyledWord {
    pub text: String,
    pub style: TextStyle,
}

/// One wrapped line of a `Text::rich(..)` paragraph. `height` is
/// `size * line_height` of the line's *tallest* word (not a fixed,
/// whole-paragraph value like plain `Text`'s `line_height_pt`);
/// `ascent_pt` is that same tallest word's ascent, in points — every word
/// on the line shares this one baseline reference regardless of its own
/// size, which is what keeps mixed sizes visually aligned on one baseline
/// instead of each hanging from its own.
#[derive(Clone, Debug)]
pub struct RichLine {
    pub words: Vec<StyledWord>,
    pub height: f32,
    pub ascent_pt: f32,
}

/// Splits a single (already-styled) word into pieces that each fit
/// `max_width`, character by character — `hard_break_word`'s generalization
/// to an arbitrary style instead of a shared paragraph `TextStyle`.
fn hard_break_styled_word(resolver: &dyn FontResolver, style: &TextStyle, word: &str, max_width: f32) -> Vec<String> {
    let mut pieces = Vec::new();
    let mut current = String::new();
    for ch in word.chars() {
        let mut candidate = current.clone();
        candidate.push(ch);
        if text_width_pt(resolver, style.font, style.size, &candidate) > max_width && !current.is_empty() {
            pieces.push(std::mem::take(&mut current));
        }
        current.push(ch);
    }
    if !current.is_empty() || pieces.is_empty() {
        pieces.push(current);
    }
    pieces
}

pub fn wrap_spans(resolver: &dyn FontResolver, spans: &[Span], max_width: f32) -> Vec<RichLine> {
    let max_width = max_width.max(0.0);

    let mut tokens: Vec<(String, TextStyle)> = Vec::new();
    for span in spans {
        for word in span.text.split(' ').filter(|w| !w.is_empty()) {
            tokens.push((word.to_string(), span.style));
        }
    }

    let mut lines: Vec<Vec<(String, TextStyle)>> = Vec::new();
    let mut current: Vec<(String, TextStyle)> = Vec::new();
    let mut current_width = 0.0f32;

    for (word, style) in tokens {
        let word_width = text_width_pt(resolver, style.font, style.size, &word);
        let gap = if current.is_empty() {
            0.0
        } else {
            text_width_pt(resolver, style.font, style.size, " ")
        };

        if !current.is_empty() && current_width + gap + word_width > max_width {
            lines.push(std::mem::take(&mut current));
            current_width = 0.0;
        }

        if word_width > max_width && current.is_empty() {
            let pieces = hard_break_styled_word(resolver, &style, &word, max_width);
            let last_idx = pieces.len().saturating_sub(1);
            for (i, piece) in pieces.into_iter().enumerate() {
                if i == last_idx {
                    current_width = text_width_pt(resolver, style.font, style.size, &piece);
                    current.push((piece, style));
                } else {
                    lines.push(vec![(piece, style)]);
                }
            }
            continue;
        }

        let gap = if current.is_empty() {
            0.0
        } else {
            text_width_pt(resolver, style.font, style.size, " ")
        };
        current_width += gap + word_width;
        current.push((word, style));
    }
    if !current.is_empty() || lines.is_empty() {
        lines.push(current);
    }

    let fallback_style = spans.first().map(|s| s.style).unwrap_or_default();
    lines
        .into_iter()
        .map(|words| {
            let (height, ascent_pt) = words
                .iter()
                .map(|(_, style)| *style)
                .fold(None, |acc: Option<(f32, f32)>, style| {
                    let m = resolver.metrics(style.font);
                    let line_h = style.size * style.line_height;
                    let ascent = m.ascent() / 1000.0 * style.size;
                    Some(match acc {
                        Some((h, a)) => (h.max(line_h), a.max(ascent)),
                        None => (line_h, ascent),
                    })
                })
                .unwrap_or_else(|| {
                    let m = resolver.metrics(fallback_style.font);
                    (
                        fallback_style.size * fallback_style.line_height,
                        m.ascent() / 1000.0 * fallback_style.size,
                    )
                });
            RichLine {
                words: words.into_iter().map(|(text, style)| StyledWord { text, style }).collect(),
                height,
                ascent_pt,
            }
        })
        .collect()
}

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

    struct FixedMetrics;
    impl crate::font_resolver::FontMetrics for FixedMetrics {
        fn advance(&self, ch: char) -> f32 {
            if ch == ' ' {
                300.0
            } else {
                600.0
            }
        }
        fn ascent(&self) -> f32 {
            800.0
        }
        fn descent(&self) -> f32 {
            -200.0
        }
    }
    struct FixedResolver;
    impl FontResolver for FixedResolver {
        fn metrics(&self, _key: FontKey) -> &dyn crate::font_resolver::FontMetrics {
            &FixedMetrics
        }
    }

    #[test]
    fn wraps_on_word_boundaries() {
        let style = TextStyle {
            size: 10.0,
            ..Default::default()
        };
        // Each char = 6pt at size 10 (600/1000*10). "AAAA BBBB" at width 30
        // -> "AAAA" is 24pt, fits; adding " BBBB" would be way over.
        let lines = wrap_text(&FixedResolver, &style, "AAAA BBBB", 30.0);
        assert_eq!(lines, vec!["AAAA".to_string(), "BBBB".to_string()]);
    }

    #[test]
    fn hard_breaks_a_single_too_wide_token() {
        let style = TextStyle {
            size: 10.0,
            ..Default::default()
        };
        // A single 10-char token, each char 6pt, max width 18pt -> 3 chars/line.
        let lines = wrap_text(&FixedResolver, &style, "ABCDEFGHIJ", 18.0);
        assert_eq!(lines, vec!["ABC", "DEF", "GHI", "J"]);
    }

    #[test]
    fn respects_explicit_newlines() {
        let style = TextStyle::default();
        let lines = wrap_text(&FixedResolver, &style, "a\nb", 1000.0);
        assert_eq!(lines, vec!["a".to_string(), "b".to_string()]);
    }

    #[test]
    fn soft_hyphen_breaks_a_word_and_renders_a_visible_hyphen() {
        let style = TextStyle {
            size: 10.0,
            ..Default::default()
        };
        // "AAAABBBB" is 48pt whole; "AAAA-" is exactly 30pt, fits max_width.
        let lines = wrap_text(&FixedResolver, &style, "AAAA\u{AD}BBBB", 30.0);
        assert_eq!(lines, vec!["AAAA-".to_string(), "BBBB".to_string()]);
    }

    #[test]
    fn unused_soft_hyphen_disappears_from_the_output() {
        let style = TextStyle::default();
        // Plenty of width: the word never needs to break, so its soft
        // hyphen must not survive into the wrapped line.
        let lines = wrap_text(&FixedResolver, &style, "AB\u{AD}CD", 1000.0);
        assert_eq!(lines, vec!["ABCD".to_string()]);
    }

    #[test]
    fn soft_hyphen_fills_the_current_line_instead_of_moving_the_whole_word_down() {
        let style = TextStyle {
            size: 10.0,
            ..Default::default()
        };
        // "X" (6pt) + " " (3pt) + "AAAABBBB" (48pt) = 57pt, over max_width
        // 39; but "X AAAA-" is exactly 39pt, so the hyphenated prefix
        // stays on the first line instead of a ragged gap.
        let lines = wrap_text(&FixedResolver, &style, "X AAAA\u{AD}BBBB", 39.0);
        assert_eq!(lines, vec!["X AAAA-".to_string(), "BBBB".to_string()]);
    }

    #[test]
    fn marks_only_the_last_line_of_each_paragraph() {
        let style = TextStyle {
            size: 10.0,
            ..Default::default()
        };
        // Two paragraphs: "AAAA BBBB" wraps to 2 lines at width 30, "CCCC"
        // fits on one line by itself.
        let (lines, paragraph_end) = wrap_text_marking_paragraph_ends(&FixedResolver, &style, "AAAA BBBB\nCCCC", 30.0);
        assert_eq!(lines, vec!["AAAA".to_string(), "BBBB".to_string(), "CCCC".to_string()]);
        assert_eq!(paragraph_end, vec![false, true, true]);
    }

    #[test]
    fn empty_paragraph_counts_as_its_own_last_line() {
        let style = TextStyle::default();
        let (lines, paragraph_end) = wrap_text_marking_paragraph_ends(&FixedResolver, &style, "a\n\nb", 1000.0);
        assert_eq!(lines, vec!["a".to_string(), String::new(), "b".to_string()]);
        assert_eq!(paragraph_end, vec![true, true, true]);
    }

    fn line_words(line: &RichLine) -> Vec<&str> {
        line.words.iter().map(|w| w.text.as_str()).collect()
    }

    #[test]
    fn wrap_spans_breaks_across_span_boundaries() {
        let style = TextStyle {
            size: 10.0,
            ..Default::default()
        };
        // Same width math as `wraps_on_word_boundaries`, just spread
        // across two spans instead of one string.
        let spans = vec![Span::new("AAAA", style), Span::new(" BBBB", style)];
        let lines = wrap_spans(&FixedResolver, &spans, 30.0);
        assert_eq!(lines.len(), 2);
        assert_eq!(line_words(&lines[0]), vec!["AAAA"]);
        assert_eq!(line_words(&lines[1]), vec!["BBBB"]);
    }

    #[test]
    fn wrap_spans_hard_breaks_a_single_too_wide_word_mid_span() {
        let style = TextStyle {
            size: 10.0,
            ..Default::default()
        };
        let spans = vec![Span::new("ABCDEFGHIJ", style)];
        let lines = wrap_spans(&FixedResolver, &spans, 18.0);
        assert!(lines.len() > 1, "a word wider than max_width must hard-break onto multiple lines");
        assert_eq!(line_words(&lines[0]), vec!["ABC"]);
    }

    #[test]
    fn wrap_spans_line_height_and_ascent_come_from_the_tallest_word() {
        let small = TextStyle {
            size: 10.0,
            line_height: 1.0,
            ..Default::default()
        };
        let big = TextStyle {
            size: 20.0,
            line_height: 1.0,
            ..Default::default()
        };
        let spans = vec![Span::new("a", small), Span::new(" B", big)];
        let lines = wrap_spans(&FixedResolver, &spans, 1000.0);
        assert_eq!(lines.len(), 1, "both words fit on one line");
        assert_eq!(
            lines[0].height, 20.0,
            "line height must come from the larger word, not the first one"
        );
        // FixedMetrics.ascent() == 800 (1000-upm units) -> 800/1000*20 = 16pt at size 20.
        assert_eq!(lines[0].ascent_pt, 16.0);
    }
}