- add flat plugin config filename path
[oweals/gnunet.git] / src / namestore / gnunet-namestore.c
1 /*
2      This file is part of GNUnet.
3      Copyright (C) 2012, 2013, 2014 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., 51 Franklin Street, Fifth Floor,
18      Boston, MA 02110-1301, USA.
19 */
20 /**
21  * @file gnunet-namestore.c
22  * @brief command line tool to manipulate the local zone
23  * @author Christian Grothoff
24  *
25  * TODO:
26  * - test
27  */
28 #include "platform.h"
29 #include <gnunet_util_lib.h>
30 #include <gnunet_dnsparser_lib.h>
31 #include <gnunet_identity_service.h>
32 #include <gnunet_gnsrecord_lib.h>
33 #include <gnunet_gns_service.h>
34 #include <gnunet_namestore_service.h>
35
36
37 /**
38  * Handle to the namestore.
39  */
40 static struct GNUNET_NAMESTORE_Handle *ns;
41
42 /**
43  * Private key for the our zone.
44  */
45 static struct GNUNET_CRYPTO_EcdsaPrivateKey zone_pkey;
46
47 /**
48  * Handle to identity lookup.
49  */
50 static struct GNUNET_IDENTITY_EgoLookup *el;
51
52 /**
53  * Identity service handle
54  */
55 static struct GNUNET_IDENTITY_Handle *idh;
56
57 /**
58  * Obtain default ego
59  */
60 struct GNUNET_IDENTITY_Operation *get_default;
61
62 /**
63  * Name of the ego controlling the zone.
64  */
65 static char *ego_name;
66
67 /**
68  * Desired action is to add a record.
69  */
70 static int add;
71
72 /**
73  * Queue entry for the 'add-uri' operation.
74  */
75 static struct GNUNET_NAMESTORE_QueueEntry *add_qe_uri;
76
77 /**
78  * Queue entry for the 'add' operation.
79  */
80 static struct GNUNET_NAMESTORE_QueueEntry *add_qe;
81
82 /**
83  * Queue entry for the 'reverse lookup' operation (in combination with a name).
84  */
85 static struct GNUNET_NAMESTORE_QueueEntry *reverse_qe;
86
87 /**
88  * Desired action is to list records.
89  */
90 static int list;
91
92 /**
93  * List iterator for the 'list' operation.
94  */
95 static struct GNUNET_NAMESTORE_ZoneIterator *list_it;
96
97 /**
98  * Desired action is to remove a record.
99  */
100 static int del;
101
102 /**
103  * Is record public (opposite of #GNUNET_GNSRECORD_RF_PRIVATE)
104  */
105 static int is_public;
106
107 /**
108  * Is record a shadow record (#GNUNET_GNSRECORD_RF_SHADOW_RECORD)
109  */
110 static int is_shadow;
111
112 /**
113  * Queue entry for the 'del' operation.
114  */
115 static struct GNUNET_NAMESTORE_QueueEntry *del_qe;
116
117 /**
118  * Name of the records to add/list/remove.
119  */
120 static char *name;
121
122 /**
123  * Value of the record to add/remove.
124  */
125 static char *value;
126
127 /**
128  * URI to import.
129  */
130 static char *uri;
131
132 /**
133  * Reverse lookup to perform.
134  */
135 static char *reverse_pkey;
136
137 /**
138  * Type of the record to add/remove, NULL to remove all.
139  */
140 static char *typestring;
141
142 /**
143  * Desired expiration time.
144  */
145 static char *expirationstring;
146
147 /**
148  * Desired nick name.
149  */
150 static char *nickstring;
151
152 /**
153  * Global return value
154  */
155 static int ret;
156
157 /**
158  * Type string converted to DNS type value.
159  */
160 static uint32_t type;
161
162 /**
163  * Value in binary format.
164  */
165 static void *data;
166
167 /**
168  * Number of bytes in 'data'.
169  */
170 static size_t data_size;
171
172 /**
173  * Expirationstring converted to relative time.
174  */
175 static struct GNUNET_TIME_Relative etime_rel;
176
177 /**
178  * Expirationstring converted to absolute time.
179  */
180 static struct GNUNET_TIME_Absolute etime_abs;
181
182 /**
183  * Is expiration time relative or absolute time?
184  */
185 static int etime_is_rel = GNUNET_SYSERR;
186
187 /**
188  * Monitor handle.
189  */
190 static struct GNUNET_NAMESTORE_ZoneMonitor *zm;
191
192 /**
193  * Enables monitor mode.
194  */
195 static int monitor;
196
197
198 /**
199  * Task run on shutdown.  Cleans up everything.
200  *
201  * @param cls unused
202  * @param tc scheduler context
203  */
204 static void
205 do_shutdown (void *cls,
206              const struct GNUNET_SCHEDULER_TaskContext *tc)
207 {
208   if (NULL != get_default)
209   {
210     GNUNET_IDENTITY_cancel (get_default);
211     get_default = NULL;
212   }
213   if (NULL != idh)
214   {
215     GNUNET_IDENTITY_disconnect (idh);
216     idh = NULL;
217   }
218   if (NULL != el)
219   {
220     GNUNET_IDENTITY_ego_lookup_cancel (el);
221     el = NULL;
222   }
223   if (NULL != list_it)
224   {
225     GNUNET_NAMESTORE_zone_iteration_stop (list_it);
226     list_it = NULL;
227   }
228   if (NULL != add_qe)
229   {
230     GNUNET_NAMESTORE_cancel (add_qe);
231     add_qe = NULL;
232   }
233   if (NULL != add_qe_uri)
234   {
235     GNUNET_NAMESTORE_cancel (add_qe_uri);
236     add_qe_uri = NULL;
237   }
238   if (NULL != del_qe)
239   {
240     GNUNET_NAMESTORE_cancel (del_qe);
241     del_qe = NULL;
242   }
243   if (NULL != ns)
244   {
245     GNUNET_NAMESTORE_disconnect (ns);
246     ns = NULL;
247   }
248   memset (&zone_pkey, 0, sizeof (zone_pkey));
249   if (NULL != uri)
250   {
251     GNUNET_free (uri);
252     uri = NULL;
253   }
254   if (NULL != zm)
255   {
256     GNUNET_NAMESTORE_zone_monitor_stop (zm);
257     zm = NULL;
258   }
259   if (NULL != data)
260   {
261     GNUNET_free (data);
262     data = NULL;
263   }
264 }
265
266
267 /**
268  * Check if we are finished, and if so, perform shutdown.
269  */
270 static void
271 test_finished ()
272 {
273   if ( (NULL == add_qe) &&
274        (NULL == add_qe_uri) &&
275        (NULL == del_qe) &&
276        (NULL == reverse_qe) &&
277        (NULL == list_it) )
278     GNUNET_SCHEDULER_shutdown ();
279 }
280
281
282 /**
283  * Continuation called to notify client about result of the
284  * operation.
285  *
286  * @param cls closure, location of the QueueEntry pointer to NULL out
287  * @param success #GNUNET_SYSERR on failure (including timeout/queue drop/failure to validate)
288  *                #GNUNET_NO if content was already there
289  *                #GNUNET_YES (or other positive value) on success
290  * @param emsg NULL on success, otherwise an error message
291  */
292 static void
293 add_continuation (void *cls,
294                   int32_t success,
295                   const char *emsg)
296 {
297   struct GNUNET_NAMESTORE_QueueEntry **qe = cls;
298
299   *qe = NULL;
300   if (GNUNET_YES != success)
301   {
302     fprintf (stderr,
303              _("Adding record failed: %s\n"),
304              (GNUNET_NO == success) ? "record exists" : emsg);
305     if (GNUNET_NO != success)
306       ret = 1;
307   }
308   ret = 0;
309   test_finished ();
310 }
311
312
313 /**
314  * Continuation called to notify client about result of the
315  * operation.
316  *
317  * @param cls closure, unused
318  * @param success #GNUNET_SYSERR on failure (including timeout/queue drop/failure to validate)
319  *                #GNUNET_NO if content was already there
320  *                #GNUNET_YES (or other positive value) on success
321  * @param emsg NULL on success, otherwise an error message
322  */
323 static void
324 del_continuation (void *cls,
325                   int32_t success,
326                   const char *emsg)
327 {
328   del_qe = NULL;
329   if (GNUNET_NO == success)
330   {
331     fprintf (stderr,
332              _("Deleting record failed, record does not exist%s%s\n"),
333              (NULL != emsg) ? ": " : "",
334              (NULL != emsg) ? emsg : "");
335   }
336   if (GNUNET_SYSERR == success)
337   {
338     fprintf (stderr,
339              _("Deleting record failed%s%s\n"),
340              (NULL != emsg) ? ": " : "",
341              (NULL != emsg) ? emsg : "");
342   }
343   test_finished ();
344 }
345
346
347 /**
348  * Process a record that was stored in the namestore.
349  *
350  * @param cls closure
351  * @param zone_key private key of the zone
352  * @param rname name that is being mapped (at most 255 characters long)
353  * @param rd_len number of entries in @a rd array
354  * @param rd array of records with data to store
355  */
356 static void
357 display_record (void *cls,
358                 const struct GNUNET_CRYPTO_EcdsaPrivateKey *zone_key,
359                 const char *rname,
360                 unsigned int rd_len,
361                 const struct GNUNET_GNSRECORD_Data *rd)
362 {
363   const char *typestring;
364   char *s;
365   unsigned int i;
366   const char *ets;
367   struct GNUNET_TIME_Absolute at;
368   struct GNUNET_TIME_Relative rt;
369
370   if (NULL == rname)
371   {
372     list_it = NULL;
373     test_finished ();
374     return;
375   }
376   if ( (NULL != name) &&
377        (0 != strcmp (name, rname)) )
378   {
379     GNUNET_NAMESTORE_zone_iterator_next (list_it);
380     return;
381   }
382   FPRINTF (stdout,
383            "%s:\n",
384            rname);
385   for (i=0;i<rd_len;i++)
386   {
387     if ( (GNUNET_GNSRECORD_TYPE_NICK == rd[i].record_type) &&
388          (0 != strcmp (rname,
389                        "+")) )
390       continue;
391     typestring = GNUNET_GNSRECORD_number_to_typename (rd[i].record_type);
392     s = GNUNET_GNSRECORD_value_to_string (rd[i].record_type,
393                                           rd[i].data,
394                                           rd[i].data_size);
395     if (NULL == s)
396     {
397       FPRINTF (stdout, _("\tCorrupt or unsupported record of type %u\n"),
398                (unsigned int) rd[i].record_type);
399       continue;
400     }
401     if (0 != (rd[i].flags & GNUNET_GNSRECORD_RF_RELATIVE_EXPIRATION))
402     {
403       rt.rel_value_us = rd[i].expiration_time;
404       ets = GNUNET_STRINGS_relative_time_to_string (rt, GNUNET_YES);
405     }
406     else
407     {
408       at.abs_value_us = rd[i].expiration_time;
409       ets = GNUNET_STRINGS_absolute_time_to_string (at);
410     }
411     FPRINTF (stdout,
412              "\t%s: %s (%s)\t%s\t%s\n",
413              typestring,
414              s,
415              ets,
416              (0 != (rd[i].flags & GNUNET_GNSRECORD_RF_PRIVATE)) ? "PRIVATE" : "PUBLIC",
417              (0 != (rd[i].flags & GNUNET_GNSRECORD_RF_SHADOW_RECORD)) ? "SHADOW" : "");
418     GNUNET_free (s);
419   }
420   FPRINTF (stdout, "%s", "\n");
421   GNUNET_NAMESTORE_zone_iterator_next (list_it);
422 }
423
424
425 /**
426  * Function called once we are in sync in monitor mode.
427  *
428  * @param cls NULL
429  */
430 static void
431 sync_cb (void *cls)
432 {
433   FPRINTF (stdout, "%s", "Monitor is now in sync.\n");
434 }
435
436
437 /**
438  * We're storing a record; this function is given the existing record
439  * so that we can merge the information.
440  *
441  * @param cls closure, unused
442  * @param zone_key private key of the zone
443  * @param rec_name name that is being mapped (at most 255 characters long)
444  * @param rd_count number of entries in @a rd array
445  * @param rd array of records with data to store
446  */
447 static void
448 get_existing_record (void *cls,
449                      const struct GNUNET_CRYPTO_EcdsaPrivateKey *zone_key,
450                      const char *rec_name,
451                      unsigned int rd_count,
452                      const struct GNUNET_GNSRECORD_Data *rd)
453 {
454   struct GNUNET_GNSRECORD_Data rdn[rd_count + 1];
455   struct GNUNET_GNSRECORD_Data *rde;
456   unsigned int i;
457
458   add_qe = NULL;
459   if ( (NULL != zone_key) &&
460        (0 != strcmp (rec_name, name)) )
461   {
462     GNUNET_break (0);
463     ret = 1;
464     test_finished ();
465     return;
466   }
467
468   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
469               "Received %u records for name `%s'\n",
470               rd_count, rec_name);
471   for (i=0;i<rd_count;i++)
472   {
473     switch (rd[i].record_type)
474     {
475     case GNUNET_DNSPARSER_TYPE_CNAME:
476       fprintf (stderr,
477                _("A %s record exists already under `%s', no other records can be added.\n"),
478                "CNAME",
479                rec_name);
480       ret = 1;
481       test_finished ();
482       return;
483     case GNUNET_GNSRECORD_TYPE_PKEY:
484       fprintf (stderr,
485                _("A %s record exists already under `%s', no other records can be added.\n"),
486                "PKEY",
487                rec_name);
488       ret = 1;
489       test_finished ();
490       return;
491     case GNUNET_GNSRECORD_TYPE_GNS2DNS:
492       fprintf (stderr,
493                _("A %s record exists already under `%s', no other records can be added.\n"),
494                "GNS2DNS",
495                rec_name);
496       ret = 1;
497       test_finished ();
498       return;
499     }
500   }
501   switch (type)
502   {
503   case GNUNET_DNSPARSER_TYPE_CNAME:
504     if (0 != rd_count)
505     {
506       fprintf (stderr,
507                _("Records already exist under `%s', cannot add `%s' record.\n"),
508                rec_name,
509                "CNAME");
510       ret = 1;
511       test_finished ();
512       return;
513     }
514     break;
515   case GNUNET_GNSRECORD_TYPE_PKEY:
516     if (0 != rd_count)
517     {
518       fprintf (stderr,
519                _("Records already exist under `%s', cannot add `%s' record.\n"),
520                rec_name,
521                "PKEY");
522       ret = 1;
523       test_finished ();
524       return;
525     }
526     break;
527   case GNUNET_GNSRECORD_TYPE_GNS2DNS:
528     if (0 != rd_count)
529     {
530       fprintf (stderr,
531                _("Records already exist under `%s', cannot add `%s' record.\n"),
532                rec_name,
533                "GNS2DNS");
534       ret = 1;
535       test_finished ();
536       return;
537     }
538     break;
539   }
540   memset (rdn, 0, sizeof (struct GNUNET_GNSRECORD_Data));
541   memcpy (&rdn[1], rd, rd_count * sizeof (struct GNUNET_GNSRECORD_Data));
542   rde = &rdn[0];
543   rde->data = data;
544   rde->data_size = data_size;
545   rde->record_type = type;
546   if (1 == is_shadow)
547     rde->flags |= GNUNET_GNSRECORD_RF_SHADOW_RECORD;
548   if (1 != is_public)
549     rde->flags |= GNUNET_GNSRECORD_RF_PRIVATE;
550   if (GNUNET_YES == etime_is_rel)
551   {
552     rde->expiration_time = etime_rel.rel_value_us;
553     rde->flags |= GNUNET_GNSRECORD_RF_RELATIVE_EXPIRATION;
554   }
555   else if (GNUNET_NO == etime_is_rel)
556     rde->expiration_time = etime_abs.abs_value_us;
557   else
558     rde->expiration_time = GNUNET_TIME_UNIT_FOREVER_ABS.abs_value_us;
559   GNUNET_assert (NULL != name);
560   add_qe = GNUNET_NAMESTORE_records_store (ns,
561                                            &zone_pkey,
562                                            name,
563                                            rd_count + 1,
564                                            rde,
565                                            &add_continuation,
566                                            &add_qe);
567 }
568
569
570 /**
571  * Function called with the result of our attempt to obtain a name for a given
572  * public key.
573  *
574  * @param cls NULL
575  * @param zone private key of the zone; NULL on disconnect
576  * @param label label of the records; NULL on disconnect
577  * @param rd_count number of entries in @a rd array, 0 if label was deleted
578  * @param rd array of records with data to store
579  */
580 static void
581 handle_reverse_lookup (void *cls,
582                        const struct GNUNET_CRYPTO_EcdsaPrivateKey *zone,
583                        const char *label,
584                        unsigned int rd_count,
585                        const struct GNUNET_GNSRECORD_Data *rd)
586 {
587   reverse_qe = NULL;
588   if (NULL == label)
589     FPRINTF (stdout,
590              "%s.zkey\n",
591              reverse_pkey);
592   else
593     FPRINTF (stdout,
594              "%s.gnu\n",
595              label);
596   test_finished ();
597 }
598
599
600 /**
601  * We were asked to delete something; this function is called with
602  * the existing records. Now we should determine what should be
603  * deleted and then issue the deletion operation.
604  *
605  * @param cls NULL
606  * @param zone private key of the zone we are deleting from
607  * @param label name of the records we are editing
608  * @param rd_count size of the @a rd array
609  * @param rd existing records
610  */
611 static void
612 del_monitor (void *cls,
613              const struct GNUNET_CRYPTO_EcdsaPrivateKey *zone,
614              const char *label,
615              unsigned int rd_count,
616              const struct GNUNET_GNSRECORD_Data *rd)
617 {
618   struct GNUNET_GNSRECORD_Data rdx[rd_count];
619   unsigned int rd_left;
620   unsigned int i;
621   uint32_t type;
622   char *vs;
623
624   del_qe = NULL;
625   if (0 == rd_count)
626   {
627     FPRINTF (stderr,
628              _("There are no records under label `%s' that could be deleted.\n"),
629              label);
630     test_finished ();
631     return;
632   }
633   if ( (NULL == value) &&
634        (NULL == typestring) )
635   {
636     /* delete everything */
637     del_qe = GNUNET_NAMESTORE_records_store (ns,
638                                              &zone_pkey,
639                                              name,
640                                              0, NULL,
641                                              &del_continuation,
642                                              NULL);
643     return;
644   }
645   rd_left = 0;
646   if (NULL != typestring)
647     type = GNUNET_GNSRECORD_typename_to_number (typestring);
648   else
649     type = GNUNET_GNSRECORD_TYPE_ANY;
650   for (i=0;i<rd_count;i++)
651   {
652     vs = NULL;
653     if (! ( ( (GNUNET_GNSRECORD_TYPE_ANY == type) ||
654               (rd[i].record_type == type) ) &&
655             ( (NULL == value) ||
656               (NULL == (vs = (GNUNET_GNSRECORD_value_to_string (rd[i].record_type,
657                                                                 rd[i].data,
658                                                                 rd[i].data_size)))) ||
659               (0 == strcmp (vs, value)) ) ) )
660       rdx[rd_left++] = rd[i];
661     GNUNET_free_non_null (vs);
662   }
663   if (rd_count == rd_left)
664   {
665     /* nothing got deleted */
666     FPRINTF (stderr,
667              _("There are no records under label `%s' that match the request for deletion.\n"),
668              label);
669     test_finished ();
670     return;
671   }
672   /* delete everything but what we copied to 'rdx' */
673   del_qe = GNUNET_NAMESTORE_records_store (ns,
674                                            &zone_pkey,
675                                            name,
676                                            rd_left, rdx,
677                                            &del_continuation,
678                                            NULL);
679 }
680
681
682 /**
683  * Function called with the result from the check if the namestore
684  * service is actually running.  If it is, we start the actual
685  * operation.
686  *
687  * @param cls closure with our configuration
688  * @param result #GNUNET_YES if the namestore service is running
689  */
690 static void
691 testservice_task (void *cls,
692                   int result)
693 {
694   const struct GNUNET_CONFIGURATION_Handle *cfg = cls;
695   struct GNUNET_CRYPTO_EcdsaPublicKey pub;
696   struct GNUNET_GNSRECORD_Data rd;
697
698   if (GNUNET_YES != result)
699   {
700     FPRINTF (stderr, _("Service `%s' is not running\n"),
701              "namestore");
702     return;
703   }
704   if (! (add|del|list|(NULL != nickstring)|(NULL != uri)|(NULL != reverse_pkey)) )
705   {
706     /* nothing more to be done */
707     fprintf (stderr,
708              _("No options given\n"));
709     GNUNET_SCHEDULER_shutdown ();
710     return;
711   }
712   GNUNET_CRYPTO_ecdsa_key_get_public (&zone_pkey,
713                                     &pub);
714
715   ns = GNUNET_NAMESTORE_connect (cfg);
716   if (NULL == ns)
717   {
718     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
719                 _("Failed to connect to namestore\n"));
720     return;
721   }
722   if (add)
723   {
724     if (NULL == name)
725     {
726       fprintf (stderr,
727                _("Missing option `%s' for operation `%s'\n"),
728                "-n", _("add"));
729       GNUNET_SCHEDULER_shutdown ();
730       ret = 1;
731       return;
732     }
733     if (NULL == typestring)
734     {
735       fprintf (stderr,
736                _("Missing option `%s' for operation `%s'\n"),
737                "-t", _("add"));
738       GNUNET_SCHEDULER_shutdown ();
739       ret = 1;
740       return;
741     }
742     type = GNUNET_GNSRECORD_typename_to_number (typestring);
743     if (UINT32_MAX == type)
744     {
745       fprintf (stderr, _("Unsupported type `%s'\n"), typestring);
746       GNUNET_SCHEDULER_shutdown ();
747       ret = 1;
748       return;
749     }
750     if (NULL == value)
751     {
752       fprintf (stderr,
753                _("Missing option `%s' for operation `%s'\n"),
754                "-V", _("add"));
755       ret = 1;
756       GNUNET_SCHEDULER_shutdown ();
757       return;
758     }
759     if (GNUNET_OK !=
760         GNUNET_GNSRECORD_string_to_value (type,
761                                           value,
762                                           &data,
763                                           &data_size))
764     {
765       fprintf (stderr, _("Value `%s' invalid for record type `%s'\n"),
766                value,
767                typestring);
768       GNUNET_SCHEDULER_shutdown ();
769       ret = 1;
770       return;
771     }
772     if (NULL == expirationstring)
773     {
774       fprintf (stderr,
775                _("Missing option `%s' for operation `%s'\n"),
776                "-e", _("add"));
777       GNUNET_SCHEDULER_shutdown ();
778       ret = 1;
779       return;
780     }
781     if (0 == strcmp (expirationstring, "never"))
782     {
783       etime_abs = GNUNET_TIME_UNIT_FOREVER_ABS;
784       etime_is_rel = GNUNET_NO;
785     }
786     else if (GNUNET_OK ==
787              GNUNET_STRINGS_fancy_time_to_relative (expirationstring,
788                                                     &etime_rel))
789     {
790       etime_is_rel = GNUNET_YES;
791     }
792     else if (GNUNET_OK ==
793              GNUNET_STRINGS_fancy_time_to_absolute (expirationstring,
794                                                     &etime_abs))
795     {
796       etime_is_rel = GNUNET_NO;
797     }
798     else
799     {
800       fprintf (stderr,
801                _("Invalid time format `%s'\n"),
802                expirationstring);
803       GNUNET_SCHEDULER_shutdown ();
804       ret = 1;
805       return;
806     }
807     add_qe = GNUNET_NAMESTORE_records_lookup (ns, &zone_pkey, name,
808         &get_existing_record, NULL );
809   }
810   if (del)
811   {
812     if (NULL == name)
813     {
814       fprintf (stderr,
815                _("Missing option `%s' for operation `%s'\n"),
816                "-n", _("del"));
817       GNUNET_SCHEDULER_shutdown ();
818       ret = 1;
819       return;
820     }
821     del_qe = GNUNET_NAMESTORE_records_lookup (ns,
822                                               &zone_pkey,
823                                               name,
824                                               &del_monitor,
825                                               NULL);
826   }
827   if (list)
828   {
829     list_it = GNUNET_NAMESTORE_zone_iteration_start (ns,
830                                                      &zone_pkey,
831                                                      &display_record,
832                                                      NULL);
833   }
834   if (NULL != reverse_pkey)
835   {
836     struct GNUNET_CRYPTO_EcdsaPublicKey pubkey;
837
838     if (GNUNET_OK !=
839         GNUNET_CRYPTO_ecdsa_public_key_from_string (reverse_pkey,
840                                                        strlen (reverse_pkey),
841                                                        &pubkey))
842     {
843       fprintf (stderr,
844                _("Invalid public key for reverse lookup `%s'\n"),
845                reverse_pkey);
846       GNUNET_SCHEDULER_shutdown ();
847     }
848     reverse_qe = GNUNET_NAMESTORE_zone_to_name (ns,
849                                                 &zone_pkey,
850                                                 &pubkey,
851                                                 &handle_reverse_lookup,
852                                                 NULL);
853   }
854   if (NULL != uri)
855   {
856     char sh[105];
857     char sname[64];
858     struct GNUNET_CRYPTO_EcdsaPublicKey pkey;
859
860     GNUNET_STRINGS_utf8_tolower (uri, uri);
861     if ( (2 != (sscanf (uri,
862                         "gnunet://gns/%52s/%63s",
863                         sh,
864                         sname)) ) ||
865          (GNUNET_OK != GNUNET_CRYPTO_ecdsa_public_key_from_string (sh, strlen (sh), &pkey)) )
866     {
867       fprintf (stderr,
868                _("Invalid URI `%s'\n"),
869                uri);
870       GNUNET_SCHEDULER_shutdown ();
871       ret = 1;
872       return;
873     }
874     memset (&rd, 0, sizeof (rd));
875     rd.data = &pkey;
876     rd.data_size = sizeof (struct GNUNET_CRYPTO_EcdsaPublicKey);
877     rd.record_type = GNUNET_GNSRECORD_TYPE_PKEY;
878     if (GNUNET_YES == etime_is_rel)
879     {
880       rd.expiration_time = etime_rel.rel_value_us;
881       rd.flags |= GNUNET_GNSRECORD_RF_RELATIVE_EXPIRATION;
882     }
883     else if (GNUNET_NO == etime_is_rel)
884       rd.expiration_time = etime_abs.abs_value_us;
885     else
886       rd.expiration_time = GNUNET_TIME_UNIT_FOREVER_ABS.abs_value_us;
887
888     if (1 == is_shadow)
889       rd.flags |= GNUNET_GNSRECORD_RF_SHADOW_RECORD;
890     add_qe_uri = GNUNET_NAMESTORE_records_store (ns,
891                                                  &zone_pkey,
892                                                  sname,
893                                                  1,
894                                                  &rd,
895                                                  &add_continuation,
896                                                  &add_qe_uri);
897   }
898   if (NULL != nickstring)
899   {
900     if (0 == strlen(nickstring))
901     {
902       fprintf (stderr,
903                _("Invalid nick `%s'\n"),
904                nickstring);
905       GNUNET_SCHEDULER_shutdown ();
906       ret = 1;
907       return;
908     }
909     add_qe_uri = GNUNET_NAMESTORE_set_nick(ns, &zone_pkey, nickstring,
910         &add_continuation, &add_qe_uri);
911   }
912   if (monitor)
913   {
914     zm = GNUNET_NAMESTORE_zone_monitor_start (cfg,
915                                               &zone_pkey,
916                                               GNUNET_YES,
917                                               &display_record,
918                                               &sync_cb,
919                                               NULL);
920   }
921 }
922
923
924 /**
925  * Callback invoked from identity service with ego information.
926  * An @a ego of NULL means the ego was not found.
927  *
928  * @param cls closure with the configuration
929  * @param ego an ego known to identity service, or NULL
930  */
931 static void
932 identity_cb (void *cls,
933              const struct GNUNET_IDENTITY_Ego *ego)
934 {
935   const struct GNUNET_CONFIGURATION_Handle *cfg = cls;
936
937   el = NULL;
938   if (NULL == ego)
939   {
940     if (NULL != ego_name)
941     {
942       fprintf (stderr,
943                _("Ego `%s' not known to identity service\n"),
944                ego_name);
945     }
946     GNUNET_SCHEDULER_shutdown ();
947     ret = -1;
948     return;
949   }
950   zone_pkey = *GNUNET_IDENTITY_ego_get_private_key (ego);
951   GNUNET_free_non_null (ego_name);
952   ego_name = NULL;
953   GNUNET_CLIENT_service_test ("namestore", cfg,
954                               GNUNET_TIME_UNIT_SECONDS,
955                               &testservice_task,
956                               (void *) cfg);
957 }
958
959
960 static void
961 default_ego_cb (void *cls,
962                 struct GNUNET_IDENTITY_Ego *ego,
963                 void **ctx,
964                 const char *name)
965 {
966   get_default = NULL;
967   if (NULL == ego)
968   {
969     fprintf (stderr,
970              _("No default ego configured in identity service\n"));
971     GNUNET_SCHEDULER_shutdown ();
972     ret = -1;
973     return;
974   }
975   else
976   {
977     identity_cb (cls, ego);
978   }
979 }
980
981
982 static void
983 id_connect_cb (void *cls,
984                struct GNUNET_IDENTITY_Ego *ego,
985                void **ctx,
986                const char *name)
987 {
988   const struct GNUNET_CONFIGURATION_Handle *cfg = cls;
989
990   if (NULL == ego)
991   {
992     get_default = GNUNET_IDENTITY_get (idh,
993                                        "namestore",
994                                        &default_ego_cb, (void *) cfg);
995   }
996 }
997
998
999 static void
1000 testservice_id_task (void *cls, int result)
1001 {
1002   const struct GNUNET_CONFIGURATION_Handle *cfg = cls;
1003   if (result != GNUNET_YES)
1004   {
1005     fprintf (stderr,
1006              _("Identity service is not running\n"));
1007     GNUNET_SCHEDULER_shutdown ();
1008     ret = -1;
1009     return;
1010   }
1011   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL,
1012                                 &do_shutdown, (void *) cfg);
1013
1014   if (NULL == ego_name)
1015   {
1016     idh = GNUNET_IDENTITY_connect (cfg, &id_connect_cb, (void *) cfg);
1017     if (NULL == idh)
1018       fprintf (stderr, _("Cannot connect to identity service\n"));
1019     ret = -1;
1020     return;
1021   }
1022   el = GNUNET_IDENTITY_ego_lookup (cfg,
1023                                    ego_name,
1024                                    &identity_cb,
1025                                    (void *) cfg);
1026 }
1027
1028
1029 /**
1030  * Main function that will be run.
1031  *
1032  * @param cls closure
1033  * @param args remaining command-line arguments
1034  * @param cfgfile name of the configuration file used (for saving, can be NULL!)
1035  * @param cfg configuration
1036  */
1037 static void
1038 run (void *cls, char *const *args, const char *cfgfile,
1039      const struct GNUNET_CONFIGURATION_Handle *cfg)
1040 {
1041   if ( (NULL != args[0]) && (NULL == uri) )
1042     uri = GNUNET_strdup (args[0]);
1043
1044   GNUNET_CLIENT_service_test ("identity", cfg,
1045                               GNUNET_TIME_UNIT_SECONDS,
1046                               &testservice_id_task,
1047                               (void *) cfg);
1048 }
1049
1050
1051 /**
1052  * The main function for gnunet-namestore.
1053  *
1054  * @param argc number of arguments from the command line
1055  * @param argv command line arguments
1056  * @return 0 ok, 1 on error
1057  */
1058 int
1059 main (int argc, char *const *argv)
1060 {
1061   is_public = -1;
1062   is_shadow = -1;
1063
1064   static const struct GNUNET_GETOPT_CommandLineOption options[] = {
1065     {'a', "add", NULL,
1066      gettext_noop ("add record"), 0,
1067      &GNUNET_GETOPT_set_one, &add},
1068     {'d', "delete", NULL,
1069      gettext_noop ("delete record"), 0,
1070      &GNUNET_GETOPT_set_one, &del},
1071     {'D', "display", NULL,
1072      gettext_noop ("display records"), 0,
1073      &GNUNET_GETOPT_set_one, &list},
1074     {'e', "expiration", "TIME",
1075      gettext_noop ("expiration time for record to use (for adding only), \"never\" is possible"), 1,
1076      &GNUNET_GETOPT_set_string, &expirationstring},
1077     {'i', "nick", "NICKNAME",
1078      gettext_noop ("set the desired nick name for the zone"), 1,
1079      &GNUNET_GETOPT_set_string, &nickstring},
1080     {'m', "monitor", NULL,
1081      gettext_noop ("monitor changes in the namestore"), 0,
1082      &GNUNET_GETOPT_set_one, &monitor},
1083     {'n', "name", "NAME",
1084      gettext_noop ("name of the record to add/delete/display"), 1,
1085      &GNUNET_GETOPT_set_string, &name},
1086     {'r', "reverse", "PKEY",
1087      gettext_noop ("determine our name for the given PKEY"), 1,
1088      &GNUNET_GETOPT_set_string, &reverse_pkey},
1089     {'t', "type", "TYPE",
1090      gettext_noop ("type of the record to add/delete/display"), 1,
1091      &GNUNET_GETOPT_set_string, &typestring},
1092     {'u', "uri", "URI",
1093      gettext_noop ("URI to import into our zone"), 1,
1094      &GNUNET_GETOPT_set_string, &uri},
1095     {'V', "value", "VALUE",
1096      gettext_noop ("value of the record to add/delete"), 1,
1097      &GNUNET_GETOPT_set_string, &value},
1098     {'p', "public", NULL,
1099      gettext_noop ("create or list public record"), 0,
1100      &GNUNET_GETOPT_set_one, &is_public},
1101     {'s', "shadow", NULL,
1102      gettext_noop ("create shadow record (only valid if all other records of the same type have expired"), 0,
1103      &GNUNET_GETOPT_set_one, &is_shadow},
1104     {'z', "zone", "EGO",
1105      gettext_noop ("name of the ego controlling the zone"), 1,
1106      &GNUNET_GETOPT_set_string, &ego_name},
1107     GNUNET_GETOPT_OPTION_END
1108   };
1109
1110   if (GNUNET_OK != GNUNET_STRINGS_get_utf8_args (argc, argv, &argc, &argv))
1111     return 2;
1112
1113   GNUNET_log_setup ("gnunet-namestore", "WARNING", NULL);
1114   if (GNUNET_OK !=
1115       GNUNET_PROGRAM_run (argc, argv, "gnunet-namestore",
1116                           _("GNUnet zone manipulation tool"),
1117                           options,
1118                           &run, NULL))
1119   {
1120     GNUNET_free ((void*) argv);
1121     GNUNET_CRYPTO_ecdsa_key_clear (&zone_pkey);
1122     return 1;
1123   }
1124   GNUNET_free ((void*) argv);
1125   GNUNET_CRYPTO_ecdsa_key_clear (&zone_pkey);
1126   return ret;
1127 }
1128
1129 /* end of gnunet-namestore.c */