src/transport/gnunet-service-transport_clients.c

   1 /*
   2      This file is part of GNUnet.
   3      (C) 2010-2013 Christian Grothoff (and other contributing authors)
   4
   5      GNUnet is free software; you can redistribute it and/or modify
   6      it under the terms of the GNU General Public License as published
   7      by the Free Software Foundation; either version 3, or (at your
   8      option) any later version.
   9
  10      GNUnet is distributed in the hope that it will be useful, but
  11      WITHOUT ANY WARRANTY; without even the implied warranty of
  12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13      General Public License for more details.
  14
  15      You should have received a copy of the GNU General Public License
  16      along with GNUnet; see the file COPYING.  If not, write to the
  17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18      Boston, MA 02111-1307, USA.
  19 */
  20
  21 /**
  22  * @file transport/gnunet-service-transport_clients.c
  23  * @brief plugin management API
  24  * @author Christian Grothoff
  25  */
  26 #include "platform.h"
  27 #include "gnunet-service-transport_blacklist.h"
  28 #include "gnunet-service-transport_clients.h"
  29 #include "gnunet-service-transport_hello.h"
  30 #include "gnunet-service-transport_neighbours.h"
  31 #include "gnunet-service-transport_plugins.h"
  32 #include "gnunet-service-transport_validation.h"
  33 #include "gnunet-service-transport_manipulation.h"
  34 #include "gnunet-service-transport.h"
  35 #include "transport.h"
  36
  37
  38 /**
  39  * How many messages can we have pending for a given client process
  40  * before we start to drop incoming messages?  We typically should
  41  * have only one client and so this would be the primary buffer for
  42   * messages, so the number should be chosen rather generously.
  43  *
  44  * The expectation here is that most of the time the queue is large
  45  * enough so that a drop is virtually never required.  Note that
  46  * this value must be about as large as 'TOTAL_MSGS' in the
  47  * 'test_transport_api_reliability.c', otherwise that testcase may
  48  * fail.
  49  */
  50 #define MAX_PENDING (128 * 1024)
  51
  52
  53 /**
  54  * Linked list of messages to be transmitted to the client.  Each
  55  * entry is followed by the actual message.
  56  */
  57 struct ClientMessageQueueEntry
  58 {
  59   /**
  60    * This is a doubly-linked list.
  61    */
  62   struct ClientMessageQueueEntry *next;
  63
  64   /**
  65    * This is a doubly-linked list.
  66    */
  67   struct ClientMessageQueueEntry *prev;
  68 };
  69
  70
  71 /**
  72  * Client connected to the transport service.
  73  */
  74 struct TransportClient
  75 {
  76
  77   /**
  78    * This is a doubly-linked list.
  79    */
  80   struct TransportClient *next;
  81
  82   /**
  83    * This is a doubly-linked list.
  84    */
  85   struct TransportClient *prev;
  86
  87   /**
  88    * Handle to the client.
  89    */
  90   struct GNUNET_SERVER_Client *client;
  91
  92   /**
  93    * Linked list of messages yet to be transmitted to
  94    * the client.
  95    */
  96   struct ClientMessageQueueEntry *message_queue_head;
  97
  98   /**
  99    * Tail of linked list of messages yet to be transmitted to the
 100    * client.
 101    */
 102   struct ClientMessageQueueEntry *message_queue_tail;
 103
 104   /**
 105    * Current transmit request handle.
 106    */
 107   struct GNUNET_SERVER_TransmitHandle *th;
 108
 109   /**
 110    * Length of the list of messages pending for this client.
 111    */
 112   unsigned int message_count;
 113
 114   /**
 115    * Is this client interested in payload messages?
 116    */
 117   int send_payload;
 118 };
 119
 120 /**
 121  * Context for address to string operations
 122  */
 123 struct AddressToStringContext
 124 {
 125   /**
 126    * This is a doubly-linked list.
 127    */
 128   struct AddressToStringContext *next;
 129
 130   /**
 131    * This is a doubly-linked list.
 132    */
 133   struct AddressToStringContext *prev;
 134
 135   /**
 136    * Transmission context
 137    */
 138   struct GNUNET_SERVER_TransmitContext* tc;
 139 };
 140
 141 /**
 142  * Client monitoring changes of active addresses of our neighbours.
 143  */
 144 struct MonitoringClient
 145 {
 146   /**
 147    * This is a doubly-linked list.
 148    */
 149   struct MonitoringClient *next;
 150
 151   /**
 152    * This is a doubly-linked list.
 153    */
 154   struct MonitoringClient *prev;
 155
 156   /**
 157    * Handle to the client.
 158    */
 159   struct GNUNET_SERVER_Client *client;
 160
 161   /**
 162    * Peer identity to monitor the addresses of.
 163    * Zero to monitor all neighrours.
 164    */
 165   struct GNUNET_PeerIdentity peer;
 166
 167 };
 168
 169
 170 /**
 171  * Head of linked list of all clients to this service.
 172  */
 173 static struct TransportClient *clients_head;
 174
 175 /**
 176  * Tail of linked list of all clients to this service.
 177  */
 178 static struct TransportClient *clients_tail;
 179
 180 /**
 181  * Head of linked list of all pending address iterations
 182  */
 183 struct AddressToStringContext *a2s_head;
 184
 185 /**
 186  * Tail of linked list of all pending address iterations
 187  */
 188 struct AddressToStringContext *a2s_tail;
 189
 190 /**
 191  * Head of linked list of monitoring clients.
 192  */
 193 static struct MonitoringClient *peer_monitoring_clients_head;
 194
 195 /**
 196  * Tail of linked list of monitoring clients.
 197  */
 198 static struct MonitoringClient *peer_monitoring_clients_tail;
 199
 200 /**
 201  * Head of linked list of validation monitoring clients.
 202  */
 203 static struct MonitoringClient *val_monitoring_clients_head;
 204
 205 /**
 206  * Tail of linked list of validation monitoring clients.
 207  */
 208 static struct MonitoringClient *val_monitoring_clients_tail;
 209
 210 /**
 211  * Notification context, to send updates on changes to active addresses
 212  * of our neighbours.
 213  */
 214 static struct GNUNET_SERVER_NotificationContext *peer_nc;
 215
 216 /**
 217  * Notification context, to send updates on changes to active addresses
 218  * of our neighbours.
 219  */
 220 static struct GNUNET_SERVER_NotificationContext *val_nc;
 221
 222 /**
 223  * Find the internal handle associated with the given client handle
 224  *
 225  * @param client server's client handle to look up
 226  * @return internal client handle
 227  */
 228 static struct TransportClient *
 229 lookup_client (struct GNUNET_SERVER_Client *client)
 230 {
 231   struct TransportClient *tc;
 232
 233   for (tc = clients_head; NULL != tc; tc = tc->next)
 234     if (tc->client == client)
 235       return tc;
 236   return NULL;
 237 }
 238
 239
 240 /**
 241  * Create the internal handle for the given server client handle
 242  *
 243  * @param client server's client handle to create our internal handle for
 244  * @return fresh internal client handle
 245  */
 246 static struct TransportClient *
 247 setup_client (struct GNUNET_SERVER_Client *client)
 248 {
 249   struct TransportClient *tc;
 250
 251   GNUNET_assert (NULL == lookup_client (client));
 252   tc = GNUNET_new (struct TransportClient);
 253   tc->client = client;
 254   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 255               "Client %p connected\n",
 256               tc);
 257   return tc;
 258 }
 259
 260
 261 /**
 262  * Find the handle to the monitoring client associated with the given
 263  * client handle
 264  *
 265  * @param head the head of the client queue to look in
 266  * @param client server's client handle to look up
 267  * @return handle to the monitoring client
 268  */
 269 static struct MonitoringClient *
 270 lookup_monitoring_client (struct MonitoringClient *head,
 271     struct GNUNET_SERVER_Client *client)
 272 {
 273   struct MonitoringClient *mc;
 274
 275   for (mc = head; NULL != mc; mc = mc->next)
 276     if (mc->client == client)
 277       return mc;
 278   return NULL;
 279 }
 280
 281
 282 /**
 283  * Setup a new monitoring client using the given server client handle and
 284  * the peer identity.
 285  *
 286  * @param client server's client handle to create our internal handle for
 287  * @param peer identity of the peer to monitor the addresses of,
 288  *             zero to monitor all neighrours.
 289  * @return handle to the new monitoring client
 290  */
 291 static struct MonitoringClient *
 292 setup_peer_monitoring_client (struct GNUNET_SERVER_Client *client,
 293                          struct GNUNET_PeerIdentity *peer)
 294 {
 295   struct MonitoringClient *mc;
 296   static struct GNUNET_PeerIdentity all_zeros;
 297
 298   GNUNET_assert (lookup_monitoring_client (peer_monitoring_clients_head, client) == NULL);
 299   mc = GNUNET_new (struct MonitoringClient);
 300   mc->client = client;
 301   mc->peer = *peer;
 302   GNUNET_CONTAINER_DLL_insert (peer_monitoring_clients_head, peer_monitoring_clients_tail, mc);
 303   GNUNET_SERVER_notification_context_add (peer_nc, client);
 304
 305   if (0 != memcmp (peer, &all_zeros, sizeof (struct GNUNET_PeerIdentity)))
 306     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 307                 "Client %p started monitoring of the peer `%s'\n",
 308                 mc, GNUNET_i2s (peer));
 309   else
 310     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 311               "Client %p started monitoring all peers\n", mc);
 312   return mc;
 313 }
 314
 315 /**
 316  * Setup a new monitoring client using the given server client handle and
 317  * the peer identity.
 318  *
 319  * @param client server's client handle to create our internal handle for
 320  * @param peer identity of the peer to monitor the addresses of,
 321  *             zero to monitor all neighrours.
 322  * @return handle to the new monitoring client
 323  */
 324 static struct MonitoringClient *
 325 setup_val_monitoring_client (struct GNUNET_SERVER_Client *client,
 326                          struct GNUNET_PeerIdentity *peer)
 327 {
 328   struct MonitoringClient *mc;
 329   static struct GNUNET_PeerIdentity all_zeros;
 330
 331   GNUNET_assert (lookup_monitoring_client (val_monitoring_clients_head, client) == NULL);
 332   mc = GNUNET_new (struct MonitoringClient);
 333   mc->client = client;
 334   mc->peer = *peer;
 335   GNUNET_CONTAINER_DLL_insert (val_monitoring_clients_head, val_monitoring_clients_tail, mc);
 336   GNUNET_SERVER_notification_context_add (val_nc, client);
 337
 338   if (0 != memcmp (peer, &all_zeros, sizeof (struct GNUNET_PeerIdentity)))
 339     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 340                 "Client %p started monitoring of the peer `%s'\n",
 341                 mc, GNUNET_i2s (peer));
 342   else
 343     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 344               "Client %p started monitoring all peers\n", mc);
 345   return mc;
 346 }
 347
 348
 349 /**
 350  * Function called to notify a client about the socket being ready to
 351  * queue more data.  "buf" will be NULL and "size" zero if the socket
 352  * was closed for writing in the meantime.
 353  *
 354  * @param cls closure
 355  * @param size number of bytes available in @a buf
 356  * @param buf where the callee should write the message
 357  * @return number of bytes written to @a buf
 358  */
 359 static size_t
 360 transmit_to_client_callback (void *cls, size_t size, void *buf)
 361 {
 362   struct TransportClient *tc = cls;
 363   struct ClientMessageQueueEntry *q;
 364   const struct GNUNET_MessageHeader *msg;
 365   char *cbuf;
 366   uint16_t msize;
 367   size_t tsize;
 368
 369   tc->th = NULL;
 370   if (NULL == buf)
 371   {
 372     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 373                 "Transmission to client failed, closing connection.\n");
 374     return 0;
 375   }
 376   cbuf = buf;
 377   tsize = 0;
 378   while (NULL != (q = tc->message_queue_head))
 379   {
 380     msg = (const struct GNUNET_MessageHeader *) &q[1];
 381     msize = ntohs (msg->size);
 382     if (msize + tsize > size)
 383       break;
 384     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 385                 "Transmitting message of type %u to client %p.\n",
 386                 ntohs (msg->type), tc);
 387     GNUNET_CONTAINER_DLL_remove (tc->message_queue_head,
 388                                  tc->message_queue_tail,
 389                                  q);
 390     tc->message_count--;
 391     memcpy (&cbuf[tsize], msg, msize);
 392     GNUNET_free (q);
 393     tsize += msize;
 394   }
 395   if (NULL != q)
 396   {
 397     GNUNET_assert (msize >= sizeof (struct GNUNET_MessageHeader));
 398     tc->th =
 399         GNUNET_SERVER_notify_transmit_ready (tc->client, msize,
 400                                              GNUNET_TIME_UNIT_FOREVER_REL,
 401                                              &transmit_to_client_callback, tc);
 402     GNUNET_assert (NULL != tc->th);
 403   }
 404   return tsize;
 405 }
 406
 407
 408 /**
 409  * Queue the given message for transmission to the given client
 410  *
 411  * @param tc target of the message
 412  * @param msg message to transmit
 413  * @param may_drop #GNUNET_YES if the message can be dropped
 414  */
 415 static void
 416 unicast (struct TransportClient *tc,
 417          const struct GNUNET_MessageHeader *msg,
 418          int may_drop)
 419 {
 420   struct ClientMessageQueueEntry *q;
 421   uint16_t msize;
 422
 423   if (NULL == msg)
 424   {
 425     GNUNET_break (0);
 426     return;
 427   }
 428
 429   if ((tc->message_count >= MAX_PENDING) && (GNUNET_YES == may_drop))
 430   {
 431     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 432                 _("Dropping message of type %u and size %u, have %u/%u messages pending\n"),
 433                 ntohs (msg->type),
 434                 ntohs (msg->size),
 435                 tc->message_count,
 436                 MAX_PENDING);
 437     GNUNET_STATISTICS_update (GST_stats,
 438                               gettext_noop
 439                               ("# messages dropped due to slow client"), 1,
 440                               GNUNET_NO);
 441     return;
 442   }
 443   msize = ntohs (msg->size);
 444   GNUNET_assert (msize >= sizeof (struct GNUNET_MessageHeader));
 445   q = GNUNET_malloc (sizeof (struct ClientMessageQueueEntry) + msize);
 446   memcpy (&q[1], msg, msize);
 447   GNUNET_CONTAINER_DLL_insert_tail (tc->message_queue_head,
 448                                     tc->message_queue_tail, q);
 449   tc->message_count++;
 450   if (NULL != tc->th)
 451     return;
 452   tc->th =
 453       GNUNET_SERVER_notify_transmit_ready (tc->client, msize,
 454                                            GNUNET_TIME_UNIT_FOREVER_REL,
 455                                            &transmit_to_client_callback, tc);
 456   GNUNET_assert (NULL != tc->th);
 457 }
 458
 459
 460 /**
 461  * Called whenever a client is disconnected.  Frees our
 462  * resources associated with that client.
 463  *
 464  * @param cls closure
 465  * @param client identification of the client
 466  */
 467 static void
 468 client_disconnect_notification (void *cls, struct GNUNET_SERVER_Client *client)
 469 {
 470   struct TransportClient *tc;
 471   struct MonitoringClient *mc;
 472   struct ClientMessageQueueEntry *mqe;
 473
 474   if (client == NULL)
 475     return;
 476   mc = lookup_monitoring_client (peer_monitoring_clients_head, client);
 477   if (mc != NULL)
 478   {
 479     GNUNET_CONTAINER_DLL_remove (peer_monitoring_clients_head,
 480                                  peer_monitoring_clients_tail,
 481                                  mc);
 482     GNUNET_free (mc);
 483   }
 484   mc = lookup_monitoring_client (val_monitoring_clients_head, client);
 485   if (mc != NULL)
 486   {
 487     GNUNET_CONTAINER_DLL_remove (val_monitoring_clients_head,
 488                                  val_monitoring_clients_tail,
 489                                  mc);
 490     GNUNET_free (mc);
 491   }
 492   tc = lookup_client (client);
 493   if (tc == NULL)
 494     return;
 495   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
 496               "Client %p disconnected, cleaning up.\n", tc);
 497   while (NULL != (mqe = tc->message_queue_head))
 498   {
 499     GNUNET_CONTAINER_DLL_remove (tc->message_queue_head, tc->message_queue_tail,
 500                                  mqe);
 501     tc->message_count--;
 502     GNUNET_free (mqe);
 503   }
 504   GNUNET_CONTAINER_DLL_remove (clients_head, clients_tail, tc);
 505   if (tc->th != NULL)
 506   {
 507     GNUNET_SERVER_notify_transmit_ready_cancel (tc->th);
 508     tc->th = NULL;
 509   }
 510   GNUNET_break (0 == tc->message_count);
 511   GNUNET_free (tc);
 512 }
 513
 514
 515 /**
 516  * Function called for each of our connected neighbours.  Notify the
 517  * client about the existing neighbour.
 518  *
 519  * @param cls the `struct TransportClient *` to notify
 520  * @param peer identity of the neighbour
 521  * @param address the address
 522  * @param state the current state of the peer
 523  * @param state_timeout the time out for the state
 524  * @param bandwidth_in inbound bandwidth in NBO
 525  * @param bandwidth_out outbound bandwidth in NBO
 526  */
 527 static void
 528 notify_client_about_neighbour (void *cls,
 529     const struct GNUNET_PeerIdentity *peer,
 530     const struct GNUNET_HELLO_Address *address,
 531     enum GNUNET_TRANSPORT_PeerState state,
 532     struct GNUNET_TIME_Absolute state_timeout,
 533     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
 534     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out)
 535 {
 536   struct TransportClient *tc = cls;
 537   struct ConnectInfoMessage *cim;
 538   size_t size = sizeof (struct ConnectInfoMessage);
 539   char buf[size] GNUNET_ALIGN;
 540
 541   if (GNUNET_NO == GST_neighbours_test_connected (peer))
 542     return;
 543
 544   GNUNET_assert (size < GNUNET_SERVER_MAX_MESSAGE_SIZE);
 545   cim = (struct ConnectInfoMessage *) buf;
 546   cim->header.size = htons (size);
 547   cim->header.type = htons (GNUNET_MESSAGE_TYPE_TRANSPORT_CONNECT);
 548   cim->id = *peer;
 549   cim->quota_in = bandwidth_in;
 550   cim->quota_out = bandwidth_out;
 551   unicast (tc, &cim->header, GNUNET_NO);
 552 }
 553
 554
 555 /**
 556  * Initialize a normal client.  We got a start message from this
 557  * client, add him to the list of clients for broadcasting of inbound
 558  * messages.
 559  *
 560  * @param cls unused
 561  * @param client the client
 562  * @param message the start message that was sent
 563  */
 564 static void
 565 clients_handle_start (void *cls, struct GNUNET_SERVER_Client *client,
 566                       const struct GNUNET_MessageHeader *message)
 567 {
 568   const struct StartMessage *start;
 569   struct TransportClient *tc;
 570   uint32_t options;
 571
 572   tc = lookup_client (client);
 573
 574   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
 575               "Client %p sent START\n", tc);
 576   if (tc != NULL)
 577   {
 578     /* got 'start' twice from the same client, not allowed */
 579     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
 580                 "TransportClient %p ServerClient %p sent multiple START messages\n",
 581                 tc, tc->client);
 582     GNUNET_break (0);
 583     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
 584     return;
 585   }
 586   start = (const struct StartMessage *) message;
 587   options = ntohl (start->options);
 588   if ((0 != (1 & options)) &&
 589       (0 !=
 590        memcmp (&start->self, &GST_my_identity,
 591                sizeof (struct GNUNET_PeerIdentity))))
 592   {
 593     /* client thinks this is a different peer, reject */
 594     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
 595                 _
 596                 ("Rejecting control connection from peer `%s', which is not me!\n"),
 597                 GNUNET_i2s (&start->self));
 598     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
 599     return;
 600   }
 601   tc = setup_client (client);
 602   tc->send_payload = (0 != (2 & options));
 603   unicast (tc, GST_hello_get (), GNUNET_NO);
 604   GST_neighbours_iterate (&notify_client_about_neighbour, tc);
 605   GNUNET_CONTAINER_DLL_insert (clients_head, clients_tail, tc);
 606   GNUNET_SERVER_receive_done (client, GNUNET_OK);
 607 }
 608
 609
 610 /**
 611  * Client sent us a HELLO.  Process the request.
 612  *
 613  * @param cls unused
 614  * @param client the client
 615  * @param message the HELLO message
 616  */
 617 static void
 618 clients_handle_hello (void *cls, struct GNUNET_SERVER_Client *client,
 619                       const struct GNUNET_MessageHeader *message)
 620 {
 621   GST_validation_handle_hello (message);
 622   GNUNET_SERVER_receive_done (client, GNUNET_OK);
 623 }
 624
 625
 626 /**
 627  * Closure for 'handle_send_transmit_continuation'
 628  */
 629 struct SendTransmitContinuationContext
 630 {
 631   /**
 632    * Client that made the request.
 633    */
 634   struct GNUNET_SERVER_Client *client;
 635
 636   /**
 637    * Peer that was the target.
 638    */
 639   struct GNUNET_PeerIdentity target;
 640 };
 641
 642
 643 /**
 644  * Function called after the transmission is done.  Notify the client that it is
 645  * OK to send the next message.
 646  *
 647  * @param cls closure
 648  * @param success #GNUNET_OK on success, #GNUNET_NO on failure, #GNUNET_SYSERR if we're not connected
 649  * @param bytes_payload bytes payload sent
 650  * @param bytes_on_wire bytes sent on wire
 651  */
 652 static void
 653 handle_send_transmit_continuation (void *cls, int success,
 654                                    size_t bytes_payload,
 655                                    size_t bytes_on_wire)
 656 {
 657   struct SendTransmitContinuationContext *stcc = cls;
 658   struct SendOkMessage send_ok_msg;
 659
 660   if (GNUNET_OK == success)
 661     GST_neighbours_notify_payload_sent (&stcc->target, bytes_payload);
 662
 663   send_ok_msg.header.size = htons (sizeof (send_ok_msg));
 664   send_ok_msg.header.type = htons (GNUNET_MESSAGE_TYPE_TRANSPORT_SEND_OK);
 665   send_ok_msg.bytes_msg = htonl (bytes_payload);
 666   send_ok_msg.bytes_physical = htonl (bytes_on_wire);
 667   send_ok_msg.success = htonl (success);
 668   send_ok_msg.latency =
 669       GNUNET_TIME_relative_hton (GNUNET_TIME_UNIT_FOREVER_REL);
 670   send_ok_msg.peer = stcc->target;
 671   GST_clients_unicast (stcc->client, &send_ok_msg.header, GNUNET_NO);
 672   GNUNET_SERVER_client_drop (stcc->client);
 673   GNUNET_free (stcc);
 674 }
 675
 676
 677 /**
 678  * Client asked for transmission to a peer.  Process the request.
 679  *
 680  * @param cls unused
 681  * @param client the client
 682  * @param message the send message that was sent
 683  */
 684 static void
 685 clients_handle_send (void *cls,
 686                      struct GNUNET_SERVER_Client *client,
 687                      const struct GNUNET_MessageHeader *message)
 688 {
 689   const struct OutboundMessage *obm;
 690   const struct GNUNET_MessageHeader *obmm;
 691   struct SendTransmitContinuationContext *stcc;
 692   uint16_t size;
 693   uint16_t msize;
 694   struct TransportClient *tc;
 695
 696   tc = lookup_client (client);
 697   if (NULL == tc)
 698   {
 699     /* client asked for transmission before 'START' */
 700     GNUNET_break (0);
 701     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
 702     return;
 703   }
 704
 705   size = ntohs (message->size);
 706   if (size <
 707       sizeof (struct OutboundMessage) + sizeof (struct GNUNET_MessageHeader))
 708   {
 709     GNUNET_break (0);
 710     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
 711     return;
 712   }
 713   obm = (const struct OutboundMessage *) message;
 714   obmm = (const struct GNUNET_MessageHeader *) &obm[1];
 715   msize = size - sizeof (struct OutboundMessage);
 716   if (msize < sizeof (struct GNUNET_MessageHeader))
 717   {
 718     GNUNET_break (0);
 719     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
 720     return;
 721   }
 722
 723   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 724               "Received `%s' request from client with target `%4s' and first message of type %u and total size %u\n",
 725               "SEND",
 726               GNUNET_i2s (&obm->peer),
 727               ntohs (obmm->type),
 728               msize);
 729   if (GNUNET_NO == GST_neighbours_test_connected (&obm->peer))
 730   {
 731     /* not connected, not allowed to send; can happen due to asynchronous operations */
 732     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 733                 "Could not send message to peer `%s': not connected\n",
 734                 GNUNET_i2s (&obm->peer));
 735     GNUNET_STATISTICS_update (GST_stats,
 736                               gettext_noop
 737                               ("# bytes payload dropped (other peer was not connected)"),
 738                               msize, GNUNET_NO);
 739     GNUNET_SERVER_receive_done (client, GNUNET_OK);
 740     return;
 741   }
 742   GNUNET_SERVER_receive_done (client, GNUNET_OK);
 743   stcc = GNUNET_new (struct SendTransmitContinuationContext);
 744   stcc->target = obm->peer;
 745   stcc->client = client;
 746   GNUNET_SERVER_client_keep (client);
 747   GST_manipulation_send (&obm->peer, obmm, msize,
 748                        GNUNET_TIME_relative_ntoh (obm->timeout),
 749                        &handle_send_transmit_continuation, stcc);
 750 }
 751
 752
 753 /**
 754  * Try to initiate a connection to the given peer if the blacklist
 755  * allowed it.
 756  *
 757  * @param cls closure (unused, NULL)
 758  * @param peer identity of peer that was tested
 759  * @param result #GNUNET_OK if the connection is allowed,
 760  *               #GNUNET_NO if not
 761  */
 762 static void
 763 try_connect_if_allowed (void *cls,
 764                         const struct GNUNET_PeerIdentity *peer,
 765                         int result)
 766 {
 767   if (GNUNET_OK != result)
 768   {
 769     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 770                 _("Blacklist refuses connection attempt to peer `%s'\n"),
 771                 GNUNET_i2s (peer));
 772     return;                     /* not allowed */
 773   }
 774
 775   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 776               _("Blacklist allows connection attempt to peer `%s'\n"),
 777               GNUNET_i2s (peer));
 778
 779   GST_neighbours_try_connect (peer);
 780 }
 781
 782
 783 /**
 784  * Handle request connect message
 785  *
 786  * @param cls closure (always NULL)
 787  * @param client identification of the client
 788  * @param message the actual message
 789  */
 790 static void
 791 clients_handle_request_connect (void *cls, struct GNUNET_SERVER_Client *client,
 792                                 const struct GNUNET_MessageHeader *message)
 793 {
 794   const struct TransportRequestConnectMessage *trcm =
 795       (const struct TransportRequestConnectMessage *) message;
 796
 797   GNUNET_STATISTICS_update (GST_stats,
 798                             gettext_noop
 799                             ("# REQUEST CONNECT messages received"), 1,
 800                             GNUNET_NO);
 801
 802   if (0 == memcmp (&trcm->peer, &GST_my_identity,
 803                 sizeof (struct GNUNET_PeerIdentity)))
 804   {
 805     GNUNET_break_op (0);
 806     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
 807                 "Received a request connect message myself `%s'\n",
 808                 GNUNET_i2s (&trcm->peer));
 809   }
 810   else
 811   {
 812     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 813                 "Received a request connect message for peer `%s'\n",
 814                 GNUNET_i2s (&trcm->peer));
 815
 816     (void) GST_blacklist_test_allowed (&trcm->peer, NULL, &try_connect_if_allowed,
 817                                      NULL);
 818   }
 819   GNUNET_SERVER_receive_done (client, GNUNET_OK);
 820 }
 821
 822
 823 /**
 824  * Take the given address and append it to the set of results sent back to
 825  * the client.
 826  *
 827  * @param cls the transmission context used ('struct GNUNET_SERVER_TransmitContext*')
 828  * @param buf text to transmit
 829  */
 830 static void
 831 transmit_address_to_client (void *cls, const char *buf)
 832 {
 833   struct AddressToStringContext *actx = cls;
 834   if (NULL == buf)
 835   {
 836     GNUNET_SERVER_transmit_context_append_data (actx->tc, NULL, 0,
 837                                                 GNUNET_MESSAGE_TYPE_TRANSPORT_ADDRESS_TO_STRING_REPLY);
 838     GNUNET_SERVER_transmit_context_run (actx->tc, GNUNET_TIME_UNIT_FOREVER_REL);
 839     GNUNET_CONTAINER_DLL_remove (a2s_head, a2s_tail, actx);
 840     GNUNET_free (actx);
 841     return;
 842   }
 843   GNUNET_SERVER_transmit_context_append_data (actx->tc, buf, strlen (buf) + 1,
 844                                               GNUNET_MESSAGE_TYPE_TRANSPORT_ADDRESS_TO_STRING_REPLY);
 845 }
 846
 847
 848 /**
 849  * Client asked to resolve an address.  Process the request.
 850  *
 851  * @param cls unused
 852  * @param client the client
 853  * @param message the resolution request
 854  */
 855 static void
 856 clients_handle_address_to_string (void *cls,
 857                                   struct GNUNET_SERVER_Client *client,
 858                                   const struct GNUNET_MessageHeader *message)
 859 {
 860   const struct AddressLookupMessage *alum;
 861   struct GNUNET_TRANSPORT_PluginFunctions *papi;
 862   const char *plugin_name;
 863   const char *address;
 864   uint32_t address_len;
 865   uint16_t size;
 866   struct GNUNET_SERVER_TransmitContext *tc;
 867   struct AddressToStringContext *actx;
 868   struct GNUNET_TIME_Relative rtimeout;
 869   int32_t numeric;
 870
 871   size = ntohs (message->size);
 872   if (size < sizeof (struct AddressLookupMessage))
 873   {
 874     GNUNET_break (0);
 875     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
 876     return;
 877   }
 878   alum = (const struct AddressLookupMessage *) message;
 879   address_len = ntohs (alum->addrlen);
 880   if (size <= sizeof (struct AddressLookupMessage) + address_len)
 881   {
 882     GNUNET_break (0);
 883     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
 884     return;
 885   }
 886   address = (const char *) &alum[1];
 887   plugin_name = (const char *) &address[address_len];
 888   if ('\0' != plugin_name[size - sizeof (struct AddressLookupMessage) - address_len - 1])
 889   {
 890     GNUNET_break (0);
 891     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
 892     return;
 893   }
 894   rtimeout = GNUNET_TIME_relative_ntoh (alum->timeout);
 895   numeric = ntohs (alum->numeric_only);
 896   tc = GNUNET_SERVER_transmit_context_create (client);
 897   papi = GST_plugins_printer_find (plugin_name);
 898   if (NULL == papi)
 899   {
 900     GNUNET_SERVER_transmit_context_append_data (tc, NULL, 0,
 901                                                 GNUNET_MESSAGE_TYPE_TRANSPORT_ADDRESS_TO_STRING_REPLY);
 902     GNUNET_SERVER_transmit_context_run (tc, rtimeout);
 903     return;
 904   }
 905   actx = GNUNET_new (struct AddressToStringContext);
 906   actx->tc = tc;
 907   GNUNET_CONTAINER_DLL_insert (a2s_head, a2s_tail, actx);
 908   GNUNET_SERVER_disable_receive_done_warning (client);
 909   papi->address_pretty_printer (papi->cls, plugin_name, address, address_len,
 910                                 numeric, rtimeout, &transmit_address_to_client,
 911                                 actx);
 912 }
 913
 914
 915 /**
 916  * Compose #PeerIterateResponseMessage using the given peer and address.
 917  *
 918  * @param peer identity of the peer
 919  * @param address the address, NULL on disconnect
 920  * @return composed message
 921  */
 922 static struct PeerIterateResponseMessage *
 923 compose_address_iterate_response_message (const struct GNUNET_PeerIdentity *peer,
 924                                           const struct GNUNET_HELLO_Address *address)
 925 {
 926   struct PeerIterateResponseMessage *msg;
 927   size_t size;
 928   size_t tlen;
 929   size_t alen;
 930   char *addr;
 931
 932   GNUNET_assert (NULL != peer);
 933   if (NULL != address)
 934   {
 935     tlen = strlen (address->transport_name) + 1;
 936     alen = address->address_length;
 937   }
 938   else
 939     tlen = alen = 0;
 940   size = (sizeof (struct PeerIterateResponseMessage) + alen + tlen);
 941   msg = GNUNET_malloc (size);
 942   msg->header.size = htons (size);
 943   msg->header.type =
 944       htons (GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_PEER_RESPONSE);
 945   msg->reserved = htonl (0);
 946   msg->peer = *peer;
 947   msg->addrlen = htonl (alen);
 948   msg->pluginlen = htonl (tlen);
 949
 950   if (NULL != address)
 951   {
 952     msg->local_address_info = htonl((uint32_t) address->local_info);
 953     addr = (char *) &msg[1];
 954     memcpy (addr, address->address, alen);
 955     memcpy (&addr[alen], address->transport_name, tlen);
 956   }
 957   return msg;
 958 }
 959
 960 /**
 961  * Compose #PeerIterateResponseMessage using the given peer and address.
 962  *
 963  * @param peer identity of the peer
 964  * @param address the address, NULL on disconnect
 965  * @return composed message
 966  */
 967 static struct ValidationIterateResponseMessage *
 968 compose_validation_iterate_response_message (const struct GNUNET_PeerIdentity *peer,
 969                                           const struct GNUNET_HELLO_Address *address)
 970 {
 971   struct ValidationIterateResponseMessage *msg;
 972   size_t size;
 973   size_t tlen;
 974   size_t alen;
 975   char *addr;
 976
 977   GNUNET_assert (NULL != peer);
 978   if (NULL != address)
 979   {
 980     tlen = strlen (address->transport_name) + 1;
 981     alen = address->address_length;
 982   }
 983   else
 984     tlen = alen = 0;
 985   size = (sizeof (struct ValidationIterateResponseMessage) + alen + tlen);
 986   msg = GNUNET_malloc (size);
 987   msg->header.size = htons (size);
 988   msg->header.type =
 989       htons (GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_VALIDATION_RESPONSE);
 990   msg->reserved = htonl (0);
 991   msg->peer = *peer;
 992   msg->addrlen = htonl (alen);
 993   msg->pluginlen = htonl (tlen);
 994
 995   if (NULL != address)
 996   {
 997     msg->local_address_info = htonl((uint32_t) address->local_info);
 998     addr = (char *) &msg[1];
 999     memcpy (addr, address->address, alen);
1000     memcpy (&addr[alen], address->transport_name, tlen);
1001   }
1002   return msg;
1003 }
1004
1005 struct IterationContext
1006 {
1007   struct GNUNET_SERVER_TransmitContext *tc;
1008
1009   struct GNUNET_PeerIdentity id;
1010
1011   int all;
1012 };
1013
1014 /**
1015  * Output information of validation entries to the given client.
1016  *
1017  * @param cls the 'struct IterationContext'
1018  * @param peer identity of the neighbour
1019  * @param address the address
1020  * @param last_validation point in time when last validation was performed
1021  * @param valid_until point in time how long address is valid
1022  * @param next_validation point in time when next validation will be performed
1023  * @param state state of validation notification
1024  */
1025 static void
1026 send_validation_information (void *cls,
1027     const struct GNUNET_PeerIdentity *peer,
1028     const struct GNUNET_HELLO_Address *address,
1029     struct GNUNET_TIME_Absolute last_validation,
1030     struct GNUNET_TIME_Absolute valid_until,
1031     struct GNUNET_TIME_Absolute next_validation,
1032     enum GNUNET_TRANSPORT_ValidationState state)
1033 {
1034   struct IterationContext *pc = cls;
1035   struct ValidationIterateResponseMessage *msg;
1036
1037   if ( (GNUNET_YES == pc->all) ||
1038        (0 == memcmp (peer, &pc->id, sizeof (pc->id))) )
1039   {
1040     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1041         "Sending information about for validation entry for peer `%s' using address `%s'\n",
1042         GNUNET_i2s(peer), (address != NULL) ? GST_plugins_a2s (address) : "<none>");
1043     msg = compose_validation_iterate_response_message (peer, address);
1044     msg->last_validation = GNUNET_TIME_absolute_hton(last_validation);
1045     msg->valid_until = GNUNET_TIME_absolute_hton(valid_until);
1046     msg->next_validation = GNUNET_TIME_absolute_hton(next_validation);
1047     msg->state = htonl ((uint32_t) state);
1048     GNUNET_SERVER_transmit_context_append_message (pc->tc, &msg->header);
1049     GNUNET_free (msg);
1050   }
1051 }
1052
1053
1054 /**
1055  * Output information of neighbours to the given client.
1056  *
1057  * @param cls the 'struct PeerIterationContext'
1058  * @param peer identity of the neighbour
1059  * @param address the address
1060  * @param state current state this peer is in
1061  * @param state_timeout timeout for the current state of the peer
1062  * @param bandwidth_in inbound quota in NBO
1063  * @param bandwidth_out outbound quota in NBO
1064  */
1065 static void
1066 send_peer_information (void *cls,
1067     const struct GNUNET_PeerIdentity *peer,
1068     const struct GNUNET_HELLO_Address *address,
1069     enum GNUNET_TRANSPORT_PeerState state,
1070     struct GNUNET_TIME_Absolute state_timeout,
1071     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
1072     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out)
1073 {
1074   struct IterationContext *pc = cls;
1075   struct PeerIterateResponseMessage *msg;
1076
1077   if ( (GNUNET_YES == pc->all) ||
1078        (0 == memcmp (peer, &pc->id, sizeof (pc->id))) )
1079   {
1080     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1081         "Sending information about `%s' using address `%s' in state `%s'\n",
1082         GNUNET_i2s(peer),
1083         (address != NULL) ? GST_plugins_a2s (address) : "<none>",
1084         GNUNET_TRANSPORT_ps2s (state));
1085     msg = compose_address_iterate_response_message (peer, address);
1086     msg->state = htonl (state);
1087     msg->state_timeout = GNUNET_TIME_absolute_hton(state_timeout);
1088     GNUNET_SERVER_transmit_context_append_message (pc->tc, &msg->header);
1089     GNUNET_free (msg);
1090   }
1091 }
1092
1093
1094
1095 /**
1096  * Client asked to obtain information about a specific or all peers
1097  * Process the request.
1098  *
1099  * @param cls unused
1100  * @param client the client
1101  * @param message the peer address information request
1102  */
1103 static void
1104 clients_handle_monitor_peers (void *cls, struct GNUNET_SERVER_Client *client,
1105                                 const struct GNUNET_MessageHeader *message)
1106 {
1107   static struct GNUNET_PeerIdentity all_zeros;
1108   struct GNUNET_SERVER_TransmitContext *tc;
1109   struct PeerMonitorMessage *msg;
1110   struct IterationContext pc;
1111
1112   if (ntohs (message->type) != GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_PEER_REQUEST)
1113   {
1114     GNUNET_break (0);
1115     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1116     return;
1117   }
1118   if (ntohs (message->size) != sizeof (struct PeerMonitorMessage))
1119   {
1120     GNUNET_break (0);
1121     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1122     return;
1123   }
1124   msg = (struct PeerMonitorMessage *) message;
1125   if ( (GNUNET_YES != ntohl (msg->one_shot)) &&
1126        (NULL != lookup_monitoring_client (peer_monitoring_clients_head, client)) )
1127   {
1128     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
1129                 "ServerClient %p tried to start monitoring twice\n",
1130                 client);
1131     GNUNET_break (0);
1132     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1133     return;
1134   }
1135   GNUNET_SERVER_disable_receive_done_warning (client);
1136   pc.tc = tc = GNUNET_SERVER_transmit_context_create (client);
1137
1138   /* Send initial list */
1139   if (0 == memcmp (&msg->peer, &all_zeros, sizeof (struct GNUNET_PeerIdentity)))
1140   {
1141     /* iterate over all neighbours */
1142     pc.all = GNUNET_YES;
1143     pc.id = msg->peer;
1144   }
1145   else
1146   {
1147     /* just return one neighbour */
1148     pc.all = GNUNET_NO;
1149     pc.id = msg->peer;
1150   }
1151   GST_neighbours_iterate (&send_peer_information, &pc);
1152
1153   if (GNUNET_YES != ntohl (msg->one_shot))
1154   {
1155     setup_peer_monitoring_client (client, &msg->peer);
1156   }
1157   else
1158   {
1159     GNUNET_SERVER_transmit_context_append_data (tc, NULL, 0,
1160         GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_PEER_RESPONSE);
1161   }
1162
1163   GNUNET_SERVER_transmit_context_run (tc, GNUNET_TIME_UNIT_FOREVER_REL);
1164 }
1165
1166
1167 /**
1168  * Client asked to obtain information about a specific or all validation
1169  * processes
1170  *
1171  * @param cls unused
1172  * @param client the client
1173  * @param message the peer address information request
1174  */
1175 static void
1176 clients_handle_monitor_validation (void *cls, struct GNUNET_SERVER_Client *client,
1177                                 const struct GNUNET_MessageHeader *message)
1178 {
1179   static struct GNUNET_PeerIdentity all_zeros;
1180   struct GNUNET_SERVER_TransmitContext *tc;
1181   struct PeerMonitorMessage *msg;
1182   struct IterationContext pc;
1183
1184   if (ntohs (message->type) != GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_VALIDATION_REQUEST)
1185   {
1186     GNUNET_break (0);
1187     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1188     return;
1189   }
1190   if (ntohs (message->size) != sizeof (struct ValidationMonitorMessage))
1191   {
1192     GNUNET_break (0);
1193     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1194     return;
1195   }
1196   msg = (struct PeerMonitorMessage *) message;
1197   if ( (GNUNET_YES != ntohl (msg->one_shot)) &&
1198        (NULL != lookup_monitoring_client (val_monitoring_clients_head, client)) )
1199   {
1200     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
1201                 "ServerClient %p tried to start monitoring twice\n",
1202                 client);
1203     GNUNET_break (0);
1204     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1205     return;
1206   }
1207   GNUNET_SERVER_disable_receive_done_warning (client);
1208   pc.tc = tc = GNUNET_SERVER_transmit_context_create (client);
1209
1210   /* Send initial list */
1211   if (0 == memcmp (&msg->peer, &all_zeros, sizeof (struct GNUNET_PeerIdentity)))
1212   {
1213     /* iterate over all neighbours */
1214     pc.all = GNUNET_YES;
1215     pc.id = msg->peer;
1216   }
1217   else
1218   {
1219     /* just return one neighbour */
1220     pc.all = GNUNET_NO;
1221     pc.id = msg->peer;
1222   }
1223
1224   GST_validation_iterate (&send_validation_information, &pc);
1225
1226   if (GNUNET_YES != ntohl (msg->one_shot))
1227   {
1228     setup_val_monitoring_client (client, &msg->peer);
1229   }
1230   else
1231   {
1232     GNUNET_SERVER_transmit_context_append_data (tc, NULL, 0,
1233         GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_VALIDATION_RESPONSE);
1234   }
1235   GNUNET_SERVER_transmit_context_run (tc, GNUNET_TIME_UNIT_FOREVER_REL);
1236 }
1237
1238 /**
1239  * Start handling requests from clients.
1240  *
1241  * @param server server used to accept clients from.
1242  */
1243 void
1244 GST_clients_start (struct GNUNET_SERVER_Handle *server)
1245 {
1246   static const struct GNUNET_SERVER_MessageHandler handlers[] = {
1247     {&clients_handle_start, NULL,
1248      GNUNET_MESSAGE_TYPE_TRANSPORT_START, sizeof (struct StartMessage)},
1249     {&clients_handle_hello, NULL,
1250      GNUNET_MESSAGE_TYPE_HELLO, 0},
1251     {&clients_handle_send, NULL,
1252      GNUNET_MESSAGE_TYPE_TRANSPORT_SEND, 0},
1253     {&clients_handle_request_connect, NULL,
1254      GNUNET_MESSAGE_TYPE_TRANSPORT_REQUEST_CONNECT,
1255      sizeof (struct TransportRequestConnectMessage)},
1256     {&clients_handle_address_to_string, NULL,
1257      GNUNET_MESSAGE_TYPE_TRANSPORT_ADDRESS_TO_STRING, 0},
1258     {&clients_handle_monitor_peers, NULL,
1259      GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_PEER_REQUEST,
1260      sizeof (struct PeerMonitorMessage)},
1261     {&clients_handle_monitor_validation, NULL,
1262      GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_VALIDATION_REQUEST,
1263      sizeof (struct ValidationMonitorMessage)},
1264     {&GST_blacklist_handle_init, NULL,
1265      GNUNET_MESSAGE_TYPE_TRANSPORT_BLACKLIST_INIT,
1266      sizeof (struct GNUNET_MessageHeader)},
1267     {&GST_blacklist_handle_reply, NULL,
1268      GNUNET_MESSAGE_TYPE_TRANSPORT_BLACKLIST_REPLY,
1269      sizeof (struct BlacklistMessage)},
1270     {&GST_manipulation_set_metric, NULL,
1271      GNUNET_MESSAGE_TYPE_TRANSPORT_TRAFFIC_METRIC, 0},
1272     {NULL, NULL, 0, 0}
1273   };
1274   peer_nc = GNUNET_SERVER_notification_context_create (server, 0);
1275   val_nc = GNUNET_SERVER_notification_context_create (server, 0);
1276   GNUNET_SERVER_add_handlers (server, handlers);
1277   GNUNET_SERVER_disconnect_notify (server, &client_disconnect_notification,
1278                                    NULL);
1279 }
1280
1281
1282 /**
1283  * Stop processing clients.
1284  */
1285 void
1286 GST_clients_stop ()
1287 {
1288   struct AddressToStringContext *cur;
1289
1290   while (NULL != (cur = a2s_head))
1291   {
1292     GNUNET_SERVER_transmit_context_destroy (cur->tc, GNUNET_NO);
1293     GNUNET_CONTAINER_DLL_remove (a2s_head, a2s_tail, cur);
1294     GNUNET_free (cur);
1295   }
1296   if (NULL != peer_nc)
1297   {
1298     GNUNET_SERVER_notification_context_destroy (peer_nc);
1299     peer_nc = NULL;
1300   }
1301   if (NULL != val_nc)
1302   {
1303     GNUNET_SERVER_notification_context_destroy (val_nc);
1304     val_nc = NULL;
1305   }
1306 }
1307
1308
1309 /**
1310  * Broadcast the given message to all of our clients.
1311  *
1312  * @param msg message to broadcast
1313  * @param may_drop #GNUNET_YES if the message can be dropped / is payload
1314  */
1315 void
1316 GST_clients_broadcast (const struct GNUNET_MessageHeader *msg, int may_drop)
1317 {
1318   struct TransportClient *tc;
1319
1320   for (tc = clients_head; NULL != tc; tc = tc->next)
1321   {
1322     if ((GNUNET_YES == may_drop) && (GNUNET_YES != tc->send_payload))
1323       continue;                 /* skip, this client does not care about payload */
1324     unicast (tc, msg, may_drop);
1325   }
1326 }
1327
1328
1329 /**
1330  * Send the given message to a particular client
1331  *
1332  * @param client target of the message
1333  * @param msg message to transmit
1334  * @param may_drop #GNUNET_YES if the message can be dropped
1335  */
1336 void
1337 GST_clients_unicast (struct GNUNET_SERVER_Client *client,
1338                      const struct GNUNET_MessageHeader *msg, int may_drop)
1339 {
1340   struct TransportClient *tc;
1341
1342   tc = lookup_client (client);
1343   if (NULL == tc)
1344     return;                     /* client got disconnected in the meantime, drop message */
1345   unicast (tc, msg, may_drop);
1346 }
1347
1348
1349 /**
1350  * Broadcast the new active address to all clients monitoring the peer.
1351  *
1352  * @param peer peer this update is about (never NULL)
1353  * @param address address, NULL on disconnect
1354  * @param state the current state of the peer
1355  * @param state_timeout the time out for the state
1356  */
1357 void
1358 GST_clients_broadcast_peer_notification (const struct GNUNET_PeerIdentity *peer,
1359     const struct GNUNET_HELLO_Address *address,
1360     enum GNUNET_TRANSPORT_PeerState state,
1361     struct GNUNET_TIME_Absolute state_timeout)
1362 {
1363   struct PeerIterateResponseMessage *msg;
1364   struct MonitoringClient *mc;
1365   static struct GNUNET_PeerIdentity all_zeros;
1366   msg = compose_address_iterate_response_message (peer, address);
1367   msg->state = htonl (state);
1368   msg->state_timeout = GNUNET_TIME_absolute_hton (state_timeout);
1369   mc = peer_monitoring_clients_head;
1370   while (mc != NULL)
1371   {
1372     if ((0 == memcmp (&mc->peer, &all_zeros,
1373                       sizeof (struct GNUNET_PeerIdentity))) ||
1374         (0 == memcmp (&mc->peer, peer,
1375                       sizeof (struct GNUNET_PeerIdentity))))
1376     {
1377       GNUNET_SERVER_notification_context_unicast (peer_nc, mc->client,
1378                                                   &msg->header, GNUNET_NO);
1379     }
1380
1381     mc = mc->next;
1382   }
1383   GNUNET_free (msg);
1384 }
1385
1386 /**
1387  * Broadcast the new validation changes to all clients monitoring the peer.
1388  *
1389  * @param peer peer this update is about (never NULL)
1390  * @param address address, NULL on disconnect
1391  * @param last_validation point in time when last validation was performed
1392  * @param valid_until point in time how long address is valid
1393  * @param next_validation point in time when next validation will be performed
1394  * @param state state of validation notification
1395  */
1396 void
1397 GST_clients_broadcast_validation_notification (
1398     const struct GNUNET_PeerIdentity *peer,
1399     const struct GNUNET_HELLO_Address *address,
1400     struct GNUNET_TIME_Absolute last_validation,
1401     struct GNUNET_TIME_Absolute valid_until,
1402     struct GNUNET_TIME_Absolute next_validation,
1403     enum GNUNET_TRANSPORT_ValidationState state)
1404 {
1405   struct ValidationIterateResponseMessage *msg;
1406   struct MonitoringClient *mc;
1407   static struct GNUNET_PeerIdentity all_zeros;
1408
1409   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1410       "Sending information about for validation entry for peer `%s' using address `%s'\n",
1411       GNUNET_i2s(peer), (address != NULL) ? GST_plugins_a2s (address) : "<none>");
1412
1413   msg = compose_validation_iterate_response_message (peer, address);
1414   msg->last_validation = GNUNET_TIME_absolute_hton(last_validation);
1415   msg->valid_until = GNUNET_TIME_absolute_hton(valid_until);
1416   msg->next_validation = GNUNET_TIME_absolute_hton(next_validation);
1417   msg->state = htonl ((uint32_t) state);
1418   mc = val_monitoring_clients_head;
1419   while (mc != NULL)
1420   {
1421     if ((0 == memcmp (&mc->peer, &all_zeros,
1422                       sizeof (struct GNUNET_PeerIdentity))) ||
1423         (0 == memcmp (&mc->peer, peer,
1424                       sizeof (struct GNUNET_PeerIdentity))))
1425     {
1426       GNUNET_SERVER_notification_context_unicast (val_nc, mc->client,
1427                                                   &msg->header, GNUNET_NO);
1428
1429     }
1430     mc = mc->next;
1431   }
1432   GNUNET_free (msg);
1433 }
1434
1435
1436 /* end of file gnunet-service-transport_clients.c */