Move a pair of gobject tests to tests/gobject/

testgobject.c and timeloop-closure.c are the only two tests in the
toplevel tests/ directory that depend on gobject, so move them to
tests/gobject/ along with the other gobject tests.

Both of these were in noinst_PROGRAMS and not TESTS, so keep them that
way when we move them.

3 files changed, 654 insertions, 1 deletions

diff --git a/tests/gobject/Makefile.am b/tests/gobject/Makefile.am
index 7748dd141..e58b1589b 100644
--- a/tests/gobject/Makefile.am
+++ b/tests/gobject/Makefile.am
@@ -70,7 +70,11 @@ performance_programs = 				\
 performance_LDADD = $(libgobject) $(libgthread)
 performance_threaded_LDADD = $(libgobject) $(libgthread)
 check_PROGRAMS = $(test_programs)
-noinst_PROGRAMS = $(performance_programs)
+noinst_PROGRAMS = $(performance_programs) testgobject
+
+if ENABLE_TIMELOOP
+noinst_PROGRAMS += timeloop-closure
+endif
 
 TESTS = $(test_programs) $(performance_programs)
 TESTS_ENVIRONMENT = srcdir=$(srcdir) \
diff --git a/tests/gobject/testgobject.c b/tests/gobject/testgobject.c
new file mode 100644
index 000000000..39e10d165
--- /dev/null
+++ b/tests/gobject/testgobject.c
@@ -0,0 +1,429 @@
+/* GObject - GLib Type, Object, Parameter and Signal Library
+ * Copyright (C) 2001 Red Hat, Inc.
+ *
+ * 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.
+ */
+
+#include <string.h>
+
+#undef	G_LOG_DOMAIN
+#define	G_LOG_DOMAIN "TestObject"
+#include	<glib-object.h>
+
+/* --- TestIface --- */
+#define TEST_TYPE_IFACE           (test_iface_get_type ())
+#define TEST_IFACE(obj)		  (G_TYPE_CHECK_INSTANCE_CAST ((obj), TEST_TYPE_IFACE, TestIface))
+#define TEST_IS_IFACE(obj)	  (G_TYPE_CHECK_INSTANCE_TYPE ((obj), TEST_TYPE_IFACE))
+#define TEST_IFACE_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_INTERFACE ((obj), TEST_TYPE_IFACE, TestIfaceClass))
+typedef struct _TestIface      TestIface;
+typedef struct _TestIfaceClass TestIfaceClass;
+struct _TestIfaceClass
+{
+  GTypeInterface base_iface;
+  void	(*print_string)	(TestIface	*tiobj,
+			 const gchar	*string);
+};
+static void	iface_base_init		(TestIfaceClass	*iface);
+static void	iface_base_finalize	(TestIfaceClass	*iface);
+static void	print_foo		(TestIface	*tiobj,
+					 const gchar	*string);
+static GType
+test_iface_get_type (void)
+{
+  static GType test_iface_type = 0;
+
+  if (!test_iface_type)
+    {
+      const GTypeInfo test_iface_info =
+      {
+	sizeof (TestIfaceClass),
+	(GBaseInitFunc)	iface_base_init,		/* base_init */
+	(GBaseFinalizeFunc) iface_base_finalize,	/* base_finalize */
+      };
+
+      test_iface_type = g_type_register_static (G_TYPE_INTERFACE, "TestIface", &test_iface_info, 0);
+      g_type_interface_add_prerequisite (test_iface_type, G_TYPE_OBJECT);
+    }
+
+  return test_iface_type;
+}
+static guint iface_base_init_count = 0;
+static void
+iface_base_init (TestIfaceClass *iface)
+{
+  iface_base_init_count++;
+  if (iface_base_init_count == 1)
+    {
+      /* add signals here */
+    }
+}
+static void
+iface_base_finalize (TestIfaceClass *iface)
+{
+  iface_base_init_count--;
+  if (iface_base_init_count == 0)
+    {
+      /* destroy signals here */
+    }
+}
+static void
+print_foo (TestIface   *tiobj,
+	   const gchar *string)
+{
+  if (!string)
+    string = "<NULL>";
+  g_print ("Iface-FOO: \"%s\" from %p\n", string, tiobj);
+}
+static void
+test_object_test_iface_init (gpointer giface,
+			     gpointer iface_data)
+{
+  TestIfaceClass *iface = giface;
+
+  g_assert (iface_data == GUINT_TO_POINTER (42));
+
+  g_assert (G_TYPE_FROM_INTERFACE (iface) == TEST_TYPE_IFACE);
+
+  /* assert iface_base_init() was already called */
+  g_assert (iface_base_init_count > 0);
+
+  /* initialize stuff */
+  iface->print_string = print_foo;
+}
+static void
+iface_print_string (TestIface   *tiobj,
+		    const gchar *string)
+{
+  TestIfaceClass *iface;
+
+  g_return_if_fail (TEST_IS_IFACE (tiobj));
+  g_return_if_fail (G_IS_OBJECT (tiobj)); /* ensured through prerequisite */
+
+  iface = TEST_IFACE_GET_CLASS (tiobj);
+  g_object_ref (tiobj);
+  iface->print_string (tiobj, string);
+  g_object_unref (tiobj);
+}
+
+
+/* --- TestObject --- */
+#define TEST_TYPE_OBJECT            (test_object_get_type ())
+#define TEST_OBJECT(object)         (G_TYPE_CHECK_INSTANCE_CAST ((object), TEST_TYPE_OBJECT, TestObject))
+#define TEST_OBJECT_CLASS(klass)    (G_TYPE_CHECK_CLASS_CAST ((klass), TEST_TYPE_OBJECT, TestObjectClass))
+#define TEST_IS_OBJECT(object)      (G_TYPE_CHECK_INSTANCE_TYPE ((object), TEST_TYPE_OBJECT))
+#define TEST_IS_OBJECT_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE ((klass), TEST_TYPE_OBJECT))
+#define TEST_OBJECT_GET_CLASS(obj)  (G_TYPE_INSTANCE_GET_CLASS ((obj), TEST_TYPE_OBJECT, TestObjectClass))
+#define TEST_OBJECT_GET_PRIVATE(o)  (G_TYPE_INSTANCE_GET_PRIVATE ((o), TEST_TYPE_OBJECT, TestObjectPrivate))
+typedef struct _TestObject        TestObject;
+typedef struct _TestObjectClass   TestObjectClass;
+typedef struct _TestObjectPrivate TestObjectPrivate;
+struct _TestObject
+{
+  GObject parent_instance;
+};
+struct _TestObjectClass
+{
+  GObjectClass parent_class;
+
+  gchar* (*test_signal) (TestObject *tobject,
+			 TestIface  *iface_object,
+			 gpointer    tdata);
+};
+struct _TestObjectPrivate
+{
+  int     dummy1;
+  gdouble dummy2;
+};
+static void	test_object_class_init	(TestObjectClass	*class);
+static void	test_object_init	(TestObject		*tobject);
+static gboolean	test_signal_accumulator	(GSignalInvocationHint	*ihint,
+					 GValue            	*return_accu,
+					 const GValue       	*handler_return,
+					 gpointer                data);
+static gchar*	test_object_test_signal	(TestObject		*tobject,
+					 TestIface		*iface_object,
+					 gpointer		 tdata);
+static GType
+test_object_get_type (void)
+{
+  static GType test_object_type = 0;
+
+  if (!test_object_type)
+    {
+      const GTypeInfo test_object_info =
+      {
+	sizeof (TestObjectClass),
+	NULL,           /* base_init */
+	NULL,           /* base_finalize */
+	(GClassInitFunc) test_object_class_init,
+	NULL,           /* class_finalize */
+	NULL,           /* class_data */
+	sizeof (TestObject),
+	5,              /* n_preallocs */
+	(GInstanceInitFunc) test_object_init,
+      };
+      GInterfaceInfo iface_info = { test_object_test_iface_init, NULL, GUINT_TO_POINTER (42) };
+
+      test_object_type = g_type_register_static (G_TYPE_OBJECT, "TestObject", &test_object_info, 0);
+      g_type_add_interface_static (test_object_type, TEST_TYPE_IFACE, &iface_info);
+    }
+
+  return test_object_type;
+}
+static void
+test_object_class_init (TestObjectClass *class)
+{
+  /*  GObjectClass *gobject_class = G_OBJECT_CLASS (class); */
+
+  class->test_signal = test_object_test_signal;
+
+  g_signal_new ("test-signal",
+		G_OBJECT_CLASS_TYPE (class),
+		G_SIGNAL_RUN_FIRST | G_SIGNAL_RUN_LAST | G_SIGNAL_RUN_CLEANUP,
+		G_STRUCT_OFFSET (TestObjectClass, test_signal),
+		test_signal_accumulator, NULL,
+		g_cclosure_marshal_STRING__OBJECT_POINTER,
+		G_TYPE_STRING, 2, TEST_TYPE_IFACE, G_TYPE_POINTER);
+
+  g_type_class_add_private (class, sizeof (TestObjectPrivate));
+}
+static void
+test_object_init (TestObject *tobject)
+{
+  TestObjectPrivate *priv;
+
+  priv = TEST_OBJECT_GET_PRIVATE (tobject);
+
+  g_assert (priv);
+  g_assert ((gchar *)priv >= (gchar *)tobject + sizeof (TestObject));
+
+  priv->dummy1 = 54321;
+}
+/* Check to see if private data initialization in the
+ * instance init function works.
+ */
+static void
+test_object_check_private_init (TestObject *tobject)
+{
+  TestObjectPrivate *priv;
+
+  priv = TEST_OBJECT_GET_PRIVATE (tobject);
+
+  g_print ("private data during initialization: %u == %u\n", priv->dummy1, 54321);
+  g_assert (priv->dummy1 == 54321);
+}
+static gboolean
+test_signal_accumulator (GSignalInvocationHint *ihint,
+			 GValue                *return_accu,
+			 const GValue          *handler_return,
+			 gpointer               data)
+{
+  const gchar *accu_string = g_value_get_string (return_accu);
+  const gchar *new_string = g_value_get_string (handler_return);
+  gchar *result_string;
+
+  if (accu_string)
+    result_string = g_strconcat (accu_string, new_string, NULL);
+  else if (new_string)
+    result_string = g_strdup (new_string);
+  else
+    result_string = NULL;
+
+  g_value_take_string (return_accu, result_string);
+
+  return TRUE;
+}
+static gchar*
+test_object_test_signal (TestObject *tobject,
+			 TestIface  *iface_object,
+			 gpointer    tdata)
+{
+  g_message ("::test_signal default_handler called");
+
+  g_return_val_if_fail (TEST_IS_IFACE (iface_object), NULL);
+  
+  return g_strdup ("<default_handler>");
+}
+
+
+/* --- TestIface for DerivedObject --- */
+static void
+print_bar (TestIface   *tiobj,
+	   const gchar *string)
+{
+  TestIfaceClass *parent_iface;
+
+  g_return_if_fail (TEST_IS_IFACE (tiobj));
+
+  if (!string)
+    string = "<NULL>";
+  g_print ("Iface-BAR: \"%s\" from %p\n", string, tiobj);
+
+  g_print ("chaining: ");
+  parent_iface = g_type_interface_peek_parent (TEST_IFACE_GET_CLASS (tiobj));
+  parent_iface->print_string (tiobj, string);
+
+  g_assert (g_type_interface_peek_parent (parent_iface) == NULL);
+}
+
+static void
+derived_object_test_iface_init (gpointer giface,
+				gpointer iface_data)
+{
+  TestIfaceClass *iface = giface;
+
+  g_assert (iface_data == GUINT_TO_POINTER (87));
+
+  g_assert (G_TYPE_FROM_INTERFACE (iface) == TEST_TYPE_IFACE);
+
+  /* assert test_object_test_iface_init() was already called */
+  g_assert (iface->print_string == print_foo);
+
+  /* override stuff */
+  iface->print_string = print_bar;
+}
+
+
+/* --- DerivedObject --- */
+#define DERIVED_TYPE_OBJECT            (derived_object_get_type ())
+#define DERIVED_OBJECT(object)         (G_TYPE_CHECK_INSTANCE_CAST ((object), DERIVED_TYPE_OBJECT, DerivedObject))
+#define DERIVED_OBJECT_CLASS(klass)    (G_TYPE_CHECK_CLASS_CAST ((klass), DERIVED_TYPE_OBJECT, DerivedObjectClass))
+#define DERIVED_IS_OBJECT(object)      (G_TYPE_CHECK_INSTANCE_TYPE ((object), DERIVED_TYPE_OBJECT))
+#define DERIVED_IS_OBJECT_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE ((klass), DERIVED_TYPE_OBJECT))
+#define DERIVED_OBJECT_GET_CLASS(obj)  (G_TYPE_INSTANCE_GET_CLASS ((obj), DERIVED_TYPE_OBJECT, DerivedObjectClass))
+#define DERIVED_OBJECT_GET_PRIVATE(o)  (G_TYPE_INSTANCE_GET_PRIVATE ((o), DERIVED_TYPE_OBJECT, DerivedObjectPrivate))
+typedef struct _DerivedObject        DerivedObject;
+typedef struct _TestObjectClass      DerivedObjectClass;
+typedef struct _DerivedObjectPrivate DerivedObjectPrivate;
+struct _DerivedObject
+{
+  TestObject parent_instance;
+  int  dummy1;
+  int  dummy2;
+};
+struct _DerivedObjectPrivate
+{
+  char dummy;
+};
+static void derived_object_class_init (DerivedObjectClass *class);
+static void derived_object_init       (DerivedObject      *dobject);
+static GType
+derived_object_get_type (void)
+{
+  static GType derived_object_type = 0;
+
+  if (!derived_object_type)
+    {
+      const GTypeInfo derived_object_info =
+      {
+	sizeof (DerivedObjectClass),
+	NULL,           /* base_init */
+	NULL,           /* base_finalize */
+	(GClassInitFunc) derived_object_class_init,
+	NULL,           /* class_finalize */
+	NULL,           /* class_data */
+	sizeof (DerivedObject),
+	5,              /* n_preallocs */
+	(GInstanceInitFunc) derived_object_init,
+      };
+      GInterfaceInfo iface_info = { derived_object_test_iface_init, NULL, GUINT_TO_POINTER (87) };
+
+      derived_object_type = g_type_register_static (TEST_TYPE_OBJECT, "DerivedObject", &derived_object_info, 0);
+      g_type_add_interface_static (derived_object_type, TEST_TYPE_IFACE, &iface_info);
+    }
+
+  return derived_object_type;
+}
+static void
+derived_object_class_init (DerivedObjectClass *class)
+{
+  g_type_class_add_private (class, sizeof (DerivedObjectPrivate));
+}
+static void
+derived_object_init (DerivedObject *dobject)
+{
+  TestObjectPrivate *test_priv;
+  DerivedObjectPrivate *derived_priv;
+
+  derived_priv = DERIVED_OBJECT_GET_PRIVATE (dobject);
+
+  g_assert (derived_priv);
+  g_assert ((gchar *)derived_priv >= (gchar *)TEST_OBJECT_GET_PRIVATE (dobject) + sizeof (TestObjectPrivate));
+
+  test_priv = TEST_OBJECT_GET_PRIVATE (dobject);
+  
+  g_assert (test_priv);
+  g_assert ((gchar *)test_priv >= (gchar *)dobject + sizeof (TestObject));
+
+}
+
+/* --- main --- */
+int
+main (int   argc,
+      char *argv[])
+{
+  GTypeInfo info = { 0, };
+  GTypeFundamentalInfo finfo = { 0, };
+  GType type;
+  TestObject *sigarg;
+  DerivedObject *dobject;
+  TestObjectPrivate *priv;
+  gchar *string = NULL;
+
+  g_log_set_always_fatal (g_log_set_always_fatal (G_LOG_FATAL_MASK) |
+			  G_LOG_LEVEL_WARNING |
+			  G_LOG_LEVEL_CRITICAL);
+
+  /* test new fundamentals */
+  g_assert (G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST) == g_type_fundamental_next ());
+  type = g_type_register_fundamental (g_type_fundamental_next (), "FooShadow1", &info, &finfo, 0);
+  g_assert (type == G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST));
+  g_assert (G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST + 1) == g_type_fundamental_next ());
+  type = g_type_register_fundamental (g_type_fundamental_next (), "FooShadow2", &info, &finfo, 0);
+  g_assert (type == G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST + 1));
+  g_assert (G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST + 2) == g_type_fundamental_next ());
+  g_assert (g_type_from_name ("FooShadow1") == G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST));
+  g_assert (g_type_from_name ("FooShadow2") == G_TYPE_MAKE_FUNDAMENTAL (G_TYPE_RESERVED_USER_FIRST + 1));
+
+  /* to test past class initialization interface setups, create the class here */
+  g_type_class_ref (TEST_TYPE_OBJECT);
+
+  dobject = g_object_new (DERIVED_TYPE_OBJECT, NULL);
+  test_object_check_private_init (TEST_OBJECT (dobject));
+
+  sigarg = g_object_new (TEST_TYPE_OBJECT, NULL);
+
+  g_print ("MAIN: emit test-signal:\n");
+  g_signal_emit_by_name (dobject, "test-signal", sigarg, NULL, &string);
+  g_message ("signal return: \"%s\"", string);
+  g_assert (strcmp (string, "<default_handler><default_handler>") == 0);
+  g_free (string);
+
+  g_print ("MAIN: call iface print-string on test and derived object:\n");
+  iface_print_string (TEST_IFACE (sigarg), "iface-string-from-test-type");
+  iface_print_string (TEST_IFACE (dobject), "iface-string-from-derived-type");
+
+  priv = TEST_OBJECT_GET_PRIVATE (dobject);
+  g_print ("private data after initialization: %u == %u\n", priv->dummy1, 54321);
+  g_assert (priv->dummy1 == 54321);
+  
+  g_object_unref (sigarg);
+  g_object_unref (dobject);
+
+  g_message ("%s done", argv[0]);
+
+  return 0;
+}
diff --git a/tests/gobject/timeloop-closure.c b/tests/gobject/timeloop-closure.c
new file mode 100644
index 000000000..13ce7602f
--- /dev/null
+++ b/tests/gobject/timeloop-closure.c
@@ -0,0 +1,220 @@
+#undef G_DISABLE_ASSERT
+#undef G_LOG_DOMAIN
+
+#include <errno.h>
+#include <stdlib.h>
+#include <unistd.h>
+#include <stdio.h>
+#include <sys/time.h>
+#include <sys/resource.h>
+
+#include <glib.h>
+#include <glib-object.h>
+
+static int n_children = 3;
+static int n_active_children;
+static int n_iters = 10000;
+static GMainLoop *loop;
+
+static void
+io_pipe (GIOChannel **channels)
+{
+  int fds[2];
+
+  if (pipe(fds) < 0)
+    {
+      fprintf (stderr, "Cannot create pipe %s\n", g_strerror (errno));
+      exit (1);
+    }
+
+  channels[0] = g_io_channel_unix_new (fds[0]);
+  channels[1] = g_io_channel_unix_new (fds[1]);
+}
+
+static gboolean
+read_all (GIOChannel *channel, char *buf, int len)
+{
+  gsize bytes_read = 0;
+  gsize count;
+  GIOError err;
+
+  while (bytes_read < len)
+    {
+      err = g_io_channel_read (channel, buf + bytes_read, len - bytes_read, &count);
+      if (err)
+	{
+	  if (err != G_IO_ERROR_AGAIN)
+	    return FALSE;
+	}
+      else if (count == 0)
+	return FALSE;
+
+      bytes_read += count;
+    }
+
+  return TRUE;
+}
+
+static gboolean
+write_all (GIOChannel *channel, char *buf, int len)
+{
+  gsize bytes_written = 0;
+  gsize count;
+  GIOError err;
+
+  while (bytes_written < len)
+    {
+      err = g_io_channel_write (channel, buf + bytes_written, len - bytes_written, &count);
+      if (err && err != G_IO_ERROR_AGAIN)
+	return FALSE;
+
+      bytes_written += count;
+    }
+
+  return TRUE;
+}
+
+static void
+run_child (GIOChannel *in_channel, GIOChannel *out_channel)
+{
+  int i;
+  int val = 1;
+  GTimer *timer = g_timer_new();
+
+  for (i = 0; i < n_iters; i++)
+    {
+      write_all (out_channel, (char *)&val, sizeof (val));
+      read_all (in_channel, (char *)&val, sizeof (val));
+    }
+
+  val = 0;
+  write_all (out_channel, (char *)&val, sizeof (val));
+
+  val = g_timer_elapsed (timer, NULL) * 1000;
+  
+  write_all (out_channel, (char *)&val, sizeof (val));
+  g_timer_destroy (timer);
+
+  exit (0);
+}
+
+static gboolean
+input_callback (GIOChannel   *source,
+		GIOCondition  condition,
+		gpointer      data)
+{
+  int val;
+  GIOChannel *dest = (GIOChannel *)data;
+  
+  if (!read_all (source, (char *)&val, sizeof(val)))
+    {
+      fprintf (stderr, "Unexpected EOF\n");
+      exit (1);
+    }
+
+  if (val)
+    {
+      write_all (dest, (char *)&val, sizeof(val));
+      
+      return TRUE;
+    }
+  else
+    {
+      g_io_channel_close (source);
+      g_io_channel_close (dest);
+      
+      g_io_channel_unref (source);
+      g_io_channel_unref (dest);
+
+      n_active_children--;
+      if (n_active_children == 0)
+	g_main_loop_quit (loop);
+      
+      return FALSE;
+    }
+}
+
+static void
+create_child (void)
+{
+  int pid;
+  GIOChannel *in_channels[2];
+  GIOChannel *out_channels[2];
+  GSource *source;
+  
+  io_pipe (in_channels);
+  io_pipe (out_channels);
+
+  pid = fork ();
+
+  if (pid > 0)			/* Parent */
+    {
+      g_io_channel_close (in_channels[0]);
+      g_io_channel_close (out_channels[1]);
+
+      source = g_io_create_watch (out_channels[0], G_IO_IN | G_IO_HUP);
+      g_source_set_closure (source,
+			    g_cclosure_new (G_CALLBACK (input_callback), in_channels[1], NULL));
+      g_source_attach (source, NULL);
+    }
+  else if (pid == 0)		/* Child */
+    {
+      g_io_channel_close (in_channels[1]);
+      g_io_channel_close (out_channels[0]);
+
+      setsid ();
+
+      run_child (in_channels[0], out_channels[1]);
+    }
+  else				/* Error */
+    {
+      fprintf (stderr, "Cannot fork: %s\n", g_strerror (errno));
+      exit (1);
+    }
+}
+
+static double 
+difftimeval (struct timeval *old, struct timeval *new)
+{
+  return
+    (new->tv_sec - old->tv_sec) * 1000. + (new->tv_usec - old->tv_usec) / 1000;
+}
+
+int 
+main (int argc, char **argv)
+{
+  int i;
+  struct rusage old_usage;
+  struct rusage new_usage;
+
+  if (argc > 1)
+    n_children = atoi(argv[1]);
+
+  if (argc > 2)
+    n_iters = atoi(argv[2]);
+
+  printf ("Children: %d     Iters: %d\n", n_children, n_iters);
+
+  n_active_children = n_children;
+  for (i = 0; i < n_children; i++)
+    create_child ();
+
+  getrusage (RUSAGE_SELF, &old_usage);
+  loop = g_main_loop_new (NULL, FALSE);
+  g_main_loop_run (loop);
+  getrusage (RUSAGE_SELF, &new_usage);
+
+  printf ("Elapsed user: %g\n",
+	  difftimeval (&old_usage.ru_utime, &new_usage.ru_utime));
+  printf ("Elapsed system: %g\n",
+	  difftimeval (&old_usage.ru_stime, &new_usage.ru_stime));
+  printf ("Elapsed total: %g\n",
+	  difftimeval (&old_usage.ru_utime, &new_usage.ru_utime) +	   
+	  difftimeval (&old_usage.ru_stime, &new_usage.ru_stime));
+  printf ("total / iteration: %g\n",
+	  (difftimeval (&old_usage.ru_utime, &new_usage.ru_utime) +	   
+	   difftimeval (&old_usage.ru_stime, &new_usage.ru_stime)) /
+	  (n_iters * n_children));
+
+  return 0;
+}