--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/glib/tsrc/BC/tests/module-test.c	Tue Feb 02 02:01:42 2010 +0200
@@ -0,0 +1,143 @@
+/* module-test.c - test program for GMODULE
+ * Copyright (C) 1998 Tim Janik
+ * Portion Copyright © 2008-09 Nokia Corporation and/or its subsidiary(-ies). 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 <gmodule.h>
+#include <string.h>
+#include <stdio.h>
+
+#ifdef SYMBIAN
+#include "mrt2_glib2_test.h"
+#endif /*SYMBIAN*/
+
+
+typedef	int (*SimpleFunc) (void);
+
+int
+main (int   arg,
+      char *argv[])
+{
+  GModule *module_a, *module_b;
+  gchar *plugin_a, *plugin_b;
+  SimpleFunc f_a, f_b;
+  int retVal;
+  void *fun1,*fun2;
+  gchar *build_path = NULL;
+  gchar temp_build_path[100];
+  gchar *lib_name = "xyz";
+
+  #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*/
+	  
+
+  if (!g_module_supported ())
+    g_print ("dynamic modules not supported");
+ 
+  plugin_a  = "libmoduletestplugin_a.dll";
+  plugin_b  = "libmoduletestplugin_b.dll";
+  
+  build_path = g_module_build_path("c:\\sys\\bin",lib_name);
+  g_assert(!strcmp(build_path,"c:\\sys\\bin\\xyz.dll"));
+  g_free(build_path);
+  
+  build_path = g_module_build_path(NULL,lib_name);
+  g_assert(!strcmp(build_path,"xyz.dll"));
+  g_free(build_path);
+
+  /* module handles */
+
+  module_a = g_module_open (plugin_a, G_MODULE_BIND_LAZY);
+  if (!module_a)
+    g_print ("error: %s", g_module_error ());
+
+  module_b = g_module_open (plugin_b, G_MODULE_BIND_LAZY);
+  if (!module_b)
+    g_print ("error: %s", g_module_error ());
+
+  /* get plugin specific symbols and call them
+   */
+  if (!g_module_symbol (module_a, /*"gplugin_a_func1"*/"1", /*(gpointer *) &f_a*/&fun1))
+    g_print ("error: %s", g_module_error ());
+   
+  if (!g_module_symbol (module_b, /*"gplugin_b_func1"*/"1", /*(gpointer *) &f_b)*/&fun2))
+      g_print ("error: %s", g_module_error ());
+   
+  f_a = (SimpleFunc)fun1;
+  f_b = (SimpleFunc)fun2;
+  
+  retVal = f_a ();
+  g_assert(retVal == 1);
+  
+  retVal = f_b ();
+  g_assert(retVal == 1);
+  
+  if (!g_module_symbol (module_a, /*"gplugin_a_func2"*/"2", (gpointer *) &f_a))
+    g_print ("error: %s", g_module_error ());
+   
+  if (!g_module_symbol (module_b, /*"gplugin_b_func2"*/"2", (gpointer *) &f_b))
+    g_print ("error: %s", g_module_error ());
+  
+  retVal = f_a ();
+  g_assert(retVal == 2);
+  
+  retVal = f_b ();
+  g_assert(retVal == 2);
+  
+  //checks g_module_name
+  g_assert(!strcmp(g_module_name(module_a),"libmoduletestplugin_a.dll"));
+  
+  g_module_make_resident(module_a);
+  
+  /* unload plugins  */
+  
+  //g_module_close is ignored because g_module_make_resident(module_a) is called
+  if (!g_module_close (module_a))
+    g_print ("error: %s", g_module_error ());
+
+  if (!g_module_close (module_b))
+    g_print ("error: %s", g_module_error ());
+  
+  
+  // As g_module_make_resident(module_a) is called g_module_close is ignored and therefore
+  // we are able to get the symbol from the library and execute the funtion also
+  if (!g_module_symbol (module_a, /*"gplugin_a_func1"*/"1", /*(gpointer *) &f_a*/&fun1))
+    g_print ("error: %s", g_module_error ());
+      
+  f_a = (SimpleFunc)fun1;
+  
+  retVal = f_a ();
+  g_assert(retVal == 1);
+  
+  #ifdef SYMBIAN
+  testResultXml("module-test");
+  #endif /* EMULATOR */
+ 
+  return 0;
+}