Annotate

tests/test_util_uuid.lua @ 7462:ced4e800f42a

Merge 0.10->trunk
author Matthew Wild <mwild1@gmail.com>
date Tue, 28 Jun 2016 14:54:43 +0100
parent 7073:31fa6770019c
child 7512:7a655ff689b1
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
7073
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)
31fa6770019c tests: Add test for util.uuid (checks that the output format is correct)
Kim Alvefur <zash@zash.se>
parents:
diff changeset
16 for i = 1, 100 do
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