4 * This program is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU General Public License
6 * as published by the Free Software Foundation; either version
7 * 2 of the License, or (at your option) any later version.
9 * Authors: Martin Devera, devik@cdi.cz
17 #include <sys/socket.h>
18 #include <netinet/in.h>
19 #include <arpa/inet.h>
25 #define HTB_TC_VER 0x30003
26 #if HTB_TC_VER >> 16 != TC_HTB_PROTOVER
27 #error "Different kernel and TC HTB versions"
30 static void explain(void)
32 fprintf(stderr
, "Usage: ... qdisc add ... htb [default N] [r2q N]\n"
33 " [direct_qlen P] [offload]\n"
34 " default minor id of class to which unclassified packets are sent {0}\n"
35 " r2q DRR quantums are computed as rate in Bps/r2q {10}\n"
36 " debug string of 16 numbers each 0-3 {0}\n\n"
37 " direct_qlen Limit of the direct queue {in packets}\n"
38 " offload enable hardware offload\n"
39 "... class add ... htb rate R1 [burst B1] [mpu B] [overhead O]\n"
40 " [prio P] [slot S] [pslot PS]\n"
41 " [ceil R2] [cburst B2] [mtu MTU] [quantum Q]\n"
42 " rate rate allocated to this class (class can still borrow)\n"
43 " burst max bytes burst which can be accumulated during idle period {computed}\n"
44 " mpu minimum packet size used in rate computations\n"
45 " overhead per-packet size overhead used in rate computations\n"
46 " linklay adapting to a linklayer e.g. atm\n"
47 " ceil definite upper class rate (no borrows) {rate}\n"
48 " cburst burst but for ceil {computed}\n"
49 " mtu max packet size we create rate map for {1600}\n"
50 " prio priority of leaf; lower are served first {0}\n"
51 " quantum how much bytes to serve from leaf at once {use r2q}\n"
52 "\nTC HTB version %d.%d\n", HTB_TC_VER
>>16, HTB_TC_VER
&0xffff
56 static void explain1(char *arg
)
58 fprintf(stderr
, "Illegal \"%s\"\n", arg
);
62 static int htb_parse_opt(struct qdisc_util
*qu
, int argc
,
63 char **argv
, struct nlmsghdr
*n
, const char *dev
)
65 unsigned int direct_qlen
= ~0U;
66 struct tc_htb_glob opt
= {
71 unsigned int i
; char *p
;
75 if (matches(*argv
, "r2q") == 0) {
77 if (get_u32(&opt
.rate2quantum
, *argv
, 10)) {
78 explain1("r2q"); return -1;
80 } else if (matches(*argv
, "default") == 0) {
82 if (get_u32(&opt
.defcls
, *argv
, 16)) {
83 explain1("default"); return -1;
85 } else if (matches(*argv
, "debug") == 0) {
86 NEXT_ARG(); p
= *argv
;
87 for (i
= 0; i
< 16; i
++, p
++) {
88 if (*p
< '0' || *p
> '3') break;
89 opt
.debug
|= (*p
-'0')<<(2*i
);
91 } else if (matches(*argv
, "direct_qlen") == 0) {
93 if (get_u32(&direct_qlen
, *argv
, 10)) {
94 explain1("direct_qlen"); return -1;
96 } else if (matches(*argv
, "offload") == 0) {
99 fprintf(stderr
, "What is \"%s\"?\n", *argv
);
105 tail
= addattr_nest(n
, 1024, TCA_OPTIONS
);
106 addattr_l(n
, 2024, TCA_HTB_INIT
, &opt
, NLMSG_ALIGN(sizeof(opt
)));
107 if (direct_qlen
!= ~0U)
108 addattr_l(n
, 2024, TCA_HTB_DIRECT_QLEN
,
109 &direct_qlen
, sizeof(direct_qlen
));
111 addattr(n
, 2024, TCA_HTB_OFFLOAD
);
112 addattr_nest_end(n
, tail
);
116 static int htb_parse_class_opt(struct qdisc_util
*qu
, int argc
, char **argv
, struct nlmsghdr
*n
, const char *dev
)
118 struct tc_htb_opt opt
= {};
119 __u32 rtab
[256], ctab
[256];
120 unsigned buffer
= 0, cbuffer
= 0;
121 int cell_log
= -1, ccell_log
= -1;
122 unsigned int mtu
= 1600; /* eth packet len */
123 unsigned short mpu
= 0;
124 unsigned short overhead
= 0;
125 unsigned int linklayer
= LINKLAYER_ETHERNET
; /* Assume ethernet */
127 __u64 ceil64
= 0, rate64
= 0;
130 if (matches(*argv
, "prio") == 0) {
132 if (get_u32(&opt
.prio
, *argv
, 10)) {
133 explain1("prio"); return -1;
135 } else if (matches(*argv
, "mtu") == 0) {
137 if (get_u32(&mtu
, *argv
, 10)) {
138 explain1("mtu"); return -1;
140 } else if (matches(*argv
, "mpu") == 0) {
142 if (get_u16(&mpu
, *argv
, 10)) {
143 explain1("mpu"); return -1;
145 } else if (matches(*argv
, "overhead") == 0) {
147 if (get_u16(&overhead
, *argv
, 10)) {
148 explain1("overhead"); return -1;
150 } else if (matches(*argv
, "linklayer") == 0) {
152 if (get_linklayer(&linklayer
, *argv
)) {
153 explain1("linklayer"); return -1;
155 } else if (matches(*argv
, "quantum") == 0) {
157 if (get_u32(&opt
.quantum
, *argv
, 10)) {
158 explain1("quantum"); return -1;
160 } else if (matches(*argv
, "burst") == 0 ||
161 strcmp(*argv
, "buffer") == 0 ||
162 strcmp(*argv
, "maxburst") == 0) {
164 if (get_size_and_cell(&buffer
, &cell_log
, *argv
) < 0) {
168 } else if (matches(*argv
, "cburst") == 0 ||
169 strcmp(*argv
, "cbuffer") == 0 ||
170 strcmp(*argv
, "cmaxburst") == 0) {
172 if (get_size_and_cell(&cbuffer
, &ccell_log
, *argv
) < 0) {
176 } else if (strcmp(*argv
, "ceil") == 0) {
179 fprintf(stderr
, "Double \"ceil\" spec\n");
182 if (strchr(*argv
, '%')) {
183 if (get_percent_rate64(&ceil64
, *argv
, dev
)) {
187 } else if (get_rate64(&ceil64
, *argv
)) {
191 } else if (strcmp(*argv
, "rate") == 0) {
194 fprintf(stderr
, "Double \"rate\" spec\n");
197 if (strchr(*argv
, '%')) {
198 if (get_percent_rate64(&rate64
, *argv
, dev
)) {
202 } else if (get_rate64(&rate64
, *argv
)) {
206 } else if (strcmp(*argv
, "help") == 0) {
210 fprintf(stderr
, "What is \"%s\"?\n", *argv
);
218 fprintf(stderr
, "\"rate\" is required.\n");
221 /* if ceil params are missing, use the same as rate */
225 opt
.rate
.rate
= (rate64
>= (1ULL << 32)) ? ~0U : rate64
;
226 opt
.ceil
.rate
= (ceil64
>= (1ULL << 32)) ? ~0U : ceil64
;
228 /* compute minimal allowed burst from rate; mtu is added here to make
229 sute that buffer is larger than mtu and to have some safeguard space */
231 buffer
= rate64
/ get_hz() + mtu
;
233 cbuffer
= ceil64
/ get_hz() + mtu
;
235 opt
.ceil
.overhead
= overhead
;
236 opt
.rate
.overhead
= overhead
;
241 if (tc_calc_rtable(&opt
.rate
, rtab
, cell_log
, mtu
, linklayer
) < 0) {
242 fprintf(stderr
, "htb: failed to calculate rate table.\n");
245 opt
.buffer
= tc_calc_xmittime(rate64
, buffer
);
247 if (tc_calc_rtable(&opt
.ceil
, ctab
, ccell_log
, mtu
, linklayer
) < 0) {
248 fprintf(stderr
, "htb: failed to calculate ceil rate table.\n");
251 opt
.cbuffer
= tc_calc_xmittime(ceil64
, cbuffer
);
253 tail
= addattr_nest(n
, 1024, TCA_OPTIONS
);
255 if (rate64
>= (1ULL << 32))
256 addattr_l(n
, 1124, TCA_HTB_RATE64
, &rate64
, sizeof(rate64
));
258 if (ceil64
>= (1ULL << 32))
259 addattr_l(n
, 1224, TCA_HTB_CEIL64
, &ceil64
, sizeof(ceil64
));
261 addattr_l(n
, 2024, TCA_HTB_PARMS
, &opt
, sizeof(opt
));
262 addattr_l(n
, 3024, TCA_HTB_RTAB
, rtab
, 1024);
263 addattr_l(n
, 4024, TCA_HTB_CTAB
, ctab
, 1024);
264 addattr_nest_end(n
, tail
);
268 static int htb_print_opt(struct qdisc_util
*qu
, FILE *f
, struct rtattr
*opt
)
270 struct rtattr
*tb
[TCA_HTB_MAX
+ 1];
271 struct tc_htb_opt
*hopt
;
272 struct tc_htb_glob
*gopt
;
273 double buffer
, cbuffer
;
274 unsigned int linklayer
;
275 __u64 rate64
, ceil64
;
283 parse_rtattr_nested(tb
, TCA_HTB_MAX
, opt
);
285 if (tb
[TCA_HTB_PARMS
]) {
286 hopt
= RTA_DATA(tb
[TCA_HTB_PARMS
]);
287 if (RTA_PAYLOAD(tb
[TCA_HTB_PARMS
]) < sizeof(*hopt
)) return -1;
290 print_int(PRINT_ANY
, "prio", "prio %d ", (int)hopt
->prio
);
292 print_int(PRINT_ANY
, "quantum", "quantum %d ",
296 rate64
= hopt
->rate
.rate
;
297 if (tb
[TCA_HTB_RATE64
] &&
298 RTA_PAYLOAD(tb
[TCA_HTB_RATE64
]) >= sizeof(rate64
)) {
299 rate64
= rta_getattr_u64(tb
[TCA_HTB_RATE64
]);
302 ceil64
= hopt
->ceil
.rate
;
303 if (tb
[TCA_HTB_CEIL64
] &&
304 RTA_PAYLOAD(tb
[TCA_HTB_CEIL64
]) >= sizeof(ceil64
))
305 ceil64
= rta_getattr_u64(tb
[TCA_HTB_CEIL64
]);
307 tc_print_rate(PRINT_FP
, NULL
, "rate %s ", rate64
);
308 if (hopt
->rate
.overhead
)
309 fprintf(f
, "overhead %u ", hopt
->rate
.overhead
);
310 buffer
= tc_calc_xmitsize(rate64
, hopt
->buffer
);
312 tc_print_rate(PRINT_FP
, NULL
, "ceil %s ", ceil64
);
313 cbuffer
= tc_calc_xmitsize(ceil64
, hopt
->cbuffer
);
314 linklayer
= (hopt
->rate
.linklayer
& TC_LINKLAYER_MASK
);
315 if (linklayer
> TC_LINKLAYER_ETHERNET
|| show_details
)
316 fprintf(f
, "linklayer %s ", sprint_linklayer(linklayer
, b3
));
318 print_size(PRINT_FP
, NULL
, "burst %s/", buffer
);
319 fprintf(f
, "%u ", 1<<hopt
->rate
.cell_log
);
320 print_size(PRINT_FP
, NULL
, "mpu %s ", hopt
->rate
.mpu
);
321 print_size(PRINT_FP
, NULL
, "cburst %s/", cbuffer
);
322 fprintf(f
, "%u ", 1<<hopt
->ceil
.cell_log
);
323 print_size(PRINT_FP
, NULL
, "mpu %s ", hopt
->ceil
.mpu
);
324 fprintf(f
, "level %d ", (int)hopt
->level
);
326 print_size(PRINT_FP
, NULL
, "burst %s ", buffer
);
327 print_size(PRINT_FP
, NULL
, "cburst %s ", cbuffer
);
330 fprintf(f
, "buffer [%08x] cbuffer [%08x] ",
331 hopt
->buffer
, hopt
->cbuffer
);
333 if (tb
[TCA_HTB_INIT
]) {
334 gopt
= RTA_DATA(tb
[TCA_HTB_INIT
]);
335 if (RTA_PAYLOAD(tb
[TCA_HTB_INIT
]) < sizeof(*gopt
)) return -1;
337 print_int(PRINT_ANY
, "r2q", "r2q %d", gopt
->rate2quantum
);
338 print_0xhex(PRINT_ANY
, "default", " default %#llx", gopt
->defcls
);
339 print_uint(PRINT_ANY
, "direct_packets_stat",
340 " direct_packets_stat %u", gopt
->direct_pkts
);
342 sprintf(b1
, "%d.%d", gopt
->version
>> 16, gopt
->version
& 0xffff);
343 print_string(PRINT_ANY
, "ver", " ver %s", b1
);
346 if (tb
[TCA_HTB_DIRECT_QLEN
] &&
347 RTA_PAYLOAD(tb
[TCA_HTB_DIRECT_QLEN
]) >= sizeof(__u32
)) {
348 __u32 direct_qlen
= rta_getattr_u32(tb
[TCA_HTB_DIRECT_QLEN
]);
350 print_uint(PRINT_ANY
, "direct_qlen", " direct_qlen %u",
353 if (tb
[TCA_HTB_OFFLOAD
])
354 print_null(PRINT_ANY
, "offload", " offload", NULL
);
358 static int htb_print_xstats(struct qdisc_util
*qu
, FILE *f
, struct rtattr
*xstats
)
360 struct tc_htb_xstats
*st
;
365 if (RTA_PAYLOAD(xstats
) < sizeof(*st
))
368 st
= RTA_DATA(xstats
);
369 fprintf(f
, " lended: %u borrowed: %u giants: %u\n",
370 st
->lends
, st
->borrows
, st
->giants
);
371 fprintf(f
, " tokens: %d ctokens: %d\n", st
->tokens
, st
->ctokens
);
375 struct qdisc_util htb_qdisc_util
= {
377 .parse_qopt
= htb_parse_opt
,
378 .print_qopt
= htb_print_opt
,
379 .print_xstats
= htb_print_xstats
,
380 .parse_copt
= htb_parse_class_opt
,
381 .print_copt
= htb_print_opt
,