boring

Cargo.lock

@@ -242,6 +242,7 @@ dependencies = [
  "chrono",
  "clap",
  "env_logger",
+ "io-prompt-prototype",
  "itertools 0.14.0",
  "midir",
  "regex",
@@ -412,6 +413,12 @@ dependencies = [
  "hashbrown",
 ]
 
+[[package]]
+name = "io-prompt-prototype"
+version = "1.0.0"
+source = "registry+https://github.com/rust-lang/crates.io-index"
+checksum = "ca9d71ad6b790f2522eeb0a4f207fa7ef21826777d4714c7ff09483bf17b0ab8"
+
 [[package]]
 name = "is_terminal_polyfill"
 version = "1.70.2"

Cargo.toml

@@ -7,6 +7,7 @@ edition = "2024"
 chrono = "0.4.44"
 clap = { version = "4.5.60", features = ["derive"] }
 env_logger = "0.11.9"
+io-prompt-prototype = "1.0.0"
 itertools = "0.14.0"
 midir = "0.10.3"
 regex = "1.12.3"

src/flags.rs

@@ -5,6 +5,9 @@ pub struct Flags {
     #[arg(short, long, default_value_t = false)]
     pub debug: bool,
 
+    #[arg(short, long, default_value_t = false)]
+    pub interactive: bool,
+
     #[arg(long, default_value_t = 120)]
     pub bpm: usize,
 
@@ -14,7 +17,7 @@ pub struct Flags {
     #[arg(long, default_value = "super_small_font.sf2")]
     pub sound_font: String,
 
-    #[arg(short, long, default_value = "c 2e+")]
+    #[arg(short, long, default_value = "c 2*e+")]
     pub play: Vec<String>,
 }
 

src/main.rs

@@ -1,57 +1,78 @@
+use io_prompt_prototype::prompt;
 use itertools::Itertools;
 
 mod flags;
-mod play;
+mod parse;
+mod player;
 mod seq;
 mod syn;
 mod tone;
 
 fn main() {
-    let flags = flags::Flags::new();
+    let mut flags = flags::Flags::new();
     if flags.debug {
         eprintln!("{:?}", flags);
     }
+    if flags.interactive {
+        flags.play = vec![];
+    }
 
+    let once = flags.play.iter().filter(|x| x.len() > 0).count() > 0;
+    let mut player = player::new(flags.sample_rate.clone(), flags.bpm.clone());
+    loop {
+        play_with_flags(&flags, &mut player);
+        if once {
+            break;
+        }
+    }
+}
+
+fn play_with_flags(flags: &flags::Flags, player: &mut player::Player) {
     let mut syn_seq = seq::new_syn(syn::Syn::new(
-        flags.debug,
-        flags.sound_font,
-        flags.sample_rate,
+        flags.debug.clone(),
+        flags.sound_font.clone(),
+        flags.sample_rate.clone(),
     ));
+
     let mut i = 0;
     for p in flags.play.iter() {
-        for p in play::new(p.clone()) {
+        for p in parse::new(p.clone()) {
             syn_seq.append(i as i32, p);
             i += 1;
         }
     }
 
-    play(syn_seq, flags.sample_rate, flags.bpm);
+    let sync = i > 0;
+    if !sync {
+        let mut to_break = false;
+        let mut payload = vec![];
+        loop {
+            let mut s: String = prompt!("> ").parse().expect("failed to readline");
+            s = s.split_whitespace().join(" ");
+            payload.push(s.clone());
+            match s.as_ref() {
+                "" => match to_break {
+                    false => {
+                        to_break = true;
+                    }
+                    true => {
+                        break;
+                    }
+                },
+                _ => {
+                    to_break = false;
                 }
-
-fn play(mut s: seq::SynSeq, sample_rate: usize, bpm: usize) {
-    let samples_per_beat = sample_rate / bpm * 60;
-    let params = tinyaudio::prelude::OutputDeviceParameters {
-        channels_count: 2,
-        sample_rate: sample_rate,
-        channel_sample_count: samples_per_beat,
             };
-    let beats = s.beats() + 3;
-    let duration = 60 * beats / bpm;
+        }
 
-    let sample_count = (params.channel_sample_count) as usize;
-    let mut left: Vec<f32> = vec![0_f32; sample_count];
-    let mut right: Vec<f32> = vec![0_f32; sample_count];
-
-    let _device = tinyaudio::prelude::run_output_device(params, {
-        move |data| {
-            s.render(&mut left[..], &mut right[..]); // put in a state of rendering the next loop of these notes
-            for (i, value) in left.iter().interleave(right.iter()).enumerate() {
-                data[i] = *value;
+        for p in parse::new(payload.join("\n")) {
+            syn_seq.append(i as i32, p);
+            i += 1;
         }
     }
-    })
-    .unwrap();
 
-    // Wait it out
-    std::thread::sleep(std::time::Duration::from_secs(duration as u64));
+    match sync {
+        true => player.play(syn_seq),
+        false => player.play_async(syn_seq),
+    };
 }

src/parse.rs

@@ -20,21 +20,22 @@ fn from_string(s: String) -> String {
 fn parse(s: String) -> Vec<String> {
     let s = s
         .split("\n")
-        .filter(|x: &&str| !x // doesnt start with #
+        .filter(|x: &&str| {
+            !x // doesnt start with #
                 .split_whitespace()
                 .collect::<Vec<_>>()
                 .join("")
                 .starts_with("#")
-        )
-        .map(|x| x
-            .split("#")
+        })
+        .map(|x| {
+            x.split("#")
                 .take(1) // drop after #
                 .collect::<Vec<_>>()
                 .join("")
                 .split_whitespace()
                 .collect::<Vec<_>>()
                 .join(" ")
-        )
+        })
         .collect::<Vec<_>>()
         .join("\n");
     let mut channels = vec![];
@@ -44,20 +45,22 @@ fn parse(s: String) -> Vec<String> {
         match lines[i] {
             "" => {
                 j = 0;
-            },
+            }
             _ => {
                 while channels.len() <= j {
                     channels.push("".to_string());
                 }
-                channels[{ let tmp = j; j += 1; tmp }] += &(" ".to_string() + lines[i]);
-            },
+                channels[{
+                    let tmp = j;
+                    j += 1;
+                    tmp
+                }] += &(" ".to_string() + lines[i]);
+            }
         };
     }
     channels
         .iter()
-        .map(|x| x.split_whitespace().collect::<Vec<_>>()
-        .join(" ")
-    )
+        .map(|x| x.split_whitespace().collect::<Vec<_>>().join(" "))
         .collect()
 }
 
@@ -111,9 +114,6 @@ mod test {
 
     #[test]
     fn drop_comment_trailer() {
-        assert_eq!(
-            super::new("a b c # hello world")[0],
-            "a b c".to_string()
-        );
+        assert_eq!(super::new("a b c # hello world")[0], "a b c".to_string());
     }
 }

src/player.rs

@@ -0,0 +1,61 @@
+use itertools::Itertools;
+
+use crate::seq;
+
+pub struct Player {
+    bpm: usize,
+    params: tinyaudio::OutputDeviceParameters,
+    device: Option<tinyaudio::OutputDevice>,
+}
+
+pub fn new(sample_rate: usize, bpm: usize) -> Player {
+    let samples_per_beat = sample_rate / bpm * 60;
+    Player {
+        bpm: bpm,
+        params: tinyaudio::prelude::OutputDeviceParameters {
+            channels_count: 2,
+            sample_rate: sample_rate,
+            channel_sample_count: samples_per_beat,
+        },
+        device: None,
+    }
+}
+
+impl Player {
+    pub fn play(&mut self, s: seq::SynSeq) {
+        self.play_with_sync(s, true);
+    }
+
+    pub fn play_async(&mut self, s: seq::SynSeq) {
+        self.play_with_sync(s, false);
+    }
+
+    fn play_with_sync(&mut self, mut s: seq::SynSeq, sync: bool) {
+        let sample_count = (self.params.channel_sample_count) as usize;
+        let mut left: Vec<f32> = vec![0_f32; sample_count];
+        let mut right: Vec<f32> = vec![0_f32; sample_count];
+
+        let beats = s.beats() + 3;
+        let duration = 60 * beats / self.bpm;
+
+        if self.device.is_some() {
+            self.device.as_mut().expect("lost device").close();
+        }
+        self.device = Some(
+            tinyaudio::prelude::run_output_device(self.params, {
+                move |data| {
+                    s.render(&mut left[..], &mut right[..]); // put in a state of rendering the next loop of these notes
+                    for (i, value) in left.iter().interleave(right.iter()).enumerate() {
+                        data[i] = *value;
+                    }
+                }
+            })
+            .unwrap(),
+        );
+
+        if sync {
+            // Wait it out
+            std::thread::sleep(std::time::Duration::from_secs(duration as u64));
+        }
+    }
+}

src/syn.rs

@@ -74,9 +74,19 @@ impl Syn {
         match self {
             Syn::Real(syn) => syn.render(a, b),
             Syn::Text { m, i } => {
-                eprintln!("{} | render[{}]({:?})", chrono::prelude::Utc::now(), i, m
+                eprintln!(
+                    "{} | render[{}]({:?})",
+                    chrono::prelude::Utc::now(),
+                    i,
+                    m.iter()
+                        .map(|tuple| (
+                            tuple.0,
+                            tuple
+                                .1
                                 .iter()
-                    .map(|tuple| (tuple.0, tuple.1.iter().map(|v| tone::new(v.0.to_string()).string()).collect::<Vec<_>>()))
+                                .map(|v| tone::new(v.0.to_string()).string())
+                                .collect::<Vec<_>>()
+                        ))
                         .collect::<Vec<_>>(),
                 );
                 *i += 1;

src/testdata/battle_against_a_true_hero.txt

@@ -0,0 +1,9 @@
+# https://www.musicnotes.com/sheetmusic/chrissy-ricker/battle-against-a-true-hero-easy/MN0235808
+# c major
+
+CM4 CM5 CM5 CM1 CM1 CM2 . .
+
+CM3 CM0 CM0 CM4 CM4 .   . .
+
+CM4 CM5 CM5 CM1 CM1 CM2 . .
+

src/testdata/chord_progressions.txt

@@ -1,9 +1,12 @@
+# x+0 x+5 x+7 x+0
 CM0 CM3 CM4 CM0
 
 .
 
+# x+2 x+7 x+0
 CM1 CM4 CM0
 
 .
 
+# x+0 x+7 x+9 x+5
 CM0 CM4 CM5 CM3

src/testdata/fifth_wheel.txt

@@ -0,0 +1,5 @@
+# fifth wheel = +7 semitones
+# f -> c -> g -> d -> a -> e -> b
+
+f  c  g  d  a  e  b
+ff cf gf df af ef bf

src/testdata/major_chord_progressions.txt

@@ -0,0 +1,19 @@
+CM0  CM3  CM4  CM0
+CM0T CM3T CM4T CM0T
+CM0f CM3f CM4f CM0f
+
+.
+.
+.
+
+CM1  CM4  CM0
+CM1T CM4T CM0T
+CM1f CM4f CM0f
+
+.
+.
+.
+
+CM0  CM4  CM5  CM3
+CM0T CM4T CM5T CM3T
+CM0f CM4f CM5f CM3f

src/testdata/major_chords.txt

@@ -0,0 +1,27 @@
+# major CHORD = root + major_third + perfect_fifth
+# c = c,e,g
+
+f
+a
+c
+
+c
+e
+g
+
+g
+b
+d
+
+d
+f+
+a
+
+a
+c+
+e
+
+e
+g+
+b
+

src/testdata/major_third.txt

@@ -0,0 +1,18 @@
+# major third
+# +2 letters (the third letter) with exactly 2 sharps between
+
+# c,e c+,f d,f+
+c   c+   d
+cT  c+T  dT
+
+# d+,g e,g+ f,a
+d+  e  f
+d+T eT fT
+
+# f+,a+ g,b g+,c
+f+  g  g+
+f+T gT g+T
+
+# a,c+ a+,d b,d+
+a     a+    b
+aT    a+T   bT

src/testdata/minor_chords.txt

@@ -0,0 +1,27 @@
+# minor CHORD = root + minor_third + perfect_fifth
+# c = c,e-,g
+
+f
+g+
+c
+
+c
+e-
+g
+
+g
+a+
+d
+
+d
+f
+a
+
+a
+c
+e
+
+e
+g
+b
+

src/testdata/minor_third.txt

@@ -0,0 +1,18 @@
+# minor third
+# +2 letters (the third letter) with exactly 1 half step between
+
+# c,e- c+,e d,f
+c  c+  d
+ct c+t dt
+
+# d+,f+ e,g f,g+
+d+  e  f
+d+t et ft
+
+# f+,a g,a+ g+,b
+f+  g  g+
+f+t gt g+t
+
+# a,c a+,c+ b,d
+a  a+  b
+at a+t bt

src/tone.rs

@@ -8,7 +8,7 @@ pub fn new<S: ToString>(s: S) -> Tone {
 
 impl Tone {
     fn new(s: String) -> Tone {
-        let re = regex::Regex::new(r"^(((?<letter>^[a-g])(?<sharpness>[+-]?)|(?<major>[A-G]M[0-6])|(?<minor>[A-G]m[0-6]))(?<octave>[1-5]?)|(?<numeric>[0-9]+)|(?<rest>[^a-gA-G0-9]))$").unwrap();
+        let re = regex::Regex::new(r"^(((?<letter>^[a-g])(?<sharpness>[+-]?)|(?<major>[A-G]M[0-6])|(?<minor>[A-G]m[0-6]))(?<octave>[1-5]?)((?<major_third>T)|(?<minor_third>t)|(?<fifth>f))?|(?<numeric>[0-9]+)|(?<rest>[^a-gA-G0-9]))$").unwrap();
         let captures = re
             .captures(&s)
             .expect(format!("tone '{}' does not match regex", s).as_ref());
@@ -20,7 +20,9 @@ impl Tone {
                     let mut result = match captures.name("letter") {
                         Some(letter) => Tone::char_to_middle_i32(letter.as_str()),
                         None => match captures.name("major") {
-                            Some(major) => Tone::char_to_middle_i32(&major.as_str()[..1]) + match &major.as_str()[2..] {
+                            Some(major) => {
+                                Tone::char_to_middle_i32(&major.as_str()[..1])
+                                    + match &major.as_str()[2..] {
                                         "0" => 0,
                                         "1" => 2,
                                         "2" => 4,
@@ -28,10 +30,12 @@ impl Tone {
                                         "4" => 7,
                                         "5" => 9,
                                         _ => 11,
-                            },
+                                    }
+                            }
                             None => {
                                 let minor = captures.name("minor").unwrap();
-                                Tone::char_to_middle_i32(&minor.as_str()[..1]) + match &minor.as_str()[2..] {
+                                Tone::char_to_middle_i32(&minor.as_str()[..1])
+                                    + match &minor.as_str()[2..] {
                                         "0" => 0,
                                         "1" => 2,
                                         "2" => 3,
@@ -40,7 +44,7 @@ impl Tone {
                                         "5" => 8,
                                         _ => 10,
                                     }
-                            },
+                            }
                         },
                     } as i32;
 
@@ -61,6 +65,21 @@ impl Tone {
                         None => 0,
                     } as i32;
 
+                    result += match captures.name("major_third") {
+                        Some(_) => 4, // TODO not all are good
+                        None => 0,
+                    } as i32;
+
+                    result += match captures.name("minor_third") {
+                        Some(_) => 3, // TODO not all are good
+                        None => 0,
+                    } as i32;
+
+                    result += match captures.name("fifth") {
+                        Some(_) => 7,
+                        None => 0,
+                    } as i32;
+
                     result
                 }
             },
@@ -85,8 +104,15 @@ impl Tone {
 
     pub fn string(&self) -> String {
         let v = self.i32();
-        let modifier = if v > 0 && v < 57 { "-" } else if v >= 69 { "+" } else { "" };
-        modifier.to_string() + match v {
+        let modifier = if v > 0 && v < 57 {
+            "-"
+        } else if v >= 69 {
+            "+"
+        } else {
+            ""
+        };
+        modifier.to_string()
+            + match v {
                 45 | 57 | 69 => "a",
                 46 | 58 | 70 => "a+",
                 47 | 59 | 71 => "b",
@@ -133,6 +159,42 @@ mod test {
         assert_eq!(super::new("c+4").i32(), 60 + 12 + 1);
     }
 
+    #[test]
+    fn test_tone_new_major_third() {
+        assert_eq!(super::new("cT").i32(), 60 + 4);
+        assert_eq!(super::new("c1T").i32(), 60 + 4 - 24);
+
+        assert_eq!(super::new("c+T").i32(), 60 + 1 + 4);
+        assert_eq!(super::new("c+1T").i32(), 60 + 1 + 4 - 24);
+
+        assert_eq!(super::new("CM0T").i32(), 60 + 4);
+        assert_eq!(super::new("CM01T").i32(), 60 + 4 - 24);
+    }
+
+    #[test]
+    fn test_tone_new_minor_third() {
+        assert_eq!(super::new("ct").i32(), 60 + 3);
+        assert_eq!(super::new("c1t").i32(), 60 + 3 - 24);
+
+        assert_eq!(super::new("c+t").i32(), 60 + 1 + 3);
+        assert_eq!(super::new("c+1t").i32(), 60 + 1 + 3 - 24);
+
+        assert_eq!(super::new("CM0t").i32(), 60 + 3);
+        assert_eq!(super::new("CM01t").i32(), 60 + 3 - 24);
+    }
+
+    #[test]
+    fn test_tone_new_fifth() {
+        assert_eq!(super::new("cf").i32(), 60 + 7);
+        assert_eq!(super::new("c1f").i32(), 60 + 7 - 24);
+
+        assert_eq!(super::new("c+f").i32(), 60 + 1 + 7);
+        assert_eq!(super::new("c+1f").i32(), 60 + 1 + 7 - 24);
+
+        assert_eq!(super::new("CM0f").i32(), 60 + 7);
+        assert_eq!(super::new("CM01f").i32(), 60 + 7 - 24);
+    }
+
     #[test]
     fn test_tone_c_major() {
         assert_eq!(super::new("CM0"), super::new("c"));