tests/test_core_s2smanager.lua

1
-- Prosody IM
2
-- Copyright (C) 2008-2010 Matthew Wild
3
-- Copyright (C) 2008-2010 Waqas Hussain
4
--
5
-- This project is MIT/X11 licensed. Please see the
6
-- COPYING file in the source package for more information.
7
--
8
9
10
function compare_srv_priorities(csp)
11
	local r1 = { priority = 10, weight = 0 }
12
	local r2 = { priority = 100, weight = 0 }
13
	local r3 = { priority = 1000, weight = 2 }
14
	local r4 = { priority = 1000, weight = 2 }
15
	local r5 = { priority = 1000, weight = 5 }
16
17
	assert_equal(csp(r1, r1), false);
18
	assert_equal(csp(r1, r2), true);
19
	assert_equal(csp(r1, r3), true);
20
	assert_equal(csp(r1, r4), true);
21
	assert_equal(csp(r1, r5), true);
22
23
	assert_equal(csp(r2, r1), false);
24
	assert_equal(csp(r2, r2), false);
25
	assert_equal(csp(r2, r3), true);
26
	assert_equal(csp(r2, r4), true);
27
	assert_equal(csp(r2, r5), true);
28
29
	assert_equal(csp(r3, r1), false);
30
	assert_equal(csp(r3, r2), false);
31
	assert_equal(csp(r3, r3), false);
32
	assert_equal(csp(r3, r4), false);
33
	assert_equal(csp(r3, r5), false);
34
35
	assert_equal(csp(r4, r1), false);
36
	assert_equal(csp(r4, r2), false);
37
	assert_equal(csp(r4, r3), false);
38
	assert_equal(csp(r4, r4), false);
39
	assert_equal(csp(r4, r5), false);
40
41
	assert_equal(csp(r5, r1), false);
42
	assert_equal(csp(r5, r2), false);
43
	assert_equal(csp(r5, r3), true);
44
	assert_equal(csp(r5, r4), true);
45
	assert_equal(csp(r5, r5), false);
46
47
end