[linux-2.6-block.git] / net / sched / sch_red.c

/*
 * net/sched/sch_red.c	Random Early Detection queue.
 *
 *		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:	Alexey Kuznetsov, <kuznet@ms2.inr.ac.ru>
 *
 * Changes:
 * J Hadi Salim 980914:	computation fixes
 * Alexey Makarenko <makar@phoenix.kharkov.ua> 990814: qave on idle link was calculated incorrectly.
 * J Hadi Salim 980816:  ECN support
 */

#include <linux/module.h>
#include <linux/types.h>
#include <linux/kernel.h>
#include <linux/skbuff.h>
#include <net/pkt_sched.h>
#include <net/inet_ecn.h>
#include <net/red.h>


/*	Parameters, settable by user:
	-----------------------------

	limit		- bytes (must be > qth_max + burst)

	Hard limit on queue length, should be chosen >qth_max
	to allow packet bursts. This parameter does not
	affect the algorithms behaviour and can be chosen
	arbitrarily high (well, less than ram size)
	Really, this limit will never be reached
	if RED works correctly.
 */

struct red_sched_data {
	u32			limit;		/* HARD maximal queue length */
	unsigned char		flags;
	struct timer_list	adapt_timer;
	struct red_parms	parms;
	struct red_vars		vars;
	struct red_stats	stats;
	struct Qdisc		*qdisc;
};

static inline int red_use_ecn(struct red_sched_data *q)
{
	return q->flags & TC_RED_ECN;
}

static inline int red_use_harddrop(struct red_sched_data *q)
{
	return q->flags & TC_RED_HARDDROP;
}

static int red_enqueue(struct sk_buff *skb, struct Qdisc *sch,
		       struct sk_buff **to_free)
{
	struct red_sched_data *q = qdisc_priv(sch);
	struct Qdisc *child = q->qdisc;
	int ret;

	q->vars.qavg = red_calc_qavg(&q->parms,
				     &q->vars,
				     child->qstats.backlog);

	if (red_is_idling(&q->vars))
		red_end_of_idle_period(&q->vars);

	switch (red_action(&q->parms, &q->vars, q->vars.qavg)) {
	case RED_DONT_MARK:
		break;

	case RED_PROB_MARK:
		qdisc_qstats_overlimit(sch);
		if (!red_use_ecn(q) || !INET_ECN_set_ce(skb)) {
			q->stats.prob_drop++;
			goto congestion_drop;
		}

		q->stats.prob_mark++;
		break;

	case RED_HARD_MARK:
		qdisc_qstats_overlimit(sch);
		if (red_use_harddrop(q) || !red_use_ecn(q) ||
		    !INET_ECN_set_ce(skb)) {
			q->stats.forced_drop++;
			goto congestion_drop;
		}

		q->stats.forced_mark++;
		break;
	}

	ret = qdisc_enqueue(skb, child, to_free);
	if (likely(ret == NET_XMIT_SUCCESS)) {
		qdisc_qstats_backlog_inc(sch, skb);
		sch->q.qlen++;
	} else if (net_xmit_drop_count(ret)) {
		q->stats.pdrop++;
		qdisc_qstats_drop(sch);
	}
	return ret;

congestion_drop:
	qdisc_drop(skb, sch, to_free);
	return NET_XMIT_CN;
}

static struct sk_buff *red_dequeue(struct Qdisc *sch)
{
	struct sk_buff *skb;
	struct red_sched_data *q = qdisc_priv(sch);
	struct Qdisc *child = q->qdisc;

	skb = child->dequeue(child);
	if (skb) {
		qdisc_bstats_update(sch, skb);
		qdisc_qstats_backlog_dec(sch, skb);
		sch->q.qlen--;
	} else {
		if (!red_is_idling(&q->vars))
			red_start_of_idle_period(&q->vars);
	}
	return skb;
}

static struct sk_buff *red_peek(struct Qdisc *sch)
{
	struct red_sched_data *q = qdisc_priv(sch);
	struct Qdisc *child = q->qdisc;

	return child->ops->peek(child);
}

static void red_reset(struct Qdisc *sch)
{
	struct red_sched_data *q = qdisc_priv(sch);

	qdisc_reset(q->qdisc);
	sch->qstats.backlog = 0;
	sch->q.qlen = 0;
	red_restart(&q->vars);
}

static void red_destroy(struct Qdisc *sch)
{
	struct red_sched_data *q = qdisc_priv(sch);

	del_timer_sync(&q->adapt_timer);
	qdisc_destroy(q->qdisc);
}

static const struct nla_policy red_policy[TCA_RED_MAX + 1] = {
	[TCA_RED_PARMS]	= { .len = sizeof(struct tc_red_qopt) },
	[TCA_RED_STAB]	= { .len = RED_STAB_SIZE },
	[TCA_RED_MAX_P] = { .type = NLA_U32 },
};

static int red_change(struct Qdisc *sch, struct nlattr *opt)
{
	struct red_sched_data *q = qdisc_priv(sch);
	struct nlattr *tb[TCA_RED_MAX + 1];
	struct tc_red_qopt *ctl;
	struct Qdisc *child = NULL;
	int err;
	u32 max_P;

	if (opt == NULL)
		return -EINVAL;

	err = nla_parse_nested(tb, TCA_RED_MAX, opt, red_policy);
	if (err < 0)
		return err;

	if (tb[TCA_RED_PARMS] == NULL ||
	    tb[TCA_RED_STAB] == NULL)
		return -EINVAL;

	max_P = tb[TCA_RED_MAX_P] ? nla_get_u32(tb[TCA_RED_MAX_P]) : 0;

	ctl = nla_data(tb[TCA_RED_PARMS]);

	if (ctl->limit > 0) {
		child = fifo_create_dflt(sch, &bfifo_qdisc_ops, ctl->limit);
		if (IS_ERR(child))
			return PTR_ERR(child);
	}

	sch_tree_lock(sch);
	q->flags = ctl->flags;
	q->limit = ctl->limit;
	if (child) {
		qdisc_tree_reduce_backlog(q->qdisc, q->qdisc->q.qlen,
					  q->qdisc->qstats.backlog);
		qdisc_destroy(q->qdisc);
		q->qdisc = child;
	}

	red_set_parms(&q->parms,
		      ctl->qth_min, ctl->qth_max, ctl->Wlog,
		      ctl->Plog, ctl->Scell_log,
		      nla_data(tb[TCA_RED_STAB]),
		      max_P);
	red_set_vars(&q->vars);

	del_timer(&q->adapt_timer);
	if (ctl->flags & TC_RED_ADAPTATIVE)
		mod_timer(&q->adapt_timer, jiffies + HZ/2);

	if (!q->qdisc->q.qlen)
		red_start_of_idle_period(&q->vars);

	sch_tree_unlock(sch);
	return 0;
}

static inline void red_adaptative_timer(unsigned long arg)
{
	struct Qdisc *sch = (struct Qdisc *)arg;
	struct red_sched_data *q = qdisc_priv(sch);
	spinlock_t *root_lock = qdisc_lock(qdisc_root_sleeping(sch));

	spin_lock(root_lock);
	red_adaptative_algo(&q->parms, &q->vars);
	mod_timer(&q->adapt_timer, jiffies + HZ/2);
	spin_unlock(root_lock);
}

static int red_init(struct Qdisc *sch, struct nlattr *opt)
{
	struct red_sched_data *q = qdisc_priv(sch);

	q->qdisc = &noop_qdisc;
	setup_timer(&q->adapt_timer, red_adaptative_timer, (unsigned long)sch);
	return red_change(sch, opt);
}

static int red_dump(struct Qdisc *sch, struct sk_buff *skb)
{
	struct red_sched_data *q = qdisc_priv(sch);
	struct nlattr *opts = NULL;
	struct tc_red_qopt opt = {
		.limit		= q->limit,
		.flags		= q->flags,
		.qth_min	= q->parms.qth_min >> q->parms.Wlog,
		.qth_max	= q->parms.qth_max >> q->parms.Wlog,
		.Wlog		= q->parms.Wlog,
		.Plog		= q->parms.Plog,
		.Scell_log	= q->parms.Scell_log,
	};

	sch->qstats.backlog = q->qdisc->qstats.backlog;
	opts = nla_nest_start(skb, TCA_OPTIONS);
	if (opts == NULL)
		goto nla_put_failure;
	if (nla_put(skb, TCA_RED_PARMS, sizeof(opt), &opt) ||
	    nla_put_u32(skb, TCA_RED_MAX_P, q->parms.max_P))
		goto nla_put_failure;
	return nla_nest_end(skb, opts);

nla_put_failure:
	nla_nest_cancel(skb, opts);
	return -EMSGSIZE;
}

static int red_dump_stats(struct Qdisc *sch, struct gnet_dump *d)
{
	struct red_sched_data *q = qdisc_priv(sch);
	struct tc_red_xstats st = {
		.early	= q->stats.prob_drop + q->stats.forced_drop,
		.pdrop	= q->stats.pdrop,
		.other	= q->stats.other,
		.marked	= q->stats.prob_mark + q->stats.forced_mark,
	};

	return gnet_stats_copy_app(d, &st, sizeof(st));
}

static int red_dump_class(struct Qdisc *sch, unsigned long cl,
			  struct sk_buff *skb, struct tcmsg *tcm)
{
	struct red_sched_data *q = qdisc_priv(sch);

	tcm->tcm_handle |= TC_H_MIN(1);
	tcm->tcm_info = q->qdisc->handle;
	return 0;
}

static int red_graft(struct Qdisc *sch, unsigned long arg, struct Qdisc *new,
		     struct Qdisc **old)
{
	struct red_sched_data *q = qdisc_priv(sch);

	if (new == NULL)
		new = &noop_qdisc;

	*old = qdisc_replace(sch, new, &q->qdisc);
	return 0;
}

static struct Qdisc *red_leaf(struct Qdisc *sch, unsigned long arg)
{
	struct red_sched_data *q = qdisc_priv(sch);
	return q->qdisc;
}

static unsigned long red_get(struct Qdisc *sch, u32 classid)
{
	return 1;
}

static void red_put(struct Qdisc *sch, unsigned long arg)
{
}

static void red_walk(struct Qdisc *sch, struct qdisc_walker *walker)
{
	if (!walker->stop) {
		if (walker->count >= walker->skip)
			if (walker->fn(sch, 1, walker) < 0) {
				walker->stop = 1;
				return;
			}
		walker->count++;
	}
}

static const struct Qdisc_class_ops red_class_ops = {
	.graft		=	red_graft,
	.leaf		=	red_leaf,
	.get		=	red_get,
	.put		=	red_put,
	.walk		=	red_walk,
	.dump		=	red_dump_class,
};

static struct Qdisc_ops red_qdisc_ops __read_mostly = {
	.id		=	"red",
	.priv_size	=	sizeof(struct red_sched_data),
	.cl_ops		=	&red_class_ops,
	.enqueue	=	red_enqueue,
	.dequeue	=	red_dequeue,
	.peek		=	red_peek,
	.init		=	red_init,
	.reset		=	red_reset,
	.destroy	=	red_destroy,
	.change		=	red_change,
	.dump		=	red_dump,
	.dump_stats	=	red_dump_stats,
	.owner		=	THIS_MODULE,
};

static int __init red_module_init(void)
{
	return register_qdisc(&red_qdisc_ops);
}

static void __exit red_module_exit(void)
{
	unregister_qdisc(&red_qdisc_ops);
}

module_init(red_module_init)
module_exit(red_module_exit)

MODULE_LICENSE("GPL");
Commit	Line	Data
1da177e4 LT	1	/*
	2	* net/sched/sch_red.c Random Early Detection queue.
	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	* Changes:
dba051f3	12	* J Hadi Salim 980914: computation fixes
1da177e4	13	* Alexey Makarenko <makar@phoenix.kharkov.ua> 990814: qave on idle link was calculated incorrectly.
dba051f3	14	* J Hadi Salim 980816: ECN support
1da177e4 LT	15	*/
1da177e4 LT	16
1da177e4	17	#include <linux/module.h>
1da177e4 LT	18	#include <linux/types.h>
1da177e4 LT	19	#include <linux/kernel.h>
1da177e4	20	#include <linux/skbuff.h>
1da177e4 LT	21	#include <net/pkt_sched.h>
1da177e4 LT	22	#include <net/inet_ecn.h>
6b31b28a	23	#include <net/red.h>
1da177e4 LT	24
1da177e4 LT	25
6b31b28a	26	/* Parameters, settable by user:
1da177e4 LT	27	-----------------------------
	28
	29	limit - bytes (must be > qth_max + burst)
	30
	31	Hard limit on queue length, should be chosen >qth_max
	32	to allow packet bursts. This parameter does not
	33	affect the algorithms behaviour and can be chosen
	34	arbitrarily high (well, less than ram size)
	35	Really, this limit will never be reached
	36	if RED works correctly.
1da177e4 LT	37	*/
1da177e4 LT	38
cc7ec456	39	struct red_sched_data {
6b31b28a TG	40	u32 limit; /* HARD maximal queue length */
6b31b28a TG	41	unsigned char flags;
8af2a218	42	struct timer_list adapt_timer;
6b31b28a	43	struct red_parms parms;
eeca6688	44	struct red_vars vars;
6b31b28a	45	struct red_stats stats;
f38c39d6	46	struct Qdisc *qdisc;
1da177e4 LT	47	};
1da177e4 LT	48
6b31b28a	49	static inline int red_use_ecn(struct red_sched_data *q)
1da177e4	50	{
6b31b28a	51	return q->flags & TC_RED_ECN;
1da177e4 LT	52	}
1da177e4 LT	53
bdc450a0 TG	54	static inline int red_use_harddrop(struct red_sched_data *q)
	55	{
	56	return q->flags & TC_RED_HARDDROP;
	57	}
	58
520ac30f ED	59	static int red_enqueue(struct sk_buff skb, struct Qdisc sch,
520ac30f ED	60	struct sk_buff **to_free)
1da177e4 LT	61	{
1da177e4 LT	62	struct red_sched_data *q = qdisc_priv(sch);
f38c39d6 PM	63	struct Qdisc *child = q->qdisc;
f38c39d6 PM	64	int ret;
1da177e4	65
eeca6688 ED	66	q->vars.qavg = red_calc_qavg(&q->parms,
	67	&q->vars,
	68	child->qstats.backlog);
1da177e4	69
eeca6688 ED	70	if (red_is_idling(&q->vars))
eeca6688 ED	71	red_end_of_idle_period(&q->vars);
1da177e4	72
eeca6688	73	switch (red_action(&q->parms, &q->vars, q->vars.qavg)) {
cc7ec456 ED	74	case RED_DONT_MARK:
	75	break;
	76
	77	case RED_PROB_MARK:
25331d6c	78	qdisc_qstats_overlimit(sch);
cc7ec456 ED	79	if (!red_use_ecn(q) \|\| !INET_ECN_set_ce(skb)) {
	80	q->stats.prob_drop++;
	81	goto congestion_drop;
	82	}
	83
	84	q->stats.prob_mark++;
	85	break;
	86
	87	case RED_HARD_MARK:
25331d6c	88	qdisc_qstats_overlimit(sch);
cc7ec456 ED	89	if (red_use_harddrop(q) \|\| !red_use_ecn(q) \|\|
	90	!INET_ECN_set_ce(skb)) {
	91	q->stats.forced_drop++;
	92	goto congestion_drop;
	93	}
	94
	95	q->stats.forced_mark++;
	96	break;
1da177e4 LT	97	}
1da177e4 LT	98
520ac30f	99	ret = qdisc_enqueue(skb, child, to_free);
f38c39d6	100	if (likely(ret == NET_XMIT_SUCCESS)) {
d7f4f332	101	qdisc_qstats_backlog_inc(sch, skb);
f38c39d6	102	sch->q.qlen++;
378a2f09	103	} else if (net_xmit_drop_count(ret)) {
f38c39d6	104	q->stats.pdrop++;
25331d6c	105	qdisc_qstats_drop(sch);
f38c39d6 PM	106	}
f38c39d6 PM	107	return ret;
6b31b28a TG	108
6b31b28a TG	109	congestion_drop:
520ac30f	110	qdisc_drop(skb, sch, to_free);
1da177e4 LT	111	return NET_XMIT_CN;
	112	}
	113
cc7ec456	114	static struct sk_buff red_dequeue(struct Qdisc sch)
1da177e4 LT	115	{
	116	struct sk_buff *skb;
	117	struct red_sched_data *q = qdisc_priv(sch);
f38c39d6	118	struct Qdisc *child = q->qdisc;
1da177e4	119
f38c39d6	120	skb = child->dequeue(child);
9190b3b3 ED	121	if (skb) {
9190b3b3 ED	122	qdisc_bstats_update(sch, skb);
d7f4f332	123	qdisc_qstats_backlog_dec(sch, skb);
f38c39d6	124	sch->q.qlen--;
9190b3b3	125	} else {
eeca6688 ED	126	if (!red_is_idling(&q->vars))
eeca6688 ED	127	red_start_of_idle_period(&q->vars);
9190b3b3	128	}
9e178ff2	129	return skb;
1da177e4 LT	130	}
1da177e4 LT	131
cc7ec456	132	static struct sk_buff red_peek(struct Qdisc sch)
8e3af978 JP	133	{
	134	struct red_sched_data *q = qdisc_priv(sch);
	135	struct Qdisc *child = q->qdisc;
	136
	137	return child->ops->peek(child);
	138	}
	139
cc7ec456	140	static void red_reset(struct Qdisc *sch)
1da177e4 LT	141	{
	142	struct red_sched_data *q = qdisc_priv(sch);
	143
f38c39d6	144	qdisc_reset(q->qdisc);
d7f4f332	145	sch->qstats.backlog = 0;
f38c39d6	146	sch->q.qlen = 0;
eeca6688	147	red_restart(&q->vars);
1da177e4 LT	148	}
1da177e4 LT	149
f38c39d6 PM	150	static void red_destroy(struct Qdisc *sch)
	151	{
	152	struct red_sched_data *q = qdisc_priv(sch);
8af2a218 ED	153
8af2a218 ED	154	del_timer_sync(&q->adapt_timer);
f38c39d6 PM	155	qdisc_destroy(q->qdisc);
	156	}
	157
27a3421e PM	158	static const struct nla_policy red_policy[TCA_RED_MAX + 1] = {
	159	[TCA_RED_PARMS] = { .len = sizeof(struct tc_red_qopt) },
	160	[TCA_RED_STAB] = { .len = RED_STAB_SIZE },
a73ed26b	161	[TCA_RED_MAX_P] = { .type = NLA_U32 },
27a3421e PM	162	};
27a3421e PM	163
1e90474c	164	static int red_change(struct Qdisc sch, struct nlattr opt)
1da177e4 LT	165	{
1da177e4 LT	166	struct red_sched_data *q = qdisc_priv(sch);
1e90474c	167	struct nlattr *tb[TCA_RED_MAX + 1];
1da177e4	168	struct tc_red_qopt *ctl;
f38c39d6	169	struct Qdisc *child = NULL;
cee63723	170	int err;
a73ed26b	171	u32 max_P;
1da177e4	172
cee63723	173	if (opt == NULL)
dba051f3 TG	174	return -EINVAL;
dba051f3 TG	175
27a3421e	176	err = nla_parse_nested(tb, TCA_RED_MAX, opt, red_policy);
cee63723 PM	177	if (err < 0)
	178	return err;
	179
1e90474c	180	if (tb[TCA_RED_PARMS] == NULL \|\|
27a3421e	181	tb[TCA_RED_STAB] == NULL)
1da177e4 LT	182	return -EINVAL;
1da177e4 LT	183
a73ed26b ED	184	max_P = tb[TCA_RED_MAX_P] ? nla_get_u32(tb[TCA_RED_MAX_P]) : 0;
a73ed26b ED	185
1e90474c	186	ctl = nla_data(tb[TCA_RED_PARMS]);
1da177e4	187
f38c39d6	188	if (ctl->limit > 0) {
fb0305ce PM	189	child = fifo_create_dflt(sch, &bfifo_qdisc_ops, ctl->limit);
	190	if (IS_ERR(child))
	191	return PTR_ERR(child);
f38c39d6 PM	192	}
f38c39d6 PM	193
1da177e4 LT	194	sch_tree_lock(sch);
1da177e4 LT	195	q->flags = ctl->flags;
1da177e4	196	q->limit = ctl->limit;
5e50da01	197	if (child) {
2ccccf5f WC	198	qdisc_tree_reduce_backlog(q->qdisc, q->qdisc->q.qlen,
2ccccf5f WC	199	q->qdisc->qstats.backlog);
b94c8afc PM	200	qdisc_destroy(q->qdisc);
b94c8afc PM	201	q->qdisc = child;
5e50da01	202	}
1da177e4	203
eeca6688 ED	204	red_set_parms(&q->parms,
eeca6688 ED	205	ctl->qth_min, ctl->qth_max, ctl->Wlog,
a73ed26b ED	206	ctl->Plog, ctl->Scell_log,
	207	nla_data(tb[TCA_RED_STAB]),
	208	max_P);
eeca6688	209	red_set_vars(&q->vars);
6b31b28a	210
8af2a218 ED	211	del_timer(&q->adapt_timer);
	212	if (ctl->flags & TC_RED_ADAPTATIVE)
	213	mod_timer(&q->adapt_timer, jiffies + HZ/2);
	214
1ee5fa1e	215	if (!q->qdisc->q.qlen)
eeca6688	216	red_start_of_idle_period(&q->vars);
dba051f3	217
1da177e4 LT	218	sch_tree_unlock(sch);
	219	return 0;
	220	}
	221
8af2a218 ED	222	static inline void red_adaptative_timer(unsigned long arg)
	223	{
	224	struct Qdisc sch = (struct Qdisc )arg;
	225	struct red_sched_data *q = qdisc_priv(sch);
	226	spinlock_t *root_lock = qdisc_lock(qdisc_root_sleeping(sch));
	227
	228	spin_lock(root_lock);
eeca6688	229	red_adaptative_algo(&q->parms, &q->vars);
8af2a218 ED	230	mod_timer(&q->adapt_timer, jiffies + HZ/2);
	231	spin_unlock(root_lock);
	232	}
	233
cc7ec456	234	static int red_init(struct Qdisc sch, struct nlattr opt)
1da177e4	235	{
f38c39d6 PM	236	struct red_sched_data *q = qdisc_priv(sch);
	237
	238	q->qdisc = &noop_qdisc;
8af2a218	239	setup_timer(&q->adapt_timer, red_adaptative_timer, (unsigned long)sch);
1da177e4 LT	240	return red_change(sch, opt);
	241	}
	242
	243	static int red_dump(struct Qdisc sch, struct sk_buff skb)
	244	{
	245	struct red_sched_data *q = qdisc_priv(sch);
1e90474c	246	struct nlattr *opts = NULL;
6b31b28a TG	247	struct tc_red_qopt opt = {
	248	.limit = q->limit,
	249	.flags = q->flags,
	250	.qth_min = q->parms.qth_min >> q->parms.Wlog,
	251	.qth_max = q->parms.qth_max >> q->parms.Wlog,
	252	.Wlog = q->parms.Wlog,
	253	.Plog = q->parms.Plog,
	254	.Scell_log = q->parms.Scell_log,
	255	};
1da177e4	256
0dfb33a0	257	sch->qstats.backlog = q->qdisc->qstats.backlog;
1e90474c PM	258	opts = nla_nest_start(skb, TCA_OPTIONS);
	259	if (opts == NULL)
	260	goto nla_put_failure;
1b34ec43 DM	261	if (nla_put(skb, TCA_RED_PARMS, sizeof(opt), &opt) \|\|
	262	nla_put_u32(skb, TCA_RED_MAX_P, q->parms.max_P))
	263	goto nla_put_failure;
1e90474c	264	return nla_nest_end(skb, opts);
1da177e4	265
1e90474c	266	nla_put_failure:
bc3ed28c TG	267	nla_nest_cancel(skb, opts);
bc3ed28c TG	268	return -EMSGSIZE;
1da177e4 LT	269	}
	270
	271	static int red_dump_stats(struct Qdisc sch, struct gnet_dump d)
	272	{
	273	struct red_sched_data *q = qdisc_priv(sch);
6b31b28a TG	274	struct tc_red_xstats st = {
	275	.early = q->stats.prob_drop + q->stats.forced_drop,
	276	.pdrop = q->stats.pdrop,
	277	.other = q->stats.other,
	278	.marked = q->stats.prob_mark + q->stats.forced_mark,
	279	};
	280
	281	return gnet_stats_copy_app(d, &st, sizeof(st));
1da177e4 LT	282	}
1da177e4 LT	283
f38c39d6 PM	284	static int red_dump_class(struct Qdisc *sch, unsigned long cl,
	285	struct sk_buff skb, struct tcmsg tcm)
	286	{
	287	struct red_sched_data *q = qdisc_priv(sch);
	288
f38c39d6 PM	289	tcm->tcm_handle \|= TC_H_MIN(1);
	290	tcm->tcm_info = q->qdisc->handle;
	291	return 0;
	292	}
	293
	294	static int red_graft(struct Qdisc sch, unsigned long arg, struct Qdisc new,
	295	struct Qdisc **old)
	296	{
	297	struct red_sched_data *q = qdisc_priv(sch);
	298
	299	if (new == NULL)
	300	new = &noop_qdisc;
	301
86a7996c	302	*old = qdisc_replace(sch, new, &q->qdisc);
f38c39d6 PM	303	return 0;
	304	}
	305
	306	static struct Qdisc red_leaf(struct Qdisc sch, unsigned long arg)
	307	{
	308	struct red_sched_data *q = qdisc_priv(sch);
	309	return q->qdisc;
	310	}
	311
	312	static unsigned long red_get(struct Qdisc *sch, u32 classid)
	313	{
	314	return 1;
	315	}
	316
	317	static void red_put(struct Qdisc *sch, unsigned long arg)
	318	{
f38c39d6 PM	319	}
f38c39d6 PM	320
f38c39d6 PM	321	static void red_walk(struct Qdisc sch, struct qdisc_walker walker)
	322	{
	323	if (!walker->stop) {
	324	if (walker->count >= walker->skip)
	325	if (walker->fn(sch, 1, walker) < 0) {
	326	walker->stop = 1;
	327	return;
	328	}
	329	walker->count++;
	330	}
	331	}
	332
20fea08b	333	static const struct Qdisc_class_ops red_class_ops = {
f38c39d6 PM	334	.graft = red_graft,
	335	.leaf = red_leaf,
	336	.get = red_get,
	337	.put = red_put,
f38c39d6	338	.walk = red_walk,
f38c39d6 PM	339	.dump = red_dump_class,
	340	};
	341
20fea08b	342	static struct Qdisc_ops red_qdisc_ops __read_mostly = {
1da177e4 LT	343	.id = "red",
1da177e4 LT	344	.priv_size = sizeof(struct red_sched_data),
f38c39d6	345	.cl_ops = &red_class_ops,
1da177e4 LT	346	.enqueue = red_enqueue,
1da177e4 LT	347	.dequeue = red_dequeue,
8e3af978	348	.peek = red_peek,
1da177e4 LT	349	.init = red_init,
1da177e4 LT	350	.reset = red_reset,
f38c39d6	351	.destroy = red_destroy,
1da177e4 LT	352	.change = red_change,
	353	.dump = red_dump,
	354	.dump_stats = red_dump_stats,
	355	.owner = THIS_MODULE,
	356	};
	357
	358	static int __init red_module_init(void)
	359	{
	360	return register_qdisc(&red_qdisc_ops);
	361	}
dba051f3 TG	362
dba051f3 TG	363	static void __exit red_module_exit(void)
1da177e4 LT	364	{
	365	unregister_qdisc(&red_qdisc_ops);
	366	}
dba051f3	367
1da177e4 LT	368	module_init(red_module_init)
1da177e4 LT	369	module_exit(red_module_exit)
dba051f3	370
1da177e4	371	MODULE_LICENSE("GPL");