src/transport/transport_api_monitoring.c

   1 /*
   2      This file is part of GNUnet.
   3      (C) 2009, 2010 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/transport_api_monitoring.c
  23  * @brief montoring api for transport peer status and validation entries
  24  *
  25  * This api provides the ability to query the transport service about
  26  * the status of a specific or all peers as well as address validation entries.
  27  *
  28  * Calls back with information about peer(s) including address used, state and
  29  * state timeout for peer requests and address, address lifetime and next revalidation
  30  * for validation entries.
  31  */
  32 #include "platform.h"
  33 #include "gnunet_util_lib.h"
  34 #include "gnunet_arm_service.h"
  35 #include "gnunet_hello_lib.h"
  36 #include "gnunet_protocols.h"
  37 #include "gnunet_transport_service.h"
  38 #include "transport.h"
  39
  40 /**
  41  * Context for iterating validation entries.
  42  */
  43 struct GNUNET_TRANSPORT_PeerMonitoringContext
  44 {
  45   /**
  46    * Function to call with the binary address.
  47    */
  48   GNUNET_TRANSPORT_PeerIterateCallback cb;
  49
  50   /**
  51    * Closure for cb.
  52    */
  53   void *cb_cls;
  54
  55   /**
  56    * Connection to the service.
  57    */
  58   struct GNUNET_CLIENT_Connection *client;
  59
  60   /**
  61    * Configuration we use.
  62    */
  63   const struct GNUNET_CONFIGURATION_Handle *cfg;
  64
  65   /**
  66    * When should this operation time out?
  67    */
  68   struct GNUNET_TIME_Absolute timeout;
  69
  70   /**
  71    * Backoff for reconnect.
  72    */
  73   struct GNUNET_TIME_Relative backoff;
  74
  75   /**
  76    * Task ID for reconnect.
  77    */
  78   GNUNET_SCHEDULER_TaskIdentifier reconnect_task;
  79
  80   /**
  81    * Identity of the peer to monitor.
  82    */
  83   struct GNUNET_PeerIdentity peer;
  84
  85   /**
  86    * Was this a one-shot request?
  87    */
  88   int one_shot;
  89 };
  90
  91
  92 /**
  93  * Context for the address lookup.
  94  */
  95 struct GNUNET_TRANSPORT_ValidationMonitoringContext
  96 {
  97   /**
  98    * Function to call with the binary address.
  99    */
 100   GNUNET_TRANSPORT_ValidationIterateCallback cb;
 101
 102   /**
 103    * Closure for cb.
 104    */
 105   void *cb_cls;
 106
 107   /**
 108    * Connection to the service.
 109    */
 110   struct GNUNET_CLIENT_Connection *client;
 111
 112   /**
 113    * Configuration we use.
 114    */
 115   const struct GNUNET_CONFIGURATION_Handle *cfg;
 116
 117   /**
 118    * When should this operation time out?
 119    */
 120   struct GNUNET_TIME_Absolute timeout;
 121
 122   /**
 123    * Backoff for reconnect.
 124    */
 125   struct GNUNET_TIME_Relative backoff;
 126
 127   /**
 128    * Task ID for reconnect.
 129    */
 130   GNUNET_SCHEDULER_TaskIdentifier reconnect_task;
 131
 132   /**
 133    * Identity of the peer to monitor.
 134    */
 135   struct GNUNET_PeerIdentity peer;
 136
 137   /**
 138    * Was this a one-shot request?
 139    */
 140   int one_shot;
 141 };
 142
 143 /**
 144  * Check if a state is defined as connected
 145  *
 146  * @param state the state value
 147  * @return GNUNET_YES or GNUNET_NO
 148  */
 149 int
 150 GNUNET_TRANSPORT_is_connected (enum GNUNET_TRANSPORT_PeerState state)
 151 {
 152   switch (state)
 153   {
 154   case GNUNET_TRANSPORT_PS_NOT_CONNECTED:
 155   case GNUNET_TRANSPORT_PS_INIT_ATS:
 156   case GNUNET_TRANSPORT_PS_CONNECT_SENT:
 157   case GNUNET_TRANSPORT_PS_CONNECT_RECV_ATS:
 158   case GNUNET_TRANSPORT_PS_CONNECT_RECV_ACK:
 159     return GNUNET_NO;
 160   case GNUNET_TRANSPORT_PS_CONNECTED:
 161   case GNUNET_TRANSPORT_PS_RECONNECT_ATS:
 162   case GNUNET_TRANSPORT_PS_RECONNECT_SENT:
 163   case GNUNET_TRANSPORT_PS_CONNECTED_SWITCHING_CONNECT_SENT:
 164     return GNUNET_YES;
 165   case GNUNET_TRANSPORT_PS_DISCONNECT:
 166   case GNUNET_TRANSPORT_PS_DISCONNECT_FINISHED:
 167     return GNUNET_NO;
 168   default:
 169     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
 170                 "Unhandled state `%s' \n",
 171                 GNUNET_TRANSPORT_ps2s (state));
 172     GNUNET_break (0);
 173     break;
 174   }
 175   return GNUNET_SYSERR;
 176 }
 177
 178 /**
 179  * Convert peer state to human-readable string.
 180  *
 181  * @param state the state value
 182  * @return corresponding string
 183  */
 184 const char *
 185 GNUNET_TRANSPORT_ps2s (enum GNUNET_TRANSPORT_PeerState state)
 186 {
 187   switch (state)
 188   {
 189   case GNUNET_TRANSPORT_PS_NOT_CONNECTED:
 190     return "S_NOT_CONNECTED";
 191   case GNUNET_TRANSPORT_PS_INIT_ATS:
 192     return "S_INIT_ATS";
 193   case GNUNET_TRANSPORT_PS_CONNECT_SENT:
 194     return "S_CONNECT_SENT";
 195   case GNUNET_TRANSPORT_PS_CONNECT_RECV_ATS:
 196     return "S_CONNECT_RECV_ATS";
 197   case GNUNET_TRANSPORT_PS_CONNECT_RECV_ACK:
 198     return "S_CONNECT_RECV_ACK";
 199   case GNUNET_TRANSPORT_PS_CONNECTED:
 200     return "S_CONNECTED";
 201   case GNUNET_TRANSPORT_PS_RECONNECT_ATS:
 202     return "S_RECONNECT_ATS";
 203   case GNUNET_TRANSPORT_PS_RECONNECT_SENT:
 204     return "S_RECONNECT_SENT";
 205   case GNUNET_TRANSPORT_PS_CONNECTED_SWITCHING_CONNECT_SENT:
 206     return "S_CONNECTED_SWITCHING_CONNECT_SENT";
 207   case GNUNET_TRANSPORT_PS_DISCONNECT:
 208     return "S_DISCONNECT";
 209   case GNUNET_TRANSPORT_PS_DISCONNECT_FINISHED:
 210     return "S_DISCONNECT_FINISHED";
 211   default:
 212     GNUNET_break (0);
 213     return "UNDEFINED";
 214   }
 215 }
 216
 217 /**
 218  * Convert validation state to human-readable string.
 219  *
 220  * @param state the state value
 221  * @return corresponding string
 222  */
 223 const char *
 224 GNUNET_TRANSPORT_vs2s (enum GNUNET_TRANSPORT_ValidationState state)
 225 {
 226   switch (state)
 227   {
 228   case GNUNET_TRANSPORT_VS_NONE:
 229     return "NONE";
 230   case GNUNET_TRANSPORT_VS_NEW:
 231     return "NEW";
 232   case GNUNET_TRANSPORT_VS_REMOVE:
 233     return "REMOVE";
 234   case GNUNET_TRANSPORT_VS_TIMEOUT:
 235     return "TIMEOUT";
 236   case GNUNET_TRANSPORT_VS_UPDATE:
 237     return "UPDATE";
 238   default:
 239     GNUNET_break (0);
 240     return "UNDEFINED";
 241   }
 242 }
 243
 244
 245 /**
 246  * Function called with responses from the service.
 247  *
 248  * @param cls our 'struct GNUNET_TRANSPORT_PeerAddressLookupContext*'
 249  * @param msg NULL on timeout or error, otherwise presumably a
 250  *        message with the human-readable address
 251  */
 252 static void
 253 peer_response_processor (void *cls, const struct GNUNET_MessageHeader *msg);
 254
 255
 256 /**
 257  * Function called with responses from the service.
 258  *
 259  * @param cls our 'struct GNUNET_TRANSPORT_PeerAddressLookupContext*'
 260  * @param msg NULL on timeout or error, otherwise presumably a
 261  *        message with the human-readable address
 262  */
 263 static void
 264 val_response_processor (void *cls, const struct GNUNET_MessageHeader *msg);
 265
 266 /**
 267  * Send our subscription request to the service.
 268  *
 269  * @param pal_ctx our context
 270  */
 271 static void
 272 send_peer_mon_request (struct GNUNET_TRANSPORT_PeerMonitoringContext *pal_ctx)
 273 {
 274   struct PeerMonitorMessage msg;
 275
 276   msg.header.size = htons (sizeof (struct PeerMonitorMessage));
 277   msg.header.type = htons (GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_PEER_REQUEST);
 278   msg.one_shot = htonl (pal_ctx->one_shot);
 279   msg.peer = pal_ctx->peer;
 280   GNUNET_assert (GNUNET_OK ==
 281                  GNUNET_CLIENT_transmit_and_get_response (pal_ctx->client,
 282                     &msg.header,
 283                     GNUNET_TIME_absolute_get_remaining (pal_ctx->timeout),
 284                     GNUNET_YES,
 285                     &peer_response_processor,
 286                     pal_ctx));
 287 }
 288
 289 /**
 290  * Send our subscription request to the service.
 291  *
 292  * @param val_ctx our context
 293  */
 294 static void
 295 send_val_mon_request (struct GNUNET_TRANSPORT_ValidationMonitoringContext *val_ctx)
 296 {
 297   struct ValidationMonitorMessage msg;
 298
 299   msg.header.size = htons (sizeof (struct ValidationMonitorMessage));
 300   msg.header.type = htons (GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_VALIDATION_REQUEST);
 301   msg.one_shot = htonl (val_ctx->one_shot);
 302   msg.peer = val_ctx->peer;
 303   GNUNET_assert (GNUNET_OK ==
 304                  GNUNET_CLIENT_transmit_and_get_response (val_ctx->client,
 305                     &msg.header,
 306                     GNUNET_TIME_absolute_get_remaining (val_ctx->timeout),
 307                     GNUNET_YES,
 308                     &val_response_processor,
 309                     val_ctx));
 310 }
 311
 312 /**
 313  * Task run to re-establish the connection.
 314  *
 315  * @param cls our 'struct GNUNET_TRANSPORT_PeerAddressLookupContext*'
 316  * @param tc scheduler context, unused
 317  */
 318 static void
 319 do_peer_connect (void *cls,
 320            const struct GNUNET_SCHEDULER_TaskContext *tc)
 321 {
 322   struct GNUNET_TRANSPORT_PeerMonitoringContext *pal_ctx = cls;
 323
 324   pal_ctx->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
 325   pal_ctx->client = GNUNET_CLIENT_connect ("transport", pal_ctx->cfg);
 326   GNUNET_assert (NULL != pal_ctx->client);
 327   send_peer_mon_request (pal_ctx);
 328 }
 329
 330
 331 /**
 332  * Cut the existing connection and reconnect.
 333  *
 334  * @param pal_ctx our context
 335  */
 336 static void
 337 reconnect_peer_ctx (struct GNUNET_TRANSPORT_PeerMonitoringContext *pal_ctx)
 338 {
 339   GNUNET_assert (GNUNET_NO == pal_ctx->one_shot);
 340   GNUNET_CLIENT_disconnect (pal_ctx->client);
 341   pal_ctx->client = NULL;
 342   pal_ctx->backoff = GNUNET_TIME_STD_BACKOFF (pal_ctx->backoff);
 343   pal_ctx->reconnect_task = GNUNET_SCHEDULER_add_delayed (pal_ctx->backoff,
 344                                                           &do_peer_connect,
 345                                                           pal_ctx);
 346 }
 347
 348
 349 /**
 350  * Task run to re-establish the connection.
 351  *
 352  * @param cls our 'struct GNUNET_TRANSPORT_PeerAddressLookupContext*'
 353  * @param tc scheduler context, unused
 354  */
 355 static void
 356 do_val_connect (void *cls,
 357            const struct GNUNET_SCHEDULER_TaskContext *tc)
 358 {
 359   struct GNUNET_TRANSPORT_ValidationMonitoringContext *val_ctx = cls;
 360
 361   val_ctx->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
 362   val_ctx->client = GNUNET_CLIENT_connect ("transport", val_ctx->cfg);
 363   GNUNET_assert (NULL != val_ctx->client);
 364   send_val_mon_request (val_ctx);
 365 }
 366
 367 /**
 368  * Cut the existing connection and reconnect.
 369  *
 370  * @param val_ctx our context
 371  */
 372 static void
 373 reconnect_val_ctx (struct GNUNET_TRANSPORT_ValidationMonitoringContext *val_ctx)
 374 {
 375   GNUNET_assert (GNUNET_NO == val_ctx->one_shot);
 376   GNUNET_CLIENT_disconnect (val_ctx->client);
 377   val_ctx->client = NULL;
 378   val_ctx->backoff = GNUNET_TIME_STD_BACKOFF (val_ctx->backoff);
 379   val_ctx->reconnect_task = GNUNET_SCHEDULER_add_delayed (val_ctx->backoff,
 380                                                           &do_val_connect,
 381                                                           val_ctx);
 382 }
 383
 384 /**
 385  * Function called with responses from the service.
 386  *
 387  * @param cls our 'struct GNUNET_TRANSPORT_PeerMonitoringContext*'
 388  * @param msg NULL on timeout or error, otherwise presumably a
 389  *        message with the human-readable address
 390  */
 391 static void
 392 val_response_processor (void *cls, const struct GNUNET_MessageHeader *msg)
 393 {
 394   struct GNUNET_TRANSPORT_ValidationMonitoringContext *val_ctx = cls;
 395   struct ValidationIterateResponseMessage *vr_msg;
 396   struct GNUNET_HELLO_Address *address;
 397   const char *addr;
 398   const char *transport_name;
 399   size_t size;
 400   size_t tlen;
 401   size_t alen;
 402
 403   if (msg == NULL)
 404   {
 405     if (val_ctx->one_shot)
 406     {
 407       /* Disconnect */
 408       val_ctx->cb (val_ctx->cb_cls, NULL, NULL,
 409           GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TIME_UNIT_ZERO_ABS,
 410           GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TRANSPORT_VS_TIMEOUT);
 411       GNUNET_TRANSPORT_monitor_validation_entries_cancel (val_ctx);
 412     }
 413     else
 414     {
 415       reconnect_val_ctx (val_ctx);
 416     }
 417     return;
 418   }
 419   size = ntohs (msg->size);
 420   GNUNET_break (ntohs (msg->type) ==
 421       GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_VALIDATION_RESPONSE);
 422
 423   if (size == sizeof (struct GNUNET_MessageHeader))
 424   {
 425     /* Done! */
 426     if (val_ctx->one_shot)
 427     {
 428       val_ctx->cb (val_ctx->cb_cls, NULL, NULL,
 429           GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TIME_UNIT_ZERO_ABS,
 430           GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TRANSPORT_VS_NONE);
 431       GNUNET_TRANSPORT_monitor_validation_entries_cancel (val_ctx);
 432     }
 433     else
 434     {
 435       reconnect_val_ctx (val_ctx);
 436     }
 437     return;
 438   }
 439
 440   if ((size < sizeof (struct ValidationIterateResponseMessage)) ||
 441       (ntohs (msg->type) != GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_VALIDATION_RESPONSE))
 442   {
 443     GNUNET_break (0);
 444     if (val_ctx->one_shot)
 445     {
 446       val_ctx->cb (val_ctx->cb_cls, NULL, NULL,
 447           GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TIME_UNIT_ZERO_ABS,
 448           GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TRANSPORT_VS_NONE);
 449       GNUNET_TRANSPORT_monitor_validation_entries_cancel (val_ctx);
 450     }
 451     else
 452     {
 453       reconnect_val_ctx (val_ctx);
 454     }
 455     return;
 456   }
 457
 458   vr_msg = (struct ValidationIterateResponseMessage *) msg;
 459   tlen = ntohl (vr_msg->pluginlen);
 460   alen = ntohl (vr_msg->addrlen);
 461
 462   if (size != sizeof (struct ValidationIterateResponseMessage) + tlen + alen)
 463   {
 464     GNUNET_break (0);
 465     if (val_ctx->one_shot)
 466     {
 467       val_ctx->cb (val_ctx->cb_cls, NULL, NULL,
 468           GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TIME_UNIT_ZERO_ABS,
 469           GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TRANSPORT_VS_NONE);
 470       GNUNET_TRANSPORT_monitor_validation_entries_cancel (val_ctx);
 471     }
 472     else
 473     {
 474       reconnect_val_ctx (val_ctx);
 475     }
 476     return;
 477   }
 478   if ( (0 == tlen) && (0 == alen) )
 479   {
 480     GNUNET_break (0);
 481     if (val_ctx->one_shot)
 482     {
 483       val_ctx->cb (val_ctx->cb_cls, NULL, NULL,
 484           GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TIME_UNIT_ZERO_ABS,
 485           GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TRANSPORT_VS_NONE);
 486       GNUNET_TRANSPORT_monitor_validation_entries_cancel (val_ctx);
 487     }
 488     else
 489     {
 490       reconnect_val_ctx (val_ctx);
 491     }
 492     return;
 493   }
 494   else
 495   {
 496     if (0 == tlen)
 497     {
 498       GNUNET_break (0); /* This must not happen: address without plugin */
 499       return;
 500     }
 501     addr = (const char *) &vr_msg[1];
 502     transport_name = &addr[alen];
 503
 504     if (transport_name[tlen - 1] != '\0')
 505     {
 506       /* Corrupt plugin name */
 507       GNUNET_break (0);
 508       if (val_ctx->one_shot)
 509       {
 510         val_ctx->cb (val_ctx->cb_cls, NULL, NULL,
 511             GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TIME_UNIT_ZERO_ABS,
 512             GNUNET_TIME_UNIT_ZERO_ABS, GNUNET_TRANSPORT_VS_NONE);
 513         GNUNET_TRANSPORT_monitor_validation_entries_cancel (val_ctx);
 514       }
 515       else
 516       {
 517         reconnect_val_ctx (val_ctx);
 518       }
 519       return;
 520     }
 521
 522     /* notify client */
 523     address = GNUNET_HELLO_address_allocate (&vr_msg->peer,
 524         transport_name, addr, alen, ntohl(vr_msg->local_address_info));
 525     val_ctx->cb (val_ctx->cb_cls, &vr_msg->peer, address,
 526         GNUNET_TIME_absolute_ntoh(vr_msg->last_validation),
 527         GNUNET_TIME_absolute_ntoh(vr_msg->valid_until),
 528         GNUNET_TIME_absolute_ntoh(vr_msg->next_validation),
 529         ntohl(vr_msg->state));
 530     GNUNET_HELLO_address_free (address);
 531   }
 532   /* expect more replies */
 533   GNUNET_CLIENT_receive (val_ctx->client, &val_response_processor,
 534       val_ctx, GNUNET_TIME_absolute_get_remaining (val_ctx->timeout));
 535 }
 536
 537
 538 /**
 539  * Function called with responses from the service.
 540  *
 541  * @param cls our 'struct GNUNET_TRANSPORT_PeerMonitoringContext*'
 542  * @param msg NULL on timeout or error, otherwise presumably a
 543  *        message with the human-readable address
 544  */
 545 static void
 546 peer_response_processor (void *cls, const struct GNUNET_MessageHeader *msg)
 547 {
 548   struct GNUNET_TRANSPORT_PeerMonitoringContext *pal_ctx = cls;
 549   struct PeerIterateResponseMessage *pir_msg;
 550   struct GNUNET_HELLO_Address *address;
 551   const char *addr;
 552   const char *transport_name;
 553   uint16_t size;
 554   size_t alen;
 555   size_t tlen;
 556
 557   if (msg == NULL)
 558   {
 559     if (pal_ctx->one_shot)
 560     {
 561       /* Disconnect */
 562       pal_ctx->cb (pal_ctx->cb_cls, NULL, NULL,
 563           GNUNET_TRANSPORT_PS_NOT_CONNECTED, GNUNET_TIME_UNIT_ZERO_ABS);
 564       GNUNET_TRANSPORT_monitor_peers_cancel (pal_ctx);
 565     }
 566     else
 567     {
 568       reconnect_peer_ctx (pal_ctx);
 569     }
 570     return;
 571   }
 572   size = ntohs (msg->size);
 573   GNUNET_break (ntohs (msg->type) ==
 574       GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_PEER_RESPONSE);
 575   if (size == sizeof (struct GNUNET_MessageHeader))
 576   {
 577     /* Done! */
 578     if (pal_ctx->one_shot)
 579     {
 580       pal_ctx->cb (pal_ctx->cb_cls, NULL, NULL,
 581           GNUNET_TRANSPORT_PS_NOT_CONNECTED, GNUNET_TIME_UNIT_ZERO_ABS);
 582       GNUNET_TRANSPORT_monitor_peers_cancel (pal_ctx);
 583     }
 584     else
 585     {
 586       reconnect_peer_ctx (pal_ctx);
 587     }
 588     return;
 589   }
 590
 591   if ((size < sizeof (struct PeerIterateResponseMessage)) ||
 592       (ntohs (msg->type) != GNUNET_MESSAGE_TYPE_TRANSPORT_MONITOR_PEER_RESPONSE))
 593   {
 594     GNUNET_break (0);
 595     if (pal_ctx->one_shot)
 596     {
 597       pal_ctx->cb (pal_ctx->cb_cls, NULL, NULL,
 598           GNUNET_TRANSPORT_PS_NOT_CONNECTED, GNUNET_TIME_UNIT_ZERO_ABS);
 599       GNUNET_TRANSPORT_monitor_peers_cancel (pal_ctx);
 600     }
 601     else
 602     {
 603       reconnect_peer_ctx (pal_ctx);
 604     }
 605     return;
 606   }
 607
 608   pir_msg = (struct PeerIterateResponseMessage *) msg;
 609   tlen = ntohl (pir_msg->pluginlen);
 610   alen = ntohl (pir_msg->addrlen);
 611
 612   if (size != sizeof (struct PeerIterateResponseMessage) + tlen + alen)
 613   {
 614     GNUNET_break (0);
 615     if (pal_ctx->one_shot)
 616     {
 617       pal_ctx->cb (pal_ctx->cb_cls, NULL, NULL,
 618           GNUNET_TRANSPORT_PS_NOT_CONNECTED, GNUNET_TIME_UNIT_ZERO_ABS);
 619       GNUNET_TRANSPORT_monitor_peers_cancel (pal_ctx);
 620     }
 621     else
 622     {
 623       reconnect_peer_ctx (pal_ctx);
 624     }
 625     return;
 626   }
 627
 628   if ( (0 == tlen) && (0 == alen) )
 629   {
 630     /* No address available */
 631     pal_ctx->cb (pal_ctx->cb_cls, &pir_msg->peer, NULL,
 632         ntohl(pir_msg->state),
 633         GNUNET_TIME_absolute_ntoh (pir_msg->state_timeout));
 634   }
 635   else
 636   {
 637     if (0 == tlen)
 638     {
 639       GNUNET_break (0); /* This must not happen: address without plugin */
 640       return;
 641     }
 642     addr = (const char *) &pir_msg[1];
 643     transport_name = &addr[alen];
 644
 645     if (transport_name[tlen - 1] != '\0')
 646     {
 647       /* Corrupt plugin name */
 648       GNUNET_break (0);
 649       if (pal_ctx->one_shot)
 650       {
 651         pal_ctx->cb (pal_ctx->cb_cls, NULL, NULL,
 652             GNUNET_TRANSPORT_PS_NOT_CONNECTED, GNUNET_TIME_UNIT_ZERO_ABS);
 653         GNUNET_TRANSPORT_monitor_peers_cancel (pal_ctx);
 654       }
 655       else
 656       {
 657         reconnect_peer_ctx (pal_ctx);
 658       }
 659       return;
 660     }
 661
 662     /* notify client */
 663     address = GNUNET_HELLO_address_allocate (&pir_msg->peer,
 664         transport_name, addr, alen, ntohl(pir_msg->local_address_info));
 665     pal_ctx->cb (pal_ctx->cb_cls, &pir_msg->peer, address,
 666         ntohl(pir_msg->state),
 667         GNUNET_TIME_absolute_ntoh (pir_msg->state_timeout));
 668     GNUNET_HELLO_address_free (address);
 669
 670   }
 671
 672   /* expect more replies */
 673   GNUNET_CLIENT_receive (pal_ctx->client, &peer_response_processor,
 674                          pal_ctx,
 675                          GNUNET_TIME_absolute_get_remaining (pal_ctx->timeout));
 676 }
 677
 678
 679 /**
 680  * Return information about a specific peer or all peers currently known to
 681  * transport service once or in monitoring mode. To obtain information about
 682  * a specific peer, a peer identity can be passed. To obtain information about
 683  * all peers currently known to transport service, NULL can be passed as peer
 684  * identity.
 685  *
 686  * For each peer, the callback is called with information about the address used
 687  * to communicate with this peer, the state this peer is currently in and the
 688  * the current timeout for this state.
 689  *
 690  * Upon completion, the 'GNUNET_TRANSPORT_PeerIterateCallback' is called one
 691  * more time with 'NULL'. After this, the operation must no longer be
 692  * explicitly canceled.
 693  *
 694  * The #GNUNET_TRANSPORT_monitor_peers_cancel call MUST not be called in the
 695  * the peer_callback!
 696  *
 697  * @param cfg configuration to use
 698  * @param peer a specific peer identity to obtain information for,
 699  *      NULL for all peers
 700  * @param one_shot GNUNET_YES to return the current state and then end (with NULL+NULL),
 701  *                 GNUNET_NO to monitor peers continuously
 702  * @param timeout how long is the lookup allowed to take at most
 703  * @param peer_callback function to call with the results
 704  * @param peer_callback_cls closure for peer_address_callback
 705  */
 706 struct GNUNET_TRANSPORT_PeerMonitoringContext *
 707 GNUNET_TRANSPORT_monitor_peers (const struct GNUNET_CONFIGURATION_Handle *cfg,
 708     const struct GNUNET_PeerIdentity *peer,
 709     int one_shot,
 710     struct GNUNET_TIME_Relative timeout,
 711     GNUNET_TRANSPORT_PeerIterateCallback peer_callback,
 712     void *peer_callback_cls)
 713 {
 714   struct GNUNET_TRANSPORT_PeerMonitoringContext *pal_ctx;
 715   struct GNUNET_CLIENT_Connection *client;
 716
 717   client = GNUNET_CLIENT_connect ("transport", cfg);
 718   if (client == NULL)
 719     return NULL;
 720   if (GNUNET_YES != one_shot)
 721     timeout = GNUNET_TIME_UNIT_FOREVER_REL;
 722   pal_ctx = GNUNET_new (struct GNUNET_TRANSPORT_PeerMonitoringContext);
 723   pal_ctx->cb = peer_callback;
 724   pal_ctx->cb_cls = peer_callback_cls;
 725   pal_ctx->cfg = cfg;
 726   pal_ctx->timeout = GNUNET_TIME_relative_to_absolute (timeout);
 727   if (NULL != peer)
 728     pal_ctx->peer = *peer;
 729   pal_ctx->one_shot = one_shot;
 730   pal_ctx->client = client;
 731   send_peer_mon_request (pal_ctx);
 732
 733   return pal_ctx;
 734 }
 735
 736
 737 /**
 738  * Cancel request to monitor peers
 739  *
 740  * @param pic handle for the request to cancel
 741  */
 742 void
 743 GNUNET_TRANSPORT_monitor_peers_cancel (struct GNUNET_TRANSPORT_PeerMonitoringContext *pic)
 744 {
 745   if (NULL != pic->client)
 746   {
 747     GNUNET_CLIENT_disconnect (pic->client);
 748     pic->client = NULL;
 749   }
 750   if (GNUNET_SCHEDULER_NO_TASK != pic->reconnect_task)
 751   {
 752     GNUNET_SCHEDULER_cancel (pic->reconnect_task);
 753     pic->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
 754   }
 755   GNUNET_free (pic);
 756 }
 757
 758
 759 /**
 760  * Return information about pending address validation operations for a specific
 761  * or all peers
 762  *
 763  * @param cfg configuration to use
 764  * @param peer a specific peer identity to obtain validation entries for,
 765  *      NULL for all peers
 766  * @param one_shot GNUNET_YES to return all entries and then end (with NULL+NULL),
 767  *                 GNUNET_NO to monitor validation entries continuously
 768  * @param timeout how long is the lookup allowed to take at most
 769  * @param validation_callback function to call with the results
 770  * @param validation_callback_cls closure for peer_address_callback
 771  */
 772 struct GNUNET_TRANSPORT_ValidationMonitoringContext *
 773 GNUNET_TRANSPORT_monitor_validation_entries (const struct
 774                                 GNUNET_CONFIGURATION_Handle *cfg,
 775                                 const struct GNUNET_PeerIdentity *peer,
 776                                 int one_shot,
 777                                 struct GNUNET_TIME_Relative timeout,
 778                                 GNUNET_TRANSPORT_ValidationIterateCallback validation_callback,
 779                                 void *validation_callback_cls)
 780 {
 781   struct GNUNET_TRANSPORT_ValidationMonitoringContext *val_ctx;
 782   struct GNUNET_CLIENT_Connection *client;
 783
 784   client = GNUNET_CLIENT_connect ("transport", cfg);
 785   if (client == NULL)
 786     return NULL;
 787   if (GNUNET_YES != one_shot)
 788     timeout = GNUNET_TIME_UNIT_FOREVER_REL;
 789   val_ctx = GNUNET_new (struct GNUNET_TRANSPORT_ValidationMonitoringContext);
 790   val_ctx->cb = validation_callback;
 791   val_ctx->cb_cls = validation_callback_cls;
 792   val_ctx->cfg = cfg;
 793   val_ctx->timeout = GNUNET_TIME_relative_to_absolute (timeout);
 794   if (NULL != peer)
 795     val_ctx->peer = *peer;
 796   val_ctx->one_shot = one_shot;
 797   val_ctx->client = client;
 798   send_val_mon_request (val_ctx);
 799
 800   return val_ctx;
 801 }
 802
 803
 804 /**
 805  * Return information about all current pending validation operations
 806  *
 807  * @param vic handle for the request to cancel
 808  */
 809 void
 810 GNUNET_TRANSPORT_monitor_validation_entries_cancel (struct GNUNET_TRANSPORT_ValidationMonitoringContext *vic)
 811 {
 812   if (NULL != vic->client)
 813   {
 814     GNUNET_CLIENT_disconnect (vic->client);
 815     vic->client = NULL;
 816   }
 817   if (GNUNET_SCHEDULER_NO_TASK != vic->reconnect_task)
 818   {
 819     GNUNET_SCHEDULER_cancel (vic->reconnect_task);
 820     vic->reconnect_task = GNUNET_SCHEDULER_NO_TASK;
 821   }
 822   GNUNET_free (vic);
 823 }
 824
 825
 826 /* end of transport_api_monitoring.c */