hltas 0.9.0

Reading and writing Half-Life TAS scripts (`.hltas`).
Documentation 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62

use std::str::FromStr;

use nom::{
    bytes::complete::take_while1,
    character::complete::{char, digit1, line_ending, not_line_ending, space1},
    combinator::{map, map_res, opt, recognize},
    multi::many1,
    sequence::{pair, preceded, separated_pair},
    AsChar,
};

use crate::{
    read::{non_zero_u32, IResult},
    types::{Properties, Seeds},
};

pub(crate) fn property(i: &str) -> IResult<(&str, &str)> {
    separated_pair(
        take_while1(|c: char| c.is_alphanum() || c == '_'),
        space1,
        not_line_ending,
    )(i)
}

pub(crate) fn shared_seed(i: &str) -> IResult<u32> {
    map_res(digit1, u32::from_str)(i)
}

pub(crate) fn non_shared_seed(i: &str) -> IResult<i64> {
    map_res(recognize(pair(opt(char('-')), digit1)), i64::from_str)(i)
}

pub(crate) fn seeds(i: &str) -> IResult<Seeds> {
    map(
        separated_pair(shared_seed, space1, non_shared_seed),
        |(shared, non_shared)| Seeds { shared, non_shared },
    )(i)
}

fn nl_property(i: &str) -> IResult<(&str, &str)> {
    preceded(many1(line_ending), property)(i)
}

pub(crate) fn properties(mut i: &str) -> IResult<Properties> {
    let mut properties = Properties::default();

    while let Ok((input, (name, value))) = nl_property(i) {
        i = input;

        match name {
            "demo" => properties.demo = Some(value.to_owned()),
            "save" => properties.save = Some(value.to_owned()),
            "frametime0ms" => properties.frametime_0ms = Some(value.to_owned()),
            "seed" => properties.seeds = Some(seeds(value)?.1),
            "hlstrafe_version" => properties.hlstrafe_version = Some(non_zero_u32(value)?.1),
            "load_command" => properties.load_command = Some(value.to_owned()),
            _ => continue,
        }
    }

    Ok((i, properties))
}