Remove work-around for bad NULL definition
[oweals/gnunet.git] / src / gns / gnunet-service-gns.c
1 /*
2      This file is part of GNUnet.
3      (C) 2011-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  * @file gns/gnunet-service-gns.c
22  * @brief GNU Name System (main service)
23  * @author Martin Schanzenbach
24  * @author Christian Grothoff
25  */
26 #include "platform.h"
27 #include "gnunet_util_lib.h"
28 #include "gnunet_dns_service.h"
29 #include "gnunet_dnsparser_lib.h"
30 #include "gnunet_dht_service.h"
31 #include "gnunet_namecache_service.h"
32 #include "gnunet_namestore_service.h"
33 #include "gnunet_gns_service.h"
34 #include "gnunet_statistics_service.h"
35 #include "gns.h"
36 #include "gnunet-service-gns_resolver.h"
37 #include "gnunet-service-gns_shorten.h"
38 #include "gnunet-service-gns_interceptor.h"
39 #include "gnunet_protocols.h"
40
41 /**
42  * The initial interval in milliseconds btween puts in
43  * a zone iteration
44  */
45 #define INITIAL_PUT_INTERVAL GNUNET_TIME_UNIT_MILLISECONDS
46
47 /**
48  * The upper bound for the zone iteration interval in milliseconds
49  */
50 #define MINIMUM_ZONE_ITERATION_INTERVAL GNUNET_TIME_UNIT_SECONDS
51
52 /**
53  * The default put interval for the zone iteration. In case
54  * no option is found
55  */
56 #define DEFAULT_ZONE_PUBLISH_TIME_WINDOW GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_HOURS, 4)
57
58 /**
59  * The factor the current zone iteration interval is divided by for each
60  * additional new record
61  */
62 #define LATE_ITERATION_SPEEDUP_FACTOR 2
63
64 /**
65  * How long until a DHT PUT attempt should time out?
66  */
67 #define DHT_OPERATION_TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 60)
68
69 /**
70  * What replication level do we use for DHT PUT operations?
71  */
72 #define DHT_GNS_REPLICATION_LEVEL 5
73
74
75 /**
76  * Handle to a lookup operation from api
77  */
78 struct ClientLookupHandle
79 {
80
81   /**
82    * We keep these in a DLL.
83    */
84   struct ClientLookupHandle *next;
85
86   /**
87    * We keep these in a DLL.
88    */
89   struct ClientLookupHandle *prev;
90
91   /**
92    * Handle to the requesting client
93    */
94   struct GNUNET_SERVER_Client *client;
95
96   /**
97    * Active handle for the lookup.
98    */
99   struct GNS_ResolverHandle *lookup;
100
101   /**
102    * request id
103    */
104   uint32_t request_id;
105
106 };
107
108
109 /**
110  * Handle for DHT PUT activity triggered from the namestore monitor.
111  */
112 struct MonitorActivity
113 {
114   /**
115    * Kept in a DLL.
116    */
117   struct MonitorActivity *next;
118
119   /**
120    * Kept in a DLL.
121    */
122   struct MonitorActivity *prev;
123
124   /**
125    * Handle for the DHT PUT operation.
126    */
127   struct GNUNET_DHT_PutHandle *ph;
128 };
129
130
131 /**
132  * Our handle to the DHT
133  */
134 static struct GNUNET_DHT_Handle *dht_handle;
135
136 /**
137  * Active DHT put operation (or NULL)
138  */
139 static struct GNUNET_DHT_PutHandle *active_put;
140
141 /**
142  * Our handle to the namestore service
143  */
144 static struct GNUNET_NAMESTORE_Handle *namestore_handle;
145
146 /**
147  * Our handle to the namecache service
148  */
149 static struct GNUNET_NAMECACHE_Handle *namecache_handle;
150
151 /**
152  * Handle to iterate over our authoritative zone in namestore
153  */
154 static struct GNUNET_NAMESTORE_ZoneIterator *namestore_iter;
155
156 /**
157  * Handle to monitor namestore changes to instant propagation.
158  */
159 static struct GNUNET_NAMESTORE_ZoneMonitor *zmon;
160
161 /**
162  * Our notification context.
163  */
164 static struct GNUNET_SERVER_NotificationContext *nc;
165
166 /**
167  * Head of the DLL.
168  */
169 static struct ClientLookupHandle *clh_head;
170
171 /**
172  * Tail of the DLL.
173  */
174 static struct ClientLookupHandle *clh_tail;
175
176 /**
177  * Head of monitor activities; kept in a DLL.
178  */
179 static struct MonitorActivity *ma_head;
180
181 /**
182  * Tail of monitor activities; kept in a DLL.
183  */
184 static struct MonitorActivity *ma_tail;
185
186 /**
187  * Useful for zone update for DHT put
188  */
189 static unsigned long long num_public_records;
190
191 /**
192  * Last seen record count
193  */
194 static unsigned long long last_num_public_records;
195
196 /**
197  * Minimum relative expiration time of records seem during the current
198  * zone iteration.
199  */
200 static struct GNUNET_TIME_Relative min_relative_record_time;
201
202 /**
203  * Zone iteration PUT interval.
204  */
205 static struct GNUNET_TIME_Relative put_interval;
206
207 /**
208  * Default time window for zone iteration
209  */
210 static struct GNUNET_TIME_Relative zone_publish_time_window_default;
211
212 /**
213  * Time window for zone iteration, adjusted based on relative record
214  * expiration times in our zone.
215  */
216 static struct GNUNET_TIME_Relative zone_publish_time_window;
217
218 /**
219  * zone publish task
220  */
221 static GNUNET_SCHEDULER_TaskIdentifier zone_publish_task;
222
223 /**
224  * #GNUNET_YES if zone has never been published before
225  */
226 static int first_zone_iteration;
227
228 /**
229  * #GNUNET_YES if ipv6 is supported
230  */
231 static int v6_enabled;
232
233 /**
234  * #GNUNET_YES if ipv4 is supported
235  */
236 static int v4_enabled;
237
238 /**
239  * Handle to the statistics service
240  */
241 static struct GNUNET_STATISTICS_Handle *statistics;
242
243
244 /**
245  * Task run during shutdown.
246  *
247  * @param cls unused
248  * @param tc unused
249  */
250 static void
251 shutdown_task (void *cls,
252                const struct GNUNET_SCHEDULER_TaskContext *tc)
253 {
254   struct ClientLookupHandle *clh;
255   struct MonitorActivity *ma;
256
257   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
258               "Shutting down!\n");
259   GNUNET_SERVER_notification_context_destroy (nc);
260   while (NULL != (clh = clh_head))
261   {
262     GNUNET_SERVER_client_set_user_context (clh->client, NULL);
263     GNS_resolver_lookup_cancel (clh->lookup);
264     GNUNET_CONTAINER_DLL_remove (clh_head, clh_tail, clh);
265     GNUNET_free (clh);
266   }
267
268   GNS_interceptor_done ();
269   GNS_resolver_done ();
270   GNS_shorten_done ();
271   while (NULL != (ma = ma_head))
272   {
273     GNUNET_DHT_put_cancel (ma->ph);
274     GNUNET_CONTAINER_DLL_remove (ma_head,
275                                  ma_tail,
276                                  ma);
277     GNUNET_free (ma);
278   }
279   if (NULL != statistics)
280   {
281     GNUNET_STATISTICS_destroy (statistics, GNUNET_NO);
282     statistics = NULL;
283   }
284   if (GNUNET_SCHEDULER_NO_TASK != zone_publish_task)
285   {
286     GNUNET_SCHEDULER_cancel (zone_publish_task);
287     zone_publish_task = GNUNET_SCHEDULER_NO_TASK;
288   }
289   if (NULL != namestore_iter)
290   {
291     GNUNET_NAMESTORE_zone_iteration_stop (namestore_iter);
292     namestore_iter = NULL;
293   }
294   if (NULL != zmon)
295   {
296     GNUNET_NAMESTORE_zone_monitor_stop (zmon);
297     zmon = NULL;
298   }
299   if (NULL != namestore_handle)
300   {
301     GNUNET_NAMESTORE_disconnect (namestore_handle);
302     namestore_handle = NULL;
303   }
304   if (NULL != namecache_handle)
305   {
306     GNUNET_NAMECACHE_disconnect (namecache_handle);
307     namecache_handle = NULL;
308   }
309   if (NULL != active_put)
310   {
311     GNUNET_DHT_put_cancel (active_put);
312     active_put = NULL;
313   }
314   if (NULL != dht_handle)
315   {
316     GNUNET_DHT_disconnect (dht_handle);
317     dht_handle = NULL;
318   }
319 }
320
321
322 /**
323  * Method called periodically that triggers iteration over authoritative records
324  *
325  * @param cls closure
326  * @param tc task context
327  */
328 static void
329 publish_zone_dht_next (void *cls,
330                        const struct GNUNET_SCHEDULER_TaskContext *tc)
331 {
332   zone_publish_task = GNUNET_SCHEDULER_NO_TASK;
333   GNUNET_NAMESTORE_zone_iterator_next (namestore_iter);
334 }
335
336
337 /**
338  * Periodically iterate over our zone and store everything in dht
339  *
340  * @param cls NULL
341  * @param tc task context
342  */
343 static void
344 publish_zone_dht_start (void *cls,
345                         const struct GNUNET_SCHEDULER_TaskContext *tc);
346
347
348 /**
349  * Continuation called from DHT once the PUT operation is done.
350  *
351  * @param cls closure, NULL if called from regular iteration,
352  *        `struct MonitorActivity` if called from #handle_monitor_event.
353  * @param success #GNUNET_OK on success
354  */
355 static void
356 dht_put_continuation (void *cls,
357                       int success)
358 {
359   struct MonitorActivity *ma = cls;
360   struct GNUNET_TIME_Relative next_put_interval;
361
362   num_public_records++;
363   if (NULL == ma)
364   {
365     active_put = NULL;
366     if ( (num_public_records > last_num_public_records) &&
367          (GNUNET_NO == first_zone_iteration) )
368     {
369       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
370                   "Last record count was lower than current record count.  Reducing interval.\n");
371       put_interval = GNUNET_TIME_relative_divide (zone_publish_time_window,
372                                                   num_public_records);
373       next_put_interval = GNUNET_TIME_relative_divide (put_interval,
374                                                        LATE_ITERATION_SPEEDUP_FACTOR);
375     }
376     else
377       next_put_interval = put_interval;
378
379     GNUNET_STATISTICS_set (statistics,
380                            "Current zone iteration interval (ms)",
381                            next_put_interval.rel_value_us / 1000LL,
382                            GNUNET_NO);
383     zone_publish_task = GNUNET_SCHEDULER_add_delayed (next_put_interval,
384                                                       &publish_zone_dht_next,
385                                                       NULL);
386   }
387   else
388   {
389     GNUNET_CONTAINER_DLL_remove (ma_head,
390                                  ma_tail,
391                                  ma);
392     GNUNET_free (ma);
393   }
394 }
395
396
397 /**
398  * Convert namestore records from the internal format to that
399  * suitable for publication (removes private records, converts
400  * to absolute expiration time).
401  *
402  * @param rd input records
403  * @param rd_count size of the @a rd and @a rd_public arrays
404  * @param rd_public where to write the converted records
405  * @return number of records written to @a rd_public
406  */
407 static unsigned int
408 convert_records_for_export (const struct GNUNET_GNSRECORD_Data *rd,
409                             unsigned int rd_count,
410                             struct GNUNET_GNSRECORD_Data *rd_public)
411 {
412   struct GNUNET_TIME_Absolute now;
413   unsigned int rd_public_count;
414   unsigned int i;
415
416   rd_public_count = 0;
417   now = GNUNET_TIME_absolute_get ();
418   for (i=0;i<rd_count;i++)
419     if (0 == (rd[i].flags & GNUNET_GNSRECORD_RF_PRIVATE))
420     {
421       rd_public[rd_public_count] = rd[i];
422       if (0 != (rd[i].flags & GNUNET_GNSRECORD_RF_RELATIVE_EXPIRATION))
423       {
424         /* GNUNET_GNSRECORD_block_create will convert to absolute time;
425            we just need to adjust our iteration frequency */
426         min_relative_record_time.rel_value_us =
427           GNUNET_MIN (rd_public[rd_public_count].expiration_time,
428                       min_relative_record_time.rel_value_us);
429       }
430       else if (rd_public[rd_public_count].expiration_time < now.abs_value_us)
431       {
432         /* record already expired, skip it */
433         continue;
434       }
435       rd_public_count++;
436     }
437   return rd_public_count;
438 }
439
440
441 /**
442  * Store GNS records in the DHT.
443  *
444  * @param key key of the zone
445  * @param label label to store under
446  * @param rd_public public record data
447  * @param rd_public_count number of records in @a rd_public
448  * @param pc_arg closure argument to pass to the #dht_put_continuation
449  * @return DHT PUT handle, NULL on error
450  */
451 static struct GNUNET_DHT_PutHandle *
452 perform_dht_put (const struct GNUNET_CRYPTO_EcdsaPrivateKey *key,
453                  const char *label,
454                  const struct GNUNET_GNSRECORD_Data *rd_public,
455                  unsigned int rd_public_count,
456                  void *pc_arg)
457 {
458   struct GNUNET_GNSRECORD_Block *block;
459   struct GNUNET_HashCode query;
460   struct GNUNET_TIME_Absolute expire;
461   size_t block_size;
462   struct GNUNET_DHT_PutHandle *ret;
463
464   expire = GNUNET_GNSRECORD_record_get_expiration_time (rd_public_count,
465                                                         rd_public);
466   block = GNUNET_GNSRECORD_block_create (key,
467                                          expire,
468                                          label,
469                                          rd_public,
470                                          rd_public_count);
471   if (NULL == block)
472     return NULL; /* whoops */
473   block_size = ntohl (block->purpose.size)
474     + sizeof (struct GNUNET_CRYPTO_EcdsaSignature)
475     + sizeof (struct GNUNET_CRYPTO_EcdsaPublicKey);
476   GNUNET_GNSRECORD_query_from_private_key (key,
477                                            label,
478                                            &query);
479   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
480               "Storing %u record(s) for label `%s' in DHT with expiration `%s' under key %s\n",
481               rd_public_count,
482               label,
483               GNUNET_STRINGS_absolute_time_to_string (expire),
484               GNUNET_h2s (&query));
485   ret = GNUNET_DHT_put (dht_handle, &query,
486                         DHT_GNS_REPLICATION_LEVEL,
487                         GNUNET_DHT_RO_DEMULTIPLEX_EVERYWHERE,
488                         GNUNET_BLOCK_TYPE_GNS_NAMERECORD,
489                         block_size,
490                         block,
491                         expire,
492                         DHT_OPERATION_TIMEOUT,
493                         &dht_put_continuation,
494                         pc_arg);
495   GNUNET_free (block);
496   return ret;
497 }
498
499
500 /**
501  * Function used to put all records successively into the DHT.
502  *
503  * @param cls the closure (NULL)
504  * @param key the private key of the authority (ours)
505  * @param label the name of the records, NULL once the iteration is done
506  * @param rd_count the number of records in @a rd
507  * @param rd the record data
508  */
509 static void
510 put_gns_record (void *cls,
511                 const struct GNUNET_CRYPTO_EcdsaPrivateKey *key,
512                 const char *label,
513                 unsigned int rd_count,
514                 const struct GNUNET_GNSRECORD_Data *rd)
515 {
516   struct GNUNET_GNSRECORD_Data rd_public[rd_count];
517   unsigned int rd_public_count;
518
519   if (NULL == label)
520   {
521     /* we're done with one iteration, calculate when to do the next one */
522     namestore_iter = NULL;
523     last_num_public_records = num_public_records;
524     first_zone_iteration = GNUNET_NO;
525     if (0 == num_public_records)
526     {
527       /**
528        * If no records are known (startup) or none present
529        * we can safely set the interval to the value for a single
530        * record
531        */
532       put_interval = zone_publish_time_window;
533       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
534                   "No records in namestore database.\n");
535     }
536     else
537     {
538       /* If records are present, next publication is based on the minimum
539        * relative expiration time of the records published divided by 4
540        */
541       zone_publish_time_window = GNUNET_TIME_relative_min (
542           GNUNET_TIME_relative_divide (min_relative_record_time, 4),
543           zone_publish_time_window_default);
544       put_interval = GNUNET_TIME_relative_divide (zone_publish_time_window,
545           num_public_records);
546     }
547     /* reset for next iteration */
548     min_relative_record_time = GNUNET_TIME_UNIT_FOREVER_REL;
549     put_interval = GNUNET_TIME_relative_max (MINIMUM_ZONE_ITERATION_INTERVAL,
550                                              put_interval);
551
552     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
553                 "Zone iteration finished. Adjusted zone iteration interval to %s\n",
554                 GNUNET_STRINGS_relative_time_to_string (put_interval, GNUNET_YES));
555     GNUNET_STATISTICS_set (statistics,
556                            "Current zone iteration interval (in ms)",
557                            put_interval.rel_value_us / 1000LL,
558                            GNUNET_NO);
559     GNUNET_STATISTICS_update (statistics,
560                               "Number of zone iterations",
561                               1,
562                               GNUNET_NO);
563     GNUNET_STATISTICS_set (statistics,
564                            "Number of public records in DHT",
565                            last_num_public_records,
566                            GNUNET_NO);
567     if (0 == num_public_records)
568       zone_publish_task = GNUNET_SCHEDULER_add_delayed (put_interval,
569                                                         &publish_zone_dht_start,
570                                                         NULL);
571     else
572       zone_publish_task = GNUNET_SCHEDULER_add_now (&publish_zone_dht_start,
573                                                     NULL);
574     return;
575   }
576
577   rd_public_count = convert_records_for_export (rd,
578                                                 rd_count,
579                                                 rd_public);
580
581   /* We got a set of records to publish */
582   if (0 == rd_public_count)
583   {
584     zone_publish_task = GNUNET_SCHEDULER_add_now (&publish_zone_dht_next,
585                                                    NULL);
586     return;
587   }
588
589   active_put = perform_dht_put (key,
590                                 label,
591                                 rd_public,
592                                 rd_public_count,
593                                 NULL);
594   if (NULL == active_put)
595   {
596     GNUNET_break (0);
597     dht_put_continuation (NULL, GNUNET_NO);
598   }
599 }
600
601
602 /**
603  * Periodically iterate over all zones and store everything in DHT
604  *
605  * @param cls NULL
606  * @param tc task context
607  */
608 static void
609 publish_zone_dht_start (void *cls,
610                         const struct GNUNET_SCHEDULER_TaskContext *tc)
611 {
612   zone_publish_task = GNUNET_SCHEDULER_NO_TASK;
613
614   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
615               "Starting DHT zone update!\n");
616   /* start counting again */
617   num_public_records = 0;
618   namestore_iter = GNUNET_NAMESTORE_zone_iteration_start (namestore_handle,
619       NULL, /* All zones */
620       &put_gns_record, NULL );
621 }
622
623
624 /**
625  * Process a record that was stored in the namestore
626  * (invoked by the monitor).
627  *
628  * @param cls closure, NULL
629  * @param zone private key of the zone; NULL on disconnect
630  * @param label label of the records; NULL on disconnect
631  * @param rd_count number of entries in @a rd array, 0 if label was deleted
632  * @param rd array of records with data to store
633  */
634 static void
635 handle_monitor_event (void *cls,
636                       const struct GNUNET_CRYPTO_EcdsaPrivateKey *zone,
637                       const char *label,
638                       unsigned int rd_count,
639                       const struct GNUNET_GNSRECORD_Data *rd)
640 {
641   struct GNUNET_GNSRECORD_Data rd_public[rd_count];
642   unsigned int rd_public_count;
643   struct MonitorActivity *ma;
644
645   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
646               "Received %u records for label `%s' via namestore monitor\n",
647               rd_count,
648               label);
649   /* filter out records that are not public, and convert to
650      absolute expiration time. */
651   rd_public_count = convert_records_for_export (rd, rd_count,
652                                                 rd_public);
653   if (0 == rd_public_count)
654     return; /* nothing to do */
655   ma = GNUNET_new (struct MonitorActivity);
656   ma->ph = perform_dht_put (zone, label,
657                             rd, rd_count,
658                             ma);
659   if (NULL == ma->ph)
660   {
661     /* PUT failed, do not remember operation */
662     GNUNET_free (ma);
663     return;
664   }
665   GNUNET_CONTAINER_DLL_insert (ma_head,
666                                ma_tail,
667                                ma);
668 }
669
670
671 /* END DHT ZONE PROPAGATION */
672
673
674 /**
675  * Reply to client with the result from our lookup.
676  *
677  * @param cls the closure (our client lookup handle)
678  * @param rd_count the number of records in @a rd
679  * @param rd the record data
680  */
681 static void
682 send_lookup_response (void* cls,
683                       uint32_t rd_count,
684                       const struct GNUNET_GNSRECORD_Data *rd)
685 {
686   struct ClientLookupHandle *clh = cls;
687   struct GNUNET_GNS_ClientLookupResultMessage *rmsg;
688   size_t len;
689
690   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
691               "Sending `%s' message with %d results\n",
692               "LOOKUP_RESULT",
693               rd_count);
694
695   len = GNUNET_GNSRECORD_records_get_size (rd_count, rd);
696   rmsg = GNUNET_malloc (len + sizeof (struct GNUNET_GNS_ClientLookupResultMessage));
697   rmsg->header.type = htons (GNUNET_MESSAGE_TYPE_GNS_LOOKUP_RESULT);
698   rmsg->header.size = htons (len + sizeof(struct GNUNET_GNS_ClientLookupResultMessage));
699   rmsg->id = clh->request_id;
700   rmsg->rd_count = htonl (rd_count);
701   GNUNET_GNSRECORD_records_serialize (rd_count, rd, len,
702                                       (char*) &rmsg[1]);
703   GNUNET_SERVER_notification_context_unicast (nc,
704                                               clh->client,
705                                               &rmsg->header,
706                                               GNUNET_NO);
707   GNUNET_free (rmsg);
708   GNUNET_CONTAINER_DLL_remove (clh_head, clh_tail, clh);
709   GNUNET_SERVER_client_set_user_context (clh->client, NULL);
710   GNUNET_free (clh);
711   GNUNET_STATISTICS_update (statistics,
712                             "Completed lookups", 1,
713                             GNUNET_NO);
714   GNUNET_STATISTICS_update (statistics,
715                             "Records resolved",
716                             rd_count,
717                             GNUNET_NO);
718 }
719
720
721 /**
722  * Handle lookup requests from client
723  *
724  * @param cls the closure
725  * @param client the client
726  * @param message the message
727  */
728 static void
729 handle_lookup (void *cls,
730                struct GNUNET_SERVER_Client *client,
731                const struct GNUNET_MessageHeader *message)
732 {
733   char name[GNUNET_DNSPARSER_MAX_NAME_LENGTH + 1];
734   struct ClientLookupHandle *clh;
735   char *nameptr = name;
736   const char *utf_in;
737   const struct GNUNET_CRYPTO_EcdsaPrivateKey *key;
738   uint16_t msg_size;
739   const struct GNUNET_GNS_ClientLookupMessage *sh_msg;
740
741   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
742               "Received `%s' message\n",
743               "LOOKUP");
744   msg_size = ntohs (message->size);
745   if (msg_size < sizeof (struct GNUNET_GNS_ClientLookupMessage))
746   {
747     GNUNET_break (0);
748     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
749     return;
750   }
751   sh_msg = (const struct GNUNET_GNS_ClientLookupMessage *) message;
752   GNUNET_SERVER_notification_context_add (nc, client);
753   if (GNUNET_YES == ntohs (sh_msg->have_key))
754     key = &sh_msg->shorten_key;
755   else
756     key = NULL;
757   utf_in = (const char *) &sh_msg[1];
758   if ( ('\0' != utf_in[msg_size - sizeof (struct GNUNET_GNS_ClientLookupMessage) - 1]) ||
759        (strlen (utf_in) > GNUNET_DNSPARSER_MAX_NAME_LENGTH) )
760   {
761     GNUNET_break (0);
762     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
763     return;
764   }
765   GNUNET_STRINGS_utf8_tolower (utf_in, nameptr);
766   GNUNET_SERVER_receive_done (client, GNUNET_OK);
767
768   clh = GNUNET_new (struct ClientLookupHandle);
769   GNUNET_SERVER_client_set_user_context (client, clh);
770   GNUNET_CONTAINER_DLL_insert (clh_head, clh_tail, clh);
771   clh->client = client;
772   clh->request_id = sh_msg->id;
773   if ( (GNUNET_DNSPARSER_TYPE_A == ntohl (sh_msg->type)) &&
774        (GNUNET_OK != v4_enabled) )
775   {
776     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
777                 "LOOKUP: Query for A record but AF_INET not supported!");
778     send_lookup_response (clh, 0, NULL);
779     return;
780   }
781   if ( (GNUNET_DNSPARSER_TYPE_AAAA == ntohl (sh_msg->type)) &&
782        (GNUNET_OK != v6_enabled) )
783   {
784     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
785                 "LOOKUP: Query for AAAA record but AF_INET6 not supported!");
786     send_lookup_response (clh, 0, NULL);
787     return;
788   }
789   clh->lookup = GNS_resolver_lookup (&sh_msg->zone,
790                                      ntohl (sh_msg->type),
791                                      name,
792                                      key,
793                                      (enum GNUNET_GNS_LocalOptions) ntohs (sh_msg->options),
794                                      &send_lookup_response, clh);
795   GNUNET_STATISTICS_update (statistics,
796                             "Lookup attempts",
797                             1, GNUNET_NO);
798 }
799
800
801 /**
802  * One of our clients disconnected, clean up after it.
803  *
804  * @param cls NULL
805  * @param client the client that disconnected
806  */
807 static void
808 notify_client_disconnect (void *cls,
809                           struct GNUNET_SERVER_Client *client)
810 {
811   struct ClientLookupHandle *clh;
812
813   if (NULL == client)
814     return;
815   clh = GNUNET_SERVER_client_get_user_context (client, struct ClientLookupHandle);
816   if (NULL == clh)
817     return;
818   GNS_resolver_lookup_cancel (clh->lookup);
819   GNUNET_CONTAINER_DLL_remove (clh_head, clh_tail, clh);
820   GNUNET_free (clh);
821 }
822
823
824 /**
825  * The zone monitor is now in SYNC with the current state of the
826  * name store.  Start to perform periodic iterations.
827  *
828  * @param cls NULL
829  */
830 static void
831 monitor_sync_event (void *cls)
832 {
833   zone_publish_task = GNUNET_SCHEDULER_add_now (&publish_zone_dht_start,
834                                                 NULL);
835 }
836
837
838 /**
839  * Process GNS requests.
840  *
841  * @param cls closure
842  * @param server the initialized server
843  * @param c configuration to use
844  */
845 static void
846 run (void *cls, struct GNUNET_SERVER_Handle *server,
847      const struct GNUNET_CONFIGURATION_Handle *c)
848 {
849   static const struct GNUNET_SERVER_MessageHandler handlers[] = {
850     { &handle_lookup, NULL, GNUNET_MESSAGE_TYPE_GNS_LOOKUP, 0},
851     {NULL, NULL, 0, 0}
852   };
853   struct GNUNET_CRYPTO_EcdsaPublicKey dns_root;
854   unsigned long long max_parallel_bg_queries = 0;
855   char *dns_root_name;
856
857   v6_enabled = GNUNET_NETWORK_test_pf (PF_INET6);
858   v4_enabled = GNUNET_NETWORK_test_pf (PF_INET);
859   min_relative_record_time = GNUNET_TIME_UNIT_FOREVER_REL;
860   namestore_handle = GNUNET_NAMESTORE_connect (c);
861   if (NULL == namestore_handle)
862   {
863     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
864                 _("Failed to connect to the namestore!\n"));
865     GNUNET_SCHEDULER_shutdown ();
866     return;
867   }
868   namecache_handle = GNUNET_NAMECACHE_connect (c);
869   if (NULL == namecache_handle)
870   {
871     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
872                 _("Failed to connect to the namecache!\n"));
873     GNUNET_SCHEDULER_shutdown ();
874     return;
875   }
876
877   put_interval = INITIAL_PUT_INTERVAL;
878   zone_publish_time_window_default = DEFAULT_ZONE_PUBLISH_TIME_WINDOW;
879   if (GNUNET_OK ==
880       GNUNET_CONFIGURATION_get_value_time (c, "gns",
881                                            "ZONE_PUBLISH_TIME_WINDOW",
882                                            &zone_publish_time_window_default))
883   {
884     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
885                 "Time window for zone iteration: %s\n",
886                 GNUNET_STRINGS_relative_time_to_string (zone_publish_time_window,
887                                                         GNUNET_YES));
888   }
889   zone_publish_time_window = zone_publish_time_window_default;
890   if (GNUNET_OK ==
891       GNUNET_CONFIGURATION_get_value_number (c, "gns",
892                                             "MAX_PARALLEL_BACKGROUND_QUERIES",
893                                             &max_parallel_bg_queries))
894   {
895     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
896                 "Number of allowed parallel background queries: %llu\n",
897                 max_parallel_bg_queries);
898   }
899
900   dht_handle = GNUNET_DHT_connect (c,
901                                    (unsigned int) max_parallel_bg_queries);
902   if (NULL == dht_handle)
903   {
904     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
905                 _("Could not connect to DHT!\n"));
906     GNUNET_SCHEDULER_add_now (&shutdown_task, NULL);
907     return;
908   }
909
910   if (GNUNET_OK ==
911       GNUNET_CONFIGURATION_get_value_string (c, "gns", "DNS_ROOT",
912                                              &dns_root_name))
913   {
914     if (GNUNET_OK !=
915         GNUNET_CRYPTO_ecdsa_public_key_from_string (dns_root_name,
916                                                     strlen (dns_root_name),
917                                                     &dns_root))
918     {
919       GNUNET_log_config_invalid (GNUNET_ERROR_TYPE_ERROR,
920                                  "gns", "DNS_ROOT",
921                                  _("valid public key required"));
922       GNUNET_SCHEDULER_add_now (&shutdown_task, NULL);
923       GNUNET_free (dns_root_name);
924       return;
925     }
926     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
927                 "DNS hijacking with root `%s' enabled. Connecting to DNS service.\n",
928                 dns_root_name);
929     GNUNET_free (dns_root_name);
930     if (GNUNET_SYSERR ==
931         GNS_interceptor_init (&dns_root, c))
932     {
933       GNUNET_SCHEDULER_add_now (&shutdown_task, NULL);
934       return;
935     }
936   }
937   GNS_resolver_init (namecache_handle,
938                      dht_handle,
939                      c,
940                      max_parallel_bg_queries);
941   GNS_shorten_init (namestore_handle,
942                     namecache_handle,
943                     dht_handle);
944   GNUNET_SERVER_disconnect_notify (server,
945                                    &notify_client_disconnect,
946                                    NULL);
947   /* Schedule periodic put for our records. */
948   first_zone_iteration = GNUNET_YES;
949   GNUNET_SERVER_add_handlers (server, handlers);
950   statistics = GNUNET_STATISTICS_create ("gns", c);
951   nc = GNUNET_SERVER_notification_context_create (server, 1);
952   zmon = GNUNET_NAMESTORE_zone_monitor_start (c,
953                                               NULL,
954                                               GNUNET_NO,
955                                               &handle_monitor_event,
956                                               &monitor_sync_event,
957                                               NULL);
958   GNUNET_break (NULL != zmon);
959   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL,
960                                 &shutdown_task, NULL);
961 }
962
963
964 /**
965  * The main function for the GNS service.
966  *
967  * @param argc number of arguments from the command line
968  * @param argv command line arguments
969  * @return 0 ok, 1 on error
970  */
971 int
972 main (int argc, char *const *argv)
973 {
974   int ret;
975
976   ret =
977       (GNUNET_OK ==
978        GNUNET_SERVICE_run (argc, argv, "gns", GNUNET_SERVICE_OPTION_NONE, &run,
979                            NULL)) ? 0 : 1;
980   return ret;
981 }
982
983 /* end of gnunet-service-gns.c */