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