test: group examples into per-category folders
Move examples/*.sx and their expected/ snapshots into per-category subfolders (examples/<category>/...). Folder = leading filename token, with ffi-objc/ffi-jni kept whole; filenames are unchanged. The corpus runner and LSP sweep now discover each category's expected/ dir, while issues/ stays flat. Example 1058's repo-root-relative companion import is made file-relative. Path strings embedded in 164 snapshots were regenerated (path-only changes). Test-layout docs in CLAUDE.md updated.
This commit is contained in:
40
examples/modules/0710-modules-sha256.sx
Normal file
40
examples/modules/0710-modules-sha256.sx
Normal file
@@ -0,0 +1,40 @@
|
||||
// Streaming SHA-256 (FIPS 180-4) from `modules/std/hash.sx`.
|
||||
//
|
||||
// Known-answer vectors (empty, "abc", the 112-byte NIST multi-block
|
||||
// vector) plus the streaming invariant: feeding the same bytes in
|
||||
// several `update` chunks yields the same digest as the one-shot call.
|
||||
//
|
||||
// The digest is a zero-heap `[64]u8` returned by value; tests build a
|
||||
// `string` view over it (no copy) to compare against the pinned hex.
|
||||
|
||||
#import "modules/std.sx";
|
||||
#import "modules/std/hash.sx";
|
||||
|
||||
check :: (label: string, got: [64]u8, want: string) {
|
||||
view := string.{ ptr = @got[0], len = 64 };
|
||||
if view == want {
|
||||
print("{}: ok\n", label);
|
||||
} else {
|
||||
print("{}: FAIL got {} want {}\n", label, view, want);
|
||||
}
|
||||
}
|
||||
|
||||
main :: () {
|
||||
check("empty", sha256_hex(""),
|
||||
"e3b0c44298fc1c149afbf4c8996fb92427ae41e4649b934ca495991b7852b855");
|
||||
check("abc", sha256_hex("abc"),
|
||||
"ba7816bf8f01cfea414140de5dae2223b00361a396177a9cb410ff61f20015ad");
|
||||
|
||||
// 112-byte input — spans more than one 64-byte block.
|
||||
multi := "abcdefghbcdefghicdefghijdefghijkefghijklfghijklmghijklmnhijklmnoijklmnopjklmnopqklmnopqrlmnopqrsmnopqrstnopqrstu";
|
||||
check("multi", sha256_hex(multi),
|
||||
"cf5b16a778af8380036ce59e7b0492370b249b11e8f07a51afac45037afee9d1");
|
||||
|
||||
// Streaming must equal one-shot regardless of chunk boundaries.
|
||||
h := init();
|
||||
h.update("abcdefghbcdefghicdefghijdefghijke"); // 33 bytes
|
||||
h.update("fghijklfghijklmghijklmnhijklmno"); // crosses block edge
|
||||
h.update("ijklmnopjklmnopqklmnopqrlmnopqrsmnopqrstnopqrstu");
|
||||
check("stream-eq-oneshot", h.final(),
|
||||
"cf5b16a778af8380036ce59e7b0492370b249b11e8f07a51afac45037afee9d1");
|
||||
}
|
||||
Reference in New Issue
Block a user