rpkg 0.3.1

A lightweight CLI wrapper around Rscript for installing R packages from CRAN or elsewhere
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
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106

use clap::{ArgAction, Parser};

const GIT_SOURCES: &[(&str, &str)] = &[
    ("github", "https://github.com/"),
    ("gitlab", "https://gitlab.com/"),
    ("bitbucket", "https://bitbucket.org/"),
    ("codeberg", "https://codeberg.org/"),
];

fn is_owner_repo_shorthand(input: &str) -> bool {
    let value = input.trim();
    if value.is_empty() || value.contains("://") || value.starts_with("git@") {
        return false;
    }

    let mut parts = value.split('/');
    match (parts.next(), parts.next(), parts.next()) {
        (Some(owner), Some(repo), None) => !owner.is_empty() && !repo.is_empty(),
        _ => false,
    }
}

pub fn parse_owner_repo(input: &str) -> Result<String, String> {
    let value = input.trim();
    if is_owner_repo_shorthand(value) {
        Ok(value.to_string())
    } else {
        Err(format!(
            "invalid repository '{}': expected OWNER/REPO",
            input
        ))
    }
}

fn source_base_url(source: &str) -> Option<&'static str> {
    let source = source.trim().to_lowercase();
    GIT_SOURCES
        .iter()
        .find(|(name, _)| *name == source)
        .map(|(_, url)| *url)
}

// Create a git URL from a source and repository name
pub fn build_git_url(source: &str, repo: &str) -> String {
    let repo = repo.trim();
    if let Some(base) = source_base_url(source) {
        return format!("{}{}.git", base, repo);
    }
    repo.to_string()
}

#[derive(Parser)]
#[command(author = "Alberson da Silva Miranda", version, about)]

pub struct Cli {
    #[arg(required = false)]
    pub packages: Vec<String>,

    #[arg(short = 'c', long)]
    pub country: Option<String>,

    #[arg(short, long)]
    pub library: Option<String>,

    #[arg(
        long,
        action = ArgAction::Append,
        value_name = "OWNER/REPO",
        value_parser = parse_owner_repo
    )]
    pub github: Vec<String>,

    #[arg(
        long,
        action = ArgAction::Append,
        value_name = "OWNER/REPO",
        value_parser = parse_owner_repo
    )]
    pub gitlab: Vec<String>,

    #[arg(
        long,
        action = ArgAction::Append,
        value_name = "OWNER/REPO",
        value_parser = parse_owner_repo
    )]
    pub bitbucket: Vec<String>,

    #[arg(
        long,
        action = ArgAction::Append,
        value_name = "OWNER/REPO",
        value_parser = parse_owner_repo
    )]
    pub codeberg: Vec<String>,

    #[arg(
      long,
      action = ArgAction::Append,
      help = "Additional custom repository URL (takes precedence over country selection)"
    )]
    pub url: Option<String>,

    #[arg(long, help = "Update all installed packages before installing")]
    pub update: bool,
}