plugin_testing_transport_simple_send_performance.c File Reference

#include "platform.h"
#include "gnunet_util_lib.h"
#include "gnunet_testing_lib.h"
#include "gnunet_transport_application_service.h"
#include "transport-testing2.h"
#include "transport-testing-cmds.h"

Include dependency graph for plugin_testing_transport_simple_send_performance.c:

Go to the source code of this file.

Data Structures
struct	Sender

Macros
#define	LOG(kind, ...)   GNUNET_log (kind, __VA_ARGS__)
	Generic logging shortcut. More...
#define	BASE_DIR   "testdir"
#define	TOPOLOGY_CONFIG   "test_transport_simple_send_topo.conf"
#define	TIMEOUT   GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 600)
#define	MAX_RECEIVED   1000
#define	MESSAGE_SIZE   65000

Functions
static int	check_test (void *cls, const struct GNUNET_TRANSPORT_TESTING_PerformanceTestMessage *message)
	Function called to check a message of type GNUNET_TRANSPORT_TESTING_SIMPLE_MTYPE being received. More...
static void	handle_test (void *cls, const struct GNUNET_TRANSPORT_TESTING_PerformanceTestMessage *message)
	Function called to handle a message of type GNUNET_TRANSPORT_TESTING_SIMPLE_MTYPE being received. More...
struct GNUNET_TESTING_BarrierList *	get_waiting_for_barriers ()
static void	handle_result (void *cls, enum GNUNET_GenericReturnValue rv)
	Function called with the final result of the test. More...
static void *	notify_connect (struct GNUNET_TESTING_Interpreter *is, const struct GNUNET_PeerIdentity *peer)
	Callback from start peer cmd for signaling a peer got connected. More...
static struct GNUNET_TESTING_Interpreter *	start_testcase (GNUNET_TESTING_cmd_helper_write_cb write_message, const char *router_ip, const char *node_ip, const char *m, const char *n, const char *local_m, const char *topology_data, unsigned int *read_file, GNUNET_TESTING_cmd_helper_finish_cb finished_cb)
	Function to start a local test case. More...
void *	libgnunet_test_transport_plugin_cmd_simple_send_performance_init (void *cls)
	Entry point for the plugin. More...
void *	libgnunet_test_transport_plugin_cmd_simple_send_performance_done (void *cls)
	Exit point from the plugin. More...

Variables
static struct GNUNET_TESTING_Command	block_send
static struct GNUNET_TESTING_Command	block_receive
static struct GNUNET_TESTING_Command	connect_peers
static struct GNUNET_TESTING_Command	local_prepared
static struct GNUNET_TESTING_Command	start_peer
static struct GNUNET_TESTING_Interpreter *	is
static struct GNUNET_CONTAINER_MultiPeerMap *	senders

Macro Definition Documentation

LOG

#define LOG	(		kind,
			...
	)		GNUNET_log (kind, __VA_ARGS__)

Generic logging shortcut.

Definition at line 36 of file plugin_testing_transport_simple_send_performance.c.

BASE_DIR

#define BASE_DIR   "testdir"

Definition at line 38 of file plugin_testing_transport_simple_send_performance.c.

TOPOLOGY_CONFIG

#define TOPOLOGY_CONFIG   "test_transport_simple_send_topo.conf"

Definition at line 40 of file plugin_testing_transport_simple_send_performance.c.

TIMEOUT

#define TIMEOUT   GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 600)

Definition at line 42 of file plugin_testing_transport_simple_send_performance.c.

MAX_RECEIVED

#define MAX_RECEIVED   1000

Definition at line 44 of file plugin_testing_transport_simple_send_performance.c.

MESSAGE_SIZE

#define MESSAGE_SIZE   65000

Definition at line 46 of file plugin_testing_transport_simple_send_performance.c.

Function Documentation

check_test()

static int check_test ( void *  cls, const struct GNUNET_TRANSPORT_TESTING_PerformanceTestMessage *  message  )

static

Function called to check a message of type GNUNET_TRANSPORT_TESTING_SIMPLE_MTYPE being received.

Definition at line 86 of file plugin_testing_transport_simple_send_performance.c.

{
  return GNUNET_OK;
}

References GNUNET_OK.

handle_test()

static void handle_test ( void *  cls, const struct GNUNET_TRANSPORT_TESTING_PerformanceTestMessage *  message  )

static

Function called to handle a message of type GNUNET_TRANSPORT_TESTING_SIMPLE_MTYPE being received.

Definition at line 100 of file plugin_testing_transport_simple_send_performance.c.

{
  struct GNUNET_PeerIdentity *peer = cls;
  struct GNUNET_TESTING_AsyncContext *ac;
  struct Sender *sender;
  struct GNUNET_TIME_Absolute time_send;
  struct GNUNET_TIME_Absolute now;
  struct GNUNET_TIME_Relative time_traveled;
  uint32_t num;
  struct GNUNET_TRANSPORT_CoreHandle *ch;
  const struct GNUNET_TESTING_StartPeerState *sps;
 
 
  GNUNET_TRANSPORT_TESTING_get_trait_state (&start_peer,
                                            &sps);
  ch = sps->th;
  num = ntohl (message->num);
  GNUNET_TESTING_get_trait_async_context (&block_receive,
                                          &ac);
  GNUNET_assert  (NULL != ac);
 
  sender = GNUNET_CONTAINER_multipeermap_get (senders, peer);
 
  now = GNUNET_TIME_absolute_get ();
  time_send = GNUNET_TIME_absolute_ntoh (message->time_send);
 
  time_traveled = GNUNET_TIME_absolute_get_difference (time_send, now);
 
  if (NULL == sender)
  {
    GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
                "time traveled init %s\n",
                GNUNET_i2s (peer));
    sender = GNUNET_new (struct Sender);
    sender->time_first = time_send;
    sender->mean_time = GNUNET_TIME_UNIT_ZERO;
    GNUNET_assert (GNUNET_OK == GNUNET_CONTAINER_multipeermap_put (senders,
                                                                   peer, sender,
                                                                   GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_ONLY));
  }
 
  if (GNUNET_TIME_UNIT_ZERO.rel_value_us == sender->mean_time.rel_value_us)
  {
    GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
                "time traveld mean zero\n");
    sender->mean_time = time_traveled;
  }
  else
  {
    double factor = (double) sender->num_received
                    / ((double) sender->num_received + 1.0);
    struct GNUNET_TIME_Relative s1;
    struct GNUNET_TIME_Relative s2;
 
    s1 = GNUNET_TIME_relative_multiply (sender->mean_time,
                                        factor);
    s2 = GNUNET_TIME_relative_divide (time_traveled,
                                      sender->num_received + 1);
    sender->mean_time = GNUNET_TIME_relative_add (s1, s2);
  }
 
  sender->num_received++;
 
  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
              "time traveled: %llu\n",
              (unsigned long long) time_traveled.rel_value_us);
  GNUNET_log (GNUNET_ERROR_TYPE_INFO,
              "mean time traveled: %s %llu messages received with message number %u\n",
              GNUNET_STRINGS_relative_time_to_string (sender->mean_time,
                                                      false),
              sender->num_received,
              num);
  if (floor (MAX_RECEIVED * (1 - 1.0 / 200)) < sender->num_received && NULL ==
      ac->cont)
  {
    GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
                "time traveled failed\n");
    // GNUNET_TESTING_async_fail ((struct GNUNET_TESTING_AsyncContext *) ac);
  }
  else if (floor (MAX_RECEIVED * (1 - 1.0 / 200)) < sender->num_received &&
           GNUNET_NO == ac->finished)
  {
    GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
                "time traveled finish\n");
    GNUNET_TESTING_async_finish ((struct GNUNET_TESTING_AsyncContext *) ac);
  }
  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
              "time traveled end\n");
  GNUNET_TRANSPORT_core_receive_continue (ch, peer);
}

References GNUNET_TESTING_StartPeerState::ac, block_receive, ch, GNUNET_TESTING_AsyncContext::finished, GNUNET_assert, GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_ONLY, GNUNET_CONTAINER_multipeermap_get(), GNUNET_CONTAINER_multipeermap_put(), GNUNET_ERROR_TYPE_DEBUG, GNUNET_ERROR_TYPE_INFO, GNUNET_i2s(), GNUNET_log, GNUNET_new, GNUNET_NO, GNUNET_OK, GNUNET_STRINGS_relative_time_to_string(), GNUNET_TESTING_async_finish(), GNUNET_TIME_absolute_get(), GNUNET_TIME_absolute_get_difference(), GNUNET_TIME_absolute_ntoh(), GNUNET_TIME_relative_add(), GNUNET_TIME_relative_divide(), GNUNET_TIME_relative_multiply(), GNUNET_TIME_UNIT_ZERO, GNUNET_TRANSPORT_TESTING_get_trait_state(), MAX_RECEIVED, Sender::mean_time, GNUNET_TRANSPORT_TESTING_PerformanceTestMessage::num, Sender::num_received, GNUNET_TESTING_StartPeerState::peer, GNUNET_TIME_Relative::rel_value_us, senders, start_peer, GNUNET_TESTING_StartPeerState::th, Sender::time_first, and GNUNET_TRANSPORT_TESTING_PerformanceTestMessage::time_send.

Here is the call graph for this function:

get_waiting_for_barriers()

struct GNUNET_TESTING_BarrierList * get_waiting_for_barriers

(

)

Definition at line 195 of file plugin_testing_transport_simple_send_performance.c.

{
  struct GNUNET_TESTING_BarrierList*barriers;
  struct GNUNET_TESTING_BarrierListEntry *ble;
 
  barriers = GNUNET_new (struct GNUNET_TESTING_BarrierList);
  ble = GNUNET_new (struct GNUNET_TESTING_BarrierListEntry);
  ble->barrier_name = "ready-to-connect";
  ble->expected_reaches = 1;
  GNUNET_CONTAINER_DLL_insert (barriers->head,
                               barriers->tail,
                               ble);
 
  ble = GNUNET_new (struct GNUNET_TESTING_BarrierListEntry);
  ble->barrier_name = "test-case-finished";
  ble->expected_reaches = 1;
  GNUNET_CONTAINER_DLL_insert (barriers->head,
                               barriers->tail,
                               ble);
  return barriers;
}

References GNUNET_CONTAINER_DLL_insert, and GNUNET_new.

Referenced by libgnunet_test_transport_plugin_cmd_simple_send_performance_init().

Here is the caller graph for this function:

handle_result()

static void handle_result ( void *  cls, enum GNUNET_GenericReturnValue  rv  )

static

Function called with the final result of the test.

Parameters

cls	the struct MainParams
rv	GNUNET_OK if the test passed

Definition at line 225 of file plugin_testing_transport_simple_send_performance.c.

{
  struct TestState *ts = cls;
 
  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
              "Local test exits with status %d\n",
              rv);
 
  ts->finished_cb (rv);
  GNUNET_free (ts->testdir);
  GNUNET_free (ts->cfgname);
  GNUNET_TESTING_free_topology (ts->topology);
  GNUNET_free (ts);
}

References TestState::cfgname, GNUNET_ERROR_TYPE_DEBUG, GNUNET_free, GNUNET_log, GNUNET_TESTING_free_topology(), TestState::testdir, and TestState::topology.

Referenced by start_testcase().

Here is the call graph for this function:

Here is the caller graph for this function:

notify_connect()

static void * notify_connect ( struct GNUNET_TESTING_Interpreter *  is, const struct GNUNET_PeerIdentity *  peer  )

static

Callback from start peer cmd for signaling a peer got connected.

Definition at line 247 of file plugin_testing_transport_simple_send_performance.c.

{
  const struct ConnectPeersState *cps;
  const struct GNUNET_TESTING_Command *cmd;
 
  cmd = GNUNET_TESTING_interpreter_lookup_command (is,
                                                   "connect-peers");
  GNUNET_TRANSPORT_TESTING_get_trait_connect_peer_state (cmd,
                                                         &cps);
  void *ret = NULL;
 
  cps->notify_connect (is,
                       peer);
  return ret;
}

References GNUNET_TESTING_interpreter_lookup_command(), is, ConnectPeersState::notify_connect, and ret.

Referenced by start_testcase().

Here is the call graph for this function:

Here is the caller graph for this function:

start_testcase()

static struct GNUNET_TESTING_Interpreter * start_testcase ( GNUNET_TESTING_cmd_helper_write_cb  write_message, const char *  router_ip, const char *  node_ip, const char *  m, const char *  n, const char *  local_m, const char *  topology_data, unsigned int *  read_file, GNUNET_TESTING_cmd_helper_finish_cb  finished_cb  )

static

Function to start a local test case.

Parameters

write_message	Callback to send a message to the master loop.
router_ip	Global address of the network namespace.
node_ip	The IP address of the node.
m	The number of the node in a network namespace.
n	The number of the network namespace.
local_m	The number of nodes in a network namespace.
topology_data	A file name for the file containing the topology configuration, or a string containing the topology configuration.
read_file	If read_file is GNUNET_YES this string is the filename for the topology configuration, if read_file is GNUNET_NO the string contains the topology configuration.
finish_cb	Callback function which writes a message from the helper process running on a netjail node to the master process * signaling that the test case running on the netjail node finished.

Returns

Returns the struct GNUNET_TESTING_Interpreter of the command loop running on this netjail node.

Definition at line 283 of file plugin_testing_transport_simple_send_performance.c.

{
 
  unsigned int n_int;
  unsigned int m_int;
  unsigned int local_m_int;
  unsigned int num;
  struct TestState *ts = GNUNET_new (struct TestState);
  struct GNUNET_TESTING_NetjailTopology *topology;
  unsigned int sscanf_ret = 0;
 
  senders = GNUNET_CONTAINER_multipeermap_create (1, GNUNET_NO);
  ts->finished_cb = finished_cb;
  LOG (GNUNET_ERROR_TYPE_ERROR,
       "n %s m %s\n",
       n,
       m);
 
  if (GNUNET_YES == *read_file)
  {
    LOG (GNUNET_ERROR_TYPE_DEBUG,
         "read from file\n");
    topology = GNUNET_TESTING_get_topo_from_file (topology_data);
  }
  else
    topology = GNUNET_TESTING_get_topo_from_string (topology_data);
 
  ts->topology = topology;
 
  errno = 0;
  sscanf_ret = sscanf (m, "%u", &m_int);
  if (errno != 0)
  {
    GNUNET_log_strerror (GNUNET_ERROR_TYPE_ERROR, "sscanf");
  }
  GNUNET_assert (0 < sscanf_ret);
  errno = 0;
  sscanf_ret = sscanf (n, "%u", &n_int);
  if (errno != 0)
  {
    GNUNET_log_strerror (GNUNET_ERROR_TYPE_ERROR, "sscanf");
  }
  GNUNET_assert (0 < sscanf_ret);
  errno = 0;
  sscanf_ret = sscanf (local_m, "%u", &local_m_int);
  if (errno != 0)
  {
    GNUNET_log_strerror (GNUNET_ERROR_TYPE_ERROR, "sscanf");
  }
  GNUNET_assert (0 < sscanf_ret);
 
  if (0 == n_int)
    num = m_int;
  else
    num = (n_int - 1) * local_m_int + m_int + topology->nodes_x;
 
  block_send = GNUNET_TESTING_cmd_block_until_external_trigger (
    "block");
  block_receive = GNUNET_TESTING_cmd_block_until_external_trigger (
    "block-receive");
  connect_peers = GNUNET_TRANSPORT_cmd_connect_peers ("connect-peers",
                                                      "start-peer",
                                                      "system-create",
                                                      num,
                                                      topology,
                                                      0,
                                                      GNUNET_YES);
  local_prepared = GNUNET_TESTING_cmd_local_test_prepared (
    "local-test-prepared",
    write_message);
 
 
  GNUNET_asprintf (&ts->cfgname,
                   "test_transport_api_tcp_node1.conf");
 
  LOG (GNUNET_ERROR_TYPE_DEBUG,
       "plugin cfgname: %s\n",
       ts->cfgname);
 
  LOG (GNUNET_ERROR_TYPE_DEBUG,
       "node ip: %s\n",
       node_ip);
 
  GNUNET_asprintf (&ts->testdir,
                   "%s%s%s",
                   BASE_DIR,
                   m,
                   n);
 
  struct GNUNET_MQ_MessageHandler handlers[] = {
    GNUNET_MQ_hd_var_size (test,
                           GNUNET_TRANSPORT_TESTING_SIMPLE_PERFORMANCE_MTYPE,
                           struct
                           GNUNET_TRANSPORT_TESTING_PerformanceTestMessage,
                           ts),
    GNUNET_MQ_handler_end ()
  };
 
  start_peer = GNUNET_TRANSPORT_cmd_start_peer ("start-peer",
                                                "system-create",
                                                num,
                                                node_ip,
                                                handlers,
                                                ts->cfgname,
                                                notify_connect,
                                                GNUNET_NO);
 
  struct GNUNET_TESTING_Command commands[] = {
    GNUNET_TESTING_cmd_system_create ("system-create",
                                      ts->testdir),
    start_peer,
    GNUNET_TESTING_cmd_barrier_reached ("ready-to-connect-reached",
                                        "ready-to-connect",
                                        GNUNET_NO,
                                        num,
                                        GNUNET_NO,
                                        write_message),
    connect_peers,
    GNUNET_TRANSPORT_cmd_send_simple_performance ("send-simple",
                                                  "start-peer",
                                                  "system-create",
                                                  num,
                                                  MESSAGE_SIZE,
                                                  MAX_RECEIVED,
                                                  topology),
    block_receive,
    GNUNET_TESTING_cmd_barrier_reached ("test-case-finished-reached",
                                        "test-case-finished",
                                        GNUNET_NO,
                                        num,
                                        GNUNET_NO,
                                        write_message),
    GNUNET_TRANSPORT_cmd_stop_peer ("stop-peer",
                                    "start-peer"),
    GNUNET_TESTING_cmd_system_destroy ("system-destroy",
                                       "system-create"),
    GNUNET_TESTING_cmd_end ()
  };
 
  ts->write_message = write_message;
 
  is = GNUNET_TESTING_run (commands,
                           TIMEOUT,
                           &handle_result,
                           ts);
  return is;
}

References BASE_DIR, block_receive, block_send, TestState::cfgname, commands, connect_peers, finished_cb(), GNUNET_asprintf(), GNUNET_assert, GNUNET_CONTAINER_multipeermap_create(), GNUNET_ERROR_TYPE_DEBUG, GNUNET_ERROR_TYPE_ERROR, GNUNET_log_strerror, GNUNET_MQ_handler_end, GNUNET_MQ_hd_var_size, GNUNET_new, GNUNET_NO, GNUNET_TESTING_cmd_barrier_reached(), GNUNET_TESTING_cmd_end(), GNUNET_TESTING_run(), GNUNET_TRANSPORT_cmd_connect_peers(), GNUNET_TRANSPORT_cmd_send_simple_performance(), GNUNET_TRANSPORT_cmd_start_peer(), GNUNET_TRANSPORT_cmd_stop_peer(), GNUNET_TRANSPORT_TESTING_SIMPLE_PERFORMANCE_MTYPE, GNUNET_YES, handle_result(), handlers, is, local_prepared, LOG, m, MAX_RECEIVED, MESSAGE_SIZE, GNUNET_TESTING_NetjailTopology::nodes_x, notify_connect(), read_file(), senders, start_peer, TestState::testdir, TIMEOUT, TestState::topology, and write_message().

Referenced by libgnunet_test_transport_plugin_cmd_simple_send_performance_init().

Here is the call graph for this function:

Here is the caller graph for this function:

libgnunet_test_transport_plugin_cmd_simple_send_performance_init()

void * libgnunet_test_transport_plugin_cmd_simple_send_performance_init

(

void *

cls

)

Entry point for the plugin.

Parameters

cls

NULL

Returns

the exported block API

Definition at line 447 of file plugin_testing_transport_simple_send_performance.c.

{
  struct GNUNET_TESTING_PluginFunctions *api;
 
  GNUNET_log_setup ("simple-send",
                    "DEBUG",
                    NULL);
 
  api = GNUNET_new (struct GNUNET_TESTING_PluginFunctions);
  api->start_testcase = &start_testcase;
  api->get_waiting_for_barriers = get_waiting_for_barriers;
  return api;
}

References get_waiting_for_barriers(), GNUNET_log_setup(), GNUNET_new, start_testcase(), and GNUNET_TESTING_PluginFunctions::start_testcase.

Here is the call graph for this function:

libgnunet_test_transport_plugin_cmd_simple_send_performance_done()

void * libgnunet_test_transport_plugin_cmd_simple_send_performance_done

(

void *

cls

)

Exit point from the plugin.

Parameters

cls	the return value from #libgnunet_test_transport_plugin_simple_send_performance_init

Returns

NULL

Definition at line 469 of file plugin_testing_transport_simple_send_performance.c.

{
  struct GNUNET_TESTING_PluginFunctions *api = cls;
 
  GNUNET_free (api);
  return NULL;
}

References GNUNET_TESTING_PluginFunctions::cls, and GNUNET_free.

Variable Documentation

block_send

struct GNUNET_TESTING_Command block_send

static

Definition at line 48 of file plugin_testing_transport_simple_send_performance.c.

Referenced by start_testcase().

block_receive

struct GNUNET_TESTING_Command block_receive

static

Definition at line 50 of file plugin_testing_transport_simple_send_performance.c.

Referenced by handle_test(), and start_testcase().

connect_peers

struct GNUNET_TESTING_Command connect_peers

static

Definition at line 52 of file plugin_testing_transport_simple_send_performance.c.

Referenced by start_testcase().

local_prepared

struct GNUNET_TESTING_Command local_prepared

static

Definition at line 54 of file plugin_testing_transport_simple_send_performance.c.

Referenced by start_testcase().

start_peer

struct GNUNET_TESTING_Command start_peer

static

Definition at line 56 of file plugin_testing_transport_simple_send_performance.c.

Referenced by handle_test(), and start_testcase().

is

struct GNUNET_TESTING_Interpreter* is

static

Definition at line 58 of file plugin_testing_transport_simple_send_performance.c.

Referenced by notify_connect(), and start_testcase().

senders

struct GNUNET_CONTAINER_MultiPeerMap* senders

static

Definition at line 60 of file plugin_testing_transport_simple_send_performance.c.

Referenced by handle_test(), and start_testcase().