2 This file is part of GNUnet
3 (C) 2013 Christian Grothoff (and other contributing authors)
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., 59 Temple Place - Suite 330,
18 Boston, MA 02111-1307, USA.
22 * @file set/gnunet-set-profiler.c
23 * @brief profiling tool for set
24 * @author Florian Dold
27 #include "gnunet_util_lib.h"
28 #include "gnunet_set_service.h"
29 #include "gnunet_testbed_service.h"
34 static unsigned int num_a = 5;
35 static unsigned int num_b = 5;
36 static unsigned int num_c = 20;
38 static char *op_str = "union";
40 const static struct GNUNET_CONFIGURATION_Handle *config;
45 struct GNUNET_SET_Handle *set;
46 struct GNUNET_SET_OperationHandle *oh;
47 struct GNUNET_CONTAINER_MultiHashMap *sent;
48 struct GNUNET_CONTAINER_MultiHashMap *received;
52 static struct GNUNET_CONTAINER_MultiHashMap *common_sent;
54 static struct GNUNET_HashCode app_id;
56 static struct GNUNET_PeerIdentity local_peer;
58 static struct GNUNET_SET_ListenHandle *set_listener;
62 map_remove_iterator (void *cls,
63 const struct GNUNET_HashCode *key,
66 struct GNUNET_CONTAINER_MultiHashMap *m = cls;
69 GNUNET_assert (NULL != key);
71 ret = GNUNET_CONTAINER_multihashmap_remove (m, key, NULL);
73 printf ("spurious element\n");
82 if (info1.done == GNUNET_NO || info2.done == GNUNET_NO)
85 GNUNET_CONTAINER_multihashmap_iterate (info1.received, map_remove_iterator, info2.sent);
86 GNUNET_CONTAINER_multihashmap_iterate (info2.received, map_remove_iterator, info1.sent);
88 printf ("set a: %d missing elements\n", GNUNET_CONTAINER_multihashmap_size (info1.sent));
89 printf ("set b: %d missing elements\n", GNUNET_CONTAINER_multihashmap_size (info2.sent));
91 GNUNET_SCHEDULER_shutdown ();
96 set_result_cb (void *cls,
97 const struct GNUNET_SET_Element *element,
98 enum GNUNET_SET_Status status)
100 struct SetInfo *info = cls;
102 GNUNET_assert (GNUNET_NO == info->done);
105 case GNUNET_SET_STATUS_DONE:
106 case GNUNET_SET_STATUS_HALF_DONE:
107 info->done = GNUNET_YES;
108 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "set %s done\n", info->id);
112 case GNUNET_SET_STATUS_FAILURE:
114 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "failure\n");
115 GNUNET_SCHEDULER_shutdown ();
117 case GNUNET_SET_STATUS_OK:
123 if (element->size != sizeof (struct GNUNET_HashCode))
125 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "wrong element size: %u\n", element->size);
129 GNUNET_log (GNUNET_ERROR_TYPE_INFO, "set %s: got element (%s)\n",
130 info->id, GNUNET_h2s (element->data));
131 GNUNET_assert (NULL != element->data);
132 GNUNET_CONTAINER_multihashmap_put (info->received,
134 GNUNET_CONTAINER_MULTIHASHMAPOPTION_REPLACE);
139 set_listen_cb (void *cls,
140 const struct GNUNET_PeerIdentity *other_peer,
141 const struct GNUNET_MessageHeader *context_msg,
142 struct GNUNET_SET_Request *request)
146 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
147 "listener failed\n");
150 GNUNET_assert (NULL == info2.oh);
151 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
152 "set listen cb called\n");
153 info2.oh = GNUNET_SET_accept (request, GNUNET_SET_RESULT_ADDED,
154 set_result_cb, &info2);
155 GNUNET_SET_commit (info2.oh, info2.set);
160 set_insert_iterator (void *cls,
161 const struct GNUNET_HashCode *key,
164 struct GNUNET_SET_Handle *set = cls;
165 struct GNUNET_SET_Element *el;
167 el = GNUNET_malloc (sizeof (struct GNUNET_SET_Element) +
168 sizeof (struct GNUNET_HashCode));
169 el->element_type = 0;
170 memcpy (&el[1], key, sizeof *key);
172 el->size = sizeof *key;
173 GNUNET_SET_add_element (set, el, NULL, NULL);
180 handle_shutdown (void *cls,
181 const struct GNUNET_SCHEDULER_TaskContext *tc)
183 if (NULL != set_listener)
185 GNUNET_SET_listen_cancel (set_listener);
188 if (NULL != info1.oh)
190 GNUNET_SET_operation_cancel (info1.oh);
193 if (NULL != info2.oh)
195 GNUNET_SET_operation_cancel (info2.oh);
198 if (NULL != info1.set)
200 GNUNET_SET_destroy (info1.set);
203 if (NULL != info2.set)
205 GNUNET_SET_destroy (info2.set);
212 run (void *cls, char *const *args, const char *cfgfile,
213 const struct GNUNET_CONFIGURATION_Handle *cfg)
216 struct GNUNET_HashCode hash;
220 if (GNUNET_OK != GNUNET_CRYPTO_get_peer_identity (cfg, &local_peer))
222 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "could not retrieve host identity\n");
227 GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL, handle_shutdown, NULL);
232 info1.sent = GNUNET_CONTAINER_multihashmap_create (num_a+1, GNUNET_NO);
233 info2.sent = GNUNET_CONTAINER_multihashmap_create (num_b+1, GNUNET_NO);
234 common_sent = GNUNET_CONTAINER_multihashmap_create (num_c+1, GNUNET_NO);
236 info1.received = GNUNET_CONTAINER_multihashmap_create (num_a+1, GNUNET_NO);
237 info2.received = GNUNET_CONTAINER_multihashmap_create (num_b+1, GNUNET_NO);
239 for (i = 0; i < num_a; i++)
241 GNUNET_CRYPTO_hash_create_random (GNUNET_CRYPTO_QUALITY_STRONG, &hash);
242 GNUNET_CONTAINER_multihashmap_put (info1.sent, &hash, NULL,
243 GNUNET_CONTAINER_MULTIHASHMAPOPTION_REPLACE);
246 for (i = 0; i < num_b; i++)
248 GNUNET_CRYPTO_hash_create_random (GNUNET_CRYPTO_QUALITY_STRONG, &hash);
249 GNUNET_CONTAINER_multihashmap_put (info2.sent, &hash, NULL,
250 GNUNET_CONTAINER_MULTIHASHMAPOPTION_REPLACE);
253 for (i = 0; i < num_c; i++)
255 GNUNET_CRYPTO_hash_create_random (GNUNET_CRYPTO_QUALITY_STRONG, &hash);
256 GNUNET_CONTAINER_multihashmap_put (common_sent, &hash, NULL,
257 GNUNET_CONTAINER_MULTIHASHMAPOPTION_REPLACE);
260 /* use last hash for app id */
263 /* FIXME: also implement intersection etc. */
264 info1.set = GNUNET_SET_create (config, GNUNET_SET_OPERATION_UNION);
265 info2.set = GNUNET_SET_create (config, GNUNET_SET_OPERATION_UNION);
267 GNUNET_CONTAINER_multihashmap_iterate (info1.sent, set_insert_iterator, info1.set);
268 GNUNET_CONTAINER_multihashmap_iterate (info2.sent, set_insert_iterator, info2.set);
269 GNUNET_CONTAINER_multihashmap_iterate (common_sent, set_insert_iterator, info1.set);
270 GNUNET_CONTAINER_multihashmap_iterate (common_sent, set_insert_iterator, info2.set);
272 set_listener = GNUNET_SET_listen (config, GNUNET_SET_OPERATION_UNION,
273 &app_id, set_listen_cb, NULL);
275 info1.oh = GNUNET_SET_prepare (&local_peer, &app_id, NULL,
276 GNUNET_SET_RESULT_ADDED,
277 set_result_cb, &info1);
278 GNUNET_SET_commit (info1.oh, info1.set);
279 GNUNET_SET_destroy (info1.set);
285 main (int argc, char **argv)
287 static const struct GNUNET_GETOPT_CommandLineOption options[] = {
288 { 'A', "num-first", NULL,
289 gettext_noop ("number of values"),
290 GNUNET_YES, &GNUNET_GETOPT_set_uint, &num_a },
291 { 'B', "num-second", NULL,
292 gettext_noop ("number of values"),
293 GNUNET_YES, &GNUNET_GETOPT_set_uint, &num_b },
294 { 'C', "num-common", NULL,
295 gettext_noop ("number of values"),
296 GNUNET_YES, &GNUNET_GETOPT_set_uint, &num_c },
297 { 'x', "operation", NULL,
298 gettext_noop ("oeration to execute"),
299 GNUNET_YES, &GNUNET_GETOPT_set_string, &op_str },
300 GNUNET_GETOPT_OPTION_END
302 GNUNET_PROGRAM_run (argc, argv, "gnunet-set-profiler",
304 options, &run, NULL);