#include <gtest/gtest.h>

#include "session_priv.h"
#include "session_manager.h"

#include "macro.h"
#include "ipv4_utils.h"
#include "test_packets.h"

struct session_manager_options opts = {
    // max session number
    .max_tcp_session_num = RX_BURST_MAX * 2,
    .max_udp_session_num = RX_BURST_MAX * 2,

    // session overload
    .tcp_overload_evict_old_sess = 1, // 1: evict old session, 0: bypass new session
    .udp_overload_evict_old_sess = 1, // 1: evict old session, 0: bypass new session

    // tcp timeout
    .tcp_init_timeout = 1,
    .tcp_handshake_timeout = 2,
    .tcp_data_timeout = 3,
    .tcp_half_closed_timeout = 4,
    .tcp_time_wait_timeout = 5,
    .tcp_discard_timeout = 6,
    .tcp_unverified_rst_timeout = 7,

    // udp timeout
    .udp_data_timeout = 8,

    // duplicate packet filter

    .duplicated_packet_filter_enable = 1,
    .duplicated_packet_filter_capacity = 1000,
    .duplicated_packet_filter_timeout = 10,
    .duplicated_packet_filter_error_rate = 0.0001,

    // evicted session filter
    .evicted_session_filter_enable = 1,
    .evicted_session_filter_capacity = 1000,
    .evicted_session_filter_timeout = 10,
    .evicted_session_filter_error_rate = 0.0001,

    // TCP Reassembly
    .tcp_reassembly_enable = 1,
    .tcp_reassembly_max_timeout = 60000,
    .tcp_reassembly_max_segments = 16,
};

static void packet_set_ip_src_addr(struct packet *pkt, uint32_t addr)
{
    const struct packet_layer *ipv4_layer = packet_get_innermost_layer(pkt, LAYER_TYPE_IPV4);
    EXPECT_TRUE(ipv4_layer);
    struct ip *hdr = (struct ip *)ipv4_layer->hdr_ptr;
    ipv4_hdr_set_src_addr(hdr, addr);
}

#if 1
TEST(TCP_OVERLOAD, EVICT_OLD_SESS)
{
    struct packet pkt;
    struct session_manager *mgr = NULL;
    struct session_manager_stat *stat = NULL;

    mgr = session_manager_new(&opts, 1);
    EXPECT_TRUE(mgr != NULL);

    // C2S SYN Packet
    printf("\n=> Packet Parse: TCP C2S SYN packet\n");
    packet_parse(&pkt, (const char *)tcp_pkt1_c2s_syn, sizeof(tcp_pkt1_c2s_syn));
    printf("<= Packet Parse: done\n\n");

    // new session
    for (uint32_t i = 0; i < opts.max_tcp_session_num; i++)
    {
        packet_set_ip_src_addr(&pkt, i);
        EXPECT_TRUE(session_manager_new_session(mgr, &pkt, 1));
    }
    printf("=> Session Manager: after add %lu new sessions\n", opts.max_tcp_session_num);
    stat = session_manager_stat(mgr);
    EXPECT_TRUE(stat);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_used == opts.max_tcp_session_num);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_opening == RX_BURST_MAX);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_active == 0);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_closing == 0);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_closed == RX_BURST_MAX); // have evicted, have't free
    EXPECT_TRUE(stat->nr_tcp_sess_evicted == RX_BURST_MAX);
    EXPECT_TRUE(stat->nr_tcp_pkts_nospace_bypass == 0);
    EXPECT_TRUE(stat->nr_tcp_pkts_nosess_bypass == 0);

    session_manager_free(mgr);
}
#endif

#if 1
TEST(TCP_OVERLOAD, EVICT_NEW_SESS)
{
    struct packet pkt;
    struct session_manager *mgr = NULL;
    struct session_manager_stat *stat = NULL;
    struct session_manager_options _opts;
    memcpy(&_opts, &opts, sizeof(struct session_manager_options));
    _opts.tcp_overload_evict_old_sess = 0;

    mgr = session_manager_new(&_opts, 1);
    EXPECT_TRUE(mgr != NULL);

    // C2S SYN Packet
    printf("\n=> Packet Parse: TCP C2S SYN packet\n");
    packet_parse(&pkt, (const char *)tcp_pkt1_c2s_syn, sizeof(tcp_pkt1_c2s_syn));
    printf("<= Packet Parse: done\n\n");

    // new session
    for (uint32_t i = 0; i < opts.max_tcp_session_num; i++)
    {
        packet_set_ip_src_addr(&pkt, i);
        EXPECT_TRUE(session_manager_new_session(mgr, &pkt, 1));
    }
    printf("=> Session Manager: after add %lu new sessions\n", opts.max_tcp_session_num);
    stat = session_manager_stat(mgr);
    EXPECT_TRUE(stat);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_used == opts.max_tcp_session_num);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_opening == opts.max_tcp_session_num);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_active == 0);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_closing == 0);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_closed == 0);
    EXPECT_TRUE(stat->nr_tcp_sess_evicted == 0);
    EXPECT_TRUE(stat->nr_tcp_pkts_nospace_bypass == 0);
    EXPECT_TRUE(stat->nr_tcp_pkts_nosess_bypass == 0);

    // table full, evict new session
    for (uint32_t i = 0; i < RX_BURST_MAX; i++)
    {
        packet_set_ip_src_addr(&pkt, opts.max_tcp_session_num + i);
        EXPECT_TRUE(session_manager_lookup_session(mgr, &pkt, 1) == NULL);
        EXPECT_TRUE(session_manager_new_session(mgr, &pkt, 1) == NULL);
    }
    printf("=> Session Manager: after evicte new session\n");
    stat = session_manager_stat(mgr);
    EXPECT_TRUE(stat);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_used == opts.max_tcp_session_num);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_opening == opts.max_tcp_session_num);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_active == 0);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_closing == 0);
    EXPECT_TRUE(stat->curr_nr_tcp_sess_closed == 0);
    EXPECT_TRUE(stat->nr_tcp_sess_evicted == 0);
    EXPECT_TRUE(stat->nr_tcp_pkts_nospace_bypass == RX_BURST_MAX);
    EXPECT_TRUE(stat->nr_tcp_pkts_nosess_bypass == 0);

    session_manager_free(mgr);
}
#endif

int main(int argc, char **argv)
{
    ::testing::InitGoogleTest(&argc, argv);
    return RUN_ALL_TESTS();
}