Refactoring gnunet time
[oweals/gnunet.git] / src / peerinfo / gnunet-service-peerinfo.c
1 /*
2      This file is part of GNUnet.
3      (C) 2001, 2002, 2004, 2005, 2007, 2009, 2010 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 peerinfo/gnunet-service-peerinfo.c
23  * @brief maintains list of known peers
24  *
25  * Code to maintain the list of currently known hosts (in memory
26  * structure of data/hosts/).
27  *
28  * @author Christian Grothoff
29  *
30  * TODO:
31  * - HostEntries are never 'free'd (add expiration, upper bound?)
32  */
33
34 #include "platform.h"
35 #include "gnunet_crypto_lib.h"
36 #include "gnunet_container_lib.h"
37 #include "gnunet_disk_lib.h"
38 #include "gnunet_hello_lib.h"
39 #include "gnunet_protocols.h"
40 #include "gnunet_service_lib.h"
41 #include "gnunet_statistics_service.h"
42 #include "peerinfo.h"
43
44 /**
45  * How often do we scan the HOST_DIR for new entries?
46  */
47 #define DATA_HOST_FREQ GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MINUTES, 15)
48
49 /**
50  * How often do we discard old entries in data/hosts/?
51  */
52 #define DATA_HOST_CLEAN_FREQ GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MINUTES, 60)
53
54 /**
55  * In-memory cache of known hosts.
56  */
57 struct HostEntry
58 {
59
60   /**
61    * Identity of the peer.
62    */
63   struct GNUNET_PeerIdentity identity;
64
65   /**
66    * Hello for the peer (can be NULL)
67    */
68   struct GNUNET_HELLO_Message *hello;
69
70 };
71
72
73 /**
74  * The in-memory list of known hosts, mapping of
75  * host IDs to 'struct HostEntry*' values.
76  */
77 static struct GNUNET_CONTAINER_MultiHashMap *hostmap;
78
79 /**
80  * Clients to immediately notify about all changes.
81  */
82 static struct GNUNET_SERVER_NotificationContext *notify_list;
83
84 /**
85  * Directory where the hellos are stored in (data/hosts)
86  */
87 static char *networkIdDirectory;
88
89 /**
90  * Handle for reporting statistics.
91  */
92 static struct GNUNET_STATISTICS_Handle *stats;
93
94
95 /**
96  * Notify all clients in the notify list about the
97  * given host entry changing.
98  */
99 static struct InfoMessage *
100 make_info_message (const struct HostEntry *he)
101 {
102   struct InfoMessage *im;
103   size_t hs;
104
105   hs = (he->hello == NULL) ? 0 : GNUNET_HELLO_size (he->hello);
106   im = GNUNET_malloc (sizeof (struct InfoMessage) + hs);
107   im->header.size = htons (hs + sizeof (struct InfoMessage));
108   im->header.type = htons (GNUNET_MESSAGE_TYPE_PEERINFO_INFO);
109   im->peer = he->identity;
110   if (he->hello != NULL)
111     memcpy (&im[1], he->hello, hs);
112   return im;
113 }
114
115
116 /**
117  * Address iterator that causes expired entries to be discarded.
118  *
119  * @param cls pointer to the current time
120  * @param tname name of the transport
121  * @param expiration expiration time for the address
122  * @param addr the address
123  * @param addrlen length of addr in bytes
124  * @return GNUNET_NO if expiration smaller than the current time
125  */
126 static int
127 discard_expired (void *cls,
128                  const char *tname,
129                  struct GNUNET_TIME_Absolute expiration,
130                  const void *addr, uint16_t addrlen)
131 {
132   const struct GNUNET_TIME_Absolute *now = cls;
133   if (now->value > expiration.value)
134     {
135       GNUNET_log (GNUNET_ERROR_TYPE_INFO,
136                   _("Removing expired address of transport `%s'\n"),
137                   tname);
138       return GNUNET_NO;
139     }
140   return GNUNET_OK;
141 }
142
143
144 /**
145  * Get the filename under which we would store the GNUNET_HELLO_Message
146  * for the given host and protocol.
147  * @return filename of the form DIRECTORY/HOSTID
148  */
149 static char *
150 get_host_filename (const struct GNUNET_PeerIdentity *id)
151 {
152   struct GNUNET_CRYPTO_HashAsciiEncoded fil;
153   char *fn;
154
155   GNUNET_CRYPTO_hash_to_enc (&id->hashPubKey, &fil);
156   GNUNET_asprintf (&fn,
157                    "%s%s%s", networkIdDirectory, DIR_SEPARATOR_STR, &fil);
158   return fn;
159 }
160
161
162 /**
163  * Broadcast information about the given entry to all 
164  * clients that care.
165  *
166  * @param entry entry to broadcast about
167  */
168 static void
169 notify_all (struct HostEntry *entry)
170 {
171   struct InfoMessage *msg;
172
173   msg = make_info_message (entry);
174   GNUNET_SERVER_notification_context_broadcast (notify_list,
175                                                 &msg->header,
176                                                 GNUNET_NO);
177   GNUNET_free (msg);
178 }
179
180
181 /**
182  * Add a host to the list.
183  *
184  * @param identity the identity of the host
185  */
186 static void
187 add_host_to_known_hosts (const struct GNUNET_PeerIdentity *identity)
188 {
189   struct HostEntry *entry;
190   char buffer[GNUNET_SERVER_MAX_MESSAGE_SIZE - 1];
191   const struct GNUNET_HELLO_Message *hello;
192   struct GNUNET_HELLO_Message *hello_clean;
193   int size;
194   struct GNUNET_TIME_Absolute now;
195   char *fn;
196
197   entry = GNUNET_CONTAINER_multihashmap_get (hostmap,
198                                              &identity->hashPubKey);
199   if (entry != NULL)
200     return;
201   GNUNET_STATISTICS_update (stats,
202                             gettext_noop ("# peers known"),
203                             1,
204                             GNUNET_NO);
205   entry = GNUNET_malloc (sizeof (struct HostEntry));
206   entry->identity = *identity;
207
208   fn = get_host_filename (identity);
209   if (GNUNET_DISK_file_test (fn) == GNUNET_YES)
210     {
211       size = GNUNET_DISK_fn_read (fn, buffer, sizeof (buffer));
212       hello = (const struct GNUNET_HELLO_Message *) buffer;
213       if ( (size < sizeof (struct GNUNET_MessageHeader)) ||
214            (size != ntohs((((const struct GNUNET_MessageHeader*) hello)->size))) ||
215            (size != GNUNET_HELLO_size (hello)) )
216         {
217           GNUNET_break (0);
218           if (0 != UNLINK (fn))
219             GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING,
220                                       "unlink",
221                                       fn);
222         }
223       else
224         {
225           now = GNUNET_TIME_absolute_get ();
226           hello_clean = GNUNET_HELLO_iterate_addresses (hello,
227                                                         GNUNET_YES,
228                                                         &discard_expired, &now);
229           entry->hello = hello_clean;
230         }
231     }
232   GNUNET_free (fn);
233   GNUNET_CONTAINER_multihashmap_put (hostmap,
234                                      &identity->hashPubKey,
235                                      entry,
236                                      GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_ONLY);
237   notify_all (entry);
238 }
239
240
241 /**
242  * Remove a file that should not be there.  LOG
243  * success or failure.
244  */
245 static void
246 remove_garbage (const char *fullname)
247 {
248   if (0 == UNLINK (fullname))
249     GNUNET_log (GNUNET_ERROR_TYPE_WARNING | GNUNET_ERROR_TYPE_BULK,
250                 _
251                 ("File `%s' in directory `%s' does not match naming convention. "
252                  "Removed.\n"), fullname, networkIdDirectory);
253   else
254     GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR |
255                               GNUNET_ERROR_TYPE_BULK, "unlink", fullname);
256 }
257
258
259 static int
260 hosts_directory_scan_callback (void *cls,
261                                const char *fullname)
262 {
263   unsigned int *matched = cls;
264   struct GNUNET_PeerIdentity identity;
265   const char *filename;
266
267   if (GNUNET_DISK_file_test (fullname) != GNUNET_YES)
268     return GNUNET_OK;           /* ignore non-files */
269   if (strlen (fullname) < sizeof (struct GNUNET_CRYPTO_HashAsciiEncoded))
270     {
271       remove_garbage (fullname);
272       return GNUNET_OK;
273     }
274   filename =
275     &fullname[strlen (fullname) -
276               sizeof (struct GNUNET_CRYPTO_HashAsciiEncoded) + 1];
277   if (filename[-1] != DIR_SEPARATOR)
278     {
279       remove_garbage (fullname);
280       return GNUNET_OK;
281     }
282   if (GNUNET_OK != GNUNET_CRYPTO_hash_from_string (filename,
283                                                    &identity.hashPubKey))
284     {
285       remove_garbage (fullname);
286       return GNUNET_OK;
287     }
288   (*matched)++;
289   add_host_to_known_hosts (&identity);
290   return GNUNET_OK;
291 }
292
293
294 /**
295  * Call this method periodically to scan data/hosts for new hosts.
296  */
297 static void
298 cron_scan_directory_data_hosts (void *cls,
299                                 const struct GNUNET_SCHEDULER_TaskContext *tc)
300 {
301   static unsigned int retries;
302   unsigned int count;
303
304   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
305     return;
306   count = 0;
307   GNUNET_DISK_directory_create (networkIdDirectory);
308   GNUNET_DISK_directory_scan (networkIdDirectory,
309                               &hosts_directory_scan_callback, &count);
310   if ((0 == count) && (0 == (++retries & 31)))
311     GNUNET_log (GNUNET_ERROR_TYPE_WARNING |
312                 GNUNET_ERROR_TYPE_BULK,
313                 _("Still no peers found in `%s'!\n"), networkIdDirectory);
314   GNUNET_SCHEDULER_add_delayed (tc->sched,
315                                 DATA_HOST_FREQ,
316                                 &cron_scan_directory_data_hosts, NULL);
317 }
318
319
320 /**
321  * Bind a host address (hello) to a hostId.
322  *
323  * @param peer the peer for which this is a hello
324  * @param hello the verified (!) hello message
325  */
326 static void
327 bind_address (const struct GNUNET_PeerIdentity *peer,
328               const struct GNUNET_HELLO_Message *hello)
329 {
330   char *fn;
331   struct HostEntry *host;
332   struct GNUNET_HELLO_Message *mrg;
333   struct GNUNET_TIME_Absolute delta;
334
335   add_host_to_known_hosts (peer);
336   host = GNUNET_CONTAINER_multihashmap_get (hostmap,
337                                             &peer->hashPubKey);
338   GNUNET_assert (host != NULL);
339   if (host->hello == NULL)
340     {
341       host->hello = GNUNET_malloc (GNUNET_HELLO_size (hello));
342       memcpy (host->hello, hello, GNUNET_HELLO_size (hello));
343     }
344   else
345     {
346       mrg = GNUNET_HELLO_merge (host->hello, hello);
347       delta = GNUNET_HELLO_equals (mrg,
348                                    host->hello,
349                                    GNUNET_TIME_absolute_get ());
350       if (delta.value == GNUNET_TIME_UNIT_FOREVER_ABS.value)
351         {
352           GNUNET_free (mrg);
353           return;
354         }
355       GNUNET_free (host->hello);
356       host->hello = mrg;
357     }
358   fn = get_host_filename (peer);
359   GNUNET_DISK_directory_create_for_file (fn);
360   GNUNET_DISK_fn_write (fn, 
361                         host->hello, 
362                         GNUNET_HELLO_size (host->hello),
363                         GNUNET_DISK_PERM_USER_READ | GNUNET_DISK_PERM_USER_WRITE
364                         | GNUNET_DISK_PERM_GROUP_READ | GNUNET_DISK_PERM_OTHER_READ);
365   GNUNET_free (fn);
366   notify_all (host);
367 }
368
369
370
371 /**
372  * Do transmit info about peer to given host.
373  *
374  * @param cls NULL to hit all hosts, otherwise specifies a particular target
375  * @param key hostID
376  * @param value information to transmit
377  * @return GNUNET_YES (continue to iterate)
378  */
379 static int
380 add_to_tc (void *cls,
381            const GNUNET_HashCode *key,
382            void *value)
383 {
384   struct GNUNET_SERVER_TransmitContext *tc = cls;
385   struct HostEntry *pos = value;
386   struct InfoMessage *im;
387   uint16_t hs;
388   char buf[GNUNET_SERVER_MAX_MESSAGE_SIZE - 1];
389
390   hs = 0;
391   im = (struct InfoMessage *) buf;
392   if (pos->hello != NULL)
393     {
394       hs = GNUNET_HELLO_size (pos->hello);
395       GNUNET_assert (hs <
396                      GNUNET_SERVER_MAX_MESSAGE_SIZE -
397                      sizeof (struct InfoMessage));
398       memcpy (&im[1], pos->hello, hs);
399     }
400   im->header.type = htons (GNUNET_MESSAGE_TYPE_PEERINFO_INFO);
401   im->header.size = htons (sizeof (struct InfoMessage) + hs);
402   im->reserved = htonl (0);
403   im->peer = pos->identity;
404   GNUNET_SERVER_transmit_context_append_message (tc,
405                                                  &im->header);
406   return GNUNET_YES;
407 }
408
409
410 /**
411  * @brief delete expired HELLO entries in data/hosts/
412  */
413 static int
414 discard_hosts_helper (void *cls, const char *fn)
415 {
416   struct GNUNET_TIME_Absolute *now = cls;
417   char buffer[GNUNET_SERVER_MAX_MESSAGE_SIZE - 1];
418   const struct GNUNET_HELLO_Message *hello;
419   struct GNUNET_HELLO_Message *new_hello;
420   int size;
421
422   size = GNUNET_DISK_fn_read (fn, buffer, sizeof (buffer));
423   if (size < sizeof (struct GNUNET_MessageHeader))
424     {
425       if (0 != UNLINK (fn))
426         GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING |
427                                   GNUNET_ERROR_TYPE_BULK, "unlink", fn);
428       return GNUNET_OK;
429     }
430   hello = (const struct GNUNET_HELLO_Message *) buffer;
431   new_hello = GNUNET_HELLO_iterate_addresses (hello,
432                                               GNUNET_YES,
433                                               &discard_expired, now);
434   if (new_hello != NULL)
435     {
436       GNUNET_DISK_fn_write (fn, 
437                             new_hello,
438                             GNUNET_HELLO_size (new_hello),
439                             GNUNET_DISK_PERM_USER_READ | GNUNET_DISK_PERM_USER_WRITE
440                             | GNUNET_DISK_PERM_GROUP_READ | GNUNET_DISK_PERM_OTHER_READ);
441       GNUNET_free (new_hello);
442     }
443   else
444     {
445       if (0 != UNLINK (fn))
446         GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_WARNING |
447                                   GNUNET_ERROR_TYPE_BULK, "unlink", fn);      
448     }
449   return GNUNET_OK;
450 }
451
452
453 /**
454  * Call this method periodically to scan data/hosts for new hosts.
455  */
456 static void
457 cron_clean_data_hosts (void *cls,
458                        const struct GNUNET_SCHEDULER_TaskContext *tc)
459 {
460   struct GNUNET_TIME_Absolute now;
461
462   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
463     return;
464   now = GNUNET_TIME_absolute_get ();
465   GNUNET_DISK_directory_scan (networkIdDirectory,
466                               &discard_hosts_helper, &now);
467   GNUNET_SCHEDULER_add_delayed (tc->sched,
468                                 DATA_HOST_CLEAN_FREQ,
469                                 &cron_clean_data_hosts, NULL);
470 }
471
472
473 /**
474  * Handle HELLO-message.
475  *
476  * @param cls closure
477  * @param client identification of the client
478  * @param message the actual message
479  */
480 static void
481 handle_hello (void *cls,
482               struct GNUNET_SERVER_Client *client,
483               const struct GNUNET_MessageHeader *message)
484 {
485   const struct GNUNET_HELLO_Message *hello;
486   struct GNUNET_PeerIdentity pid;
487
488   hello = (const struct GNUNET_HELLO_Message *) message;
489   if (GNUNET_OK !=  GNUNET_HELLO_get_id (hello, &pid))
490     {
491       GNUNET_break (0);
492       GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
493       return;
494     }
495 #if DEBUG_PEERINFO
496   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
497               "`%s' message received for peer `%4s'\n",
498               "HELLO",
499               GNUNET_i2s (&pid));
500 #endif
501   bind_address (&pid, hello);
502   GNUNET_SERVER_receive_done (client, GNUNET_OK);
503 }
504
505
506 /**
507  * Handle GET-message.
508  *
509  * @param cls closure
510  * @param client identification of the client
511  * @param message the actual message
512  */
513 static void
514 handle_get (void *cls,
515             struct GNUNET_SERVER_Client *client,
516             const struct GNUNET_MessageHeader *message)
517 {
518   const struct ListPeerMessage *lpm;
519   struct GNUNET_SERVER_TransmitContext *tc;
520
521   lpm = (const struct ListPeerMessage *) message;
522   GNUNET_break (0 == ntohl (lpm->reserved));
523 #if DEBUG_PEERINFO
524   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
525               "`%s' message received for peer `%4s'\n",
526               "GET",
527               GNUNET_i2s (&lpm->peer));
528 #endif
529   tc = GNUNET_SERVER_transmit_context_create (client);
530   GNUNET_CONTAINER_multihashmap_get_multiple (hostmap,
531                                               &lpm->peer.hashPubKey,
532                                               &add_to_tc,
533                                               tc);
534   GNUNET_SERVER_transmit_context_append_data (tc, NULL, 0,
535                                               GNUNET_MESSAGE_TYPE_PEERINFO_INFO_END);
536   GNUNET_SERVER_transmit_context_run (tc, GNUNET_TIME_UNIT_FOREVER_REL);
537 }
538
539
540 /**
541  * Handle GET-ALL-message.
542  *
543  * @param cls closure
544  * @param client identification of the client
545  * @param message the actual message
546  */
547 static void
548 handle_get_all (void *cls,
549                 struct GNUNET_SERVER_Client *client,
550                 const struct GNUNET_MessageHeader *message)
551 {
552   struct GNUNET_SERVER_TransmitContext *tc;
553
554 #if DEBUG_PEERINFO
555   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
556               "`%s' message received\n",
557               "GET_ALL");
558 #endif
559   tc = GNUNET_SERVER_transmit_context_create (client);
560   GNUNET_CONTAINER_multihashmap_iterate (hostmap,
561                                          &add_to_tc,
562                                          tc);
563   GNUNET_SERVER_transmit_context_append_data (tc, NULL, 0,
564                                               GNUNET_MESSAGE_TYPE_PEERINFO_INFO_END);
565   GNUNET_SERVER_transmit_context_run (tc, GNUNET_TIME_UNIT_FOREVER_REL);
566 }
567
568
569 static int
570 do_notify_entry (void *cls,
571                  const GNUNET_HashCode *key,
572                  void *value)
573 {
574   struct GNUNET_SERVER_Client *client = cls;
575   struct HostEntry *he = value;
576   struct InfoMessage *msg;
577
578   msg = make_info_message (he);
579   GNUNET_SERVER_notification_context_unicast (notify_list,
580                                               client,
581                                               &msg->header,
582                                               GNUNET_NO);
583   GNUNET_free (msg);
584   return GNUNET_YES;
585 }
586
587
588 /**
589  * Handle NOTIFY-message.
590  *
591  * @param cls closure
592  * @param client identification of the client
593  * @param message the actual message
594  */
595 static void
596 handle_notify (void *cls,
597                struct GNUNET_SERVER_Client *client,
598                const struct GNUNET_MessageHeader *message)
599 {
600 #if DEBUG_PEERINFO
601   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
602               "`%s' message received\n",
603               "NOTIFY");
604 #endif
605   GNUNET_SERVER_notification_context_add (notify_list,
606                                           client);
607   GNUNET_CONTAINER_multihashmap_iterate (hostmap,
608                                          &do_notify_entry,
609                                          client);
610 }
611
612
613 static int
614 free_host_entry (void *cls,
615                  const GNUNET_HashCode *key,
616                  void *value)
617 {
618   struct HostEntry *he = value;
619
620   GNUNET_free_non_null (he->hello);
621   GNUNET_free (he);
622   return GNUNET_YES;
623 }
624
625 /**
626  * Clean up our state.  Called during shutdown.
627  *
628  * @param cls unused
629  * @param tc scheduler task context, unused
630  */
631 static void
632 shutdown_task (void *cls,
633                const struct GNUNET_SCHEDULER_TaskContext *tc)
634 {
635   GNUNET_SERVER_notification_context_destroy (notify_list);
636   notify_list = NULL;
637   GNUNET_CONTAINER_multihashmap_iterate (hostmap,
638                                          &free_host_entry,
639                                          NULL);
640   GNUNET_CONTAINER_multihashmap_destroy (hostmap);
641   if (stats != NULL)
642     {
643       GNUNET_STATISTICS_destroy (stats, GNUNET_NO);
644       stats = NULL;
645     }
646 }
647
648
649 /**
650  * Process statistics requests.
651  *
652  * @param cls closure
653  * @param sched scheduler to use
654  * @param server the initialized server
655  * @param cfg configuration to use
656  */
657 static void
658 run (void *cls,
659      struct GNUNET_SCHEDULER_Handle *sched,
660      struct GNUNET_SERVER_Handle *server,
661      const struct GNUNET_CONFIGURATION_Handle *cfg)
662 {
663   static const struct GNUNET_SERVER_MessageHandler handlers[] = {
664     {&handle_hello, NULL, GNUNET_MESSAGE_TYPE_HELLO, 0},
665     {&handle_get, NULL, GNUNET_MESSAGE_TYPE_PEERINFO_GET,
666      sizeof (struct ListPeerMessage)},
667     {&handle_get_all, NULL, GNUNET_MESSAGE_TYPE_PEERINFO_GET_ALL,
668      sizeof (struct GNUNET_MessageHeader)},
669     {&handle_notify, NULL, GNUNET_MESSAGE_TYPE_PEERINFO_NOTIFY,
670      sizeof (struct GNUNET_MessageHeader)},
671     {NULL, NULL, 0, 0}
672   };
673
674   hostmap = GNUNET_CONTAINER_multihashmap_create (1024);
675   stats = GNUNET_STATISTICS_create (sched, "peerinfo", cfg);
676   notify_list = GNUNET_SERVER_notification_context_create (server, 0);
677   GNUNET_assert (GNUNET_OK ==
678                  GNUNET_CONFIGURATION_get_value_filename (cfg,
679                                                           "peerinfo",
680                                                           "HOSTS",
681                                                           &networkIdDirectory));
682   GNUNET_DISK_directory_create (networkIdDirectory);
683   GNUNET_SCHEDULER_add_with_priority (sched,
684                                       GNUNET_SCHEDULER_PRIORITY_IDLE,
685                                       &cron_scan_directory_data_hosts, NULL);
686   GNUNET_SCHEDULER_add_with_priority (sched,
687                                       GNUNET_SCHEDULER_PRIORITY_IDLE,
688                                       &cron_clean_data_hosts, NULL);
689   GNUNET_SCHEDULER_add_delayed (sched,
690                                 GNUNET_TIME_UNIT_FOREVER_REL,
691                                 &shutdown_task, NULL);
692   GNUNET_SERVER_add_handlers (server, handlers);
693 }
694
695
696 /**
697  * The main function for the statistics service.
698  *
699  * @param argc number of arguments from the command line
700  * @param argv command line arguments
701  * @return 0 ok, 1 on error
702  */
703 int
704 main (int argc, char *const *argv)
705 {
706   int ret;
707
708   ret = (GNUNET_OK ==
709          GNUNET_SERVICE_run (argc,
710                              argv,
711                               "peerinfo",
712                              GNUNET_SERVICE_OPTION_NONE,
713                              &run, NULL)) ? 0 : 1;
714   GNUNET_free_non_null (networkIdDirectory);
715   return ret;
716 }
717
718
719 /* end of gnunet-service-peerinfo.c */