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   while (s != NULL)
 585   {
 586     next = s->next;
 587     if (0 == memcmp (target, &s->target, sizeof (struct GNUNET_PeerIdentity)))
 588     {
 589       if (s->inbound == GNUNET_NO)
 590         GNUNET_assert (GNUNET_OK == client_disconnect (s));
 591       else
 592         GNUNET_assert (GNUNET_OK == server_disconnect (s));
 593       GNUNET_CONTAINER_DLL_remove (plugin->head, plugin->tail, s);
 594       delete_session (s);
 595     }
 596     s = next;
 597   }
 598 }
 599
 600 static void
 601 nat_add_address (void *cls, int add_remove, const struct sockaddr *addr,
 602                  socklen_t addrlen)
 603 {
 604   struct Plugin *plugin = cls;
 605   struct IPv4HttpAddressWrapper *w_t4 = NULL;
 606   struct IPv6HttpAddressWrapper *w_t6 = NULL;
 607   int af;
 608
 609   af = addr->sa_family;
 610   switch (af)
 611   {
 612   case AF_INET:
 613     w_t4 = plugin->ipv4_addr_head;
 614     while (w_t4 != NULL)
 615     {
 616       int res = memcmp (&w_t4->addr,
 617                         (struct sockaddr_in *) addr,
 618                         sizeof (struct sockaddr_in));
 619
 620       if (0 == res)
 621         break;
 622       w_t4 = w_t4->next;
 623     }
 624     if (w_t4 == NULL)
 625     {
 626       w_t4 = GNUNET_malloc (sizeof (struct IPv4HttpAddressWrapper));
 627       memcpy (&w_t4->addr, (struct sockaddr_in *) addr,
 628               sizeof (struct sockaddr_in));
 629
 630       GNUNET_CONTAINER_DLL_insert (plugin->ipv4_addr_head,
 631                                    plugin->ipv4_addr_tail, w_t4);
 632     }
 633 #if DEBUG_HTTP
 634     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 635                      "Notifying transport to add IPv4 address `%s'\n",
 636                      http_plugin_address_to_string(NULL, &w_t4->addr, sizeof (struct sockaddr_in)));
 637 #endif
 638     plugin->env->notify_address (plugin->env->cls, add_remove, &w_t4->addr, sizeof (struct sockaddr_in));
 639
 640     break;
 641   case AF_INET6:
 642     w_t6 = plugin->ipv6_addr_head;
 643     while (w_t6)
 644     {
 645       int res = memcmp (&w_t6->addr,
 646                         (struct sockaddr_in6 *) addr,
 647                         sizeof (struct sockaddr_in6));
 648
 649       if (0 == res)
 650         break;
 651       w_t6 = w_t6->next;
 652     }
 653     if (w_t6 == NULL)
 654     {
 655       w_t6 = GNUNET_malloc (sizeof (struct IPv6HttpAddressWrapper));
 656       memcpy (&w_t6->addr, (struct sockaddr_in6 *) addr,
 657               sizeof (struct sockaddr_in6));
 658
 659       GNUNET_CONTAINER_DLL_insert (plugin->ipv6_addr_head,
 660                                    plugin->ipv6_addr_tail, w_t6);
 661     }
 662 #if DEBUG_HTTP
 663     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 664                      "Notifying transport to add IPv6 address `%s'\n",
 665                      http_plugin_address_to_string(NULL, &w_t6->addr, sizeof (struct sockaddr_in6)));
 666 #endif
 667     plugin->env->notify_address (plugin->env->cls, add_remove, &w_t6->addr, sizeof (struct sockaddr_in6));
 668     break;
 669   default:
 670     return;
 671   }
 672
 673 }
 674
 675 static void
 676 nat_remove_address (void *cls, int add_remove, const struct sockaddr *addr,
 677                     socklen_t addrlen)
 678 {
 679   struct Plugin *plugin = cls;
 680   struct IPv4HttpAddressWrapper *w_t4 = NULL;
 681   struct IPv6HttpAddressWrapper *w_t6 = NULL;
 682   int af;
 683
 684   af = addr->sa_family;
 685   switch (af)
 686   {
 687   case AF_INET:
 688     w_t4 = plugin->ipv4_addr_head;
 689     while (w_t4 != NULL)
 690     {
 691       int res = memcmp (&(w_t4->addr.sin_addr),
 692                         &((struct sockaddr_in *) addr)->sin_addr,
 693                         sizeof (struct in_addr));
 694
 695       if (0 == res)
 696         break;
 697       w_t4 = w_t4->next;
 698     }
 699     if (w_t4 == NULL)
 700       return;
 701
 702 #if DEBUG_HTTP
 703     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 704                      "Notifying transport to remove IPv4 address `%s'\n",
 705                      http_plugin_address_to_string(NULL, &w_t4->addr, sizeof (struct sockaddr_in)));
 706 #endif
 707     plugin->env->notify_address (plugin->env->cls, add_remove, &w_t4->addr,
 708                                  sizeof (struct sockaddr_in));
 709
 710     GNUNET_CONTAINER_DLL_remove (plugin->ipv4_addr_head, plugin->ipv4_addr_tail,
 711                                  w_t4);
 712     GNUNET_free (w_t4);
 713     break;
 714   case AF_INET6:
 715     w_t6 = plugin->ipv6_addr_head;
 716     while (w_t6 != NULL)
 717     {
 718       int res = memcmp (&(w_t6->addr.sin6_addr),
 719                         &((struct sockaddr_in6 *) addr)->sin6_addr,
 720                         sizeof (struct in6_addr));
 721
 722       if (0 == res)
 723         break;
 724       w_t6 = w_t6->next;
 725     }
 726     if (w_t6 == NULL)
 727       return;
 728 #if DEBUG_HTTP
 729     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 730                      "Notifying transport to remove IPv6 address `%s'\n",
 731                      http_plugin_address_to_string(NULL, &w_t6->addr, sizeof (struct sockaddr_in6)));
 732 #endif
 733     plugin->env->notify_address (plugin->env->cls, add_remove, &w_t6->addr,
 734                                  sizeof (struct sockaddr_in6 ));
 735
 736     GNUNET_CONTAINER_DLL_remove (plugin->ipv6_addr_head, plugin->ipv6_addr_tail,
 737                                  w_t6);
 738     GNUNET_free (w_t6);
 739     break;
 740   default:
 741     return;
 742   }
 743
 744 }
 745
 746 /**
 747  * Our external IP address/port mapping has changed.
 748  *
 749  * @param cls closure, the 'struct LocalAddrList'
 750  * @param add_remove GNUNET_YES to mean the new public IP address, GNUNET_NO to mean
 751  *     the previous (now invalid) one
 752  * @param addr either the previous or the new public IP address
 753  * @param addrlen actual lenght of the address
 754  */
 755 static void
 756 nat_port_map_callback (void *cls, int add_remove, const struct sockaddr *addr,
 757                        socklen_t addrlen)
 758 {
 759   GNUNET_assert (cls != NULL);
 760 #if DEBUG_HTTP
 761   struct Plugin *plugin = cls;
 762 #endif
 763   //static int limit;
 764 #if DEBUG_HTTP
 765   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 766                    "NPMC called %s to address `%s'\n",
 767                    (add_remove == GNUNET_NO) ? "remove" : "add",
 768                    GNUNET_a2s (addr, addrlen));
 769 #endif
 770   /* convert 'addr' to our internal format */
 771   switch (add_remove)
 772   {
 773   case GNUNET_YES:
 774     // FIXME DEBUGGING
 775     //if (limit < 1)
 776       nat_add_address (cls, add_remove, addr, addrlen);
 777     //limit++;
 778     // FIXME END
 779     break;
 780   case GNUNET_NO:
 781     nat_remove_address (cls, add_remove, addr, addrlen);
 782     break;
 783   }
 784 }
 785
 786
 787 static void
 788 start_report_addresses (struct Plugin *plugin)
 789 {
 790   int res = GNUNET_OK;
 791   struct sockaddr **addrs;
 792   socklen_t *addrlens;
 793
 794   res =
 795       GNUNET_SERVICE_get_server_addresses (plugin->name, plugin->env->cfg,
 796                                            &addrs, &addrlens);
 797 #if 0
 798   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 799                    _("FOUND %u addresses\n"),res);
 800 #endif
 801
 802   if (res != GNUNET_SYSERR)
 803   {
 804     plugin->nat =
 805         GNUNET_NAT_register (plugin->env->cfg, GNUNET_YES, plugin->port,
 806                              (unsigned int) res,
 807                              (const struct sockaddr **) addrs, addrlens,
 808                              &nat_port_map_callback, NULL,
 809                              plugin);
 810     while (res > 0)
 811     {
 812       res--;
 813 #if 0
 814       GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 815                        _("FREEING %s\n"),
 816                        GNUNET_a2s (addrs[res], addrlens[res]));
 817 #endif
 818       GNUNET_assert (addrs[res] != NULL);
 819       GNUNET_free (addrs[res]);
 820     }
 821     GNUNET_free_non_null (addrs);
 822     GNUNET_free_non_null (addrlens);
 823   }
 824   else
 825   {
 826     plugin->nat =
 827         GNUNET_NAT_register (plugin->env->cfg, GNUNET_YES, 0, 0, NULL, NULL,
 828                              NULL, NULL, plugin);
 829   }
 830 }
 831
 832 static void
 833 stop_report_addresses (struct Plugin *plugin)
 834 {
 835   /* Stop NAT handle */
 836   GNUNET_NAT_unregister (plugin->nat);
 837
 838   /* Clean up addresses */
 839   struct IPv4HttpAddressWrapper *w_t4;
 840   struct IPv6HttpAddressWrapper *w_t6;
 841
 842   while (plugin->ipv4_addr_head != NULL)
 843   {
 844     w_t4 = plugin->ipv4_addr_head;
 845     GNUNET_CONTAINER_DLL_remove (plugin->ipv4_addr_head, plugin->ipv4_addr_tail,
 846                                  w_t4);
 847     GNUNET_free (w_t4);
 848   }
 849
 850   while (plugin->ipv6_addr_head != NULL)
 851   {
 852     w_t6 = plugin->ipv6_addr_head;
 853     GNUNET_CONTAINER_DLL_remove (plugin->ipv6_addr_head, plugin->ipv6_addr_tail,
 854                                  w_t6);
 855     GNUNET_free (w_t6);
 856   }
 857 }
 858
 859 static int
 860 configure_plugin (struct Plugin *plugin)
 861 {
 862   int res = GNUNET_OK;
 863
 864   /* Use IPv4? */
 865   if (GNUNET_CONFIGURATION_have_value
 866       (plugin->env->cfg, plugin->name, "USE_IPv4"))
 867   {
 868     plugin->ipv4 =
 869         GNUNET_CONFIGURATION_get_value_yesno (plugin->env->cfg, plugin->name,
 870                                               "USE_IPv4");
 871   }
 872   else
 873     plugin->ipv4 = GNUNET_YES;
 874
 875   /* Use IPv6? */
 876   if (GNUNET_CONFIGURATION_have_value
 877       (plugin->env->cfg, plugin->name, "USE_IPv6"))
 878   {
 879     plugin->ipv6 =
 880         GNUNET_CONFIGURATION_get_value_yesno (plugin->env->cfg, plugin->name,
 881                                               "USE_IPv6");
 882   }
 883   else
 884     plugin->ipv6 = GNUNET_YES;
 885
 886   if ((plugin->ipv4 == GNUNET_NO) && (plugin->ipv6 == GNUNET_NO))
 887   {
 888     GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 889                      _
 890                      ("Neither IPv4 nor IPv6 are enabled! Fix in configuration\n"),
 891                      plugin->name);
 892     res = GNUNET_SYSERR;
 893   }
 894
 895   /* Reading port number from config file */
 896   unsigned long long port;
 897
 898   if ((GNUNET_OK !=
 899        GNUNET_CONFIGURATION_get_value_number (plugin->env->cfg, plugin->name,
 900                                               "PORT", &port)) || (port > 65535))
 901   {
 902     GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 903                      _("Port is required! Fix in configuration\n"),
 904                      plugin->name);
 905     res = GNUNET_SYSERR;
 906     goto fail;
 907   }
 908   plugin->port = port;
 909
 910
 911   char * bind4_address = NULL;
 912   if ((plugin->ipv4 == GNUNET_YES) && (GNUNET_YES ==
 913       GNUNET_CONFIGURATION_get_value_string (plugin->env->cfg, plugin->name,
 914                                              "BINDTO", &bind4_address)))
 915   {
 916     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 917                 "Binding %s plugin to specific IPv4 address: `%s'\n",
 918                 plugin->protocol, bind4_address);
 919     plugin->server_addr_v4 = GNUNET_malloc (sizeof (struct sockaddr_in));
 920     if (1 != inet_pton (AF_INET, bind4_address, &plugin->server_addr_v4->sin_addr))
 921     {
 922       GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 923                   _("Specific IPv4 address `%s' for plugin %s in configuration file is invalid! Binding to all addresses!\n"),
 924                   bind4_address, plugin->protocol);
 925       GNUNET_free (plugin->server_addr_v4);
 926       plugin->server_addr_v4 = NULL;
 927     }
 928     else
 929     {
 930       plugin->server_addr_v4->sin_family = AF_INET;
 931       plugin->server_addr_v4->sin_port = htons (plugin->port);
 932     }
 933     GNUNET_free (bind4_address);
 934   }
 935
 936
 937   char * bind6_address = NULL;
 938   if ((plugin->ipv6 == GNUNET_YES) && (GNUNET_YES ==
 939       GNUNET_CONFIGURATION_get_value_string (plugin->env->cfg, plugin->name,
 940                                              "BINDTO6", &bind6_address)))
 941   {
 942     GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 943                 "Binding %s plugin to specific IPv6 address: `%s'\n",
 944                 plugin->protocol, bind6_address);
 945     plugin->server_addr_v6 = GNUNET_malloc (sizeof (struct sockaddr_in6));
 946     if (1 != inet_pton (AF_INET6, bind6_address, &plugin->server_addr_v6->sin6_addr))
 947     {
 948       GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 949                   _("Specific IPv6 address `%s' for plugin %s in configuration file is invalid! Binding to all addresses!\n"),
 950                   bind6_address, plugin->protocol);
 951       GNUNET_free (plugin->server_addr_v6);
 952       plugin->server_addr_v6 = NULL;
 953     }
 954     else
 955     {
 956       plugin->server_addr_v6->sin6_family = AF_INET6;
 957       plugin->server_addr_v6->sin6_port = htons (plugin->port);
 958     }
 959     GNUNET_free (bind6_address);
 960   }
 961
 962
 963   /* Optional parameters */
 964   unsigned long long maxneigh;
 965   if (GNUNET_OK !=
 966       GNUNET_CONFIGURATION_get_value_number (plugin->env->cfg, plugin->name,
 967                                              "MAX_CONNECTIONS", &maxneigh))
 968     maxneigh = 128;
 969   plugin->max_connections = maxneigh;
 970
 971 fail:
 972   return res;
 973 }
 974
 975 /**
 976  * Entry point for the plugin.
 977  */
 978 void *
 979 LIBGNUNET_PLUGIN_TRANSPORT_INIT (void *cls)
 980 {
 981   struct GNUNET_TRANSPORT_PluginEnvironment *env = cls;
 982   struct GNUNET_TRANSPORT_PluginFunctions *api;
 983   struct Plugin *plugin;
 984   int res;
 985
 986   plugin = GNUNET_malloc (sizeof (struct Plugin));
 987   plugin->env = env;
 988   api = GNUNET_malloc (sizeof (struct GNUNET_TRANSPORT_PluginFunctions));
 989   api->cls = plugin;
 990   api->send = &http_plugin_send;
 991   api->disconnect = &http_plugin_disconnect;
 992   api->address_pretty_printer = &http_plugin_address_pretty_printer;
 993   api->check_address = &http_plugin_address_suggested;
 994   api->address_to_string = &http_plugin_address_to_string;
 995
 996 #if BUILD_HTTPS
 997   plugin->name = "transport-https";
 998   plugin->protocol = "https";
 999 #else
1000   plugin->name = "transport-http";
1001   plugin->protocol = "http";
1002 #endif
1003   /* Configure plugin from configuration */
1004
1005   res = configure_plugin (plugin);
1006   if (res == GNUNET_SYSERR)
1007   {
1008     GNUNET_free_non_null (plugin->server_addr_v4);
1009     GNUNET_free_non_null (plugin->server_addr_v6);
1010     GNUNET_free (plugin);
1011     GNUNET_free (api);
1012     return NULL;
1013   }
1014
1015   /* Start client */
1016   res = client_start (plugin);
1017   if (res == GNUNET_SYSERR)
1018   {
1019     GNUNET_free_non_null (plugin->server_addr_v4);
1020     GNUNET_free_non_null (plugin->server_addr_v6);
1021     GNUNET_free (plugin);
1022     GNUNET_free (api);
1023     return NULL;
1024   }
1025
1026   /* Start server */
1027   res = server_start (plugin);
1028   if (res == GNUNET_SYSERR)
1029   {
1030     server_stop (plugin);
1031     client_stop (plugin);
1032
1033     GNUNET_free_non_null (plugin->server_addr_v4);
1034     GNUNET_free_non_null (plugin->server_addr_v6);
1035     GNUNET_free (plugin);
1036     GNUNET_free (api);
1037     return NULL;
1038   }
1039
1040   /* Report addresses to transport service */
1041   start_report_addresses (plugin);
1042
1043 #if DEBUG_HTTP
1044   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
1045                    "Plugin `%s' loaded\n", plugin->name);
1046 #endif
1047
1048   return api;
1049 }
1050
1051
1052 /**
1053  * Exit point from the plugin.
1054  */
1055 void *
1056 LIBGNUNET_PLUGIN_TRANSPORT_DONE (void *cls)
1057 {
1058   struct GNUNET_TRANSPORT_PluginFunctions *api = cls;
1059   struct Plugin *plugin = api->cls;
1060   struct Session *s = NULL;
1061
1062   /* Stop reporting addresses to transport service */
1063   stop_report_addresses (plugin);
1064
1065   /* cleaning up sessions */
1066   s = plugin->head;
1067   while (s != NULL)
1068   {
1069     struct Session *t = s->next;
1070 #if DEBUG_HTTP
1071   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
1072                    "Disconnecting `%s' \n", GNUNET_i2s (&s->target));
1073 #endif
1074     if (s->inbound == GNUNET_NO)
1075       GNUNET_assert (GNUNET_OK == client_disconnect (s));
1076     else
1077       GNUNET_assert (GNUNET_OK == server_disconnect (s));
1078
1079     GNUNET_CONTAINER_DLL_remove (plugin->head, plugin->tail, s);
1080     delete_session (s);
1081     s = t;
1082   }
1083
1084 #if DEBUG_HTTP
1085   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
1086                    "Stopping server\n");
1087 #endif
1088   /* Stop server */
1089   server_stop (plugin);
1090
1091 #if DEBUG_HTTP
1092   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
1093                    "Stopping client\n");
1094 #endif
1095   /* Stop client */
1096   client_stop (plugin);
1097
1098
1099 #if DEBUG_HTTP
1100   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
1101                    "Plugin `%s' unloaded\n", plugin->name);
1102 #endif
1103
1104   GNUNET_free_non_null (plugin->server_addr_v4);
1105   GNUNET_free_non_null (plugin->server_addr_v6);
1106   GNUNET_free (plugin);
1107   GNUNET_free (api);
1108
1109   return NULL;
1110 }
1111
1112 /* end of plugin_transport_http.c */