@devaloop/devalang 0.0.1-alpha.9 → 0.0.1-beta.2

package/rust/core/audio/interpreter/statements/let_.rs

@@ -0,0 +1,36 @@
+use crate::core::parser::statement::{Statement, StatementKind};
+use devalang_types::Value;
+use devalang_types::store::VariableTable;
+
+pub fn interprete_let_statement(
+    stmt: &Statement,
+    variable_table: &mut VariableTable,
+) -> Option<VariableTable> {
+    if let StatementKind::Let { name } = &stmt.kind {
+        // If RHS is a string and looks like an expression, evaluate it
+        let evaluated = match &stmt.value {
+            Value::String(s) if s.contains("$env") || s.contains("$math") => {
+                // We don't have direct env here; use defaults or infer from table
+                let bpm = if let Some(Value::Number(n)) = variable_table.get("bpm") {
+                    *n
+                } else {
+                    120.0
+                };
+                // Try to infer beat from time-based variables if any, else 0.0
+                let beat = if let Some(Value::Number(n)) = variable_table.get("beat") {
+                    *n
+                } else {
+                    0.0
+                };
+                crate::core::audio::evaluator::evaluate_rhs_into_value(s, variable_table, bpm, beat)
+            }
+            other => other.clone(),
+        };
+
+        variable_table.set(name.to_string(), evaluated);
+
+        return Some(variable_table.clone());
+    }
+
+    None
+}

package/rust/core/audio/interpreter/statements/load.rs

@@ -0,0 +1,17 @@
+use devalang_types::Value;
+
+use crate::core::parser::statement::{Statement, StatementKind};
+use devalang_types::store::VariableTable;
+
+pub fn interprete_load_statement(
+    stmt: &Statement,
+    variable_table: &mut VariableTable,
+) -> Option<VariableTable> {
+    if let StatementKind::Load { source, alias } = &stmt.kind {
+        variable_table.set(alias.to_string(), Value::Sample(source.clone()));
+
+        return Some(variable_table.clone());
+    }
+
+    None
+}

package/rust/core/audio/interpreter/statements/loop_.rs

@@ -0,0 +1,115 @@
+use devalang_types::Value;
+
+use crate::core::{
+    audio::{engine::AudioEngine, interpreter::driver::execute_audio_block},
+    parser::statement::Statement,
+    store::global::GlobalStore,
+};
+use devalang_types::store::{FunctionTable, VariableTable};
+
+pub fn interprete_loop_statement(
+    stmt: &Statement,
+    audio_engine: &mut AudioEngine,
+    global_store: &GlobalStore,
+    variable_table: &VariableTable,
+    functions_table: &FunctionTable,
+    base_bpm: f32,
+    base_duration: f32,
+    max_end_time: f32,
+    cursor_time: f32,
+) -> (f32, f32) {
+    if let Value::Map(loop_value) = &stmt.value {
+        // Foreach form: { foreach: Identifier(name), array: Array([...]), body: Block }
+        if let (
+            Some(Value::Identifier(var_name)),
+            Some(Value::Array(items)),
+            Some(Value::Block(loop_body)),
+        ) = (
+            loop_value.get("foreach"),
+            loop_value.get("array"),
+            loop_value.get("body"),
+        ) {
+            let engine = audio_engine;
+            let mut cur_time = cursor_time;
+            let mut max_time = max_end_time;
+
+            for item in items {
+                let mut scoped_vars = variable_table.clone();
+                scoped_vars.set(var_name.clone(), item.clone());
+
+                let (block_end_time, new_cursor) = execute_audio_block(
+                    engine,
+                    global_store,
+                    scoped_vars,
+                    functions_table.clone(),
+                    loop_body,
+                    base_bpm,
+                    base_duration,
+                    max_time,
+                    cur_time,
+                );
+
+                cur_time = new_cursor.max(block_end_time);
+                max_time = max_time.max(cur_time);
+            }
+
+            return (max_time, cur_time);
+        }
+
+        let loop_count = match loop_value.get("iterator") {
+            Some(Value::Number(n)) => *n as usize,
+            Some(Value::Identifier(ident)) => {
+                if let Some(Value::Number(n)) = variable_table.get(ident) {
+                    *n as usize
+                } else {
+                    eprintln!("❌ Loop iterator must be a number, found: {:?}", ident);
+                    return (max_end_time, cursor_time);
+                }
+            }
+            _ => {
+                eprintln!(
+                    "❌ Loop iterator must be a number, found: {:?}",
+                    loop_value.get("iterator")
+                );
+                return (max_end_time, cursor_time);
+            }
+        };
+
+        let loop_body = match loop_value.get("body") {
+            Some(Value::Block(body)) => body.clone(),
+            _ => {
+                eprintln!(
+                    "❌ Loop body must be a block, found: {:?}",
+                    loop_value.get("body")
+                );
+                return (max_end_time, cursor_time);
+            }
+        };
+
+        let engine = audio_engine;
+        let mut cur_time = cursor_time;
+        let mut max_time = max_end_time;
+
+        for _ in 0..loop_count {
+            let (block_end_time, new_cursor) = execute_audio_block(
+                engine,
+                global_store,
+                variable_table.clone(),
+                functions_table.clone(),
+                &loop_body,
+                base_bpm,
+                base_duration,
+                max_time,
+                cur_time,
+            );
+
+            cur_time = new_cursor.max(block_end_time);
+            max_time = max_time.max(cur_time);
+        }
+
+        return (max_time, cur_time);
+    }
+
+    eprintln!("❌ Loop statement value is not a map");
+    (max_end_time, cursor_time)
+}

package/rust/core/audio/interpreter/statements/mod.rs

@@ -0,0 +1,12 @@
+pub mod arrow_call;
+pub mod automate;
+pub mod call;
+pub mod condition;
+pub mod function;
+pub mod let_;
+pub mod load;
+pub mod loop_;
+pub mod sleep;
+pub mod spawn;
+pub mod tempo;
+pub mod trigger;

package/rust/core/audio/interpreter/statements/sleep.rs

@@ -0,0 +1,28 @@
+use crate::core::parser::statement::Statement;
+use devalang_types::Value;
+
+pub fn interprete_sleep_statement(
+    stmt: &Statement,
+    cursor_time: f32,
+    max_end_time: f32,
+) -> (f32, f32) {
+    let duration_secs = match &stmt.value {
+        Value::Number(ms) => *ms / 1000.0,
+        Value::String(s) if s.ends_with("ms") => s
+            .trim_end_matches("ms")
+            .parse::<f32>()
+            .map(|ms| ms / 1000.0)
+            .unwrap_or_else(|_| {
+                eprintln!("❌ Invalid sleep value (ms): {}", s);
+                0.0
+            }),
+        other => {
+            eprintln!("❌ Invalid sleep value: {:?}", other);
+            0.0
+        }
+    };
+
+    let new_cursor = cursor_time + duration_secs;
+    let new_max = max_end_time.max(new_cursor);
+    (new_cursor, new_max)
+}

package/rust/core/audio/interpreter/statements/spawn.rs

@@ -0,0 +1,253 @@
+use devalang_types::{Duration, Value};
+
+use crate::core::{
+    audio::{engine::AudioEngine, interpreter::driver::execute_audio_block},
+    parser::statement::{Statement, StatementKind},
+    store::global::GlobalStore,
+};
+use devalang_types::store::{FunctionTable, VariableTable};
+
+pub fn interprete_spawn_statement(
+    stmt: &Statement,
+    audio_engine: &mut AudioEngine,
+    variable_table: &VariableTable,
+    functions: &FunctionTable,
+    global_store: &GlobalStore,
+    base_bpm: f32,
+    base_duration: f32,
+    max_end_time: f32,
+    cursor_time: f32,
+) -> (f32, f32) {
+    if let StatementKind::Spawn { name, args } = &stmt.kind {
+        let mut local_engine = AudioEngine::new(audio_engine.module_name.clone());
+
+        // Function case
+        if let Some(func) = functions.functions.get(name) {
+            if func.parameters.len() != args.len() {
+                return (max_end_time, cursor_time);
+            }
+
+            let mut local_vars = VariableTable::with_parent(variable_table.clone());
+            for (param, arg) in func.parameters.iter().zip(args) {
+                local_vars.set(param.clone(), arg.clone());
+            }
+
+            let (spawn_max, _) = execute_audio_block(
+                &mut local_engine,
+                global_store,
+                local_vars,
+                functions.clone(),
+                &func.body,
+                base_bpm,
+                base_duration,
+                0.0,
+                0.0,
+            );
+
+            audio_engine.merge_with(local_engine);
+            return (spawn_max.max(max_end_time), cursor_time);
+        }
+
+        // Group case
+        if let Some(group_stmt) = find_group(name, variable_table, global_store) {
+            if let Value::Map(map) = &group_stmt.value {
+                if let Some(Value::Block(body)) = map.get("body") {
+                    let (spawn_max, _) = execute_audio_block(
+                        &mut local_engine,
+                        global_store,
+                        variable_table.clone(),
+                        functions.clone(),
+                        body,
+                        base_bpm,
+                        base_duration,
+                        0.0,
+                        0.0,
+                    );
+                    audio_engine.merge_with(local_engine);
+                    return (spawn_max.max(max_end_time), cursor_time);
+                }
+            }
+        }
+
+        // Pattern case: allow spawning a pattern similar to call
+        if let Some(pattern_stmt) = find_pattern(name, variable_table, global_store) {
+            if let Value::String(pat) = &pattern_stmt.value {
+                let mut target_entity = name.clone();
+                if let StatementKind::Pattern { name: _n, target } = &pattern_stmt.kind {
+                    if let Some(t) = target {
+                        target_entity = t.clone();
+                    }
+                }
+
+                let final_variable_table = if let Some(parent) = &variable_table.parent {
+                    devalang_types::VariableTable {
+                        variables: parent.variables.clone(),
+                        parent: None,
+                    }
+                } else {
+                    variable_table.clone()
+                };
+
+                let pattern_str: String = pat.chars().filter(|c| !c.is_whitespace()).collect();
+                if pattern_str.is_empty() {
+                    return (max_end_time, cursor_time);
+                }
+
+                let step_count = pattern_str.len() as f32;
+                let total_bar = 4.0 * base_duration;
+                let step_duration = total_bar / step_count;
+
+                let mut updated_max = max_end_time;
+
+                for (i, ch) in pattern_str.chars().enumerate() {
+                    if ch == '-' {
+                        continue;
+                    }
+
+                    let event_time = cursor_time + (i as f32) * step_duration;
+
+                    let mut trigger_val = Value::String(target_entity.clone());
+                    if let Some(val) = variable_table.variables.get(&target_entity) {
+                        match val {
+                            Value::Identifier(id) => {
+                                if let Some(parent) = &variable_table.parent {
+                                    if let Some(v) = parent.get(id) {
+                                        trigger_val = v.clone();
+                                    }
+                                } else if let Some(v) = variable_table.get(id) {
+                                    trigger_val = v.clone();
+                                }
+                            }
+                            Value::Map(map) => {
+                                if let Some(Value::String(src)) = map.get("entity") {
+                                    trigger_val = Value::String(src.clone());
+                                } else if let Some(Value::Identifier(src)) = map.get("entity") {
+                                    trigger_val = Value::Identifier(src.clone());
+                                }
+                            }
+                            Value::Sample(sample_src) => {
+                                trigger_val = Value::Sample(sample_src.clone());
+                            }
+                            _ => {}
+                        }
+                    }
+
+                    let (src, sample_length) = crate::core::audio::loader::trigger::load_trigger(
+                        &trigger_val,
+                        &Duration::Number(step_duration),
+                        &None,
+                        base_duration,
+                        final_variable_table.clone(),
+                    );
+
+                    let play_length = step_duration.min(sample_length);
+
+                    let trigger_src = match trigger_val.get("entity") {
+                        Some(Value::String(s)) => s.clone(),
+                        Some(Value::Identifier(id)) => id.clone(),
+                        Some(Value::Statement(stmt)) => {
+                            if let StatementKind::Trigger { entity, .. } = &stmt.kind {
+                                entity.clone()
+                            } else {
+                                src.clone()
+                            }
+                        }
+                        _ => src.clone(),
+                    };
+
+                    audio_engine.insert_sample(
+                        &trigger_src,
+                        event_time,
+                        play_length,
+                        None,
+                        &final_variable_table,
+                    );
+
+                    let end_time = event_time + play_length;
+                    if end_time > updated_max {
+                        updated_max = end_time;
+                    }
+                }
+
+                audio_engine.merge_with(local_engine);
+                return (updated_max.max(max_end_time), cursor_time);
+            }
+        }
+
+        // Function or group not found
+    }
+
+    (max_end_time, cursor_time)
+}
+
+fn find_group<'a>(
+    name: &str,
+    variable_table: &'a VariableTable,
+    global_store: &'a GlobalStore,
+) -> Option<&'a Statement> {
+    if let Some(Value::Statement(stmt_box)) = variable_table.get(name) {
+        if let StatementKind::Group = stmt_box.kind {
+            return Some(stmt_box);
+        }
+    }
+    if let Some(Value::Statement(stmt_box)) = global_store.variables.variables.get(name) {
+        if let StatementKind::Group = stmt_box.kind {
+            return Some(stmt_box);
+        }
+    }
+    None
+}
+
+fn find_pattern(
+    name: &str,
+    variable_table: &VariableTable,
+    global_store: &GlobalStore,
+) -> Option<Statement> {
+    use crate::core::parser::statement::Statement;
+    use crate::core::parser::statement::StatementKind;
+
+    if let Some(Value::Statement(stmt_box)) = variable_table.get(name) {
+        if let StatementKind::Pattern { .. } = stmt_box.kind {
+            return Some(*stmt_box.clone());
+        }
+    }
+
+    if let Some(val) = global_store.variables.variables.get(name) {
+        match val {
+            Value::Statement(stmt_box) => {
+                if let StatementKind::Pattern { .. } = stmt_box.kind {
+                    return Some(*stmt_box.clone());
+                }
+            }
+            Value::Map(map) => {
+                if let Some(Value::String(_pat)) = map.get("pattern") {
+                    // Rebuild a Pattern statement from stored map if possible
+                    let stmt = Statement {
+                        kind: StatementKind::Pattern {
+                            name: name.to_string(),
+                            target: map.get("target").and_then(|v| match v {
+                                Value::String(s) => Some(s.clone()),
+                                _ => None,
+                            }),
+                        },
+                        value: Value::String(
+                            map.get("pattern")
+                                .and_then(|v| match v {
+                                    Value::String(s) => Some(s.clone()),
+                                    _ => None,
+                                })
+                                .unwrap_or_default(),
+                        ),
+                        indent: 0,
+                        line: 0,
+                        column: 0,
+                    };
+                    return Some(stmt);
+                }
+            }
+            _ => {}
+        }
+    }
+
+    None
+}

package/rust/core/audio/interpreter/statements/tempo.rs

@@ -0,0 +1,40 @@
+use crate::core::parser::statement::{Statement, StatementKind};
+use devalang_types::Value;
+use devalang_utils::logger::{LogLevel, Logger};
+
+pub fn interprete_tempo_statement(stmt: &Statement) -> Option<(f32, f32)> {
+    if let StatementKind::Tempo = &stmt.kind {
+        match &stmt.value {
+            Value::Number(bpm) => {
+                let bpm = { *bpm };
+                let duration = 60.0 / bpm;
+
+                return Some((bpm, duration));
+            }
+
+            Value::String(bpm_str) => {
+                if let Ok(bpm) = bpm_str.parse::<f32>() {
+                    let duration = 60.0 / bpm;
+                    return Some((bpm, duration));
+                }
+            }
+
+            Value::Identifier(bpm_ident) => {
+                if let Ok(bpm) = bpm_ident.parse::<f32>() {
+                    let duration = 60.0 / bpm;
+                    return Some((bpm, duration));
+                }
+            }
+
+            _ => {
+                let logger = Logger::new();
+                logger.log_message(
+                    LogLevel::Warning,
+                    format!("Invalid tempo value: {:?}", stmt.value).as_str(),
+                );
+            }
+        }
+    }
+
+    None
+}