-fix leak
[oweals/gnunet.git] / src / dv / dv_api.c
1 /*
2      This file is part of GNUnet.
3      (C) 2009--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 dv/dv_api.c
23  * @brief library to access the DV service
24  * @author Christian Grothoff
25  * @author Nathan Evans
26  */
27 #include "platform.h"
28 #include "gnunet_util_lib.h"
29 #include "gnunet_dv_service.h"
30 #include "gnunet_protocols.h"
31 #include "dv.h"
32 #include "gnunet_transport_plugin.h"
33
34 #define LOG(kind,...) GNUNET_log_from (kind, "dv-api",__VA_ARGS__)
35
36
37 /**
38  * Information we track for each peer.
39  */
40 struct ConnectedPeer;
41
42
43 /**
44  * Handle for a send operation.
45  */
46 struct GNUNET_DV_TransmitHandle
47 {
48   /**
49    * Kept in a DLL.
50    */
51   struct GNUNET_DV_TransmitHandle *next;
52
53   /**
54    * Kept in a DLL.
55    */
56   struct GNUNET_DV_TransmitHandle *prev;
57
58   /**
59    * Handle to the service.
60    */
61   struct GNUNET_DV_ServiceHandle *sh;
62
63   /**
64    * Function to call upon completion.
65    */
66   GNUNET_DV_MessageSentCallback cb;
67
68   /**
69    * Closure for @a cb.
70    */
71   void *cb_cls;
72
73   /**
74    * The actual message (allocated at the end of this struct).
75    */
76   const struct GNUNET_MessageHeader *msg;
77
78   /**
79    * Destination for the message.
80    */
81   struct ConnectedPeer *target;
82
83   /**
84    * UID of our message, if any.
85    */
86   uint32_t uid;
87
88 };
89
90
91 /**
92  * Information we track for each peer.
93  */
94 struct ConnectedPeer
95 {
96
97   /**
98    * Identity of the peer.
99    */
100   struct GNUNET_PeerIdentity pid;
101
102   /**
103    * Head of DLL of transmission handles where we need
104    * to invoke a continuation when we are informed about
105    * successful transmission.  The respective request
106    * has already been sent to the DV service.
107    */
108   struct GNUNET_DV_TransmitHandle *head;
109
110   /**
111    * Tail of DLL of transmission handles where we need
112    * to invoke a continuation when we are informed about
113    * successful transmission.  The respective request
114    * has already been sent to the DV service.
115    */
116   struct GNUNET_DV_TransmitHandle *tail;
117
118 };
119
120
121 /**
122  * Handle to the DV service.
123  */
124 struct GNUNET_DV_ServiceHandle
125 {
126
127   /**
128    * Connection to DV service.
129    */
130   struct GNUNET_CLIENT_Connection *client;
131
132   /**
133    * Active request for transmission to DV service.
134    */
135   struct GNUNET_CLIENT_TransmitHandle *th;
136
137   /**
138    * Our configuration.
139    */
140   const struct GNUNET_CONFIGURATION_Handle *cfg;
141
142   /**
143    * Closure for the callbacks.
144    */
145   void *cls;
146
147   /**
148    * Function to call on connect events.
149    */
150   GNUNET_DV_ConnectCallback connect_cb;
151
152   /**
153    * Function to call on distance change events.
154    */
155   GNUNET_DV_DistanceChangedCallback distance_cb;
156
157   /**
158    * Function to call on disconnect events.
159    */
160   GNUNET_DV_DisconnectCallback disconnect_cb;
161
162   /**
163    * Function to call on receiving messages events.
164    */
165   GNUNET_DV_MessageReceivedCallback message_cb;
166
167   /**
168    * Head of messages to transmit.
169    */
170   struct GNUNET_DV_TransmitHandle *th_head;
171
172   /**
173    * Tail of messages to transmit.
174    */
175   struct GNUNET_DV_TransmitHandle *th_tail;
176
177   /**
178    * Information tracked per connected peer.  Maps peer
179    * identities to `struct ConnectedPeer` entries.
180    */
181   struct GNUNET_CONTAINER_MultiPeerMap *peers;
182
183   /**
184    * Current unique ID
185    */
186   uint32_t uid_gen;
187
188 };
189
190
191 /**
192  * Disconnect and then reconnect to the DV service.
193  *
194  * @param sh service handle
195  */
196 static void
197 reconnect (struct GNUNET_DV_ServiceHandle *sh);
198
199
200 /**
201  * Gives a message from our queue to the DV service.
202  *
203  * @param cls handle to the dv service (struct GNUNET_DV_ServiceHandle)
204  * @param size how many bytes can we send
205  * @param buf where to copy the message to send
206  * @return how many bytes we copied to @a buf
207  */
208 static size_t
209 transmit_pending (void *cls, size_t size, void *buf)
210 {
211   struct GNUNET_DV_ServiceHandle *sh = cls;
212   char *cbuf = buf;
213   struct GNUNET_DV_TransmitHandle *th;
214   size_t ret;
215   size_t tsize;
216
217   sh->th = NULL;
218   if (NULL == buf)
219   {
220     reconnect (sh);
221     return 0;
222   }
223   ret = 0;
224   while ( (NULL != (th = sh->th_head)) &&
225           (size - ret >= (tsize = ntohs (th->msg->size)) ))
226   {
227     GNUNET_CONTAINER_DLL_remove (sh->th_head,
228                                  sh->th_tail,
229                                  th);
230     memcpy (&cbuf[ret], th->msg, tsize);
231     th->msg = NULL;
232     ret += tsize;
233     if (NULL != th->cb)
234     {
235       GNUNET_CONTAINER_DLL_insert (th->target->head,
236                                    th->target->tail,
237                                    th);
238     }
239     else
240     {
241       GNUNET_free (th);
242     }
243   }
244   return ret;
245 }
246
247
248 /**
249  * Start sending messages from our queue to the service.
250  *
251  * @param sh service handle
252  */
253 static void
254 start_transmit (struct GNUNET_DV_ServiceHandle *sh)
255 {
256   if (NULL != sh->th)
257     return;
258   if (NULL == sh->th_head)
259     return;
260   sh->th =
261     GNUNET_CLIENT_notify_transmit_ready (sh->client,
262                                          ntohs (sh->th_head->msg->size),
263                                          GNUNET_TIME_UNIT_FOREVER_REL,
264                                          GNUNET_NO,
265                                          &transmit_pending, sh);
266 }
267
268
269 /**
270  * We got disconnected from the service and thus all of the
271  * pending send callbacks will never be confirmed.  Clean up.
272  *
273  * @param cls the 'struct GNUNET_DV_ServiceHandle'
274  * @param key a peer identity
275  * @param value a `struct ConnectedPeer` to clean up
276  * @return #GNUNET_OK (continue to iterate)
277  */
278 static int
279 cleanup_send_cb (void *cls,
280                  const struct GNUNET_PeerIdentity *key,
281                  void *value)
282 {
283   struct GNUNET_DV_ServiceHandle *sh = cls;
284   struct ConnectedPeer *peer = value;
285   struct GNUNET_DV_TransmitHandle *th;
286
287   GNUNET_assert (GNUNET_YES ==
288                  GNUNET_CONTAINER_multipeermap_remove (sh->peers,
289                                                        key,
290                                                        peer));
291   sh->disconnect_cb (sh->cls,
292                      key);
293   while (NULL != (th = peer->head))
294   {
295     GNUNET_CONTAINER_DLL_remove (peer->head, peer->tail, th);
296     th->cb (th->cb_cls, GNUNET_SYSERR);
297     GNUNET_free (th);
298   }
299   GNUNET_free (peer);
300   return GNUNET_OK;
301 }
302
303
304 /**
305  * Handles a message sent from the DV service to us.
306  * Parse it out and give it to the plugin.
307  *
308  * @param cls the handle to the DV API
309  * @param msg the message that was received
310  */
311 static void
312 handle_message_receipt (void *cls,
313                         const struct GNUNET_MessageHeader *msg)
314 {
315   struct GNUNET_DV_ServiceHandle *sh = cls;
316   const struct GNUNET_DV_ConnectMessage *cm;
317   const struct GNUNET_DV_DistanceUpdateMessage *dum;
318   const struct GNUNET_DV_DisconnectMessage *dm;
319   const struct GNUNET_DV_ReceivedMessage *rm;
320   const struct GNUNET_MessageHeader *payload;
321   const struct GNUNET_DV_AckMessage *ack;
322   struct GNUNET_DV_TransmitHandle *th;
323   struct GNUNET_DV_TransmitHandle *tn;
324   struct ConnectedPeer *peer;
325
326   if (NULL == msg)
327   {
328     /* Connection closed */
329     reconnect (sh);
330     return;
331   }
332   LOG (GNUNET_ERROR_TYPE_DEBUG,
333        "Received message of type %u from DV service\n",
334        (unsigned int) msg->type);
335   switch (ntohs (msg->type))
336   {
337   case GNUNET_MESSAGE_TYPE_DV_CONNECT:
338     if (ntohs (msg->size) != sizeof (struct GNUNET_DV_ConnectMessage))
339     {
340       GNUNET_break (0);
341       reconnect (sh);
342       return;
343     }
344     cm = (const struct GNUNET_DV_ConnectMessage *) msg;
345     peer = GNUNET_CONTAINER_multipeermap_get (sh->peers,
346                                               &cm->peer);
347     if (NULL != peer)
348     {
349       GNUNET_break (0);
350       reconnect (sh);
351       return;
352     }
353     peer = GNUNET_new (struct ConnectedPeer);
354     peer->pid = cm->peer;
355     GNUNET_assert (GNUNET_OK ==
356                    GNUNET_CONTAINER_multipeermap_put (sh->peers,
357                                                       &peer->pid,
358                                                       peer,
359                                                       GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_ONLY));
360     sh->connect_cb (sh->cls,
361                     &cm->peer,
362                     ntohl (cm->distance), ntohl (cm->network));
363     break;
364   case GNUNET_MESSAGE_TYPE_DV_DISTANCE_CHANGED:
365     if (ntohs (msg->size) != sizeof (struct GNUNET_DV_DistanceUpdateMessage))
366     {
367       GNUNET_break (0);
368       reconnect (sh);
369       return;
370     }
371     dum = (const struct GNUNET_DV_DistanceUpdateMessage *) msg;
372     sh->distance_cb (sh->cls,
373                      &dum->peer,
374                      ntohl (dum->distance));
375     break;
376   case GNUNET_MESSAGE_TYPE_DV_DISCONNECT:
377     if (ntohs (msg->size) != sizeof (struct GNUNET_DV_DisconnectMessage))
378     {
379       GNUNET_break (0);
380       reconnect (sh);
381       return;
382     }
383     dm = (const struct GNUNET_DV_DisconnectMessage *) msg;
384     peer = GNUNET_CONTAINER_multipeermap_get (sh->peers,
385                                               &dm->peer);
386     if (NULL == peer)
387     {
388       GNUNET_break (0);
389       reconnect (sh);
390       return;
391     }
392     tn = sh->th_head;
393     while (NULL != (th = tn))
394     {
395       tn = th->next;
396       if (peer == th->target)
397       {
398         GNUNET_CONTAINER_DLL_remove (sh->th_head,
399                                      sh->th_tail,
400                                      th);
401         th->cb (th->cb_cls, GNUNET_SYSERR);
402         GNUNET_free (th);
403       }
404     }
405     cleanup_send_cb (sh, &dm->peer, peer);
406     break;
407   case GNUNET_MESSAGE_TYPE_DV_RECV:
408     if (ntohs (msg->size) < sizeof (struct GNUNET_DV_ReceivedMessage) + sizeof (struct GNUNET_MessageHeader))
409     {
410       GNUNET_break (0);
411       reconnect (sh);
412       return;
413     }
414     rm = (const struct GNUNET_DV_ReceivedMessage *) msg;
415     payload = (const struct GNUNET_MessageHeader *) &rm[1];
416     if (ntohs (msg->size) != sizeof (struct GNUNET_DV_ReceivedMessage) + ntohs (payload->size))
417     {
418       GNUNET_break (0);
419       reconnect (sh);
420       return;
421     }
422     sh->message_cb (sh->cls,
423                     &rm->sender,
424                     ntohl (rm->distance),
425                     payload);
426     break;
427   case GNUNET_MESSAGE_TYPE_DV_SEND_ACK:
428   case GNUNET_MESSAGE_TYPE_DV_SEND_NACK:
429     if (ntohs (msg->size) != sizeof (struct GNUNET_DV_AckMessage))
430     {
431       GNUNET_break (0);
432       reconnect (sh);
433       return;
434     }
435     ack = (const struct GNUNET_DV_AckMessage *) msg;
436     peer = GNUNET_CONTAINER_multipeermap_get (sh->peers,
437                                               &ack->target);
438     if (NULL == peer)
439       return; /* this happens, just ignore */
440     for (th = peer->head; NULL != th; th = th->next)
441     {
442       if (th->uid != ntohl (ack->uid))
443         continue;
444       LOG (GNUNET_ERROR_TYPE_DEBUG,
445            "Matched ACK for message to peer %s\n",
446            GNUNET_i2s (&ack->target));
447       GNUNET_CONTAINER_DLL_remove (peer->head,
448                                    peer->tail,
449                                    th);
450       th->cb (th->cb_cls,
451               (ntohs (ack->header.type) == GNUNET_MESSAGE_TYPE_DV_SEND_ACK)
452               ? GNUNET_OK
453               : GNUNET_SYSERR);
454       GNUNET_free (th);
455       break;
456     }
457     break;
458   default:
459     reconnect (sh);
460     break;
461   }
462   GNUNET_CLIENT_receive (sh->client,
463                          &handle_message_receipt, sh,
464                          GNUNET_TIME_UNIT_FOREVER_REL);
465 }
466
467
468 /**
469  * Transmit the start message to the DV service.
470  *
471  * @param cls the `struct GNUNET_DV_ServiceHandle *`
472  * @param size number of bytes available in buf
473  * @param buf where to copy the message
474  * @return number of bytes written to buf
475  */
476 static size_t
477 transmit_start (void *cls,
478                 size_t size,
479                 void *buf)
480 {
481   struct GNUNET_DV_ServiceHandle *sh = cls;
482   struct GNUNET_MessageHeader start_message;
483
484   sh->th = NULL;
485   if (NULL == buf)
486   {
487     GNUNET_break (0);
488     reconnect (sh);
489     return 0;
490   }
491   GNUNET_assert (size >= sizeof (start_message));
492   start_message.size = htons (sizeof (struct GNUNET_MessageHeader));
493   start_message.type = htons (GNUNET_MESSAGE_TYPE_DV_START);
494   memcpy (buf, &start_message, sizeof (start_message));
495   GNUNET_CLIENT_receive (sh->client,
496                          &handle_message_receipt, sh,
497                          GNUNET_TIME_UNIT_FOREVER_REL);
498   start_transmit (sh);
499   return sizeof (start_message);
500 }
501
502
503 /**
504  * Disconnect and then reconnect to the DV service.
505  *
506  * @param sh service handle
507  */
508 static void
509 reconnect (struct GNUNET_DV_ServiceHandle *sh)
510 {
511   if (NULL != sh->th)
512   {
513     GNUNET_CLIENT_notify_transmit_ready_cancel (sh->th);
514     sh->th = NULL;
515   }
516   if (NULL != sh->client)
517   {
518     GNUNET_CLIENT_disconnect (sh->client);
519     sh->client = NULL;
520   }
521   GNUNET_CONTAINER_multipeermap_iterate (sh->peers,
522                                          &cleanup_send_cb,
523                                          sh);
524   LOG (GNUNET_ERROR_TYPE_DEBUG,
525        "Connecting to DV service\n");
526   sh->client = GNUNET_CLIENT_connect ("dv", sh->cfg);
527   if (NULL == sh->client)
528   {
529     GNUNET_break (0);
530     return;
531   }
532   sh->th = GNUNET_CLIENT_notify_transmit_ready (sh->client,
533                                                 sizeof (struct GNUNET_MessageHeader),
534                                                 GNUNET_TIME_UNIT_FOREVER_REL,
535                                                 GNUNET_YES,
536                                                 &transmit_start,
537                                                 sh);
538 }
539
540
541 /**
542  * Connect to the DV service.
543  *
544  * @param cfg configuration
545  * @param cls closure for callbacks
546  * @param connect_cb function to call on connects
547  * @param distance_cb function to call if distances change
548  * @param disconnect_cb function to call on disconnects
549  * @param message_cb function to call if we receive messages
550  * @return handle to access the service
551  */
552 struct GNUNET_DV_ServiceHandle *
553 GNUNET_DV_service_connect (const struct GNUNET_CONFIGURATION_Handle *cfg,
554                            void *cls,
555                            GNUNET_DV_ConnectCallback connect_cb,
556                            GNUNET_DV_DistanceChangedCallback distance_cb,
557                            GNUNET_DV_DisconnectCallback disconnect_cb,
558                            GNUNET_DV_MessageReceivedCallback message_cb)
559 {
560   struct GNUNET_DV_ServiceHandle *sh;
561
562   sh = GNUNET_new (struct GNUNET_DV_ServiceHandle);
563   sh->cfg = cfg;
564   sh->cls = cls;
565   sh->connect_cb = connect_cb;
566   sh->distance_cb = distance_cb;
567   sh->disconnect_cb = disconnect_cb;
568   sh->message_cb = message_cb;
569   sh->peers = GNUNET_CONTAINER_multipeermap_create (128, GNUNET_YES);
570   reconnect (sh);
571   return sh;
572 }
573
574
575 /**
576  * Disconnect from DV service.
577  *
578  * @param sh service handle
579  */
580 void
581 GNUNET_DV_service_disconnect (struct GNUNET_DV_ServiceHandle *sh)
582 {
583   struct GNUNET_DV_TransmitHandle *pos;
584
585   if (NULL == sh)
586     return;
587   if (NULL != sh->th)
588   {
589     GNUNET_CLIENT_notify_transmit_ready_cancel (sh->th);
590     sh->th = NULL;
591   }
592   while (NULL != (pos = sh->th_head))
593   {
594     GNUNET_CONTAINER_DLL_remove (sh->th_head,
595                                  sh->th_tail,
596                                  pos);
597     GNUNET_free (pos);
598   }
599   if (NULL != sh->client)
600   {
601     GNUNET_CLIENT_disconnect (sh->client);
602     sh->client = NULL;
603   }
604   GNUNET_CONTAINER_multipeermap_iterate (sh->peers,
605                                          &cleanup_send_cb,
606                                          sh);
607   GNUNET_CONTAINER_multipeermap_destroy (sh->peers);
608   GNUNET_free (sh);
609 }
610
611
612 /**
613  * Send a message via DV service.
614  *
615  * @param sh service handle
616  * @param target intended recpient
617  * @param msg message payload
618  * @param cb function to invoke when done
619  * @param cb_cls closure for @a cb
620  * @return handle to cancel the operation
621  */
622 struct GNUNET_DV_TransmitHandle *
623 GNUNET_DV_send (struct GNUNET_DV_ServiceHandle *sh,
624                 const struct GNUNET_PeerIdentity *target,
625                 const struct GNUNET_MessageHeader *msg,
626                 GNUNET_DV_MessageSentCallback cb,
627                 void *cb_cls)
628 {
629   struct GNUNET_DV_TransmitHandle *th;
630   struct GNUNET_DV_SendMessage *sm;
631   struct ConnectedPeer *peer;
632
633   if (ntohs (msg->size) + sizeof (struct GNUNET_DV_SendMessage) >= GNUNET_SERVER_MAX_MESSAGE_SIZE)
634   {
635     GNUNET_break (0);
636     return NULL;
637   }
638   LOG (GNUNET_ERROR_TYPE_DEBUG,
639        "Asked to send %u bytes of type %u to %s\n",
640        (unsigned int) msg->size,
641        (unsigned int) msg->type,
642        GNUNET_i2s (target));
643   peer = GNUNET_CONTAINER_multipeermap_get (sh->peers,
644                                             target);
645   if (NULL == peer)
646   {
647     GNUNET_break (0);
648     return NULL;
649   }
650   th = GNUNET_malloc (sizeof (struct GNUNET_DV_TransmitHandle) +
651                       sizeof (struct GNUNET_DV_SendMessage) +
652                       ntohs (msg->size));
653   th->sh = sh;
654   th->target = peer;
655   th->cb = cb;
656   th->cb_cls = cb_cls;
657   th->msg = (const struct GNUNET_MessageHeader *) &th[1];
658   sm = (struct GNUNET_DV_SendMessage *) &th[1];
659   sm->header.type = htons (GNUNET_MESSAGE_TYPE_DV_SEND);
660   sm->header.size = htons (sizeof (struct GNUNET_DV_SendMessage) +
661                            ntohs (msg->size));
662   if (0 == sh->uid_gen)
663     sh->uid_gen = 1;
664   th->uid = sh->uid_gen;
665   sm->uid = htonl (sh->uid_gen++);
666   /* use memcpy here as 'target' may not be sufficiently aligned */
667   memcpy (&sm->target, target, sizeof (struct GNUNET_PeerIdentity));
668   memcpy (&sm[1], msg, ntohs (msg->size));
669   GNUNET_CONTAINER_DLL_insert (sh->th_head,
670                                sh->th_tail,
671                                th);
672   start_transmit (sh);
673   return th;
674 }
675
676
677 /**
678  * Abort send operation (naturally, the message may have
679  * already been transmitted; this only stops the 'cb'
680  * from being called again).
681  *
682  * @param th send operation to cancel
683  */
684 void
685 GNUNET_DV_send_cancel (struct GNUNET_DV_TransmitHandle *th)
686 {
687   struct GNUNET_DV_ServiceHandle *sh = th->sh;
688
689   if (NULL == th->msg)
690     GNUNET_CONTAINER_DLL_remove (th->target->head,
691                                  th->target->tail,
692                                  th);
693   else
694     GNUNET_CONTAINER_DLL_remove (sh->th_head,
695                                  sh->th_tail,
696                                  th);
697   GNUNET_free (th);
698 }
699
700
701 /* end of dv_api.c */