tc/m_action.c

   1 /*
   2  * m_action.c           Action Management
   3  *
   4  *              This program is free software; you can distribute 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:  J Hadi Salim (hadi@cyberus.ca)
  10  *
  11  * TODO:
  12  * - parse to be passed a filedescriptor for logging purposes
  13  *
  14  */
  15
  16 #include <stdio.h>
  17 #include <stdlib.h>
  18 #include <stdbool.h>
  19 #include <unistd.h>
  20 #include <fcntl.h>
  21 #include <sys/socket.h>
  22 #include <netinet/in.h>
  23 #include <arpa/inet.h>
  24 #include <string.h>
  25 #include <dlfcn.h>
  26
  27 #include "utils.h"
  28 #include "tc_common.h"
  29 #include "tc_util.h"
  30
  31 static struct action_util *action_list;
  32 #ifdef CONFIG_GACT
  33 static int gact_ld; /* f*ckin backward compatibility */
  34 #endif
  35 static int tab_flush;
  36
  37 static void act_usage(void)
  38 {
  39         /*XXX: In the near future add a action->print_help to improve
  40          * usability
  41          * This would mean new tc will not be backward compatible
  42          * with any action .so from the old days. But if someone really
  43          * does that, they would know how to fix this ..
  44          *
  45          */
  46         fprintf(stderr,
  47                 "usage: tc actions <ACTSPECOP>*\n"
  48                 "Where:         ACTSPECOP := ACR | GD | FL\n"
  49                 "       ACR := add | change | replace <ACTSPEC>*\n"
  50                 "       GD := get | delete | <ACTISPEC>*\n"
  51                 "       FL := ls | list | flush | <ACTNAMESPEC>\n"
  52                 "       ACTNAMESPEC :=  action <ACTNAME>\n"
  53                 "       ACTISPEC := <ACTNAMESPEC> <INDEXSPEC>\n"
  54                 "       ACTSPEC := action <ACTDETAIL> [INDEXSPEC]\n"
  55                 "       INDEXSPEC := index <32 bit indexvalue>\n"
  56                 "       ACTDETAIL := <ACTNAME> <ACTPARAMS>\n"
  57                 "               Example ACTNAME is gact, mirred, bpf, etc\n"
  58                 "               Each action has its own parameters (ACTPARAMS)\n"
  59                 "\n");
  60
  61         exit(-1);
  62 }
  63
  64 static int print_noaopt(struct action_util *au, FILE *f, struct rtattr *opt)
  65 {
  66         if (opt && RTA_PAYLOAD(opt))
  67                 fprintf(f, "[Unknown action, optlen=%u] ",
  68                         (unsigned int) RTA_PAYLOAD(opt));
  69         return 0;
  70 }
  71
  72 static int parse_noaopt(struct action_util *au, int *argc_p,
  73                         char ***argv_p, int code, struct nlmsghdr *n)
  74 {
  75         int argc = *argc_p;
  76         char **argv = *argv_p;
  77
  78         if (argc)
  79                 fprintf(stderr,
  80                         "Unknown action \"%s\", hence option \"%s\" is unparsable\n",
  81                         au->id, *argv);
  82         else
  83                 fprintf(stderr, "Unknown action \"%s\"\n", au->id);
  84
  85         return -1;
  86 }
  87
  88 static struct action_util *get_action_kind(char *str)
  89 {
  90         static void *aBODY;
  91         void *dlh;
  92         char buf[256];
  93         struct action_util *a;
  94 #ifdef CONFIG_GACT
  95         int looked4gact = 0;
  96 restart_s:
  97 #endif
  98         for (a = action_list; a; a = a->next) {
  99                 if (strcmp(a->id, str) == 0)
 100                         return a;
 101         }
 102
 103         snprintf(buf, sizeof(buf), "%s/m_%s.so", get_tc_lib(), str);
 104         dlh = dlopen(buf, RTLD_LAZY | RTLD_GLOBAL);
 105         if (dlh == NULL) {
 106                 dlh = aBODY;
 107                 if (dlh == NULL) {
 108                         dlh = aBODY = dlopen(NULL, RTLD_LAZY);
 109                         if (dlh == NULL)
 110                                 goto noexist;
 111                 }
 112         }
 113
 114         snprintf(buf, sizeof(buf), "%s_action_util", str);
 115         a = dlsym(dlh, buf);
 116         if (a == NULL)
 117                 goto noexist;
 118
 119 reg:
 120         a->next = action_list;
 121         action_list = a;
 122         return a;
 123
 124 noexist:
 125 #ifdef CONFIG_GACT
 126         if (!looked4gact) {
 127                 looked4gact = 1;
 128                 strcpy(str, "gact");
 129                 goto restart_s;
 130         }
 131 #endif
 132         a = calloc(1, sizeof(*a));
 133         if (a) {
 134                 strncpy(a->id, "noact", 15);
 135                 a->parse_aopt = parse_noaopt;
 136                 a->print_aopt = print_noaopt;
 137                 goto reg;
 138         }
 139         return a;
 140 }
 141
 142 static bool
 143 new_cmd(char **argv)
 144 {
 145         return (matches(*argv, "change") == 0) ||
 146                 (matches(*argv, "replace") == 0) ||
 147                 (matches(*argv, "delete") == 0) ||
 148                 (matches(*argv, "get") == 0) ||
 149                 (matches(*argv, "add") == 0);
 150 }
 151
 152 int parse_action(int *argc_p, char ***argv_p, int tca_id, struct nlmsghdr *n)
 153 {
 154         int argc = *argc_p;
 155         char **argv = *argv_p;
 156         struct rtattr *tail, *tail2;
 157         char k[FILTER_NAMESZ];
 158         int act_ck_len = 0;
 159         int ok = 0;
 160         int eap = 0; /* expect action parameters */
 161
 162         int ret = 0;
 163         int prio = 0;
 164         unsigned char act_ck[TC_COOKIE_MAX_SIZE];
 165
 166         if (argc <= 0)
 167                 return -1;
 168
 169         tail2 = addattr_nest(n, MAX_MSG, tca_id);
 170
 171         while (argc > 0) {
 172
 173                 memset(k, 0, sizeof(k));
 174
 175                 if (strcmp(*argv, "action") == 0) {
 176                         argc--;
 177                         argv++;
 178                         eap = 1;
 179 #ifdef CONFIG_GACT
 180                         if (!gact_ld)
 181                                 get_action_kind("gact");
 182 #endif
 183                         continue;
 184                 } else if (strcmp(*argv, "flowid") == 0) {
 185                         break;
 186                 } else if (strcmp(*argv, "classid") == 0) {
 187                         break;
 188                 } else if (strcmp(*argv, "help") == 0) {
 189                         return -1;
 190                 } else if (new_cmd(argv)) {
 191                         goto done0;
 192                 } else {
 193                         struct action_util *a = NULL;
 194
 195                         if (!action_a2n(*argv, NULL, false))
 196                                 strncpy(k, "gact", sizeof(k) - 1);
 197                         else
 198                                 strncpy(k, *argv, sizeof(k) - 1);
 199                         eap = 0;
 200                         if (argc > 0) {
 201                                 a = get_action_kind(k);
 202                         } else {
 203 done0:
 204                                 if (ok)
 205                                         break;
 206                                 else
 207                                         goto done;
 208                         }
 209
 210                         if (a == NULL)
 211                                 goto bad_val;
 212
 213
 214                         tail = addattr_nest(n, MAX_MSG, ++prio);
 215                         addattr_l(n, MAX_MSG, TCA_ACT_KIND, k, strlen(k) + 1);
 216
 217                         ret = a->parse_aopt(a, &argc, &argv,
 218                                             TCA_ACT_OPTIONS | NLA_F_NESTED,
 219                                             n);
 220
 221                         if (ret < 0) {
 222                                 fprintf(stderr, "bad action parsing\n");
 223                                 goto bad_val;
 224                         }
 225
 226                         if (*argv && strcmp(*argv, "cookie") == 0) {
 227                                 size_t slen;
 228
 229                                 NEXT_ARG();
 230                                 slen = strlen(*argv);
 231                                 if (slen > TC_COOKIE_MAX_SIZE * 2) {
 232                                         char cookie_err_m[128];
 233
 234                                         snprintf(cookie_err_m, 128,
 235                                                  "%zd Max allowed size %d",
 236                                                  slen, TC_COOKIE_MAX_SIZE*2);
 237                                         invarg(cookie_err_m, *argv);
 238                                 }
 239
 240                                 if (hex2mem(*argv, act_ck, slen / 2) < 0)
 241                                         invarg("cookie must be a hex string\n",
 242                                                *argv);
 243
 244                                 act_ck_len = slen / 2;
 245                                 argc--;
 246                                 argv++;
 247                         }
 248
 249                         if (act_ck_len)
 250                                 addattr_l(n, MAX_MSG, TCA_ACT_COOKIE,
 251                                           &act_ck, act_ck_len);
 252
 253                         if (*argv && strcmp(*argv, "no_percpu") == 0) {
 254                                 struct nla_bitfield32 flags =
 255                                         { TCA_ACT_FLAGS_NO_PERCPU_STATS,
 256                                           TCA_ACT_FLAGS_NO_PERCPU_STATS };
 257
 258                                 addattr_l(n, MAX_MSG, TCA_ACT_FLAGS, &flags,
 259                                           sizeof(struct nla_bitfield32));
 260                                 NEXT_ARG_FWD();
 261                         }
 262
 263                         addattr_nest_end(n, tail);
 264                         ok++;
 265                 }
 266         }
 267
 268         if (eap > 0) {
 269                 fprintf(stderr, "bad action empty %d\n", eap);
 270                 goto bad_val;
 271         }
 272
 273         addattr_nest_end(n, tail2);
 274
 275 done:
 276         *argc_p = argc;
 277         *argv_p = argv;
 278         return 0;
 279 bad_val:
 280         /* no need to undo things, returning from here should
 281          * cause enough pain
 282          */
 283         fprintf(stderr, "parse_action: bad value (%d:%s)!\n", argc, *argv);
 284         return -1;
 285 }
 286
 287 static int tc_print_one_action(FILE *f, struct rtattr *arg)
 288 {
 289
 290         struct rtattr *tb[TCA_ACT_MAX + 1];
 291         int err = 0;
 292         struct action_util *a = NULL;
 293
 294         if (arg == NULL)
 295                 return -1;
 296
 297         parse_rtattr_nested(tb, TCA_ACT_MAX, arg);
 298
 299         if (tb[TCA_ACT_KIND] == NULL) {
 300                 fprintf(stderr, "NULL Action!\n");
 301                 return -1;
 302         }
 303
 304
 305         a = get_action_kind(RTA_DATA(tb[TCA_ACT_KIND]));
 306         if (a == NULL)
 307                 return err;
 308
 309         err = a->print_aopt(a, f, tb[TCA_ACT_OPTIONS]);
 310
 311         if (err < 0)
 312                 return err;
 313
 314         if (show_stats && tb[TCA_ACT_STATS]) {
 315                 print_string(PRINT_FP, NULL, "\tAction statistics:", NULL);
 316                 print_string(PRINT_FP, NULL, "%s", _SL_);
 317                 open_json_object("stats");
 318                 print_tcstats2_attr(f, tb[TCA_ACT_STATS], "\t", NULL);
 319                 close_json_object();
 320                 print_string(PRINT_FP, NULL, "%s", _SL_);
 321         }
 322         if (tb[TCA_ACT_COOKIE]) {
 323                 int strsz = RTA_PAYLOAD(tb[TCA_ACT_COOKIE]);
 324                 char b1[strsz * 2 + 1];
 325
 326                 print_string(PRINT_ANY, "cookie", "\tcookie %s",
 327                              hexstring_n2a(RTA_DATA(tb[TCA_ACT_COOKIE]),
 328                                            strsz, b1, sizeof(b1)));
 329                 print_string(PRINT_FP, NULL, "%s", _SL_);
 330         }
 331         if (tb[TCA_ACT_FLAGS]) {
 332                 struct nla_bitfield32 *flags = RTA_DATA(tb[TCA_ACT_FLAGS]);
 333
 334                 if (flags->selector & TCA_ACT_FLAGS_NO_PERCPU_STATS)
 335                         print_bool(PRINT_ANY, "no_percpu", "\tno_percpu",
 336                                    flags->value &
 337                                    TCA_ACT_FLAGS_NO_PERCPU_STATS);
 338                 print_string(PRINT_FP, NULL, "%s", _SL_);
 339         }
 340
 341         return 0;
 342 }
 343
 344 static int
 345 tc_print_action_flush(FILE *f, const struct rtattr *arg)
 346 {
 347
 348         struct rtattr *tb[TCA_MAX + 1];
 349         int err = 0;
 350         struct action_util *a = NULL;
 351         __u32 *delete_count = 0;
 352
 353         parse_rtattr_nested(tb, TCA_MAX, arg);
 354
 355         if (tb[TCA_KIND] == NULL) {
 356                 fprintf(stderr, "NULL Action!\n");
 357                 return -1;
 358         }
 359
 360         a = get_action_kind(RTA_DATA(tb[TCA_KIND]));
 361         if (a == NULL)
 362                 return err;
 363
 364         delete_count = RTA_DATA(tb[TCA_FCNT]);
 365         fprintf(f, " %s (%d entries)\n", a->id, *delete_count);
 366         tab_flush = 0;
 367         return 0;
 368 }
 369
 370 int
 371 tc_print_action(FILE *f, const struct rtattr *arg, unsigned short tot_acts)
 372 {
 373
 374         int i;
 375
 376         if (arg == NULL)
 377                 return 0;
 378
 379         if (!tot_acts)
 380                 tot_acts = TCA_ACT_MAX_PRIO;
 381
 382         struct rtattr *tb[tot_acts + 1];
 383
 384         parse_rtattr_nested(tb, tot_acts, arg);
 385
 386         if (tab_flush && tb[0] && !tb[1])
 387                 return tc_print_action_flush(f, tb[0]);
 388
 389         open_json_array(PRINT_JSON, "actions");
 390         for (i = 0; i <= tot_acts; i++) {
 391                 if (tb[i]) {
 392                         open_json_object(NULL);
 393                         print_string(PRINT_FP, NULL, "%s", _SL_);
 394                         print_uint(PRINT_ANY, "order",
 395                                    "\taction order %u: ", i);
 396                         if (tc_print_one_action(f, tb[i]) < 0) {
 397                                 print_string(PRINT_FP, NULL,
 398                                              "Error printing action\n", NULL);
 399                         }
 400                         close_json_object();
 401                 }
 402
 403         }
 404         close_json_array(PRINT_JSON, NULL);
 405
 406         return 0;
 407 }
 408
 409 int print_action(struct nlmsghdr *n, void *arg)
 410 {
 411         FILE *fp = (FILE *)arg;
 412         struct tcamsg *t = NLMSG_DATA(n);
 413         int len = n->nlmsg_len;
 414         __u32 *tot_acts = NULL;
 415         struct rtattr *tb[TCA_ROOT_MAX+1];
 416
 417         len -= NLMSG_LENGTH(sizeof(*t));
 418
 419         if (len < 0) {
 420                 fprintf(stderr, "Wrong len %d\n", len);
 421                 return -1;
 422         }
 423
 424         parse_rtattr(tb, TCA_ROOT_MAX, TA_RTA(t), len);
 425
 426         if (tb[TCA_ROOT_COUNT])
 427                 tot_acts = RTA_DATA(tb[TCA_ROOT_COUNT]);
 428
 429         open_json_object(NULL);
 430         print_uint(PRINT_ANY, "total acts", "total acts %u",
 431                    tot_acts ? *tot_acts : 0);
 432         print_string(PRINT_FP, NULL, "%s", _SL_);
 433         close_json_object();
 434         if (tb[TCA_ACT_TAB] == NULL) {
 435                 if (n->nlmsg_type != RTM_GETACTION)
 436                         fprintf(stderr, "print_action: NULL kind\n");
 437                 return -1;
 438         }
 439
 440         if (n->nlmsg_type == RTM_DELACTION) {
 441                 if (n->nlmsg_flags & NLM_F_ROOT) {
 442                         fprintf(fp, "Flushed table ");
 443                         tab_flush = 1;
 444                 } else {
 445                         fprintf(fp, "Deleted action ");
 446                 }
 447         }
 448
 449         if (n->nlmsg_type == RTM_NEWACTION) {
 450                 if ((n->nlmsg_flags & NLM_F_CREATE) &&
 451                     !(n->nlmsg_flags & NLM_F_REPLACE)) {
 452                         fprintf(fp, "Added action ");
 453                 } else if (n->nlmsg_flags & NLM_F_REPLACE) {
 454                         fprintf(fp, "Replaced action ");
 455                 }
 456         }
 457
 458         open_json_object(NULL);
 459         tc_print_action(fp, tb[TCA_ACT_TAB], tot_acts ? *tot_acts:0);
 460         close_json_object();
 461
 462         return 0;
 463 }
 464
 465 static int tc_action_gd(int cmd, unsigned int flags,
 466                         int *argc_p, char ***argv_p)
 467 {
 468         char k[FILTER_NAMESZ];
 469         struct action_util *a = NULL;
 470         int argc = *argc_p;
 471         char **argv = *argv_p;
 472         int prio = 0;
 473         int ret = 0;
 474         __u32 i = 0;
 475         struct rtattr *tail;
 476         struct rtattr *tail2;
 477         struct nlmsghdr *ans = NULL;
 478
 479         struct {
 480                 struct nlmsghdr         n;
 481                 struct tcamsg           t;
 482                 char                    buf[MAX_MSG];
 483         } req = {
 484                 .n.nlmsg_len = NLMSG_LENGTH(sizeof(struct tcamsg)),
 485                 .n.nlmsg_flags = NLM_F_REQUEST | flags,
 486                 .n.nlmsg_type = cmd,
 487                 .t.tca_family = AF_UNSPEC,
 488         };
 489
 490         argc -= 1;
 491         argv += 1;
 492
 493
 494         tail = addattr_nest(&req.n, MAX_MSG, TCA_ACT_TAB);
 495
 496         while (argc > 0) {
 497                 if (strcmp(*argv, "action") == 0) {
 498                         argc--;
 499                         argv++;
 500                         continue;
 501                 } else if (strcmp(*argv, "help") == 0) {
 502                         return -1;
 503                 }
 504
 505                 strncpy(k, *argv, sizeof(k) - 1);
 506                 a = get_action_kind(k);
 507                 if (a == NULL) {
 508                         fprintf(stderr, "Error: non existent action: %s\n", k);
 509                         ret = -1;
 510                         goto bad_val;
 511                 }
 512                 if (strcmp(a->id, k) != 0) {
 513                         fprintf(stderr, "Error: non existent action: %s\n", k);
 514                         ret = -1;
 515                         goto bad_val;
 516                 }
 517
 518                 argc -= 1;
 519                 argv += 1;
 520                 if (argc <= 0) {
 521                         fprintf(stderr,
 522                                 "Error: no index specified action: %s\n", k);
 523                         ret = -1;
 524                         goto bad_val;
 525                 }
 526
 527                 if (matches(*argv, "index") == 0) {
 528                         NEXT_ARG();
 529                         if (get_u32(&i, *argv, 10)) {
 530                                 fprintf(stderr, "Illegal \"index\"\n");
 531                                 ret = -1;
 532                                 goto bad_val;
 533                         }
 534                         argc -= 1;
 535                         argv += 1;
 536                 } else {
 537                         fprintf(stderr,
 538                                 "Error: no index specified action: %s\n", k);
 539                         ret = -1;
 540                         goto bad_val;
 541                 }
 542
 543                 tail2 = addattr_nest(&req.n, MAX_MSG, ++prio);
 544                 addattr_l(&req.n, MAX_MSG, TCA_ACT_KIND, k, strlen(k) + 1);
 545                 if (i > 0)
 546                         addattr32(&req.n, MAX_MSG, TCA_ACT_INDEX, i);
 547                 addattr_nest_end(&req.n, tail2);
 548
 549         }
 550
 551         addattr_nest_end(&req.n, tail);
 552
 553         req.n.nlmsg_seq = rth.dump = ++rth.seq;
 554
 555         if (rtnl_talk(&rth, &req.n, cmd == RTM_DELACTION ? NULL : &ans) < 0) {
 556                 fprintf(stderr, "We have an error talking to the kernel\n");
 557                 return 1;
 558         }
 559
 560         if (cmd == RTM_GETACTION) {
 561                 new_json_obj(json);
 562                 ret = print_action(ans, stdout);
 563                 if (ret < 0) {
 564                         fprintf(stderr, "Dump terminated\n");
 565                         free(ans);
 566                         delete_json_obj();
 567                         return 1;
 568                 }
 569                 delete_json_obj();
 570         }
 571         free(ans);
 572
 573         *argc_p = argc;
 574         *argv_p = argv;
 575 bad_val:
 576         return ret;
 577 }
 578
 579 static int tc_action_modify(int cmd, unsigned int flags,
 580                             int *argc_p, char ***argv_p)
 581 {
 582         int argc = *argc_p;
 583         char **argv = *argv_p;
 584         int ret = 0;
 585         struct {
 586                 struct nlmsghdr         n;
 587                 struct tcamsg           t;
 588                 char                    buf[MAX_MSG];
 589         } req = {
 590                 .n.nlmsg_len = NLMSG_LENGTH(sizeof(struct tcamsg)),
 591                 .n.nlmsg_flags = NLM_F_REQUEST | flags,
 592                 .n.nlmsg_type = cmd,
 593                 .t.tca_family = AF_UNSPEC,
 594         };
 595         struct rtattr *tail = NLMSG_TAIL(&req.n);
 596
 597         argc -= 1;
 598         argv += 1;
 599         if (parse_action(&argc, &argv, TCA_ACT_TAB, &req.n)) {
 600                 fprintf(stderr, "Illegal \"action\"\n");
 601                 return -1;
 602         }
 603         tail->rta_len = (void *) NLMSG_TAIL(&req.n) - (void *) tail;
 604
 605         if (rtnl_talk(&rth, &req.n, NULL) < 0) {
 606                 fprintf(stderr, "We have an error talking to the kernel\n");
 607                 ret = -1;
 608         }
 609
 610         *argc_p = argc;
 611         *argv_p = argv;
 612
 613         return ret;
 614 }
 615
 616 static int tc_act_list_or_flush(int *argc_p, char ***argv_p, int event)
 617 {
 618         struct rtattr *tail, *tail2, *tail3, *tail4;
 619         int ret = 0, prio = 0, msg_size = 0;
 620         struct action_util *a = NULL;
 621         struct nla_bitfield32 flag_select = { 0 };
 622         char **argv = *argv_p;
 623         __u32 msec_since = 0;
 624         int argc = *argc_p;
 625         char k[FILTER_NAMESZ];
 626         struct {
 627                 struct nlmsghdr         n;
 628                 struct tcamsg           t;
 629                 char                    buf[MAX_MSG];
 630         } req = {
 631                 .n.nlmsg_len = NLMSG_LENGTH(sizeof(struct tcamsg)),
 632                 .t.tca_family = AF_UNSPEC,
 633         };
 634
 635         tail = addattr_nest(&req.n, MAX_MSG, TCA_ACT_TAB);
 636         tail2 = NLMSG_TAIL(&req.n);
 637
 638         strncpy(k, *argv, sizeof(k) - 1);
 639 #ifdef CONFIG_GACT
 640         if (!gact_ld)
 641                 get_action_kind("gact");
 642
 643 #endif
 644         a = get_action_kind(k);
 645         if (a == NULL) {
 646                 fprintf(stderr, "bad action %s\n", k);
 647                 goto bad_val;
 648         }
 649         if (strcmp(a->id, k) != 0) {
 650                 fprintf(stderr, "bad action %s\n", k);
 651                 goto bad_val;
 652         }
 653         strncpy(k, *argv, sizeof(k) - 1);
 654
 655         argc -= 1;
 656         argv += 1;
 657
 658         if (argc && (strcmp(*argv, "since") == 0)) {
 659                 NEXT_ARG();
 660                 if (get_u32(&msec_since, *argv, 0))
 661                         invarg("dump time \"since\" is invalid", *argv);
 662         }
 663
 664         addattr_l(&req.n, MAX_MSG, ++prio, NULL, 0);
 665         addattr_l(&req.n, MAX_MSG, TCA_ACT_KIND, k, strlen(k) + 1);
 666         tail2->rta_len = (void *) NLMSG_TAIL(&req.n) - (void *) tail2;
 667         addattr_nest_end(&req.n, tail);
 668
 669         tail3 = NLMSG_TAIL(&req.n);
 670         flag_select.value |= TCA_FLAG_LARGE_DUMP_ON;
 671         flag_select.selector |= TCA_FLAG_LARGE_DUMP_ON;
 672         addattr_l(&req.n, MAX_MSG, TCA_ROOT_FLAGS, &flag_select,
 673                   sizeof(struct nla_bitfield32));
 674         tail3->rta_len = (void *) NLMSG_TAIL(&req.n) - (void *) tail3;
 675         if (msec_since) {
 676                 tail4 = NLMSG_TAIL(&req.n);
 677                 addattr32(&req.n, MAX_MSG, TCA_ROOT_TIME_DELTA, msec_since);
 678                 tail4->rta_len = (void *) NLMSG_TAIL(&req.n) - (void *) tail4;
 679         }
 680         msg_size = NLMSG_ALIGN(req.n.nlmsg_len)
 681                 - NLMSG_ALIGN(sizeof(struct nlmsghdr));
 682
 683         if (event == RTM_GETACTION) {
 684                 if (rtnl_dump_request(&rth, event,
 685                                       (void *)&req.t, msg_size) < 0) {
 686                         perror("Cannot send dump request");
 687                         return 1;
 688                 }
 689                 new_json_obj(json);
 690                 ret = rtnl_dump_filter(&rth, print_action, stdout);
 691                 delete_json_obj();
 692         }
 693
 694         if (event == RTM_DELACTION) {
 695                 req.n.nlmsg_len = NLMSG_ALIGN(req.n.nlmsg_len);
 696                 req.n.nlmsg_type = RTM_DELACTION;
 697                 req.n.nlmsg_flags |= NLM_F_ROOT;
 698                 req.n.nlmsg_flags |= NLM_F_REQUEST;
 699                 if (rtnl_talk(&rth, &req.n, NULL) < 0) {
 700                         fprintf(stderr, "We have an error flushing\n");
 701                         return 1;
 702                 }
 703
 704         }
 705
 706 bad_val:
 707
 708         *argc_p = argc;
 709         *argv_p = argv;
 710         return ret;
 711 }
 712
 713 int do_action(int argc, char **argv)
 714 {
 715
 716         int ret = 0;
 717
 718         while (argc > 0) {
 719
 720                 if (matches(*argv, "add") == 0) {
 721                         ret =  tc_action_modify(RTM_NEWACTION,
 722                                                 NLM_F_EXCL | NLM_F_CREATE,
 723                                                 &argc, &argv);
 724                 } else if (matches(*argv, "change") == 0 ||
 725                           matches(*argv, "replace") == 0) {
 726                         ret = tc_action_modify(RTM_NEWACTION,
 727                                                NLM_F_CREATE | NLM_F_REPLACE,
 728                                                &argc, &argv);
 729                 } else if (matches(*argv, "delete") == 0) {
 730                         argc -= 1;
 731                         argv += 1;
 732                         ret = tc_action_gd(RTM_DELACTION, 0,  &argc, &argv);
 733                 } else if (matches(*argv, "get") == 0) {
 734                         argc -= 1;
 735                         argv += 1;
 736                         ret = tc_action_gd(RTM_GETACTION, 0,  &argc, &argv);
 737                 } else if (matches(*argv, "list") == 0 ||
 738                            matches(*argv, "show") == 0 ||
 739                            matches(*argv, "lst") == 0) {
 740                         if (argc <= 2) {
 741                                 act_usage();
 742                                 return -1;
 743                         }
 744
 745                         argc -= 2;
 746                         argv += 2;
 747                         return tc_act_list_or_flush(&argc, &argv,
 748                                                     RTM_GETACTION);
 749                 } else if (matches(*argv, "flush") == 0) {
 750                         if (argc <= 2) {
 751                                 act_usage();
 752                                 return -1;
 753                         }
 754
 755                         argc -= 2;
 756                         argv += 2;
 757                         return tc_act_list_or_flush(&argc, &argv,
 758                                                     RTM_DELACTION);
 759                 } else if (matches(*argv, "help") == 0) {
 760                         act_usage();
 761                         return -1;
 762                 } else {
 763                         fprintf(stderr,
 764                                 "Command \"%s\" is unknown, try \"tc actions help\".\n",
 765                                 *argv);
 766                         return -1;
 767                 }
 768
 769                 if (ret < 0)
 770                         return -1;
 771         }
 772
 773         return 0;
 774 }