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

/*

 * Copyright (C) 2006-2008 Imendio AB

 *

 * This program is free software; you can redistribute it and/or

 * modify it under the terms of the GNU Lesser 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

 * Lesser General Public License for more details.

 *

 * You should have received a copy of the GNU Lesser General Public

 * License along with this program; if not, see <https://www.gnu.org/licenses>

 */

#include <stdlib.h>

#include <glib.h>

#include "loudmouth/lm-parser.h"

static GSList *

get_files (const gchar *prefix)

{

    GSList      *list = NULL;

    GError      *error = NULL;

    GDir        *dir;

    const gchar *name;

    dir = g_dir_open (PARSER_TEST_DIR, 0, &error);

    if (!dir) {

        g_error ("Failed to open test file directory '%s' due to: %s",

                 PARSER_TEST_DIR, error->message);

        g_clear_error (&error);

        return NULL;

    }

    while ((name = g_dir_read_name (dir))) {

        /* Find *.xml */

        if (g_str_has_prefix (name, prefix) &&

            g_str_has_suffix (name, ".xml")) {

            gchar *file_path;

            file_path = g_strconcat (PARSER_TEST_DIR, "/", name,

                                     NULL);

            list = g_slist_prepend (list, file_path);

        }

    }

    g_dir_close (dir);

    g_clear_error (&error);

    return list;

}

static void

test_parser_with_file (const gchar *file_path, gboolean is_valid)

{

    LmParser *parser;

    gchar    *file_contents;

    GError   *error = NULL;

    gsize     length;

    parser = lm_parser_new (NULL, NULL, NULL);

    if (!g_file_get_contents (file_path,

                              &file_contents, &length,

                              &error)) {

        g_error ("Couldn't read file '%s': %s",

                 file_path, error->message);

        g_clear_error (&error);

        return;

    }

    g_assert (lm_parser_parse (parser, file_contents) == is_valid);

    lm_parser_free (parser);

    g_free (file_contents);

}

static void

test_valid_suite ()

{

    GSList *list, *l;

    list = get_files ("valid");

    for (l = list; l; l = l->next) {

        test_parser_with_file ((const gchar *) l->data, TRUE);

        g_free (l->data);

    }

    g_slist_free (list);

}

static void

test_invalid_suite ()

{

    GSList *list, *l;

    list = get_files ("invalid");

    for (l = list; l; l = l->next) {

        test_parser_with_file ((const gchar *) l->data, FALSE);

        g_free (l->data);

    }

    g_slist_free (list);

}

int

main (int argc, char **argv)

{

    g_test_init (&argc, &argv, NULL);

    g_test_add_func ("/parser/valid_suite", test_valid_suite);

    g_test_add_func ("/parser/invalid/suite", test_invalid_suite);

    return g_test_run ();

}