/* 

 * Copyright © 2007 Ryan Lortie

 * Portions copyright (c) 2009 Nokia Corporation.  All rights reserved.

 * 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.

 * 

 * See the included COPYING file for more information.

 */

#include <string.h>

#include <glib.h>

#ifdef __SYMBIAN32__

#include "mrt2_glib2_test.h"

#endif /*__SYMBIAN32__*/

static void

start (GMarkupParseContext  *context,

       const char           *element_name,

       const char          **attribute_names,

       const char          **attribute_values,

       gpointer              user_data,

       GError              **error)

{

  GString *string = user_data;

  gboolean result;

#ifndef __SYMBIAN32__

#define collect(...) \

  g_markup_collect_attributes (element_name, attribute_names, \

                               attribute_values, error, __VA_ARGS__, \

                               G_MARKUP_COLLECT_INVALID)

#else

#define collect(args...) \

  g_markup_collect_attributes (element_name, attribute_names, \

                               attribute_values, error, args, \

                               G_MARKUP_COLLECT_INVALID)

#endif//__SYMBIAN32__							   

#define BOOL    G_MARKUP_COLLECT_BOOLEAN

#define OPTBOOL G_MARKUP_COLLECT_BOOLEAN | G_MARKUP_COLLECT_OPTIONAL

#define TRI     G_MARKUP_COLLECT_TRISTATE

#define STR     G_MARKUP_COLLECT_STRING

#define STRDUP  G_MARKUP_COLLECT_STRDUP

#define OPTSTR  G_MARKUP_COLLECT_STRING | G_MARKUP_COLLECT_OPTIONAL

#define OPTDUP  G_MARKUP_COLLECT_STRDUP | G_MARKUP_COLLECT_OPTIONAL

#define n(x)    ((x)?(x):"(null)")

  if (strcmp (element_name, "bool") == 0)

    {

      gboolean mb = 2, ob = 2, tri = 2;

      result = collect (BOOL,    "mb", &mb,

                        OPTBOOL, "ob", &ob,

                        TRI,     "tri", &tri);

      g_assert (result ||

                (mb == FALSE && ob == FALSE && tri != TRUE && tri != FALSE));

      if (tri != FALSE && tri != TRUE)

        tri = -1;

      g_string_append_printf (string, "<bool(%d) %d %d %d>",

                              result, mb, ob, tri);

    }

  else if (strcmp (element_name, "str") == 0)

    {

      const char *cm, *co;

      char *am, *ao;

      result = collect (STR,    "cm", &cm,

                        STRDUP, "am", &am,

                        OPTDUP, "ao", &ao,

                        OPTSTR, "co", &co);

      g_assert (result ||

                (cm == NULL && am == NULL && ao == NULL && co == NULL));

      g_string_append_printf (string, "<str(%d) %s %s %s %s>",

                              result, n (cm), n (am), n (ao), n (co));

      g_free (am);

      g_free (ao);

    }

}

static GMarkupParser parser = { start };

struct test

{

  const char   *document;

  const char   *result;

  GMarkupError  error_code;

  const char   *error_info;

};

static struct test tests[] =

{

  { "<bool mb='y'>", "<bool(1) 1 0 -1>",

    G_MARKUP_ERROR_PARSE, "'bool'" },

  { "<bool mb='false'/>", "<bool(1) 0 0 -1>" },

  { "<bool mb='true'/>", "<bool(1) 1 0 -1>" },

  { "<bool mb='t' ob='f' tri='1'/>", "<bool(1) 1 0 1>" },

  { "<bool mb='y' ob='n' tri='0'/>", "<bool(1) 1 0 0>" },

  { "<bool ob='y'/>", "<bool(0) 0 0 -1>",

    G_MARKUP_ERROR_MISSING_ATTRIBUTE, "'mb'" },

  { "<bool mb='y' mb='y'/>", "<bool(0) 0 0 -1>",

    G_MARKUP_ERROR_INVALID_CONTENT, "'mb'" },

  { "<bool mb='y' tri='y' tri='n'/>", "<bool(0) 0 0 -1>",

    G_MARKUP_ERROR_INVALID_CONTENT, "'tri'" },

  { "<str cm='x' am='y'/>", "<str(1) x y (null) (null)>" },

  { "<str am='x' co='y'/>", "<str(0) (null) (null) (null) (null)>",

    G_MARKUP_ERROR_MISSING_ATTRIBUTE, "'cm'" },

  { "<str am='x'/>", "<str(0) (null) (null) (null) (null)>",

    G_MARKUP_ERROR_MISSING_ATTRIBUTE, "'cm'" },

  { "<str am='x' cm='x' am='y'/>", "<str(0) (null) (null) (null) (null)>",

    G_MARKUP_ERROR_INVALID_CONTENT, "'am'" },

  { "<str am='x' qm='y' cm='x'/>", "<str(0) (null) (null) (null) (null)>",

    G_MARKUP_ERROR_UNKNOWN_ATTRIBUTE, "'qm'" },

  { "<str am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' cm='x'/>", "<str(0) (null) (null) (null) (null)>",

    G_MARKUP_ERROR_INVALID_CONTENT, "'am'" },

  { "<str cm='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x' am='x'/>", "<str(0) (null) (null) (null) (null)>",

    G_MARKUP_ERROR_INVALID_CONTENT, "'am'" },

  { "<str a='x' b='x' c='x' d='x' e='x' f='x' g='x' h='x' i='x' j='x' k='x' l='x' m='x' n='x' o='x' p='x' q='x' r='x' s='x' t='x' u='x' v='x' w='x' x='x' y='x' z='x' aa='x' bb='x' cc='x' dd='x' ee='x' ff='x' gg='x' hh='x' ii='x' jj='x' kk='x' ll='x' mm='x' nn='x' oo='x' pp='x' qq='x' rr='x' ss='x' tt='x' uu='x' vv='x' ww='x' xx='x' yy='x' zz='x' am='x' cm='x'/>",

    "<str(0) (null) (null) (null) (null)>",

    G_MARKUP_ERROR_UNKNOWN_ATTRIBUTE, "'a'" },

  { "<bool mb='ja'/>", "<bool(0) 0 0 -1>",

    G_MARKUP_ERROR_INVALID_CONTENT, "'mb'" },

  { "<bool mb='nein'/>", "<bool(0) 0 0 -1>",

    G_MARKUP_ERROR_INVALID_CONTENT, "'mb'" }

};

int

main (int argc, char **argv)

{

  gboolean verbose = FALSE;

  int i;

#ifdef __SYMBIAN32__

  g_log_set_handler (NULL,  G_LOG_FLAG_FATAL| G_LOG_FLAG_RECURSION | G_LOG_LEVEL_CRITICAL | G_LOG_LEVEL_WARNING | G_LOG_LEVEL_MESSAGE | G_LOG_LEVEL_INFO | G_LOG_LEVEL_DEBUG, &mrtLogHandler, NULL);

  g_set_print_handler(mrtPrintHandler);

#endif /*__SYMBIAN32__*/

  if (argc > 1)

    {

      if (argc != 2 || strcmp (argv[1], "-v") != 0)

        {

          g_print ("error: call with no arguments or '-v' for verbose\n");

          return 1;

        }

      verbose = TRUE;

    }

  for (i = 0; i < G_N_ELEMENTS (tests); i++)

    {

      GMarkupParseContext *ctx;

      GError *error = NULL;

      GString *string;

      gboolean result;

      string = g_string_new ("");

      ctx = g_markup_parse_context_new (&parser, 0, string, NULL);

      result = g_markup_parse_context_parse (ctx,

                                             tests[i].document,

                                             -1, &error);

      if (result)

        result = g_markup_parse_context_end_parse (ctx, &error);

      if (verbose)

        g_print ("%d: %s:\n  (error %d, \"%s\")\n  %s\n\n",

                 i, tests[i].document,

                 error ? error->code : 0,

                 error ? error->message : "(no error)",

                 string->str);

      if (result)

        {

          if (error != NULL)

            g_error ("parser successful but error is set: "

                     "%s(%d) '%s'", g_quark_to_string (error->domain),

                     error->code, error->message);

          if (tests[i].error_code != 0)

            g_error ("parser succeeded on test %d ('%s') but "

                     "we expected a failure with code %d\n", i,

                     tests[i].document, tests[i].error_code);

        }

      else

        {

          if (error->domain != G_MARKUP_ERROR)

            g_error ("error occured on test %d ('%s') but is not in "

                     "the GMarkupError domain, but rather '%s'", i,

                     tests[i].document, g_quark_to_string (error->domain));

          if (error->code != tests[i].error_code)

            g_error ("failure expected with test %d ('%s') but it "

                    "has error code %d (we expected code %d)", i,

                    tests[i].document, error->code, tests[i].error_code);

          if (strstr (error->message, tests[i].error_info) == NULL)

            g_error ("failure message on test %d ('%s') fails "

                     "to mention '%s' in the error message", i,

                     tests[i].document, tests[i].error_info);

        }

      if (strcmp (tests[i].result, string->str) != 0)

        g_error ("result on test %d ('%s') expected to be '%s' "

                 "but came out as '%s'", i, tests[i].document,

                 tests[i].result, string->str);

      g_markup_parse_context_free (ctx);

      g_string_free (string, TRUE);

      g_clear_error (&error);

    }

  if (verbose)

    g_print ("\n*** all tests passed ***\n\n");

#ifdef __SYMBIAN32__

    testResultXml("markup-collect");

#endif /* EMULATOR */

  return 0;

}