- client-side implementation of peer queries
[oweals/gnunet.git] / 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_DEBUG,
770                 "Blacklist refuses connection attempt to peer `%s'\n",
771                 GNUNET_i2s (peer));
772     return;                     /* not allowed */
773   }
774   GST_neighbours_try_connect (peer);
775 }
776
777
778 /**
779  * Handle request connect message
780  *
781  * @param cls closure (always NULL)
782  * @param client identification of the client
783  * @param message the actual message
784  */
785 static void
786 clients_handle_request_connect (void *cls, struct GNUNET_SERVER_Client *client,
787                                 const struct GNUNET_MessageHeader *message)
788 {
789   const struct TransportRequestConnectMessage *trcm =
790       (const struct TransportRequestConnectMessage *) message;
791
792   GNUNET_STATISTICS_update (GST_stats,
793                             gettext_noop
794                             ("# REQUEST CONNECT messages received"), 1,
795                             GNUNET_NO);
796
797   if (0 == memcmp (&trcm->peer, &GST_my_identity,
798                 sizeof (struct GNUNET_PeerIdentity)))
799   {
800     GNUNET_break_op (0);
801     GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
802                 "Received a request connect message myself `%s'\n",
803                 GNUNET_i2s (&trcm->peer));
804   }
805   else
806   {
807     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
808                 "Received a request connect message for peer `%s'\n",
809                 GNUNET_i2s (&trcm->peer));
810
811     (void) GST_blacklist_test_allowed (&trcm->peer, NULL, &try_connect_if_allowed,
812                                      NULL);
813   }
814   GNUNET_SERVER_receive_done (client, GNUNET_OK);
815 }
816
817
818 /**
819  * Take the given address and append it to the set of results sent back to
820  * the client.
821  *
822  * @param cls the transmission context used ('struct GNUNET_SERVER_TransmitContext*')
823  * @param buf text to transmit
824  */
825 static void
826 transmit_address_to_client (void *cls, const char *buf)
827 {
828   struct AddressToStringContext *actx = cls;
829   if (NULL == buf)
830   {
831     GNUNET_SERVER_transmit_context_append_data (actx->tc, NULL, 0,
832                                                 GNUNET_MESSAGE_TYPE_TRANSPORT_ADDRESS_TO_STRING_REPLY);
833     GNUNET_SERVER_transmit_context_run (actx->tc, GNUNET_TIME_UNIT_FOREVER_REL);
834     GNUNET_CONTAINER_DLL_remove (a2s_head, a2s_tail, actx);
835     GNUNET_free (actx);
836     return;
837   }
838   GNUNET_SERVER_transmit_context_append_data (actx->tc, buf, strlen (buf) + 1,
839                                               GNUNET_MESSAGE_TYPE_TRANSPORT_ADDRESS_TO_STRING_REPLY);
840 }
841
842
843 /**
844  * Client asked to resolve an address.  Process the request.
845  *
846  * @param cls unused
847  * @param client the client
848  * @param message the resolution request
849  */
850 static void
851 clients_handle_address_to_string (void *cls,
852                                   struct GNUNET_SERVER_Client *client,
853                                   const struct GNUNET_MessageHeader *message)
854 {
855   const struct AddressLookupMessage *alum;
856   struct GNUNET_TRANSPORT_PluginFunctions *papi;
857   const char *plugin_name;
858   const char *address;
859   uint32_t address_len;
860   uint16_t size;
861   struct GNUNET_SERVER_TransmitContext *tc;
862   struct AddressToStringContext *actx;
863   struct GNUNET_TIME_Relative rtimeout;
864   int32_t numeric;
865
866   size = ntohs (message->size);
867   if (size < sizeof (struct AddressLookupMessage))
868   {
869     GNUNET_break (0);
870     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
871     return;
872   }
873   alum = (const struct AddressLookupMessage *) message;
874   address_len = ntohs (alum->addrlen);
875   if (size <= sizeof (struct AddressLookupMessage) + address_len)
876   {
877     GNUNET_break (0);
878     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
879     return;
880   }
881   address = (const char *) &alum[1];
882   plugin_name = (const char *) &address[address_len];
883   if ('\0' != plugin_name[size - sizeof (struct AddressLookupMessage) - address_len - 1])
884   {
885     GNUNET_break (0);
886     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
887     return;
888   }
889   rtimeout = GNUNET_TIME_relative_ntoh (alum->timeout);
890   numeric = ntohs (alum->numeric_only);
891   tc = GNUNET_SERVER_transmit_context_create (client);
892   papi = GST_plugins_printer_find (plugin_name);
893   if (NULL == papi)
894   {
895     GNUNET_SERVER_transmit_context_append_data (tc, NULL, 0,
896                                                 GNUNET_MESSAGE_TYPE_TRANSPORT_ADDRESS_TO_STRING_REPLY);
897     GNUNET_SERVER_transmit_context_run (tc, rtimeout);
898     return;
899   }
900   actx = GNUNET_new (struct AddressToStringContext);
901   actx->tc = tc;
902   GNUNET_CONTAINER_DLL_insert (a2s_head, a2s_tail, actx);
903   GNUNET_SERVER_disable_receive_done_warning (client);
904   papi->address_pretty_printer (papi->cls, plugin_name, address, address_len,
905                                 numeric, rtimeout, &transmit_address_to_client,
906                                 actx);
907 }
908
909
910 /**
911  * Compose #PeerIterateResponseMessage using the given peer and address.
912  *
913  * @param peer identity of the peer
914  * @param address the address, NULL on disconnect
915  * @return composed message
916  */
917 static struct PeerIterateResponseMessage *
918 compose_address_iterate_response_message (const struct GNUNET_PeerIdentity *peer,
919                                           const struct GNUNET_HELLO_Address *address)
920 {
921   struct PeerIterateResponseMessage *msg;
922   size_t size;
923   size_t tlen;
924   size_t alen;
925   char *addr;
926
927   GNUNET_assert (NULL != peer);
928   if (NULL != address)
929   {
930     tlen = strlen (address->transport_name) + 1;
931     alen = address->address_length;
932   }
933   else
934     tlen = alen = 0;
935   size = (sizeof (struct PeerIterateResponseMessage) + alen + tlen);
936   msg = GNUNET_malloc (size);
937   msg->header.size = htons (size);
938   msg->header.type =
939       htons (GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_PEER_RESPONSE);
940   msg->reserved = htonl (0);
941   msg->peer = *peer;
942   msg->addrlen = htonl (alen);
943   msg->pluginlen = htonl (tlen);
944
945   if (NULL != address)
946   {
947     msg->local_address_info = htonl((uint32_t) address->local_info);
948     addr = (char *) &msg[1];
949     memcpy (addr, address->address, alen);
950     memcpy (&addr[alen], address->transport_name, tlen);
951   }
952   return msg;
953 }
954
955 /**
956  * Compose #PeerIterateResponseMessage using the given peer and address.
957  *
958  * @param peer identity of the peer
959  * @param address the address, NULL on disconnect
960  * @return composed message
961  */
962 static struct ValidationIterateResponseMessage *
963 compose_validation_iterate_response_message (const struct GNUNET_PeerIdentity *peer,
964                                           const struct GNUNET_HELLO_Address *address)
965 {
966   struct ValidationIterateResponseMessage *msg;
967   size_t size;
968   size_t tlen;
969   size_t alen;
970   char *addr;
971
972   GNUNET_assert (NULL != peer);
973   if (NULL != address)
974   {
975     tlen = strlen (address->transport_name) + 1;
976     alen = address->address_length;
977   }
978   else
979     tlen = alen = 0;
980   size = (sizeof (struct ValidationIterateResponseMessage) + alen + tlen);
981   msg = GNUNET_malloc (size);
982   msg->header.size = htons (size);
983   msg->header.type =
984       htons (GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_VALIDATION_RESPONSE);
985   msg->reserved = htonl (0);
986   msg->peer = *peer;
987   msg->addrlen = htonl (alen);
988   msg->pluginlen = htonl (tlen);
989
990   if (NULL != address)
991   {
992     msg->local_address_info = htonl((uint32_t) address->local_info);
993     addr = (char *) &msg[1];
994     memcpy (addr, address->address, alen);
995     memcpy (&addr[alen], address->transport_name, tlen);
996   }
997   return msg;
998 }
999
1000 struct IterationContext
1001 {
1002   struct GNUNET_SERVER_TransmitContext *tc;
1003
1004   struct GNUNET_PeerIdentity id;
1005
1006   int all;
1007 };
1008
1009 /**
1010  * Output information of validation entries to the given client.
1011  *
1012  * @param cls the 'struct IterationContext'
1013  * @param peer identity of the neighbour
1014  * @param address the address
1015  * @param last_validation point in time when last validation was performed
1016  * @param valid_until point in time how long address is valid
1017  * @param next_validation point in time when next validation will be performed
1018  * @param state state of validation notification
1019  */
1020 static void
1021 send_validation_information (void *cls,
1022     const struct GNUNET_PeerIdentity *peer,
1023     const struct GNUNET_HELLO_Address *address,
1024     struct GNUNET_TIME_Absolute last_validation,
1025     struct GNUNET_TIME_Absolute valid_until,
1026     struct GNUNET_TIME_Absolute next_validation,
1027     enum GNUNET_TRANSPORT_ValidationState state)
1028 {
1029   struct IterationContext *pc = cls;
1030   struct ValidationIterateResponseMessage *msg;
1031
1032   if ( (GNUNET_YES == pc->all) ||
1033        (0 == memcmp (peer, &pc->id, sizeof (pc->id))) )
1034   {
1035     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1036         "Sending information about for validation entry for peer `%s' using address `%s'\n",
1037         GNUNET_i2s(peer), (address != NULL) ? GST_plugins_a2s (address) : "<none>");
1038     msg = compose_validation_iterate_response_message (peer, address);
1039     msg->last_validation = GNUNET_TIME_absolute_hton(last_validation);
1040     msg->valid_until = GNUNET_TIME_absolute_hton(valid_until);
1041     msg->next_validation = GNUNET_TIME_absolute_hton(next_validation);
1042     msg->state = htonl ((uint32_t) state);
1043     GNUNET_SERVER_transmit_context_append_message (pc->tc, &msg->header);
1044     GNUNET_free (msg);
1045   }
1046 }
1047
1048
1049 /**
1050  * Output information of neighbours to the given client.
1051  *
1052  * @param cls the 'struct PeerIterationContext'
1053  * @param peer identity of the neighbour
1054  * @param address the address
1055  * @param state current state this peer is in
1056  * @param state_timeout timeout for the current state of the peer
1057  * @param bandwidth_in inbound quota in NBO
1058  * @param bandwidth_out outbound quota in NBO
1059  */
1060 static void
1061 send_peer_information (void *cls,
1062     const struct GNUNET_PeerIdentity *peer,
1063     const struct GNUNET_HELLO_Address *address,
1064     enum GNUNET_TRANSPORT_PeerState state,
1065     struct GNUNET_TIME_Absolute state_timeout,
1066     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
1067     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out)
1068 {
1069   struct IterationContext *pc = cls;
1070   struct PeerIterateResponseMessage *msg;
1071
1072   if ( (GNUNET_YES == pc->all) ||
1073        (0 == memcmp (peer, &pc->id, sizeof (pc->id))) )
1074   {
1075     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1076         "Sending information about `%s' using address `%s' in state `%s'\n",
1077         GNUNET_i2s(peer),
1078         (address != NULL) ? GST_plugins_a2s (address) : "<none>",
1079         GNUNET_TRANSPORT_ps2s (state));
1080     msg = compose_address_iterate_response_message (peer, address);
1081     msg->state = htonl (state);
1082     msg->state_timeout = GNUNET_TIME_absolute_hton(state_timeout);
1083     GNUNET_SERVER_transmit_context_append_message (pc->tc, &msg->header);
1084     GNUNET_free (msg);
1085   }
1086 }
1087
1088
1089
1090 /**
1091  * Client asked to obtain information about a specific or all peers
1092  * Process the request.
1093  *
1094  * @param cls unused
1095  * @param client the client
1096  * @param message the peer address information request
1097  */
1098 static void
1099 clients_handle_monitor_peers (void *cls, struct GNUNET_SERVER_Client *client,
1100                                 const struct GNUNET_MessageHeader *message)
1101 {
1102   static struct GNUNET_PeerIdentity all_zeros;
1103   struct GNUNET_SERVER_TransmitContext *tc;
1104   struct PeerMonitorMessage *msg;
1105   struct IterationContext pc;
1106
1107   if (ntohs (message->type) != GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_PEER_REQUEST)
1108   {
1109     GNUNET_break (0);
1110     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1111     return;
1112   }
1113   if (ntohs (message->size) != sizeof (struct PeerMonitorMessage))
1114   {
1115     GNUNET_break (0);
1116     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1117     return;
1118   }
1119   msg = (struct PeerMonitorMessage *) message;
1120   if ( (GNUNET_YES != ntohl (msg->one_shot)) &&
1121        (NULL != lookup_monitoring_client (peer_monitoring_clients_head, client)) )
1122   {
1123     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
1124                 "ServerClient %p tried to start monitoring twice\n",
1125                 client);
1126     GNUNET_break (0);
1127     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1128     return;
1129   }
1130   GNUNET_SERVER_disable_receive_done_warning (client);
1131   pc.tc = tc = GNUNET_SERVER_transmit_context_create (client);
1132
1133   /* Send initial list */
1134   if (0 == memcmp (&msg->peer, &all_zeros, sizeof (struct GNUNET_PeerIdentity)))
1135   {
1136     /* iterate over all neighbours */
1137     pc.all = GNUNET_YES;
1138     pc.id = msg->peer;
1139   }
1140   else
1141   {
1142     /* just return one neighbour */
1143     pc.all = GNUNET_NO;
1144     pc.id = msg->peer;
1145   }
1146   GST_neighbours_iterate (&send_peer_information, &pc);
1147
1148   if (GNUNET_YES != ntohl (msg->one_shot))
1149   {
1150     setup_peer_monitoring_client (client, &msg->peer);
1151   }
1152   else
1153   {
1154     GNUNET_SERVER_transmit_context_append_data (tc, NULL, 0,
1155         GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_PEER_RESPONSE);
1156   }
1157
1158   GNUNET_SERVER_transmit_context_run (tc, GNUNET_TIME_UNIT_FOREVER_REL);
1159 }
1160
1161
1162 /**
1163  * Client asked to obtain information about a specific or all validation
1164  * processes
1165  *
1166  * @param cls unused
1167  * @param client the client
1168  * @param message the peer address information request
1169  */
1170 static void
1171 clients_handle_monitor_validation (void *cls, struct GNUNET_SERVER_Client *client,
1172                                 const struct GNUNET_MessageHeader *message)
1173 {
1174   static struct GNUNET_PeerIdentity all_zeros;
1175   struct GNUNET_SERVER_TransmitContext *tc;
1176   struct PeerMonitorMessage *msg;
1177   struct IterationContext pc;
1178
1179   if (ntohs (message->type) != GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_VALIDATION_REQUEST)
1180   {
1181     GNUNET_break (0);
1182     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1183     return;
1184   }
1185   if (ntohs (message->size) != sizeof (struct ValidationMonitorMessage))
1186   {
1187     GNUNET_break (0);
1188     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1189     return;
1190   }
1191   msg = (struct PeerMonitorMessage *) message;
1192   if ( (GNUNET_YES != ntohl (msg->one_shot)) &&
1193        (NULL != lookup_monitoring_client (val_monitoring_clients_head, client)) )
1194   {
1195     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
1196                 "ServerClient %p tried to start monitoring twice\n",
1197                 client);
1198     GNUNET_break (0);
1199     GNUNET_SERVER_receive_done (client, GNUNET_SYSERR);
1200     return;
1201   }
1202   GNUNET_SERVER_disable_receive_done_warning (client);
1203   pc.tc = tc = GNUNET_SERVER_transmit_context_create (client);
1204
1205   /* Send initial list */
1206   if (0 == memcmp (&msg->peer, &all_zeros, sizeof (struct GNUNET_PeerIdentity)))
1207   {
1208     /* iterate over all neighbours */
1209     pc.all = GNUNET_YES;
1210     pc.id = msg->peer;
1211   }
1212   else
1213   {
1214     /* just return one neighbour */
1215     pc.all = GNUNET_NO;
1216     pc.id = msg->peer;
1217   }
1218
1219   GST_validation_iterate (&send_validation_information, &pc);
1220
1221   if (GNUNET_YES != ntohl (msg->one_shot))
1222   {
1223     setup_val_monitoring_client (client, &msg->peer);
1224   }
1225   else
1226   {
1227     GNUNET_SERVER_transmit_context_append_data (tc, NULL, 0,
1228         GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_VALIDATION_RESPONSE);
1229   }
1230   GNUNET_SERVER_transmit_context_run (tc, GNUNET_TIME_UNIT_FOREVER_REL);
1231 }
1232
1233 /**
1234  * Start handling requests from clients.
1235  *
1236  * @param server server used to accept clients from.
1237  */
1238 void
1239 GST_clients_start (struct GNUNET_SERVER_Handle *server)
1240 {
1241   static const struct GNUNET_SERVER_MessageHandler handlers[] = {
1242     {&clients_handle_start, NULL,
1243      GNUNET_MESSAGE_TYPE_TRANSPORT_START, sizeof (struct StartMessage)},
1244     {&clients_handle_hello, NULL,
1245      GNUNET_MESSAGE_TYPE_HELLO, 0},
1246     {&clients_handle_send, NULL,
1247      GNUNET_MESSAGE_TYPE_TRANSPORT_SEND, 0},
1248     {&clients_handle_request_connect, NULL,
1249      GNUNET_MESSAGE_TYPE_TRANSPORT_REQUEST_CONNECT,
1250      sizeof (struct TransportRequestConnectMessage)},
1251     {&clients_handle_address_to_string, NULL,
1252      GNUNET_MESSAGE_TYPE_TRANSPORT_ADDRESS_TO_STRING, 0},
1253     {&clients_handle_monitor_peers, NULL,
1254      GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_PEER_REQUEST,
1255      sizeof (struct PeerMonitorMessage)},
1256     {&clients_handle_monitor_validation, NULL,
1257      GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_VALIDATION_REQUEST,
1258      sizeof (struct ValidationMonitorMessage)},
1259     {&GST_blacklist_handle_init, NULL,
1260      GNUNET_MESSAGE_TYPE_TRANSPORT_BLACKLIST_INIT,
1261      sizeof (struct GNUNET_MessageHeader)},
1262     {&GST_blacklist_handle_reply, NULL,
1263      GNUNET_MESSAGE_TYPE_TRANSPORT_BLACKLIST_REPLY,
1264      sizeof (struct BlacklistMessage)},
1265     {&GST_manipulation_set_metric, NULL,
1266      GNUNET_MESSAGE_TYPE_TRANSPORT_TRAFFIC_METRIC, 0},
1267     {NULL, NULL, 0, 0}
1268   };
1269   peer_nc = GNUNET_SERVER_notification_context_create (server, 0);
1270   val_nc = GNUNET_SERVER_notification_context_create (server, 0);
1271   GNUNET_SERVER_add_handlers (server, handlers);
1272   GNUNET_SERVER_disconnect_notify (server, &client_disconnect_notification,
1273                                    NULL);
1274 }
1275
1276
1277 /**
1278  * Stop processing clients.
1279  */
1280 void
1281 GST_clients_stop ()
1282 {
1283   struct AddressToStringContext *cur;
1284
1285   while (NULL != (cur = a2s_head))
1286   {
1287     GNUNET_SERVER_transmit_context_destroy (cur->tc, GNUNET_NO);
1288     GNUNET_CONTAINER_DLL_remove (a2s_head, a2s_tail, cur);
1289     GNUNET_free (cur);
1290   }
1291   if (NULL != peer_nc)
1292   {
1293     GNUNET_SERVER_notification_context_destroy (peer_nc);
1294     peer_nc = NULL;
1295   }
1296   if (NULL != val_nc)
1297   {
1298     GNUNET_SERVER_notification_context_destroy (val_nc);
1299     val_nc = NULL;
1300   }
1301 }
1302
1303
1304 /**
1305  * Broadcast the given message to all of our clients.
1306  *
1307  * @param msg message to broadcast
1308  * @param may_drop #GNUNET_YES if the message can be dropped / is payload
1309  */
1310 void
1311 GST_clients_broadcast (const struct GNUNET_MessageHeader *msg, int may_drop)
1312 {
1313   struct TransportClient *tc;
1314
1315   for (tc = clients_head; NULL != tc; tc = tc->next)
1316   {
1317     if ((GNUNET_YES == may_drop) && (GNUNET_YES != tc->send_payload))
1318       continue;                 /* skip, this client does not care about payload */
1319     unicast (tc, msg, may_drop);
1320   }
1321 }
1322
1323
1324 /**
1325  * Send the given message to a particular client
1326  *
1327  * @param client target of the message
1328  * @param msg message to transmit
1329  * @param may_drop #GNUNET_YES if the message can be dropped
1330  */
1331 void
1332 GST_clients_unicast (struct GNUNET_SERVER_Client *client,
1333                      const struct GNUNET_MessageHeader *msg, int may_drop)
1334 {
1335   struct TransportClient *tc;
1336
1337   tc = lookup_client (client);
1338   if (NULL == tc)
1339     return;                     /* client got disconnected in the meantime, drop message */
1340   unicast (tc, msg, may_drop);
1341 }
1342
1343
1344 /**
1345  * Broadcast the new active address to all clients monitoring the peer.
1346  *
1347  * @param peer peer this update is about (never NULL)
1348  * @param address address, NULL on disconnect
1349  * @param state the current state of the peer
1350  * @param state_timeout the time out for the state
1351  */
1352 void
1353 GST_clients_broadcast_peer_notification (const struct GNUNET_PeerIdentity *peer,
1354     const struct GNUNET_HELLO_Address *address,
1355     enum GNUNET_TRANSPORT_PeerState state,
1356     struct GNUNET_TIME_Absolute state_timeout)
1357 {
1358   struct PeerIterateResponseMessage *msg;
1359   struct MonitoringClient *mc;
1360   static struct GNUNET_PeerIdentity all_zeros;
1361   msg = compose_address_iterate_response_message (peer, address);
1362   msg->state = htonl (state);
1363   msg->state_timeout = GNUNET_TIME_absolute_hton (state_timeout);
1364   mc = peer_monitoring_clients_head;
1365   while (mc != NULL)
1366   {
1367     if ((0 == memcmp (&mc->peer, &all_zeros,
1368                       sizeof (struct GNUNET_PeerIdentity))) ||
1369         (0 == memcmp (&mc->peer, peer,
1370                       sizeof (struct GNUNET_PeerIdentity))))
1371     {
1372       GNUNET_SERVER_notification_context_unicast (peer_nc, mc->client,
1373                                                   &msg->header, GNUNET_NO);
1374     }
1375
1376     mc = mc->next;
1377   }
1378   GNUNET_free (msg);
1379 }
1380
1381 /**
1382  * Broadcast the new validation changes to all clients monitoring the peer.
1383  *
1384  * @param peer peer this update is about (never NULL)
1385  * @param address address, NULL on disconnect
1386  * @param last_validation point in time when last validation was performed
1387  * @param valid_until point in time how long address is valid
1388  * @param next_validation point in time when next validation will be performed
1389  * @param state state of validation notification
1390  */
1391 void
1392 GST_clients_broadcast_validation_notification (
1393     const struct GNUNET_PeerIdentity *peer,
1394     const struct GNUNET_HELLO_Address *address,
1395     struct GNUNET_TIME_Absolute last_validation,
1396     struct GNUNET_TIME_Absolute valid_until,
1397     struct GNUNET_TIME_Absolute next_validation,
1398     enum GNUNET_TRANSPORT_ValidationState state)
1399 {
1400   struct ValidationIterateResponseMessage *msg;
1401   struct MonitoringClient *mc;
1402   static struct GNUNET_PeerIdentity all_zeros;
1403
1404   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
1405       "Sending information about for validation entry for peer `%s' using address `%s'\n",
1406       GNUNET_i2s(peer), (address != NULL) ? GST_plugins_a2s (address) : "<none>");
1407
1408   msg = compose_validation_iterate_response_message (peer, address);
1409   msg->last_validation = GNUNET_TIME_absolute_hton(last_validation);
1410   msg->valid_until = GNUNET_TIME_absolute_hton(valid_until);
1411   msg->next_validation = GNUNET_TIME_absolute_hton(next_validation);
1412   msg->state = htonl ((uint32_t) state);
1413   mc = val_monitoring_clients_head;
1414   while (mc != NULL)
1415   {
1416     if ((0 == memcmp (&mc->peer, &all_zeros,
1417                       sizeof (struct GNUNET_PeerIdentity))) ||
1418         (0 == memcmp (&mc->peer, peer,
1419                       sizeof (struct GNUNET_PeerIdentity))))
1420     {
1421       GNUNET_SERVER_notification_context_unicast (val_nc, mc->client,
1422                                                   &msg->header, GNUNET_NO);
1423
1424     }
1425     mc = mc->next;
1426   }
1427   GNUNET_free (msg);
1428 }
1429
1430
1431 /* end of file gnunet-service-transport_clients.c */