src/transport/plugin_transport_http.c

   1 /*
   2      This file is part of GNUnet
   3      (C) 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009 Christian Grothoff (and other contributing authors)
   4
   5      GNUnet is free software; you can redistribute it and/or modify
   6      it under the terms of the GNU General Public License as published
   7      by the Free Software Foundation; either version 3, or (at your
   8      option) any later version.
   9
  10      GNUnet is distributed in the hope that it will be useful, but
  11      WITHOUT ANY WARRANTY; without even the implied warranty of
  12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13      General Public License for more details.
  14
  15      You should have received a copy of the GNU General Public License
  16      along with GNUnet; see the file COPYING.  If not, write to the
  17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18      Boston, MA 02111-1307, USA.
  19 */
  20
  21 /**
  22  * @file transport/plugin_transport_http.c
  23  * @brief http transport service plugin
  24  * @author Matthias Wachs
  25  */
  26
  27 #include "plugin_transport_http.h"
  28
  29 /**
  30  * After how long do we expire an address that we
  31  * learned from another peer if it is not reconfirmed
  32  * by anyone?
  33  */
  34 #define LEARNED_ADDRESS_EXPIRATION GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_HOURS, 6)
  35
  36 /**
  37  * Wrapper to manage IPv4 addresses
  38  */
  39 struct IPv4HttpAddressWrapper
  40 {
  41   /**
  42    * Linked list next
  43    */
  44   struct IPv4HttpAddressWrapper *next;
  45
  46   /**
  47    * Linked list previous
  48    */
  49   struct IPv4HttpAddressWrapper *prev;
  50
  51   struct sockaddr_in addr;
  52 };
  53
  54 /**
  55  * Wrapper for IPv4 addresses.
  56  */
  57 struct IPv6HttpAddressWrapper
  58 {
  59   /**
  60    * Linked list next
  61    */
  62   struct IPv6HttpAddressWrapper *next;
  63
  64   /**
  65    * Linked list previous
  66    */
  67   struct IPv6HttpAddressWrapper *prev;
  68
  69   /**
  70    * IPv6 address.
  71    */
  72   struct sockaddr_in6 addr GNUNET_PACKED;
  73 };
  74
  75
  76 /**
  77  * Context for address to string conversion.
  78  */
  79 struct PrettyPrinterContext
  80 {
  81   /**
  82    * Function to call with the result.
  83    */
  84   GNUNET_TRANSPORT_AddressStringCallback asc;
  85
  86   /**
  87    * Plugin
  88    */
  89   struct Plugin *plugin;
  90
  91   /**
  92    * Clsoure for 'asc'.
  93    */
  94   void *asc_cls;
  95
  96   /**
  97    * Port to add after the IP address.
  98    */
  99   uint16_t port;
 100 };
 101
 102
 103 /**
 104  * Encapsulation of all of the state of the plugin.
 105  */
 106 struct Plugin;
 107
 108
 109
 110 /**
 111  * Append our port and forward the result.
 112  *
 113  * @param cls the 'struct PrettyPrinterContext*'
 114  * @param hostname hostname part of the address
 115  */
 116 static void
 117 append_port (void *cls, const char *hostname)
 118 {
 119   struct PrettyPrinterContext *ppc = cls;
 120   char *ret;
 121
 122   if (hostname == NULL)
 123   {
 124     ppc->asc (ppc->asc_cls, NULL);
 125     GNUNET_free (ppc);
 126     return;
 127   }
 128   GNUNET_asprintf (&ret, "%s://%s:%d", ppc->plugin->protocol, hostname,
 129                    ppc->plugin->port);
 130   ppc->asc (ppc->asc_cls, ret);
 131   GNUNET_free (ret);
 132 }
 133
 134
 135 /**
 136  * Convert the transports address to a nice, human-readable
 137  * format.
 138  *
 139  * @param cls closure
 140  * @param type name of the transport that generated the address
 141  * @param addr one of the addresses of the host, NULL for the last address
 142  *        the specific address format depends on the transport
 143  * @param addrlen length of the address
 144  * @param numeric should (IP) addresses be displayed in numeric form?
 145  * @param timeout after how long should we give up?
 146  * @param asc function to call on each string
 147  * @param asc_cls closure for asc
 148  */
 149 static void
 150 http_plugin_address_pretty_printer (void *cls, const char *type,
 151                                     const void *addr, size_t addrlen,
 152                                     int numeric,
 153                                     struct GNUNET_TIME_Relative timeout,
 154                                     GNUNET_TRANSPORT_AddressStringCallback asc,
 155                                     void *asc_cls)
 156 {
 157   GNUNET_assert (cls != NULL);
 158   struct PrettyPrinterContext *ppc;
 159   const void *sb;
 160   size_t sbs;
 161   uint16_t port = 0 ;
 162
 163   if (addrlen == sizeof (struct sockaddr_in6))
 164   {
 165     sb = addr;
 166     sbs = sizeof (struct sockaddr_in6);
 167
 168     port = ntohs (((struct sockaddr_in6 *)addr)->sin6_port);
 169   }
 170   else if (addrlen == sizeof (struct sockaddr_in))
 171   {
 172     sb = &addr;
 173     sbs = sizeof (struct sockaddr_in);
 174     port = ntohs (((struct sockaddr_in *)addr)->sin_port);
 175   }
 176   else
 177   {
 178     /* invalid address */
 179     GNUNET_break_op (0);
 180     asc (asc_cls, NULL);
 181     return;
 182   }
 183   ppc = GNUNET_malloc (sizeof (struct PrettyPrinterContext));
 184   ppc->asc = asc;
 185   ppc->asc_cls = asc_cls;
 186   ppc->port = port;
 187   ppc->plugin = cls;
 188   GNUNET_RESOLVER_hostname_get (sb, sbs, !numeric, timeout, &append_port, ppc);
 189 }
 190
 191
 192
 193 /**
 194  * Another peer has suggested an address for this
 195  * peer and transport plugin.  Check that this could be a valid
 196  * address.  If so, consider adding it to the list
 197  * of addresses.
 198  *
 199  * @param cls closure
 200  * @param addr pointer to the address
 201  * @param addrlen length of addr
 202  * @return GNUNET_OK if this is a plausible address for this peer
 203  *         and transport
 204  */
 205 static int
 206 http_plugin_address_suggested (void *cls, const void *addr, size_t addrlen)
 207 {
 208
 209   struct Plugin *plugin = cls;
 210   struct IPv4HttpAddressWrapper *w_tv4 = plugin->ipv4_addr_head;
 211   struct IPv6HttpAddressWrapper *w_tv6 = plugin->ipv6_addr_head;
 212
 213   GNUNET_assert (cls != NULL);
 214   if ((addrlen != sizeof (struct sockaddr_in)) ||
 215       (addrlen != sizeof (struct sockaddr_in6)))
 216     return GNUNET_SYSERR;
 217
 218   if (addrlen == sizeof (struct sockaddr_in))
 219   {
 220     while (w_tv4 != NULL)
 221     {
 222       if (0 == memcmp (&w_tv4->addr, addr, sizeof (struct sockaddr_in)))
 223         break;
 224       w_tv4 = w_tv4->next;
 225     }
 226     if (w_tv4 != NULL)
 227       return GNUNET_OK;
 228     else
 229       return GNUNET_SYSERR;
 230   }
 231   if (addrlen == sizeof (struct sockaddr_in6))
 232   {
 233     while (w_tv6 != NULL)
 234     {
 235       if (0 ==
 236           memcmp (&w_tv6->addr, addr,
 237                   sizeof (struct sockaddr_in6)))
 238         break;
 239       w_tv6 = w_tv6->next;
 240     }
 241     if (w_tv6 != NULL)
 242       return GNUNET_OK;
 243     else
 244       return GNUNET_SYSERR;
 245   }
 246   return GNUNET_OK;
 247 }
 248
 249 struct GNUNET_TIME_Relative
 250 http_plugin_receive (void *cls, const struct GNUNET_PeerIdentity * peer,
 251     const struct  GNUNET_MessageHeader * message,
 252     struct Session * session,
 253     const char *sender_address,
 254     uint16_t sender_address_len)
 255 {
 256   struct Session *s = cls;
 257   struct Plugin *plugin = s->plugin;
 258   struct GNUNET_TRANSPORT_ATS_Information distance[2];
 259   struct GNUNET_TIME_Relative delay;
 260
 261   distance[0].type = htonl (GNUNET_TRANSPORT_ATS_QUALITY_NET_DISTANCE);
 262   distance[0].value = htonl (1);
 263   distance[1].type = htonl (GNUNET_TRANSPORT_ATS_ARRAY_TERMINATOR);
 264   distance[1].value = htonl (0);
 265
 266   delay = plugin->env->receive (plugin->env->cls, &s->target, message, (const struct GNUNET_TRANSPORT_ATS_Information*) &distance, 2, s, s->addr, s->addrlen);
 267   return delay;
 268 }
 269
 270 /**
 271  * Function called for a quick conversion of the binary address to
 272  * a numeric address.  Note that the caller must not free the
 273  * address and that the next call to this function is allowed
 274  * to override the address again.
 275  *
 276  * @param cls closure
 277  * @param addr binary address
 278  * @param addrlen length of the address
 279  * @return string representing the same address
 280  */
 281 const char *
 282 http_plugin_address_to_string (void *cls, const void *addr, size_t addrlen)
 283 {
 284
 285   struct sockaddr_in *a4;
 286   struct sockaddr_in6 *a6;
 287   char *address;
 288   static char rbuf[INET6_ADDRSTRLEN + 13];
 289   uint16_t port;
 290   int res = 0;
 291
 292   if (addrlen == sizeof (struct sockaddr_in6))
 293   {
 294     a6 = (struct sockaddr_in6 *) addr;
 295     address = GNUNET_malloc (INET6_ADDRSTRLEN);
 296     inet_ntop (AF_INET6, &(a6->sin6_addr), address, INET6_ADDRSTRLEN);
 297     port = ntohs (a6->sin6_port);
 298   }
 299   else if (addrlen == sizeof (struct sockaddr_in))
 300   {
 301     a4 = (struct sockaddr_in *) addr;
 302     address = GNUNET_malloc (INET_ADDRSTRLEN);
 303     inet_ntop (AF_INET, &(a4->sin_addr), address, INET_ADDRSTRLEN);
 304     port = ntohs (a4->sin_port);
 305   }
 306   else
 307   {
 308     /* invalid address */
 309     return NULL;
 310   }
 311 #if !BUILD_HTTPS
 312   char * protocol = "http";
 313 #else
 314   char * protocol = "https";
 315 #endif
 316
 317   GNUNET_assert (strlen (address) + 7 < (INET6_ADDRSTRLEN + 13));
 318   if (addrlen == sizeof (struct sockaddr_in6))
 319     res = GNUNET_snprintf (rbuf, sizeof (rbuf), "%s://[%s]:%u/", protocol, address, port);
 320   else if (addrlen == sizeof (struct sockaddr_in))
 321     res = GNUNET_snprintf (rbuf, sizeof (rbuf), "%s://%s:%u/", protocol, address, port);
 322
 323   GNUNET_free (address);
 324   GNUNET_assert (res != 0);
 325   return rbuf;
 326 }
 327
 328 struct Session *
 329 lookup_session (struct Plugin *plugin, const struct GNUNET_PeerIdentity *target,
 330                 struct Session * session,
 331                 const void *addr, size_t addrlen, int force_address)
 332 {
 333   struct Session *s = NULL;
 334   struct Session *t = NULL;
 335   int e_peer;
 336   int e_addr;
 337
 338   t = plugin->head;
 339   if (t == NULL)
 340     return NULL;
 341   while (t != NULL)
 342   {
 343 #if 0
 344     GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 345                      "Comparing peer `%s' address `%s' len %i session %X to \n", GNUNET_i2s(target), GNUNET_a2s(addr,addrlen), addrlen, session);
 346     GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,"peer `%s' address `%s' len %i session %X \n\n", GNUNET_i2s(&t->target), GNUNET_a2s(t->addr,t->addrlen), t->addrlen, t);
 347     GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,"memcmp %i \n", memcmp (addr, t->addr, addrlen));
 348 #endif
 349     e_peer = GNUNET_NO;
 350     e_addr = GNUNET_NO;
 351
 352     if (0 == memcmp (target, &t->target, sizeof (struct GNUNET_PeerIdentity)))
 353     {
 354       e_peer = GNUNET_YES;
 355       if (addrlen == t->addrlen)
 356       {
 357         if (0 == memcmp (addr, t->addr, addrlen))
 358         {
 359           e_addr = GNUNET_YES;
 360         }
 361       }
 362       if ((t == session))
 363       {
 364        if(t->addrlen == session->addrlen)
 365        {
 366         if (0 == memcmp (session->addr, t->addr, t->addrlen))
 367         {
 368           e_addr = GNUNET_YES;
 369         }
 370        }
 371       }
 372     }
 373
 374     if ((e_peer == GNUNET_YES) && (force_address == GNUNET_NO))
 375     {
 376       s = t;
 377       break;
 378     }
 379     if ((e_peer == GNUNET_YES) && (force_address == GNUNET_YES) && (e_addr == GNUNET_YES))
 380     {
 381       s = t;
 382       break;
 383     }
 384     if ((e_peer == GNUNET_YES) && (force_address == GNUNET_SYSERR))
 385     {
 386       s = t;
 387       break;
 388     }
 389     if (s != NULL)
 390       break;
 391     t = t->next;
 392   }
 393
 394
 395   return s;
 396 }
 397
 398 void
 399 delete_session (struct Session *s)
 400 {
 401   if (s->msg_tk != NULL)
 402   {
 403     GNUNET_SERVER_mst_destroy (s->msg_tk);
 404     s->msg_tk = NULL;
 405   }
 406   GNUNET_free (s->addr);
 407   GNUNET_free_non_null(s->server_recv);
 408   GNUNET_free_non_null(s->server_send);
 409   GNUNET_free (s);
 410 }
 411
 412 struct Session *
 413 create_session (struct Plugin *plugin, const struct GNUNET_PeerIdentity *target,
 414                 const void *addr, size_t addrlen,
 415                 GNUNET_TRANSPORT_TransmitContinuation cont, void *cont_cls)
 416 {
 417   struct Session *s = NULL;
 418
 419   s = GNUNET_malloc (sizeof (struct Session));
 420   memcpy (&s->target, target, sizeof (struct GNUNET_PeerIdentity));
 421   s->plugin = plugin;
 422   s->addr = GNUNET_malloc (addrlen);
 423   memcpy (s->addr, addr, addrlen);
 424   s->addrlen = addrlen;
 425   s->next = NULL;
 426   s->next_receive = GNUNET_TIME_absolute_get_zero();
 427   return s;
 428 }
 429
 430 void
 431 notify_session_end (void *cls,
 432                     const struct GNUNET_PeerIdentity *
 433                     peer, struct Session * s)
 434 {
 435   struct Plugin *plugin = cls;
 436
 437   plugin->env->session_end (NULL, peer, s);
 438   GNUNET_CONTAINER_DLL_remove (plugin->head, plugin->tail, s);
 439   delete_session (s);
 440 }
 441
 442
 443 /**
 444  * Function that can be used by the transport service to transmit
 445  * a message using the plugin.   Note that in the case of a
 446  * peer disconnecting, the continuation MUST be called
 447  * prior to the disconnect notification itself.  This function
 448  * will be called with this peer's HELLO message to initiate
 449  * a fresh connection to another peer.
 450  *
 451  * @param cls closure
 452  * @param target who should receive this message
 453  * @param msgbuf the message to transmit
 454  * @param msgbuf_size number of bytes in 'msgbuf'
 455  * @param priority how important is the message (most plugins will
 456  *                 ignore message priority and just FIFO)
 457  * @param to how long to wait at most for the transmission (does not
 458  *                require plugins to discard the message after the timeout,
 459  *                just advisory for the desired delay; most plugins will ignore
 460  *                this as well)
 461  * @param session which session must be used (or NULL for "any")
 462  * @param addr the address to use (can be NULL if the plugin
 463  *                is "on its own" (i.e. re-use existing TCP connection))
 464  * @param addrlen length of the address in bytes
 465  * @param force_address GNUNET_YES if the plugin MUST use the given address,
 466  *                GNUNET_NO means the plugin may use any other address and
 467  *                GNUNET_SYSERR means that only reliable existing
 468  *                bi-directional connections should be used (regardless
 469  *                of address)
 470  * @param cont continuation to call once the message has
 471  *        been transmitted (or if the transport is ready
 472  *        for the next transmission call; or if the
 473  *        peer disconnected...); can be NULL
 474  * @param cont_cls closure for cont
 475  * @return number of bytes used (on the physical network, with overheads);
 476  *         -1 on hard errors (i.e. address invalid); 0 is a legal value
 477  *         and does NOT mean that the message was not transmitted (DV)
 478  */
 479 static ssize_t
 480 http_plugin_send (void *cls, const struct GNUNET_PeerIdentity *target,
 481                   const char *msgbuf, size_t msgbuf_size, unsigned int priority,
 482                   struct GNUNET_TIME_Relative to, struct Session *session,
 483                   const void *addr, size_t addrlen, int force_address,
 484                   GNUNET_TRANSPORT_TransmitContinuation cont, void *cont_cls)
 485 {
 486   struct Plugin *plugin = cls;
 487   struct HTTP_Message *msg;
 488   GNUNET_assert (plugin != NULL);
 489
 490   int res = GNUNET_SYSERR;
 491
 492 #if DEBUG_HTTP
 493   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 494                    "Sending %u bytes to peer `%s' on address `%s' %X %i\n", msgbuf_size,
 495                    GNUNET_i2s (target), ((addr != NULL) && (addrlen != 0)) ? http_plugin_address_to_string(plugin, addr, addrlen) : "<inbound>", session, force_address);
 496 #endif
 497
 498   struct Session *s = NULL;
 499
 500   /* look for existing connection */
 501   s = lookup_session (plugin, target, session, addr, addrlen, 1);
 502 #if DEBUG_HTTP
 503   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 504                    "%s existing session: %s\n", (s!=NULL) ? "Found" : "NOT Found", ((s != NULL) && (s->inbound == GNUNET_YES)) ? "inbound" : "outbound");
 505 #endif
 506
 507   /* create new outbound connection */
 508   if (s == NULL)
 509   {
 510     if (plugin->max_connections <= plugin->cur_connections)
 511     {
 512       GNUNET_log_from (GNUNET_ERROR_TYPE_WARNING, plugin->name,
 513                        "Maximum number of connections reached, "
 514                        "cannot connect to peer `%s'\n",
 515                        GNUNET_i2s (target));
 516       return res;
 517     }
 518
 519 #if DEBUG_HTTP
 520     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 521                      "Initiiating new connection to peer `%s'\n",
 522                      GNUNET_i2s (target));
 523 #endif
 524     s = create_session (plugin, target, addr, addrlen, cont, cont_cls);
 525     GNUNET_CONTAINER_DLL_insert (plugin->head, plugin->tail, s);
 526     // initiate new connection
 527     if (GNUNET_SYSERR == (res = client_connect (s)))
 528     {
 529       GNUNET_CONTAINER_DLL_remove (plugin->head, plugin->tail, s);
 530       delete_session (s);
 531       return GNUNET_SYSERR;
 532     }
 533   }
 534
 535   msg = GNUNET_malloc (sizeof (struct HTTP_Message) + msgbuf_size);
 536   msg->next = NULL;
 537   msg->size = msgbuf_size;
 538   msg->pos = 0;
 539   msg->buf = (char *) &msg[1];
 540   msg->transmit_cont = cont;
 541   msg->transmit_cont_cls = cont_cls;
 542   memcpy (msg->buf, msgbuf, msgbuf_size);
 543
 544   if (s->inbound == GNUNET_NO)
 545   {
 546 #if DEBUG_HTTP
 547     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 548                      "Using outbound client session to send to `%s'\n",
 549                      GNUNET_i2s (target));
 550 #endif
 551      client_send (s, msg);
 552      res = msgbuf_size;
 553   }
 554   if (s->inbound == GNUNET_YES)
 555   {
 556     server_send (s, msg);
 557     res = msgbuf_size;
 558 #if DEBUG_HTTP
 559     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 560                      "Using inbound server session to send to `%s'\n",
 561                      GNUNET_i2s (target));
 562 #endif
 563
 564   }
 565   return res;
 566 }
 567
 568
 569 /**
 570  * Function that can be used to force the plugin to disconnect
 571  * from the given peer and cancel all previous transmissions
 572  * (and their continuationc).
 573  *
 574  * @param cls closure
 575  * @param target peer from which to disconnect
 576  */
 577 static void
 578 http_plugin_disconnect (void *cls, const struct GNUNET_PeerIdentity *target)
 579 {
 580   struct Plugin *plugin = cls;
 581   struct Session *next = NULL;
 582   struct Session *s = plugin->head;
 583
 584   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 585                    "Transport tells me to disconnect `%s'\n",
 586                    GNUNET_i2s (target));
 587   while (s != NULL)
 588   {
 589     next = s->next;
 590     if (0 == memcmp (target, &s->target, sizeof (struct GNUNET_PeerIdentity)))
 591     {
 592       if (s->inbound == GNUNET_NO)
 593         GNUNET_assert (GNUNET_OK == client_disconnect (s));
 594       else
 595         GNUNET_assert (GNUNET_OK == server_disconnect (s));
 596       GNUNET_CONTAINER_DLL_remove (plugin->head, plugin->tail, s);
 597       delete_session (s);
 598     }
 599     s = next;
 600   }
 601 }
 602
 603 static void
 604 nat_add_address (void *cls, int add_remove, const struct sockaddr *addr,
 605                  socklen_t addrlen)
 606 {
 607   struct Plugin *plugin = cls;
 608   struct IPv4HttpAddressWrapper *w_t4 = NULL;
 609   struct IPv6HttpAddressWrapper *w_t6 = NULL;
 610   int af;
 611
 612   af = addr->sa_family;
 613   switch (af)
 614   {
 615   case AF_INET:
 616     w_t4 = plugin->ipv4_addr_head;
 617     while (w_t4 != NULL)
 618     {
 619       int res = memcmp (&w_t4->addr,
 620                         (struct sockaddr_in *) addr,
 621                         sizeof (struct sockaddr_in));
 622
 623       if (0 == res)
 624         break;
 625       w_t4 = w_t4->next;
 626     }
 627     if (w_t4 == NULL)
 628     {
 629       w_t4 = GNUNET_malloc (sizeof (struct IPv4HttpAddressWrapper));
 630       memcpy (&w_t4->addr, (struct sockaddr_in *) addr,
 631               sizeof (struct sockaddr_in));
 632
 633       GNUNET_CONTAINER_DLL_insert (plugin->ipv4_addr_head,
 634                                    plugin->ipv4_addr_tail, w_t4);
 635     }
 636 #if DEBUG_HTTP
 637     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 638                      "Notifying transport to add IPv4 address `%s'\n",
 639                      http_plugin_address_to_string(NULL, &w_t4->addr, sizeof (struct sockaddr_in)));
 640 #endif
 641     plugin->env->notify_address (plugin->env->cls, add_remove, &w_t4->addr, sizeof (struct sockaddr_in));
 642
 643     break;
 644   case AF_INET6:
 645     w_t6 = plugin->ipv6_addr_head;
 646     while (w_t6)
 647     {
 648       int res = memcmp (&w_t6->addr,
 649                         (struct sockaddr_in6 *) addr,
 650                         sizeof (struct sockaddr_in6));
 651
 652       if (0 == res)
 653         break;
 654       w_t6 = w_t6->next;
 655     }
 656     if (w_t6 == NULL)
 657     {
 658       w_t6 = GNUNET_malloc (sizeof (struct IPv6HttpAddressWrapper));
 659       memcpy (&w_t6->addr, (struct sockaddr_in6 *) addr,
 660               sizeof (struct sockaddr_in6));
 661
 662       GNUNET_CONTAINER_DLL_insert (plugin->ipv6_addr_head,
 663                                    plugin->ipv6_addr_tail, w_t6);
 664     }
 665 #if DEBUG_HTTP
 666     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 667                      "Notifying transport to add IPv6 address `%s'\n",
 668                      http_plugin_address_to_string(NULL, &w_t6->addr, sizeof (struct sockaddr_in6)));
 669 #endif
 670     plugin->env->notify_address (plugin->env->cls, add_remove, &w_t6->addr, sizeof (struct sockaddr_in6));
 671     break;
 672   default:
 673     return;
 674   }
 675
 676 }
 677
 678 static void
 679 nat_remove_address (void *cls, int add_remove, const struct sockaddr *addr,
 680                     socklen_t addrlen)
 681 {
 682   struct Plugin *plugin = cls;
 683   struct IPv4HttpAddressWrapper *w_t4 = NULL;
 684   struct IPv6HttpAddressWrapper *w_t6 = NULL;
 685   int af;
 686
 687   af = addr->sa_family;
 688   switch (af)
 689   {
 690   case AF_INET:
 691     w_t4 = plugin->ipv4_addr_head;
 692     while (w_t4 != NULL)
 693     {
 694       int res = memcmp (&(w_t4->addr.sin_addr),
 695                         &((struct sockaddr_in *) addr)->sin_addr,
 696                         sizeof (struct in_addr));
 697
 698       if (0 == res)
 699         break;
 700       w_t4 = w_t4->next;
 701     }
 702     if (w_t4 == NULL)
 703       return;
 704
 705 #if DEBUG_HTTP
 706     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 707                      "Notifying transport to remove IPv4 address `%s'\n",
 708                      http_plugin_address_to_string(NULL, &w_t4->addr, sizeof (struct sockaddr_in)));
 709 #endif
 710     plugin->env->notify_address (plugin->env->cls, add_remove, &w_t4->addr,
 711                                  sizeof (struct sockaddr_in));
 712
 713     GNUNET_CONTAINER_DLL_remove (plugin->ipv4_addr_head, plugin->ipv4_addr_tail,
 714                                  w_t4);
 715     GNUNET_free (w_t4);
 716     break;
 717   case AF_INET6:
 718     w_t6 = plugin->ipv6_addr_head;
 719     while (w_t6 != NULL)
 720     {
 721       int res = memcmp (&(w_t6->addr.sin6_addr),
 722                         &((struct sockaddr_in6 *) addr)->sin6_addr,
 723                         sizeof (struct in6_addr));
 724
 725       if (0 == res)
 726         break;
 727       w_t6 = w_t6->next;
 728     }
 729     if (w_t6 == NULL)
 730       return;
 731 #if DEBUG_HTTP
 732     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 733                      "Notifying transport to remove IPv6 address `%s'\n",
 734                      http_plugin_address_to_string(NULL, &w_t6->addr, sizeof (struct sockaddr_in6)));
 735 #endif
 736     plugin->env->notify_address (plugin->env->cls, add_remove, &w_t6->addr,
 737                                  sizeof (struct sockaddr_in6 ));
 738
 739     GNUNET_CONTAINER_DLL_remove (plugin->ipv6_addr_head, plugin->ipv6_addr_tail,
 740                                  w_t6);
 741     GNUNET_free (w_t6);
 742     break;
 743   default:
 744     return;
 745   }
 746
 747 }
 748
 749 /**
 750  * Our external IP address/port mapping has changed.
 751  *
 752  * @param cls closure, the 'struct LocalAddrList'
 753  * @param add_remove GNUNET_YES to mean the new public IP address, GNUNET_NO to mean
 754  *     the previous (now invalid) one
 755  * @param addr either the previous or the new public IP address
 756  * @param addrlen actual lenght of the address
 757  */
 758 static void
 759 nat_port_map_callback (void *cls, int add_remove, const struct sockaddr *addr,
 760                        socklen_t addrlen)
 761 {
 762   GNUNET_assert (cls != NULL);
 763 #if DEBUG_HTTP
 764   struct Plugin *plugin = cls;
 765 #endif
 766   //static int limit;
 767 #if DEBUG_HTTP
 768   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 769                    "NPMC called %s to address `%s'\n",
 770                    (add_remove == GNUNET_NO) ? "remove" : "add",
 771                    GNUNET_a2s (addr, addrlen));
 772 #endif
 773   /* convert 'addr' to our internal format */
 774   switch (add_remove)
 775   {
 776   case GNUNET_YES:
 777     // FIXME DEBUGGING
 778     //if (limit < 1)
 779       nat_add_address (cls, add_remove, addr, addrlen);
 780     //limit++;
 781     // FIXME END
 782     break;
 783   case GNUNET_NO:
 784     nat_remove_address (cls, add_remove, addr, addrlen);
 785     break;
 786   }
 787 }
 788
 789
 790 static void
 791 start_report_addresses (struct Plugin *plugin)
 792 {
 793   int res = GNUNET_OK;
 794   struct sockaddr **addrs;
 795   socklen_t *addrlens;
 796
 797   res =
 798       GNUNET_SERVICE_get_server_addresses (plugin->name, plugin->env->cfg,
 799                                            &addrs, &addrlens);
 800 #if 0
 801   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 802                    _("FOUND %u addresses\n"),res);
 803 #endif
 804
 805   if (res != GNUNET_SYSERR)
 806   {
 807     plugin->nat =
 808         GNUNET_NAT_register (plugin->env->cfg, GNUNET_YES, plugin->port,
 809                              (unsigned int) res,
 810                              (const struct sockaddr **) addrs, addrlens,
 811                              &nat_port_map_callback, NULL,
 812                              plugin);
 813     while (res > 0)
 814     {
 815       res--;
 816 #if 0
 817       GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 818                        _("FREEING %s\n"),
 819                        GNUNET_a2s (addrs[res], addrlens[res]));
 820 #endif
 821       GNUNET_assert (addrs[res] != NULL);
 822       GNUNET_free (addrs[res]);
 823     }
 824     GNUNET_free_non_null (addrs);
 825     GNUNET_free_non_null (addrlens);
 826   }
 827   else
 828   {
 829     plugin->nat =
 830         GNUNET_NAT_register (plugin->env->cfg, GNUNET_YES, 0, 0, NULL, NULL,
 831                              NULL, NULL, plugin);
 832   }
 833 }
 834
 835 static void
 836 stop_report_addresses (struct Plugin *plugin)
 837 {
 838   /* Stop NAT handle */
 839   GNUNET_NAT_unregister (plugin->nat);
 840
 841   /* Clean up addresses */
 842   struct IPv4HttpAddressWrapper *w_t4;
 843   struct IPv6HttpAddressWrapper *w_t6;
 844
 845   while (plugin->ipv4_addr_head != NULL)
 846   {
 847     w_t4 = plugin->ipv4_addr_head;
 848     GNUNET_CONTAINER_DLL_remove (plugin->ipv4_addr_head, plugin->ipv4_addr_tail,
 849                                  w_t4);
 850     GNUNET_free (w_t4);
 851   }
 852
 853   while (plugin->ipv6_addr_head != NULL)
 854   {
 855     w_t6 = plugin->ipv6_addr_head;
 856     GNUNET_CONTAINER_DLL_remove (plugin->ipv6_addr_head, plugin->ipv6_addr_tail,
 857                                  w_t6);
 858     GNUNET_free (w_t6);
 859   }
 860 }
 861
 862 static int
 863 configure_plugin (struct Plugin *plugin)
 864 {
 865   int res = GNUNET_OK;
 866
 867   /* Use IPv4? */
 868   if (GNUNET_CONFIGURATION_have_value
 869       (plugin->env->cfg, plugin->name, "USE_IPv4"))
 870   {
 871     plugin->ipv4 =
 872         GNUNET_CONFIGURATION_get_value_yesno (plugin->env->cfg, plugin->name,
 873                                               "USE_IPv4");
 874   }
 875   else
 876     plugin->ipv4 = GNUNET_YES;
 877
 878   /* Use IPv6? */
 879   if (GNUNET_CONFIGURATION_have_value
 880       (plugin->env->cfg, plugin->name, "USE_IPv6"))
 881   {
 882     plugin->ipv6 =
 883         GNUNET_CONFIGURATION_get_value_yesno (plugin->env->cfg, plugin->name,
 884                                               "USE_IPv6");
 885   }
 886   else
 887     plugin->ipv6 = GNUNET_YES;
 888
 889   if ((plugin->ipv4 == GNUNET_NO) && (plugin->ipv6 == GNUNET_NO))
 890   {
 891     GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 892                      _
 893                      ("Neither IPv4 nor IPv6 are enabled! Fix in configuration\n"),
 894                      plugin->name);
 895     res = GNUNET_SYSERR;
 896   }
 897
 898   /* Reading port number from config file */
 899   unsigned long long port;
 900
 901   if ((GNUNET_OK !=
 902        GNUNET_CONFIGURATION_get_value_number (plugin->env->cfg, plugin->name,
 903                                               "PORT", &port)) || (port > 65535))
 904   {
 905     GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 906                      _("Port is required! Fix in configuration\n"),
 907                      plugin->name);
 908     res = GNUNET_SYSERR;
 909     goto fail;
 910   }
 911   plugin->port = port;
 912
 913   plugin->client_only = GNUNET_NO;
 914   if (plugin->port == 0)
 915   {
 916     GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 917                    _("Port 0, client only mode\n"));
 918     plugin->client_only = GNUNET_YES;
 919   }
 920
 921   char * bind4_address = NULL;
 922   if ((plugin->ipv4 == GNUNET_YES) && (GNUNET_YES ==
 923       GNUNET_CONFIGURATION_get_value_string (plugin->env->cfg, plugin->name,
 924                                              "BINDTO", &bind4_address)))
 925   {
 926     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 927                 "Binding %s plugin to specific IPv4 address: `%s'\n",
 928                 plugin->protocol, bind4_address);
 929     plugin->server_addr_v4 = GNUNET_malloc (sizeof (struct sockaddr_in));
 930     if (1 != inet_pton (AF_INET, bind4_address, &plugin->server_addr_v4->sin_addr))
 931     {
 932       GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 933                   _("Specific IPv4 address `%s' for plugin %s in configuration file is invalid! Binding to all addresses!\n"),
 934                   bind4_address, plugin->protocol);
 935       GNUNET_free (plugin->server_addr_v4);
 936       plugin->server_addr_v4 = NULL;
 937     }
 938     else
 939     {
 940       plugin->server_addr_v4->sin_family = AF_INET;
 941       plugin->server_addr_v4->sin_port = htons (plugin->port);
 942     }
 943     GNUNET_free (bind4_address);
 944   }
 945
 946
 947   char * bind6_address = NULL;
 948   if ((plugin->ipv6 == GNUNET_YES) && (GNUNET_YES ==
 949       GNUNET_CONFIGURATION_get_value_string (plugin->env->cfg, plugin->name,
 950                                              "BINDTO6", &bind6_address)))
 951   {
 952     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 953                 "Binding %s plugin to specific IPv6 address: `%s'\n",
 954                 plugin->protocol, bind6_address);
 955     plugin->server_addr_v6 = GNUNET_malloc (sizeof (struct sockaddr_in6));
 956     if (1 != inet_pton (AF_INET6, bind6_address, &plugin->server_addr_v6->sin6_addr))
 957     {
 958       GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 959                   _("Specific IPv6 address `%s' for plugin %s in configuration file is invalid! Binding to all addresses!\n"),
 960                   bind6_address, plugin->protocol);
 961       GNUNET_free (plugin->server_addr_v6);
 962       plugin->server_addr_v6 = NULL;
 963     }
 964     else
 965     {
 966       plugin->server_addr_v6->sin6_family = AF_INET6;
 967       plugin->server_addr_v6->sin6_port = htons (plugin->port);
 968     }
 969     GNUNET_free (bind6_address);
 970   }
 971
 972
 973   /* Optional parameters */
 974   unsigned long long maxneigh;
 975   if (GNUNET_OK !=
 976       GNUNET_CONFIGURATION_get_value_number (plugin->env->cfg, plugin->name,
 977                                              "MAX_CONNECTIONS", &maxneigh))
 978     maxneigh = 128;
 979   plugin->max_connections = maxneigh;
 980
 981 fail:
 982   return res;
 983 }
 984
 985 /**
 986  * Entry point for the plugin.
 987  */
 988 void *
 989 LIBGNUNET_PLUGIN_TRANSPORT_INIT (void *cls)
 990 {
 991   struct GNUNET_TRANSPORT_PluginEnvironment *env = cls;
 992   struct GNUNET_TRANSPORT_PluginFunctions *api;
 993   struct Plugin *plugin;
 994   int res;
 995
 996   plugin = GNUNET_malloc (sizeof (struct Plugin));
 997   plugin->env = env;
 998   api = GNUNET_malloc (sizeof (struct GNUNET_TRANSPORT_PluginFunctions));
 999   api->cls = plugin;
1000   api->send = &http_plugin_send;
1001   api->disconnect = &http_plugin_disconnect;
1002   api->address_pretty_printer = &http_plugin_address_pretty_printer;
1003   api->check_address = &http_plugin_address_suggested;
1004   api->address_to_string = &http_plugin_address_to_string;
1005
1006 #if BUILD_HTTPS
1007   plugin->name = "transport-https";
1008   plugin->protocol = "https";
1009 #else
1010   plugin->name = "transport-http";
1011   plugin->protocol = "http";
1012 #endif
1013   /* Configure plugin from configuration */
1014
1015   res = configure_plugin (plugin);
1016   if (res == GNUNET_SYSERR)
1017   {
1018     GNUNET_free_non_null (plugin->server_addr_v4);
1019     GNUNET_free_non_null (plugin->server_addr_v6);
1020     GNUNET_free (plugin);
1021     GNUNET_free (api);
1022     return NULL;
1023   }
1024
1025   /* Start client */
1026   res = client_start (plugin);
1027   if (res == GNUNET_SYSERR)
1028   {
1029     GNUNET_free_non_null (plugin->server_addr_v4);
1030     GNUNET_free_non_null (plugin->server_addr_v6);
1031     GNUNET_free (plugin);
1032     GNUNET_free (api);
1033     return NULL;
1034   }
1035
1036   /* Start server */
1037   if (plugin->client_only == GNUNET_NO)
1038   {
1039     res = server_start (plugin);
1040     if (res == GNUNET_SYSERR)
1041     {
1042       server_stop (plugin);
1043       client_stop (plugin);
1044
1045       GNUNET_free_non_null (plugin->server_addr_v4);
1046       GNUNET_free_non_null (plugin->server_addr_v6);
1047       GNUNET_free (plugin);
1048       GNUNET_free (api);
1049       return NULL;
1050     }
1051   }
1052   /* Report addresses to transport service */
1053   start_report_addresses (plugin);
1054
1055 #if DEBUG_HTTP
1056   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
1057                    "Plugin `%s' loaded\n", plugin->name);
1058 #endif
1059
1060   return api;
1061 }
1062
1063
1064 /**
1065  * Exit point from the plugin.
1066  */
1067 void *
1068 LIBGNUNET_PLUGIN_TRANSPORT_DONE (void *cls)
1069 {
1070   struct GNUNET_TRANSPORT_PluginFunctions *api = cls;
1071   struct Plugin *plugin = api->cls;
1072   struct Session *s = NULL;
1073
1074   /* Stop reporting addresses to transport service */
1075   stop_report_addresses (plugin);
1076
1077   /* cleaning up sessions */
1078   s = plugin->head;
1079   while (s != NULL)
1080   {
1081     struct Session *t = s->next;
1082 #if DEBUG_HTTP
1083   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
1084                    "Disconnecting `%s' \n", GNUNET_i2s (&s->target));
1085 #endif
1086     if (s->inbound == GNUNET_NO)
1087       GNUNET_assert (GNUNET_OK == client_disconnect (s));
1088     else
1089       GNUNET_assert (GNUNET_OK == server_disconnect (s));
1090
1091     GNUNET_CONTAINER_DLL_remove (plugin->head, plugin->tail, s);
1092     delete_session (s);
1093     s = t;
1094   }
1095
1096 #if DEBUG_HTTP
1097   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
1098                    "Stopping server\n");
1099 #endif
1100   /* Stop server */
1101   server_stop (plugin);
1102
1103 #if DEBUG_HTTP
1104   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
1105                    "Stopping client\n");
1106 #endif
1107   /* Stop client */
1108   client_stop (plugin);
1109
1110
1111 #if DEBUG_HTTP
1112   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
1113                    "Plugin `%s' unloaded\n", plugin->name);
1114 #endif
1115
1116   GNUNET_free_non_null (plugin->server_addr_v4);
1117   GNUNET_free_non_null (plugin->server_addr_v6);
1118   GNUNET_free (plugin);
1119   GNUNET_free (api);
1120
1121   return NULL;
1122 }
1123
1124 /* end of plugin_transport_http.c */