33ec51f03fa9a786a1f944e5293e498fd1f1c1bf
[oweals/gnunet.git] / src / nse / gnunet-service-nse.c
1 /*
2   This file is part of GNUnet.
3   (C) 2009, 2010, 2011 Christian Grothoff (and other contributing authors)
4
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.
9
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.
14
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.
19  */
20
21 /**
22  * @file nse/gnunet-service-nse.c
23  * @brief network size estimation service
24  * @author Nathan Evans
25  * @author Christian Grothoff
26  *
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.
37  */
38 #include "platform.h"
39 #include <math.h>
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"
47 #include "nse.h"
48
49 /**
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.
53  */
54 #define USE_RANDOM_DELAYS GNUNET_YES
55
56 /**
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.
61  */
62 #define ENABLE_HISTOGRAM GNUNET_NO
63
64 /**
65  * Over how many values do we calculate the weighted average?
66  */
67 #define HISTORY_SIZE 64
68
69 /**
70  * Message priority to use.
71  */
72 #define NSE_PRIORITY 5
73
74 #if FREEBSD
75 #define log2(a) (log(a)/log(2))
76 #endif
77
78 /**
79  * Amount of work required (W-bit collisions) for NSE proofs, in collision-bits.
80  */
81 static unsigned long long nse_work_required;
82
83 /**
84  * Interval for sending network size estimation flood requests.
85  */
86 static struct GNUNET_TIME_Relative gnunet_nse_interval;
87
88 /**
89  * Interval between proof find runs.
90  */
91 static struct GNUNET_TIME_Relative proof_find_delay;
92
93 #if ENABLE_HISTOGRAM
94 /**
95  * Handle for writing when we received messages to disk.
96  */
97 static struct GNUNET_BIO_WriteHandle *wh;
98 #endif
99
100
101 /**
102  * Per-peer information.
103  */
104 struct NSEPeerEntry
105 {
106
107   /**
108    * Pending message for this peer.
109    */
110   struct GNUNET_MessageHeader *pending_message;
111
112   /**
113    * Core handle for sending messages to this peer.
114    */
115   struct GNUNET_CORE_TransmitHandle *th;
116
117   /**
118    * What is the identity of the peer?
119    */
120   struct GNUNET_PeerIdentity id;
121
122   /**
123    * Task scheduled to send message to this peer.
124    */
125   GNUNET_SCHEDULER_TaskIdentifier transmit_task;
126
127   /**
128    * Did we receive or send a message about the previous round
129    * to this peer yet?   GNUNET_YES if the previous round has
130    * been taken care of.
131    */
132   int previous_round;
133 };
134
135
136 /**
137  * Network size estimate reply; sent when "this"
138  * peer's timer has run out before receiving a
139  * valid reply from another peer.
140  */
141 struct GNUNET_NSE_FloodMessage
142 {
143   /**
144    * Type: GNUNET_MESSAGE_TYPE_NSE_P2P_FLOOD
145    */
146   struct GNUNET_MessageHeader header;
147
148   /**
149    * Number of hops this message has taken so far.
150    */
151   uint32_t hop_count GNUNET_PACKED;
152
153   /**
154    * Purpose.
155    */
156   struct GNUNET_CRYPTO_RsaSignaturePurpose purpose;
157
158   /**
159    * The current timestamp value (which all
160    * peers should agree on).
161    */
162   struct GNUNET_TIME_AbsoluteNBO timestamp;
163
164   /**
165    * Number of matching bits between the hash
166    * of timestamp and the initiator's public
167    * key.
168    */
169   uint32_t matching_bits GNUNET_PACKED;
170
171   /**
172    * Public key of the originator.
173    */
174   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pkey;
175
176   /**
177    * Proof of work, causing leading zeros when hashed with pkey.
178    */
179   uint64_t proof_of_work GNUNET_PACKED;
180
181   /**
182    * Signature (over range specified in purpose).
183    */
184   struct GNUNET_CRYPTO_RsaSignature signature;
185 };
186
187
188 /**
189  * Handle to our current configuration.
190  */
191 static const struct GNUNET_CONFIGURATION_Handle *cfg;
192
193 /**
194  * Handle to the statistics service.
195  */
196 static struct GNUNET_STATISTICS_Handle *stats;
197
198 /**
199  * Handle to the core service.
200  */
201 static struct GNUNET_CORE_Handle *coreAPI;
202
203 /**
204  * Map of all connected peers.
205  */
206 static struct GNUNET_CONTAINER_MultiHashMap *peers;
207
208 /**
209  * The current network size estimate.  Number of bits matching on
210  * average thus far.
211  */
212 static double current_size_estimate;
213
214 /**
215  * The standard deviation of the last HISTORY_SIZE network
216  * size estimates.
217  */
218 static double current_std_dev = NAN;
219
220 /**
221  * Current hop counter estimate (estimate for network diameter).
222  */
223 static uint32_t hop_count_max;
224
225 /**
226  * Message for the next round, if we got any.
227  */
228 static struct GNUNET_NSE_FloodMessage next_message;
229
230 /**
231  * Array of recent size estimate messages.
232  */
233 static struct GNUNET_NSE_FloodMessage size_estimate_messages[HISTORY_SIZE];
234
235 /**
236  * Index of most recent estimate.
237  */
238 static unsigned int estimate_index;
239
240 /**
241  * Number of valid entries in the history.
242  */
243 static unsigned int estimate_count;
244
245 /**
246  * Task scheduled to update our flood message for the next round.
247  */
248 static GNUNET_SCHEDULER_TaskIdentifier flood_task;
249
250 /**
251  * Task scheduled to compute our proof.
252  */
253 static GNUNET_SCHEDULER_TaskIdentifier proof_task;
254
255 /**
256  * Notification context, simplifies client broadcasts.
257  */
258 static struct GNUNET_SERVER_NotificationContext *nc;
259
260 /**
261  * The next major time.
262  */
263 static struct GNUNET_TIME_Absolute next_timestamp;
264
265 /**
266  * The current major time.
267  */
268 static struct GNUNET_TIME_Absolute current_timestamp;
269
270 /**
271  * The public key of this peer.
272  */
273 static struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded my_public_key;
274
275 /**
276  * The private key of this peer.
277  */
278 static struct GNUNET_CRYPTO_RsaPrivateKey *my_private_key;
279
280 /**
281  * The peer identity of this peer.
282  */
283 static struct GNUNET_PeerIdentity my_identity;
284
285 /**
286  * Proof of work for this peer.
287  */
288 static uint64_t my_proof;
289
290
291 /**
292  * Initialize a message to clients with the current network
293  * size estimate.
294  *
295  * @param em message to fill in
296  */
297 static void
298 setup_estimate_message (struct GNUNET_NSE_ClientMessage *em)
299 {
300   unsigned int i;
301   unsigned int j;
302   double mean;
303   double sum;
304   double std_dev;
305   double variance;
306   double val;
307   double nsize;
308
309   /* Weighted incremental algorithm for stddev according to West (1979) */
310 #if WEST
311   double sumweight;
312   double weight;
313   double q;
314   double r;
315   double temp;
316
317   mean = 0.0;
318   sum = 0.0;
319   sumweight = 0.0;
320   variance = 0.0;
321   for (i = 0; i < estimate_count; i++)
322   {
323     j = (estimate_index - i + HISTORY_SIZE) % HISTORY_SIZE;
324     val = htonl (size_estimate_messages[j].matching_bits);
325     weight = 1.0;              /* was: estimate_count + 1 - i; */
326
327     temp = weight + sumweight;
328     q = val - mean;
329     r = q * weight / temp;
330     mean += r;
331     sum += sumweight * q * r;
332     sumweight = temp;
333   }
334   if (estimate_count > 0)
335     variance = (sum / sumweight) * estimate_count / (estimate_count - 1.0);
336 #else
337   /* trivial version for debugging */
338   double vsq;
339
340   /* non-weighted trivial version */
341   sum = 0.0;
342   vsq = 0.0;
343   variance = 0.0;
344   mean = 0.0;
345
346   for (i = 0; i < estimate_count; i++)
347   {
348     j = (estimate_index - i + HISTORY_SIZE) % HISTORY_SIZE;
349     val = htonl (size_estimate_messages[j].matching_bits);
350     sum += val;
351     vsq += val * val;
352   }
353   if (0 != estimate_count)
354   {
355     mean = sum / estimate_count;
356     variance = (vsq - mean * sum) / (estimate_count - 1.0); // terrible for numerical stability...
357   }
358 #endif
359   GNUNET_assert (variance >= 0);
360   std_dev = sqrt (variance);
361   current_std_dev = std_dev;
362   current_size_estimate = mean;
363
364   em->header.size = htons (sizeof (struct GNUNET_NSE_ClientMessage));
365   em->header.type = htons (GNUNET_MESSAGE_TYPE_NSE_ESTIMATE);
366   em->reserved = htonl (0);
367   em->timestamp = GNUNET_TIME_absolute_hton (GNUNET_TIME_absolute_get ());
368   em->size_estimate = mean - 0.332747;
369   nsize = log2 (GNUNET_CONTAINER_multihashmap_size (peers) + 1);
370   if (em->size_estimate < nsize)
371     em->size_estimate = nsize;
372   em->std_deviation = std_dev;
373   GNUNET_STATISTICS_set (stats, "# nodes in the network (estimate)",
374                          (uint64_t) pow (2, mean - 1.0 / 3.0), GNUNET_NO);
375 }
376
377
378 /**
379  * Handler for START message from client, triggers an
380  * immediate current network estimate notification.
381  * Also, we remember the client for updates upon future
382  * estimate measurements.
383  *
384  * @param cls unused
385  * @param client who sent the message
386  * @param message the message received
387  */
388 static void
389 handle_start_message (void *cls, struct GNUNET_SERVER_Client *client,
390                       const struct GNUNET_MessageHeader *message)
391 {
392   struct GNUNET_NSE_ClientMessage em;
393
394 #if DEBUG_NSE
395   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received START message from client\n");
396 #endif
397   GNUNET_SERVER_notification_context_add (nc, client);
398   setup_estimate_message (&em);
399   GNUNET_SERVER_notification_context_unicast (nc, client, &em.header,
400                                               GNUNET_YES);
401   GNUNET_SERVER_receive_done (client, GNUNET_OK);
402 }
403
404
405 /**
406  * How long should we delay a message to go the given number of
407  * matching bits?
408  *
409  * @param matching_bits number of matching bits to consider
410  */
411 static double
412 get_matching_bits_delay (uint32_t matching_bits)
413 {
414   /* Calculated as: S + f/2 - (f / pi) * (atan(x - p')) */
415   // S is next_timestamp (ignored in return value)
416   // f is frequency (gnunet_nse_interval)
417   // x is matching_bits
418   // p' is current_size_estimate
419   return ((double) gnunet_nse_interval.rel_value / (double) 2.0) -
420       ((gnunet_nse_interval.rel_value / M_PI) *
421        atan (matching_bits - current_size_estimate));
422 }
423
424
425 /**
426  * What delay randomization should we apply for a given number of matching bits?
427  *
428  * @param matching_bits number of matching bits
429  * @return random delay to apply
430  */
431 static struct GNUNET_TIME_Relative
432 get_delay_randomization (uint32_t matching_bits)
433 {
434 #if USE_RANDOM_DELAYS
435   struct GNUNET_TIME_Relative ret;
436   uint32_t i;
437   double d;
438
439   if (matching_bits == 0)
440     return GNUNET_TIME_UNIT_ZERO;
441   d = get_matching_bits_delay (matching_bits - 1);
442   i = (uint32_t) (d / (double) (hop_count_max + 1));
443   ret.rel_value = GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_WEAK, i + 1);
444   return ret;
445 #else
446   return GNUNET_TIME_UNIT_ZERO;
447 #endif
448 }
449
450
451 /**
452  * Get the number of matching bits that the given timestamp has to the given peer ID.
453  *
454  * @param timestamp time to generate key
455  * @param id peer identity to compare with
456  * @return number of matching bits
457  */
458 static uint32_t
459 get_matching_bits (struct GNUNET_TIME_Absolute timestamp,
460                    const struct GNUNET_PeerIdentity *id)
461 {
462   GNUNET_HashCode timestamp_hash;
463
464   GNUNET_CRYPTO_hash (&timestamp.abs_value, sizeof (timestamp.abs_value),
465                       &timestamp_hash);
466   return GNUNET_CRYPTO_hash_matching_bits (&timestamp_hash, &id->hashPubKey);
467 }
468
469
470 /**
471  * Get the transmission delay that should be applied for a
472  * particular round.
473  *
474  * @param round_offset -1 for the previous round (random delay between 0 and 50ms)
475  *                      0 for the current round (based on our proximity to time key)
476  * @return delay that should be applied
477  */
478 static struct GNUNET_TIME_Relative
479 get_transmit_delay (int round_offset)
480 {
481   struct GNUNET_TIME_Relative ret;
482   struct GNUNET_TIME_Absolute tgt;
483   double dist_delay;
484   uint32_t matching_bits;
485
486   switch (round_offset)
487   {
488   case -1:
489     /* previous round is randomized between 0 and 50 ms */
490 #if USE_RANDOM_DELAYS
491     ret.rel_value = GNUNET_CRYPTO_random_u64 (GNUNET_CRYPTO_QUALITY_WEAK, 50);
492 #else
493     ret = GNUNET_TIME_UNIT_ZERO;
494 #endif
495 #if DEBUG_NSE
496     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
497                 "Transmitting previous round behind schedule in %llu ms\n",
498                 (unsigned long long) ret.rel_value);
499 #endif
500     return ret;
501   case 0:
502     /* current round is based on best-known matching_bits */
503     matching_bits =
504         ntohl (size_estimate_messages[estimate_index].matching_bits);
505     dist_delay = get_matching_bits_delay (matching_bits);
506     dist_delay += get_delay_randomization (matching_bits).rel_value;
507     ret.rel_value = (uint64_t) dist_delay;
508 #if DEBUG_NSE
509     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
510                 "For round %llu, delay for %u matching bits is %llu ms\n",
511                 (unsigned long long) current_timestamp.abs_value,
512                 (unsigned int) matching_bits,
513                 (unsigned long long) ret.rel_value);
514 #endif
515     /* now consider round start time and add delay to it */
516     tgt = GNUNET_TIME_absolute_add (current_timestamp, ret);
517     return GNUNET_TIME_absolute_get_remaining (tgt);
518   }
519   GNUNET_break (0);
520   return GNUNET_TIME_UNIT_FOREVER_REL;
521 }
522
523
524 /**
525  * Task that triggers a NSE P2P transmission.
526  *
527  * @param cls the 'struct NSEPeerEntry'
528  * @param tc scheduler context
529  */
530 static void
531 transmit_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
532
533
534 /**
535  * Called when core is ready to send a message we asked for
536  * out to the destination.
537  *
538  * @param cls closure (NULL)
539  * @param size number of bytes available in buf
540  * @param buf where the callee should write the message
541  * @return number of bytes written to buf
542  */
543 static size_t
544 transmit_ready (void *cls, size_t size, void *buf)
545 {
546   struct NSEPeerEntry *peer_entry = cls;
547   unsigned int idx;
548
549   peer_entry->th = NULL;
550   if (buf == NULL)
551   {
552     /* client disconnected */
553     return 0;
554   }
555   GNUNET_assert (size >= sizeof (struct GNUNET_NSE_FloodMessage));
556   idx = estimate_index;
557   if (peer_entry->previous_round == GNUNET_NO)
558   {
559     idx = (idx + HISTORY_SIZE - 1) % HISTORY_SIZE;
560     peer_entry->previous_round = GNUNET_YES;
561     peer_entry->transmit_task =
562         GNUNET_SCHEDULER_add_delayed (get_transmit_delay (0), &transmit_task,
563                                       peer_entry);
564   }
565   if ((ntohl (size_estimate_messages[idx].hop_count) == 0) &&
566       (GNUNET_SCHEDULER_NO_TASK != proof_task))
567   {
568     GNUNET_STATISTICS_update (stats,
569                               "# flood messages not generated (no proof yet)",
570                               1, GNUNET_NO);
571     return 0;
572   }
573 #if DEBUG_NSE
574   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
575               "In round %llu, sending to `%s' estimate with %u bits\n",
576               (unsigned long long)
577               GNUNET_TIME_absolute_ntoh (size_estimate_messages[idx].
578                                          timestamp).abs_value,
579               GNUNET_i2s (&peer_entry->id),
580               (unsigned int) ntohl (size_estimate_messages[idx].matching_bits));
581 #endif
582   if (ntohl (size_estimate_messages[idx].hop_count) == 0)
583     GNUNET_STATISTICS_update (stats, "# flood messages started", 1, GNUNET_NO);
584   GNUNET_STATISTICS_update (stats, "# flood messages transmitted", 1,
585                             GNUNET_NO);
586   memcpy (buf, &size_estimate_messages[idx],
587           sizeof (struct GNUNET_NSE_FloodMessage));
588   GNUNET_STATISTICS_update (stats, "# flood messages sent", 1, GNUNET_NO);
589   return sizeof (struct GNUNET_NSE_FloodMessage);
590 }
591
592
593 /**
594  * Task that triggers a NSE P2P transmission.
595  *
596  * @param cls the 'struct NSEPeerEntry'
597  * @param tc scheduler context
598  */
599 static void
600 transmit_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
601 {
602   struct NSEPeerEntry *peer_entry = cls;
603
604   peer_entry->transmit_task = GNUNET_SCHEDULER_NO_TASK;
605   GNUNET_assert (NULL == peer_entry->th);
606   peer_entry->th =
607       GNUNET_CORE_notify_transmit_ready (coreAPI, GNUNET_NO, NSE_PRIORITY,
608                                          GNUNET_TIME_UNIT_FOREVER_REL,
609                                          &peer_entry->id,
610                                          sizeof (struct
611                                                  GNUNET_NSE_FloodMessage),
612                                          &transmit_ready, peer_entry);
613 }
614
615
616 /**
617  * We've sent on our flood message or one that we received which was
618  * validated and closer than ours.  Update the global list of recent
619  * messages and the average.  Also re-broadcast the message to any
620  * clients.
621  */
622 static void
623 update_network_size_estimate ()
624 {
625   struct GNUNET_NSE_ClientMessage em;
626
627   setup_estimate_message (&em);
628   GNUNET_SERVER_notification_context_broadcast (nc, &em.header, GNUNET_YES);
629 }
630
631
632 /**
633  * Setup a flood message in our history array at the given
634  * slot offset for the given timestamp.
635  *
636  * @param slot index to use
637  * @param ts timestamp to use
638  */
639 static void
640 setup_flood_message (unsigned int slot, struct GNUNET_TIME_Absolute ts)
641 {
642   struct GNUNET_NSE_FloodMessage *fm;
643   uint32_t matching_bits;
644
645   matching_bits = get_matching_bits (ts, &my_identity);
646   fm = &size_estimate_messages[slot];
647   fm->header.size = htons (sizeof (struct GNUNET_NSE_FloodMessage));
648   fm->header.type = htons (GNUNET_MESSAGE_TYPE_NSE_P2P_FLOOD);
649   fm->hop_count = htonl (0);
650   fm->purpose.purpose = htonl (GNUNET_SIGNATURE_PURPOSE_NSE_SEND);
651   fm->purpose.size =
652       htonl (sizeof (struct GNUNET_NSE_FloodMessage) -
653              sizeof (struct GNUNET_MessageHeader) - sizeof (uint32_t) -
654              sizeof (struct GNUNET_CRYPTO_RsaSignature));
655   fm->matching_bits = htonl (matching_bits);
656   fm->timestamp = GNUNET_TIME_absolute_hton (ts);
657   fm->pkey = my_public_key;
658   fm->proof_of_work = my_proof;
659   if (nse_work_required > 0)
660     GNUNET_assert (GNUNET_OK ==
661                    GNUNET_CRYPTO_rsa_sign (my_private_key, &fm->purpose,
662                                            &fm->signature));
663   else
664     memset (&fm->signature, 0, sizeof (fm->signature));
665 }
666
667
668 /**
669  * Schedule transmission for the given peer for the current round based
670  * on what we know about the desired delay.
671  *
672  * @param cls unused
673  * @param key hash of peer identity
674  * @param value the 'struct NSEPeerEntry'
675  * @return GNUNET_OK (continue to iterate)
676  */
677 static int
678 schedule_current_round (void *cls, const GNUNET_HashCode * key, void *value)
679 {
680   struct NSEPeerEntry *peer_entry = value;
681   struct GNUNET_TIME_Relative delay;
682
683   if (peer_entry->th != NULL)
684   {
685     peer_entry->previous_round = GNUNET_NO;
686     return GNUNET_OK;
687   }
688   if (peer_entry->transmit_task != GNUNET_SCHEDULER_NO_TASK)
689   {
690     GNUNET_SCHEDULER_cancel (peer_entry->transmit_task);
691     peer_entry->previous_round = GNUNET_NO;
692   }
693   delay =
694       get_transmit_delay ((peer_entry->previous_round == GNUNET_NO) ? -1 : 0);
695   peer_entry->transmit_task =
696       GNUNET_SCHEDULER_add_delayed (delay, &transmit_task, peer_entry);
697   return GNUNET_OK;
698 }
699
700
701 /**
702  * Update our flood message to be sent (and our timestamps).
703  *
704  * @param cls unused
705  * @param tc context for this message
706  */
707 static void
708 update_flood_message (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
709 {
710   struct GNUNET_TIME_Relative offset;
711   unsigned int i;
712
713   flood_task = GNUNET_SCHEDULER_NO_TASK;
714   offset = GNUNET_TIME_absolute_get_remaining (next_timestamp);
715   if (0 != offset.rel_value)
716   {
717     /* somehow run early, delay more */
718     flood_task =
719         GNUNET_SCHEDULER_add_delayed (offset, &update_flood_message, NULL);
720     return;
721   }
722   current_timestamp = next_timestamp;
723   next_timestamp =
724       GNUNET_TIME_absolute_add (current_timestamp, gnunet_nse_interval);
725   estimate_index = (estimate_index + 1) % HISTORY_SIZE;
726   if (estimate_count < HISTORY_SIZE)
727     estimate_count++;
728   if (next_timestamp.abs_value ==
729       GNUNET_TIME_absolute_ntoh (next_message.timestamp).abs_value)
730   {
731     /* we received a message for this round way early, use it! */
732     size_estimate_messages[estimate_index] = next_message;
733     size_estimate_messages[estimate_index].hop_count =
734         htonl (1 + ntohl (next_message.hop_count));
735   }
736   else
737     setup_flood_message (estimate_index, current_timestamp);
738   next_message.matching_bits = htonl (0);       /* reset for 'next' round */
739   hop_count_max = 0;
740   for (i = 0; i < HISTORY_SIZE; i++)
741     hop_count_max =
742         GNUNET_MAX (ntohl (size_estimate_messages[i].hop_count), hop_count_max);
743   GNUNET_CONTAINER_multihashmap_iterate (peers, &schedule_current_round, NULL);
744   flood_task =
745       GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_absolute_get_remaining
746                                     (next_timestamp), &update_flood_message,
747                                     NULL);
748 }
749
750
751 /**
752  * Count the leading zeroes in hash.
753  *
754  * @param hash
755  * @return the number of leading zero bits.
756  */
757 static unsigned int
758 count_leading_zeroes (const GNUNET_HashCode * hash)
759 {
760   unsigned int hash_count;
761
762   hash_count = 0;
763   while ((0 == GNUNET_CRYPTO_hash_get_bit (hash, hash_count)))
764     hash_count++;
765   return hash_count;
766 }
767
768
769 /**
770  * Check whether the given public key
771  * and integer are a valid proof of work.
772  *
773  * @param pkey the public key
774  * @param val the integer
775  *
776  * @return GNUNET_YES if valid, GNUNET_NO if not
777  */
778 static int
779 check_proof_of_work (const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *pkey,
780                      uint64_t val)
781 {
782   char buf[sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded) +
783            sizeof (val)];
784   GNUNET_HashCode result;
785
786   memcpy (buf, &val, sizeof (val));
787   memcpy (&buf[sizeof (val)], pkey,
788           sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
789   GNUNET_CRYPTO_hash (buf, sizeof (buf), &result);
790   return (count_leading_zeroes (&result) >=
791           nse_work_required) ? GNUNET_YES : GNUNET_NO;
792 }
793
794
795 /**
796  * Write our current proof to disk.
797  */
798 static void
799 write_proof ()
800 {
801   char *proof;
802
803   if (GNUNET_OK !=
804       GNUNET_CONFIGURATION_get_value_filename (cfg, "NSE", "PROOFFILE", &proof))
805     return;
806   if (sizeof (my_proof) !=
807       GNUNET_DISK_fn_write (proof, &my_proof, sizeof (my_proof),
808                             GNUNET_DISK_PERM_USER_READ |
809                             GNUNET_DISK_PERM_USER_WRITE))
810     GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING, "write", proof);
811   GNUNET_free (proof);
812
813 }
814
815
816 /**
817  * Find our proof of work.
818  *
819  * @param cls closure (unused)
820  * @param tc task context
821  */
822 static void
823 find_proof (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
824 {
825 #define ROUND_SIZE 10
826   uint64_t counter;
827   char buf[sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded) +
828            sizeof (uint64_t)];
829   GNUNET_HashCode result;
830   unsigned int i;
831
832   proof_task = GNUNET_SCHEDULER_NO_TASK;
833   memcpy (&buf[sizeof (uint64_t)], &my_public_key,
834           sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
835   i = 0;
836   counter = my_proof;
837   while ((counter != UINT64_MAX) && (i < ROUND_SIZE))
838   {
839     memcpy (buf, &counter, sizeof (uint64_t));
840     GNUNET_CRYPTO_hash (buf, sizeof (buf), &result);
841     if (nse_work_required <= count_leading_zeroes (&result))
842     {
843       my_proof = counter;
844 #if DEBUG_NSE
845       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Proof of work found: %llu!\n",
846                   (unsigned long long) GNUNET_ntohll (counter));
847 #endif
848       for (i = 0; i < HISTORY_SIZE; i++)
849         if (ntohl (size_estimate_messages[i].hop_count) == 0)
850         {
851           size_estimate_messages[i].proof_of_work = my_proof;
852           if (nse_work_required > 0)
853             GNUNET_assert (GNUNET_OK ==
854                            GNUNET_CRYPTO_rsa_sign (my_private_key,
855                                                    &size_estimate_messages
856                                                    [i].purpose,
857                                                    &size_estimate_messages
858                                                    [i].signature));
859           else
860             memset (&size_estimate_messages[i].signature, 0, sizeof (struct GNUNET_CRYPTO_RsaSignature));
861         }
862       write_proof ();
863       return;
864     }
865     counter++;
866     i++;
867   }
868   if (my_proof / (100 * ROUND_SIZE) < counter / (100 * ROUND_SIZE))
869   {
870 #if DEBUG_NSE
871     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Testing proofs currently at %llu\n",
872                 (unsigned long long) counter);
873 #endif
874     /* remember progress every 100 rounds */
875     my_proof = counter;
876     write_proof ();
877   }
878   else
879   {
880     my_proof = counter;
881   }
882   proof_task =
883       GNUNET_SCHEDULER_add_delayed (proof_find_delay, &find_proof, NULL);
884 }
885
886
887 /**
888  * An incoming flood message has been received which claims
889  * to have more bits matching than any we know in this time
890  * period.  Verify the signature and/or proof of work.
891  *
892  * @param incoming_flood the message to verify
893  *
894  * @return GNUNET_YES if the message is verified
895  *         GNUNET_NO if the key/signature don't verify
896  */
897 static int
898 verify_message_crypto (const struct GNUNET_NSE_FloodMessage *incoming_flood)
899 {
900   if (GNUNET_YES !=
901       check_proof_of_work (&incoming_flood->pkey,
902                            incoming_flood->proof_of_work))
903   {
904     GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Proof of work invalid: %llu!\n"),
905                 (unsigned long long)
906                 GNUNET_ntohll (incoming_flood->proof_of_work));
907     GNUNET_break_op (0);
908     return GNUNET_NO;
909   }
910   if ( (nse_work_required > 0) &&
911        (GNUNET_OK !=
912         GNUNET_CRYPTO_rsa_verify (GNUNET_SIGNATURE_PURPOSE_NSE_SEND,
913                                   &incoming_flood->purpose,
914                                   &incoming_flood->signature,
915                                   &incoming_flood->pkey)) )
916   {
917     GNUNET_break_op (0);
918     return GNUNET_NO;
919   }
920   return GNUNET_YES;
921 }
922
923
924 /**
925  * Update transmissions for the given peer for the current round based
926  * on updated proximity information.
927  *
928  * @param cls peer entry to exclude from updates
929  * @param key hash of peer identity
930  * @param value the 'struct NSEPeerEntry'
931  * @return GNUNET_OK (continue to iterate)
932  */
933 static int
934 update_flood_times (void *cls, const GNUNET_HashCode * key, void *value)
935 {
936   struct NSEPeerEntry *exclude = cls;
937   struct NSEPeerEntry *peer_entry = value;
938   struct GNUNET_TIME_Relative delay;
939
940   if (peer_entry->th != NULL)
941     return GNUNET_OK;           /* already active */
942   if (peer_entry == exclude)
943     return GNUNET_OK;           /* trigger of the update */
944   if (peer_entry->previous_round == GNUNET_NO)
945   {
946     /* still stuck in previous round, no point to update, check that
947      * we are active here though... */
948     GNUNET_break ((peer_entry->transmit_task != GNUNET_SCHEDULER_NO_TASK) ||
949                   (peer_entry->th != NULL));
950     return GNUNET_OK;
951   }
952   if (peer_entry->transmit_task != GNUNET_SCHEDULER_NO_TASK)
953   {
954     GNUNET_SCHEDULER_cancel (peer_entry->transmit_task);
955     peer_entry->transmit_task = GNUNET_SCHEDULER_NO_TASK;
956   }
957   delay = get_transmit_delay (0);
958   peer_entry->transmit_task =
959       GNUNET_SCHEDULER_add_delayed (delay, &transmit_task, peer_entry);
960   return GNUNET_OK;
961 }
962
963
964 /**
965  * Core handler for size estimate flooding messages.
966  *
967  * @param cls closure unused
968  * @param message message
969  * @param peer peer identity this message is from (ignored)
970  * @param atsi performance data (ignored)
971  * @param atsi_count number of records in 'atsi'
972  */
973 static int
974 handle_p2p_size_estimate (void *cls, const struct GNUNET_PeerIdentity *peer,
975                           const struct GNUNET_MessageHeader *message,
976                           const struct GNUNET_ATS_Information *atsi,
977                           unsigned int atsi_count)
978 {
979   const struct GNUNET_NSE_FloodMessage *incoming_flood;
980   struct GNUNET_TIME_Absolute ts;
981   struct NSEPeerEntry *peer_entry;
982   uint32_t matching_bits;
983   unsigned int idx;
984
985 #if ENABLE_HISTOGRAM
986   if (NULL != wh)
987     GNUNET_BIO_write_int64 (wh, GNUNET_TIME_absolute_get ().abs_value);
988 #endif
989   incoming_flood = (const struct GNUNET_NSE_FloodMessage *) message;
990   GNUNET_STATISTICS_update (stats, "# flood messages received", 1, GNUNET_NO);
991   matching_bits = ntohl (incoming_flood->matching_bits);
992 #if DEBUG_NSE
993   {
994     char origin[5];
995     char pred[5];
996     struct GNUNET_PeerIdentity os;
997
998     GNUNET_CRYPTO_hash (&incoming_flood->pkey,
999                         sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded),
1000                         &os.hashPubKey);
1001     GNUNET_snprintf (origin, sizeof (origin), "%s", GNUNET_i2s (&os));
1002     GNUNET_snprintf (pred, sizeof (pred), "%s", GNUNET_i2s (peer));
1003     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1004                 "Flood at %llu from `%s' via `%s' at `%s' with bits %u\n",
1005                 (unsigned long long)
1006                 GNUNET_TIME_absolute_ntoh (incoming_flood->timestamp).abs_value,
1007                 origin, pred, GNUNET_i2s (&my_identity),
1008                 (unsigned int) matching_bits);
1009   }
1010 #endif
1011
1012   peer_entry = GNUNET_CONTAINER_multihashmap_get (peers, &peer->hashPubKey);
1013   if (NULL == peer_entry)
1014   {
1015     GNUNET_break (0);
1016     return GNUNET_OK;
1017   }
1018
1019   ts = GNUNET_TIME_absolute_ntoh (incoming_flood->timestamp);
1020
1021   if (ts.abs_value == current_timestamp.abs_value)
1022     idx = estimate_index;
1023   else if (ts.abs_value ==
1024            current_timestamp.abs_value - gnunet_nse_interval.rel_value)
1025     idx = (estimate_index + HISTORY_SIZE - 1) % HISTORY_SIZE;
1026   else if (ts.abs_value ==
1027            next_timestamp.abs_value - gnunet_nse_interval.rel_value)
1028   {
1029     if (matching_bits <= ntohl (next_message.matching_bits))
1030       return GNUNET_OK;         /* ignore, simply too early/late */
1031     if (GNUNET_YES != verify_message_crypto (incoming_flood))
1032     {
1033       GNUNET_break_op (0);
1034       return GNUNET_OK;
1035     }
1036     next_message = *incoming_flood;
1037     return GNUNET_OK;
1038   }
1039   else
1040   {
1041     GNUNET_STATISTICS_update (stats,
1042                               "# flood messages discarded (clock skew too large)",
1043                               1, GNUNET_NO);
1044     return GNUNET_OK;
1045   }
1046   if (0 == (memcmp (peer, &my_identity, sizeof (struct GNUNET_PeerIdentity))))
1047   {
1048     /* send to self, update our own estimate IF this also comes from us! */
1049     if (0 ==
1050         memcmp (&incoming_flood->pkey, &my_public_key, sizeof (my_public_key)))
1051       update_network_size_estimate ();
1052     return GNUNET_OK;
1053   }
1054   if (matching_bits >= ntohl (size_estimate_messages[idx].matching_bits))
1055   {
1056     /* cancel transmission from us to this peer for this round */
1057     if (idx == estimate_index)
1058     {
1059       if (peer_entry->previous_round == GNUNET_YES)
1060       {
1061         /* cancel any activity for current round */
1062         if (peer_entry->transmit_task != GNUNET_SCHEDULER_NO_TASK)
1063         {
1064           GNUNET_SCHEDULER_cancel (peer_entry->transmit_task);
1065           peer_entry->transmit_task = GNUNET_SCHEDULER_NO_TASK;
1066         }
1067         if (peer_entry->th != NULL)
1068         {
1069           GNUNET_CORE_notify_transmit_ready_cancel (peer_entry->th);
1070           peer_entry->th = NULL;
1071         }
1072       }
1073     }
1074     else
1075     {
1076       /* cancel previous round only */
1077       peer_entry->previous_round = GNUNET_YES;
1078     }
1079   }
1080   if (matching_bits == ntohl (size_estimate_messages[idx].matching_bits))
1081     return GNUNET_OK;
1082   if (matching_bits <= ntohl (size_estimate_messages[idx].matching_bits))
1083   {
1084     if ((idx < estimate_index) && (peer_entry->previous_round == GNUNET_YES))
1085       peer_entry->previous_round = GNUNET_NO;
1086     /* push back our result now, that peer is spreading bad information... */
1087     if (NULL == peer_entry->th)
1088     {
1089       if (peer_entry->transmit_task != GNUNET_SCHEDULER_NO_TASK)
1090         GNUNET_SCHEDULER_cancel (peer_entry->transmit_task);
1091       peer_entry->transmit_task =
1092           GNUNET_SCHEDULER_add_now (&transmit_task, peer_entry);
1093     }
1094     /* Not closer than our most recent message, no need to do work here */
1095     GNUNET_STATISTICS_update (stats,
1096                               "# flood messages ignored (had closer already)",
1097                               1, GNUNET_NO);
1098     return GNUNET_OK;
1099   }
1100   if (GNUNET_YES != verify_message_crypto (incoming_flood))
1101   {
1102     GNUNET_break_op (0);
1103     return GNUNET_OK;
1104   }
1105   size_estimate_messages[idx] = *incoming_flood;
1106   size_estimate_messages[idx].hop_count =
1107       htonl (ntohl (incoming_flood->hop_count) + 1);
1108   hop_count_max =
1109       GNUNET_MAX (ntohl (incoming_flood->hop_count) + 1, hop_count_max);
1110
1111   /* have a new, better size estimate, inform clients */
1112   update_network_size_estimate ();
1113
1114   /* flood to rest */
1115   GNUNET_CONTAINER_multihashmap_iterate (peers, &update_flood_times,
1116                                          peer_entry);
1117   return GNUNET_OK;
1118 }
1119
1120
1121
1122 /**
1123  * Method called whenever a peer connects.
1124  *
1125  * @param cls closure
1126  * @param peer peer identity this notification is about
1127  * @param atsi performance data
1128  * @param atsi_count number of records in 'atsi'
1129  */
1130 static void
1131 handle_core_connect (void *cls, const struct GNUNET_PeerIdentity *peer,
1132                      const struct GNUNET_ATS_Information *atsi,
1133                      unsigned int atsi_count)
1134 {
1135   struct NSEPeerEntry *peer_entry;
1136
1137 #if DEBUG_NSE
1138   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer `%s' connected to us\n",
1139               GNUNET_i2s (peer));
1140 #endif
1141   peer_entry = GNUNET_malloc (sizeof (struct NSEPeerEntry));
1142   peer_entry->id = *peer;
1143   GNUNET_assert (GNUNET_OK ==
1144                  GNUNET_CONTAINER_multihashmap_put (peers, &peer->hashPubKey, peer_entry,
1145                                                     GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_ONLY));
1146   peer_entry->transmit_task =
1147       GNUNET_SCHEDULER_add_delayed (get_transmit_delay (-1), &transmit_task,
1148                                     peer_entry);
1149 }
1150
1151
1152 /**
1153  * Method called whenever a peer disconnects.
1154  *
1155  * @param cls closure
1156  * @param peer peer identity this notification is about
1157  */
1158 static void
1159 handle_core_disconnect (void *cls, const struct GNUNET_PeerIdentity *peer)
1160 {
1161   struct NSEPeerEntry *pos;
1162
1163 #if DEBUG_NSE
1164   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer `%s' disconnected from us\n",
1165               GNUNET_i2s (peer));
1166 #endif
1167   pos = GNUNET_CONTAINER_multihashmap_get (peers, &peer->hashPubKey);
1168   if (NULL == pos)
1169   {
1170     GNUNET_break (0);
1171     return;
1172   }
1173   GNUNET_assert (GNUNET_YES ==
1174                  GNUNET_CONTAINER_multihashmap_remove (peers, &peer->hashPubKey,
1175                                                        pos));
1176   if (pos->transmit_task != GNUNET_SCHEDULER_NO_TASK)
1177     GNUNET_SCHEDULER_cancel (pos->transmit_task);
1178   if (pos->th != NULL)
1179   {
1180     GNUNET_CORE_notify_transmit_ready_cancel (pos->th);
1181     pos->th = NULL;
1182   }
1183   GNUNET_free (pos);
1184 }
1185
1186
1187 /**
1188  * Task run during shutdown.
1189  *
1190  * @param cls unused
1191  * @param tc unused
1192  */
1193 static void
1194 shutdown_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
1195 {
1196   if (flood_task != GNUNET_SCHEDULER_NO_TASK)
1197   {
1198     GNUNET_SCHEDULER_cancel (flood_task);
1199     flood_task = GNUNET_SCHEDULER_NO_TASK;
1200   }
1201   if (proof_task != GNUNET_SCHEDULER_NO_TASK)
1202   {
1203     GNUNET_SCHEDULER_cancel (proof_task);
1204     proof_task = GNUNET_SCHEDULER_NO_TASK;
1205     write_proof ();             /* remember progress */
1206   }
1207   if (nc != NULL)
1208   {
1209     GNUNET_SERVER_notification_context_destroy (nc);
1210     nc = NULL;
1211   }
1212   if (coreAPI != NULL)
1213   {
1214     GNUNET_CORE_disconnect (coreAPI);
1215     coreAPI = NULL;
1216   }
1217   if (stats != NULL)
1218   {
1219     GNUNET_STATISTICS_destroy (stats, GNUNET_NO);
1220     stats = NULL;
1221   }
1222   if (peers != NULL)
1223   {
1224     GNUNET_CONTAINER_multihashmap_destroy (peers);
1225     peers = NULL;
1226   }
1227   if (my_private_key != NULL)
1228   {
1229     GNUNET_CRYPTO_rsa_key_free (my_private_key);
1230     my_private_key = NULL;
1231   }
1232 #if ENABLE_HISTOGRAM
1233   if (wh != NULL)
1234   {
1235     GNUNET_BIO_write_close (wh);
1236     wh = NULL;
1237   }
1238 #endif
1239 }
1240
1241
1242 /**
1243  * Called on core init/fail.
1244  *
1245  * @param cls service closure
1246  * @param server handle to the server for this service
1247  * @param identity the public identity of this peer
1248  */
1249 static void
1250 core_init (void *cls, struct GNUNET_CORE_Handle *server,
1251            const struct GNUNET_PeerIdentity *identity)
1252 {
1253   struct GNUNET_TIME_Absolute now;
1254   struct GNUNET_TIME_Absolute prev_time;
1255   unsigned int i;
1256
1257   if (server == NULL)
1258   {
1259 #if DEBUG_NSE
1260     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Connection to core FAILED!\n");
1261 #endif
1262     GNUNET_SCHEDULER_shutdown ();
1263     return;
1264   }
1265   GNUNET_assert (0 ==
1266                  memcmp (&my_identity, identity,
1267                          sizeof (struct GNUNET_PeerIdentity)));
1268   now = GNUNET_TIME_absolute_get ();
1269   current_timestamp.abs_value =
1270       (now.abs_value / gnunet_nse_interval.rel_value) *
1271       gnunet_nse_interval.rel_value;
1272   next_timestamp.abs_value =
1273       current_timestamp.abs_value + gnunet_nse_interval.rel_value;
1274
1275   for (i = 0; i < HISTORY_SIZE; i++)
1276   {
1277     prev_time.abs_value =
1278         current_timestamp.abs_value - (HISTORY_SIZE - i -
1279                                        1) * gnunet_nse_interval.rel_value;
1280     setup_flood_message (i, prev_time);
1281   }
1282   estimate_index = HISTORY_SIZE - 1;
1283   estimate_count = 2;
1284   flood_task =
1285       GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_absolute_get_remaining
1286                                     (next_timestamp), &update_flood_message,
1287                                     NULL);
1288 }
1289
1290
1291 /**
1292  * Handle network size estimate clients.
1293  *
1294  * @param cls closure
1295  * @param server the initialized server
1296  * @param c configuration to use
1297  */
1298 static void
1299 run (void *cls, struct GNUNET_SERVER_Handle *server,
1300      const struct GNUNET_CONFIGURATION_Handle *c)
1301 {
1302   char *keyfile;
1303   char *proof;
1304
1305   static const struct GNUNET_SERVER_MessageHandler handlers[] = {
1306     {&handle_start_message, NULL, GNUNET_MESSAGE_TYPE_NSE_START,
1307      sizeof (struct GNUNET_MessageHeader)},
1308     {NULL, NULL, 0, 0}
1309   };
1310   static const struct GNUNET_CORE_MessageHandler core_handlers[] = {
1311     {&handle_p2p_size_estimate, GNUNET_MESSAGE_TYPE_NSE_P2P_FLOOD,
1312      sizeof (struct GNUNET_NSE_FloodMessage)},
1313     {NULL, 0, 0}
1314   };
1315   cfg = c;
1316
1317   if ((GNUNET_OK !=
1318        GNUNET_CONFIGURATION_get_value_time (cfg, "NSE", "INTERVAL",
1319                                             &gnunet_nse_interval)) ||
1320       (GNUNET_OK !=
1321        GNUNET_CONFIGURATION_get_value_time (cfg, "NSE", "WORKDELAY",
1322                                             &proof_find_delay)) ||
1323       (GNUNET_OK !=
1324        GNUNET_CONFIGURATION_get_value_number (cfg, "NSE", "WORKBITS",
1325                                               &nse_work_required)))
1326   {
1327     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1328                 _
1329                 ("NSE service is lacking key configuration settings.  Exiting.\n"));
1330     GNUNET_SCHEDULER_shutdown ();
1331     return;
1332   }
1333   if (nse_work_required >= sizeof (GNUNET_HashCode) * 8)
1334   {
1335     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1336                 _("Invalid work requirement for NSE service. Exiting.\n"));
1337     GNUNET_SCHEDULER_shutdown ();
1338     return;
1339   }
1340
1341
1342   if (GNUNET_OK !=
1343       GNUNET_CONFIGURATION_get_value_filename (cfg, "GNUNETD", "HOSTKEY",
1344                                                &keyfile))
1345   {
1346     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1347                 _
1348                 ("NSE service is lacking key configuration settings.  Exiting.\n"));
1349     GNUNET_SCHEDULER_shutdown ();
1350     return;
1351   }
1352   my_private_key = GNUNET_CRYPTO_rsa_key_create_from_file (keyfile);
1353   GNUNET_free (keyfile);
1354   if (my_private_key == NULL)
1355   {
1356     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1357                 _("NSE service could not access hostkey.  Exiting.\n"));
1358     GNUNET_SCHEDULER_shutdown ();
1359     return;
1360   }
1361   GNUNET_CRYPTO_rsa_key_get_public (my_private_key, &my_public_key);
1362   GNUNET_CRYPTO_hash (&my_public_key, sizeof (my_public_key),
1363                       &my_identity.hashPubKey);
1364   if (GNUNET_OK !=
1365       GNUNET_CONFIGURATION_get_value_filename (cfg, "NSE", "PROOFFILE", &proof))
1366   {
1367     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1368                 _
1369                 ("NSE service is lacking key configuration settings.  Exiting.\n"));
1370     if (my_private_key != NULL)
1371     {
1372       GNUNET_CRYPTO_rsa_key_free (my_private_key);
1373       my_private_key = NULL;
1374     }
1375     GNUNET_SCHEDULER_shutdown ();
1376     return;
1377   }
1378   if ((GNUNET_YES != GNUNET_DISK_file_test (proof)) ||
1379       (sizeof (my_proof) !=
1380        GNUNET_DISK_fn_read (proof, &my_proof, sizeof (my_proof))))
1381     my_proof = 0;
1382   GNUNET_free (proof);
1383   proof_task =
1384       GNUNET_SCHEDULER_add_with_priority (GNUNET_SCHEDULER_PRIORITY_IDLE,
1385                                           &find_proof, NULL);
1386
1387   peers = GNUNET_CONTAINER_multihashmap_create (128);
1388   GNUNET_SERVER_add_handlers (server, handlers);
1389   nc = GNUNET_SERVER_notification_context_create (server, 1);
1390   /* Connect to core service and register core handlers */
1391   coreAPI = GNUNET_CORE_connect (cfg,   /* Main configuration */
1392                                  1,
1393                                  NULL,  /* Closure passed to functions */
1394                                  &core_init,    /* Call core_init once connected */
1395                                  &handle_core_connect,  /* Handle connects */
1396                                  &handle_core_disconnect,       /* Handle disconnects */
1397                                  NULL,  /* Don't want notified about all incoming messages */
1398                                  GNUNET_NO,     /* For header only inbound notification */
1399                                  NULL,  /* Don't want notified about all outbound messages */
1400                                  GNUNET_NO,     /* For header only outbound notification */
1401                                  core_handlers);        /* Register these handlers */
1402   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL, &shutdown_task,
1403                                 NULL);
1404 #if ENABLE_HISTOGRAM
1405   if (GNUNET_OK ==
1406       GNUNET_CONFIGURATION_get_value_filename (cfg, "NSE", "HISTOGRAM", &proof))
1407   {
1408     wh = GNUNET_BIO_write_open (proof);
1409     GNUNET_free (proof);
1410   }
1411 #endif
1412   if (coreAPI == NULL)
1413   {
1414     GNUNET_SCHEDULER_shutdown ();
1415     return;
1416   }
1417   stats = GNUNET_STATISTICS_create ("nse", cfg);
1418 }
1419
1420
1421 /**
1422  * The main function for the statistics service.
1423  *
1424  * @param argc number of arguments from the command line
1425  * @param argv command line arguments
1426  * @return 0 ok, 1 on error
1427  */
1428 int
1429 main (int argc, char *const *argv)
1430 {
1431   return (GNUNET_OK ==
1432           GNUNET_SERVICE_run (argc, argv, "nse", GNUNET_SERVICE_OPTION_NONE,
1433                               &run, NULL)) ? 0 : 1;
1434 }
1435
1436 /* end of gnunet-service-nse.c */