2 This file is part of GNUnet.
3 (C) 2009, 2010 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 2, 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 statistics/statistics_api.c
23 * @brief API of the statistics service
24 * @author Christian Grothoff
27 #include "gnunet_client_lib.h"
28 #include "gnunet_constants.h"
29 #include "gnunet_container_lib.h"
30 #include "gnunet_protocols.h"
31 #include "gnunet_server_lib.h"
32 #include "gnunet_statistics_service.h"
33 #include "gnunet_strings_lib.h"
34 #include "statistics.h"
37 * How long do we wait until a statistics request for setting
38 * a value times out? (The update will be lost if the
39 * service does not react within this timeframe).
41 #define SET_TRANSMIT_TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 2)
57 * Entry kept for each value we are watching.
59 struct GNUNET_STATISTICS_WatchEntry
63 * What subsystem is this action about? (never NULL)
68 * What value is this action about? (never NULL)
75 GNUNET_STATISTICS_Iterator proc;
86 * Linked list of things we still need to do.
88 struct GNUNET_STATISTICS_GetHandle
92 * This is a doubly linked list.
94 struct GNUNET_STATISTICS_GetHandle *next;
97 * This is a doubly linked list.
99 struct GNUNET_STATISTICS_GetHandle *prev;
102 * Main statistics handle.
104 struct GNUNET_STATISTICS_Handle *sh;
107 * What subsystem is this action about? (can be NULL)
112 * What value is this action about? (can be NULL)
117 * Continuation to call once action is complete.
119 GNUNET_STATISTICS_Callback cont;
122 * Function to call (for GET actions only).
124 GNUNET_STATISTICS_Iterator proc;
127 * Closure for proc and cont.
132 * Timeout for this action.
134 struct GNUNET_TIME_Absolute timeout;
142 * Flag for SET/UPDATE actions.
147 * Has the current iteration been aborted; for GET actions.
152 * Is this a GET, SET, UPDATE or WATCH?
154 enum ActionType type;
157 * Size of the message that we will be transmitting.
165 * Handle for the service.
167 struct GNUNET_STATISTICS_Handle
170 * Name of our subsystem.
175 * Configuration to use.
177 const struct GNUNET_CONFIGURATION_Handle *cfg;
180 * Socket (if available).
182 struct GNUNET_CLIENT_Connection *client;
185 * Currently pending transmission request.
187 struct GNUNET_CLIENT_TransmitHandle *th;
190 * Head of the linked list of pending actions (first action
193 struct GNUNET_STATISTICS_GetHandle *action_head;
196 * Tail of the linked list of actions (for fast append).
198 struct GNUNET_STATISTICS_GetHandle *action_tail;
201 * Action we are currently busy with (action request has been
202 * transmitted, we're now receiving the response from the
205 struct GNUNET_STATISTICS_GetHandle *current;
208 * Array of watch entries.
210 struct GNUNET_STATISTICS_WatchEntry **watches;
213 * Task doing exponential back-off trying to reconnect.
215 GNUNET_SCHEDULER_TaskIdentifier backoff_task;
218 * Time for next connect retry.
220 struct GNUNET_TIME_Relative backoff;
223 * Size of the 'watches' array.
225 unsigned int watches_size;
228 * Should this handle auto-destruct once all actions have
234 * Are we currently receiving from the service?
243 * Schedule the next action to be performed.
245 static void schedule_action (struct GNUNET_STATISTICS_Handle *h);
248 * Try to (re)connect to the statistics service.
250 * @return GNUNET_YES on success, GNUNET_NO on failure.
253 try_connect (struct GNUNET_STATISTICS_Handle *ret);
257 insert_ai (struct GNUNET_STATISTICS_Handle *h, struct GNUNET_STATISTICS_GetHandle *ai)
259 GNUNET_CONTAINER_DLL_insert_after (h->action_head,
263 if (h->action_head == ai)
269 schedule_watch_request (struct GNUNET_STATISTICS_Handle *h,
270 struct GNUNET_STATISTICS_WatchEntry *watch)
273 struct GNUNET_STATISTICS_GetHandle *ai;
278 GNUNET_assert (h != NULL);
279 if (GNUNET_YES != try_connect (h))
284 slen = strlen (watch->subsystem) + 1;
285 nlen = strlen (watch->name) + 1;
286 nsize = sizeof (struct GNUNET_MessageHeader) + slen + nlen;
287 if (nsize >= GNUNET_SERVER_MAX_MESSAGE_SIZE)
292 ai = GNUNET_malloc (sizeof (struct GNUNET_STATISTICS_GetHandle));
294 ai->subsystem = GNUNET_strdup (watch->subsystem);
295 ai->name = GNUNET_strdup (watch->name);
296 ai->timeout = GNUNET_TIME_UNIT_FOREVER_ABS;
298 ai->type = ACTION_WATCH;
299 ai->proc = watch->proc;
300 ai->cls = watch->proc_cls;
306 * Try to (re)connect to the statistics service.
308 * @return GNUNET_YES on success, GNUNET_NO on failure.
311 try_connect (struct GNUNET_STATISTICS_Handle *ret)
314 if (ret->client != NULL)
316 ret->client = GNUNET_CLIENT_connect ("statistics", ret->cfg);
317 if (ret->client != NULL)
319 for (i=0;i<ret->watches_size;i++)
320 schedule_watch_request (ret, ret->watches[i]);
324 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
325 _("Failed to connect to statistics service!\n"));
332 * Free memory associated with the given action item.
335 free_action_item (struct GNUNET_STATISTICS_GetHandle *ai)
337 GNUNET_free_non_null (ai->subsystem);
338 GNUNET_free_non_null (ai->name);
344 * GET processing is complete, tell client about it.
347 finish (struct GNUNET_STATISTICS_Handle *h, int code)
349 struct GNUNET_STATISTICS_GetHandle *pos = h->current;
354 if (pos->cont != NULL)
355 pos->cont (pos->cls, code);
356 free_action_item (pos);
362 * Process the message.
364 * @return GNUNET_OK if the message was well-formed
367 process_message (struct GNUNET_STATISTICS_Handle *h,
368 const struct GNUNET_MessageHeader *msg)
372 const struct GNUNET_STATISTICS_ReplyMessage *smsg;
375 if (h->current->aborted)
378 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
379 "Iteration was aborted, ignoring VALUE\n");
381 return GNUNET_OK; /* don't bother */
383 size = ntohs (msg->size);
384 if (size < sizeof (struct GNUNET_STATISTICS_ReplyMessage))
387 return GNUNET_SYSERR;
389 smsg = (const struct GNUNET_STATISTICS_ReplyMessage *) msg;
390 size -= sizeof (struct GNUNET_STATISTICS_ReplyMessage);
391 if (size != GNUNET_STRINGS_buffer_tokenize ((const char *) &smsg[1],
392 size, 2, &service, &name))
395 return GNUNET_SYSERR;
398 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
399 "Received valid statistic on `%s:%s': %llu\n",
400 service, name, GNUNET_ntohll (smsg->value));
403 h->current->proc (h->current->cls,
406 GNUNET_ntohll (smsg->value),
408 (ntohl (smsg->uid) & GNUNET_STATISTICS_PERSIST_BIT)))
411 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
412 "Processing of remaining statistics aborted by client.\n");
414 h->current->aborted = GNUNET_YES;
417 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
418 "VALUE processed successfully\n");
425 process_watch_value (struct GNUNET_STATISTICS_Handle *h,
426 const struct GNUNET_MessageHeader *msg)
428 const struct GNUNET_STATISTICS_WatchValueMessage *wvm;
429 struct GNUNET_STATISTICS_WatchEntry *w;
432 if (sizeof(struct GNUNET_STATISTICS_WatchValueMessage) !=
436 return GNUNET_SYSERR;
438 wvm = (const struct GNUNET_STATISTICS_WatchValueMessage *)msg;
439 GNUNET_break (0 == ntohl (wvm->reserved));
440 wid = ntohl (wvm->wid);
441 if (wid >= h->watches_size)
444 return GNUNET_SYSERR;
447 (void) w->proc (w->proc_cls,
450 GNUNET_ntohll (wvm->value),
452 (ntohl (wvm->flags) & GNUNET_STATISTICS_PERSIST_BIT));
458 * Function called with messages from stats service.
461 * @param msg message received, NULL on timeout or fatal error
464 receive_stats (void *cls, const struct GNUNET_MessageHeader *msg)
466 struct GNUNET_STATISTICS_Handle *h = cls;
470 if (NULL != h->client)
472 GNUNET_CLIENT_disconnect (h->client, GNUNET_NO);
476 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
477 "Error receiving statistics from service, is the service running?\n" );
479 finish (h, GNUNET_SYSERR);
482 switch (ntohs (msg->type))
484 case GNUNET_MESSAGE_TYPE_STATISTICS_END:
486 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
487 "Received end of statistics marker\n");
489 h->backoff = GNUNET_TIME_UNIT_MILLISECONDS;
490 if (h->watches_size > 0)
492 GNUNET_CLIENT_receive (h->client,
495 GNUNET_TIME_UNIT_FOREVER_REL);
499 h->receiving = GNUNET_NO;
501 finish (h, GNUNET_OK);
503 case GNUNET_MESSAGE_TYPE_STATISTICS_VALUE:
504 if (GNUNET_OK == process_message (h, msg))
506 /* finally, look for more! */
508 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
509 "Processing VALUE done, now reading more\n");
511 GNUNET_CLIENT_receive (h->client,
514 GNUNET_TIME_absolute_get_remaining
515 (h->current->timeout));
516 h->backoff = GNUNET_TIME_UNIT_MILLISECONDS;
521 case GNUNET_MESSAGE_TYPE_STATISTICS_WATCH_VALUE:
523 process_watch_value (h,
526 h->backoff = GNUNET_TIME_UNIT_MILLISECONDS;
527 GNUNET_assert (h->watches_size > 0);
528 GNUNET_CLIENT_receive (h->client,
531 GNUNET_TIME_UNIT_FOREVER_REL);
540 if (NULL != h->client)
542 GNUNET_CLIENT_disconnect (h->client, GNUNET_NO);
545 finish (h, GNUNET_SYSERR);
550 * Transmit a GET request (and if successful, start to receive
554 transmit_get (struct GNUNET_STATISTICS_Handle *handle, size_t size, void *buf)
556 struct GNUNET_MessageHeader *hdr;
563 /* timeout / error */
565 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
566 "Transmission of request for statistics failed!\n");
568 finish (handle, GNUNET_SYSERR);
571 slen1 = strlen (handle->current->subsystem) + 1;
572 slen2 = strlen (handle->current->name) + 1;
573 msize = slen1 + slen2 + sizeof (struct GNUNET_MessageHeader);
574 GNUNET_assert (msize <= size);
575 hdr = (struct GNUNET_MessageHeader *) buf;
576 hdr->size = htons (msize);
577 hdr->type = htons (GNUNET_MESSAGE_TYPE_STATISTICS_GET);
578 GNUNET_assert (slen1 + slen2 ==
579 GNUNET_STRINGS_buffer_fill ((char *) &hdr[1],
582 handle->current->subsystem,
583 handle->current->name));
584 if (! handle->receiving)
587 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
588 "Transmission of GET done, now reading response\n");
590 handle->receiving = GNUNET_YES;
591 GNUNET_CLIENT_receive (handle->client,
594 GNUNET_TIME_absolute_get_remaining (handle->
602 * Transmit a WATCH request (and if successful, start to receive
606 transmit_watch (struct GNUNET_STATISTICS_Handle *handle, size_t size, void *buf)
608 struct GNUNET_MessageHeader *hdr;
615 /* timeout / error */
617 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
618 "Transmission of request for statistics failed!\n");
620 finish (handle, GNUNET_SYSERR);
624 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
625 "Transmitting watch request for `%s'\n",
626 handle->current->name);
628 slen1 = strlen (handle->current->subsystem) + 1;
629 slen2 = strlen (handle->current->name) + 1;
630 msize = slen1 + slen2 + sizeof (struct GNUNET_MessageHeader);
631 GNUNET_assert (msize <= size);
632 hdr = (struct GNUNET_MessageHeader *) buf;
633 hdr->size = htons (msize);
634 hdr->type = htons (GNUNET_MESSAGE_TYPE_STATISTICS_WATCH);
635 GNUNET_assert (slen1 + slen2 ==
636 GNUNET_STRINGS_buffer_fill ((char *) &hdr[1],
639 handle->current->subsystem,
640 handle->current->name));
641 if (GNUNET_YES != handle->receiving)
643 handle->receiving = GNUNET_YES;
644 GNUNET_CLIENT_receive (handle->client,
647 GNUNET_TIME_UNIT_FOREVER_REL);
649 finish (handle, GNUNET_OK);
655 * Transmit a SET/UPDATE request.
658 transmit_set (struct GNUNET_STATISTICS_Handle *handle, size_t size, void *buf)
660 struct GNUNET_STATISTICS_SetMessage *r;
667 finish (handle, GNUNET_SYSERR);
671 slen = strlen (handle->current->subsystem) + 1;
672 nlen = strlen (handle->current->name) + 1;
673 nsize = sizeof (struct GNUNET_STATISTICS_SetMessage) + slen + nlen;
677 finish (handle, GNUNET_SYSERR);
681 r->header.size = htons (nsize);
682 r->header.type = htons (GNUNET_MESSAGE_TYPE_STATISTICS_SET);
684 r->value = GNUNET_htonll (handle->current->value);
685 if (handle->current->make_persistent)
686 r->flags |= htonl (GNUNET_STATISTICS_SETFLAG_PERSISTENT);
687 if (handle->current->type == ACTION_UPDATE)
688 r->flags |= htonl (GNUNET_STATISTICS_SETFLAG_RELATIVE);
689 GNUNET_assert (slen + nlen ==
690 GNUNET_STRINGS_buffer_fill ((char *) &r[1],
693 handle->current->subsystem,
694 handle->current->name));
695 finish (handle, GNUNET_OK);
701 transmit_action (void *cls, size_t size, void *buf)
703 struct GNUNET_STATISTICS_Handle *handle = cls;
707 switch (handle->current->type)
710 ret = transmit_get (handle, size, buf);
714 ret = transmit_set (handle, size, buf);
717 ret = transmit_watch (handle, size, buf);
729 * Get handle for the statistics service.
731 * @param subsystem name of subsystem using the service
732 * @param cfg services configuration in use
733 * @return handle to use
735 struct GNUNET_STATISTICS_Handle *
736 GNUNET_STATISTICS_create (const char *subsystem,
737 const struct GNUNET_CONFIGURATION_Handle *cfg)
739 struct GNUNET_STATISTICS_Handle *ret;
741 GNUNET_assert (subsystem != NULL);
742 GNUNET_assert (cfg != NULL);
743 ret = GNUNET_malloc (sizeof (struct GNUNET_STATISTICS_Handle));
745 ret->subsystem = GNUNET_strdup (subsystem);
746 ret->backoff = GNUNET_TIME_UNIT_MILLISECONDS;
747 if (GNUNET_YES != try_connect (ret))
749 GNUNET_free (ret->subsystem);
758 * Destroy a handle (free all state associated with
761 * @param h statistics handle to destroy
762 * @param sync_first set to GNUNET_YES if pending SET requests should
766 GNUNET_STATISTICS_destroy (struct GNUNET_STATISTICS_Handle *h,
769 struct GNUNET_STATISTICS_GetHandle *pos;
770 struct GNUNET_STATISTICS_GetHandle *next;
771 struct GNUNET_STATISTICS_GetHandle *prev;
772 struct GNUNET_TIME_Relative timeout;
775 if (h == NULL) return;
776 if (GNUNET_SCHEDULER_NO_TASK != h->backoff_task)
777 GNUNET_SCHEDULER_cancel (h->backoff_task);
780 if (h->current != NULL)
782 if (h->current->type == ACTION_GET)
784 GNUNET_CLIENT_notify_transmit_ready_cancel (h->th);
786 free_action_item (h->current);
790 pos = h->action_head;
795 if (pos->type == ACTION_GET)
798 h->action_head = next;
801 free_action_item (pos);
809 h->action_tail = prev;
810 if (h->current == NULL)
812 h->current = h->action_head;
813 if (h->action_head != NULL)
815 h->action_head = h->action_head->next;
816 if (h->action_head == NULL)
817 h->action_tail = NULL;
820 h->do_destroy = GNUNET_YES;
821 if ( (h->current != NULL) &&
824 timeout = GNUNET_TIME_absolute_get_remaining (h->current->timeout);
825 h->th = GNUNET_CLIENT_notify_transmit_ready (h->client,
829 &transmit_action, h);
830 GNUNET_assert (NULL != h->th);
837 GNUNET_CLIENT_notify_transmit_ready_cancel (h->th);
840 if (h->current != NULL)
841 free_action_item (h->current);
842 while (NULL != (pos = h->action_head))
844 h->action_head = pos->next;
845 free_action_item (pos);
847 if (h->client != NULL)
849 GNUNET_CLIENT_disconnect (h->client, GNUNET_YES);
852 for (i=0;i<h->watches_size;i++)
854 GNUNET_free (h->watches[i]->subsystem);
855 GNUNET_free (h->watches[i]->name);
856 GNUNET_free (h->watches[i]);
858 GNUNET_array_grow (h->watches,
861 GNUNET_free (h->subsystem);
867 finish_task (void *cls,
868 const struct GNUNET_SCHEDULER_TaskContext *tc)
870 struct GNUNET_STATISTICS_Handle *h = cls;
872 h->backoff_task = GNUNET_SCHEDULER_NO_TASK;
873 finish (h, GNUNET_SYSERR);
878 * Schedule the next action to be performed.
881 schedule_action (struct GNUNET_STATISTICS_Handle *h)
883 struct GNUNET_TIME_Relative timeout;
885 if (h->current != NULL)
886 return; /* action already pending */
887 if (GNUNET_YES != try_connect (h))
889 h->backoff_task = GNUNET_SCHEDULER_add_delayed (h->backoff,
892 h->backoff = GNUNET_TIME_relative_multiply (h->backoff, 2);
893 h->backoff = GNUNET_TIME_relative_min (h->backoff,
894 GNUNET_CONSTANTS_SERVICE_TIMEOUT);
898 /* schedule next action */
899 h->current = h->action_head;
900 if (NULL == h->current)
904 h->do_destroy = GNUNET_NO;
905 GNUNET_STATISTICS_destroy (h, GNUNET_YES);
909 GNUNET_CONTAINER_DLL_remove (h->action_head,
912 timeout = GNUNET_TIME_absolute_get_remaining (h->current->timeout);
914 (h->th = GNUNET_CLIENT_notify_transmit_ready (h->client,
918 &transmit_action, h)))
921 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
922 "Failed to transmit request to statistics service.\n");
924 finish (h, GNUNET_SYSERR);
930 * Get statistic from the peer.
932 * @param handle identification of the statistics service
933 * @param subsystem limit to the specified subsystem, NULL for our subsystem
934 * @param name name of the statistic value, NULL for all values
935 * @param timeout after how long should we give up (and call
936 * cont with an error code)?
937 * @param cont continuation to call when done (can be NULL)
938 * @param proc function to call on each value
939 * @param cls closure for cont and proc
940 * @return NULL on error
942 struct GNUNET_STATISTICS_GetHandle *
943 GNUNET_STATISTICS_get (struct GNUNET_STATISTICS_Handle *handle,
944 const char *subsystem,
946 struct GNUNET_TIME_Relative timeout,
947 GNUNET_STATISTICS_Callback cont,
948 GNUNET_STATISTICS_Iterator proc, void *cls)
952 struct GNUNET_STATISTICS_GetHandle *ai;
954 GNUNET_assert (handle != NULL);
955 GNUNET_assert (proc != NULL);
956 GNUNET_assert (GNUNET_NO == handle->do_destroy);
957 if (GNUNET_YES != try_connect (handle))
960 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
961 "Failed to connect to statistics service, can not get value `%s:%s'.\n",
962 strlen (subsystem) ? subsystem : "*",
963 strlen (name) ? name : "*");
967 if (subsystem == NULL)
971 slen1 = strlen (subsystem) + 1;
972 slen2 = strlen (name) + 1;
973 GNUNET_assert (slen1 + slen2 + sizeof (struct GNUNET_MessageHeader) <
974 GNUNET_SERVER_MAX_MESSAGE_SIZE);
975 ai = GNUNET_malloc (sizeof (struct GNUNET_STATISTICS_GetHandle));
977 ai->subsystem = GNUNET_strdup (subsystem);
978 ai->name = GNUNET_strdup (name);
982 ai->timeout = GNUNET_TIME_relative_to_absolute (timeout);
983 ai->type = ACTION_GET;
984 ai->msize = slen1 + slen2 + sizeof (struct GNUNET_MessageHeader);
985 insert_ai (handle, ai);
991 * Cancel a 'get' request. Must be called before the 'cont'
992 * function is called.
994 * @param gh handle of the request to cancel
997 GNUNET_STATISTICS_get_cancel (struct GNUNET_STATISTICS_GetHandle *gh)
999 if (gh->sh->current == gh)
1001 gh->aborted = GNUNET_YES;
1005 GNUNET_CONTAINER_DLL_remove (gh->sh->action_head,
1006 gh->sh->action_tail,
1008 GNUNET_free (gh->name);
1009 GNUNET_free (gh->subsystem);
1016 * Watch statistics from the peer (be notified whenever they change).
1017 * Note that the only way to cancel a "watch" request is to destroy
1018 * the statistics handle given as the first argument to this call.
1020 * @param handle identification of the statistics service
1021 * @param subsystem limit to the specified subsystem, never NULL
1022 * @param name name of the statistic value, never NULL
1023 * @param proc function to call on each value
1024 * @param proc_cls closure for proc
1025 * @return GNUNET_OK on success, GNUNET_SYSERR on error
1028 GNUNET_STATISTICS_watch (struct GNUNET_STATISTICS_Handle *handle,
1029 const char *subsystem,
1031 GNUNET_STATISTICS_Iterator proc,
1034 struct GNUNET_STATISTICS_WatchEntry *w;
1037 return GNUNET_SYSERR;
1038 w = GNUNET_malloc (sizeof (struct GNUNET_STATISTICS_WatchEntry));
1039 w->subsystem = GNUNET_strdup (subsystem);
1040 w->name = GNUNET_strdup (name);
1042 w->proc_cls = proc_cls;
1043 GNUNET_array_append (handle->watches,
1044 handle->watches_size,
1046 schedule_watch_request (handle, w);
1052 add_setter_action (struct GNUNET_STATISTICS_Handle *h,
1054 int make_persistent,
1055 uint64_t value, enum ActionType type)
1057 struct GNUNET_STATISTICS_GetHandle *ai;
1063 GNUNET_assert (h != NULL);
1064 GNUNET_assert (name != NULL);
1065 if (GNUNET_YES != try_connect (h))
1067 slen = strlen (h->subsystem) + 1;
1068 nlen = strlen (name) + 1;
1069 nsize = sizeof (struct GNUNET_STATISTICS_SetMessage) + slen + nlen;
1070 if (nsize >= GNUNET_SERVER_MAX_MESSAGE_SIZE)
1075 ai = h->action_head;
1078 if ( (0 == strcmp (ai->subsystem, h->subsystem)) &&
1079 (0 == strcmp (ai->name, name)) &&
1080 ( (ai->type == ACTION_UPDATE) ||
1081 (ai->type == ACTION_SET) ) )
1083 if (ai->type == ACTION_SET)
1085 if (type == ACTION_UPDATE)
1087 delta = (int64_t) value;
1094 if (ai->value < -delta)
1107 if (type == ACTION_UPDATE)
1109 delta = (int64_t) value;
1118 ai->timeout = GNUNET_TIME_relative_to_absolute (SET_TRANSMIT_TIMEOUT);
1119 ai->make_persistent = make_persistent;
1124 ai = GNUNET_malloc (sizeof (struct GNUNET_STATISTICS_GetHandle));
1126 ai->subsystem = GNUNET_strdup (h->subsystem);
1127 ai->name = GNUNET_strdup (name);
1128 ai->timeout = GNUNET_TIME_relative_to_absolute (SET_TRANSMIT_TIMEOUT);
1129 ai->make_persistent = make_persistent;
1138 * Set statistic value for the peer. Will always use our
1139 * subsystem (the argument used when "handle" was created).
1141 * @param handle identification of the statistics service
1142 * @param name name of the statistic value
1143 * @param value new value to set
1144 * @param make_persistent should the value be kept across restarts?
1147 GNUNET_STATISTICS_set (struct GNUNET_STATISTICS_Handle *handle,
1149 uint64_t value, int make_persistent)
1153 GNUNET_assert (GNUNET_NO == handle->do_destroy);
1154 add_setter_action (handle, name, make_persistent, value, ACTION_SET);
1159 * Set statistic value for the peer. Will always use our
1160 * subsystem (the argument used when "handle" was created).
1162 * @param handle identification of the statistics service
1163 * @param name name of the statistic value
1164 * @param delta change in value (added to existing value)
1165 * @param make_persistent should the value be kept across restarts?
1168 GNUNET_STATISTICS_update (struct GNUNET_STATISTICS_Handle *handle,
1170 int64_t delta, int make_persistent)
1176 GNUNET_assert (GNUNET_NO == handle->do_destroy);
1177 add_setter_action (handle, name, make_persistent,
1178 (uint64_t) delta, ACTION_UPDATE);
1182 /* end of statistics_api.c */