author | Kim Alvefur <zash@zash.se> |
Sun, 25 Nov 2018 13:16:17 +0100 | |
changeset 9647 | bb8486491b48 |
parent 7515 | 7a655ff689b1 |
permissions | -rw-r--r-- |
7076
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
1 |
-- This tests the format, not the randomness |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
2 |
|
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
3 |
-- https://tools.ietf.org/html/rfc4122#section-4.4 |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
4 |
|
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
5 |
local pattern = "^" .. table.concat({ |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
6 |
string.rep("%x", 8), |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
7 |
string.rep("%x", 4), |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
8 |
"4" .. -- version |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
9 |
string.rep("%x", 3), |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
10 |
"[89ab]" .. -- reserved bits of 1 and 0 |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
11 |
string.rep("%x", 3), |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
12 |
string.rep("%x", 12), |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
13 |
}, "%-") .. "$"; |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
14 |
|
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
15 |
function generate(generate) |
7515
7a655ff689b1
test_util_uuid: remove unused one-letter loop variable [luacheck]
Anton Shestakov <av6@dwimlabs.net>
parents:
7076
diff
changeset
|
16 |
for _ = 1, 100 do |
7076
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
17 |
assert_is(generate():match(pattern)); |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
18 |
end |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
19 |
end |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
20 |
|
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
21 |
function seed(seed) |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
22 |
assert_equal(seed("random string here"), nil, "seed doesn't return anything"); |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
23 |
end |
31fa6770019c
tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff
changeset
|
24 |