debate-parser 1.0.0

#![no_std]

/*!

Low-level implementation of argument handling. Takes care of distinctions
between flags and positionals, that sort of thing. No type handling happens
here. Usually this is too low level to use directly.
*/

#[cfg(feature = "std")]
extern crate std;

mod arg;
mod populated_slice;

use ::core::fmt::Debug;

use populated_slice::PopulatedSlice;

pub use crate::arg::Arg;

/**

The [`ArgumentsParser`] type operates by passing arguments it finds into a
[`Visitor`], to be handled.
 */
pub trait Visitor<'arg> {
    type Value;

    /// A positional parameter.
    fn visit_positional(self, argument: &'arg Arg) -> Self::Value;

    /// A long flag that definitely has an argument, because it was given
    /// as `--flag=argument`
    fn visit_long_argument(self, flag: &'arg Arg, argument: &'arg Arg) -> Self::Value;

    /// A long flag, such as `--flag`
    fn visit_long(self, flag: &'arg Arg, arg: impl ArgAccess<'arg>) -> Self::Value;

    /// A long flag, such as `-f`
    fn visit_short(self, flag: u8, arg: impl ArgAccess<'arg>) -> Self::Value;
}

/**

[`ArgAccess`] allows a visitor to decide if a given parameter needs an argument,
based on the identity of the parameter.

Consider `--foo bar`. Is this a pair of parameters (the flag `--foo` and the
positional parameter `bar`) or a single flag `--foo bar` that takes an
argument? Similarly, `-ab foo` could be `-a b`, `foo`; or `-a`, `-b foo`; or
`-a`, `-b`, `foo`. The [`ArgumentsParser`] can't independently classify a given
argument, so instead, a visitor can request an argument via this trait only for
flags that need them and the `ArgumentParser` takes care of the parsing logic
of actually determining where that argument comes from.
*/
pub trait ArgAccess<'arg>: Sized {
    /**

    Get an argument from the parser. This should only be called by flags that
    need it; toggle flags should simply ignore it, to ensure that the next
    command line argument can correctly be parsed independently.

    This returns [`None`] if all of the CLI arguments have been exhausted, or
    if there are known to only be positional parameters remaining (because
    a raw `--` was parsed at some point).
    */
    fn take(self) -> Option<&'arg Arg>;
}

#[derive(Debug, Clone)]
enum State<'arg> {
    Ready,
    PositionalOnly,
    // TODO: reuse the better byte slice formatter here
    ShortInProgress(&'arg PopulatedSlice<u8>),
}

/**

An `ArgumentsParser` is the main entry point into `debate_parser`. It parses
arguments in each call to `next_arg`, sending those arguments to the given
[`Visitor`]. It handles distinguishing flags, options, and positionals; logic
related to how flags get their argument values, and the `--`

[debate-parser][crate] operates entirely on borrowed data, because we assume
that command-line arguments can be loaded early on in `main` and then handled
in a borrowed form for the rest of the program. The ubiquitous  `'arg` lifetime
refers to this borrowed command line data.
*/
#[derive(Debug, Clone)]
pub struct ArgumentsParser<'arg, I> {
    state: State<'arg>,
    args: I,
}

pub fn parser<A: AsRef<[u8]>>(args: &[A]) -> ArgumentsParser<'_, impl Iterator<Item = &[u8]>> {
    ArgumentsParser::new(args.iter().map(|arg| arg.as_ref()))
}

impl<'arg, I> ArgumentsParser<'arg, I>
where
    I: Iterator<Item = &'arg [u8]>,
{
    /**

    Create a new [`ArgumentsParser`] from an iterator of byte slices, where
    each byte slice is a single argument received from the command line. This
    list should *exclude* the name of the program, which is commonly passed as
    the first argument in the list.
     */
    #[inline]
    #[must_use]
    pub fn new(args: impl IntoIterator<IntoIter = I>) -> Self {
        Self {
            state: State::Ready,
            args: args.into_iter(),
        }
    }

    #[inline]
    #[must_use]
    pub fn new_from_slice(
        slice: &[impl AsBytes],
    ) -> ArgumentsParser<'_, impl Iterator<Item = &'_ [u8]>> {
        ArgumentsParser::new(slice.iter().map(|arg| arg.as_bytes()))
    }

    /// Put `self` into a `PositionalOnly` state, then process a positional
    /// argument
    #[inline]
    fn positional_only_arg<V>(&mut self, visitor: V) -> Option<V::Value>
    where
        V: Visitor<'arg>,
    {
        debug_assert!(!matches!(self.state, State::ShortInProgress(_)));

        self.state = State::PositionalOnly;
        self.args
            .next()
            .map(Arg::new)
            .map(|arg| visitor.visit_positional(arg))
    }

    /// Put `self` into a `Ready` state, then return a StandardArgAccess
    #[inline]
    fn standard_arg(&mut self) -> StandardArgAccess<'_, 'arg, I> {
        debug_assert!(!matches!(self.state, State::PositionalOnly));

        self.state = State::Ready;
        StandardArgAccess { parent: self }
    }

    /// Put `self` into a `ShortInProgress` state, then return a ShortArgAccess.
    /// `short` must be non-empty.
    #[inline]
    fn short_arg(&mut self, short: &'arg PopulatedSlice<u8>) -> ShortArgAccess<'_, 'arg> {
        debug_assert!(!matches!(self.state, State::PositionalOnly));

        self.state = State::ShortInProgress(short);
        ShortArgAccess {
            short: short.get(),
            state: &mut self.state,
        }
    }

    /// Handle getting the argument for a `-s` short flag. If there is
    /// remaining content in the short, it's a candidate for the argument;
    /// otherwise, the next argument in the input args is the candidate.
    #[inline]
    fn handle_short_argument<V>(&mut self, short: &'arg PopulatedSlice<u8>, visitor: V) -> V::Value
    where
        V: Visitor<'arg>,
    {
        let (&flag, short) = short.split_first();

        match PopulatedSlice::new(short) {
            None => visitor.visit_short(flag, self.standard_arg()),
            Some(short) => visitor.visit_short(flag, self.short_arg(short)),
        }
    }

    pub fn next_arg<V>(&mut self, visitor: V) -> Option<V::Value>
    where
        V: Visitor<'arg>,
    {
        match self.state {
            State::Ready => match self.args.next()? {
                b"--" => self.positional_only_arg(visitor),
                argument => Some(match argument {
                    [b'-', b'-', flag @ ..] => match split_once(flag, b'=') {
                        Some((flag, argument)) => {
                            visitor.visit_long_argument(Arg::new(flag), Arg::new(argument))
                        }
                        None => visitor.visit_long(Arg::new(flag), self.standard_arg()),
                    },
                    [b'-', short @ ..] => match PopulatedSlice::new(short) {
                        None => visitor.visit_positional(Arg::new(b"-")),
                        Some(short) => self.handle_short_argument(short, visitor),
                    },
                    positional => visitor.visit_positional(Arg::new(positional)),
                }),
            },
            State::PositionalOnly => self.positional_only_arg(visitor),
            State::ShortInProgress(short) => Some(self.handle_short_argument(short, visitor)),
        }
    }
}

/// ArgAccess implementation that gets the value of an argument as the next
/// whole argument from the input. Handles logic around `--`.
struct StandardArgAccess<'a, 'arg, I> {
    parent: &'a mut ArgumentsParser<'arg, I>,
}

impl<'arg, I> ArgAccess<'arg> for StandardArgAccess<'_, 'arg, I>
where
    I: Iterator<Item = &'arg [u8]>,
{
    fn take(self) -> Option<&'arg Arg> {
        match self.parent.args.next()? {
            b"--" if !matches!(self.parent.state, State::PositionalOnly) => {
                self.parent.state = State::PositionalOnly;
                None
            }
            arg => Some(Arg::new(arg)),
        }
    }
}

/// ArgAccess implementation that gets the remainder of a short argument.
/// Handles things like `-ovalue`, which is equivalent to `-o value`.
struct ShortArgAccess<'a, 'arg> {
    short: &'arg [u8],
    state: &'a mut State<'arg>,
}

impl<'arg> ArgAccess<'arg> for ShortArgAccess<'_, 'arg> {
    fn take(self) -> Option<&'arg Arg> {
        debug_assert!(
            matches!(*self.state, State::ShortInProgress(short) if short.get() == self.short)
        );

        *self.state = State::Ready;
        Some(Arg::new(self.short))
    }
}

fn split_once(input: &[u8], delimiter: u8) -> Option<(&[u8], &[u8])> {
    memchr::memchr(delimiter, input).map(|i| (&input[..i], &input[i + 1..]))
}

/// Basically the same as `AsRef<u8>`, but we want it for OsString and OsStr,
/// too.
pub trait AsBytes {
    fn as_bytes(&self) -> &[u8];
}

impl AsBytes for [u8] {
    fn as_bytes(&self) -> &[u8] {
        self
    }
}

impl AsBytes for str {
    fn as_bytes(&self) -> &[u8] {
        self.as_bytes()
    }
}

impl<T: AsBytes> AsBytes for &T {
    fn as_bytes(&self) -> &[u8] {
        T::as_bytes(*self)
    }
}

#[cfg(feature = "std")]
mod std_impls {
    use super::*;

    use std::{
        ffi::{OsStr, OsString},
        string::String,
        vec::Vec,
    };

    impl AsBytes for Vec<u8> {
        fn as_bytes(&self) -> &[u8] {
            self.as_slice()
        }
    }

    impl AsBytes for String {
        fn as_bytes(&self) -> &[u8] {
            self.as_bytes()
        }
    }

    impl AsBytes for OsString {
        fn as_bytes(&self) -> &[u8] {
            self.as_encoded_bytes()
        }
    }
    impl AsBytes for OsStr {
        fn as_bytes(&self) -> &[u8] {
            self.as_encoded_bytes()
        }
    }
}