src/transport/plugin_transport_http_client.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_client.c
  23  * @brief http transport service plugin
  24  * @author Matthias Wachs
  25  */
  26
  27 #include "plugin_transport_http.h"
  28
  29 #if VERBOSE_CLIENT
  30 /**
  31  * Function to log curl debug messages with GNUNET_log
  32  * @param curl handle
  33  * @param type curl_infotype
  34  * @param data data
  35  * @param size size
  36  * @param cls  closure
  37  * @return 0
  38  */
  39 static int
  40 client_log (CURL * curl, curl_infotype type, char *data, size_t size, void *cls)
  41 {
  42   if (type == CURLINFO_TEXT)
  43   {
  44     char text[size + 2];
  45
  46     memcpy (text, data, size);
  47     if (text[size - 1] == '\n')
  48       text[size] = '\0';
  49     else
  50     {
  51       text[size] = '\n';
  52       text[size + 1] = '\0';
  53     }
  54     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Client: %X - %s", cls, text);
  55   }
  56   return 0;
  57 }
  58 #endif
  59
  60 int
  61 client_send (struct Session *s, const char *msgbuf, size_t msgbuf_size)
  62 {
  63   return GNUNET_OK;
  64 }
  65
  66 /**
  67  * Task performing curl operations
  68  * @param cls plugin as closure
  69  * @param tc gnunet scheduler task context
  70  */
  71 static void
  72 client_run (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
  73
  74 /**
  75  * Function setting up file descriptors and scheduling task to run
  76  *
  77  * @param  plugin plugin as closure
  78  * @return GNUNET_SYSERR for hard failure, GNUNET_OK for ok
  79  */
  80 static int
  81 client_schedule (struct Plugin *plugin)
  82 {
  83   fd_set rs;
  84   fd_set ws;
  85   fd_set es;
  86   int max;
  87   struct GNUNET_NETWORK_FDSet *grs;
  88   struct GNUNET_NETWORK_FDSet *gws;
  89   long to;
  90   CURLMcode mret;
  91   struct GNUNET_TIME_Relative timeout;
  92
  93   /* Cancel previous scheduled task */
  94   if (plugin->client_perform_task!= GNUNET_SCHEDULER_NO_TASK)
  95   {
  96     GNUNET_SCHEDULER_cancel (plugin->client_perform_task);
  97     plugin->client_perform_task = GNUNET_SCHEDULER_NO_TASK;
  98   }
  99
 100   max = -1;
 101   FD_ZERO (&rs);
 102   FD_ZERO (&ws);
 103   FD_ZERO (&es);
 104   mret = curl_multi_fdset (plugin->client_mh, &rs, &ws, &es, &max);
 105   if (mret != CURLM_OK)
 106   {
 107     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("%s failed at %s:%d: `%s'\n"),
 108                 "curl_multi_fdset", __FILE__, __LINE__,
 109                 curl_multi_strerror (mret));
 110     return GNUNET_SYSERR;
 111   }
 112   mret = curl_multi_timeout (plugin->client_mh, &to);
 113   if (to == -1)
 114     timeout = GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 5);
 115   else
 116     timeout = GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MILLISECONDS, to);
 117   if (mret != CURLM_OK)
 118   {
 119     GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _("%s failed at %s:%d: `%s'\n"),
 120                 "curl_multi_timeout", __FILE__, __LINE__,
 121                 curl_multi_strerror (mret));
 122     return GNUNET_SYSERR;
 123   }
 124
 125   grs = GNUNET_NETWORK_fdset_create ();
 126   gws = GNUNET_NETWORK_fdset_create ();
 127   GNUNET_NETWORK_fdset_copy_native (grs, &rs, max + 1);
 128   GNUNET_NETWORK_fdset_copy_native (gws, &ws, max + 1);
 129
 130   plugin->client_perform_task =
 131       GNUNET_SCHEDULER_add_select (GNUNET_SCHEDULER_PRIORITY_DEFAULT,
 132                                    GNUNET_SCHEDULER_NO_TASK,
 133                                    timeout,
 134                                    grs,
 135                                    gws,
 136                                    &client_run,
 137                                    plugin);
 138   GNUNET_NETWORK_fdset_destroy (gws);
 139   GNUNET_NETWORK_fdset_destroy (grs);
 140   return GNUNET_OK;
 141 }
 142
 143
 144 /**
 145  * Task performing curl operations
 146  * @param cls plugin as closure
 147  * @param tc gnunet scheduler task context
 148  */
 149 static void
 150 client_run (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
 151 {
 152   struct Plugin *plugin = cls;
 153   static unsigned int handles_last_run;
 154   int running;
 155   CURLMcode mret;
 156
 157   GNUNET_assert (cls != NULL);
 158
 159   plugin->client_perform_task = GNUNET_SCHEDULER_NO_TASK;
 160   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
 161     return;
 162
 163   do
 164   {
 165     running = 0;
 166     mret = curl_multi_perform (plugin->client_mh, &running);
 167
 168     CURLMsg * msg;
 169     int msgs_left;
 170     while ((msg = curl_multi_info_read(plugin->client_mh, &msgs_left)))
 171     {
 172        CURL *easy_h  = msg->easy_handle;
 173        struct Session *s;
 174        GNUNET_assert (easy_h != NULL);
 175
 176        GNUNET_assert (CURLE_OK == curl_easy_getinfo(easy_h, CURLINFO_PRIVATE, &s));
 177        GNUNET_assert (s != NULL);
 178
 179        if (msg->msg == CURLMSG_DONE)
 180        {
 181 #if DEBUG_HTTP
 182          GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 183                    "Connection to '%s'  %s ended\n", GNUNET_i2s(&s->target), http_plugin_address_to_string(plugin, s->addr, s->addrlen));
 184 #endif
 185          client_disconnect(s);
 186          notify_session_end (plugin, &s->target, s);
 187        }
 188     }
 189
 190     handles_last_run = running;
 191   }
 192   while (mret == CURLM_CALL_MULTI_PERFORM);
 193   client_schedule (plugin);
 194 }
 195
 196 int
 197 client_disconnect (struct Session *s)
 198 {
 199   int res = GNUNET_OK;
 200   CURLMcode mret;
 201   struct Plugin *plugin = plugin;
 202
 203 #if DEBUG_HTTP
 204   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 205                    "Deleting outbound PUT session to peer `%s'\n",
 206                    GNUNET_i2s (&s->target));
 207 #endif
 208
 209   if (s->client_put != NULL)
 210   {
 211     mret = curl_multi_remove_handle (plugin->client_mh, s->client_put);
 212     if (mret != CURLM_OK)
 213     {
 214       curl_easy_cleanup (s->client_put);
 215       res = GNUNET_SYSERR;
 216       GNUNET_break (0);
 217     }
 218     curl_easy_cleanup (s->client_put);
 219     s->client_put = NULL;
 220   }
 221
 222 #if DEBUG_HTTP
 223   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 224                    "Deleting outbound GET session to peer `%s'\n",
 225                    GNUNET_i2s (&s->target));
 226 #endif
 227
 228   if (s->client_get != NULL)
 229   {
 230     mret = curl_multi_remove_handle (plugin->client_mh, s->client_get);
 231     if (mret != CURLM_OK)
 232     {
 233       curl_easy_cleanup (s->client_get);
 234       res = GNUNET_SYSERR;
 235       GNUNET_break (0);
 236     }
 237     curl_easy_cleanup (s->client_get);
 238     s->client_get = NULL;
 239   }
 240
 241   plugin->cur_connections -= 2;
 242
 243   /* Re-schedule since handles have changed */
 244   if (plugin->client_perform_task!= GNUNET_SCHEDULER_NO_TASK)
 245   {
 246     GNUNET_SCHEDULER_cancel (plugin->client_perform_task);
 247     plugin->client_perform_task = GNUNET_SCHEDULER_NO_TASK;
 248   }
 249   plugin->client_perform_task = GNUNET_SCHEDULER_add_now(client_run, plugin);
 250
 251   return res;
 252 }
 253
 254
 255 int
 256 client_connect (struct Session *s)
 257 {
 258   struct Plugin *plugin = s->plugin;
 259   int res = GNUNET_OK;
 260   char *url;
 261   CURLMcode mret;
 262
 263 #if VERBOSE_CLIENT
 264   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 265                    "Initiating outbound session peer `%s'\n",
 266                    GNUNET_i2s (&s->target));
 267 #endif
 268
 269   s->inbound = GNUNET_NO;
 270
 271   plugin->last_tag++;
 272   /* create url */
 273   GNUNET_asprintf (&url, "%s%s;%u", http_plugin_address_to_string (plugin, s->addr, s->addrlen), GNUNET_h2s_full (&plugin->env->my_identity->hashPubKey),plugin->last_tag);
 274 #if 0
 275   GNUNET_log_from (GNUNET_ERROR_TYPE_DEBUG, plugin->name,
 276                    "URL `%s'\n",
 277                    url);
 278 #endif
 279   /* create get connection */
 280   s->client_get = curl_easy_init ();
 281 #if VERBOSE_CLIENT
 282   curl_easy_setopt (s->client_get, CURLOPT_VERBOSE, 1L);
 283   curl_easy_setopt (s->client_get, CURLOPT_DEBUGFUNCTION, &client_log);
 284   curl_easy_setopt (s->client_get, CURLOPT_DEBUGDATA, s->client_get);
 285 #endif
 286 #if BUILD_HTTPS
 287   curl_easy_setopt (s->client_get, CURLOPT_SSLVERSION, CURL_SSLVERSION_TLSv1);
 288   curl_easy_setopt (s->client_get, CURLOPT_SSL_VERIFYPEER, 0);
 289   curl_easy_setopt (s->client_get, CURLOPT_SSL_VERIFYHOST, 0);
 290 #endif
 291   curl_easy_setopt (s->client_get, CURLOPT_URL, url);
 292   //curl_easy_setopt (s->client_get, CURLOPT_HEADERFUNCTION, &curl_get_header_cb);
 293   //curl_easy_setopt (s->client_get, CURLOPT_WRITEHEADER, ps);
 294   //curl_easy_setopt (s->client_get, CURLOPT_READFUNCTION, curl_send_cb);
 295   //curl_easy_setopt (s->client_get, CURLOPT_READDATA, ps);
 296   //curl_easy_setopt (s->client_get, CURLOPT_WRITEFUNCTION, curl_receive_cb);
 297   //curl_easy_setopt (s->client_get, CURLOPT_WRITEDATA, ps);
 298   curl_easy_setopt (s->client_get, CURLOPT_TIMEOUT_MS,
 299                     (long) GNUNET_CONSTANTS_IDLE_CONNECTION_TIMEOUT.rel_value);
 300   curl_easy_setopt (s->client_get, CURLOPT_PRIVATE, s);
 301   curl_easy_setopt (s->client_get, CURLOPT_CONNECTTIMEOUT_MS,
 302                     (long) HTTP_NOT_VALIDATED_TIMEOUT.rel_value);
 303   curl_easy_setopt (s->client_get, CURLOPT_BUFFERSIZE,
 304                     2 * GNUNET_SERVER_MAX_MESSAGE_SIZE);
 305 #if CURL_TCP_NODELAY
 306   curl_easy_setopt (ps->recv_endpoint, CURLOPT_TCP_NODELAY, 1);
 307 #endif
 308
 309   /* create put connection */
 310   s->client_put = curl_easy_init ();
 311 #if VERBOSE_CLIENT
 312   curl_easy_setopt (s->client_put, CURLOPT_VERBOSE, 1L);
 313   curl_easy_setopt (s->client_put, CURLOPT_DEBUGFUNCTION, &client_log);
 314   curl_easy_setopt (s->client_put, CURLOPT_DEBUGDATA, s->client_put);
 315 #endif
 316 #if BUILD_HTTPS
 317   curl_easy_setopt (s->client_put, CURLOPT_SSLVERSION, CURL_SSLVERSION_TLSv1);
 318   curl_easy_setopt (s->client_put, CURLOPT_SSL_VERIFYPEER, 0);
 319   curl_easy_setopt (s->client_put, CURLOPT_SSL_VERIFYHOST, 0);
 320 #endif
 321   curl_easy_setopt (s->client_put, CURLOPT_URL, url);
 322   curl_easy_setopt (s->client_put, CURLOPT_PUT, 1L);
 323   //curl_easy_setopt (s->client_put, CURLOPT_HEADERFUNCTION, &curl_put_header_cb);
 324   //curl_easy_setopt (s->client_put, CURLOPT_WRITEHEADER, ps);
 325   //curl_easy_setopt (s->client_put, CURLOPT_READFUNCTION, curl_send_cb);
 326   //curl_easy_setopt (s->client_put, CURLOPT_READDATA, ps);
 327   //curl_easy_setopt (s->client_put, CURLOPT_WRITEFUNCTION, curl_receive_cb);
 328   //curl_easy_setopt (s->client_put, CURLOPT_WRITEDATA, ps);
 329   curl_easy_setopt (s->client_put, CURLOPT_TIMEOUT_MS,
 330                     (long) GNUNET_CONSTANTS_IDLE_CONNECTION_TIMEOUT.rel_value);
 331   curl_easy_setopt (s->client_put, CURLOPT_PRIVATE, s);
 332   curl_easy_setopt (s->client_put, CURLOPT_CONNECTTIMEOUT_MS,
 333                     (long) HTTP_NOT_VALIDATED_TIMEOUT.rel_value);
 334   curl_easy_setopt (s->client_put, CURLOPT_BUFFERSIZE,
 335                     2 * GNUNET_SERVER_MAX_MESSAGE_SIZE);
 336 #if CURL_TCP_NODELAY
 337   curl_easy_setopt (s->client_put, CURLOPT_TCP_NODELAY, 1);
 338 #endif
 339
 340   GNUNET_free (url);
 341
 342   mret = curl_multi_add_handle (plugin->client_mh, s->client_get);
 343   if (mret != CURLM_OK)
 344   {
 345     curl_easy_cleanup (s->client_get);
 346     res = GNUNET_SYSERR;
 347     GNUNET_break (0);
 348   }
 349
 350   mret = curl_multi_add_handle (plugin->client_mh, s->client_put);
 351   if (mret != CURLM_OK)
 352   {
 353     curl_multi_remove_handle (plugin->client_mh, s->client_get);
 354     curl_easy_cleanup (s->client_get);
 355     curl_easy_cleanup (s->client_put);
 356     res = GNUNET_SYSERR;
 357     GNUNET_break (0);
 358   }
 359
 360   /* Perform connect */
 361   plugin->cur_connections += 2;
 362
 363   /* Re-schedule since handles have changed */
 364   if (plugin->client_perform_task!= GNUNET_SCHEDULER_NO_TASK)
 365   {
 366     GNUNET_SCHEDULER_cancel (plugin->client_perform_task);
 367     plugin->client_perform_task = GNUNET_SCHEDULER_NO_TASK;
 368   }
 369   plugin->client_perform_task = GNUNET_SCHEDULER_add_now (client_run, plugin);
 370
 371   return res;
 372 }
 373
 374 int
 375 client_start (struct Plugin *plugin)
 376 {
 377   int res = GNUNET_OK;
 378
 379   curl_global_init (CURL_GLOBAL_ALL);
 380   plugin->client_mh = curl_multi_init ();
 381
 382   if (NULL == plugin->client_mh)
 383   {
 384     GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR, plugin->name,
 385                      _
 386                      ("Could not initialize curl multi handle, failed to start %s plugin!\n"),
 387                      plugin->name);
 388     res = GNUNET_SYSERR;
 389   }
 390   return res;
 391 }
 392
 393 void
 394 client_stop (struct Plugin *plugin)
 395 {
 396   if (plugin->client_perform_task != GNUNET_SCHEDULER_NO_TASK)
 397   {
 398     GNUNET_SCHEDULER_cancel (plugin->client_perform_task);
 399     plugin->client_perform_task = GNUNET_SCHEDULER_NO_TASK;
 400   }
 401
 402   curl_multi_cleanup (plugin->client_mh);
 403   curl_global_cleanup ();
 404 }
 405
 406
 407
 408 /* end of plugin_transport_http_client.c */