src/namestore/gnunet-namestore.c

   1 /*
   2      This file is part of GNUnet.
   3      (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., 59 Temple Place - Suite 330,
  18      Boston, MA 02111-1307, 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 */