From: Matthias Wachs Date: Wed, 7 Apr 2010 15:38:10 +0000 (+0000) Subject: testcase for hostlist learning X-Git-Tag: initial-import-from-subversion-38251~22233 X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=777ca32789a5fbcbaae6d795bd9ed12375101de7;p=oweals%2Fgnunet.git testcase for hostlist learning --- diff --git a/src/hostlist/test_gnunet_daemon_hostlist_learning.c b/src/hostlist/test_gnunet_daemon_hostlist_learning.c new file mode 100644 index 000000000..c468623e8 --- /dev/null +++ b/src/hostlist/test_gnunet_daemon_hostlist_learning.c @@ -0,0 +1,283 @@ +/* + This file is part of GNUnet + (C) 2009 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 2, 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 hostlist/test_gnunet_daemon_hostlist_learning.c + * @brief test for gnunet_daemon_hostslist.c + * @author Christian Grothoff, Matthias Wachs + */ +#include "platform.h" +#include "gnunet_util_lib.h" +#include "gnunet_arm_service.h" +#include "gnunet_transport_service.h" + + +#define START_ARM GNUNET_YES + +#define VERBOSE GNUNET_NO + +/** + * How long until we give up on transmitting the message? + */ +#define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 150) + +static int ok; + +static struct GNUNET_SCHEDULER_Handle *sched; + +static GNUNET_SCHEDULER_TaskIdentifier timeout_task; + +struct PeerContext +{ + struct GNUNET_CONFIGURATION_Handle *cfg; + struct GNUNET_TRANSPORT_Handle *th; + struct GNUNET_MessageHeader *hello; + struct GNUNET_ARM_Handle *arm; +#if START_ARM + pid_t arm_pid; +#endif +}; + +static struct PeerContext p1; + +static struct PeerContext p2; + + +static void +clean_up (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc) +{ + if (p1.th != NULL) + { + GNUNET_TRANSPORT_disconnect (p1.th); + p1.th = NULL; + } + if (p2.th != NULL) + { + GNUNET_TRANSPORT_disconnect (p2.th); + p2.th = NULL; + } + GNUNET_SCHEDULER_shutdown (sched); +} + +/** + * Timeout, give up. + */ +static void +timeout_error (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc) +{ + timeout_task = GNUNET_SCHEDULER_NO_TASK; + GNUNET_log (GNUNET_ERROR_TYPE_ERROR, + "Timeout trying to connect peers, test failed.\n"); + clean_up (NULL, tc); +} + + +/** + * Function called to notify transport users that another + * peer connected to us. + * + * @param cls closure + * @param peer the peer that connected + * @param latency current latency of the connection + * @param distance in overlay hops, as given by transport plugin + */ +static void +notify_connect (void *cls, + const struct GNUNET_PeerIdentity * peer, + struct GNUNET_TIME_Relative latency, + unsigned int distance) +{ + if (peer == NULL) + return; + GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, + "Peers connected, shutting down.\n"); + ok = 0; + if (timeout_task != GNUNET_SCHEDULER_NO_TASK) + { + GNUNET_SCHEDULER_cancel (sched, + timeout_task); + timeout_task = GNUNET_SCHEDULER_NO_TASK; + } + GNUNET_SCHEDULER_add_now (sched, + &clean_up, NULL); +} + + +static void +process_hello (void *cls, + const struct GNUNET_MessageHeader *message) +{ + struct PeerContext *p = cls; + + GNUNET_TRANSPORT_get_hello_cancel (p->th, &process_hello, p); + GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, + "Received HELLO, starting hostlist service.\n"); + GNUNET_ARM_start_services (p->cfg, sched, "hostlist", NULL); +} + + +static void +setup_peer (struct PeerContext *p, const char *cfgname) +{ + p->cfg = GNUNET_CONFIGURATION_create (); +#if START_ARM + p->arm_pid = GNUNET_OS_start_process (NULL, NULL, "gnunet-service-arm", + "gnunet-service-arm", +#if VERBOSE + "-L", "DEBUG", +#endif + "-c", cfgname, NULL); +#endif + GNUNET_assert (GNUNET_OK == GNUNET_CONFIGURATION_load (p->cfg, cfgname)); + GNUNET_ARM_start_services (p->cfg, sched, "core", NULL); + p->th = GNUNET_TRANSPORT_connect (sched, p->cfg, p, NULL, + ¬ify_connect, NULL); + GNUNET_assert (p->th != NULL); + GNUNET_TRANSPORT_get_hello (p->th, &process_hello, p); +} + + +static void +waitpid_task (void *cls, + const struct GNUNET_SCHEDULER_TaskContext *tc) +{ + struct PeerContext *p = cls; + +#if START_ARM + GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, + "Killing ARM process.\n"); + if (0 != PLIBC_KILL (p->arm_pid, SIGTERM)) + GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "kill"); + if (GNUNET_OS_process_wait(p->arm_pid) != GNUNET_OK) + GNUNET_log_strerror (GNUNET_ERROR_TYPE_WARNING, "waitpid"); + GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, + "ARM process %u stopped\n", p->arm_pid); +#endif + GNUNET_CONFIGURATION_destroy (p->cfg); +} + + +static void +stop_cb (void *cls, + int success) +{ + struct PeerContext *p = cls; + + GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, + success + ? "ARM stopped core service\n" + : "ARM failed to stop core service\n"); + GNUNET_ARM_disconnect (p->arm); + p->arm = NULL; + /* make sure this runs after all other tasks are done */ + GNUNET_SCHEDULER_add_delayed (sched, + GNUNET_TIME_UNIT_SECONDS, + &waitpid_task, p); +} + + +static void +stop_arm (struct PeerContext *p) +{ + GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, + "Asking ARM to stop core service\n"); + p->arm = GNUNET_ARM_connect (p->cfg, sched, NULL); + GNUNET_ARM_stop_service (p->arm, "core", GNUNET_TIME_UNIT_SECONDS, + &stop_cb, p); +} + + +/** + * Try again to connect to transport service. + */ +static void +shutdown_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc) +{ + stop_arm (&p1); + stop_arm (&p2); +} + + +static void +run (void *cls, + struct GNUNET_SCHEDULER_Handle *s, + char *const *args, + const char *cfgfile, + const struct GNUNET_CONFIGURATION_Handle *cfg) +{ + GNUNET_assert (ok == 1); + ok++; + sched = s; + + timeout_task = GNUNET_SCHEDULER_add_delayed (sched, + TIMEOUT, + &timeout_error, + NULL); + GNUNET_SCHEDULER_add_delayed (sched, + GNUNET_TIME_UNIT_FOREVER_REL, + &shutdown_task, + NULL); + setup_peer (&p1, "learning_peer1.conf"); + setup_peer (&p2, "learning_peer2.conf"); +} + + +static int +check () +{ + char *const argv[] = { "test_gnunet_daemon_hostlist_learning", + "-c", "learning_data.conf", +#if VERBOSE + "-L", "DEBUG", +#endif + NULL + }; + struct GNUNET_GETOPT_CommandLineOption options[] = { + GNUNET_GETOPT_OPTION_END + }; + ok = 1; + GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, + argv, "test_gnunet_daemon_hostlist_learning", + "nohelp", options, &run, &ok); + + return ok; +} + + +int +main (int argc, char *argv[]) +{ + + int ret; + GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-1"); + GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-2"); + GNUNET_log_setup ("test-gnunet-daemon-hostlist_learning", +#if VERBOSE + "DEBUG", +#else + "WARNING", +#endif + NULL); + ret = check (); + GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-1"); + GNUNET_DISK_directory_remove ("/tmp/test-gnunetd-hostlist-peer-2"); + return ret; +} + +/* end of test_gnunet_daemon_hostlist.c */