1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
$:.unshift "../lib/"
require 'th_mauve'
require 'mauve/configuration_builders/person'
require 'pp'
class TcMauveConfigurationBuildersPerson < Mauve::UnitTest
def test_load
config=<<EOF
person("test1") {
all { "this should email on every level" }
email "test1@example.com"
sms "01234567890"
xmpp "test1@chat.example.com"
password "topsekrit"
notify {
during { "this is the during block" }
every 300
}
}
EOF
x = nil
assert_nothing_raised { x = Mauve::ConfigurationBuilder.parse(config) }
assert_equal(1, x.people.length)
assert_equal(%w(test1), x.people.keys)
assert_equal("test1@example.com", x.people["test1"].email)
assert_equal("01234567890", x.people["test1"].sms)
assert_equal("test1@chat.example.com", x.people["test1"].xmpp)
assert_equal("topsekrit", x.people["test1"].password)
# assert_equal(300, x.people["test1"].every)
# assert_equal("this is the during block", x.people["test1"].during.call)
#
assert_equal("this should email on every level", x.people["test1"].urgent.call)
assert_equal("this should email on every level", x.people["test1"].normal.call)
assert_equal("this should email on every level", x.people["test1"].low.call)
end
def test_default_settings
config=<<EOF
person("test")
EOF
x = nil
assert_nothing_raised { x = Mauve::ConfigurationBuilder.parse(config) }
person = x.people["test"]
assert_equal(nil, person.sms)
assert_equal(nil, person.email)
assert_equal(nil, person.xmpp)
assert_kind_of(Proc, person.low)
assert_kind_of(Proc, person.normal)
assert_kind_of(Proc, person.urgent)
assert_kind_of(Hash, person.notification_thresholds)
assert_equal(1,person.notification_thresholds.keys.length)
assert(person.notification_thresholds.all?{|k,v| k.is_a?(Integer) and v.is_a?(Array)})
assert_kind_of(Array, person.notifications)
assert_equal(1, person.notifications.length)
end
end
|
