Software /
code /
prosody
Annotate
tests/test_util_uuid.lua @ 7427:bf43a08e5a74
MUC: Send participant list and subject on explicit joins (thanks daurnimator)
author | Kim Alvefur <zash@zash.se> |
---|---|
date | Sun, 15 May 2016 16:55:19 +0200 |
parent | 7073:31fa6770019c |
child | 7512:7a655ff689b1 |
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 |