1.1 --- /dev/null Thu Jan 01 00:00:00 1970 +0000
1.2 +++ b/os/ossrv/glib/tests/refcount/closures.c Fri Jun 15 03:10:57 2012 +0200
1.3 @@ -0,0 +1,302 @@
1.4 +/* Copyright (C) 2005 Imendio AB
1.5 + * Portions copyright (c) 2006-2009 Nokia Corporation. All rights reserved.
1.6 + * This software is provided "as is"; redistribution and modification
1.7 + * is permitted, provided that the following disclaimer is retained.
1.8 + *
1.9 + * This software is distributed in the hope that it will be useful,
1.10 + * but WITHOUT ANY WARRANTY; without even the implied warranty of
1.11 + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
1.12 + * In no event shall the authors or contributors be liable for any
1.13 + * direct, indirect, incidental, special, exemplary, or consequential
1.14 + * damages (including, but not limited to, procurement of substitute
1.15 + * goods or services; loss of use, data, or profits; or business
1.16 + * interruption) however caused and on any theory of liability, whether
1.17 + * in contract, strict liability, or tort (including negligence or
1.18 + * otherwise) arising in any way out of the use of this software, even
1.19 + * if advised of the possibility of such damage.
1.20 + */
1.21 +#include <glib-object.h>
1.22 +#include <unistd.h>
1.23 +
1.24 +#ifdef __SYMBIAN32__
1.25 +#include <glib_global.h>
1.26 +#include "mrt2_glib2_test.h"
1.27 +#endif /*__SYMBIAN32__*/
1.28 +#define TEST_POINTER1 ((gpointer) 47)
1.29 +#define TEST_POINTER2 ((gpointer) 49)
1.30 +#define TEST_INT1 (-77)
1.31 +#define TEST_INT2 (78)
1.32 +
1.33 +/* --- GTest class --- */
1.34 +typedef struct {
1.35 + GObject object;
1.36 + gint value;
1.37 + gpointer test_pointer1;
1.38 + gpointer test_pointer2;
1.39 +} GTest;
1.40 +typedef struct {
1.41 + GObjectClass parent_class;
1.42 + void (*test_signal1) (GTest * test, gint an_int);
1.43 + void (*test_signal2) (GTest * test, gint an_int);
1.44 +} GTestClass;
1.45 +
1.46 +#define G_TYPE_TEST (my_test_get_type ())
1.47 +#define MY_TEST(test) (G_TYPE_CHECK_INSTANCE_CAST ((test), G_TYPE_TEST, GTest))
1.48 +#define MY_IS_TEST(test) (G_TYPE_CHECK_INSTANCE_TYPE ((test), G_TYPE_TEST))
1.49 +#define MY_TEST_CLASS(tclass) (G_TYPE_CHECK_CLASS_CAST ((tclass), G_TYPE_TEST, GTestClass))
1.50 +#define MY_IS_TEST_CLASS(tclass) (G_TYPE_CHECK_CLASS_TYPE ((tclass), G_TYPE_TEST))
1.51 +#define MY_TEST_GET_CLASS(test) (G_TYPE_INSTANCE_GET_CLASS ((test), G_TYPE_TEST, GTestClass))
1.52 +
1.53 +G_DEFINE_TYPE (GTest, my_test, G_TYPE_OBJECT);
1.54 +
1.55 +/* --- variables --- */
1.56 +static volatile gboolean stopping = FALSE;
1.57 +static guint test_signal1 = 0;
1.58 +static guint test_signal2 = 0;
1.59 +static gboolean seen_signal_handler = FALSE;
1.60 +static gboolean seen_cleanup = FALSE;
1.61 +static gboolean seen_test_int1 = FALSE;
1.62 +static gboolean seen_test_int2 = FALSE;
1.63 +static gboolean seen_thread1 = FALSE;
1.64 +static gboolean seen_thread2 = FALSE;
1.65 +
1.66 +/* --- functions --- */
1.67 +static void
1.68 +my_test_init (GTest * test)
1.69 +{
1.70 + g_print ("init %p\n", test);
1.71 +
1.72 + test->value = 0;
1.73 + test->test_pointer1 = TEST_POINTER1;
1.74 + test->test_pointer2 = TEST_POINTER2;
1.75 +}
1.76 +
1.77 +enum {
1.78 + ARG_0,
1.79 + ARG_TEST_PROP
1.80 +};
1.81 +
1.82 +static void
1.83 +my_test_set_property (GObject *object,
1.84 + guint prop_id,
1.85 + const GValue *value,
1.86 + GParamSpec *pspec)
1.87 +{
1.88 + GTest *test = MY_TEST (object);
1.89 + switch (prop_id)
1.90 + {
1.91 + case ARG_TEST_PROP:
1.92 + test->value = g_value_get_int (value);
1.93 + break;
1.94 + default:
1.95 + G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
1.96 + break;
1.97 + }
1.98 +}
1.99 +
1.100 +static void
1.101 +my_test_get_property (GObject *object,
1.102 + guint prop_id,
1.103 + GValue *value,
1.104 + GParamSpec *pspec)
1.105 +{
1.106 + GTest *test = MY_TEST (object);
1.107 + switch (prop_id)
1.108 + {
1.109 + case ARG_TEST_PROP:
1.110 + g_value_set_int (value, test->value);
1.111 + break;
1.112 + default:
1.113 + G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
1.114 + break;
1.115 + }
1.116 +}
1.117 +
1.118 +static void
1.119 +my_test_test_signal2 (GTest *test,
1.120 + gint an_int)
1.121 +{
1.122 +}
1.123 +
1.124 +static void
1.125 +my_test_emit_test_signal1 (GTest *test,
1.126 + gint vint)
1.127 +{
1.128 + g_signal_emit (G_OBJECT (test), test_signal1, 0, vint);
1.129 +}
1.130 +
1.131 +static void
1.132 +my_test_emit_test_signal2 (GTest *test,
1.133 + gint vint)
1.134 +{
1.135 + g_signal_emit (G_OBJECT (test), test_signal2, 0, vint);
1.136 +}
1.137 +
1.138 +static void
1.139 +my_test_class_init (GTestClass *klass)
1.140 +{
1.141 + GObjectClass *gobject_class = G_OBJECT_CLASS (klass);
1.142 +
1.143 + gobject_class->set_property = my_test_set_property;
1.144 + gobject_class->get_property = my_test_get_property;
1.145 +
1.146 + test_signal1 = g_signal_new ("test-signal1", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
1.147 + G_STRUCT_OFFSET (GTestClass, test_signal1), NULL, NULL,
1.148 + g_cclosure_marshal_VOID__INT, G_TYPE_NONE, 1, G_TYPE_INT);
1.149 + test_signal2 = g_signal_new ("test-signal2", G_TYPE_FROM_CLASS (klass), G_SIGNAL_RUN_LAST,
1.150 + G_STRUCT_OFFSET (GTestClass, test_signal2), NULL, NULL,
1.151 + g_cclosure_marshal_VOID__INT, G_TYPE_NONE, 1, G_TYPE_INT);
1.152 +
1.153 + g_object_class_install_property (G_OBJECT_CLASS (klass), ARG_TEST_PROP,
1.154 + g_param_spec_int ("test-prop", "Test Prop", "Test property",
1.155 + 0, 1, 0, G_PARAM_READWRITE));
1.156 + klass->test_signal2 = my_test_test_signal2;
1.157 +}
1.158 +
1.159 +static inline guint32
1.160 +quick_rand32 (void)
1.161 +{
1.162 + static guint32 accu = 2147483563;
1.163 + accu = 1664525 * accu + 1013904223;
1.164 + return accu;
1.165 +}
1.166 +
1.167 +static void
1.168 +test_closure (GClosure *closure)
1.169 +{
1.170 + /* try to produce high contention in closure->ref_count */
1.171 + guint i = 0, n = quick_rand32() % 199;
1.172 + for (i = 0; i < n; i++)
1.173 + g_closure_ref (closure);
1.174 + g_closure_sink (closure); /* NOP */
1.175 + for (i = 0; i < n; i++)
1.176 + g_closure_unref (closure);
1.177 +}
1.178 +
1.179 +static gpointer
1.180 +thread1_main (gpointer data)
1.181 +{
1.182 + GClosure *closure = data;
1.183 + while (!stopping)
1.184 + {
1.185 + static guint count = 0;
1.186 + test_closure (closure);
1.187 + if (++count % 10 == 0)
1.188 + {
1.189 + g_printerr ("c");
1.190 + g_thread_yield(); /* force context switch */
1.191 + seen_thread1 = TRUE;
1.192 + }
1.193 + }
1.194 + return NULL;
1.195 +}
1.196 +
1.197 +static gpointer
1.198 +thread2_main (gpointer data)
1.199 +{
1.200 + GClosure *closure = data;
1.201 + while (!stopping)
1.202 + {
1.203 + static guint count = 0;
1.204 + test_closure (closure);
1.205 + if (++count % 10 == 0)
1.206 + {
1.207 + g_printerr ("C");
1.208 + g_thread_yield(); /* force context switch */
1.209 + seen_thread2 = TRUE;
1.210 + }
1.211 + }
1.212 + return NULL;
1.213 +}
1.214 +
1.215 +static void
1.216 +test_signal_handler (GTest *test,
1.217 + gint vint,
1.218 + gpointer data)
1.219 +{
1.220 + g_assert (data == TEST_POINTER2);
1.221 + g_assert (test->test_pointer1 == TEST_POINTER1);
1.222 + seen_signal_handler = TRUE;
1.223 + seen_test_int1 |= vint == TEST_INT1;
1.224 + seen_test_int2 |= vint == TEST_INT2;
1.225 +}
1.226 +
1.227 +static void
1.228 +destroy_data (gpointer data,
1.229 + GClosure *closure)
1.230 +{
1.231 + seen_cleanup = data == TEST_POINTER2;
1.232 + g_assert (closure->ref_count == 0);
1.233 +}
1.234 +
1.235 +static void
1.236 +test_emissions (GTest *test)
1.237 +{
1.238 + my_test_emit_test_signal1 (test, TEST_INT1);
1.239 + my_test_emit_test_signal2 (test, TEST_INT2);
1.240 +}
1.241 +
1.242 +int
1.243 +main (int argc,
1.244 + char **argv)
1.245 +{
1.246 + GThread *thread1, *thread2;
1.247 + GClosure *closure;
1.248 + GTest *object;
1.249 + guint i;
1.250 +
1.251 + #ifdef __SYMBIAN32__
1.252 + 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);
1.253 + g_set_print_handler(mrtPrintHandler);
1.254 + #endif /*__SYMBIAN32__*/
1.255 + g_thread_init (NULL);
1.256 + g_print ("START: %s\n", argv[0]);
1.257 + g_log_set_always_fatal (G_LOG_LEVEL_WARNING | G_LOG_LEVEL_CRITICAL | g_log_set_always_fatal (G_LOG_FATAL_MASK));
1.258 + g_type_init ();
1.259 +
1.260 + object = g_object_new (G_TYPE_TEST, NULL);
1.261 + closure = g_cclosure_new (G_CALLBACK (test_signal_handler), TEST_POINTER2, destroy_data);
1.262 +
1.263 + g_signal_connect_closure (object, "test-signal1", closure, FALSE);
1.264 + g_signal_connect_closure (object, "test-signal2", closure, FALSE);
1.265 +
1.266 + stopping = FALSE;
1.267 +
1.268 + thread1 = g_thread_create (thread1_main, closure, TRUE, NULL);
1.269 + thread2 = g_thread_create (thread2_main, closure, TRUE, NULL);
1.270 +
1.271 + for (i = 0; i < 100; i++)
1.272 + {
1.273 + static guint count = 0;
1.274 + test_emissions (object);
1.275 + if (++count % 10 == 0)
1.276 + {
1.277 + g_printerr (".\n");
1.278 + g_thread_yield(); /* force context switch */
1.279 + }
1.280 + }
1.281 +
1.282 + stopping = TRUE;
1.283 + g_print ("\nstopping\n");
1.284 +
1.285 + /* wait for thread shutdown */
1.286 + g_thread_join (thread1);
1.287 + g_thread_join (thread2);
1.288 +
1.289 + /* finalize object, destroy signals, run cleanup code */
1.290 + g_object_unref (object);
1.291 +
1.292 + g_print ("stopped\n");
1.293 +
1.294 + g_assert (seen_thread1 != FALSE);
1.295 + g_assert (seen_thread2 != FALSE);
1.296 + g_assert (seen_test_int1 != FALSE);
1.297 + g_assert (seen_test_int2 != FALSE);
1.298 + g_assert (seen_signal_handler != FALSE);
1.299 + g_assert (seen_cleanup != FALSE);
1.300 + #if __SYMBIAN32__
1.301 + testResultXml("closures");
1.302 + #endif /* EMULATOR */
1.303 +
1.304 + return 0;
1.305 +}