blob: e0ef600aae59c5f1958d6b46c63b40e681132e31 (
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
|
#
# PRE: update
#
# Remove all attributes in a list
#
update {
control:Cleartext-Password := 'hello'
reply:Filter-Id := 'filter'
}
update {
request:Tmp-String-0 := 'foobarbaz'
request:Tmp-Integer-0 := 123456789
request:Tmp-IP-Address-0 := 192.0.2.1
request:Tmp-IP-Address-0 += 192.0.2.2
control:Tmp-IP-Address-0 := 192.0.2.1
control:Tmp-IP-Address-0 += 192.0.2.3
}
if (("%{Tmp-IP-Address-0[0]}" != 192.0.2.1) || ("%{Tmp-IP-Address-0[1]}" != 192.0.2.2)) {
update {
reply:Filter-Id := 'fail 1'
}
}
# Remove all attributes in the control list
update {
request:Tmp-IP-Address-0 !* ANY
}
# Non Tmp-IP-Address-0 address attributes should still be in the request list
if ((Tmp-String-0 != 'foobarbaz') || (Tmp-Integer-0 != 123456789)) {
update reply {
reply:Filter-Id += 'fail 2'
}
}
# There should be no Tmp-IP-Address attributes in the request list
if (Tmp-IP-Address-0 || ("%{Tmp-IP-Address-0[1]}" != '')) {
update {
reply:Filter-Id += 'fail 3'
}
}
# But there should still be some in the control list
if ((control:Tmp-IP-Address-0 != 192.0.2.1) || ("%{control:Tmp-IP-Address-0[1]}" != 192.0.2.3)) {
update {
reply:Filter-Id += 'fail 4'
}
}
|
