(no commit message)
[oweals/gnunet.git] / src / transport / test_transport_ats.c
index ed4f280f6b87a04223ba8cb6004bb1223afc414a..57110d5e51741f77e51a5505f51028919b6439b9 100644 (file)
      Boston, MA 02111-1307, USA.
 */
 /**
- * @file testing/test_testing_group.c
- * @brief testcase for functions to connect peers in testing.c
+ * @file testing/test_transport_ats.c
+ * @brief testcase for ats functionality without starting peers
  */
 #include "platform.h"
-#include "gnunet_testing_lib.h"
-#include "gnunet_scheduler_lib.h"
+#include "gnunet-service-transport_ats.h"
+#include "gnunet_configuration_lib.h"
+#include "gnunet_crypto_lib.h"
 
 #define VERBOSE GNUNET_YES
 
-#define NUM_PEERS 4
+static struct ATS_Handle * ats;
+static struct GNUNET_CONFIGURATION_Handle * cfg;
 
-#define DELAY GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 5)
-
-/**
- * How long until we give up on connecting the peers?
- */
-#define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 300)
-
-static int ok;
-
-static int peers_left;
+void ats_result_cb ()
+{
+  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+      "ATS Result callback\n");
+}
 
-static int failed_peers;
+struct TransportConfiguration
+{
+  int peers;
+  int mechanisms;
 
-static struct GNUNET_TESTING_PeerGroup *pg;
+  struct ATS_peer * p_head;
+  struct ATS_peer * p_tail;
 
-static  GNUNET_SCHEDULER_TaskIdentifier task;
+  struct ATS_mechanism * m_head;
+  struct ATS_mechanism * m_tail;
+};
 
+struct TransportConfiguration *tc;
 
-/**
- * Check whether peers successfully shut down.
- */
-void
-shutdown_callback (void *cls, const char *emsg)
+/*
+void create_topology (int c_peers, int c_mechanisms)
 {
-  if (emsg != NULL)
+  int c;
+  peers = GNUNET_malloc ( c_peers * sizeof (struct ATS_peer));
+  for (c=0 ; c<c_peers; c++)
     {
-#if VERBOSE
-      GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Shutdown of peers failed!\n");
-#endif
-      if (ok == 0)
-        ok = 666;
+      peers[c].f = 1.0 / c_peers;
+      GNUNET_CRYPTO_hash_create_random (GNUNET_CRYPTO_QUALITY_WEAK, &peers[c].peer.hashPubKey);
+      GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Peer %s \n", GNUNET_i2s (&peers[c].peer));
+      peers[c].m_head = NULL;
+      peers[c].m_tail = NULL;
     }
-  else
+  mechanisms = GNUNET_malloc ( c_mechanisms * sizeof (struct ATS_mechanism));
+  for (c=0 ; c<c_mechanisms; c++)
     {
-#if VERBOSE
-      GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
-                  "All peers successfully shut down!\n");
-#endif
+       mechanisms[c].peer = &peers[c];
     }
 }
 
-static void shutdown_peers()
+
+void delete_topology (void)
 {
-    GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &shutdown_callback, NULL);
-}
+  GNUNET_free (peers);
+  GNUNET_free (mechanisms);
+}*/
 
-void
-delay_task (void *cls,
-                         const struct GNUNET_SCHEDULER_TaskContext *tc)
+
+void create_ats_information (struct ATS_peer **p, int * c_p,
+                             struct ATS_mechanism ** m, int * c_m)
 {
-       task = GNUNET_SCHEDULER_NO_TASK;
-       if ( (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN) != 0)
-           return;
 
-#if VERBOSE
-       GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Delay over\n");
+  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+      "ATS needs addresses\n");
+
+ (*p) = tc->p_head;
+ (*c_p) = tc->mechanisms;
+ (*m) = tc->m_head;
+ (*c_m) = tc->mechanisms;
+
+}
+
+int run_ats (void)
+{
+  int ret = 0;
+#if HAVE_LIBGLPK
+  ats_calculate_bandwidth_distribution (ats);
 #endif
-       shutdown_peers ();
+  GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+              "Running ATS: %s \n", (ret==0)? "SUCCESSFUL": "FAILED");
+  return ret;
 }
 
-static void connect_peers()
+int init_ats (void)
 {
-    GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Connecting peers!\n");
+  int ret = 0;
+#if HAVE_LIBGLPK
+  ats = ats_init(1.0, 1.0, 1.0, 50000, 5, 10, ATS_MAX_EXEC_DURATION,
+                create_ats_information,
+                ats_result_cb);
+#endif
+  //GNUNET_assert (ats != NULL);
+
+  GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+              "Initializing ATS: %s \n", (ret==0)? "SUCCESSFUL": "FAILED");
+  return ret;
+}
 
-    task = GNUNET_SCHEDULER_add_delayed(DELAY, &delay_task, NULL);
 
+int shutdown_ats (void)
+{
+  int ret = 0;
+#if HAVE_LIBGLPK
+  ats_delete_problem (ats);
+  ats_shutdown (ats);
+#endif
+  GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+              "Shutdown ATS: %s \n", (ret==0)? "SUCCESSFUL": "FAILED");
+  return ret;
+}
 
-    //GNUNET_TESTING_daemons_connect();
-       //shutdown_peers();
+/* To make compiler happy */
+void dummy(void)
+{
+  struct ATS_quality_metric * q = qm;
+  q = NULL;
+  struct ATS_ressource * r = ressources;
+  r = NULL;
+}
 
+void iterate_peer_values (void *cls,
+                      const char *section,
+                      const char *option,
+                      const char *value)
+{
+  if (strcmp (option, "f") == 0)
+    GNUNET_log (GNUNET_ERROR_TYPE_INFO,
+                "\t %s %s\n", option, value);
 }
 
-static void
-my_cb (void *cls,
-       const struct GNUNET_PeerIdentity *id,
-       const struct GNUNET_CONFIGURATION_Handle *cfg,
-       struct GNUNET_TESTING_Daemon *d, const char *emsg)
+void iterate_mech_values (void *cls,
+                      const char *section,
+                      const char *option,
+                      const char *value)
 {
-  if (id == NULL)
-    {
-      GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
-                  "Start callback called with error (too long starting peers), aborting test!\n");
-      GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Error from testing: `%s'\n");
-      failed_peers++;
-      if (failed_peers == peers_left)
-        {
-          GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
-                      "Too many peers failed, ending test!\n");
-          ok = 1;
-          GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &shutdown_callback, NULL);
-        }
-      return;
-    }
+  if (strcmp (option, "f") == 0)
+    GNUNET_log (GNUNET_ERROR_TYPE_INFO,
+                "\t %s %s\n", option, value);
+}
 
-  peers_left--;
-  if (peers_left == 0)
+void iterate_sections (void *cls,
+                        const char *section)
+{
+  struct TransportConfiguration * tc = cls;
+  /* Peer definition */
+  if (99 == strlen(section))
     {
-      GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
-                  "All peers started successfully!\n");
-      connect_peers();
-      ok = 0;
+      GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Peer '%s`\n", section);
+      GNUNET_HashCode h;
+      int res =GNUNET_CRYPTO_hash_from_string(section, &h);
+      GNUNET_log (GNUNET_ERROR_TYPE_INFO, "HASH '%s` %i\n", GNUNET_h2s (&h), res);
+      GNUNET_CONFIGURATION_iterate_section_values(cfg, section, iterate_peer_values, NULL);
+      tc->peers++;
     }
-  else if (failed_peers == peers_left)
+  if (10 == strlen(section))
     {
-      GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
-                  "Too many peers failed, ending test!\n");
-      GNUNET_TESTING_daemons_stop (pg, TIMEOUT, &shutdown_callback, NULL);
-      ok = 1;
+      GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Mechanism '%s`\n",section);
+      GNUNET_CONFIGURATION_iterate_section_values(cfg, section, iterate_mech_values, NULL);
+      tc->peers++;
     }
 }
 
-
-static void
-run (void *cls,
-     char *const *args,
-     const char *cfgfile, const struct GNUNET_CONFIGURATION_Handle *cfg)
+void destroy_transport_configuration (char * filename)
 {
-  ok = 1;
-#if VERBOSE
-  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Starting %i peers.\n", NUM_PEERS);
-#endif
-  peers_left = NUM_PEERS;
-  pg = GNUNET_TESTING_daemons_start (cfg,
-                                     peers_left, /* Total number of peers */
-                                     peers_left, /* Number of outstanding connections */
-                                     peers_left, /* Number of parallel ssh connections, or peers being started at once */
-                                     TIMEOUT,
-                                     NULL, NULL,
-                                     &my_cb, NULL, NULL, NULL, NULL);
-  GNUNET_assert (pg != NULL);
+  GNUNET_CONFIGURATION_destroy (cfg);
+
 }
 
-static int
-check ()
+struct TransportConfiguration * load_transport_configuration (char * filename)
 {
-  char *const argv[] = { "test-testing",
-    "-c",
-    "test_testing_data.conf",
-#if VERBOSE
-    "-L", "DEBUG",
-#endif
-    NULL
-  };
-  struct GNUNET_GETOPT_CommandLineOption options[] = {
-    GNUNET_GETOPT_OPTION_END
-  };
-  GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1,
-                      argv, "test-testing-group", "nohelp",
-                      options, &run, &ok);
-  return ok;
+  struct TransportConfiguration * ret = GNUNET_malloc(sizeof (struct TransportConfiguration));
+  cfg = GNUNET_CONFIGURATION_create();
+  GNUNET_CONFIGURATION_load(cfg, filename);
+  GNUNET_CONFIGURATION_iterate_sections(cfg, iterate_sections, ret);
+
+  return ret;
 }
 
 int
 main (int argc, char *argv[])
 {
-  int ret;
+  int ret = 0;
 
-  GNUNET_log_setup ("test-testing-group",
+  GNUNET_log_setup ("test-transport-ats",
 #if VERBOSE
                     "DEBUG",
 #else
-                    "WARNING",
+                    "INFO",
 #endif
                     NULL);
-  ret = check ();
-  /**
-   * Still need to remove the base testing directory here,
-   * because group starts will create subdirectories under this
-   * main dir.  However, we no longer need to sleep, as the
-   * shutdown sequence won't return until everything is cleaned
-   * up.
-   */
-  GNUNET_DISK_directory_remove ("/tmp/test-gnunet-testing");
+#if !HAVE_LIBGLPK
+  GNUNET_log (GNUNET_ERROR_TYPE_INFO,
+              "HAVE_LIBGLPK not set, exiting testcase\n");
+#endif
+
+#if !HAVE_LIBGLPK
   return ret;
+#endif
+
+  return 0;
+
+  tc = load_transport_configuration ("test.ats");
+
+  return ret;
+
+  /* Testing */
+  ats = NULL;
+
+  ret += init_ats ();
+  ret += run_ats ();
+  ret += shutdown_ats ();
+
+  /* Shutdown */
+  return ret;
+
 }
 
-/* end of test_testing_group.c */
+/* end of test_transport_ats.c*/