// SPDX-License-Identifier: GPL-2.0
#include <test_progs.h>
#include <network_helpers.h>

void test_skb_ctx(void)
{
	struct __sk_buff skb = {
		.cb[0] = 1,
		.cb[1] = 2,
		.cb[2] = 3,
		.cb[3] = 4,
		.cb[4] = 5,
		.priority = 6,
		.ingress_ifindex = 11,
		.ifindex = 1,
		.tstamp = 7,
		.wire_len = 100,
		.gso_segs = 8,
		.mark = 9,
		.gso_size = 10,
		.hwtstamp = 11,
	};
	LIBBPF_OPTS(bpf_test_run_opts, tattr,
		.data_in = &pkt_v4,
		.data_size_in = sizeof(pkt_v4),
		.ctx_in = &skb,
		.ctx_size_in = sizeof(skb),
		.ctx_out = &skb,
		.ctx_size_out = sizeof(skb),
	);
	struct bpf_object *obj;
	int err, prog_fd, i;

	err = bpf_prog_test_load("./test_skb_ctx.bpf.o", BPF_PROG_TYPE_SCHED_CLS,
				 &obj, &prog_fd);
	if (!ASSERT_OK(err, "load"))
		return;

	/* ctx_in != NULL, ctx_size_in == 0 */

	tattr.ctx_size_in = 0;
	err = bpf_prog_test_run_opts(prog_fd, &tattr);
	ASSERT_NEQ(err, 0, "ctx_size_in");
	tattr.ctx_size_in = sizeof(skb);

	/* ctx_out != NULL, ctx_size_out == 0 */

	tattr.ctx_size_out = 0;
	err = bpf_prog_test_run_opts(prog_fd, &tattr);
	ASSERT_NEQ(err, 0, "ctx_size_out");
	tattr.ctx_size_out = sizeof(skb);

	/* non-zero [len, tc_index] fields should be rejected*/

	skb.len = 1;
	err = bpf_prog_test_run_opts(prog_fd, &tattr);
	ASSERT_NEQ(err, 0, "len");
	skb.len = 0;

	skb.tc_index = 1;
	err = bpf_prog_test_run_opts(prog_fd, &tattr);
	ASSERT_NEQ(err, 0, "tc_index");
	skb.tc_index = 0;

	/* non-zero [hash, sk] fields should be rejected */

	skb.hash = 1;
	err = bpf_prog_test_run_opts(prog_fd, &tattr);
	ASSERT_NEQ(err, 0, "hash");
	skb.hash = 0;

	skb.sk = (struct bpf_sock *)1;
	err = bpf_prog_test_run_opts(prog_fd, &tattr);
	ASSERT_NEQ(err, 0, "sk");
	skb.sk = 0;

	err = bpf_prog_test_run_opts(prog_fd, &tattr);
	ASSERT_OK(err, "test_run");
	ASSERT_OK(tattr.retval, "test_run retval");
	ASSERT_EQ(tattr.ctx_size_out, sizeof(skb), "ctx_size_out");

	for (i = 0; i < 5; i++)
		ASSERT_EQ(skb.cb[i], i + 2, "ctx_out_cb");
	ASSERT_EQ(skb.priority, 7, "ctx_out_priority");
	ASSERT_EQ(skb.ifindex, 1, "ctx_out_ifindex");
	ASSERT_EQ(skb.ingress_ifindex, 11, "ctx_out_ingress_ifindex");
	ASSERT_EQ(skb.tstamp, 8, "ctx_out_tstamp");
	ASSERT_EQ(skb.mark, 10, "ctx_out_mark");

	bpf_object__close(obj);
}