/*
   libmc - checks for hex pattern parsing

   Copyright (C) 2017-2025
   Free Software Foundation, Inc.

   This file is part of the Midnight Commander.

   The Midnight Commander 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 3 of the License,
   or (at your option) any later version.

   The Midnight Commander is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program.  If not, see <https://www.gnu.org/licenses/>.
 */

#define TEST_SUITE_NAME "lib/search/hex"

#include "tests/mctest.h"

#include "hex.c"  // for testing static functions

/* --------------------------------------------------------------------------------------------- */

/* @DataSource("test_hex_translate_to_regex_ds") */
static const struct test_hex_translate_to_regex_ds
{
    const char *input_value;
    const char *expected_result;
    mc_search_hex_parse_error_t expected_error;
} test_hex_translate_to_regex_ds[] = {
    {
        // Simplest case
        "12 34",
        "\\x12\\x34",
        MC_SEARCH_HEX_E_OK,
    },
    {
        // Prefixes (0x, 0X)
        "0x12 0X34",
        "\\x12\\x34",
        MC_SEARCH_HEX_E_OK,
    },
    {
        // Prefix "0" doesn't signify octal! Numbers are always interpreted in hex.
        "012",
        "\\x12",
        MC_SEARCH_HEX_E_OK,
    },
    {
        // Extra whitespace
        "  12  34  ",
        "\\x12\\x34",
        MC_SEARCH_HEX_E_OK,
    },
    {
        // Min/max values
        "0 ff",
        "\\x00\\xFF",
        MC_SEARCH_HEX_E_OK,
    },
    {
        // Error: Number out of range
        "100",
        NULL,
        MC_SEARCH_HEX_E_NUM_OUT_OF_RANGE,
    },
    {
        // Error: Number out of range (negative)
        "-1",
        NULL,
        MC_SEARCH_HEX_E_NUM_OUT_OF_RANGE,
    },
    {
        // Error: Invalid characters
        "1 z 2",
        NULL,
        MC_SEARCH_HEX_E_INVALID_CHARACTER,
    },
    /*
     * Quotes.
     */
    {
        " \"abc\" ",
        "abc",
        MC_SEARCH_HEX_E_OK,
    },
    {
        // Preserve upper/lower case
        "\"aBc\"",
        "aBc",
        MC_SEARCH_HEX_E_OK,
    },
    {
        " 12\"abc\"34 ",
        "\\x12abc\\x34",
        MC_SEARCH_HEX_E_OK,
    },
    {
        "\"a\"\"b\"",
        "ab",
        MC_SEARCH_HEX_E_OK,
    },
    // Empty quotes
    {
        "\"\"",
        "",
        MC_SEARCH_HEX_E_OK,
    },
    {
        "12 \"\"",
        "\\x12",
        MC_SEARCH_HEX_E_OK,
    },
    // Error: Unmatched quotes
    {
        "\"a",
        NULL,
        MC_SEARCH_HEX_E_UNMATCHED_QUOTES,
    },
    {
        "\"",
        NULL,
        MC_SEARCH_HEX_E_UNMATCHED_QUOTES,
    },
    // Escaped quotes
    {
        "\"a\\\"b\"",
        "a\"b",
        MC_SEARCH_HEX_E_OK,
    },
    {
        "\"a\\\\b\"",
        "a\\b",
        MC_SEARCH_HEX_E_OK,
    },
};

/* @Test(dataSource = "test_hex_translate_to_regex_ds") */
START_PARAMETRIZED_TEST (test_hex_translate_to_regex, test_hex_translate_to_regex_ds)
{
    GString *tmp, *dest_str;
    mc_search_hex_parse_error_t error = MC_SEARCH_HEX_E_OK;

    // given
    tmp = g_string_new (data->input_value);

    // when
    dest_str = mc_search__hex_translate_to_regex (tmp, &error, NULL);

    g_string_free (tmp, TRUE);

    // then
    if (dest_str != NULL)
    {
        mctest_assert_str_eq (dest_str->str, data->expected_result);
        g_string_free (dest_str, TRUE);
    }
    else
        ck_assert_int_eq (error, data->expected_error);
}
END_PARAMETRIZED_TEST

/* --------------------------------------------------------------------------------------------- */

int
main (void)
{
    TCase *tc_core;

    tc_core = tcase_create ("Core");

    // Add new tests here: ***************
    mctest_add_parameterized_test (tc_core, test_hex_translate_to_regex,
                                   test_hex_translate_to_regex_ds);
    // ***********************************

    return mctest_run_all (tc_core);
}

/* --------------------------------------------------------------------------------------------- */