-bugfixes, tests
[oweals/gnunet.git] / src / gns / gns_api.c
1 /*
2      This file is part of GNUnet.
3      (C) 2009, 2010 Christian Grothoff (and other contributing authors)
4
5      GNUnet is free software; you can redistribute it and/or modify
6      it under the terms of the GNU General Public License as published
7      by the Free Software Foundation; either version 3, or (at your
8      option) any later version.
9
10      GNUnet is distributed in the hope that it will be useful, but
11      WITHOUT ANY WARRANTY; without even the implied warranty of
12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13      General Public License for more details.
14
15      You should have received a copy of the GNU General Public License
16      along with GNUnet; see the file COPYING.  If not, write to the
17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18      Boston, MA 02111-1307, USA.
19 */
20
21 /**
22  *
23  * @file gns/gns_api.c
24  * @brief library to access the GNS service
25  * @author Martin Schanzenbach
26  */
27
28 #include "platform.h"
29 #include "gnunet_util_lib.h"
30 #include "gnunet_constants.h"
31 #include "gnunet_arm_service.h"
32 #include "gnunet_hello_lib.h"
33 #include "gnunet_protocols.h"
34 #include "gnunet_dht_service.h"
35 #include "gns.h"
36 #include "gnunet_gns_service.h"
37
38 /* TODO into gnunet_protocols */
39 #define GNUNET_MESSAGE_TYPE_GNS_LOOKUP 23
40 #define GNUNET_MESSAGE_TYPE_GNS_LOOKUP_RESULT 24
41 #define GNUNET_MESSAGE_TYPE_GNS_SHORTEN 25
42 #define GNUNET_MESSAGE_TYPE_GNS_SHORTEN_RESULT 26
43 #define GNUNET_MESSAGE_TYPE_GNS_GET_AUTH 27
44 #define GNUNET_MESSAGE_TYPE_GNS_GET_AUTH_RESULT 28
45
46 /**
47  * A QueueEntry.
48  */
49 struct GNUNET_GNS_QueueEntry
50 {
51   /**
52    * DLL
53    */
54   struct GNUNET_GNS_QueueEntry *next;
55   
56   /**
57    * DLL
58    */
59   struct GNUNET_GNS_QueueEntry *prev;
60
61   /* request id */
62   uint32_t r_id;
63   
64   /* handle to gns */
65   struct GNUNET_GNS_Handle *gns_handle;
66   
67   /* processor to call on shorten result */
68   GNUNET_GNS_ShortenResultProcessor shorten_proc;
69   
70   /* processor to call on lookup result */
71   GNUNET_GNS_LookupResultProcessor lookup_proc;
72
73   /* processor to call on authority lookup result */
74   GNUNET_GNS_GetAuthResultProcessor auth_proc;
75   
76   /* processor closure */
77   void *proc_cls;
78   
79 };
80
81
82 /**
83  * Entry in our list of messages to be (re-)transmitted.
84  */
85 struct PendingMessage
86 {
87   /**
88    * This is a doubly-linked list.
89    */
90   struct PendingMessage *prev;
91
92   /**
93    * This is a doubly-linked list.
94    */
95   struct PendingMessage *next;
96
97   /**
98    * Size of the message.
99    */
100   size_t size;
101
102 };
103
104
105 /**
106  * Connection to the GNS service.
107  */
108 struct GNUNET_GNS_Handle
109 {
110
111   /**
112    * Configuration to use.
113    */
114   const struct GNUNET_CONFIGURATION_Handle *cfg;
115
116   /**
117    * Socket (if available).
118    */
119   struct GNUNET_CLIENT_Connection *client;
120
121   /**
122    * Currently pending transmission request (or NULL).
123    */
124   struct GNUNET_CLIENT_TransmitHandle *th;
125   
126   uint32_t r_id;
127   
128   /**
129    * Head of linked list of shorten messages we would like to transmit.
130    */
131   struct PendingMessage *pending_head;
132
133   /**
134    * Tail of linked list of shorten messages we would like to transmit.
135    */
136   struct PendingMessage *pending_tail;
137   
138   /**
139    * Head of linked list of shorten messages we would like to transmit.
140    */
141   struct GNUNET_GNS_QueueEntry *shorten_head;
142
143   /**
144    * Tail of linked list of shorten messages we would like to transmit.
145    */
146   struct GNUNET_GNS_QueueEntry *shorten_tail;
147   
148   /**
149    * Head of linked list of lookup messages we would like to transmit.
150    */
151   struct GNUNET_GNS_QueueEntry *lookup_head;
152
153   /**
154    * Tail of linked list of lookup messages we would like to transmit.
155    */
156   struct GNUNET_GNS_QueueEntry *lookup_tail;
157   
158   /**
159    * Head of linked list of authority lookup messages we would like to transmit.
160    */
161   struct GNUNET_GNS_QueueEntry *get_auth_head;
162
163   /**
164    * Tail of linked list of authority lookup messages we would like to transmit.
165    */
166   struct GNUNET_GNS_QueueEntry *get_auth_tail;
167
168   /**
169    * Reconnect task
170    */
171   GNUNET_SCHEDULER_TaskIdentifier reconnect_task;
172
173   /**
174    * Did we start our receive loop yet?
175    */
176   int in_receive;
177
178   /**
179    * Reconnect necessary
180    */
181   int reconnect;
182 };
183
184 /**
185  * Try to send messages from list of messages to send
186  * @param handle GNS_Handle
187  */
188 static void
189 process_pending_messages (struct GNUNET_GNS_Handle *handle);
190
191
192 /**
193  * Reconnect to GNS service.
194  *
195  * @param h the handle to the namestore service
196  */
197 static void
198 reconnect (struct GNUNET_GNS_Handle *h)
199 {
200   GNUNET_assert (NULL == h->client);
201   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
202              "Trying to connect to GNS...\n");
203   h->client = GNUNET_CLIENT_connect ("gns", h->cfg);
204   GNUNET_assert (NULL != h->client);
205 }
206
207 /**
208  * Reconnect to GNS
209  *
210  * @param cls the handle
211  * @param tc task context
212  */
213 static void
214 reconnect_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
215 {
216   struct GNUNET_GNS_Handle *h = cls;
217
218   h->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
219   reconnect (h);
220 }
221
222
223 /**
224  * Disconnect from service and then reconnect.
225  *
226  * @param h our handle
227  */
228 static void
229 force_reconnect (struct GNUNET_GNS_Handle *h)
230 {
231   h->reconnect = GNUNET_NO;
232   GNUNET_CLIENT_disconnect (h->client, GNUNET_NO);
233   h->client = NULL;
234   h->reconnect_task = GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS,
235                                                     &reconnect_task,
236                                                     h);
237 }
238
239 /**
240  * Transmit the next pending message, called by notify_transmit_ready
241  */
242 static size_t
243 transmit_pending (void *cls, size_t size, void *buf);
244
245 /**
246  * Handler for messages received from the GNS service
247  *
248  * @param cls the 'struct GNUNET_GNS_Handle'
249  * @param msg the incoming message
250  */
251 static void
252 process_message (void *cls, const struct GNUNET_MessageHeader *msg);
253
254 /**
255  * Try to send messages from list of messages to send
256  */
257 static void
258 process_pending_messages (struct GNUNET_GNS_Handle *handle)
259 {
260   struct PendingMessage *p;
261
262   if (handle->client == NULL)
263   {
264     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
265          "process_pending_messages called, but client is null\n");
266     return;
267   }
268   
269   if (handle->th != NULL)
270     return;
271   
272   if (NULL == (p = handle->pending_head))
273     return;
274   
275   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG,
276              "Trying to transmit %d bytes...\n", p->size);
277
278   handle->th =
279     GNUNET_CLIENT_notify_transmit_ready (handle->client,
280                                          p->size,
281                                          GNUNET_TIME_UNIT_FOREVER_REL,
282                                          GNUNET_NO, &transmit_pending,
283                                          handle);
284   if (NULL != handle->th)
285     return;
286
287   GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
288               "notify_transmit_ready returned NULL!\n");
289 }
290
291
292 /**
293  * Transmit the next pending message, called by notify_transmit_ready
294  */
295 static size_t
296 transmit_pending (void *cls, size_t size, void *buf)
297 {
298   struct GNUNET_GNS_Handle *handle = cls;
299   struct PendingMessage *p;
300   size_t tsize;
301   char *cbuf;
302
303   handle->th = NULL;
304   
305   if ((size == 0) || (buf == NULL))
306   {
307     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
308          "Transmission to GNS service failed!\n");
309     force_reconnect(handle);
310     return 0;
311   }
312   
313   tsize = 0;
314   cbuf = buf;
315
316   if (NULL == (p = handle->pending_head))
317     return 0;
318
319   while ((NULL != (p = handle->pending_head)) && (p->size <= size))
320   {
321     memcpy (&cbuf[tsize], &p[1], p->size);
322     tsize += p->size;
323     size -= p->size;
324     GNUNET_CONTAINER_DLL_remove (handle->pending_head, handle->pending_tail, p);
325     if (GNUNET_YES != handle->in_receive)
326     {
327       GNUNET_CLIENT_receive (handle->client, &process_message, handle,
328                              GNUNET_TIME_UNIT_FOREVER_REL);
329       handle->in_receive = GNUNET_YES;
330     }
331     GNUNET_free(p);
332   }
333
334   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
335               "Sending %d bytes\n", tsize);
336
337   process_pending_messages(handle);
338   return tsize;
339 }
340
341 /**
342  * Process a given reply that might match the given
343  * request.
344  *
345  * @param cls the 'struct GNUNET_GNS_ClientResultMessage'
346  * @param key query of the request
347  * @param value the 'struct GNUNET_GNS_LookupHandle' of a request matching the same key
348  */
349 static void
350 process_shorten_reply (struct GNUNET_GNS_QueueEntry *qe,
351                        const struct GNUNET_GNS_ClientShortenResultMessage *msg)
352 {
353   struct GNUNET_GNS_Handle *h = qe->gns_handle;
354   const char *short_name;
355
356   GNUNET_CONTAINER_DLL_remove(h->shorten_head, h->shorten_tail, qe);
357
358   short_name = (char*)(&msg[1]);
359
360   if (ntohs (((struct GNUNET_MessageHeader*)msg)->size) <
361       sizeof (struct GNUNET_GNS_ClientShortenResultMessage))
362   {
363     GNUNET_break (0);
364     force_reconnect (h);
365     return;
366   }
367   
368   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
369               "Received shortened reply `%s' from GNS service\n",
370               short_name);
371   
372   qe->shorten_proc(qe->proc_cls, short_name);
373
374 }
375
376
377 /**
378  * Process a given reply that might match the given
379  * request.
380  *
381  * @param qe the handle to the request
382  * @param msg the message to process
383  */
384 static void
385 process_get_auth_reply (struct GNUNET_GNS_QueueEntry *qe,
386                        const struct GNUNET_GNS_ClientGetAuthResultMessage *msg)
387 {
388   struct GNUNET_GNS_Handle *h = qe->gns_handle;
389   const char *auth_name;
390
391   GNUNET_CONTAINER_DLL_remove(h->get_auth_head, h->get_auth_tail, qe);
392
393   auth_name = (char*)(&msg[1]);
394
395   if (ntohs (((struct GNUNET_MessageHeader*)msg)->size) <
396       sizeof (struct GNUNET_GNS_ClientGetAuthResultMessage))
397   {
398     GNUNET_break (0);
399     force_reconnect (h);
400     return;
401   }
402   
403   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
404               "Received GET_AUTH reply `%s' from GNS service\n",
405               auth_name);
406   
407   qe->auth_proc(qe->proc_cls, auth_name);
408
409 }
410 /**
411  * Process a given reply to the lookup request
412  *
413  * @param cls the 'struct GNUNET_GNS_ClientResultMessage'
414  * @param key query of the request
415  * @param value the 'struct GNUNET_GNS_LookupHandle' of a request matching the same key
416  * @return GNUNET_YES to continue to iterate over all results,
417  *         GNUNET_NO if the reply is malformed
418  */
419 static void
420 process_lookup_reply (struct GNUNET_GNS_QueueEntry *qe,
421                       const struct GNUNET_GNS_ClientLookupResultMessage *msg)
422 {
423   struct GNUNET_GNS_Handle *h = qe->gns_handle;
424   int rd_count = ntohl(msg->rd_count);
425   size_t len = ntohs (((struct GNUNET_MessageHeader*)msg)->size);
426   struct GNUNET_NAMESTORE_RecordData rd[rd_count];
427
428   GNUNET_CONTAINER_DLL_remove(h->lookup_head, h->lookup_tail, qe);
429
430   if (len < sizeof (struct GNUNET_GNS_ClientLookupResultMessage))
431   {
432     GNUNET_break (0);
433     force_reconnect (h);
434     return;
435   }
436
437   len -= sizeof(struct GNUNET_GNS_ClientLookupResultMessage);
438
439   GNUNET_NAMESTORE_records_deserialize (len, (char*)&msg[1],
440                                         rd_count,
441                                         rd);
442   
443   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
444               "Received lookup reply from GNS service (count=%d)\n",
445               ntohl(msg->rd_count));
446   
447   qe->lookup_proc(qe->proc_cls, rd_count, rd);
448 }
449
450 /**
451  * Handler for messages received from the GNS service
452  *
453  * @param cls the 'struct GNUNET_GNS_Handle'
454  * @param msg the incoming message
455  */
456 static void
457 process_message (void *cls, const struct GNUNET_MessageHeader *msg)
458 {
459   struct GNUNET_GNS_Handle *handle = cls;
460   struct GNUNET_GNS_QueueEntry *qe;
461   const struct GNUNET_GNS_ClientLookupResultMessage *lookup_msg;
462   const struct GNUNET_GNS_ClientShortenResultMessage *shorten_msg;
463   const struct GNUNET_GNS_ClientGetAuthResultMessage *get_auth_msg;
464   uint16_t size;
465   uint16_t type;
466   uint32_t r_id;
467   
468   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
469               "Got message\n");
470   if (msg == NULL)
471   {
472     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
473          "Error receiving data from GNS service, reconnecting\n");
474     force_reconnect (handle);
475     return;
476   }
477
478   size = ntohs (msg->size);
479   type = ntohs (msg->type);
480
481   if (type == GNUNET_MESSAGE_TYPE_GNS_LOOKUP_RESULT)
482   {
483     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
484                 "Got lookup msg\n");
485     lookup_msg = (const struct GNUNET_GNS_ClientLookupResultMessage *) msg;
486     r_id = ntohl (lookup_msg->id);
487     
488     if (r_id > handle->r_id)
489     {
490       /** no request found */
491       GNUNET_break_op (0);
492       GNUNET_CLIENT_receive (handle->client, &process_message, handle,
493                              GNUNET_TIME_UNIT_FOREVER_REL);
494     }
495
496     for (qe = handle->lookup_head; qe != NULL; qe = qe->next)
497     {
498       if (qe->r_id == r_id)
499         break;
500     }
501     if (qe)
502       process_lookup_reply(qe, lookup_msg);
503
504
505   }
506   else if (type == GNUNET_MESSAGE_TYPE_GNS_SHORTEN_RESULT)
507   {
508     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
509                 "Got SHORTEN_RESULT msg\n");
510     shorten_msg = (struct GNUNET_GNS_ClientShortenResultMessage *) msg;
511     
512     r_id = ntohl (shorten_msg->id);
513     
514     if (r_id > handle->r_id)
515     {
516       /** no request found */
517       GNUNET_break_op (0);
518       GNUNET_CLIENT_receive (handle->client, &process_message, handle,
519                              GNUNET_TIME_UNIT_FOREVER_REL);
520     }
521
522     for (qe = handle->shorten_head; qe != NULL; qe = qe->next)
523     {
524       if (qe->r_id == r_id)
525         break;
526     }
527     if (qe)
528       process_shorten_reply(qe, shorten_msg);
529   }
530   else if (type == GNUNET_MESSAGE_TYPE_GNS_GET_AUTH_RESULT)
531   {
532     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
533                 "Got GET_AUTH_RESULT msg\n");
534     get_auth_msg = (struct GNUNET_GNS_ClientGetAuthResultMessage *) msg;
535
536     r_id = ntohl (get_auth_msg->id);
537
538     if (r_id > handle->r_id)
539     {
540       /** no request found */
541       GNUNET_break_op (0);
542       GNUNET_CLIENT_receive (handle->client, &process_message, handle,
543                              GNUNET_TIME_UNIT_FOREVER_REL);
544     }
545
546     for (qe = handle->get_auth_head; qe != NULL; qe = qe->next)
547     {
548       if (qe->r_id == r_id)
549         break;
550     }
551     if (qe)
552       process_get_auth_reply(qe, get_auth_msg);
553   }
554
555   GNUNET_CLIENT_receive (handle->client, &process_message, handle,
556                          GNUNET_TIME_UNIT_FOREVER_REL);
557
558   if (GNUNET_YES == handle->reconnect)
559     force_reconnect (handle);
560   
561 }
562
563
564 /**
565  * Initialize the connection with the GNS service.
566  *
567  * @param cfg configuration to use
568  * @param ht_len size of the internal hash table to use for parallel requests
569  * @return handle to the GNS service, or NULL on error
570  */
571 struct GNUNET_GNS_Handle *
572 GNUNET_GNS_connect (const struct GNUNET_CONFIGURATION_Handle *cfg)
573 {
574   struct GNUNET_GNS_Handle *handle;
575
576   handle = GNUNET_malloc (sizeof (struct GNUNET_GNS_Handle));
577   handle->cfg = cfg;
578   reconnect (handle);
579   //handle->reconnect_task = GNUNET_SCHEDULER_add_now (&reconnect_task, handle);
580   handle->r_id = 0;
581   handle->in_receive = GNUNET_NO;
582   return handle;
583 }
584
585
586 /**
587  * Shutdown connection with the GNS service.
588  *
589  * @param handle handle of the GNS connection to stop
590  */
591 void
592 GNUNET_GNS_disconnect (struct GNUNET_GNS_Handle *handle)
593 {
594   /* disco from GNS */
595 }
596
597 /*
598  * Helper function to generate request ids
599  * 
600  * @param h handle
601  * @return a new id
602  */
603 static uint32_t
604 get_request_id (struct GNUNET_GNS_Handle *h)
605 {
606   uint32_t r_id = h->r_id;
607   h->r_id++;
608   return r_id;
609 }
610
611 /**
612  * Perform an asynchronous Lookup operation on the GNS.
613  *
614  * @param handle handle to the GNS service
615  * @param name the name to look up
616  * @param iter function to call on each result
617  * @param iter_cls closure for iter
618  * @return handle to stop the async get
619  */
620 struct GNUNET_GNS_QueueEntry *
621 GNUNET_GNS_lookup (struct GNUNET_GNS_Handle *handle,
622                    const char * name,
623                    enum GNUNET_GNS_RecordType type,
624                    GNUNET_GNS_LookupResultProcessor proc,
625                    void *proc_cls)
626 {
627   /* IPC to shorten gns names, return shorten_handle */
628   struct GNUNET_GNS_ClientLookupMessage *lookup_msg;
629   struct GNUNET_GNS_QueueEntry *qe;
630   size_t msize;
631   struct PendingMessage *pending;
632
633   if (NULL == name)
634   {
635     return NULL;
636   }
637
638   msize = sizeof (struct GNUNET_GNS_ClientLookupMessage) + strlen(name) + 1;
639   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Trying to lookup %s in GNS\n", name);
640
641   qe = GNUNET_malloc(sizeof (struct GNUNET_GNS_QueueEntry));
642   qe->gns_handle = handle;
643   qe->lookup_proc = proc;
644   qe->proc_cls = proc_cls;
645   qe->r_id = get_request_id(handle);
646   GNUNET_CONTAINER_DLL_insert_tail(handle->lookup_head,
647                                    handle->lookup_tail, qe);
648
649   pending = GNUNET_malloc (sizeof (struct PendingMessage) + msize);
650   memset(pending, 0, (sizeof (struct PendingMessage) + msize));
651   
652   pending->size = msize;
653
654   lookup_msg = (struct GNUNET_GNS_ClientLookupMessage *) &pending[1];
655   lookup_msg->header.type = htons (GNUNET_MESSAGE_TYPE_GNS_LOOKUP);
656   lookup_msg->header.size = htons (msize);
657   lookup_msg->id = htonl(qe->r_id);
658   lookup_msg->type = htonl(type);
659
660   memcpy(&lookup_msg[1], name, strlen(name));
661
662   GNUNET_CONTAINER_DLL_insert (handle->pending_head, handle->pending_tail,
663                                pending);
664   
665   process_pending_messages (handle);
666   return qe;
667 }
668
669
670 /**
671  * Perform a name shortening operation on the GNS.
672  *
673  * @param handle handle to the GNS service
674  * @param name the name to look up
675  * @param proc function to call on result
676  * @param proc_cls closure for processor
677  * @return handle to the operation
678  */
679 struct GNUNET_GNS_QueueEntry *
680 GNUNET_GNS_shorten (struct GNUNET_GNS_Handle *handle,
681                     const char * name,
682                     GNUNET_GNS_ShortenResultProcessor proc,
683                     void *proc_cls)
684 {
685   /* IPC to shorten gns names, return shorten_handle */
686   struct GNUNET_GNS_ClientShortenMessage *shorten_msg;
687   struct GNUNET_GNS_QueueEntry *qe;
688   size_t msize;
689   struct PendingMessage *pending;
690
691   if (NULL == name)
692   {
693     return NULL;
694   }
695
696   msize = sizeof (struct GNUNET_GNS_ClientShortenMessage) + strlen(name) + 1;
697   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Trying to shorten %s in GNS\n", name);
698
699   qe = GNUNET_malloc(sizeof (struct GNUNET_GNS_QueueEntry));
700   qe->gns_handle = handle;
701   qe->shorten_proc = proc;
702   qe->proc_cls = proc_cls;
703   qe->r_id = get_request_id(handle);
704   GNUNET_CONTAINER_DLL_insert_tail(handle->shorten_head,
705                                    handle->shorten_tail, qe);
706
707   pending = GNUNET_malloc (sizeof (struct PendingMessage) + msize);
708   memset(pending, 0, (sizeof (struct PendingMessage) + msize));
709   
710   pending->size = msize;
711
712   shorten_msg = (struct GNUNET_GNS_ClientShortenMessage *) &pending[1];
713   shorten_msg->header.type = htons (GNUNET_MESSAGE_TYPE_GNS_SHORTEN);
714   shorten_msg->header.size = htons (msize);
715   shorten_msg->id = htonl(qe->r_id);
716
717   memcpy(&shorten_msg[1], name, strlen(name));
718
719   GNUNET_CONTAINER_DLL_insert (handle->pending_head, handle->pending_tail,
720                                pending);
721   
722   process_pending_messages (handle);
723   return qe;
724 }
725
726
727 /**
728  * Perform an authority lookup for a given name.
729  *
730  * @param handle handle to the GNS service
731  * @param name the name to look up authority for
732  * @param proc function to call on result
733  * @param proc_cls closure for processor
734  * @return handle to the operation
735  */
736 struct GNUNET_GNS_QueueEntry *
737 GNUNET_GNS_get_authority (struct GNUNET_GNS_Handle *handle,
738                     const char * name,
739                     GNUNET_GNS_GetAuthResultProcessor proc,
740                     void *proc_cls)
741 {
742   struct GNUNET_GNS_ClientGetAuthMessage *get_auth_msg;
743   struct GNUNET_GNS_QueueEntry *qe;
744   size_t msize;
745   struct PendingMessage *pending;
746
747   if (NULL == name)
748   {
749     return NULL;
750   }
751
752   msize = sizeof (struct GNUNET_GNS_ClientGetAuthMessage) + strlen(name) + 1;
753   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
754               "Trying to look up authority for %s in GNS\n", name);
755
756   qe = GNUNET_malloc(sizeof (struct GNUNET_GNS_QueueEntry));
757   qe->gns_handle = handle;
758   qe->auth_proc = proc;
759   qe->proc_cls = proc_cls;
760   qe->r_id = get_request_id(handle);
761   GNUNET_CONTAINER_DLL_insert_tail(handle->get_auth_head,
762                                    handle->get_auth_tail, qe);
763
764   pending = GNUNET_malloc (sizeof (struct PendingMessage) + msize);
765   memset(pending, 0, (sizeof (struct PendingMessage) + msize));
766   
767   pending->size = msize;
768
769   get_auth_msg = (struct GNUNET_GNS_ClientGetAuthMessage *) &pending[1];
770   get_auth_msg->header.type = htons (GNUNET_MESSAGE_TYPE_GNS_GET_AUTH);
771   get_auth_msg->header.size = htons (msize);
772   get_auth_msg->id = htonl(qe->r_id);
773
774   memcpy(&get_auth_msg[1], name, strlen(name));
775
776   GNUNET_CONTAINER_DLL_insert (handle->pending_head, handle->pending_tail,
777                                pending);
778   
779   process_pending_messages (handle);
780   return qe;
781 }
782
783
784 /* end of gns_api.c */