number.rs

//! 番号を振り、参照を解く
//!
//! 見出し、図、表、式、参考文献に番号を振る。`\label` は直前に振った番号に結び付く。
//! ページ番号だけはページに割り付けたあとでないと決まらないので、[`crate::page`] が
//! あとから入れる。

use crate::node::{Document, FloatKind, Node, walk};
use crate::text;
use std::collections::HashMap;


/// 目次に出す項目
#[derive(Debug, Clone, PartialEq)]
pub struct Contents {
    pub level: usize,
    pub number: String,
    pub title: String,
}


/// 番号と参照
#[derive(Debug, Clone, Default, PartialEq)]
pub struct Numbering {
    /// `\label` の名前から番号へ
    pub reference: HashMap<String, String>,
    /// `\label` の名前からページ番号へ
    pub page: HashMap<String, usize>,
    /// 目次に出す項目
    pub contents: Vec<Contents>,
    /// 参考文献の鍵から番号へ
    pub citation: HashMap<String, String>,
}


/// 番号を付ける深さ。これより深い見出しには番号を振らない
const DEEPEST: usize = 4;


/// 章のある文書かどうか。article には章がなく、節から数える
pub fn has_chapter(class: &str) -> bool {
    !matches!(class, "article" | "jarticle" | "letter" | "slides")
}


/// 文書に番号を振る
pub fn assign(document: &mut Document) -> Numbering {
    let base = if has_chapter(&document.class) {1} else {2};
    let mut found = Numbering::default();
    let mut counter = [0usize; 7];
    let mut figure = 0;
    let mut table = 0;
    let mut equation = 0;
    let mut appendix = false;
    let mut last = String::new();

    walk(&mut document.body, &mut |node| match node {
        Node::Appendix => {
            appendix = true;

            for slot in counter.iter_mut().skip(base) {
                *slot = 0;
            }
        }
        Node::Heading {level, numbered, title, number} => {
            if *numbered && *level <= DEEPEST {
                counter[*level] += 1;

                for slot in counter.iter_mut().skip(*level + 1) {
                    *slot = 0;
                }

                *number = shape(&counter, base, *level, appendix);
                last = number.clone();
            }

            if *level <= DEEPEST {
                found.contents.push(Contents {
                    level: *level,
                    number: number.clone(),
                    title: crate::node::plain(title),
                });
            }
        }
        Node::Caption {number, kind, ..} => {
            let count = match kind {
                FloatKind::Figure => {
                    figure += 1;
                    figure
                }
                FloatKind::Table => {
                    table += 1;
                    table
                }
            };
            *number = count.to_string();
            last = number.clone();
        }
        Node::Math {row, ..} => {
            for one in row.iter_mut() {
                if !one.numbered {
                    continue;
                }

                equation += 1;
                one.number = equation.to_string();

                if let Some(name) = &one.label {
                    found.reference.insert(name.clone(), one.number.clone());
                }

                last = one.number.clone();
            }
        }
        Node::Label(name) => {
            found.reference.insert(name.clone(), last.clone());
        }
        Node::Bibliography(entry) => {
            for (index, one) in entry.iter_mut().enumerate() {
                one.number = match &one.mark {
                    Some(mark) => mark.clone(),
                    None => (index + 1).to_string(),
                };
                found.citation.insert(one.key.clone(), one.number.clone());
            }
        }
        _ => {}
    });

    found
}


/// 番号を組み立てる
fn shape(counter: &[usize], base: usize, level: usize, appendix: bool) -> String {
    if level == 0 {
        return text::roman(counter[0]).to_uppercase();
    }

    let mut part = Vec::new();

    for (index, value) in counter.iter().enumerate().take(level + 1).skip(base) {
        if index == base && appendix {
            part.push(text::alphabet(*value));

        } else {
            part.push(value.to_string());
        }
    }

    if part.is_empty() {
        return counter[level].to_string();
    }

    part.join(".")
}


/// 名前から番号を引く。見つからなければ `??` を返す
pub fn look(numbering: &Numbering, name: &str) -> String {
    match numbering.reference.get(name) {
        Some(found) if !found.is_empty() => found.clone(),
        _ => "??".to_string(),
    }
}


/// 名前からページ番号を引く
pub fn look_page(numbering: &Numbering, name: &str) -> String {
    match numbering.page.get(name) {
        Some(found) => found.to_string(),
        None => "??".to_string(),
    }
}


/// 参考文献の鍵から番号を引く
pub fn look_citation(numbering: &Numbering, key: &str) -> String {
    match numbering.citation.get(key) {
        Some(found) => found.clone(),
        None => "?".to_string(),
    }
}


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

    fn read(source: &str) -> (Document, Numbering) {
        let characters: Vec<char> = source.chars().collect();
        let mut document = parse::parse(&characters).unwrap();
        let numbering = assign(&mut document);

        (document, numbering)
    }

    #[test]
    fn sections_are_numbered_in_order() {
        let (document, _) = read(
            "\\documentclass{article}\\begin{document}\
\\section{A}\\subsection{B}\\subsection{C}\\section{D}\\end{document}",
        );
        let mut found = Vec::new();

        for node in &document.body {
            if let Node::Heading {number, ..} = node {
                found.push(number.clone());
            }
        }

        assert_eq!(found, vec!["1", "1.1", "1.2", "2"]);
    }

    #[test]
    fn a_label_points_at_the_number_before_it() {
        let (_, numbering) = read(
            "\\documentclass{article}\\begin{document}\
\\section{A}\\label{one}\\section{B}\\label{two}\\end{document}",
        );
        assert_eq!(look(&numbering, "one"), "1");
        assert_eq!(look(&numbering, "two"), "2");
        assert_eq!(look(&numbering, "none"), "??");
    }

    #[test]
    fn a_starred_section_gets_no_number_but_reaches_the_contents() {
        let (_, numbering) = read(
            "\\documentclass{article}\\begin{document}\\section*{A}\\section{B}\\end{document}",
        );
        assert_eq!(numbering.contents.len(), 2);
        assert_eq!(numbering.contents[0].number, "");
        assert_eq!(numbering.contents[1].number, "1");
    }

    #[test]
    fn equations_are_numbered_on_their_own() {
        let (_, numbering) = read(
            "\\documentclass{article}\\begin{document}\
\\begin{equation}\\label{e}x=1\\end{equation}\\end{document}",
        );
        assert_eq!(look(&numbering, "e"), "1");
    }

    #[test]
    fn the_appendix_changes_the_shape_of_the_number() {
        let (document, _) = read(
            "\\documentclass{article}\\begin{document}\
\\section{A}\\appendix\\section{B}\\subsection{C}\\end{document}",
        );
        let mut found = Vec::new();

        for node in &document.body {
            if let Node::Heading {number, ..} = node {
                found.push(number.clone());
            }
        }

        assert_eq!(found, vec!["1", "A", "A.1"]);
    }
}