src/transport/gnunet-service-transport.c

   1 /*
   2      This file is part of GNUnet.
   3      (C) 2010,2011 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.c
  23  * @brief
  24  * @author Christian Grothoff
  25  */
  26 #include "platform.h"
  27 #include "gnunet_util_lib.h"
  28 #include "gnunet_hello_lib.h"
  29 #include "gnunet_statistics_service.h"
  30 #include "gnunet_transport_service.h"
  31 #include "gnunet_peerinfo_service.h"
  32 #include "gnunet_ats_service.h"
  33 #include "gnunet-service-transport.h"
  34 #include "gnunet-service-transport_blacklist.h"
  35 #include "gnunet-service-transport_clients.h"
  36 #include "gnunet-service-transport_hello.h"
  37 #include "gnunet-service-transport_neighbours.h"
  38 #include "gnunet-service-transport_plugins.h"
  39 #include "gnunet-service-transport_validation.h"
  40 #include "gnunet-service-transport_manipulation.h"
  41 #include "transport.h"
  42
  43
  44 /**
  45  * Information we need for an asynchronous session kill.
  46  */
  47 struct SessionKiller
  48 {
  49   /**
  50    * Kept in a DLL.
  51    */
  52   struct SessionKiller *next;
  53
  54   /**
  55    * Kept in a DLL.
  56    */
  57   struct SessionKiller *prev;
  58
  59   /**
  60    * Session to kill.
  61    */
  62   struct Session *session;
  63
  64   /**
  65    * Plugin for the session.
  66    */
  67   struct GNUNET_TRANSPORT_PluginFunctions *plugin;
  68
  69   /**
  70    * The kill task.
  71    */
  72   GNUNET_SCHEDULER_TaskIdentifier task;
  73 };
  74
  75
  76 /* globals */
  77
  78 /**
  79  * Statistics handle.
  80  */
  81 struct GNUNET_STATISTICS_Handle *GST_stats;
  82
  83 /**
  84  * Configuration handle.
  85  */
  86 const struct GNUNET_CONFIGURATION_Handle *GST_cfg;
  87
  88 /**
  89  * Configuration handle.
  90  */
  91 struct GNUNET_PeerIdentity GST_my_identity;
  92
  93 /**
  94  * Handle to peerinfo service.
  95  */
  96 struct GNUNET_PEERINFO_Handle *GST_peerinfo;
  97
  98 /**
  99  * Handle to our service's server.
 100  */
 101 static struct GNUNET_SERVER_Handle *GST_server;
 102
 103 /**
 104  * Our private key.
 105  */
 106 struct GNUNET_CRYPTO_EddsaPrivateKey *GST_my_private_key;
 107
 108 /**
 109  * ATS handle.
 110  */
 111 struct GNUNET_ATS_SchedulingHandle *GST_ats;
 112
 113 /**
 114  * Hello address expiration
 115  */
 116 struct GNUNET_TIME_Relative hello_expiration;
 117
 118 /**
 119  * DEBUGGING connection counter
 120  */
 121 static int connections;
 122
 123 /**
 124  * Head of DLL of asynchronous tasks to kill sessions.
 125  */
 126 static struct SessionKiller *sk_head;
 127
 128 /**
 129  * Tail of DLL of asynchronous tasks to kill sessions.
 130  */
 131 static struct SessionKiller *sk_tail;
 132
 133
 134 /**
 135  * Transmit our HELLO message to the given (connected) neighbour.
 136  *
 137  * @param cls the 'HELLO' message
 138  * @param target a connected neighbour
 139  * @param address the address
 140  * @param bandwidth_in inbound quota in NBO
 141  * @param bandwidth_out outbound quota in NBO
 142  */
 143 static void
 144 transmit_our_hello (void *cls, const struct GNUNET_PeerIdentity *target,
 145                     const struct GNUNET_HELLO_Address *address,
 146                     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
 147                     struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out)
 148 {
 149   const struct GNUNET_MessageHeader *hello = cls;
 150
 151   GST_neighbours_send (target, (const char *) hello, ntohs (hello->size),
 152                        hello_expiration, NULL, NULL);
 153 }
 154
 155
 156 /**
 157  * My HELLO has changed. Tell everyone who should know.
 158  *
 159  * @param cls unused
 160  * @param hello new HELLO
 161  */
 162 static void
 163 process_hello_update (void *cls, const struct GNUNET_MessageHeader *hello)
 164 {
 165   GST_clients_broadcast (hello, GNUNET_NO);
 166   GST_neighbours_iterate (&transmit_our_hello, (void *) hello);
 167 }
 168
 169
 170 /**
 171  * We received some payload.  Prepare to pass it on to our clients.
 172  *
 173  * @param peer (claimed) identity of the other peer
 174  * @param address the address
 175  * @param session session used
 176  * @param message the message to process
 177  * @return how long the plugin should wait until receiving more data
 178  */
 179 static struct GNUNET_TIME_Relative
 180 process_payload (const struct GNUNET_PeerIdentity *peer,
 181                  const struct GNUNET_HELLO_Address *address,
 182                  struct Session *session,
 183                  const struct GNUNET_MessageHeader *message)
 184 {
 185   struct GNUNET_TIME_Relative ret;
 186   int do_forward;
 187   struct InboundMessage *im;
 188   size_t msg_size = ntohs (message->size);
 189   size_t size =
 190       sizeof (struct InboundMessage) + msg_size;
 191   char buf[size] GNUNET_ALIGN;
 192
 193   do_forward = GNUNET_SYSERR;
 194   ret = GST_neighbours_calculate_receive_delay (peer, msg_size, &do_forward);
 195   if (! GST_neighbours_test_connected (peer))
 196   {
 197     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 198                 "Discarded %u bytes type %u payload from peer `%s'\n",
 199                 msg_size,
 200                 ntohs (message->type), GNUNET_i2s (peer));
 201     GNUNET_STATISTICS_update (GST_stats,
 202                               gettext_noop
 203                               ("# bytes payload discarded due to not connected peer"),
 204                               msg_size, GNUNET_NO);
 205     return ret;
 206   }
 207
 208   GST_ats_add_address (address, session, NULL, 0);
 209
 210   if (GNUNET_YES != do_forward)
 211     return ret;
 212   im = (struct InboundMessage *) buf;
 213   im->header.size = htons (size);
 214   im->header.type = htons (GNUNET_MESSAGE_TYPE_TRANSPORT_RECV);
 215   im->peer = *peer;
 216   memcpy (&im[1], message, ntohs (message->size));
 217   GST_clients_broadcast (&im->header, GNUNET_YES);
 218   return ret;
 219 }
 220
 221
 222 /**
 223  * Task to asynchronously terminate a session.
 224  *
 225  * @param cls the `struct SessionKiller` with the information for the kill
 226  * @param tc scheduler context
 227  */
 228 static void
 229 kill_session_task (void *cls,
 230                    const struct GNUNET_SCHEDULER_TaskContext *tc)
 231 {
 232   struct SessionKiller *sk = cls;
 233
 234   sk->task = GNUNET_SCHEDULER_NO_TASK;
 235   GNUNET_CONTAINER_DLL_remove (sk_head, sk_tail, sk);
 236   sk->plugin->disconnect_session (sk->plugin->cls,
 237                                   sk->session);
 238   GNUNET_free (sk);
 239 }
 240
 241
 242 /**
 243  * Force plugin to terminate session due to communication
 244  * issue.
 245  *
 246  * @param plugin_name name of the plugin
 247  * @param session session to termiante
 248  */
 249 static void
 250 kill_session (const char *plugin_name,
 251               struct Session *session)
 252 {
 253   struct GNUNET_TRANSPORT_PluginFunctions *plugin;
 254   struct SessionKiller *sk;
 255
 256   for (sk = sk_head; NULL != sk; sk = sk->next)
 257     if (sk->session == session)
 258       return;
 259   plugin = GST_plugins_find (plugin_name);
 260   if (NULL == plugin)
 261   {
 262     GNUNET_break (0);
 263     return;
 264   }
 265   /* need to issue disconnect asynchronously */
 266   sk = GNUNET_new (struct SessionKiller);
 267   sk->session = session;
 268   sk->plugin = plugin;
 269   sk->task = GNUNET_SCHEDULER_add_now (&kill_session_task,
 270                                        sk);
 271   GNUNET_CONTAINER_DLL_insert (sk_head, sk_tail, sk);
 272 }
 273
 274
 275 /**
 276  * Function called by the transport for each received message.
 277  *
 278  * @param cls closure, const char* with the name of the plugin we received the message from
 279  * @param peer (claimed) identity of the other peer
 280  * @param message the message, NULL if we only care about
 281  *                learning about the delay until we should receive again
 282  * @param session identifier used for this session (NULL for plugins
 283  *                that do not offer bi-directional communication to the sender
 284  *                using the same "connection")
 285  * @param sender_address binary address of the sender (if we established the
 286  *                connection or are otherwise sure of it; should be NULL
 287  *                for inbound TCP/UDP connections since it it not clear
 288  *                that we could establish ourselves a connection to that
 289  *                IP address and get the same system)
 290  * @param sender_address_len number of bytes in @a sender_address
 291  * @return how long the plugin should wait until receiving more data
 292  *         (plugins that do not support this, can ignore the return value)
 293  */
 294 struct GNUNET_TIME_Relative
 295 GST_receive_callback (void *cls,
 296                       const struct GNUNET_PeerIdentity *peer,
 297                       const struct GNUNET_MessageHeader *message,
 298                       struct Session *session,
 299                       const char *sender_address,
 300                       uint16_t sender_address_len)
 301 {
 302   const char *plugin_name = cls;
 303   struct GNUNET_TIME_Relative ret;
 304   struct GNUNET_HELLO_Address address;
 305   uint16_t type;
 306
 307   address.peer = *peer;
 308   address.address = sender_address;
 309   address.address_length = sender_address_len;
 310   address.transport_name = plugin_name;
 311   ret = GNUNET_TIME_UNIT_ZERO;
 312   if (NULL == message)
 313     goto end;
 314   type = ntohs (message->type);
 315   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 316               "Received Message with type %u from peer `%s'\n",
 317               type,
 318               GNUNET_i2s (peer));
 319
 320   GNUNET_STATISTICS_update (GST_stats,
 321                             gettext_noop
 322                             ("# bytes total received"),
 323                             ntohs (message->size), GNUNET_NO);
 324   GST_neighbours_notify_data_recv (peer, &address, session, message);
 325
 326   switch (type)
 327   {
 328   case GNUNET_MESSAGE_TYPE_HELLO_LEGACY:
 329     /* Legacy HELLO message, discard  */
 330     return ret;
 331   case GNUNET_MESSAGE_TYPE_HELLO:
 332     if (GNUNET_OK !=
 333         GST_validation_handle_hello (message))
 334     {
 335       GNUNET_break_op (0);
 336       kill_session (plugin_name, session);
 337     }
 338     return ret;
 339   case GNUNET_MESSAGE_TYPE_TRANSPORT_PING:
 340     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
 341                 "Processing `%s' from `%s'\n", "PING",
 342                 (sender_address !=
 343                  NULL) ? GST_plugins_a2s (&address) : TRANSPORT_SESSION_INBOUND_STRING);
 344     if (GNUNET_OK !=
 345         GST_validation_handle_ping (peer, message, &address, session))
 346       kill_session (plugin_name, session);
 347     break;
 348   case GNUNET_MESSAGE_TYPE_TRANSPORT_PONG:
 349     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
 350                 "Processing `%s' from `%s'\n", "PONG",
 351                 (sender_address !=
 352                  NULL) ? GST_plugins_a2s (&address) : TRANSPORT_SESSION_INBOUND_STRING);
 353     if (GNUNET_OK !=
 354         GST_validation_handle_pong (peer, message))
 355     {
 356       GNUNET_break_op (0);
 357       kill_session (plugin_name, session);
 358     }
 359     break;
 360   case GNUNET_MESSAGE_TYPE_TRANSPORT_SESSION_CONNECT:
 361     if (GNUNET_OK !=
 362         GST_neighbours_handle_connect (message, peer, &address, session))
 363     {
 364       GNUNET_break_op (0);
 365       kill_session (plugin_name, session);
 366     }
 367     break;
 368   case GNUNET_MESSAGE_TYPE_TRANSPORT_SESSION_CONNECT_ACK:
 369     if (GNUNET_OK !=
 370         GST_neighbours_handle_connect_ack (message, peer, &address, session))
 371     {
 372       kill_session (plugin_name, session);
 373     }
 374     break;
 375   case GNUNET_MESSAGE_TYPE_TRANSPORT_SESSION_ACK:
 376     if (GNUNET_OK !=
 377         GST_neighbours_handle_session_ack (message, peer, &address, session))
 378     {
 379       GNUNET_break_op (0);
 380       kill_session (plugin_name, session);
 381     }
 382     break;
 383   case GNUNET_MESSAGE_TYPE_TRANSPORT_SESSION_DISCONNECT:
 384     GST_neighbours_handle_disconnect_message (peer, message);
 385     break;
 386   case GNUNET_MESSAGE_TYPE_TRANSPORT_SESSION_KEEPALIVE:
 387     GST_neighbours_keepalive (peer, message);
 388     break;
 389   case GNUNET_MESSAGE_TYPE_TRANSPORT_SESSION_KEEPALIVE_RESPONSE:
 390     GST_neighbours_keepalive_response (peer, message);
 391     break;
 392   default:
 393     /* should be payload */
 394     GNUNET_STATISTICS_update (GST_stats,
 395                               gettext_noop
 396                               ("# bytes payload received"),
 397                               ntohs (message->size), GNUNET_NO);
 398     GST_neighbours_notify_payload_recv (peer, &address, session, message);
 399     ret = process_payload (peer, &address, session, message);
 400     break;
 401   }
 402 end:
 403   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 404               "Allowing receive from peer %s to continue in %s\n",
 405               GNUNET_i2s (peer),
 406               GNUNET_STRINGS_relative_time_to_string (ret, GNUNET_YES));
 407   return ret;
 408 }
 409
 410
 411 /**
 412  * Function that will be called for each address the transport
 413  * is aware that it might be reachable under.  Update our HELLO.
 414  *
 415  * @param cls name of the plugin (const char*)
 416  * @param add_remove should the address added (YES) or removed (NO) from the
 417  *                   set of valid addresses?
 418  * @param addr one of the addresses of the host
 419  *        the specific address format depends on the transport
 420  * @param addrlen length of the @a addr
 421  * @param dest_plugin destination plugin to use this address with
 422  */
 423 static void
 424 plugin_env_address_change_notification (void *cls, int add_remove,
 425                                         const void *addr, size_t addrlen,
 426                                         const char *dest_plugin)
 427 {
 428   struct GNUNET_HELLO_Address address;
 429
 430   address.peer = GST_my_identity;
 431   address.transport_name = dest_plugin;
 432   address.address = addr;
 433   address.address_length = addrlen;
 434   GST_hello_modify_addresses (add_remove, &address);
 435 }
 436
 437
 438 /**
 439  * Function that will be called whenever the plugin internally
 440  * cleans up a session pointer and hence the service needs to
 441  * discard all of those sessions as well.  Plugins that do not
 442  * use sessions can simply omit calling this function and always
 443  * use NULL wherever a session pointer is needed.  This function
 444  * should be called BEFORE a potential "TransmitContinuation"
 445  * from the "TransmitFunction".
 446  *
 447  * @param cls closure
 448  * @param peer which peer was the session for
 449  * @param session which session is being destoyed
 450  */
 451 static void
 452 plugin_env_session_end (void *cls, const struct GNUNET_PeerIdentity *peer,
 453                         struct Session *session)
 454 {
 455   const char *transport_name = cls;
 456   struct GNUNET_HELLO_Address address;
 457   struct SessionKiller *sk;
 458
 459   GNUNET_assert (strlen (transport_name) > 0);
 460   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 461               "Session %p to peer `%s' ended \n",
 462               session,
 463               GNUNET_i2s (peer));
 464   if (NULL != session)
 465     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG | GNUNET_ERROR_TYPE_BULK,
 466                      "transport-ats",
 467                      "Telling ATS to destroy session %p from peer %s\n",
 468                      session, GNUNET_i2s (peer));
 469   address.peer = *peer;
 470   address.address = NULL;
 471   address.address_length = 0;
 472   address.transport_name = transport_name;
 473   GST_neighbours_session_terminated (peer, session);
 474
 475   /* Tell ATS that session has ended */
 476   GNUNET_ATS_address_destroyed (GST_ats, &address, session);
 477   for (sk = sk_head; NULL != sk; sk = sk->next)
 478   {
 479     if (sk->session == session)
 480     {
 481       GNUNET_CONTAINER_DLL_remove (sk_head, sk_tail, sk);
 482       GNUNET_SCHEDULER_cancel (sk->task);
 483       GNUNET_free (sk);
 484       break;
 485     }
 486   }
 487 }
 488
 489
 490 /**
 491  * Function that will be called to figure if an address is an loopback,
 492  * LAN, WAN etc. address
 493  *
 494  * @param cls closure
 495  * @param addr binary address
 496  * @param addrlen length of the address
 497  * @return ATS Information containing the network type
 498  */
 499 static struct GNUNET_ATS_Information
 500 plugin_env_address_to_type (void *cls,
 501                             const struct sockaddr *addr,
 502                             size_t addrlen)
 503 {
 504   struct GNUNET_ATS_Information ats;
 505
 506   ats.type = htonl (GNUNET_ATS_NETWORK_TYPE);
 507   ats.value = htonl (GNUNET_ATS_NET_UNSPECIFIED);
 508   if (NULL == GST_ats)
 509   {
 510     GNUNET_break (0);
 511     return ats;
 512   }
 513   if (((addr->sa_family != AF_INET) && (addrlen != sizeof (struct sockaddr_in))) &&
 514       ((addr->sa_family != AF_INET6) && (addrlen != sizeof (struct sockaddr_in6))) &&
 515       (addr->sa_family != AF_UNIX))
 516   {
 517     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
 518                 "Malformed address with length %u `%s'\n",
 519                 addrlen,
 520                 GNUNET_a2s (addr, addrlen));
 521     GNUNET_break (0);
 522     return ats;
 523   }
 524   return GNUNET_ATS_address_get_type (GST_ats, addr, addrlen);
 525 }
 526
 527
 528 /**
 529  * Notify ATS about the new address including the network this address is
 530  * located in.
 531  *
 532  * @param address the address
 533  * @param session the session
 534  * @param ats ats information
 535  * @param ats_count number of @a ats information
 536  */
 537 void
 538 GST_ats_add_address (const struct GNUNET_HELLO_Address *address,
 539                      struct Session *session,
 540                      const struct GNUNET_ATS_Information *ats,
 541                      uint32_t ats_count)
 542 {
 543   struct GNUNET_TRANSPORT_PluginFunctions *papi;
 544   struct GNUNET_ATS_Information ats2[ats_count + 1];
 545   uint32_t net;
 546
 547   /* valid new address, let ATS know! */
 548   if (NULL == address->transport_name)
 549   {
 550     GNUNET_break (0);
 551     return;
 552   }
 553   if (NULL == (papi = GST_plugins_find (address->transport_name)))
 554   {
 555     /* we don't have the plugin for this address */
 556     GNUNET_break (0);
 557     return;
 558   }
 559
 560   if (GNUNET_YES == GNUNET_ATS_session_known (GST_ats, address, session))
 561     return;
 562
 563   net = papi->get_network (NULL, session);
 564   if (GNUNET_ATS_NET_UNSPECIFIED == net)
 565   {
 566     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
 567                 _("Could not obtain a valid network for `%s' %s (%s)\n"),
 568                 GNUNET_i2s (&address->peer),
 569                 GST_plugins_a2s (address),
 570                 address->transport_name);
 571     GNUNET_break (0);
 572   }
 573   ats2[0].type = htonl (GNUNET_ATS_NETWORK_TYPE);
 574   ats2[0].value = htonl(net);
 575   memcpy (&ats2[1], ats, sizeof (struct GNUNET_ATS_Information) * ats_count);
 576   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 577               "Notifying ATS about peer `%s''s new address `%s' session %p in network %s\n",
 578               GNUNET_i2s (&address->peer),
 579               (0 == address->address_length) ? "<inbound>" : GST_plugins_a2s (address),
 580               session,
 581               GNUNET_ATS_print_network_type(net));
 582   GNUNET_ATS_address_add (GST_ats,
 583                           address, session,
 584                           ats2, ats_count + 1);
 585 }
 586
 587
 588 /**
 589  * Notify ATS about property changes to an address
 590  *
 591  * @param peer the peer
 592  * @param address the address
 593  * @param session the session
 594  * @param ats performance information
 595  * @param ats_count number of elements in @a ats
 596  */
 597 void
 598 GST_ats_update_metrics (const struct GNUNET_PeerIdentity *peer,
 599                         const struct GNUNET_HELLO_Address *address,
 600                         struct Session *session,
 601                         const struct GNUNET_ATS_Information *ats,
 602                         uint32_t ats_count)
 603 {
 604   struct GNUNET_ATS_Information *ats_new;
 605
 606   if (GNUNET_NO == GNUNET_ATS_session_known (GST_ats, address, session))
 607     return;
 608
 609   /* Call to manipulation to manipulate ATS information */
 610   ats_new = GST_manipulation_manipulate_metrics (peer, address, session, ats,
 611                                                  ats_count);
 612   if (NULL == ats_new)
 613   {
 614     GNUNET_break(0);
 615     return;
 616   }
 617   if (GNUNET_NO == GNUNET_ATS_address_update (GST_ats,
 618       address, session, ats_new, ats_count))
 619   {
 620     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
 621                 _("Address or session unknown: failed to update properties for peer `%s' plugin `%s' address `%s' session %p\n"),
 622                 GNUNET_i2s (peer),
 623                 address->transport_name,
 624                 GST_plugins_a2s (address),
 625                 session);
 626   }
 627   GNUNET_free (ats_new);
 628 }
 629
 630
 631 /**
 632  * Function that will be called to figure if an address is an loopback,
 633  * LAN, WAN etc. address
 634  *
 635  * @param cls closure
 636  * @param peer the peer
 637  * @param address binary address
 638  * @param address_len length of the @a address
 639  * @param session the session
 640  * @param ats the ats information to update
 641  * @param ats_count the number of @a ats elements
 642  */
 643 static void
 644 plugin_env_update_metrics (void *cls,
 645                            const struct GNUNET_PeerIdentity *peer,
 646                            const void *address,
 647                            uint16_t address_len,
 648                            struct Session *session,
 649                            const struct GNUNET_ATS_Information *ats,
 650                            uint32_t ats_count)
 651 {
 652   const char *plugin_name = cls;
 653   struct GNUNET_HELLO_Address haddress;
 654
 655   if ((NULL == ats) || (0 == ats_count))
 656     return;
 657   GNUNET_assert (NULL != GST_ats);
 658
 659   haddress.peer = *peer;
 660   haddress.address = address;
 661   haddress.address_length = address_len;
 662   haddress.transport_name = plugin_name;
 663
 664   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 665               "Updating metrics for peer `%s' address %s session %p\n",
 666               GNUNET_i2s (peer),
 667               GST_plugins_a2s (&haddress),
 668               session);
 669   GST_ats_update_metrics (peer, &haddress, session, ats, ats_count);
 670 }
 671
 672
 673 /**
 674  * Plugin tells transport service about a new (inbound) session
 675  *
 676  * @param cls unused
 677  * @param peer the peer
 678  * @param plugin plugin name
 679  * @param address address
 680  * @param address_len @a address length
 681  * @param session the new session
 682  * @param ats ats information
 683  * @param ats_count number of @a ats information
 684  */
 685 static void
 686 plugin_env_session_start (void *cls,
 687                           const struct GNUNET_PeerIdentity *peer,
 688                           const char *plugin,
 689                           const void *address, uint16_t address_len,
 690                           struct Session *session,
 691                           const struct GNUNET_ATS_Information *ats,
 692                           uint32_t ats_count)
 693 {
 694   struct GNUNET_HELLO_Address *addr;
 695
 696   if (NULL == peer)
 697   {
 698     GNUNET_break(0);
 699     return;
 700   }
 701   if (NULL == plugin)
 702   {
 703     GNUNET_break(0);
 704     return;
 705   }
 706   if (NULL == session)
 707   {
 708     GNUNET_break(0);
 709     return;
 710   }
 711
 712   addr = GNUNET_HELLO_address_allocate (peer, plugin, address, address_len);
 713   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 714               "Notification from plugin `%s' about new session %p from peer `%s' address `%s'\n",
 715               plugin,
 716               session,
 717               GNUNET_i2s (peer),
 718               GST_plugins_a2s (addr));
 719   GST_ats_add_address (addr, session, ats, ats_count);
 720   GNUNET_free(addr);
 721 }
 722
 723
 724 /**
 725  * Function called by ATS to notify the callee that the
 726  * assigned bandwidth or address for a given peer was changed.  If the
 727  * callback is called with address/bandwidth assignments of zero, the
 728  * ATS disconnect function will still be called once the disconnect
 729  * actually happened.
 730  *
 731  * @param cls closure
 732  * @param address address to use (for peer given in address)
 733  * @param session session to use (if available)
 734  * @param bandwidth_out assigned outbound bandwidth for the connection in NBO,
 735  *      0 to disconnect from peer
 736  * @param bandwidth_in assigned inbound bandwidth for the connection in NBO,
 737  *      0 to disconnect from peer
 738  * @param ats ATS information
 739  * @param ats_count number of @a ats elements
 740  */
 741 static void
 742 ats_request_address_change (void *cls,
 743                             const struct GNUNET_HELLO_Address *address,
 744                             struct Session *session,
 745                             struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out,
 746                             struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
 747                             const struct GNUNET_ATS_Information *ats,
 748                             uint32_t ats_count)
 749 {
 750   uint32_t bw_in = ntohl (bandwidth_in.value__);
 751   uint32_t bw_out = ntohl (bandwidth_out.value__);
 752
 753   /* ATS tells me to disconnect from peer */
 754   if ((bw_in == 0) && (bw_out == 0))
 755   {
 756     GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 757                 "ATS tells me to disconnect from peer `%s'\n",
 758                 GNUNET_i2s (&address->peer));
 759     GST_neighbours_force_disconnect (&address->peer);
 760     return;
 761   }
 762   GST_neighbours_switch_to_address (&address->peer, address, session, ats,
 763                                     ats_count, bandwidth_in,
 764                                     bandwidth_out);
 765 }
 766
 767
 768 /**
 769  * Function called to notify transport users that another
 770  * peer connected to us.
 771  *
 772  * @param cls closure
 773  * @param peer the peer that connected
 774  * @param bandwidth_in inbound bandwidth in NBO
 775  * @param bandwidth_out outbound bandwidth in NBO
 776  */
 777 static void
 778 neighbours_connect_notification (void *cls,
 779                                  const struct GNUNET_PeerIdentity *peer,
 780                                  struct GNUNET_BANDWIDTH_Value32NBO bandwidth_in,
 781                                  struct GNUNET_BANDWIDTH_Value32NBO bandwidth_out)
 782 {
 783   size_t len = sizeof (struct ConnectInfoMessage);
 784   char buf[len] GNUNET_ALIGN;
 785   struct ConnectInfoMessage *connect_msg = (struct ConnectInfoMessage *) buf;
 786
 787   connections++;
 788   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 789               "We are now connected to peer `%s' and %u peers in total\n",
 790               GNUNET_i2s (peer), connections);
 791   connect_msg->header.size = htons (sizeof (buf));
 792   connect_msg->header.type = htons (GNUNET_MESSAGE_TYPE_TRANSPORT_CONNECT);
 793   connect_msg->id = *peer;
 794   connect_msg->quota_in = bandwidth_in;
 795   connect_msg->quota_out = bandwidth_out;
 796   GST_clients_broadcast (&connect_msg->header, GNUNET_NO);
 797 }
 798
 799
 800 /**
 801  * Function called to notify transport users that another
 802  * peer disconnected from us.
 803  *
 804  * @param cls closure
 805  * @param peer the peer that disconnected
 806  */
 807 static void
 808 neighbours_disconnect_notification (void *cls,
 809                                     const struct GNUNET_PeerIdentity *peer)
 810 {
 811   struct DisconnectInfoMessage disconnect_msg;
 812
 813   connections--;
 814   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 815               "Peer `%s' disconnected and we are connected to %u peers\n",
 816               GNUNET_i2s (peer), connections);
 817
 818   GST_manipulation_peer_disconnect (peer);
 819   disconnect_msg.header.size = htons (sizeof (struct DisconnectInfoMessage));
 820   disconnect_msg.header.type = htons (GNUNET_MESSAGE_TYPE_TRANSPORT_DISCONNECT);
 821   disconnect_msg.reserved = htonl (0);
 822   disconnect_msg.peer = *peer;
 823   GST_clients_broadcast (&disconnect_msg.header, GNUNET_NO);
 824 }
 825
 826
 827 /**
 828  * Function called to notify transport users that a neighbour peer changed its
 829  * active address.
 830  *
 831  * @param cls closure
 832  * @param peer peer this update is about (never NULL)
 833  * @param address address, NULL on disconnect
 834  */
 835 static void
 836 neighbours_address_notification (void *cls,
 837                                  const struct GNUNET_PeerIdentity *peer,
 838                                  const struct GNUNET_HELLO_Address *address)
 839 {
 840   GST_clients_broadcast_address_notification (peer, address);
 841 }
 842
 843
 844 /**
 845  * Function called when the service shuts down.  Unloads our plugins
 846  * and cancels pending validations.
 847  *
 848  * @param cls closure, unused
 849  * @param tc task context (unused)
 850  */
 851 static void
 852 shutdown_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
 853 {
 854   GST_neighbours_stop ();
 855   GST_validation_stop ();
 856   GST_plugins_unload ();
 857
 858   GNUNET_ATS_scheduling_done (GST_ats);
 859   GST_ats = NULL;
 860   GST_clients_stop ();
 861   GST_blacklist_stop ();
 862   GST_hello_stop ();
 863   GST_manipulation_stop ();
 864
 865   if (NULL != GST_peerinfo)
 866   {
 867     GNUNET_PEERINFO_disconnect (GST_peerinfo);
 868     GST_peerinfo = NULL;
 869   }
 870   if (NULL != GST_stats)
 871   {
 872     GNUNET_STATISTICS_destroy (GST_stats, GNUNET_NO);
 873     GST_stats = NULL;
 874   }
 875   if (NULL != GST_my_private_key)
 876   {
 877     GNUNET_free (GST_my_private_key);
 878     GST_my_private_key = NULL;
 879   }
 880   GST_server = NULL;
 881 }
 882
 883
 884 /**
 885  * Initiate transport service.
 886  *
 887  * @param cls closure
 888  * @param server the initialized server
 889  * @param c configuration to use
 890  */
 891 static void
 892 run (void *cls, struct GNUNET_SERVER_Handle *server,
 893      const struct GNUNET_CONFIGURATION_Handle *c)
 894 {
 895   char *keyfile;
 896   struct GNUNET_CRYPTO_EddsaPrivateKey *pk;
 897   long long unsigned int max_fd_cfg;
 898   int max_fd_rlimit;
 899   int max_fd;
 900   int friend_only;
 901
 902   /* setup globals */
 903   GST_cfg = c;
 904   if (GNUNET_OK !=
 905       GNUNET_CONFIGURATION_get_value_filename (c, "PEER", "PRIVATE_KEY",
 906                                                &keyfile))
 907   {
 908     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
 909                 _("Transport service is lacking key configuration settings. Exiting.\n"));
 910     GNUNET_SCHEDULER_shutdown ();
 911     return;
 912   }
 913   if (GNUNET_OK !=
 914       GNUNET_CONFIGURATION_get_value_time (c, "transport", "HELLO_EXPIRATION",
 915                                            &hello_expiration))
 916   {
 917     hello_expiration = GNUNET_CONSTANTS_HELLO_ADDRESS_EXPIRATION;
 918   }
 919   GST_server = server;
 920   pk = GNUNET_CRYPTO_eddsa_key_create_from_file (keyfile);
 921   GNUNET_free (keyfile);
 922   GNUNET_assert (NULL != pk);
 923   GST_my_private_key = pk;
 924
 925   GST_stats = GNUNET_STATISTICS_create ("transport", GST_cfg);
 926   GST_peerinfo = GNUNET_PEERINFO_connect (GST_cfg);
 927   GNUNET_CRYPTO_eddsa_key_get_public (GST_my_private_key,
 928                                                   &GST_my_identity.public_key);
 929   GNUNET_assert (NULL != GST_my_private_key);
 930
 931   GNUNET_log (GNUNET_ERROR_TYPE_INFO,
 932               "My identity is `%4s'\n", GNUNET_i2s (&GST_my_identity));
 933
 934   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_FOREVER_REL, &shutdown_task,
 935                                 NULL);
 936   if (NULL == GST_peerinfo)
 937   {
 938     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
 939                 _("Could not access PEERINFO service.  Exiting.\n"));
 940     GNUNET_SCHEDULER_shutdown ();
 941     return;
 942   }
 943
 944   max_fd_rlimit = 0;
 945   max_fd_cfg = 0;
 946 #if HAVE_GETRLIMIT
 947   struct rlimit r_file;
 948   if (0 == getrlimit (RLIMIT_NOFILE, &r_file))
 949   {
 950     max_fd_rlimit = r_file.rlim_cur;
 951     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 952                 "Maximum number of open files was: %u/%u\n",
 953                 r_file.rlim_cur,
 954                 r_file.rlim_max);
 955   }
 956   max_fd_rlimit = (9 * max_fd_rlimit) / 10; /* Keep 10% for rest of transport */
 957 #endif
 958   GNUNET_CONFIGURATION_get_value_number (GST_cfg, "transport", "MAX_FD", &max_fd_cfg);
 959
 960   if (max_fd_cfg > max_fd_rlimit)
 961         max_fd = max_fd_cfg;
 962   else
 963         max_fd = max_fd_rlimit;
 964   if (max_fd < DEFAULT_MAX_FDS)
 965         max_fd = DEFAULT_MAX_FDS;
 966
 967   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
 968               "Limiting number of sockets to %u: validation %u, neighbors: %u\n",
 969               max_fd, (max_fd / 3) , (max_fd / 3) * 2);
 970
 971   friend_only = GNUNET_CONFIGURATION_get_value_yesno(GST_cfg, "topology","FRIENDS-ONLY");
 972   if (GNUNET_SYSERR == friend_only)
 973         friend_only = GNUNET_NO; /* According to topology defaults */
 974   /* start subsystems */
 975   GST_hello_start (friend_only, &process_hello_update, NULL);
 976   GNUNET_assert (NULL != GST_hello_get());
 977   GST_blacklist_start (GST_server, GST_cfg, &GST_my_identity);
 978   GST_ats =
 979       GNUNET_ATS_scheduling_init (GST_cfg, &ats_request_address_change, NULL);
 980   GST_manipulation_init (GST_cfg);
 981   GST_plugins_load (&GST_manipulation_recv,
 982                     &plugin_env_address_change_notification,
 983                     &plugin_env_session_start,
 984                     &plugin_env_session_end,
 985                     &plugin_env_address_to_type,
 986                     &plugin_env_update_metrics);
 987   GST_neighbours_start (NULL,
 988                         &neighbours_connect_notification,
 989                         &neighbours_disconnect_notification,
 990                         &neighbours_address_notification,
 991                         (max_fd / 3) * 2);
 992   GST_clients_start (GST_server);
 993   GST_validation_start ((max_fd / 3));
 994 }
 995
 996
 997 /**
 998  * The main function for the transport service.
 999  *
1000  * @param argc number of arguments from the command line
1001  * @param argv command line arguments
1002  * @return 0 ok, 1 on error
1003  */
1004 int
1005 main (int argc, char *const *argv)
1006 {
1007   return (GNUNET_OK ==
1008           GNUNET_SERVICE_run (argc, argv, "transport",
1009                               GNUNET_SERVICE_OPTION_NONE, &run, NULL)) ? 0 : 1;
1010 }
1011
1012 /* end of file gnunet-service-transport.c */