2 This file is part of GNUnet.
3 (C) 2009, 2010, 2011 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 nse/gnunet-service-nse.c
23 * @brief network size estimation service
24 * @author Nathan Evans
25 * @author Christian Grothoff
27 * The purpose of this service is to estimate the size of the network.
28 * Given a specified interval, each peer hashes the most recent
29 * timestamp which is evenly divisible by that interval. This hash is
30 * compared in distance to the peer identity to choose an offset. The
31 * closer the peer identity to the hashed timestamp, the earlier the
32 * peer sends out a "nearest peer" message. The closest peer's
33 * message should thus be received before any others, which stops
34 * those peer from sending their messages at a later duration. So
35 * every peer should receive the same nearest peer message, and from
36 * this can calculate the expected number of peers in the network.
40 #include "gnunet_util_lib.h"
41 #include "gnunet_constants.h"
42 #include "gnunet_protocols.h"
43 #include "gnunet_signatures.h"
44 #include "gnunet_statistics_service.h"
45 #include "gnunet_core_service.h"
46 #include "gnunet_nse_service.h"
50 * Should messages be delayed randomly? This option should be set to
51 * GNUNET_NO only for experiments, not in production. It should also
52 * be removed once the initial experiments have been completed.
54 #define USE_RANDOM_DELAYS GNUNET_YES
57 * Should we generate a histogram with the time stamps of when we received
58 * NSE messages to disk? (for performance evaluation only, not useful in
59 * production). The associated code should also probably be removed
60 * once we're done with experiments.
62 #define ENABLE_HISTOGRAM GNUNET_NO
65 * Over how many values do we calculate the weighted average?
67 #define HISTORY_SIZE 64
70 * Message priority to use.
72 #define NSE_PRIORITY 5
75 #define log2(a) (log(a)/log(2))
79 * Amount of work required (W-bit collisions) for NSE proofs, in collision-bits.
81 static unsigned long long nse_work_required;
84 * Interval for sending network size estimation flood requests.
86 static struct GNUNET_TIME_Relative gnunet_nse_interval;
89 * Interval between proof find runs.
91 static struct GNUNET_TIME_Relative proof_find_delay;
95 * Handle for writing when we received messages to disk.
97 static struct GNUNET_BIO_WriteHandle *wh;
102 * Per-peer information.
108 * Core handle for sending messages to this peer.
110 struct GNUNET_CORE_TransmitHandle *th;
113 * What is the identity of the peer?
115 struct GNUNET_PeerIdentity id;
118 * Task scheduled to send message to this peer.
120 GNUNET_SCHEDULER_TaskIdentifier transmit_task;
123 * Did we receive or send a message about the previous round
124 * to this peer yet? GNUNET_YES if the previous round has
125 * been taken care of.
132 * Amount of messages received from this peer on this round.
134 unsigned int received_messages;
137 * Amount of messages transmitted to this peer on this round.
139 unsigned int transmitted_messages;
142 * Which size did we tell the peer the network is?
144 unsigned int last_transmitted_size;
151 GNUNET_NETWORK_STRUCT_BEGIN
154 * Network size estimate reply; sent when "this"
155 * peer's timer has run out before receiving a
156 * valid reply from another peer.
158 struct GNUNET_NSE_FloodMessage
161 * Type: GNUNET_MESSAGE_TYPE_NSE_P2P_FLOOD
163 struct GNUNET_MessageHeader header;
166 * Number of hops this message has taken so far.
168 uint32_t hop_count GNUNET_PACKED;
173 struct GNUNET_CRYPTO_RsaSignaturePurpose purpose;
176 * The current timestamp value (which all
177 * peers should agree on).
179 struct GNUNET_TIME_AbsoluteNBO timestamp;
182 * Number of matching bits between the hash
183 * of timestamp and the initiator's public
186 uint32_t matching_bits GNUNET_PACKED;
189 * Public key of the originator.
191 struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pkey;
194 * Proof of work, causing leading zeros when hashed with pkey.
196 uint64_t proof_of_work GNUNET_PACKED;
199 * Signature (over range specified in purpose).
201 struct GNUNET_CRYPTO_RsaSignature signature;
203 GNUNET_NETWORK_STRUCT_END
206 * Handle to our current configuration.
208 static const struct GNUNET_CONFIGURATION_Handle *cfg;
211 * Handle to the statistics service.
213 static struct GNUNET_STATISTICS_Handle *stats;
216 * Handle to the core service.
218 static struct GNUNET_CORE_Handle *coreAPI;
221 * Map of all connected peers.
223 static struct GNUNET_CONTAINER_MultiHashMap *peers;
226 * The current network size estimate. Number of bits matching on
229 static double current_size_estimate;
232 * The standard deviation of the last HISTORY_SIZE network
235 static double current_std_dev = NAN;
238 * Current hop counter estimate (estimate for network diameter).
240 static uint32_t hop_count_max;
243 * Message for the next round, if we got any.
245 static struct GNUNET_NSE_FloodMessage next_message;
248 * Array of recent size estimate messages.
250 static struct GNUNET_NSE_FloodMessage size_estimate_messages[HISTORY_SIZE];
253 * Index of most recent estimate.
255 static unsigned int estimate_index;
258 * Number of valid entries in the history.
260 static unsigned int estimate_count;
263 * Task scheduled to update our flood message for the next round.
265 static GNUNET_SCHEDULER_TaskIdentifier flood_task;
268 * Task scheduled to compute our proof.
270 static GNUNET_SCHEDULER_TaskIdentifier proof_task;
273 * Notification context, simplifies client broadcasts.
275 static struct GNUNET_SERVER_NotificationContext *nc;
278 * The next major time.
280 static struct GNUNET_TIME_Absolute next_timestamp;
283 * The current major time.
285 static struct GNUNET_TIME_Absolute current_timestamp;
288 * The public key of this peer.
290 static struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded my_public_key;
293 * The private key of this peer.
295 static struct GNUNET_CRYPTO_RsaPrivateKey *my_private_key;
298 * The peer identity of this peer.
300 static struct GNUNET_PeerIdentity my_identity;
303 * Proof of work for this peer.
305 static uint64_t my_proof;
309 * Initialize a message to clients with the current network
312 * @param em message to fill in
315 setup_estimate_message (struct GNUNET_NSE_ClientMessage *em)
327 /* Weighted incremental algorithm for stddev according to West (1979) */
339 for (i = 0; i < estimate_count; i++)
341 j = (estimate_index - i + HISTORY_SIZE) % HISTORY_SIZE;
342 val = htonl (size_estimate_messages[j].matching_bits);
343 weight = estimate_count + 1 - i;
345 temp = weight + sumweight;
347 r = q * weight / temp;
349 sum += sumweight * q * r;
352 if (estimate_count > 0)
353 variance = (sum / sumweight) * estimate_count / (estimate_count - 1.0);
355 /* trivial version for debugging */
358 /* non-weighted trivial version */
364 for (i = 0; i < estimate_count; i++)
366 j = (estimate_index - i + HISTORY_SIZE) % HISTORY_SIZE;
367 val = htonl (size_estimate_messages[j].matching_bits);
371 if (0 != estimate_count)
373 mean = sum / estimate_count;
374 variance = (vsq - mean * sum) / (estimate_count - 1.0); // terrible for numerical stability...
378 std_dev = sqrt (variance);
380 std_dev = variance; /* must be infinity due to estimate_count == 0 */
381 current_std_dev = std_dev;
382 current_size_estimate = mean;
384 em->header.size = htons (sizeof (struct GNUNET_NSE_ClientMessage));
385 em->header.type = htons (GNUNET_MESSAGE_TYPE_NSE_ESTIMATE);
386 em->reserved = htonl (0);
387 em->timestamp = GNUNET_TIME_absolute_hton (GNUNET_TIME_absolute_get ());
388 double se = mean - 0.332747;
389 nsize = log2 (GNUNET_CONTAINER_multihashmap_size (peers) + 1);
390 em->size_estimate = GNUNET_hton_double (GNUNET_MAX (se, nsize));
391 em->std_deviation = GNUNET_hton_double (std_dev);
392 GNUNET_STATISTICS_set (stats, "# nodes in the network (estimate)",
393 (uint64_t) pow (2, mean - 1.0 / 3.0), GNUNET_NO);
398 * Handler for START message from client, triggers an
399 * immediate current network estimate notification.
400 * Also, we remember the client for updates upon future
401 * estimate measurements.
404 * @param client who sent the message
405 * @param message the message received
408 handle_start_message (void *cls, struct GNUNET_SERVER_Client *client,
409 const struct GNUNET_MessageHeader *message)
411 struct GNUNET_NSE_ClientMessage em;
414 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received START message from client\n");
416 GNUNET_SERVER_notification_context_add (nc, client);
417 setup_estimate_message (&em);
418 GNUNET_SERVER_notification_context_unicast (nc, client, &em.header,
420 GNUNET_SERVER_receive_done (client, GNUNET_OK);
425 * How long should we delay a message to go the given number of
428 * @param matching_bits number of matching bits to consider
431 get_matching_bits_delay (uint32_t matching_bits)
433 /* Calculated as: S + f/2 - (f / pi) * (atan(x - p')) */
434 // S is next_timestamp (ignored in return value)
435 // f is frequency (gnunet_nse_interval)
436 // x is matching_bits
437 // p' is current_size_estimate
438 return ((double) gnunet_nse_interval.rel_value / (double) 2.0) -
439 ((gnunet_nse_interval.rel_value / M_PI) *
440 atan (matching_bits - current_size_estimate));
445 * What delay randomization should we apply for a given number of matching bits?
447 * @param matching_bits number of matching bits
448 * @return random delay to apply
450 static struct GNUNET_TIME_Relative
451 get_delay_randomization (uint32_t matching_bits)
453 #if USE_RANDOM_DELAYS
454 struct GNUNET_TIME_Relative ret;
458 d = get_matching_bits_delay (matching_bits);
459 i = (uint32_t) (d / (double) (hop_count_max + 1));
461 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
462 "Randomizing flood using latencies up to %u ms\n",
465 ret.rel_value = GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_WEAK, i + 1);
468 return GNUNET_TIME_UNIT_ZERO;
474 * Get the number of matching bits that the given timestamp has to the given peer ID.
476 * @param timestamp time to generate key
477 * @param id peer identity to compare with
478 * @return number of matching bits
481 get_matching_bits (struct GNUNET_TIME_Absolute timestamp,
482 const struct GNUNET_PeerIdentity *id)
484 GNUNET_HashCode timestamp_hash;
486 GNUNET_CRYPTO_hash (×tamp.abs_value, sizeof (timestamp.abs_value),
488 return GNUNET_CRYPTO_hash_matching_bits (×tamp_hash, &id->hashPubKey);
493 * Get the transmission delay that should be applied for a
496 * @param round_offset -1 for the previous round (random delay between 0 and 50ms)
497 * 0 for the current round (based on our proximity to time key)
498 * @return delay that should be applied
500 static struct GNUNET_TIME_Relative
501 get_transmit_delay (int round_offset)
503 struct GNUNET_TIME_Relative ret;
504 struct GNUNET_TIME_Absolute tgt;
506 uint32_t matching_bits;
508 switch (round_offset)
511 /* previous round is randomized between 0 and 50 ms */
512 #if USE_RANDOM_DELAYS
513 ret.rel_value = GNUNET_CRYPTO_random_u64 (GNUNET_CRYPTO_QUALITY_WEAK, 50);
515 ret = GNUNET_TIME_UNIT_ZERO;
518 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
519 "Transmitting previous round behind schedule in %llu ms\n",
520 (unsigned long long) ret.rel_value);
524 /* current round is based on best-known matching_bits */
526 ntohl (size_estimate_messages[estimate_index].matching_bits);
527 dist_delay = get_matching_bits_delay (matching_bits);
528 dist_delay += get_delay_randomization (matching_bits).rel_value;
529 ret.rel_value = (uint64_t) dist_delay;
531 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
532 "For round %llu, delay for %u matching bits is %llu ms\n",
533 (unsigned long long) current_timestamp.abs_value,
534 (unsigned int) matching_bits,
535 (unsigned long long) ret.rel_value);
537 /* now consider round start time and add delay to it */
538 tgt = GNUNET_TIME_absolute_add (current_timestamp, ret);
539 return GNUNET_TIME_absolute_get_remaining (tgt);
542 return GNUNET_TIME_UNIT_FOREVER_REL;
547 * Task that triggers a NSE P2P transmission.
549 * @param cls the 'struct NSEPeerEntry'
550 * @param tc scheduler context
553 transmit_task_cb (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
557 * Called when core is ready to send a message we asked for
558 * out to the destination.
560 * @param cls closure (NULL)
561 * @param size number of bytes available in buf
562 * @param buf where the callee should write the message
563 * @return number of bytes written to buf
566 transmit_ready (void *cls, size_t size, void *buf)
568 struct NSEPeerEntry *peer_entry = cls;
571 peer_entry->th = NULL;
574 /* client disconnected */
577 GNUNET_assert (size >= sizeof (struct GNUNET_NSE_FloodMessage));
578 idx = estimate_index;
579 if (peer_entry->previous_round == GNUNET_NO)
581 idx = (idx + HISTORY_SIZE - 1) % HISTORY_SIZE;
582 peer_entry->previous_round = GNUNET_YES;
583 peer_entry->transmit_task =
584 GNUNET_SCHEDULER_add_delayed (get_transmit_delay (0), &transmit_task_cb,
587 if ((ntohl (size_estimate_messages[idx].hop_count) == 0) &&
588 (GNUNET_SCHEDULER_NO_TASK != proof_task))
590 GNUNET_STATISTICS_update (stats,
591 "# flood messages not generated (no proof yet)",
595 if (ntohs (size_estimate_messages[idx].header.size) == 0)
597 GNUNET_STATISTICS_update (stats,
598 "# flood messages not generated (lack of history)",
603 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
604 "In round %llu, sending to `%s' estimate with %u bits\n",
606 GNUNET_TIME_absolute_ntoh (size_estimate_messages[idx].
607 timestamp).abs_value,
608 GNUNET_i2s (&peer_entry->id),
609 (unsigned int) ntohl (size_estimate_messages[idx].matching_bits));
611 if (ntohl (size_estimate_messages[idx].hop_count) == 0)
612 GNUNET_STATISTICS_update (stats, "# flood messages started", 1, GNUNET_NO);
613 GNUNET_STATISTICS_update (stats, "# flood messages transmitted", 1,
616 peer_entry->transmitted_messages++;
617 peer_entry->last_transmitted_size =
618 ntohl(size_estimate_messages[idx].matching_bits);
620 memcpy (buf, &size_estimate_messages[idx],
621 sizeof (struct GNUNET_NSE_FloodMessage));
622 return sizeof (struct GNUNET_NSE_FloodMessage);
627 * Task that triggers a NSE P2P transmission.
629 * @param cls the 'struct NSEPeerEntry'
630 * @param tc scheduler context
633 transmit_task_cb (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
635 struct NSEPeerEntry *peer_entry = cls;
637 peer_entry->transmit_task = GNUNET_SCHEDULER_NO_TASK;
638 GNUNET_assert (NULL == peer_entry->th);
640 GNUNET_CORE_notify_transmit_ready (coreAPI, GNUNET_NO, NSE_PRIORITY,
641 GNUNET_TIME_UNIT_FOREVER_REL,
644 GNUNET_NSE_FloodMessage),
645 &transmit_ready, peer_entry);
650 * We've sent on our flood message or one that we received which was
651 * validated and closer than ours. Update the global list of recent
652 * messages and the average. Also re-broadcast the message to any
656 update_network_size_estimate ()
658 struct GNUNET_NSE_ClientMessage em;
660 setup_estimate_message (&em);
661 GNUNET_SERVER_notification_context_broadcast (nc, &em.header, GNUNET_YES);
666 * Setup a flood message in our history array at the given
667 * slot offset for the given timestamp.
669 * @param slot index to use
670 * @param ts timestamp to use
673 setup_flood_message (unsigned int slot, struct GNUNET_TIME_Absolute ts)
675 struct GNUNET_NSE_FloodMessage *fm;
676 uint32_t matching_bits;
678 matching_bits = get_matching_bits (ts, &my_identity);
679 fm = &size_estimate_messages[slot];
680 fm->header.size = htons (sizeof (struct GNUNET_NSE_FloodMessage));
681 fm->header.type = htons (GNUNET_MESSAGE_TYPE_NSE_P2P_FLOOD);
682 fm->hop_count = htonl (0);
683 fm->purpose.purpose = htonl (GNUNET_SIGNATURE_PURPOSE_NSE_SEND);
685 htonl (sizeof (struct GNUNET_NSE_FloodMessage) -
686 sizeof (struct GNUNET_MessageHeader) - sizeof (uint32_t) -
687 sizeof (struct GNUNET_CRYPTO_RsaSignature));
688 fm->matching_bits = htonl (matching_bits);
689 fm->timestamp = GNUNET_TIME_absolute_hton (ts);
690 fm->pkey = my_public_key;
691 fm->proof_of_work = my_proof;
692 if (nse_work_required > 0)
693 GNUNET_assert (GNUNET_OK ==
694 GNUNET_CRYPTO_rsa_sign (my_private_key, &fm->purpose,
697 memset (&fm->signature, 0, sizeof (fm->signature));
702 * Schedule transmission for the given peer for the current round based
703 * on what we know about the desired delay.
706 * @param key hash of peer identity
707 * @param value the 'struct NSEPeerEntry'
708 * @return GNUNET_OK (continue to iterate)
711 schedule_current_round (void *cls, const GNUNET_HashCode * key, void *value)
713 struct NSEPeerEntry *peer_entry = value;
714 struct GNUNET_TIME_Relative delay;
716 if (peer_entry->th != NULL)
718 peer_entry->previous_round = GNUNET_NO;
721 if (peer_entry->transmit_task != GNUNET_SCHEDULER_NO_TASK)
723 GNUNET_SCHEDULER_cancel (peer_entry->transmit_task);
724 peer_entry->previous_round = GNUNET_NO;
727 if (peer_entry->received_messages > 1)
728 GNUNET_STATISTICS_update(stats, "# extra messages",
729 peer_entry->received_messages - 1, GNUNET_NO);
730 peer_entry->transmitted_messages = 0;
731 peer_entry->last_transmitted_size = 0;
732 peer_entry->received_messages = 0;
735 get_transmit_delay ((peer_entry->previous_round == GNUNET_NO) ? -1 : 0);
736 peer_entry->transmit_task =
737 GNUNET_SCHEDULER_add_delayed (delay, &transmit_task_cb, peer_entry);
743 * Update our flood message to be sent (and our timestamps).
746 * @param tc context for this message
749 update_flood_message (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
751 struct GNUNET_TIME_Relative offset;
754 flood_task = GNUNET_SCHEDULER_NO_TASK;
755 if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
757 offset = GNUNET_TIME_absolute_get_remaining (next_timestamp);
758 if (0 != offset.rel_value)
760 /* somehow run early, delay more */
762 GNUNET_SCHEDULER_add_delayed (offset, &update_flood_message, NULL);
765 estimate_index = (estimate_index + 1) % HISTORY_SIZE;
766 if (estimate_count < HISTORY_SIZE)
768 current_timestamp = next_timestamp;
770 GNUNET_TIME_absolute_add (current_timestamp, gnunet_nse_interval);
771 if ((current_timestamp.abs_value ==
772 GNUNET_TIME_absolute_ntoh (next_message.timestamp).abs_value) &&
773 (get_matching_bits (current_timestamp, &my_identity) <
774 ntohl(next_message.matching_bits)))
776 /* we received a message for this round way early, use it! */
777 size_estimate_messages[estimate_index] = next_message;
778 size_estimate_messages[estimate_index].hop_count =
779 htonl (1 + ntohl (next_message.hop_count));
782 setup_flood_message (estimate_index, current_timestamp);
783 next_message.matching_bits = htonl (0); /* reset for 'next' round */
785 for (i = 0; i < HISTORY_SIZE; i++)
787 GNUNET_MAX (ntohl (size_estimate_messages[i].hop_count), hop_count_max);
788 GNUNET_CONTAINER_multihashmap_iterate (peers, &schedule_current_round, NULL);
790 GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_absolute_get_remaining
791 (next_timestamp), &update_flood_message,
797 * Count the leading zeroes in hash.
800 * @return the number of leading zero bits.
803 count_leading_zeroes (const GNUNET_HashCode * hash)
805 unsigned int hash_count;
808 while ((0 == GNUNET_CRYPTO_hash_get_bit (hash, hash_count)))
815 * Check whether the given public key
816 * and integer are a valid proof of work.
818 * @param pkey the public key
819 * @param val the integer
821 * @return GNUNET_YES if valid, GNUNET_NO if not
824 check_proof_of_work (const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *pkey,
827 char buf[sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded) +
829 GNUNET_HashCode result;
831 memcpy (buf, &val, sizeof (val));
832 memcpy (&buf[sizeof (val)], pkey,
833 sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
834 GNUNET_CRYPTO_hash (buf, sizeof (buf), &result);
835 return (count_leading_zeroes (&result) >=
836 nse_work_required) ? GNUNET_YES : GNUNET_NO;
841 * Write our current proof to disk.
849 GNUNET_CONFIGURATION_get_value_filename (cfg, "NSE", "PROOFFILE", &proof))
851 if (sizeof (my_proof) !=
852 GNUNET_DISK_fn_write (proof, &my_proof, sizeof (my_proof),
853 GNUNET_DISK_PERM_USER_READ |
854 GNUNET_DISK_PERM_USER_WRITE))
855 GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "write", proof);
862 * Find our proof of work.
864 * @param cls closure (unused)
865 * @param tc task context
868 find_proof (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
870 #define ROUND_SIZE 10
872 char buf[sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded) +
874 GNUNET_HashCode result;
877 proof_task = GNUNET_SCHEDULER_NO_TASK;
878 memcpy (&buf[sizeof (uint64_t)], &my_public_key,
879 sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
882 while ((counter != UINT64_MAX) && (i < ROUND_SIZE))
884 memcpy (buf, &counter, sizeof (uint64_t));
885 GNUNET_CRYPTO_hash (buf, sizeof (buf), &result);
886 if (nse_work_required <= count_leading_zeroes (&result))
890 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Proof of work found: %llu!\n",
891 (unsigned long long) GNUNET_ntohll (counter));
894 setup_flood_message (estimate_index, current_timestamp);
900 if (my_proof / (100 * ROUND_SIZE) < counter / (100 * ROUND_SIZE))
903 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Testing proofs currently at %llu\n",
904 (unsigned long long) counter);
906 /* remember progress every 100 rounds */
915 GNUNET_SCHEDULER_add_delayed_with_priority (proof_find_delay,
916 GNUNET_SCHEDULER_PRIORITY_IDLE,
922 * An incoming flood message has been received which claims
923 * to have more bits matching than any we know in this time
924 * period. Verify the signature and/or proof of work.
926 * @param incoming_flood the message to verify
928 * @return GNUNET_YES if the message is verified
929 * GNUNET_NO if the key/signature don't verify
932 verify_message_crypto (const struct GNUNET_NSE_FloodMessage *incoming_flood)
935 check_proof_of_work (&incoming_flood->pkey,
936 incoming_flood->proof_of_work))
938 GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Proof of work invalid: %llu!\n"),
940 GNUNET_ntohll (incoming_flood->proof_of_work));
944 if ((nse_work_required > 0) &&
946 GNUNET_CRYPTO_rsa_verify (GNUNET_SIGNATURE_PURPOSE_NSE_SEND,
947 &incoming_flood->purpose,
948 &incoming_flood->signature,
949 &incoming_flood->pkey)))
959 * Update transmissions for the given peer for the current round based
960 * on updated proximity information.
962 * @param cls peer entry to exclude from updates
963 * @param key hash of peer identity
964 * @param value the 'struct NSEPeerEntry'
965 * @return GNUNET_OK (continue to iterate)
968 update_flood_times (void *cls, const GNUNET_HashCode * key, void *value)
970 struct NSEPeerEntry *exclude = cls;
971 struct NSEPeerEntry *peer_entry = value;
972 struct GNUNET_TIME_Relative delay;
974 if (peer_entry->th != NULL)
975 return GNUNET_OK; /* already active */
976 if (peer_entry == exclude)
977 return GNUNET_OK; /* trigger of the update */
978 if (peer_entry->previous_round == GNUNET_NO)
980 /* still stuck in previous round, no point to update, check that
981 * we are active here though... */
982 GNUNET_break (peer_entry->transmit_task != GNUNET_SCHEDULER_NO_TASK ||
983 peer_entry->th != NULL);
986 if (peer_entry->transmit_task != GNUNET_SCHEDULER_NO_TASK)
988 GNUNET_SCHEDULER_cancel (peer_entry->transmit_task);
989 peer_entry->transmit_task = GNUNET_SCHEDULER_NO_TASK;
991 delay = get_transmit_delay (0);
992 peer_entry->transmit_task =
993 GNUNET_SCHEDULER_add_delayed (delay, &transmit_task_cb, peer_entry);
999 * Core handler for size estimate flooding messages.
1001 * @param cls closure unused
1002 * @param message message
1003 * @param peer peer identity this message is from (ignored)
1004 * @param atsi performance data (ignored)
1005 * @param atsi_count number of records in 'atsi'
1008 handle_p2p_size_estimate (void *cls, const struct GNUNET_PeerIdentity *peer,
1009 const struct GNUNET_MessageHeader *message,
1010 const struct GNUNET_ATS_Information *atsi,
1011 unsigned int atsi_count)
1013 const struct GNUNET_NSE_FloodMessage *incoming_flood;
1014 struct GNUNET_TIME_Absolute ts;
1015 struct NSEPeerEntry *peer_entry;
1016 uint32_t matching_bits;
1019 #if ENABLE_HISTOGRAM
1021 GNUNET_BIO_write_int64 (wh, GNUNET_TIME_absolute_get ().abs_value);
1023 incoming_flood = (const struct GNUNET_NSE_FloodMessage *) message;
1024 GNUNET_STATISTICS_update (stats, "# flood messages received", 1, GNUNET_NO);
1025 matching_bits = ntohl (incoming_flood->matching_bits);
1030 struct GNUNET_PeerIdentity os;
1032 GNUNET_CRYPTO_hash (&incoming_flood->pkey,
1033 sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded),
1035 GNUNET_snprintf (origin, sizeof (origin), "%s", GNUNET_i2s (&os));
1036 GNUNET_snprintf (pred, sizeof (pred), "%s", GNUNET_i2s (peer));
1037 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1038 "Flood at %llu from `%s' via `%s' at `%s' with bits %u\n",
1039 (unsigned long long)
1040 GNUNET_TIME_absolute_ntoh (incoming_flood->timestamp).abs_value,
1041 origin, pred, GNUNET_i2s (&my_identity),
1042 (unsigned int) matching_bits);
1046 peer_entry = GNUNET_CONTAINER_multihashmap_get (peers, &peer->hashPubKey);
1047 if (NULL == peer_entry)
1052 #if ENABLE_HISTOGRAM
1053 peer_entry->received_messages++;
1054 if (peer_entry->transmitted_messages > 0 &&
1055 peer_entry->last_transmitted_size >= matching_bits)
1056 GNUNET_STATISTICS_update(stats, "# cross messages", 1, GNUNET_NO);
1059 ts = GNUNET_TIME_absolute_ntoh (incoming_flood->timestamp);
1060 if (ts.abs_value == current_timestamp.abs_value)
1061 idx = estimate_index;
1062 else if (ts.abs_value ==
1063 current_timestamp.abs_value - gnunet_nse_interval.rel_value)
1064 idx = (estimate_index + HISTORY_SIZE - 1) % HISTORY_SIZE;
1065 else if (ts.abs_value == next_timestamp.abs_value)
1067 if (matching_bits <= ntohl (next_message.matching_bits))
1068 return GNUNET_OK; /* ignore, simply too early/late */
1069 if (GNUNET_YES != verify_message_crypto (incoming_flood))
1071 GNUNET_break_op (0);
1074 next_message = *incoming_flood;
1079 GNUNET_STATISTICS_update (stats,
1080 "# flood messages discarded (clock skew too large)",
1084 if (0 == (memcmp (peer, &my_identity, sizeof (struct GNUNET_PeerIdentity))))
1086 /* send to self, update our own estimate IF this also comes from us! */
1088 memcmp (&incoming_flood->pkey, &my_public_key, sizeof (my_public_key)))
1089 update_network_size_estimate ();
1092 if (matching_bits == ntohl (size_estimate_messages[idx].matching_bits))
1094 /* Cancel transmission in the other direction, as this peer clearly has
1095 up-to-date information already. Even if we didn't talk to this peer in
1096 the previous round, we should no longer send it stale information as it
1097 told us about the current round! */
1098 peer_entry->previous_round = GNUNET_YES;
1099 if (idx != estimate_index)
1101 /* do not transmit information for the previous round to this peer
1102 anymore (but allow current round) */
1105 /* got up-to-date information for current round, cancel transmission to
1106 * this peer altogether */
1107 if (GNUNET_SCHEDULER_NO_TASK != peer_entry->transmit_task)
1109 GNUNET_SCHEDULER_cancel (peer_entry->transmit_task);
1110 peer_entry->transmit_task = GNUNET_SCHEDULER_NO_TASK;
1112 if (peer_entry->th != NULL)
1114 GNUNET_CORE_notify_transmit_ready_cancel (peer_entry->th);
1115 peer_entry->th = NULL;
1119 if (matching_bits < ntohl (size_estimate_messages[idx].matching_bits))
1121 if ((idx < estimate_index) && (peer_entry->previous_round == GNUNET_YES))
1122 peer_entry->previous_round = GNUNET_NO;
1123 /* push back our result now, that peer is spreading bad information... */
1124 if (NULL == peer_entry->th)
1126 if (peer_entry->transmit_task != GNUNET_SCHEDULER_NO_TASK)
1127 GNUNET_SCHEDULER_cancel (peer_entry->transmit_task);
1128 peer_entry->transmit_task =
1129 GNUNET_SCHEDULER_add_now (&transmit_task_cb, peer_entry);
1131 /* Not closer than our most recent message, no need to do work here */
1132 GNUNET_STATISTICS_update (stats,
1133 "# flood messages ignored (had closer already)",
1137 if (GNUNET_YES != verify_message_crypto (incoming_flood))
1139 GNUNET_break_op (0);
1142 GNUNET_assert (matching_bits >
1143 ntohl (size_estimate_messages[idx].matching_bits));
1144 /* cancel transmission from us to this peer for this round */
1145 if (idx == estimate_index)
1147 /* cancel any activity for current round */
1148 if (peer_entry->transmit_task != GNUNET_SCHEDULER_NO_TASK)
1150 GNUNET_SCHEDULER_cancel (peer_entry->transmit_task);
1151 peer_entry->transmit_task = GNUNET_SCHEDULER_NO_TASK;
1153 if (peer_entry->th != NULL)
1155 GNUNET_CORE_notify_transmit_ready_cancel (peer_entry->th);
1156 peer_entry->th = NULL;
1161 /* cancel previous round only */
1162 peer_entry->previous_round = GNUNET_YES;
1164 size_estimate_messages[idx] = *incoming_flood;
1165 size_estimate_messages[idx].hop_count =
1166 htonl (ntohl (incoming_flood->hop_count) + 1);
1168 GNUNET_MAX (ntohl (incoming_flood->hop_count) + 1, hop_count_max);
1169 GNUNET_STATISTICS_set (stats,
1170 "# estimated network diameter",
1171 hop_count_max, GNUNET_NO);
1173 /* have a new, better size estimate, inform clients */
1174 update_network_size_estimate ();
1177 GNUNET_CONTAINER_multihashmap_iterate (peers, &update_flood_times,
1185 * Method called whenever a peer connects.
1187 * @param cls closure
1188 * @param peer peer identity this notification is about
1189 * @param atsi performance data
1190 * @param atsi_count number of records in 'atsi'
1193 handle_core_connect (void *cls, const struct GNUNET_PeerIdentity *peer,
1194 const struct GNUNET_ATS_Information *atsi,
1195 unsigned int atsi_count)
1197 struct NSEPeerEntry *peer_entry;
1200 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer `%s' connected to us\n",
1203 peer_entry = GNUNET_malloc (sizeof (struct NSEPeerEntry));
1204 peer_entry->id = *peer;
1205 GNUNET_assert (GNUNET_OK ==
1206 GNUNET_CONTAINER_multihashmap_put (peers, &peer->hashPubKey,
1208 GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_ONLY));
1209 peer_entry->transmit_task =
1210 GNUNET_SCHEDULER_add_delayed (get_transmit_delay (-1), &transmit_task_cb,
1212 GNUNET_STATISTICS_update (stats, "# peers", 1, GNUNET_NO);
1217 * Method called whenever a peer disconnects.
1219 * @param cls closure
1220 * @param peer peer identity this notification is about
1223 handle_core_disconnect (void *cls, const struct GNUNET_PeerIdentity *peer)
1225 struct NSEPeerEntry *pos;
1228 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer `%s' disconnected from us\n",
1231 pos = GNUNET_CONTAINER_multihashmap_get (peers, &peer->hashPubKey);
1237 GNUNET_assert (GNUNET_YES ==
1238 GNUNET_CONTAINER_multihashmap_remove (peers, &peer->hashPubKey,
1240 if (pos->transmit_task != GNUNET_SCHEDULER_NO_TASK)
1241 GNUNET_SCHEDULER_cancel (pos->transmit_task);
1242 if (pos->th != NULL)
1244 GNUNET_CORE_notify_transmit_ready_cancel (pos->th);
1248 GNUNET_STATISTICS_update (stats, "# peers", -1, GNUNET_NO);
1253 * Task run during shutdown.
1259 shutdown_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
1261 if (flood_task != GNUNET_SCHEDULER_NO_TASK)
1263 GNUNET_SCHEDULER_cancel (flood_task);
1264 flood_task = GNUNET_SCHEDULER_NO_TASK;
1266 if (proof_task != GNUNET_SCHEDULER_NO_TASK)
1268 GNUNET_SCHEDULER_cancel (proof_task);
1269 proof_task = GNUNET_SCHEDULER_NO_TASK;
1270 write_proof (); /* remember progress */
1274 GNUNET_SERVER_notification_context_destroy (nc);
1277 if (coreAPI != NULL)
1279 GNUNET_CORE_disconnect (coreAPI);
1284 GNUNET_STATISTICS_destroy (stats, GNUNET_NO);
1289 GNUNET_CONTAINER_multihashmap_destroy (peers);
1292 if (my_private_key != NULL)
1294 GNUNET_CRYPTO_rsa_key_free (my_private_key);
1295 my_private_key = NULL;
1297 #if ENABLE_HISTOGRAM
1300 GNUNET_BIO_write_close (wh);
1308 * Called on core init/fail.
1310 * @param cls service closure
1311 * @param server handle to the server for this service
1312 * @param identity the public identity of this peer
1315 core_init (void *cls, struct GNUNET_CORE_Handle *server,
1316 const struct GNUNET_PeerIdentity *identity)
1318 struct GNUNET_TIME_Absolute now;
1319 struct GNUNET_TIME_Absolute prev_time;
1323 GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Connection to core FAILED!\n");
1324 GNUNET_SCHEDULER_shutdown ();
1328 memcmp (&my_identity, identity,
1329 sizeof (struct GNUNET_PeerIdentity)));
1330 now = GNUNET_TIME_absolute_get ();
1331 current_timestamp.abs_value =
1332 (now.abs_value / gnunet_nse_interval.rel_value) *
1333 gnunet_nse_interval.rel_value;
1335 GNUNET_TIME_absolute_add (current_timestamp, gnunet_nse_interval);
1336 estimate_index = HISTORY_SIZE - 1;
1338 if (GNUNET_YES == check_proof_of_work (&my_public_key, my_proof))
1340 prev_time.abs_value =
1341 current_timestamp.abs_value - gnunet_nse_interval.rel_value;
1342 setup_flood_message (estimate_index, prev_time);
1346 GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_absolute_get_remaining
1347 (next_timestamp), &update_flood_message,
1353 * Handle network size estimate clients.
1355 * @param cls closure
1356 * @param server the initialized server
1357 * @param c configuration to use
1360 run (void *cls, struct GNUNET_SERVER_Handle *server,
1361 const struct GNUNET_CONFIGURATION_Handle *c)
1366 static const struct GNUNET_SERVER_MessageHandler handlers[] = {
1367 {&handle_start_message, NULL, GNUNET_MESSAGE_TYPE_NSE_START,
1368 sizeof (struct GNUNET_MessageHeader)},
1371 static const struct GNUNET_CORE_MessageHandler core_handlers[] = {
1372 {&handle_p2p_size_estimate, GNUNET_MESSAGE_TYPE_NSE_P2P_FLOOD,
1373 sizeof (struct GNUNET_NSE_FloodMessage)},
1379 GNUNET_CONFIGURATION_get_value_time (cfg, "NSE", "INTERVAL",
1380 &gnunet_nse_interval)) ||
1382 GNUNET_CONFIGURATION_get_value_time (cfg, "NSE", "WORKDELAY",
1383 &proof_find_delay)) ||
1385 GNUNET_CONFIGURATION_get_value_number (cfg, "NSE", "WORKBITS",
1386 &nse_work_required)))
1388 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1390 ("NSE service is lacking key configuration settings. Exiting.\n"));
1391 GNUNET_SCHEDULER_shutdown ();
1394 if (nse_work_required >= sizeof (GNUNET_HashCode) * 8)
1396 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1397 _("Invalid work requirement for NSE service. Exiting.\n"));
1398 GNUNET_SCHEDULER_shutdown ();
1404 GNUNET_CONFIGURATION_get_value_filename (cfg, "GNUNETD", "HOSTKEY",
1407 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1409 ("NSE service is lacking key configuration settings. Exiting.\n"));
1410 GNUNET_SCHEDULER_shutdown ();
1413 my_private_key = GNUNET_CRYPTO_rsa_key_create_from_file (keyfile);
1414 GNUNET_free (keyfile);
1415 if (my_private_key == NULL)
1417 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1418 _("NSE service could not access hostkey. Exiting.\n"));
1419 GNUNET_SCHEDULER_shutdown ();
1422 GNUNET_CRYPTO_rsa_key_get_public (my_private_key, &my_public_key);
1423 GNUNET_CRYPTO_hash (&my_public_key, sizeof (my_public_key),
1424 &my_identity.hashPubKey);
1426 GNUNET_CONFIGURATION_get_value_filename (cfg, "NSE", "PROOFFILE", &proof))
1428 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1430 ("NSE service is lacking key configuration settings. Exiting.\n"));
1431 if (my_private_key != NULL)
1433 GNUNET_CRYPTO_rsa_key_free (my_private_key);
1434 my_private_key = NULL;
1436 GNUNET_SCHEDULER_shutdown ();
1439 if ((GNUNET_YES != GNUNET_DISK_file_test (proof)) ||
1440 (sizeof (my_proof) !=
1441 GNUNET_DISK_fn_read (proof, &my_proof, sizeof (my_proof))))
1443 GNUNET_free (proof);
1445 GNUNET_SCHEDULER_add_with_priority (GNUNET_SCHEDULER_PRIORITY_IDLE,
1448 peers = GNUNET_CONTAINER_multihashmap_create (128);
1449 GNUNET_SERVER_add_handlers (server, handlers);
1450 nc = GNUNET_SERVER_notification_context_create (server, 1);
1451 /* Connect to core service and register core handlers */
1452 coreAPI = GNUNET_CORE_connect (cfg, /* Main configuration */
1453 1, NULL, /* Closure passed to functions */
1454 &core_init, /* Call core_init once connected */
1455 &handle_core_connect, /* Handle connects */
1456 &handle_core_disconnect, /* Handle disconnects */
1457 NULL, /* Don't want notified about all incoming messages */
1458 GNUNET_NO, /* For header only inbound notification */
1459 NULL, /* Don't want notified about all outbound messages */
1460 GNUNET_NO, /* For header only outbound notification */
1461 core_handlers); /* Register these handlers */
1462 GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL, &shutdown_task,
1464 #if ENABLE_HISTOGRAM
1466 GNUNET_CONFIGURATION_get_value_filename (cfg, "NSE", "HISTOGRAM", &proof))
1468 wh = GNUNET_BIO_write_open (proof);
1469 GNUNET_free (proof);
1472 if (coreAPI == NULL)
1474 GNUNET_SCHEDULER_shutdown ();
1477 stats = GNUNET_STATISTICS_create ("nse", cfg);
1482 * The main function for the statistics service.
1484 * @param argc number of arguments from the command line
1485 * @param argv command line arguments
1486 * @return 0 ok, 1 on error
1489 main (int argc, char *const *argv)
1491 return (GNUNET_OK ==
1492 GNUNET_SERVICE_run (argc, argv, "nse", GNUNET_SERVICE_OPTION_NONE,
1493 &run, NULL)) ? 0 : 1;
1496 /* end of gnunet-service-nse.c */