[mirror_ubuntu-artful-kernel.git] / net / sched / cls_bpf.c

/*
 * Berkeley Packet Filter based traffic classifier
 *
 * Might be used to classify traffic through flexible, user-defined and
 * possibly JIT-ed BPF filters for traffic control as an alternative to
 * ematches.
 *
 * (C) 2013 Daniel Borkmann <dborkman@redhat.com>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2 as
 * published by the Free Software Foundation.
 */

#include <linux/module.h>
#include <linux/types.h>
#include <linux/skbuff.h>
#include <linux/filter.h>
#include <linux/bpf.h>

#include <net/rtnetlink.h>
#include <net/pkt_cls.h>
#include <net/sock.h>

MODULE_LICENSE("GPL");
MODULE_AUTHOR("Daniel Borkmann <dborkman@redhat.com>");
MODULE_DESCRIPTION("TC BPF based classifier");

#define CLS_BPF_NAME_LEN	256
#define CLS_BPF_SUPPORTED_GEN_FLAGS		\
	(TCA_CLS_FLAGS_SKIP_HW | TCA_CLS_FLAGS_SKIP_SW)

struct cls_bpf_head {
	struct list_head plist;
	u32 hgen;
	struct rcu_head rcu;
};

struct cls_bpf_prog {
	struct bpf_prog *filter;
	struct list_head link;
	struct tcf_result res;
	bool exts_integrated;
	bool offloaded;
	u32 gen_flags;
	struct tcf_exts exts;
	u32 handle;
	u16 bpf_num_ops;
	struct sock_filter *bpf_ops;
	const char *bpf_name;
	struct tcf_proto *tp;
	struct rcu_head rcu;
};

static const struct nla_policy bpf_policy[TCA_BPF_MAX + 1] = {
	[TCA_BPF_CLASSID]	= { .type = NLA_U32 },
	[TCA_BPF_FLAGS]		= { .type = NLA_U32 },
	[TCA_BPF_FLAGS_GEN]	= { .type = NLA_U32 },
	[TCA_BPF_FD]		= { .type = NLA_U32 },
	[TCA_BPF_NAME]		= { .type = NLA_NUL_STRING,
				    .len = CLS_BPF_NAME_LEN },
	[TCA_BPF_OPS_LEN]	= { .type = NLA_U16 },
	[TCA_BPF_OPS]		= { .type = NLA_BINARY,
				    .len = sizeof(struct sock_filter) * BPF_MAXINSNS },
};

static int cls_bpf_exec_opcode(int code)
{
	switch (code) {
	case TC_ACT_OK:
	case TC_ACT_SHOT:
	case TC_ACT_STOLEN:
	case TC_ACT_TRAP:
	case TC_ACT_REDIRECT:
	case TC_ACT_UNSPEC:
		return code;
	default:
		return TC_ACT_UNSPEC;
	}
}

static int cls_bpf_classify(struct sk_buff *skb, const struct tcf_proto *tp,
			    struct tcf_result *res)
{
	struct cls_bpf_head *head = rcu_dereference_bh(tp->root);
	bool at_ingress = skb_at_tc_ingress(skb);
	struct cls_bpf_prog *prog;
	int ret = -1;

	/* Needed here for accessing maps. */
	rcu_read_lock();
	list_for_each_entry_rcu(prog, &head->plist, link) {
		int filter_res;

		qdisc_skb_cb(skb)->tc_classid = prog->res.classid;

		if (tc_skip_sw(prog->gen_flags)) {
			filter_res = prog->exts_integrated ? TC_ACT_UNSPEC : 0;
		} else if (at_ingress) {
			/* It is safe to push/pull even if skb_shared() */
			__skb_push(skb, skb->mac_len);
			bpf_compute_data_end(skb);
			filter_res = BPF_PROG_RUN(prog->filter, skb);
			__skb_pull(skb, skb->mac_len);
		} else {
			bpf_compute_data_end(skb);
			filter_res = BPF_PROG_RUN(prog->filter, skb);
		}

		if (prog->exts_integrated) {
			res->class   = 0;
			res->classid = TC_H_MAJ(prog->res.classid) |
				       qdisc_skb_cb(skb)->tc_classid;

			ret = cls_bpf_exec_opcode(filter_res);
			if (ret == TC_ACT_UNSPEC)
				continue;
			break;
		}

		if (filter_res == 0)
			continue;
		if (filter_res != -1) {
			res->class   = 0;
			res->classid = filter_res;
		} else {
			*res = prog->res;
		}

		ret = tcf_exts_exec(skb, &prog->exts, res);
		if (ret < 0)
			continue;

		break;
	}
	rcu_read_unlock();

	return ret;
}

static bool cls_bpf_is_ebpf(const struct cls_bpf_prog *prog)
{
	return !prog->bpf_ops;
}

static int cls_bpf_offload_cmd(struct tcf_proto *tp, struct cls_bpf_prog *prog,
			       enum tc_clsbpf_command cmd)
{
	struct net_device *dev = tp->q->dev_queue->dev;
	struct tc_cls_bpf_offload bpf_offload = {};
	struct tc_to_netdev offload;
	int err;

	offload.type = TC_SETUP_CLSBPF;
	offload.cls_bpf = &bpf_offload;

	bpf_offload.command = cmd;
	bpf_offload.exts = &prog->exts;
	bpf_offload.prog = prog->filter;
	bpf_offload.name = prog->bpf_name;
	bpf_offload.exts_integrated = prog->exts_integrated;
	bpf_offload.gen_flags = prog->gen_flags;

	err = dev->netdev_ops->ndo_setup_tc(dev, tp->q->handle,
					    tp->chain->index,
					    tp->protocol, &offload);

	if (!err && (cmd == TC_CLSBPF_ADD || cmd == TC_CLSBPF_REPLACE))
		prog->gen_flags |= TCA_CLS_FLAGS_IN_HW;

	return err;
}

static int cls_bpf_offload(struct tcf_proto *tp, struct cls_bpf_prog *prog,
			   struct cls_bpf_prog *oldprog)
{
	struct net_device *dev = tp->q->dev_queue->dev;
	struct cls_bpf_prog *obj = prog;
	enum tc_clsbpf_command cmd;
	bool skip_sw;
	int ret;

	skip_sw = tc_skip_sw(prog->gen_flags) ||
		(oldprog && tc_skip_sw(oldprog->gen_flags));

	if (oldprog && oldprog->offloaded) {
		if (tc_should_offload(dev, tp, prog->gen_flags)) {
			cmd = TC_CLSBPF_REPLACE;
		} else if (!tc_skip_sw(prog->gen_flags)) {
			obj = oldprog;
			cmd = TC_CLSBPF_DESTROY;
		} else {
			return -EINVAL;
		}
	} else {
		if (!tc_should_offload(dev, tp, prog->gen_flags))
			return skip_sw ? -EINVAL : 0;
		cmd = TC_CLSBPF_ADD;
	}

	ret = cls_bpf_offload_cmd(tp, obj, cmd);
	if (ret)
		return skip_sw ? ret : 0;

	obj->offloaded = true;
	if (oldprog)
		oldprog->offloaded = false;

	return 0;
}

static void cls_bpf_stop_offload(struct tcf_proto *tp,
				 struct cls_bpf_prog *prog)
{
	int err;

	if (!prog->offloaded)
		return;

	err = cls_bpf_offload_cmd(tp, prog, TC_CLSBPF_DESTROY);
	if (err) {
		pr_err("Stopping hardware offload failed: %d\n", err);
		return;
	}

	prog->offloaded = false;
}

static void cls_bpf_offload_update_stats(struct tcf_proto *tp,
					 struct cls_bpf_prog *prog)
{
	if (!prog->offloaded)
		return;

	cls_bpf_offload_cmd(tp, prog, TC_CLSBPF_STATS);
}

static int cls_bpf_init(struct tcf_proto *tp)
{
	struct cls_bpf_head *head;

	head = kzalloc(sizeof(*head), GFP_KERNEL);
	if (head == NULL)
		return -ENOBUFS;

	INIT_LIST_HEAD_RCU(&head->plist);
	rcu_assign_pointer(tp->root, head);

	return 0;
}

static void __cls_bpf_delete_prog(struct cls_bpf_prog *prog)
{
	tcf_exts_destroy(&prog->exts);

	if (cls_bpf_is_ebpf(prog))
		bpf_prog_put(prog->filter);
	else
		bpf_prog_destroy(prog->filter);

	kfree(prog->bpf_name);
	kfree(prog->bpf_ops);
	kfree(prog);
}

static void cls_bpf_delete_prog_rcu(struct rcu_head *rcu)
{
	__cls_bpf_delete_prog(container_of(rcu, struct cls_bpf_prog, rcu));
}

static void __cls_bpf_delete(struct tcf_proto *tp, struct cls_bpf_prog *prog)
{
	cls_bpf_stop_offload(tp, prog);
	list_del_rcu(&prog->link);
	tcf_unbind_filter(tp, &prog->res);
	call_rcu(&prog->rcu, cls_bpf_delete_prog_rcu);
}

static int cls_bpf_delete(struct tcf_proto *tp, unsigned long arg, bool *last)
{
	struct cls_bpf_head *head = rtnl_dereference(tp->root);

	__cls_bpf_delete(tp, (struct cls_bpf_prog *) arg);
	*last = list_empty(&head->plist);
	return 0;
}

static void cls_bpf_destroy(struct tcf_proto *tp)
{
	struct cls_bpf_head *head = rtnl_dereference(tp->root);
	struct cls_bpf_prog *prog, *tmp;

	list_for_each_entry_safe(prog, tmp, &head->plist, link)
		__cls_bpf_delete(tp, prog);

	kfree_rcu(head, rcu);
}

static unsigned long cls_bpf_get(struct tcf_proto *tp, u32 handle)
{
	struct cls_bpf_head *head = rtnl_dereference(tp->root);
	struct cls_bpf_prog *prog;
	unsigned long ret = 0UL;

	list_for_each_entry(prog, &head->plist, link) {
		if (prog->handle == handle) {
			ret = (unsigned long) prog;
			break;
		}
	}

	return ret;
}

static int cls_bpf_prog_from_ops(struct nlattr **tb, struct cls_bpf_prog *prog)
{
	struct sock_filter *bpf_ops;
	struct sock_fprog_kern fprog_tmp;
	struct bpf_prog *fp;
	u16 bpf_size, bpf_num_ops;
	int ret;

	bpf_num_ops = nla_get_u16(tb[TCA_BPF_OPS_LEN]);
	if (bpf_num_ops > BPF_MAXINSNS || bpf_num_ops == 0)
		return -EINVAL;

	bpf_size = bpf_num_ops * sizeof(*bpf_ops);
	if (bpf_size != nla_len(tb[TCA_BPF_OPS]))
		return -EINVAL;

	bpf_ops = kzalloc(bpf_size, GFP_KERNEL);
	if (bpf_ops == NULL)
		return -ENOMEM;

	memcpy(bpf_ops, nla_data(tb[TCA_BPF_OPS]), bpf_size);

	fprog_tmp.len = bpf_num_ops;
	fprog_tmp.filter = bpf_ops;

	ret = bpf_prog_create(&fp, &fprog_tmp);
	if (ret < 0) {
		kfree(bpf_ops);
		return ret;
	}

	prog->bpf_ops = bpf_ops;
	prog->bpf_num_ops = bpf_num_ops;
	prog->bpf_name = NULL;
	prog->filter = fp;

	return 0;
}

static int cls_bpf_prog_from_efd(struct nlattr **tb, struct cls_bpf_prog *prog,
				 const struct tcf_proto *tp)
{
	struct bpf_prog *fp;
	char *name = NULL;
	u32 bpf_fd;

	bpf_fd = nla_get_u32(tb[TCA_BPF_FD]);

	fp = bpf_prog_get_type(bpf_fd, BPF_PROG_TYPE_SCHED_CLS);
	if (IS_ERR(fp))
		return PTR_ERR(fp);

	if (tb[TCA_BPF_NAME]) {
		name = nla_memdup(tb[TCA_BPF_NAME], GFP_KERNEL);
		if (!name) {
			bpf_prog_put(fp);
			return -ENOMEM;
		}
	}

	prog->bpf_ops = NULL;
	prog->bpf_name = name;
	prog->filter = fp;

	if (fp->dst_needed && !(tp->q->flags & TCQ_F_INGRESS))
		netif_keep_dst(qdisc_dev(tp->q));

	return 0;
}

static int cls_bpf_modify_existing(struct net *net, struct tcf_proto *tp,
				   struct cls_bpf_prog *prog,
				   unsigned long base, struct nlattr **tb,
				   struct nlattr *est, bool ovr)
{
	bool is_bpf, is_ebpf, have_exts = false;
	struct tcf_exts exts;
	u32 gen_flags = 0;
	int ret;

	is_bpf = tb[TCA_BPF_OPS_LEN] && tb[TCA_BPF_OPS];
	is_ebpf = tb[TCA_BPF_FD];
	if ((!is_bpf && !is_ebpf) || (is_bpf && is_ebpf))
		return -EINVAL;

	ret = tcf_exts_init(&exts, TCA_BPF_ACT, TCA_BPF_POLICE);
	if (ret < 0)
		return ret;
	ret = tcf_exts_validate(net, tp, tb, est, &exts, ovr);
	if (ret < 0)
		goto errout;

	if (tb[TCA_BPF_FLAGS]) {
		u32 bpf_flags = nla_get_u32(tb[TCA_BPF_FLAGS]);

		if (bpf_flags & ~TCA_BPF_FLAG_ACT_DIRECT) {
			ret = -EINVAL;
			goto errout;
		}

		have_exts = bpf_flags & TCA_BPF_FLAG_ACT_DIRECT;
	}
	if (tb[TCA_BPF_FLAGS_GEN]) {
		gen_flags = nla_get_u32(tb[TCA_BPF_FLAGS_GEN]);
		if (gen_flags & ~CLS_BPF_SUPPORTED_GEN_FLAGS ||
		    !tc_flags_valid(gen_flags)) {
			ret = -EINVAL;
			goto errout;
		}
	}

	prog->exts_integrated = have_exts;
	prog->gen_flags = gen_flags;

	ret = is_bpf ? cls_bpf_prog_from_ops(tb, prog) :
		       cls_bpf_prog_from_efd(tb, prog, tp);
	if (ret < 0)
		goto errout;

	if (tb[TCA_BPF_CLASSID]) {
		prog->res.classid = nla_get_u32(tb[TCA_BPF_CLASSID]);
		tcf_bind_filter(tp, &prog->res, base);
	}

	tcf_exts_change(tp, &prog->exts, &exts);
	return 0;

errout:
	tcf_exts_destroy(&exts);
	return ret;
}

static u32 cls_bpf_grab_new_handle(struct tcf_proto *tp,
				   struct cls_bpf_head *head)
{
	unsigned int i = 0x80000000;
	u32 handle;

	do {
		if (++head->hgen == 0x7FFFFFFF)
			head->hgen = 1;
	} while (--i > 0 && cls_bpf_get(tp, head->hgen));

	if (unlikely(i == 0)) {
		pr_err("Insufficient number of handles\n");
		handle = 0;
	} else {
		handle = head->hgen;
	}

	return handle;
}

static int cls_bpf_change(struct net *net, struct sk_buff *in_skb,
			  struct tcf_proto *tp, unsigned long base,
			  u32 handle, struct nlattr **tca,
			  unsigned long *arg, bool ovr)
{
	struct cls_bpf_head *head = rtnl_dereference(tp->root);
	struct cls_bpf_prog *oldprog = (struct cls_bpf_prog *) *arg;
	struct nlattr *tb[TCA_BPF_MAX + 1];
	struct cls_bpf_prog *prog;
	int ret;

	if (tca[TCA_OPTIONS] == NULL)
		return -EINVAL;

	ret = nla_parse_nested(tb, TCA_BPF_MAX, tca[TCA_OPTIONS], bpf_policy,
			       NULL);
	if (ret < 0)
		return ret;

	prog = kzalloc(sizeof(*prog), GFP_KERNEL);
	if (!prog)
		return -ENOBUFS;

	ret = tcf_exts_init(&prog->exts, TCA_BPF_ACT, TCA_BPF_POLICE);
	if (ret < 0)
		goto errout;

	if (oldprog) {
		if (handle && oldprog->handle != handle) {
			ret = -EINVAL;
			goto errout;
		}
	}

	if (handle == 0)
		prog->handle = cls_bpf_grab_new_handle(tp, head);
	else
		prog->handle = handle;
	if (prog->handle == 0) {
		ret = -EINVAL;
		goto errout;
	}

	ret = cls_bpf_modify_existing(net, tp, prog, base, tb, tca[TCA_RATE],
				      ovr);
	if (ret < 0)
		goto errout;

	ret = cls_bpf_offload(tp, prog, oldprog);
	if (ret) {
		__cls_bpf_delete_prog(prog);
		return ret;
	}

	if (!tc_in_hw(prog->gen_flags))
		prog->gen_flags |= TCA_CLS_FLAGS_NOT_IN_HW;

	if (oldprog) {
		list_replace_rcu(&oldprog->link, &prog->link);
		tcf_unbind_filter(tp, &oldprog->res);
		call_rcu(&oldprog->rcu, cls_bpf_delete_prog_rcu);
	} else {
		list_add_rcu(&prog->link, &head->plist);
	}

	*arg = (unsigned long) prog;
	return 0;

errout:
	tcf_exts_destroy(&prog->exts);
	kfree(prog);
	return ret;
}

static int cls_bpf_dump_bpf_info(const struct cls_bpf_prog *prog,
				 struct sk_buff *skb)
{
	struct nlattr *nla;

	if (nla_put_u16(skb, TCA_BPF_OPS_LEN, prog->bpf_num_ops))
		return -EMSGSIZE;

	nla = nla_reserve(skb, TCA_BPF_OPS, prog->bpf_num_ops *
			  sizeof(struct sock_filter));
	if (nla == NULL)
		return -EMSGSIZE;

	memcpy(nla_data(nla), prog->bpf_ops, nla_len(nla));

	return 0;
}

static int cls_bpf_dump_ebpf_info(const struct cls_bpf_prog *prog,
				  struct sk_buff *skb)
{
	struct nlattr *nla;

	if (prog->bpf_name &&
	    nla_put_string(skb, TCA_BPF_NAME, prog->bpf_name))
		return -EMSGSIZE;

	if (nla_put_u32(skb, TCA_BPF_ID, prog->filter->aux->id))
		return -EMSGSIZE;

	nla = nla_reserve(skb, TCA_BPF_TAG, sizeof(prog->filter->tag));
	if (nla == NULL)
		return -EMSGSIZE;

	memcpy(nla_data(nla), prog->filter->tag, nla_len(nla));

	return 0;
}

static int cls_bpf_dump(struct net *net, struct tcf_proto *tp, unsigned long fh,
			struct sk_buff *skb, struct tcmsg *tm)
{
	struct cls_bpf_prog *prog = (struct cls_bpf_prog *) fh;
	struct nlattr *nest;
	u32 bpf_flags = 0;
	int ret;

	if (prog == NULL)
		return skb->len;

	tm->tcm_handle = prog->handle;

	cls_bpf_offload_update_stats(tp, prog);

	nest = nla_nest_start(skb, TCA_OPTIONS);
	if (nest == NULL)
		goto nla_put_failure;

	if (prog->res.classid &&
	    nla_put_u32(skb, TCA_BPF_CLASSID, prog->res.classid))
		goto nla_put_failure;

	if (cls_bpf_is_ebpf(prog))
		ret = cls_bpf_dump_ebpf_info(prog, skb);
	else
		ret = cls_bpf_dump_bpf_info(prog, skb);
	if (ret)
		goto nla_put_failure;

	if (tcf_exts_dump(skb, &prog->exts) < 0)
		goto nla_put_failure;

	if (prog->exts_integrated)
		bpf_flags |= TCA_BPF_FLAG_ACT_DIRECT;
	if (bpf_flags && nla_put_u32(skb, TCA_BPF_FLAGS, bpf_flags))
		goto nla_put_failure;
	if (prog->gen_flags &&
	    nla_put_u32(skb, TCA_BPF_FLAGS_GEN, prog->gen_flags))
		goto nla_put_failure;

	nla_nest_end(skb, nest);

	if (tcf_exts_dump_stats(skb, &prog->exts) < 0)
		goto nla_put_failure;

	return skb->len;

nla_put_failure:
	nla_nest_cancel(skb, nest);
	return -1;
}

static void cls_bpf_walk(struct tcf_proto *tp, struct tcf_walker *arg)
{
	struct cls_bpf_head *head = rtnl_dereference(tp->root);
	struct cls_bpf_prog *prog;

	list_for_each_entry(prog, &head->plist, link) {
		if (arg->count < arg->skip)
			goto skip;
		if (arg->fn(tp, (unsigned long) prog, arg) < 0) {
			arg->stop = 1;
			break;
		}
skip:
		arg->count++;
	}
}

static struct tcf_proto_ops cls_bpf_ops __read_mostly = {
	.kind		=	"bpf",
	.owner		=	THIS_MODULE,
	.classify	=	cls_bpf_classify,
	.init		=	cls_bpf_init,
	.destroy	=	cls_bpf_destroy,
	.get		=	cls_bpf_get,
	.change		=	cls_bpf_change,
	.delete		=	cls_bpf_delete,
	.walk		=	cls_bpf_walk,
	.dump		=	cls_bpf_dump,
};

static int __init cls_bpf_init_mod(void)
{
	return register_tcf_proto_ops(&cls_bpf_ops);
}

static void __exit cls_bpf_exit_mod(void)
{
	unregister_tcf_proto_ops(&cls_bpf_ops);
}

module_init(cls_bpf_init_mod);
module_exit(cls_bpf_exit_mod);
Commit	Line	Data
7d1d65cb DB	1	/*
	2	* Berkeley Packet Filter based traffic classifier
	3	*
	4	* Might be used to classify traffic through flexible, user-defined and
	5	* possibly JIT-ed BPF filters for traffic control as an alternative to
	6	* ematches.
	7	*
	8	* (C) 2013 Daniel Borkmann <dborkman@redhat.com>
	9	*
	10	* This program is free software; you can redistribute it and/or modify
	11	* it under the terms of the GNU General Public License version 2 as
	12	* published by the Free Software Foundation.
	13	*/
	14
	15	#include <linux/module.h>
	16	#include <linux/types.h>
	17	#include <linux/skbuff.h>
	18	#include <linux/filter.h>
e2e9b654 DB	19	#include <linux/bpf.h>
e2e9b654 DB	20
7d1d65cb DB	21	#include <net/rtnetlink.h>
	22	#include <net/pkt_cls.h>
	23	#include <net/sock.h>
	24
	25	MODULE_LICENSE("GPL");
	26	MODULE_AUTHOR("Daniel Borkmann <dborkman@redhat.com>");
	27	MODULE_DESCRIPTION("TC BPF based classifier");
	28
e2e9b654	29	#define CLS_BPF_NAME_LEN 256
0d01d45f	30	#define CLS_BPF_SUPPORTED_GEN_FLAGS \
eadb4148	31	(TCA_CLS_FLAGS_SKIP_HW \| TCA_CLS_FLAGS_SKIP_SW)
e2e9b654	32
7d1d65cb DB	33	struct cls_bpf_head {
	34	struct list_head plist;
	35	u32 hgen;
1f947bf1	36	struct rcu_head rcu;
7d1d65cb DB	37	};
	38
	39	struct cls_bpf_prog {
7ae457c1	40	struct bpf_prog *filter;
7d1d65cb	41	struct list_head link;
e2e9b654	42	struct tcf_result res;
045efa82	43	bool exts_integrated;
332ae8e2	44	bool offloaded;
0d01d45f	45	u32 gen_flags;
e2e9b654	46	struct tcf_exts exts;
7d1d65cb	47	u32 handle;
55556dd5	48	u16 bpf_num_ops;
e2e9b654 DB	49	struct sock_filter *bpf_ops;
e2e9b654 DB	50	const char *bpf_name;
1f947bf1 JF	51	struct tcf_proto *tp;
1f947bf1 JF	52	struct rcu_head rcu;
7d1d65cb DB	53	};
	54
	55	static const struct nla_policy bpf_policy[TCA_BPF_MAX + 1] = {
	56	[TCA_BPF_CLASSID] = { .type = NLA_U32 },
045efa82	57	[TCA_BPF_FLAGS] = { .type = NLA_U32 },
0d01d45f	58	[TCA_BPF_FLAGS_GEN] = { .type = NLA_U32 },
e2e9b654	59	[TCA_BPF_FD] = { .type = NLA_U32 },
5a7a5555 JHS	60	[TCA_BPF_NAME] = { .type = NLA_NUL_STRING,
5a7a5555 JHS	61	.len = CLS_BPF_NAME_LEN },
7d1d65cb DB	62	[TCA_BPF_OPS_LEN] = { .type = NLA_U16 },
	63	[TCA_BPF_OPS] = { .type = NLA_BINARY,
	64	.len = sizeof(struct sock_filter) * BPF_MAXINSNS },
	65	};
	66
045efa82 DB	67	static int cls_bpf_exec_opcode(int code)
	68	{
	69	switch (code) {
	70	case TC_ACT_OK:
045efa82	71	case TC_ACT_SHOT:
045efa82	72	case TC_ACT_STOLEN:
e25ea21f	73	case TC_ACT_TRAP:
27b29f63	74	case TC_ACT_REDIRECT:
045efa82 DB	75	case TC_ACT_UNSPEC:
	76	return code;
	77	default:
	78	return TC_ACT_UNSPEC;
	79	}
	80	}
	81
7d1d65cb DB	82	static int cls_bpf_classify(struct sk_buff skb, const struct tcf_proto tp,
	83	struct tcf_result *res)
	84	{
80dcbd12	85	struct cls_bpf_head *head = rcu_dereference_bh(tp->root);
fdc5432a	86	bool at_ingress = skb_at_tc_ingress(skb);
7d1d65cb	87	struct cls_bpf_prog *prog;
54720df1	88	int ret = -1;
7d1d65cb	89
54720df1 DB	90	/* Needed here for accessing maps. */
54720df1 DB	91	rcu_read_lock();
1f947bf1	92	list_for_each_entry_rcu(prog, &head->plist, link) {
3431205e AS	93	int filter_res;
3431205e AS	94
045efa82 DB	95	qdisc_skb_cb(skb)->tc_classid = prog->res.classid;
045efa82 DB	96
eadb4148 JK	97	if (tc_skip_sw(prog->gen_flags)) {
	98	filter_res = prog->exts_integrated ? TC_ACT_UNSPEC : 0;
	99	} else if (at_ingress) {
3431205e AS	100	/* It is safe to push/pull even if skb_shared() */
3431205e AS	101	__skb_push(skb, skb->mac_len);
db58ba45	102	bpf_compute_data_end(skb);
3431205e AS	103	filter_res = BPF_PROG_RUN(prog->filter, skb);
	104	__skb_pull(skb, skb->mac_len);
	105	} else {
db58ba45	106	bpf_compute_data_end(skb);
3431205e AS	107	filter_res = BPF_PROG_RUN(prog->filter, skb);
3431205e AS	108	}
7d1d65cb	109
045efa82	110	if (prog->exts_integrated) {
3a461da1 DB	111	res->class = 0;
	112	res->classid = TC_H_MAJ(prog->res.classid) \|
	113	qdisc_skb_cb(skb)->tc_classid;
045efa82 DB	114
	115	ret = cls_bpf_exec_opcode(filter_res);
	116	if (ret == TC_ACT_UNSPEC)
	117	continue;
	118	break;
	119	}
	120
7d1d65cb DB	121	if (filter_res == 0)
7d1d65cb DB	122	continue;
3a461da1 DB	123	if (filter_res != -1) {
3a461da1 DB	124	res->class = 0;
7d1d65cb	125	res->classid = filter_res;
3a461da1 DB	126	} else {
	127	*res = prog->res;
	128	}
7d1d65cb DB	129
	130	ret = tcf_exts_exec(skb, &prog->exts, res);
	131	if (ret < 0)
	132	continue;
	133
54720df1	134	break;
7d1d65cb	135	}
54720df1	136	rcu_read_unlock();
7d1d65cb	137
54720df1	138	return ret;
7d1d65cb DB	139	}
7d1d65cb DB	140
e2e9b654 DB	141	static bool cls_bpf_is_ebpf(const struct cls_bpf_prog *prog)
	142	{
	143	return !prog->bpf_ops;
	144	}
	145
332ae8e2 JK	146	static int cls_bpf_offload_cmd(struct tcf_proto tp, struct cls_bpf_prog prog,
	147	enum tc_clsbpf_command cmd)
	148	{
	149	struct net_device *dev = tp->q->dev_queue->dev;
	150	struct tc_cls_bpf_offload bpf_offload = {};
	151	struct tc_to_netdev offload;
5cecb6cc	152	int err;
332ae8e2 JK	153
	154	offload.type = TC_SETUP_CLSBPF;
	155	offload.cls_bpf = &bpf_offload;
	156
	157	bpf_offload.command = cmd;
	158	bpf_offload.exts = &prog->exts;
	159	bpf_offload.prog = prog->filter;
	160	bpf_offload.name = prog->bpf_name;
	161	bpf_offload.exts_integrated = prog->exts_integrated;
0d01d45f	162	bpf_offload.gen_flags = prog->gen_flags;
332ae8e2	163
5cecb6cc	164	err = dev->netdev_ops->ndo_setup_tc(dev, tp->q->handle,
a5fcf8a6	165	tp->chain->index,
5cecb6cc OG	166	tp->protocol, &offload);
	167
	168	if (!err && (cmd == TC_CLSBPF_ADD \|\| cmd == TC_CLSBPF_REPLACE))
	169	prog->gen_flags \|= TCA_CLS_FLAGS_IN_HW;
	170
	171	return err;
332ae8e2 JK	172	}
332ae8e2 JK	173
eadb4148 JK	174	static int cls_bpf_offload(struct tcf_proto tp, struct cls_bpf_prog prog,
eadb4148 JK	175	struct cls_bpf_prog *oldprog)
332ae8e2 JK	176	{
	177	struct net_device *dev = tp->q->dev_queue->dev;
	178	struct cls_bpf_prog *obj = prog;
	179	enum tc_clsbpf_command cmd;
eadb4148 JK	180	bool skip_sw;
	181	int ret;
	182
	183	skip_sw = tc_skip_sw(prog->gen_flags) \|\|
	184	(oldprog && tc_skip_sw(oldprog->gen_flags));
332ae8e2 JK	185
332ae8e2 JK	186	if (oldprog && oldprog->offloaded) {
0d01d45f	187	if (tc_should_offload(dev, tp, prog->gen_flags)) {
332ae8e2	188	cmd = TC_CLSBPF_REPLACE;
eadb4148	189	} else if (!tc_skip_sw(prog->gen_flags)) {
332ae8e2 JK	190	obj = oldprog;
332ae8e2 JK	191	cmd = TC_CLSBPF_DESTROY;
eadb4148 JK	192	} else {
eadb4148 JK	193	return -EINVAL;
332ae8e2 JK	194	}
332ae8e2 JK	195	} else {
0d01d45f	196	if (!tc_should_offload(dev, tp, prog->gen_flags))
eadb4148	197	return skip_sw ? -EINVAL : 0;
332ae8e2 JK	198	cmd = TC_CLSBPF_ADD;
	199	}
	200
eadb4148 JK	201	ret = cls_bpf_offload_cmd(tp, obj, cmd);
	202	if (ret)
	203	return skip_sw ? ret : 0;
332ae8e2 JK	204
	205	obj->offloaded = true;
	206	if (oldprog)
	207	oldprog->offloaded = false;
eadb4148 JK	208
eadb4148 JK	209	return 0;
332ae8e2 JK	210	}
	211
	212	static void cls_bpf_stop_offload(struct tcf_proto *tp,
	213	struct cls_bpf_prog *prog)
	214	{
	215	int err;
	216
	217	if (!prog->offloaded)
	218	return;
	219
	220	err = cls_bpf_offload_cmd(tp, prog, TC_CLSBPF_DESTROY);
	221	if (err) {
	222	pr_err("Stopping hardware offload failed: %d\n", err);
	223	return;
	224	}
	225
	226	prog->offloaded = false;
	227	}
	228
68d64063 JK	229	static void cls_bpf_offload_update_stats(struct tcf_proto *tp,
	230	struct cls_bpf_prog *prog)
	231	{
	232	if (!prog->offloaded)
	233	return;
	234
	235	cls_bpf_offload_cmd(tp, prog, TC_CLSBPF_STATS);
	236	}
	237
7d1d65cb DB	238	static int cls_bpf_init(struct tcf_proto *tp)
	239	{
	240	struct cls_bpf_head *head;
	241
	242	head = kzalloc(sizeof(*head), GFP_KERNEL);
	243	if (head == NULL)
	244	return -ENOBUFS;
	245
1f947bf1 JF	246	INIT_LIST_HEAD_RCU(&head->plist);
1f947bf1 JF	247	rcu_assign_pointer(tp->root, head);
7d1d65cb DB	248
	249	return 0;
	250	}
	251
8d829bdb	252	static void __cls_bpf_delete_prog(struct cls_bpf_prog *prog)
7d1d65cb	253	{
18d0264f	254	tcf_exts_destroy(&prog->exts);
7d1d65cb	255
e2e9b654 DB	256	if (cls_bpf_is_ebpf(prog))
	257	bpf_prog_put(prog->filter);
	258	else
	259	bpf_prog_destroy(prog->filter);
7d1d65cb	260
e2e9b654	261	kfree(prog->bpf_name);
7d1d65cb DB	262	kfree(prog->bpf_ops);
	263	kfree(prog);
	264	}
	265
8d829bdb	266	static void cls_bpf_delete_prog_rcu(struct rcu_head *rcu)
1f947bf1	267	{
8d829bdb	268	__cls_bpf_delete_prog(container_of(rcu, struct cls_bpf_prog, rcu));
1f947bf1 JF	269	}
1f947bf1 JF	270
8d829bdb	271	static void __cls_bpf_delete(struct tcf_proto tp, struct cls_bpf_prog prog)
7d1d65cb	272	{
332ae8e2	273	cls_bpf_stop_offload(tp, prog);
472f5837 JP	274	list_del_rcu(&prog->link);
472f5837 JP	275	tcf_unbind_filter(tp, &prog->res);
8d829bdb DB	276	call_rcu(&prog->rcu, cls_bpf_delete_prog_rcu);
8d829bdb DB	277	}
e2e9b654	278
763dbf63	279	static int cls_bpf_delete(struct tcf_proto tp, unsigned long arg, bool last)
8d829bdb	280	{
763dbf63 WC	281	struct cls_bpf_head *head = rtnl_dereference(tp->root);
763dbf63 WC	282
8d829bdb	283	__cls_bpf_delete(tp, (struct cls_bpf_prog *) arg);
763dbf63	284	*last = list_empty(&head->plist);
472f5837	285	return 0;
7d1d65cb DB	286	}
7d1d65cb DB	287
763dbf63	288	static void cls_bpf_destroy(struct tcf_proto *tp)
7d1d65cb	289	{
1f947bf1	290	struct cls_bpf_head *head = rtnl_dereference(tp->root);
7d1d65cb DB	291	struct cls_bpf_prog prog, tmp;
7d1d65cb DB	292
8d829bdb DB	293	list_for_each_entry_safe(prog, tmp, &head->plist, link)
8d829bdb DB	294	__cls_bpf_delete(tp, prog);
7d1d65cb	295
1f947bf1	296	kfree_rcu(head, rcu);
7d1d65cb DB	297	}
	298
	299	static unsigned long cls_bpf_get(struct tcf_proto *tp, u32 handle)
	300	{
1f947bf1	301	struct cls_bpf_head *head = rtnl_dereference(tp->root);
7d1d65cb DB	302	struct cls_bpf_prog *prog;
	303	unsigned long ret = 0UL;
	304
3fe6b49e	305	list_for_each_entry(prog, &head->plist, link) {
7d1d65cb DB	306	if (prog->handle == handle) {
	307	ret = (unsigned long) prog;
	308	break;
	309	}
	310	}
	311
	312	return ret;
	313	}
	314
045efa82	315	static int cls_bpf_prog_from_ops(struct nlattr *tb, struct cls_bpf_prog prog)
7d1d65cb	316	{
1f947bf1	317	struct sock_filter *bpf_ops;
e2e9b654	318	struct sock_fprog_kern fprog_tmp;
1f947bf1	319	struct bpf_prog *fp;
33e9fcc6	320	u16 bpf_size, bpf_num_ops;
7d1d65cb DB	321	int ret;
7d1d65cb DB	322
33e9fcc6	323	bpf_num_ops = nla_get_u16(tb[TCA_BPF_OPS_LEN]);
e2e9b654 DB	324	if (bpf_num_ops > BPF_MAXINSNS \|\| bpf_num_ops == 0)
e2e9b654 DB	325	return -EINVAL;
7d1d65cb	326
33e9fcc6	327	bpf_size = bpf_num_ops * sizeof(*bpf_ops);
e2e9b654 DB	328	if (bpf_size != nla_len(tb[TCA_BPF_OPS]))
e2e9b654 DB	329	return -EINVAL;
7913ecf6	330
7d1d65cb	331	bpf_ops = kzalloc(bpf_size, GFP_KERNEL);
e2e9b654 DB	332	if (bpf_ops == NULL)
e2e9b654 DB	333	return -ENOMEM;
7d1d65cb DB	334
	335	memcpy(bpf_ops, nla_data(tb[TCA_BPF_OPS]), bpf_size);
	336
e2e9b654 DB	337	fprog_tmp.len = bpf_num_ops;
e2e9b654 DB	338	fprog_tmp.filter = bpf_ops;
7d1d65cb	339
e2e9b654 DB	340	ret = bpf_prog_create(&fp, &fprog_tmp);
	341	if (ret < 0) {
	342	kfree(bpf_ops);
	343	return ret;
	344	}
7d1d65cb	345
7d1d65cb	346	prog->bpf_ops = bpf_ops;
e2e9b654 DB	347	prog->bpf_num_ops = bpf_num_ops;
e2e9b654 DB	348	prog->bpf_name = NULL;
7d1d65cb	349	prog->filter = fp;
7d1d65cb	350
e2e9b654 DB	351	return 0;
	352	}
	353
c46646d0 DB	354	static int cls_bpf_prog_from_efd(struct nlattr *tb, struct cls_bpf_prog prog,
c46646d0 DB	355	const struct tcf_proto *tp)
e2e9b654 DB	356	{
	357	struct bpf_prog *fp;
	358	char *name = NULL;
	359	u32 bpf_fd;
	360
	361	bpf_fd = nla_get_u32(tb[TCA_BPF_FD]);
	362
113214be	363	fp = bpf_prog_get_type(bpf_fd, BPF_PROG_TYPE_SCHED_CLS);
e2e9b654 DB	364	if (IS_ERR(fp))
	365	return PTR_ERR(fp);
	366
e2e9b654	367	if (tb[TCA_BPF_NAME]) {
b15ca182	368	name = nla_memdup(tb[TCA_BPF_NAME], GFP_KERNEL);
e2e9b654 DB	369	if (!name) {
	370	bpf_prog_put(fp);
	371	return -ENOMEM;
	372	}
	373	}
	374
	375	prog->bpf_ops = NULL;
e2e9b654	376	prog->bpf_name = name;
e2e9b654	377	prog->filter = fp;
e2e9b654	378
1f211a1b	379	if (fp->dst_needed && !(tp->q->flags & TCQ_F_INGRESS))
c46646d0 DB	380	netif_keep_dst(qdisc_dev(tp->q));
c46646d0 DB	381
e2e9b654 DB	382	return 0;
	383	}
	384
	385	static int cls_bpf_modify_existing(struct net net, struct tcf_proto tp,
	386	struct cls_bpf_prog *prog,
	387	unsigned long base, struct nlattr **tb,
	388	struct nlattr *est, bool ovr)
	389	{
045efa82	390	bool is_bpf, is_ebpf, have_exts = false;
e2e9b654	391	struct tcf_exts exts;
0d01d45f	392	u32 gen_flags = 0;
e2e9b654 DB	393	int ret;
	394
	395	is_bpf = tb[TCA_BPF_OPS_LEN] && tb[TCA_BPF_OPS];
	396	is_ebpf = tb[TCA_BPF_FD];
ef146fa4	397	if ((!is_bpf && !is_ebpf) \|\| (is_bpf && is_ebpf))
e2e9b654 DB	398	return -EINVAL;
e2e9b654 DB	399
b9a24bb7	400	ret = tcf_exts_init(&exts, TCA_BPF_ACT, TCA_BPF_POLICE);
e2e9b654 DB	401	if (ret < 0)
e2e9b654 DB	402	return ret;
b9a24bb7 WC	403	ret = tcf_exts_validate(net, tp, tb, est, &exts, ovr);
	404	if (ret < 0)
	405	goto errout;
e2e9b654	406
045efa82 DB	407	if (tb[TCA_BPF_FLAGS]) {
	408	u32 bpf_flags = nla_get_u32(tb[TCA_BPF_FLAGS]);
	409
	410	if (bpf_flags & ~TCA_BPF_FLAG_ACT_DIRECT) {
b9a24bb7 WC	411	ret = -EINVAL;
b9a24bb7 WC	412	goto errout;
045efa82 DB	413	}
	414
	415	have_exts = bpf_flags & TCA_BPF_FLAG_ACT_DIRECT;
	416	}
0d01d45f JK	417	if (tb[TCA_BPF_FLAGS_GEN]) {
	418	gen_flags = nla_get_u32(tb[TCA_BPF_FLAGS_GEN]);
	419	if (gen_flags & ~CLS_BPF_SUPPORTED_GEN_FLAGS \|\|
	420	!tc_flags_valid(gen_flags)) {
	421	ret = -EINVAL;
	422	goto errout;
	423	}
	424	}
045efa82	425
045efa82	426	prog->exts_integrated = have_exts;
0d01d45f	427	prog->gen_flags = gen_flags;
e2e9b654	428
045efa82	429	ret = is_bpf ? cls_bpf_prog_from_ops(tb, prog) :
c46646d0	430	cls_bpf_prog_from_efd(tb, prog, tp);
b9a24bb7 WC	431	if (ret < 0)
b9a24bb7 WC	432	goto errout;
e2e9b654	433
ef146fa4 DB	434	if (tb[TCA_BPF_CLASSID]) {
	435	prog->res.classid = nla_get_u32(tb[TCA_BPF_CLASSID]);
	436	tcf_bind_filter(tp, &prog->res, base);
	437	}
7d1d65cb	438
ef146fa4	439	tcf_exts_change(tp, &prog->exts, &exts);
7d1d65cb	440	return 0;
b9a24bb7 WC	441
	442	errout:
	443	tcf_exts_destroy(&exts);
	444	return ret;
7d1d65cb DB	445	}
	446
	447	static u32 cls_bpf_grab_new_handle(struct tcf_proto *tp,
	448	struct cls_bpf_head *head)
	449	{
	450	unsigned int i = 0x80000000;
3f2ab135	451	u32 handle;
7d1d65cb DB	452
	453	do {
	454	if (++head->hgen == 0x7FFFFFFF)
	455	head->hgen = 1;
	456	} while (--i > 0 && cls_bpf_get(tp, head->hgen));
3f2ab135 DB	457
3f2ab135 DB	458	if (unlikely(i == 0)) {
7d1d65cb	459	pr_err("Insufficient number of handles\n");
3f2ab135 DB	460	handle = 0;
	461	} else {
	462	handle = head->hgen;
	463	}
7d1d65cb	464
3f2ab135	465	return handle;
7d1d65cb DB	466	}
	467
	468	static int cls_bpf_change(struct net net, struct sk_buff in_skb,
	469	struct tcf_proto *tp, unsigned long base,
	470	u32 handle, struct nlattr **tca,
2f7ef2f8	471	unsigned long *arg, bool ovr)
7d1d65cb	472	{
1f947bf1 JF	473	struct cls_bpf_head *head = rtnl_dereference(tp->root);
1f947bf1 JF	474	struct cls_bpf_prog oldprog = (struct cls_bpf_prog ) *arg;
7d1d65cb	475	struct nlattr *tb[TCA_BPF_MAX + 1];
1f947bf1	476	struct cls_bpf_prog *prog;
7d1d65cb DB	477	int ret;
	478
	479	if (tca[TCA_OPTIONS] == NULL)
	480	return -EINVAL;
	481
fceb6435 JB	482	ret = nla_parse_nested(tb, TCA_BPF_MAX, tca[TCA_OPTIONS], bpf_policy,
fceb6435 JB	483	NULL);
7d1d65cb DB	484	if (ret < 0)
	485	return ret;
	486
7d1d65cb	487	prog = kzalloc(sizeof(*prog), GFP_KERNEL);
1f947bf1	488	if (!prog)
7d1d65cb DB	489	return -ENOBUFS;
7d1d65cb DB	490
b9a24bb7 WC	491	ret = tcf_exts_init(&prog->exts, TCA_BPF_ACT, TCA_BPF_POLICE);
	492	if (ret < 0)
	493	goto errout;
1f947bf1 JF	494
	495	if (oldprog) {
	496	if (handle && oldprog->handle != handle) {
	497	ret = -EINVAL;
	498	goto errout;
	499	}
	500	}
	501
7d1d65cb DB	502	if (handle == 0)
	503	prog->handle = cls_bpf_grab_new_handle(tp, head);
	504	else
	505	prog->handle = handle;
	506	if (prog->handle == 0) {
	507	ret = -EINVAL;
	508	goto errout;
	509	}
	510
5a7a5555 JHS	511	ret = cls_bpf_modify_existing(net, tp, prog, base, tb, tca[TCA_RATE],
5a7a5555 JHS	512	ovr);
7d1d65cb DB	513	if (ret < 0)
	514	goto errout;
	515
eadb4148 JK	516	ret = cls_bpf_offload(tp, prog, oldprog);
eadb4148 JK	517	if (ret) {
8d829bdb	518	__cls_bpf_delete_prog(prog);
eadb4148 JK	519	return ret;
eadb4148 JK	520	}
332ae8e2	521
5cecb6cc OG	522	if (!tc_in_hw(prog->gen_flags))
	523	prog->gen_flags \|= TCA_CLS_FLAGS_NOT_IN_HW;
	524
1f947bf1	525	if (oldprog) {
f6bfc46d	526	list_replace_rcu(&oldprog->link, &prog->link);
18cdb37e	527	tcf_unbind_filter(tp, &oldprog->res);
8d829bdb	528	call_rcu(&oldprog->rcu, cls_bpf_delete_prog_rcu);
1f947bf1 JF	529	} else {
	530	list_add_rcu(&prog->link, &head->plist);
	531	}
7d1d65cb DB	532
7d1d65cb DB	533	*arg = (unsigned long) prog;
7d1d65cb	534	return 0;
b9a24bb7	535
7d1d65cb	536	errout:
b9a24bb7	537	tcf_exts_destroy(&prog->exts);
1f947bf1	538	kfree(prog);
7d1d65cb DB	539	return ret;
	540	}
	541
e2e9b654 DB	542	static int cls_bpf_dump_bpf_info(const struct cls_bpf_prog *prog,
	543	struct sk_buff *skb)
	544	{
	545	struct nlattr *nla;
	546
	547	if (nla_put_u16(skb, TCA_BPF_OPS_LEN, prog->bpf_num_ops))
	548	return -EMSGSIZE;
	549
	550	nla = nla_reserve(skb, TCA_BPF_OPS, prog->bpf_num_ops *
	551	sizeof(struct sock_filter));
	552	if (nla == NULL)
	553	return -EMSGSIZE;
	554
	555	memcpy(nla_data(nla), prog->bpf_ops, nla_len(nla));
	556
	557	return 0;
	558	}
	559
	560	static int cls_bpf_dump_ebpf_info(const struct cls_bpf_prog *prog,
	561	struct sk_buff *skb)
	562	{
7bd509e3 DB	563	struct nlattr *nla;
7bd509e3 DB	564
e2e9b654 DB	565	if (prog->bpf_name &&
	566	nla_put_string(skb, TCA_BPF_NAME, prog->bpf_name))
	567	return -EMSGSIZE;
	568
e8628307 DB	569	if (nla_put_u32(skb, TCA_BPF_ID, prog->filter->aux->id))
	570	return -EMSGSIZE;
	571
f1f7714e	572	nla = nla_reserve(skb, TCA_BPF_TAG, sizeof(prog->filter->tag));
7bd509e3 DB	573	if (nla == NULL)
	574	return -EMSGSIZE;
	575
f1f7714e	576	memcpy(nla_data(nla), prog->filter->tag, nla_len(nla));
7bd509e3	577
e2e9b654 DB	578	return 0;
	579	}
	580
832d1d5b	581	static int cls_bpf_dump(struct net net, struct tcf_proto tp, unsigned long fh,
7d1d65cb DB	582	struct sk_buff skb, struct tcmsg tm)
	583	{
	584	struct cls_bpf_prog prog = (struct cls_bpf_prog ) fh;
e2e9b654	585	struct nlattr *nest;
bf007d1c	586	u32 bpf_flags = 0;
e2e9b654	587	int ret;
7d1d65cb DB	588
	589	if (prog == NULL)
	590	return skb->len;
	591
	592	tm->tcm_handle = prog->handle;
	593
68d64063 JK	594	cls_bpf_offload_update_stats(tp, prog);
68d64063 JK	595
7d1d65cb DB	596	nest = nla_nest_start(skb, TCA_OPTIONS);
	597	if (nest == NULL)
	598	goto nla_put_failure;
	599
ef146fa4 DB	600	if (prog->res.classid &&
ef146fa4 DB	601	nla_put_u32(skb, TCA_BPF_CLASSID, prog->res.classid))
7d1d65cb	602	goto nla_put_failure;
7d1d65cb	603
e2e9b654 DB	604	if (cls_bpf_is_ebpf(prog))
	605	ret = cls_bpf_dump_ebpf_info(prog, skb);
	606	else
	607	ret = cls_bpf_dump_bpf_info(prog, skb);
	608	if (ret)
7d1d65cb DB	609	goto nla_put_failure;
7d1d65cb DB	610
5da57f42	611	if (tcf_exts_dump(skb, &prog->exts) < 0)
7d1d65cb DB	612	goto nla_put_failure;
7d1d65cb DB	613
bf007d1c DB	614	if (prog->exts_integrated)
	615	bpf_flags \|= TCA_BPF_FLAG_ACT_DIRECT;
	616	if (bpf_flags && nla_put_u32(skb, TCA_BPF_FLAGS, bpf_flags))
	617	goto nla_put_failure;
0d01d45f JK	618	if (prog->gen_flags &&
	619	nla_put_u32(skb, TCA_BPF_FLAGS_GEN, prog->gen_flags))
	620	goto nla_put_failure;
bf007d1c	621
7d1d65cb DB	622	nla_nest_end(skb, nest);
7d1d65cb DB	623
5da57f42	624	if (tcf_exts_dump_stats(skb, &prog->exts) < 0)
7d1d65cb DB	625	goto nla_put_failure;
	626
	627	return skb->len;
	628
	629	nla_put_failure:
	630	nla_nest_cancel(skb, nest);
	631	return -1;
	632	}
	633
	634	static void cls_bpf_walk(struct tcf_proto tp, struct tcf_walker arg)
	635	{
1f947bf1	636	struct cls_bpf_head *head = rtnl_dereference(tp->root);
7d1d65cb DB	637	struct cls_bpf_prog *prog;
7d1d65cb DB	638
3fe6b49e	639	list_for_each_entry(prog, &head->plist, link) {
7d1d65cb DB	640	if (arg->count < arg->skip)
	641	goto skip;
	642	if (arg->fn(tp, (unsigned long) prog, arg) < 0) {
	643	arg->stop = 1;
	644	break;
	645	}
	646	skip:
	647	arg->count++;
	648	}
	649	}
	650
	651	static struct tcf_proto_ops cls_bpf_ops __read_mostly = {
	652	.kind = "bpf",
	653	.owner = THIS_MODULE,
	654	.classify = cls_bpf_classify,
	655	.init = cls_bpf_init,
	656	.destroy = cls_bpf_destroy,
	657	.get = cls_bpf_get,
7d1d65cb DB	658	.change = cls_bpf_change,
	659	.delete = cls_bpf_delete,
	660	.walk = cls_bpf_walk,
	661	.dump = cls_bpf_dump,
	662	};
	663
	664	static int __init cls_bpf_init_mod(void)
	665	{
	666	return register_tcf_proto_ops(&cls_bpf_ops);
	667	}
	668
	669	static void __exit cls_bpf_exit_mod(void)
	670	{
	671	unregister_tcf_proto_ops(&cls_bpf_ops);
	672	}
	673
	674	module_init(cls_bpf_init_mod);
	675	module_exit(cls_bpf_exit_mod);