/* GLIB - Library of useful routines for C programming

 * Copyright (C) 1995-1997  Peter Mattis, Spencer Kimball and Josh MacDonald

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

 * This library 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 library 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 library; if not, write to the

 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,

 * Boston, MA 02111-1307, USA.

 */

/*

 * Modified by the GLib Team and others 1997-2000.  See the AUTHORS

 * file for a list of people on the GLib Team.  See the ChangeLog

 * files for a list of changes.  These files are distributed with

 * GLib at ftp://ftp.gtk.org/pub/gtk/. 

 */

#undef G_DISABLE_ASSERT

#undef G_LOG_DOMAIN

#include <string.h>

#include <glib.h>

#include <glib-object.h>

#include "gobject/gvaluecollector.h"

#ifdef __SYMBIAN32__

#include "mrt2_glib2_test.h"

#endif /*__SYMBIAN32__*/

static void

test_enum_transformation (void)

{ 

  GType type; 

  GValue orig = { 0, };

  GValue xform = { 0, }; 

  GEnumValue values[] = { {0,"0","0"}, {1,"1","1"}}; 

 type = g_enum_register_static ("TestEnum", values); 

 g_value_init (&orig, type); 

 g_value_set_enum (&orig, 1); 

 memset (&xform, 0, sizeof (GValue));

 g_value_init (&xform, G_TYPE_CHAR); 

 g_value_transform (&orig, &xform); 

 g_assert (g_value_get_char (&xform) == 1);

 memset (&xform, 0, sizeof (GValue));

 g_value_init (&xform, G_TYPE_UCHAR); 

 g_value_transform (&orig, &xform); 

 g_assert (g_value_get_uchar (&xform) == 1);

 memset (&xform, 0, sizeof (GValue));

 g_value_init (&xform, G_TYPE_INT); 

 g_value_transform (&orig, &xform); 

 g_assert (g_value_get_int (&xform) == 1);

 memset (&xform, 0, sizeof (GValue));

 g_value_init (&xform, G_TYPE_UINT); 

 g_value_transform (&orig, &xform); 

 g_assert (g_value_get_uint (&xform) == 1);

 memset (&xform, 0, sizeof (GValue));

 g_value_init (&xform, G_TYPE_LONG); 

 g_value_transform (&orig, &xform); 

 g_assert (g_value_get_long (&xform) == 1);

 memset (&xform, 0, sizeof (GValue));

 g_value_init (&xform, G_TYPE_ULONG); 

 g_value_transform (&orig, &xform); 

 g_assert (g_value_get_ulong (&xform) == 1);

 memset (&xform, 0, sizeof (GValue));

 g_value_init (&xform, G_TYPE_INT64); 

 g_value_transform (&orig, &xform); 

 g_assert (g_value_get_int64 (&xform) == 1);

 memset (&xform, 0, sizeof (GValue));

 g_value_init (&xform, G_TYPE_UINT64); 

 g_value_transform (&orig, &xform); 

 g_assert (g_value_get_uint64 (&xform) == 1);

}

static void

test_gtype_value (void)

{

  GType type;

  GValue value = { 0, };

  GValue copy = { 0, };

  g_value_init (&value, G_TYPE_GTYPE);

  g_value_set_gtype (&value, G_TYPE_BOXED);

  type = g_value_get_gtype (&value);

  g_assert (type == G_TYPE_BOXED);

  g_value_init (&copy, G_TYPE_GTYPE);

  g_value_copy (&value, &copy);

  type = g_value_get_gtype (&copy);

  g_assert (type == G_TYPE_BOXED);

}

static gchar *

collect (GValue *value, ...)

{

  gchar *error;

  va_list var_args;

  error = NULL;

  va_start (var_args, value);

  G_VALUE_COLLECT (value, var_args, 0, &error);

  va_end (var_args);

  return error;

}	 

static gchar *

lcopy (GValue *value, ...)

{

  gchar *error;

  va_list var_args;

  error = NULL;

  va_start (var_args, value);

  G_VALUE_LCOPY (value, var_args, 0, &error);

  va_end (var_args);

  return error;

}	 

static void

test_collection (void)

{

  GValue value = { 0, };

  gchar *error;

  g_value_init (&value, G_TYPE_CHAR);

  error = collect (&value, 'c');

  g_assert (error == NULL);

  g_assert (g_value_get_char (&value) == 'c');

  g_value_unset (&value);

  g_value_init (&value, G_TYPE_UCHAR);

  error = collect (&value, 129);

  g_assert (error == NULL);

  g_assert (g_value_get_uchar (&value) == 129);

  g_value_unset (&value);

  g_value_init (&value, G_TYPE_BOOLEAN);

  error = collect (&value, TRUE);

  g_assert (error == NULL);

  g_assert (g_value_get_boolean (&value) == TRUE);

  g_value_unset (&value);

  g_value_init (&value, G_TYPE_INT);

  error = collect (&value, G_MAXINT);

  g_assert (error == NULL);

  g_assert (g_value_get_int (&value) == G_MAXINT);

  g_value_unset (&value);

  g_value_init (&value, G_TYPE_UINT);

  error = collect (&value, G_MAXUINT);

  g_assert (error == NULL);

  g_assert (g_value_get_uint (&value) == G_MAXUINT);

  g_value_unset (&value);  

  g_value_init (&value, G_TYPE_LONG);

  error = collect (&value, G_MAXLONG);

  g_assert (error == NULL);

  g_assert (g_value_get_long (&value) == G_MAXLONG);

  g_value_unset (&value);

  g_value_init (&value, G_TYPE_ULONG);

  error = collect (&value, G_MAXULONG);

  g_assert (error == NULL);

  g_assert (g_value_get_ulong (&value) == G_MAXULONG);

  g_value_unset (&value);  

  g_value_init (&value, G_TYPE_INT64);

  error = collect (&value, G_MAXINT64);

  g_assert (error == NULL);

  g_assert (g_value_get_int64 (&value) == G_MAXINT64);

  g_value_unset (&value);

  g_value_init (&value, G_TYPE_UINT64);

  error = collect (&value, G_MAXUINT64);

  g_assert (error == NULL);

  g_assert (g_value_get_uint64 (&value) == G_MAXUINT64);

  g_value_unset (&value);

  g_value_init (&value, G_TYPE_FLOAT);

  error = collect (&value, G_MAXFLOAT);

  g_assert (error == NULL);

  g_assert (g_value_get_float (&value) == G_MAXFLOAT);

  g_value_unset (&value);

  g_value_init (&value, G_TYPE_DOUBLE);

  error = collect (&value, G_MAXDOUBLE);

  g_assert (error == NULL);

  g_assert (g_value_get_double (&value) == G_MAXDOUBLE);

  g_value_unset (&value);

  g_value_init (&value, G_TYPE_STRING);

  error = collect (&value, "string ?");

  g_assert (error == NULL);

  g_assert (strcmp (g_value_get_string (&value), "string ?") == 0);

  g_value_unset (&value);

  g_value_init (&value, G_TYPE_GTYPE);

  error = collect (&value, G_TYPE_BOXED);

  g_assert (error == NULL);

  g_assert (g_value_get_gtype (&value) == G_TYPE_BOXED);

}

static void

test_copying (void)

{

  GValue value = { 0, };

  gchar *error;

  {

    gchar c = 0;

    g_value_init (&value, G_TYPE_CHAR);

    g_value_set_char (&value, 'c');

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (c == 'c');

  }  

  {

    guchar c = 0;

    g_value_unset (&value);

    g_value_init (&value, G_TYPE_UCHAR);

    g_value_set_uchar (&value, 129);

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (c == 129);

  }  

  {

    gint c = 0;

    g_value_unset (&value);

    g_value_init (&value, G_TYPE_INT);

    g_value_set_int (&value, G_MAXINT);

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (c == G_MAXINT);

  }  

  {

    guint c = 0;

    g_value_unset (&value);

    g_value_init (&value, G_TYPE_UINT);

    g_value_set_uint (&value, G_MAXUINT);

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (c == G_MAXUINT);

  }  

  {

    glong c = 0;

    g_value_unset (&value);

    g_value_init (&value, G_TYPE_LONG);

    g_value_set_long (&value, G_MAXLONG);

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (c == G_MAXLONG);

  }  

  {

    gulong c = 0;

    g_value_unset (&value);

    g_value_init (&value, G_TYPE_ULONG);

    g_value_set_ulong (&value, G_MAXULONG);

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (c == G_MAXULONG);

  }  

  {

    gint64 c = 0;

    g_value_unset (&value);

    g_value_init (&value, G_TYPE_INT64);

    g_value_set_int64 (&value, G_MAXINT64);

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (c == G_MAXINT64);

  }  

  {

    guint64 c = 0;

    g_value_unset (&value);

    g_value_init (&value, G_TYPE_UINT64);

    g_value_set_uint64 (&value, G_MAXUINT64);

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (c == G_MAXUINT64);

  }  

  {

    gfloat c = 0;

    g_value_unset (&value);

    g_value_init (&value, G_TYPE_FLOAT);

    g_value_set_float (&value, G_MAXFLOAT);

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (c == G_MAXFLOAT);

  }  

  {

    gdouble c = 0;

    g_value_unset (&value);

    g_value_init (&value, G_TYPE_DOUBLE);

    g_value_set_double (&value, G_MAXDOUBLE);

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (c == G_MAXDOUBLE);

  }  

  {

    gchar *c = NULL;

    g_value_unset (&value);

    g_value_init (&value, G_TYPE_STRING);

    g_value_set_string (&value, "string ?");

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (strcmp (c, "string ?") == 0);

  }  

  {

    GType c = G_TYPE_NONE;

    g_value_unset (&value);

    g_value_init (&value, G_TYPE_GTYPE);

    g_value_set_gtype (&value, G_TYPE_BOXED);

    error = lcopy (&value, &c);

    g_assert (error == NULL);

    g_assert (c == G_TYPE_BOXED);

  }  

}

int

main (int argc, char *argv[])

{

  #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__*/

  g_type_init (); 

  test_enum_transformation ();

  test_gtype_value ();

  test_collection ();

  test_copying ();

  #if __SYMBIAN32__

  testResultXml("gvalue-test");

  #endif /* EMULATOR */

  return 0;

}