src/ats/test_ats_solver_alternative_after_delete_address.c

   1 /*
   2  This file is part of GNUnet.
   3  Copyright (C) 2010-2013 Christian Grothoff (and other contributing authors)
   4
   5  GNUnet is free software; you can redistribute it and/or modify
   6  it under the terms of the GNU General Public License as published
   7  by the Free Software Foundation; either version 3, or (at your
   8  option) any later version.
   9
  10  GNUnet is distributed in the hope that it will be useful, but
  11  WITHOUT ANY WARRANTY; without even the implied warranty of
  12  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  General Public License for more details.
  14
  15  You should have received a copy of the GNU General Public License
  16  along with GNUnet; see the file COPYING.  If not, write to the
  17  Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18  Boston, MA 02111-1307, USA.
  19  */
  20 /**
  21  * @file ats/test_ats_solver_alternative_after_delete_address.c
  22  * @brief solver test:  add 2 addresses, request address, delete, expect alternative
  23  * @author Christian Grothoff
  24  * @author Matthias Wachs
  25  */
  26 #include "platform.h"
  27 #include "gnunet_util_lib.h"
  28 #include "gnunet_testbed_service.h"
  29 #include "gnunet_ats_service.h"
  30 #include "test_ats_api_common.h"
  31
  32 /**
  33  * Timeout task
  34  */
  35 static struct GNUNET_SCHEDULER_Task * die_task;
  36
  37 /**
  38  * Statistics handle
  39  */
  40 static struct GNUNET_STATISTICS_Handle *stats;
  41
  42 /**
  43  * Scheduling handle
  44  */
  45 static struct GNUNET_ATS_SchedulingHandle *sched_ats;
  46
  47 /**
  48  * Connectivity handle
  49  */
  50 static struct GNUNET_ATS_ConnectivityHandle *connect_ats;
  51
  52 /**
  53  * Return value
  54  */
  55 static int ret;
  56
  57 /**
  58  * Test address
  59  */
  60 static struct Test_Address test_addr;
  61
  62 /**
  63  * Alternative test address
  64  */
  65 static struct Test_Address alt_test_addr;
  66
  67 /**
  68  * Test peer
  69  */
  70 static struct PeerContext p;
  71
  72 /**
  73  * HELLO address
  74  */
  75 static struct GNUNET_HELLO_Address test_hello_address;
  76
  77 /**
  78  * HELLO address
  79  */
  80 static struct GNUNET_HELLO_Address alt_test_hello_address;
  81
  82 /**
  83  * Session
  84  */
  85 static void *test_session;
  86
  87 /**
  88  * Test ats info
  89  */
  90 static struct GNUNET_ATS_Information test_ats_info[2];
  91
  92 /**
  93  * Test ats count
  94  */
  95 static uint32_t test_ats_count;
  96
  97 /**
  98  * Test state
  99  */
 100 static int addresses_added;
 101
 102 static int first_address_suggested;
 103
 104 static int first_address_deleted;
 105
 106 static int second_address_deleted;
 107
 108 static int second_address_suggested = GNUNET_YES;
 109
 110 static struct GNUNET_HELLO_Address *first_suggestion;
 111
 112 static struct GNUNET_HELLO_Address *second_suggestion;
 113
 114 /**
 115  * 1st Address we will destroy.
 116  */
 117 static struct GNUNET_ATS_AddressRecord *ar;
 118
 119 /**
 120  * 2nd Address we will destroy.
 121  */
 122 static struct GNUNET_ATS_AddressRecord *ar2;
 123
 124
 125 static int
 126 stat_cb (void *cls, const char *subsystem, const char *name, uint64_t value,
 127          int is_persistent);
 128
 129
 130 static void
 131 end (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
 132 {
 133   if (NULL != die_task)
 134   {
 135     GNUNET_SCHEDULER_cancel (die_task);
 136     die_task = NULL;
 137   }
 138   if (NULL != connect_ats)
 139   {
 140     GNUNET_ATS_connectivity_done (connect_ats);
 141     connect_ats = NULL;
 142   }
 143   if (NULL != sched_ats)
 144   {
 145     GNUNET_ATS_scheduling_done (sched_ats);
 146     sched_ats = NULL;
 147   }
 148
 149   GNUNET_STATISTICS_watch_cancel (stats, "ats", "# addresses", &stat_cb, NULL);
 150   if (NULL != stats)
 151   {
 152     GNUNET_STATISTICS_destroy (stats, GNUNET_NO);
 153     stats = NULL;
 154   }
 155
 156   free_test_address (&test_addr);
 157   GNUNET_free_non_null (first_suggestion);
 158   GNUNET_free_non_null (second_suggestion);
 159   ret = 0;
 160 }
 161
 162
 163 static void
 164 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
 165 {
 166
 167   die_task = NULL;
 168   end ( NULL, NULL);
 169   ret = GNUNET_SYSERR;
 170 }
 171
 172
 173 static void
 174 end_badly_now ()
 175 {
 176   if (NULL != die_task)
 177   {
 178     GNUNET_SCHEDULER_cancel (die_task);
 179     die_task = NULL;
 180   }
 181   GNUNET_SCHEDULER_add_now (&end_badly, NULL);
 182 }
 183
 184
 185 static void
 186 address_suggest_cb (void *cls,
 187                     const struct GNUNET_PeerIdentity *peer,
 188                     const struct GNUNET_HELLO_Address *address,
 189                     struct Session *session,
 190                     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out,
 191                     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in)
 192 {
 193   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 194               "Received a sugggestion for peer `%s'\n",
 195               GNUNET_i2s (peer));
 196   if (GNUNET_NO == first_address_suggested)
 197   {
 198     if  (NULL == first_suggestion)
 199     {
 200       if ((NULL == address) || (NULL != session))
 201       {
 202         GNUNET_break (0);
 203         end_badly_now ();
 204         return;
 205       }
 206       if ((ntohl(bandwidth_in.value__) == 0) ||
 207           (ntohl(bandwidth_out.value__) == 0))
 208       {
 209         GNUNET_break (0);
 210         end_badly_now ();
 211         return;
 212       }
 213
 214       GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 215                   "Received 1st sugggestion for peer `%s' : `%s'\n",
 216                   GNUNET_i2s (&address->peer), (char *) address->address);
 217
 218       first_suggestion = GNUNET_HELLO_address_copy (address);
 219       first_address_suggested = GNUNET_YES;
 220
 221
 222       GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 223                   "Deleting 1st address for peer `%s' : `%s'\n",
 224                   GNUNET_i2s (&address->peer),
 225                   (char *) address->address);
 226       if (0 == (strcmp ((char *) address->address,
 227                         "test")))
 228       {
 229         GNUNET_assert (NULL != ar);
 230         GNUNET_ATS_address_destroy (ar);
 231         ar = NULL;
 232       }
 233       else
 234       {
 235         GNUNET_assert (NULL != ar2);
 236         GNUNET_ATS_address_destroy (ar2);
 237         ar2 = NULL;
 238       }
 239
 240       first_address_deleted = GNUNET_YES;
 241
 242       return;
 243     }
 244   }
 245   if (GNUNET_YES == first_address_deleted)
 246   {
 247     if (NULL == second_suggestion)
 248     {
 249       if ((NULL == address) || (NULL != session))
 250       {
 251         GNUNET_break (0);
 252         end_badly_now ();
 253         return;
 254       }
 255
 256       if (0 != memcmp (address->address, first_suggestion->address,
 257           (first_suggestion->address_length < address->address_length) ? first_suggestion->address_length : address->address_length))
 258       {
 259         GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 260                     "Received 2nd sugggestion for peer `%s' : `%s'\n",
 261                     GNUNET_i2s (&address->peer),
 262                     (char *) address->address);
 263         second_suggestion = GNUNET_HELLO_address_copy (address);
 264         second_address_suggested = GNUNET_YES;
 265
 266         GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 267                     "Deleting 2nd address for peer `%s' : `%s'\n",
 268                     GNUNET_i2s (&address->peer),
 269                     (char *) address->address);
 270         if (NULL != ar)
 271         {
 272           GNUNET_assert (NULL == ar2);
 273           GNUNET_ATS_address_destroy (ar);
 274           ar = NULL;
 275         }
 276         else
 277         {
 278           GNUNET_assert (NULL != ar2);
 279           GNUNET_ATS_address_destroy (ar2);
 280           ar2 = NULL;
 281         }
 282         second_address_deleted = GNUNET_YES;
 283         return;
 284       }
 285     }
 286   }
 287   if (GNUNET_YES == second_address_deleted)
 288   {
 289     /* Expecting disconnect */
 290     if ((ntohl(bandwidth_in.value__) == 0) &&
 291         (ntohl(bandwidth_out.value__) == 0))
 292     {
 293       GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 294                   "ATS tells me to disconnect\n");
 295       GNUNET_SCHEDULER_add_now (&end, NULL);
 296       return;
 297     }
 298     else
 299     {
 300       GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 301                   "Expected disconnect but received address `%s' with bandwidth \n",
 302                   (char *) address->address);
 303     }
 304   }
 305 }
 306
 307
 308 static int
 309 stat_cb(void *cls, const char *subsystem,
 310         const char *name, uint64_t value,
 311         int is_persistent)
 312 {
 313   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 314               "ATS statistics: `%s' `%s' %llu\n",
 315               subsystem,
 316               name,
 317               value);
 318   if ((GNUNET_NO == addresses_added) && (value == 2))
 319   {
 320     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 321                 "All addresses added, requesting....\n");
 322     /* We have 2 addresses, so we can request */
 323     addresses_added = GNUNET_YES;
 324     GNUNET_ATS_connectivity_suggest (connect_ats, &p.id);
 325   }
 326   return GNUNET_OK;
 327 }
 328
 329
 330 static void
 331 run (void *cls,
 332      const struct GNUNET_CONFIGURATION_Handle *mycfg,
 333      struct GNUNET_TESTING_Peer *peer)
 334 {
 335   die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
 336   stats = GNUNET_STATISTICS_create ("ats", mycfg);
 337   GNUNET_STATISTICS_watch (stats, "ats", "# addresses", &stat_cb, NULL);
 338
 339   connect_ats = GNUNET_ATS_connectivity_init (mycfg);
 340
 341   /* Connect to ATS scheduling */
 342   sched_ats = GNUNET_ATS_scheduling_init (mycfg, &address_suggest_cb, NULL);
 343   if (sched_ats == NULL)
 344   {
 345     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
 346                 "Could not connect to ATS scheduling!\n");
 347     end_badly_now ();
 348     return;
 349   }
 350
 351   /* Set up peer */
 352   memset (&p.id, '1', sizeof (p.id));
 353   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Created peer `%s'\n",
 354               GNUNET_i2s_full(&p.id));
 355
 356   /* Prepare ATS Information */
 357   test_ats_info[0].type = htonl (GNUNET_ATS_NETWORK_TYPE);
 358   test_ats_info[0].value = htonl(GNUNET_ATS_NET_WAN);
 359   test_ats_info[1].type = htonl (GNUNET_ATS_QUALITY_NET_DISTANCE);
 360   test_ats_info[1].value = htonl(1);
 361   test_ats_count = 2;
 362
 363   /* Adding address without session */
 364   test_session = NULL;
 365   create_test_address (&test_addr, "test", test_session,
 366                        "test", strlen ("test") + 1);
 367   test_hello_address.peer = p.id;
 368   test_hello_address.transport_name = test_addr.plugin;
 369   test_hello_address.address = test_addr.addr;
 370   test_hello_address.address_length = test_addr.addr_len;
 371
 372   /* Adding alternative address without session */
 373   test_session = NULL;
 374   create_test_address (&alt_test_addr, "test", test_session,
 375                        "alt_test", strlen ("alt_test") + 1);
 376   alt_test_hello_address.peer = p.id;
 377   alt_test_hello_address.transport_name = alt_test_addr.plugin;
 378   alt_test_hello_address.address = alt_test_addr.addr;
 379   alt_test_hello_address.address_length = alt_test_addr.addr_len;
 380
 381
 382   /* Adding address */
 383   ar = GNUNET_ATS_address_add (sched_ats, &test_hello_address, NULL,
 384                                test_ats_info, test_ats_count);
 385   /* Adding alternative address */
 386   ar2 = GNUNET_ATS_address_add (sched_ats, &alt_test_hello_address, NULL,
 387                                 test_ats_info, test_ats_count);
 388 }
 389
 390
 391 int
 392 main (int argc, char *argv[])
 393 {
 394   char *sep;
 395   char *src_filename = GNUNET_strdup (__FILE__);
 396   char *test_filename = GNUNET_strdup (argv[0]);
 397   const char *config_file;
 398   char *solver;
 399
 400   ret = 0;
 401
 402   if (NULL == (sep  = (strstr (src_filename, ".c"))))
 403   {
 404     GNUNET_break (0);
 405     return -1;
 406   }
 407   sep[0] = '\0';
 408
 409   if (NULL != (sep = strstr (test_filename, ".exe")))
 410     sep[0] = '\0';
 411
 412   if (NULL == (solver = strstr (test_filename, src_filename)))
 413   {
 414     GNUNET_break (0);
 415     return -1;
 416   }
 417   solver += strlen (src_filename) +1;
 418
 419   if (0 == strcmp(solver, "proportional"))
 420   {
 421     config_file = "test_ats_solver_proportional.conf";
 422   }
 423   else if (0 == strcmp(solver, "mlp"))
 424   {
 425     config_file = "test_ats_solver_mlp.conf";
 426   }
 427   else if ((0 == strcmp(solver, "ril")))
 428   {
 429     config_file = "test_ats_solver_ril.conf";
 430   }
 431   else
 432   {
 433     GNUNET_break (0);
 434     GNUNET_free (src_filename);
 435     GNUNET_free (test_filename);
 436     return 1;
 437   }
 438
 439   GNUNET_free (src_filename);
 440   GNUNET_free (test_filename);
 441
 442   if (0 != GNUNET_TESTING_peer_run ("test-ats-solver",
 443       config_file, &run, NULL ))
 444     return GNUNET_SYSERR;
 445
 446   return ret;
 447 }
 448
 449 /* end of file test_ats_solver_alternative_after_delete_address.c */