2 This file is part of GNUnet.
3 Copyright (C) 2010, 2012 GNUnet e.V.
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.
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.
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/>.
18 SPDX-License-Identifier: AGPL3.0-or-later
22 * @file fs/perf_gnunet_service_fs_p2p.c
23 * @brief profile P2P routing using simple publish + download operation
24 * @author Christian Grothoff
27 #include "fs_test_lib.h"
28 #include "gnunet_testbed_service.h"
30 #define VERBOSE GNUNET_NO
33 * File-size we use for testing.
35 #define FILESIZE (1024 * 1024 * 10)
38 * How long until we give up on transmitting the message?
40 #define TIMEOUT GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_MINUTES, 30)
46 static struct GNUNET_TESTBED_Peer *daemons[NUM_DAEMONS];
50 static struct GNUNET_TIME_Absolute start_time;
52 static const char *progname;
54 static struct GNUNET_TIME_Absolute start_time;
58 * Master context for 'stat_run'.
61 struct GNUNET_STATISTICS_Handle *stat;
62 struct GNUNET_TESTBED_Operation *op;
68 const char *subsystem;
73 * Statistics we print out.
75 static struct StatValues stats[] = {
76 { "fs", "# queries forwarded" },
77 { "fs", "# replies received and matched" },
78 { "fs", "# results found locally" },
79 { "fs", "# requests forwarded due to high load" },
80 { "fs", "# requests done for free (low load)" },
81 { "fs", "# requests dropped, priority insufficient" },
82 { "fs", "# requests done for a price (normal load)" },
83 { "fs", "# requests dropped by datastore (queue length limit)" },
84 { "fs", "# P2P searches received" },
85 { "fs", "# P2P searches discarded (queue length bound)" },
86 { "fs", "# replies received for local clients" },
87 { "fs", "# queries retransmitted to same target" },
88 { "core", "# bytes decrypted" },
89 { "core", "# bytes encrypted" },
90 { "core", "# discarded CORE_SEND requests" },
91 { "core", "# discarded CORE_SEND request bytes" },
92 { "core", "# discarded lower priority CORE_SEND requests" },
93 { "core", "# discarded lower priority CORE_SEND request bytes" },
94 { "transport", "# bytes received via TCP" },
95 { "transport", "# bytes transmitted via TCP" },
96 { "datacache", "# bytes stored" },
102 * Callback function to process statistic values.
105 * @param subsystem name of subsystem that created the statistic
106 * @param name the name of the datum
107 * @param value the current value
108 * @param is_persistent #GNUNET_YES if the value is persistent, #GNUNET_NO if not
109 * @return #GNUNET_OK to continue, #GNUNET_SYSERR to abort iteration
112 print_stat(void *cls, const char *subsystem, const char *name, uint64_t value,
115 struct StatMaster *sm = cls;
118 "Peer %2u: %12s/%50s = %12llu\n",
122 (unsigned long long)value);
128 * Function that gathers stats from all daemons.
132 struct GNUNET_TESTBED_Operation *op,
138 * Function called when GET operation on stats is done.
141 get_done(void *cls, int success)
143 struct StatMaster *sm = cls;
145 GNUNET_break(GNUNET_OK == success);
147 stat_run(sm, sm->op, sm->stat, NULL);
152 * Adapter function called to establish a connection to
153 * statistics service.
156 * @param cfg configuration of the peer to connect to; will be available until
157 * GNUNET_TESTBED_operation_done() is called on the operation returned
158 * from GNUNET_TESTBED_service_connect()
159 * @return service handle to return in 'op_result', NULL on error
162 statistics_connect_adapter(void *cls,
163 const struct GNUNET_CONFIGURATION_Handle *cfg)
165 return GNUNET_STATISTICS_create("<driver>",
171 * Adapter function called to destroy a connection to
172 * statistics service.
175 * @param op_result service handle returned from the connect adapter
178 statistics_disconnect_adapter(void *cls,
181 GNUNET_STATISTICS_destroy(op_result, GNUNET_NO);
186 * Function that gathers stats from all daemons.
190 struct GNUNET_TESTBED_Operation *op,
194 struct StatMaster *sm = cls;
198 GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
199 "Failed to statistics service: %s\n",
201 GNUNET_SCHEDULER_shutdown();
204 sm->stat = ca_result;
206 if (stats[sm->value].name != NULL)
208 GNUNET_STATISTICS_get(sm->stat,
212 stats[sm->value].subsystem, stats[sm->value].name,
214 &get_done, &print_stat,
218 GNUNET_TESTBED_operation_done(sm->op);
221 if (NUM_DAEMONS == sm->daemon)
224 GNUNET_SCHEDULER_shutdown();
228 GNUNET_TESTBED_service_connect(NULL,
232 &statistics_connect_adapter,
233 &statistics_disconnect_adapter,
242 struct GNUNET_TIME_Relative del;
244 struct StatMaster *sm;
248 GNUNET_DISK_directory_remove(fn);
252 GNUNET_TIME_absolute_get_remaining(GNUNET_TIME_absolute_add(start_time,
253 TIMEOUT)).rel_value_us)
255 GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
256 "Timeout during download, shutting down with error\n");
258 GNUNET_SCHEDULER_shutdown();
262 del = GNUNET_TIME_absolute_get_duration(start_time);
263 if (del.rel_value_us == 0)
264 del.rel_value_us = 1;
266 GNUNET_STRINGS_byte_size_fancy(((unsigned long long)FILESIZE) *
267 1000000LL / del.rel_value_us);
269 "Download speed was %s/s\n",
272 GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
273 "Finished download, shutting down\n");
274 sm = GNUNET_new(struct StatMaster);
276 GNUNET_TESTBED_service_connect(NULL,
280 &statistics_connect_adapter,
281 &statistics_disconnect_adapter,
287 do_download(void *cls,
288 const struct GNUNET_FS_Uri *uri,
295 GNUNET_SCHEDULER_shutdown();
296 GNUNET_log(GNUNET_ERROR_TYPE_ERROR,
297 "Timeout during upload attempt, shutting down with error\n");
301 GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Downloading %llu bytes\n",
302 (unsigned long long)FILESIZE);
303 start_time = GNUNET_TIME_absolute_get();
304 if (NULL != strstr(progname, "dht"))
308 start_time = GNUNET_TIME_absolute_get();
309 GNUNET_FS_TEST_download(daemons[0],
316 (NULL == fn) ? NULL : GNUNET_strdup(fn));
321 do_publish(void *cls,
322 struct GNUNET_TESTBED_RunHandle *h,
323 unsigned int num_peers,
324 struct GNUNET_TESTBED_Peer **peers,
325 unsigned int links_succeeded,
326 unsigned int links_failed)
332 GNUNET_assert(NUM_DAEMONS == num_peers);
333 for (i = 0; i < num_peers; i++)
334 daemons[i] = peers[i];
335 GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Publishing %llu bytes\n",
336 (unsigned long long)FILESIZE);
337 if (NULL != strstr(progname, "index"))
338 do_index = GNUNET_YES;
340 do_index = GNUNET_NO;
341 if (NULL != strstr(progname, "dht"))
345 GNUNET_FS_TEST_publish(daemons[NUM_DAEMONS - 1], TIMEOUT, anonymity,
346 do_index, FILESIZE, SEED, VERBOSE, &do_download,
352 main(int argc, char *argv[])
355 (void)GNUNET_TESTBED_test_run("perf-gnunet-service-fs-p2p",
356 "perf_gnunet_service_fs_p2p.conf",
360 GNUNET_DISK_directory_remove("/tmp/gnunet-test-fs-lib/");
364 /* end of perf_gnunet_service_fs_p2p.c */