get_clause.rs

use nom::{
    bytes::complete::{tag, tag_no_case, take_while1},
    character::complete::multispace1,
    multi::separated_list1,
    IResult, Parser,
};
use xml_mut_data::{GetClause, NodePath};

// TODO: instead of alphanumeric use standard defined characters
// https://www.w3.org/TR/xml/#NT-NameStartChar
pub fn is_valid_in_xml_node_name(s: char) -> bool {
    s.is_alphanumeric() || s == '_' || s == '-' || s == '.' || s == ':'
}

pub fn node_path(s: &str) -> IResult<&str, NodePath> {
    let (s, path) = separated_list1(tag("/"), take_while1(is_valid_in_xml_node_name)).parse(s)?;
    Ok((s, NodePath { path }))
}

pub fn get_clause(s: &str) -> IResult<&str, GetClause> {
    let (s, get_word) = tag_no_case("get")(s)?;
    let (s, _) = multispace1(s)?;
    let (s, node_selector) = node_path(s)?;

    Ok((
        s,
        (GetClause {
            get_word,
            node_selector,
        }),
    ))
}