2 This file is part of GNUnet.
3 Copyright (C) 2010-2013 GNUnet e.V.
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.
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.
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., 51 Franklin Street, Fifth Floor,
18 Boston, MA 02110-1301, USA.
21 * @file ats-tests/ats-testing-log.c
22 * @brief ats benchmark: logging for performance tests
23 * @author Christian Grothoff
24 * @author Matthias Wachs
27 #include "gnunet_util_lib.h"
28 #include "ats-testing.h"
30 #define THROUGHPUT_TEMPLATE "#!/usr/bin/gnuplot \n" \
31 "set datafile separator ';' \n" \
32 "set title \"Throughput between Master and Slaves\" \n" \
33 "set xlabel \"Time in ms\" \n" \
34 "set ylabel \"Bytes/s\" \n" \
37 #define RTT_TEMPLATE "#!/usr/bin/gnuplot \n" \
38 "set datafile separator ';' \n" \
39 "set title \"Application level roundtrip time between Master and Slaves\" \n" \
40 "set xlabel \"Time in ms\" \n" \
41 "set ylabel \"ms\" \n" \
44 #define BW_TEMPLATE "#!/usr/bin/gnuplot \n" \
45 "set datafile separator ';' \n" \
46 "set title \"Bandwidth inbound and outbound between Master and Slaves\" \n" \
47 "set xlabel \"Time in ms\" \n" \
48 "set ylabel \"Bytes / s \" \n" \
51 #define LOG_ITEMS_TIME 2
52 #define LOG_ITEMS_PER_PEER 17
54 #define LOG_ITEM_BYTES_SENT 1
55 #define LOG_ITEM_MSGS_SENT 2
56 #define LOG_ITEM_THROUGHPUT_SENT 3
57 #define LOG_ITEM_BYTES_RECV 4
58 #define LOG_ITEM_MSGS_RECV 5
59 #define LOG_ITEM_THROUGHPUT_RECV 6
60 #define LOG_ITEM_APP_RTT 7
61 #define LOG_ITEM_ATS_BW_IN 8
62 #define LOG_ITEM_ATS_BW_OUT 9
63 #define LOG_ITEM_ATS_COSTS_LAN 10
64 #define LOG_ITEM_ATS_WAN 11
65 #define LOG_ITEM_ATS_WLAN 12
66 #define LOG_ITEM_ATS_DELAY 13
67 #define LOG_ITEM_ATS_DISTANCE 14
68 #define LOG_ITEM_ATS_NETWORKTYPE 15
69 #define LOG_ITEM_ATS_UTIL_UP 16
70 #define LOG_ITEM_ATS_UTIL_DOWN 17
73 * A single logging time step for a partner
75 struct PartnerLoggingTimestep
80 struct BenchmarkPeer *slave;
83 * Total number of messages this peer has sent
85 unsigned int total_messages_sent;
88 * Total number of bytes this peer has sent
90 unsigned int total_bytes_sent;
93 * Total number of messages this peer has received
95 unsigned int total_messages_received;
98 * Total number of bytes this peer has received
100 unsigned int total_bytes_received;
103 * Total outbound throughput for master in Bytes / s
105 unsigned int throughput_sent;
108 * Total inbound throughput for master in Bytes / s
110 unsigned int throughput_recv;
113 * Accumulated RTT for all messages
115 unsigned int total_app_rtt;
118 * Current application level delay
120 unsigned int app_rtt;
122 /* Current ATS properties */
124 unsigned int ats_distance;
126 struct GNUNET_TIME_Relative ats_delay;
128 uint32_t bandwidth_in;
130 uint32_t bandwidth_out;
132 uint32_t ats_utilization_out;
134 uint32_t ats_utilization_in;
136 enum GNUNET_ATS_Network_Type ats_network_type;
138 double pref_bandwidth;
144 * A single logging time step for a peer
146 struct PeerLoggingTimestep
151 struct PeerLoggingTimestep *next;
156 struct PeerLoggingTimestep *prev;
161 struct GNUNET_TIME_Absolute timestamp;
164 * Total number of messages this peer has sent
166 unsigned int total_messages_sent;
169 * Total number of bytes this peer has sent
171 unsigned int total_bytes_sent;
174 * Total number of messages this peer has received
176 unsigned int total_messages_received;
179 * Total number of bytes this peer has received
181 unsigned int total_bytes_received;
184 * Total outbound throughput for master in Bytes / s
186 unsigned int total_throughput_send;
189 * Total inbound throughput for master in Bytes / s
191 unsigned int total_throughput_recv;
196 struct PartnerLoggingTimestep *slaves_log;
200 * Entry for a benchmark peer
207 struct BenchmarkPeer *peer;
212 struct GNUNET_TIME_Absolute start;
215 * DLL for logging entries: head
217 struct PeerLoggingTimestep *head;
220 * DLL for logging entries: tail
222 struct PeerLoggingTimestep *tail;
230 struct GNUNET_SCHEDULER_Task * log_task;
233 * Reference to perf_ats' masters
240 struct GNUNET_TIME_Relative frequency;
243 * Log structure of length num_peers
245 struct LoggingPeer *lp;
251 write_throughput_gnuplot_script (char * fn, struct LoggingPeer *lp, char **fs, int slaves)
253 struct GNUNET_DISK_FileHandle *f;
258 GNUNET_asprintf (&gfn, "gnuplot_throughput_%s",fn);
259 fprintf (stderr, "Writing throughput plot for master %u and %u slaves to `%s'\n",
260 lp->peer->no, slaves, gfn);
262 f = GNUNET_DISK_file_open (gfn,
263 GNUNET_DISK_OPEN_WRITE | GNUNET_DISK_OPEN_CREATE,
264 GNUNET_DISK_PERM_USER_EXEC | GNUNET_DISK_PERM_USER_READ |
265 GNUNET_DISK_PERM_USER_WRITE);
268 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot open gnuplot file `%s'\n", gfn);
274 if (GNUNET_SYSERR == GNUNET_DISK_file_write(f, THROUGHPUT_TEMPLATE,
275 strlen(THROUGHPUT_TEMPLATE)))
276 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
277 "Cannot write data to plot file `%s'\n", gfn);
279 /* Write master data */
280 GNUNET_asprintf (&data,
281 "plot '%s' using 2:%u with lines title 'Master %u send total', \\\n" \
282 "'%s' using 2:%u with lines title 'Master %u receive total', \\\n",
283 fn, LOG_ITEMS_TIME + LOG_ITEM_THROUGHPUT_SENT, lp->peer->no,
284 fn, LOG_ITEMS_TIME + LOG_ITEM_THROUGHPUT_RECV, lp->peer->no);
285 if (GNUNET_SYSERR == GNUNET_DISK_file_write(f, data, strlen(data)))
286 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot write data to plot file `%s'\n", gfn);
289 for (c_s = 0; c_s < slaves; c_s++)
291 GNUNET_asprintf (&data, "'%s' using 2:%u with lines title 'Master %u - Slave %u send', \\\n" \
292 "'%s' using 2:%u with lines title 'Master %u - Slave %u receive'%s\n",
294 LOG_ITEMS_TIME + LOG_ITEM_THROUGHPUT_SENT,
296 lp->peer->partners[c_s].dest->no,
298 LOG_ITEMS_TIME + LOG_ITEM_THROUGHPUT_RECV,
300 lp->peer->partners[c_s].dest->no,
301 (c_s < lp->peer->num_partners -1) ? ", \\" : "\n pause -1");
302 if (GNUNET_SYSERR == GNUNET_DISK_file_write(f, data, strlen(data)))
303 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot write data to plot file `%s'\n", gfn);
307 if (GNUNET_SYSERR == GNUNET_DISK_file_close(f))
308 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
309 "Cannot close gnuplot file `%s'\n", gfn);
311 GNUNET_log (GNUNET_ERROR_TYPE_INFO,
312 "Data successfully written to plot file `%s'\n", gfn);
318 write_rtt_gnuplot_script (char * fn, struct LoggingPeer *lp, char **fs, int slaves)
320 struct GNUNET_DISK_FileHandle *f;
325 GNUNET_asprintf (&gfn, "gnuplot_rtt_%s",fn);
326 fprintf (stderr, "Writing rtt plot for master %u to `%s'\n",
329 f = GNUNET_DISK_file_open (gfn,
330 GNUNET_DISK_OPEN_WRITE | GNUNET_DISK_OPEN_CREATE,
331 GNUNET_DISK_PERM_USER_EXEC | GNUNET_DISK_PERM_USER_READ |
332 GNUNET_DISK_PERM_USER_WRITE);
335 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot open gnuplot file `%s'\n", gfn);
341 if (GNUNET_SYSERR == GNUNET_DISK_file_write(f, RTT_TEMPLATE, strlen(RTT_TEMPLATE)))
342 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot write data to plot file `%s'\n", gfn);
344 for (c_s = 0; c_s < slaves; c_s++)
346 GNUNET_asprintf (&data, "%s'%s' using 2:%u with lines title 'Master %u - Slave %u '%s\n",
347 (0 == c_s) ? "plot " :"",
349 LOG_ITEMS_TIME + LOG_ITEM_APP_RTT,
351 lp->peer->partners[c_s].dest->no,
352 (c_s < lp->peer->num_partners -1) ? ", \\" : "\n pause -1");
353 if (GNUNET_SYSERR == GNUNET_DISK_file_write(f, data, strlen(data)))
354 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot write data to plot file `%s'\n", gfn);
358 if (GNUNET_SYSERR == GNUNET_DISK_file_close(f))
359 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot close gnuplot file `%s'\n", gfn);
361 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Data successfully written to plot file `%s'\n", gfn);
366 write_bw_gnuplot_script (char * fn, struct LoggingPeer *lp, char **fs, int slaves)
368 struct GNUNET_DISK_FileHandle *f;
373 GNUNET_asprintf (&gfn, "gnuplot_bw_%s",fn);
374 fprintf (stderr, "Writing bandwidth plot for master %u to `%s'\n",
377 f = GNUNET_DISK_file_open (gfn,
378 GNUNET_DISK_OPEN_WRITE | GNUNET_DISK_OPEN_CREATE,
379 GNUNET_DISK_PERM_USER_EXEC | GNUNET_DISK_PERM_USER_READ |
380 GNUNET_DISK_PERM_USER_WRITE);
383 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot open gnuplot file `%s'\n", gfn);
389 if (GNUNET_SYSERR == GNUNET_DISK_file_write(f, BW_TEMPLATE, strlen(BW_TEMPLATE)))
390 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
391 "Cannot write data to plot file `%s'\n", gfn);
393 for (c_s = 0; c_s < slaves; c_s++)
395 GNUNET_asprintf (&data, "%s"\
396 "'%s' using 2:%u with lines title 'BW out master %u - Slave %u ', \\\n" \
397 "'%s' using 2:%u with lines title 'BW in master %u - Slave %u '"\
399 (0 == c_s) ? "plot " :"",
401 LOG_ITEMS_TIME + LOG_ITEM_ATS_BW_OUT,
404 LOG_ITEMS_TIME + LOG_ITEM_ATS_BW_IN,
406 (c_s < lp->peer->num_partners -1) ? ", \\" : "\n pause -1");
407 if (GNUNET_SYSERR == GNUNET_DISK_file_write(f, data, strlen(data)))
408 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot write data to plot file `%s'\n", gfn);
412 if (GNUNET_SYSERR == GNUNET_DISK_file_close(f))
413 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot close gnuplot file `%s'\n", gfn);
415 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "Data successfully written to plot file `%s'\n", gfn);
421 GNUNET_ATS_TEST_logging_write_to_file (struct LoggingHandle *l,
422 char *experiment_name, int plots)
424 struct GNUNET_DISK_FileHandle *f[l->num_slaves];
425 struct GNUNET_DISK_FileHandle *f_m;
427 char *filename_master;
428 char *filename_slaves[l->num_slaves];
430 struct PeerLoggingTimestep *cur_lt;
431 struct PartnerLoggingTimestep *plt;
432 struct GNUNET_TIME_Absolute timestamp;
437 timestamp = GNUNET_TIME_absolute_get();
439 tmp_exp_name = experiment_name;
440 for (c_m = 0; c_m < l->num_masters; c_m++)
442 GNUNET_asprintf (&filename_master, "%s_%llu_master%u_%s",
443 experiment_name, timestamp.abs_value_us, c_m, l->name);
444 fprintf (stderr, "Writing data for master %u to file `%s'\n",
445 c_m,filename_master);
447 f_m = GNUNET_DISK_file_open (filename_master,
448 GNUNET_DISK_OPEN_WRITE | GNUNET_DISK_OPEN_CREATE,
449 GNUNET_DISK_PERM_USER_READ | GNUNET_DISK_PERM_USER_WRITE);
452 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot open log file `%s'\n", filename_master);
453 GNUNET_free (filename_master);
457 GNUNET_asprintf (&data, "# master %u; experiment : %s\n"
458 "timestamp; timestamp delta; #messages sent; #bytes sent; #throughput sent; #messages received; #bytes received; #throughput received; \n" ,
459 c_m, experiment_name);
460 if (GNUNET_SYSERR == GNUNET_DISK_file_write(f_m, data, strlen(data)))
461 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
462 "Cannot write data to log file `%s'\n",filename_master);
465 for (c_s = 0; c_s < l->lp[c_m].peer->num_partners; c_s++)
467 GNUNET_asprintf (&filename_slaves[c_s], "%s_%llu_master%u_slave_%u_%s",
468 tmp_exp_name, timestamp.abs_value_us, c_m, c_s, l->name);
470 fprintf (stderr, "Writing data for master %u slave %u to file `%s'\n",
471 c_m, c_s, filename_slaves[c_s]);
473 f[c_s] = GNUNET_DISK_file_open (filename_slaves[c_s],
474 GNUNET_DISK_OPEN_WRITE | GNUNET_DISK_OPEN_CREATE,
475 GNUNET_DISK_PERM_USER_READ | GNUNET_DISK_PERM_USER_WRITE);
478 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Cannot open log file `%s'\n", filename_slaves[c_s]);
479 GNUNET_free (filename_slaves[c_s]);
480 GNUNET_break (GNUNET_OK == GNUNET_DISK_file_close(f_m));
481 GNUNET_free (filename_master);
486 GNUNET_asprintf (&data, "# master %u; slave %u ; experiment : %s\n"
487 "timestamp; timestamp delta; #messages sent; #bytes sent; #throughput sent; #messages received; #bytes received; #throughput received; " \
488 "rtt; bw in; bw out; ats_cost_lan; ats_cost_wlan; ats_delay; ats_distance; ats_network_type; ats_utilization_up ;ats_utilization_down;" \
489 "pref bandwidth; pref delay\n",
490 c_m, c_s, experiment_name);
491 if (GNUNET_SYSERR == GNUNET_DISK_file_write(f[c_s], data, strlen(data)))
492 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
493 "Cannot write data to log file `%s'\n",filename_slaves[c_s]);
497 for (cur_lt = l->lp[c_m].head; NULL != cur_lt; cur_lt = cur_lt->next)
501 "Master [%u]: timestamp %llu %llu ; %u %u %u ; %u %u %u\n",
503 (long long unsigned int) cur_lt->timestamp.abs_value_us,
504 (long long unsigned int) GNUNET_TIME_absolute_get_difference(l->lp[c_m].start,
505 cur_lt->timestamp).rel_value_us / 1000,
506 cur_lt->total_messages_sent,
507 cur_lt->total_bytes_sent,
508 cur_lt->total_throughput_send,
509 cur_lt->total_messages_received,
510 cur_lt->total_bytes_received,
511 cur_lt->total_throughput_recv);
513 /* Assembling master string */
514 GNUNET_asprintf (&data, "%llu;%llu;%u;%u;%u;%u;%u;%u;\n",
515 (long long unsigned int) cur_lt->timestamp.abs_value_us,
516 (long long unsigned int) GNUNET_TIME_absolute_get_difference(l->lp[c_m].start,
517 cur_lt->timestamp).rel_value_us / 1000,
518 cur_lt->total_messages_sent,
519 cur_lt->total_bytes_sent,
520 cur_lt->total_throughput_send,
521 cur_lt->total_messages_received,
522 cur_lt->total_bytes_received,
523 cur_lt->total_throughput_recv);
525 if (GNUNET_SYSERR == GNUNET_DISK_file_write(f_m, data, strlen(data)))
526 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
527 "Cannot write data to master file %u\n", c_m);
531 for (c_s = 0; c_s < l->lp[c_m].peer->num_partners; c_s++)
533 plt = &cur_lt->slaves_log[c_s];
536 /* Assembling slave string */
537 GNUNET_asprintf(&data,
538 "%llu;%llu;%u;%u;%u;%u;%u;%u;%.3f;%u;%u;%u;%u;%u;%u;%u;%.3f;%.3f\n",
539 (long long unsigned int) cur_lt->timestamp.abs_value_us,
540 (long long unsigned int) GNUNET_TIME_absolute_get_difference(l->lp[c_m].start,
541 cur_lt->timestamp).rel_value_us / 1000,
542 plt->total_messages_sent,
543 plt->total_bytes_sent,
544 plt->throughput_sent,
545 plt->total_messages_received,
546 plt->total_bytes_received,
547 plt->throughput_recv,
548 (double) plt->app_rtt / 1000,
553 plt->ats_network_type,
554 plt->ats_utilization_out,
555 plt->ats_utilization_in,
561 "\t Slave [%u]: %u %u %u ; %u %u %u rtt %u delay %llu bw_in %u bw_out %u \n",
563 plt->total_messages_sent,
564 plt->total_bytes_sent,
565 plt->throughput_sent,
566 plt->total_messages_received,
567 plt->total_bytes_received,
568 plt->throughput_recv,
570 (long long unsigned int) plt->ats_delay.rel_value_us,
574 if (GNUNET_SYSERR == GNUNET_DISK_file_write(f[c_s], data, strlen(data)))
575 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
576 "Cannot write data to log file `%s'\n", filename_slaves[c_s]);
582 for (c_s = 0; c_s < l->lp[c_m].peer->num_partners; c_s++)
584 if (GNUNET_SYSERR == GNUNET_DISK_file_close(f[c_s]))
586 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
587 "Cannot close log file for master[%u] slave[%u]\n", c_m, c_s);
590 GNUNET_log (GNUNET_ERROR_TYPE_INFO,
591 "Data file successfully written to log file for `%s'\n",
592 filename_slaves[c_s]);
595 if (GNUNET_SYSERR == GNUNET_DISK_file_close(f_m))
597 GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR,
600 GNUNET_free (filename_master);
603 GNUNET_log (GNUNET_ERROR_TYPE_INFO,
604 "Data file successfully written to log file for master `%s'\n", filename_master);
606 if (GNUNET_YES == plots)
608 write_throughput_gnuplot_script (filename_master, &l->lp[c_m], filename_slaves, l->num_slaves);
609 write_rtt_gnuplot_script (filename_master, &l->lp[c_m], filename_slaves, l->num_slaves);
610 write_bw_gnuplot_script (filename_master, &l->lp[c_m], filename_slaves, l->num_slaves);
613 GNUNET_free (filename_master);
619 * @param l logging handle to use
622 GNUNET_ATS_TEST_logging_now (struct LoggingHandle *l)
624 struct LoggingPeer *bp;
625 struct PeerLoggingTimestep *mlt;
626 struct PeerLoggingTimestep *prev_log_mlt;
627 struct PartnerLoggingTimestep *slt;
628 struct PartnerLoggingTimestep *prev_log_slt;
629 struct BenchmarkPartner *p;
630 struct GNUNET_TIME_Relative delta;
633 unsigned int app_rtt;
636 if (GNUNET_YES != l->running)
639 for (c_m = 0; c_m < l->num_masters; c_m++)
642 mlt = GNUNET_new (struct PeerLoggingTimestep);
643 GNUNET_CONTAINER_DLL_insert_tail(l->lp[c_m].head, l->lp[c_m].tail, mlt);
644 prev_log_mlt = mlt->prev;
647 /* Current master state */
648 mlt->timestamp = GNUNET_TIME_absolute_get();
649 mlt->total_bytes_sent = bp->peer->total_bytes_sent;
650 mlt->total_messages_sent = bp->peer->total_messages_sent;
651 mlt->total_bytes_received = bp->peer->total_bytes_received;
652 mlt->total_messages_received = bp->peer->total_messages_received;
655 if (NULL == prev_log_mlt)
657 /* Get difference to start */
658 delta = GNUNET_TIME_absolute_get_difference (l->lp[c_m].start, mlt->timestamp);
662 /* Get difference to last timestep */
663 delta = GNUNET_TIME_absolute_get_difference (mlt->prev->timestamp, mlt->timestamp);
666 /* Multiplication factor for throughput calculation */
667 mult = (double) GNUNET_TIME_UNIT_SECONDS.rel_value_us / (delta.rel_value_us);
669 /* Total throughput */
670 if (NULL != prev_log_mlt)
672 if (mlt->total_bytes_sent - mlt->prev->total_bytes_sent > 0)
674 mlt->total_throughput_send = mult * (mlt->total_bytes_sent - mlt->prev->total_bytes_sent);
678 mlt->total_throughput_send = 0;
679 // mlt->total_throughput_send = prev_log_mlt->total_throughput_send; /* no msgs send */
682 if (mlt->total_bytes_received - mlt->prev->total_bytes_received > 0)
684 mlt->total_throughput_recv = mult * (mlt->total_bytes_received - mlt->prev->total_bytes_received);
688 mlt->total_throughput_send = 0;
689 //mlt->total_throughput_recv = prev_log_mlt->total_throughput_recv; /* no msgs received */
694 mlt->total_throughput_send = mult * mlt->total_bytes_sent;
695 mlt->total_throughput_send = mult * mlt->total_bytes_received;
698 if (GNUNET_YES == l->verbose)
700 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
701 "Master[%u] delta: %llu us, bytes (sent/received): %u / %u; throughput send/recv: %u / %u\n",
703 (unsigned long long) delta.rel_value_us,
704 mlt->total_bytes_sent,
705 mlt->total_bytes_received,
706 mlt->total_throughput_send,
707 mlt->total_throughput_recv);
710 mlt->slaves_log = GNUNET_malloc (bp->peer->num_partners *
711 sizeof (struct PartnerLoggingTimestep));
713 for (c_s = 0; c_s < bp->peer->num_partners; c_s++)
715 GNUNET_log (GNUNET_ERROR_TYPE_INFO,
716 "Collect logging data master[%u] slave [%u]\n", c_m, c_s);
718 p = &bp->peer->partners[c_s];
719 slt = &mlt->slaves_log[c_s];
721 slt->slave = p->dest;
722 /* Bytes sent from master to this slave */
723 slt->total_bytes_sent = p->bytes_sent;
724 /* Messages sent from master to this slave */
725 slt->total_messages_sent = p->messages_sent;
726 /* Bytes master received from this slave */
727 slt->total_bytes_received = p->bytes_received;
728 /* Messages master received from this slave */
729 slt->total_messages_received = p->messages_received;
730 slt->total_app_rtt = p->total_app_rtt;
731 /* ats performance information */
732 slt->ats_delay = p->props.delay;
733 slt->ats_distance = p->props.distance;
734 slt->ats_network_type = p->props.scope;
735 slt->ats_utilization_in = p->props.utilization_out;
736 slt->ats_utilization_out = p->props.utilization_out;
737 slt->bandwidth_in = p->bandwidth_in;
738 slt->bandwidth_out = p->bandwidth_out;
739 slt->pref_bandwidth = p->pref_bandwidth;
740 slt->pref_delay = p->pref_delay;
742 /* Total application level rtt */
743 if (NULL == prev_log_mlt)
745 if (0 != slt->total_messages_sent)
746 app_rtt = slt->total_app_rtt / slt->total_messages_sent;
752 prev_log_slt = &prev_log_mlt->slaves_log[c_s];
753 if ((slt->total_messages_sent - prev_log_slt->total_messages_sent) > 0)
754 app_rtt = (slt->total_app_rtt - prev_log_slt->total_app_rtt) /
755 (slt->total_messages_sent - prev_log_slt->total_messages_sent);
758 app_rtt = prev_log_slt->app_rtt; /* No messages were */
761 slt->app_rtt = app_rtt;
763 /* Partner throughput */
764 if (NULL != prev_log_mlt)
766 prev_log_slt = &prev_log_mlt->slaves_log[c_s];
767 if (slt->total_bytes_sent > prev_log_slt->total_bytes_sent)
768 slt->throughput_sent = mult * (slt->total_bytes_sent - prev_log_slt->total_bytes_sent);
770 slt->throughput_sent = 0;
772 if (slt->total_bytes_received > prev_log_slt->total_bytes_received)
773 slt->throughput_recv = mult *
774 (slt->total_bytes_received - prev_log_slt->total_bytes_received);
776 slt->throughput_recv = 0;
780 slt->throughput_sent = mult * slt->total_bytes_sent;
781 slt->throughput_recv = mult * slt->total_bytes_received;
784 if (GNUNET_YES == l->verbose)
786 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
787 "Master [%u] -> Slave [%u]: delta: %llu us, bytes (sent/received): %u / %u; throughput send/recv: %u / %u\n",
789 (unsigned long long) delta.rel_value_us,
790 mlt->total_bytes_sent,
791 mlt->total_bytes_received,
792 slt->throughput_sent,
793 slt->throughput_recv);
796 GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
797 "Master [%u]: slave [%u]\n",
798 bp->peer->no, p->dest->no);
805 collect_log_task (void *cls)
807 struct LoggingHandle *l = cls;
810 GNUNET_ATS_TEST_logging_now (l);
811 l->log_task = GNUNET_SCHEDULER_add_delayed (l->frequency,
820 * @param l the logging handle
823 GNUNET_ATS_TEST_logging_stop (struct LoggingHandle *l)
825 if (GNUNET_YES!= l->running)
828 if (NULL != l->log_task)
830 GNUNET_SCHEDULER_cancel (l->log_task);
833 l->running = GNUNET_NO;
835 GNUNET_log(GNUNET_ERROR_TYPE_INFO,
836 _("Stop logging\n"));
840 * Clean up logging data
842 * @param l the logging handle
845 GNUNET_ATS_TEST_logging_clean_up (struct LoggingHandle *l)
848 struct PeerLoggingTimestep *cur;
850 if (GNUNET_YES == l->running)
851 GNUNET_ATS_TEST_logging_stop (l);
853 for (c_m = 0; c_m < l->num_masters; c_m++)
855 while (NULL != (cur = l->lp[c_m].head))
857 GNUNET_CONTAINER_DLL_remove (l->lp[c_m].head, l->lp[c_m].tail, cur);
858 GNUNET_free (cur->slaves_log);
871 * @param log_frequency the logging frequency
872 * @param testname the testname
873 * @param masters the master peers used for benchmarking
874 * @param num_masters the number of master peers
875 * @param num_slaves the number of slave peers
876 * @param verbose verbose logging
877 * @return the logging handle or NULL on error
879 struct LoggingHandle *
880 GNUNET_ATS_TEST_logging_start(struct GNUNET_TIME_Relative log_frequency,
881 char *testname, struct BenchmarkPeer *masters, int num_masters, int num_slaves,
884 struct LoggingHandle *l;
886 GNUNET_log(GNUNET_ERROR_TYPE_INFO,
887 _("Start logging `%s'\n"), testname);
889 l = GNUNET_new (struct LoggingHandle);
890 l->num_masters = num_masters;
891 l->num_slaves = num_slaves;
893 l->frequency = log_frequency;
894 l->verbose = verbose;
895 l->lp = GNUNET_malloc (num_masters * sizeof (struct LoggingPeer));
897 for (c_m = 0; c_m < num_masters; c_m ++)
899 l->lp[c_m].peer = &masters[c_m];
900 l->lp[c_m].start = GNUNET_TIME_absolute_get();
903 /* Schedule logging task */
904 l->log_task = GNUNET_SCHEDULER_add_now (&collect_log_task, l);
905 l->running = GNUNET_YES;
909 /* end of file ats-testing-log.c */