Blame tc/q_pie.c

Packit Service 3880ab
/* Copyright (C) 2013 Cisco Systems, Inc, 2013.
Packit Service 3880ab
 *
Packit Service 3880ab
 * This program is free software; you can redistribute it and/or
Packit Service 3880ab
 * modify it under the terms of the GNU General Public License
Packit Service 3880ab
 * as published by the Free Software Foundation; either version 2
Packit Service 3880ab
 * of the License.
Packit Service 3880ab
 *
Packit Service 3880ab
 * This program is distributed in the hope that it will be useful,
Packit Service 3880ab
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit Service 3880ab
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
Packit Service 3880ab
 * GNU General Public License for more details.
Packit Service 3880ab
 *
Packit Service 3880ab
 * Author: Vijay Subramanian <vijaynsu@cisco.com>
Packit Service 3880ab
 * Author: Mythili Prabhu <mysuryan@cisco.com>
Packit Service 3880ab
 *
Packit Service 3880ab
 */
Packit Service 3880ab
Packit Service 3880ab
#include <stdio.h>
Packit Service 3880ab
#include <stdlib.h>
Packit Service 3880ab
#include <unistd.h>
Packit Service 3880ab
#include <fcntl.h>
Packit Service 3880ab
#include <sys/socket.h>
Packit Service 3880ab
#include <netinet/in.h>
Packit Service 3880ab
#include <arpa/inet.h>
Packit Service 3880ab
#include <string.h>
Packit Service 3880ab
#include <math.h>
Packit Service 3880ab
Packit Service 3880ab
#include "utils.h"
Packit Service 3880ab
#include "tc_util.h"
Packit Service 3880ab
Packit Service 3880ab
static void explain(void)
Packit Service 3880ab
{
Packit Service 3880ab
	fprintf(stderr,
Packit Service 3880ab
		"Usage: ... pie [ limit PACKETS ] [ target TIME ]\n"
Packit Service 3880ab
		"               [ tupdate TIME ] [ alpha ALPHA ] [ beta BETA ]\n"
Packit Service 3880ab
		"               [ bytemode | nobytemode ] [ ecn | noecn ]\n"
Packit Service 3880ab
		"               [ dq_rate_estimator | no_dq_rate_estimator ]\n");
Packit Service 3880ab
}
Packit Service 3880ab
Packit Service 3880ab
#define ALPHA_MAX 32
Packit Service 3880ab
#define BETA_MAX 32
Packit Service 3880ab
Packit Service 3880ab
static int pie_parse_opt(struct qdisc_util *qu, int argc, char **argv,
Packit Service 3880ab
			 struct nlmsghdr *n, const char *dev)
Packit Service 3880ab
{
Packit Service 3880ab
	unsigned int limit   = 0;
Packit Service 3880ab
	unsigned int target  = 0;
Packit Service 3880ab
	unsigned int tupdate = 0;
Packit Service 3880ab
	unsigned int alpha   = 0;
Packit Service 3880ab
	unsigned int beta    = 0;
Packit Service 3880ab
	int ecn = -1;
Packit Service 3880ab
	int bytemode = -1;
Packit Service 3880ab
	int dq_rate_estimator = -1;
Packit Service 3880ab
	struct rtattr *tail;
Packit Service 3880ab
Packit Service 3880ab
	while (argc > 0) {
Packit Service 3880ab
		if (strcmp(*argv, "limit") == 0) {
Packit Service 3880ab
			NEXT_ARG();
Packit Service 3880ab
			if (get_unsigned(&limit, *argv, 0)) {
Packit Service 3880ab
				fprintf(stderr, "Illegal \"limit\"\n");
Packit Service 3880ab
				return -1;
Packit Service 3880ab
			}
Packit Service 3880ab
		} else if (strcmp(*argv, "target") == 0) {
Packit Service 3880ab
			NEXT_ARG();
Packit Service 3880ab
			if (get_time(&target, *argv)) {
Packit Service 3880ab
				fprintf(stderr, "Illegal \"target\"\n");
Packit Service 3880ab
				return -1;
Packit Service 3880ab
			}
Packit Service 3880ab
		} else if (strcmp(*argv, "tupdate") == 0) {
Packit Service 3880ab
			NEXT_ARG();
Packit Service 3880ab
			if (get_time(&tupdate, *argv)) {
Packit Service 3880ab
				fprintf(stderr, "Illegal \"tupdate\"\n");
Packit Service 3880ab
				return -1;
Packit Service 3880ab
			}
Packit Service 3880ab
		} else if (strcmp(*argv, "alpha") == 0) {
Packit Service 3880ab
			NEXT_ARG();
Packit Service 3880ab
			if (get_unsigned(&alpha, *argv, 0) ||
Packit Service 3880ab
			    (alpha > ALPHA_MAX)) {
Packit Service 3880ab
				fprintf(stderr, "Illegal \"alpha\"\n");
Packit Service 3880ab
				return -1;
Packit Service 3880ab
			}
Packit Service 3880ab
		} else if (strcmp(*argv, "beta") == 0) {
Packit Service 3880ab
			NEXT_ARG();
Packit Service 3880ab
			if (get_unsigned(&beta, *argv, 0) ||
Packit Service 3880ab
			    (beta > BETA_MAX)) {
Packit Service 3880ab
				fprintf(stderr, "Illegal \"beta\"\n");
Packit Service 3880ab
				return -1;
Packit Service 3880ab
			}
Packit Service 3880ab
		} else if (strcmp(*argv, "ecn") == 0) {
Packit Service 3880ab
			ecn = 1;
Packit Service 3880ab
		} else if (strcmp(*argv, "noecn") == 0) {
Packit Service 3880ab
			ecn = 0;
Packit Service 3880ab
		} else if (strcmp(*argv, "bytemode") == 0) {
Packit Service 3880ab
			bytemode = 1;
Packit Service 3880ab
		} else if (strcmp(*argv, "nobytemode") == 0) {
Packit Service 3880ab
			bytemode = 0;
Packit Service 3880ab
		} else if (strcmp(*argv, "dq_rate_estimator") == 0) {
Packit Service 3880ab
			dq_rate_estimator = 1;
Packit Service 3880ab
		} else if (strcmp(*argv, "no_dq_rate_estimator") == 0) {
Packit Service 3880ab
			dq_rate_estimator = 0;
Packit Service 3880ab
		} else if (strcmp(*argv, "help") == 0) {
Packit Service 3880ab
			explain();
Packit Service 3880ab
			return -1;
Packit Service 3880ab
		} else {
Packit Service 3880ab
			fprintf(stderr, "What is \"%s\"?\n", *argv);
Packit Service 3880ab
			explain();
Packit Service 3880ab
			return -1;
Packit Service 3880ab
		}
Packit Service 3880ab
		argc--;
Packit Service 3880ab
		argv++;
Packit Service 3880ab
	}
Packit Service 3880ab
Packit Service 3880ab
	tail = addattr_nest(n, 1024, TCA_OPTIONS);
Packit Service 3880ab
	if (limit)
Packit Service 3880ab
		addattr_l(n, 1024, TCA_PIE_LIMIT, &limit, sizeof(limit));
Packit Service 3880ab
	if (tupdate)
Packit Service 3880ab
		addattr_l(n, 1024, TCA_PIE_TUPDATE, &tupdate, sizeof(tupdate));
Packit Service 3880ab
	if (target)
Packit Service 3880ab
		addattr_l(n, 1024, TCA_PIE_TARGET, &target, sizeof(target));
Packit Service 3880ab
	if (alpha)
Packit Service 3880ab
		addattr_l(n, 1024, TCA_PIE_ALPHA, &alpha, sizeof(alpha));
Packit Service 3880ab
	if (beta)
Packit Service 3880ab
		addattr_l(n, 1024, TCA_PIE_BETA, &beta, sizeof(beta));
Packit Service 3880ab
	if (ecn != -1)
Packit Service 3880ab
		addattr_l(n, 1024, TCA_PIE_ECN, &ecn, sizeof(ecn));
Packit Service 3880ab
	if (bytemode != -1)
Packit Service 3880ab
		addattr_l(n, 1024, TCA_PIE_BYTEMODE, &bytemode,
Packit Service 3880ab
			  sizeof(bytemode));
Packit Service 3880ab
	if (dq_rate_estimator != -1)
Packit Service 3880ab
		addattr_l(n, 1024, TCA_PIE_DQ_RATE_ESTIMATOR,
Packit Service 3880ab
			  &dq_rate_estimator, sizeof(dq_rate_estimator));
Packit Service 3880ab
Packit Service 3880ab
	addattr_nest_end(n, tail);
Packit Service 3880ab
	return 0;
Packit Service 3880ab
}
Packit Service 3880ab
Packit Service 3880ab
static int pie_print_opt(struct qdisc_util *qu, FILE *f, struct rtattr *opt)
Packit Service 3880ab
{
Packit Service 3880ab
	struct rtattr *tb[TCA_PIE_MAX + 1];
Packit Service 3880ab
	unsigned int limit;
Packit Service 3880ab
	unsigned int tupdate;
Packit Service 3880ab
	unsigned int target;
Packit Service 3880ab
	unsigned int alpha;
Packit Service 3880ab
	unsigned int beta;
Packit Service 3880ab
	unsigned int ecn;
Packit Service 3880ab
	unsigned int bytemode;
Packit Service 3880ab
	unsigned int dq_rate_estimator;
Packit Service 3880ab
Packit Service 3880ab
	SPRINT_BUF(b1);
Packit Service 3880ab
Packit Service 3880ab
	if (opt == NULL)
Packit Service 3880ab
		return 0;
Packit Service 3880ab
Packit Service 3880ab
	parse_rtattr_nested(tb, TCA_PIE_MAX, opt);
Packit Service 3880ab
Packit Service 3880ab
	if (tb[TCA_PIE_LIMIT] &&
Packit Service 3880ab
	    RTA_PAYLOAD(tb[TCA_PIE_LIMIT]) >= sizeof(__u32)) {
Packit Service 3880ab
		limit = rta_getattr_u32(tb[TCA_PIE_LIMIT]);
Packit Service 3880ab
		print_uint(PRINT_ANY, "limit", "limit %up ", limit);
Packit Service 3880ab
	}
Packit Service 3880ab
	if (tb[TCA_PIE_TARGET] &&
Packit Service 3880ab
	    RTA_PAYLOAD(tb[TCA_PIE_TARGET]) >= sizeof(__u32)) {
Packit Service 3880ab
		target = rta_getattr_u32(tb[TCA_PIE_TARGET]);
Packit Service 3880ab
		print_uint(PRINT_JSON, "target", NULL, target);
Packit Service 3880ab
		print_string(PRINT_FP, NULL, "target %s ",
Packit Service 3880ab
			     sprint_time(target, b1));
Packit Service 3880ab
	}
Packit Service 3880ab
	if (tb[TCA_PIE_TUPDATE] &&
Packit Service 3880ab
	    RTA_PAYLOAD(tb[TCA_PIE_TUPDATE]) >= sizeof(__u32)) {
Packit Service 3880ab
		tupdate = rta_getattr_u32(tb[TCA_PIE_TUPDATE]);
Packit Service 3880ab
		print_uint(PRINT_JSON, "tupdate", NULL, tupdate);
Packit Service 3880ab
		print_string(PRINT_FP, NULL, "tupdate %s ",
Packit Service 3880ab
			     sprint_time(tupdate, b1));
Packit Service 3880ab
	}
Packit Service 3880ab
	if (tb[TCA_PIE_ALPHA] &&
Packit Service 3880ab
	    RTA_PAYLOAD(tb[TCA_PIE_ALPHA]) >= sizeof(__u32)) {
Packit Service 3880ab
		alpha = rta_getattr_u32(tb[TCA_PIE_ALPHA]);
Packit Service 3880ab
		print_uint(PRINT_ANY, "alpha", "alpha %u ", alpha);
Packit Service 3880ab
	}
Packit Service 3880ab
	if (tb[TCA_PIE_BETA] &&
Packit Service 3880ab
	    RTA_PAYLOAD(tb[TCA_PIE_BETA]) >= sizeof(__u32)) {
Packit Service 3880ab
		beta = rta_getattr_u32(tb[TCA_PIE_BETA]);
Packit Service 3880ab
		print_uint(PRINT_ANY, "beta", "beta %u ", beta);
Packit Service 3880ab
	}
Packit Service 3880ab
Packit Service 3880ab
	if (tb[TCA_PIE_ECN] && RTA_PAYLOAD(tb[TCA_PIE_ECN]) >= sizeof(__u32)) {
Packit Service 3880ab
		ecn = rta_getattr_u32(tb[TCA_PIE_ECN]);
Packit Service 3880ab
		if (ecn)
Packit Service 3880ab
			print_bool(PRINT_ANY, "ecn", "ecn ", true);
Packit Service 3880ab
	}
Packit Service 3880ab
Packit Service 3880ab
	if (tb[TCA_PIE_BYTEMODE] &&
Packit Service 3880ab
	    RTA_PAYLOAD(tb[TCA_PIE_BYTEMODE]) >= sizeof(__u32)) {
Packit Service 3880ab
		bytemode = rta_getattr_u32(tb[TCA_PIE_BYTEMODE]);
Packit Service 3880ab
		if (bytemode)
Packit Service 3880ab
			print_bool(PRINT_ANY, "bytemode", "bytemode ", true);
Packit Service 3880ab
	}
Packit Service 3880ab
Packit Service 3880ab
	if (tb[TCA_PIE_DQ_RATE_ESTIMATOR] &&
Packit Service 3880ab
	    RTA_PAYLOAD(tb[TCA_PIE_DQ_RATE_ESTIMATOR]) >= sizeof(__u32)) {
Packit Service 3880ab
		dq_rate_estimator =
Packit Service 3880ab
				rta_getattr_u32(tb[TCA_PIE_DQ_RATE_ESTIMATOR]);
Packit Service 3880ab
		if (dq_rate_estimator)
Packit Service 3880ab
			print_bool(PRINT_ANY, "dq_rate_estimator",
Packit Service 3880ab
				   "dq_rate_estimator ", true);
Packit Service 3880ab
	}
Packit Service 3880ab
Packit Service 3880ab
	return 0;
Packit Service 3880ab
}
Packit Service 3880ab
Packit Service 3880ab
static int pie_print_xstats(struct qdisc_util *qu, FILE *f,
Packit Service 3880ab
			    struct rtattr *xstats)
Packit Service 3880ab
{
Packit Service 3880ab
	struct tc_pie_xstats *st;
Packit Service 3880ab
Packit Service 3880ab
	SPRINT_BUF(b1);
Packit Service 3880ab
Packit Service 3880ab
	if (xstats == NULL)
Packit Service 3880ab
		return 0;
Packit Service 3880ab
Packit Service 3880ab
	if (RTA_PAYLOAD(xstats) < sizeof(*st))
Packit Service 3880ab
		return -1;
Packit Service 3880ab
Packit Service 3880ab
	st = RTA_DATA(xstats);
Packit Service 3880ab
Packit Service 3880ab
	/* prob is returned as a fracion of maximum integer value */
Packit Service 3880ab
	print_float(PRINT_ANY, "prob", "  prob %lg",
Packit Service 3880ab
		    (double)st->prob / (double)UINT64_MAX);
Packit Service 3880ab
	print_uint(PRINT_JSON, "delay", NULL, st->delay);
Packit Service 3880ab
	print_string(PRINT_FP, NULL, " delay %s", sprint_time(st->delay, b1));
Packit Service 3880ab
Packit Service 3880ab
	if (st->dq_rate_estimating)
Packit Service 3880ab
		print_uint(PRINT_ANY, "avg_dq_rate", " avg_dq_rate %u",
Packit Service 3880ab
			   st->avg_dq_rate);
Packit Service 3880ab
Packit Service 3880ab
	print_nl();
Packit Service 3880ab
	print_uint(PRINT_ANY, "pkts_in", "  pkts_in %u", st->packets_in);
Packit Service 3880ab
	print_uint(PRINT_ANY, "overlimit", " overlimit %u", st->overlimit);
Packit Service 3880ab
	print_uint(PRINT_ANY, "dropped", " dropped %u", st->dropped);
Packit Service 3880ab
	print_uint(PRINT_ANY, "maxq", " maxq %u", st->maxq);
Packit Service 3880ab
	print_uint(PRINT_ANY, "ecn_mark", " ecn_mark %u", st->ecn_mark);
Packit Service 3880ab
Packit Service 3880ab
	return 0;
Packit Service 3880ab
Packit Service 3880ab
}
Packit Service 3880ab
Packit Service 3880ab
struct qdisc_util pie_qdisc_util = {
Packit Service 3880ab
	.id = "pie",
Packit Service 3880ab
	.parse_qopt	= pie_parse_opt,
Packit Service 3880ab
	.print_qopt	= pie_print_opt,
Packit Service 3880ab
	.print_xstats	= pie_print_xstats,
Packit Service 3880ab
};