/*
This file is part of GNUnet.
- (C) 2009, 2010 Christian Grothoff (and other contributing authors)
+ (C) 2009, 2010, 2012 Christian Grothoff (and other contributing authors)
GNUnet is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published
Free Software Foundation, Inc., 59 Temple Place - Suite 330,
Boston, MA 02111-1307, USA.
*/
-
/**
- * TODO: Do we really need a client API?
- *
* @file gns/gns_api.c
* @brief library to access the GNS service
* @author Martin Schanzenbach
+ * @author Christian Grothoff
*/
-
#include "platform.h"
#include "gnunet_util_lib.h"
#include "gnunet_constants.h"
#include "gns.h"
#include "gnunet_gns_service.h"
-#define DEBUG_GNS_API GNUNET_EXTRA_LOGGING
-
-#define LOG(kind,...) GNUNET_log_from (kind, "gns-api",__VA_ARGS__)
-
-/* TODO into gnunet_protocols */
-#define GNUNET_MESSAGE_TYPE_GNS_CLIENT_LOOKUP 23
-#define GNUNET_MESSAGE_TYPE_GNS_CLIENT_RESULT 24
/**
- * Entry in our list of messages to be (re-)transmitted.
+ * Handle to a lookup request
*/
-struct PendingMessage
+struct GNUNET_GNS_LookupRequest
{
+
/**
- * This is a doubly-linked list.
+ * DLL
*/
- struct PendingMessage *prev;
-
+ struct GNUNET_GNS_LookupRequest *next;
+
/**
- * This is a doubly-linked list.
+ * DLL
*/
- struct PendingMessage *next;
-
+ struct GNUNET_GNS_LookupRequest *prev;
+
/**
- * Message that is pending, allocated at the end
- * of this struct.
+ * handle to gns
*/
- const struct GNUNET_MessageHeader *msg;
-
+ struct GNUNET_GNS_Handle *gns_handle;
+
/**
- * Handle to the GNS API context.
+ * processor to call on lookup result
*/
- struct GNUNET_GNS_Handle *handle;
+ GNUNET_GNS_LookupResultProcessor lookup_proc;
/**
- * Continuation to call when the request has been
- * transmitted (for the first time) to the service; can be NULL.
+ * processor closure
*/
- GNUNET_SCHEDULER_Task cont;
-
+ void *proc_cls;
+
/**
- * Closure for 'cont'.
+ * request id
*/
- void *cont_cls;
+ uint64_t r_id;
+
+};
+
+/**
+ * Handle to a shorten request
+ */
+struct GNUNET_GNS_ShortenRequest
+{
/**
- * Timeout task for this message
+ * DLL
*/
- GNUNET_SCHEDULER_TaskIdentifier timeout_task;
-
+ struct GNUNET_GNS_ShortenRequest *next;
+
/**
- * Unique ID for this request
+ * DLL
*/
- uint64_t unique_id;
+ struct GNUNET_GNS_ShortenRequest *prev;
/**
- * Free the saved message once sent, set to GNUNET_YES for messages
- * that do not receive responses; GNUNET_NO if this pending message
- * is aliased from a 'struct GNUNET_DHT_RouteHandle' and will be freed
- * from there.
+ * handle to gns
*/
-
- int free_on_send;
+ struct GNUNET_GNS_Handle *gns_handle;
+
+ /**
+ * processor to call on shorten result
+ */
+ GNUNET_GNS_ShortenResultProcessor shorten_proc;
+
/**
- * GNUNET_YES if this message is in our pending queue right now.
+ * processor closure
*/
- int in_pending_queue;
+ void *proc_cls;
+ /**
+ * request id
+ */
+ uint64_t r_id;
+
};
+
/**
- * Handle to a Lookup request
+ * Handle to GetAuthorityRequest
*/
-struct GNUNET_GNS_LookupHandle
+struct GNUNET_GNS_GetAuthRequest
{
+ /**
+ * DLL
+ */
+ struct GNUNET_GNS_GetAuthRequest *next;
+
+ /**
+ * DLL
+ */
+ struct GNUNET_GNS_GetAuthRequest *prev;
/**
- * Iterator to call on data receipt
+ * handle to gns
*/
- GNUNET_GNS_LookupIterator iter;
+ struct GNUNET_GNS_Handle *gns_handle;
+
+ /**
+ * processor to call on authority lookup result
+ */
+ GNUNET_GNS_GetAuthResultProcessor auth_proc;
+
+ /**
+ * processor closure
+ */
+ void *proc_cls;
+
+ /**
+ * request id
+ */
+ uint32_t r_id;
+
+};
+
+/**
+ * Entry in our list of messages to be (re-)transmitted.
+ */
+struct PendingMessage
+{
/**
- * Closure for the iterator callback
+ * This is a doubly-linked list.
*/
- void *iter_cls;
+ struct PendingMessage *prev;
/**
- * Main handle to this GNS api
+ * This is a doubly-linked list.
*/
- struct GNUNET_GNS_Handle *gns_handle;
+ struct PendingMessage *next;
/**
- * Key that this get request is for
+ * request id
*/
- GNUNET_HashCode key;
+ uint64_t r_id;
/**
- * Unique identifier for this request (for key collisions).
+ * Size of the message.
*/
- uint64_t unique_id;
+ size_t size;
- struct PendingMessage *message;
+ /**
+ * This message has been transmitted. GNUNET_NO if the message is
+ * in the "pending" DLL, GNUNET_YES if it has been transmitted to
+ * the service via the current client connection.
+ */
+ int transmitted;
};
+
/**
* Connection to the GNS service.
*/
* Currently pending transmission request (or NULL).
*/
struct GNUNET_CLIENT_TransmitHandle *th;
-
+
/**
- * Head of linked list of messages we would like to transmit.
+ * Head of linked list of shorten messages we would like to transmit.
*/
struct PendingMessage *pending_head;
/**
- * Tail of linked list of messages we would like to transmit.
+ * Tail of linked list of shorten messages we would like to transmit.
*/
struct PendingMessage *pending_tail;
+
+ /**
+ * Head of linked list of shorten messages we would like to transmit.
+ */
+ struct GNUNET_GNS_ShortenRequest *shorten_head;
/**
- * Hash map containing the current outstanding unique requests.
+ * Tail of linked list of shorten messages we would like to transmit.
+ */
+ struct GNUNET_GNS_ShortenRequest *shorten_tail;
+
+ /**
+ * Head of linked list of lookup messages we would like to transmit.
*/
- struct GNUNET_CONTAINER_MultiHashMap *active_requests;
+ struct GNUNET_GNS_LookupRequest *lookup_head;
- GNUNET_SCHEDULER_TaskIdentifier reconnect_task;
+ /**
+ * Tail of linked list of lookup messages we would like to transmit.
+ */
+ struct GNUNET_GNS_LookupRequest *lookup_tail;
+
+ /**
+ * Head of linked list of authority lookup messages we would like to transmit.
+ */
+ struct GNUNET_GNS_GetAuthRequest *get_auth_head;
/**
- * How quickly should we retry? Used for exponential back-off on
- * connect-errors.
+ * Tail of linked list of authority lookup messages we would like to transmit.
*/
- struct GNUNET_TIME_Relative retry_time;
+ struct GNUNET_GNS_GetAuthRequest *get_auth_tail;
/**
- * Generator for unique ids.
+ * Reconnect task
*/
- uint64_t uid_gen;
+ GNUNET_SCHEDULER_TaskIdentifier reconnect_task;
+ uint32_t r_id;
+
/**
* Did we start our receive loop yet?
*/
int in_receive;
+
};
+
/**
* Try to send messages from list of messages to send
* @param handle GNS_Handle
static void
process_pending_messages (struct GNUNET_GNS_Handle *handle);
-/**
- * Try to (re)connect to the GNS service.
- *
- * @return GNUNET_YES on success, GNUNET_NO on failure.
- */
-static int
-try_connect (struct GNUNET_GNS_Handle *handle)
-{
- if (handle->client != NULL)
- return GNUNET_OK;
- handle->in_receive = GNUNET_NO;
- handle->client = GNUNET_CLIENT_connect ("gns", handle->cfg);
- if (handle->client == NULL)
- {
- LOG (GNUNET_ERROR_TYPE_WARNING,
- _("Failed to connect to the GNS service!\n"));
- return GNUNET_NO;
- }
- return GNUNET_YES;
-}
/**
- * Add the request corresponding to the given handle
- * to the pending queue (if it is not already in there).
+ * Reconnect to GNS service.
*
- * @param cls the 'struct GNUNET_GNS_Handle*'
- * @param key key for the request (not used)
- * @param value the 'struct GNUNET_GNS_LookupHandle*'
- * @return GNUNET_YES (always)
+ * @param h the handle to the GNS service
*/
-static int
-add_request_to_pending (void *cls, const GNUNET_HashCode * key, void *value)
+static void
+reconnect (struct GNUNET_GNS_Handle *h)
{
- struct GNUNET_GNS_Handle *handle = cls;
- struct GNUNET_GNS_LookupHandle *rh = value;
-
- if (GNUNET_NO == rh->message->in_pending_queue)
- {
-#if DEBUG_DHT
- LOG (GNUNET_ERROR_TYPE_DEBUG,
- "Retransmitting request related to %s to GNS %p\n", GNUNET_h2s(key),
- handle);
-#endif
- GNUNET_CONTAINER_DLL_insert (handle->pending_head, handle->pending_tail,
- rh->message);
- rh->message->in_pending_queue = GNUNET_YES;
- }
- return GNUNET_YES;
+ GNUNET_assert (NULL == h->client);
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Trying to connect to GNS\n");
+ h->client = GNUNET_CLIENT_connect ("gns", h->cfg);
+ GNUNET_assert (NULL != h->client);
+ process_pending_messages (h);
}
+
/**
- * Try reconnecting to the GNS service.
+ * Reconnect to GNS
*
- * @param cls GNUNET_GNS_Handle
- * @param tc scheduler context
+ * @param cls the handle
+ * @param tc task context
*/
static void
-try_reconnect (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
+reconnect_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
{
- struct GNUNET_GNS_Handle *handle = cls;
+ struct GNUNET_GNS_Handle *h = cls;
-#if DEBUG_GNS
- LOG (GNUNET_ERROR_TYPE_DEBUG, "Reconnecting with GNS %p\n", handle);
-#endif
- handle->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
- if (handle->retry_time.rel_value < GNUNET_CONSTANTS_SERVICE_RETRY.rel_value)
- handle->retry_time = GNUNET_CONSTANTS_SERVICE_RETRY;
- else
- handle->retry_time = GNUNET_TIME_relative_multiply (handle->retry_time, 2);
- if (handle->retry_time.rel_value > GNUNET_CONSTANTS_SERVICE_TIMEOUT.rel_value)
- handle->retry_time = GNUNET_CONSTANTS_SERVICE_TIMEOUT;
- handle->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
- if (GNUNET_YES != try_connect (handle))
- {
-#if DEBUG_GNS
- LOG (GNUNET_ERROR_TYPE_DEBUG, "GNS reconnect failed(!)\n");
-#endif
- return;
- }
- GNUNET_CONTAINER_multihashmap_iterate (handle->active_requests,
- &add_request_to_pending, handle);
- process_pending_messages (handle);
+ h->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
+ reconnect (h);
}
/**
- * Try reconnecting to the GNS service.
+ * Disconnect from service and then reconnect.
*
- * @param handle handle to gns to (possibly) disconnect and reconnect
+ * @param h our handle
*/
static void
-do_disconnect (struct GNUNET_GNS_Handle *handle)
+force_reconnect (struct GNUNET_GNS_Handle *h)
{
- if (handle->client == NULL)
- return;
- GNUNET_assert (handle->reconnect_task == GNUNET_SCHEDULER_NO_TASK);
- if (NULL != handle->th)
- GNUNET_CLIENT_notify_transmit_ready_cancel (handle->th);
- handle->th = NULL;
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Disconnecting from GNS service, will try to reconnect in %llu ms\n",
- (unsigned long long) handle->retry_time.rel_value);
- GNUNET_CLIENT_disconnect (handle->client, GNUNET_NO);
- handle->client = NULL;
- handle->reconnect_task =
- GNUNET_SCHEDULER_add_delayed (handle->retry_time, &try_reconnect, handle);
+ struct GNUNET_GNS_ShortenRequest *st;
+ struct GNUNET_GNS_LookupRequest *lh;
+ struct GNUNET_GNS_GetAuthRequest *ga;
+ struct PendingMessage *p;
+
+ GNUNET_CLIENT_disconnect (h->client);
+ h->client = NULL;
+ h->in_receive = GNUNET_NO;
+ for (st = h->shorten_head; NULL != st; st = st->next)
+ {
+ p = (struct PendingMessage*) &st[1];
+ if (GNUNET_NO == p->transmitted)
+ continue;
+ p->transmitted = GNUNET_NO;
+ GNUNET_CONTAINER_DLL_insert (h->pending_head,
+ h->pending_tail,
+ p);
+ }
+ for (lh = h->lookup_head; NULL != lh; lh = lh->next)
+ {
+ p = (struct PendingMessage*) &lh[1];
+ if (GNUNET_NO == p->transmitted)
+ continue;
+ p->transmitted = GNUNET_NO;
+ GNUNET_CONTAINER_DLL_insert (h->pending_head,
+ h->pending_tail,
+ p);
+ }
+ for (ga = h->get_auth_head; NULL != ga; ga = ga->next)
+ {
+ p = (struct PendingMessage*) &ga[1];
+ if (GNUNET_NO == p->transmitted)
+ continue;
+ p->transmitted = GNUNET_NO;
+ GNUNET_CONTAINER_DLL_insert (h->pending_head,
+ h->pending_tail,
+ p);
+ }
+ /* FIXME: 1s too long, exponential-backoff, starting at 1ms! (max = 1s might be OK) */
+ h->reconnect_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS,
+ &reconnect_task,
+ h);
}
+
/**
* Transmit the next pending message, called by notify_transmit_ready
+ *
+ * @param cls the closure
+ * @param size size of pending data
+ * @param buf buffer with pending data
+ * @return size data transmitted
*/
static size_t
transmit_pending (void *cls, size_t size, void *buf);
+
/**
* Handler for messages received from the GNS service
*
* @param msg the incoming message
*/
static void
-message_handler (void *cls, const struct GNUNET_MessageHeader *msg);
+process_message (void *cls, const struct GNUNET_MessageHeader *msg);
+
/**
* Try to send messages from list of messages to send
+ *
+ * @param handle the GNS handle
*/
static void
process_pending_messages (struct GNUNET_GNS_Handle *handle)
{
- struct PendingMessage *head;
+ struct PendingMessage *p = handle->pending_head;
- if (handle->client == NULL)
- {
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "process_pending_messages called, but client is null, reconnecting\n");
- do_disconnect (handle);
- return;
- }
- if (handle->th != NULL)
- return;
- if (NULL == (head = handle->pending_head))
- return;
+ if (NULL == handle->client)
+ return; /* wait for reconnect */
+ if (NULL != handle->th)
+ return; /* transmission request already pending */
+
+ while ((NULL != p) && (p->transmitted == GNUNET_YES))
+ p = p->next;
+ if (NULL == p)
+ return; /* no messages pending */
+
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Trying to transmit %u bytes\n",
+ (unsigned int) p->size);
handle->th =
GNUNET_CLIENT_notify_transmit_ready (handle->client,
- ntohs (head->msg->size),
+ p->size,
GNUNET_TIME_UNIT_FOREVER_REL,
- GNUNET_YES, &transmit_pending,
+ GNUNET_NO, &transmit_pending,
handle);
- if (NULL != handle->th)
- return;
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "notify_transmit_ready returned NULL, reconnecting\n");
- do_disconnect (handle);
+ GNUNET_break (NULL != handle->th);
}
/**
* Transmit the next pending message, called by notify_transmit_ready
+ *
+ * @param cls the closure
+ * @param size size of pending data
+ * @param buf buffer with pending data
+ * @return size data transmitted
*/
static size_t
transmit_pending (void *cls, size_t size, void *buf)
{
- struct GNUNET_GNS_Handle *handle = cls;
- struct PendingMessage *head;
+ struct GNUNET_GNS_Handle *h = cls;
+ char *cbuf = buf;
+ struct PendingMessage *p;
size_t tsize;
- handle->th = NULL;
- if (buf == NULL)
+ h->th = NULL;
+ if ((0 == size) || (NULL == buf))
{
GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
- "Transmission to GNS service failed! Reconnecting!\n");
- do_disconnect (handle);
+ "Transmission to GNS service failed!\n");
+ force_reconnect (h);
return 0;
- }
- if (NULL == (head = handle->pending_head))
+ }
+ if (NULL == (p = h->pending_head))
return 0;
- tsize = ntohs (head->msg->size);
- if (size < tsize)
+ tsize = 0;
+ while ((NULL != (p = h->pending_head)) && (p->size <= size))
{
- process_pending_messages (handle);
- return 0;
+ memcpy (&cbuf[tsize], &p[1], p->size);
+ tsize += p->size;
+ size -= p->size;
+ p->transmitted = GNUNET_YES;
+ GNUNET_CONTAINER_DLL_remove (h->pending_head,
+ h->pending_tail,
+ p);
+ if (GNUNET_YES != h->in_receive)
+ {
+ GNUNET_CLIENT_receive (h->client, &process_message, h,
+ GNUNET_TIME_UNIT_FOREVER_REL);
+ h->in_receive = GNUNET_YES;
+ }
}
- memcpy (buf, head->msg, tsize);
- GNUNET_CONTAINER_DLL_remove (handle->pending_head, handle->pending_tail,
- head);
- head->in_pending_queue = GNUNET_NO;
- if (head->timeout_task != GNUNET_SCHEDULER_NO_TASK)
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Sending %u bytes\n",
+ (unsigned int) tsize);
+ process_pending_messages (h);
+ return tsize;
+}
+
+
+/**
+ * Process a given reply that might match the given
+ * request.
+ *
+ * @param qe a queue entry
+ * @param msg the shorten msg received
+ */
+static void
+process_shorten_reply (struct GNUNET_GNS_ShortenRequest *qe,
+ const struct GNUNET_GNS_ClientShortenResultMessage *msg)
+{
+ struct GNUNET_GNS_Handle *h = qe->gns_handle;
+ struct PendingMessage *p = (struct PendingMessage *)&qe[1];
+ const char *short_name;
+ size_t mlen;
+
+ if (GNUNET_YES != p->transmitted)
{
- GNUNET_SCHEDULER_cancel (head->timeout_task);
- head->timeout_task = GNUNET_SCHEDULER_NO_TASK;
+ /* service send reply to query we never managed to send!? */
+ GNUNET_break (0);
+ force_reconnect (h);
+ return;
}
- if (GNUNET_YES == head->free_on_send)
- GNUNET_free (head);
- process_pending_messages (handle);
-#if DEBUG_GNS
- LOG (GNUNET_ERROR_TYPE_DEBUG,
- "Forwarded request of %u bytes to GNS service\n", (unsigned int) tsize);
-#endif
- if (GNUNET_NO == handle->in_receive)
+ mlen = ntohs (msg->header.size);
+ if (ntohs (msg->header.size) == sizeof (struct GNUNET_GNS_ClientShortenResultMessage))
{
-#if DEBUG_GNS
- LOG (GNUNET_ERROR_TYPE_DEBUG, "Starting to process replies from GNS\n");
-#endif
- handle->in_receive = GNUNET_YES;
- GNUNET_CLIENT_receive (handle->client, &message_handler, handle,
- GNUNET_TIME_UNIT_FOREVER_REL);
+ /* service reports resolution failed */
+ short_name = NULL;
}
- return tsize;
+ else
+ {
+ short_name = (const char *) &msg[1];
+ if ('\0' != short_name[mlen - sizeof (struct GNUNET_GNS_ClientShortenResultMessage) - 1])
+ {
+ GNUNET_break (0);
+ force_reconnect (h);
+ return;
+ }
+ }
+ GNUNET_CONTAINER_DLL_remove (h->shorten_head, h->shorten_tail, qe);
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Received shortened reply `%s' from GNS service\n",
+ short_name);
+ qe->shorten_proc (qe->proc_cls, short_name);
+ GNUNET_free (qe);
}
+
/**
* Process a given reply that might match the given
* request.
*
- * @param cls the 'struct GNUNET_GNS_ClientResultMessage'
- * @param key query of the request
- * @param value the 'struct GNUNET_GNS_LookupHandle' of a request matching the same key
- * @return GNUNET_YES to continue to iterate over all results,
- * GNUNET_NO if the reply is malformed
+ * @param qe the handle to the request
+ * @param msg the message to process
*/
-static int
-process_reply (void *cls, const GNUNET_HashCode * key, void *value)
+static void
+process_get_auth_reply (struct GNUNET_GNS_GetAuthRequest *qe,
+ const struct GNUNET_GNS_ClientGetAuthResultMessage *msg)
{
- const struct GNUNET_GNS_ClientResultMessage *gns_msg = cls;
- struct GNUNET_GNS_LookupHandle *lookup_handle = value;
- const char *name = (const char*) &lookup_handle[1];
- const struct GNUNET_NAMESTORE_RecordData *records;
- uint32_t num_records;
- size_t meta_length;
- size_t msize;
+ struct GNUNET_GNS_Handle *h = qe->gns_handle;
+ struct PendingMessage *p = (struct PendingMessage *)&qe[1];
+ const char *auth_name;
+ size_t mlen;
- if (gns_msg->unique_id != lookup_handle->unique_id)
+ if (GNUNET_YES != p->transmitted)
+ {
+ /* service send reply to query we never managed to send!? */
+ GNUNET_break (0);
+ force_reconnect (h);
+ return;
+ }
+ mlen = ntohs (msg->header.size);
+ if (mlen == sizeof (struct GNUNET_GNS_ClientGetAuthResultMessage))
{
- /* UID mismatch */
-#if DEBUG_GNS
- LOG (GNUNET_ERROR_TYPE_DEBUG,
- "Ignoring reply for %s: UID mismatch: %llu/%llu\n", GNUNET_h2s (key),
- gns_msg->unique_id, lookup_handle->unique_id);
-#endif
- return GNUNET_YES;
+ auth_name = NULL;
}
- msize = ntohs (gns_msg->header.size);
- num_records = ntohl (gns_msg->num_records);
- meta_length =
- sizeof (struct GNUNET_GNS_ClientResultMessage) +
- sizeof (struct GNUNET_NAMESTORE_RecordData) * (num_records);
- if ((msize < meta_length) ||
- (num_records >
- GNUNET_SERVER_MAX_MESSAGE_SIZE / sizeof (struct GNUNET_NAMESTORE_RecordData)))
+ else
+ {
+ auth_name = (const char*) &msg[1];
+ if ('\0' != auth_name[mlen - sizeof (struct GNUNET_GNS_ClientGetAuthResultMessage) - 1])
+ {
+ GNUNET_break (0);
+ force_reconnect (h);
+ return;
+ }
+ }
+ GNUNET_CONTAINER_DLL_remove (h->get_auth_head, h->get_auth_tail, qe);
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Received GET_AUTH reply `%s' from GNS service\n",
+ auth_name);
+ qe->auth_proc (qe->proc_cls, auth_name);
+ GNUNET_free (qe);
+}
+
+
+/**
+ * Process a given reply to the lookup request
+ *
+ * @param qe a queue entry
+ * @param msg the lookup message received
+ */
+static void
+process_lookup_reply (struct GNUNET_GNS_LookupRequest *qe,
+ const struct GNUNET_GNS_ClientLookupResultMessage *msg)
+{
+ struct GNUNET_GNS_Handle *h = qe->gns_handle;
+ struct PendingMessage *p = (struct PendingMessage *) &qe[1];
+ uint32_t rd_count = ntohl (msg->rd_count);
+ struct GNUNET_NAMESTORE_RecordData rd[rd_count];
+ size_t mlen;
+
+ if (GNUNET_YES != p->transmitted)
{
+ /* service send reply to query we never managed to send!? */
GNUNET_break (0);
- return GNUNET_NO;
+ force_reconnect (h);
+ return;
+ }
+ mlen = ntohs (msg->header.size);
+ mlen -= sizeof (struct GNUNET_GNS_ClientLookupResultMessage);
+ if (GNUNET_SYSERR == GNUNET_NAMESTORE_records_deserialize (mlen,
+ (const char*) &msg[1],
+ rd_count,
+ rd))
+ {
+ GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
+ _("Failed to serialize lookup reply from GNS service!\n"));
+ qe->lookup_proc (qe->proc_cls, 0, NULL);
}
-#if DEBUG_GNS
- LOG (GNUNET_ERROR_TYPE_DEBUG, "Giving %u byte reply for %s to application\n",
- (unsigned int) (msize - meta_length), GNUNET_h2s (key));
-#endif
- records = (const struct GNUNET_NAMESTORE_RecordData *) &gns_msg[1];
- lookup_handle->iter (lookup_handle->iter_cls, name, records, num_records);
- return GNUNET_YES;
+ else
+ {
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Received lookup reply from GNS service (%u records)\n",
+ (unsigned int) rd_count);
+ qe->lookup_proc (qe->proc_cls, rd_count, rd);
+ }
+ GNUNET_CONTAINER_DLL_remove (h->lookup_head, h->lookup_tail, qe);
+ GNUNET_free (qe);
}
* @param msg the incoming message
*/
static void
-message_handler (void *cls, const struct GNUNET_MessageHeader *msg)
+process_message (void *cls, const struct GNUNET_MessageHeader *msg)
{
struct GNUNET_GNS_Handle *handle = cls;
- const struct GNUNET_GNS_ClientResultMessage *gns_msg;
-
- if (msg == NULL)
- {
-#if DEBUG_GNS
- LOG (GNUNET_ERROR_TYPE_DEBUG,
- "Error receiving data from GNS service, reconnecting\n");
-#endif
- do_disconnect (handle);
- return;
- }
- if (ntohs (msg->type) != GNUNET_MESSAGE_TYPE_GNS_CLIENT_RESULT)
+ struct GNUNET_GNS_LookupRequest *lr;
+ struct GNUNET_GNS_ShortenRequest *sr;
+ struct GNUNET_GNS_GetAuthRequest *gar;
+ const struct GNUNET_GNS_ClientLookupResultMessage *lookup_msg;
+ const struct GNUNET_GNS_ClientShortenResultMessage *shorten_msg;
+ const struct GNUNET_GNS_ClientGetAuthResultMessage *get_auth_msg;
+ uint64_t r_id;
+
+ if (NULL == msg)
{
- GNUNET_break (0);
- do_disconnect (handle);
+ force_reconnect (handle);
return;
}
- if (ntohs (msg->size) < sizeof (struct GNUNET_GNS_ClientResultMessage))
+ switch (ntohs (msg->type))
{
+ case GNUNET_MESSAGE_TYPE_GNS_LOOKUP_RESULT:
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Got LOOKUP_RESULT msg\n");
+ if (ntohs (msg->size) < sizeof (struct GNUNET_GNS_ClientLookupResultMessage))
+ {
+ GNUNET_break (0);
+ force_reconnect (handle);
+ return;
+ }
+ lookup_msg = (const struct GNUNET_GNS_ClientLookupResultMessage *) msg;
+ r_id = ntohl (lookup_msg->id);
+ for (lr = handle->lookup_head; NULL != lr; lr = lr->next)
+ if (lr->r_id == r_id)
+ {
+ process_lookup_reply(lr, lookup_msg);
+ break;
+ }
+ break;
+ case GNUNET_MESSAGE_TYPE_GNS_SHORTEN_RESULT:
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Got SHORTEN_RESULT msg\n");
+ if (ntohs (msg->size) < sizeof (struct GNUNET_GNS_ClientShortenResultMessage))
+ {
+ GNUNET_break (0);
+ force_reconnect (handle);
+ return;
+ }
+ shorten_msg = (const struct GNUNET_GNS_ClientShortenResultMessage *) msg;
+ r_id = ntohl (shorten_msg->id);
+ for (sr = handle->shorten_head; NULL != sr; sr = sr->next)
+ if (sr->r_id == r_id)
+ {
+ process_shorten_reply (sr, shorten_msg);
+ break;
+ }
+ break;
+ case GNUNET_MESSAGE_TYPE_GNS_GET_AUTH_RESULT:
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Got GET_AUTH_RESULT msg\n");
+ if (ntohs (msg->size) < sizeof (struct GNUNET_GNS_ClientGetAuthResultMessage))
+ {
+ GNUNET_break (0);
+ force_reconnect (handle);
+ return;
+ }
+ get_auth_msg = (const struct GNUNET_GNS_ClientGetAuthResultMessage *) msg;
+ r_id = ntohl (get_auth_msg->id);
+ for (gar = handle->get_auth_head; NULL != gar; gar = gar->next)
+ if (gar->r_id == r_id)
+ {
+ process_get_auth_reply (gar, get_auth_msg);
+ break;
+ }
+ break;
+ default:
GNUNET_break (0);
- do_disconnect (handle);
+ force_reconnect (handle);
return;
}
- gns_msg = (const struct GNUNET_GNS_ClientResultMessage *) msg;
-#if DEBUG_GNS
- LOG (GNUNET_ERROR_TYPE_DEBUG, "Received reply for `%s' from GNS service %p\n",
- &gns_msg->name, handle);
-#endif
- /* TODO uniquely identify requests... maybe hash(name) or uid */
- GNUNET_CONTAINER_multihashmap_get_multiple (handle->active_requests,
- &gns_msg->key, &process_reply,
- (void *) gns_msg);
- GNUNET_CLIENT_receive (handle->client, &message_handler, handle,
- GNUNET_TIME_UNIT_FOREVER_REL);
+ GNUNET_CLIENT_receive (handle->client, &process_message, handle,
+ GNUNET_TIME_UNIT_FOREVER_REL);
}
* Initialize the connection with the GNS service.
*
* @param cfg configuration to use
- * @param ht_len size of the internal hash table to use for parallel requests
* @return handle to the GNS service, or NULL on error
*/
struct GNUNET_GNS_Handle *
-GNUNET_GNS_connect (const struct GNUNET_CONFIGURATION_Handle *cfg,
- unsigned int ht_len)
+GNUNET_GNS_connect (const struct GNUNET_CONFIGURATION_Handle *cfg)
{
struct GNUNET_GNS_Handle *handle;
handle = GNUNET_malloc (sizeof (struct GNUNET_GNS_Handle));
handle->cfg = cfg;
- handle->uid_gen =
- GNUNET_CRYPTO_random_u64 (GNUNET_CRYPTO_QUALITY_WEAK, UINT64_MAX);
- handle->active_requests = GNUNET_CONTAINER_multihashmap_create (ht_len);
- if (GNUNET_NO == try_connect (handle))
- {
- GNUNET_GNS_disconnect (handle);
- return NULL;
- }
+ reconnect (handle);
return handle;
}
void
GNUNET_GNS_disconnect (struct GNUNET_GNS_Handle *handle)
{
- /* disco from GNS */
+ GNUNET_CLIENT_disconnect (handle->client);
+ if (GNUNET_SCHEDULER_NO_TASK != handle->reconnect_task)
+ {
+ GNUNET_SCHEDULER_cancel (handle->reconnect_task);
+ handle->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
+ }
+ GNUNET_assert (NULL == handle->lookup_head);
+ GNUNET_assert (NULL == handle->shorten_head);
+ GNUNET_assert (NULL == handle->get_auth_head);
+ GNUNET_free (handle);
+}
+
+
+/**
+ * Cancel pending lookup request
+ *
+ * @param lr the lookup request to cancel
+ */
+void
+GNUNET_GNS_cancel_lookup_request (struct GNUNET_GNS_LookupRequest *lr)
+{
+ struct PendingMessage *p = (struct PendingMessage*) &lr[1];
+
+ GNUNET_assert (NULL != lr->gns_handle);
+ if (GNUNET_NO == p->transmitted)
+ GNUNET_CONTAINER_DLL_remove (lr->gns_handle->pending_head,
+ lr->gns_handle->pending_tail,
+ p);
+ GNUNET_CONTAINER_DLL_remove (lr->gns_handle->lookup_head,
+ lr->gns_handle->lookup_tail,
+ lr);
+ GNUNET_free (lr);
+}
+
+
+/**
+ * Cancel pending shorten request
+ *
+ * @param sr the lookup request to cancel
+ */
+void
+GNUNET_GNS_cancel_shorten_request (struct GNUNET_GNS_ShortenRequest *sr)
+{
+ struct PendingMessage *p = (struct PendingMessage*) &sr[1];
+
+ GNUNET_assert (NULL != sr->gns_handle);
+ if (GNUNET_NO == p->transmitted)
+ GNUNET_CONTAINER_DLL_remove (sr->gns_handle->pending_head,
+ sr->gns_handle->pending_tail,
+ p);
+ GNUNET_CONTAINER_DLL_remove (sr->gns_handle->shorten_head,
+ sr->gns_handle->shorten_tail,
+ sr);
+ GNUNET_free (sr);
+}
+
+
+/**
+ * Cancel pending get auth request
+ *
+ * @param gar the lookup request to cancel
+ */
+void
+GNUNET_GNS_cancel_get_auth_request (struct GNUNET_GNS_GetAuthRequest *gar)
+{
+ struct PendingMessage *p = (struct PendingMessage*) &gar[1];
+
+ GNUNET_assert (NULL != gar->gns_handle);
+ if (GNUNET_NO == p->transmitted)
+ GNUNET_CONTAINER_DLL_remove (gar->gns_handle->pending_head,
+ gar->gns_handle->pending_tail,
+ p);
+ GNUNET_CONTAINER_DLL_remove (gar->gns_handle->get_auth_head,
+ gar->gns_handle->get_auth_tail,
+ gar);
+ GNUNET_free (gar);
}
/**
* Perform an asynchronous Lookup operation on the GNS.
- * TODO:
- * - Still not sure what we query for... "names" it is for now
- * - Do we need such sophisticated message queueing like dht? simplify?
*
* @param handle handle to the GNS service
- * @param timeout how long to wait for transmission of this request to the service
* @param name the name to look up
- * @param iter function to call on each result
- * @param iter_cls closure for iter
- * @return handle to stop the async get
+ * @param zone the zone to start the resolution in
+ * @param type the record type to look up
+ * @param only_cached GNUNET_YES to only check locally not DHT for performance
+ * @param shorten_key the private key of the shorten zone (can be NULL)
+ * @param proc processor to call on result
+ * @param proc_cls closure for processor
+ * @return handle to the get request
*/
-struct GNUNET_GNS_LookupHandle *
-GNUNET_GNS_lookup_start (struct GNUNET_GNS_Handle *handle,
- struct GNUNET_TIME_Relative timeout,
- const char * name,
- enum GNUNET_GNS_RecordType type,
- GNUNET_GNS_LookupIterator iter,
- void *iter_cls)
+struct GNUNET_GNS_LookupRequest*
+GNUNET_GNS_lookup_zone (struct GNUNET_GNS_Handle *handle,
+ const char *name,
+ struct GNUNET_CRYPTO_ShortHashCode *zone,
+ enum GNUNET_GNS_RecordType type,
+ int only_cached,
+ struct GNUNET_CRYPTO_RsaPrivateKey *shorten_key,
+ GNUNET_GNS_LookupResultProcessor proc,
+ void *proc_cls)
{
- /* IPC to look for local entries, start dht lookup, return lookup_handle */
+ /* IPC to shorten gns names, return shorten_handle */
struct GNUNET_GNS_ClientLookupMessage *lookup_msg;
- struct GNUNET_GNS_LookupHandle *lookup_handle;
- GNUNET_HashCode key;
+ struct GNUNET_GNS_LookupRequest *lr;
size_t msize;
struct PendingMessage *pending;
+ struct GNUNET_CRYPTO_RsaPrivateKeyBinaryEncoded *pkey_enc;
+ size_t key_len;
+ char* pkey_tmp;
if (NULL == name)
{
+ GNUNET_break (0);
return NULL;
+ }
+ if (NULL != shorten_key)
+ {
+ pkey_enc = GNUNET_CRYPTO_rsa_encode_key (shorten_key);
+ GNUNET_assert (pkey_enc != NULL);
+ key_len = ntohs (pkey_enc->len);
}
+ else
+ {
+ pkey_enc = NULL;
+ key_len = 0;
+ }
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Trying to lookup `%s' in GNS\n",
+ name);
+ msize = sizeof (struct GNUNET_GNS_ClientLookupMessage)
+ + key_len + strlen (name) + 1;
+ if (msize > UINT16_MAX)
+ {
+ GNUNET_break (0);
+ GNUNET_free (pkey_enc);
+ return NULL;
+ }
+ lr = GNUNET_malloc (sizeof (struct GNUNET_GNS_LookupRequest) +
+ sizeof (struct PendingMessage) + msize);
+ lr->gns_handle = handle;
+ lr->lookup_proc = proc;
+ lr->proc_cls = proc_cls;
+ lr->r_id = handle->r_id++;
+ pending = (struct PendingMessage *)&lr[1];
+ pending->size = msize;
+ pending->r_id = lr->r_id;
+ GNUNET_CONTAINER_DLL_insert_tail (handle->lookup_head,
+ handle->lookup_tail, lr);
- GNUNET_CRYPTO_hash (name, strlen(name), &key);
-
- msize = sizeof (struct GNUNET_GNS_ClientLookupMessage) + strlen(name);
-#if DEBUG_GNS
- LOG (GNUNET_ERROR_TYPE_DEBUG, "Starting lookup for %s in GNS %p\n",
- name, handle);
-#endif
- pending = GNUNET_malloc (sizeof (struct PendingMessage) + msize);
lookup_msg = (struct GNUNET_GNS_ClientLookupMessage *) &pending[1];
- pending->msg = &lookup_msg->header;
- pending->handle = handle;
- pending->free_on_send = GNUNET_NO;
+ lookup_msg->header.type = htons (GNUNET_MESSAGE_TYPE_GNS_LOOKUP);
lookup_msg->header.size = htons (msize);
- lookup_msg->header.type = htons (GNUNET_MESSAGE_TYPE_GNS_CLIENT_LOOKUP);
- lookup_msg->key = key;
- memcpy(&lookup_msg[1], name, strlen(name));
- handle->uid_gen++;
- lookup_msg->unique_id = handle->uid_gen;
- GNUNET_CONTAINER_DLL_insert (handle->pending_head, handle->pending_tail,
- pending);
- pending->in_pending_queue = GNUNET_YES;
- lookup_handle = GNUNET_malloc (sizeof (struct GNUNET_GNS_LookupHandle));
- lookup_handle->iter = iter;
- lookup_handle->iter_cls = iter_cls;
- lookup_handle->message = pending;
- lookup_handle->unique_id = lookup_msg->unique_id;
- GNUNET_CONTAINER_multihashmap_put (handle->active_requests, &lookup_msg->key,
- lookup_handle,
- GNUNET_CONTAINER_MULTIHASHMAPOPTION_MULTIPLE);
+ lookup_msg->id = htonl (lr->r_id);
+ lookup_msg->only_cached = htonl (only_cached);
+ if (NULL != zone)
+ {
+ lookup_msg->use_default_zone = htonl (GNUNET_NO);
+ memcpy (&lookup_msg->zone, zone, sizeof (struct GNUNET_CRYPTO_ShortHashCode));
+ }
+ else
+ {
+ lookup_msg->use_default_zone = htonl (GNUNET_YES);
+ memset (&lookup_msg->zone, 0, sizeof(struct GNUNET_CRYPTO_ShortHashCode));
+ }
+ lookup_msg->type = htonl (type);
+ pkey_tmp = (char *) &lookup_msg[1];
+ if (pkey_enc != NULL)
+ {
+ lookup_msg->have_key = htonl (GNUNET_YES);
+ memcpy (pkey_tmp, pkey_enc, key_len);
+ }
+ else
+ lookup_msg->have_key = htonl (GNUNET_NO);
+ GNUNET_free_non_null (pkey_enc);
+ memcpy (&pkey_tmp[key_len], name, strlen (name) + 1);
+
+ GNUNET_CONTAINER_DLL_insert_tail (handle->pending_head,
+ handle->pending_tail,
+ pending);
process_pending_messages (handle);
- return lookup_handle;
+ return lr;
}
/**
- * Stop async GNS lookup.
+ * Perform an asynchronous Lookup operation on the GNS.
*
- * @param lookup_handle handle to the GNS lookup operation to stop
+ * @param handle handle to the GNS service
+ * @param name the name to look up
+ * @param type the record type to look up
+ * @param only_cached GNUNET_YES to only check locally not DHT for performance
+ * @param shorten_key the private key of the shorten zone (can be NULL)
+ * @param proc processor to call on result
+ * @param proc_cls closure for processor
+ * @return handle to the lookup request
*/
-void
-GNUNET_GNS_lookup_stop (struct GNUNET_GNS_LookupHandle *lookup_handle)
+struct GNUNET_GNS_LookupRequest *
+GNUNET_GNS_lookup (struct GNUNET_GNS_Handle *handle,
+ const char *name,
+ enum GNUNET_GNS_RecordType type,
+ int only_cached,
+ struct GNUNET_CRYPTO_RsaPrivateKey *shorten_key,
+ GNUNET_GNS_LookupResultProcessor proc,
+ void *proc_cls)
+{
+ return GNUNET_GNS_lookup_zone (handle, name,
+ NULL,
+ type, only_cached,
+ shorten_key,
+ proc, proc_cls);
+}
+
+
+/**
+ * Perform a name shortening operation on the GNS.
+ *
+ * @param handle handle to the GNS service
+ * @param name the name to look up
+ * @param private_zone the public zone of the private zone
+ * @param shorten_zone the public zone of the shorten zone
+ * @param zone the zone to start the resolution in
+ * @param proc function to call on result
+ * @param proc_cls closure for processor
+ * @return handle to the operation
+ */
+struct GNUNET_GNS_ShortenRequest*
+GNUNET_GNS_shorten_zone (struct GNUNET_GNS_Handle *handle,
+ const char *name,
+ struct GNUNET_CRYPTO_ShortHashCode *private_zone,
+ struct GNUNET_CRYPTO_ShortHashCode *shorten_zone,
+ struct GNUNET_CRYPTO_ShortHashCode *zone,
+ GNUNET_GNS_ShortenResultProcessor proc,
+ void *proc_cls)
+{
+ /* IPC to shorten gns names, return shorten_handle */
+ struct GNUNET_GNS_ClientShortenMessage *shorten_msg;
+ struct GNUNET_GNS_ShortenRequest *sr;
+ size_t msize;
+ struct PendingMessage *pending;
+
+ if (NULL == name)
+ {
+ GNUNET_break (0);
+ return NULL;
+ }
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Trying to shorten `%s' in GNS\n", name);
+ msize = sizeof (struct GNUNET_GNS_ClientShortenMessage) + strlen (name) + 1;
+ if (msize > UINT16_MAX)
+ {
+ GNUNET_break (0);
+ return NULL;
+ }
+ sr = GNUNET_malloc (sizeof (struct GNUNET_GNS_ShortenRequest) +
+ sizeof (struct PendingMessage) + msize);
+ sr->gns_handle = handle;
+ sr->shorten_proc = proc;
+ sr->proc_cls = proc_cls;
+ sr->r_id = handle->r_id++;
+ GNUNET_CONTAINER_DLL_insert_tail (handle->shorten_head,
+ handle->shorten_tail, sr);
+ pending = (struct PendingMessage *)&sr[1];
+ pending->size = msize;
+ pending->r_id = sr->r_id;
+
+ shorten_msg = (struct GNUNET_GNS_ClientShortenMessage *) &pending[1];
+ shorten_msg->header.type = htons (GNUNET_MESSAGE_TYPE_GNS_SHORTEN);
+ shorten_msg->header.size = htons ((uint16_t) msize);
+ shorten_msg->id = htonl (sr->r_id);
+ shorten_msg->private_zone = *private_zone;
+ shorten_msg->shorten_zone = *shorten_zone;
+ if (NULL != zone)
+ {
+ shorten_msg->use_default_zone = htonl (GNUNET_NO);
+ memcpy (&shorten_msg->zone, zone,
+ sizeof (struct GNUNET_CRYPTO_ShortHashCode));
+ }
+ else
+ {
+ shorten_msg->use_default_zone = htonl (GNUNET_YES);
+ memset (&shorten_msg->zone, 0, sizeof (struct GNUNET_CRYPTO_ShortHashCode));
+ }
+ memcpy (&shorten_msg[1], name, strlen (name) + 1);
+ GNUNET_CONTAINER_DLL_insert_tail (handle->pending_head, handle->pending_tail,
+ pending);
+ process_pending_messages (handle);
+ return sr;
+}
+
+
+/**
+ * Perform a name shortening operation on the GNS.
+ *
+ * @param handle handle to the GNS service
+ * @param name the name to look up
+ * @param private_zone the public zone of the private zone
+ * @param shorten_zone the public zone of the shorten zone
+ * @param proc function to call on result
+ * @param proc_cls closure for processor
+ * @return handle to the operation
+ */
+struct GNUNET_GNS_ShortenRequest*
+GNUNET_GNS_shorten (struct GNUNET_GNS_Handle *handle,
+ const char *name,
+ struct GNUNET_CRYPTO_ShortHashCode *private_zone,
+ struct GNUNET_CRYPTO_ShortHashCode *shorten_zone,
+ GNUNET_GNS_ShortenResultProcessor proc,
+ void *proc_cls)
{
- /* TODO Stop dht lookups */
+ return GNUNET_GNS_shorten_zone (handle, name,
+ private_zone, shorten_zone,
+ NULL, proc, proc_cls);
+}
+
+
+/**
+ * Perform an authority lookup for a given name.
+ *
+ * @param handle handle to the GNS service
+ * @param name the name to look up authority for
+ * @param proc function to call on result
+ * @param proc_cls closure for processor
+ * @return handle to the operation
+ */
+struct GNUNET_GNS_GetAuthRequest*
+GNUNET_GNS_get_authority (struct GNUNET_GNS_Handle *handle,
+ const char *name,
+ GNUNET_GNS_GetAuthResultProcessor proc,
+ void *proc_cls)
+{
+ struct GNUNET_GNS_ClientGetAuthMessage *get_auth_msg;
+ struct GNUNET_GNS_GetAuthRequest *gar;
+ size_t msize;
+ struct PendingMessage *pending;
+
+ if (NULL == name)
+ {
+ GNUNET_break (0);
+ return NULL;
+ }
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Trying to look up authority for %s in GNS\n", name);
+ msize = sizeof (struct GNUNET_GNS_ClientGetAuthMessage) + strlen (name) + 1;
+ if (msize > UINT16_MAX)
+ {
+ GNUNET_break (0);
+ return NULL;
+ }
+ gar = GNUNET_malloc (sizeof (struct GNUNET_GNS_GetAuthRequest) +
+ sizeof (struct PendingMessage) + msize);
+ gar->gns_handle = handle;
+ gar->auth_proc = proc;
+ gar->proc_cls = proc_cls;
+ gar->r_id = handle->r_id++;
+ GNUNET_CONTAINER_DLL_insert_tail (handle->get_auth_head,
+ handle->get_auth_tail, gar);
+
+ pending = (struct PendingMessage *) &gar[1];
+ pending->size = msize;
+ pending->r_id = gar->r_id;
+ get_auth_msg = (struct GNUNET_GNS_ClientGetAuthMessage *) &pending[1];
+ get_auth_msg->header.type = htons (GNUNET_MESSAGE_TYPE_GNS_GET_AUTH);
+ get_auth_msg->header.size = htons (msize);
+ get_auth_msg->id = htonl (gar->r_id);
+ memcpy (&get_auth_msg[1], name, strlen (name) + 1);
+ GNUNET_CONTAINER_DLL_insert_tail (handle->pending_head,
+ handle->pending_tail,
+ pending);
+ process_pending_messages (handle);
+ return gar;
}