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