2 This file is part of GNUnet.
3 (C) 2001, 2002, 2004, 2005, 2006, 2007, 2009 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 ats-tool/gnunet-ats.c
23 * @brief ATS command line tool
24 * @author Matthias Wachs
27 #include "gnunet_util_lib.h"
28 #include "gnunet_ats_service.h"
29 #include "gnunet_transport_service.h"
31 #define TIMEOUT GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 5)
33 #define BIG_M_STRING "unlimited"
40 static int resolve_addresses_numeric;
41 static int receive_done;
44 * For which peer should we change preference values?
48 static char *type_str;
49 static unsigned int value;
53 * Print verbose ATS information
58 * List only addresses currently used (active)
60 static int op_list_used;
65 static int op_list_all;
70 static int op_set_pref;
73 * Print quotas configured
75 static int op_print_quotas;
78 * Monitor addresses used
80 static int op_monitor;
84 static struct GNUNET_ATS_PerformanceHandle *ph;
86 struct GNUNET_ATS_AddressListHandle *alh;
88 static struct GNUNET_CONFIGURATION_Handle *cfg;
90 GNUNET_SCHEDULER_TaskIdentifier end_task;
92 struct PendingResolutions
94 struct PendingResolutions *next;
95 struct PendingResolutions *prev;
97 struct GNUNET_HELLO_Address *address;
98 struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out;
99 struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in;
101 struct GNUNET_ATS_Information *ats;
104 struct GNUNET_TRANSPORT_AddressToStringContext * tats_ctx;
107 struct PendingResolutions *head;
108 struct PendingResolutions *tail;
111 const struct GNUNET_SCHEDULER_TaskContext *tc)
113 struct PendingResolutions * pr;
114 struct PendingResolutions * next;
115 unsigned int pending;
119 GNUNET_ATS_performance_list_addresses_cancel (alh);
125 GNUNET_ATS_performance_done (ph);
131 while (NULL != (pr = next))
134 GNUNET_CONTAINER_DLL_remove (head, tail, pr);
135 GNUNET_TRANSPORT_address_to_string_cancel (pr->tats_ctx);
136 GNUNET_free (pr->address);
141 fprintf (stderr, _("%u address resolutions had a timeout\n"), pending);
143 fprintf (stderr, _("ATS returned results for %u addresses\n"), results);
148 void transport_addr_to_str_cb (void *cls, const char *address)
150 struct PendingResolutions * pr = cls;
153 char *ats_prop_arr[GNUNET_ATS_PropertyCount] = GNUNET_ATS_PropertyStrings;
154 char *ats_prop_value;
161 ats_str = GNUNET_strdup("");
164 for (c = 0; c < pr->ats_count; c++)
168 ats_type = ntohl(pr->ats[c].type);
169 ats_value = ntohl(pr->ats[c].value);
171 if (ats_type > GNUNET_ATS_PropertyCount)
178 case GNUNET_ATS_NETWORK_TYPE:
179 if (ats_value > GNUNET_ATS_NetworkTypeCount)
185 GNUNET_asprintf (&ats_prop_value, "%s", GNUNET_ATS_print_network_type(ats_value));
188 GNUNET_asprintf (&ats_prop_value, "%u", ats_value);
191 if ((verbose) && (ats_type < GNUNET_ATS_PropertyCount))
193 GNUNET_asprintf (&ats_str, "%s%s=%s, ", ats_tmp, ats_prop_arr[ats_type] , ats_prop_value);
194 GNUNET_free (ats_tmp);
196 GNUNET_free (ats_prop_value);
199 fprintf (stderr, _("Peer `%s' plugin `%s', address `%s', `%s' bw out: %u Bytes/s, bw in %u Bytes/s, %s\n"),
200 GNUNET_i2s (&pr->address->peer), pr->address->transport_name, address,
201 GNUNET_ATS_print_network_type(network),
202 ntohl (pr->bandwidth_out.value__), ntohl (pr->bandwidth_in.value__),ats_str);
203 GNUNET_free (ats_str);
208 GNUNET_CONTAINER_DLL_remove (head, tail, pr);
209 GNUNET_free (pr->address);
213 if ((GNUNET_YES == receive_done) && (0 == pending))
215 /* All messages received and no resolutions pending*/
216 if (end_task != GNUNET_SCHEDULER_NO_TASK)
217 GNUNET_SCHEDULER_cancel (end_task);
218 end_task = GNUNET_SCHEDULER_add_now (end, NULL);
223 void ats_perf_cb (void *cls,
224 const struct GNUNET_HELLO_Address *address,
226 struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out,
227 struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
228 const struct GNUNET_ATS_Information *ats,
231 struct PendingResolutions * pr;
236 pr = GNUNET_malloc (sizeof (struct PendingResolutions) +
237 ats_count * sizeof (struct GNUNET_ATS_Information));
239 pr->ats_count = ats_count;
240 pr->ats = (struct GNUNET_ATS_Information *) &pr[1];
242 memcpy (pr->ats, ats, ats_count * sizeof (struct GNUNET_ATS_Information));
243 pr->address = GNUNET_HELLO_address_copy (address);
244 pr->bandwidth_in = bandwidth_in;
245 pr->bandwidth_out = bandwidth_out;
246 pr->tats_ctx = GNUNET_TRANSPORT_address_to_string(cfg, address,
247 resolve_addresses_numeric, GNUNET_TIME_UNIT_FOREVER_REL, transport_addr_to_str_cb, pr);
248 GNUNET_CONTAINER_DLL_insert (head, tail, pr);
254 /* All messages received */
255 receive_done = GNUNET_YES;
259 /* All messages received and no resolutions pending*/
260 if (end_task != GNUNET_SCHEDULER_NO_TASK)
261 GNUNET_SCHEDULER_cancel (end_task);
262 end_task = GNUNET_SCHEDULER_add_now (end, NULL);
268 print_quotas (const struct GNUNET_CONFIGURATION_Handle *cfg)
270 char *network_str[GNUNET_ATS_NetworkTypeCount] = GNUNET_ATS_NetworkTypeString;
271 char * entry_in = NULL;
272 char * entry_out = NULL;
273 char * quota_out_str;
275 unsigned long long int quota_out;
276 unsigned long long int quota_in;
279 for (c = 0; (c < GNUNET_ATS_NetworkTypeCount); c++)
282 GNUNET_asprintf (&entry_out, "%s_QUOTA_OUT", network_str[c]);
283 GNUNET_asprintf (&entry_in, "%s_QUOTA_IN", network_str[c]);
286 if (GNUNET_OK == GNUNET_CONFIGURATION_get_value_string(cfg, "ats", entry_out, "a_out_str))
288 if (0 == strcmp(quota_out_str, BIG_M_STRING) ||
289 (GNUNET_SYSERR == GNUNET_STRINGS_fancy_size_to_bytes (quota_out_str, "a_out)))
290 quota_out = UINT32_MAX;
292 GNUNET_free (quota_out_str);
293 GNUNET_asprintf ("a_out_str, "%llu", quota_out);
297 fprintf (stderr, "Outbound quota for network `%11s' not configured!\n",
299 GNUNET_asprintf ("a_out_str, "-");
301 GNUNET_free (entry_out);
304 if (GNUNET_OK == GNUNET_CONFIGURATION_get_value_string(cfg, "ats", entry_in, "a_in_str))
306 if (0 == strcmp(quota_in_str, BIG_M_STRING) ||
307 (GNUNET_SYSERR == GNUNET_STRINGS_fancy_size_to_bytes (quota_in_str, "a_in)))
308 quota_in = UINT32_MAX;
309 GNUNET_free (quota_in_str);
310 GNUNET_asprintf ("a_in_str, "%llu", quota_in);
314 fprintf (stderr, "Inbound quota for network `%11s' not configured!\n",
316 GNUNET_asprintf ("a_in_str, "-");
318 GNUNET_free (entry_in);
320 fprintf (stderr, _("Quota for network `%11s' (in/out): %10s / %10s\n"), network_str[c], quota_in_str, quota_out_str );
321 GNUNET_free (quota_out_str);
322 GNUNET_free (quota_in_str);
324 return GNUNET_ATS_NetworkTypeCount;
329 void testservice_ats (void *cls,
330 const struct GNUNET_SCHEDULER_TaskContext *tc)
332 struct GNUNET_PeerIdentity pid;
333 struct GNUNET_CONFIGURATION_Handle *cfg = cls;
337 if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_TIMEOUT))
339 FPRINTF (stderr, _("Service `%s' is not running\n"), "ats");
347 if (GNUNET_OK != GNUNET_CRYPTO_hash_from_string (pid_str, &pid.hashPubKey))
349 FPRINTF (stderr, _("Failed to parse peer identity `%s'\n"), pid_str);
354 c = op_list_all + op_list_used + op_monitor + op_set_pref;
357 FPRINTF (stderr, _("Please select one operation : %s or %s or %s or %s or %s\n"),
358 "--used", "--all", "--monitor", "--preference", "--quotas");
362 op_list_used = GNUNET_YES; /* set default */
365 ret = print_quotas (cfg);
370 ph = GNUNET_ATS_performance_init (cfg, NULL, NULL);
373 fprintf (stderr, _("Cannot connect to ATS service, exiting...\n"));
377 alh = GNUNET_ATS_performance_list_addresses (ph,
378 (NULL == pid_str) ? NULL : &pid,
379 GNUNET_YES, ats_perf_cb, NULL);
382 fprintf (stderr, _("Cannot issue request to ATS service, exiting...\n"));
383 end_task = GNUNET_SCHEDULER_add_now (&end, NULL);
386 end_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL, &end, NULL);
388 else if (op_list_used)
390 ph = GNUNET_ATS_performance_init (cfg, NULL, NULL);
392 fprintf (stderr, _("Cannot connect to ATS service, exiting...\n"));
394 alh = GNUNET_ATS_performance_list_addresses (ph,
395 (NULL == pid_str) ? NULL : &pid,
396 GNUNET_NO, ats_perf_cb, NULL);
399 fprintf (stderr, _("Cannot issue request to ATS service, exiting...\n"));
400 end_task = GNUNET_SCHEDULER_add_now (&end, NULL);
403 end_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL, &end, NULL);
407 ph = GNUNET_ATS_performance_init (cfg, ats_perf_cb, NULL);
409 fprintf (stderr, _("Cannot connect to ATS service, exiting...\n"));
410 end_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL, &end, NULL);
413 else if (op_set_pref)
415 for (c = 0; c<strlen(type_str); c++)
417 if (isupper (type_str[c]))
418 type_str[c] = tolower (type_str[c]);
421 if (0 == strcasecmp("latency", type_str))
422 type = GNUNET_ATS_PREFERENCE_LATENCY;
423 else if (0 == strcasecmp("bandwidth", type_str))
424 type = GNUNET_ATS_PREFERENCE_BANDWIDTH;
427 FPRINTF (stderr, "%s", _("Type required\n"));
432 ph = GNUNET_ATS_performance_init (cfg, NULL, NULL);
434 fprintf (stderr, _("Cannot connect to ATS service, exiting...\n"));
436 GNUNET_ATS_change_preference (ph, &pid, type, (double) value, GNUNET_ATS_PREFERENCE_END);
438 end_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS, &end, NULL);
444 * Main function that will be run by the scheduler.
447 * @param args remaining command-line arguments
448 * @param cfgfile name of the configuration file used (for saving, can be NULL!)
449 * @param my_cfg configuration
452 run (void *cls, char *const *args, const char *cfgfile,
453 const struct GNUNET_CONFIGURATION_Handle *my_cfg)
455 cfg = (struct GNUNET_CONFIGURATION_Handle *) my_cfg;
456 GNUNET_CLIENT_service_test ("ats", cfg,
466 * @param argc number of arguments from the command line
467 * @param argv command line arguments
468 * @return 0 ok, 1 on error
471 main (int argc, char *const *argv)
474 resolve_addresses_numeric = GNUNET_NO;
475 op_monitor = GNUNET_NO;
476 op_list_all = GNUNET_NO;
477 op_list_used = GNUNET_NO;
478 op_set_pref = GNUNET_NO;
480 receive_done = GNUNET_NO;
482 static const struct GNUNET_GETOPT_CommandLineOption options[] = {
484 gettext_noop ("get list of active addresses currently used"),
485 0, &GNUNET_GETOPT_set_one, &op_list_used},
487 gettext_noop ("get list of all active addresses"),
488 0, &GNUNET_GETOPT_set_one, &op_list_all},
489 {'n', "numeric", NULL,
490 gettext_noop ("do not resolve IP addresses to hostnames"),
491 0, &GNUNET_GETOPT_set_one, &resolve_addresses_numeric},
492 {'m', "monitor", NULL,
493 gettext_noop ("monitor mode"),
494 0, &GNUNET_GETOPT_set_one, &op_monitor},
495 {'p', "preference", NULL,
496 gettext_noop ("set preference for the given peer"),
497 0, &GNUNET_GETOPT_set_one, &op_set_pref},
498 {'q', "quotas", NULL,
499 gettext_noop ("print all configured quotas"),
500 0, &GNUNET_GETOPT_set_one, &op_print_quotas},
502 gettext_noop ("peer id"),
503 1, &GNUNET_GETOPT_set_string, &pid_str},
504 {'t', "type", "TYPE",
505 gettext_noop ("preference type to set: latency | bandwidth"),
506 1, &GNUNET_GETOPT_set_string, &type_str},
507 {'k', "value", "VALUE",
508 gettext_noop ("preference value"),
509 1, &GNUNET_GETOPT_set_uint, &value},
510 {'V', "verbose", NULL,
511 gettext_noop ("verbose output (include ATS address properties)"),
512 0, &GNUNET_GETOPT_set_one, &verbose},
513 GNUNET_GETOPT_OPTION_END
516 if (GNUNET_OK != GNUNET_STRINGS_get_utf8_args (argc, argv, &argc, &argv))
519 res = GNUNET_PROGRAM_run (argc, argv, "gnunet-ats",
520 gettext_noop ("Print information about ATS state"), options, &run,
522 GNUNET_free_non_null (pid_str);
523 GNUNET_free_non_null (type_str);
524 GNUNET_free ((void *) argv);
526 if (GNUNET_OK == res)
533 /* end of gnunet-ats.c */