blob: 390aca767981eb6892ce414b54fa4ecacd110445 (
plain)
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
|
#
# PRE: update update-remove-index
#
# A more generic "update" mechanism
#
update {
control:Cleartext-Password := 'hello'
reply:Filter-Id := "filter"
}
update {
control:Reply-Message += 'a'
control:Reply-Message += 'b'
control:Reply-Message += 'c'
}
if ((&control:Reply-Message[0] != 'a') || (&control:Reply-Message[1] != 'b') || (&control:Reply-Message[2] != 'c')) {
update {
reply:Filter-Id := 'Fail 0'
}
}
# Overwrite a specific index, and check the value here is replaced
update {
&control:Reply-Message[1] := 'd'
}
if ((&control:Reply-Message[0] != 'a') || (&control:Reply-Message[1] != 'd') || (&control:Reply-Message[2] != 'c')) {
update {
reply:Filter-Id := 'Fail 1'
}
}
# Check isolation...
update {
&control:Reply-Message[0] := &control:Reply-Message[0]
}
if ((&control:Reply-Message[0] != 'a') || (&control:Reply-Message[1] != 'd') || (&control:Reply-Message[2] != 'c')) {
update {
reply:Filter-Id := 'Fail 2'
}
}
# Verify we haven't acquired any extra..
if ("%{control:Reply-Message[#]}" != 3) {
update {
reply:Filter-Id := 'Fail 3'
}
}
|
