4 files changed, 94 insertions, 0 deletions
diff --git a/src/poem/anthology/cd.rs b/src/poem/anthology/cd.rs
new file mode 100644
index 0000000..3b48f60
--- /dev/null
+++ b/src/poem/anthology/cd.rs
@@ -0,0 +1,20 @@
+use crate::poem::Verse;
+
+pub fn incant(verse: &Verse) -> i32 {
+    let path = match verse.clause() {
+        Some(path) => path[0].to_string(),
+        None => env!("HOME").to_string(),
+    };
+
+    match std::env::set_current_dir(&path) {
+        Ok(_) => 0,
+        Err(e) => {
+            eprintln!(
+                "cd: unable to change into {}: {}",
+                path,
+                e.to_string().to_lowercase()
+            );
+            1
+        }
+    }
+}
diff --git a/src/poem/anthology/exit.rs b/src/poem/anthology/exit.rs
new file mode 100644
index 0000000..ecb14f1
--- /dev/null
+++ b/src/poem/anthology/exit.rs
@@ -0,0 +1,5 @@
+use std::process::exit;
+
+pub fn incant() -> i32 {
+    exit(0);
+}
diff --git a/src/poem/anthology/export.rs b/src/poem/anthology/export.rs
new file mode 100644
index 0000000..76dfd99
--- /dev/null
+++ b/src/poem/anthology/export.rs
@@ -0,0 +1,23 @@
+use crate::poem::Verse;
+use std::env;
+
+pub fn incant(verse: &Verse) -> i32 {
+    match verse.clause() {
+        Some(clause) => {
+            for stanza in clause {
+                let (key, val) = match stanza.split_once("=") {
+                    Some((key, val)) => (key, val),
+                    None => continue,
+                };
+                env::set_var(key, val);
+            }
+        }
+        None => {
+            for (key, val) in env::vars() {
+                println!("{}={}", key, val);
+            }
+        }
+    }
+
+    0
+}
diff --git a/src/poem/anthology/source.rs b/src/poem/anthology/source.rs
new file mode 100644
index 0000000..1449994
--- /dev/null
+++ b/src/poem/anthology/source.rs
@@ -0,0 +1,46 @@
+use crate::poem::Verse;
+use crate::poem::{read::Readable, recite::Reciteable, Poem};
+use std::fs;
+use std::path::Path;
+
+pub fn incant(verse: &Verse, path: &Vec<&Path>, bins: &mut Vec<String>) -> i32 {
+    let files = match verse.clause() {
+        Some(clause) => clause,
+        None => {
+            eprintln!("source: not enough arguments");
+            return 1;
+        }
+    };
+
+    for file in files {
+        let poetry = match fs::read_to_string(&file) {
+            Ok(contents) => contents,
+            Err(e) => {
+                eprintln!(
+                    "source: could not load {}: {}",
+                    file,
+                    e.to_string().to_lowercase()
+                );
+                return 127;
+            }
+        };
+
+        let poem = match Poem::read(poetry) {
+            Ok(poem) => poem,
+            Err(e) => {
+                eprintln!("dwvsh: {}", e.to_string().to_lowercase());
+                continue;
+            }
+        };
+
+        match poem.recite(path, bins, None) {
+            Ok(_) => {}
+            Err(e) => {
+                eprintln!("dwvsh: {}", e.to_string().to_lowercase());
+                continue;
+            }
+        }
+    }
+
+    0
+}