Comparison

tests/test_core_s2smanager.lua @ 363:a43edbc848b9

Oops, never added the tests for s2smanager to the repo
author Matthew Wild <mwild1@gmail.com>
date Thu, 20 Nov 2008 21:06:27 +0000
child 519:cccd610a0ef9
comparison
equal deleted inserted replaced
362:af21058d565e 363:a43edbc848b9
1 function compare_srv_priorities(csp)
2 local r1 = { priority = 10, weight = 0 }
3 local r2 = { priority = 100, weight = 0 }
4 local r3 = { priority = 1000, weight = 2 }
5 local r4 = { priority = 1000, weight = 2 }
6 local r5 = { priority = 1000, weight = 5 }
7
8 assert_equal(csp(r1, r1), false);
9 assert_equal(csp(r1, r2), true);
10 assert_equal(csp(r1, r3), true);
11 assert_equal(csp(r1, r4), true);
12 assert_equal(csp(r1, r5), true);
13
14 assert_equal(csp(r2, r1), false);
15 assert_equal(csp(r2, r2), false);
16 assert_equal(csp(r2, r3), true);
17 assert_equal(csp(r2, r4), true);
18 assert_equal(csp(r2, r5), true);
19
20 assert_equal(csp(r3, r1), false);
21 assert_equal(csp(r3, r2), false);
22 assert_equal(csp(r3, r3), false);
23 assert_equal(csp(r3, r4), false);
24 assert_equal(csp(r3, r5), true);
25
26 assert_equal(csp(r4, r1), false);
27 assert_equal(csp(r4, r2), false);
28 assert_equal(csp(r4, r3), false);
29 assert_equal(csp(r4, r4), false);
30 assert_equal(csp(r4, r5), true);
31
32 assert_equal(csp(r5, r1), false);
33 assert_equal(csp(r5, r2), false);
34 assert_equal(csp(r5, r3), false);
35 assert_equal(csp(r5, r4), false);
36 assert_equal(csp(r5, r5), false);
37
38 end