/*
      This file is part of GNUnet
      Copyright (C) 2008, 2009, 2012 GNUnet e.V.

      GNUnet is free software: you can redistribute it and/or modify it
      under the terms of the GNU Affero General Public License as published
      by the Free Software Foundation, either version 3 of the License,
      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
      Affero General Public License for more details.
 */

/**
 * @file testing/test_testing_new_peerstartup.c
 * @brief test case for testing peer startup and shutdown using new testing
 *          library
 * @author Sree Harsha Totakura
 */

#include "platform.h"
#include "gnunet_util_lib.h"
#include "gnunet_testing_lib.h"

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


#define FAIL_TEST(cond)                         \
  do {                                          \
    if (!(cond)) {                              \
      GNUNET_break (0);                         \
      if (GNUNET_OK == status) {                \
        status = GNUNET_SYSERR;                 \
      }                                         \
    }                                           \
  } while (0)                                   \


/**
 * The status of the test
 */
int status;

/**
 * The testing context
 */
struct TestingContext
{
  /**
   * The testing system
   */
  struct GNUNET_TESTING_System *system;

  /**
   * The peer which has been started by the testing system
   */
  struct GNUNET_TESTING_Peer *peer;

  /**
   * The running configuration of the peer
   */
  struct GNUNET_CONFIGURATION_Handle *cfg;

  /**
   * State
   */
  enum {
    PEER_INIT,

    PEER_STARTED,

    PEER_STOPPED
  } state;
};


static void
do_shutdown2 (void *cls)
{
  struct TestingContext *test_ctx = cls;

  if (NULL != test_ctx->peer)
    GNUNET_TESTING_peer_destroy (test_ctx->peer);
  if (NULL != test_ctx->cfg)
    GNUNET_CONFIGURATION_destroy (test_ctx->cfg);
  if (NULL != test_ctx->system)
    GNUNET_TESTING_system_destroy (test_ctx->system, GNUNET_YES);
  GNUNET_free (test_ctx);

}


/**
 * Task for shutdown
 *
 * @param cls the testing context
 */
static void
do_shutdown (void *cls);


static void
peer_status_cb (void *cls, struct GNUNET_TESTING_Peer *peer, int success)
{
  struct TestingContext *test_ctx = cls;

  switch (test_ctx->state)
  {
  case PEER_INIT:
    FAIL_TEST (0);
    break;
  case PEER_STARTED:
    FAIL_TEST (GNUNET_YES == success);
    test_ctx->state = PEER_STOPPED;
    GNUNET_SCHEDULER_add_now (&do_shutdown2, cls);
    break;
  case PEER_STOPPED:
    FAIL_TEST (0);
  }
}


/**
 * Task for shutdown
 *
 * @param cls the testing context
 */
static void
do_shutdown (void *cls)
{
  struct TestingContext *test_ctx = cls;

  GNUNET_assert (NULL != test_ctx);
  if (NULL != test_ctx->peer)
  {
    FAIL_TEST (GNUNET_OK ==
               GNUNET_TESTING_peer_stop_async (test_ctx->peer,
                                               &peer_status_cb,
                                               test_ctx));
  }
  else
    do_shutdown2 (test_ctx);
}


/**
 * Main point of test execution
 */
static void
run (void *cls, char *const *args, const char *cfgfile,
     const struct GNUNET_CONFIGURATION_Handle *cfg)
{
  struct TestingContext *test_ctx;
  char *emsg;
  struct GNUNET_PeerIdentity id;

  test_ctx = GNUNET_new (struct TestingContext);
  test_ctx->system =
      GNUNET_TESTING_system_create ("test-gnunet-testing",
                                    "127.0.0.1", NULL, NULL);
  emsg = NULL;
  if (NULL == test_ctx->system)
    goto end;
  test_ctx->cfg = GNUNET_CONFIGURATION_dup (cfg);
  test_ctx->peer =
      GNUNET_TESTING_peer_configure (test_ctx->system,
                                     test_ctx->cfg,
                                     0, &id, &emsg);
  if (NULL == test_ctx->peer)
  {
    if (NULL != emsg)
      printf ("Test failed upon error: %s", emsg);
    goto end;
  }
  if (GNUNET_OK != GNUNET_TESTING_peer_start (test_ctx->peer))
    goto end;
  test_ctx->state = PEER_STARTED;
  FAIL_TEST (GNUNET_OK ==
             GNUNET_TESTING_peer_stop_async (test_ctx->peer,
                                             &peer_status_cb,
                                             test_ctx));
  GNUNET_TESTING_peer_stop_async_cancel (test_ctx->peer);
  GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS,
                                &do_shutdown, test_ctx);
  return;

 end:
  FAIL_TEST (0);
  GNUNET_SCHEDULER_add_now (&do_shutdown, test_ctx);
  GNUNET_free_non_null (emsg);
}


int main (int argc, char *argv[])
{
  struct GNUNET_GETOPT_CommandLineOption options[] = {
    GNUNET_GETOPT_OPTION_END
  };

  status = GNUNET_OK;
  if (GNUNET_OK !=
      GNUNET_PROGRAM_run (argc, argv,
                          "test_testing_new_peerstartup",
                          "test case for peerstartup using new testing library",
                          options, &run, NULL))
    return 1;
  return (GNUNET_OK == status) ? 0 : 1;
}

/* end of test_testing_peerstartup.c */