1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
-- This tests the format, not the randomness
-- https://tools.ietf.org/html/rfc4122#section-4.4
local pattern = "^" .. table.concat({
string.rep("%x", 8),
string.rep("%x", 4),
"4" .. -- version
string.rep("%x", 3),
"[89ab]" .. -- reserved bits of 1 and 0
string.rep("%x", 3),
string.rep("%x", 12),
}, "%-") .. "$";
function generate(generate)
for i = 1, 100 do
assert_is(generate():match(pattern));
end
end
function seed(seed)
assert_equal(seed("random string here"), nil, "seed doesn't return anything");
end
|
