diff -r 000000000000 -r e4d67989cc36 glib/tsrc/BC/tests/refcount/closures.c --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/glib/tsrc/BC/tests/refcount/closures.c Tue Feb 02 02:01:42 2010 +0200 @@ -0,0 +1,349 @@ +/* Copyright (C) 2005 Imendio AB + * Portion Copyright © 2008 Nokia Corporation and/or its subsidiary(-ies). All rights reserved. + * This software is provided "as is"; redistribution and modification + * is permitted, provided that the following disclaimer is retained. + * + * This software 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. + * In no event shall the authors or contributors be liable for any + * direct, indirect, incidental, special, exemplary, or consequential + * damages (including, but not limited to, procurement of substitute + * goods or services; loss of use, data, or profits; or business + * interruption) however caused and on any theory of liability, whether + * in contract, strict liability, or tort (including negligence or + * otherwise) arising in any way out of the use of this software, even + * if advised of the possibility of such damage. + */ + +#include +#include + +#ifdef SYMBIAN +#include +#include "mrt2_glib2_test.h" +#endif /*SYMBIAN*/ + +#define TEST_POINTER1 ((gpointer) 47) +#define TEST_POINTER2 ((gpointer) 49) +#define TEST_POINTER3 ((gpointer) 77) +#define TEST_INT1 (-77) +#define TEST_INT2 (78) +#define TEST_INT3 (99) + +/* --- GTest class --- */ +typedef struct { + GObject object; + gint value; + gpointer test_pointer1; + gpointer test_pointer2; +} GTest; +typedef struct { + GObjectClass parent_class; + void (*test_signal1) (GTest * test, gint an_int); + void (*test_signal2) (GTest * test, gint an_int); + void (*test_signal3) (GTest * test, gint an_int); +} GTestClass; + +#define G_TYPE_TEST (g_test_get_type ()) +#define G_TEST(test) (G_TYPE_CHECK_INSTANCE_CAST ((test), G_TYPE_TEST, GTest)) +#define G_IS_TEST(test) (G_TYPE_CHECK_INSTANCE_TYPE ((test), G_TYPE_TEST)) +#define G_TEST_CLASS(tclass) (G_TYPE_CHECK_CLASS_CAST ((tclass), G_TYPE_TEST, GTestClass)) +#define G_IS_TEST_CLASS(tclass) (G_TYPE_CHECK_CLASS_TYPE ((tclass), G_TYPE_TEST)) +#define G_TEST_GET_CLASS(test) (G_TYPE_INSTANCE_GET_CLASS ((test), G_TYPE_TEST, GTestClass)) + +G_DEFINE_TYPE (GTest, g_test, G_TYPE_OBJECT); + +/* --- variables --- */ +static volatile gboolean stopping = FALSE; +static guint test_signal1 = 0; +static guint test_signal2 = 0; +static guint test_signal3 = 0; +static gboolean seen_signal_handler = FALSE; +static gboolean seen_cleanup = FALSE; +static gboolean seen_test_int1 = FALSE; +static gboolean seen_test_int2 = FALSE; +static gboolean seen_test_int3 = FALSE; +static gboolean seen_thread1 = FALSE; +static gboolean seen_thread2 = FALSE; + +/* --- functions --- */ +static void +g_test_init (GTest * test) +{ + //g_print ("init %p\n", test); + + test->value = 0; + test->test_pointer1 = TEST_POINTER1; + test->test_pointer2 = TEST_POINTER2; +} + +enum { + ARG_0, + ARG_TEST_PROP +}; + +static void +g_test_set_property (GObject *object, + guint prop_id, + const GValue *value, + GParamSpec *pspec) +{ + GTest *test = G_TEST (object); + switch (prop_id) + { + case ARG_TEST_PROP: + test->value = g_value_get_int (value); + break; + default: + G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec); + break; + } +} + +static void +g_test_get_property (GObject *object, + guint prop_id, + GValue *value, + GParamSpec *pspec) +{ + GTest *test = G_TEST (object); + switch (prop_id) + { + case ARG_TEST_PROP: + g_value_set_int (value, test->value); + break; + default: + G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec); + break; + } +} + +static void +g_test_test_signal2 (GTest *test, + gint an_int) +{ +} + +static void +g_test_emit_test_signal1 (GTest *test, + gint vint) +{ + g_signal_emit (G_OBJECT (test), test_signal1, 0, vint); +} + +static void +g_test_emit_test_signal2 (GTest *test, + gint vint) +{ + g_signal_emit (G_OBJECT (test), test_signal2, 0, vint); +} + +static void +g_test_emit_test_signal3 (GTest *test, + gint vint) +{ + g_signal_emit (G_OBJECT (test), test_signal3, 0, vint); +} +static void +g_test_class_init (GTestClass *klass) +{ + GObjectClass *gobject_class = G_OBJECT_CLASS (klass); + + gobject_class->set_property = g_test_set_property; + gobject_class->get_property = g_test_get_property; + + test_signal1 = g_signal_new ("test-signal1", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST, + G_STRUCT_OFFSET (GTestClass, test_signal1), NULL, NULL, + g_cclosure_marshal_VOID__INT, G_TYPE_NONE, 1, G_TYPE_INT); + test_signal2 = g_signal_new ("test-signal2", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST, + G_STRUCT_OFFSET (GTestClass, test_signal2), NULL, NULL, + g_cclosure_marshal_VOID__INT, G_TYPE_NONE, 1, G_TYPE_INT); + + test_signal3 = g_signal_new ("test-signal3", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST, + G_STRUCT_OFFSET (GTestClass, test_signal3), NULL, NULL, + g_cclosure_marshal_VOID__INT, G_TYPE_NONE, 1, G_TYPE_INT); + + + g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_TEST_PROP, + g_param_spec_int ("test-prop", "Test Prop", "Test property", + 0, 1, 0, G_PARAM_READWRITE)); + klass->test_signal2 = g_test_test_signal2; + klass->test_signal3 = g_test_test_signal2; +} + +static inline guint32 +quick_rand32 (void) +{ + static guint32 accu = 2147483563; + accu = 1664525 * accu + 1013904223; + return accu; +} + +static void +test_closure (GClosure *closure) +{ + /* try to produce high contention in closure->ref_count */ + guint i = 0, n = quick_rand32() % 10; + for (i = 0; i < n; i++) + g_closure_ref (closure); + g_closure_sink (closure); /* NOP */ + for (i = 0; i < n; i++) + g_closure_unref (closure); +} + +static gpointer +thread1_main (gpointer data) +{ + GClosure *closure = data; + do + { + static guint count = 0; + test_closure (closure); + //if (++count % 10 == 0) + { + //g_printerr ("c"); + g_thread_yield(); /* force context switch */ + seen_thread1 = TRUE; + } + }while (!stopping); + return NULL; +} + +static gpointer +thread2_main (gpointer data) +{ + GClosure *closure = data; + do + { + static guint count = 0; + test_closure (closure); + //if (++count % 10 == 0) + { + //g_printerr ("C"); + g_thread_yield(); /* force context switch */ + seen_thread2 = TRUE; + } + } while (!stopping); + + return NULL; +} + +static void +test_signal_handler (GTest *test, + gint vint, + gpointer data) +{ + g_assert (data == TEST_POINTER2); + g_assert (test->test_pointer1 == TEST_POINTER1); + seen_signal_handler = TRUE; + seen_test_int1 |= vint == TEST_INT1; + seen_test_int2 |= vint == TEST_INT2; +} + +static void +test_signal_handler_by_id (GTest *test, + gint vint, + gpointer data) +{ + g_assert (data == TEST_POINTER3); + //g_assert (test->test_pointer1 == TEST_POINTER1); + seen_test_int3 |= vint == TEST_INT3; +} + + +static void +destroy_data (gpointer data, + GClosure *closure) +{ + if(data == TEST_POINTER2) + { + seen_cleanup = TRUE; + } + g_assert (closure->ref_count == 0); +} + +static void +test_emissions (GTest *test) +{ + g_test_emit_test_signal1 (test, TEST_INT1); + g_test_emit_test_signal2 (test, TEST_INT2); + g_test_emit_test_signal3 (test, TEST_INT3); +} + +int +main (int argc, + char **argv) +{ + GThread *thread1, *thread2; + GClosure *closure, *closure1; + GTest *object; + guint i; + + #ifdef SYMBIAN + 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 /*SYMBIAN*/ + + g_thread_init (NULL); + + //g_print ("START: %s\n", argv[0]); + + g_log_set_always_fatal (G_LOG_LEVEL_WARNING | G_LOG_LEVEL_CRITICAL | g_log_set_always_fatal (G_LOG_FATAL_MASK)); + g_type_init (); + + object = g_object_new (G_TYPE_TEST, NULL); + closure = g_cclosure_new (G_CALLBACK (test_signal_handler), TEST_POINTER2, destroy_data); + closure1 = g_cclosure_new (G_CALLBACK (test_signal_handler_by_id), TEST_POINTER3, destroy_data); + g_assert(object != NULL && closure != NULL); + g_assert(closure1 !=NULL); + g_signal_connect_closure (object, "test-signal1", closure, FALSE); + g_signal_connect_closure (object, "test-signal2", closure, FALSE); + g_assert(test_signal3 !=0); + i = g_signal_connect_closure_by_id(object, test_signal3, 0,closure1, FALSE); + g_assert(i != 0); + + + stopping = FALSE; + + thread1 = g_thread_create (thread1_main, closure, TRUE, NULL); + thread2 = g_thread_create (thread2_main, closure, TRUE, NULL); + + for (i = 0; i < 10; i++) + { + static guint count = 0; + test_emissions (object); + if (++count % 100 == 0) + { + //g_print ("."); + g_thread_yield(); /* force context switch */ + } + + } + + stopping = TRUE; + //g_print ("\nstopping\n"); + + /* wait for thread shutdown */ + g_thread_join (thread1); + g_thread_join (thread2); + + /* finalize object, destroy signals, run cleanup code */ + g_object_unref (object); + + //g_print ("stopped\n"); + + g_assert (seen_thread1 != FALSE); + g_assert (seen_thread2 != FALSE); + g_assert (seen_test_int1 != FALSE); + g_assert (seen_test_int2 != FALSE); + g_assert (seen_test_int3 != FALSE); + g_assert (seen_signal_handler != FALSE); + g_assert (seen_cleanup != FALSE); + + #if SYMBIAN + testResultXml("closures"); + #endif /* EMULATOR */ + + return 0; +}