schemat 0.5.1

use super::input::Input;
use crate::position_map::PositionMap;
use allocator_api2::alloc::Allocator;
use core::str;
use nom::error::Error;

pub type NomError<'a, A> = Error<Input<'a, A>>;

#[derive(Debug, PartialEq, Eq)]
pub struct ParseError {
    message: &'static str,
    offset: usize,
}

impl ParseError {
    pub fn new<A: Allocator>(source: &str, error: nom::Err<NomError<'_, A>>) -> Self {
        let end_offset = source.len() - 1;

        match error {
            nom::Err::Incomplete(_) => Self {
                message: "parsing requires more data",
                offset: end_offset,
            },
            nom::Err::Error(error) | nom::Err::Failure(error) => Self {
                message: "failed to parse",
                offset: error.input.location_offset().min(end_offset),
            },
        }
    }

    pub fn to_string(&self, source: &str, position_map: &PositionMap) -> String {
        let bytes = &source.as_bytes()[position_map.line_range(self.offset).expect("valid offset")];

        format!(
            "{} at line {} and column {}: {}",
            &self.message,
            &position_map.line_index(self.offset).expect("valid offset") + 1,
            &position_map
                .column_index(self.offset)
                .expect("valid offset")
                + 1,
            String::from_utf8_lossy(bytes).trim_end(),
        )
    }
}

#[cfg(test)]
mod tests {
    use super::*;
    use allocator_api2::alloc::Global;
    use nom::error::ErrorKind;
    use pretty_assertions::assert_eq;

    #[test]
    fn to_string() {
        let source = "foo";
        let position_map = PositionMap::new(source);

        let error = ParseError::new(
            "foo",
            nom::Err::Error(Error {
                input: Input::new_extra("foo", Global),
                code: ErrorKind::Tag,
            }),
        );

        assert_eq!(
            error.to_string(source, &position_map),
            "failed to parse at line 1 and column 1: foo"
        );
    }
}