plum

#treesitter#compiler#wasm

git clone https://git.pyrossh.dev/plum

A statically typed, imperative programming language inspired by rust, python


010dcc3 — Peter John 2026-11-02T13:44:15+05:30
T3: plum-game crate + KaM asset decoders
plum-game/.gitignore ADDED
@@ -0,0 +1,2 @@
1
+ target/
2
+ dist/
plum-game/Cargo.toml ADDED
@@ -0,0 +1,21 @@
1
+ [package]
2
+ name = "plum-game"
3
+ version = "0.1.0"
4
+ edition = "2021"
5
+ description = "Native and web host for Plum game programs"
6
+
7
+ [dependencies]
8
+ macroquad = { version = "0.4", default-features = false }
9
+ flate2 = "1"
10
+
11
+ [target.'cfg(not(target_arch = "wasm32"))'.dependencies]
12
+ wasmtime = "47"
13
+
14
+ [dev-dependencies]
15
+ plum-core = { path = "../plum-core" }
16
+ plum-wasm-codegen = { path = "../plum-wasm-codegen" }
17
+
18
+ # Stand on its own rather than joining the parent directory's workspace: the
19
+ # Plum compiler workspace must build without pulling in the game host's
20
+ # graphics and runtime dependencies.
21
+ [workspace]
plum-game/src/assets.rs ADDED
@@ -0,0 +1,253 @@
1
+ //! Decoders for KaM Remake assets: `.rxx` sprite atlases and `.map` terrain
2
+ //! files. Plain Rust with no graphics dependency. Malformed or truncated
3
+ //! input is an `Err`, never a panic.
4
+ //!
5
+ //! The formats follow kam_macroquad's `rxx.rs`, `rules/map_file.rs` and
6
+ //! `kamdat.rs`.
7
+
8
+ use flate2::read::ZlibDecoder;
9
+ use std::io::{self, Read};
10
+ use std::path::{Path, PathBuf};
11
+
12
+ fn bad(what: impl Into<String>) -> io::Error {
13
+ io::Error::new(io::ErrorKind::InvalidData, what.into())
14
+ }
15
+
16
+ /// Where the game's asset files live.
17
+ pub struct AssetRoot;
18
+
19
+ impl AssetRoot {
20
+ /// The `--assets` argument, else `$PLUM_GAME_ASSETS`, else
21
+ /// `../kam_macroquad/assets` beside the repository.
22
+ pub fn resolve(cli: Option<&Path>) -> PathBuf {
23
+ if let Some(p) = cli {
24
+ return p.to_path_buf();
25
+ }
26
+ if let Some(p) = std::env::var_os("PLUM_GAME_ASSETS") {
27
+ return PathBuf::from(p);
28
+ }
29
+ Path::new(env!("CARGO_MANIFEST_DIR")).join("../../kam_macroquad/assets")
30
+ }
31
+ }
32
+
33
+ // --- bounds-checked reader ---------------------------------------------------
34
+
35
+ struct Reader<'a> {
36
+ b: &'a [u8],
37
+ pos: usize,
38
+ }
39
+
40
+ impl<'a> Reader<'a> {
41
+ fn take(&mut self, n: usize) -> Result<&'a [u8], String> {
42
+ let end = self.pos.checked_add(n).ok_or("length overflow")?;
43
+ let s = self.b.get(self.pos..end).ok_or_else(|| format!("data ends early at byte {}", self.pos))?;
44
+ self.pos = end;
45
+ Ok(s)
46
+ }
47
+ fn u8(&mut self) -> Result<u8, String> {
48
+ Ok(self.take(1)?[0])
49
+ }
50
+ fn u16(&mut self) -> Result<u16, String> {
51
+ let s = self.take(2)?;
52
+ Ok(u16::from_le_bytes([s[0], s[1]]))
53
+ }
54
+ fn i32(&mut self) -> Result<i32, String> {
55
+ let s = self.take(4)?;
56
+ Ok(i32::from_le_bytes([s[0], s[1], s[2], s[3]]))
57
+ }
58
+ fn u32(&mut self) -> Result<u32, String> {
59
+ Ok(self.i32()? as u32)
60
+ }
61
+ }
62
+
63
+ // --- .rxx --------------------------------------------------------------------
64
+
65
+ pub struct Sprite {
66
+ pub w: u16,
67
+ pub h: u16,
68
+ pub px: i32,
69
+ pub py: i32,
70
+ pub rgba: Vec<u8>,
71
+ }
72
+
73
+ /// A sprite archive. `sprites` is 1-based: sprite `n` is `sprites[n]`, and
74
+ /// index 0 and unused slots are `None`.
75
+ pub struct Atlas {
76
+ pub sprites: Vec<Option<Sprite>>,
77
+ }
78
+
79
+ impl Atlas {
80
+ /// Layout: optional `RXX1`/`RXX2` header, then a zlib stream holding a
81
+ /// u32 count, `count` flag bytes, then per flagged sprite its size
82
+ /// (u16 w, u16 h), pivot (i32 x, i32 y), w*h RGBA bytes, a has-mask byte
83
+ /// and an optional w*h team-colour mask (skipped).
84
+ pub fn parse(bytes: &[u8]) -> io::Result<Atlas> {
85
+ let off = if bytes.starts_with(b"RXX1") {
86
+ 4 + 32
87
+ } else if bytes.starts_with(b"RXX2") {
88
+ let l = bytes.get(4..6).ok_or_else(|| bad("rxx header ends early"))?;
89
+ 6 + u16::from_le_bytes([l[0], l[1]]) as usize
90
+ } else {
91
+ 0
92
+ };
93
+ let body = bytes.get(off..).ok_or_else(|| bad("rxx header ends early"))?;
94
+ let mut data = Vec::new();
95
+ ZlibDecoder::new(body).read_to_end(&mut data)?;
96
+
97
+ let mut r = Reader { b: &data, pos: 0 };
98
+ let count = r.u32().map_err(bad)? as usize;
99
+ let flags = r.take(count).map_err(bad)?;
100
+ let mut sprites: Vec<Option<Sprite>> = Vec::with_capacity(count + 1);
101
+ sprites.push(None);
102
+ for &flag in flags {
103
+ if flag != 1 {
104
+ sprites.push(None);
105
+ continue;
106
+ }
107
+ let w = r.u16().map_err(bad)?;
108
+ let h = r.u16().map_err(bad)?;
109
+ let px = r.i32().map_err(bad)?;
110
+ let py = r.i32().map_err(bad)?;
111
+ let n = w as usize * h as usize;
112
+ let rgba = padded(&mut r, n * 4)?;
113
+ let has_mask = padded(&mut r, 1)?[0];
114
+ if has_mask != 0 {
115
+ padded(&mut r, n)?;
116
+ }
117
+ sprites.push(Some(Sprite { w, h, px, py, rgba }));
118
+ }
119
+ Ok(Atlas { sprites })
120
+ }
121
+
122
+ /// Mean colour of the non-transparent pixels, alpha 1; zeros for a
123
+ /// missing sprite or one with no opaque pixel.
124
+ pub fn avg_color(&self, idx: usize) -> [f32; 4] {
125
+ let Some(Some(s)) = self.sprites.get(idx) else { return [0.0; 4] };
126
+ let (mut sum, mut n) = ([0u64; 3], 0u64);
127
+ for p in s.rgba.chunks_exact(4).filter(|p| p[3] != 0) {
128
+ for c in 0..3 {
129
+ sum[c] += p[c] as u64;
130
+ }
131
+ n += 1;
132
+ }
133
+ if n == 0 {
134
+ return [0.0; 4];
135
+ }
136
+ [0, 1, 2].map(|c| sum[c] as f32 / n as f32 / 255.0).into_iter().chain([1.0]).collect::<Vec<_>>().try_into().unwrap()
137
+ }
138
+ }
139
+
140
+ /// Read `len` bytes. Some archives end a few bytes early, and what is
141
+ /// missing stays zero; a larger shortfall is an error.
142
+ fn padded(r: &mut Reader, len: usize) -> io::Result<Vec<u8>> {
143
+ let avail = len.min(r.b.len() - r.pos);
144
+ if len - avail > 1024 {
145
+ return Err(bad("rxx sprite data ends early"));
146
+ }
147
+ let mut v = r.take(avail).map_err(bad)?.to_vec();
148
+ v.resize(len, 0);
149
+ Ok(v)
150
+ }
151
+
152
+ // --- .map --------------------------------------------------------------------
153
+
154
+ /// Terrain grids indexed `y * w + x`, row 0 being the first row in the file.
155
+ pub struct MapData {
156
+ pub w: i32,
157
+ pub h: i32,
158
+ /// Tileset id (the Tileset sprite is id + 1).
159
+ pub terrain: Vec<u16>,
160
+ pub rotation: Vec<u8>,
161
+ pub elevation: Vec<u8>,
162
+ /// Trees_a sprite index, 0 = none.
163
+ pub object: Vec<u16>,
164
+ }
165
+
166
+ const MAX_MAP_SIZE: i32 = 256;
167
+ const MAPELEM_RECORD: usize = 99;
168
+
169
+ /// First Trees sprite of a map element in `mapelem.dat`, 0 when the element
170
+ /// is none/invisible or has no frames.
171
+ fn object_sprite(mapelem: &[u8], obj: u16) -> u16 {
172
+ if obj >= 254 {
173
+ return 0;
174
+ }
175
+ let o = obj as usize * MAPELEM_RECORD;
176
+ let Some(rec) = mapelem.get(o..o + MAPELEM_RECORD) else { return 0 };
177
+ let i16_at = |i: usize| i16::from_le_bytes([rec[i], rec[i + 1]]);
178
+ let count = i16_at(60).clamp(0, 30) as usize;
179
+ (0..count).map(|s| i16_at(s * 2)).find(|&v| v > 0).map_or(0, |v| v as u16 + 1)
180
+ }
181
+
182
+ impl MapData {
183
+ /// Parse a map, converting object ids through `mapelem.dat` read from the
184
+ /// default asset root (see [`AssetRoot::resolve`]).
185
+ pub fn parse(bytes: &[u8]) -> Result<MapData, String> {
186
+ let path = AssetRoot::resolve(None).join("data/defines/mapelem.dat");
187
+ let mapelem = std::fs::read(&path).map_err(|e| format!("{}: {e}", path.display()))?;
188
+ MapData::parse_with(bytes, &mapelem)
189
+ }
190
+
191
+ /// Parse a map with the contents of `mapelem.dat` given.
192
+ pub fn parse_with(bytes: &[u8], mapelem: &[u8]) -> Result<MapData, String> {
193
+ let mut r = Reader { b: bytes, pos: 0 };
194
+ let mut w = r.i32()?;
195
+ let mut game_rev = 0;
196
+ if w == 0 {
197
+ // Remake format: UTF-16 revision string like "r12345", data size.
198
+ let len = r.u16()? as usize;
199
+ let units: Vec<u16> = (0..len).map(|_| r.u16()).collect::<Result<_, _>>()?;
200
+ let rev = String::from_utf16_lossy(&units);
201
+ game_rev = rev.chars().skip(1).collect::<String>().parse::<i32>().map_err(|_| "unexpected game revision in map header")?;
202
+ r.u32()?;
203
+ w = r.i32()?;
204
+ }
205
+ let h = r.i32()?;
206
+ if !(1..=MAX_MAP_SIZE).contains(&w) || !(1..=MAX_MAP_SIZE).contains(&h) {
207
+ return Err(format!("wrong map dimensions [{w}:{h}]"));
208
+ }
209
+ let n = (w * h) as usize;
210
+ let mut m = MapData {
211
+ w,
212
+ h,
213
+ terrain: Vec::with_capacity(n),
214
+ rotation: Vec::with_capacity(n),
215
+ elevation: Vec::with_capacity(n),
216
+ object: Vec::with_capacity(n),
217
+ };
218
+ for _ in 0..n {
219
+ let (terrain, rotation, height, obj);
220
+ if game_rev == 0 {
221
+ terrain = r.u8()? as u16;
222
+ r.take(1)?;
223
+ height = r.u8()?;
224
+ rotation = r.u8()?;
225
+ r.take(1)?;
226
+ obj = r.u8()? as u16;
227
+ r.take(17)?;
228
+ } else {
229
+ terrain = r.u16()?;
230
+ rotation = r.u8()?;
231
+ height = r.u8()?;
232
+ obj = r.u16()?;
233
+ r.u8()?; // IsCustom
234
+ if game_rev > 10968 {
235
+ r.u8()?; // overlay
236
+ }
237
+ let layers = r.u8()?;
238
+ if layers > 0 {
239
+ r.u8()?; // corner owners
240
+ if game_rev > 10745 {
241
+ r.u8()?; // blending level
242
+ }
243
+ r.take(layers as usize * 3)?;
244
+ }
245
+ }
246
+ m.terrain.push(terrain);
247
+ m.rotation.push(rotation % 4);
248
+ m.elevation.push(height);
249
+ m.object.push(object_sprite(mapelem, obj));
250
+ }
251
+ Ok(m)
252
+ }
253
+ }
plum-game/src/lib.rs ADDED
@@ -0,0 +1 @@
1
+ pub mod assets;
plum-game/tests/assets_test.rs ADDED
@@ -0,0 +1,114 @@
1
+ #![allow(non_snake_case)]
2
+ use plum_game::assets::{Atlas, AssetRoot, MapData};
3
+ use std::path::PathBuf;
4
+
5
+ fn root() -> Option<PathBuf> {
6
+ let r = AssetRoot::resolve(None);
7
+ if r.join("sprites").is_dir() {
8
+ Some(r)
9
+ } else {
10
+ eprintln!("skipping: asset root {} not found", r.display());
11
+ None
12
+ }
13
+ }
14
+
15
+ fn zlib(data: &[u8]) -> Vec<u8> {
16
+ use flate2::{write::ZlibEncoder, Compression};
17
+ use std::io::Write;
18
+ let mut e = ZlibEncoder::new(Vec::new(), Compression::default());
19
+ e.write_all(data).unwrap();
20
+ e.finish().unwrap()
21
+ }
22
+
23
+ fn tiny_payload() -> Vec<u8> {
24
+ let mut p = Vec::new();
25
+ p.extend(2u32.to_le_bytes());
26
+ p.extend([0u8, 1]);
27
+ p.extend(2u16.to_le_bytes());
28
+ p.extend(1u16.to_le_bytes());
29
+ p.extend((-3i32).to_le_bytes());
30
+ p.extend(4i32.to_le_bytes());
31
+ p.extend([10, 20, 30, 255, 0, 0, 0, 0]);
32
+ p.push(0);
33
+ p
34
+ }
35
+
36
+ #[test]
37
+ fn rxxHeaderVariants() {
38
+ let z = zlib(&tiny_payload());
39
+ let mut rxx1 = b"RXX1".to_vec();
40
+ rxx1.extend([0u8; 32]);
41
+ rxx1.extend(&z);
42
+ let mut rxx2 = b"RXX2".to_vec();
43
+ rxx2.extend(5u16.to_le_bytes());
44
+ rxx2.extend([9u8; 5]);
45
+ rxx2.extend(&z);
46
+ for bytes in [z.clone(), rxx1, rxx2] {
47
+ let a = Atlas::parse(&bytes).unwrap();
48
+ assert_eq!(a.sprites.len(), 3);
49
+ let s = a.sprites[2].as_ref().unwrap();
50
+ assert_eq!((s.w, s.h, s.px, s.py), (2, 1, -3, 4));
51
+ assert_eq!(a.avg_color(2), [10.0 / 255.0, 20.0 / 255.0, 30.0 / 255.0, 1.0]);
52
+ assert!(a.sprites[1].is_none());
53
+ }
54
+ }
55
+
56
+ #[test]
57
+ fn tilesetSprite1Is32() {
58
+ let Some(r) = root() else { return };
59
+ let a = Atlas::parse(&std::fs::read(r.join("sprites/Tileset.rxx")).unwrap()).unwrap();
60
+ let s = a.sprites[1].as_ref().unwrap();
61
+ assert_eq!((s.w, s.h), (32, 32));
62
+ }
63
+
64
+ #[test]
65
+ fn mapParsesANewBeginning() {
66
+ let Some(r) = root() else { return };
67
+ let m = MapData::parse(&std::fs::read(r.join("Maps/A new Beginning/A new Beginning.map")).unwrap()).unwrap();
68
+ assert!((32..=256).contains(&m.w) && (32..=256).contains(&m.h));
69
+ let n = (m.w * m.h) as usize;
70
+ assert_eq!(m.terrain.len(), n);
71
+ assert_eq!(m.rotation.len(), n);
72
+ assert_eq!(m.elevation.len(), n);
73
+ assert_eq!(m.object.len(), n);
74
+ assert!(m.terrain.iter().all(|&t| t < 512));
75
+ assert!(m.rotation.iter().all(|&r| r < 4));
76
+ }
77
+
78
+ #[test]
79
+ fn mapObjectsAreTreesSpriteIndices() {
80
+ let Some(r) = root() else { return };
81
+ let trees = Atlas::parse(&std::fs::read(r.join("sprites/Trees_a.rxx")).unwrap()).unwrap();
82
+ let m = MapData::parse(&std::fs::read(r.join("Maps/A new Beginning/A new Beginning.map")).unwrap()).unwrap();
83
+ assert!(m.object.iter().any(|&o| o != 0));
84
+ assert!(m.object.iter().all(|&o| o == 0 || trees.sprites.get(o as usize).is_some_and(|s| s.is_some())));
85
+ }
86
+
87
+ #[test]
88
+ fn truncatedRxxIsError() {
89
+ let z = zlib(&tiny_payload());
90
+ for n in [0, 1, 3, z.len() / 2] {
91
+ assert!(Atlas::parse(&z[..n]).is_err());
92
+ }
93
+ assert!(Atlas::parse(b"RXX1").is_err());
94
+ assert!(Atlas::parse(b"RXX2\xff\xff").is_err());
95
+ assert!(Atlas::parse(b"RXX2\x05").is_err());
96
+ // A count larger than the data must not allocate or panic.
97
+ assert!(Atlas::parse(&zlib(&u32::MAX.to_le_bytes())).is_err());
98
+ }
99
+
100
+ #[test]
101
+ fn truncatedMapIsError() {
102
+ assert!(MapData::parse(&[]).is_err());
103
+ assert!(MapData::parse(&[1, 0]).is_err());
104
+ let mut b = Vec::new();
105
+ b.extend(40i32.to_le_bytes());
106
+ b.extend(40i32.to_le_bytes());
107
+ b.extend(vec![0u8; 23 * 10]);
108
+ assert!(MapData::parse(&b).is_err());
109
+ let Some(r) = root() else { return };
110
+ let full = std::fs::read(r.join("Maps/A new Beginning/A new Beginning.map")).unwrap();
111
+ for n in [0, 4, 8, 100, full.len() / 2] {
112
+ assert!(MapData::parse(&full[..n]).is_err(), "n={n}");
113
+ }
114
+ }