/* 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;

 }