src/nl-tctree-list.c

   1 /*
   2  * src/nl-tctree-list.c         List Traffic Control Tree
   3  *
   4  *      This library is free software; you can redistribute it and/or
   5  *      modify it under the terms of the GNU Lesser General Public
   6  *      License as published by the Free Software Foundation version 2.1
   7  *      of the License.
   8  *
   9  * Copyright (c) 2003-2009 Thomas Graf <tgraf@suug.ch>
  10  */
  11
  12 #include <netlink/cli/utils.h>
  13 #include <netlink/cli/link.h>
  14 #include <netlink/cli/qdisc.h>
  15 #include <netlink/cli/class.h>
  16 #include <linux/pkt_sched.h>
  17
  18 static struct nl_sock *sock;
  19 static struct nl_cache *qdisc_cache, *class_cache;
  20 static struct nl_dump_params params = {
  21         .dp_type = NL_DUMP_DETAILS,
  22 };
  23
  24 static int ifindex;
  25 static void print_qdisc(struct nl_object *, void *);
  26 static void print_tc_childs(struct rtnl_tc *, void *);
  27
  28 static void print_usage(void)
  29 {
  30         printf(
  31         "Usage: nl-tctree-list [OPTION]...\n"
  32         "\n"
  33         "Options\n"
  34         " -f, --format=TYPE     Output format { brief | details | stats }\n"
  35         " -h, --help            Show this help\n"
  36         " -v, --version         Show versioning information\n"
  37         );
  38         exit(0);
  39 }
  40
  41 static void print_class(struct nl_object *obj, void *arg)
  42 {
  43         struct rtnl_qdisc *leaf;
  44         struct rtnl_class *class = (struct rtnl_class *) obj;
  45         struct nl_cache *cls_cache;
  46         uint32_t parent = rtnl_tc_get_handle((struct rtnl_tc *) class);
  47
  48         params.dp_prefix = (int)(long) arg;
  49         nl_object_dump(obj, &params);
  50
  51         leaf = rtnl_class_leaf_qdisc(class, qdisc_cache);
  52         if (leaf)
  53                 print_qdisc((struct nl_object *) leaf, arg + 2);
  54
  55         print_tc_childs(TC_CAST(class), arg + 2);
  56
  57         if (rtnl_cls_alloc_cache(sock, ifindex, parent, &cls_cache) < 0)
  58                 return;
  59
  60         params.dp_prefix = (int)(long) arg + 2;
  61         nl_cache_dump(cls_cache, &params);
  62         nl_cache_free(cls_cache);
  63 }
  64
  65 static void print_tc_childs(struct rtnl_tc *tc, void *arg)
  66 {
  67         struct rtnl_class *filter;
  68
  69         filter = nl_cli_class_alloc();
  70
  71         rtnl_tc_set_parent(TC_CAST(filter), rtnl_tc_get_handle(tc));
  72         rtnl_tc_set_ifindex(TC_CAST(filter), rtnl_tc_get_ifindex(tc));
  73
  74         nl_cache_foreach_filter(class_cache, OBJ_CAST(filter), &print_class, arg);
  75
  76         rtnl_class_put(filter);
  77 }
  78
  79 static void print_qdisc(struct nl_object *obj, void *arg)
  80 {
  81         struct rtnl_qdisc *qdisc = (struct rtnl_qdisc *) obj;
  82         struct nl_cache *cls_cache;
  83         uint32_t parent = rtnl_tc_get_handle((struct rtnl_tc *) qdisc);
  84
  85         params.dp_prefix = (int)(long) arg;
  86         nl_object_dump(obj, &params);
  87
  88         print_tc_childs(TC_CAST(qdisc), arg + 2);
  89
  90         if (rtnl_cls_alloc_cache(sock, ifindex, parent, &cls_cache) < 0)
  91                 return;
  92
  93         params.dp_prefix = (int)(long) arg + 2;
  94         nl_cache_dump(cls_cache, &params);
  95         nl_cache_free(cls_cache);
  96 }
  97
  98 static void print_link(struct nl_object *obj, void *arg)
  99 {
 100         struct rtnl_link *link = (struct rtnl_link *) obj;
 101         struct rtnl_qdisc *qdisc;
 102
 103         ifindex = rtnl_link_get_ifindex(link);
 104         params.dp_prefix = 0;
 105         nl_object_dump(obj, &params);
 106
 107         if (rtnl_class_alloc_cache(sock, ifindex, &class_cache) < 0)
 108                 return;
 109
 110         qdisc = rtnl_qdisc_get_by_parent(qdisc_cache, ifindex, TC_H_ROOT);
 111         if (qdisc) {
 112                 print_qdisc((struct nl_object *) qdisc, (void *) 2);
 113                 rtnl_qdisc_put(qdisc);
 114         }
 115
 116         qdisc = rtnl_qdisc_get_by_parent(qdisc_cache, ifindex, 0);
 117         if (qdisc) {
 118                 print_qdisc((struct nl_object *) qdisc, (void *) 2);
 119                 rtnl_qdisc_put(qdisc);
 120         }
 121
 122         qdisc = rtnl_qdisc_get_by_parent(qdisc_cache, ifindex, TC_H_INGRESS);
 123         if (qdisc) {
 124                 print_qdisc((struct nl_object *) qdisc, (void *) 2);
 125                 rtnl_qdisc_put(qdisc);
 126         }
 127
 128         nl_cache_free(class_cache);
 129 }
 130
 131 int main(int argc, char *argv[])
 132 {
 133         struct nl_cache *link_cache;
 134
 135         sock = nl_cli_alloc_socket();
 136         nl_cli_connect(sock, NETLINK_ROUTE);
 137         link_cache = nl_cli_link_alloc_cache(sock);
 138         qdisc_cache = nl_cli_qdisc_alloc_cache(sock);
 139
 140         params.dp_fd = stdout;
 141
 142         for (;;) {
 143                 int c, optidx = 0;
 144                 static struct option long_opts[] = {
 145                         { "format", 1, 0, 'f' },
 146                         { "help", 0, 0, 'h' },
 147                         { "version", 0, 0, 'v' },
 148                         { 0, 0, 0, 0 }
 149                 };
 150
 151                 c = getopt_long(argc, argv, "f:hv", long_opts, &optidx);
 152                 if (c == -1)
 153                         break;
 154
 155                 switch (c) {
 156                 case 'f': params.dp_type = nl_cli_parse_dumptype(optarg); break;
 157                 case 'h': print_usage(); break;
 158                 case 'v': nl_cli_print_version(); break;
 159                 }
 160         }
 161
 162         nl_cache_foreach(link_cache, &print_link, NULL);
 163
 164         return 0;
 165 }