53b8feef7d726a72126ac7dac8406f907b0934c0
[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 type;
465   uint32_t r_id;
466   
467   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
468               "Got message\n");
469   if (msg == NULL)
470   {
471     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
472          "Error receiving data from GNS service, reconnecting\n");
473     force_reconnect (handle);
474     return;
475   }
476
477   type = ntohs (msg->type);
478
479   if (type == GNUNET_MESSAGE_TYPE_GNS_LOOKUP_RESULT)
480   {
481     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
482                 "Got lookup msg\n");
483     lookup_msg = (const struct GNUNET_GNS_ClientLookupResultMessage *) msg;
484     r_id = ntohl (lookup_msg->id);
485     
486     if (r_id > handle->r_id)
487     {
488       /** no request found */
489       GNUNET_break_op (0);
490       GNUNET_CLIENT_receive (handle->client, &process_message, handle,
491                              GNUNET_TIME_UNIT_FOREVER_REL);
492       return;
493     }
494
495     for (qe = handle->lookup_head; qe != NULL; qe = qe->next)
496     {
497       if (qe->r_id == r_id)
498         break;
499     }
500     if (qe)
501       process_lookup_reply(qe, lookup_msg);
502
503
504   }
505   else if (type == GNUNET_MESSAGE_TYPE_GNS_SHORTEN_RESULT)
506   {
507     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
508                 "Got SHORTEN_RESULT msg\n");
509     shorten_msg = (struct GNUNET_GNS_ClientShortenResultMessage *) msg;
510     
511     r_id = ntohl (shorten_msg->id);
512     
513     if (r_id > handle->r_id)
514     {
515       /** no request found */
516       GNUNET_break_op (0);
517       GNUNET_CLIENT_receive (handle->client, &process_message, handle,
518                              GNUNET_TIME_UNIT_FOREVER_REL);
519       return;
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       return;
545     }
546
547     for (qe = handle->get_auth_head; qe != NULL; qe = qe->next)
548     {
549       if (qe->r_id == r_id)
550         break;
551     }
552     if (qe)
553       process_get_auth_reply(qe, get_auth_msg);
554   }
555
556   GNUNET_CLIENT_receive (handle->client, &process_message, handle,
557                          GNUNET_TIME_UNIT_FOREVER_REL);
558
559   if (GNUNET_YES == handle->reconnect)
560     force_reconnect (handle);
561   
562 }
563
564
565 /**
566  * Initialize the connection with the GNS service.
567  *
568  * @param cfg configuration to use
569  * @param ht_len size of the internal hash table to use for parallel requests
570  * @return handle to the GNS service, or NULL on error
571  */
572 struct GNUNET_GNS_Handle *
573 GNUNET_GNS_connect (const struct GNUNET_CONFIGURATION_Handle *cfg)
574 {
575   struct GNUNET_GNS_Handle *handle;
576
577   handle = GNUNET_malloc (sizeof (struct GNUNET_GNS_Handle));
578   handle->cfg = cfg;
579   reconnect (handle);
580   //handle->reconnect_task = GNUNET_SCHEDULER_add_now (&reconnect_task, handle);
581   handle->r_id = 0;
582   handle->in_receive = GNUNET_NO;
583   return handle;
584 }
585
586
587 /**
588  * Shutdown connection with the GNS service.
589  *
590  * @param handle handle of the GNS connection to stop
591  */
592 void
593 GNUNET_GNS_disconnect (struct GNUNET_GNS_Handle *h)
594 {
595   GNUNET_CLIENT_disconnect (h->client, GNUNET_NO);
596   if (GNUNET_SCHEDULER_NO_TASK != h->reconnect_task)
597   {
598     GNUNET_SCHEDULER_cancel (h->reconnect_task);
599     h->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
600   }
601   GNUNET_free(h);
602   /* disco from GNS */
603 }
604
605 /*
606  * Helper function to generate request ids
607  * 
608  * @param h handle
609  * @return a new id
610  */
611 static uint32_t
612 get_request_id (struct GNUNET_GNS_Handle *h)
613 {
614   uint32_t r_id = h->r_id;
615   h->r_id++;
616   return r_id;
617 }
618
619 /**
620  * Perform an asynchronous Lookup operation on the GNS.
621  *
622  * @param handle handle to the GNS service
623  * @param name the name to look up
624  * @param iter function to call on each result
625  * @param iter_cls closure for iter
626  * @return handle to stop the async get
627  */
628 struct GNUNET_GNS_QueueEntry *
629 GNUNET_GNS_lookup (struct GNUNET_GNS_Handle *handle,
630                    const char * name,
631                    enum GNUNET_GNS_RecordType type,
632                    GNUNET_GNS_LookupResultProcessor proc,
633                    void *proc_cls)
634 {
635   /* IPC to shorten gns names, return shorten_handle */
636   struct GNUNET_GNS_ClientLookupMessage *lookup_msg;
637   struct GNUNET_GNS_QueueEntry *qe;
638   size_t msize;
639   struct PendingMessage *pending;
640
641   if (NULL == name)
642   {
643     return NULL;
644   }
645
646   msize = sizeof (struct GNUNET_GNS_ClientLookupMessage) + strlen(name) + 1;
647   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Trying to lookup %s in GNS\n", name);
648
649   qe = GNUNET_malloc(sizeof (struct GNUNET_GNS_QueueEntry));
650   qe->gns_handle = handle;
651   qe->lookup_proc = proc;
652   qe->proc_cls = proc_cls;
653   qe->r_id = get_request_id(handle);
654   GNUNET_CONTAINER_DLL_insert_tail(handle->lookup_head,
655                                    handle->lookup_tail, qe);
656
657   pending = GNUNET_malloc (sizeof (struct PendingMessage) + msize);
658   memset(pending, 0, (sizeof (struct PendingMessage) + msize));
659   
660   pending->size = msize;
661
662   lookup_msg = (struct GNUNET_GNS_ClientLookupMessage *) &pending[1];
663   lookup_msg->header.type = htons (GNUNET_MESSAGE_TYPE_GNS_LOOKUP);
664   lookup_msg->header.size = htons (msize);
665   lookup_msg->id = htonl(qe->r_id);
666   lookup_msg->type = htonl(type);
667
668   memcpy(&lookup_msg[1], name, strlen(name));
669
670   GNUNET_CONTAINER_DLL_insert (handle->pending_head, handle->pending_tail,
671                                pending);
672   
673   process_pending_messages (handle);
674   return qe;
675 }
676
677
678 /**
679  * Perform a name shortening operation on the GNS.
680  *
681  * @param handle handle to the GNS service
682  * @param name the name to look up
683  * @param proc function to call on result
684  * @param proc_cls closure for processor
685  * @return handle to the operation
686  */
687 struct GNUNET_GNS_QueueEntry *
688 GNUNET_GNS_shorten (struct GNUNET_GNS_Handle *handle,
689                     const char * name,
690                     GNUNET_GNS_ShortenResultProcessor proc,
691                     void *proc_cls)
692 {
693   /* IPC to shorten gns names, return shorten_handle */
694   struct GNUNET_GNS_ClientShortenMessage *shorten_msg;
695   struct GNUNET_GNS_QueueEntry *qe;
696   size_t msize;
697   struct PendingMessage *pending;
698
699   if (NULL == name)
700   {
701     return NULL;
702   }
703
704   msize = sizeof (struct GNUNET_GNS_ClientShortenMessage) + strlen(name) + 1;
705   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Trying to shorten %s in GNS\n", name);
706
707   qe = GNUNET_malloc(sizeof (struct GNUNET_GNS_QueueEntry));
708   qe->gns_handle = handle;
709   qe->shorten_proc = proc;
710   qe->proc_cls = proc_cls;
711   qe->r_id = get_request_id(handle);
712   GNUNET_CONTAINER_DLL_insert_tail(handle->shorten_head,
713                                    handle->shorten_tail, qe);
714
715   pending = GNUNET_malloc (sizeof (struct PendingMessage) + msize);
716   memset(pending, 0, (sizeof (struct PendingMessage) + msize));
717   
718   pending->size = msize;
719
720   shorten_msg = (struct GNUNET_GNS_ClientShortenMessage *) &pending[1];
721   shorten_msg->header.type = htons (GNUNET_MESSAGE_TYPE_GNS_SHORTEN);
722   shorten_msg->header.size = htons (msize);
723   shorten_msg->id = htonl(qe->r_id);
724
725   memcpy(&shorten_msg[1], name, strlen(name));
726
727   GNUNET_CONTAINER_DLL_insert (handle->pending_head, handle->pending_tail,
728                                pending);
729   
730   process_pending_messages (handle);
731   return qe;
732 }
733
734
735 /**
736  * Perform an authority lookup for a given name.
737  *
738  * @param handle handle to the GNS service
739  * @param name the name to look up authority for
740  * @param proc function to call on result
741  * @param proc_cls closure for processor
742  * @return handle to the operation
743  */
744 struct GNUNET_GNS_QueueEntry *
745 GNUNET_GNS_get_authority (struct GNUNET_GNS_Handle *handle,
746                     const char * name,
747                     GNUNET_GNS_GetAuthResultProcessor proc,
748                     void *proc_cls)
749 {
750   struct GNUNET_GNS_ClientGetAuthMessage *get_auth_msg;
751   struct GNUNET_GNS_QueueEntry *qe;
752   size_t msize;
753   struct PendingMessage *pending;
754
755   if (NULL == name)
756   {
757     return NULL;
758   }
759
760   msize = sizeof (struct GNUNET_GNS_ClientGetAuthMessage) + strlen(name) + 1;
761   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
762               "Trying to look up authority for %s in GNS\n", name);
763
764   qe = GNUNET_malloc(sizeof (struct GNUNET_GNS_QueueEntry));
765   qe->gns_handle = handle;
766   qe->auth_proc = proc;
767   qe->proc_cls = proc_cls;
768   qe->r_id = get_request_id(handle);
769   GNUNET_CONTAINER_DLL_insert_tail(handle->get_auth_head,
770                                    handle->get_auth_tail, qe);
771
772   pending = GNUNET_malloc (sizeof (struct PendingMessage) + msize);
773   memset(pending, 0, (sizeof (struct PendingMessage) + msize));
774   
775   pending->size = msize;
776
777   get_auth_msg = (struct GNUNET_GNS_ClientGetAuthMessage *) &pending[1];
778   get_auth_msg->header.type = htons (GNUNET_MESSAGE_TYPE_GNS_GET_AUTH);
779   get_auth_msg->header.size = htons (msize);
780   get_auth_msg->id = htonl(qe->r_id);
781
782   memcpy(&get_auth_msg[1], name, strlen(name));
783
784   GNUNET_CONTAINER_DLL_insert (handle->pending_head, handle->pending_tail,
785                                pending);
786   
787   process_pending_messages (handle);
788   return qe;
789 }
790
791
792 /* end of gns_api.c */