File: u32slb

package info (click to toggle)
tcng 9m-1
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 3,632 kB
  • ctags: 2,513
  • sloc: ansic: 19,021; pascal: 4,635; yacc: 2,619; sh: 1,854; perl: 1,546; lex: 772; makefile: 749
file content (141 lines) | stat: -rw-r--r-- 2,836 bytes parent folder | download | duplicates (5)
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
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
# u32 SLB: class/unspec -------------------------------------------------------
tcsim -v | sed '/u32/s/.*returns //p;d'
#include "packet.def"

dev eth0 10Mbps {
    #include "meters.tc"

    $p = SLB(cir 1kbps,cbs 200B);
    prio {
	class if SLB_ok($p);
    }
}

#define NOTHING

send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
end
EOF
OK (0) (1:1, 0x1)
OK (0) (1:1, 0x1)
UNSPEC (-1)
# u32 SLB: class/drop ---------------------------------------------------------
tcsim -v | sed '/u32/s/.*returns //p;d'
#include "packet.def"

dev eth0 1kbps {
    #include "meters.tc"

    $p = SLB(cir 1kbps,cbs 200B);
    prio {
	class if SLB_ok($p);
	drop if 1;
    }
}

#define NOTHING

send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
end
EOF
OK (0) (1:1, 0x1)
OK (0) (1:1, 0x1)
SHOT (2)
# u32 SLB: class/class --------------------------------------------------------
tcsim -v | sed '/u32/s/.*returns //p;d'
#include "packet.def"

dev eth0 5 Mbps {
    #include "meters.tc"

    $p = SLB(cir 1kbps,cbs 200B);
    prio {
	class if SLB_ok($p);
	class if 1;
    }
}

#define NOTHING

send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
end
EOF
OK (0) (1:1, 0x1)
OK (0) (1:1, 0x1)
OK (0) (1:2, 0x2)
# u32 SLB: drop/unspec --------------------------------------------------------
tcsim -v | sed '/u32/s/.*returns //p;d'
#include "packet.def"

dev eth0 5 Mbps {
    #include "meters.tc"

    $p = SLB(cir 1kbps,cbs 200B);
    prio {
	drop if SLB_ok($p);
    }
}

#define NOTHING

send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
end
EOF
SHOT (2)
SHOT (2)
UNSPEC (-1)
# u32 SLB: drop/class ---------------------------------------------------------
tcsim -v | sed '/u32/s/.*returns //p;d'
#include "packet.def"

dev eth0 8kbps {
    #include "meters.tc"

    $p = SLB(cir 1kbps,cbs 200B);
    prio {
	drop if SLB_ok($p);
	class if 1;
    }
}

#define NOTHING

send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
end
EOF
SHOT (2)
SHOT (2)
OK (0) (1:1, 0x1)
# u32 SLB: else_drop ----------------------------------------------------------
tcsim -v | sed '/u32/s/.*returns //p;d'
#include "packet.def"

dev eth0 3Gbps {
    #include "meters.tc"

    $p = SLB(cir 1kbps,cbs 200B);
    prio {
	class if SLB_else_drop($p);
    }
}

#define NOTHING

send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
send TCP_PCK(NOTHING) 0 x 60	/* 100 bytes */
end
EOF
OK (0) (1:1, 0x1)
OK (0) (1:1, 0x1)
SHOT (2)