From 874be77aa404167270e94afcc7722078bb499b51 Mon Sep 17 00:00:00 2001
From: John Turner <jturner.usa@gmail.com>
Date: Thu, 13 Nov 2025 18:04:09 +0000
Subject: [PATCH] impl porthole tests

---
 testdata/porthole.txt | 19 +++++++++
 tests/porthole.rs     | 95 +++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 114 insertions(+)
 create mode 100644 testdata/porthole.txt
 create mode 100644 tests/porthole.rs

diff --git a/testdata/porthole.txt b/testdata/porthole.txt
new file mode 100644
index 0000000..99abf89
--- /dev/null
+++ b/testdata/porthole.txt
@@ -0,0 +1,19 @@
++ something/package
++ something/package
+- some#thing/package
++ =cat/package-1.0:0/2.0
+- something/pac?kage
+- =something/+package-1.0:3.0
+- a b c 
+
++ >=media-video/knob-goblin-1.0_alpha-r4
++ media-video/knobgoblin:4
+
+- /hello
+- group/-1.0
+- >=/
+- >=media-video/revised-knob-3.0aaaaaaaaa-r15
+
+*** sanity check
+> cat/test-2.0 cat/test-1.0
+< cat/test-1.0 cat/test-2.0
diff --git a/tests/porthole.rs b/tests/porthole.rs
new file mode 100644
index 0000000..3efbffe
--- /dev/null
+++ b/tests/porthole.rs
@@ -0,0 +1,95 @@
+use std::cmp::Ordering;
+
+use gentoo_utils::{
+    Parseable,
+    atom::{Atom, Cpv},
+};
+use mon::{Parser, input::InputIter, tag};
+
+static PORTHOLE_TXT: &'static str = include_str!(concat!(
+    env!("CARGO_MANIFEST_DIR"),
+    "/testdata/porthole.txt"
+));
+
+enum Operator {
+    Comment,
+    Yes,
+    No,
+    Eq,
+    Gt,
+    Lt,
+}
+
+fn parse_operator<'a>() -> impl Parser<&'a str, Output = Operator> {
+    let comment = tag("***").map(|_| Operator::Comment);
+    let yes = tag("+").map(|_| Operator::Yes);
+    let no = tag("-").map(|_| Operator::No);
+    let eq = tag("=").map(|_| Operator::Eq);
+    let gt = tag(">").map(|_| Operator::Gt);
+    let lt = tag("<").map(|_| Operator::Lt);
+
+    comment.or(yes).or(no).or(eq).or(gt).or(lt)
+}
+
+#[test]
+fn test_porthole() {
+    for line in PORTHOLE_TXT.lines() {
+        if line.is_empty() {
+            continue;
+        }
+
+        let operator = parse_operator()
+            .parse_finished(InputIter::new(
+                line.split_ascii_whitespace().nth(0).unwrap(),
+            ))
+            .unwrap();
+
+        match &operator {
+            Operator::Comment => continue,
+            Operator::Yes => {
+                let a = Atom::parser()
+                    .parse_finished(InputIter::new(
+                        line.split_ascii_whitespace().nth(1).unwrap(),
+                    ))
+                    .unwrap();
+
+                assert_eq!(
+                    line.split_ascii_whitespace().nth(1).unwrap(),
+                    &a.to_string()
+                );
+            }
+            Operator::No => {
+                assert!(
+                    Atom::parser()
+                        .parse_finished(InputIter::new(
+                            line.split_ascii_whitespace().nth(1).unwrap()
+                        ))
+                        .is_err()
+                );
+            }
+            Operator::Eq | Operator::Gt | Operator::Lt => {
+                let a = Cpv::parser()
+                    .parse_finished(InputIter::new(
+                        line.split_ascii_whitespace().nth(1).unwrap(),
+                    ))
+                    .unwrap();
+
+                let b = Cpv::parser()
+                    .parse_finished(InputIter::new(
+                        line.split_ascii_whitespace().nth(2).unwrap(),
+                    ))
+                    .unwrap();
+
+                assert_eq!(
+                    a.partial_cmp(&b).unwrap(),
+                    match &operator {
+                        Operator::Eq => Ordering::Equal,
+                        Operator::Gt => Ordering::Greater,
+                        Operator::Lt => Ordering::Less,
+                        _ => unreachable!(),
+                    }
+                );
+            }
+        }
+    }
+}