osdl.org!shemminger | aba5acd | 2004-04-15 20:56:59 +0000 | [diff] [blame^] | 1 | /* |
| 2 | * tc_class.c "tc class". |
| 3 | * |
| 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. |
| 8 | * |
| 9 | * Authors: Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru> |
| 10 | * |
| 11 | */ |
| 12 | |
| 13 | #include <stdio.h> |
| 14 | #include <stdlib.h> |
| 15 | #include <unistd.h> |
| 16 | #include <syslog.h> |
| 17 | #include <fcntl.h> |
| 18 | #include <sys/socket.h> |
| 19 | #include <netinet/in.h> |
| 20 | #include <arpa/inet.h> |
| 21 | #include <string.h> |
| 22 | #include <math.h> |
| 23 | |
| 24 | #include "utils.h" |
| 25 | #include "tc_util.h" |
| 26 | #include "tc_common.h" |
| 27 | |
| 28 | static void usage(void) __attribute__((noreturn)); |
| 29 | |
| 30 | static void usage(void) |
| 31 | { |
| 32 | fprintf(stderr, "Usage: tc class [ add | del | change | get ] dev STRING\n"); |
| 33 | fprintf(stderr, " [ classid CLASSID ] [ root | parent CLASSID ]\n"); |
| 34 | fprintf(stderr, " [ [ QDISC_KIND ] [ help | OPTIONS ] ]\n"); |
| 35 | fprintf(stderr, "\n"); |
| 36 | fprintf(stderr, " tc class show [ dev STRING ] [ root | parent CLASSID ]\n"); |
| 37 | fprintf(stderr, "Where:\n"); |
| 38 | fprintf(stderr, "QDISC_KIND := { prio | cbq | etc. }\n"); |
| 39 | fprintf(stderr, "OPTIONS := ... try tc class add <desired QDISC_KIND> help\n"); |
| 40 | exit(-1); |
| 41 | } |
| 42 | |
| 43 | int tc_class_modify(int cmd, unsigned flags, int argc, char **argv) |
| 44 | { |
| 45 | struct rtnl_handle rth; |
| 46 | struct { |
| 47 | struct nlmsghdr n; |
| 48 | struct tcmsg t; |
| 49 | char buf[4096]; |
| 50 | } req; |
| 51 | struct qdisc_util *q = NULL; |
| 52 | struct tc_estimator est; |
| 53 | char d[16]; |
| 54 | char k[16]; |
| 55 | |
| 56 | memset(&req, 0, sizeof(req)); |
| 57 | memset(&est, 0, sizeof(est)); |
| 58 | memset(d, 0, sizeof(d)); |
| 59 | memset(k, 0, sizeof(k)); |
| 60 | |
| 61 | req.n.nlmsg_len = NLMSG_LENGTH(sizeof(struct tcmsg)); |
| 62 | req.n.nlmsg_flags = NLM_F_REQUEST|flags; |
| 63 | req.n.nlmsg_type = cmd; |
| 64 | req.t.tcm_family = AF_UNSPEC; |
| 65 | |
| 66 | while (argc > 0) { |
| 67 | if (strcmp(*argv, "dev") == 0) { |
| 68 | NEXT_ARG(); |
| 69 | if (d[0]) |
| 70 | duparg("dev", *argv); |
| 71 | strncpy(d, *argv, sizeof(d)-1); |
| 72 | } else if (strcmp(*argv, "classid") == 0) { |
| 73 | __u32 handle; |
| 74 | NEXT_ARG(); |
| 75 | if (req.t.tcm_handle) |
| 76 | duparg("classid", *argv); |
| 77 | if (get_tc_classid(&handle, *argv)) |
| 78 | invarg(*argv, "invalid class ID"); |
| 79 | req.t.tcm_handle = handle; |
| 80 | } else if (strcmp(*argv, "root") == 0) { |
| 81 | if (req.t.tcm_parent) { |
| 82 | fprintf(stderr, "Error: \"root\" is duplicate parent ID.\n"); |
| 83 | exit(-1); |
| 84 | } |
| 85 | req.t.tcm_parent = TC_H_ROOT; |
| 86 | } else if (strcmp(*argv, "parent") == 0) { |
| 87 | __u32 handle; |
| 88 | NEXT_ARG(); |
| 89 | if (req.t.tcm_parent) |
| 90 | duparg("parent", *argv); |
| 91 | if (get_tc_classid(&handle, *argv)) |
| 92 | invarg(*argv, "invalid parent ID"); |
| 93 | req.t.tcm_parent = handle; |
| 94 | } else if (matches(*argv, "estimator") == 0) { |
| 95 | if (parse_estimator(&argc, &argv, &est)) |
| 96 | return -1; |
| 97 | } else if (matches(*argv, "help") == 0) { |
| 98 | usage(); |
| 99 | } else { |
| 100 | strncpy(k, *argv, sizeof(k)-1); |
| 101 | |
| 102 | q = get_qdisc_kind(k); |
| 103 | argc--; argv++; |
| 104 | break; |
| 105 | } |
| 106 | argc--; argv++; |
| 107 | } |
| 108 | |
| 109 | if (k[0]) |
| 110 | addattr_l(&req.n, sizeof(req), TCA_KIND, k, strlen(k)+1); |
| 111 | if (est.ewma_log) |
| 112 | addattr_l(&req.n, sizeof(req), TCA_RATE, &est, sizeof(est)); |
| 113 | |
| 114 | if (q) { |
| 115 | if (q->parse_copt == NULL) { |
| 116 | fprintf(stderr, "Error: Qdisc \"%s\" is classless.\n", k); |
| 117 | exit(1); |
| 118 | } |
| 119 | if (q->parse_copt(q, argc, argv, &req.n)) |
| 120 | exit(1); |
| 121 | } else { |
| 122 | if (argc) { |
| 123 | if (matches(*argv, "help") == 0) |
| 124 | usage(); |
| 125 | fprintf(stderr, "Garbage instead of arguments \"%s ...\". Try \"tc class help\".", *argv); |
| 126 | exit(-1); |
| 127 | } |
| 128 | } |
| 129 | |
| 130 | if (rtnl_open(&rth, 0) < 0) { |
| 131 | fprintf(stderr, "Cannot open rtnetlink\n"); |
| 132 | exit(1); |
| 133 | } |
| 134 | |
| 135 | if (d[0]) { |
| 136 | ll_init_map(&rth); |
| 137 | |
| 138 | if ((req.t.tcm_ifindex = ll_name_to_index(d)) == 0) { |
| 139 | fprintf(stderr, "Cannot find device \"%s\"\n", d); |
| 140 | exit(1); |
| 141 | } |
| 142 | } |
| 143 | |
| 144 | if (rtnl_talk(&rth, &req.n, 0, 0, NULL, NULL, NULL) < 0) |
| 145 | exit(2); |
| 146 | |
| 147 | rtnl_close(&rth); |
| 148 | return 0; |
| 149 | } |
| 150 | |
| 151 | void print_class_tcstats(FILE *fp, struct tc_stats *st) |
| 152 | { |
| 153 | SPRINT_BUF(b1); |
| 154 | |
| 155 | fprintf(fp, " Sent %llu bytes %u pkts (dropped %u, overlimits %u) ", |
| 156 | (unsigned long long)st->bytes, st->packets, st->drops, st->overlimits); |
| 157 | if (st->bps || st->pps || st->qlen || st->backlog) { |
| 158 | fprintf(fp, "\n "); |
| 159 | if (st->bps || st->pps) { |
| 160 | fprintf(fp, "rate "); |
| 161 | if (st->bps) |
| 162 | fprintf(fp, "%s ", sprint_rate(st->bps, b1)); |
| 163 | if (st->pps) |
| 164 | fprintf(fp, "%upps ", st->pps); |
| 165 | } |
| 166 | if (st->qlen || st->backlog) { |
| 167 | fprintf(fp, "backlog "); |
| 168 | if (st->backlog) |
| 169 | fprintf(fp, "%s ", sprint_size(st->backlog, b1)); |
| 170 | if (st->qlen) |
| 171 | fprintf(fp, "%up ", st->qlen); |
| 172 | } |
| 173 | } |
| 174 | } |
| 175 | |
| 176 | int filter_ifindex; |
| 177 | __u32 filter_qdisc; |
| 178 | |
| 179 | int print_class(struct sockaddr_nl *who, struct nlmsghdr *n, void *arg) |
| 180 | { |
| 181 | FILE *fp = (FILE*)arg; |
| 182 | struct tcmsg *t = NLMSG_DATA(n); |
| 183 | int len = n->nlmsg_len; |
| 184 | struct rtattr * tb[TCA_MAX+1]; |
| 185 | struct qdisc_util *q; |
| 186 | char abuf[256]; |
| 187 | |
| 188 | if (n->nlmsg_type != RTM_NEWTCLASS && n->nlmsg_type != RTM_DELTCLASS) { |
| 189 | fprintf(stderr, "Not a class\n"); |
| 190 | return 0; |
| 191 | } |
| 192 | len -= NLMSG_LENGTH(sizeof(*t)); |
| 193 | if (len < 0) { |
| 194 | fprintf(stderr, "Wrong len %d\n", len); |
| 195 | return -1; |
| 196 | } |
| 197 | if (filter_qdisc && TC_H_MAJ(t->tcm_handle^filter_qdisc)) |
| 198 | return 0; |
| 199 | |
| 200 | memset(tb, 0, sizeof(tb)); |
| 201 | parse_rtattr(tb, TCA_MAX, TCA_RTA(t), len); |
| 202 | |
| 203 | if (tb[TCA_KIND] == NULL) { |
| 204 | fprintf(stderr, "NULL kind\n"); |
| 205 | return -1; |
| 206 | } |
| 207 | |
| 208 | if (n->nlmsg_type == RTM_DELTCLASS) |
| 209 | fprintf(fp, "deleted "); |
| 210 | |
| 211 | abuf[0] = 0; |
| 212 | if (t->tcm_handle) { |
| 213 | if (filter_qdisc) |
| 214 | print_tc_classid(abuf, sizeof(abuf), TC_H_MIN(t->tcm_handle)); |
| 215 | else |
| 216 | print_tc_classid(abuf, sizeof(abuf), t->tcm_handle); |
| 217 | } |
| 218 | fprintf(fp, "class %s %s ", (char*)RTA_DATA(tb[TCA_KIND]), abuf); |
| 219 | |
| 220 | if (filter_ifindex == 0) |
| 221 | fprintf(fp, "dev %s ", ll_index_to_name(t->tcm_ifindex)); |
| 222 | |
| 223 | if (t->tcm_parent == TC_H_ROOT) |
| 224 | fprintf(fp, "root "); |
| 225 | else { |
| 226 | if (filter_qdisc) |
| 227 | print_tc_classid(abuf, sizeof(abuf), TC_H_MIN(t->tcm_parent)); |
| 228 | else |
| 229 | print_tc_classid(abuf, sizeof(abuf), t->tcm_parent); |
| 230 | fprintf(fp, "parent %s ", abuf); |
| 231 | } |
| 232 | if (t->tcm_info) |
| 233 | fprintf(fp, "leaf %x: ", t->tcm_info>>16); |
| 234 | q = get_qdisc_kind(RTA_DATA(tb[TCA_KIND])); |
| 235 | if (tb[TCA_OPTIONS]) { |
| 236 | if (q && q->print_copt) |
| 237 | q->print_copt(q, fp, tb[TCA_OPTIONS]); |
| 238 | else |
| 239 | fprintf(fp, "[cannot parse class parameters]"); |
| 240 | } |
| 241 | fprintf(fp, "\n"); |
| 242 | if (show_stats) { |
| 243 | if (tb[TCA_STATS]) { |
| 244 | if (RTA_PAYLOAD(tb[TCA_STATS]) < sizeof(struct tc_stats)) |
| 245 | fprintf(fp, "statistics truncated"); |
| 246 | else { |
| 247 | struct tc_stats st; |
| 248 | memcpy(&st, RTA_DATA(tb[TCA_STATS]), sizeof(st)); |
| 249 | print_class_tcstats(fp, &st); |
| 250 | fprintf(fp, "\n"); |
| 251 | } |
| 252 | } |
| 253 | if (q && tb[TCA_XSTATS]) { |
| 254 | q->print_xstats(q, fp, tb[TCA_XSTATS]); |
| 255 | fprintf(fp, "\n"); |
| 256 | } |
| 257 | } |
| 258 | fflush(fp); |
| 259 | return 0; |
| 260 | } |
| 261 | |
| 262 | |
| 263 | int tc_class_list(int argc, char **argv) |
| 264 | { |
| 265 | struct tcmsg t; |
| 266 | struct rtnl_handle rth; |
| 267 | char d[16]; |
| 268 | |
| 269 | memset(&t, 0, sizeof(t)); |
| 270 | t.tcm_family = AF_UNSPEC; |
| 271 | memset(d, 0, sizeof(d)); |
| 272 | |
| 273 | while (argc > 0) { |
| 274 | if (strcmp(*argv, "dev") == 0) { |
| 275 | NEXT_ARG(); |
| 276 | if (d[0]) |
| 277 | duparg("dev", *argv); |
| 278 | strncpy(d, *argv, sizeof(d)-1); |
| 279 | } else if (strcmp(*argv, "qdisc") == 0) { |
| 280 | NEXT_ARG(); |
| 281 | if (filter_qdisc) |
| 282 | duparg("qdisc", *argv); |
| 283 | if (get_qdisc_handle(&filter_qdisc, *argv)) |
| 284 | invarg(*argv, "invalid qdisc ID"); |
| 285 | } else if (strcmp(*argv, "root") == 0) { |
| 286 | if (t.tcm_parent) { |
| 287 | fprintf(stderr, "Error: \"root\" is duplicate parent ID\n"); |
| 288 | exit(-1); |
| 289 | } |
| 290 | t.tcm_parent = TC_H_ROOT; |
| 291 | } else if (strcmp(*argv, "parent") == 0) { |
| 292 | __u32 handle; |
| 293 | if (t.tcm_parent) |
| 294 | duparg("parent", *argv); |
| 295 | NEXT_ARG(); |
| 296 | if (get_tc_classid(&handle, *argv)) |
| 297 | invarg(*argv, "invalid parent ID"); |
| 298 | t.tcm_parent = handle; |
| 299 | } else if (matches(*argv, "help") == 0) { |
| 300 | usage(); |
| 301 | } else { |
| 302 | fprintf(stderr, "What is \"%s\"? Try \"tc class help\".\n", *argv); |
| 303 | exit(-1); |
| 304 | } |
| 305 | |
| 306 | argc--; argv++; |
| 307 | } |
| 308 | |
| 309 | if (rtnl_open(&rth, 0) < 0) { |
| 310 | fprintf(stderr, "Cannot open rtnetlink\n"); |
| 311 | exit(1); |
| 312 | } |
| 313 | |
| 314 | ll_init_map(&rth); |
| 315 | |
| 316 | if (d[0]) { |
| 317 | if ((t.tcm_ifindex = ll_name_to_index(d)) == 0) { |
| 318 | fprintf(stderr, "Cannot find device \"%s\"\n", d); |
| 319 | exit(1); |
| 320 | } |
| 321 | filter_ifindex = t.tcm_ifindex; |
| 322 | } |
| 323 | |
| 324 | if (rtnl_dump_request(&rth, RTM_GETTCLASS, &t, sizeof(t)) < 0) { |
| 325 | perror("Cannot send dump request"); |
| 326 | exit(1); |
| 327 | } |
| 328 | |
| 329 | if (rtnl_dump_filter(&rth, print_class, stdout, NULL, NULL) < 0) { |
| 330 | fprintf(stderr, "Dump terminated\n"); |
| 331 | exit(1); |
| 332 | } |
| 333 | |
| 334 | rtnl_close(&rth); |
| 335 | return 0; |
| 336 | } |
| 337 | |
| 338 | int do_class(int argc, char **argv) |
| 339 | { |
| 340 | if (argc < 1) |
| 341 | return tc_class_list(0, NULL); |
| 342 | if (matches(*argv, "add") == 0) |
| 343 | return tc_class_modify(RTM_NEWTCLASS, NLM_F_EXCL|NLM_F_CREATE, argc-1, argv+1); |
| 344 | if (matches(*argv, "change") == 0) |
| 345 | return tc_class_modify(RTM_NEWTCLASS, 0, argc-1, argv+1); |
| 346 | if (matches(*argv, "replace") == 0) |
| 347 | return tc_class_modify(RTM_NEWTCLASS, NLM_F_CREATE, argc-1, argv+1); |
| 348 | if (matches(*argv, "delete") == 0) |
| 349 | return tc_class_modify(RTM_DELTCLASS, 0, argc-1, argv+1); |
| 350 | #if 0 |
| 351 | if (matches(*argv, "get") == 0) |
| 352 | return tc_class_get(RTM_GETTCLASS, 0, argc-1, argv+1); |
| 353 | #endif |
| 354 | if (matches(*argv, "list") == 0 || matches(*argv, "show") == 0 |
| 355 | || matches(*argv, "lst") == 0) |
| 356 | return tc_class_list(argc-1, argv+1); |
| 357 | if (matches(*argv, "help") == 0) |
| 358 | usage(); |
| 359 | fprintf(stderr, "Command \"%s\" is unknown, try \"tc class help\".\n", *argv); |
| 360 | return -1; |
| 361 | } |