guartcl 0.5.0-beta2

Enhanced Jim Tcl.
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

use std::{env, mem, os::unix::ffi::OsStrExt, path::Path, process};

use guartcl::guardian_interp;
use jimtcl::{JimError, JimResult, cli::Jimsh};

use clap::{CommandFactory, FromArgMatches, Parser};

static GUARTCL_VERSION: &str = env!("CARGO_PKG_VERSION");

/// Enhanced Jim Tcl shell, with Rust-based superpowers.
#[derive(Parser)]
#[command(version, name = "guarsh")]
struct GuardianShell {
    #[command(flatten)]
    jimsh: Jimsh,

    /// Parse command-line arguments with Usage.
    #[arg(short = 'U', long = "usage")]
    usage: bool,
}

fn main() -> JimResult<()> {
    let interp = guardian_interp()?;

    let cli = GuardianShell::command().long_version(format!(
        "{} (Jim version {})",
        GUARTCL_VERSION,
        interp.jim_version()?
    ));

    let cli = GuardianShell::from_arg_matches(&cli.get_matches())
        .map_err(|e| JimError::from(format!("CLI error: {}", e)))?;

    if let Some(argv0) = env::args_os().next() {
        interp.set_variable("jim::argv0", argv0.as_bytes())?;
        let path = Path::new(&argv0).canonicalize()?;
        interp.set_variable("jim::exe", path.as_os_str().as_bytes())?;
    }
    cli.jimsh.setup_env(&interp)?;

    if cli.usage
        && let Some(script) = cli.jimsh.script_file()
    {
        guartcl::usage::parse_args(&interp, script.as_ref(), &cli.jimsh.script)?;
    }
    let rc = cli.jimsh.run(&interp)?;
    mem::drop(interp);
    process::exit(rc);
}