Only allow one EPHM/PONG in the queue.
[oweals/gnunet.git] / src / cadet / gnunet-service-cadet_connection.c
1 /*
2      This file is part of GNUnet.
3      (C) 2001-2013 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 cadet/gnunet-service-cadet_connection.c
23  * @brief GNUnet CADET service connection handling
24  * @author Bartlomiej Polot
25  */
26
27 #include "platform.h"
28 #include "gnunet_util_lib.h"
29
30 #include "gnunet_statistics_service.h"
31
32 #include "cadet_path.h"
33 #include "cadet_protocol.h"
34 #include "cadet.h"
35 #include "gnunet-service-cadet_connection.h"
36 #include "gnunet-service-cadet_peer.h"
37 #include "gnunet-service-cadet_tunnel.h"
38
39
40 #define LOG(level, ...) GNUNET_log_from (level,"cadet-con",__VA_ARGS__)
41 #define LOG2(level, ...) GNUNET_log_from_nocheck(level,"cadet-con",__VA_ARGS__)
42
43
44 #define CADET_MAX_POLL_TIME      GNUNET_TIME_relative_multiply (\
45                                   GNUNET_TIME_UNIT_MINUTES,\
46                                   10)
47 #define AVG_MSGS                32
48
49
50 /******************************************************************************/
51 /********************************   STRUCTS  **********************************/
52 /******************************************************************************/
53
54 /**
55  * Struct to encapsulate all the Flow Control information to a peer to which
56  * we are directly connected (on a core level).
57  */
58 struct CadetFlowControl
59 {
60   /**
61    * Connection this controls.
62    */
63   struct CadetConnection *c;
64
65   /**
66    * How many messages are in the queue on this connection.
67    */
68   unsigned int queue_n;
69
70   /**
71    * How many messages do we accept in the queue.
72    */
73   unsigned int queue_max;
74
75   /**
76    * ID of the last packet sent towards the peer.
77    */
78   uint32_t last_pid_sent;
79
80   /**
81    * ID of the last packet received from the peer.
82    */
83   uint32_t last_pid_recv;
84
85   /**
86    * Last ACK sent to the peer (peer can't send more than this PID).
87    */
88   uint32_t last_ack_sent;
89
90   /**
91    * Last ACK sent towards the origin (for traffic towards leaf node).
92    */
93   uint32_t last_ack_recv;
94
95   /**
96    * Task to poll the peer in case of a lost ACK causes stall.
97    */
98   GNUNET_SCHEDULER_TaskIdentifier poll_task;
99
100   /**
101    * How frequently to poll for ACKs.
102    */
103   struct GNUNET_TIME_Relative poll_time;
104
105   /**
106    * Queued poll message, to cancel if not necessary anymore (got ACK).
107    */
108   struct CadetConnectionQueue *poll_msg;
109
110   /**
111    * Queued poll message, to cancel if not necessary anymore (got ACK).
112    */
113   struct CadetConnectionQueue *ack_msg;
114 };
115
116 /**
117  * Keep a record of the last messages sent on this connection.
118  */
119 struct CadetConnectionPerformance
120 {
121   /**
122    * Circular buffer for storing measurements.
123    */
124   double usecsperbyte[AVG_MSGS];
125
126   /**
127    * Running average of @c usecsperbyte.
128    */
129   double avg;
130
131   /**
132    * How many values of @c usecsperbyte are valid.
133    */
134   uint16_t size;
135
136   /**
137    * Index of the next "free" position in @c usecsperbyte.
138    */
139   uint16_t idx;
140 };
141
142
143 /**
144  * Struct containing all information regarding a connection to a peer.
145  */
146 struct CadetConnection
147 {
148   /**
149    * Tunnel this connection is part of.
150    */
151   struct CadetTunnel *t;
152
153   /**
154    * Flow control information for traffic fwd.
155    */
156   struct CadetFlowControl fwd_fc;
157
158   /**
159    * Flow control information for traffic bck.
160    */
161   struct CadetFlowControl bck_fc;
162
163   /**
164    * Measure connection performance on the endpoint.
165    */
166   struct CadetConnectionPerformance *perf;
167
168   /**
169    * ID of the connection.
170    */
171   struct GNUNET_CADET_Hash id;
172
173   /**
174    * State of the connection.
175    */
176   enum CadetConnectionState state;
177
178   /**
179    * Path being used for the tunnel. At the origin of the connection
180    * it's a pointer to the destination's path pool, otherwise just a copy.
181    */
182   struct CadetPeerPath *path;
183
184   /**
185    * Position of the local peer in the path.
186    */
187   unsigned int own_pos;
188
189   /**
190    * Task to keep the used paths alive at the owner,
191    * time tunnel out on all the other peers.
192    */
193   GNUNET_SCHEDULER_TaskIdentifier fwd_maintenance_task;
194
195   /**
196    * Task to keep the used paths alive at the destination,
197    * time tunnel out on all the other peers.
198    */
199   GNUNET_SCHEDULER_TaskIdentifier bck_maintenance_task;
200
201   /**
202    * Queue handle for maintainance traffic. One handle for FWD and BCK since
203    * one peer never needs to maintain both directions (no loopback connections).
204    */
205   struct CadetPeerQueue *maintenance_q;
206
207   /**
208    * Counter to do exponential backoff when creating a connection (max 64).
209    */
210   unsigned short create_retry;
211
212   /**
213    * Pending message count.
214    */
215   unsigned int pending_messages;
216
217   /**
218    * Destroy flag: if true, destroy on last message.
219    */
220   int destroy;
221 };
222
223 /**
224  * Handle for messages queued but not yet sent.
225  */
226 struct CadetConnectionQueue
227 {
228   /**
229    * Peer queue handle, to cancel if necessary.
230    */
231   struct CadetPeerQueue *q;
232
233   /**
234    * Was this a forced message? (Do not account for it)
235    */
236   int forced;
237
238   /**
239    * Continuation to call once sent.
240    */
241   GCC_sent cont;
242
243   /**
244    * Closure for @c cont.
245    */
246   void *cont_cls;
247 };
248
249 /******************************************************************************/
250 /*******************************   GLOBALS  ***********************************/
251 /******************************************************************************/
252
253 /**
254  * Global handle to the statistics service.
255  */
256 extern struct GNUNET_STATISTICS_Handle *stats;
257
258 /**
259  * Local peer own ID (memory efficient handle).
260  */
261 extern GNUNET_PEER_Id myid;
262
263 /**
264  * Local peer own ID (full value).
265  */
266 extern struct GNUNET_PeerIdentity my_full_id;
267
268 /**
269  * Connections known, indexed by cid (CadetConnection).
270  */
271 static struct GNUNET_CONTAINER_MultiHashMap *connections;
272
273 /**
274  * How many connections are we willing to maintain.
275  * Local connections are always allowed, even if there are more connections than max.
276  */
277 static unsigned long long max_connections;
278
279 /**
280  * How many messages *in total* are we willing to queue, divide by number of
281  * connections to get connection queue size.
282  */
283 static unsigned long long max_msgs_queue;
284
285 /**
286  * How often to send path keepalives. Paths timeout after 4 missed.
287  */
288 static struct GNUNET_TIME_Relative refresh_connection_time;
289
290 /**
291  * How often to send path create / ACKs.
292  */
293 static struct GNUNET_TIME_Relative create_connection_time;
294
295
296 /******************************************************************************/
297 /********************************   STATIC  ***********************************/
298 /******************************************************************************/
299
300 #if 0 // avoid compiler warning for unused static function
301 static void
302 fc_debug (struct CadetFlowControl *fc)
303 {
304   LOG (GNUNET_ERROR_TYPE_DEBUG, "    IN: %u/%u\n",
305               fc->last_pid_recv, fc->last_ack_sent);
306   LOG (GNUNET_ERROR_TYPE_DEBUG, "    OUT: %u/%u\n",
307               fc->last_pid_sent, fc->last_ack_recv);
308   LOG (GNUNET_ERROR_TYPE_DEBUG, "    QUEUE: %u/%u\n",
309               fc->queue_n, fc->queue_max);
310 }
311
312 static void
313 connection_debug (struct CadetConnection *c)
314 {
315   if (NULL == c)
316   {
317     LOG (GNUNET_ERROR_TYPE_DEBUG, "*** DEBUG NULL CONNECTION ***\n");
318     return;
319   }
320   LOG (GNUNET_ERROR_TYPE_DEBUG, "Connection %s:%X\n",
321               peer2s (c->t->peer), GCC_2s (c));
322   LOG (GNUNET_ERROR_TYPE_DEBUG, "  state: %u, pending msgs: %u\n",
323               c->state, c->pending_messages);
324   LOG (GNUNET_ERROR_TYPE_DEBUG, "  FWD FC\n");
325   fc_debug (&c->fwd_fc);
326   LOG (GNUNET_ERROR_TYPE_DEBUG, "  BCK FC\n");
327   fc_debug (&c->bck_fc);
328 }
329 #endif
330
331
332 /**
333  * Schedule next keepalive task, taking in consideration
334  * the connection state and number of retries.
335  *
336  * @param c Connection for which to schedule the next keepalive.
337  * @param fwd Direction for the next keepalive.
338  */
339 static void
340 schedule_next_keepalive (struct CadetConnection *c, int fwd);
341
342
343 /**
344  * Resets the connection timeout task, some other message has done the
345  * task's job.
346  * - For the first peer on the direction this means to send
347  *   a keepalive or a path confirmation message (either create or ACK).
348  * - For all other peers, this means to destroy the connection,
349  *   due to lack of activity.
350  * Starts the timeout if no timeout was running (connection just created).
351  *
352  * @param c Connection whose timeout to reset.
353  * @param fwd Is this forward?
354  */
355 static void
356 connection_reset_timeout (struct CadetConnection *c, int fwd);
357
358
359 /**
360  * Get string description for tunnel state. Reentrant.
361  *
362  * @param s Tunnel state.
363  *
364  * @return String representation.
365  */
366 static const char *
367 GCC_state2s (enum CadetConnectionState s)
368 {
369   switch (s)
370   {
371     case CADET_CONNECTION_NEW:
372       return "CADET_CONNECTION_NEW";
373     case CADET_CONNECTION_SENT:
374       return "CADET_CONNECTION_SENT";
375     case CADET_CONNECTION_ACK:
376       return "CADET_CONNECTION_ACK";
377     case CADET_CONNECTION_READY:
378       return "CADET_CONNECTION_READY";
379     case CADET_CONNECTION_DESTROYED:
380       return "CADET_CONNECTION_DESTROYED";
381     case CADET_CONNECTION_BROKEN:
382       return "CADET_CONNECTION_BROKEN";
383     default:
384       GNUNET_break (0);
385       LOG (GNUNET_ERROR_TYPE_ERROR, " conn state %u unknown!\n", s);
386       return "CADET_CONNECTION_STATE_ERROR";
387   }
388 }
389
390
391 /**
392  * Initialize a Flow Control structure to the initial state.
393  *
394  * @param fc Flow Control structure to initialize.
395  */
396 static void
397 fc_init (struct CadetFlowControl *fc)
398 {
399   fc->last_pid_sent = (uint32_t) -1; /* Next (expected) = 0 */
400   fc->last_pid_recv = (uint32_t) -1;
401   fc->last_ack_sent = (uint32_t) 0;
402   fc->last_ack_recv = (uint32_t) 0;
403   fc->poll_task = GNUNET_SCHEDULER_NO_TASK;
404   fc->poll_time = GNUNET_TIME_UNIT_SECONDS;
405   fc->queue_n = 0;
406   fc->queue_max = (max_msgs_queue / max_connections) + 1;
407 }
408
409
410 /**
411  * Find a connection.
412  *
413  * @param cid Connection ID.
414  */
415 static struct CadetConnection *
416 connection_get (const struct GNUNET_CADET_Hash *cid)
417 {
418   return GNUNET_CONTAINER_multihashmap_get (connections, GC_h2hc (cid));
419 }
420
421
422 static void
423 connection_change_state (struct CadetConnection* c,
424                          enum CadetConnectionState state)
425 {
426   LOG (GNUNET_ERROR_TYPE_DEBUG,
427        "Connection %s state %s -> %s\n",
428        GCC_2s (c), GCC_state2s (c->state), GCC_state2s (state));
429   if (CADET_CONNECTION_DESTROYED <= c->state) /* Destroyed or broken. */
430   {
431     LOG (GNUNET_ERROR_TYPE_DEBUG, "state not changing anymore\n");
432     return;
433   }
434   c->state = state;
435   if (CADET_CONNECTION_READY == state)
436     c->create_retry = 1;
437 }
438
439
440 /**
441  * Callback called when a queued ACK message is sent.
442  *
443  * @param cls Closure (FC).
444  * @param c Connection this message was on.
445  * @param q Queue handler this call invalidates.
446  * @param type Type of message sent.
447  * @param fwd Was this a FWD going message?
448  * @param size Size of the message.
449  */
450 static void
451 ack_sent (void *cls,
452           struct CadetConnection *c,
453           struct CadetConnectionQueue *q,
454           uint16_t type, int fwd, size_t size)
455 {
456   struct CadetFlowControl *fc = cls;
457
458   fc->ack_msg = NULL;
459 }
460
461
462 /**
463  * Send an ACK on the connection, informing the predecessor about
464  * the available buffer space. Should not be called in case the peer
465  * is origin (no predecessor) in the @c fwd direction.
466  *
467  * Note that for fwd ack, the FWD mean forward *traffic* (root->dest),
468  * the ACK itself goes "back" (dest->root).
469  *
470  * @param c Connection on which to send the ACK.
471  * @param buffer How much space free to advertise?
472  * @param fwd Is this FWD ACK? (Going dest -> root)
473  * @param force Don't optimize out.
474  */
475 static void
476 send_ack (struct CadetConnection *c, unsigned int buffer, int fwd, int force)
477 {
478   struct CadetFlowControl *next_fc;
479   struct CadetFlowControl *prev_fc;
480   struct GNUNET_CADET_ACK msg;
481   uint32_t ack;
482   int delta;
483
484   /* If origin, there is no connection to send ACKs. Wrong function! */
485   if (GCC_is_origin (c, fwd))
486   {
487     LOG (GNUNET_ERROR_TYPE_DEBUG, "connection %s is origin in %s\n",
488          GCC_2s (c), GC_f2s (fwd));
489     GNUNET_break (0);
490     return;
491   }
492
493   next_fc = fwd ? &c->fwd_fc : &c->bck_fc;
494   prev_fc = fwd ? &c->bck_fc : &c->fwd_fc;
495
496   LOG (GNUNET_ERROR_TYPE_DEBUG, "connection send %s ack on %s\n",
497        GC_f2s (fwd), GCC_2s (c));
498
499   /* Check if we need to transmit the ACK. */
500   delta = prev_fc->last_ack_sent - prev_fc->last_pid_recv;
501   if (3 < delta && buffer < delta && GNUNET_NO == force)
502   {
503     LOG (GNUNET_ERROR_TYPE_DEBUG, "Not sending ACK, buffer > 3\n");
504     LOG (GNUNET_ERROR_TYPE_DEBUG,
505          "  last pid recv: %u, last ack sent: %u\n",
506          prev_fc->last_pid_recv, prev_fc->last_ack_sent);
507     return;
508   }
509
510   /* Ok, ACK might be necessary, what PID to ACK? */
511   ack = prev_fc->last_pid_recv + buffer;
512   LOG (GNUNET_ERROR_TYPE_DEBUG, " ACK %u\n", ack);
513   LOG (GNUNET_ERROR_TYPE_DEBUG,
514        " last pid %u, last ack %u, qmax %u, q %u\n",
515        prev_fc->last_pid_recv, prev_fc->last_ack_sent,
516        next_fc->queue_max, next_fc->queue_n);
517   if (ack == prev_fc->last_ack_sent && GNUNET_NO == force)
518   {
519     LOG (GNUNET_ERROR_TYPE_DEBUG, "Not sending FWD ACK, not needed\n");
520     return;
521   }
522
523   /* Check if message is already in queue */
524   if (NULL != prev_fc->ack_msg)
525   {
526     if (GC_is_pid_bigger (ack, prev_fc->last_ack_sent))
527     {
528       LOG (GNUNET_ERROR_TYPE_DEBUG, " canceling old ACK\n");
529       GCC_cancel (prev_fc->ack_msg);
530       /* GCC_cancel triggers ack_sent(), which clears fc->ack_msg */
531     }
532     else
533     {
534       LOG (GNUNET_ERROR_TYPE_DEBUG, " same ACK already in queue\n");
535       return;
536     }
537   }
538
539   prev_fc->last_ack_sent = ack;
540
541   /* Build ACK message and send on connection */
542   msg.header.size = htons (sizeof (msg));
543   msg.header.type = htons (GNUNET_MESSAGE_TYPE_CADET_ACK);
544   msg.ack = htonl (ack);
545   msg.cid = c->id;
546
547   prev_fc->ack_msg = GCC_send_prebuilt_message (&msg.header, 0, ack, c,
548                                                 !fwd, GNUNET_YES,
549                                                 &ack_sent, prev_fc);
550   GNUNET_assert (NULL != prev_fc->ack_msg);
551 }
552
553
554 /**
555  * Callback called when a connection queued message is sent.
556  *
557  * Calculates the average time and connection packet tracking.
558  *
559  * @param cls Closure (ConnectionQueue Handle).
560  * @param c Connection this message was on.
561  * @param sent Was it really sent? (Could have been canceled)
562  * @param type Type of message sent.
563  * @param pid Packet ID, or 0 if not applicable (create, destroy, etc).
564  * @param fwd Was this a FWD going message?
565  * @param size Size of the message.
566  * @param wait Time spent waiting for core (only the time for THIS message)
567  *
568  * @return #GNUNET_YES if connection was destroyed, #GNUNET_NO otherwise.
569  */
570 static int
571 conn_message_sent (void *cls,
572                    struct CadetConnection *c, int sent,
573                    uint16_t type, uint32_t pid, int fwd, size_t size,
574                    struct GNUNET_TIME_Relative wait)
575 {
576   struct CadetConnectionPerformance *p;
577   struct CadetFlowControl *fc;
578   struct CadetConnectionQueue *q = cls;
579   double usecsperbyte;
580   int forced;
581
582   LOG (GNUNET_ERROR_TYPE_DEBUG, "connection message_sent\n");
583
584   fc = fwd ? &c->fwd_fc : &c->bck_fc;
585   LOG (GNUNET_ERROR_TYPE_DEBUG, " %ssent %s %s pid %u\n",
586        sent ? "" : "not ", GC_f2s (fwd), GC_m2s (type), pid);
587   if (NULL != q)
588   {
589     forced = q->forced;
590     if (NULL != q->cont)
591     {
592       LOG (GNUNET_ERROR_TYPE_DEBUG, " calling cont\n");
593       q->cont (q->cont_cls, c, q, type, fwd, size);
594     }
595     GNUNET_free (q);
596   }
597   else if (type == GNUNET_MESSAGE_TYPE_CADET_ENCRYPTED)
598   {
599     /* If NULL == q and ENCRYPTED == type, message must have been ch_mngmnt */
600     forced = GNUNET_YES;
601   }
602   else
603   {
604     forced = GNUNET_NO;
605   }
606   if (NULL == c)
607   {
608     if (type != GNUNET_MESSAGE_TYPE_CADET_CONNECTION_BROKEN
609         && type != GNUNET_MESSAGE_TYPE_CADET_CONNECTION_DESTROY)
610     {
611       LOG (GNUNET_ERROR_TYPE_ERROR, "Message %s sent on NULL connection!\n",
612            GC_m2s (type));
613     }
614     return GNUNET_NO;
615   }
616   LOG (GNUNET_ERROR_TYPE_DEBUG, " C_P- %p %u\n", c, c->pending_messages);
617   c->pending_messages--;
618   if (GNUNET_YES == c->destroy && 0 == c->pending_messages)
619   {
620     LOG (GNUNET_ERROR_TYPE_DEBUG, "!  destroying connection!\n");
621     GCC_destroy (c);
622     return GNUNET_YES;
623   }
624   /* Send ACK if needed, after accounting for sent ID in fc->queue_n */
625   switch (type)
626   {
627     case GNUNET_MESSAGE_TYPE_CADET_CONNECTION_CREATE:
628     case GNUNET_MESSAGE_TYPE_CADET_CONNECTION_ACK:
629       c->maintenance_q = NULL;
630       /* Don't trigger a keepalive for sent ACKs, only SYN and SYNACKs */
631       if (GNUNET_MESSAGE_TYPE_CADET_CONNECTION_CREATE == type || !fwd)
632         schedule_next_keepalive (c, fwd);
633       break;
634
635     case GNUNET_MESSAGE_TYPE_CADET_ENCRYPTED:
636       if (GNUNET_YES == sent)
637       {
638         GNUNET_assert (NULL != q);
639         fc->last_pid_sent = pid; // FIXME
640         GCC_send_ack (c, fwd, GNUNET_NO);
641         connection_reset_timeout (c, fwd);
642       }
643
644       LOG (GNUNET_ERROR_TYPE_DEBUG, "!  Q_N- %p %u\n", fc, fc->queue_n);
645       if (GNUNET_NO == forced)
646       {
647         fc->queue_n--;
648         LOG (GNUNET_ERROR_TYPE_DEBUG,
649             "!   accounting pid %u\n",
650             fc->last_pid_sent);
651       }
652       else
653       {
654         LOG (GNUNET_ERROR_TYPE_DEBUG,
655              "!   forced, Q_N not accounting pid %u\n",
656              fc->last_pid_sent);
657       }
658       break;
659
660     case GNUNET_MESSAGE_TYPE_CADET_KX:
661       if (GNUNET_YES == sent)
662         connection_reset_timeout (c, fwd);
663       break;
664
665     case GNUNET_MESSAGE_TYPE_CADET_POLL:
666       fc->poll_msg = NULL;
667       break;
668
669     case GNUNET_MESSAGE_TYPE_CADET_ACK:
670       fc->ack_msg = NULL;
671       break;
672
673     default:
674       break;
675   }
676   LOG (GNUNET_ERROR_TYPE_DEBUG, "!  message sent!\n");
677
678   if (NULL == c->perf)
679     return GNUNET_NO; /* Only endpoints are interested in timing. */
680
681   p = c->perf;
682   usecsperbyte = ((double) wait.rel_value_us) / size;
683   if (p->size == AVG_MSGS)
684   {
685     /* Array is full. Substract oldest value, add new one and store. */
686     p->avg -= (p->usecsperbyte[p->idx] / AVG_MSGS);
687     p->usecsperbyte[p->idx] = usecsperbyte;
688     p->avg += (p->usecsperbyte[p->idx] / AVG_MSGS);
689   }
690   else
691   {
692     /* Array not yet full. Add current value to avg and store. */
693     p->usecsperbyte[p->idx] = usecsperbyte;
694     p->avg *= p->size;
695     p->avg += p->usecsperbyte[p->idx];
696     p->size++;
697     p->avg /= p->size;
698   }
699   p->idx = (p->idx + 1) % AVG_MSGS;
700   return GNUNET_NO;
701 }
702
703
704 /**
705  * Get the previous hop in a connection
706  *
707  * @param c Connection.
708  *
709  * @return Previous peer in the connection.
710  */
711 static struct CadetPeer *
712 get_prev_hop (const struct CadetConnection *c)
713 {
714   GNUNET_PEER_Id id;
715
716   LOG (GNUNET_ERROR_TYPE_DEBUG, " get prev hop %s [%u/%u]\n",
717        GCC_2s (c), c->own_pos, c->path->length);
718   if (0 == c->own_pos || c->path->length < 2)
719     id = c->path->peers[0];
720   else
721     id = c->path->peers[c->own_pos - 1];
722
723   LOG (GNUNET_ERROR_TYPE_DEBUG, "  ID: %s (%u)\n",
724        GNUNET_i2s (GNUNET_PEER_resolve2 (id)), id);
725
726   return GCP_get_short (id);
727 }
728
729
730 /**
731  * Get the next hop in a connection
732  *
733  * @param c Connection.
734  *
735  * @return Next peer in the connection.
736  */
737 static struct CadetPeer *
738 get_next_hop (const struct CadetConnection *c)
739 {
740   GNUNET_PEER_Id id;
741
742   LOG (GNUNET_ERROR_TYPE_DEBUG, " get next hop %s [%u/%u]\n",
743        GCC_2s (c), c->own_pos, c->path->length);
744   if ((c->path->length - 1) == c->own_pos || c->path->length < 2)
745     id = c->path->peers[c->path->length - 1];
746   else
747     id = c->path->peers[c->own_pos + 1];
748
749   LOG (GNUNET_ERROR_TYPE_DEBUG, "  ID: %s (%u)\n",
750        GNUNET_i2s (GNUNET_PEER_resolve2 (id)), id);
751
752   return GCP_get_short (id);
753 }
754
755
756 /**
757  * Get the hop in a connection.
758  *
759  * @param c Connection.
760  * @param fwd Next hop?
761  *
762  * @return Next peer in the connection.
763  */
764 static struct CadetPeer *
765 get_hop (struct CadetConnection *c, int fwd)
766 {
767   if (fwd)
768     return get_next_hop (c);
769   return get_prev_hop (c);
770 }
771
772
773 /**
774  * Is traffic coming from this sender 'FWD' traffic?
775  *
776  * @param c Connection to check.
777  * @param sender Peer identity of neighbor.
778  *
779  * @return #GNUNET_YES in case the sender is the 'prev' hop and therefore
780  *         the traffic is 'FWD'.
781  *         #GNUNET_NO for BCK.
782  *         #GNUNET_SYSERR for errors.
783  */
784 static int
785 is_fwd (const struct CadetConnection *c,
786         const struct GNUNET_PeerIdentity *sender)
787 {
788   GNUNET_PEER_Id id;
789
790   id = GNUNET_PEER_search (sender);
791   if (GCP_get_short_id (get_prev_hop (c)) == id)
792     return GNUNET_YES;
793
794   if (GCP_get_short_id (get_next_hop (c)) == id)
795     return GNUNET_NO;
796
797   GNUNET_break (0);
798   return GNUNET_SYSERR;
799 }
800
801
802 /**
803  * Sends a CONNECTION ACK message in reponse to a received CONNECTION_CREATE
804  * or a first CONNECTION_ACK directed to us.
805  *
806  * @param connection Connection to confirm.
807  * @param fwd Should we send it FWD? (root->dest)
808  *            (First (~SYNACK) goes BCK, second (~ACK) goes FWD)
809  */
810 static void
811 send_connection_ack (struct CadetConnection *connection, int fwd)
812 {
813   struct CadetTunnel *t;
814
815   t = connection->t;
816   LOG (GNUNET_ERROR_TYPE_INFO, "---> {%14s ACK} on connection %s\n",
817        GC_f2s (!fwd), GCC_2s (connection));
818   GCP_queue_add (get_hop (connection, fwd), NULL,
819                  GNUNET_MESSAGE_TYPE_CADET_CONNECTION_ACK, 0, 0,
820                  sizeof (struct GNUNET_CADET_ConnectionACK),
821                  connection, fwd, &conn_message_sent, NULL);
822   connection->pending_messages++;
823   if (CADET_TUNNEL_NEW == GCT_get_cstate (t))
824     GCT_change_cstate (t, CADET_TUNNEL_WAITING);
825   if (CADET_CONNECTION_READY != connection->state)
826     connection_change_state (connection, CADET_CONNECTION_SENT);
827 }
828
829
830 /**
831  * Send a notification that a connection is broken.
832  *
833  * @param c Connection that is broken.
834  * @param id1 Peer that has disconnected.
835  * @param id2 Peer that has disconnected.
836  * @param fwd Direction towards which to send it.
837  */
838 static void
839 send_broken (struct CadetConnection *c,
840              const struct GNUNET_PeerIdentity *id1,
841              const struct GNUNET_PeerIdentity *id2,
842              int fwd)
843 {
844   struct GNUNET_CADET_ConnectionBroken msg;
845
846   msg.header.size = htons (sizeof (struct GNUNET_CADET_ConnectionBroken));
847   msg.header.type = htons (GNUNET_MESSAGE_TYPE_CADET_CONNECTION_BROKEN);
848   msg.cid = c->id;
849   msg.peer1 = *id1;
850   msg.peer2 = *id2;
851   GNUNET_assert (NULL == GCC_send_prebuilt_message (&msg.header, 0, 0, c, fwd,
852                                                     GNUNET_YES, NULL, NULL));
853 }
854
855
856 /**
857  * Send a notification that a connection is broken, when a connection
858  * isn't even known to the local peer or soon to be destroyed.
859  *
860  * @param connection_id Connection ID.
861  * @param id1 Peer that has disconnected, probably local peer.
862  * @param id2 Peer that has disconnected can be NULL if unknown.
863  * @param peer Peer to notify (neighbor who sent the connection).
864  */
865 static void
866 send_broken_unknown (const struct GNUNET_CADET_Hash *connection_id,
867                      const struct GNUNET_PeerIdentity *id1,
868                      const struct GNUNET_PeerIdentity *id2,
869                      const struct GNUNET_PeerIdentity *peer_id)
870 {
871   struct GNUNET_CADET_ConnectionBroken *msg;
872   struct CadetPeer *neighbor;
873
874   LOG (GNUNET_ERROR_TYPE_INFO, "---> BROKEN on unknown connection %s\n",
875        GNUNET_h2s (GC_h2hc (connection_id)));
876
877   msg = GNUNET_new (struct GNUNET_CADET_ConnectionBroken);
878   msg->header.size = htons (sizeof (struct GNUNET_CADET_ConnectionBroken));
879   msg->header.type = htons (GNUNET_MESSAGE_TYPE_CADET_CONNECTION_BROKEN);
880   msg->cid = *connection_id;
881   msg->peer1 = *id1;
882   if (NULL != id2)
883     msg->peer2 = *id2;
884   else
885     memset (&msg->peer2, 0, sizeof (msg->peer2));
886   neighbor = GCP_get (peer_id);
887   GCP_queue_add (neighbor, msg, GNUNET_MESSAGE_TYPE_CADET_CONNECTION_BROKEN,
888                  0, 2, sizeof (struct GNUNET_CADET_ConnectionBroken),
889                  NULL, GNUNET_SYSERR, /* connection, fwd */
890                  NULL, NULL); /* continuation */
891 }
892
893
894 /**
895  * Send keepalive packets for a connection.
896  *
897  * @param c Connection to keep alive..
898  * @param fwd Is this a FWD keepalive? (owner -> dest).
899  */
900 static void
901 send_connection_keepalive (struct CadetConnection *c, int fwd)
902 {
903   struct GNUNET_MessageHeader msg;
904   struct CadetFlowControl *fc;
905
906   LOG (GNUNET_ERROR_TYPE_INFO, "keepalive %s for connection %s\n",
907        GC_f2s (fwd), GCC_2s (c));
908
909   fc = fwd ? &c->fwd_fc : &c->bck_fc;
910   if (0 < fc->queue_n)
911   {
912     LOG (GNUNET_ERROR_TYPE_INFO, "not sending keepalive, traffic in queue\n");
913     return;
914   }
915
916   GNUNET_STATISTICS_update (stats, "# keepalives sent", 1, GNUNET_NO);
917
918   GNUNET_assert (NULL != c->t);
919   msg.size = htons (sizeof (msg));
920   msg.type = htons (GNUNET_MESSAGE_TYPE_CADET_KEEPALIVE);
921
922   GNUNET_assert (NULL ==
923                  GCT_send_prebuilt_message (&msg, c->t, c,
924                                             GNUNET_NO, NULL, NULL));
925 }
926
927
928 /**
929  * Send CONNECTION_{CREATE/ACK} packets for a connection.
930  *
931  * @param c Connection for which to send the message.
932  * @param fwd If #GNUNET_YES, send CREATE, otherwise send ACK.
933  */
934 static void
935 connection_recreate (struct CadetConnection *c, int fwd)
936 {
937   LOG (GNUNET_ERROR_TYPE_DEBUG, "sending connection recreate\n");
938   if (fwd)
939     GCC_send_create (c);
940   else
941     send_connection_ack (c, GNUNET_NO);
942 }
943
944
945 /**
946  * Generic connection timer management.
947  * Depending on the role of the peer in the connection will send the
948  * appropriate message (build or keepalive)
949  *
950  * @param c Conncetion to maintain.
951  * @param fwd Is FWD?
952  */
953 static void
954 connection_maintain (struct CadetConnection *c, int fwd)
955 {
956   if (GNUNET_NO != c->destroy)
957   {
958     LOG (GNUNET_ERROR_TYPE_INFO, "not sending keepalive, being destroyed\n");
959     return;
960   }
961
962   if (NULL == c->t)
963   {
964     GNUNET_break (0);
965     GCC_debug (c, GNUNET_ERROR_TYPE_ERROR);
966     return;
967   }
968
969   if (CADET_TUNNEL_SEARCHING == GCT_get_cstate (c->t))
970   {
971     /* If status is SEARCHING, why is there a connection? Should be WAITING */
972     GNUNET_break (0);
973     GCT_debug (c->t, GNUNET_ERROR_TYPE_ERROR);
974     LOG (GNUNET_ERROR_TYPE_INFO, "not sending keepalive, tunnel SEARCHING\n");
975     schedule_next_keepalive (c, fwd);
976     return;
977   }
978   switch (c->state)
979   {
980     case CADET_CONNECTION_NEW:
981       GNUNET_break (0);
982       /* fall-through */
983     case CADET_CONNECTION_SENT:
984       connection_recreate (c, fwd);
985       break;
986     case CADET_CONNECTION_READY:
987       send_connection_keepalive (c, fwd);
988       break;
989     default:
990       break;
991   }
992 }
993
994
995
996 /**
997  * Keep the connection alive.
998  *
999  * @param c Connection to keep alive.
1000  * @param fwd Direction.
1001  * @param shutdown Are we shutting down? (Don't send traffic)
1002  *                 Non-zero value for true, not necessarily GNUNET_YES.
1003  */
1004 static void
1005 connection_keepalive (struct CadetConnection *c, int fwd, int shutdown)
1006 {
1007   LOG (GNUNET_ERROR_TYPE_DEBUG, "%s keepalive for %s\n",
1008        GC_f2s (fwd), GCC_2s (c));
1009
1010   if (fwd)
1011     c->fwd_maintenance_task = GNUNET_SCHEDULER_NO_TASK;
1012   else
1013     c->bck_maintenance_task = GNUNET_SCHEDULER_NO_TASK;
1014
1015   if (GNUNET_NO != shutdown)
1016     return;
1017
1018   connection_maintain (c, fwd);
1019
1020   /* Next execution will be scheduled by message_sent or _maintain*/
1021 }
1022
1023
1024 /**
1025  * Keep the connection alive in the FWD direction.
1026  *
1027  * @param cls Closure (connection to keepalive).
1028  * @param tc TaskContext.
1029  */
1030 static void
1031 connection_fwd_keepalive (void *cls,
1032                           const struct GNUNET_SCHEDULER_TaskContext *tc)
1033 {
1034   connection_keepalive ((struct CadetConnection *) cls,
1035                         GNUNET_YES,
1036                         tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN);
1037 }
1038
1039
1040 /**
1041  * Keep the connection alive in the BCK direction.
1042  *
1043  * @param cls Closure (connection to keepalive).
1044  * @param tc TaskContext.
1045  */
1046 static void
1047 connection_bck_keepalive (void *cls,
1048                           const struct GNUNET_SCHEDULER_TaskContext *tc)
1049 {
1050   connection_keepalive ((struct CadetConnection *) cls,
1051                         GNUNET_NO,
1052                         tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN);
1053 }
1054
1055
1056 /**
1057  * Schedule next keepalive task, taking in consideration
1058  * the connection state and number of retries.
1059  *
1060  * If the peer is not the origin, do nothing.
1061  *
1062  * @param c Connection for which to schedule the next keepalive.
1063  * @param fwd Direction for the next keepalive.
1064  */
1065 static void
1066 schedule_next_keepalive (struct CadetConnection *c, int fwd)
1067 {
1068   struct GNUNET_TIME_Relative delay;
1069   GNUNET_SCHEDULER_TaskIdentifier *task_id;
1070   GNUNET_SCHEDULER_Task keepalive_task;
1071
1072   if (GNUNET_NO == GCC_is_origin (c, fwd))
1073     return;
1074
1075   /* Calculate delay to use, depending on the state of the connection */
1076   if (CADET_CONNECTION_READY == c->state)
1077   {
1078     delay = refresh_connection_time;
1079   }
1080   else
1081   {
1082     if (1 > c->create_retry)
1083       c->create_retry = 1;
1084     delay = GNUNET_TIME_relative_multiply (create_connection_time,
1085                                            c->create_retry);
1086     if (c->create_retry < 64)
1087       c->create_retry *= 2;
1088   }
1089
1090   /* Select direction-dependent parameters */
1091   if (GNUNET_YES == fwd)
1092   {
1093     task_id = &c->fwd_maintenance_task;
1094     keepalive_task = &connection_fwd_keepalive;
1095   }
1096   else
1097   {
1098     task_id = &c->bck_maintenance_task;
1099     keepalive_task = &connection_bck_keepalive;
1100   }
1101
1102   /* Check that no one scheduled it before us */
1103   if (GNUNET_SCHEDULER_NO_TASK != *task_id)
1104   {
1105     /* No need for a _break. It can happen for instance when sending a SYNACK
1106      * for a duplicate SYN: the first SYNACK scheduled the task. */
1107     GNUNET_SCHEDULER_cancel (*task_id);
1108   }
1109
1110   /* Schedule the task */
1111   *task_id = GNUNET_SCHEDULER_add_delayed (delay, keepalive_task, c);
1112   LOG (GNUNET_ERROR_TYPE_DEBUG, "next keepalive in %s\n",
1113        GNUNET_STRINGS_relative_time_to_string (delay, GNUNET_YES));
1114 }
1115
1116
1117 /**
1118  * @brief Re-initiate traffic on this connection if necessary.
1119  *
1120  * Check if there is traffic queued towards this peer
1121  * and the core transmit handle is NULL (traffic was stalled).
1122  * If so, call core tmt rdy.
1123  *
1124  * @param c Connection on which initiate traffic.
1125  * @param fwd Is this about fwd traffic?
1126  */
1127 static void
1128 connection_unlock_queue (struct CadetConnection *c, int fwd)
1129 {
1130   struct CadetPeer *peer;
1131
1132   LOG (GNUNET_ERROR_TYPE_DEBUG, "connection_unlock_queue %s on %s\n",
1133        GC_f2s (fwd), GCC_2s (c));
1134
1135   if (GCC_is_terminal (c, fwd))
1136   {
1137     LOG (GNUNET_ERROR_TYPE_DEBUG, " is terminal, can unlock!\n");
1138     return;
1139   }
1140
1141   peer = get_hop (c, fwd);
1142   GCP_queue_unlock (peer, c);
1143 }
1144
1145
1146 /**
1147  * Cancel all transmissions that belong to a certain connection.
1148  *
1149  * If the connection is scheduled for destruction and no more messages are left,
1150  * the connection will be destroyed by the continuation call.
1151  *
1152  * @param c Connection which to cancel. Might be destroyed during this call.
1153  * @param fwd Cancel fwd traffic?
1154  */
1155 static void
1156 connection_cancel_queues (struct CadetConnection *c, int fwd)
1157 {
1158   struct CadetFlowControl *fc;
1159   struct CadetPeer *peer;
1160
1161   LOG (GNUNET_ERROR_TYPE_DEBUG,
1162        " *** Cancel %s queues for connection %s\n",
1163        GC_f2s (fwd), GCC_2s (c));
1164   if (NULL == c)
1165   {
1166     GNUNET_break (0);
1167     return;
1168   }
1169
1170   fc = fwd ? &c->fwd_fc : &c->bck_fc;
1171   if (GNUNET_SCHEDULER_NO_TASK != fc->poll_task)
1172   {
1173     GNUNET_SCHEDULER_cancel (fc->poll_task);
1174     fc->poll_task = GNUNET_SCHEDULER_NO_TASK;
1175     LOG (GNUNET_ERROR_TYPE_DEBUG, " *** Cancel POLL in ccq for fc %p\n", fc);
1176   }
1177   peer = get_hop (c, fwd);
1178   GCP_queue_cancel (peer, c);
1179 }
1180
1181
1182 /**
1183  * Function called if a connection has been stalled for a while,
1184  * possibly due to a missed ACK. Poll the neighbor about its ACK status.
1185  *
1186  * @param cls Closure (poll ctx).
1187  * @param tc TaskContext.
1188  */
1189 static void
1190 connection_poll (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
1191
1192
1193 /**
1194  * Callback called when a queued POLL message is sent.
1195  *
1196  * @param cls Closure (FC).
1197  * @param c Connection this message was on.
1198  * @param q Queue handler this call invalidates.
1199  * @param type Type of message sent.
1200  * @param fwd Was this a FWD going message?
1201  * @param size Size of the message.
1202  */
1203 static void
1204 poll_sent (void *cls,
1205            struct CadetConnection *c,
1206            struct CadetConnectionQueue *q,
1207            uint16_t type, int fwd, size_t size)
1208 {
1209   struct CadetFlowControl *fc = cls;
1210
1211   if (2 == c->destroy)
1212   {
1213     LOG (GNUNET_ERROR_TYPE_DEBUG, " *** POLL canceled on shutdown\n");
1214     return;
1215   }
1216   LOG (GNUNET_ERROR_TYPE_DEBUG, " *** POLL sent for , scheduling new one!\n");
1217   fc->poll_msg = NULL;
1218   fc->poll_time = GNUNET_TIME_STD_BACKOFF (fc->poll_time);
1219   fc->poll_task = GNUNET_SCHEDULER_add_delayed (fc->poll_time,
1220                                                 &connection_poll, fc);
1221   LOG (GNUNET_ERROR_TYPE_DEBUG, " task %u\n", fc->poll_task);
1222
1223 }
1224
1225 /**
1226  * Function called if a connection has been stalled for a while,
1227  * possibly due to a missed ACK. Poll the neighbor about its ACK status.
1228  *
1229  * @param cls Closure (poll ctx).
1230  * @param tc TaskContext.
1231  */
1232 static void
1233 connection_poll (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
1234 {
1235   struct CadetFlowControl *fc = cls;
1236   struct GNUNET_CADET_Poll msg;
1237   struct CadetConnection *c;
1238
1239   fc->poll_task = GNUNET_SCHEDULER_NO_TASK;
1240   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
1241   {
1242     return;
1243   }
1244
1245   c = fc->c;
1246   LOG (GNUNET_ERROR_TYPE_DEBUG, " *** Polling connection %s %s\n",
1247        GCC_2s (c), fc == &c->fwd_fc ? "FWD" : "BCK");
1248
1249   msg.header.type = htons (GNUNET_MESSAGE_TYPE_CADET_POLL);
1250   msg.header.size = htons (sizeof (msg));
1251   msg.pid = htonl (fc->last_pid_sent);
1252   LOG (GNUNET_ERROR_TYPE_DEBUG, " *** last pid sent: %u!\n", fc->last_pid_sent);
1253   fc->poll_msg =
1254       GCC_send_prebuilt_message (&msg.header, 0, fc->last_pid_sent, c,
1255                                  fc == &c->fwd_fc, GNUNET_YES, &poll_sent, fc);
1256   GNUNET_assert (NULL != fc->poll_msg);
1257 }
1258
1259
1260 /**
1261  * Resend all queued messages for a connection on other connections of the
1262  * same tunnel, if possible. The connection WILL BE DESTROYED by this function.
1263  *
1264  * @param c Connection whose messages to resend.
1265  * @param fwd Resend fwd messages?
1266  */
1267 static void
1268 resend_messages_and_destroy (struct CadetConnection *c, int fwd)
1269 {
1270   struct GNUNET_MessageHeader *out_msg;
1271   struct CadetTunnel *t = c->t;
1272   struct CadetPeer *neighbor;
1273   unsigned int pending;
1274   int destroyed;
1275
1276   c->state = CADET_CONNECTION_DESTROYED;
1277   c->destroy = GNUNET_YES;
1278
1279   destroyed = GNUNET_NO;
1280   neighbor = get_hop (c, fwd);
1281   pending = c->pending_messages;
1282
1283   while (NULL != (out_msg = GCP_connection_pop (neighbor, c, &destroyed)))
1284   {
1285     if (NULL != t)
1286       GCT_resend_message (out_msg, t);
1287     GNUNET_free (out_msg);
1288   }
1289
1290   /* All pending messages should have been popped,
1291    * and the connection destroyed by the continuation.
1292    */
1293   if (GNUNET_YES != destroyed)
1294   {
1295     if (0 != pending)
1296     {
1297       GNUNET_break (0);
1298       GCC_debug (c, GNUNET_ERROR_TYPE_ERROR);
1299       if (NULL != t) GCT_debug (t, GNUNET_ERROR_TYPE_ERROR);
1300     }
1301     GCC_destroy (c);
1302   }
1303 }
1304
1305
1306 /**
1307  * Timeout function due to lack of keepalive/traffic from the owner.
1308  * Destroys connection if called.
1309  *
1310  * @param cls Closure (connection to destroy).
1311  * @param tc TaskContext.
1312  */
1313 static void
1314 connection_fwd_timeout (void *cls,
1315                         const struct GNUNET_SCHEDULER_TaskContext *tc)
1316 {
1317   struct CadetConnection *c = cls;
1318
1319   c->fwd_maintenance_task = GNUNET_SCHEDULER_NO_TASK;
1320   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
1321     return;
1322
1323   LOG (GNUNET_ERROR_TYPE_INFO, "Connection %s FWD timed out. Destroying.\n",
1324        GCC_2s (c));
1325   GCC_debug (c, GNUNET_ERROR_TYPE_DEBUG);
1326
1327   if (GCC_is_origin (c, GNUNET_YES)) /* If local, leave. */
1328   {
1329     GNUNET_break (0);
1330     return;
1331   }
1332
1333   /* If dest, salvage queued traffic. */
1334   if (GCC_is_origin (c, GNUNET_NO) && 0 < c->bck_fc.queue_n)
1335   {
1336     send_broken_unknown (&c->id, &my_full_id, NULL,
1337                          GCP_get_id( get_prev_hop (c)));
1338     resend_messages_and_destroy (c, GNUNET_NO);
1339     return;
1340   }
1341
1342   GCC_destroy (c);
1343 }
1344
1345
1346 /**
1347  * Timeout function due to lack of keepalive/traffic from the destination.
1348  * Destroys connection if called.
1349  *
1350  * FIXME refactor and merge with connection_fwd_timeout.
1351  *
1352  * @param cls Closure (connection to destroy).
1353  * @param tc TaskContext
1354  */
1355 static void
1356 connection_bck_timeout (void *cls,
1357                         const struct GNUNET_SCHEDULER_TaskContext *tc)
1358 {
1359   struct CadetConnection *c = cls;
1360
1361   c->bck_maintenance_task = GNUNET_SCHEDULER_NO_TASK;
1362   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
1363     return;
1364
1365   LOG (GNUNET_ERROR_TYPE_INFO, "Connection %s BCK timed out. Destroying.\n",
1366        GCC_2s (c));
1367
1368   if (GCC_is_origin (c, GNUNET_NO)) /* If local, leave. */
1369   {
1370     GNUNET_break (0);
1371     return;
1372   }
1373
1374   /* If dest, salvage queued traffic. */
1375   if (GCC_is_origin (c, GNUNET_YES) && 0 < c->fwd_fc.queue_n)
1376   {
1377     send_broken_unknown (&c->id, &my_full_id, NULL,
1378                          GCP_get_id( get_next_hop (c)));
1379     resend_messages_and_destroy (c, GNUNET_YES);
1380     return;
1381   }
1382
1383   GCC_destroy (c);
1384 }
1385
1386
1387 /**
1388  * Resets the connection timeout task, some other message has done the
1389  * task's job.
1390  * - For the first peer on the direction this means to send
1391  *   a keepalive or a path confirmation message (either create or ACK).
1392  * - For all other peers, this means to destroy the connection,
1393  *   due to lack of activity.
1394  * Starts the timeout if no timeout was running (connection just created).
1395  *
1396  * @param c Connection whose timeout to reset.
1397  * @param fwd Is this forward?
1398  *
1399  * TODO use heap to improve efficiency of scheduler.
1400  */
1401 static void
1402 connection_reset_timeout (struct CadetConnection *c, int fwd)
1403 {
1404   LOG (GNUNET_ERROR_TYPE_DEBUG, "Connection %s reset timeout\n", GC_f2s (fwd));
1405
1406   if (GCC_is_origin (c, fwd)) /* Startpoint */
1407   {
1408     schedule_next_keepalive (c, fwd);
1409   }
1410   else /* Relay, endpoint. */
1411   {
1412     struct GNUNET_TIME_Relative delay;
1413     GNUNET_SCHEDULER_TaskIdentifier *ti;
1414     GNUNET_SCHEDULER_Task f;
1415
1416     ti = fwd ? &c->fwd_maintenance_task : &c->bck_maintenance_task;
1417
1418     if (GNUNET_SCHEDULER_NO_TASK != *ti)
1419       GNUNET_SCHEDULER_cancel (*ti);
1420     delay = GNUNET_TIME_relative_multiply (refresh_connection_time, 4);
1421     LOG (GNUNET_ERROR_TYPE_DEBUG, "  timing out in %s\n",
1422          GNUNET_STRINGS_relative_time_to_string (delay, GNUNET_NO));
1423     f = fwd ? &connection_fwd_timeout : &connection_bck_timeout;
1424     *ti = GNUNET_SCHEDULER_add_delayed (delay, f, c);
1425   }
1426 }
1427
1428
1429 /**
1430  * Add the connection to the list of both neighbors.
1431  *
1432  * @param c Connection.
1433  *
1434  * @return #GNUNET_OK if everything went fine
1435  *         #GNUNET_SYSERR if the was an error and @c c is malformed.
1436  */
1437 static int
1438 register_neighbors (struct CadetConnection *c)
1439 {
1440   struct CadetPeer *next_peer;
1441   struct CadetPeer *prev_peer;
1442
1443   next_peer = get_next_hop (c);
1444   prev_peer = get_prev_hop (c);
1445
1446   LOG (GNUNET_ERROR_TYPE_DEBUG, "register neighbors for connection %s\n",
1447        GCC_2s (c));
1448   path_debug (c->path);
1449   LOG (GNUNET_ERROR_TYPE_DEBUG, "own pos %u\n", c->own_pos);
1450   LOG (GNUNET_ERROR_TYPE_DEBUG, "putting connection %s to next peer %p\n",
1451        GCC_2s (c), next_peer);
1452   LOG (GNUNET_ERROR_TYPE_DEBUG, "next peer %p %s\n", next_peer, GCP_2s (next_peer));
1453   LOG (GNUNET_ERROR_TYPE_DEBUG, "putting connection %s to prev peer %p\n",
1454        GCC_2s (c), prev_peer);
1455   LOG (GNUNET_ERROR_TYPE_DEBUG, "prev peer %p %s\n", prev_peer, GCP_2s (prev_peer));
1456
1457   if (GNUNET_NO == GCP_is_neighbor (next_peer)
1458       || GNUNET_NO == GCP_is_neighbor (prev_peer))
1459   {
1460     if (GCC_is_origin (c, GNUNET_YES))
1461       GNUNET_STATISTICS_update (stats, "# local bad paths", 1, GNUNET_NO);
1462     GNUNET_STATISTICS_update (stats, "# bad paths", 1, GNUNET_NO);
1463
1464     LOG (GNUNET_ERROR_TYPE_DEBUG, "  register neighbors failed\n");
1465     LOG (GNUNET_ERROR_TYPE_DEBUG, "  prev: %s, neighbor?: %d\n",
1466          GCP_2s (prev_peer), GCP_is_neighbor (prev_peer));
1467     LOG (GNUNET_ERROR_TYPE_DEBUG, "  next: %s, neighbor?: %d\n",
1468          GCP_2s (next_peer), GCP_is_neighbor (next_peer));
1469     return GNUNET_SYSERR;
1470   }
1471
1472   GCP_add_connection (next_peer, c);
1473   GCP_add_connection (prev_peer, c);
1474
1475   return GNUNET_OK;
1476 }
1477
1478
1479 /**
1480  * Remove the connection from the list of both neighbors.
1481  *
1482  * @param c Connection.
1483  */
1484 static void
1485 unregister_neighbors (struct CadetConnection *c)
1486 {
1487   struct CadetPeer *peer;
1488
1489   peer = get_next_hop (c);
1490   if (GNUNET_OK != GCP_remove_connection (peer, c))
1491   {
1492     LOG (GNUNET_ERROR_TYPE_DEBUG, "  cstate: %u\n", c->state);
1493     if (NULL != c->t) GCT_debug (c->t, GNUNET_ERROR_TYPE_DEBUG);
1494   }
1495
1496   peer = get_prev_hop (c);
1497   if (GNUNET_OK != GCP_remove_connection (peer, c))
1498   {
1499     LOG (GNUNET_ERROR_TYPE_DEBUG, "  cstate: %u\n", c->state);
1500     if (NULL != c->t) GCT_debug (c->t, GNUNET_ERROR_TYPE_DEBUG);
1501   }
1502 }
1503
1504
1505 /**
1506  * Bind the connection to the peer and the tunnel to that peer.
1507  *
1508  * If the peer has no tunnel, create one. Update tunnel and connection
1509  * data structres to reflect new status.
1510  *
1511  * @param c Connection.
1512  * @param peer Peer.
1513  */
1514 static void
1515 add_to_peer (struct CadetConnection *c, struct CadetPeer *peer)
1516 {
1517   GCP_add_tunnel (peer);
1518   c->t = GCP_get_tunnel (peer);
1519   GCT_add_connection (c->t, c);
1520 }
1521
1522
1523
1524 /**
1525  * Iterator to compare each connection's path with the path of a new connection.
1526  *
1527  * If the connection conincides, the c member of path is set to the connection
1528  * and the destroy flag of the connection is set.
1529  *
1530  * @param cls Closure (new path).
1531  * @param c Connection in the tunnel to check.
1532  */
1533 static void
1534 check_path (void *cls, struct CadetConnection *c)
1535 {
1536   struct CadetConnection *new_conn = cls;
1537   struct CadetPeerPath *path = new_conn->path;
1538
1539   LOG (GNUNET_ERROR_TYPE_DEBUG, "  checking %s (%p), length %u\n",
1540        GCC_2s (c), c, c->path->length);
1541
1542   if (c != new_conn
1543       && c->destroy == GNUNET_NO
1544       && c->state != CADET_CONNECTION_BROKEN
1545       && c->state != CADET_CONNECTION_DESTROYED
1546       && path_equivalent (path, c->path))
1547   {
1548     new_conn->destroy = GNUNET_YES;
1549     new_conn->path->c = c;
1550     LOG (GNUNET_ERROR_TYPE_DEBUG, "  MATCH!\n");
1551   }
1552 }
1553
1554 /**
1555  * Finds out if this path is already being used by and existing connection.
1556  *
1557  * Checks the tunnel towards the first peer in the path to see if it contains
1558  * any connection with the same path.
1559  *
1560  * If the existing connection is ready, it is kept.
1561  * Otherwise if the sender has a smaller ID that ours, we accept it (and
1562  * the peer will eventually reject our attempt).
1563  *
1564  * @param path Path to check.
1565  *
1566  * @return GNUNET_YES if the tunnel has a connection with the same path,
1567  *         GNUNET_NO otherwise.
1568  */
1569 static int
1570 does_connection_exist (struct CadetConnection *conn)
1571 {
1572   struct CadetPeer *p;
1573   struct CadetTunnel *t;
1574   struct CadetConnection *c;
1575
1576   p = GCP_get_short (conn->path->peers[0]);
1577   t = GCP_get_tunnel (p);
1578   if (NULL == t)
1579     return GNUNET_NO;
1580
1581   LOG (GNUNET_ERROR_TYPE_DEBUG, "Checking for duplicates\n");
1582
1583   GCT_iterate_connections (t, &check_path, conn);
1584
1585   if (GNUNET_YES == conn->destroy)
1586   {
1587     c = conn->path->c;
1588     conn->destroy = GNUNET_NO;
1589     conn->path->c = conn;
1590     LOG (GNUNET_ERROR_TYPE_DEBUG, " found duplicate of %s\n", GCC_2s (conn));
1591     LOG (GNUNET_ERROR_TYPE_DEBUG, " duplicate: %s\n", GCC_2s (c));
1592     GCC_debug (c, GNUNET_ERROR_TYPE_DEBUG);
1593     if (CADET_CONNECTION_READY == c->state)
1594     {
1595       /* The other peer confirmed this connection,
1596        * they should not try to duplicate it. */
1597       GNUNET_break_op (0);
1598       return GNUNET_YES;
1599     }
1600
1601     if (GNUNET_CRYPTO_cmp_peer_identity (&my_full_id, GCP_get_id (p)) > 0)
1602     {
1603       struct CadetPeer *neighbor;
1604
1605       LOG (GNUNET_ERROR_TYPE_DEBUG, " duplicate allowed (killing old)\n");
1606       if (GCC_is_origin (c, GNUNET_YES))
1607         neighbor = get_next_hop (c);
1608       else
1609         neighbor = get_prev_hop (c);
1610       send_broken_unknown (&c->id, &my_full_id, NULL,
1611                            GCP_get_id (neighbor));
1612       GCC_destroy (c);
1613       return GNUNET_NO;
1614     }
1615     else
1616       return GNUNET_YES;
1617   }
1618   else
1619   {
1620     LOG (GNUNET_ERROR_TYPE_DEBUG, " %s has no duplicates\n", GCC_2s (conn));
1621     return GNUNET_NO;
1622   }
1623 }
1624
1625
1626 /**
1627  * Log receipt of message on stderr (INFO level).
1628  *
1629  * @param message Message received.
1630  * @param peer Peer who sent the message.
1631  * @param hash Connection ID.
1632  */
1633 static void
1634 log_message (const struct GNUNET_MessageHeader *message,
1635              const struct GNUNET_PeerIdentity *peer,
1636              const struct GNUNET_CADET_Hash *hash)
1637 {
1638   LOG (GNUNET_ERROR_TYPE_INFO, "\n");
1639   LOG (GNUNET_ERROR_TYPE_INFO, "\n");
1640   LOG (GNUNET_ERROR_TYPE_INFO, "<-- %s on connection %s from %s\n",
1641        GC_m2s (ntohs (message->type)), GNUNET_h2s (GC_h2hc (hash)),
1642        GNUNET_i2s (peer));
1643 }
1644
1645 /******************************************************************************/
1646 /********************************    API    ***********************************/
1647 /******************************************************************************/
1648
1649 /**
1650  * Core handler for connection creation.
1651  *
1652  * @param cls Closure (unused).
1653  * @param peer Sender (neighbor).
1654  * @param message Message.
1655  *
1656  * @return GNUNET_OK to keep the connection open,
1657  *         GNUNET_SYSERR to close it (signal serious error)
1658  */
1659 int
1660 GCC_handle_create (void *cls, const struct GNUNET_PeerIdentity *peer,
1661                    const struct GNUNET_MessageHeader *message)
1662 {
1663   struct GNUNET_CADET_ConnectionCreate *msg;
1664   struct GNUNET_PeerIdentity *id;
1665   struct GNUNET_CADET_Hash *cid;
1666   struct CadetPeerPath *path;
1667   struct CadetPeer *dest_peer;
1668   struct CadetPeer *orig_peer;
1669   struct CadetConnection *c;
1670   unsigned int own_pos;
1671   uint16_t size;
1672
1673   /* Check size */
1674   size = ntohs (message->size);
1675   if (size < sizeof (struct GNUNET_CADET_ConnectionCreate))
1676   {
1677     GNUNET_break_op (0);
1678     return GNUNET_OK;
1679   }
1680
1681   /* Calculate hops */
1682   size -= sizeof (struct GNUNET_CADET_ConnectionCreate);
1683   if (size % sizeof (struct GNUNET_PeerIdentity))
1684   {
1685     GNUNET_break_op (0);
1686     return GNUNET_OK;
1687   }
1688   size /= sizeof (struct GNUNET_PeerIdentity);
1689   if (1 > size)
1690   {
1691     GNUNET_break_op (0);
1692     return GNUNET_OK;
1693   }
1694   LOG (GNUNET_ERROR_TYPE_DEBUG, "    path has %u hops.\n", size);
1695
1696   /* Get parameters */
1697   msg = (struct GNUNET_CADET_ConnectionCreate *) message;
1698   cid = &msg->cid;
1699   log_message (message, peer, cid);
1700   id = (struct GNUNET_PeerIdentity *) &msg[1];
1701   LOG (GNUNET_ERROR_TYPE_DEBUG, "    origin: %s\n", GNUNET_i2s (id));
1702
1703   /* Create connection */
1704   c = connection_get (cid);
1705   if (NULL == c)
1706   {
1707     path = path_build_from_peer_ids ((struct GNUNET_PeerIdentity *) &msg[1],
1708                                      size, myid, &own_pos);
1709     if (NULL == path)
1710       return GNUNET_OK;
1711
1712     if (0 == own_pos)
1713     {
1714       GNUNET_break_op (0);
1715       path_destroy (path);
1716       return GNUNET_OK;
1717     }
1718
1719     LOG (GNUNET_ERROR_TYPE_DEBUG, "  Own position: %u\n", own_pos);
1720     LOG (GNUNET_ERROR_TYPE_DEBUG, "  Creating connection\n");
1721     c = GCC_new (cid, NULL, path, own_pos);
1722     if (NULL == c)
1723     {
1724       if (path->length - 1 == own_pos)
1725       {
1726         /* If we are destination, why did the creation fail? */
1727         GNUNET_break (0);
1728         path_destroy (path);
1729         return GNUNET_OK;
1730       }
1731       send_broken_unknown (cid, &my_full_id,
1732                            GNUNET_PEER_resolve2 (path->peers[own_pos + 1]),
1733                            peer);
1734       path_destroy (path);
1735       return GNUNET_OK;
1736     }
1737     GCP_add_path_to_all (path, GNUNET_NO);
1738     connection_reset_timeout (c, GNUNET_YES);
1739   }
1740   else
1741   {
1742     path = path_duplicate (c->path);
1743   }
1744   if (CADET_CONNECTION_NEW == c->state)
1745     connection_change_state (c, CADET_CONNECTION_SENT);
1746
1747   /* Remember peers */
1748   dest_peer = GCP_get (&id[size - 1]);
1749   orig_peer = GCP_get (&id[0]);
1750
1751   /* Is it a connection to us? */
1752   if (c->own_pos == path->length - 1)
1753   {
1754     LOG (GNUNET_ERROR_TYPE_DEBUG, "  It's for us!\n");
1755     GCP_add_path_to_origin (orig_peer, path_duplicate (path), GNUNET_YES);
1756
1757     add_to_peer (c, orig_peer);
1758     if (GNUNET_YES == does_connection_exist (c))
1759     {
1760       path_destroy (path);
1761       GCC_destroy (c);
1762       // FIXME use explicit duplicate
1763       send_broken_unknown (cid, &my_full_id, NULL, peer);
1764
1765       return GNUNET_OK;
1766     }
1767
1768     if (CADET_TUNNEL_NEW == GCT_get_cstate (c->t))
1769       GCT_change_cstate (c->t,  CADET_TUNNEL_WAITING);
1770
1771     send_connection_ack (c, GNUNET_NO);
1772     if (CADET_CONNECTION_SENT == c->state)
1773       connection_change_state (c, CADET_CONNECTION_ACK);
1774   }
1775   else
1776   {
1777     /* It's for somebody else! Retransmit. */
1778     LOG (GNUNET_ERROR_TYPE_DEBUG, "  Retransmitting.\n");
1779     GCP_add_path (dest_peer, path_duplicate (path), GNUNET_NO);
1780     GCP_add_path_to_origin (orig_peer, path_duplicate (path), GNUNET_NO);
1781     GNUNET_assert (NULL == GCC_send_prebuilt_message (message, 0, 0, c,
1782                                                       GNUNET_YES, GNUNET_YES,
1783                                                       NULL, NULL));
1784   }
1785   path_destroy (path);
1786   return GNUNET_OK;
1787 }
1788
1789
1790 /**
1791  * Core handler for path confirmations.
1792  *
1793  * @param cls closure
1794  * @param message message
1795  * @param peer peer identity this notification is about
1796  *
1797  * @return GNUNET_OK to keep the connection open,
1798  *         GNUNET_SYSERR to close it (signal serious error)
1799  */
1800 int
1801 GCC_handle_confirm (void *cls, const struct GNUNET_PeerIdentity *peer,
1802                     const struct GNUNET_MessageHeader *message)
1803 {
1804   struct GNUNET_CADET_ConnectionACK *msg;
1805   struct CadetConnection *c;
1806   struct CadetPeerPath *p;
1807   struct CadetPeer *pi;
1808   enum CadetConnectionState oldstate;
1809   int fwd;
1810
1811   msg = (struct GNUNET_CADET_ConnectionACK *) message;
1812   log_message (message, peer, &msg->cid);
1813   c = connection_get (&msg->cid);
1814   if (NULL == c)
1815   {
1816     GNUNET_STATISTICS_update (stats, "# control on unknown connection",
1817                               1, GNUNET_NO);
1818     LOG (GNUNET_ERROR_TYPE_DEBUG, "  don't know the connection!\n");
1819     send_broken_unknown (&msg->cid, &my_full_id, NULL, peer);
1820     return GNUNET_OK;
1821   }
1822
1823   if (GNUNET_NO != c->destroy)
1824   {
1825     LOG (GNUNET_ERROR_TYPE_DEBUG, "  connection being destroyed\n");
1826     return GNUNET_OK;
1827   }
1828
1829   oldstate = c->state;
1830   LOG (GNUNET_ERROR_TYPE_DEBUG, "  via peer %s\n", GNUNET_i2s (peer));
1831   pi = GCP_get (peer);
1832   if (get_next_hop (c) == pi)
1833   {
1834     LOG (GNUNET_ERROR_TYPE_DEBUG, "  SYNACK\n");
1835     fwd = GNUNET_NO;
1836     if (CADET_CONNECTION_SENT == oldstate)
1837       connection_change_state (c, CADET_CONNECTION_ACK);
1838   }
1839   else if (get_prev_hop (c) == pi)
1840   {
1841     LOG (GNUNET_ERROR_TYPE_DEBUG, "  FINAL ACK\n");
1842     fwd = GNUNET_YES;
1843     connection_change_state (c, CADET_CONNECTION_READY);
1844   }
1845   else
1846   {
1847     GNUNET_break_op (0);
1848     return GNUNET_OK;
1849   }
1850
1851   connection_reset_timeout (c, fwd);
1852
1853   /* Add path to peers? */
1854   p = c->path;
1855   if (NULL != p)
1856   {
1857     GCP_add_path_to_all (p, GNUNET_YES);
1858   }
1859   else
1860   {
1861     GNUNET_break (0);
1862   }
1863
1864   /* Message for us as creator? */
1865   if (GCC_is_origin (c, GNUNET_YES))
1866   {
1867     if (GNUNET_NO != fwd)
1868     {
1869       GNUNET_break_op (0);
1870       return GNUNET_OK;
1871     }
1872     LOG (GNUNET_ERROR_TYPE_DEBUG, "  Connection (SYN)ACK for us!\n");
1873
1874     /* If just created, cancel the short timeout and start a long one */
1875     if (CADET_CONNECTION_SENT == oldstate)
1876       connection_reset_timeout (c, GNUNET_YES);
1877
1878     /* Change connection state */
1879     connection_change_state (c, CADET_CONNECTION_READY);
1880     send_connection_ack (c, GNUNET_YES);
1881
1882     /* Change tunnel state, trigger KX */
1883     if (CADET_TUNNEL_WAITING == GCT_get_cstate (c->t))
1884       GCT_change_cstate (c->t, CADET_TUNNEL_READY);
1885
1886     return GNUNET_OK;
1887   }
1888
1889   /* Message for us as destination? */
1890   if (GCC_is_terminal (c, GNUNET_YES))
1891   {
1892     if (GNUNET_YES != fwd)
1893     {
1894       GNUNET_break_op (0);
1895       return GNUNET_OK;
1896     }
1897     LOG (GNUNET_ERROR_TYPE_DEBUG, "  Connection ACK for us!\n");
1898
1899     /* If just created, cancel the short timeout and start a long one */
1900     if (CADET_CONNECTION_ACK == oldstate)
1901       connection_reset_timeout (c, GNUNET_NO);
1902
1903     /* Change tunnel state */
1904     if (CADET_TUNNEL_WAITING == GCT_get_cstate (c->t))
1905       GCT_change_cstate (c->t, CADET_TUNNEL_READY);
1906
1907     return GNUNET_OK;
1908   }
1909
1910   LOG (GNUNET_ERROR_TYPE_DEBUG, "  not for us, retransmitting...\n");
1911   GNUNET_assert (NULL == GCC_send_prebuilt_message (message, 0, 0, c, fwd,
1912                                                     GNUNET_YES, NULL, NULL));
1913   return GNUNET_OK;
1914 }
1915
1916
1917 /**
1918  * Core handler for notifications of broken connections.
1919  *
1920  * @param cls Closure (unused).
1921  * @param id Peer identity of sending neighbor.
1922  * @param message Message.
1923  *
1924  * @return GNUNET_OK to keep the connection open,
1925  *         GNUNET_SYSERR to close it (signal serious error)
1926  */
1927 int
1928 GCC_handle_broken (void* cls,
1929                    const struct GNUNET_PeerIdentity* id,
1930                    const struct GNUNET_MessageHeader* message)
1931 {
1932   struct GNUNET_CADET_ConnectionBroken *msg;
1933   struct CadetConnection *c;
1934   struct CadetTunnel *t;
1935   int pending;
1936   int fwd;
1937
1938   msg = (struct GNUNET_CADET_ConnectionBroken *) message;
1939   log_message (message, id, &msg->cid);
1940   LOG (GNUNET_ERROR_TYPE_DEBUG, "  regarding %s\n",
1941               GNUNET_i2s (&msg->peer1));
1942   LOG (GNUNET_ERROR_TYPE_DEBUG, "  regarding %s\n",
1943               GNUNET_i2s (&msg->peer2));
1944   c = connection_get (&msg->cid);
1945   if (NULL == c)
1946   {
1947     LOG (GNUNET_ERROR_TYPE_DEBUG, "  duplicate CONNECTION_BROKEN\n");
1948     return GNUNET_OK;
1949   }
1950
1951   t = c->t;
1952
1953   fwd = is_fwd (c, id);
1954   c->destroy = GNUNET_YES;
1955   if (GCC_is_terminal (c, fwd))
1956   {
1957     struct CadetPeer *endpoint;
1958
1959     if (NULL == t)
1960     {
1961       /* A terminal connection should not have 't' set to NULL. */
1962       GNUNET_break (0);
1963       GCC_debug (c, GNUNET_ERROR_TYPE_ERROR);
1964       return GNUNET_OK;
1965     }
1966     endpoint = GCP_get_short (c->path->peers[c->path->length - 1]);
1967     path_invalidate (c->path);
1968     GCP_notify_broken_link (endpoint, &msg->peer1, &msg->peer2);
1969
1970     c->state = CADET_CONNECTION_BROKEN;
1971     GCT_remove_connection (t, c);
1972     c->t = NULL;
1973
1974     pending = c->pending_messages;
1975     if (0 < pending)
1976       resend_messages_and_destroy (c, !fwd);
1977     else
1978       GCC_destroy (c);
1979   }
1980   else
1981   {
1982     GNUNET_assert (NULL == GCC_send_prebuilt_message (message, 0, 0, c, fwd,
1983                                                       GNUNET_YES, NULL, NULL));
1984     connection_cancel_queues (c, !fwd);
1985   }
1986
1987   return GNUNET_OK;
1988 }
1989
1990
1991 /**
1992  * Core handler for tunnel destruction
1993  *
1994  * @param cls Closure (unused).
1995  * @param peer Peer identity of sending neighbor.
1996  * @param message Message.
1997  *
1998  * @return GNUNET_OK to keep the connection open,
1999  *         GNUNET_SYSERR to close it (signal serious error)
2000  */
2001 int
2002 GCC_handle_destroy (void *cls, const struct GNUNET_PeerIdentity *peer,
2003                     const struct GNUNET_MessageHeader *message)
2004 {
2005   struct GNUNET_CADET_ConnectionDestroy *msg;
2006   struct CadetConnection *c;
2007   int fwd;
2008
2009   msg = (struct GNUNET_CADET_ConnectionDestroy *) message;
2010   log_message (message, peer, &msg->cid);
2011   c = connection_get (&msg->cid);
2012   if (NULL == c)
2013   {
2014     /* Probably already got the message from another path,
2015      * destroyed the tunnel and retransmitted to children.
2016      * Safe to ignore.
2017      */
2018     GNUNET_STATISTICS_update (stats, "# control on unknown connection",
2019                               1, GNUNET_NO);
2020     LOG (GNUNET_ERROR_TYPE_DEBUG, "  connection unknown: already destroyed?\n");
2021     return GNUNET_OK;
2022   }
2023   fwd = is_fwd (c, peer);
2024   if (GNUNET_SYSERR == fwd)
2025   {
2026     GNUNET_break_op (0); /* FIXME */
2027     return GNUNET_OK;
2028   }
2029   if (GNUNET_NO == GCC_is_terminal (c, fwd))
2030     GNUNET_assert (NULL == GCC_send_prebuilt_message (message, 0, 0, c, fwd,
2031                                                       GNUNET_YES, NULL, NULL));
2032   else if (0 == c->pending_messages)
2033   {
2034     LOG (GNUNET_ERROR_TYPE_DEBUG, "  directly destroying connection!\n");
2035     GCC_destroy (c);
2036     return GNUNET_OK;
2037   }
2038   c->destroy = GNUNET_YES;
2039   c->state = CADET_CONNECTION_DESTROYED;
2040   if (NULL != c->t)
2041   {
2042     GCT_remove_connection (c->t, c);
2043     c->t = NULL;
2044   }
2045
2046   return GNUNET_OK;
2047 }
2048
2049 /**
2050  * Generic handler for cadet network encrypted traffic.
2051  *
2052  * @param peer Peer identity this notification is about.
2053  * @param msg Encrypted message.
2054  *
2055  * @return GNUNET_OK to keep the connection open,
2056  *         GNUNET_SYSERR to close it (signal serious error)
2057  */
2058 static int
2059 handle_cadet_encrypted (const struct GNUNET_PeerIdentity *peer,
2060                        const struct GNUNET_CADET_Encrypted *msg)
2061 {
2062   struct CadetConnection *c;
2063   struct CadetPeer *neighbor;
2064   struct CadetFlowControl *fc;
2065   GNUNET_PEER_Id peer_id;
2066   uint32_t pid;
2067   uint32_t ttl;
2068   size_t size;
2069   int fwd;
2070
2071   log_message (&msg->header, peer, &msg->cid);
2072
2073   /* Check size */
2074   size = ntohs (msg->header.size);
2075   if (size <
2076       sizeof (struct GNUNET_CADET_Encrypted) +
2077       sizeof (struct GNUNET_MessageHeader))
2078   {
2079     GNUNET_break_op (0);
2080     return GNUNET_OK;
2081   }
2082
2083   /* Check connection */
2084   c = connection_get (&msg->cid);
2085   if (NULL == c)
2086   {
2087     GNUNET_STATISTICS_update (stats, "# unknown connection", 1, GNUNET_NO);
2088     LOG (GNUNET_ERROR_TYPE_DEBUG, "enc on unknown connection %s\n",
2089          GNUNET_h2s (GC_h2hc (&msg->cid)));
2090     send_broken_unknown (&msg->cid, &my_full_id, NULL, peer);
2091     return GNUNET_OK;
2092   }
2093
2094   LOG (GNUNET_ERROR_TYPE_DEBUG, "  connection %s\n", GCC_2s (c));
2095
2096   /* Check if origin is as expected */
2097   neighbor = get_prev_hop (c);
2098   peer_id = GNUNET_PEER_search (peer);
2099   if (peer_id == GCP_get_short_id (neighbor))
2100   {
2101     fwd = GNUNET_YES;
2102   }
2103   else
2104   {
2105     neighbor = get_next_hop (c);
2106     if (peer_id == GCP_get_short_id (neighbor))
2107     {
2108       fwd = GNUNET_NO;
2109     }
2110     else
2111     {
2112       /* Unexpected peer sending traffic on a connection. */
2113       GNUNET_break_op (0);
2114       return GNUNET_OK;
2115     }
2116   }
2117
2118   /* Check PID */
2119   fc = fwd ? &c->bck_fc : &c->fwd_fc;
2120   pid = ntohl (msg->pid);
2121   LOG (GNUNET_ERROR_TYPE_DEBUG, " PID %u (expected %u+)\n",
2122        pid, fc->last_pid_recv + 1);
2123   if (GC_is_pid_bigger (pid, fc->last_ack_sent))
2124   {
2125     GNUNET_STATISTICS_update (stats, "# unsolicited message", 1, GNUNET_NO);
2126     GNUNET_break_op (0);
2127     LOG (GNUNET_ERROR_TYPE_WARNING,
2128          "Received PID %u, (prev %u), ACK %u\n",
2129          pid, fc->last_pid_recv, fc->last_ack_sent);
2130     return GNUNET_OK;
2131   }
2132   if (GNUNET_NO == GC_is_pid_bigger (pid, fc->last_pid_recv))
2133   {
2134     GNUNET_STATISTICS_update (stats, "# duplicate PID", 1, GNUNET_NO);
2135     LOG (GNUNET_ERROR_TYPE_WARNING,
2136                 " PID %u not expected (%u+), dropping!\n",
2137                 pid, fc->last_pid_recv + 1);
2138     return GNUNET_OK;
2139   }
2140   if (CADET_CONNECTION_SENT == c->state || CADET_CONNECTION_ACK == c->state)
2141     connection_change_state (c, CADET_CONNECTION_READY);
2142   connection_reset_timeout (c, fwd);
2143   fc->last_pid_recv = pid;
2144
2145   /* Is this message for us? */
2146   if (GCC_is_terminal (c, fwd))
2147   {
2148     LOG (GNUNET_ERROR_TYPE_DEBUG, "  message for us!\n");
2149     GNUNET_STATISTICS_update (stats, "# messages received", 1, GNUNET_NO);
2150
2151     if (NULL == c->t)
2152     {
2153       GNUNET_break (GNUNET_NO != c->destroy);
2154       return GNUNET_OK;
2155     }
2156     fc->last_pid_recv = pid;
2157     GCT_handle_encrypted (c->t, msg);
2158     GCC_send_ack (c, fwd, GNUNET_NO);
2159     return GNUNET_OK;
2160   }
2161
2162   /* Message not for us: forward to next hop */
2163   LOG (GNUNET_ERROR_TYPE_DEBUG, "  not for us, retransmitting...\n");
2164   ttl = ntohl (msg->ttl);
2165   LOG (GNUNET_ERROR_TYPE_DEBUG, "   ttl: %u\n", ttl);
2166   if (ttl == 0)
2167   {
2168     GNUNET_STATISTICS_update (stats, "# TTL drops", 1, GNUNET_NO);
2169     LOG (GNUNET_ERROR_TYPE_WARNING, " TTL is 0, DROPPING!\n");
2170     GCC_send_ack (c, fwd, GNUNET_NO);
2171     return GNUNET_OK;
2172   }
2173
2174   GNUNET_STATISTICS_update (stats, "# messages forwarded", 1, GNUNET_NO);
2175   GNUNET_assert (NULL == GCC_send_prebuilt_message (&msg->header, 0, 0, c, fwd,
2176                                                     GNUNET_NO, NULL, NULL));
2177
2178   return GNUNET_OK;
2179 }
2180
2181 /**
2182  * Generic handler for cadet network encrypted traffic.
2183  *
2184  * @param peer Peer identity this notification is about.
2185  * @param msg Encrypted message.
2186  *
2187  * @return GNUNET_OK to keep the connection open,
2188  *         GNUNET_SYSERR to close it (signal serious error)
2189  */
2190 static int
2191 handle_cadet_kx (const struct GNUNET_PeerIdentity *peer,
2192                 const struct GNUNET_CADET_KX *msg)
2193 {
2194   struct CadetConnection *c;
2195   struct CadetPeer *neighbor;
2196   GNUNET_PEER_Id peer_id;
2197   size_t size;
2198   int fwd;
2199
2200   log_message (&msg->header, peer, &msg->cid);
2201
2202   /* Check size */
2203   size = ntohs (msg->header.size);
2204   if (size <
2205       sizeof (struct GNUNET_CADET_KX) +
2206       sizeof (struct GNUNET_MessageHeader))
2207   {
2208     GNUNET_break_op (0);
2209     return GNUNET_OK;
2210   }
2211
2212   /* Check connection */
2213   c = connection_get (&msg->cid);
2214   if (NULL == c)
2215   {
2216     GNUNET_STATISTICS_update (stats, "# unknown connection", 1, GNUNET_NO);
2217     LOG (GNUNET_ERROR_TYPE_DEBUG, "kx on unknown connection %s\n",
2218          GNUNET_h2s (GC_h2hc (&msg->cid)));
2219     send_broken_unknown (&msg->cid, &my_full_id, NULL, peer);
2220     return GNUNET_OK;
2221   }
2222   LOG (GNUNET_ERROR_TYPE_DEBUG, " on connection %s\n", GCC_2s (c));
2223
2224   /* Check if origin is as expected */
2225   neighbor = get_prev_hop (c);
2226   peer_id = GNUNET_PEER_search (peer);
2227   if (peer_id == GCP_get_short_id (neighbor))
2228   {
2229     fwd = GNUNET_YES;
2230   }
2231   else
2232   {
2233     neighbor = get_next_hop (c);
2234     if (peer_id == GCP_get_short_id (neighbor))
2235     {
2236       fwd = GNUNET_NO;
2237     }
2238     else
2239     {
2240       /* Unexpected peer sending traffic on a connection. */
2241       GNUNET_break_op (0);
2242       return GNUNET_OK;
2243     }
2244   }
2245
2246   /* Count as connection confirmation. */
2247   if (CADET_CONNECTION_SENT == c->state || CADET_CONNECTION_ACK == c->state)
2248   {
2249     connection_change_state (c, CADET_CONNECTION_READY);
2250     if (NULL != c->t)
2251     {
2252       if (CADET_TUNNEL_WAITING == GCT_get_cstate (c->t))
2253         GCT_change_cstate (c->t, CADET_TUNNEL_READY);
2254     }
2255   }
2256   connection_reset_timeout (c, fwd);
2257
2258   /* Is this message for us? */
2259   if (GCC_is_terminal (c, fwd))
2260   {
2261     LOG (GNUNET_ERROR_TYPE_DEBUG, "  message for us!\n");
2262     GNUNET_STATISTICS_update (stats, "# messages received", 1, GNUNET_NO);
2263     if (NULL == c->t)
2264     {
2265       GNUNET_break (0);
2266       return GNUNET_OK;
2267     }
2268     GCT_handle_kx (c->t, &msg[1].header);
2269     return GNUNET_OK;
2270   }
2271
2272   /* Message not for us: forward to next hop */
2273   LOG (GNUNET_ERROR_TYPE_DEBUG, "  not for us, retransmitting...\n");
2274   GNUNET_STATISTICS_update (stats, "# messages forwarded", 1, GNUNET_NO);
2275   GNUNET_assert (NULL == GCC_send_prebuilt_message (&msg->header, 0, 0, c, fwd,
2276                                                     GNUNET_NO, NULL, NULL));
2277
2278   return GNUNET_OK;
2279 }
2280
2281
2282 /**
2283  * Core handler for encrypted cadet network traffic (channel mgmt, data).
2284  *
2285  * @param cls Closure (unused).
2286  * @param message Message received.
2287  * @param peer Peer who sent the message.
2288  *
2289  * @return GNUNET_OK to keep the connection open,
2290  *         GNUNET_SYSERR to close it (signal serious error)
2291  */
2292 int
2293 GCC_handle_encrypted (void *cls, const struct GNUNET_PeerIdentity *peer,
2294                       const struct GNUNET_MessageHeader *message)
2295 {
2296   return handle_cadet_encrypted (peer,
2297                                 (struct GNUNET_CADET_Encrypted *)message);
2298 }
2299
2300
2301 /**
2302  * Core handler for key exchange traffic (ephemeral key, ping, pong).
2303  *
2304  * @param cls Closure (unused).
2305  * @param message Message received.
2306  * @param peer Peer who sent the message.
2307  *
2308  * @return GNUNET_OK to keep the connection open,
2309  *         GNUNET_SYSERR to close it (signal serious error)
2310  */
2311 int
2312 GCC_handle_kx (void *cls, const struct GNUNET_PeerIdentity *peer,
2313                const struct GNUNET_MessageHeader *message)
2314 {
2315   return handle_cadet_kx (peer,
2316                          (struct GNUNET_CADET_KX *) message);
2317 }
2318
2319
2320 /**
2321  * Core handler for cadet network traffic point-to-point acks.
2322  *
2323  * @param cls closure
2324  * @param message message
2325  * @param peer peer identity this notification is about
2326  *
2327  * @return GNUNET_OK to keep the connection open,
2328  *         GNUNET_SYSERR to close it (signal serious error)
2329  */
2330 int
2331 GCC_handle_ack (void *cls, const struct GNUNET_PeerIdentity *peer,
2332                 const struct GNUNET_MessageHeader *message)
2333 {
2334   struct GNUNET_CADET_ACK *msg;
2335   struct CadetConnection *c;
2336   struct CadetFlowControl *fc;
2337   GNUNET_PEER_Id id;
2338   uint32_t ack;
2339   int fwd;
2340
2341   msg = (struct GNUNET_CADET_ACK *) message;
2342   log_message (message, peer, &msg->cid);
2343   c = connection_get (&msg->cid);
2344   if (NULL == c)
2345   {
2346     GNUNET_STATISTICS_update (stats, "# ack on unknown connection", 1,
2347                               GNUNET_NO);
2348     send_broken_unknown (&msg->cid, &my_full_id, NULL, peer);
2349     return GNUNET_OK;
2350   }
2351
2352   /* Is this a forward or backward ACK? */
2353   id = GNUNET_PEER_search (peer);
2354   if (GCP_get_short_id (get_next_hop (c)) == id)
2355   {
2356     LOG (GNUNET_ERROR_TYPE_DEBUG, "  FWD ACK\n");
2357     fc = &c->fwd_fc;
2358     fwd = GNUNET_YES;
2359   }
2360   else if (GCP_get_short_id (get_prev_hop (c)) == id)
2361   {
2362     LOG (GNUNET_ERROR_TYPE_DEBUG, "  BCK ACK\n");
2363     fc = &c->bck_fc;
2364     fwd = GNUNET_NO;
2365   }
2366   else
2367   {
2368     GNUNET_break_op (0);
2369     return GNUNET_OK;
2370   }
2371
2372   ack = ntohl (msg->ack);
2373   LOG (GNUNET_ERROR_TYPE_DEBUG, "  ACK %u (was %u)\n",
2374               ack, fc->last_ack_recv);
2375   if (GC_is_pid_bigger (ack, fc->last_ack_recv))
2376     fc->last_ack_recv = ack;
2377
2378   /* Cancel polling if the ACK is big enough. */
2379   if (GNUNET_SCHEDULER_NO_TASK != fc->poll_task &&
2380       GC_is_pid_bigger (fc->last_ack_recv, fc->last_pid_sent))
2381   {
2382     LOG (GNUNET_ERROR_TYPE_DEBUG, "  Cancel poll\n");
2383     GNUNET_SCHEDULER_cancel (fc->poll_task);
2384     fc->poll_task = GNUNET_SCHEDULER_NO_TASK;
2385     fc->poll_time = GNUNET_TIME_UNIT_SECONDS;
2386   }
2387
2388   connection_unlock_queue (c, fwd);
2389
2390   return GNUNET_OK;
2391 }
2392
2393
2394 /**
2395  * Core handler for cadet network traffic point-to-point ack polls.
2396  *
2397  * @param cls closure
2398  * @param message message
2399  * @param peer peer identity this notification is about
2400  *
2401  * @return GNUNET_OK to keep the connection open,
2402  *         GNUNET_SYSERR to close it (signal serious error)
2403  */
2404 int
2405 GCC_handle_poll (void *cls, const struct GNUNET_PeerIdentity *peer,
2406                  const struct GNUNET_MessageHeader *message)
2407 {
2408   struct GNUNET_CADET_Poll *msg;
2409   struct CadetConnection *c;
2410   struct CadetFlowControl *fc;
2411   GNUNET_PEER_Id id;
2412   uint32_t pid;
2413   int fwd;
2414
2415   msg = (struct GNUNET_CADET_Poll *) message;
2416   log_message (message, peer, &msg->cid);
2417   c = connection_get (&msg->cid);
2418   if (NULL == c)
2419   {
2420     GNUNET_STATISTICS_update (stats, "# poll on unknown connection", 1,
2421                               GNUNET_NO);
2422     LOG (GNUNET_ERROR_TYPE_DEBUG, "POLL message on unknown connection %s!\n",
2423          GNUNET_h2s (GC_h2hc (&msg->cid)));
2424     send_broken_unknown (&msg->cid, &my_full_id, NULL, peer);
2425     return GNUNET_OK;
2426   }
2427
2428   /* Is this a forward or backward ACK?
2429    * Note: a poll should never be needed in a loopback case,
2430    * since there is no possiblility of packet loss there, so
2431    * this way of discerining FWD/BCK should not be a problem.
2432    */
2433   id = GNUNET_PEER_search (peer);
2434   if (GCP_get_short_id (get_next_hop (c)) == id)
2435   {
2436     LOG (GNUNET_ERROR_TYPE_DEBUG, "  FWD FC\n");
2437     fc = &c->fwd_fc;
2438   }
2439   else if (GCP_get_short_id (get_prev_hop (c)) == id)
2440   {
2441     LOG (GNUNET_ERROR_TYPE_DEBUG, "  BCK FC\n");
2442     fc = &c->bck_fc;
2443   }
2444   else
2445   {
2446     GNUNET_break_op (0);
2447     return GNUNET_OK;
2448   }
2449
2450   pid = ntohl (msg->pid);
2451   LOG (GNUNET_ERROR_TYPE_DEBUG, "  PID %u, OLD %u\n", pid, fc->last_pid_recv);
2452   fc->last_pid_recv = pid;
2453   fwd = fc == &c->bck_fc;
2454   GCC_send_ack (c, fwd, GNUNET_YES);
2455
2456   return GNUNET_OK;
2457 }
2458
2459
2460 /**
2461  * Send an ACK on the appropriate connection/channel, depending on
2462  * the direction and the position of the peer.
2463  *
2464  * @param c Which connection to send the hop-by-hop ACK.
2465  * @param fwd Is this a fwd ACK? (will go dest->root).
2466  * @param force Send the ACK even if suboptimal (e.g. requested by POLL).
2467  */
2468 void
2469 GCC_send_ack (struct CadetConnection *c, int fwd, int force)
2470 {
2471   unsigned int buffer;
2472
2473   LOG (GNUNET_ERROR_TYPE_DEBUG,
2474        "GMC send %s ACK on %s\n",
2475        GC_f2s (fwd), GCC_2s (c));
2476
2477   if (NULL == c)
2478   {
2479     GNUNET_break (0);
2480     return;
2481   }
2482
2483   if (GNUNET_NO != c->destroy)
2484   {
2485     LOG (GNUNET_ERROR_TYPE_DEBUG, "  being destroyed, why bother...\n");
2486     return;
2487   }
2488
2489   /* Get available buffer space */
2490   if (GCC_is_terminal (c, fwd))
2491   {
2492     LOG (GNUNET_ERROR_TYPE_DEBUG, "  getting from all channels\n");
2493     buffer = GCT_get_channels_buffer (c->t);
2494   }
2495   else
2496   {
2497     LOG (GNUNET_ERROR_TYPE_DEBUG, "  getting from one connection\n");
2498     buffer = GCC_get_buffer (c, fwd);
2499   }
2500   LOG (GNUNET_ERROR_TYPE_DEBUG, "  buffer available: %u\n", buffer);
2501   if (0 == buffer && GNUNET_NO == force)
2502     return;
2503
2504   /* Send available buffer space */
2505   if (GCC_is_origin (c, fwd))
2506   {
2507     GNUNET_assert (NULL != c->t);
2508     LOG (GNUNET_ERROR_TYPE_DEBUG, "  sending on channels...\n");
2509     GCT_unchoke_channels (c->t);
2510   }
2511   else
2512   {
2513     LOG (GNUNET_ERROR_TYPE_DEBUG, "  sending on connection\n");
2514     send_ack (c, buffer, fwd, force);
2515   }
2516 }
2517
2518
2519 /**
2520  * Initialize the connections subsystem
2521  *
2522  * @param c Configuration handle.
2523  */
2524 void
2525 GCC_init (const struct GNUNET_CONFIGURATION_Handle *c)
2526 {
2527   LOG (GNUNET_ERROR_TYPE_DEBUG, "init\n");
2528   if (GNUNET_OK !=
2529       GNUNET_CONFIGURATION_get_value_number (c, "CADET", "MAX_MSGS_QUEUE",
2530                                              &max_msgs_queue))
2531   {
2532     GNUNET_log_config_invalid (GNUNET_ERROR_TYPE_ERROR,
2533                                "CADET", "MAX_MSGS_QUEUE", "MISSING");
2534     GNUNET_SCHEDULER_shutdown ();
2535     return;
2536   }
2537
2538   if (GNUNET_OK !=
2539       GNUNET_CONFIGURATION_get_value_number (c, "CADET", "MAX_CONNECTIONS",
2540                                              &max_connections))
2541   {
2542     GNUNET_log_config_invalid (GNUNET_ERROR_TYPE_ERROR,
2543                                "CADET", "MAX_CONNECTIONS", "MISSING");
2544     GNUNET_SCHEDULER_shutdown ();
2545     return;
2546   }
2547
2548   if (GNUNET_OK !=
2549       GNUNET_CONFIGURATION_get_value_time (c, "CADET", "REFRESH_CONNECTION_TIME",
2550                                            &refresh_connection_time))
2551   {
2552     GNUNET_log_config_invalid (GNUNET_ERROR_TYPE_ERROR,
2553                                "CADET", "REFRESH_CONNECTION_TIME", "MISSING");
2554     GNUNET_SCHEDULER_shutdown ();
2555     return;
2556   }
2557   create_connection_time = GNUNET_TIME_UNIT_SECONDS;
2558   connections = GNUNET_CONTAINER_multihashmap_create (1024, GNUNET_NO);
2559 }
2560
2561
2562 /**
2563  * Destroy each connection on shutdown.
2564  *
2565  * @param cls Closure (unused).
2566  * @param key Current key code (CID, unused).
2567  * @param value Value in the hash map (connection)
2568  *
2569  * @return #GNUNET_YES, because we should continue to iterate,
2570  */
2571 static int
2572 shutdown_iterator (void *cls,
2573                    const struct GNUNET_HashCode *key,
2574                    void *value)
2575 {
2576   struct CadetConnection *c = value;
2577
2578   GCC_destroy (c);
2579   return GNUNET_YES;
2580 }
2581
2582
2583 /**
2584  * Shut down the connections subsystem.
2585  */
2586 void
2587 GCC_shutdown (void)
2588 {
2589   GNUNET_CONTAINER_multihashmap_iterate (connections, &shutdown_iterator, NULL);
2590   GNUNET_CONTAINER_multihashmap_destroy (connections);
2591   connections = NULL;
2592 }
2593
2594
2595 /**
2596  * Create a connection.
2597  *
2598  * @param cid Connection ID (either created locally or imposed remotely).
2599  * @param t Tunnel this connection belongs to (or NULL);
2600  * @param path Path this connection has to use (copy is made).
2601  * @param own_pos Own position in the @c path path.
2602  *
2603  * @return Newly created connection, NULL in case of error (own id not in path).
2604  */
2605 struct CadetConnection *
2606 GCC_new (const struct GNUNET_CADET_Hash *cid,
2607          struct CadetTunnel *t,
2608          struct CadetPeerPath *path,
2609          unsigned int own_pos)
2610 {
2611   struct CadetConnection *c;
2612   struct CadetPeerPath *p;
2613
2614   p = path_duplicate (path);
2615   c = GNUNET_new (struct CadetConnection);
2616   c->id = *cid;
2617   GNUNET_assert (GNUNET_OK ==
2618                  GNUNET_CONTAINER_multihashmap_put (connections,
2619                                                     GCC_get_h (c), c,
2620                                                     GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_ONLY));
2621   fc_init (&c->fwd_fc);
2622   fc_init (&c->bck_fc);
2623   c->fwd_fc.c = c;
2624   c->bck_fc.c = c;
2625
2626   c->t = t;
2627   GNUNET_assert (own_pos <= p->length - 1);
2628   c->own_pos = own_pos;
2629   c->path = p;
2630   p->c = c;
2631
2632   if (GNUNET_OK != register_neighbors (c))
2633   {
2634     if (0 == own_pos)
2635     {
2636       path_invalidate (c->path);
2637       c->t = NULL;
2638       c->path = NULL;
2639     }
2640     GCC_destroy (c);
2641     return NULL;
2642   }
2643   LOG (GNUNET_ERROR_TYPE_INFO, "New connection %s\n", GCC_2s (c));
2644   return c;
2645 }
2646
2647
2648 void
2649 GCC_destroy (struct CadetConnection *c)
2650 {
2651   if (NULL == c)
2652   {
2653     GNUNET_break (0);
2654     return;
2655   }
2656
2657   if (2 == c->destroy) /* cancel queues -> GCP_queue_cancel -> q_destroy -> */
2658     return;            /* -> message_sent -> GCC_destroy. Don't loop. */
2659   c->destroy = 2;
2660
2661   LOG (GNUNET_ERROR_TYPE_DEBUG, "destroying connection %s\n", GCC_2s (c));
2662   LOG (GNUNET_ERROR_TYPE_DEBUG, " fc's f: %p, b: %p\n",
2663        &c->fwd_fc, &c->bck_fc);
2664   LOG (GNUNET_ERROR_TYPE_DEBUG, " fc tasks f: %u, b: %u\n",
2665        c->fwd_fc.poll_task, c->bck_fc.poll_task);
2666
2667   /* Cancel all traffic */
2668   if (NULL != c->path)
2669   {
2670     connection_cancel_queues (c, GNUNET_YES);
2671     connection_cancel_queues (c, GNUNET_NO);
2672     unregister_neighbors (c);
2673   }
2674
2675   /* Cancel maintainance task (keepalive/timeout) */
2676   if (NULL != c->fwd_fc.poll_msg)
2677   {
2678     GCC_cancel (c->fwd_fc.poll_msg);
2679     LOG (GNUNET_ERROR_TYPE_DEBUG, " *** POLL msg FWD canceled\n");
2680   }
2681   if (NULL != c->bck_fc.poll_msg)
2682   {
2683     GCC_cancel (c->bck_fc.poll_msg);
2684     LOG (GNUNET_ERROR_TYPE_DEBUG, " *** POLL msg BCK canceled\n");
2685   }
2686
2687   /* Delete from tunnel */
2688   if (NULL != c->t)
2689     GCT_remove_connection (c->t, c);
2690
2691   if (GNUNET_NO == GCC_is_origin (c, GNUNET_YES) && NULL != c->path)
2692     path_destroy (c->path);
2693   if (GNUNET_SCHEDULER_NO_TASK != c->fwd_maintenance_task)
2694     GNUNET_SCHEDULER_cancel (c->fwd_maintenance_task);
2695   if (GNUNET_SCHEDULER_NO_TASK != c->bck_maintenance_task)
2696     GNUNET_SCHEDULER_cancel (c->bck_maintenance_task);
2697   if (GNUNET_SCHEDULER_NO_TASK != c->fwd_fc.poll_task)
2698   {
2699     GNUNET_SCHEDULER_cancel (c->fwd_fc.poll_task);
2700     LOG (GNUNET_ERROR_TYPE_DEBUG, " *** POLL FWD canceled\n");
2701   }
2702   if (GNUNET_SCHEDULER_NO_TASK != c->bck_fc.poll_task)
2703   {
2704     GNUNET_SCHEDULER_cancel (c->bck_fc.poll_task);
2705     LOG (GNUNET_ERROR_TYPE_DEBUG, " *** POLL BCK canceled\n");
2706   }
2707
2708   GNUNET_break (GNUNET_YES ==
2709                 GNUNET_CONTAINER_multihashmap_remove (connections,
2710                                                       GCC_get_h (c), c));
2711
2712   GNUNET_STATISTICS_update (stats, "# connections", -1, GNUNET_NO);
2713   GNUNET_free (c);
2714 }
2715
2716 /**
2717  * Get the connection ID.
2718  *
2719  * @param c Connection to get the ID from.
2720  *
2721  * @return ID of the connection.
2722  */
2723 const struct GNUNET_CADET_Hash *
2724 GCC_get_id (const struct CadetConnection *c)
2725 {
2726   return &c->id;
2727 }
2728
2729
2730 /**
2731  * Get the connection ID.
2732  *
2733  * @param c Connection to get the ID from.
2734  *
2735  * @return ID of the connection.
2736  */
2737 const struct GNUNET_HashCode *
2738 GCC_get_h (const struct CadetConnection *c)
2739 {
2740   return GC_h2hc (&c->id);
2741 }
2742
2743
2744 /**
2745  * Get the connection path.
2746  *
2747  * @param c Connection to get the path from.
2748  *
2749  * @return path used by the connection.
2750  */
2751 const struct CadetPeerPath *
2752 GCC_get_path (const struct CadetConnection *c)
2753 {
2754   if (GNUNET_NO == c->destroy)
2755     return c->path;
2756   return NULL;
2757 }
2758
2759
2760 /**
2761  * Get the connection state.
2762  *
2763  * @param c Connection to get the state from.
2764  *
2765  * @return state of the connection.
2766  */
2767 enum CadetConnectionState
2768 GCC_get_state (const struct CadetConnection *c)
2769 {
2770   return c->state;
2771 }
2772
2773 /**
2774  * Get the connection tunnel.
2775  *
2776  * @param c Connection to get the tunnel from.
2777  *
2778  * @return tunnel of the connection.
2779  */
2780 struct CadetTunnel *
2781 GCC_get_tunnel (const struct CadetConnection *c)
2782 {
2783   return c->t;
2784 }
2785
2786
2787 /**
2788  * Get free buffer space in a connection.
2789  *
2790  * @param c Connection.
2791  * @param fwd Is query about FWD traffic?
2792  *
2793  * @return Free buffer space [0 - max_msgs_queue/max_connections]
2794  */
2795 unsigned int
2796 GCC_get_buffer (struct CadetConnection *c, int fwd)
2797 {
2798   struct CadetFlowControl *fc;
2799
2800   fc = fwd ? &c->fwd_fc : &c->bck_fc;
2801
2802   return (fc->queue_max - fc->queue_n);
2803 }
2804
2805 /**
2806  * Get how many messages have we allowed to send to us from a direction.
2807  *
2808  * @param c Connection.
2809  * @param fwd Are we asking about traffic from FWD (BCK messages)?
2810  *
2811  * @return last_ack_sent - last_pid_recv
2812  */
2813 unsigned int
2814 GCC_get_allowed (struct CadetConnection *c, int fwd)
2815 {
2816   struct CadetFlowControl *fc;
2817
2818   fc = fwd ? &c->fwd_fc : &c->bck_fc;
2819   if (CADET_CONNECTION_READY != c->state
2820       || GC_is_pid_bigger (fc->last_pid_recv, fc->last_ack_sent))
2821   {
2822     return 0;
2823   }
2824   return (fc->last_ack_sent - fc->last_pid_recv);
2825 }
2826
2827 /**
2828  * Get messages queued in a connection.
2829  *
2830  * @param c Connection.
2831  * @param fwd Is query about FWD traffic?
2832  *
2833  * @return Number of messages queued.
2834  */
2835 unsigned int
2836 GCC_get_qn (struct CadetConnection *c, int fwd)
2837 {
2838   struct CadetFlowControl *fc;
2839
2840   fc = fwd ? &c->fwd_fc : &c->bck_fc;
2841
2842   return fc->queue_n;
2843 }
2844
2845
2846 /**
2847  * Get next PID to use.
2848  *
2849  * @param c Connection.
2850  * @param fwd Is query about FWD traffic?
2851  *
2852  * @return Last PID used + 1.
2853  */
2854 unsigned int
2855 GCC_get_pid (struct CadetConnection *c, int fwd)
2856 {
2857   struct CadetFlowControl *fc;
2858
2859   fc = fwd ? &c->fwd_fc : &c->bck_fc;
2860
2861   return fc->last_pid_sent + 1;
2862 }
2863
2864
2865 /**
2866  * Allow the connection to advertise a buffer of the given size.
2867  *
2868  * The connection will send an @c fwd ACK message (so: in direction !fwd)
2869  * allowing up to last_pid_recv + buffer.
2870  *
2871  * @param c Connection.
2872  * @param buffer How many more messages the connection can accept.
2873  * @param fwd Is this about FWD traffic? (The ack will go dest->root).
2874  */
2875 void
2876 GCC_allow (struct CadetConnection *c, unsigned int buffer, int fwd)
2877 {
2878   LOG (GNUNET_ERROR_TYPE_DEBUG, "  allowing %s %u messages %s\n",
2879        GCC_2s (c), buffer, GC_f2s (fwd));
2880   send_ack (c, buffer, fwd, GNUNET_NO);
2881 }
2882
2883
2884 /**
2885  * Notify other peers on a connection of a broken link. Mark connections
2886  * to destroy after all traffic has been sent.
2887  *
2888  * @param c Connection on which there has been a disconnection.
2889  * @param peer Peer that disconnected.
2890  */
2891 void
2892 GCC_notify_broken (struct CadetConnection *c,
2893                    struct CadetPeer *peer)
2894 {
2895   int fwd;
2896
2897   LOG (GNUNET_ERROR_TYPE_DEBUG,
2898        " notify broken on %s due to %s disconnect\n",
2899        GCC_2s (c), GCP_2s (peer));
2900
2901   fwd = peer == get_prev_hop (c);
2902
2903   if (GNUNET_YES == GCC_is_terminal (c, fwd))
2904   {
2905     /* Local shutdown, no one to notify about this. */
2906     GCC_destroy (c);
2907     return;
2908   }
2909   if (GNUNET_NO == c->destroy)
2910     send_broken (c, &my_full_id, GCP_get_id (peer), fwd);
2911
2912   /* Connection will have at least one pending message
2913    * (the one we just scheduled), so no point in checking whether to
2914    * destroy immediately. */
2915   c->destroy = GNUNET_YES;
2916   c->state = CADET_CONNECTION_DESTROYED;
2917
2918   /**
2919    * Cancel all queues, if no message is left, connection will be destroyed.
2920    */
2921   connection_cancel_queues (c, !fwd);
2922
2923   return;
2924 }
2925
2926
2927 /**
2928  * Is this peer the first one on the connection?
2929  *
2930  * @param c Connection.
2931  * @param fwd Is this about fwd traffic?
2932  *
2933  * @return #GNUNET_YES if origin, #GNUNET_NO if relay/terminal.
2934  */
2935 int
2936 GCC_is_origin (struct CadetConnection *c, int fwd)
2937 {
2938   if (!fwd && c->path->length - 1 == c->own_pos )
2939     return GNUNET_YES;
2940   if (fwd && 0 == c->own_pos)
2941     return GNUNET_YES;
2942   return GNUNET_NO;
2943 }
2944
2945
2946 /**
2947  * Is this peer the last one on the connection?
2948  *
2949  * @param c Connection.
2950  * @param fwd Is this about fwd traffic?
2951  *            Note that the ROOT is the terminal for BCK traffic!
2952  *
2953  * @return #GNUNET_YES if terminal, #GNUNET_NO if relay/origin.
2954  */
2955 int
2956 GCC_is_terminal (struct CadetConnection *c, int fwd)
2957 {
2958   return GCC_is_origin (c, !fwd);
2959 }
2960
2961
2962 /**
2963  * See if we are allowed to send by the next hop in the given direction.
2964  *
2965  * @param c Connection.
2966  * @param fwd Is this about fwd traffic?
2967  *
2968  * @return #GNUNET_YES in case it's OK to send.
2969  */
2970 int
2971 GCC_is_sendable (struct CadetConnection *c, int fwd)
2972 {
2973   struct CadetFlowControl *fc;
2974
2975   LOG (GNUNET_ERROR_TYPE_DEBUG, " checking sendability of %s traffic on %s\n",
2976        GC_f2s (fwd), GCC_2s (c));
2977   if (NULL == c)
2978   {
2979     GNUNET_break (0);
2980     return GNUNET_YES;
2981   }
2982   fc = fwd ? &c->fwd_fc : &c->bck_fc;
2983   LOG (GNUNET_ERROR_TYPE_DEBUG,
2984        " last ack recv: %u, last pid sent: %u\n",
2985        fc->last_ack_recv, fc->last_pid_sent);
2986   if (GC_is_pid_bigger (fc->last_ack_recv, fc->last_pid_sent))
2987   {
2988     LOG (GNUNET_ERROR_TYPE_DEBUG, " sendable\n");
2989     return GNUNET_YES;
2990   }
2991   LOG (GNUNET_ERROR_TYPE_DEBUG, " not sendable\n");
2992   return GNUNET_NO;
2993 }
2994
2995
2996 /**
2997  * Check if this connection is a direct one (never trim a direct connection).
2998  *
2999  * @param c Connection.
3000  *
3001  * @return #GNUNET_YES in case it's a direct connection, #GNUNET_NO otherwise.
3002  */
3003 int
3004 GCC_is_direct (struct CadetConnection *c)
3005 {
3006   return (c->path->length == 2) ? GNUNET_YES : GNUNET_NO;
3007 }
3008
3009 /**
3010  * Sends an already built message on a connection, properly registering
3011  * all used resources.
3012  *
3013  * @param message Message to send. Function makes a copy of it.
3014  *                If message is not hop-by-hop, decrements TTL of copy.
3015  * @param payload_type Type of payload, in case the message is encrypted.
3016  * @param c Connection on which this message is transmitted.
3017  * @param fwd Is this a fwd message?
3018  * @param force Force the connection to accept the message (buffer overfill).
3019  * @param cont Continuation called once message is sent. Can be NULL.
3020  * @param cont_cls Closure for @c cont.
3021  *
3022  * @return Handle to cancel the message before it's sent.
3023  *         NULL on error or if @c cont is NULL.
3024  *         Invalid on @c cont call.
3025  */
3026 struct CadetConnectionQueue *
3027 GCC_send_prebuilt_message (const struct GNUNET_MessageHeader *message,
3028                            uint16_t payload_type, uint32_t payload_id,
3029                            struct CadetConnection *c, int fwd, int force,
3030                            GCC_sent cont, void *cont_cls)
3031 {
3032   struct CadetFlowControl *fc;
3033   struct CadetConnectionQueue *q;
3034   void *data;
3035   size_t size;
3036   uint16_t type;
3037   int droppable;
3038
3039   size = ntohs (message->size);
3040   data = GNUNET_malloc (size);
3041   memcpy (data, message, size);
3042   type = ntohs (message->type);
3043   LOG (GNUNET_ERROR_TYPE_INFO, "--> %s (%s %9u) on connection %s (%u bytes)\n",
3044        GC_m2s (type), GC_m2s (payload_type), payload_id, GCC_2s (c), size);
3045
3046   fc = fwd ? &c->fwd_fc : &c->bck_fc;
3047   droppable = GNUNET_NO == force;
3048   switch (type)
3049   {
3050     struct GNUNET_CADET_Encrypted *emsg;
3051     struct GNUNET_CADET_KX        *kmsg;
3052     struct GNUNET_CADET_ACK       *amsg;
3053     struct GNUNET_CADET_Poll      *pmsg;
3054     struct GNUNET_CADET_ConnectionDestroy *dmsg;
3055     struct GNUNET_CADET_ConnectionBroken  *bmsg;
3056     uint32_t ttl;
3057
3058     case GNUNET_MESSAGE_TYPE_CADET_ENCRYPTED:
3059       emsg = (struct GNUNET_CADET_Encrypted *) data;
3060       ttl = ntohl (emsg->ttl);
3061       if (0 == ttl)
3062       {
3063         GNUNET_break_op (0);
3064         GNUNET_free (data);
3065         return NULL;
3066       }
3067       emsg->cid = c->id;
3068       emsg->ttl = htonl (ttl - 1);
3069       emsg->pid = htonl (0);
3070       LOG (GNUNET_ERROR_TYPE_DEBUG, "  Q_N+ %p %u\n", fc, fc->queue_n);
3071       LOG (GNUNET_ERROR_TYPE_DEBUG, "last pid sent %u\n", fc->last_pid_sent);
3072       LOG (GNUNET_ERROR_TYPE_DEBUG, "     ack recv %u\n", fc->last_ack_recv);
3073       if (GNUNET_YES == droppable)
3074       {
3075         fc->queue_n++;
3076       }
3077       else
3078       {
3079         LOG (GNUNET_ERROR_TYPE_DEBUG, "  not droppable, Q_N stays the same\n");
3080       }
3081       if (GC_is_pid_bigger (fc->last_pid_sent + 1, fc->last_ack_recv))
3082       {
3083         GCC_start_poll (c, fwd);
3084       }
3085       break;
3086
3087     case GNUNET_MESSAGE_TYPE_CADET_KX:
3088       kmsg = (struct GNUNET_CADET_KX *) data;
3089       kmsg->cid = c->id;
3090       break;
3091
3092     case GNUNET_MESSAGE_TYPE_CADET_ACK:
3093       amsg = (struct GNUNET_CADET_ACK *) data;
3094       amsg->cid = c->id;
3095       LOG (GNUNET_ERROR_TYPE_DEBUG, " ack %u\n", ntohl (amsg->ack));
3096       droppable = GNUNET_NO;
3097       break;
3098
3099     case GNUNET_MESSAGE_TYPE_CADET_POLL:
3100       pmsg = (struct GNUNET_CADET_Poll *) data;
3101       pmsg->cid = c->id;
3102       LOG (GNUNET_ERROR_TYPE_DEBUG, " poll %u\n", ntohl (pmsg->pid));
3103       droppable = GNUNET_NO;
3104       break;
3105
3106     case GNUNET_MESSAGE_TYPE_CADET_CONNECTION_DESTROY:
3107       dmsg = (struct GNUNET_CADET_ConnectionDestroy *) data;
3108       dmsg->cid = c->id;
3109       break;
3110
3111     case GNUNET_MESSAGE_TYPE_CADET_CONNECTION_BROKEN:
3112       bmsg = (struct GNUNET_CADET_ConnectionBroken *) data;
3113       bmsg->cid = c->id;
3114       break;
3115
3116     case GNUNET_MESSAGE_TYPE_CADET_CONNECTION_CREATE:
3117     case GNUNET_MESSAGE_TYPE_CADET_CONNECTION_ACK:
3118       break;
3119
3120     default:
3121       GNUNET_break (0);
3122       GNUNET_free (data);
3123       return NULL;
3124   }
3125
3126   if (fc->queue_n > fc->queue_max && droppable)
3127   {
3128     GNUNET_STATISTICS_update (stats, "# messages dropped (buffer full)",
3129                               1, GNUNET_NO);
3130     GNUNET_break (0);
3131     LOG (GNUNET_ERROR_TYPE_DEBUG, "queue full: %u/%u\n",
3132          fc->queue_n, fc->queue_max);
3133     if (GNUNET_MESSAGE_TYPE_CADET_ENCRYPTED == type)
3134     {
3135       fc->queue_n--;
3136     }
3137     GNUNET_free (data);
3138     return NULL; /* Drop this message */
3139   }
3140
3141   LOG (GNUNET_ERROR_TYPE_DEBUG, "  C_P+ %s %u\n",
3142        GCC_2s (c), c->pending_messages);
3143   c->pending_messages++;
3144
3145   q = GNUNET_new (struct CadetConnectionQueue);
3146   q->forced = !droppable;
3147   q->q = GCP_queue_add (get_hop (c, fwd), data, type, payload_type, payload_id,
3148                         size, c, fwd, &conn_message_sent, q);
3149   if (NULL == q->q)
3150   {
3151     LOG (GNUNET_ERROR_TYPE_DEBUG, "dropping msg on %s, NULL q\n", GCC_2s (c));
3152     GNUNET_free (data);
3153     GNUNET_free (q);
3154     return NULL;
3155   }
3156   q->cont = cont;
3157   q->cont_cls = cont_cls;
3158   return (NULL == cont) ? NULL : q;
3159 }
3160
3161
3162 /**
3163  * Cancel a previously sent message while it's in the queue.
3164  *
3165  * ONLY can be called before the continuation given to the send function
3166  * is called. Once the continuation is called, the message is no longer in the
3167  * queue.
3168  *
3169  * @param q Handle to the queue.
3170  */
3171 void
3172 GCC_cancel (struct CadetConnectionQueue *q)
3173 {
3174   LOG (GNUNET_ERROR_TYPE_DEBUG, "!  GMC cancel message\n");
3175
3176   /* queue destroy calls message_sent, which calls q->cont and frees q */
3177   GCP_queue_destroy (q->q, GNUNET_YES, GNUNET_NO, 0);
3178 }
3179
3180
3181 /**
3182  * Sends a CREATE CONNECTION message for a path to a peer.
3183  * Changes the connection and tunnel states if necessary.
3184  *
3185  * @param connection Connection to create.
3186  */
3187 void
3188 GCC_send_create (struct CadetConnection *connection)
3189 {
3190   enum CadetTunnelCState state;
3191   size_t size;
3192
3193   size = sizeof (struct GNUNET_CADET_ConnectionCreate);
3194   size += connection->path->length * sizeof (struct GNUNET_PeerIdentity);
3195
3196   LOG (GNUNET_ERROR_TYPE_INFO, "---> %s on connection %s  (%u bytes)\n",
3197        GC_m2s (GNUNET_MESSAGE_TYPE_CADET_CONNECTION_CREATE),
3198        GCC_2s (connection), size);
3199   LOG (GNUNET_ERROR_TYPE_DEBUG, "  C_P+ %p %u (create)\n",
3200        connection, connection->pending_messages);
3201   connection->pending_messages++;
3202
3203   connection->maintenance_q =
3204     GCP_queue_add (get_next_hop (connection), NULL,
3205                    GNUNET_MESSAGE_TYPE_CADET_CONNECTION_CREATE, 0, 0,
3206                    size, connection, GNUNET_YES, &conn_message_sent, NULL);
3207
3208   state = GCT_get_cstate (connection->t);
3209   if (CADET_TUNNEL_SEARCHING == state || CADET_TUNNEL_NEW == state)
3210     GCT_change_cstate (connection->t, CADET_TUNNEL_WAITING);
3211   if (CADET_CONNECTION_NEW == connection->state)
3212     connection_change_state (connection, CADET_CONNECTION_SENT);
3213 }
3214
3215
3216 /**
3217  * Send a message to all peers in this connection that the connection
3218  * is no longer valid.
3219  *
3220  * If some peer should not receive the message, it should be zero'ed out
3221  * before calling this function.
3222  *
3223  * @param c The connection whose peers to notify.
3224  */
3225 void
3226 GCC_send_destroy (struct CadetConnection *c)
3227 {
3228   struct GNUNET_CADET_ConnectionDestroy msg;
3229
3230   if (GNUNET_YES == c->destroy)
3231     return;
3232
3233   msg.header.size = htons (sizeof (msg));
3234   msg.header.type = htons (GNUNET_MESSAGE_TYPE_CADET_CONNECTION_DESTROY);
3235   msg.cid = c->id;
3236   LOG (GNUNET_ERROR_TYPE_DEBUG,
3237               "  sending connection destroy for connection %s\n",
3238               GCC_2s (c));
3239
3240   if (GNUNET_NO == GCC_is_terminal (c, GNUNET_YES))
3241     GNUNET_assert (NULL == GCC_send_prebuilt_message (&msg.header, 0, 0, c,
3242                                                       GNUNET_YES, GNUNET_YES,
3243                                                       NULL, NULL));
3244   if (GNUNET_NO == GCC_is_terminal (c, GNUNET_NO))
3245     GNUNET_assert (NULL == GCC_send_prebuilt_message (&msg.header, 0, 0, c,
3246                                                       GNUNET_NO, GNUNET_YES,
3247                                                       NULL, NULL));
3248   c->destroy = GNUNET_YES;
3249   c->state = CADET_CONNECTION_DESTROYED;
3250 }
3251
3252
3253 /**
3254  * @brief Start a polling timer for the connection.
3255  *
3256  * When a neighbor does not accept more traffic on the connection it could be
3257  * caused by a simple congestion or by a lost ACK. Polling enables to check
3258  * for the lastest ACK status for a connection.
3259  *
3260  * @param c Connection.
3261  * @param fwd Should we poll in the FWD direction?
3262  */
3263 void
3264 GCC_start_poll (struct CadetConnection *c, int fwd)
3265 {
3266   struct CadetFlowControl *fc;
3267
3268   fc = fwd ? &c->fwd_fc : &c->bck_fc;
3269   LOG (GNUNET_ERROR_TYPE_DEBUG, " *** POLL %s requested\n",
3270        GC_f2s (fwd));
3271   if (GNUNET_SCHEDULER_NO_TASK != fc->poll_task || NULL != fc->poll_msg)
3272   {
3273     LOG (GNUNET_ERROR_TYPE_DEBUG, " ***   not needed (%u, %p)\n",
3274          fc->poll_task, fc->poll_msg);
3275     return;
3276   }
3277   LOG (GNUNET_ERROR_TYPE_DEBUG, " *** POLL started on request\n");
3278   fc->poll_task = GNUNET_SCHEDULER_add_delayed (fc->poll_time,
3279                                                 &connection_poll,
3280                                                 fc);
3281 }
3282
3283
3284 /**
3285  * @brief Stop polling a connection for ACKs.
3286  *
3287  * Once we have enough ACKs for future traffic, polls are no longer necessary.
3288  *
3289  * @param c Connection.
3290  * @param fwd Should we stop the poll in the FWD direction?
3291  */
3292 void
3293 GCC_stop_poll (struct CadetConnection *c, int fwd)
3294 {
3295   struct CadetFlowControl *fc;
3296
3297   fc = fwd ? &c->fwd_fc : &c->bck_fc;
3298   if (GNUNET_SCHEDULER_NO_TASK != fc->poll_task)
3299   {
3300     GNUNET_SCHEDULER_cancel (fc->poll_task);
3301     fc->poll_task = GNUNET_SCHEDULER_NO_TASK;
3302   }
3303 }
3304
3305 /**
3306  * Get a (static) string for a connection.
3307  *
3308  * @param c Connection.
3309  */
3310 const char *
3311 GCC_2s (const struct CadetConnection *c)
3312 {
3313   if (NULL == c)
3314     return "NULL";
3315
3316   if (NULL != c->t)
3317   {
3318     static char buf[128];
3319
3320     SPRINTF (buf, "%s (->%s)",
3321              GNUNET_h2s (GC_h2hc (GCC_get_id (c))), GCT_2s (c->t));
3322     return buf;
3323   }
3324   return GNUNET_h2s (GC_h2hc (&c->id));
3325 }
3326
3327
3328 /**
3329  * Log all possible info about the connection state.
3330  *
3331  * @param c Connection to debug.
3332  * @param level Debug level to use.
3333  */
3334 void
3335 GCC_debug (const struct CadetConnection *c, enum GNUNET_ErrorType level)
3336 {
3337   int do_log;
3338   char *s;
3339
3340   do_log = GNUNET_get_log_call_status (level & (~GNUNET_ERROR_TYPE_BULK),
3341                                        "cadet-con",
3342                                        __FILE__, __FUNCTION__, __LINE__);
3343   if (0 == do_log)
3344     return;
3345
3346   if (NULL == c)
3347   {
3348     LOG2 (level, "CCC DEBUG NULL CONNECTION\n");
3349     return;
3350   }
3351
3352   LOG2 (level, "CCC DEBUG CONNECTION %s\n", GCC_2s (c));
3353   s = path_2s (c->path);
3354   LOG2 (level, "CCC  path %s, own pos: %u\n", s, c->own_pos);
3355   GNUNET_free (s);
3356   LOG2 (level, "CCC  state: %s, destroy: %u\n",
3357         GCC_state2s (c->state), c->destroy);
3358   LOG2 (level, "CCC  pending messages: %u\n", c->pending_messages);
3359   if (NULL != c->perf)
3360     LOG2 (level, "CCC  us/byte: %f\n", c->perf->avg);
3361
3362   LOG2 (level, "CCC  FWD flow control:\n");
3363   LOG2 (level, "CCC   queue: %u/%u\n", c->fwd_fc.queue_n, c->fwd_fc.queue_max);
3364   LOG2 (level, "CCC   last PID sent: %5u, recv: %5u\n",
3365         c->fwd_fc.last_pid_sent, c->fwd_fc.last_pid_recv);
3366   LOG2 (level, "CCC   last ACK sent: %5u, recv: %5u\n",
3367         c->fwd_fc.last_ack_sent, c->fwd_fc.last_ack_recv);
3368   LOG2 (level, "CCC   POLL: task %d, msg  %p, msg_ack %p)\n",
3369         c->fwd_fc.poll_task, c->fwd_fc.poll_msg, c->fwd_fc.ack_msg);
3370
3371   LOG2 (level, "CCC  BCK flow control:\n");
3372   LOG2 (level, "CCC   queue: %u/%u\n", c->bck_fc.queue_n, c->bck_fc.queue_max);
3373   LOG2 (level, "CCC   last PID sent: %5u, recv: %5u\n",
3374         c->bck_fc.last_pid_sent, c->bck_fc.last_pid_recv);
3375   LOG2 (level, "CCC   last ACK sent: %5u, recv: %5u\n",
3376         c->bck_fc.last_ack_sent, c->bck_fc.last_ack_recv);
3377   LOG2 (level, "CCC   POLL: task %d, msg  %p, msg_ack %p)\n",
3378         c->bck_fc.poll_task, c->bck_fc.poll_msg, c->bck_fc.ack_msg);
3379
3380   LOG2 (level, "CCC DEBUG CONNECTION END\n");
3381 }
3382