uxn-tal 0.1.6

A Rust library for assembling TAL (Tal Assembly Language) files into UXN ROM files
Documentation 
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

//! UXN opcodes and instruction definitions

use crate::error::{AssemblerError, Result};
use crate::opcode_table::{create_instruction_map, encode_opcode};
use std::collections::HashMap;

/// UXN opcode definitions
pub struct Opcodes {
    opcodes: HashMap<String, u8>,
}

impl Opcodes {
    pub fn new() -> Self {
        Self {
            opcodes: create_instruction_map(),
        }
    }

    /// Get the base opcode for an instruction
    pub fn get_opcode(&self, name: &str) -> Result<u8> {
        // Reference ops table, same order as uxnasm.c
        const OPS: [&str; 32] = [
            "LIT", "INC", "POP", "NIP", "SWP", "ROT", "DUP", "OVR",
            "EQU", "NEQ", "GTH", "LTH", "JMP", "JCN", "JSR", "STH",
            "LDZ", "STZ", "LDR", "STR", "LDA", "STA", "DEI", "DEO",
            "ADD", "SUB", "MUL", "DIV", "AND", "ORA", "EOR", "SFT"
        ];

        let name = name.trim();
        for (i, &base) in OPS.iter().enumerate() {
            if name.len() < 3 { continue; }
            if &name[..3].to_ascii_uppercase() != base { continue; }
            let mut opcode = i as u8;
            let mut m = 3;
            // LIT always sets keep bit
            if i == 0 { opcode |= 1 << 7; }
            let chars: Vec<char> = name.chars().collect();
            while m < chars.len() {
                match chars[m] {
                    '2' => opcode |= 1 << 5,
                    'r' => opcode |= 1 << 6,
                    'k' => opcode |= 1 << 7,
                    _ => return Err(crate::error::AssemblerError::SyntaxError {
                        path: "".to_string(),
                        line: 0,
                        position: 0,
                        message: format!("Invalid mode flag '{}' in opcode '{}'", chars[m], name),
                        source_line: "".to_string(),
                    }),
                }
                m += 1;
            }
            return Ok(opcode);
        }
        // Special case for BRK (not in ops table, always 0x00)
        if name.eq_ignore_ascii_case("BRK") {
            return Ok(0x00);
        }
        Err(crate::error::AssemblerError::SyntaxError {
            path: "".to_string(),
            line: 0,
            position: 0,
            message: format!("Unknown opcode '{}'", name),
            source_line: "".to_string(),
        })
    }

    /// Apply mode flags to an opcode
    pub fn apply_modes(opcode: u8, short_mode: bool, return_mode: bool, keep_mode: bool) -> u8 {
        encode_opcode(opcode, short_mode, return_mode, keep_mode)
    }
}

impl Default for Opcodes {
    fn default() -> Self {
        Self::new()
    }
}