- make sure handle is NULL
[oweals/gnunet.git] / src / psyc / test_psyc.c
index 2986fdf6af9d0cf329900b6878e4b4f56fd6ebdc..360d56c064d25fd0cc689474fc5d2571ba50c375 100644 (file)
@@ -25,6 +25,8 @@
  * @author Christian Grothoff
  */
 
+#include <inttypes.h>
+
 #include "platform.h"
 #include "gnunet_crypto_lib.h"
 #include "gnunet_common.h"
@@ -33,7 +35,7 @@
 #include "gnunet_env_lib.h"
 #include "gnunet_psyc_service.h"
 
-#define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 10)
+#define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 30)
 
 #define DEBUG_SERVICE 1
 
@@ -62,17 +64,57 @@ static struct GNUNET_CRYPTO_EddsaPublicKey slave_pub_key;
 
 struct GNUNET_PSYC_MasterTransmitHandle *mth;
 
+struct TransmitClosure
+{
+  struct GNUNET_PSYC_MasterTransmitHandle *mst_tmit;
+  struct GNUNET_PSYC_SlaveTransmitHandle *slv_tmit;
+  struct GNUNET_ENV_Environment *env;
+  char *data[16];
+  const char *mod_value;
+  size_t mod_value_size;
+  uint8_t data_delay[16];
+  uint8_t data_count;
+  uint8_t paused;
+  uint8_t n;
+};
+
+struct TransmitClosure *tmit;
+
+
+enum
+{
+  TEST_NONE,
+  TEST_SLAVE_TRANSMIT,
+  TEST_MASTER_TRANSMIT,
+} test;
+
+
+static void
+master_transmit ();
+
+
 /**
  * Clean up all resources used.
  */
 static void
 cleanup ()
 {
-  if (mst != NULL)
+  if (NULL != slv)
+  {
+    GNUNET_PSYC_slave_part (slv);
+    slv = NULL;
+  }
+  if (NULL != mst)
   {
     GNUNET_PSYC_master_stop (mst);
     mst = NULL;
   }
+  if (NULL != tmit)
+  {
+    GNUNET_ENV_environment_destroy (tmit->env);
+    GNUNET_free (tmit);
+    tmit = NULL;
+  }
   GNUNET_SCHEDULER_shutdown ();
 }
 
@@ -111,6 +153,8 @@ end_normally (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
 static void
 end ()
 {
+  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Ending tests.\n");
+
   if (end_badly_task != GNUNET_SCHEDULER_NO_TASK)
   {
     GNUNET_SCHEDULER_cancel (end_badly_task);
@@ -121,39 +165,94 @@ end ()
 }
 
 
-static int
-method (void *cls, const struct GNUNET_CRYPTO_EddsaPublicKey *slave_key,
-        uint64_t message_id, const char *name,
-        size_t modifier_count, const struct GNUNET_ENV_Modifier *modifiers,
-        uint64_t data_offset, const void *data, size_t data_size,
-        enum GNUNET_PSYC_MessageFlags flags)
+static void
+master_message (void *cls, uint64_t message_id, uint32_t flags,
+                const struct GNUNET_MessageHeader *msg)
 {
+  if (NULL == msg)
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "Error while receiving message %llu\n", message_id);
+    return;
+  }
+
+  uint16_t type = ntohs (msg->type);
+  uint16_t size = ntohs (msg->size);
+
   GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
-              "Method: %s, modifiers: %lu, flags: %u\n%.*s\n",
-              name, modifier_count, flags, data_size, data);
-  return GNUNET_OK;
+              "Master got message part of type %u and size %u "
+              "belonging to message ID %llu with flags %u\n",
+              type, size, message_id, flags);
+
+  switch (test)
+  {
+  case TEST_SLAVE_TRANSMIT:
+    if (GNUNET_PSYC_MESSAGE_REQUEST != flags)
+    {
+      GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                  "Unexpected request flags: %lu\n", flags);
+      GNUNET_assert (0);
+      return;
+    }
+    // FIXME: check rest of message
+
+    if (GNUNET_MESSAGE_TYPE_PSYC_MESSAGE_END == type)
+      master_transmit ();
+    break;
+
+  case TEST_MASTER_TRANSMIT:
+    break;
+
+  default:
+    GNUNET_assert (0);
+  }
 }
 
 
-static int
-join (void *cls, const struct GNUNET_CRYPTO_EddsaPublicKey *slave_key,
-      const char *method_name,
-      size_t variable_count, const struct GNUNET_ENV_Modifier *variables,
-      const void *data, size_t data_size, struct GNUNET_PSYC_JoinHandle *jh)
+static void
+slave_message (void *cls, uint64_t message_id, uint32_t flags,
+               const struct GNUNET_MessageHeader *msg)
 {
-  return GNUNET_OK;
+  if (NULL == msg)
+  {
+    GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+                "Error while receiving message %llu\n", message_id);
+    return;
+  }
+
+  uint16_t type = ntohs (msg->type);
+  uint16_t size = ntohs (msg->size);
+
+  GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
+              "Slave got message part of type %u and size %u "
+              "belonging to message ID %llu with flags %u\n",
+              type, size, message_id, flags);
+
+  switch (test)
+  {
+  case TEST_MASTER_TRANSMIT:
+    if (GNUNET_MESSAGE_TYPE_PSYC_MESSAGE_END == type)
+      end ();
+    break;
+
+  default:
+    GNUNET_assert (0);
+  }
 }
 
 
-struct TransmitClosure
+static void
+join_request (void *cls, const struct GNUNET_CRYPTO_EddsaPublicKey *slave_key,
+              const char *method_name,
+              size_t variable_count, const struct GNUNET_ENV_Modifier *variables,
+              const void *data, size_t data_size,
+              struct GNUNET_PSYC_JoinHandle *jh)
 {
-  struct GNUNET_PSYC_MasterTransmitHandle *handle;
-  uint8_t n;
-  uint8_t paused;
-  uint8_t fragment_count;
-  char *fragments[16];
-  uint16_t fragment_sizes[16];
-};
+  GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
+              "Got join request: %s (%zu vars)", method_name, variable_count);
+  GNUNET_PSYC_join_decision (jh, GNUNET_YES, 0, NULL, "_notice_join", NULL,
+                             "you're in", 9);
+}
 
 
 static void
@@ -161,70 +260,233 @@ transmit_resume (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
 {
   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Transmission resumed.\n");
   struct TransmitClosure *tmit = cls;
-  tmit->paused = GNUNET_NO;
-  GNUNET_PSYC_master_transmit_resume (tmit->handle);
+  if (NULL != tmit->mst_tmit)
+    GNUNET_PSYC_master_transmit_resume (tmit->mst_tmit);
+  else
+    GNUNET_PSYC_slave_transmit_resume (tmit->slv_tmit);
 }
 
 
 static int
-transmit_notify (void *cls, size_t *data_size, void *data)
+tmit_notify_mod (void *cls, uint16_t *data_size, void *data, uint8_t *oper,
+                 uint32_t *full_value_size)
 {
   struct TransmitClosure *tmit = cls;
   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
-              "Transmit notify: %lu bytes available, "
-              "processing fragment %u/%u.\n",
-              *data_size, tmit->n + 1, tmit->fragment_count);
-  GNUNET_assert (tmit->fragment_sizes[tmit->n] <= *data_size);
+              "Transmit notify modifier: %lu bytes available, "
+              "%u modifiers left to process.\n",
+              *data_size, GNUNET_ENV_environment_get_count (tmit->env));
+
+  enum GNUNET_ENV_Operator op = 0;
+  const char *name = NULL;
+  const char *value = NULL;
+  uint16_t name_size = 0;
+  size_t value_size = 0;
+
+  if (NULL != oper)
+  { /* New modifier */
+    if (GNUNET_NO == GNUNET_ENV_environment_shift (tmit->env, &op, &name,
+                                                   (void *) &value, &value_size))
+    { /* No more modifiers, continue with data */
+      *data_size = 0;
+      return GNUNET_YES;
+    }
+
+    GNUNET_assert (value_size < UINT32_MAX);
+    *full_value_size = value_size;
+    *oper = op;
+    name_size = strlen (name);
+
+    if (name_size + 1 + value_size <= *data_size)
+    {
+      *data_size = name_size + 1 + value_size;
+    }
+    else
+    {
+      tmit->mod_value_size = value_size;
+      value_size = *data_size - name_size - 1;
+      tmit->mod_value_size -= value_size;
+      tmit->mod_value = value + value_size;
+    }
+
+    memcpy (data, name, name_size);
+    ((char *)data)[name_size] = '\0';
+    memcpy ((char *)data + name_size + 1, value, value_size);
+  }
+  else if (NULL != tmit->mod_value && 0 < tmit->mod_value_size)
+  { /* Modifier continuation */
+    value = tmit->mod_value;
+    if (tmit->mod_value_size <= *data_size)
+    {
+      value_size = tmit->mod_value_size;
+      tmit->mod_value = NULL;
+    }
+    else
+    {
+      value_size = *data_size;
+      tmit->mod_value += value_size;
+    }
+    tmit->mod_value_size -= value_size;
+
+    if (*data_size < value_size)
+    {
+      GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+                  "value larger than buffer: %u < %zu\n",
+                  *data_size, value_size);
+      *data_size = 0;
+      return GNUNET_NO;
+    }
+
+    *data_size = value_size;
+    memcpy (data, value, value_size);
+  }
+
+  return 0 == tmit->mod_value_size ? GNUNET_YES : GNUNET_NO;
+}
+
+
+static int
+tmit_notify_data (void *cls, uint16_t *data_size, void *data)
+{
+  struct TransmitClosure *tmit = cls;
+  if (0 == tmit->data_count)
+  {
+    *data_size = 0;
+    return GNUNET_YES;
+  }
 
-  if (GNUNET_YES == tmit->paused && tmit->n == tmit->fragment_count - 1)
+  uint16_t size = strlen (tmit->data[tmit->n]);
+  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+              "Transmit notify data: %u bytes available, "
+              "processing fragment %u/%u (size %u).\n",
+              *data_size, tmit->n + 1, tmit->data_count, size);
+  if (*data_size < size)
+  {
+    *data_size = 0;
+    GNUNET_assert (0);
+    return GNUNET_SYSERR;
+  }
+
+  if (GNUNET_YES != tmit->paused && 0 < tmit->data_delay[tmit->n])
   {
-    /* Send last fragment later. */
     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Transmission paused.\n");
     tmit->paused = GNUNET_YES;
-    GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
-                                  (GNUNET_TIME_UNIT_SECONDS, 3),
-                                  &transmit_resume, tmit);
+    GNUNET_SCHEDULER_add_delayed (
+      GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS,
+                                     tmit->data_delay[tmit->n]),
+      &transmit_resume, tmit);
     *data_size = 0;
     return GNUNET_NO;
   }
+  tmit->paused = GNUNET_NO;
 
-  GNUNET_assert (tmit->fragment_sizes[tmit->n] <= *data_size);
-  *data_size = tmit->fragment_sizes[tmit->n];
-  memcpy (data, tmit->fragments[tmit->n], *data_size);
+  *data_size = size;
+  memcpy (data, tmit->data[tmit->n], size);
 
-  return ++tmit->n < tmit->fragment_count ? GNUNET_NO : GNUNET_YES;
+  return ++tmit->n < tmit->data_count ? GNUNET_NO : GNUNET_YES;
 }
 
-void
-master_started (void *cls, uint64_t max_message_id)
+
+static void
+slave_joined (void *cls, uint64_t max_message_id)
 {
-  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
-              "Master started: %lu\n", max_message_id);
+  GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "Slave joined: %lu\n", max_message_id);
+  GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "Slave sending request to master.\n");
+
+  test = TEST_SLAVE_TRANSMIT;
+
+  tmit = GNUNET_new (struct TransmitClosure);
+  tmit->env = GNUNET_ENV_environment_create ();
+  GNUNET_ENV_environment_add (tmit->env, GNUNET_ENV_OP_ASSIGN,
+                              "_abc", "abc def", 7);
+  GNUNET_ENV_environment_add (tmit->env, GNUNET_ENV_OP_ASSIGN,
+                              "_abc_def", "abc def ghi", 11);
+  tmit->n = 0;
+  tmit->data[0] = "slave test";
+  tmit->data_count = 1;
+  tmit->slv_tmit
+    = GNUNET_PSYC_slave_transmit (slv, "_request_test", tmit_notify_mod,
+                                  tmit_notify_data, tmit,
+                                  GNUNET_PSYC_SLAVE_TRANSMIT_NONE);
+}
+
+static void
+slave_join ()
+{
+  GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "Joining slave.\n");
 
+  struct GNUNET_PeerIdentity origin;
+  struct GNUNET_PeerIdentity relays[16];
   struct GNUNET_ENV_Environment *env = GNUNET_ENV_environment_create ();
-  GNUNET_ENV_environment_add_mod (env, GNUNET_ENV_OP_ASSIGN,
-                                  "_foo", "bar baz", 7);
-  GNUNET_ENV_environment_add_mod (env, GNUNET_ENV_OP_ASSIGN,
-                                  "_foo_bar", "foo bar baz", 11);
-
-  struct TransmitClosure *tmit = GNUNET_new (struct TransmitClosure);
-  tmit->fragment_count = 3;
-  tmit->fragments[0] = "foo";
-  tmit->fragment_sizes[0] = 4;
-  tmit->fragments[1] = "foo bar";
-  tmit->fragment_sizes[1] = 7;
-  tmit->fragments[2] = "foo bar baz";
-  tmit->fragment_sizes[2] = 11;
-  tmit->handle
-    = GNUNET_PSYC_master_transmit (mst, "_test", env, transmit_notify, tmit,
+  GNUNET_ENV_environment_add (env, GNUNET_ENV_OP_ASSIGN,
+                              "_foo", "bar baz", 7);
+  GNUNET_ENV_environment_add (env, GNUNET_ENV_OP_ASSIGN,
+                              "_foo_bar", "foo bar baz", 11);
+  slv = GNUNET_PSYC_slave_join (cfg, &channel_pub_key, slave_key, &origin,
+                                16, relays, &slave_message, &join_request,
+                                &slave_joined, NULL, "_request_join", env,
+                                "some data", 9);
+  GNUNET_ENV_environment_destroy (env);
+}
+
+
+static void
+master_transmit ()
+{
+  GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "Master sending message to all.\n");
+  test = TEST_MASTER_TRANSMIT;
+  uint32_t i, j;
+
+  char *name_max = "_test_max";
+  uint8_t name_max_size = sizeof ("_test_max");
+  char *val_max = GNUNET_malloc (GNUNET_PSYC_MODIFIER_MAX_PAYLOAD);
+  for (i = 0; i < GNUNET_PSYC_MODIFIER_MAX_PAYLOAD; i++)
+    val_max[i] = (0 == i % 10000) ? '0' + i / 10000 : '.';
+
+  char *name_cont = "_test_cont";
+  uint8_t name_cont_size = sizeof ("_test_cont");
+  char *val_cont = GNUNET_malloc (GNUNET_PSYC_MODIFIER_MAX_PAYLOAD
+                                  + GNUNET_PSYC_MOD_CONT_MAX_PAYLOAD);
+  for (i = 0; i < GNUNET_PSYC_MODIFIER_MAX_PAYLOAD - name_cont_size; i++)
+    val_cont[i] = (0 == i % 10000) ? '0' + i / 10000 : ':';
+  for (j = 0; j < GNUNET_PSYC_MOD_CONT_MAX_PAYLOAD; j++, i++)
+    val_cont[i] = (0 == j % 10000) ? '0' + j / 10000 : '!';
+
+  tmit = GNUNET_new (struct TransmitClosure);
+  tmit->env = GNUNET_ENV_environment_create ();
+  GNUNET_ENV_environment_add (tmit->env, GNUNET_ENV_OP_ASSIGN,
+                              "_foo", "bar baz", 7);
+  GNUNET_ENV_environment_add (tmit->env, GNUNET_ENV_OP_ASSIGN,
+                              name_max, val_max,
+                              GNUNET_PSYC_MODIFIER_MAX_PAYLOAD
+                              - name_max_size);
+  GNUNET_ENV_environment_add (tmit->env, GNUNET_ENV_OP_ASSIGN,
+                              "_foo_bar", "foo bar baz", 11);
+  GNUNET_ENV_environment_add (tmit->env, GNUNET_ENV_OP_ASSIGN,
+                              name_cont, val_cont,
+                              GNUNET_PSYC_MODIFIER_MAX_PAYLOAD - name_cont_size
+                              + GNUNET_PSYC_MOD_CONT_MAX_PAYLOAD);
+  tmit->data[0] = "foo";
+  tmit->data[1] =  GNUNET_malloc (GNUNET_PSYC_DATA_MAX_PAYLOAD + 1);
+  for (i = 0; i < GNUNET_PSYC_DATA_MAX_PAYLOAD; i++)
+    tmit->data[1][i] = (0 == i % 10000) ? '0' + i / 10000 : '_';
+  tmit->data[2] = "foo bar";
+  tmit->data[3] = "foo bar baz";
+  tmit->data_delay[1] = 3;
+  tmit->data_count = 4;
+  tmit->mst_tmit
+    = GNUNET_PSYC_master_transmit (mst, "_notice_test", tmit_notify_mod,
+                                   tmit_notify_data, tmit,
                                    GNUNET_PSYC_MASTER_TRANSMIT_INC_GROUP_GEN);
 }
 
 
-void
-slave_joined (void *cls, uint64_t max_message_id)
+static void
+master_started (void *cls, uint64_t max_message_id)
 {
-  GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "Slave joined: %lu\n", max_message_id);
+  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+              "Master started: %" PRIu64 "\n", max_message_id);
+  slave_join ();
 }
 
 
@@ -254,21 +516,9 @@ run (void *cls,
   GNUNET_CRYPTO_eddsa_key_get_public (channel_key, &channel_pub_key);
   GNUNET_CRYPTO_eddsa_key_get_public (slave_key, &slave_pub_key);
 
-  mst = GNUNET_PSYC_master_start (cfg, channel_key,
-                                  GNUNET_PSYC_CHANNEL_PRIVATE,
-                                  &method, &join, &master_started, NULL);
-  return;
-  struct GNUNET_PeerIdentity origin;
-  struct GNUNET_PeerIdentity relays[16];
-  struct GNUNET_ENV_Environment *env = GNUNET_ENV_environment_create ();
-  GNUNET_ENV_environment_add_mod (env, GNUNET_ENV_OP_ASSIGN,
-                                  "_foo", "bar baz", 7);
-  GNUNET_ENV_environment_add_mod (env, GNUNET_ENV_OP_ASSIGN,
-                                  "_foo_bar", "foo bar baz", 11);
-  slv = GNUNET_PSYC_slave_join (cfg, &channel_pub_key, slave_key, &origin,
-                                16, relays, &method, &join, &slave_joined,
-                                NULL, "_request_join", env, "some data", 9);
-  GNUNET_ENV_environment_destroy (env);
+  GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "Starting master.\n");
+  mst = GNUNET_PSYC_master_start (cfg, channel_key, GNUNET_PSYC_CHANNEL_PRIVATE,
+                                  &master_message, &join_request, &master_started, NULL);
 }
 
 
@@ -285,8 +535,7 @@ main (int argc, char *argv[])
                                        opts, &run, NULL))
     return 1;
 #else
-  if (0 != GNUNET_TESTING_service_run ("test-psyc", "psyc",
-                                       "test_psyc.conf", &run, NULL))
+  if (0 != GNUNET_TESTING_peer_run ("test-psyc", "test_psyc.conf", &run, NULL))
     return 1;
 #endif
   return res;