blob: d9cc32b60ef080aafddbdb7849ade35d51f3ade4 (
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
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
# ip saddr @set1 drop
ip test-ip4 input
[ payload load 4b @ network header + 12 => reg 1 ]
[ lookup reg 1 set set1 ]
[ immediate reg 0 drop ]
# ip saddr != @set1 drop
ip test-ip4 input
[ payload load 4b @ network header + 12 => reg 1 ]
[ lookup reg 1 set set1 0x1 ]
[ immediate reg 0 drop ]
# ip saddr @set2 drop
ip test-ip4 input
[ payload load 4b @ network header + 12 => reg 1 ]
[ lookup reg 1 set set2 ]
[ immediate reg 0 drop ]
# ip saddr != @set2 drop
ip test-ip4 input
[ payload load 4b @ network header + 12 => reg 1 ]
[ lookup reg 1 set set2 0x1 ]
[ immediate reg 0 drop ]
# ip saddr . ip daddr @set5 drop
ip test-ip4 input
[ payload load 4b @ network header + 12 => reg 1 ]
[ payload load 4b @ network header + 16 => reg 9 ]
[ lookup reg 1 set set5 ]
[ immediate reg 0 drop ]
# add @set5 { ip saddr . ip daddr }
ip test-ip4 input
[ payload load 4b @ network header + 12 => reg 1 ]
[ payload load 4b @ network header + 16 => reg 9 ]
[ dynset add reg_key 1 set set5 ]
# ip saddr { { 1.1.1.0, 3.3.3.0 }, 2.2.2.0 }
__set%d test-ip4 3
__set%d test-ip4 0
element 00010101 : 0 [end] element 00030303 : 0 [end] element 00020202 : 0 [end]
ip test-ip4 input
[ payload load 4b @ network header + 12 => reg 1 ]
[ lookup reg 1 set __set%d ]
# ip saddr { { 1.1.1.0/24, 3.3.3.0/24 }, 2.2.2.0/24 }
__set%d test-ip4 7
__set%d test-ip4 0
element 00000000 : 1 [end] element 00010101 : 0 [end] element 00020101 : 1 [end] element 00020202 : 0 [end] element 00030202 : 1 [end] element 00030303 : 0 [end] element 00040303 : 1 [end]
ip test-ip4 input
[ payload load 4b @ network header + 12 => reg 1 ]
[ lookup reg 1 set __set%d ]
# ip saddr @set6 drop
ip
[ payload load 4b @ network header + 12 => reg 1 ]
[ lookup reg 1 set set6 ]
[ immediate reg 0 drop ]
# ip saddr vmap { 1.1.1.1 : drop, * : accept }
__map%d test-ip4 b
__map%d test-ip4 0
element 01010101 : drop 0 [end] element : accept 2 [end]
ip
[ payload load 4b @ network header + 12 => reg 1 ]
[ lookup reg 1 set __map%d dreg 0 ]
# meta mark set ip saddr map { 1.1.1.1 : 0x00000001, * : 0x00000002 }
__map%d test-ip4 b
__map%d test-ip4 0
element 01010101 : 00000001 0 [end] element : 00000002 2 [end]
ip
[ payload load 4b @ network header + 12 => reg 1 ]
[ lookup reg 1 set __map%d dreg 1 ]
[ meta set mark with reg 1 ]
# add @map1 { ip saddr . ip daddr : meta mark }
ip test-ip4 input
[ payload load 4b @ network header + 12 => reg 1 ]
[ payload load 4b @ network header + 16 => reg 9 ]
[ meta load mark => reg 10 ]
[ dynset add reg_key 1 set map1 sreg_data 10 ]
|