-check RV
[oweals/gnunet.git] / src / ats / test_ats_api_performance_monitor.c
1 /*
2  This file is part of GNUnet.
3  (C) 2010,2011 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_api_performance_monitor.c
22  * @brief test performance API's address monitor feature
23  * @author Christian Grothoff
24  * @author Matthias Wachs
25  */
26 #include "platform.h"
27 #include "gnunet_ats_service.h"
28 #include "gnunet_testing_lib.h"
29 #include "ats.h"
30
31 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 10)
32 #define WAIT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 5)
33
34 static GNUNET_SCHEDULER_TaskIdentifier die_task;
35
36 /**
37  * Statistics handle
38  */
39 struct GNUNET_STATISTICS_Handle *stats;
40
41 /**
42  * Configuration handle
43  */
44 struct GNUNET_CONFIGURATION_Handle *cfg;
45
46 /**
47  * ATS scheduling handle
48  */
49 static struct GNUNET_ATS_SchedulingHandle *sched_ats;
50
51 /**
52  * ATS performance handle
53  */
54 static struct GNUNET_ATS_PerformanceHandle *perf_ats;
55
56 struct GNUNET_ATS_AddressListHandle* phal;
57
58 static int ret;
59
60 struct Address
61 {
62   char *plugin;
63   size_t plugin_len;
64
65   void *addr;
66   size_t addr_len;
67
68   struct GNUNET_ATS_Information *ats;
69   int ats_count;
70
71   void *session;
72 };
73
74 struct PeerContext
75 {
76   struct GNUNET_PeerIdentity id;
77
78   struct Address *addr;
79 };
80
81 static struct PeerContext p[2];
82
83 static struct Address p0_addresses[2];
84 static struct Address p1_addresses[2];
85
86 struct GNUNET_HELLO_Address p0_ha[2];
87 struct GNUNET_HELLO_Address p1_ha[2];
88 struct GNUNET_HELLO_Address *s_ha[2];
89
90 static void
91 end (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
92
93 static void
94 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
95
96
97 static void
98 ats_perf_cb (void *cls,
99             const struct GNUNET_HELLO_Address *address,
100             int address_active,
101             struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out,
102             struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
103             const struct GNUNET_ATS_Information *ats,
104             uint32_t ats_count)
105 {
106   static int peer0 = GNUNET_NO;
107   static int peer1 = GNUNET_NO;
108   static int done = GNUNET_NO;
109
110   if (NULL == address)
111     return;
112
113   if ((GNUNET_NO == peer0) && (0 == memcmp (address, &p[0].id, sizeof (p[0].id))))
114   {
115     peer0 = GNUNET_YES;
116   }
117   if ((GNUNET_NO == peer0) && (0 == memcmp (address, &p[1].id, sizeof (p[1].id))))
118   {
119     peer1 = GNUNET_YES;
120   }
121   if ((peer0 == GNUNET_YES) && (peer1 = GNUNET_YES) && (GNUNET_NO == done))
122   {
123     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
124         "Done\n");
125     done = GNUNET_YES;
126     GNUNET_SCHEDULER_add_now (&end, NULL);
127
128   }
129 }
130
131
132 static int
133 stat_cb(void *cls, const char *subsystem,
134         const char *name, uint64_t value,
135         int is_persistent)
136 {
137
138   GNUNET_log (GNUNET_ERROR_TYPE_INFO, "ATS statistics: `%s' `%s' %llu\n",
139       subsystem,name, value);
140   if (4 == value)
141   {
142     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
143         "All addresses added\n");
144   }
145
146   return GNUNET_OK;
147
148 }
149
150 static void
151 address_suggest_cb (void *cls,
152                     const struct GNUNET_PeerIdentity *peer,
153                     const struct GNUNET_HELLO_Address *address,
154                     struct Session *session,
155                     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out,
156                     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
157                     const struct GNUNET_ATS_Information *atsi,
158                     uint32_t ats_count)
159
160 {
161   GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Did not expect suggestion callback!\n");
162   GNUNET_SCHEDULER_add_now (&end_badly, NULL);
163   return;
164 }
165
166
167 static void
168 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
169 {
170   die_task = GNUNET_SCHEDULER_NO_TASK;
171   end ( NULL, NULL);
172   ret = GNUNET_SYSERR;
173 }
174
175 static void
176 end (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
177 {
178   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Shutting down\n");
179   if (die_task != GNUNET_SCHEDULER_NO_TASK )
180   {
181     GNUNET_SCHEDULER_cancel (die_task);
182     die_task = GNUNET_SCHEDULER_NO_TASK;
183   }
184
185   if (NULL != sched_ats)
186   {
187     GNUNET_ATS_scheduling_done (sched_ats);
188     sched_ats = NULL;
189   }
190
191   if (NULL != perf_ats)
192   {
193     GNUNET_ATS_performance_done (perf_ats);
194     perf_ats = NULL;
195   }
196
197   GNUNET_STATISTICS_watch_cancel (stats, "ats", "# addresses", &stat_cb, NULL);
198   if (NULL != stats)
199   {
200     GNUNET_STATISTICS_destroy (stats, GNUNET_NO);
201     stats = NULL;
202   }
203
204
205   GNUNET_free_non_null(p0_addresses[0].addr);
206   GNUNET_free_non_null(p0_addresses[1].addr);
207   GNUNET_free_non_null(p1_addresses[0].addr);
208   GNUNET_free_non_null(p1_addresses[1].addr);
209
210   ret = 0;
211 }
212
213 static void
214 run (void *cls, const struct GNUNET_CONFIGURATION_Handle *mycfg,
215     struct GNUNET_TESTING_Peer *peer)
216 {
217   ret = 1;
218   cfg = (struct GNUNET_CONFIGURATION_Handle *) mycfg;
219   die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL );
220
221   if (NULL == (perf_ats = GNUNET_ATS_performance_init (cfg, &ats_perf_cb, NULL)))
222   {
223     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
224         "Failed to connect to performance API\n");
225     GNUNET_SCHEDULER_add_now (end_badly, NULL);
226   }
227
228
229   stats = GNUNET_STATISTICS_create ("ats", cfg);
230   GNUNET_STATISTICS_watch (stats, "ats", "# addresses", &stat_cb, NULL);
231
232   /* set up peer 0 */
233   memset (&p[0].id, '1', sizeof (p[0].id));
234   p0_addresses[0].plugin = "test";
235   p0_addresses[0].session = NULL;
236   p0_addresses[0].addr = GNUNET_strdup ("test_p0_a0");
237   p0_addresses[0].addr_len = strlen (p0_addresses[0].addr) + 1;
238
239   p0_ha[0].address = p0_addresses[0].addr;
240   p0_ha[0].address_length = p0_addresses[0].addr_len;
241   p0_ha[0].peer = p[0].id;
242   p0_ha[0].transport_name = p0_addresses[0].plugin;
243
244   p0_addresses[1].plugin = "test";
245   p0_addresses[1].session = NULL;
246   p0_addresses[1].addr = GNUNET_strdup ("test_p0_a1");
247   p0_addresses[1].addr_len = strlen (p0_addresses[1].addr) + 1;
248
249   p0_ha[1].address = p0_addresses[1].addr;
250   p0_ha[1].address_length = p0_addresses[1].addr_len;
251   p0_ha[1].peer = p[0].id;
252   p0_ha[1].transport_name = p0_addresses[1].plugin;
253
254   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Created peer 0: `%s'\n",
255       GNUNET_i2s (&p[0].id));
256
257   memset (&p[1].id, '2', sizeof (p[1].id));
258   p1_addresses[0].plugin = "test";
259   p1_addresses[0].session = NULL;
260   p1_addresses[0].addr = GNUNET_strdup ("test_p1_a0");
261   p1_addresses[0].addr_len = strlen (p1_addresses[0].addr) + 1;
262
263   p1_ha[0].address = p1_addresses[0].addr;
264   p1_ha[0].address_length = p1_addresses[0].addr_len;
265   p1_ha[0].peer = p[1].id;
266   p1_ha[0].transport_name = p1_addresses[0].plugin;
267
268   p1_addresses[1].plugin = "test";
269   p1_addresses[1].session = NULL;
270   p1_addresses[1].addr = GNUNET_strdup ("test_p1_a1");
271   p1_addresses[1].addr_len = strlen (p1_addresses[1].addr) + 1;
272
273   p1_ha[1].address = p1_addresses[1].addr;
274   p1_ha[1].address_length = p1_addresses[1].addr_len;
275   p1_ha[1].peer = p[1].id;
276   p1_ha[1].transport_name = p1_addresses[1].plugin;
277
278   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Created peer 1: `%s'\n",
279       GNUNET_i2s (&p[1].id));
280
281   /* Add addresses */
282   sched_ats = GNUNET_ATS_scheduling_init (cfg, &address_suggest_cb, NULL );
283   if (sched_ats == NULL )
284   {
285     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Could not setup peer!\n");
286     GNUNET_SCHEDULER_add_now (&end_badly, NULL);
287     return;
288   }
289
290   GNUNET_ATS_address_add (sched_ats, &p0_ha[0], NULL, NULL, 0);
291   GNUNET_ATS_address_add (sched_ats, &p0_ha[1], NULL, NULL, 0);
292
293   GNUNET_ATS_address_add (sched_ats, &p1_ha[0], NULL, NULL, 0);
294   GNUNET_ATS_address_add (sched_ats, &p1_ha[1], NULL, NULL, 0);
295 }
296
297 int
298 main (int argc, char *argv[])
299 {
300   if (0
301       != GNUNET_TESTING_peer_run ("test_ats_api_performance",
302           "test_ats_api.conf", &run, NULL ))
303     return 1;
304   return ret;
305 }
306
307 /* end of file test_ats_api_performance_monitor.c */