// SPDX-License-Identifier: GPL-2.0
/* Copyright (c) 2020, Tessares SA. */
/* Copyright (c) 2022, SUSE. */

#include <linux/bpf.h>
#include <bpf/bpf_helpers.h>
#include "bpf_tcp_helpers.h"

char _license[] SEC("license") = "GPL";
__u32 token = 0;

struct mptcp_storage {
	__u32 invoked;
	__u32 is_mptcp;
	struct sock *sk;
	__u32 token;
	struct sock *first;
	char ca_name[TCP_CA_NAME_MAX];
};

struct {
	__uint(type, BPF_MAP_TYPE_SK_STORAGE);
	__uint(map_flags, BPF_F_NO_PREALLOC);
	__type(key, int);
	__type(value, struct mptcp_storage);
} socket_storage_map SEC(".maps");

SEC("sockops")
int _sockops(struct bpf_sock_ops *ctx)
{
	struct mptcp_storage *storage;
	struct mptcp_sock *msk;
	int op = (int)ctx->op;
	struct tcp_sock *tsk;
	struct bpf_sock *sk;
	bool is_mptcp;

	if (op != BPF_SOCK_OPS_TCP_CONNECT_CB)
		return 1;

	sk = ctx->sk;
	if (!sk)
		return 1;

	tsk = bpf_skc_to_tcp_sock(sk);
	if (!tsk)
		return 1;

	is_mptcp = bpf_core_field_exists(tsk->is_mptcp) ? tsk->is_mptcp : 0;
	if (!is_mptcp) {
		storage = bpf_sk_storage_get(&socket_storage_map, sk, 0,
					     BPF_SK_STORAGE_GET_F_CREATE);
		if (!storage)
			return 1;

		storage->token = 0;
		__builtin_memset(storage->ca_name, 0, TCP_CA_NAME_MAX);
		storage->first = NULL;
	} else {
		msk = bpf_skc_to_mptcp_sock(sk);
		if (!msk)
			return 1;

		storage = bpf_sk_storage_get(&socket_storage_map, msk, 0,
					     BPF_SK_STORAGE_GET_F_CREATE);
		if (!storage)
			return 1;

		storage->token = msk->token;
		__builtin_memcpy(storage->ca_name, msk->ca_name, TCP_CA_NAME_MAX);
		storage->first = msk->first;
	}
	storage->invoked++;
	storage->is_mptcp = is_mptcp;
	storage->sk = (struct sock *)sk;

	return 1;
}

SEC("fentry/mptcp_pm_new_connection")
int BPF_PROG(trace_mptcp_pm_new_connection, struct mptcp_sock *msk,
	     const struct sock *ssk, int server_side)
{
	if (!server_side)
		token = msk->token;

	return 0;
}