src/namestore/gnunet-service-namestore.c

   1 /*
   2      This file is part of GNUnet.
   3      (C) 2009 Christian Grothoff (and other contributing authors)
   4
   5      GNUnet is free software; you can redistribute it and/or modify
   6      it under the terms of the GNU General Public License as published
   7      by the Free Software Foundation; either version 3, or (at your
   8      option) any later version.
   9
  10      GNUnet is distributed in the hope that it will be useful, but
  11      WITHOUT ANY WARRANTY; without even the implied warranty of
  12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13      General Public License for more details.
  14
  15      You should have received a copy of the GNU General Public License
  16      along with GNUnet; see the file COPYING.  If not, write to the
  17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18      Boston, MA 02111-1307, USA.
  19 */
  20
  21 /**
  22  * @file namestore/gnunet-service-namestore.c
  23  * @brief namestore for the GNUnet naming system
  24  * @author Matthias Wachs
  25  */
  26 #include "platform.h"
  27 #include "gnunet_getopt_lib.h"
  28 #include "gnunet_service_lib.h"
  29 #include "gnunet_namestore_service.h"
  30 #include "gnunet_namestore_plugin.h"
  31 #include "gnunet_signatures.h"
  32 #include "namestore.h"
  33
  34
  35
  36 /**
  37  * A namestore operation.
  38  */
  39 struct GNUNET_NAMESTORE_ZoneIteration
  40 {
  41   struct GNUNET_NAMESTORE_ZoneIteration *next;
  42   struct GNUNET_NAMESTORE_ZoneIteration *prev;
  43
  44   struct GNUNET_NAMESTORE_Client * client;
  45
  46   GNUNET_HashCode zone;
  47
  48   uint64_t request_id;
  49   uint32_t offset;
  50
  51 };
  52
  53
  54 /**
  55  * A namestore client
  56  */
  57 struct GNUNET_NAMESTORE_Client
  58 {
  59   struct GNUNET_NAMESTORE_Client *next;
  60   struct GNUNET_NAMESTORE_Client *prev;
  61
  62   struct GNUNET_SERVER_Client * client;
  63
  64   struct GNUNET_NAMESTORE_ZoneIteration *op_head;
  65   struct GNUNET_NAMESTORE_ZoneIteration *op_tail;
  66 };
  67
  68
  69
  70 /**
  71  * Configuration handle.
  72  */
  73 const struct GNUNET_CONFIGURATION_Handle *GSN_cfg;
  74
  75 static struct GNUNET_NAMESTORE_PluginFunctions *GSN_database;
  76
  77 /**
  78  * Our notification context.
  79  */
  80 static struct GNUNET_SERVER_NotificationContext *snc;
  81
  82 static char *db_lib_name;
  83
  84 static struct GNUNET_NAMESTORE_Client *client_head;
  85 static struct GNUNET_NAMESTORE_Client *client_tail;
  86
  87
  88 /**
  89  * Task run during shutdown.
  90  *
  91  * @param cls unused
  92  * @param tc unused
  93  */
  94 static void
  95 cleanup_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
  96 {
  97   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Stopping namestore service\n");
  98
  99   struct GNUNET_NAMESTORE_ZoneIteration * no;
 100   struct GNUNET_NAMESTORE_ZoneIteration * tmp;
 101   struct GNUNET_NAMESTORE_Client * nc;
 102   struct GNUNET_NAMESTORE_Client * next;
 103
 104   GNUNET_SERVER_notification_context_destroy (snc);
 105   snc = NULL;
 106
 107   for (nc = client_head; nc != NULL; nc = next)
 108   {
 109     next = nc->next;
 110     for (no = nc->op_head; no != NULL; no = tmp)
 111     {
 112       GNUNET_break (0);
 113       GNUNET_CONTAINER_DLL_remove (nc->op_head, nc->op_tail, no);
 114       tmp = no->next;
 115       GNUNET_free (no);
 116     }
 117     GNUNET_SERVER_client_drop(nc->client);
 118     GNUNET_CONTAINER_DLL_remove (client_head, client_tail, nc);
 119     GNUNET_free (nc);
 120   }
 121
 122   GNUNET_break (NULL == GNUNET_PLUGIN_unload (db_lib_name, GSN_database));
 123   GNUNET_free (db_lib_name);
 124 }
 125
 126 static struct GNUNET_NAMESTORE_Client *
 127 client_lookup (struct GNUNET_SERVER_Client *client)
 128 {
 129   struct GNUNET_NAMESTORE_Client * nc;
 130
 131   GNUNET_assert (NULL != client);
 132
 133   for (nc = client_head; nc != NULL; nc = nc->next)
 134   {
 135     if (client == nc->client)
 136       break;
 137   }
 138   return nc;
 139 }
 140
 141 /**
 142  * Called whenever a client is disconnected.  Frees our
 143  * resources associated with that client.
 144  *
 145  * @param cls closure
 146  * @param client identification of the client
 147  */
 148 static void
 149 client_disconnect_notification (void *cls, struct GNUNET_SERVER_Client *client)
 150 {
 151   struct GNUNET_NAMESTORE_ZoneIteration * no;
 152   struct GNUNET_NAMESTORE_Client * nc;
 153   if (NULL == client)
 154     return;
 155
 156   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Client %p disconnected \n", client);
 157
 158   nc = client_lookup (client);
 159
 160   if ((NULL == client) || (NULL == nc))
 161     return;
 162
 163   for (no = nc->op_head; no != NULL; no = no->next)
 164   {
 165     GNUNET_CONTAINER_DLL_remove (nc->op_head, nc->op_tail, no);
 166     GNUNET_free (no);
 167   }
 168
 169   GNUNET_SERVER_client_drop(nc->client);
 170   GNUNET_CONTAINER_DLL_remove (client_head, client_tail, nc);
 171   GNUNET_free (nc);
 172 }
 173
 174
 175
 176 static void handle_start (void *cls,
 177                           struct GNUNET_SERVER_Client * client,
 178                           const struct GNUNET_MessageHeader * message)
 179 {
 180   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Client %p connected\n", client);
 181
 182   struct GNUNET_NAMESTORE_Client * nc = GNUNET_malloc (sizeof (struct GNUNET_NAMESTORE_Client));
 183   nc->client = client;
 184   GNUNET_SERVER_notification_context_add (snc, client);
 185   GNUNET_CONTAINER_DLL_insert(client_head, client_tail, nc);
 186   GNUNET_SERVER_client_keep (client);
 187   GNUNET_SERVER_receive_done (client, GNUNET_OK);
 188 }
 189
 190 struct LookupNameContext
 191 {
 192   struct GNUNET_NAMESTORE_Client *nc;
 193   uint32_t request_id;
 194   uint32_t record_type;
 195   GNUNET_HashCode *zone;
 196   char * name;
 197 };
 198
 199 void drop_iterator (void *cls,
 200                    const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *zone_key,
 201                    struct GNUNET_TIME_Absolute expire,
 202                    const char *name,
 203                    unsigned int rd_len,
 204                    const struct GNUNET_NAMESTORE_RecordData *rd,
 205                    const struct GNUNET_CRYPTO_RsaSignature *signature)
 206 {
 207   GNUNET_HashCode zone_hash;
 208   int * stop = cls;
 209   if (NULL != zone_key)
 210   {
 211     GNUNET_CRYPTO_hash(zone_key, sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded), &zone_hash);
 212     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Deleting zone `%s'\n", GNUNET_h2s (&zone_hash));
 213     GSN_database->delete_zone (GSN_database->cls, &zone_hash);
 214   }
 215   else
 216   {
 217     (*stop) = GNUNET_YES;
 218   }
 219 }
 220
 221
 222 static void
 223 handle_lookup_name_it (void *cls,
 224     const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *zone_key,
 225     struct GNUNET_TIME_Absolute expire,
 226     const char *name,
 227     unsigned int rd_count,
 228     const struct GNUNET_NAMESTORE_RecordData *rd,
 229     const struct GNUNET_CRYPTO_RsaSignature *signature)
 230 {
 231   /* send response */
 232   struct LookupNameContext *lnc = cls;
 233   struct LookupNameResponseMessage *lnr_msg;
 234   struct GNUNET_NAMESTORE_RecordData *rd_selected = NULL;
 235   char *rd_tmp;
 236   char *name_tmp;
 237   size_t rd_ser_len;
 238   size_t r_size = 0;
 239   size_t name_len = 0;
 240
 241   int copied_elements = 0;
 242   int contains_signature = 0;
 243   int c;
 244
 245   if (NULL != name)
 246     name_len = strlen(name) + 1;
 247
 248   /* count records to copy */
 249   if (rd_count != 0)
 250   {
 251     if (lnc->record_type != 0)
 252     {
 253       /* special record type needed */
 254       for (c = 0; c < rd_count; c ++)
 255         if (rd[c].record_type == lnc->record_type)
 256           copied_elements++; /* found matching record */
 257       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Found %u records with type %u for name `%s' in zone `%s'\n",
 258           copied_elements, lnc->record_type, lnc->name, GNUNET_h2s(lnc->zone));
 259       rd_selected = GNUNET_malloc (copied_elements * sizeof (struct GNUNET_NAMESTORE_RecordData));
 260       copied_elements = 0;
 261       for (c = 0; c < rd_count; c ++)
 262       {
 263         if (rd[c].record_type == lnc->record_type)
 264         {
 265           /* found matching record */
 266           memcpy (&rd_selected[copied_elements], &rd[c], sizeof (struct GNUNET_NAMESTORE_RecordData));
 267           copied_elements++;
 268         }
 269       }
 270     }
 271     else
 272     {
 273       copied_elements = rd_count;
 274       rd_selected = (struct GNUNET_NAMESTORE_RecordData *) rd;
 275     }
 276   }
 277   else
 278   {
 279     /* No results */
 280     copied_elements = 0;
 281     rd_selected = NULL;
 282     expire = GNUNET_TIME_UNIT_ZERO_ABS;
 283   }
 284
 285   rd_ser_len = GNUNET_NAMESTORE_records_get_size(copied_elements, rd_selected);
 286   char rd_ser[rd_ser_len];
 287   GNUNET_NAMESTORE_records_serialize(copied_elements, rd_selected, rd_ser_len, rd_ser);
 288
 289   if (rd_selected != rd)
 290     GNUNET_free (rd_selected);
 291
 292   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Found %u records for name `%s' in zone `%s'\n",
 293       copied_elements, lnc->name, GNUNET_h2s(lnc->zone));
 294
 295   if ((copied_elements == rd_count) && (NULL != signature))
 296     contains_signature = GNUNET_YES;
 297   else
 298     contains_signature = GNUNET_NO;
 299
 300   r_size = sizeof (struct LookupNameResponseMessage) +
 301            sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded) +
 302            name_len +
 303            rd_ser_len;
 304
 305   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Sending `%s' message\n", "NAMESTORE_LOOKUP_NAME_RESPONSE");
 306   lnr_msg = GNUNET_malloc (r_size);
 307   lnr_msg->gns_header.header.type = ntohs (GNUNET_MESSAGE_TYPE_NAMESTORE_LOOKUP_NAME_RESPONSE);
 308   lnr_msg->gns_header.header.size = ntohs (r_size);
 309   lnr_msg->gns_header.r_id = htonl (lnc->request_id);
 310   lnr_msg->rd_count = htons (copied_elements);
 311   lnr_msg->rd_len = htons (rd_ser_len);
 312   lnr_msg->name_len = htons (name_len);
 313   lnr_msg->contains_sig = htons (contains_signature);
 314   lnr_msg->expire = GNUNET_TIME_absolute_hton(expire);
 315
 316   if (zone_key != NULL)
 317     lnr_msg->public_key = (*zone_key);
 318   else
 319     memset(&lnr_msg->public_key, '\0', sizeof (lnr_msg->public_key));
 320   if (GNUNET_YES == contains_signature)
 321     lnr_msg->signature = *signature;
 322   else
 323     memset (&lnr_msg->signature, '\0', sizeof (lnr_msg->signature));
 324
 325   name_tmp = (char *) &lnr_msg[1];
 326   rd_tmp = &name_tmp[name_len];
 327
 328   memcpy (name_tmp, name, name_len);
 329   memcpy (rd_tmp, rd_ser, rd_ser_len);
 330
 331   GNUNET_SERVER_notification_context_unicast (snc, lnc->nc->client, (const struct GNUNET_MessageHeader *) lnr_msg, GNUNET_NO);
 332
 333   GNUNET_free (lnr_msg);
 334 }
 335
 336 static void handle_lookup_name (void *cls,
 337                           struct GNUNET_SERVER_Client * client,
 338                           const struct GNUNET_MessageHeader * message)
 339 {
 340   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received `%s' message\n", "NAMESTORE_LOOKUP_NAME");
 341   struct LookupNameContext lnc;
 342   struct GNUNET_NAMESTORE_Client *nc;
 343   size_t name_len;
 344   char * name;
 345   uint32_t rid = 0;
 346   uint32_t type = 0;
 347
 348   if (ntohs (message->size) < sizeof (struct LookupNameMessage))
 349   {
 350     GNUNET_break_op (0);
 351     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 352     return;
 353   }
 354
 355   nc = client_lookup(client);
 356   if (nc == NULL)
 357   {
 358     GNUNET_break_op (0);
 359     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 360     return;
 361   }
 362
 363   struct LookupNameMessage * ln_msg = (struct LookupNameMessage *) message;
 364   rid = ntohl (ln_msg->gns_header.r_id);
 365   name_len = ntohl (ln_msg->name_len);
 366   type = ntohl (ln_msg->record_type);
 367
 368   if ((name_len == 0) || (name_len > 256))
 369   {
 370     GNUNET_break_op (0);
 371     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 372     return;
 373   }
 374
 375   name = (char *) &ln_msg[1];
 376   if (name[name_len -1] != '\0')
 377   {
 378     GNUNET_break_op (0);
 379     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 380     return;
 381   }
 382
 383   if (0 == type)
 384     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Looking up all records for name `%s' in zone `%s'\n", name, GNUNET_h2s(&ln_msg->zone));
 385   else
 386     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Looking up records with type %u for name `%s' in zone `%s'\n", type, name, GNUNET_h2s(&ln_msg->zone));
 387
 388   /* do the actual lookup */
 389   lnc.request_id = rid;
 390   lnc.nc = nc;
 391   lnc.record_type = type;
 392   lnc.name = name;
 393   lnc.zone = &ln_msg->zone;
 394   GSN_database->iterate_records(GSN_database->cls, &ln_msg->zone, name, 0, &handle_lookup_name_it, &lnc);
 395
 396   GNUNET_SERVER_receive_done (client, GNUNET_OK);
 397 }
 398
 399 static void handle_record_put (void *cls,
 400                           struct GNUNET_SERVER_Client * client,
 401                           const struct GNUNET_MessageHeader * message)
 402 {
 403   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received `%s' message\n", "NAMESTORE_RECORD_PUT");
 404   struct GNUNET_NAMESTORE_Client *nc;
 405   struct GNUNET_TIME_Absolute expire;
 406   struct GNUNET_CRYPTO_RsaSignature *signature;
 407   struct RecordPutResponseMessage rpr_msg;
 408   size_t name_len;
 409   size_t msg_size;
 410   size_t msg_size_exp;
 411   char * name;
 412   char * rd_ser;
 413   uint32_t rid = 0;
 414   uint32_t rd_ser_len;
 415   uint32_t rd_count;
 416   int res = GNUNET_SYSERR;
 417
 418   if (ntohs (message->size) < sizeof (struct RecordPutMessage))
 419   {
 420     GNUNET_break_op (0);
 421     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 422     return;
 423   }
 424
 425   nc = client_lookup (client);
 426   if (nc == NULL)
 427   {
 428     GNUNET_break_op (0);
 429     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 430     return;
 431   }
 432
 433   struct RecordPutMessage * rp_msg = (struct RecordPutMessage *) message;
 434
 435   rid = ntohl (rp_msg->gns_header.r_id);
 436   msg_size = ntohs (rp_msg->gns_header.header.size);
 437   name_len = ntohs (rp_msg->name_len);
 438   rd_count = ntohs (rp_msg->rd_count);
 439   rd_ser_len = ntohs(rp_msg->rd_len);
 440
 441   if (msg_size > GNUNET_SERVER_MAX_MESSAGE_SIZE)
 442   {
 443     GNUNET_break_op (0);
 444     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 445     return;
 446   }
 447
 448   if ((rd_count < 1) || (rd_ser_len < 1) || (name_len >=256) || (name_len == 0))
 449   {
 450     GNUNET_break_op (0);
 451     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 452     return;
 453   }
 454
 455   msg_size_exp = sizeof (struct RecordPutMessage) +  name_len  + rd_ser_len;
 456   if (msg_size != msg_size_exp)
 457   {
 458     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Expected message %u size but message size is %u \n", msg_size_exp, msg_size);
 459     GNUNET_break_op (0);
 460     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 461     return;
 462   }
 463   if ((name_len == 0) || (name_len > 256))
 464   {
 465     GNUNET_break_op (0);
 466     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 467     return;
 468   }
 469
 470   name = (char *) &rp_msg[1];
 471
 472   if (name[name_len -1] != '\0')
 473   {
 474     GNUNET_break_op (0);
 475     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 476     return;
 477   }
 478
 479   expire = GNUNET_TIME_absolute_ntoh(rp_msg->expire);
 480   signature = (struct GNUNET_CRYPTO_RsaSignature *) &rp_msg->signature;
 481
 482   rd_ser = &name[name_len];
 483   struct GNUNET_NAMESTORE_RecordData rd[rd_count];
 484   res = GNUNET_NAMESTORE_records_deserialize(rd_ser_len, rd_ser, rd_count, rd);
 485   if (res != GNUNET_OK)
 486   {
 487     GNUNET_break_op (0);
 488     goto send;
 489   }
 490
 491   GNUNET_HashCode zone_hash;
 492   GNUNET_CRYPTO_hash (&rp_msg->public_key, sizeof (rp_msg->public_key), &zone_hash);
 493
 494   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Putting %u record for name `%s' in zone `%s'\n", rd_count, name, GNUNET_h2s(&zone_hash));
 495
 496   /* Database operation */
 497   res = GSN_database->put_records(GSN_database->cls,
 498                                 &rp_msg->public_key,
 499                                 expire,
 500                                 name,
 501                                 rd_count, rd,
 502                                 signature);
 503
 504   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Putting record for name `%s': %s\n",
 505       name, (res == GNUNET_OK) ? "OK" : "FAIL");
 506
 507   /* Send response */
 508 send:
 509   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Sending `%s' message\n", "RECORD_PUT_RESPONSE");
 510   rpr_msg.gns_header.header.type = htons (GNUNET_MESSAGE_TYPE_NAMESTORE_RECORD_PUT_RESPONSE);
 511   rpr_msg.gns_header.header.size = htons (sizeof (struct RecordPutResponseMessage));
 512   rpr_msg.gns_header.r_id = htonl (rid);
 513   rpr_msg.op_result = htonl (res);
 514   GNUNET_SERVER_notification_context_unicast (snc, nc->client, (const struct GNUNET_MessageHeader *) &rpr_msg, GNUNET_NO);
 515
 516   GNUNET_SERVER_receive_done (client, GNUNET_OK);
 517 }
 518
 519 struct CreateRecordContext
 520 {
 521   struct GNUNET_NAMESTORE_RecordData *rd;
 522   struct GNUNET_CRYPTO_RsaPrivateKey *pkey;
 523   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *pubkey;
 524   struct GNUNET_TIME_Absolute expire;
 525   char *name;
 526   int res;
 527 };
 528
 529
 530 static void
 531 handle_create_record_it (void *cls,
 532     const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *pubkey,
 533     struct GNUNET_TIME_Absolute expire,
 534     const char *name,
 535     unsigned int rd_count,
 536     const struct GNUNET_NAMESTORE_RecordData *rd,
 537     const struct GNUNET_CRYPTO_RsaSignature *signature)
 538 {
 539   struct CreateRecordContext * crc = cls;
 540   struct GNUNET_CRYPTO_RsaSignature *signature_new = NULL;
 541   struct GNUNET_NAMESTORE_RecordData *rd_new = NULL;
 542   int res;
 543   int exist = GNUNET_SYSERR;
 544   int update = GNUNET_NO;
 545   int c;
 546   int rd_count_new = 0;
 547
 548   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Found %u existing records for `%s'\n", rd_count, crc->name);
 549
 550   for (c = 0; c < rd_count; c++)
 551   {
 552
 553     if ((crc->rd->record_type == rd[c].record_type) &&
 554         (crc->rd->data_size == rd[c].data_size) &&
 555         (0 == memcmp (crc->rd->data, rd[c].data, rd[c].data_size)))
 556     {
 557       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Found existing records for `%s' to update expiration date!\n", crc->name);
 558       exist = c;
 559       if (crc->rd->expiration.abs_value != rd[c].expiration.abs_value)
 560         update = GNUNET_YES;
 561        break;
 562     }
 563   }
 564
 565   if (exist == GNUNET_SYSERR)
 566     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "NO existing records for `%s' to update!\n", crc->name);
 567
 568   if (exist == GNUNET_SYSERR)
 569   {
 570     rd_new = GNUNET_malloc ((rd_count+1) * sizeof (struct GNUNET_NAMESTORE_RecordData));
 571     memcpy (rd_new, rd, rd_count * sizeof (struct GNUNET_NAMESTORE_RecordData));
 572     rd_count_new = rd_count + 1;
 573     rd_new[rd_count] = *(crc->rd);
 574     signature_new = GNUNET_NAMESTORE_create_signature (crc->pkey, crc->name, rd_new, rd_count+1);
 575
 576     if (NULL == signature_new)
 577     {
 578       GNUNET_break (0);
 579       res = GNUNET_SYSERR;
 580       goto end;
 581     }
 582   }
 583   else if (update == GNUNET_NO)
 584   {
 585     /* Exact same record already exists */
 586     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "No update for %s' record required!\n", crc->name);
 587     res = GNUNET_NO;
 588     goto end;
 589   }
 590   else if (update == GNUNET_YES)
 591   {
 592     /* Update record */
 593     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Updating existing records for `%s'!\n", crc->name);
 594     rd_new = GNUNET_malloc ((rd_count) * sizeof (struct GNUNET_NAMESTORE_RecordData));
 595     memcpy (rd_new, rd, rd_count * sizeof (struct GNUNET_NAMESTORE_RecordData));
 596     rd_count_new = rd_count;
 597     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Updating expiration from %llu to %llu!\n", rd_new[exist].expiration.abs_value, crc->rd->expiration.abs_value);
 598     rd_new[exist].expiration = crc->rd->expiration;
 599     signature_new = GNUNET_NAMESTORE_create_signature (crc->pkey, crc->name, rd_new, rd_count_new);
 600     if (NULL == signature_new)
 601     {
 602       GNUNET_break (0);
 603       res = GNUNET_SYSERR;
 604       goto end;
 605     }
 606   }
 607
 608   /* Database operation */
 609   GNUNET_assert ((rd_new != NULL) && (rd_count_new > 0));
 610   res = GSN_database->put_records(GSN_database->cls,
 611                                 (const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *) crc->pubkey,
 612                                 crc->expire,
 613                                 crc->name,
 614                                 rd_count_new, rd_new,
 615                                 signature_new);
 616   GNUNET_break (GNUNET_OK == res);
 617   res = GNUNET_YES;
 618
 619 end:
 620   GNUNET_free_non_null (rd_new);
 621   GNUNET_free_non_null (signature_new);
 622
 623   switch (res) {
 624     case GNUNET_SYSERR:
 625        /* failed to create the record */
 626        crc->res = GNUNET_SYSERR;
 627       break;
 628     case GNUNET_YES:
 629       /* database operations OK */
 630       if (GNUNET_YES == update)
 631         /* we updated an existing record */
 632         crc->res = GNUNET_NO;
 633       else
 634         /* we created a new record */
 635         crc->res = GNUNET_YES;
 636       break;
 637     case GNUNET_NO:
 638         /* identical entry existed, so we did nothing */
 639         crc->res = GNUNET_NO;
 640       break;
 641     default:
 642       break;
 643   }
 644
 645   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Update result for name `%s' %u\n", crc->name, res);
 646
 647 }
 648
 649 static void handle_record_create (void *cls,
 650                           struct GNUNET_SERVER_Client * client,
 651                           const struct GNUNET_MessageHeader * message)
 652 {
 653   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received `%s' message\n", "NAMESTORE_RECORD_CREATE");
 654   struct GNUNET_NAMESTORE_Client *nc;
 655   struct CreateRecordContext crc;
 656   struct GNUNET_CRYPTO_RsaPrivateKey *pkey;
 657   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pub;
 658   struct RecordCreateResponseMessage rcr_msg;
 659   GNUNET_HashCode pubkey_hash;
 660   size_t name_len;
 661   size_t msg_size;
 662   size_t msg_size_exp;
 663   size_t rd_ser_len;
 664   size_t key_len;
 665   uint32_t rid = 0;
 666   char *pkey_tmp;
 667   char *name_tmp;
 668   char *rd_ser;
 669   int rd_count;
 670
 671   int res = GNUNET_SYSERR;
 672
 673   if (ntohs (message->size) < sizeof (struct RecordCreateMessage))
 674   {
 675     GNUNET_break_op (0);
 676     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 677     return;
 678   }
 679
 680   nc = client_lookup(client);
 681   if (nc == NULL)
 682   {
 683     GNUNET_break_op (0);
 684     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 685     return;
 686   }
 687
 688   struct RecordCreateMessage * rp_msg = (struct RecordCreateMessage *) message;
 689   rid = ntohl (rp_msg->gns_header.r_id);
 690   name_len = ntohs (rp_msg->name_len);
 691   msg_size = ntohs (message->size);
 692   rd_count = ntohs (rp_msg->rd_count);
 693   rd_ser_len = ntohs (rp_msg->rd_len);
 694   key_len = ntohs (rp_msg->pkey_len);
 695   msg_size_exp = sizeof (struct RecordCreateMessage) + key_len + name_len + rd_ser_len;
 696
 697   if (msg_size != msg_size_exp)
 698   {
 699     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Expected message %u size but message size is %u \n", msg_size_exp, msg_size);
 700     GNUNET_break_op (0);
 701     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 702     return;
 703   }
 704
 705   if ((name_len == 0) || (name_len > 256))
 706   {
 707     GNUNET_break_op (0);
 708     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 709     return;
 710   }
 711
 712   pkey_tmp = (char *) &rp_msg[1];
 713   name_tmp = &pkey_tmp[key_len];
 714   rd_ser = &name_tmp[name_len];
 715
 716   if (name_tmp[name_len -1] != '\0')
 717   {
 718     GNUNET_break_op (0);
 719     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 720     return;
 721   }
 722
 723   struct GNUNET_NAMESTORE_RecordData rd[rd_count];
 724   res = GNUNET_NAMESTORE_records_deserialize(rd_ser_len, rd_ser, rd_count, rd);
 725   if ((res != GNUNET_OK) || (rd_count != 1))
 726   {
 727     GNUNET_break_op (0);
 728     goto send;
 729   }
 730
 731   /* Extracting and converting private key */
 732   pkey = GNUNET_CRYPTO_rsa_decode_key((char *) pkey_tmp, key_len);
 733   GNUNET_assert (pkey != NULL);
 734   GNUNET_CRYPTO_rsa_key_get_public(pkey, &pub);
 735   GNUNET_CRYPTO_hash (&pub, sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded), &pubkey_hash);
 736
 737   crc.pkey = pkey;
 738   crc.pubkey = &pub;
 739   crc.rd = rd;
 740   crc.name = name_tmp;
 741
 742   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Creating record for name `%s' in zone `%s'\n", name_tmp, GNUNET_h2s(&pubkey_hash));
 743
 744   /* Get existing records for name */
 745   res = GSN_database->iterate_records(GSN_database->cls, &pubkey_hash, name_tmp, 0, &handle_create_record_it, &crc);
 746   if (res != GNUNET_SYSERR)
 747     res = GNUNET_OK;
 748   GNUNET_CRYPTO_rsa_key_free(pkey);
 749
 750   /* Send response */
 751 send:
 752   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Sending `%s' message\n", "RECORD_CREATE_RESPONSE");
 753   rcr_msg.gns_header.header.type = htons (GNUNET_MESSAGE_TYPE_NAMESTORE_RECORD_CREATE_RESPONSE);
 754   rcr_msg.gns_header.header.size = htons (sizeof (struct RecordCreateResponseMessage));
 755   rcr_msg.gns_header.r_id = htonl (rid);
 756   if ((GNUNET_OK == res) && (crc.res == GNUNET_YES))
 757     rcr_msg.op_result = htonl (GNUNET_YES);
 758   else if ((GNUNET_OK == res) && (crc.res == GNUNET_NO))
 759     rcr_msg.op_result = htonl (GNUNET_NO);
 760   else
 761     rcr_msg.op_result = htonl (GNUNET_SYSERR);
 762   GNUNET_SERVER_notification_context_unicast (snc, nc->client, (const struct GNUNET_MessageHeader *) &rcr_msg, GNUNET_NO);
 763
 764   GNUNET_SERVER_receive_done (client, GNUNET_OK);
 765 }
 766
 767
 768 struct RemoveRecordContext
 769 {
 770   struct GNUNET_NAMESTORE_RecordData *rd;
 771   struct GNUNET_CRYPTO_RsaPrivateKey *pkey;
 772   uint16_t op_res;
 773 };
 774
 775 static void
 776 handle_record_remove_it (void *cls,
 777     const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *zone_key,
 778     struct GNUNET_TIME_Absolute expire,
 779     const char *name,
 780     unsigned int rd_count,
 781     const struct GNUNET_NAMESTORE_RecordData *rd,
 782     const struct GNUNET_CRYPTO_RsaSignature *signature)
 783 {
 784   struct RemoveRecordContext *rrc = cls;
 785   unsigned int rd_count_new = rd_count -1;
 786   struct GNUNET_NAMESTORE_RecordData rd_new[rd_count_new];
 787   unsigned int c;
 788   int res;
 789   int found = GNUNET_NO;
 790
 791   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Name `%s 'currently has %u records\n", name, rd_count);
 792
 793   if (rd_count == 0)
 794   {
 795     /* Could not find record to remove */
 796     rrc->op_res = 1;
 797     return;
 798   }
 799
 800   /* Find record to remove */
 801   unsigned int c2 = 0;
 802   for (c = 0; c < rd_count; c++)
 803   {
 804     if ((rd[c].expiration.abs_value == rrc->rd->expiration.abs_value) &&
 805         (rd[c].flags == rrc->rd->flags) &&
 806         (rd[c].record_type == rrc->rd->record_type) &&
 807         (rd[c].data_size == rrc->rd->data_size) &&
 808         (0 == memcmp (rd[c].data, rrc->rd->data, rrc->rd->data_size)))
 809         {
 810           GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Found record to remove!\n", rd_count);
 811           found = GNUNET_YES;
 812           continue;
 813         }
 814     else
 815     {
 816       rd_new[c2] = rd[c];
 817       c2 ++;
 818     }
 819   }
 820   if ((c2 != rd_count_new) || (found == GNUNET_NO))
 821   {
 822     /* Could not find record to remove */
 823     rrc->op_res = 2;
 824     return;
 825   }
 826   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Name `%s' now has %u records\n", name, rd_count_new);
 827
 828   /* Create new signature */
 829   struct GNUNET_CRYPTO_RsaSignature * new_signature;
 830   new_signature = GNUNET_NAMESTORE_create_signature (rrc->pkey, name, rd_new, rd_count_new);
 831
 832   if (new_signature == NULL)
 833   {
 834     /* Signature failed */
 835     rrc->op_res = 3;
 836     return;
 837   }
 838
 839   /* Put records */
 840   res = GSN_database->put_records(GSN_database->cls,
 841                                   zone_key,
 842                                   expire,
 843                                   name,
 844                                   rd_count_new, rd_new,
 845                                   new_signature);
 846   GNUNET_free (new_signature);
 847
 848   if (GNUNET_OK != res)
 849   {
 850     /* Could put records into database */
 851     rrc->op_res = 4;
 852     return;
 853   }
 854
 855   rrc->op_res = 0;
 856 }
 857
 858 static void handle_record_remove (void *cls,
 859                           struct GNUNET_SERVER_Client * client,
 860                           const struct GNUNET_MessageHeader * message)
 861 {
 862   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received `%s' message\n", "NAMESTORE_RECORD_REMOVE");
 863   struct GNUNET_NAMESTORE_Client *nc;
 864   struct RecordRemoveResponseMessage rrr_msg;
 865   struct GNUNET_CRYPTO_RsaPrivateKey *pkey;
 866   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pub;
 867   GNUNET_HashCode pubkey_hash;
 868   char * pkey_tmp = NULL;
 869   char * name_tmp = NULL;
 870   char * rd_ser = NULL;
 871   size_t key_len = 0;
 872   size_t name_len = 0;
 873   size_t rd_ser_len = 0;
 874   size_t msg_size = 0;
 875   size_t msg_size_exp = 0;
 876   uint32_t rd_count;
 877   uint32_t rid = 0;
 878
 879   int res = GNUNET_SYSERR;
 880
 881   if (ntohs (message->size) < sizeof (struct RecordRemoveMessage))
 882   {
 883     GNUNET_break_op (0);
 884     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 885     return;
 886   }
 887
 888   nc = client_lookup(client);
 889   if (nc == NULL)
 890   {
 891     GNUNET_break_op (0);
 892     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 893     return;
 894   }
 895
 896   struct RecordRemoveMessage * rr_msg = (struct RecordRemoveMessage *) message;
 897   rid = ntohl (rr_msg->gns_header.r_id);
 898   name_len = ntohs (rr_msg->name_len);
 899   rd_ser_len = ntohs (rr_msg->rd_len);
 900   rd_count = ntohs (rr_msg->rd_count);
 901   key_len = ntohs (rr_msg->pkey_len);
 902   msg_size = ntohs (message->size);
 903
 904   if (msg_size > GNUNET_SERVER_MAX_MESSAGE_SIZE)
 905   {
 906     GNUNET_break_op (0);
 907     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 908     return;
 909   }
 910
 911   if ((rd_count != 1) || (rd_ser_len < 1) || (name_len >=256) || (name_len == 0))
 912   {
 913     GNUNET_break_op (0);
 914     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 915     return;
 916   }
 917
 918   msg_size_exp = sizeof (struct RecordRemoveMessage) + key_len + name_len + rd_ser_len;
 919   if (msg_size != msg_size_exp)
 920   {
 921     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Expected message %u size but message size is %u \n", msg_size_exp, msg_size);
 922     GNUNET_break_op (0);
 923     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 924     return;
 925   }
 926
 927   if ((rd_count != 1) || (rd_ser_len < 1) || (name_len >=256) || (name_len == 0))
 928   {
 929     GNUNET_break_op (0);
 930     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 931     return;
 932   }
 933
 934   pkey_tmp = (char *) &rr_msg[1];
 935   name_tmp = &pkey_tmp[key_len];
 936   rd_ser = &name_tmp[name_len];
 937
 938
 939   if ((name_len == 0) || (name_len > 256))
 940   {
 941     GNUNET_break_op (0);
 942     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 943     return;
 944   }
 945
 946   if (name_tmp[name_len -1] != '\0')
 947   {
 948     GNUNET_break_op (0);
 949     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 950     return;
 951   }
 952
 953   /* Extracting and converting private key */
 954   pkey = GNUNET_CRYPTO_rsa_decode_key((char *) pkey_tmp, key_len);
 955   GNUNET_assert (pkey != NULL);
 956   GNUNET_CRYPTO_rsa_key_get_public(pkey, &pub);
 957   GNUNET_CRYPTO_hash (&pub, sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded), &pubkey_hash);
 958
 959   struct GNUNET_NAMESTORE_RecordData rd[rd_count];
 960   res = GNUNET_NAMESTORE_records_deserialize(rd_ser_len, rd_ser, rd_count, rd);
 961   if ((res != GNUNET_OK) || (rd_count != 1))
 962   {
 963     GNUNET_break_op (0);
 964     goto send;
 965   }
 966
 967   struct RemoveRecordContext rrc;
 968   rrc.rd = rd;
 969   rrc.pkey = pkey;
 970
 971   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Removing record for name `%s' in zone `%s'\n", name_tmp, GNUNET_h2s(&pubkey_hash));
 972
 973   /* Database operation */
 974   res = GSN_database->iterate_records (GSN_database->cls,
 975                                        &pubkey_hash,
 976                                        name_tmp,
 977                                        0,
 978                                        handle_record_remove_it, &rrc);
 979
 980   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Removing record for name `%s': %s\n",
 981       name_tmp, (rrc.op_res == 0) ? "OK" : "FAIL");
 982   res = rrc.op_res;
 983
 984   /* Send response */
 985 send:
 986   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Sending `%s' message\n", "RECORD_REMOVE_RESPONSE");
 987   rrr_msg.gns_header.header.type = htons (GNUNET_MESSAGE_TYPE_NAMESTORE_RECORD_REMOVE_RESPONSE);
 988   rrr_msg.gns_header.header.size = htons (sizeof (struct RecordRemoveResponseMessage));
 989   rrr_msg.gns_header.r_id = htonl (rid);
 990   rrr_msg.op_result = htonl (res);
 991   GNUNET_SERVER_notification_context_unicast (snc, nc->client, (const struct GNUNET_MessageHeader *) &rrr_msg, GNUNET_NO);
 992
 993   GNUNET_CRYPTO_rsa_key_free (pkey);
 994
 995   GNUNET_SERVER_receive_done (client, GNUNET_OK);
 996 }
 997
 998
 999 struct ZoneToNameCtx
1000 {
1001   struct GNUNET_NAMESTORE_Client *nc;
1002   uint32_t rid;
1003 };
1004
1005 static void
1006 handle_zone_to_name_it (void *cls,
1007     const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *zone_key,
1008     struct GNUNET_TIME_Absolute expire,
1009     const char *name,
1010     unsigned int rd_count,
1011     const struct GNUNET_NAMESTORE_RecordData *rd,
1012     const struct GNUNET_CRYPTO_RsaSignature *signature)
1013 {
1014   struct ZoneToNameCtx * ztn_ctx = cls;
1015   struct ZoneToNameResponseMessage *ztnr_msg;
1016   int16_t res = GNUNET_SYSERR;
1017   uint16_t name_len = 0;
1018   uint16_t rd_ser_len = 0 ;
1019   int32_t contains_sig = 0;
1020   size_t msg_size = 0;
1021
1022   char *rd_ser = NULL;
1023   char *name_tmp;
1024   char *rd_tmp;
1025   char *sig_tmp;
1026
1027   if ((zone_key != NULL) && (name != NULL))
1028   {
1029     /* found result */
1030     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Found results: name is `%s', has %u records\n", name, rd_count);
1031     res = GNUNET_YES;
1032     name_len = strlen (name);
1033   }
1034   else
1035   {
1036     /* no result found */
1037     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Found no results\n");
1038     res = GNUNET_NO;
1039     name_len = 0;
1040   }
1041
1042   if (rd_count > 0)
1043   {
1044     rd_ser_len = GNUNET_NAMESTORE_records_get_size (rd_count, rd);
1045     rd_ser = GNUNET_malloc (rd_ser_len);
1046     GNUNET_NAMESTORE_records_serialize(rd_count, rd, rd_ser_len, rd_ser);
1047   }
1048   else
1049     rd_ser_len = 0;
1050
1051   if (signature != NULL)
1052     contains_sig = GNUNET_YES;
1053   else
1054     contains_sig = GNUNET_NO;
1055
1056
1057
1058   msg_size = sizeof (struct ZoneToNameResponseMessage) + name_len + rd_ser_len + contains_sig * sizeof (struct GNUNET_CRYPTO_RsaSignature);
1059   ztnr_msg = GNUNET_malloc (msg_size);
1060
1061   name_tmp = (char *) &ztnr_msg[1];
1062   rd_tmp = &name_tmp[name_len];
1063   sig_tmp = &rd_tmp[rd_ser_len];
1064
1065   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Sending `%s' message\n", "ZONE_TO_NAME_RESPONSE");
1066   ztnr_msg->gns_header.header.type = htons (GNUNET_MESSAGE_TYPE_NAMESTORE_ZONE_TO_NAME_RESPONSE);
1067   ztnr_msg->gns_header.header.size = htons (msg_size);
1068   ztnr_msg->gns_header.r_id = htonl (ztn_ctx->rid);
1069   ztnr_msg->res = htons (res);
1070   ztnr_msg->rd_len = htons (rd_ser_len);
1071   ztnr_msg->rd_count = htons (rd_count);
1072   ztnr_msg->name_len = htons (name_len);
1073   ztnr_msg->expire = GNUNET_TIME_absolute_hton(expire);
1074   if (zone_key != NULL)
1075     ztnr_msg->zone_key = *zone_key;
1076   else
1077     memset (&ztnr_msg->zone_key, '\0', sizeof (struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
1078
1079   memcpy (name_tmp, name, name_len);
1080
1081   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Name is `%s', has %u records, rd ser len %u msg_size %u\n", name, rd_count, rd_ser_len, msg_size);
1082   memcpy (rd_tmp, rd_ser, rd_ser_len);
1083   memcpy (sig_tmp, signature, contains_sig * sizeof (struct GNUNET_CRYPTO_RsaSignature));
1084
1085   GNUNET_SERVER_notification_context_unicast (snc, ztn_ctx->nc->client, (const struct GNUNET_MessageHeader *) ztnr_msg, GNUNET_NO);
1086   GNUNET_free (ztnr_msg);
1087   GNUNET_free_non_null (rd_ser);
1088 }
1089
1090
1091 static void handle_zone_to_name (void *cls,
1092                           struct GNUNET_SERVER_Client * client,
1093                           const struct GNUNET_MessageHeader * message)
1094 {
1095   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received `%s' message\n", "ZONE_TO_NAME");
1096   struct GNUNET_NAMESTORE_Client *nc;
1097   struct ZoneToNameCtx ztn_ctx;
1098   size_t msg_size = 0;
1099   uint32_t rid = 0;
1100
1101   if (ntohs (message->size) != sizeof (struct ZoneToNameMessage))
1102   {
1103     GNUNET_break_op (0);
1104     GNUNET_SERVER_receive_done (client, GNUNET_OK);
1105     return;
1106   }
1107
1108   nc = client_lookup(client);
1109   if (nc == NULL)
1110   {
1111     GNUNET_break_op (0);
1112     GNUNET_SERVER_receive_done (client, GNUNET_OK);
1113     return;
1114   }
1115
1116   struct ZoneToNameMessage *ztn_msg = (struct ZoneToNameMessage *) message;
1117
1118   if (msg_size > GNUNET_SERVER_MAX_MESSAGE_SIZE)
1119   {
1120     GNUNET_break_op (0);
1121     GNUNET_SERVER_receive_done (client, GNUNET_OK);
1122     return;
1123   }
1124
1125   rid = ntohl (ztn_msg->gns_header.r_id);
1126
1127   ztn_ctx.rid = rid;
1128   ztn_ctx.nc = nc;
1129
1130   char * z_tmp = strdup (GNUNET_h2s (&ztn_msg->zone));
1131   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Looking up name for zone `%s' in zone `%s'\n",
1132       z_tmp,
1133       GNUNET_h2s (&ztn_msg->value_zone));
1134   GNUNET_free (z_tmp);
1135
1136   GSN_database->zone_to_name (GSN_database->cls, &ztn_msg->zone, &ztn_msg->value_zone, &handle_zone_to_name_it, &ztn_ctx);
1137
1138   GNUNET_SERVER_receive_done (client, GNUNET_OK);
1139 }
1140
1141 struct ZoneIterationProcResult
1142 {
1143   int have_zone_key;
1144   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded zone_key;
1145
1146   int have_signature;
1147   struct GNUNET_CRYPTO_RsaSignature signature;
1148   struct GNUNET_TIME_Absolute expire;
1149
1150   int have_name;
1151   char name[256];
1152
1153   size_t rd_ser_len;
1154   char *rd_ser;
1155 };
1156
1157
1158 void zone_iteration_proc (void *cls,
1159                          const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *zone_key,
1160                          struct GNUNET_TIME_Absolute expire,
1161                          const char *name,
1162                          unsigned int rd_count,
1163                          const struct GNUNET_NAMESTORE_RecordData *rd,
1164                          const struct GNUNET_CRYPTO_RsaSignature *signature)
1165 {
1166   struct ZoneIterationProcResult *zipr = cls;
1167   size_t len;
1168   if (zone_key != NULL)
1169   {
1170     zipr->zone_key = *zone_key;
1171     zipr->have_zone_key = GNUNET_YES;
1172   }
1173   else
1174     zipr->have_zone_key = GNUNET_NO;
1175
1176   zipr->expire = expire;
1177
1178   if (name != NULL)
1179   {
1180     memcpy (zipr->name, name, strlen(name) + 1);
1181     zipr->have_name = GNUNET_YES;
1182   }
1183   else
1184     zipr->have_name = GNUNET_NO;
1185
1186   if (signature != NULL)
1187   {
1188     zipr->signature = *signature;
1189     zipr->have_signature = GNUNET_YES;
1190   }
1191   else
1192     zipr->have_signature = GNUNET_NO;
1193
1194   if ((rd_count > 0) && (rd != NULL))
1195   {
1196     len = GNUNET_NAMESTORE_records_get_size(rd_count, rd);
1197     zipr->rd_ser = GNUNET_malloc (len);
1198     GNUNET_NAMESTORE_records_serialize(rd_count, rd, len, zipr->rd_ser);
1199     zipr->rd_ser_len = len;
1200   }
1201 }
1202
1203 static void handle_iteration_start (void *cls,
1204                           struct GNUNET_SERVER_Client * client,
1205                           const struct GNUNET_MessageHeader * message)
1206 {
1207   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received `%s' message\n", "ZONE_ITERATION_START");
1208
1209   struct ZoneIterationStartMessage * zis_msg = (struct ZoneIterationStartMessage *) message;
1210   struct GNUNET_NAMESTORE_Client *nc;
1211   struct GNUNET_NAMESTORE_ZoneIteration *zi;
1212   struct ZoneIterationResponseMessage zir_msg;
1213   struct ZoneIterationProcResult zipr;
1214   int res;
1215
1216   nc = client_lookup(client);
1217   if (nc == NULL)
1218   {
1219     GNUNET_break_op (0);
1220     GNUNET_SERVER_receive_done (client, GNUNET_OK);
1221     return;
1222   }
1223
1224   zi = GNUNET_malloc (sizeof (struct GNUNET_NAMESTORE_ZoneIteration));
1225   zi->request_id = ntohl (zis_msg->gns_header.r_id);
1226   zi->offset = 0;
1227   zi->client = nc;
1228   zi->zone = zis_msg->zone;
1229
1230   GNUNET_CONTAINER_DLL_insert (nc->op_head, nc->op_tail, zi);
1231
1232   res = GSN_database->iterate_records (GSN_database->cls, &zis_msg->zone, NULL, zi->offset , &zone_iteration_proc, &zipr);
1233   switch (res) {
1234     case GNUNET_OK:
1235       /* GNUNET_OK on success */
1236
1237       break;
1238     case GNUNET_SYSERR:
1239       /* GNUNET_SYSERR on error */
1240       break;
1241     case GNUNET_NO:
1242       /* GNUNET_NO if there were no results, */
1243       break;
1244     default:
1245       break;
1246   }
1247
1248
1249
1250   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Sending `%s' message\n", "ZONE_ITERATION_RESPONSE");
1251   zir_msg.gns_header.header.type = htons (GNUNET_MESSAGE_TYPE_NAMESTORE_ZONE_ITERATION_RESPONSE);
1252   zir_msg.gns_header.header.size = htons (sizeof (struct ZoneIterationResponseMessage));
1253   zir_msg.gns_header.r_id = htonl(zi->request_id);
1254
1255   GNUNET_SERVER_notification_context_unicast (snc, zi->client->client, (const struct GNUNET_MessageHeader *) &zir_msg, GNUNET_NO);
1256
1257   GNUNET_SERVER_receive_done (client, GNUNET_OK);
1258 }
1259
1260 static void handle_iteration_stop (void *cls,
1261                           struct GNUNET_SERVER_Client * client,
1262                           const struct GNUNET_MessageHeader * message)
1263 {
1264   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received `%s' message\n", "ZONE_ITERATION_STOP");
1265
1266   struct GNUNET_NAMESTORE_Client *nc;
1267   struct GNUNET_NAMESTORE_ZoneIteration *zi;
1268   struct ZoneIterationStopMessage * zis_msg = (struct ZoneIterationStopMessage *) message;
1269   uint32_t rid;
1270
1271   nc = client_lookup(client);
1272   if (nc == NULL)
1273   {
1274     GNUNET_break_op (0);
1275     GNUNET_SERVER_receive_done (client, GNUNET_OK);
1276     return;
1277   }
1278
1279   rid = ntohl (zis_msg->gns_header.r_id);
1280   for (zi = nc->op_head; zi != NULL; zi = zi->next)
1281   {
1282     if (zi->request_id == rid)
1283       break;
1284   }
1285   if (zi == NULL)
1286   {
1287     GNUNET_break_op (0);
1288     GNUNET_SERVER_receive_done (client, GNUNET_OK);
1289     return;
1290   }
1291
1292   GNUNET_CONTAINER_DLL_remove(nc->op_head, nc->op_tail, zi);
1293   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Stopped zone iteration for zone `%s'\n", GNUNET_h2s (&zi->zone));
1294   GNUNET_free (zi);
1295
1296   GNUNET_SERVER_receive_done (client, GNUNET_OK);
1297 }
1298
1299 static void handle_iteration_next (void *cls,
1300                           struct GNUNET_SERVER_Client * client,
1301                           const struct GNUNET_MessageHeader * message)
1302 {
1303   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Received `%s' message\n", "ZONE_ITERATION_NEXT");
1304
1305   struct GNUNET_NAMESTORE_Client *nc;
1306   struct GNUNET_NAMESTORE_ZoneIteration *zi;
1307   struct ZoneIterationStopMessage * zis_msg = (struct ZoneIterationStopMessage *) message;
1308   uint32_t rid;
1309
1310   nc = client_lookup(client);
1311   if (nc == NULL)
1312   {
1313     GNUNET_break_op (0);
1314     GNUNET_SERVER_receive_done (client, GNUNET_OK);
1315     return;
1316   }
1317
1318   rid = ntohl (zis_msg->gns_header.r_id);
1319   for (zi = nc->op_head; zi != NULL; zi = zi->next)
1320   {
1321     if (zi->request_id == rid)
1322       break;
1323   }
1324   if (zi == NULL)
1325   {
1326     GNUNET_break_op (0);
1327     GNUNET_SERVER_receive_done (client, GNUNET_OK);
1328     return;
1329   }
1330
1331   zi->offset++;
1332   GSN_database->iterate_records (GSN_database->cls, &zi->zone, NULL, zi->offset , &zone_iteration_proc, zi);
1333 }
1334
1335
1336
1337 /**
1338  * Process template requests.
1339  *
1340  * @param cls closure
1341  * @param server the initialized server
1342  * @param cfg configuration to use
1343  */
1344 static void
1345 run (void *cls, struct GNUNET_SERVER_Handle *server,
1346      const struct GNUNET_CONFIGURATION_Handle *cfg)
1347 {
1348   char * database;
1349
1350   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Starting namestore service\n");
1351
1352   static const struct GNUNET_SERVER_MessageHandler handlers[] = {
1353     {&handle_start, NULL,
1354      GNUNET_MESSAGE_TYPE_NAMESTORE_START, sizeof (struct StartMessage)},
1355     {&handle_lookup_name, NULL,
1356      GNUNET_MESSAGE_TYPE_NAMESTORE_LOOKUP_NAME, 0},
1357     {&handle_record_put, NULL,
1358     GNUNET_MESSAGE_TYPE_NAMESTORE_RECORD_PUT, 0},
1359     {&handle_record_create, NULL,
1360      GNUNET_MESSAGE_TYPE_NAMESTORE_RECORD_CREATE, 0},
1361     {&handle_record_remove, NULL,
1362      GNUNET_MESSAGE_TYPE_NAMESTORE_RECORD_REMOVE, 0},
1363     {&handle_zone_to_name, NULL,
1364       GNUNET_MESSAGE_TYPE_NAMESTORE_ZONE_TO_NAME, 0},
1365     {&handle_iteration_start, NULL,
1366      GNUNET_MESSAGE_TYPE_NAMESTORE_ZONE_ITERATION_START, sizeof (struct ZoneIterationStartMessage)},
1367     {&handle_iteration_next, NULL,
1368      GNUNET_MESSAGE_TYPE_NAMESTORE_ZONE_ITERATION_NEXT, 0},
1369      {&handle_iteration_stop, NULL,
1370       GNUNET_MESSAGE_TYPE_NAMESTORE_ZONE_ITERATION_STOP, 0},
1371     {NULL, NULL, 0, 0}
1372   };
1373
1374   GSN_cfg = cfg;
1375
1376   /* Loading database plugin */
1377   if (GNUNET_OK !=
1378       GNUNET_CONFIGURATION_get_value_string (cfg, "namestore", "database",
1379                                              &database))
1380     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "No database backend configured\n");
1381
1382   GNUNET_asprintf (&db_lib_name, "libgnunet_plugin_namestore_%s", database);
1383   GSN_database = GNUNET_PLUGIN_load (db_lib_name, (void *) GSN_cfg);
1384   if (GSN_database == NULL)
1385     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, "Could not load database backend `%s'\n",
1386         db_lib_name);
1387   GNUNET_free (database);
1388
1389   /* Configuring server handles */
1390   GNUNET_SERVER_add_handlers (server, handlers);
1391   snc = GNUNET_SERVER_notification_context_create (server, 16);
1392   GNUNET_SERVER_disconnect_notify (server,
1393                                    &client_disconnect_notification,
1394                                    NULL);
1395
1396   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL, &cleanup_task,
1397                                 NULL);
1398
1399 }
1400
1401
1402 /**
1403  * The main function for the template service.
1404  *
1405  * @param argc number of arguments from the command line
1406  * @param argv command line arguments
1407  * @return 0 ok, 1 on error
1408  */
1409 int
1410 main (int argc, char *const *argv)
1411 {
1412   return (GNUNET_OK ==
1413           GNUNET_SERVICE_run (argc, argv, "namestore",
1414                               GNUNET_SERVICE_OPTION_NONE, &run, NULL)) ? 0 : 1;
1415 }
1416
1417 /* end of gnunet-service-namestore.c */
1418