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
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152

//! Common build patterns

/// Per-project binary name
pub static BINARY : &str = "rick";

/// Cargo toggle
pub static FEATURE : &str = "letmeout";

/// Environment name controlling verbosity
pub static VERBOSE_ENVIRONMENT_NAME : &str = "VERBOSE";

/// Declare a dependency on a task that may panic
pub fn deps(task: fn()) {
  task();
}

/// Hey stupid, avoid shell commands whenever possible!
/// Executes the given program with the given arguments.
/// Returns the command object.
#[macro_export]
macro_rules! shell_mut {
  ($p : expr, $($a : expr),*) => {
    {
      use std::env::var;
      use std::process::Command;

      if var(tinyrick::VERBOSE_ENVIRONMENT_NAME).is_ok() {
        println!("{} {}", $p, &[$( $a, )*].join(" "));
      }

      Command::new($p)
        $(.arg($a))*
    }
  };
}

/// Hey stupid, avoid shell commands whenever possible!
/// Executes the given program with the given arguments.
/// Returns the output object.
/// Panics if the command exits with a failure status.
#[macro_export]
macro_rules! shell_output {
  ($p : expr, $($a : expr),*) => {
    {
      tinyrick::shell_mut!($p $(,$a)*)
        .output()
        .unwrap()
    }
  };
}

/// Hey stupid, avoid shell commands whenever possible!
/// Executes the given program with the given arguments.
/// Returns the stdout stream.
/// Panics if the command exits with a failure status.
#[macro_export]
macro_rules! shell_stdout {
  ($p : expr, $($a : expr),*) => {
    {
      tinyrick::shell_output!($p $(,$a)*)
        .stdout
    }
  };
}

/// Hey stupid, avoid shell commands whenever possible!
/// Executes the given program with the given arguments.
/// Returns the complete stdout string.
/// Panics if the command exits with a failure status.
#[macro_export]
macro_rules! shell_stdout_utf8 {
  ($p : expr, $($a : expr),*) => {
    {
      String::from_utf8(tinyrick::shell_stdout!($p $(,$a)*))
        .unwrap()
    }
  };
}

/// Hey stupid, avoid shell commands whenever possible!
/// Executes the given program with the given arguments.
/// Returns the stderr stream.
/// Panics if the command exits with a failure status.
#[macro_export]
macro_rules! shell_stderr {
  ($p : expr, $($a : expr),*) => {
    {
      tinyrick::shell_output!($p $(,$a)*)
        .stderr
    }
  };
}

/// Hey stupid, avoid shell commands whenever possible!
/// Executes the given program with the given arguments.
/// Returns the complete stderr string.
/// Panics if the command exits with a failure status.
#[macro_export]
macro_rules! shell_stderr_utf8 {
  ($p : expr, $($a : expr),*) => {
    {
      String::from_utf8(tinyrick::shell_stderr!($p $(,$a)*))
      .unwrap()
    }
  };
}

/// Hey stupid, avoid shell commands whenever possible!
/// Executes the given program with the given arguments.
/// Returns the status object.
/// Panics if the command exits with a failure status.
#[macro_export]
macro_rules! shell {
  ($p : expr, $($a : expr),*) => {
    {
      tinyrick::shell_mut!($p $(,$a)*)
        .status()
        .unwrap()
    }
  };
}

/// Register tasks with CLI entrypoint.
/// The first entry is the default task,
/// When no tasks are named in CLI arguments.
#[macro_export]
macro_rules! wubba_lubba_dub_dub {
  ($d : expr ; $t : expr, $($u : expr),*) => {
    fn main() {
      let args : Vec<String> = env::args()
        .collect();

      let task_names : Vec<&str> = args
        .iter()
        .skip(1)
        .map(String::as_str)
        .collect();

      if task_names.len() == 0 {
        $d();
      } else {
        for task_name in task_names {
          match task_name {
            "$t" => $t(),
            $("$u" => $u(),)*
            _ => panic!("Unknown task {}", task_name)
          }
        }
      }
    }
  };
}