[mirror_iproute2.git] / tc / q_sfb.c

/*
 * q_sfb.c	Stochastic Fair Blue.
 *
 *		This program is free software; you can redistribute it and/or
 *		modify it under the terms of the GNU General Public License
 *		as published by the Free Software Foundation; either version
 *		2 of the License, or (at your option) any later version.
 *
 * Authors:	Juliusz Chroboczek <jch@pps.jussieu.fr>
 *
 */


#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <fcntl.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <string.h>

#include "utils.h"
#include "tc_util.h"

static void explain(void)
{
	fprintf(stderr,
		"Usage: ... sfb [ rehash SECS ] [ db SECS ]\n"
		"	    [ limit PACKETS ] [ max PACKETS ] [ target PACKETS ]\n"
		"	    [ increment FLOAT ] [ decrement FLOAT ]\n"
		"	    [ penalty_rate PPS ] [ penalty_burst PACKETS ]\n");
}

static int get_prob(__u32 *val, const char *arg)
{
	double d;
	char *ptr;

	if (!arg || !*arg)
		return -1;
	d = strtod(arg, &ptr);
	if (!ptr || ptr == arg || d < 0.0 || d > 1.0)
		return -1;
	*val = (__u32)(d * SFB_MAX_PROB + 0.5);
	return 0;
}

static int sfb_parse_opt(struct qdisc_util *qu, int argc, char **argv,
			 struct nlmsghdr *n, const char *dev)
{
	struct tc_sfb_qopt opt = {
		.rehash_interval = 600*1000,
		.warmup_time = 60*1000,
		.penalty_rate = 10,
		.penalty_burst = 20,
		.increment = (SFB_MAX_PROB + 1000) / 2000,
		.decrement = (SFB_MAX_PROB + 10000) / 20000,
	};
	struct rtattr *tail;

	while (argc > 0) {
	    if (strcmp(*argv, "rehash") == 0) {
			NEXT_ARG();
			if (get_u32(&opt.rehash_interval, *argv, 0)) {
				fprintf(stderr, "Illegal \"rehash\"\n");
				return -1;
			}
		} else if (strcmp(*argv, "db") == 0) {
			NEXT_ARG();
			if (get_u32(&opt.warmup_time, *argv, 0)) {
				fprintf(stderr, "Illegal \"db\"\n");
				return -1;
			}
		} else if (strcmp(*argv, "limit") == 0) {
			NEXT_ARG();
			if (get_u32(&opt.limit, *argv, 0)) {
				fprintf(stderr, "Illegal \"limit\"\n");
				return -1;
			}
		} else if (strcmp(*argv, "max") == 0) {
			NEXT_ARG();
			if (get_u32(&opt.max, *argv, 0)) {
				fprintf(stderr, "Illegal \"max\"\n");
				return -1;
			}
		} else if (strcmp(*argv, "target") == 0) {
			NEXT_ARG();
			if (get_u32(&opt.bin_size, *argv, 0)) {
				fprintf(stderr, "Illegal \"target\"\n");
				return -1;
			}
		} else if (strcmp(*argv, "increment") == 0) {
			NEXT_ARG();
			if (get_prob(&opt.increment, *argv)) {
				fprintf(stderr, "Illegal \"increment\"\n");
				return -1;
			}
		} else if (strcmp(*argv, "decrement") == 0) {
			NEXT_ARG();
			if (get_prob(&opt.decrement, *argv)) {
				fprintf(stderr, "Illegal \"decrement\"\n");
				return -1;
			}
		} else if (strcmp(*argv, "penalty_rate") == 0) {
			NEXT_ARG();
			if (get_u32(&opt.penalty_rate, *argv, 0)) {
				fprintf(stderr, "Illegal \"penalty_rate\"\n");
				return -1;
			}
		} else if (strcmp(*argv, "penalty_burst") == 0) {
			NEXT_ARG();
			if (get_u32(&opt.penalty_burst, *argv, 0)) {
				fprintf(stderr, "Illegal \"penalty_burst\"\n");
				return -1;
			}
		} else {
			fprintf(stderr, "What is \"%s\"?\n", *argv);
			explain();
			return -1;
		}
		argc--; argv++;
	}

	if (opt.max == 0) {
		if (opt.bin_size >= 1)
			opt.max = (opt.bin_size * 5 + 1) / 4;
		else
			opt.max = 25;
	}
	if (opt.bin_size == 0)
		opt.bin_size = (opt.max * 4 + 3) / 5;

	tail = addattr_nest(n, 1024, TCA_OPTIONS);
	addattr_l(n, 1024, TCA_SFB_PARMS, &opt, sizeof(opt));
	addattr_nest_end(n, tail);
	return 0;
}

static int sfb_print_opt(struct qdisc_util *qu, FILE *f, struct rtattr *opt)
{
	struct rtattr *tb[__TCA_SFB_MAX];
	struct tc_sfb_qopt *qopt;

	if (opt == NULL)
		return 0;

	parse_rtattr_nested(tb, TCA_SFB_MAX, opt);
	if (tb[TCA_SFB_PARMS] == NULL)
		return -1;
	qopt = RTA_DATA(tb[TCA_SFB_PARMS]);
	if (RTA_PAYLOAD(tb[TCA_SFB_PARMS]) < sizeof(*qopt))
		return -1;

	fprintf(f,
		"limit %d max %d target %d\n"
		"  increment %.5f decrement %.5f penalty rate %d burst %d (%ums %ums)",
		qopt->limit, qopt->max, qopt->bin_size,
		(double)qopt->increment / SFB_MAX_PROB,
		(double)qopt->decrement / SFB_MAX_PROB,
		qopt->penalty_rate, qopt->penalty_burst,
		qopt->rehash_interval, qopt->warmup_time);

	return 0;
}

static int sfb_print_xstats(struct qdisc_util *qu, FILE *f,
			    struct rtattr *xstats)
{
    struct tc_sfb_xstats *st;

    if (xstats == NULL)
	    return 0;

    if (RTA_PAYLOAD(xstats) < sizeof(*st))
	    return -1;

    st = RTA_DATA(xstats);
    fprintf(f,
	    "  earlydrop %u penaltydrop %u bucketdrop %u queuedrop %u childdrop %u marked %u\n"
	    "  maxqlen %u maxprob %.5f avgprob %.5f ",
	    st->earlydrop, st->penaltydrop, st->bucketdrop, st->queuedrop, st->childdrop,
	    st->marked,
	    st->maxqlen, (double)st->maxprob / SFB_MAX_PROB,
		(double)st->avgprob / SFB_MAX_PROB);

    return 0;
}

struct qdisc_util sfb_qdisc_util = {
	.id		= "sfb",
	.parse_qopt	= sfb_parse_opt,
	.print_qopt	= sfb_print_opt,
	.print_xstats	= sfb_print_xstats,
};
Commit	Line	Data
d7f3299d JC	1	/*
	2	* q_sfb.c Stochastic Fair Blue.
	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: Juliusz Chroboczek <jch@pps.jussieu.fr>
	10	*
	11	*/
	12
	13
	14
	15	#include <stdio.h>
	16	#include <stdlib.h>
	17	#include <unistd.h>
d7f3299d JC	18	#include <fcntl.h>
	19	#include <sys/socket.h>
	20	#include <netinet/in.h>
	21	#include <arpa/inet.h>
	22	#include <string.h>
	23
	24	#include "utils.h"
	25	#include "tc_util.h"
	26
	27	static void explain(void)
	28	{
	29	fprintf(stderr,
	30	"Usage: ... sfb [ rehash SECS ] [ db SECS ]\n"
	31	" [ limit PACKETS ] [ max PACKETS ] [ target PACKETS ]\n"
	32	" [ increment FLOAT ] [ decrement FLOAT ]\n"
	33	" [ penalty_rate PPS ] [ penalty_burst PACKETS ]\n");
	34	}
	35
	36	static int get_prob(__u32 val, const char arg)
	37	{
	38	double d;
	39	char *ptr;
	40
	41	if (!arg \|\| !*arg)
	42	return -1;
	43	d = strtod(arg, &ptr);
	44	if (!ptr \|\| ptr == arg \|\| d < 0.0 \|\| d > 1.0)
	45	return -1;
	46	val = (__u32)(d SFB_MAX_PROB + 0.5);
	47	return 0;
	48	}
	49
	50	static int sfb_parse_opt(struct qdisc_util qu, int argc, char *argv,
927e3cfb	51	struct nlmsghdr n, const char dev)
d7f3299d	52	{
d17b136f PS	53	struct tc_sfb_qopt opt = {
	54	.rehash_interval = 600*1000,
	55	.warmup_time = 60*1000,
	56	.penalty_rate = 10,
	57	.penalty_burst = 20,
	58	.increment = (SFB_MAX_PROB + 1000) / 2000,
	59	.decrement = (SFB_MAX_PROB + 10000) / 20000,
	60	};
d7f3299d JC	61	struct rtattr *tail;
d7f3299d JC	62
d7f3299d JC	63	while (argc > 0) {
	64	if (strcmp(*argv, "rehash") == 0) {
	65	NEXT_ARG();
	66	if (get_u32(&opt.rehash_interval, *argv, 0)) {
	67	fprintf(stderr, "Illegal \"rehash\"\n");
	68	return -1;
	69	}
	70	} else if (strcmp(*argv, "db") == 0) {
	71	NEXT_ARG();
	72	if (get_u32(&opt.warmup_time, *argv, 0)) {
	73	fprintf(stderr, "Illegal \"db\"\n");
	74	return -1;
	75	}
	76	} else if (strcmp(*argv, "limit") == 0) {
	77	NEXT_ARG();
	78	if (get_u32(&opt.limit, *argv, 0)) {
	79	fprintf(stderr, "Illegal \"limit\"\n");
	80	return -1;
	81	}
	82	} else if (strcmp(*argv, "max") == 0) {
	83	NEXT_ARG();
	84	if (get_u32(&opt.max, *argv, 0)) {
	85	fprintf(stderr, "Illegal \"max\"\n");
	86	return -1;
	87	}
	88	} else if (strcmp(*argv, "target") == 0) {
	89	NEXT_ARG();
	90	if (get_u32(&opt.bin_size, *argv, 0)) {
	91	fprintf(stderr, "Illegal \"target\"\n");
	92	return -1;
	93	}
	94	} else if (strcmp(*argv, "increment") == 0) {
	95	NEXT_ARG();
	96	if (get_prob(&opt.increment, *argv)) {
	97	fprintf(stderr, "Illegal \"increment\"\n");
	98	return -1;
	99	}
	100	} else if (strcmp(*argv, "decrement") == 0) {
	101	NEXT_ARG();
	102	if (get_prob(&opt.decrement, *argv)) {
	103	fprintf(stderr, "Illegal \"decrement\"\n");
	104	return -1;
	105	}
	106	} else if (strcmp(*argv, "penalty_rate") == 0) {
	107	NEXT_ARG();
	108	if (get_u32(&opt.penalty_rate, *argv, 0)) {
	109	fprintf(stderr, "Illegal \"penalty_rate\"\n");
	110	return -1;
	111	}
	112	} else if (strcmp(*argv, "penalty_burst") == 0) {
	113	NEXT_ARG();
	114	if (get_u32(&opt.penalty_burst, *argv, 0)) {
	115	fprintf(stderr, "Illegal \"penalty_burst\"\n");
	116	return -1;
	117	}
	118	} else {
	119	fprintf(stderr, "What is \"%s\"?\n", *argv);
	120	explain();
	121	return -1;
	122	}
	123	argc--; argv++;
	124	}
	125
	126	if (opt.max == 0) {
127	if (opt.bin_size >= 1)
128	opt.max = (opt.bin_size * 5 + 1) / 4;
129	else
130	opt.max = 25;
131	}
132	if (opt.bin_size == 0)
133	opt.bin_size = (opt.max * 4 + 3) / 5;
134
c14f9d92	135	tail = addattr_nest(n, 1024, TCA_OPTIONS);
d7f3299d	136	addattr_l(n, 1024, TCA_SFB_PARMS, &opt, sizeof(opt));
c14f9d92	137	addattr_nest_end(n, tail);
d7f3299d JC	138	return 0;
	139	}
	140
	141	static int sfb_print_opt(struct qdisc_util qu, FILE f, struct rtattr *opt)
	142	{
	143	struct rtattr *tb[__TCA_SFB_MAX];
	144	struct tc_sfb_qopt *qopt;
	145
	146	if (opt == NULL)
	147	return 0;
	148
	149	parse_rtattr_nested(tb, TCA_SFB_MAX, opt);
	150	if (tb[TCA_SFB_PARMS] == NULL)
	151	return -1;
	152	qopt = RTA_DATA(tb[TCA_SFB_PARMS]);
	153	if (RTA_PAYLOAD(tb[TCA_SFB_PARMS]) < sizeof(*qopt))
	154	return -1;
	155
	156	fprintf(f,
	157	"limit %d max %d target %d\n"
32a121cb	158	" increment %.5f decrement %.5f penalty rate %d burst %d (%ums %ums)",
d7f3299d JC	159	qopt->limit, qopt->max, qopt->bin_size,
	160	(double)qopt->increment / SFB_MAX_PROB,
	161	(double)qopt->decrement / SFB_MAX_PROB,
	162	qopt->penalty_rate, qopt->penalty_burst,
	163	qopt->rehash_interval, qopt->warmup_time);
	164
	165	return 0;
	166	}
	167
	168	static int sfb_print_xstats(struct qdisc_util qu, FILE f,
	169	struct rtattr *xstats)
	170	{
	171	struct tc_sfb_xstats *st;
	172
	173	if (xstats == NULL)
	174	return 0;
	175
	176	if (RTA_PAYLOAD(xstats) < sizeof(*st))
	177	return -1;
	178
	179	st = RTA_DATA(xstats);
	180	fprintf(f,
	181	" earlydrop %u penaltydrop %u bucketdrop %u queuedrop %u childdrop %u marked %u\n"
	182	" maxqlen %u maxprob %.5f avgprob %.5f ",
	183	st->earlydrop, st->penaltydrop, st->bucketdrop, st->queuedrop, st->childdrop,
	184	st->marked,
	185	st->maxqlen, (double)st->maxprob / SFB_MAX_PROB,
	186	(double)st->avgprob / SFB_MAX_PROB);
	187
	188	return 0;
	189	}
	190
	191	struct qdisc_util sfb_qdisc_util = {
	192	.id = "sfb",
	193	.parse_qopt = sfb_parse_opt,
	194	.print_qopt = sfb_print_opt,
	195	.print_xstats = sfb_print_xstats,
	196	};