dc7face2d4ef0d7e9bf6bc6a8ee0af6d2c0b6d3c
[oweals/gnunet.git] / src / topology / gnunet-daemon-topology.c
1 /*
2      This file is part of GNUnet.
3      (C) 2007, 2008, 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 topology/gnunet-daemon-topology.c
23  * @brief code for maintaining the mesh topology
24  * @author Christian Grothoff
25  */
26
27 #include <stdlib.h>
28 #include "platform.h"
29 #include "gnunet_constants.h"
30 #include "gnunet_core_service.h"
31 #include "gnunet_protocols.h"
32 #include "gnunet_peerinfo_service.h"
33 #include "gnunet_statistics_service.h"
34 #include "gnunet_transport_service.h"
35 #include "gnunet_util_lib.h"
36
37
38 #define DEBUG_TOPOLOGY GNUNET_YES
39
40 /**
41  * For how long do we blacklist a peer after a failed connection
42  * attempt?
43  */
44 #define GREYLIST_AFTER_ATTEMPT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MINUTES, 15)
45
46 /**
47  * For how long do we blacklist a friend after a failed connection
48  * attempt?
49  */
50 #define GREYLIST_AFTER_ATTEMPT_FRIEND GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MINUTES, 2)
51
52 /**
53  * For how long do we blacklist anyone under any cirumstances after a failed connection
54  * attempt?
55  */
56 #define GREYLIST_AFTER_ATTEMPT_MIN GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 15)
57
58 /**
59  * For how long do we blacklist anyone under any cirumstances after a failed connection
60  * attempt?
61  */
62 #define GREYLIST_AFTER_ATTEMPT_MAX GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_HOURS, 18)
63
64 /**
65  * How often do we at most advertise any HELLO to a peer?
66  */
67 #define HELLO_ADVERTISEMENT_MIN_FREQUENCY GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_HOURS, 4)
68
69 /**
70  * How often do we at most advertise the same HELLO to the same peer?
71  */
72 #define HELLO_ADVERTISEMENT_MIN_REPEAT_FREQUENCY GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_HOURS, 4)
73
74
75 /**
76  * Record for neighbours, friends and blacklisted peers.
77  */
78 struct Peer
79 {
80   /**
81    * Which peer is this entry about?
82    */
83   struct GNUNET_PeerIdentity pid;
84
85   /**
86    * Our handle for the request to transmit HELLOs to this peer; NULL
87    * if no such request is pending.
88    */
89   struct GNUNET_CORE_TransmitHandle *hello_req;  
90
91   /**
92    * Our handle for the request to connect to this peer; NULL if no
93    * such request is pending.
94    */
95   struct GNUNET_CORE_PeerRequestHandle *connect_req;  
96
97   /**
98    * Pointer to the HELLO message of this peer; can be NULL.
99    */
100   struct GNUNET_HELLO_Message *hello;
101
102   /**
103    * Bloom filter used to mark which peers already got the HELLO
104    * from this peer.
105    */
106   struct GNUNET_CONTAINER_BloomFilter *filter;
107
108   /**
109    * Until what time should we not try to connect again
110    * to this peer?
111    */
112   struct GNUNET_TIME_Absolute greylisted_until;
113
114   /**
115    * Next time we are allowed to transmit a HELLO to this peer?
116    */
117   struct GNUNET_TIME_Absolute next_hello_allowed;
118
119   /**
120    * When should we reset the bloom filter of this entry?
121    */
122   struct GNUNET_TIME_Absolute filter_expiration;
123
124   /**
125    * ID of task we use to wait for the time to send the next HELLO
126    * to this peer.
127    */
128   GNUNET_SCHEDULER_TaskIdentifier hello_delay_task;
129
130   /**
131    * ID of task we use to clear peers from the greylist.
132    */
133   GNUNET_SCHEDULER_TaskIdentifier greylist_clean_task;
134
135   /**
136    * How often have we tried so far?
137    */
138   unsigned int connect_attempts;
139
140   /**
141    * Is this peer listed here because he is a friend?
142    */
143   int is_friend;
144
145   /**
146    * Are we connected to this peer right now?
147    */
148   int is_connected;
149
150 };
151
152
153 /**
154  * Our peerinfo notification context.  We use notification
155  * to instantly learn about new peers as they are discovered.
156  */
157 static struct GNUNET_PEERINFO_NotifyContext *peerinfo_notify;
158
159 /**
160  * Our scheduler.
161  */
162 static struct GNUNET_SCHEDULER_Handle *sched;
163
164 /**
165  * Our configuration.
166  */
167 static const struct GNUNET_CONFIGURATION_Handle *cfg;
168
169 /**
170  * Handle to the core API.
171  */
172 static struct GNUNET_CORE_Handle *handle;
173
174 /**
175  * Handle to the transport API.
176  */
177 static struct GNUNET_TRANSPORT_Handle *transport;
178
179 /**
180  * Identity of this peer.
181  */
182 static struct GNUNET_PeerIdentity my_identity;
183
184 /**
185  * All of our friends, all of our current neighbours and all peers for
186  * which we have HELLOs.  So pretty much everyone.  Maps peer identities
187  * to 'struct Peer *' values.
188  */
189 static struct GNUNET_CONTAINER_MultiHashMap *peers;
190
191 /**
192  * Handle for reporting statistics.
193  */
194 static struct GNUNET_STATISTICS_Handle *stats;
195
196 /**
197  * Blacklist (NULL if we have none).
198  */
199 static struct GNUNET_TRANSPORT_Blacklist *blacklist;
200
201 /**
202  * Flag to disallow non-friend connections (pure F2F mode).
203  */
204 static int friends_only;
205
206 /**
207  * Minimum number of friends to have in the
208  * connection set before we allow non-friends.
209  */
210 static unsigned int minimum_friend_count;
211
212 /**
213  * Number of peers (friends and others) that we are currently connected to.
214  */
215 static unsigned int connection_count;
216
217 /**
218  * Target number of connections.
219  */
220 static unsigned int target_connection_count;
221
222 /**
223  * Number of friends that we are currently connected to.
224  */
225 static unsigned int friend_count;
226
227 /**
228  * Should the topology daemon try to establish connections?
229  */
230 static int autoconnect;
231
232
233 /**
234  * Function that decides if a connection is acceptable or not.  
235  * If we have a blacklist, only friends are allowed, so the check
236  * is rather simple.
237  *
238  * @param cls closure
239  * @param pid peer to approve or disapproave
240  * @return GNUNET_OK if the connection is allowed
241  */
242 static int
243 blacklist_check (void *cls,
244                  const struct GNUNET_PeerIdentity *pid)
245 {
246   struct Peer *pos;
247
248   pos = GNUNET_CONTAINER_multihashmap_get (peers, &pid->hashPubKey);
249   if ( (pos != NULL) &&
250        (pos->is_friend == GNUNET_YES) )
251     return GNUNET_OK;
252   GNUNET_STATISTICS_update (stats,
253                             gettext_noop ("# peers blacklisted"),
254                             1,
255                             GNUNET_NO);
256   return GNUNET_SYSERR;
257 }
258
259
260 /**
261  * Whitelist all peers that we blacklisted; we've passed
262  * the minimum number of friends.
263  */
264 static void
265 whitelist_peers ()
266 {
267   if (blacklist != NULL)
268     {
269       GNUNET_TRANSPORT_blacklist_cancel (blacklist);
270       blacklist = NULL;
271     }
272 }
273
274
275 /**
276  * Function called by core when our attempt to connect succeeded.
277  *
278  * @param cls the 'struct Peer' for which we issued the connect request
279  * @param tc scheduler context
280  */
281 static void
282 connect_completed_callback (void *cls,
283                             const struct GNUNET_SCHEDULER_TaskContext *tc)
284 {
285   struct Peer *pos = cls;
286
287   pos->connect_req = NULL;
288 }
289
290
291 /**
292  * Check if an additional connection from the given peer is allowed.
293  * 
294  * @param peer connection to check
295  * @return GNUNET_OK if the connection is allowed
296  */
297 static int
298 is_connection_allowed (struct Peer *peer)
299 {
300   if (0 == memcmp (&my_identity, 
301                    &peer->pid, 
302                    sizeof (struct GNUNET_PeerIdentity)))
303     return GNUNET_SYSERR;       /* disallow connections to self */
304   if (peer->is_friend)
305     return GNUNET_OK;
306   if (GNUNET_YES == friends_only)
307     {
308 #if DEBUG_TOPOLOGY
309       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
310                   "Determined that `%s' is not allowed to connect (not a friend)\n",
311                   GNUNET_i2s (&peer->pid));
312 #endif       
313       return GNUNET_SYSERR;
314     }
315   if (friend_count >= minimum_friend_count)
316     return GNUNET_OK;
317 #if DEBUG_TOPOLOGY
318   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
319               "Determined that `%s' is not allowed to connect (not enough connected friends)\n",
320               GNUNET_i2s (&peer->pid));
321 #endif       
322   return GNUNET_SYSERR;
323 }
324
325
326 /**
327  * Free all resources associated with the given peer.
328  *
329  * @param cls closure (not used)
330  * @param pid identity of the peer
331  * @param value peer to free
332  * @return GNUNET_YES (always: continue to iterate)
333  */
334 static int
335 free_peer (void *cls,
336            const GNUNET_HashCode *pid,
337            void *value)
338 {
339   struct Peer *pos = value;
340
341   GNUNET_break (GNUNET_OK == 
342                 GNUNET_CONTAINER_multihashmap_remove (peers,
343                                                       pid,
344                                                       pos));
345   if (pos->hello_req != NULL)
346     GNUNET_CORE_notify_transmit_ready_cancel (pos->hello_req);
347   if (pos->connect_req != NULL)
348     GNUNET_CORE_peer_request_connect_cancel (pos->connect_req);       
349   if (pos->hello_delay_task != GNUNET_SCHEDULER_NO_TASK)
350     GNUNET_SCHEDULER_cancel (sched,
351                              pos->hello_delay_task);
352   if (pos->greylist_clean_task != GNUNET_SCHEDULER_NO_TASK)
353     GNUNET_SCHEDULER_cancel (sched,
354                              pos->greylist_clean_task);
355   GNUNET_free_non_null (pos->hello);   
356   if (pos->filter != NULL)
357     GNUNET_CONTAINER_bloomfilter_free (pos->filter);
358   GNUNET_free (pos);
359   return GNUNET_YES;
360 }
361
362
363 /**
364  * Discard peer entries for greylisted peers
365  * where the greylisting has expired.
366  *
367  * @param cls 'struct Peer' to greylist
368  * @param tc scheduler context
369  */
370 static void
371 remove_from_greylist (void *cls,
372                       const struct GNUNET_SCHEDULER_TaskContext *tc);
373
374
375 /**
376  * Try to connect to the specified peer.
377  *
378  * @param pos peer to connect to
379  */
380 static void
381 attempt_connect (struct Peer *pos)
382 {
383   struct GNUNET_TIME_Relative rem;
384   
385   if ( (connection_count >= target_connection_count) &&
386        (friend_count >= minimum_friend_count) )
387     return;
388   if (GNUNET_YES == pos->is_connected)
389     return;
390   if (GNUNET_OK != is_connection_allowed (pos))
391     return;
392   if (GNUNET_TIME_absolute_get_remaining (pos->greylisted_until).rel_value > 0)
393     return;
394   if (GNUNET_YES == pos->is_friend)
395     rem = GREYLIST_AFTER_ATTEMPT_FRIEND;
396   else
397     rem = GREYLIST_AFTER_ATTEMPT;
398   rem = GNUNET_TIME_relative_multiply (rem, connection_count);
399   rem = GNUNET_TIME_relative_divide (rem, target_connection_count);
400   if (pos->connect_attempts > 30)
401     pos->connect_attempts = 30;
402   rem = GNUNET_TIME_relative_multiply (rem, 1 << (++pos->connect_attempts));
403   rem = GNUNET_TIME_relative_max (rem,
404                                   GREYLIST_AFTER_ATTEMPT_MIN);
405   rem = GNUNET_TIME_relative_min (rem,
406                                   GREYLIST_AFTER_ATTEMPT_MAX);
407   pos->greylisted_until = GNUNET_TIME_relative_to_absolute (rem);
408   if (pos->greylist_clean_task != GNUNET_SCHEDULER_NO_TASK)
409     GNUNET_SCHEDULER_cancel (sched,
410                              pos->greylist_clean_task);
411   pos->greylist_clean_task 
412     = GNUNET_SCHEDULER_add_delayed (sched,
413                                     rem,
414                                     &remove_from_greylist,
415                                     pos);
416 #if DEBUG_TOPOLOGY
417   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
418               "Asking  to connect to `%s'\n",
419               GNUNET_i2s (&pos->pid));
420 #endif
421   GNUNET_STATISTICS_update (stats,
422                             gettext_noop ("# connect requests issued to core"),
423                             1,
424                             GNUNET_NO);
425   pos->connect_req = GNUNET_CORE_peer_request_connect (sched, cfg,
426                                                        GNUNET_TIME_UNIT_MINUTES,
427                                                        &pos->pid,
428                                                        &connect_completed_callback,
429                                                        pos);
430 }
431
432
433 /**
434  * Discard peer entries for greylisted peers
435  * where the greylisting has expired.
436  *
437  * @param cls 'struct Peer' to greylist
438  * @param tc scheduler context
439  */
440 static void
441 remove_from_greylist (void *cls,
442                       const struct GNUNET_SCHEDULER_TaskContext *tc)
443 {
444   struct Peer *pos = cls;
445   struct GNUNET_TIME_Relative rem;
446
447   pos->greylist_clean_task = GNUNET_SCHEDULER_NO_TASK;
448   rem = GNUNET_TIME_absolute_get_remaining (pos->greylisted_until);
449   if (rem.rel_value == 0)
450     {
451       attempt_connect (pos);
452     }
453   else
454     {
455       pos->greylist_clean_task 
456         = GNUNET_SCHEDULER_add_delayed (sched,
457                                         rem,
458                                         &remove_from_greylist,
459                                         pos);
460     }
461   if ( (GNUNET_NO == pos->is_friend) &&
462        (GNUNET_NO == pos->is_connected) )
463     {
464       free_peer (NULL, &pos->pid.hashPubKey, pos);
465       return;
466     }
467 }
468
469
470 /**
471  * Create a new entry in the peer list.
472  *
473  * @param peer identity of the new entry
474  * @param hello hello message, can be NULL
475  * @param is_friend is the new entry for a friend?
476  * @return the new entry
477  */
478 static struct Peer *
479 make_peer (const struct
480            GNUNET_PeerIdentity * peer,
481            const struct GNUNET_HELLO_Message *hello,
482            int is_friend)
483 {
484   struct Peer *ret;
485   
486   ret = GNUNET_malloc (sizeof (struct Peer));
487   ret->pid = *peer;
488   ret->is_friend = is_friend;
489   if (hello != NULL)
490     {
491       ret->hello = GNUNET_malloc (GNUNET_HELLO_size (hello));
492       memcpy (ret->hello, hello,
493               GNUNET_HELLO_size (hello));
494     }
495   GNUNET_break (GNUNET_OK ==
496                 GNUNET_CONTAINER_multihashmap_put (peers,
497                                                    &peer->hashPubKey,
498                                                    ret,
499                                                    GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_ONLY));
500   return ret;
501 }
502
503
504 /**
505  * Setup bloom filter for the given peer entry.
506  *
507  * @param peer entry to initialize
508  */
509 static void
510 setup_filter (struct Peer *peer)
511 {
512   /* 2^{-5} chance of not sending a HELLO to a peer is
513      acceptably small (if the filter is 50% full);
514      64 bytes of memory are small compared to the rest
515      of the data structure and would only really become
516      "useless" once a HELLO has been passed on to ~100
517      other peers, which is likely more than enough in
518      any case; hence 64, 5 as bloomfilter parameters. */
519   peer->filter = GNUNET_CONTAINER_bloomfilter_load (NULL, 64, 5);
520   peer->filter_expiration = GNUNET_TIME_relative_to_absolute (HELLO_ADVERTISEMENT_MIN_REPEAT_FREQUENCY);
521   /* never send a peer its own HELLO */
522   GNUNET_CONTAINER_bloomfilter_add (peer->filter, &peer->pid.hashPubKey);
523 }
524
525
526 /**
527  * Function to fill send buffer with HELLO.
528  *
529  * @param cls 'struct Peer' of the target peer
530  * @param size number of bytes available in buf
531  * @param buf where the callee should write the message
532  * @return number of bytes written to buf
533  */
534 static size_t
535 hello_advertising_ready (void *cls,
536                          size_t size,
537                          void *buf);
538
539
540
541
542 /**
543  * Closure for 'find_advertisable_hello'.
544  */
545 struct FindAdvHelloContext {
546
547   /**
548    * Peer we want to advertise to.
549    */
550   struct Peer *peer;
551
552   /**
553    * Where to store the result (peer selected for advertising).
554    */
555   struct Peer *result;
556
557   /**
558    * Maximum HELLO size we can use right now.
559    */
560   size_t max_size;
561
562   struct GNUNET_TIME_Relative next_adv;
563 };
564
565
566 /**
567  * Find a peer that would be reasonable for advertising.
568  *
569  * @param cls closure
570  * @param pid identity of a peer
571  * @param value 'struct Peer*' for the peer we are considering 
572  * @return GNUNET_YES (continue iteration)
573  */
574 static int
575 find_advertisable_hello (void *cls,
576                          const GNUNET_HashCode *pid,
577                          void *value)
578 {
579   struct FindAdvHelloContext *fah = cls;
580   struct Peer *pos = value;
581   struct GNUNET_TIME_Relative rst_time;
582   size_t hs;
583
584   if (pos == fah->peer)
585     return GNUNET_YES;
586   if (pos->hello == NULL)
587     return GNUNET_YES;
588   rst_time = GNUNET_TIME_absolute_get_remaining (pos->filter_expiration);
589   if (0 == rst_time.rel_value)
590     {
591       /* time to discard... */
592       GNUNET_CONTAINER_bloomfilter_free (pos->filter);
593       setup_filter (pos);
594     }
595   fah->next_adv = GNUNET_TIME_relative_min (rst_time,
596                                             fah->next_adv);
597   hs = GNUNET_HELLO_size (pos->hello);
598   if (hs > fah->max_size)
599     return GNUNET_YES;
600   if (GNUNET_NO ==
601       GNUNET_CONTAINER_bloomfilter_test (pos->filter,
602                                          &fah->peer->pid.hashPubKey))
603     fah->result = pos;    
604   return GNUNET_YES;
605 }
606
607
608 /**
609  * Calculate when we would like to send the next HELLO to this
610  * peer and ask for it.
611  *
612  * @param cls for which peer to schedule the HELLO
613  * @param tc task context
614  */
615 static void
616 schedule_next_hello (void *cls,
617                      const struct GNUNET_SCHEDULER_TaskContext *tc)
618 {
619   struct Peer *pl = cls;
620   struct FindAdvHelloContext fah;
621   size_t next_want;
622   struct GNUNET_TIME_Relative delay;
623  
624   pl->hello_delay_task = GNUNET_SCHEDULER_NO_TASK;
625   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
626     return; /* we're out of here */
627   if (pl->hello_req != NULL)
628     return; /* did not finish sending the previous one */
629   /* find applicable HELLOs */
630   fah.peer = pl;
631   fah.result = NULL;
632   fah.max_size = GNUNET_SERVER_MAX_MESSAGE_SIZE - 1;
633   fah.next_adv = GNUNET_TIME_UNIT_FOREVER_REL;
634   GNUNET_CONTAINER_multihashmap_iterate (peers,
635                                          &find_advertisable_hello,
636                                          &fah);
637   pl->hello_delay_task 
638     = GNUNET_SCHEDULER_add_delayed (sched,
639                                     fah.next_adv,
640                                     &schedule_next_hello,
641                                     pl);
642   if (fah.result == NULL)
643     return;   
644   next_want = GNUNET_HELLO_size (fah.result->hello);
645   delay = GNUNET_TIME_absolute_get_remaining (pl->next_hello_allowed);
646   if (delay.rel_value == 0)
647     {
648       /* now! */
649       pl->hello_req = GNUNET_CORE_notify_transmit_ready (handle, 0,
650                                                          GNUNET_CONSTANTS_SERVICE_TIMEOUT,
651                                                          &pl->pid,
652                                                          next_want,
653                                                          &hello_advertising_ready,
654                                                          pl);
655     }
656 }
657
658
659 /**
660  * Cancel existing requests for sending HELLOs to this peer
661  * and recalculate when we should send HELLOs to it based
662  * on our current state (something changed!).
663  *
664  * @param cls closure, 'struct Peer' to skip, or NULL
665  * @param pid identity of a peer
666  * @param value 'struct Peer*' for the peer
667  * @return GNUNET_YES (always)
668  */
669 static int
670 reschedule_hellos (void *cls,
671                    const GNUNET_HashCode *pid,
672                    void *value)
673 {
674   struct Peer *peer = value;
675   struct Peer *skip = cls;
676
677   if (skip == peer)
678     return GNUNET_YES;
679   if (! peer->is_connected) 
680     return GNUNET_YES;
681   if (peer->hello_req != NULL)
682     {
683       GNUNET_CORE_notify_transmit_ready_cancel (peer->hello_req);
684       peer->hello_req = NULL;
685     }
686   if (peer->hello_delay_task != GNUNET_SCHEDULER_NO_TASK)
687     {
688       GNUNET_SCHEDULER_cancel (sched,
689                                peer->hello_delay_task);
690       peer->hello_delay_task = GNUNET_SCHEDULER_NO_TASK;
691     }
692   peer->hello_delay_task 
693     = GNUNET_SCHEDULER_add_now (sched,
694                                 &schedule_next_hello,
695                                 peer);
696   return GNUNET_YES;
697 }
698
699
700 /**
701  * Method called whenever a peer connects.
702  *
703  * @param cls closure
704  * @param peer peer identity this notification is about
705  * @param latency reported latency of the connection with 'other'
706  * @param distance reported distance (DV) to 'other' 
707  */
708 static void 
709 connect_notify (void *cls,
710                 const struct
711                 GNUNET_PeerIdentity * peer,
712                 struct GNUNET_TIME_Relative latency,
713                 uint32_t distance)
714 {
715   struct Peer *pos;
716
717 #if DEBUG_TOPOLOGY
718   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
719               "Core told us that we are connecting to `%s'\n",
720               GNUNET_i2s (peer));
721 #endif
722   connection_count++;
723   GNUNET_STATISTICS_set (stats,
724                          gettext_noop ("# peers connected"),
725                          connection_count,
726                          GNUNET_NO);
727   pos = GNUNET_CONTAINER_multihashmap_get (peers, &peer->hashPubKey);
728   if (pos == NULL)    
729     {
730       pos = make_peer (peer, NULL, GNUNET_NO);
731       GNUNET_break (GNUNET_OK == is_connection_allowed (pos));
732     }
733   else
734     {
735       GNUNET_assert (GNUNET_NO == pos->is_connected);
736       pos->greylisted_until.abs_value = 0; /* remove greylisting */
737     }
738   pos->is_connected = GNUNET_YES;
739   pos->connect_attempts = 0; /* re-set back-off factor */
740   if (pos->is_friend)
741     {
742       if ( (friend_count == minimum_friend_count - 1) &&
743            (GNUNET_YES != friends_only) )       
744         whitelist_peers ();       
745       friend_count++;
746       GNUNET_STATISTICS_set (stats,
747                              gettext_noop ("# friends connected"),
748                              friend_count,
749                              GNUNET_NO);
750     }
751   reschedule_hellos (NULL, &peer->hashPubKey, pos);
752 }
753
754
755 /**
756  * Try to add more peers to our connection set.
757  *
758  * @param cls closure, not used
759  * @param pid identity of a peer
760  * @param value 'struct Peer*' for the peer
761  * @return GNUNET_YES (continue to iterate)
762  */
763 static int
764 try_add_peers (void *cls,
765                const GNUNET_HashCode *pid,
766                void *value)
767 {
768   struct Peer *pos = value;
769
770   attempt_connect (pos);
771   return GNUNET_YES;
772 }
773
774
775 /**
776  * Method called whenever a peer disconnects.
777  *
778  * @param cls closure
779  * @param peer peer identity this notification is about
780  */
781 static void 
782 disconnect_notify (void *cls,
783                    const struct
784                    GNUNET_PeerIdentity * peer)
785 {
786   struct Peer *pos;
787  
788 #if DEBUG_TOPOLOGY
789   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
790               "Core told us that we disconnected from `%s'\n",
791               GNUNET_i2s (peer));
792 #endif       
793   pos = GNUNET_CONTAINER_multihashmap_get (peers,
794                                            &peer->hashPubKey);
795   if (pos == NULL)
796     {
797       GNUNET_break (0);
798       return;
799     }
800   if (pos->is_connected != GNUNET_YES)
801     {
802       GNUNET_break (0);
803       return;
804     }
805   connection_count--;
806   GNUNET_STATISTICS_set (stats,
807                          gettext_noop ("# peers connected"),
808                          connection_count,
809                          GNUNET_NO);
810   if (pos->is_friend)
811     {
812       friend_count--; 
813       GNUNET_STATISTICS_set (stats,
814                              gettext_noop ("# friends connected"),
815                              friend_count,
816                              GNUNET_NO);
817     }
818   if ( (connection_count < target_connection_count) ||
819        (friend_count < minimum_friend_count) )
820     GNUNET_CONTAINER_multihashmap_iterate (peers,
821                                            &try_add_peers,
822                                            NULL);
823   if ( (friend_count < minimum_friend_count) &&
824        (blacklist == NULL) )
825     blacklist = GNUNET_TRANSPORT_blacklist (sched, cfg,
826                                             &blacklist_check, NULL);
827 }
828
829
830 /**
831  * Iterator called on each address.
832  *
833  * @param cls flag that we will set if we see any addresses
834  * @param tname name of the transport
835  * @param expiration when will the given address expire
836  * @param addr the address of the peer
837  * @param addrlen number of bytes in addr
838  * @return GNUNET_SYSERR always, to terminate iteration
839  */
840 static int
841 address_iterator (void *cls,
842                   const char *tname,
843                   struct GNUNET_TIME_Absolute expiration,
844                   const void *addr, 
845                   uint16_t addrlen)
846 {
847   int *flag = cls;
848   *flag = GNUNET_YES;
849   return GNUNET_SYSERR;
850 }
851
852
853 /**
854  * We've gotten a HELLO from another peer.  Consider it for
855  * advertising.
856  *
857  * @param hello the HELLO we got
858  */
859 static void
860 consider_for_advertising (const struct GNUNET_HELLO_Message *hello)
861 {
862   int have_address;
863   struct GNUNET_PeerIdentity pid;
864   struct GNUNET_TIME_Absolute dt;
865   struct GNUNET_HELLO_Message *nh;
866   struct Peer *peer;
867   uint16_t size;
868
869   if (GNUNET_OK != GNUNET_HELLO_get_id (hello, &pid))
870     {
871         GNUNET_break (0);
872         return;
873     }
874   if (0 == memcmp (&pid,
875                    &my_identity,
876                    sizeof (struct GNUNET_PeerIdentity)))
877     return; /* that's me! */
878   have_address = GNUNET_NO;
879   GNUNET_HELLO_iterate_addresses (hello,
880                                   GNUNET_NO,
881                                   &address_iterator,
882                                   &have_address);
883   if (GNUNET_NO == have_address)
884     return; /* no point in advertising this one... */
885   peer = GNUNET_CONTAINER_multihashmap_get (peers,
886                                             &pid.hashPubKey);
887   if (peer == NULL)
888     {
889       peer = make_peer (&pid, hello, GNUNET_NO);
890     }
891   else if (peer->hello != NULL)
892     {
893       dt = GNUNET_HELLO_equals (peer->hello,
894                                 hello,
895                                 GNUNET_TIME_absolute_get());
896       if (dt.abs_value == GNUNET_TIME_UNIT_FOREVER_ABS.abs_value)
897         return; /* nothing new here */
898     }
899 #if DEBUG_TOPOLOGY
900   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
901               "Found `%s' from peer `%s' for advertising\n",
902               "HELLO",
903               GNUNET_i2s (&pid));
904 #endif 
905   if (peer->hello != NULL)
906     {
907       nh = GNUNET_HELLO_merge (peer->hello,
908                                hello);
909       GNUNET_free (peer->hello);
910       peer->hello = nh;
911     }
912   else
913     {
914       size = GNUNET_HELLO_size (hello);
915       peer->hello = GNUNET_malloc (size);
916       memcpy (peer->hello, hello, size);
917     }
918   if (peer->filter != NULL)
919     GNUNET_CONTAINER_bloomfilter_free (peer->filter);
920   setup_filter (peer);
921   /* since we have a new HELLO to pick from, re-schedule all
922      HELLO requests that are not bound by the HELLO send rate! */
923   GNUNET_CONTAINER_multihashmap_iterate (peers,
924                                          &reschedule_hellos,
925                                          peer);
926 }
927
928
929 /**
930  * PEERINFO calls this function to let us know about a possible peer
931  * that we might want to connect to.
932  *
933  * @param cls closure (not used)
934  * @param peer potential peer to connect to
935  * @param hello HELLO for this peer (or NULL)
936  */
937 static void
938 process_peer (void *cls,
939               const struct GNUNET_PeerIdentity *peer,
940               const struct GNUNET_HELLO_Message *hello)
941 {
942   struct Peer *pos;
943
944   GNUNET_assert (peer != NULL);
945   if (0 == memcmp (&my_identity,
946                    peer, sizeof (struct GNUNET_PeerIdentity)))
947     return;  /* that's me! */
948   if (hello == NULL)
949     {
950       /* free existing HELLO, if any */
951       pos = GNUNET_CONTAINER_multihashmap_get (peers,
952                                                &peer->hashPubKey);
953       if (NULL != pos)
954         {
955           GNUNET_free_non_null (pos->hello);
956           pos->hello = NULL;
957           if (pos->filter != NULL)
958             {
959               GNUNET_CONTAINER_bloomfilter_free (pos->filter);
960               pos->filter = NULL;
961             }
962           if ( (! pos->is_connected) &&
963                (! pos->is_friend) &&
964                (0 == GNUNET_TIME_absolute_get_remaining (pos->greylisted_until).rel_value) )
965             free_peer (NULL, &pos->pid.hashPubKey, pos);
966         }
967       return;
968     }
969   consider_for_advertising (hello);
970   pos = GNUNET_CONTAINER_multihashmap_get (peers,
971                                            &peer->hashPubKey);
972   if (pos == NULL)
973     pos = make_peer (peer, hello, GNUNET_NO);
974   GNUNET_assert (NULL != pos);
975   if (GNUNET_YES == pos->is_connected)
976     {
977 #if DEBUG_TOPOLOGY
978       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
979                   "Already connected to peer `%s'\n",
980                   GNUNET_i2s (peer));
981 #endif 
982       return;
983     }
984   if (GNUNET_TIME_absolute_get_remaining (pos->greylisted_until).rel_value > 0)
985     {
986 #if DEBUG_TOPOLOGY
987       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
988                   "Already tried peer `%s' recently\n",
989                   GNUNET_i2s (peer));
990 #endif 
991       return; /* peer still greylisted */
992     }
993 #if DEBUG_TOPOLOGY
994   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
995               "Considering connecting to peer `%s'\n",
996               GNUNET_i2s (peer));
997 #endif 
998   attempt_connect (pos);
999 }
1000
1001
1002 /**
1003  * Function called after GNUNET_CORE_connect has succeeded
1004  * (or failed for good).
1005  *
1006  * @param cls closure
1007  * @param server handle to the server, NULL if we failed
1008  * @param my_id ID of this peer, NULL if we failed
1009  * @param publicKey public key of this peer, NULL if we failed
1010  */
1011 static void
1012 core_init (void *cls,
1013            struct GNUNET_CORE_Handle * server,
1014            const struct GNUNET_PeerIdentity *
1015            my_id,
1016            const struct
1017            GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *
1018            publicKey)
1019 {
1020   if (server == NULL)
1021     {
1022       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1023                   _("Failed to connect to core service, can not manage topology!\n"));
1024       GNUNET_SCHEDULER_shutdown (sched);
1025       return;
1026     }
1027   handle = server;
1028   my_identity = *my_id;
1029 #if DEBUG_TOPOLOGY
1030   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1031               "I am peer `%s'\n",
1032               GNUNET_i2s (my_id));
1033 #endif  
1034   peerinfo_notify = GNUNET_PEERINFO_notify (cfg, sched,
1035                                             &process_peer,
1036                                             NULL);
1037 }
1038
1039
1040 /**
1041  * Read the friends file.
1042  */
1043 static void
1044 read_friends_file (const struct GNUNET_CONFIGURATION_Handle *cfg)
1045 {
1046   char *fn;
1047   char *data;
1048   size_t pos;
1049   struct GNUNET_PeerIdentity pid;
1050   struct stat frstat;
1051   struct GNUNET_CRYPTO_HashAsciiEncoded enc;
1052   unsigned int entries_found;
1053   struct Peer *fl;
1054
1055   if (GNUNET_OK !=
1056       GNUNET_CONFIGURATION_get_value_filename (cfg,
1057                                                "TOPOLOGY",
1058                                                "FRIENDS",
1059                                                &fn))
1060     {
1061       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
1062                   _("Option `%s' in section `%s' not specified!\n"),
1063                   "FRIENDS",
1064                   "TOPOLOGY");
1065       return;
1066     }
1067   if (GNUNET_OK != GNUNET_DISK_file_test (fn))
1068     GNUNET_DISK_fn_write (fn, NULL, 0, 
1069                           GNUNET_DISK_PERM_USER_READ
1070                           | GNUNET_DISK_PERM_USER_WRITE);
1071   if (0 != STAT (fn, &frstat))
1072     {
1073       if ((friends_only) || (minimum_friend_count > 0))
1074         GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1075                     _("Could not read friends list `%s'\n"), fn);
1076       GNUNET_free (fn);
1077       return;
1078     }
1079   if (frstat.st_size == 0)
1080     {
1081       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
1082                   _("Friends file `%s' is empty.\n"),
1083                   fn);
1084       GNUNET_free (fn);
1085       return;
1086     }
1087   data = GNUNET_malloc_large (frstat.st_size);
1088   if (data == NULL)
1089     {
1090       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1091                   _("Failed to read friends list from `%s': out of memory\n"), fn);
1092       GNUNET_free (fn);
1093       return;
1094     }
1095   if (frstat.st_size !=
1096       GNUNET_DISK_fn_read (fn, data, frstat.st_size))
1097     {
1098       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1099                   _("Failed to read friends list from `%s'\n"), fn);
1100       GNUNET_free (fn);
1101       GNUNET_free (data);
1102       return;
1103     }
1104   entries_found = 0;
1105   pos = 0;
1106   while ((pos < frstat.st_size) && isspace ( (unsigned char) data[pos]))
1107     pos++;
1108   while ((frstat.st_size >= sizeof (struct GNUNET_CRYPTO_HashAsciiEncoded)) &&
1109          (pos <= frstat.st_size - sizeof (struct GNUNET_CRYPTO_HashAsciiEncoded)))
1110     {
1111       memcpy (&enc, &data[pos], sizeof (struct GNUNET_CRYPTO_HashAsciiEncoded));
1112       if (!isspace ( (unsigned char) enc.encoding[sizeof (struct GNUNET_CRYPTO_HashAsciiEncoded) - 1]))
1113         {
1114           GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
1115                       _("Syntax error in topology specification at offset %llu, skipping bytes.\n"),
1116                       (unsigned long long) pos);
1117           pos++;
1118           while ((pos < frstat.st_size) && (!isspace ( (unsigned char) data[pos])))
1119             pos++;
1120           continue;
1121         }
1122       enc.encoding[sizeof (struct GNUNET_CRYPTO_HashAsciiEncoded) - 1] = '\0';
1123       if (GNUNET_OK != GNUNET_CRYPTO_hash_from_string ((char *) &enc, &pid.hashPubKey))
1124         {
1125           GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
1126                       _("Syntax error in topology specification at offset %llu, skipping bytes `%s'.\n"),
1127                       (unsigned long long) pos,
1128                       &enc);
1129         }
1130       else
1131         {
1132           if (0 != memcmp (&pid,
1133                            &my_identity,
1134                            sizeof (struct GNUNET_PeerIdentity)))
1135             {
1136               entries_found++;
1137               fl = make_peer (&pid,
1138                               NULL,
1139                               GNUNET_YES);
1140               GNUNET_log (GNUNET_ERROR_TYPE_INFO,
1141                           _("Found friend `%s' in configuration\n"),
1142                           GNUNET_i2s (&fl->pid));
1143             }
1144           else
1145             {
1146               GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
1147                           _("Found myself `%s' in friend list (useless, ignored)\n"),
1148                           GNUNET_i2s (&pid));
1149             }
1150         }
1151       pos = pos + sizeof (struct GNUNET_CRYPTO_HashAsciiEncoded);
1152       while ((pos < frstat.st_size) && isspace ( (unsigned char) data[pos]))
1153         pos++;
1154     }
1155   GNUNET_free (data);
1156   GNUNET_free (fn);
1157   GNUNET_STATISTICS_update (stats,
1158                             gettext_noop ("# friends in configuration"),
1159                             entries_found,
1160                             GNUNET_NO);
1161   if ( (minimum_friend_count > entries_found) &&
1162        (friends_only == GNUNET_NO) )
1163     {
1164       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
1165                   _("Fewer friends specified than required by minimum friend count. Will only connect to friends.\n"));
1166     }
1167   if ( (minimum_friend_count > target_connection_count) &&
1168        (friends_only == GNUNET_NO) )
1169     {
1170       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
1171                   _("More friendly connections required than target total number of connections.\n"));
1172     }
1173 }
1174
1175
1176 /**
1177  * This function is called whenever an encrypted HELLO message is
1178  * received.
1179  *
1180  * @param cls closure
1181  * @param other the other peer involved (sender or receiver, NULL
1182  *        for loopback messages where we are both sender and receiver)
1183  * @param message the actual HELLO message
1184  * @param latency reported latency of the connection with 'other'
1185  * @param distance reported distance (DV) to 'other' 
1186  * @return GNUNET_OK to keep the connection open,
1187  *         GNUNET_SYSERR to close it (signal serious error)
1188  */
1189 static int
1190 handle_encrypted_hello (void *cls,
1191                         const struct GNUNET_PeerIdentity * other,
1192                         const struct GNUNET_MessageHeader *
1193                         message,
1194                         struct GNUNET_TIME_Relative latency,
1195                         uint32_t distance)
1196 {
1197   struct Peer *peer;
1198   struct GNUNET_PeerIdentity pid;
1199
1200 #if DEBUG_TOPOLOGY
1201   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1202               "Received encrypted `%s' from peer `%s'",
1203               "HELLO",
1204               GNUNET_i2s (other));
1205 #endif  
1206   if (GNUNET_OK !=
1207       GNUNET_HELLO_get_id ((const struct GNUNET_HELLO_Message*) message,
1208                            &pid))
1209     {
1210       GNUNET_break_op (0);
1211       return GNUNET_SYSERR;
1212     }
1213   GNUNET_STATISTICS_update (stats,
1214                             gettext_noop ("# HELLO messages received"),
1215                             1,
1216                             GNUNET_NO);
1217   peer = GNUNET_CONTAINER_multihashmap_get (peers,
1218                                             &pid.hashPubKey);
1219   if (peer == NULL)
1220     {
1221       if ( (GNUNET_YES == friends_only) ||
1222            (friend_count < minimum_friend_count) )
1223         return GNUNET_OK;      
1224     }
1225   else
1226     {
1227       if ( (GNUNET_YES != peer->is_friend) &&
1228            (GNUNET_YES == friends_only) )
1229         return GNUNET_OK;
1230       if ( (GNUNET_YES != peer->is_friend) &&
1231            (friend_count < minimum_friend_count) )
1232         return GNUNET_OK;      
1233     }
1234   if (transport != NULL)
1235     GNUNET_TRANSPORT_offer_hello (transport,
1236                                   message);
1237   return GNUNET_OK;
1238 }
1239
1240
1241 /**
1242  * Function to fill send buffer with HELLO.
1243  *
1244  * @param cls 'struct Peer' of the target peer
1245  * @param size number of bytes available in buf
1246  * @param buf where the callee should write the message
1247  * @return number of bytes written to buf
1248  */
1249 static size_t
1250 hello_advertising_ready (void *cls,
1251                          size_t size,
1252                          void *buf)
1253 {
1254   struct Peer *pl = cls;
1255   struct FindAdvHelloContext fah;
1256   size_t want;
1257
1258   pl->hello_req = NULL;
1259   /* find applicable HELLOs */
1260   fah.peer = pl;
1261   fah.result = NULL;
1262   fah.max_size = size;
1263   fah.next_adv = GNUNET_TIME_UNIT_FOREVER_REL;
1264   GNUNET_CONTAINER_multihashmap_iterate (peers,
1265                                          &find_advertisable_hello,
1266                                          &fah);
1267   want = 0;
1268   if (fah.result != NULL)
1269     {
1270       want = GNUNET_HELLO_size (fah.result->hello);
1271       GNUNET_assert (want <= size);
1272       memcpy (buf, fah.result->hello, want);
1273       GNUNET_CONTAINER_bloomfilter_add (fah.result->filter,
1274                                         &pl->pid.hashPubKey);
1275 #if DEBUG_TOPOLOGY
1276       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1277                   "Sending `%s' with %u bytes",
1278                   "HELLO",
1279                   (unsigned int) want);
1280 #endif  
1281       GNUNET_STATISTICS_update (stats,
1282                                 gettext_noop ("# HELLO messages gossipped"),
1283                                 1,
1284                                 GNUNET_NO);    
1285     }
1286   pl->next_hello_allowed = GNUNET_TIME_relative_to_absolute (HELLO_ADVERTISEMENT_MIN_FREQUENCY);
1287   pl->hello_delay_task 
1288     = GNUNET_SCHEDULER_add_now (sched,
1289                                 &schedule_next_hello,
1290                                 pl);
1291   return want;
1292 }
1293
1294
1295 /**
1296  * Last task run during shutdown.  Disconnects us from
1297  * the transport and core.
1298  *
1299  * @param cls unused, NULL
1300  * @param tc scheduler context
1301  */
1302 static void
1303 cleaning_task (void *cls, 
1304                const struct GNUNET_SCHEDULER_TaskContext *tc)
1305 {
1306   if (NULL != peerinfo_notify)
1307     {
1308       GNUNET_PEERINFO_notify_cancel (peerinfo_notify);
1309       peerinfo_notify = NULL;
1310     }
1311   GNUNET_TRANSPORT_disconnect (transport);
1312   transport = NULL;
1313   GNUNET_CONTAINER_multihashmap_iterate (peers,
1314                                          &free_peer,
1315                                          NULL);
1316   GNUNET_CONTAINER_multihashmap_destroy (peers);
1317   if (handle != NULL)
1318     {
1319       GNUNET_CORE_disconnect (handle);
1320       handle = NULL;
1321     }
1322   whitelist_peers ();
1323   if (stats != NULL)
1324     {
1325       GNUNET_STATISTICS_destroy (stats, GNUNET_NO);
1326       stats = NULL;
1327     }
1328 }
1329
1330
1331 /**
1332  * Main function that will be run.
1333  *
1334  * @param cls closure
1335  * @param s the scheduler to use
1336  * @param args remaining command-line arguments
1337  * @param cfgfile name of the configuration file used (for saving, can be NULL!)
1338  * @param c configuration
1339  */
1340 static void
1341 run (void *cls,
1342      struct GNUNET_SCHEDULER_Handle * s,
1343      char *const *args,
1344      const char *cfgfile,
1345      const struct GNUNET_CONFIGURATION_Handle * c)
1346 {
1347   struct GNUNET_CORE_MessageHandler handlers[] =
1348     {
1349       { &handle_encrypted_hello, GNUNET_MESSAGE_TYPE_HELLO, 0},
1350       { NULL, 0, 0 }
1351     };
1352   unsigned long long opt;
1353
1354   sched = s;
1355   cfg = c;
1356   stats = GNUNET_STATISTICS_create (sched, "topology", cfg);
1357   autoconnect = GNUNET_CONFIGURATION_get_value_yesno (cfg,
1358                                                       "TOPOLOGY",
1359                                                       "AUTOCONNECT");
1360   friends_only = GNUNET_CONFIGURATION_get_value_yesno (cfg,
1361                                                        "TOPOLOGY",
1362                                                        "FRIENDS-ONLY");
1363   if (GNUNET_OK !=
1364       GNUNET_CONFIGURATION_get_value_number (cfg,
1365                                              "TOPOLOGY",
1366                                              "MINIMUM-FRIENDS",
1367                                              &opt))
1368     opt = 0;
1369   minimum_friend_count = (unsigned int) opt;
1370   if (GNUNET_OK !=
1371       GNUNET_CONFIGURATION_get_value_number (cfg,
1372                                              "TOPOLOGY",
1373                                              "TARGET-CONNECTION-COUNT",
1374                                              &opt))
1375     opt = 16;
1376   target_connection_count = (unsigned int) opt;
1377   peers = GNUNET_CONTAINER_multihashmap_create (target_connection_count * 2);
1378
1379   if ( (friends_only == GNUNET_YES) ||
1380        (minimum_friend_count > 0) )
1381     read_friends_file (cfg);
1382 #if DEBUG_TOPOLOGY
1383   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1384               "Topology would like %u connections with at least %u friends (%s)\n",
1385               target_connection_count,
1386               minimum_friend_count,
1387               autoconnect ? "autoconnect enabled" : "autoconnect disabled");
1388 #endif       
1389   if (friend_count < minimum_friend_count) 
1390     blacklist = GNUNET_TRANSPORT_blacklist (sched, cfg,
1391                                             &blacklist_check, NULL);
1392   transport = GNUNET_TRANSPORT_connect (sched,
1393                                         cfg,
1394                                         NULL,
1395                                         NULL,
1396                                         NULL,
1397                                         NULL,
1398                                         NULL);
1399   handle = GNUNET_CORE_connect (sched,
1400                                 cfg,
1401                                 GNUNET_TIME_UNIT_FOREVER_REL,
1402                                 NULL,
1403                                 &core_init,
1404                                 &connect_notify,
1405                                 &disconnect_notify, 
1406                                 NULL,
1407                                 NULL, GNUNET_NO,
1408                                 NULL, GNUNET_NO,
1409                                 handlers);
1410   GNUNET_SCHEDULER_add_delayed (sched,
1411                                 GNUNET_TIME_UNIT_FOREVER_REL,
1412                                 &cleaning_task, NULL);
1413   if (NULL == transport)
1414     {
1415       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1416                   _("Failed to connect to `%s' service.\n"),
1417                   "transport");
1418       GNUNET_SCHEDULER_shutdown (sched);
1419       return;
1420     }
1421   if (NULL == handle)
1422     {
1423       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1424                   _("Failed to connect to `%s' service.\n"),
1425                   "core");
1426       GNUNET_SCHEDULER_shutdown (sched);
1427       return;
1428     }
1429 }
1430
1431
1432 /**
1433  * The main function for the topology daemon.
1434  *
1435  * @param argc number of arguments from the command line
1436  * @param argv command line arguments
1437  * @return 0 ok, 1 on error
1438  */
1439 int
1440 main (int argc, char *const *argv)
1441 {
1442   static const struct GNUNET_GETOPT_CommandLineOption options[] = {
1443     GNUNET_GETOPT_OPTION_END
1444   };
1445   int ret;
1446
1447   ret = (GNUNET_OK ==
1448          GNUNET_PROGRAM_run (argc,
1449                              argv,
1450                              "topology",
1451                              _("GNUnet topology control (maintaining P2P mesh and F2F constraints)"),
1452                              options,
1453                              &run, NULL)) ? 0 : 1;
1454   return ret;
1455 }
1456
1457 /* end of gnunet-daemon-topology.c */