Fixed a memory leak when receiving a second create path for the same tunnel
[oweals/gnunet.git] / src / mesh / mesh_tunnel_tree.c
1 /*
2      This file is part of GNUnet.
3      (C) 2001 - 2011 Christian Grothoff (and other contributing authors)
4
5      GNUnet is free software; you can redistribute it and/or modify
6      it under the terms of the GNU General Public License as published
7      by the Free Software Foundation; either version 3, or (at your
8      option) any later version.
9
10      GNUnet is distributed in the hope that it will be useful, but
11      WITHOUT ANY WARRANTY; without even the implied warranty of
12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13      General Public License for more details.
14
15      You should have received a copy of the GNU General Public License
16      along with GNUnet; see the file COPYING.  If not, write to the
17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18      Boston, MA 02111-1307, USA.
19 */
20
21 /**
22  * @file mesh/mesh_tunnel_tree.c
23  * @brief Tunnel tree handling functions
24  * @author Bartlomiej Polot
25  */
26
27 #include "mesh.h"
28 #include "mesh_tunnel_tree.h"
29
30 #define MESH_TREE_DEBUG GNUNET_YES
31
32
33 /**
34  * Create a new path
35  *
36  * @param lenght How many hops will the path have.
37  *
38  * @return A newly allocated path with a peer array of the specified length.
39  */
40 struct MeshPeerPath *
41 path_new (unsigned int length)
42 {
43   struct MeshPeerPath *p;
44
45   p = GNUNET_malloc (sizeof(struct MeshPeerPath));
46   if (length > 0)
47   {
48     p->length = length;
49     p->peers = GNUNET_malloc (length * sizeof(GNUNET_PEER_Id));
50   }
51   return p;
52 }
53
54
55 /**
56  * Invert the path
57  *
58  * @param p the path to invert
59  */
60 void
61 path_invert (struct MeshPeerPath *path)
62 {
63   GNUNET_PEER_Id aux;
64   unsigned int i;
65
66   for (i = 0; i < path->length / 2; i++)
67   {
68     aux = path->peers[i];
69     path->peers[i] = path->peers[path->length - i - 1];
70     path->peers[path->length - i - 1] = aux;
71   }
72 }
73
74
75 /**
76  * Duplicate a path, incrementing short peer's rc.
77  *
78  * @param p The path to duplicate.
79  */
80 struct MeshPeerPath *
81 path_duplicate (struct MeshPeerPath *path)
82 {
83   struct MeshPeerPath *aux;
84   unsigned int i;
85
86   aux = path_new(path->length);
87   memcpy (aux->peers, path->peers, path->length * sizeof(GNUNET_PEER_Id));
88   for (i = 0; i < path->length; i++)
89     GNUNET_PEER_change_rc(path->peers[i], 1);
90   return aux;
91 }
92
93
94 /**
95  * Find the first peer whom to send a packet to go down this path
96  *
97  * @param t The tunnel tree to use
98  * @param peer The peerinfo of the peer we are trying to reach
99  *
100  * @return peerinfo of the peer who is the first hop in the tunnel
101  *         NULL on error
102  */
103 struct GNUNET_PeerIdentity *
104 path_get_first_hop (struct MeshTunnelTree *t, GNUNET_PEER_Id peer)
105 {
106   struct GNUNET_PeerIdentity id;
107   struct GNUNET_PeerIdentity *r;
108
109   GNUNET_PEER_resolve (peer, &id);
110   r = GNUNET_CONTAINER_multihashmap_get (t->first_hops, &id.hashPubKey);
111   GNUNET_break (NULL != r);
112
113   return r;
114 }
115
116
117 /**
118  * Get the length of a path
119  *
120  * @param path The path to measure, with the local peer at any point of it
121  *
122  * @return Number of hops to reach destination
123  *         UINT_MAX in case the peer is not in the path
124  */
125 unsigned int
126 path_get_length (struct MeshPeerPath *path)
127 {
128   if (NULL == path)
129     return UINT_MAX;
130   return path->length;
131 }
132
133
134 /**
135  * Get the cost of the path relative to the already built tunnel tree
136  *
137  * @param t The tunnel tree to which compare
138  * @param path The individual path to reach a peer
139  *
140  * @return Number of hops to reach destination, UINT_MAX in case the peer is not
141  * in the path
142  *
143  * TODO: remove dummy implementation, look into the tunnel tree
144  */
145 unsigned int
146 path_get_cost (struct MeshTunnelTree *t, struct MeshPeerPath *path)
147 {
148   return path_get_length (path);
149 }
150
151
152 /**
153  * Destroy the path and free any allocated resources linked to it
154  *
155  * @param p the path to destroy
156  *
157  * @return GNUNET_OK on success
158  */
159 int
160 path_destroy (struct MeshPeerPath *p)
161 {
162   if (NULL == p)
163     return GNUNET_OK;
164   GNUNET_PEER_decrement_rcs (p->peers, p->length);
165   GNUNET_free (p->peers);
166   GNUNET_free (p);
167   return GNUNET_OK;
168 }
169
170
171
172 /**
173  * Allocates and initializes a new node.
174  * Sets ID and parent of the new node and inserts it in the DLL of the parent
175  *
176  * @param parent Node that will be the parent from the new node, NULL for root
177  * @param peer Short Id of the new node
178  *
179  * @return Newly allocated node
180  */
181 static struct MeshTunnelTreeNode *
182 tree_node_new(struct MeshTunnelTreeNode *parent, GNUNET_PEER_Id peer)
183 {
184   struct MeshTunnelTreeNode *node;
185
186   node = GNUNET_malloc(sizeof(struct MeshTunnelTreeNode));
187   node->peer = peer;
188   GNUNET_PEER_change_rc(peer, 1);
189   node->parent = parent;
190   if (NULL != parent)
191     GNUNET_CONTAINER_DLL_insert(parent->children_head,
192                                 parent->children_tail,
193                                 node);
194
195   return node;
196 }
197
198
199 static void
200 tree_node_debug(struct MeshTunnelTreeNode *n, uint16_t level)
201 {
202   struct MeshTunnelTreeNode *c;
203   struct GNUNET_PeerIdentity id;;
204   uint16_t i;
205
206   for (i = 0; i < level; i++)
207     fprintf(stderr, "  ");
208   if (n->status == MESH_PEER_READY)
209     fprintf(stderr, "#");
210   if (n->status == MESH_PEER_SEARCHING)
211     fprintf(stderr, "+");
212   if (n->status == MESH_PEER_RELAY)
213     fprintf(stderr, "-");
214   if (n->status == MESH_PEER_RECONNECTING)
215     fprintf(stderr, "*");
216
217   GNUNET_PEER_resolve(n->peer, &id);
218   fprintf(stderr, "%s, [%u, %p] ", GNUNET_i2s (&id), n->peer, n);
219   if (NULL != n->parent)
220   {
221     GNUNET_PEER_resolve(n->parent->peer, &id);
222     fprintf(stderr, "(-> %s [%u])\n", GNUNET_i2s(&id), n->parent->peer);
223   }
224   else
225     fprintf(stderr, "(root)\n");
226   for (c = n->children_head; NULL != c; c = c->next)
227     tree_node_debug(c, level + 1);
228 }
229
230
231 /**
232  * Destroys and frees the node and all children
233  *
234  * @param n Parent node to be destroyed
235  */
236 static void
237 tree_node_destroy (struct MeshTunnelTreeNode *parent)
238 {
239   struct MeshTunnelTreeNode *n;
240   struct MeshTunnelTreeNode *next;
241 #if MESH_TREE_DEBUG
242   struct GNUNET_PeerIdentity id;
243
244   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
245               "tree: Destroying node %u\n",
246               parent->peer);
247   GNUNET_PEER_resolve (parent->peer, &id);
248   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
249               "tree:   (%s)\n",
250               GNUNET_i2s (&id));
251 #endif
252   n = parent->children_head;
253   while (NULL != n)
254   {
255     next = n->next;
256     tree_node_destroy(n);
257     n = next;
258   }
259   GNUNET_PEER_change_rc(parent->peer, -1);
260   if (NULL != parent->parent)
261     GNUNET_CONTAINER_DLL_remove(parent->parent->children_head,
262                                 parent->parent->children_tail,
263                                 parent);
264   GNUNET_free(parent);
265 }
266
267
268
269 /**
270  * Create a new tunnel tree associated to a tunnel
271  *
272  * @param t Tunnel this tree will represent
273  * @param peer A short peer id of the root of the tree
274  *
275  * @return A newly allocated and initialized tunnel tree
276  */
277 struct MeshTunnelTree *
278 tree_new (struct MeshTunnel *t, GNUNET_PEER_Id peer)
279 {
280   struct MeshTunnelTree *tree;
281
282   tree = GNUNET_malloc(sizeof (struct MeshTunnelTree));
283   tree->first_hops = GNUNET_CONTAINER_multihashmap_create(32);
284   tree->root = tree_node_new(NULL, peer);
285   tree->root->status = MESH_PEER_ROOT;
286   tree->t = t;
287   tree->root->t = t;
288
289   return tree;
290 }
291
292
293 /**
294  * Recursively find the given peer in the tree.
295  *
296  * @param t Tunnel where to look for the peer.
297  * @param peer Peer to find
298  *
299  * @return Pointer to the node of the peer. NULL if not found.
300  */
301 struct MeshTunnelTreeNode *
302 tree_find_peer (struct MeshTunnelTreeNode *parent, GNUNET_PEER_Id peer_id)
303 {
304   struct MeshTunnelTreeNode *n;
305   struct MeshTunnelTreeNode *r;
306
307   if (parent->peer == peer_id)
308     return parent;
309   for (n = parent->children_head; NULL != n; n = n->next)
310   {
311     r = tree_find_peer (n, peer_id);
312     if (NULL != r)
313       return r;
314   }
315   return NULL;
316 }
317
318
319 /**
320  * Recusively mark peer and children as disconnected, notify client
321  *
322  * @param tree Tree this node belongs to
323  * @param parent Node to be clean, potentially with children
324  * @param cb Callback to use to notify about disconnected peers.
325  */
326 static void
327 tree_mark_peers_disconnected (struct MeshTunnelTree *tree,
328                               struct MeshTunnelTreeNode *parent,
329                               MeshNodeDisconnectCB cb)
330 {
331   struct GNUNET_PeerIdentity *pi;
332   struct GNUNET_PeerIdentity id;
333   struct MeshTunnelTreeNode *n;
334
335   for (n = parent->children_head; NULL != n; n = n->next)
336   {
337     tree_mark_peers_disconnected (tree, n, cb);
338   }
339   if (MESH_PEER_READY == parent->status)
340   {
341     if (NULL != cb)
342       cb (parent);
343     parent->status = MESH_PEER_RECONNECTING;
344   }
345
346   /* Remove and free info about first hop */
347   GNUNET_PEER_resolve(parent->peer, &id);
348   pi = GNUNET_CONTAINER_multihashmap_get(tree->first_hops, &id.hashPubKey);
349   GNUNET_CONTAINER_multihashmap_remove_all(tree->first_hops, &id.hashPubKey);
350   if (NULL != pi)
351     GNUNET_free(pi);
352 }
353
354
355 /**
356  * Recusively update the info about what is the first hop to reach the node
357  *
358  * @param tree Tree this nodes belongs to
359  * @param parent Node to be start updating
360  * @param hop If known, ID of the first hop.
361  *            If not known, NULL to find out and pass on children.
362  */
363 void
364 tree_update_first_hops (struct MeshTunnelTree *tree,
365                         struct MeshTunnelTreeNode *parent,
366                         struct GNUNET_PeerIdentity *hop)
367 {
368   struct GNUNET_PeerIdentity pi;
369   struct GNUNET_PeerIdentity *copy;
370   struct GNUNET_PeerIdentity id;
371   struct MeshTunnelTreeNode *n;
372
373 #if MESH_TREE_DEBUG
374   GNUNET_PEER_resolve(parent->peer, &id);
375   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
376           "tree:   Finding first hop for %s.\n",
377           GNUNET_i2s (&id));
378 #endif
379   if (NULL == hop)
380   {
381     struct MeshTunnelTreeNode *aux;
382     struct MeshTunnelTreeNode *old;
383
384     aux = old = parent;
385     while (aux != tree->me)
386     {
387 #if MESH_TREE_DEBUG
388       GNUNET_PEER_resolve(old->peer, &id);
389       GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
390              "tree:   ... its not %s.\n",
391              GNUNET_i2s (&id));
392 #endif
393       old = aux;
394       aux = aux->parent;
395       GNUNET_assert(NULL != aux);
396     }
397 #if MESH_TREE_DEBUG
398     GNUNET_PEER_resolve(old->peer, &id);
399     GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
400                "tree:   It's %s!\n",
401                GNUNET_i2s (&id));
402 #endif
403     hop = &pi;
404     GNUNET_PEER_resolve(old->peer, hop);
405   }
406   GNUNET_PEER_resolve(parent->peer, &id);
407   copy = GNUNET_CONTAINER_multihashmap_get (tree->first_hops, &id.hashPubKey);
408   if (NULL == copy)
409     copy = GNUNET_malloc(sizeof(struct GNUNET_PeerIdentity));
410   *copy = *hop;
411
412   (void) GNUNET_CONTAINER_multihashmap_put(
413     tree->first_hops,
414     &id.hashPubKey,
415     copy,
416     GNUNET_CONTAINER_MULTIHASHMAPOPTION_REPLACE);
417
418   for (n = parent->children_head; NULL != n; n = n->next)
419   {
420     tree_update_first_hops (tree, n, hop);
421   }
422 }
423
424
425 /**
426  * Delete the current path to the peer, including all now unused relays.
427  * The destination peer is NOT destroyed, it is returned in order to either set
428  * a new path to it or destroy it explicitly, taking care of it's child nodes.
429  *
430  * @param t Tunnel tree where to delete the path from.
431  * @param peer Destination peer whose path we want to remove.
432  * @param cb Callback to use to notify about disconnected peers.
433  *
434  * @return pointer to the pathless node.
435  *         NULL when not found
436  */
437 struct MeshTunnelTreeNode *
438 tree_del_path (struct MeshTunnelTree *t,
439                GNUNET_PEER_Id peer_id,
440                MeshNodeDisconnectCB cb)
441 {
442   struct MeshTunnelTreeNode *parent;
443   struct MeshTunnelTreeNode *node;
444   struct MeshTunnelTreeNode *n;
445
446 #if MESH_TREE_DEBUG
447   struct GNUNET_PeerIdentity id;
448   GNUNET_PEER_resolve(peer_id, &id);
449   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
450           "tree:   Deleting path to %s.\n",
451           GNUNET_i2s (&id));
452 #endif
453   if (peer_id == t->root->peer)
454     return NULL;
455
456   for (n = t->disconnected_head; NULL != n; n = n->next)
457   {
458     if (n->peer == peer_id)
459     {
460       /* Was already pathless, waiting for reconnection */
461       GNUNET_CONTAINER_DLL_remove (t->disconnected_head,
462                                    t->disconnected_tail,
463                                    n);
464       return n;
465     }
466   }
467   n = tree_find_peer (t->root, peer_id);
468   if (NULL == n)
469     return NULL;
470   node = n;
471
472   parent = n->parent;
473   GNUNET_CONTAINER_DLL_remove(parent->children_head, parent->children_tail, n);
474   n->parent = NULL;
475
476   while (MESH_PEER_RELAY == parent->status && NULL == parent->children_head)
477   {
478 #if MESH_TREE_DEBUG
479     GNUNET_PEER_resolve(parent->peer, &id);
480     GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
481               "tree:   Deleting node %s.\n",
482               GNUNET_i2s (&id));
483 #endif
484     n = parent->parent;
485     tree_node_destroy(parent);
486     parent = n;
487   }
488 #if MESH_TREE_DEBUG
489   GNUNET_PEER_resolve(parent->peer, &id);
490   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
491              "tree:   Not deleted peer %s.\n",
492              GNUNET_i2s (&id));
493 #endif
494
495   tree_mark_peers_disconnected (t, node, cb);
496
497   return node;
498 }
499
500
501 /**
502  * Return a newly allocated individual path to reach a peer from the local peer,
503  * according to the path tree of some tunnel.
504  *
505  * @param t Tunnel from which to read the path tree
506  * @param peer_info Destination peer to whom we want a path
507  *
508  * @return A newly allocated individual path to reach the destination peer.
509  *         Path must be destroyed afterwards.
510  */
511 struct MeshPeerPath *
512 tree_get_path_to_peer(struct MeshTunnelTree *t, GNUNET_PEER_Id peer)
513 {
514   struct MeshTunnelTreeNode *n;
515   struct MeshPeerPath *p;
516   GNUNET_PEER_Id myid = t->me->peer;
517
518   n = tree_find_peer(t->me, peer);
519   if (NULL == n)
520     return NULL;
521   p = path_new(0);
522
523   /* Building the path (inverted!) */
524   while (n->peer != myid)
525   {
526     GNUNET_array_append(p->peers, p->length, n->peer);
527     GNUNET_PEER_change_rc(n->peer, 1);
528     n = n->parent;
529     GNUNET_assert(NULL != n);
530   }
531   GNUNET_array_append(p->peers, p->length, myid);
532   GNUNET_PEER_change_rc(myid, 1);
533
534   path_invert(p);
535
536   return p;
537 }
538
539
540
541 /**
542  * Integrate a stand alone path into the tunnel tree.
543  * If the peer toward which the new path is already in the tree, the peer
544  * and its children will be maked as disconnected and the callback
545  * will be called on each one of them. They will be maked as online only after
546  * receiving a PATH ACK for the new path for each one of them, so the caller
547  * should take care of sending a new CREATE PATH message for each disconnected
548  * peer.
549  *
550  * @param t Tunnel where to add the new path.
551  * @param p Path to be integrated.
552  * @param cb Callback to use to notify about peers temporarily disconnecting
553  *
554  * @return GNUNET_OK in case of success.
555  *         GNUNET_SYSERR in case of error.
556  *
557  * TODO: optimize
558  * - go backwards on path looking for each peer in the present tree
559  * - do not disconnect peers until new path is created & connected
560  */
561 int
562 tree_add_path (struct MeshTunnelTree *t,
563                const struct MeshPeerPath *p,
564                MeshNodeDisconnectCB cb)
565 {
566   struct MeshTunnelTreeNode *parent;
567   struct MeshTunnelTreeNode *oldnode;
568   struct MeshTunnelTreeNode *n;
569   struct MeshTunnelTreeNode *c;
570   struct GNUNET_PeerIdentity id;
571   GNUNET_PEER_Id myid;
572   int me;
573 //   int oldnode_is_me;
574   unsigned int i;
575
576 #if MESH_TREE_DEBUG
577   GNUNET_PEER_resolve(p->peers[p->length - 1], &id);
578   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
579              "tree:   Adding path [%u] towards peer %s.\n",
580             p->length,
581             GNUNET_i2s (&id));
582 #endif
583
584   if (NULL != t->me)
585     myid = t->me->peer;
586   else
587     myid = 0;
588   GNUNET_assert(0 != p->length);
589   parent = n = t->root;
590   if (n->peer != p->peers[0])
591   {
592     GNUNET_break (0);
593     return GNUNET_SYSERR;
594   }
595   if (1 == p->length)
596     return GNUNET_OK;
597   oldnode = tree_del_path (t, p->peers[p->length - 1], cb);
598   /* Look for the first node that is not already present in the tree
599    *
600    * Assuming that the tree is somewhat balanced, O(log n * log N).
601    * - Length of the path is expected to be log N (size of whole network).
602    * - Each level of the tree is expected to have log n children (size of tree).
603    */
604   me = t->root->peer == myid ? 0 : -1;
605   for (i = 1; i < p->length; i++)
606   {
607 #if MESH_TREE_DEBUG
608     GNUNET_PEER_resolve(p->peers[i], &id);
609     GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
610                "tree:   Looking for peer %s.\n",
611                GNUNET_i2s (&id));
612 #endif
613     parent = n;
614     if (p->peers[i] == myid)
615       me = i;
616     for (c = n->children_head; NULL != c; c = c->next)
617     {
618       if (c->peer == p->peers[i])
619       {
620 #if MESH_TREE_DEBUG
621         GNUNET_PEER_resolve(parent->peer, &id);
622         GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
623                    "tree:   Found in children of %s.\n",
624                    GNUNET_i2s (&id));
625 #endif
626         n = c;
627         break;
628       }
629     }
630     /*  If we couldn't find a child equal to path[i], we have reached the end
631      * of the common path. */
632     if (parent == n)
633       break;
634   }
635 #if MESH_TREE_DEBUG
636   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
637              "tree:   All childen visited.\n");
638 #endif
639   /* Add the rest of the path as a branch from parent. */
640   while (i < p->length)
641   {
642 #if MESH_TREE_DEBUG
643     GNUNET_PEER_resolve(p->peers[i], &id);
644     GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
645                "tree:   Adding  peer %s.\n",
646                GNUNET_i2s (&id));
647     GNUNET_PEER_resolve(parent->peer, &id);
648     GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
649                "tree:     to %s.\n",
650                GNUNET_i2s (&id));
651 #endif
652
653     if (i == p->length - 1 && NULL != oldnode)
654     {
655 #if MESH_TREE_DEBUG
656       GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
657                  "tree:   Putting old node into place.\n");
658 #endif
659       oldnode->parent = parent;
660       GNUNET_CONTAINER_DLL_insert(parent->children_head,
661                                   parent->children_tail,
662                                   oldnode);
663       tree_update_first_hops (t, oldnode, NULL);
664       n = oldnode;
665     }
666     else
667     {
668 #if MESH_TREE_DEBUG
669       GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "tree:   Creating new node.\n");
670 #endif
671       n = tree_node_new(parent, p->peers[i]);
672       n->t = t->t;
673       n->status = MESH_PEER_RELAY;
674     }
675     i++;
676     parent = n;
677   }
678   n->status = MESH_PEER_SEARCHING;
679
680   /* Add info about first hop into hashmap. */
681   if (-1 != me && me < p->length - 1)
682   {
683 #if MESH_TREE_DEBUG
684     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
685                 "MESH:   finding first hop (own pos %d/%u)\n",
686                 me, p->length - 1);
687 #endif
688     GNUNET_PEER_resolve (p->peers[me + 1], &id);
689     tree_update_first_hops(t,
690                            tree_find_peer(t->root, p->peers[p->length - 1]),
691                            &id);
692   }
693 #if MESH_TREE_DEBUG
694   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "tree:   New node added.\n");
695 #endif
696   return GNUNET_OK;
697 }
698
699
700 /**
701  * Notifies a tree that a connection it might be using is broken.
702  * Marks all peers down the paths as disconnected and notifies the client.
703  *
704  * @param t Tree to use.
705  * @param p1 Short id of one of the peers (order unimportant)
706  * @param p2 Short id of one of the peers (order unimportant)
707  * @param cb Function to call for every peer that is marked as disconnected.
708  *
709  * @return Short ID of the first disconnected peer in the tree.
710  */
711 GNUNET_PEER_Id
712 tree_notify_connection_broken (struct MeshTunnelTree *t,
713                                GNUNET_PEER_Id p1,
714                                GNUNET_PEER_Id p2,
715                                MeshNodeDisconnectCB cb)
716 {
717   struct MeshTunnelTreeNode *n;
718   struct MeshTunnelTreeNode *c;
719
720   n = tree_find_peer(t->me, p1);
721   if (NULL == n)
722     return 0;
723   if (NULL != n->parent && n->parent->peer == p2)
724   {
725     tree_mark_peers_disconnected(t, n, cb);
726     GNUNET_CONTAINER_DLL_remove(n->parent->children_head,
727                                 n->parent->children_tail,
728                                 n);
729     GNUNET_CONTAINER_DLL_insert(t->disconnected_head,
730                                 t->disconnected_tail,
731                                 n);
732     return p1;
733   }
734   for (c = n->children_head; NULL != c; c = c->next)
735   {
736     if (c->peer == p2)
737     {
738       tree_mark_peers_disconnected(t, c, cb);
739       GNUNET_CONTAINER_DLL_remove(n->children_head,
740                                   n->children_tail,
741                                   c);
742       GNUNET_CONTAINER_DLL_insert(t->disconnected_head,
743                                   t->disconnected_tail,
744                                   c);
745       return p2;
746     }
747   }
748   return 0;
749 }
750
751
752 /**
753  * Deletes a peer from a tunnel, liberating all unused resources on the path to
754  * it. It shouldn't have children, if it has they will be destroyed as well.
755  * If the tree is not local and no longer has any paths, the root node will be
756  * destroyed and marked as NULL.
757  *
758  * @param t Tunnel tree to use.
759  * @param peer Short ID of the peer to remove from the tunnel tree.
760  * @param cb Callback to notify client of disconnected peers.
761  *
762  * @return GNUNET_OK or GNUNET_SYSERR
763  */
764 int
765 tree_del_peer (struct MeshTunnelTree *t,
766                GNUNET_PEER_Id peer,
767                MeshNodeDisconnectCB cb)
768 {
769   struct MeshTunnelTreeNode *n;
770
771   n = tree_del_path(t, peer, cb);
772   if (NULL == n)
773     return GNUNET_SYSERR;
774   GNUNET_break_op (NULL == n->children_head);
775   tree_node_destroy(n);
776   if (NULL == t->root->children_head && t->me != t->root)
777   {
778     tree_node_destroy (t->root);
779     t->root = NULL;
780   }
781   return GNUNET_OK;
782 }
783
784
785 /**
786  * Print the tree on stderr
787  *
788  * @param t The tree
789  */
790 void
791 tree_debug(struct MeshTunnelTree *t)
792 {
793   tree_node_debug(t->root, 0);
794 }
795
796
797 /**
798  * Iterator over hash map peer entries and frees all data in it.
799  * Used prior to destroying a hashmap. Makes you miss anonymous functions in C.
800  *
801  * @param cls closure
802  * @param key current key code (will no longer contain valid data!!)
803  * @param value value in the hash map (treated as void *)
804  * @return GNUNET_YES if we should continue to iterate, GNUNET_NO if not.
805  */
806 static int
807 iterate_free (void *cls, const GNUNET_HashCode * key, void *value)
808 {
809   GNUNET_free(value);
810   return GNUNET_YES;
811 }
812
813
814 /**
815  * Destroy the whole tree and free all used memory and Peer_Ids
816  * 
817  * @param t Tree to be destroyed
818  */
819 void
820 tree_destroy (struct MeshTunnelTree *t)
821 {
822 #if MESH_TREE_DEBUG
823   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "tree: Destroying tree\n");
824 #endif
825   tree_node_destroy(t->root);
826   GNUNET_CONTAINER_multihashmap_iterate(t->first_hops, &iterate_free, NULL);
827   GNUNET_CONTAINER_multihashmap_destroy(t->first_hops);
828   GNUNET_free(t);
829 }