aboutsummaryrefslogtreecommitdiff
path: root/src/ats-tests/gnunet-ats-sim.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/ats-tests/gnunet-ats-sim.c')
-rw-r--r--src/ats-tests/gnunet-ats-sim.c399
1 files changed, 0 insertions, 399 deletions
diff --git a/src/ats-tests/gnunet-ats-sim.c b/src/ats-tests/gnunet-ats-sim.c
deleted file mode 100644
index 15cd52e2f..000000000
--- a/src/ats-tests/gnunet-ats-sim.c
+++ /dev/null
@@ -1,399 +0,0 @@
1/*
2 This file is part of GNUnet.
3 Copyright (C) 2010-2013 GNUnet e.V.
4
5 GNUnet is free software: you can redistribute it and/or modify it
6 under the terms of the GNU Affero General Public License as published
7 by the Free Software Foundation, either version 3 of the License,
8 or (at your 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 Affero General Public License for more details.
14
15 You should have received a copy of the GNU Affero General Public License
16 along with this program. If not, see <http://www.gnu.org/licenses/>.
17
18 SPDX-License-Identifier: AGPL3.0-or-later
19 */
20/**
21 * @file ats-tests/gnunet-ats-sim.c
22 * @brief ats traffic simulator: this tool uses the ats-test library to setup a
23 * topology and generate traffic between these peers. The traffic description
24 * is loaded from a experiment description file
25 * @author Christian Grothoff
26 * @author Matthias Wachs
27 */
28#include "platform.h"
29#include "gnunet_util_lib.h"
30#include "gnunet_testbed_service.h"
31#include "gnunet_ats_service.h"
32#include "gnunet_core_service.h"
33#include "ats-testing.h"
34
35#define TEST_TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, \
36 10)
37
38static struct BenchmarkPeer *masters_p;
39static struct BenchmarkPeer *slaves_p;
40
41/**
42 * cmd option -e: experiment file
43 */
44static char *opt_exp_file;
45
46/**
47 * cmd option -l: enable logging
48 */
49static int opt_log;
50
51/**
52 * cmd option -p: enable plots
53 */
54static int opt_plot;
55
56/**
57 * cmd option -v: verbose logs
58 */
59static int opt_verbose;
60
61static struct GNUNET_SCHEDULER_Task *timeout_task;
62
63static struct Experiment *e;
64
65static struct LoggingHandle *l;
66
67
68static void
69evaluate (struct GNUNET_TIME_Relative duration_total)
70{
71 int c_m;
72 int c_s;
73 unsigned int duration;
74 struct BenchmarkPeer *mp;
75 struct BenchmarkPartner *p;
76
77 unsigned int b_sent_sec;
78 double kb_sent_percent;
79 unsigned int b_recv_sec;
80 double kb_recv_percent;
81 unsigned int rtt;
82
83
84 duration = (duration_total.rel_value_us / (1000 * 1000));
85 if (0 == duration)
86 duration = 1;
87 for (c_m = 0; c_m < e->num_masters; c_m++)
88 {
89 mp = &masters_p[c_m];
90 fprintf (stderr,
91 _ (
92 "Master [%u]: sent: %u KiB in %u sec. = %u KiB/s, received: %u KiB in %u sec. = %u KiB/s\n"),
93 mp->no, mp->total_bytes_sent / 1024,
94 duration,
95 (mp->total_bytes_sent / 1024) / duration,
96 mp->total_bytes_received / 1024,
97 duration,
98 (mp->total_bytes_received / 1024) / duration);
99
100 for (c_s = 0; c_s < e->num_slaves; c_s++)
101 {
102 p = &mp->partners[c_s];
103
104 b_sent_sec = 0;
105 b_recv_sec = 0;
106 kb_sent_percent = 0.0;
107 kb_recv_percent = 0.0;
108 rtt = 0;
109
110 if (duration > 0)
111 {
112 b_sent_sec = p->bytes_sent / duration;
113 b_recv_sec = p->bytes_received / duration;
114 }
115
116 if (mp->total_bytes_sent > 0)
117 kb_sent_percent = ((double) p->bytes_sent * 100) / mp->total_bytes_sent;
118 if (mp->total_bytes_received > 0)
119 kb_recv_percent = ((double) p->bytes_received * 100)
120 / mp->total_bytes_received;
121 if (1000 * p->messages_sent > 0)
122 rtt = p->total_app_rtt / (1000 * p->messages_sent);
123 fprintf (stderr,
124 "%c Master [%u] -> Slave [%u]: sent %u Bips (%.2f %%), received %u Bips (%.2f %%)\n",
125 (mp->pref_partner == p->dest) ? '*' : ' ',
126 mp->no, p->dest->no,
127 b_sent_sec, kb_sent_percent,
128 b_recv_sec, kb_recv_percent);
129 fprintf (stderr,
130 "%c Master [%u] -> Slave [%u]: Average application layer RTT: %u ms\n",
131 (mp->pref_partner == p->dest) ? '*' : ' ',
132 mp->no, p->dest->no, rtt);
133 }
134 }
135}
136
137
138static void
139do_shutdown (void *cls)
140{
141 fprintf (stderr, "Shutdown\n");
142 if (NULL != timeout_task)
143 {
144 GNUNET_SCHEDULER_cancel (timeout_task);
145 timeout_task = NULL;
146 }
147 if (NULL != l)
148 {
149 GNUNET_ATS_TEST_logging_stop (l);
150 GNUNET_ATS_TEST_logging_clean_up (l);
151 l = NULL;
152 }
153
154 /* Stop traffic generation */
155 GNUNET_ATS_TEST_generate_traffic_stop_all ();
156
157 /* Stop all preference generations */
158 GNUNET_ATS_TEST_generate_preferences_stop_all ();
159
160 if (NULL != e)
161 {
162 GNUNET_ATS_TEST_experimentation_stop (e);
163 e = NULL;
164 }
165 GNUNET_ATS_TEST_shutdown_topology ();
166}
167
168
169static void
170do_timeout (void *cls)
171{
172 timeout_task = NULL;
173 GNUNET_SCHEDULER_shutdown ();
174}
175
176
177static void
178log_request__cb (void *cls,
179 const struct GNUNET_HELLO_Address *address,
180 int address_active,
181 struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out,
182 struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
183 const struct GNUNET_ATS_Properties *ats)
184{
185 if (NULL != l)
186 {
187 // GNUNET_break (0);
188 // GNUNET_ATS_TEST_logging_now (l);
189 }
190}
191
192
193static void
194experiment_done_cb (struct Experiment *e,
195 struct GNUNET_TIME_Relative duration,
196 int success)
197{
198 if (GNUNET_OK == success)
199 GNUNET_log (GNUNET_ERROR_TYPE_INFO,
200 "Experiment done successful in %s\n",
201 GNUNET_STRINGS_relative_time_to_string (duration,
202 GNUNET_YES));
203 else
204 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Experiment failed \n");
205
206 /* Stop logging */
207 GNUNET_ATS_TEST_logging_stop (l);
208
209 /* Stop traffic generation */
210 GNUNET_ATS_TEST_generate_traffic_stop_all ();
211
212 /* Stop all preference generations */
213 GNUNET_ATS_TEST_generate_preferences_stop_all ();
214
215 evaluate (duration);
216 if (opt_log)
217 GNUNET_ATS_TEST_logging_write_to_file (l, opt_exp_file, opt_plot);
218 GNUNET_SCHEDULER_shutdown ();
219}
220
221
222static void
223episode_done_cb (struct Episode *ep)
224{
225 GNUNET_log (GNUNET_ERROR_TYPE_INFO,
226 "Episode %u done\n",
227 ep->id);
228}
229
230
231static void
232topology_setup_done (void *cls,
233 struct BenchmarkPeer *masters,
234 struct BenchmarkPeer *slaves)
235{
236 GNUNET_log (GNUNET_ERROR_TYPE_INFO,
237 "Topology setup complete!\n");
238
239 masters_p = masters;
240 slaves_p = slaves;
241
242 l = GNUNET_ATS_TEST_logging_start (e->log_freq,
243 e->name,
244 masters_p,
245 e->num_masters, e->num_slaves,
246 opt_verbose);
247 GNUNET_ATS_TEST_experimentation_run (e,
248 &episode_done_cb,
249 &experiment_done_cb);
250/*
251 GNUNET_ATS_TEST_generate_preferences_start(&masters[0],&masters[0].partners[0],
252 GNUNET_ATS_TEST_TG_CONSTANT, 1, 1, GNUNET_TIME_UNIT_SECONDS,
253 GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_MILLISECONDS, 250),
254 GNUNET_ATS_PREFERENCE_BANDWIDTH);
255 *//*
256 GNUNET_ATS_TEST_generate_preferences_start(&masters[0],&masters[0].partners[0],
257 GNUNET_ATS_TEST_TG_LINEAR, 1, 50,
258 GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 2),
259 GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_MILLISECONDS, 250),
260 GNUNET_ATS_PREFERENCE_BANDWIDTH);
261 *//*
262 GNUNET_ATS_TEST_generate_preferences_start(&masters[0],&masters[0].partners[0],
263 GNUNET_ATS_TEST_TG_RANDOM, 1, 50,
264 GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 2),
265 GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_MILLISECONDS, 250),
266 GNUNET_ATS_PREFERENCE_BANDWIDTH);
267 *//*
268 GNUNET_ATS_TEST_generate_preferences_start(&masters[0],&masters[0].partners[0],
269 GNUNET_ATS_TEST_TG_SINUS, 10, 5,
270 GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 5),
271 GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_MILLISECONDS, 250),
272 GNUNET_ATS_PREFERENCE_BANDWIDTH);
273 */
274#if 0
275 int c_m;
276 int c_s;
277 for (c_m = 0; c_m < e->num_masters; c_m++)
278 {
279 for (c_s = 0; c_s < e->num_slaves; c_s++)
280 {
281 /* Generate maximum traffic to all peers */
282 /* Example: Generate traffic with constant 10,000 Bytes/s */
283 GNUNET_ATS_TEST_generate_traffic_start (&masters[c_m],
284 &masters[c_m].partners[c_s],
285 GNUNET_ATS_TEST_TG_CONSTANT,
286 10000,
287 GNUNET_TIME_UNIT_FOREVER_REL);
288 /* Example: Generate traffic with an increasing rate from 1000 to 2000
289 * Bytes/s with in a minute */
290 GNUNET_ATS_TEST_generate_traffic_start (&masters[c_m],
291 &masters[c_m].partners[c_s],
292 GNUNET_ATS_TEST_TG_LINEAR,
293 1000,
294 2000,
295 GNUNET_TIME_UNIT_MINUTES,
296 GNUNET_TIME_UNIT_FOREVER_REL);
297 /* Example: Generate traffic with a random rate between 1000 to 2000
298 * Bytes/s */
299 GNUNET_ATS_TEST_generate_traffic_start (&masters[c_m],
300 &masters[c_m].partners[c_s],
301 GNUNET_ATS_TEST_TG_RANDOM,
302 1000,
303 2000,
304 GNUNET_TIME_UNIT_FOREVER_REL,
305 GNUNET_TIME_UNIT_FOREVER_REL);
306 /* Example: Generate traffic with a sinus form, a base rate of
307 * 1000 Bytes/s, an amplitude of (max-base), and a period of 1 minute */
308 GNUNET_ATS_TEST_generate_traffic_start (&masters[c_m],
309 &masters[c_m].partners[c_s],
310 GNUNET_ATS_TEST_TG_SINUS,
311 1000,
312 2000,
313 GNUNET_TIME_UNIT_MINUTES,
314 GNUNET_TIME_UNIT_FOREVER_REL);
315 }
316 }
317#endif
318
319 timeout_task
320 = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_add (
321 GNUNET_TIME_UNIT_MINUTES,
322 e->max_duration),
323 &do_timeout,
324 NULL);
325 GNUNET_SCHEDULER_add_shutdown (&do_shutdown, NULL);
326}
327
328
329static void
330parse_args (int argc, char *argv[])
331{
332 int c;
333
334 opt_exp_file = NULL;
335 opt_log = GNUNET_NO;
336 opt_plot = GNUNET_NO;
337
338 for (c = 0; c < argc; c++)
339 {
340 if ((c < (argc - 1)) && (0 == strcmp (argv[c], "-e")))
341 {
342 GNUNET_free (opt_exp_file);
343 opt_exp_file = GNUNET_strdup (argv[c + 1]);
344 }
345 if (0 == strcmp (argv[c], "-l"))
346 {
347 opt_log = GNUNET_YES;
348 }
349 if (0 == strcmp (argv[c], "-p"))
350 {
351 opt_plot = GNUNET_YES;
352 }
353 if (0 == strcmp (argv[c], "-v"))
354 {
355 opt_verbose = GNUNET_YES;
356 }
357 }
358}
359
360
361int
362main (int argc, char *argv[])
363{
364 GNUNET_log_setup ("gnunet-ats-sim", "INFO", NULL);
365
366 parse_args (argc, argv);
367 if (NULL == opt_exp_file)
368 {
369 fprintf (stderr, "No experiment given...\n");
370 return 1;
371 }
372
373 fprintf (stderr, "Loading experiment `%s' \n", opt_exp_file);
374 e = GNUNET_ATS_TEST_experimentation_load (opt_exp_file);
375 if (NULL == e)
376 {
377 fprintf (stderr, "Invalid experiment\n");
378 return 1;
379 }
380 if (0 == e->num_episodes)
381 {
382 fprintf (stderr, "No episodes included\n");
383 return 1;
384 }
385
386 /* Setup a topology with */
387 GNUNET_ATS_TEST_create_topology ("gnunet-ats-sim", e->cfg_file,
388 e->num_slaves,
389 e->num_masters,
390 GNUNET_NO,
391 &topology_setup_done,
392 NULL,
393 &log_request__cb);
394 GNUNET_free (opt_exp_file);
395 return 0;
396}
397
398
399/* end of file gnunet-ats-sim.c */
generated by cgit v1.2.3 (git 2.39.1) at 2024-04-19 21:55:04 +0000