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