src/dv/gnunet-service-dv.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 dv/gnunet-service-dv.c
  23  * @brief the distance vector service, primarily handles gossip of nearby
  24  * peers and sending/receiving DV messages from core and decapsulating
  25  * them
  26  *
  27  * @author Christian Grothoff
  28  * @author Nathan Evans
  29  *
  30  * TODO: The gossip rates need to be worked out.  Probably many other things
  31  * as well.
  32  *
  33  */
  34 #include "platform.h"
  35 #include "gnunet_client_lib.h"
  36 #include "gnunet_getopt_lib.h"
  37 #include "gnunet_os_lib.h"
  38 #include "gnunet_protocols.h"
  39 #include "gnunet_service_lib.h"
  40 #include "gnunet_core_service.h"
  41 #include "gnunet_signal_lib.h"
  42 #include "gnunet_util_lib.h"
  43 #include "gnunet_hello_lib.h"
  44 #include "gnunet_peerinfo_service.h"
  45 #include "gnunet_crypto_lib.h"
  46 #include "gnunet_statistics_service.h"
  47 #include "dv.h"
  48
  49 /**
  50  * For testing mostly, remember only the
  51  * shortest path to a distant neighbor.
  52  */
  53 #define AT_MOST_ONE GNUNET_NO
  54
  55 #define USE_PEER_ID GNUNET_YES
  56
  57 /**
  58  * How many outstanding messages (unknown sender) will we allow per peer?
  59  */
  60 #define MAX_OUTSTANDING_MESSAGES 5
  61
  62 /**
  63  * How often do we check about sending out more peer information (if
  64  * we are connected to no peers previously).
  65  */
  66 #define GNUNET_DV_DEFAULT_SEND_INTERVAL GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_MILLISECONDS, 500000)
  67
  68 /**
  69  * How long do we wait at most between sending out information?
  70  */
  71 #define GNUNET_DV_MAX_SEND_INTERVAL GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_MILLISECONDS, 500000)
  72
  73 /**
  74  * How long can we have not heard from a peer and
  75  * still have it in our tables?
  76  */
  77 #define GNUNET_DV_PEER_EXPIRATION_TIME GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 1000))
  78
  79 /**
  80  * Priority for gossip.
  81  */
  82 #define GNUNET_DV_DHT_GOSSIP_PRIORITY (GNUNET_EXTREME_PRIORITY / 10)
  83
  84 /**
  85  * How often should we check if expiration time has elapsed for
  86  * some peer?
  87  */
  88 #define GNUNET_DV_MAINTAIN_FREQUENCY GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 5))
  89
  90 /**
  91  * How long to allow a message to be delayed?
  92  */
  93 #define DV_DELAY GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 5))
  94
  95 /**
  96  * Priority to use for DV data messages.
  97  */
  98 #define DV_PRIORITY 0
  99
 100 /**
 101  * The cost to a direct neighbor.  We used to use 0, but 1 makes more sense.
 102  */
 103 #define DIRECT_NEIGHBOR_COST 1
 104
 105 /**
 106  * The default number of direct connections to store in DV (max)
 107  */
 108 #define DEFAULT_DIRECT_CONNECTIONS 50
 109
 110 /**
 111  * The default size of direct + extended peers in DV (max)
 112  */
 113 #define DEFAULT_DV_SIZE 100
 114
 115 /**
 116  * The default fisheye depth, from how many hops away will
 117  * we keep peers?
 118  */
 119 #define DEFAULT_FISHEYE_DEPTH 4
 120
 121 /**
 122  * Linked list of messages to send to clients.
 123  */
 124 struct PendingMessage
 125 {
 126   /**
 127    * Pointer to next item in the list
 128    */
 129   struct PendingMessage *next;
 130
 131   /**
 132    * Pointer to previous item in the list
 133    */
 134   struct PendingMessage *prev;
 135
 136   /**
 137    * The PeerIdentity to send to
 138    */
 139   struct GNUNET_PeerIdentity recipient;
 140
 141   /**
 142    * The result of message sending.
 143    */
 144   struct GNUNET_DV_SendResultMessage *send_result;
 145
 146   /**
 147    * Message importance level.
 148    */
 149   unsigned int importance;
 150
 151   /**
 152    * Size of message.
 153    */
 154   unsigned int msg_size;
 155
 156   /**
 157    * How long to wait before sending message.
 158    */
 159   struct GNUNET_TIME_Relative timeout;
 160
 161   /**
 162    * Actual message to be sent; // avoid allocation
 163    */
 164   const struct GNUNET_MessageHeader *msg; // msg = (cast) &pm[1]; // memcpy (&pm[1], data, len);
 165
 166 };
 167
 168 struct FastGossipNeighborList
 169 {
 170   /**
 171    * Next element of DLL
 172    */
 173   struct FastGossipNeighborList *next;
 174
 175   /**
 176    * Prev element of DLL
 177    */
 178   struct FastGossipNeighborList *prev;
 179
 180   /**
 181    * The neighbor to gossip about
 182    */
 183   struct DistantNeighbor *about;
 184 };
 185
 186 /**
 187  * Context created whenever a direct peer connects to us,
 188  * used to gossip other peers to it.
 189  */
 190 struct NeighborSendContext
 191 {
 192   /**
 193    * The peer we will gossip to.
 194    */
 195   struct DirectNeighbor *toNeighbor;
 196
 197   /**
 198    * The task associated with this context.
 199    */
 200   GNUNET_SCHEDULER_TaskIdentifier task;
 201
 202   /**
 203    * Head of DLL of peers to gossip about
 204    * as fast as possible to this peer, for initial
 205    * set up.
 206    */
 207   struct FastGossipNeighborList *fast_gossip_list_head;
 208
 209   /**
 210    * Tail of DLL of peers to gossip about
 211    * as fast as possible to this peer, for initial
 212    * set up.
 213    */
 214   struct FastGossipNeighborList *fast_gossip_list_tail;
 215
 216 };
 217
 218
 219 /**
 220  * Struct to hold information for updating existing neighbors
 221  */
 222 struct NeighborUpdateInfo
 223 {
 224   /**
 225    * Cost
 226    */
 227   unsigned int cost;
 228
 229   /**
 230    * The existing neighbor
 231    */
 232   struct DistantNeighbor *neighbor;
 233
 234   /**
 235    * The referrer of the possibly existing peer
 236    */
 237   struct DirectNeighbor *referrer;
 238
 239   /**
 240    * The time we heard about this peer
 241    */
 242   struct GNUNET_TIME_Absolute now;
 243
 244   /**
 245    * Peer id this peer uses to refer to neighbor.
 246    */
 247   unsigned int referrer_peer_id;
 248
 249 };
 250
 251 /**
 252  * Struct to store a single message received with
 253  * an unknown sender.
 254  */
 255 struct UnknownSenderMessage
 256 {
 257   /**
 258    * Message sender (immediate)
 259    */
 260   struct GNUNET_PeerIdentity sender;
 261
 262   /**
 263    * The actual message received
 264    */
 265   struct GNUNET_MessageHeader *message;
 266
 267   /**
 268    * Latency of connection
 269    */
 270   struct GNUNET_TIME_Relative latency;
 271
 272   /**
 273    * Distance to destination
 274    */
 275   uint32_t distance;
 276
 277   /**
 278    * Unknown sender id
 279    */
 280   uint32_t sender_id;
 281 };
 282
 283 /**
 284  * Struct where actual neighbor information is stored,
 285  * referenced by min_heap and max_heap.  Freeing dealt
 286  * with when items removed from hashmap.
 287  */
 288 struct DirectNeighbor
 289 {
 290   /**
 291    * Identity of neighbor.
 292    */
 293   struct GNUNET_PeerIdentity identity;
 294
 295   /**
 296    * PublicKey of neighbor.
 297    */
 298   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pkey;
 299
 300   /**
 301    * Head of DLL of nodes that this direct neighbor referred to us.
 302    */
 303   struct DistantNeighbor *referee_head;
 304
 305   /**
 306    * Tail of DLL of nodes that this direct neighbor referred to us.
 307    */
 308   struct DistantNeighbor *referee_tail;
 309
 310   /**
 311    * The sending context for gossiping peers to this neighbor.
 312    */
 313   struct NeighborSendContext *send_context;
 314
 315   /**
 316    * Is this one of the direct neighbors that we are "hiding"
 317    * from DV?
 318    */
 319   int hidden;
 320
 321   /**
 322    * Save messages immediately from this direct neighbor from a
 323    * distan peer we don't know on the chance that it will be
 324    * gossiped about and we can deliver the message.
 325    */
 326   struct UnknownSenderMessage pending_messages[MAX_OUTSTANDING_MESSAGES];
 327 };
 328
 329
 330 /**
 331  * Struct where actual neighbor information is stored,
 332  * referenced by min_heap and max_heap.  Freeing dealt
 333  * with when items removed from hashmap.
 334  */
 335 struct DistantNeighbor
 336 {
 337   /**
 338    * We keep distant neighbor's of the same referrer in a DLL.
 339    */
 340   struct DistantNeighbor *next;
 341
 342   /**
 343    * We keep distant neighbor's of the same referrer in a DLL.
 344    */
 345   struct DistantNeighbor *prev;
 346
 347   /**
 348    * Node in min heap
 349    */
 350   struct GNUNET_CONTAINER_HeapNode *min_loc;
 351
 352   /**
 353    * Node in max heap
 354    */
 355   struct GNUNET_CONTAINER_HeapNode *max_loc;
 356
 357   /**
 358    * Identity of referrer (next hop towards 'neighbor').
 359    */
 360   struct DirectNeighbor *referrer;
 361
 362   /**
 363    * Identity of neighbor.
 364    */
 365   struct GNUNET_PeerIdentity identity;
 366
 367   /**
 368    * PublicKey of neighbor.
 369    */
 370   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *pkey;
 371
 372   /**
 373    * Last time we received routing information from this peer
 374    */
 375   struct GNUNET_TIME_Absolute last_activity;
 376
 377   /**
 378    * Last time we sent routing information about this peer
 379    */
 380   struct GNUNET_TIME_Absolute last_gossip;
 381
 382   /**
 383    * Cost to neighbor, used for actual distance vector computations
 384    */
 385   unsigned int cost;
 386
 387   /**
 388    * Random identifier *we* use for this peer, to be used as shortcut
 389    * instead of sending full peer id for each message
 390    */
 391   unsigned int our_id;
 392
 393   /**
 394    * Random identifier the *referrer* uses for this peer.
 395    */
 396   unsigned int referrer_id;
 397
 398   /**
 399    * Is this one of the direct neighbors that we are "hiding"
 400    * from DV?
 401    */
 402   int hidden;
 403
 404 };
 405
 406 struct PeerIteratorContext
 407 {
 408   /**
 409    * The actual context, to be freed later.
 410    */
 411   struct GNUNET_PEERINFO_IteratorContext *ic;
 412
 413   /**
 414    * The neighbor about which we are concerned.
 415    */
 416   struct DirectNeighbor *neighbor;
 417
 418   /**
 419    * The distant neighbor entry for this direct neighbor.
 420    */
 421   struct DistantNeighbor *distant;
 422
 423 };
 424
 425 /**
 426  * Context used for creating hello messages when
 427  * gossips are received.
 428  */
 429 struct HelloContext
 430 {
 431   /**
 432    * Identity of distant neighbor.
 433    */
 434   struct GNUNET_PeerIdentity distant_peer;
 435
 436   /**
 437    * Identity of direct neighbor, via which we send this message.
 438    */
 439   const struct GNUNET_PeerIdentity *direct_peer;
 440
 441   /**
 442    * How many addresses do we need to add (always starts at 1, then set to 0)
 443    */
 444   int addresses_to_add;
 445
 446 };
 447
 448 struct DV_SendContext
 449 {
 450   /**
 451    * The distant peer (should always match)
 452    */
 453   struct GNUNET_PeerIdentity *distant_peer;
 454
 455   /**
 456    * The direct peer, we need to verify the referrer of.
 457    */
 458   struct GNUNET_PeerIdentity *direct_peer;
 459
 460   /**
 461    * The message to be sent
 462    */
 463   struct GNUNET_MessageHeader *message;
 464
 465   /**
 466    * The pre-built send result message.  Simply needs to be queued
 467    * and freed once send has been called!
 468    */
 469   struct GNUNET_DV_SendResultMessage *send_result;
 470
 471   /**
 472    * The size of the message being sent, may be larger
 473    * than message->header.size because it's multiple
 474    * messages packed into one!
 475    */
 476   size_t message_size;
 477
 478   /**
 479    * How important is this message?
 480    */
 481   unsigned int importance;
 482
 483   /**
 484    * Timeout for this message
 485    */
 486   struct GNUNET_TIME_Relative timeout;
 487
 488   /**
 489    * Unique ID for DV message
 490    */
 491   unsigned int uid;
 492 };
 493
 494 struct FindDestinationContext
 495 {
 496   unsigned int tid;
 497   struct DistantNeighbor *dest;
 498 };
 499
 500 struct FindIDContext
 501 {
 502   unsigned int tid;
 503   struct GNUNET_PeerIdentity *dest;
 504   const struct GNUNET_PeerIdentity *via;
 505 };
 506
 507 struct DisconnectContext
 508 {
 509   /**
 510    * Distant neighbor to get pid from.
 511    */
 512   struct DistantNeighbor *distant;
 513
 514   /**
 515    * Direct neighbor that disconnected.
 516    */
 517   struct DirectNeighbor *direct;
 518 };
 519
 520 struct TokenizedMessageContext
 521 {
 522   /**
 523    * Immediate sender of this message
 524    */
 525   const struct GNUNET_PeerIdentity *peer;
 526
 527   /**
 528    * Distant sender of the message
 529    */
 530   struct DistantNeighbor *distant;
 531
 532   /**
 533    * Uid for this set of messages
 534    */
 535   uint32_t uid;
 536 };
 537
 538 /**
 539  * Context for finding the least cost peer to send to.
 540  * Transport selection can only go so far.
 541  */
 542 struct FindLeastCostContext
 543 {
 544   struct DistantNeighbor *target;
 545   unsigned int least_cost;
 546 };
 547
 548 /**
 549  * Handle to the core service api.
 550  */
 551 static struct GNUNET_CORE_Handle *coreAPI;
 552
 553 /**
 554  * Stream tokenizer to handle messages coming in from core.
 555  */
 556 static struct GNUNET_SERVER_MessageStreamTokenizer *coreMST;
 557
 558 /**
 559  * The identity of our peer.
 560  */
 561 static struct GNUNET_PeerIdentity my_identity;
 562
 563 /**
 564  * The configuration for this service.
 565  */
 566 static const struct GNUNET_CONFIGURATION_Handle *cfg;
 567
 568 /**
 569  * The scheduler for this service.
 570  */
 571 static struct GNUNET_SCHEDULER_Handle *sched;
 572
 573 /**
 574  * The client, the DV plugin connected to us.  Hopefully
 575  * this client will never change, although if the plugin dies
 576  * and returns for some reason it may happen.
 577  */
 578 static struct GNUNET_SERVER_Client * client_handle;
 579
 580 /**
 581  * Task to run when we shut down, cleaning up all our trash
 582  */
 583 static GNUNET_SCHEDULER_TaskIdentifier cleanup_task;
 584
 585 static size_t default_dv_priority = 0;
 586
 587 static char *my_short_id;
 588
 589 /**
 590  * Transmit handle to the plugin.
 591  */
 592 static struct GNUNET_CONNECTION_TransmitHandle * plugin_transmit_handle;
 593
 594 /**
 595  * Head of DLL for client messages
 596  */
 597 static struct PendingMessage *plugin_pending_head;
 598
 599 /**
 600  * Tail of DLL for client messages
 601  */
 602 static struct PendingMessage *plugin_pending_tail;
 603
 604 /**
 605  * Handle to the peerinfo service
 606  */
 607 static struct GNUNET_PEERINFO_Handle *peerinfo_handle;
 608
 609 /**
 610  * Transmit handle to core service.
 611  */
 612 static struct GNUNET_CORE_TransmitHandle * core_transmit_handle;
 613
 614 /**
 615  * Head of DLL for core messages
 616  */
 617 static struct PendingMessage *core_pending_head;
 618
 619 /**
 620  * Tail of DLL for core messages
 621  */
 622 static struct PendingMessage *core_pending_tail;
 623
 624 /**
 625  * Map of PeerIdentifiers to 'struct GNUNET_dv_neighbor*'s for all
 626  * directly connected peers.
 627  */
 628 static struct GNUNET_CONTAINER_MultiHashMap *direct_neighbors;
 629
 630 /**
 631  * Map of PeerIdentifiers to 'struct GNUNET_dv_neighbor*'s for
 632  * peers connected via DV (extended neighborhood).  Does ALSO
 633  * include any peers that are in 'direct_neighbors'; for those
 634  * peers, the cost will be zero and the referrer all zeros.
 635  */
 636 static struct GNUNET_CONTAINER_MultiHashMap *extended_neighbors;
 637
 638 /**
 639  * We use the min heap (min refers to cost) to prefer
 640  * gossipping about peers with small costs.
 641  */
 642 static struct GNUNET_CONTAINER_Heap *neighbor_min_heap;
 643
 644 /**
 645  * We use the max heap (max refers to cost) for general
 646  * iterations over all peers and to remove the most costly
 647  * connection if we have too many.
 648  */
 649 static struct GNUNET_CONTAINER_Heap *neighbor_max_heap;
 650
 651 /**
 652  * Handle for the statistics service.
 653  */
 654 struct GNUNET_STATISTICS_Handle *stats;
 655
 656 /**
 657  * How far out to keep peers we learn about.
 658  */
 659 static unsigned long long fisheye_depth;
 660
 661 /**
 662  * How many peers to store at most.
 663  */
 664 static unsigned long long max_table_size;
 665
 666 /**
 667  * We've been given a target ID based on the random numbers that
 668  * we assigned to our DV-neighborhood.  Find the entry for the
 669  * respective neighbor.
 670  */
 671 static int
 672 find_destination (void *cls,
 673                   struct GNUNET_CONTAINER_HeapNode *node,
 674                   void *element, GNUNET_CONTAINER_HeapCostType cost)
 675 {
 676   struct FindDestinationContext *fdc = cls;
 677   struct DistantNeighbor *dn = element;
 678
 679   if (fdc->tid != dn->our_id)
 680     return GNUNET_YES;
 681   fdc->dest = dn;
 682   return GNUNET_NO;
 683 }
 684
 685
 686 /**
 687  * We've been given a target ID based on the random numbers that
 688  * we assigned to our DV-neighborhood.  Find the entry for the
 689  * respective neighbor.
 690  */
 691 static int
 692 find_specific_id (void *cls,
 693                   const GNUNET_HashCode *key,
 694                   void *value)
 695 {
 696   struct FindIDContext *fdc = cls;
 697   struct DistantNeighbor *dn = value;
 698
 699   if (memcmp(&dn->referrer->identity, fdc->via, sizeof(struct GNUNET_PeerIdentity)) == 0)
 700     {
 701       fdc->tid = dn->referrer_id;
 702       return GNUNET_NO;
 703     }
 704   return GNUNET_YES;
 705 }
 706
 707 /**
 708  * Find a distant peer whose referrer_id matches what we're
 709  * looking for.  For looking up a peer we've gossipped about
 710  * but is now disconnected.  Need to do this because we don't
 711  * want to remove those that may be accessible via a different
 712  * route.
 713  */
 714 static int find_distant_peer (void *cls,
 715                               const GNUNET_HashCode * key,
 716                               void *value)
 717 {
 718   struct FindDestinationContext *fdc = cls;
 719   struct DistantNeighbor *distant = value;
 720
 721   if (fdc->tid == distant->referrer_id)
 722     {
 723       fdc->dest = distant;
 724       return GNUNET_NO;
 725     }
 726   return GNUNET_YES;
 727 }
 728
 729 /**
 730  * Function called to notify a client about the socket
 731  * begin ready to queue more data.  "buf" will be
 732  * NULL and "size" zero if the socket was closed for
 733  * writing in the meantime.
 734  *
 735  * @param cls closure
 736  * @param size number of bytes available in buf
 737  * @param buf where the callee should write the message
 738  * @return number of bytes written to buf
 739  */
 740 size_t transmit_to_plugin (void *cls,
 741                            size_t size, void *buf)
 742 {
 743   char *cbuf = buf;
 744   struct PendingMessage *reply;
 745   size_t off;
 746   size_t msize;
 747
 748   if (buf == NULL)
 749     {
 750       /* client disconnected */
 751 #if DEBUG_DV_MESSAGES
 752       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "%s: %s buffer was NULL (client disconnect?)\n", my_short_id, "transmit_to_plugin");
 753 #endif
 754       return 0;
 755     }
 756   plugin_transmit_handle = NULL;
 757   off = 0;
 758   while ( (NULL != (reply = plugin_pending_head)) &&
 759           (size >= off + (msize = ntohs (reply->msg->size))))
 760     {
 761       GNUNET_CONTAINER_DLL_remove (plugin_pending_head,
 762                                    plugin_pending_tail,
 763                                    reply);
 764       memcpy (&cbuf[off], reply->msg, msize);
 765       GNUNET_free (reply);
 766       off += msize;
 767     }
 768
 769   if (plugin_pending_head != NULL)
 770     plugin_transmit_handle = GNUNET_SERVER_notify_transmit_ready (client_handle,
 771                                                                   ntohs(plugin_pending_head->msg->size),
 772                                                                   GNUNET_TIME_UNIT_FOREVER_REL,
 773                                                                   &transmit_to_plugin, NULL);
 774
 775   return off;
 776 }
 777
 778 /**
 779  * Send a message to the dv plugin.
 780  *
 781  * @param sender the direct sender of the message
 782  * @param message the message to send to the plugin
 783  *        (may be an encapsulated type)
 784  * @param message_size the size of the message to be sent
 785  * @param distant_neighbor the original sender of the message
 786  * @param cost the cost to the original sender of the message
 787  */
 788 void send_to_plugin(const struct GNUNET_PeerIdentity * sender,
 789                     const struct GNUNET_MessageHeader *message,
 790                     size_t message_size,
 791                     struct GNUNET_PeerIdentity *distant_neighbor,
 792                     size_t cost)
 793 {
 794   struct GNUNET_DV_MessageReceived *received_msg;
 795   struct PendingMessage *pending_message;
 796   char *sender_address;
 797   size_t sender_address_len;
 798   char *packed_msg_start;
 799   int size;
 800
 801 #if DEBUG_DV
 802   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "send_to_plugin called with peer %s as sender\n", GNUNET_i2s(distant_neighbor));
 803 #endif
 804
 805   if (memcmp(sender, distant_neighbor, sizeof(struct GNUNET_PeerIdentity)) != 0)
 806   {
 807     sender_address_len = sizeof(struct GNUNET_PeerIdentity) * 2;
 808     sender_address = GNUNET_malloc(sender_address_len);
 809     memcpy(sender_address, distant_neighbor, sizeof(struct GNUNET_PeerIdentity));
 810     memcpy(&sender_address[sizeof(struct GNUNET_PeerIdentity)], sender, sizeof(struct GNUNET_PeerIdentity));
 811   }
 812   else
 813   {
 814     sender_address_len = sizeof(struct GNUNET_PeerIdentity);
 815     sender_address = GNUNET_malloc(sender_address_len);
 816     memcpy(sender_address, sender, sizeof(struct GNUNET_PeerIdentity));
 817   }
 818
 819   size = sizeof(struct GNUNET_DV_MessageReceived) + sender_address_len + message_size;
 820   received_msg = GNUNET_malloc(size);
 821   received_msg->header.size = htons(size);
 822   received_msg->header.type = htons(GNUNET_MESSAGE_TYPE_TRANSPORT_DV_RECEIVE);
 823   received_msg->distance = htonl(cost);
 824   received_msg->msg_len = htonl(message_size);
 825   /* Set the sender in this message to be the original sender! */
 826   memcpy(&received_msg->sender, distant_neighbor, sizeof(struct GNUNET_PeerIdentity));
 827   /* Copy the intermediate sender to the end of the message, this is how the transport identifies this peer */
 828   memcpy(&received_msg[1], sender_address, sender_address_len);
 829   GNUNET_free(sender_address);
 830   /* Copy the actual message after the sender */
 831   packed_msg_start = (char *)&received_msg[1];
 832   packed_msg_start = &packed_msg_start[sender_address_len];
 833   memcpy(packed_msg_start, message, message_size);
 834   pending_message = GNUNET_malloc(sizeof(struct PendingMessage) + size);
 835   pending_message->msg = (struct GNUNET_MessageHeader *)&pending_message[1];
 836   memcpy(&pending_message[1], received_msg, size);
 837   GNUNET_free(received_msg);
 838
 839   GNUNET_CONTAINER_DLL_insert_after(plugin_pending_head, plugin_pending_tail, plugin_pending_tail, pending_message);
 840
 841   if (client_handle != NULL)
 842     {
 843       if (plugin_transmit_handle == NULL)
 844         {
 845           plugin_transmit_handle = GNUNET_SERVER_notify_transmit_ready (client_handle,
 846                                                                         size, GNUNET_TIME_UNIT_FOREVER_REL,
 847                                                                         &transmit_to_plugin, NULL);
 848         }
 849     }
 850   else
 851     {
 852       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Failed to queue message for plugin, client_handle not yet set (how?)!\n");
 853     }
 854 }
 855
 856 /* Declare here so retry_core_send is aware of it */
 857 size_t core_transmit_notify (void *cls,
 858                              size_t size, void *buf);
 859
 860 /**
 861  *  Try to send another message from our core sending list
 862  */
 863 static void
 864 try_core_send (void *cls,
 865                  const struct GNUNET_SCHEDULER_TaskContext *tc)
 866 {
 867   struct PendingMessage *pending;
 868   pending = core_pending_head;
 869
 870   if (core_transmit_handle != NULL)
 871     return; /* Message send already in progress */
 872
 873   if (pending != NULL)
 874     core_transmit_handle = GNUNET_CORE_notify_transmit_ready(coreAPI, pending->importance, pending->timeout, &pending->recipient, pending->msg_size, &core_transmit_notify, NULL);
 875 }
 876
 877 /**
 878  * Function called to notify a client about the socket
 879  * being ready to queue more data.  "buf" will be
 880  * NULL and "size" zero if the socket was closed for
 881  * writing in the meantime.
 882  *
 883  * @param cls closure (NULL)
 884  * @param size number of bytes available in buf
 885  * @param buf where the callee should write the message
 886  * @return number of bytes written to buf
 887  */
 888 size_t core_transmit_notify (void *cls,
 889                              size_t size, void *buf)
 890 {
 891   char *cbuf = buf;
 892   struct PendingMessage *pending;
 893   struct PendingMessage *client_reply;
 894   size_t off;
 895   size_t msize;
 896
 897   if (buf == NULL)
 898     {
 899       /* client disconnected */
 900 #if DEBUG_DV
 901       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "`%s': buffer was NULL\n", "DHT");
 902 #endif
 903       return 0;
 904     }
 905
 906   core_transmit_handle = NULL;
 907   off = 0;
 908   pending = core_pending_head;
 909   if ( (pending != NULL) &&
 910           (size >= (msize = ntohs (pending->msg->size))))
 911     {
 912 #if DEBUG_DV
 913       GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "`%s' : transmit_notify (core) called with size %d\n", "dv service", msize);
 914 #endif
 915       GNUNET_CONTAINER_DLL_remove (core_pending_head,
 916                                    core_pending_tail,
 917                                    pending);
 918       if (pending->send_result != NULL) /* Will only be non-null if a real client asked for this send */
 919         {
 920           client_reply = GNUNET_malloc(sizeof(struct PendingMessage) + sizeof(struct GNUNET_DV_SendResultMessage));
 921           client_reply->msg = (struct GNUNET_MessageHeader *)&client_reply[1];
 922           memcpy(&client_reply[1], pending->send_result, sizeof(struct GNUNET_DV_SendResultMessage));
 923           GNUNET_free(pending->send_result);
 924
 925           GNUNET_CONTAINER_DLL_insert_after(plugin_pending_head, plugin_pending_tail, plugin_pending_tail, client_reply);
 926           if (client_handle != NULL)
 927             {
 928               if (plugin_transmit_handle == NULL)
 929                 {
 930                   plugin_transmit_handle = GNUNET_SERVER_notify_transmit_ready (client_handle,
 931                                                                                 sizeof(struct GNUNET_DV_SendResultMessage),
 932                                                                                 GNUNET_TIME_UNIT_FOREVER_REL,
 933                                                                                 &transmit_to_plugin, NULL);
 934                 }
 935               else
 936                 {
 937                   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Failed to queue message for plugin, must be one in progress already!!\n");
 938                 }
 939             }
 940         }
 941       memcpy (&cbuf[off], pending->msg, msize);
 942       GNUNET_free (pending);
 943       off += msize;
 944     }
 945   /*reply = core_pending_head;*/
 946
 947   GNUNET_SCHEDULER_add_now(sched, &try_core_send, NULL);
 948   /*if (reply != NULL)
 949     core_transmit_handle = GNUNET_CORE_notify_transmit_ready(coreAPI, reply->importance, reply->timeout, &reply->recipient, reply->msg_size, &core_transmit_notify, NULL);*/
 950
 951   return off;
 952 }
 953
 954
 955 /**
 956  * Send a DV data message via DV.
 957  *
 958  * @param sender the original sender of the message
 959  * @param recipient the next hop recipient, may be our direct peer, maybe not
 960  * @param send_context the send context
 961  */
 962 static int
 963 send_message_via (const struct GNUNET_PeerIdentity *sender,
 964                   const struct GNUNET_PeerIdentity *recipient,
 965                   struct DV_SendContext *send_context)
 966 {
 967   p2p_dv_MESSAGE_Data *toSend;
 968   unsigned int msg_size;
 969   unsigned int recipient_id;
 970   unsigned int sender_id;
 971   struct DistantNeighbor *source;
 972   struct PendingMessage *pending_message;
 973   struct FindIDContext find_context;
 974 #if DEBUG_DV
 975   char shortname[5];
 976 #endif
 977
 978   msg_size = send_context->message_size + sizeof (p2p_dv_MESSAGE_Data);
 979
 980   find_context.dest = send_context->distant_peer;
 981   find_context.via = recipient;
 982   find_context.tid = 0;
 983   GNUNET_CONTAINER_multihashmap_get_multiple (extended_neighbors, &send_context->distant_peer->hashPubKey,
 984                                               &find_specific_id, &find_context);
 985
 986   if (find_context.tid == 0)
 987     {
 988       GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "%s: find_specific_id failed to find peer!\n", my_short_id);
 989       /* target unknown to us, drop! */
 990       return GNUNET_SYSERR;
 991     }
 992   recipient_id = find_context.tid;
 993
 994   if (0 == (memcmp (&my_identity,
 995                         sender, sizeof (struct GNUNET_PeerIdentity))))
 996   {
 997     sender_id = 0;
 998     source = GNUNET_CONTAINER_multihashmap_get (extended_neighbors,
 999                                                     &sender->hashPubKey);
1000     if (source != NULL)
1001       GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "%s: send_message_via found %s, myself in extended peer list???\n", my_short_id, GNUNET_i2s(&source->identity));
1002   }
1003   else
1004   {
1005     source = GNUNET_CONTAINER_multihashmap_get (extended_neighbors,
1006                                                 &sender->hashPubKey);
1007     if (source == NULL)
1008       {
1009               /* sender unknown to us, drop! */
1010         return GNUNET_SYSERR;
1011       }
1012     sender_id = source->our_id;
1013   }
1014
1015   pending_message = GNUNET_malloc(sizeof(struct PendingMessage) + msg_size);
1016   pending_message->msg = (struct GNUNET_MessageHeader *)&pending_message[1];
1017   pending_message->send_result = send_context->send_result;
1018   memcpy(&pending_message->recipient, recipient, sizeof(struct GNUNET_PeerIdentity));
1019   pending_message->msg_size = msg_size;
1020   pending_message->importance = send_context->importance;
1021   pending_message->timeout = send_context->timeout;
1022   toSend = (p2p_dv_MESSAGE_Data *)pending_message->msg;
1023   toSend->header.size = htons (msg_size);
1024   toSend->header.type = htons (GNUNET_MESSAGE_TYPE_DV_DATA);
1025   toSend->sender = htonl (sender_id);
1026   toSend->recipient = htonl (recipient_id);
1027 #if DEBUG_DV_MESSAGES
1028   toSend->uid = send_context->uid; /* Still sent around in network byte order */
1029 #else
1030   toSend->uid = htonl(0);
1031 #endif
1032
1033   memcpy (&toSend[1], send_context->message, send_context->message_size);
1034
1035 #if DEBUG_DV
1036   memcpy(&shortname, GNUNET_i2s(send_context->distant_peer), 4);
1037   shortname[4] = '\0';
1038   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "%s: Notifying core of send to destination `%s' via `%s' size %u\n", "DV", &shortname, GNUNET_i2s(recipient), msg_size);
1039 #endif
1040
1041   GNUNET_CONTAINER_DLL_insert_after (core_pending_head,
1042                                      core_pending_tail,
1043                                      core_pending_tail,
1044                                      pending_message);
1045
1046   GNUNET_SCHEDULER_add_now(sched, try_core_send, NULL);
1047
1048   return GNUNET_YES;
1049 }
1050
1051 /**
1052  * Given a FindLeastCostContext, and a set
1053  * of peers that match the target, return the cheapest.
1054  *
1055  * @param cls closure, a struct FindLeastCostContext
1056  * @param key the key identifying the target peer
1057  * @param value the target peer
1058  *
1059  * @return GNUNET_YES to continue iteration, GNUNET_NO to stop
1060  */
1061 static int
1062 find_least_cost_peer (void *cls,
1063                   const GNUNET_HashCode *key,
1064                   void *value)
1065 {
1066   struct FindLeastCostContext *find_context = cls;
1067   struct DistantNeighbor *dn = value;
1068
1069   if (dn->cost < find_context->least_cost)
1070     {
1071       find_context->target = dn;
1072     }
1073   if (dn->cost == DIRECT_NEIGHBOR_COST)
1074     return GNUNET_NO;
1075   return GNUNET_YES;
1076 }
1077
1078 /**
1079  * Send a DV data message via DV.
1080  *
1081  * @param recipient the ultimate recipient of this message
1082  * @param sender the original sender of the message
1083  * @param specific_neighbor the specific neighbor to send this message via
1084  * @param message the packed message
1085  * @param message_size size of the message
1086  * @param importance what priority to send this message with
1087  * @param uid the unique identifier of this message (or 0 for none)
1088  * @param timeout how long to possibly delay sending this message
1089  */
1090 static int
1091 send_message (const struct GNUNET_PeerIdentity * recipient,
1092               const struct GNUNET_PeerIdentity * sender,
1093               const struct DistantNeighbor * specific_neighbor,
1094               const struct GNUNET_MessageHeader * message,
1095               size_t message_size,
1096               unsigned int importance,
1097               unsigned int uid,
1098               struct GNUNET_TIME_Relative timeout)
1099 {
1100   p2p_dv_MESSAGE_Data *toSend;
1101   unsigned int msg_size;
1102   unsigned int cost;
1103   unsigned int recipient_id;
1104   unsigned int sender_id;
1105   struct DistantNeighbor *target;
1106   struct DistantNeighbor *source;
1107   struct PendingMessage *pending_message;
1108   struct FindLeastCostContext find_least_ctx;
1109 #if DEBUG_DV_PEER_NUMBERS
1110   struct GNUNET_CRYPTO_HashAsciiEncoded encPeerFrom;
1111   struct GNUNET_CRYPTO_HashAsciiEncoded encPeerTo;
1112   struct GNUNET_CRYPTO_HashAsciiEncoded encPeerVia;
1113 #endif
1114   msg_size = message_size + sizeof (p2p_dv_MESSAGE_Data);
1115
1116   find_least_ctx.least_cost = -1;
1117   find_least_ctx.target = NULL;
1118   /*
1119    * Need to find the least cost peer, lest the transport selection keep
1120    * picking the same DV route for the same destination which results
1121    * in messages looping forever.  Relatively cheap, we don't iterate
1122    * over all known peers, just those that apply.
1123    */
1124   GNUNET_CONTAINER_multihashmap_get_multiple (extended_neighbors,
1125                                                        &recipient->hashPubKey,  &find_least_cost_peer, &find_least_ctx);
1126   target = find_least_ctx.target;
1127
1128   if (target == NULL)
1129     {
1130       /* target unknown to us, drop! */
1131       return GNUNET_SYSERR;
1132     }
1133   recipient_id = target->referrer_id;
1134
1135   source = GNUNET_CONTAINER_multihashmap_get (extended_neighbors,
1136                                               &sender->hashPubKey);
1137   if (source == NULL)
1138     {
1139       if (0 != (memcmp (&my_identity,
1140                         sender, sizeof (struct GNUNET_PeerIdentity))))
1141         {
1142           /* sender unknown to us, drop! */
1143           return GNUNET_SYSERR;
1144         }
1145       sender_id = 0;            /* 0 == us */
1146     }
1147   else
1148     {
1149       /* find out the number that we use when we gossip about
1150          the sender */
1151       sender_id = source->our_id;
1152     }
1153
1154 #if DEBUG_DV_PEER_NUMBERS
1155   GNUNET_CRYPTO_hash_to_enc (&source->identity.hashPubKey, &encPeerFrom);
1156   GNUNET_CRYPTO_hash_to_enc (&target->referrer->identity.hashPubKey, &encPeerVia);
1157   encPeerFrom.encoding[4] = '\0';
1158   encPeerVia.encoding[4] = '\0';
1159 #endif
1160   if ((sender_id != 0) && (0 == memcmp(&source->identity, &target->referrer->identity, sizeof(struct GNUNET_PeerIdentity))))
1161     {
1162       return 0;
1163     }
1164
1165   cost = target->cost;
1166   pending_message = GNUNET_malloc(sizeof(struct PendingMessage) + msg_size);
1167   pending_message->msg = (struct GNUNET_MessageHeader *)&pending_message[1];
1168   pending_message->send_result = NULL;
1169   pending_message->importance = importance;
1170   pending_message->timeout = timeout;
1171   memcpy(&pending_message->recipient, &target->referrer->identity, sizeof(struct GNUNET_PeerIdentity));
1172   pending_message->msg_size = msg_size;
1173   toSend = (p2p_dv_MESSAGE_Data *)pending_message->msg;
1174   toSend->header.size = htons (msg_size);
1175   toSend->header.type = htons (GNUNET_MESSAGE_TYPE_DV_DATA);
1176   toSend->sender = htonl (sender_id);
1177   toSend->recipient = htonl (recipient_id);
1178 #if DEBUG_DV_MESSAGES
1179   toSend->uid = htonl(uid);
1180 #else
1181   toSend->uid = htonl(0);
1182 #endif
1183
1184 #if DEBUG_DV_PEER_NUMBERS
1185   GNUNET_CRYPTO_hash_to_enc (&target->identity.hashPubKey, &encPeerTo);
1186   encPeerTo.encoding[4] = '\0';
1187   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "%s: Sending DATA message. Sender id %u, source %s, destination %s, via %s\n", GNUNET_i2s(&my_identity), sender_id, &encPeerFrom, &encPeerTo, &encPeerVia);
1188 #endif
1189   memcpy (&toSend[1], message, message_size);
1190   if ((source != NULL) && (source->pkey == NULL)) /* Test our hypothesis about message failures! */
1191     {
1192       GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "%s: Sending message, but anticipate recipient will not know sender!!!\n\n\n", my_short_id);
1193     }
1194   GNUNET_CONTAINER_DLL_insert_after (core_pending_head,
1195                                      core_pending_tail,
1196                                      core_pending_tail,
1197                                      pending_message);
1198 #if DEBUG_DV
1199   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "%s: Notifying core of send size %d to destination `%s'\n", "DV SEND MESSAGE", msg_size, GNUNET_i2s(recipient));
1200 #endif
1201
1202   GNUNET_SCHEDULER_add_now(sched, try_core_send, NULL);
1203   return (int) cost;
1204 }
1205
1206 #if USE_PEER_ID
1207 struct CheckPeerContext
1208 {
1209   /**
1210    * Peer we found
1211    */
1212   struct DistantNeighbor *peer;
1213
1214   /**
1215    * Sender id to search for
1216    */
1217   unsigned int sender_id;
1218 };
1219
1220 /**
1221  * Iterator over hash map entries.
1222  *
1223  * @param cls closure
1224  * @param key current key code
1225  * @param value value in the hash map
1226  * @return GNUNET_YES if we should continue to
1227  *         iterate,
1228  *         GNUNET_NO if not.
1229  */
1230 int checkPeerID (void *cls,
1231                  const GNUNET_HashCode * key,
1232                  void *value)
1233 {
1234   struct CheckPeerContext *ctx = cls;
1235   struct DistantNeighbor *distant = value;
1236
1237   if (memcmp(key, &ctx->sender_id, sizeof(unsigned int)) == 0)
1238   {
1239     ctx->peer = distant;
1240     return GNUNET_NO;
1241   }
1242   return GNUNET_YES;
1243
1244 }
1245 #endif
1246
1247
1248 /**
1249  * Handler for messages parsed out by the tokenizer from
1250  * DV DATA received for this peer.
1251  *
1252  * @param cls NULL
1253  * @param client the TokenizedMessageContext which contains message information
1254  * @param message the actual message
1255  */
1256 void tokenized_message_handler (void *cls,
1257                                 void *client,
1258                                 const struct GNUNET_MessageHeader *message)
1259 {
1260   struct TokenizedMessageContext *ctx = client;
1261   GNUNET_break_op (ntohs (message->type) != GNUNET_MESSAGE_TYPE_DV_GOSSIP);
1262   GNUNET_break_op (ntohs (message->type) != GNUNET_MESSAGE_TYPE_DV_DATA);
1263   if ( (ntohs (message->type) != GNUNET_MESSAGE_TYPE_DV_GOSSIP) &&
1264       (ntohs (message->type) != GNUNET_MESSAGE_TYPE_DV_DATA) )
1265   {
1266 #if DEBUG_DV_MESSAGES
1267     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1268                 "%s: Receives %s message for me, uid %u, size %d, type %d cost %u from %s!\n", my_short_id, "DV DATA", ctx->uid, ntohs(message->size), ntohs(message->type), ctx->distant->cost, GNUNET_i2s(&ctx->distant->identity));
1269 #endif
1270     GNUNET_assert(memcmp(ctx->peer, &ctx->distant->identity, sizeof(struct GNUNET_PeerIdentity)) != 0);
1271     send_to_plugin(ctx->peer, message, ntohs(message->size), &ctx->distant->identity, ctx->distant->cost);
1272   }
1273 }
1274
1275 #if DELAY_FORWARDS
1276 struct DelayedMessageContext
1277 {
1278   struct GNUNET_PeerIdentity dest;
1279   struct GNUNET_PeerIdentity sender;
1280   struct GNUNET_MessageHeader *message;
1281   size_t message_size;
1282   uint32_t uid;
1283 };
1284
1285 void send_message_delayed (void *cls,
1286                            const struct GNUNET_SCHEDULER_TaskContext *tc)
1287 {
1288   struct DelayedMessageContext *msg_ctx = cls;
1289   if (msg_ctx != NULL)
1290     {
1291       send_message(&msg_ctx->dest,
1292                    &msg_ctx->sender,
1293                    NULL,
1294                    msg_ctx->message,
1295                    msg_ctx->message_size,
1296                    default_dv_priority,
1297                    msg_ctx->uid,
1298                    GNUNET_TIME_relative_get_forever());
1299       GNUNET_free(msg_ctx->message);
1300       GNUNET_free(msg_ctx);
1301     }
1302 }
1303 #endif
1304
1305
1306 /**
1307  * Core handler for dv data messages.  Whatever this message
1308  * contains all we really have to do is rip it out of its
1309  * DV layering and give it to our pal the DV plugin to report
1310  * in with.
1311  *
1312  * @param cls closure
1313  * @param peer peer which sent the message (immediate sender)
1314  * @param message the message
1315  * @param latency the latency of the connection we received the message from
1316  * @param distance the distance to the immediate peer
1317  */
1318 static int handle_dv_data_message (void *cls,
1319                                    const struct GNUNET_PeerIdentity * peer,
1320                                    const struct GNUNET_MessageHeader * message,
1321                                    struct GNUNET_TIME_Relative latency,
1322                                    uint32_t distance)
1323 {
1324   const p2p_dv_MESSAGE_Data *incoming = (const p2p_dv_MESSAGE_Data *) message;
1325   const struct GNUNET_MessageHeader *packed_message;
1326   struct DirectNeighbor *dn;
1327   struct DistantNeighbor *pos;
1328   unsigned int sid;             /* Sender id */
1329   unsigned int tid;             /* Target id */
1330   struct GNUNET_PeerIdentity *original_sender;
1331   struct GNUNET_PeerIdentity *destination;
1332   struct FindDestinationContext fdc;
1333   struct TokenizedMessageContext tkm_ctx;
1334   int i;
1335   int found_pos;
1336 #if DELAY_FORWARDS
1337   struct DelayedMessageContext *delayed_context;
1338 #endif
1339 #if USE_PEER_ID
1340   struct CheckPeerContext checkPeerCtx;
1341 #endif
1342 #if DEBUG_DV_MESSAGES
1343   char *sender_id;
1344 #endif
1345   int ret;
1346   size_t packed_message_size;
1347   char *cbuf;
1348
1349   packed_message_size = ntohs(incoming->header.size) - sizeof(p2p_dv_MESSAGE_Data);
1350 #if DEBUG_DV
1351   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1352               "%s: Receives DATA message from %s size %d, packed size %d!\n", my_short_id, GNUNET_i2s(peer) , ntohs(incoming->header.size), packed_message_size);
1353 #endif
1354
1355   if (ntohs (incoming->header.size) <  sizeof (p2p_dv_MESSAGE_Data) + sizeof (struct GNUNET_MessageHeader))
1356     {
1357
1358 #if DEBUG_DV
1359     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1360                 "`%s': Message sizes don't add up, total size %u, expected at least %u!\n", "dv service", ntohs(incoming->header.size), sizeof (p2p_dv_MESSAGE_Data) + sizeof (struct GNUNET_MessageHeader));
1361 #endif
1362       return GNUNET_SYSERR;
1363     }
1364
1365   dn = GNUNET_CONTAINER_multihashmap_get (direct_neighbors,
1366                                           &peer->hashPubKey);
1367   if (dn == NULL)
1368     return GNUNET_OK;
1369
1370   sid = ntohl (incoming->sender);
1371 #if USE_PEER_ID
1372   if (sid != 0)
1373   {
1374     checkPeerCtx.sender_id = sid;
1375     checkPeerCtx.peer = NULL;
1376     GNUNET_CONTAINER_multihashmap_iterate(extended_neighbors, &checkPeerID, &checkPeerCtx);
1377     pos = checkPeerCtx.peer;
1378   }
1379   else
1380   {
1381     pos = GNUNET_CONTAINER_multihashmap_get (extended_neighbors,
1382                                              &peer->hashPubKey);
1383   }
1384 #else
1385   pos = dn->referee_head;
1386   while ((NULL != pos) && (pos->referrer_id != sid))
1387     pos = pos->next;
1388 #endif
1389
1390   if (pos == NULL)
1391     {
1392 #if DEBUG_DV_MESSAGES
1393       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1394                   "%s: unknown sender (%u), Message uid %u from %s!\n", my_short_id, ntohl(incoming->sender), ntohl(incoming->uid), GNUNET_i2s(&dn->identity));
1395       pos = dn->referee_head;
1396       while ((NULL != pos) && (pos->referrer_id != sid))
1397       {
1398         sender_id = strdup(GNUNET_i2s(&pos->identity));
1399         GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "I know sender %u %s\n", pos->referrer_id, sender_id);
1400         GNUNET_free(sender_id);
1401         pos = pos->next;
1402       }
1403 #endif
1404       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
1405                   "%s: unknown sender (%u), Message uid %u from %s!\n", my_short_id, ntohl(incoming->sender), ntohl(incoming->uid), GNUNET_i2s(&dn->identity));
1406
1407       found_pos = -1;
1408       for (i = 0; i< MAX_OUTSTANDING_MESSAGES; i++)
1409         {
1410           if (dn->pending_messages[i].sender_id == 0)
1411             {
1412               found_pos = i;
1413               break;
1414             }
1415         }
1416
1417       if (found_pos == -1)
1418         {
1419           GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
1420                       "%s: Too many unknown senders (%u), ignoring message! Message uid %llu from %s!\n", my_short_id, ntohl(incoming->sender), ntohl(incoming->uid), GNUNET_i2s(&dn->identity));
1421         }
1422       else
1423         {
1424             dn->pending_messages[found_pos].message = GNUNET_malloc(ntohs (message->size));
1425             memcpy(dn->pending_messages[found_pos].message, message, ntohs(message->size));
1426             dn->pending_messages[found_pos].distance = distance;
1427             dn->pending_messages[found_pos].latency = latency;
1428             memcpy(&dn->pending_messages[found_pos].sender, peer, sizeof(struct GNUNET_PeerIdentity));
1429             dn->pending_messages[found_pos].sender_id = sid;
1430         }
1431       /* unknown sender */
1432       return GNUNET_OK;
1433     }
1434   original_sender = &pos->identity;
1435   tid = ntohl (incoming->recipient);
1436   if (tid == 0)
1437     {
1438       /* 0 == us */
1439       cbuf = (char *)&incoming[1];
1440
1441       tkm_ctx.peer = peer;
1442       tkm_ctx.distant = pos;
1443       tkm_ctx.uid = ntohl(incoming->uid);
1444       if (GNUNET_OK != GNUNET_SERVER_mst_receive (coreMST,
1445                                                   &tkm_ctx,
1446                                                   cbuf,
1447                                                   packed_message_size,
1448                                                   GNUNET_NO,
1449                                                   GNUNET_NO))
1450         {
1451           GNUNET_break_op(0);
1452           GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "%s: %s Received corrupt data, discarding!", my_short_id, "DV SERVICE");
1453         }
1454       return GNUNET_OK;
1455     }
1456   else
1457     {
1458       packed_message = (struct GNUNET_MessageHeader *)&incoming[1];
1459     }
1460
1461   /* FIXME: this is the *only* per-request operation we have in DV
1462      that is O(n) in relation to the number of connected peers; a
1463      hash-table lookup could easily solve this (minor performance
1464      issue) */
1465   fdc.tid = tid;
1466   fdc.dest = NULL;
1467   GNUNET_CONTAINER_heap_iterate (neighbor_max_heap,
1468                                  &find_destination, &fdc);
1469
1470 #if DEBUG_DV
1471       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1472                   "%s: Receives %s message for someone else!\n", "dv", "DV DATA");
1473 #endif
1474
1475   if (fdc.dest == NULL)
1476     {
1477 #if DEBUG_DV_MESSAGES
1478       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1479                   "%s: Receives %s message uid %u for someone we don't know (id %u)!\n", my_short_id, "DV DATA", ntohl(incoming->uid), tid);
1480 #endif
1481       return GNUNET_OK;
1482     }
1483   destination = &fdc.dest->identity;
1484
1485   if (0 == memcmp (destination, peer, sizeof (struct GNUNET_PeerIdentity)))
1486     {
1487       /* FIXME: create stat: routing loop-discard! */
1488 #if DEBUG_DV_PEER_NUMBERS
1489       GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "\n\n\nLoopy loo message\n\n\n");
1490 #endif
1491
1492 #if DEBUG_DV_MESSAGES
1493       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1494                   "%s: DROPPING MESSAGE uid %u type %d, routing loop! Message immediately from %s!\n", my_short_id, ntohl(incoming->uid), ntohs(packed_message->type), GNUNET_i2s(&dn->identity));
1495 #endif
1496       return GNUNET_OK;
1497     }
1498
1499   /* At this point we have a message, and we need to forward it on to the
1500    * next DV hop.
1501    */
1502 #if DEBUG_DV_MESSAGES
1503   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1504               "%s: FORWARD %s message for %s, uid %u, size %d type %d, cost %u!\n", my_short_id, "DV DATA", GNUNET_i2s(destination), ntohl(incoming->uid), ntohs(packed_message->size), ntohs(packed_message->type), pos->cost);
1505 #endif
1506
1507 #if DELAY_FORWARDS
1508   if (GNUNET_TIME_absolute_get_duration(pos->last_gossip).value < GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 2).value)
1509     {
1510       delayed_context = GNUNET_malloc(sizeof(struct DelayedMessageContext));
1511       memcpy(&delayed_context->dest, destination, sizeof(struct GNUNET_PeerIdentity));
1512       memcpy(&delayed_context->sender, original_sender, sizeof(struct GNUNET_PeerIdentity));
1513       delayed_context->message = GNUNET_malloc(packed_message_size);
1514       memcpy(delayed_context->message, packed_message, packed_message_size);
1515       delayed_context->message_size = packed_message_size;
1516       delayed_context->uid = ntohl(incoming->uid);
1517       GNUNET_SCHEDULER_add_delayed(sched, GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_MILLISECONDS, 2500), &send_message_delayed, delayed_context);
1518       return GNUNET_OK;
1519     }
1520   else
1521 #endif
1522     {
1523       ret = send_message(destination,
1524                          original_sender,
1525                          NULL,
1526                          packed_message,
1527                          packed_message_size,
1528                          default_dv_priority,
1529                          ntohl(incoming->uid),
1530                          GNUNET_TIME_relative_get_forever());
1531     }
1532   if (ret != GNUNET_SYSERR)
1533     return GNUNET_OK;
1534   else
1535     {
1536 #if DEBUG_MESSAGE_DROP
1537       direct_id = GNUNET_strdup(GNUNET_i2s(&dn->identity));
1538       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1539                   "%s: DROPPING MESSAGE type %d, forwarding failed! Message immediately from %s!\n", GNUNET_i2s(&my_identity), ntohs(((struct GNUNET_MessageHeader *)&incoming[1])->type), direct_id);
1540 #endif
1541       return GNUNET_SYSERR;
1542     }
1543 }
1544
1545 #if DEBUG_DV
1546 /**
1547  * Iterator over hash map entries.
1548  *
1549  * @param cls closure (NULL)
1550  * @param key current key code
1551  * @param value value in the hash map (DistantNeighbor)
1552  * @return GNUNET_YES if we should continue to
1553  *         iterate,
1554  *         GNUNET_NO if not.
1555  */
1556 int print_neighbors (void *cls,
1557                      const GNUNET_HashCode * key,
1558                      void *value)
1559 {
1560   struct DistantNeighbor *distant_neighbor = value;
1561   char my_shortname[5];
1562   char referrer_shortname[5];
1563   memcpy(&my_shortname, GNUNET_i2s(&my_identity), 4);
1564   my_shortname[4] = '\0';
1565   memcpy(&referrer_shortname, GNUNET_i2s(&distant_neighbor->referrer->identity), 4);
1566   referrer_shortname[4] = '\0';
1567
1568   GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "`%s' %s: Peer `%s', distance %d, referrer `%s' pkey: %s\n", &my_shortname, "DV", GNUNET_i2s(&distant_neighbor->identity), distant_neighbor->cost, &referrer_shortname, distant_neighbor->pkey == NULL ? "no" : "yes");
1569   return GNUNET_YES;
1570 }
1571 #endif
1572
1573 /**
1574  *  Scheduled task which gossips about known direct peers to other connected
1575  *  peers.  Will run until called with reason shutdown.
1576  */
1577 static void
1578 neighbor_send_task (void *cls,
1579                     const struct GNUNET_SCHEDULER_TaskContext *tc)
1580 {
1581   struct NeighborSendContext *send_context = cls;
1582 #if DEBUG_DV_GOSSIP_SEND
1583   char * encPeerAbout;
1584   char * encPeerTo;
1585 #endif
1586   struct DistantNeighbor *about;
1587   struct DirectNeighbor *to;
1588   struct FastGossipNeighborList *about_list;
1589
1590   p2p_dv_MESSAGE_NeighborInfo *message;
1591   struct PendingMessage *pending_message;
1592
1593   if (tc->reason == GNUNET_SCHEDULER_REASON_SHUTDOWN)
1594   {
1595 #if DEBUG_DV_GOSSIP
1596   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1597               "%s: Called with reason shutdown, shutting down!\n",
1598               GNUNET_i2s(&my_identity));
1599 #endif
1600     return;
1601   }
1602
1603   if (send_context->fast_gossip_list_head != NULL)
1604     {
1605       about_list = send_context->fast_gossip_list_head;
1606       about = about_list->about;
1607       GNUNET_CONTAINER_DLL_remove(send_context->fast_gossip_list_head,
1608                                   send_context->fast_gossip_list_tail,
1609                                   about_list);
1610       GNUNET_free(about_list);
1611     }
1612   else
1613     {
1614       /* FIXME: this may become a problem, because the heap walk has only one internal "walker".  This means
1615        * that if two neighbor_send_tasks are operating in lockstep (which is quite possible, given default
1616        * values for all connected peers) there may be a serious bias as to which peers get gossiped about!
1617        * Probably the *best* way to fix would be to have an opaque pointer to the walk position passed as
1618        * part of the walk_get_next call.  Then the heap would have to keep a list of walks, or reset the walk
1619        * whenever a modification has been detected.  Yuck either way.  Perhaps we could iterate over the heap
1620        * once to get a list of peers to gossip about and gossip them over time... But then if one goes away
1621        * in the mean time that becomes nasty.  For now we'll just assume that the walking is done
1622        * asynchronously enough to avoid major problems (-;
1623        *
1624        * NOTE: probably fixed once we decided send rate based on allowed bandwidth.
1625        */
1626       about = GNUNET_CONTAINER_heap_walk_get_next (neighbor_min_heap);
1627     }
1628   to = send_context->toNeighbor;
1629
1630   if ((about != NULL) && (to != about->referrer /* split horizon */ ) &&
1631 #if SUPPORT_HIDING
1632       (about->hidden == GNUNET_NO) &&
1633 #endif
1634       (to != NULL) &&
1635       (0 != memcmp (&about->identity,
1636                         &to->identity, sizeof (struct GNUNET_PeerIdentity))) &&
1637       (about->pkey != NULL))
1638     {
1639 #if DEBUG_DV_GOSSIP_SEND
1640       encPeerAbout = GNUNET_strdup(GNUNET_i2s(&about->identity));
1641       encPeerTo = GNUNET_strdup(GNUNET_i2s(&to->identity));
1642       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1643                   "%s: Sending info about peer %s id %u to directly connected peer %s\n",
1644                   GNUNET_i2s(&my_identity),
1645                   encPeerAbout, about->our_id, encPeerTo);
1646       GNUNET_free(encPeerAbout);
1647       GNUNET_free(encPeerTo);
1648 #endif
1649       about->last_gossip = GNUNET_TIME_absolute_get();
1650       pending_message = GNUNET_malloc(sizeof(struct PendingMessage) + sizeof(p2p_dv_MESSAGE_NeighborInfo));
1651       pending_message->msg = (struct GNUNET_MessageHeader *)&pending_message[1];
1652       pending_message->importance = default_dv_priority;
1653       pending_message->timeout = GNUNET_TIME_relative_get_forever();
1654       memcpy(&pending_message->recipient, &to->identity, sizeof(struct GNUNET_PeerIdentity));
1655       pending_message->msg_size = sizeof(p2p_dv_MESSAGE_NeighborInfo);
1656       message = (p2p_dv_MESSAGE_NeighborInfo *)pending_message->msg;
1657       message->header.size = htons (sizeof (p2p_dv_MESSAGE_NeighborInfo));
1658       message->header.type = htons (GNUNET_MESSAGE_TYPE_DV_GOSSIP);
1659       message->cost = htonl (about->cost);
1660       message->neighbor_id = htonl (about->our_id);
1661
1662       memcpy (&message->pkey, about->pkey, sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
1663       memcpy (&message->neighbor,
1664               &about->identity, sizeof (struct GNUNET_PeerIdentity));
1665
1666       GNUNET_CONTAINER_DLL_insert_after (core_pending_head,
1667                                          core_pending_tail,
1668                                          core_pending_tail,
1669                                          pending_message);
1670
1671       GNUNET_SCHEDULER_add_now(sched, try_core_send, NULL);
1672       /*if (core_transmit_handle == NULL)
1673         core_transmit_handle = GNUNET_CORE_notify_transmit_ready(coreAPI, default_dv_priority, GNUNET_TIME_relative_get_forever(), &to->identity, sizeof(p2p_dv_MESSAGE_NeighborInfo), &core_transmit_notify, NULL);*/
1674
1675     }
1676
1677   if (send_context->fast_gossip_list_head != NULL) /* If there are other peers in the fast list, schedule right away */
1678     {
1679 #if DEBUG_DV_PEER_NUMBERS
1680       GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "DV SERVICE: still in fast send mode\n");
1681 #endif
1682       send_context->task = GNUNET_SCHEDULER_add_now(sched, &neighbor_send_task, send_context);
1683     }
1684   else
1685     {
1686 #if DEBUG_DV_PEER_NUMBERS
1687       GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "DV SERVICE: entering slow send mode\n");
1688 #endif
1689       send_context->task = GNUNET_SCHEDULER_add_delayed(sched, GNUNET_DV_DEFAULT_SEND_INTERVAL, &neighbor_send_task, send_context);
1690     }
1691
1692   return;
1693 }
1694
1695
1696 /**
1697  * Handle START-message.  This is the first message sent to us
1698  * by the client (can only be one!).
1699  *
1700  * @param cls closure (always NULL)
1701  * @param client identification of the client
1702  * @param message the actual message
1703  */
1704 static void
1705 handle_start (void *cls,
1706               struct GNUNET_SERVER_Client *client,
1707               const struct GNUNET_MessageHeader *message)
1708 {
1709
1710 #if DEBUG_DV
1711   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1712               "Received `%s' request from client\n", "START");
1713 #endif
1714
1715   client_handle = client;
1716
1717   GNUNET_SERVER_client_keep(client_handle);
1718   GNUNET_SERVER_receive_done (client, GNUNET_OK);
1719 }
1720
1721 #if UNSIMPLER
1722 /**
1723  * Iterate over hash map entries for a distant neighbor,
1724  * if direct neighbor matches context call send message
1725  *
1726  * @param cls closure, a DV_SendContext
1727  * @param key current key code
1728  * @param value value in the hash map
1729  * @return GNUNET_YES if we should continue to
1730  *         iterate,
1731  *         GNUNET_NO if not.
1732  */
1733 int send_iterator (void *cls,
1734                    const GNUNET_HashCode * key,
1735                    void *value)
1736 {
1737   struct DV_SendContext *send_context = cls;
1738   struct DistantNeighbor *distant_neighbor = value;
1739
1740   if (memcmp(distant_neighbor->referrer, send_context->direct_peer, sizeof(struct GNUNET_PeerIdentity)) == 0) /* They match, send and free */
1741     {
1742       send_message_via(&my_identity, distant_neighbor, send_context);
1743       return GNUNET_NO;
1744     }
1745   return GNUNET_YES;
1746 }
1747 #endif
1748
1749 /**
1750  * Service server's handler for message send requests (which come
1751  * bubbling up to us through the DV plugin).
1752  *
1753  * @param cls closure
1754  * @param client identification of the client
1755  * @param message the actual message
1756  */
1757 void handle_dv_send_message (void *cls,
1758                              struct GNUNET_SERVER_Client * client,
1759                              const struct GNUNET_MessageHeader * message)
1760 {
1761   struct GNUNET_DV_SendMessage *send_msg;
1762   struct GNUNET_DV_SendResultMessage *send_result_msg;
1763   struct PendingMessage *pending_message;
1764   size_t address_len;
1765   size_t message_size;
1766   struct GNUNET_PeerIdentity *destination;
1767   struct GNUNET_PeerIdentity *direct;
1768   struct GNUNET_MessageHeader *message_buf;
1769   char *temp_pos;
1770   int offset;
1771   static struct GNUNET_CRYPTO_HashAsciiEncoded dest_hash;
1772   struct DV_SendContext *send_context;
1773 #if DEBUG_DV_MESSAGES
1774   char *cbuf;
1775   struct GNUNET_MessageHeader *packed_message;
1776 #endif
1777
1778   if (client_handle == NULL)
1779   {
1780     client_handle = client;
1781     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1782               "%s: Setting initial client handle, never received `%s' message?\n", "dv", "START");
1783   }
1784   else if (client_handle != client)
1785   {
1786     client_handle = client;
1787     /* What should we do in this case, assert fail or just log the warning? */
1788 #if DEBUG_DV
1789     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1790                 "%s: Setting client handle (was a different client!)!\n", "dv");
1791 #endif
1792   }
1793
1794   GNUNET_assert(ntohs(message->size) > sizeof(struct GNUNET_DV_SendMessage));
1795   send_msg = (struct GNUNET_DV_SendMessage *)message;
1796
1797   address_len = ntohl(send_msg->addrlen);
1798   GNUNET_assert(address_len == sizeof(struct GNUNET_PeerIdentity) * 2);
1799   message_size = ntohs(message->size) - sizeof(struct GNUNET_DV_SendMessage) - address_len;
1800   destination = GNUNET_malloc(sizeof(struct GNUNET_PeerIdentity));
1801   direct = GNUNET_malloc(sizeof(struct GNUNET_PeerIdentity));
1802   message_buf = GNUNET_malloc(message_size);
1803
1804   temp_pos = (char *)&send_msg[1]; /* Set pointer to end of message */
1805   offset = 0; /* Offset starts at zero */
1806
1807   memcpy(destination, &temp_pos[offset], sizeof(struct GNUNET_PeerIdentity));
1808   offset += sizeof(struct GNUNET_PeerIdentity);
1809
1810   memcpy(direct, &temp_pos[offset], sizeof(struct GNUNET_PeerIdentity));
1811   offset += sizeof(struct GNUNET_PeerIdentity);
1812
1813
1814   memcpy(message_buf, &temp_pos[offset], message_size);
1815   if (memcmp(&send_msg->target, destination, sizeof(struct GNUNET_PeerIdentity)) != 0)
1816     {
1817       GNUNET_CRYPTO_hash_to_enc (&destination->hashPubKey, &dest_hash); /* GNUNET_i2s won't properly work, need to hash one ourselves */
1818       dest_hash.encoding[4] = '\0';
1819       GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "%s: asked to send message to `%s', but address is for `%s'!", "DV SERVICE", GNUNET_i2s(&send_msg->target), (const char *)&dest_hash.encoding);
1820     }
1821
1822 #if DEBUG_DV_MESSAGES
1823   cbuf = (char *)message_buf;
1824   offset = 0;
1825   while(offset < message_size)
1826     {
1827       packed_message = (struct GNUNET_MessageHeader *)&cbuf[offset];
1828       GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "%s: DV PLUGIN SEND uid %u type %d to %s\n", my_short_id, ntohl(send_msg->uid), ntohs(packed_message->type), GNUNET_i2s(destination));
1829       offset += ntohs(packed_message->size);
1830     }
1831   /*GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "%s: DV PLUGIN SEND uid %u type %d to %s\n", my_short_id, ntohl(send_msg->uid), ntohs(message_buf->type), GNUNET_i2s(destination));*/
1832 #endif
1833   GNUNET_CRYPTO_hash_to_enc (&destination->hashPubKey, &dest_hash); /* GNUNET_i2s won't properly work, need to hash one ourselves */
1834   dest_hash.encoding[4] = '\0';
1835   send_context = GNUNET_malloc(sizeof(struct DV_SendContext));
1836
1837   send_result_msg = GNUNET_malloc(sizeof(struct GNUNET_DV_SendResultMessage));
1838   send_result_msg->header.size = htons(sizeof(struct GNUNET_DV_SendResultMessage));
1839   send_result_msg->header.type = htons(GNUNET_MESSAGE_TYPE_TRANSPORT_DV_SEND_RESULT);
1840   send_result_msg->uid = send_msg->uid; /* No need to ntohl->htonl this */
1841
1842   send_context->importance = ntohl(send_msg->priority);
1843   send_context->timeout = send_msg->timeout;
1844   send_context->direct_peer = direct;
1845   send_context->distant_peer = destination;
1846   send_context->message = message_buf;
1847   send_context->message_size = message_size;
1848   send_context->send_result = send_result_msg;
1849 #if DEBUG_DV_MESSAGES
1850   send_context->uid = send_msg->uid;
1851 #endif
1852
1853   if (send_message_via(&my_identity, direct, send_context) != GNUNET_YES)
1854     {
1855       send_result_msg->result = htons(1);
1856       pending_message = GNUNET_malloc(sizeof(struct PendingMessage) + sizeof(struct GNUNET_DV_SendResultMessage));
1857       pending_message->msg = (struct GNUNET_MessageHeader *)&pending_message[1];
1858       memcpy(&pending_message[1], send_result_msg, sizeof(struct GNUNET_DV_SendResultMessage));
1859       GNUNET_free(send_result_msg);
1860
1861       GNUNET_CONTAINER_DLL_insert_after(plugin_pending_head, plugin_pending_tail, plugin_pending_tail, pending_message);
1862
1863       if (client_handle != NULL)
1864         {
1865           if (plugin_transmit_handle == NULL)
1866             {
1867               plugin_transmit_handle = GNUNET_SERVER_notify_transmit_ready (client_handle,
1868                                                                             sizeof(struct GNUNET_DV_SendResultMessage),
1869                                                                             GNUNET_TIME_UNIT_FOREVER_REL,
1870                                                                             &transmit_to_plugin, NULL);
1871             }
1872           else
1873             {
1874               GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Failed to queue message for plugin, must be one in progress already!!\n");
1875             }
1876         }
1877       GNUNET_CRYPTO_hash_to_enc (&destination->hashPubKey, &dest_hash); /* GNUNET_i2s won't properly work, need to hash one ourselves */
1878       dest_hash.encoding[4] = '\0';
1879       GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "%s DV SEND failed to send message to destination `%s' via `%s'\n", my_short_id, (const char *)&dest_hash.encoding, GNUNET_i2s(direct));
1880     }
1881
1882   /* In bizarro world GNUNET_SYSERR indicates that we succeeded */
1883 #if UNSIMPLER
1884   if (GNUNET_SYSERR != GNUNET_CONTAINER_multihashmap_get_multiple(extended_neighbors, &destination->hashPubKey, &send_iterator, send_context))
1885     {
1886       send_result_msg->result = htons(1);
1887       pending_message = GNUNET_malloc(sizeof(struct PendingMessage) + sizeof(struct GNUNET_DV_SendResultMessage));
1888       pending_message->msg = (struct GNUNET_MessageHeader *)&pending_message[1];
1889       memcpy(&pending_message[1], send_result_msg, sizeof(struct GNUNET_DV_SendResultMessage));
1890       GNUNET_free(send_result_msg);
1891
1892       GNUNET_CONTAINER_DLL_insert_after(plugin_pending_head, plugin_pending_tail, plugin_pending_tail, pending_message);
1893
1894       if (client_handle != NULL)
1895         {
1896           if (plugin_transmit_handle == NULL)
1897             {
1898               plugin_transmit_handle = GNUNET_SERVER_notify_transmit_ready (client_handle,
1899                                                                             sizeof(struct GNUNET_DV_SendResultMessage),
1900                                                                             GNUNET_TIME_UNIT_FOREVER_REL,
1901                                                                             &transmit_to_plugin, NULL);
1902             }
1903           else
1904             {
1905               GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Failed to queue message for plugin, must be one in progress already!!\n");
1906             }
1907         }
1908       GNUNET_CRYPTO_hash_to_enc (&destination->hashPubKey, &dest_hash); /* GNUNET_i2s won't properly work, need to hash one ourselves */
1909       dest_hash.encoding[4] = '\0';
1910       GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "%s DV SEND failed to send message to destination `%s' via `%s'\n", my_short_id, (const char *)&dest_hash.encoding, GNUNET_i2s(direct));
1911     }
1912 #endif
1913   GNUNET_free(message_buf);
1914   GNUNET_free(send_context);
1915   GNUNET_free(direct);
1916   GNUNET_free(destination);
1917
1918   GNUNET_SERVER_receive_done(client, GNUNET_OK);
1919 }
1920
1921 /** Forward declarations **/
1922 static int handle_dv_gossip_message (void *cls,
1923                                      const struct GNUNET_PeerIdentity *peer,
1924                                      const struct GNUNET_MessageHeader *message,
1925                                      struct GNUNET_TIME_Relative latency,
1926                                      uint32_t distance);
1927
1928 static int handle_dv_disconnect_message (void *cls,
1929                                          const struct GNUNET_PeerIdentity *peer,
1930                                          const struct GNUNET_MessageHeader *message,
1931                                          struct GNUNET_TIME_Relative latency,
1932                                          uint32_t distance);
1933 /** End forward declarations **/
1934
1935
1936 /**
1937  * List of handlers for the messages understood by this
1938  * service.
1939  *
1940  * Hmm... will we need to register some handlers with core and
1941  * some handlers with our server here?  Because core should be
1942  * getting the incoming DV messages (from whichever lower level
1943  * transport) and then our server should be getting messages
1944  * from the dv_plugin, right?
1945  */
1946 static struct GNUNET_CORE_MessageHandler core_handlers[] = {
1947   {&handle_dv_data_message, GNUNET_MESSAGE_TYPE_DV_DATA, 0},
1948   {&handle_dv_gossip_message, GNUNET_MESSAGE_TYPE_DV_GOSSIP, 0},
1949   {&handle_dv_disconnect_message, GNUNET_MESSAGE_TYPE_DV_DISCONNECT, 0},
1950   {NULL, 0, 0}
1951 };
1952
1953 static struct GNUNET_SERVER_MessageHandler plugin_handlers[] = {
1954   {&handle_dv_send_message, NULL, GNUNET_MESSAGE_TYPE_TRANSPORT_DV_SEND, 0},
1955   {&handle_start, NULL, GNUNET_MESSAGE_TYPE_DV_START, 0},
1956   {NULL, NULL, 0, 0}
1957 };
1958
1959 /**
1960  * Free a DistantNeighbor node, including removing it
1961  * from the referer's list.
1962  */
1963 static void
1964 distant_neighbor_free (struct DistantNeighbor *referee)
1965 {
1966   struct DirectNeighbor *referrer;
1967
1968   referrer = referee->referrer;
1969   if (referrer != NULL)
1970     {
1971       GNUNET_CONTAINER_DLL_remove (referrer->referee_head,
1972                          referrer->referee_tail, referee);
1973     }
1974   GNUNET_CONTAINER_heap_remove_node (neighbor_max_heap, referee->max_loc);
1975   GNUNET_CONTAINER_heap_remove_node (neighbor_min_heap, referee->min_loc);
1976   GNUNET_CONTAINER_multihashmap_remove_all (extended_neighbors,
1977                                     &referee->identity.hashPubKey);
1978   GNUNET_free_non_null (referee->pkey);
1979   GNUNET_free (referee);
1980 }
1981
1982 /**
1983  * Free a DirectNeighbor node, including removing it
1984  * from the referer's list.
1985  */
1986 static void
1987 direct_neighbor_free (struct DirectNeighbor *direct)
1988 {
1989   struct NeighborSendContext *send_context;
1990   struct FastGossipNeighborList *about_list;
1991   struct FastGossipNeighborList *prev_about;
1992
1993   send_context = direct->send_context;
1994
1995   if (send_context->task != GNUNET_SCHEDULER_NO_TASK)
1996     GNUNET_SCHEDULER_cancel(sched, send_context->task);
1997
1998   about_list = send_context->fast_gossip_list_head;
1999   while (about_list != NULL)
2000     {
2001       GNUNET_CONTAINER_DLL_remove(send_context->fast_gossip_list_head, send_context->fast_gossip_list_tail, about_list);
2002       prev_about = about_list;
2003       about_list = about_list->next;
2004       GNUNET_free(prev_about);
2005     }
2006   GNUNET_free(send_context);
2007   GNUNET_free(direct);
2008 }
2009
2010 /**
2011  * Multihashmap iterator for sending out disconnect messages
2012  * for a peer.
2013  *
2014  * @param cls the peer that was disconnected
2015  * @param key key value stored under
2016  * @param value the direct neighbor to send disconnect to
2017  *
2018  * @return GNUNET_YES to continue iteration, GNUNET_NO to stop
2019  */
2020 static int schedule_disconnect_messages (void *cls,
2021                                     const GNUNET_HashCode * key,
2022                                     void *value)
2023 {
2024   struct DisconnectContext *disconnect_context = cls;
2025   struct DirectNeighbor *disconnected = disconnect_context->direct;
2026   struct DirectNeighbor *notify = value;
2027   struct PendingMessage *pending_message;
2028   p2p_dv_MESSAGE_Disconnect *disconnect_message;
2029
2030   if (memcmp(&notify->identity, &disconnected->identity, sizeof(struct GNUNET_PeerIdentity)) == 0)
2031     return GNUNET_YES; /* Don't send disconnect message to peer that disconnected! */
2032
2033   pending_message = GNUNET_malloc(sizeof(struct PendingMessage) + sizeof(p2p_dv_MESSAGE_Disconnect));
2034   pending_message->msg = (struct GNUNET_MessageHeader *)&pending_message[1];
2035   pending_message->importance = default_dv_priority;
2036   pending_message->timeout = GNUNET_TIME_relative_get_forever();
2037   memcpy(&pending_message->recipient, &notify->identity, sizeof(struct GNUNET_PeerIdentity));
2038   pending_message->msg_size = sizeof(p2p_dv_MESSAGE_Disconnect);
2039   disconnect_message = (p2p_dv_MESSAGE_Disconnect *)pending_message->msg;
2040   disconnect_message->header.size = htons (sizeof (p2p_dv_MESSAGE_Disconnect));
2041   disconnect_message->header.type = htons (GNUNET_MESSAGE_TYPE_DV_DISCONNECT);
2042   disconnect_message->peer_id = htonl(disconnect_context->distant->our_id);
2043
2044   GNUNET_CONTAINER_DLL_insert_after (core_pending_head,
2045                                      core_pending_tail,
2046                                      core_pending_tail,
2047                                      pending_message);
2048
2049   GNUNET_SCHEDULER_add_now(sched, try_core_send, NULL);
2050   /*if (core_transmit_handle == NULL)
2051     core_transmit_handle = GNUNET_CORE_notify_transmit_ready(coreAPI, default_dv_priority, GNUNET_TIME_relative_get_forever(), &notify->identity, sizeof(p2p_dv_MESSAGE_Disconnect), &core_transmit_notify, NULL);*/
2052
2053   return GNUNET_YES;
2054 }
2055
2056 /**
2057  * Multihashmap iterator for freeing extended neighbors.
2058  *
2059  * @param cls NULL
2060  * @param key key value stored under
2061  * @param value the distant neighbor to be freed
2062  *
2063  * @return GNUNET_YES to continue iteration, GNUNET_NO to stop
2064  */
2065 static int free_extended_neighbors (void *cls,
2066                                     const GNUNET_HashCode * key,
2067                                     void *value)
2068 {
2069   struct DistantNeighbor *distant = value;
2070   distant_neighbor_free(distant);
2071   return GNUNET_YES;
2072 }
2073
2074 /**
2075  * Multihashmap iterator for freeing direct neighbors.
2076  *
2077  * @param cls NULL
2078  * @param key key value stored under
2079  * @param value the direct neighbor to be freed
2080  *
2081  * @return GNUNET_YES to continue iteration, GNUNET_NO to stop
2082  */
2083 static int free_direct_neighbors (void *cls,
2084                                     const GNUNET_HashCode * key,
2085                                     void *value)
2086 {
2087   struct DirectNeighbor *direct = value;
2088   direct_neighbor_free(direct);
2089   return GNUNET_YES;
2090 }
2091
2092
2093 /**
2094  * Task run during shutdown.
2095  *
2096  * @param cls unused
2097  * @param tc unused
2098  */
2099 static void
2100 shutdown_task (void *cls,
2101                const struct GNUNET_SCHEDULER_TaskContext *tc)
2102 {
2103 #if DEBUG_DV
2104   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "calling CORE_DISCONNECT\n");
2105   GNUNET_CONTAINER_multihashmap_iterate(extended_neighbors, &print_neighbors, NULL);
2106 #endif
2107   GNUNET_CONTAINER_multihashmap_iterate(extended_neighbors, &free_extended_neighbors, NULL);
2108   GNUNET_CONTAINER_multihashmap_destroy(extended_neighbors);
2109   GNUNET_CONTAINER_multihashmap_iterate(direct_neighbors, &free_direct_neighbors, NULL);
2110   GNUNET_CONTAINER_multihashmap_destroy(direct_neighbors);
2111
2112   GNUNET_CONTAINER_heap_destroy(neighbor_max_heap);
2113   GNUNET_CONTAINER_heap_destroy(neighbor_min_heap);
2114
2115   GNUNET_CORE_disconnect (coreAPI);
2116   GNUNET_PEERINFO_disconnect(peerinfo_handle);
2117   GNUNET_SERVER_mst_destroy(coreMST);
2118   GNUNET_free_non_null(my_short_id);
2119 #if DEBUG_DV
2120   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "CORE_DISCONNECT completed\n");
2121 #endif
2122 }
2123
2124 /**
2125  * To be called on core init/fail.
2126  */
2127 void core_init (void *cls,
2128                 struct GNUNET_CORE_Handle * server,
2129                 const struct GNUNET_PeerIdentity *identity,
2130                 const struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded * publicKey)
2131 {
2132
2133   if (server == NULL)
2134     {
2135       GNUNET_SCHEDULER_cancel(sched, cleanup_task);
2136       GNUNET_SCHEDULER_add_now(sched, &shutdown_task, NULL);
2137       return;
2138     }
2139 #if DEBUG_DV
2140   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
2141               "%s: Core connection initialized, I am peer: %s\n", "dv", GNUNET_i2s(identity));
2142 #endif
2143   memcpy(&my_identity, identity, sizeof(struct GNUNET_PeerIdentity));
2144   my_short_id = GNUNET_strdup(GNUNET_i2s(&my_identity));
2145   coreAPI = server;
2146 }
2147
2148
2149 #if PKEY_NO_NEIGHBOR_ON_ADD
2150 /**
2151  * Iterator over hash map entries.
2152  *
2153  * @param cls closure
2154  * @param key current key code
2155  * @param value value in the hash map
2156  * @return GNUNET_YES if we should continue to
2157  *         iterate,
2158  *         GNUNET_NO if not.
2159  */
2160 static int add_pkey_to_extended (void *cls,
2161                                  const GNUNET_HashCode * key,
2162                                  void *value)
2163 {
2164   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *pkey = cls;
2165   struct DistantNeighbor *distant_neighbor = value;
2166
2167   if (distant_neighbor->pkey == NULL)
2168   {
2169     distant_neighbor->pkey = GNUNET_malloc(sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
2170     memcpy(distant_neighbor->pkey, pkey, sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
2171   }
2172
2173   return GNUNET_YES;
2174 }
2175 #endif
2176
2177 /**
2178  * Iterator over hash map entries.
2179  *
2180  * @param cls closure
2181  * @param key current key code
2182  * @param value value in the hash map
2183  * @return GNUNET_YES if we should continue to
2184  *         iterate,
2185  *         GNUNET_NO if not.
2186  */
2187 static int update_matching_neighbors (void *cls,
2188                                       const GNUNET_HashCode * key,
2189                                       void *value)
2190 {
2191   struct NeighborUpdateInfo * update_info = cls;
2192   struct DistantNeighbor *distant_neighbor = value;
2193
2194   if (update_info->referrer == distant_neighbor->referrer) /* Direct neighbor matches, update it's info and return GNUNET_NO */
2195   {
2196     /* same referrer, cost change! */
2197     GNUNET_CONTAINER_heap_update_cost (neighbor_max_heap,
2198                                        update_info->neighbor->max_loc, update_info->cost);
2199     GNUNET_CONTAINER_heap_update_cost (neighbor_min_heap,
2200                                        update_info->neighbor->min_loc, update_info->cost);
2201     update_info->neighbor->last_activity = update_info->now;
2202     update_info->neighbor->cost = update_info->cost;
2203     update_info->neighbor->referrer_id = update_info->referrer_peer_id;
2204     return GNUNET_NO;
2205   }
2206
2207   return GNUNET_YES;
2208 }
2209
2210
2211 /**
2212  * Iterate over all current direct peers, add DISTANT newly connected
2213  * peer to the fast gossip list for that peer so we get DV routing
2214  * information out as fast as possible!
2215  *
2216  * @param cls the newly connected neighbor we will gossip about
2217  * @param key the hashcode of the peer
2218  * @param value the direct neighbor we should gossip to
2219  *
2220  * @return GNUNET_YES to continue iteration, GNUNET_NO otherwise
2221  */
2222 static int add_distant_all_direct_neighbors (void *cls,
2223                                      const GNUNET_HashCode * key,
2224                                      void *value)
2225 {
2226   struct DirectNeighbor *direct = (struct DirectNeighbor *)value;
2227   struct DistantNeighbor *distant = (struct DistantNeighbor *)cls;
2228   struct NeighborSendContext *send_context = direct->send_context;
2229   struct FastGossipNeighborList *gossip_entry;
2230 #if DEBUG_DV
2231   char *encPeerAbout;
2232   char *encPeerTo;
2233 #endif
2234
2235   if (distant == NULL)
2236     {
2237       return GNUNET_YES;
2238     }
2239
2240   if (memcmp(&direct->identity, &distant->identity, sizeof(struct GNUNET_PeerIdentity)) == 0)
2241     {
2242       return GNUNET_YES; /* Don't gossip to a peer about itself! */
2243     }
2244
2245 #if SUPPORT_HIDING
2246   if (distant->hidden == GNUNET_YES)
2247     return GNUNET_YES; /* This peer should not be gossipped about (hidden) */
2248 #endif
2249   gossip_entry = GNUNET_malloc(sizeof(struct FastGossipNeighborList));
2250   gossip_entry->about = distant;
2251
2252   GNUNET_CONTAINER_DLL_insert_after(send_context->fast_gossip_list_head,
2253                                     send_context->fast_gossip_list_tail,
2254                                     send_context->fast_gossip_list_tail,
2255                                     gossip_entry);
2256 #if DEBUG_DV
2257   encPeerAbout = GNUNET_strdup(GNUNET_i2s(&distant->identity));
2258   encPeerTo = GNUNET_strdup(GNUNET_i2s(&direct->identity));
2259
2260   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "%s: Fast send info about peer %s id %u for directly connected peer %s\n",
2261              GNUNET_i2s(&my_identity),
2262              encPeerAbout, distant->our_id, encPeerTo);
2263   GNUNET_free(encPeerAbout);
2264   GNUNET_free(encPeerTo);
2265 #endif
2266   /*if (send_context->task != GNUNET_SCHEDULER_NO_TASK)
2267     GNUNET_SCHEDULER_cancel(sched, send_context->task);*/
2268
2269   send_context->task = GNUNET_SCHEDULER_add_now(sched, &neighbor_send_task, send_context);
2270   return GNUNET_YES;
2271 }
2272
2273 /**
2274  * Callback for hello address creation.
2275  *
2276  * @param cls closure, a struct HelloContext
2277  * @param max maximum number of bytes that can be written to buf
2278  * @param buf where to write the address information
2279  *
2280  * @return number of bytes written, 0 to signal the
2281  *         end of the iteration.
2282  */
2283 static size_t
2284 generate_hello_address (void *cls, size_t max, void *buf)
2285 {
2286   struct HelloContext *hello_context = cls;
2287   char *addr_buffer;
2288   size_t offset;
2289   size_t size;
2290   size_t ret;
2291
2292   if (hello_context->addresses_to_add == 0)
2293     return 0;
2294
2295   /* Hello "address" will be concatenation of distant peer and direct peer identities */
2296   size = 2 * sizeof(struct GNUNET_PeerIdentity);
2297   GNUNET_assert(max >= size);
2298
2299   addr_buffer = GNUNET_malloc(size);
2300   offset = 0;
2301   /* Copy the distant peer identity to buffer */
2302   memcpy(addr_buffer, &hello_context->distant_peer, sizeof(struct GNUNET_PeerIdentity));
2303   offset += sizeof(struct GNUNET_PeerIdentity);
2304   /* Copy the direct peer identity to buffer */
2305   memcpy(&addr_buffer[offset], hello_context->direct_peer, sizeof(struct GNUNET_PeerIdentity));
2306   ret = GNUNET_HELLO_add_address ("dv",
2307                                   GNUNET_TIME_relative_to_absolute
2308                                   (GNUNET_TIME_UNIT_HOURS), addr_buffer, size,
2309                                   buf, max);
2310
2311   hello_context->addresses_to_add--;
2312
2313   GNUNET_free(addr_buffer);
2314   return ret;
2315 }
2316
2317
2318 /**
2319  * Handles when a peer is either added due to being newly connected
2320  * or having been gossiped about, also called when the cost for a neighbor
2321  * needs to be updated.
2322  *
2323  * @param peer identity of the peer whose info is being added/updated
2324  * @param pkey public key of the peer whose info is being added/updated
2325  * @param referrer_peer_id id to use when sending to 'peer'
2326  * @param referrer if this is a gossiped peer, who did we hear it from?
2327  * @param cost the cost of communicating with this peer via 'referrer'
2328  *
2329  * @return the added neighbor, the updated neighbor or NULL (neighbor
2330  *         not added)
2331  */
2332 static struct DistantNeighbor *
2333 addUpdateNeighbor (const struct GNUNET_PeerIdentity * peer, struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded *pkey,
2334                    unsigned int referrer_peer_id,
2335                    struct DirectNeighbor *referrer, unsigned int cost)
2336 {
2337   struct DistantNeighbor *neighbor;
2338   struct DistantNeighbor *max;
2339   struct GNUNET_TIME_Absolute now;
2340   struct NeighborUpdateInfo *neighbor_update;
2341   struct HelloContext *hello_context;
2342   struct GNUNET_HELLO_Message *hello_msg;
2343   unsigned int our_id;
2344   char *addr1;
2345   char *addr2;
2346   int i;
2347
2348 #if DEBUG_DV_PEER_NUMBERS
2349   char *encAbout;
2350   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
2351               "%s Received sender id (%u)!\n", "DV SERVICE", referrer_peer_id);
2352 #endif
2353
2354   now = GNUNET_TIME_absolute_get ();
2355   neighbor = GNUNET_CONTAINER_multihashmap_get (extended_neighbors,
2356                                                 &peer->hashPubKey);
2357   neighbor_update = GNUNET_malloc(sizeof(struct NeighborUpdateInfo));
2358   neighbor_update->neighbor = neighbor;
2359   neighbor_update->cost = cost;
2360   neighbor_update->now = now;
2361   neighbor_update->referrer = referrer;
2362   neighbor_update->referrer_peer_id = referrer_peer_id;
2363
2364   if (neighbor != NULL)
2365     {
2366 #if USE_PEER_ID
2367       memcpy(&our_id, &neighbor->identity, sizeof(unsigned int));
2368 #else
2369       our_id = neighbor->our_id;
2370 #endif
2371     }
2372   else
2373     {
2374 #if USE_PEER_ID
2375       memcpy(&our_id, peer, sizeof(unsigned int));
2376 #else
2377       our_id = GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_STRONG, RAND_MAX - 1) + 1;
2378 #endif
2379     }
2380
2381   /* Either we do not know this peer, or we already do but via a different immediate peer */
2382   if ((neighbor == NULL) ||
2383       (GNUNET_CONTAINER_multihashmap_get_multiple(extended_neighbors,
2384                                                   &peer->hashPubKey,
2385                                                   &update_matching_neighbors,
2386                                                   neighbor_update) != GNUNET_SYSERR))
2387     {
2388
2389 #if AT_MOST_ONE
2390     if ((neighbor != NULL) && (cost < neighbor->cost)) /* New cost is less than old, remove old */
2391       {
2392         distant_neighbor_free(neighbor);
2393       }
2394     else if (neighbor != NULL) /* Only allow one DV connection to each peer */
2395       {
2396         return NULL;
2397       }
2398 #endif
2399       /* new neighbor! */
2400       if (cost > fisheye_depth)
2401         {
2402           /* too costly */
2403           GNUNET_free(neighbor_update);
2404           return NULL;
2405         }
2406
2407 #if DEBUG_DV_PEER_NUMBERS
2408       encAbout = GNUNET_strdup(GNUNET_i2s(peer));
2409       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
2410                   "%s: %s Chose NEW id (%u) for peer %s!\n", GNUNET_i2s(&my_identity), "DV SERVICE", our_id, encAbout);
2411       GNUNET_free(encAbout);
2412 #endif
2413
2414       if (max_table_size <=
2415           GNUNET_CONTAINER_multihashmap_size (extended_neighbors))
2416         {
2417           /* remove most expensive entry */
2418           max = GNUNET_CONTAINER_heap_peek (neighbor_max_heap);
2419           GNUNET_assert(max != NULL);
2420           if (cost > max->cost)
2421             {
2422               /* new entry most expensive, don't create */
2423               GNUNET_free(neighbor_update);
2424               return NULL;
2425             }
2426           if (max->cost > 1)
2427             {
2428               /* only free if this is not a direct connection;
2429                  we could theoretically have more direct
2430                  connections than DV entries allowed total! */
2431               distant_neighbor_free (max);
2432             }
2433         }
2434
2435       neighbor = GNUNET_malloc (sizeof (struct DistantNeighbor));
2436       GNUNET_CONTAINER_DLL_insert (referrer->referee_head,
2437                          referrer->referee_tail, neighbor);
2438       neighbor->max_loc = GNUNET_CONTAINER_heap_insert (neighbor_max_heap,
2439                                                         neighbor, cost);
2440       neighbor->min_loc = GNUNET_CONTAINER_heap_insert (neighbor_min_heap,
2441                                                         neighbor, cost);
2442       neighbor->referrer = referrer;
2443       memcpy (&neighbor->identity, peer, sizeof (struct GNUNET_PeerIdentity));
2444       if (pkey != NULL) /* pkey will be null on direct neighbor addition */
2445       {
2446         neighbor->pkey = GNUNET_malloc(sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
2447         memcpy (neighbor->pkey, pkey, sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
2448       }
2449       else
2450         neighbor->pkey = pkey;
2451
2452       neighbor->last_activity = now;
2453       neighbor->cost = cost;
2454       neighbor->referrer_id = referrer_peer_id;
2455       neighbor->our_id = our_id;
2456       neighbor->hidden =
2457         (cost == DIRECT_NEIGHBOR_COST) ? (GNUNET_CRYPTO_random_u32 (GNUNET_CRYPTO_QUALITY_WEAK, 4) ==
2458                        0) : GNUNET_NO;
2459
2460       GNUNET_CONTAINER_multihashmap_put (extended_neighbors, &peer->hashPubKey,
2461                                  neighbor,
2462                                  GNUNET_CONTAINER_MULTIHASHMAPOPTION_MULTIPLE);
2463       if (referrer_peer_id != 0)
2464         {
2465           for (i = 0; i< MAX_OUTSTANDING_MESSAGES; i++)
2466             {
2467               if (referrer->pending_messages[i].sender_id == referrer_peer_id) /* We have a queued message from just learned about peer! */
2468                 {
2469 #if DEBUG_DV_MESSAGES
2470                   GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "%s: learned about peer %llu from which we have a previous unknown message, processing!\n", my_short_id, referrer_peer_id);
2471 #endif
2472                   handle_dv_data_message(NULL, &referrer->pending_messages[i].sender, referrer->pending_messages[i].message, referrer->pending_messages[i].latency, referrer->pending_messages[i].distance);
2473                   GNUNET_free(referrer->pending_messages[i].message);
2474                   referrer->pending_messages[i].sender_id = 0;
2475                 }
2476             }
2477         }
2478       if ((cost != DIRECT_NEIGHBOR_COST) && (neighbor->pkey != NULL))
2479         {
2480           /* Added neighbor, now send HELLO to transport */
2481           hello_context = GNUNET_malloc(sizeof(struct HelloContext));
2482           hello_context->direct_peer = &referrer->identity;
2483           memcpy(&hello_context->distant_peer, peer, sizeof(struct GNUNET_PeerIdentity));
2484           hello_context->addresses_to_add = 1;
2485           hello_msg = GNUNET_HELLO_create(pkey, &generate_hello_address, hello_context);
2486           GNUNET_assert(memcmp(hello_context->direct_peer, &hello_context->distant_peer, sizeof(struct GNUNET_PeerIdentity)) != 0);
2487           addr1 = GNUNET_strdup(GNUNET_i2s(hello_context->direct_peer));
2488           addr2 = GNUNET_strdup(GNUNET_i2s(&hello_context->distant_peer));
2489 #if DEBUG_DV
2490           GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "%s: GIVING HELLO size %d for %s via %s to TRANSPORT\n", my_short_id, GNUNET_HELLO_size(hello_msg), addr2, addr1);
2491 #endif
2492           GNUNET_free(addr1);
2493           GNUNET_free(addr2);
2494           send_to_plugin(hello_context->direct_peer, GNUNET_HELLO_get_header(hello_msg), GNUNET_HELLO_size(hello_msg), &hello_context->distant_peer, cost);
2495           GNUNET_free(hello_context);
2496           GNUNET_free(hello_msg);
2497         }
2498
2499     }
2500   else
2501     {
2502 #if DEBUG_DV_GOSSIP
2503       GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
2504                   "%s: Already know peer %s distance %d, referrer id %d!\n", "dv", GNUNET_i2s(peer), cost, referrer_peer_id);
2505 #endif
2506     }
2507 #if DEBUG_DV
2508     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
2509                 "%s: Size of extended_neighbors is %d\n", "dv", GNUNET_CONTAINER_multihashmap_size(extended_neighbors));
2510 #endif
2511
2512   GNUNET_free(neighbor_update);
2513   return neighbor;
2514 }
2515
2516
2517 /**
2518  * Core handler for dv disconnect messages.  These will be used
2519  * by us to tell transport via the dv plugin that a peer can
2520  * no longer be contacted by us via a certain address.  We should
2521  * then propagate these messages on, given that the distance to
2522  * the peer indicates we would have gossiped about it to others.
2523  *
2524  * @param cls closure
2525  * @param peer peer which sent the message (immediate sender)
2526  * @param message the message
2527  * @param latency the latency of the connection we received the message from
2528  * @param distance the distance to the immediate peer
2529  */
2530 static int handle_dv_disconnect_message (void *cls,
2531                                          const struct GNUNET_PeerIdentity *peer,
2532                                          const struct GNUNET_MessageHeader *message,
2533                                          struct GNUNET_TIME_Relative latency,
2534                                          uint32_t distance)
2535 {
2536   struct DirectNeighbor *referrer;
2537   struct DistantNeighbor *distant;
2538   p2p_dv_MESSAGE_Disconnect *enc_message = (p2p_dv_MESSAGE_Disconnect *)message;
2539
2540   if (ntohs (message->size) < sizeof (p2p_dv_MESSAGE_Disconnect))
2541     {
2542       return GNUNET_SYSERR;     /* invalid message */
2543     }
2544
2545   referrer = GNUNET_CONTAINER_multihashmap_get (direct_neighbors,
2546                                                 &peer->hashPubKey);
2547   if (referrer == NULL)
2548     return GNUNET_OK;
2549
2550   distant = referrer->referee_head;
2551   while (distant != NULL)
2552     {
2553       if (distant->referrer_id == ntohl(enc_message->peer_id))
2554         {
2555           distant_neighbor_free(distant);
2556           distant = referrer->referee_head;
2557         }
2558       else
2559         distant = distant->next;
2560     }
2561
2562   return GNUNET_OK;
2563 }
2564
2565
2566 /**
2567  * Core handler for dv gossip messages.  These will be used
2568  * by us to create a HELLO message for the newly peer containing
2569  * which direct peer we can connect through, and what the cost
2570  * is.  This HELLO will then be scheduled for validation by the
2571  * transport service so that it can be used by all others.
2572  *
2573  * @param cls closure
2574  * @param peer peer which sent the message (immediate sender)
2575  * @param message the message
2576  * @param latency the latency of the connection we received the message from
2577  * @param distance the distance to the immediate peer
2578  */
2579 static int handle_dv_gossip_message (void *cls,
2580                                      const struct GNUNET_PeerIdentity *peer,
2581                                      const struct GNUNET_MessageHeader *message,
2582                                      struct GNUNET_TIME_Relative latency,
2583                                      uint32_t distance)
2584 {
2585   struct DirectNeighbor *referrer;
2586   p2p_dv_MESSAGE_NeighborInfo *enc_message = (p2p_dv_MESSAGE_NeighborInfo *)message;
2587
2588   if (ntohs (message->size) < sizeof (p2p_dv_MESSAGE_NeighborInfo))
2589     {
2590       return GNUNET_SYSERR;     /* invalid message */
2591     }
2592
2593 #if DEBUG_DV_GOSSIP_RECEIPT
2594   char * encPeerAbout;
2595   char * encPeerFrom;
2596
2597   encPeerAbout = GNUNET_strdup(GNUNET_i2s(&enc_message->neighbor));
2598   encPeerFrom = GNUNET_strdup(GNUNET_i2s(peer));
2599   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
2600               "%s: Received %s message from peer %s about peer %s id %u distance %d!\n", GNUNET_i2s(&my_identity), "DV GOSSIP", encPeerFrom, encPeerAbout, ntohl(enc_message->neighbor_id), ntohl (enc_message->cost) + 1);
2601   GNUNET_free(encPeerAbout);
2602   GNUNET_free(encPeerFrom);
2603 #endif
2604
2605   referrer = GNUNET_CONTAINER_multihashmap_get (direct_neighbors,
2606                                                 &peer->hashPubKey);
2607   if (referrer == NULL)
2608     return GNUNET_OK;
2609
2610   addUpdateNeighbor (&enc_message->neighbor, &enc_message->pkey,
2611                      ntohl (enc_message->neighbor_id),
2612                      referrer, ntohl (enc_message->cost) + 1);
2613
2614   return GNUNET_OK;
2615 }
2616
2617
2618 /**
2619  * Iterate over all currently known peers, add them to the
2620  * fast gossip list for this peer so we get DV routing information
2621  * out as fast as possible!
2622  *
2623  * @param cls the direct neighbor we will gossip to
2624  * @param key the hashcode of the peer
2625  * @param value the distant neighbor we should add to the list
2626  *
2627  * @return GNUNET_YES to continue iteration, GNUNET_NO otherwise
2628  */
2629 static int add_all_extended_peers (void *cls,
2630                                    const GNUNET_HashCode * key,
2631                                    void *value)
2632 {
2633   struct NeighborSendContext *send_context = (struct NeighborSendContext *)cls;
2634   struct DistantNeighbor *distant = (struct DistantNeighbor *)value;
2635   struct FastGossipNeighborList *gossip_entry;
2636
2637   if (memcmp(&send_context->toNeighbor->identity, &distant->identity, sizeof(struct GNUNET_PeerIdentity)) == 0)
2638     return GNUNET_YES; /* Don't gossip to a peer about itself! */
2639
2640 #if SUPPORT_HIDING
2641   if (distant->hidden == GNUNET_YES)
2642     return GNUNET_YES; /* This peer should not be gossipped about (hidden) */
2643 #endif
2644   gossip_entry = GNUNET_malloc(sizeof(struct FastGossipNeighborList));
2645   gossip_entry->about = distant;
2646
2647   GNUNET_CONTAINER_DLL_insert_after(send_context->fast_gossip_list_head,
2648                                     send_context->fast_gossip_list_tail,
2649                                     send_context->fast_gossip_list_tail,
2650                                     gossip_entry);
2651
2652   return GNUNET_YES;
2653 }
2654
2655 #if INSANE_GOSSIP
2656 /**
2657  * Iterator over hash map entries.
2658  *
2659  * @param cls closure
2660  * @param key current key code
2661  * @param value value in the hash map
2662  * @return GNUNET_YES if we should continue to
2663  *         iterate,
2664  *         GNUNET_NO if not.
2665  */
2666 static int gossip_all_to_all_iterator (void *cls,
2667                                       const GNUNET_HashCode * key,
2668                                       void *value)
2669 {
2670   struct DirectNeighbor *direct = value;
2671
2672   GNUNET_CONTAINER_multihashmap_iterate (extended_neighbors, &add_all_extended_peers, direct->send_context);
2673
2674   if (direct->send_context->task != GNUNET_SCHEDULER_NO_TASK)
2675     GNUNET_SCHEDULER_cancel(sched, direct->send_context->task);
2676
2677   direct->send_context->task = GNUNET_SCHEDULER_add_now(sched, &neighbor_send_task, direct->send_context);
2678   return GNUNET_YES;
2679 }
2680
2681 /**
2682  * Task run during shutdown.
2683  *
2684  * @param cls unused
2685  * @param tc unused
2686  */
2687 static void
2688 gossip_all_to_all (void *cls,
2689                    const struct GNUNET_SCHEDULER_TaskContext *tc)
2690 {
2691   GNUNET_CONTAINER_multihashmap_iterate (direct_neighbors, &gossip_all_to_all_iterator, NULL);
2692
2693   GNUNET_SCHEDULER_add_delayed (sched,
2694                                 GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, 5),
2695                                 &gossip_all_to_all,
2696                                 NULL);
2697
2698 }
2699 #endif
2700 /**
2701  * Iterate over all current direct peers, add newly connected peer
2702  * to the fast gossip list for that peer so we get DV routing
2703  * information out as fast as possible!
2704  *
2705  * @param cls the newly connected neighbor we will gossip about
2706  * @param key the hashcode of the peer
2707  * @param value the direct neighbor we should gossip to
2708  *
2709  * @return GNUNET_YES to continue iteration, GNUNET_NO otherwise
2710  */
2711 static int add_all_direct_neighbors (void *cls,
2712                                      const GNUNET_HashCode * key,
2713                                      void *value)
2714 {
2715   struct DirectNeighbor *direct = (struct DirectNeighbor *)value;
2716   struct DirectNeighbor *to = (struct DirectNeighbor *)cls;
2717   struct DistantNeighbor *distant;
2718   struct NeighborSendContext *send_context = direct->send_context;
2719   struct FastGossipNeighborList *gossip_entry;
2720   char *direct_id;
2721
2722
2723   distant = GNUNET_CONTAINER_multihashmap_get(extended_neighbors, &to->identity.hashPubKey);
2724   if (distant == NULL)
2725     {
2726       return GNUNET_YES;
2727     }
2728
2729   if (memcmp(&direct->identity, &to->identity, sizeof(struct GNUNET_PeerIdentity)) == 0)
2730     {
2731       return GNUNET_YES; /* Don't gossip to a peer about itself! */
2732     }
2733
2734 #if SUPPORT_HIDING
2735   if (distant->hidden == GNUNET_YES)
2736     return GNUNET_YES; /* This peer should not be gossipped about (hidden) */
2737 #endif
2738   direct_id = GNUNET_strdup(GNUNET_i2s(&direct->identity));
2739 #if DEBUG_DV_GOSSIP
2740   GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "%s: adding peer %s to fast send list for %s\n", my_short_id, GNUNET_i2s(&distant->identity), direct_id);
2741 #endif
2742   GNUNET_free(direct_id);
2743   gossip_entry = GNUNET_malloc(sizeof(struct FastGossipNeighborList));
2744   gossip_entry->about = distant;
2745
2746   GNUNET_CONTAINER_DLL_insert_after(send_context->fast_gossip_list_head,
2747                                     send_context->fast_gossip_list_tail,
2748                                     send_context->fast_gossip_list_tail,
2749                                     gossip_entry);
2750   if (send_context->task != GNUNET_SCHEDULER_NO_TASK)
2751     GNUNET_SCHEDULER_cancel(sched, send_context->task);
2752
2753   send_context->task = GNUNET_SCHEDULER_add_now(sched, &neighbor_send_task, send_context);
2754   //tc.reason = GNUNET_SCHEDULER_REASON_TIMEOUT;
2755   //neighbor_send_task(send_context, &tc);
2756   return GNUNET_YES;
2757 }
2758
2759 /**
2760  * Type of an iterator over the hosts.  Note that each
2761  * host will be called with each available protocol.
2762  *
2763  * @param cls closure
2764  * @param peer id of the peer, NULL for last call
2765  * @param hello hello message for the peer (can be NULL)
2766  */
2767 static void
2768 process_peerinfo (void *cls,
2769                   const struct GNUNET_PeerIdentity *peer,
2770                   const struct GNUNET_HELLO_Message *hello)
2771 {
2772   struct PeerIteratorContext *peerinfo_iterator = cls;
2773   struct DirectNeighbor *neighbor = peerinfo_iterator->neighbor;
2774   struct DistantNeighbor *distant = peerinfo_iterator->distant;
2775 #if DEBUG_DV_PEER_NUMBERS
2776   char *neighbor_pid;
2777 #endif
2778   int sent;
2779
2780   if (peer == NULL)
2781     {
2782       if (distant->pkey == NULL)
2783         {
2784 #if DEBUG_DV
2785           GNUNET_log(GNUNET_ERROR_TYPE_WARNING, "Failed to get peerinfo information for this peer, retrying!\n");
2786 #endif
2787           peerinfo_iterator->ic = GNUNET_PEERINFO_iterate(peerinfo_handle,
2788                                                           &peerinfo_iterator->neighbor->identity,
2789                                                           GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 3),
2790                                                           &process_peerinfo,
2791                                                           peerinfo_iterator);
2792         }
2793       else
2794         {
2795           GNUNET_free(peerinfo_iterator);
2796         }
2797       return;
2798     }
2799
2800   if (memcmp(&neighbor->identity, peer, sizeof(struct GNUNET_PeerIdentity) != 0))
2801     return;
2802
2803   if ((hello != NULL) && (GNUNET_HELLO_get_key (hello, &neighbor->pkey) == GNUNET_OK))
2804     {
2805       if (distant->pkey == NULL)
2806         {
2807           distant->pkey = GNUNET_malloc(sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
2808           memcpy(distant->pkey, &neighbor->pkey, sizeof(struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded));
2809         }
2810
2811       sent = GNUNET_CONTAINER_multihashmap_iterate (extended_neighbors, &add_all_extended_peers, neighbor->send_context);
2812       if (stats != NULL)
2813         {
2814           GNUNET_STATISTICS_update (stats, "# distant peers gossiped to direct neighbors", sent, GNUNET_NO);
2815         }
2816 #if DEBUG_DV_PEER_NUMBERS
2817       neighbor_pid = GNUNET_strdup(GNUNET_i2s(&neighbor->identity));
2818       GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "%s: Gossipped %d extended peers to %s\n", GNUNET_i2s(&my_identity), sent, neighbor_pid);
2819 #endif
2820       sent = GNUNET_CONTAINER_multihashmap_iterate (direct_neighbors, &add_all_direct_neighbors, neighbor);
2821       if (stats != NULL)
2822         {
2823           GNUNET_STATISTICS_update (stats, "# direct peers gossiped to direct neighbors", sent, GNUNET_NO);
2824         }
2825 #if DEBUG_DV_PEER_NUMBERS
2826       GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "%s: Gossipped about %s to %d direct peers\n", GNUNET_i2s(&my_identity), neighbor_pid, sent);
2827       GNUNET_free(neighbor_pid);
2828 #endif
2829       neighbor->send_context->task = GNUNET_SCHEDULER_add_now(sched, &neighbor_send_task, neighbor->send_context);
2830     }
2831 }
2832
2833
2834 /**
2835  * Method called whenever a peer connects.
2836  *
2837  * @param cls closure
2838  * @param peer peer identity this notification is about
2839  * @param latency reported latency of the connection with peer
2840  * @param distance reported distance (DV) to peer
2841  */
2842 void handle_core_connect (void *cls,
2843                           const struct GNUNET_PeerIdentity * peer,
2844                           struct GNUNET_TIME_Relative latency,
2845                           uint32_t distance)
2846 {
2847   struct DirectNeighbor *neighbor;
2848   struct DistantNeighbor *about;
2849   struct PeerIteratorContext *peerinfo_iterator;
2850   int sent;
2851 #if DEBUG_DV
2852   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
2853               "%s: Receives core connect message for peer %s distance %d!\n", "dv", GNUNET_i2s(peer), distance);
2854 #endif
2855
2856   if ((distance == DIRECT_NEIGHBOR_COST) && (GNUNET_CONTAINER_multihashmap_get(direct_neighbors, &peer->hashPubKey) == NULL))
2857   {
2858     peerinfo_iterator = GNUNET_malloc(sizeof(struct PeerIteratorContext));
2859     neighbor = GNUNET_malloc (sizeof (struct DirectNeighbor));
2860     neighbor->send_context = GNUNET_malloc(sizeof(struct NeighborSendContext));
2861     neighbor->send_context->toNeighbor = neighbor;
2862     memcpy (&neighbor->identity, peer, sizeof (struct GNUNET_PeerIdentity));
2863
2864     GNUNET_assert(GNUNET_SYSERR != GNUNET_CONTAINER_multihashmap_put (direct_neighbors,
2865                                &peer->hashPubKey,
2866                                neighbor, GNUNET_CONTAINER_MULTIHASHMAPOPTION_UNIQUE_ONLY));
2867     about = addUpdateNeighbor (peer, NULL, 0, neighbor, DIRECT_NEIGHBOR_COST);
2868     peerinfo_iterator->distant = about;
2869     peerinfo_iterator->neighbor = neighbor;
2870     peerinfo_iterator->ic = GNUNET_PEERINFO_iterate (peerinfo_handle,
2871                                                      peer,
2872                                                      GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 3),
2873                                                      &process_peerinfo,
2874                                                      peerinfo_iterator);
2875
2876     if ((about != NULL) && (about->pkey == NULL))
2877       {
2878 #if DEBUG_DV
2879         GNUNET_log(GNUNET_ERROR_TYPE_DEBUG, "Newly added peer %s has NULL pkey!\n", GNUNET_i2s(peer));
2880 #endif
2881       }
2882     else if (about != NULL)
2883       {
2884         GNUNET_free(peerinfo_iterator);
2885       }
2886   }
2887   else
2888   {
2889     about = GNUNET_CONTAINER_multihashmap_get(extended_neighbors, &peer->hashPubKey);
2890     if ((GNUNET_CONTAINER_multihashmap_get(direct_neighbors, &peer->hashPubKey) == NULL) && (about != NULL))
2891       {
2892         sent = GNUNET_CONTAINER_multihashmap_iterate(direct_neighbors, &add_distant_all_direct_neighbors, about);
2893         if (stats != NULL)
2894           {
2895             GNUNET_STATISTICS_update (stats, "# direct peers gossiped to new direct neighbors", sent, GNUNET_NO);
2896           }
2897       }
2898 #if DEBUG_DV
2899     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
2900                 "%s: Distance (%d) greater than %d or already know about peer (%s), not re-adding!\n", "dv", distance, DIRECT_NEIGHBOR_COST, GNUNET_i2s(peer));
2901 #endif
2902     return;
2903   }
2904 }
2905
2906 /**
2907  * Method called whenever a given peer disconnects.
2908  *
2909  * @param cls closure
2910  * @param peer peer identity this notification is about
2911  */
2912 void handle_core_disconnect (void *cls,
2913                              const struct GNUNET_PeerIdentity * peer)
2914 {
2915   struct DirectNeighbor *neighbor;
2916   struct DistantNeighbor *referee;
2917   struct FindDestinationContext fdc;
2918   struct DisconnectContext disconnect_context;
2919
2920 #if DEBUG_DV
2921   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
2922               "%s: Receives core peer disconnect message!\n", "dv");
2923 #endif
2924
2925   neighbor =
2926     GNUNET_CONTAINER_multihashmap_get (direct_neighbors, &peer->hashPubKey);
2927   if (neighbor == NULL)
2928     {
2929       return;
2930     }
2931   while (NULL != (referee = neighbor->referee_head))
2932     distant_neighbor_free (referee);
2933
2934   fdc.dest = NULL;
2935   fdc.tid = 0;
2936
2937   GNUNET_CONTAINER_multihashmap_iterate (extended_neighbors, &find_distant_peer, &fdc);
2938
2939   if (fdc.dest != NULL)
2940     {
2941       disconnect_context.direct = neighbor;
2942       disconnect_context.distant = fdc.dest;
2943       GNUNET_CONTAINER_multihashmap_iterate (direct_neighbors, &schedule_disconnect_messages, &disconnect_context);
2944     }
2945
2946   GNUNET_assert (neighbor->referee_tail == NULL);
2947   if (GNUNET_NO == GNUNET_CONTAINER_multihashmap_remove (direct_neighbors,
2948                                         &peer->hashPubKey, neighbor))
2949     {
2950       GNUNET_break(0);
2951     }
2952   if ((neighbor->send_context != NULL) && (neighbor->send_context->task != GNUNET_SCHEDULER_NO_TASK))
2953     GNUNET_SCHEDULER_cancel(sched, neighbor->send_context->task);
2954   GNUNET_free (neighbor);
2955 }
2956
2957
2958 /**
2959  * Process dv requests.
2960  *
2961  * @param cls closure
2962  * @param scheduler scheduler to use
2963  * @param server the initialized server
2964  * @param c configuration to use
2965  */
2966 static void
2967 run (void *cls,
2968      struct GNUNET_SCHEDULER_Handle *scheduler,
2969      struct GNUNET_SERVER_Handle *server,
2970      const struct GNUNET_CONFIGURATION_Handle *c)
2971 {
2972   unsigned long long max_hosts;
2973   sched = scheduler;
2974   cfg = c;
2975
2976   /* FIXME: Read from config, or calculate, or something other than this! */
2977   max_hosts = DEFAULT_DIRECT_CONNECTIONS;
2978   max_table_size = DEFAULT_DV_SIZE;
2979   fisheye_depth = DEFAULT_FISHEYE_DEPTH;
2980
2981   if (GNUNET_CONFIGURATION_have_value(cfg, "dv", "max_direct_connections"))
2982     GNUNET_assert(GNUNET_OK == GNUNET_CONFIGURATION_get_value_number(cfg, "dv", "max_direct_connections", &max_hosts));
2983
2984   if (GNUNET_CONFIGURATION_have_value(cfg, "dv", "max_total_connections"))
2985     GNUNET_assert(GNUNET_OK == GNUNET_CONFIGURATION_get_value_number(cfg, "dv", "max_total_connections", &max_table_size));
2986
2987
2988   if (GNUNET_CONFIGURATION_have_value(cfg, "dv", "fisheye_depth"))
2989     GNUNET_assert(GNUNET_OK == GNUNET_CONFIGURATION_get_value_number(cfg, "dv", "fisheye_depth", &fisheye_depth));
2990
2991   neighbor_min_heap =
2992     GNUNET_CONTAINER_heap_create (GNUNET_CONTAINER_HEAP_ORDER_MIN);
2993   neighbor_max_heap =
2994     GNUNET_CONTAINER_heap_create (GNUNET_CONTAINER_HEAP_ORDER_MAX);
2995
2996   direct_neighbors = GNUNET_CONTAINER_multihashmap_create (max_hosts);
2997   extended_neighbors =
2998     GNUNET_CONTAINER_multihashmap_create (max_table_size * 3);
2999
3000   GNUNET_SERVER_add_handlers (server, plugin_handlers);
3001   coreAPI =
3002   GNUNET_CORE_connect (sched,
3003                        cfg,
3004                        GNUNET_TIME_relative_get_forever(),
3005                        NULL, /* FIXME: anything we want to pass around? */
3006                        &core_init,
3007                        &handle_core_connect,
3008                        &handle_core_disconnect,
3009                        NULL,
3010                        NULL,
3011                        GNUNET_NO,
3012                        NULL,
3013                        GNUNET_NO,
3014                        core_handlers);
3015
3016   if (coreAPI == NULL)
3017     return;
3018
3019   coreMST = GNUNET_SERVER_mst_create (&tokenized_message_handler,
3020                                       NULL);
3021
3022    peerinfo_handle = GNUNET_PEERINFO_connect(sched, cfg);
3023
3024    if (peerinfo_handle == NULL)
3025      {
3026        GNUNET_CORE_disconnect(coreAPI);
3027        return;
3028      }
3029
3030   /* Scheduled the task to clean up when shutdown is called */
3031   cleanup_task = GNUNET_SCHEDULER_add_delayed (sched,
3032                                 GNUNET_TIME_UNIT_FOREVER_REL,
3033                                 &shutdown_task,
3034                                 NULL);
3035 }
3036
3037
3038 /**
3039  * The main function for the dv service.
3040  *
3041  * @param argc number of arguments from the command line
3042  * @param argv command line arguments
3043  * @return 0 ok, 1 on error
3044  */
3045 int
3046 main (int argc, char *const *argv)
3047 {
3048   return (GNUNET_OK ==
3049           GNUNET_SERVICE_run (argc,
3050                               argv,
3051                               "dv",
3052                               GNUNET_SERVICE_OPTION_NONE,
3053                               &run, NULL)) ? 0 : 1;
3054 }