/* -*- Mode: C; tab-width: 8; indent-tabs-mode: nil; c-basic-offset: 8 -*- */

/*

 * Copyright (C) 2018 Sébastien Wilmet <swilmet@gnome.org>

 *

 * This program 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 2 of the

 * License, or (at your option) any later version.

 *

 * This program 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 <http://www.gnu.org/licenses/>.

 */

#include "dh-search-context.h"

static gboolean

strv_equal (GStrv strv1,

            GStrv strv2)

{

        gint i1;

        gint i2;

        if (strv1 == NULL || strv2 == NULL)

                return strv1 == NULL && strv2 == NULL;

        for (i1 = 0, i2 = 0;

             strv1[i1] != NULL && strv2[i2] != NULL;

             i1++, i2++) {

                const gchar *cur_str1 = strv1[i1];

                const gchar *cur_str2 = strv2[i2];

                if (!g_str_equal (cur_str1, cur_str2))

                        return FALSE;

        }

        return strv1[i1] == NULL && strv2[i2] == NULL;

}

static void

check_process_search_string (const gchar *search_string,

                             gboolean     expected_valid,

                             const gchar *expected_book_id,

                             const gchar *expected_page_id,

                             GStrv        expected_keywords)

{

        DhSearchContext *search_context;

        search_context = _dh_search_context_new (search_string);

        g_assert_cmpint (expected_valid, ==, (search_context != NULL));

        if (search_context == NULL) {

                g_assert (expected_book_id == NULL);

                g_assert (expected_page_id == NULL);

                g_assert (expected_keywords == NULL);

                return;

        }

        g_assert_cmpstr (_dh_search_context_get_book_id (search_context), ==, expected_book_id);

        g_assert_cmpstr (_dh_search_context_get_page_id (search_context), ==, expected_page_id);

        g_assert (strv_equal (_dh_search_context_get_keywords (search_context), expected_keywords));

        _dh_search_context_free (search_context);

}

static void

test_process_search_string (void)

{

        GPtrArray *array;

        GStrv keywords1;

        GStrv keywords2;

        /* Empty or only whitespace. */

        check_process_search_string ("", FALSE, NULL, NULL, NULL);

        check_process_search_string (" ", FALSE, NULL, NULL, NULL);

        check_process_search_string (" \t ", FALSE, NULL, NULL, NULL);

        check_process_search_string (" \t \n", FALSE, NULL, NULL, NULL);

        /* book_id and page_id without keywords. */

        check_process_search_string ("book:devhelp", TRUE, "devhelp", NULL, NULL);

        check_process_search_string ("page:DhBook", TRUE, NULL, "DhBook", NULL);

        check_process_search_string ("book:devhelp page:DhBook", TRUE, "devhelp", "DhBook", NULL);

        check_process_search_string ("page:DhBook book:devhelp", TRUE, "devhelp", "DhBook", NULL);

        check_process_search_string ("book:devhelp page:", TRUE, "devhelp", NULL, NULL);

        check_process_search_string ("book: page:DhBook", TRUE, NULL, "DhBook", NULL);

        check_process_search_string ("book:devhelp book:gtk3", FALSE, NULL, NULL, NULL);

        check_process_search_string ("page:DhBook page:DhCompletion", FALSE, NULL, NULL, NULL);

        /* Normal keywords before book_id or page_id. */

        check_process_search_string ("dh_link_ book:devhelp", FALSE, NULL, NULL, NULL);

        check_process_search_string ("dh_link_ get page:DhLink", FALSE, NULL, NULL, NULL);

        check_process_search_string ("dh_link_ get book:devhelp page:DhLink", FALSE, NULL, NULL, NULL);

        /* Only normal keywords. */

        array = g_ptr_array_new ();

        g_ptr_array_add (array, (gpointer) "dh_link_");

        g_ptr_array_add (array, NULL);

        keywords1 = (GStrv) g_ptr_array_free (array, FALSE);

        array = g_ptr_array_new ();

        g_ptr_array_add (array, (gpointer) "dh_link_");

        g_ptr_array_add (array, (gpointer) "get");

        g_ptr_array_add (array, NULL);

        keywords2 = (GStrv) g_ptr_array_free (array, FALSE);

        check_process_search_string ("dh_link_", TRUE, NULL, NULL, keywords1);

        check_process_search_string (" dh_link_ ", TRUE, NULL, NULL, keywords1);

        check_process_search_string ("dh_link_ get", TRUE, NULL, NULL, keywords2);

        check_process_search_string ("dh_link_  get  ", TRUE, NULL, NULL, keywords2);

        /* book_id, page_id and keywords. */

        check_process_search_string ("book:devhelp dh_link_", TRUE, "devhelp", NULL, keywords1);

        check_process_search_string ("book:devhelp  dh_link_  get ", TRUE, "devhelp", NULL, keywords2);

        check_process_search_string ("page:DhLink dh_link_", TRUE, NULL, "DhLink", keywords1);

        check_process_search_string ("page:DhLink dh_link_ get", TRUE, NULL, "DhLink", keywords2);

        check_process_search_string ("book:devhelp page:DhLink dh_link_", TRUE, "devhelp", "DhLink", keywords1);

        check_process_search_string ("book:devhelp  page:DhLink  \t dh_link_ ", TRUE, "devhelp", "DhLink", keywords1);

        check_process_search_string ("page:DhLink book:devhelp dh_link_", TRUE, "devhelp", "DhLink", keywords1);

        check_process_search_string ("book:devhelp page:DhLink dh_link_ get", TRUE, "devhelp", "DhLink", keywords2);

        check_process_search_string ("book:devhelp page:DhLink dh_link_  \t get\n", TRUE, "devhelp", "DhLink", keywords2);

        g_free (keywords1);

        g_free (keywords2);

}

static void

check_case_sensitive (const gchar *search_string,

                      gboolean     expected_case_sensitive)

{

        DhSearchContext *search_context;

        search_context = _dh_search_context_new (search_string);

        g_assert (search_context != NULL);

        g_assert_cmpint (_dh_search_context_get_case_sensitive (search_context), ==, expected_case_sensitive);

        _dh_search_context_free (search_context);

}

static void

test_case_sensitive (void)

{

        /* Only keywords. */

        check_case_sensitive ("dh_link_", FALSE);

        check_case_sensitive ("dh_link_ get", FALSE);

        check_case_sensitive ("DhLink", TRUE);

        check_case_sensitive ("a DhLink", TRUE);

        /* book_id and page_id only. */

        check_case_sensitive ("book:devhelp", FALSE);

        check_case_sensitive ("page:DhLink", FALSE);

        check_case_sensitive ("book:devhelp page:DhLink", FALSE);

        /* book_id, page_id and keywords. */

        // Only normal keywords must be taken into account for case sensitivity.

        check_case_sensitive ("book:devhelp page:DhLink dh_link_ get", FALSE);

        check_case_sensitive ("page:DhLink dh_link_ get", FALSE);

        check_case_sensitive ("book:devhelp dh_link_ get", FALSE);

        check_case_sensitive ("book:devhelp page:DhLink DhLink", TRUE);

        check_case_sensitive ("book:devhelp DhLink", TRUE);

}

static void

check_link_simple (const gchar *search_string,

                   const gchar *link_name,

                   gboolean     prefix,

                   gboolean     expected_match,

                   gboolean     expected_exact)

{

        DhSearchContext *search_context;

        DhLink *book_link;

        DhLink *link;

        gboolean match;

        gboolean exact;

        search_context = _dh_search_context_new (search_string);

        g_assert (search_context != NULL);

        book_link = dh_link_new_book ("/usr/share/gtk-doc/html/devhelp-3",

                                      "devhelp",

                                      "Devhelp Reference Manual",

                                      "index.html");

        link = dh_link_new (DH_LINK_TYPE_FUNCTION,

                            book_link,

                            link_name,

                            "ClassName.html#function-name");

        match = _dh_search_context_match_link (search_context, link, prefix);

        g_assert_cmpint (match, ==, expected_match);

        if (match && prefix) {

                exact = _dh_search_context_is_exact_link (search_context, link);

                g_assert_cmpint (exact, ==, expected_exact);

        } else {

                g_assert (!expected_exact);

        }

        _dh_search_context_free (search_context);

        dh_link_unref (book_link);

        dh_link_unref (link);

}

static void

test_link_simple (void)

{

        /* Prefix match but not exact. */

        check_link_simple ("dh_link_", "dh_link_new", TRUE, TRUE, FALSE);

        check_link_simple ("dh_link_", "dh_link_new", FALSE, FALSE, FALSE);

        /* Prefix match and exact. */

        check_link_simple ("dh_link_new", "dh_link_new", TRUE, TRUE, TRUE);

        check_link_simple ("dh_link_new", "dh_link_new", FALSE, FALSE, FALSE);

        /* Nonprefix match. */

        check_link_simple ("link", "dh_link_new", TRUE, FALSE, FALSE);

        check_link_simple ("link", "dh_link_new", FALSE, TRUE, FALSE);

        /* Case insensitive. */

        check_link_simple ("link", "DhLink", TRUE, FALSE, FALSE);

        check_link_simple ("link", "DhLink", FALSE, TRUE, FALSE);

        /* Case sensitive. */

        check_link_simple ("Link", "DhLink", TRUE, FALSE, FALSE);

        check_link_simple ("Link", "DhLink", FALSE, TRUE, FALSE);

        check_link_simple ("Link", "dh_link_new", TRUE, FALSE, FALSE);

        check_link_simple ("Link", "dh_link_new", FALSE, FALSE, FALSE);

        /* Several keywords. */

        check_link_simple ("dh_link_ book", "dh_link_new_book", TRUE, TRUE, FALSE);

        check_link_simple ("dh_link_ book", "dh_link_new_book", FALSE, FALSE, FALSE);

        check_link_simple ("dh_link_ book", "dh_link_new", TRUE, FALSE, FALSE);

        check_link_simple ("dh_link_ book", "dh_link_new", FALSE, FALSE, FALSE);

        /* Globs */

        check_link_simple ("dh_link_*book", "dh_link_new_book", TRUE, TRUE, FALSE);

        check_link_simple ("dh_link_*book", "dh_link_new_book", FALSE, FALSE, FALSE);

        check_link_simple ("dh_link_*book", "dh_link_new", TRUE, FALSE, FALSE);

        check_link_simple ("dh_link_*book", "dh_link_new", FALSE, FALSE, FALSE);

        check_link_simple ("??_link_new", "dh_link_new", TRUE, TRUE, FALSE);

        check_link_simple ("??_link_new", "dh_link_new", FALSE, FALSE, FALSE);

        check_link_simple ("??_link_new", "dh_link_compare", TRUE, FALSE, FALSE);

        check_link_simple ("??_link_new", "dh_link_compare", FALSE, FALSE, FALSE);

        /* Several keywords, not necessarily in the same order. */

        check_link_simple ("gtk window application", "gtk_window_get_application", TRUE, TRUE, FALSE);

        check_link_simple ("gtk window application", "gtk_window_get_application", FALSE, FALSE, FALSE);

        check_link_simple ("gtk window application", "GtkApplicationWindow", TRUE, TRUE, FALSE);

        check_link_simple ("gtk window application", "GtkApplicationWindow", FALSE, FALSE, FALSE);

        check_link_simple ("gtk*window*application", "gtk_window_get_application", TRUE, TRUE, FALSE);

        check_link_simple ("gtk*window*application", "gtk_window_get_application", FALSE, FALSE, FALSE);

        check_link_simple ("gtk*window*application", "GtkApplicationWindow", TRUE, FALSE, FALSE);

        check_link_simple ("gtk*window*application", "GtkApplicationWindow", FALSE, FALSE, FALSE);

        /* Prefix appearing several times.

         * The DhLink must not appear two times in the search results.

         */

        check_link_simple ("GTK CELL_RENDERER_ACCEL_MODE_GTK", "GTK_CELL_RENDERER_ACCEL_MODE_GTK",

                           TRUE, TRUE, FALSE);

        check_link_simple ("GTK CELL_RENDERER_ACCEL_MODE_GTK", "GTK_CELL_RENDERER_ACCEL_MODE_GTK",

                           FALSE, FALSE, FALSE);

        check_link_simple ("GTK* CELL_RENDERER_ACCEL_MODE_GTK", "GTK_CELL_RENDERER_ACCEL_MODE_GTK",

                           TRUE, TRUE, FALSE);

        check_link_simple ("GTK* CELL_RENDERER_ACCEL_MODE_GTK", "GTK_CELL_RENDERER_ACCEL_MODE_GTK",

                           FALSE, FALSE, FALSE);

}

int

main (int    argc,

      char **argv)

{

        g_test_init (&argc, &argv, NULL);

        g_test_add_func ("/search_context/process_search_string", test_process_search_string);

        g_test_add_func ("/search_context/case_sensitive", test_case_sensitive);

        g_test_add_func ("/search_context/link_simple", test_link_simple);

        return g_test_run ();

}