act_gact.c 5.5 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
/*
 * net/sched/gact.c	Generic actions
 *
 *		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.
 *
 * copyright 	Jamal Hadi Salim (2002-4)
 *
 */

#include <linux/types.h>
#include <linux/kernel.h>
#include <linux/string.h>
#include <linux/errno.h>
#include <linux/skbuff.h>
#include <linux/rtnetlink.h>
#include <linux/module.h>
#include <linux/init.h>
21
#include <net/netlink.h>
L
Linus Torvalds 已提交
22 23 24 25
#include <net/pkt_sched.h>
#include <linux/tc_act/tc_gact.h>
#include <net/tc_act/tc_gact.h>

26 27 28
#define GACT_TAB_MASK	15
static struct tcf_common *tcf_gact_ht[GACT_TAB_MASK + 1];
static u32 gact_idx_gen;
L
Linus Torvalds 已提交
29 30
static DEFINE_RWLOCK(gact_lock);

31 32 33 34 35
static struct tcf_hashinfo gact_hash_info = {
	.htab	=	tcf_gact_ht,
	.hmask	=	GACT_TAB_MASK,
	.lock	=	&gact_lock,
};
L
Linus Torvalds 已提交
36 37

#ifdef CONFIG_GACT_PROB
38
static int gact_net_rand(struct tcf_gact *gact)
L
Linus Torvalds 已提交
39
{
40
	if (!gact->tcfg_pval || net_random() % gact->tcfg_pval)
41 42
		return gact->tcf_action;
	return gact->tcfg_paction;
L
Linus Torvalds 已提交
43 44
}

45
static int gact_determ(struct tcf_gact *gact)
L
Linus Torvalds 已提交
46
{
47
	if (!gact->tcfg_pval || gact->tcf_bstats.packets % gact->tcfg_pval)
48 49
		return gact->tcf_action;
	return gact->tcfg_paction;
L
Linus Torvalds 已提交
50 51
}

52
typedef int (*g_rand)(struct tcf_gact *gact);
E
Eric Dumazet 已提交
53
static g_rand gact_rand[MAX_RAND] = { NULL, gact_net_rand, gact_determ };
54
#endif /* CONFIG_GACT_PROB */
L
Linus Torvalds 已提交
55

56 57 58 59 60
static const struct nla_policy gact_policy[TCA_GACT_MAX + 1] = {
	[TCA_GACT_PARMS]	= { .len = sizeof(struct tc_gact) },
	[TCA_GACT_PROB]		= { .len = sizeof(struct tc_gact_p) },
};

61 62 63
static int tcf_gact_init(struct net *net, struct nlattr *nla,
			 struct nlattr *est, struct tc_action *a,
			 int ovr, int bind)
L
Linus Torvalds 已提交
64
{
65
	struct nlattr *tb[TCA_GACT_MAX + 1];
L
Linus Torvalds 已提交
66
	struct tc_gact *parm;
67 68
	struct tcf_gact *gact;
	struct tcf_common *pc;
L
Linus Torvalds 已提交
69
	int ret = 0;
70
	int err;
71 72 73
#ifdef CONFIG_GACT_PROB
	struct tc_gact_p *p_parm = NULL;
#endif
L
Linus Torvalds 已提交
74

75
	if (nla == NULL)
L
Linus Torvalds 已提交
76 77
		return -EINVAL;

78
	err = nla_parse_nested(tb, TCA_GACT_MAX, nla, gact_policy);
79 80 81
	if (err < 0)
		return err;

82
	if (tb[TCA_GACT_PARMS] == NULL)
L
Linus Torvalds 已提交
83
		return -EINVAL;
84
	parm = nla_data(tb[TCA_GACT_PARMS]);
L
Linus Torvalds 已提交
85

86
#ifndef CONFIG_GACT_PROB
87
	if (tb[TCA_GACT_PROB] != NULL)
L
Linus Torvalds 已提交
88
		return -EOPNOTSUPP;
89 90 91 92 93 94
#else
	if (tb[TCA_GACT_PROB]) {
		p_parm = nla_data(tb[TCA_GACT_PROB]);
		if (p_parm->ptype >= MAX_RAND)
			return -EINVAL;
	}
L
Linus Torvalds 已提交
95 96
#endif

97 98 99 100
	pc = tcf_hash_check(parm->index, a, bind, &gact_hash_info);
	if (!pc) {
		pc = tcf_hash_create(parm->index, est, a, sizeof(*gact),
				     bind, &gact_idx_gen, &gact_hash_info);
101
		if (IS_ERR(pc))
E
Eric Dumazet 已提交
102
			return PTR_ERR(pc);
L
Linus Torvalds 已提交
103 104 105
		ret = ACT_P_CREATED;
	} else {
		if (!ovr) {
106
			tcf_hash_release(pc, bind, &gact_hash_info);
L
Linus Torvalds 已提交
107 108 109 110
			return -EEXIST;
		}
	}

111 112 113 114
	gact = to_gact(pc);

	spin_lock_bh(&gact->tcf_lock);
	gact->tcf_action = parm->action;
L
Linus Torvalds 已提交
115
#ifdef CONFIG_GACT_PROB
116
	if (p_parm) {
117 118 119
		gact->tcfg_paction = p_parm->paction;
		gact->tcfg_pval    = p_parm->pval;
		gact->tcfg_ptype   = p_parm->ptype;
L
Linus Torvalds 已提交
120 121
	}
#endif
122
	spin_unlock_bh(&gact->tcf_lock);
L
Linus Torvalds 已提交
123
	if (ret == ACT_P_CREATED)
124
		tcf_hash_insert(pc, &gact_hash_info);
L
Linus Torvalds 已提交
125 126 127
	return ret;
}

128
static int tcf_gact_cleanup(struct tc_action *a, int bind)
L
Linus Torvalds 已提交
129
{
130
	struct tcf_gact *gact = a->priv;
L
Linus Torvalds 已提交
131

132 133
	if (gact)
		return tcf_hash_release(&gact->common, bind, &gact_hash_info);
L
Linus Torvalds 已提交
134 135 136
	return 0;
}

137 138
static int tcf_gact(struct sk_buff *skb, const struct tc_action *a,
		    struct tcf_result *res)
L
Linus Torvalds 已提交
139
{
140
	struct tcf_gact *gact = a->priv;
L
Linus Torvalds 已提交
141 142
	int action = TC_ACT_SHOT;

143
	spin_lock(&gact->tcf_lock);
L
Linus Torvalds 已提交
144
#ifdef CONFIG_GACT_PROB
145
	if (gact->tcfg_ptype)
146
		action = gact_rand[gact->tcfg_ptype](gact);
L
Linus Torvalds 已提交
147
	else
148
		action = gact->tcf_action;
L
Linus Torvalds 已提交
149
#else
150
	action = gact->tcf_action;
L
Linus Torvalds 已提交
151
#endif
152
	gact->tcf_bstats.bytes += qdisc_pkt_len(skb);
153
	gact->tcf_bstats.packets++;
L
Linus Torvalds 已提交
154
	if (action == TC_ACT_SHOT)
155 156 157
		gact->tcf_qstats.drops++;
	gact->tcf_tm.lastuse = jiffies;
	spin_unlock(&gact->tcf_lock);
L
Linus Torvalds 已提交
158 159 160 161

	return action;
}

162
static int tcf_gact_dump(struct sk_buff *skb, struct tc_action *a, int bind, int ref)
L
Linus Torvalds 已提交
163
{
164
	unsigned char *b = skb_tail_pointer(skb);
165
	struct tcf_gact *gact = a->priv;
166 167 168 169 170 171
	struct tc_gact opt = {
		.index   = gact->tcf_index,
		.refcnt  = gact->tcf_refcnt - ref,
		.bindcnt = gact->tcf_bindcnt - bind,
		.action  = gact->tcf_action,
	};
L
Linus Torvalds 已提交
172 173
	struct tcf_t t;

174 175
	if (nla_put(skb, TCA_GACT_PARMS, sizeof(opt), &opt))
		goto nla_put_failure;
L
Linus Torvalds 已提交
176
#ifdef CONFIG_GACT_PROB
177
	if (gact->tcfg_ptype) {
178 179 180 181 182 183
		struct tc_gact_p p_opt = {
			.paction = gact->tcfg_paction,
			.pval    = gact->tcfg_pval,
			.ptype   = gact->tcfg_ptype,
		};

184 185
		if (nla_put(skb, TCA_GACT_PROB, sizeof(p_opt), &p_opt))
			goto nla_put_failure;
L
Linus Torvalds 已提交
186 187
	}
#endif
188 189 190
	t.install = jiffies_to_clock_t(jiffies - gact->tcf_tm.install);
	t.lastuse = jiffies_to_clock_t(jiffies - gact->tcf_tm.lastuse);
	t.expires = jiffies_to_clock_t(gact->tcf_tm.expires);
191 192
	if (nla_put(skb, TCA_GACT_TM, sizeof(t), &t))
		goto nla_put_failure;
L
Linus Torvalds 已提交
193 194
	return skb->len;

195
nla_put_failure:
196
	nlmsg_trim(skb, b);
L
Linus Torvalds 已提交
197 198 199 200 201
	return -1;
}

static struct tc_action_ops act_gact_ops = {
	.kind		=	"gact",
202
	.hinfo		=	&gact_hash_info,
L
Linus Torvalds 已提交
203 204 205 206 207 208 209 210 211 212 213 214 215 216
	.type		=	TCA_ACT_GACT,
	.capab		=	TCA_CAP_NONE,
	.owner		=	THIS_MODULE,
	.act		=	tcf_gact,
	.dump		=	tcf_gact_dump,
	.cleanup	=	tcf_gact_cleanup,
	.init		=	tcf_gact_init,
	.walk		=	tcf_generic_walker
};

MODULE_AUTHOR("Jamal Hadi Salim(2002-4)");
MODULE_DESCRIPTION("Generic Classifier actions");
MODULE_LICENSE("GPL");

217
static int __init gact_init_module(void)
L
Linus Torvalds 已提交
218 219
{
#ifdef CONFIG_GACT_PROB
E
Eric Dumazet 已提交
220
	pr_info("GACT probability on\n");
L
Linus Torvalds 已提交
221
#else
E
Eric Dumazet 已提交
222
	pr_info("GACT probability NOT on\n");
L
Linus Torvalds 已提交
223 224 225 226
#endif
	return tcf_register_action(&act_gact_ops);
}

227
static void __exit gact_cleanup_module(void)
L
Linus Torvalds 已提交
228 229 230 231 232 233
{
	tcf_unregister_action(&act_gact_ops);
}

module_init(gact_init_module);
module_exit(gact_cleanup_module);