--- /dev/null
+/*
+ This file is part of GNUnet.
+ (C) 2010-2013 Christian Grothoff (and other contributing authors)
+
+ GNUnet is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published
+ by the Free Software Foundation; either version 3, or (at your
+ option) any later version.
+
+ GNUnet 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
+ General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with GNUnet; see the file COPYING. If not, write to the
+ Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ Boston, MA 02111-1307, USA.
+ */
+/**
+ * @file ats/test_ats_solver_add_address.c
+ * @brief solver test: add address, request address and wait for suggest
+ * @author Christian Grothoff
+ * @author Matthias Wachs
+ * @author Fabian Oehlmann
+ */
+#include "platform.h"
+#include "gnunet_util_lib.h"
+#include "gnunet_testbed_service.h"
+#include "gnunet_ats_service.h"
+#include "test_ats_api_common.h"
+
+/**
+ * Timeout task
+ */
+static GNUNET_SCHEDULER_TaskIdentifier end_task;
+
+/**
+ * Statistics handle
+ */
+struct GNUNET_STATISTICS_Handle *stats;
+
+/**
+ * Scheduling handle
+ */
+static struct GNUNET_ATS_SchedulingHandle *sched_ats;
+
+/**
+ * Return value
+ */
+static int ret;
+
+/**
+ * Test address
+ */
+static struct Test_Address test_addr;
+
+/**
+ * Test peer
+ */
+static struct PeerContext p;
+
+/**
+ * HELLO address
+ */
+struct GNUNET_HELLO_Address test_hello_address;
+
+/**
+ * Session
+ */
+static void *test_session;
+
+/**
+ * Test ats info
+ */
+struct GNUNET_ATS_Information test_ats_info[2];
+
+/**
+ * Test ats count
+ */
+uint32_t test_ats_count;
+
+/**
+ * Seconds to run the test
+ */
+unsigned int seconds;
+
+/**
+ * When the test starts
+ */
+struct GNUNET_TIME_Absolute time_start;
+
+/**
+ * Whether to write a data file
+ */
+int write_data_file;
+
+/**
+ * File handle
+ */
+struct GNUNET_DISK_FileHandle *data_file_handle;
+
+/**
+ * File name
+ */
+char *data_file_name;
+
+static int
+stat_cb(void *cls, const char *subsystem, const char *name, uint64_t value,
+ int is_persistent);
+
+static void
+end (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
+{
+ GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Done!\n");
+ if (end_task == GNUNET_SCHEDULER_NO_TASK)
+ {
+ GNUNET_SCHEDULER_cancel (end_task);
+ end_task = GNUNET_SCHEDULER_NO_TASK;
+ }
+
+ if (NULL != sched_ats)
+ {
+ GNUNET_ATS_scheduling_done (sched_ats);
+ sched_ats = NULL;
+ }
+
+ GNUNET_STATISTICS_watch_cancel (stats, "ats", "# addresses", &stat_cb, NULL);
+ if (NULL != stats)
+ {
+ GNUNET_STATISTICS_destroy (stats, GNUNET_NO);
+ stats = NULL;
+ }
+
+ /* Close data file */
+ if (write_data_file)
+ {
+ if (GNUNET_SYSERR == GNUNET_DISK_file_close (data_file_handle))
+ GNUNET_log(GNUNET_ERROR_TYPE_ERROR, "Cannot close log file '%s'\n",
+ data_file_name);
+ GNUNET_free_non_null(data_file_name);
+ }
+
+ free_test_address (&test_addr);
+
+ ret = 0;
+}
+
+
+static void
+end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
+{
+ end (NULL, NULL);
+ ret = GNUNET_SYSERR;
+}
+
+static void
+address_suggest_cb (void *cls, const struct GNUNET_HELLO_Address *address,
+ struct Session *session,
+ struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out,
+ struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
+ const struct GNUNET_ATS_Information *atsi,
+ uint32_t ats_count)
+{
+ struct GNUNET_TIME_Relative time_delta;
+ char *data;
+
+ GNUNET_assert (NULL != address);
+ GNUNET_assert (NULL == session);
+ GNUNET_assert (ntohl(bandwidth_in.value__) > 0);
+ GNUNET_assert (ntohl(bandwidth_out.value__) > 0);
+
+ time_delta = GNUNET_TIME_absolute_get_difference(time_start, GNUNET_TIME_absolute_get());
+
+ GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Received suggestion for peer '%s': IN %lu - OUT %lu\n",
+ GNUNET_i2s (&address->peer), ntohl(bandwidth_in.value__)/1024, ntohl(bandwidth_out.value__)/1024);
+
+ if (write_data_file)
+ {
+ GNUNET_asprintf(&data,"%f\tIN %u\tOUT %u\n",
+ (double) time_delta.rel_value_us / 1000000.,
+ ntohl(bandwidth_in.value__)/1024,
+ ntohl(bandwidth_out.value__)/1024);
+ if (GNUNET_SYSERR == GNUNET_DISK_file_write(data_file_handle, data, strlen(data)))
+ GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot write data to file `%s'\n", data_file_name);
+ GNUNET_free(data);
+ }
+
+ return;
+}
+
+
+static int
+stat_cb(void *cls, const char *subsystem,
+ const char *name, uint64_t value,
+ int is_persistent)
+{
+
+ GNUNET_log (GNUNET_ERROR_TYPE_INFO, "ATS statistics: `%s' `%s' %llu\n",
+ subsystem,name, value);
+ GNUNET_ATS_suggest_address (sched_ats, &p.id);
+ return GNUNET_OK;
+}
+
+static void
+run (void *cls, const struct GNUNET_CONFIGURATION_Handle *mycfg,
+ struct GNUNET_TESTING_Peer *peer)
+{
+ stats = GNUNET_STATISTICS_create ("ats", mycfg);
+ GNUNET_STATISTICS_watch (stats, "ats", "# addresses", &stat_cb, NULL);
+
+
+ /* Connect to ATS scheduling */
+ sched_ats = GNUNET_ATS_scheduling_init (mycfg, &address_suggest_cb, NULL);
+ if (sched_ats == NULL)
+ {
+ GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Could not connect to ATS scheduling!\n");
+ GNUNET_SCHEDULER_add_now (&end_badly, NULL);
+ return;
+ }
+
+ /* Set up file handle */
+ GNUNET_asprintf (&data_file_name, "test_convergence_s%d.data", seconds);
+ data_file_handle = GNUNET_DISK_file_open (data_file_name,
+ GNUNET_DISK_OPEN_WRITE | GNUNET_DISK_OPEN_CREATE | GNUNET_DISK_OPEN_TRUNCATE,
+ GNUNET_DISK_PERM_USER_EXEC | GNUNET_DISK_PERM_USER_READ | GNUNET_DISK_PERM_USER_WRITE);
+ if (NULL == data_file_handle) {
+ GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Could not open data file\n");
+ GNUNET_free(data_file_handle);
+ GNUNET_free(data_file_name);
+ GNUNET_SCHEDULER_add_now (&end_badly, NULL);
+ return;
+ }
+
+ /* Set up peer */
+ memset (&p.id, '1', sizeof (p.id));
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Created peer `%s'\n",
+ GNUNET_i2s_full(&p.id));
+
+ /* Prepare ATS Information */
+ test_ats_info[0].type = htonl (GNUNET_ATS_NETWORK_TYPE);
+ test_ats_info[0].value = htonl(GNUNET_ATS_NET_WAN);
+ test_ats_info[1].type = htonl (GNUNET_ATS_QUALITY_NET_DISTANCE);
+ test_ats_info[1].value = htonl(1);
+ test_ats_count = 2;
+
+ /* Adding address without session */
+ test_session = NULL;
+ create_test_address (&test_addr, "test", test_session, "test", strlen ("test") + 1);
+ test_hello_address.peer = p.id;
+ test_hello_address.transport_name = test_addr.plugin;
+ test_hello_address.address = test_addr.addr;
+ test_hello_address.address_length = test_addr.addr_len;
+
+ /* Adding address */
+ GNUNET_ATS_address_add (sched_ats, &test_hello_address, NULL, test_ats_info, test_ats_count);
+ time_start = GNUNET_TIME_absolute_get();
+
+ end_task = GNUNET_SCHEDULER_add_delayed(GNUNET_TIME_relative_multiply(GNUNET_TIME_relative_get_second_(), seconds), &end, NULL);
+}
+
+
+void
+test_run (void *cls, char *const *args,
+ const char *cfgfile,
+ const struct GNUNET_CONFIGURATION_Handle *
+ cfg)
+{
+ char *sep;
+ char *src_filename = GNUNET_strdup (__FILE__);
+ char *test_filename = cls;
+ char *config_file = "none";
+ char *solver;
+
+ ret = 0;
+
+ if (NULL == (sep = (strstr (src_filename,".c"))))
+ {
+ GNUNET_break (0);
+ ret = -1;
+ //return -1;
+ }
+ sep[0] = '\0';
+
+ if (NULL != (sep = strstr (test_filename, ".exe")))
+ sep[0] = '\0';
+
+ if (NULL == (solver = strstr (test_filename, src_filename)))
+ {
+ GNUNET_break (0);
+ ret = -1;
+ }
+ solver += strlen (src_filename) +1;
+
+ if (0 == strcmp(solver, "proportional"))
+ {
+ config_file = "test_ats_solver_proportional.conf";
+ }
+ else if (0 == strcmp(solver, "mlp"))
+ {
+ config_file = "test_ats_solver_mlp.conf";
+ }
+ else if ((0 == strcmp(solver, "ril")))
+ {
+ config_file = "test_ats_solver_ril.conf";
+ }
+ else
+ {
+ GNUNET_break (0);
+ GNUNET_free (src_filename);
+ ret = 1;
+ }
+
+ GNUNET_free (src_filename);
+
+ if (0 != GNUNET_TESTING_peer_run ("test-ats-solver",
+ config_file, &run, NULL ))
+ ret = GNUNET_SYSERR;
+}
+
+int
+main (int argc, char *argv[])
+{
+ seconds = 5;
+
+ static struct GNUNET_GETOPT_CommandLineOption options[] = {
+ { 's', "seconds", NULL,
+ gettext_noop ("seconds to run the test"),
+ 1, &GNUNET_GETOPT_set_uint, &seconds },
+ { 'd', "data-file", NULL,
+ gettext_noop ("generate data file"),
+ 0, &GNUNET_GETOPT_set_one, &write_data_file},
+ GNUNET_GETOPT_OPTION_END
+ };
+
+ GNUNET_PROGRAM_run2 (argc, argv, argv[0], NULL, options, &test_run, argv[0], GNUNET_YES);
+
+ return ret;
+}
+
+/* end of file test_ats_solver_convergence.c */