2 This file is part of GNUnet
3 (C) 2002-2014 Christian Grothoff (and other contributing authors)
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.
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.
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.
22 * @file transport/plugin_transport_http_client.c
23 * @brief HTTP/S client transport plugin
24 * @author Matthias Wachs
25 * @author Christian Grothoff
29 #define PLUGIN_NAME "https_client"
30 #define HTTP_STAT_STR_CONNECTIONS "# HTTPS client connections"
31 #define LIBGNUNET_PLUGIN_TRANSPORT_INIT libgnunet_plugin_transport_https_client_init
32 #define LIBGNUNET_PLUGIN_TRANSPORT_DONE libgnunet_plugin_transport_https_client_done
34 #define PLUGIN_NAME "http_client"
35 #define HTTP_STAT_STR_CONNECTIONS "# HTTP client connections"
36 #define LIBGNUNET_PLUGIN_TRANSPORT_INIT libgnunet_plugin_transport_http_client_init
37 #define LIBGNUNET_PLUGIN_TRANSPORT_DONE libgnunet_plugin_transport_http_client_done
40 #define VERBOSE_CURL GNUNET_NO
42 #define PUT_DISCONNECT_TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 1)
44 #define ENABLE_PUT GNUNET_YES
45 #define ENABLE_GET GNUNET_YES
48 #include "gnunet_util_lib.h"
49 #include "gnunet_protocols.h"
50 #include "gnunet_transport_plugin.h"
51 #include "plugin_transport_http_common.h"
52 #include <curl/curl.h>
55 #define LOG(kind,...) GNUNET_log_from(kind, PLUGIN_NAME, __VA_ARGS__)
58 * Encapsulation of all of the state of the plugin.
60 struct HTTP_Client_Plugin;
63 * State of a HTTP PUT request
65 enum HTTP_PUT_REQUEST_STATE
68 * Just created, not yet connected
78 * Paused, nothing to send
83 * Temporary disconnect in progress due to inactivity
88 * Send request while temporary disconnect, reconnect
90 H_TMP_RECONNECT_REQUIRED,
93 * Temporarily disconnected
104 * Message to send using http
109 * next pointer for double linked list
111 struct HTTP_Message *next;
114 * previous pointer for double linked list
116 struct HTTP_Message *prev;
119 * buffer containing data to send
124 * Continuation function to call once the transmission buffer
125 * has again space available. NULL if there is no
126 * continuation to call.
128 GNUNET_TRANSPORT_TransmitContinuation transmit_cont;
131 * Closure for @e transmit_cont.
133 void *transmit_cont_cls;
136 * amount of data already sent
149 * Session handle for HTTP(S) connections.
161 * Current state of this request
163 enum HTTP_PUT_REQUEST_STATE state;
166 * The curl easy handle
171 * The related session
178 * Session handle for connections.
183 * The URL to connect to
190 struct GNUNET_HELLO_Address *address;
193 * Pointer to the global plugin struct.
195 struct HTTP_Client_Plugin *plugin;
198 * Handle for the HTTP PUT request.
200 struct RequestHandle put;
203 * Handle for the HTTP GET request.
205 struct RequestHandle get;
208 * next pointer for double linked list
210 struct HTTP_Message *msg_head;
213 * previous pointer for double linked list
215 struct HTTP_Message *msg_tail;
218 * Message stream tokenizer for incoming data
220 struct GNUNET_SERVER_MessageStreamTokenizer *msg_tk;
223 * Session timeout task
225 GNUNET_SCHEDULER_TaskIdentifier put_disconnect_task;
228 * Session timeout task
230 GNUNET_SCHEDULER_TaskIdentifier timeout_task;
233 * Task to wake up client receive handle when receiving is allowed again
235 GNUNET_SCHEDULER_TaskIdentifier recv_wakeup_task;
238 * Absolute time when to receive data again.
239 * Used for receive throttling.
241 struct GNUNET_TIME_Absolute next_receive;
244 * When does this session time out.
246 struct GNUNET_TIME_Absolute timeout;
249 * Number of bytes waiting for transmission to this peer.
251 unsigned long long bytes_in_queue;
254 * Outbound overhead due to HTTP connection
255 * Add to next message of this session when calling callback
260 * Number of messages waiting for transmission to this peer.
262 unsigned int msgs_in_queue;
265 * ATS network type in NBO
267 uint32_t ats_address_network_type;
272 * Encapsulation of all of the state of the plugin.
274 struct HTTP_Client_Plugin
279 struct GNUNET_TRANSPORT_PluginEnvironment *env;
284 struct GNUNET_CONTAINER_MultiPeerMap *sessions;
287 * Function to call about session status changes.
289 GNUNET_TRANSPORT_SessionInfoCallback sic;
292 * Closure for @e sic.
307 * Proxy configuration: hostname or ip of the proxy server
309 char *proxy_hostname;
312 * Username for the proxy server
314 char *proxy_username;
317 * Password for the proxy server
319 char *proxy_password;
324 CURLM *curl_multi_handle;
329 GNUNET_SCHEDULER_TaskIdentifier client_perform_task;
332 * Type of proxy server:
334 * Valid values as supported by curl:
335 * CURLPROXY_HTTP, CURLPROXY_HTTP_1_0 CURLPROXY_SOCKS4, CURLPROXY_SOCKS5,
336 * CURLPROXY_SOCKS4A, CURLPROXY_SOCKS5_HOSTNAME
338 curl_proxytype proxytype;
341 * Use proxy tunneling:
342 * Tunnel all operations through a given HTTP instead of have the proxy
343 * evaluate the HTTP request
345 * Default: #GNUNET_NO, #GNUNET_YES experimental
347 int proxy_use_httpproxytunnel;
350 * My options to be included in the address
355 * Maximum number of sockets the plugin can use
356 * Each http connections are two requests
358 unsigned int max_requests;
361 * Current number of sockets the plugin can use
362 * Each http connections are two requests
364 unsigned int cur_requests;
367 * Last used unique HTTP connection tag
382 * Should we emulate an XHR client for testing?
388 * Disconnect a session
390 * @param cls the `struct HTTP_Client_Plugin *`
392 * @return #GNUNET_OK on success, #GNUNET_SYSERR on error
395 http_client_plugin_session_disconnect (void *cls, struct Session *s);
398 * If a session monitor is attached, notify it about the new
401 * @param plugin our plugin
402 * @param session session that changed state
403 * @param state new state of the session
406 notify_session_monitor (struct HTTP_Client_Plugin *plugin,
407 struct Session *session,
408 enum GNUNET_TRANSPORT_SessionState state)
410 struct GNUNET_TRANSPORT_SessionInfo info;
412 if (NULL == plugin->sic)
414 memset (&info, 0, sizeof (info));
416 info.is_inbound = GNUNET_NO;
417 info.num_msg_pending = session->msgs_in_queue;
418 info.num_bytes_pending = session->bytes_in_queue;
419 info.receive_delay = session->next_receive;
420 info.session_timeout = session->timeout;
421 info.address = session->address;
422 plugin->sic (plugin->sic_cls,
429 * Delete session @a s.
431 * @param s the session to delete
434 client_delete_session (struct Session *s)
436 struct HTTP_Client_Plugin *plugin = s->plugin;
437 struct HTTP_Message *pos;
438 struct HTTP_Message *next;
441 if (GNUNET_SCHEDULER_NO_TASK != s->timeout_task)
443 GNUNET_SCHEDULER_cancel (s->timeout_task);
444 s->timeout_task = GNUNET_SCHEDULER_NO_TASK;
445 s->timeout = GNUNET_TIME_UNIT_ZERO_ABS;
447 if (GNUNET_SCHEDULER_NO_TASK != s->put_disconnect_task)
449 GNUNET_SCHEDULER_cancel (s->put_disconnect_task);
450 s->put_disconnect_task = GNUNET_SCHEDULER_NO_TASK;
452 if (GNUNET_SCHEDULER_NO_TASK != s->recv_wakeup_task)
454 GNUNET_SCHEDULER_cancel (s->recv_wakeup_task);
455 s->recv_wakeup_task = GNUNET_SCHEDULER_NO_TASK;
457 GNUNET_assert (GNUNET_OK ==
458 GNUNET_CONTAINER_multipeermap_remove (plugin->sessions,
461 if (NULL != s->put.easyhandle)
463 LOG (GNUNET_ERROR_TYPE_DEBUG,
464 "Session %p/request %p: disconnecting PUT request to peer `%s'\n",
467 GNUNET_i2s (&s->address->peer));
469 /* remove curl handle from multi handle */
470 mret = curl_multi_remove_handle (plugin->curl_multi_handle,
472 GNUNET_break (CURLM_OK == mret);
473 curl_easy_cleanup (s->put.easyhandle);
474 GNUNET_assert (plugin->cur_requests > 0);
475 plugin->cur_requests--;
476 s->put.easyhandle = NULL;
478 if (NULL != s->get.easyhandle)
480 LOG (GNUNET_ERROR_TYPE_DEBUG,
481 "Session %p/request %p: disconnecting GET request to peer `%s'\n",
482 s, s->get.easyhandle,
483 GNUNET_i2s (&s->address->peer));
484 /* remove curl handle from multi handle */
485 mret = curl_multi_remove_handle (plugin->curl_multi_handle,
487 GNUNET_break (CURLM_OK == mret);
488 curl_easy_cleanup (s->get.easyhandle);
489 GNUNET_assert (plugin->cur_requests > 0);
490 plugin->cur_requests--;
491 s->get.easyhandle = NULL;
494 GNUNET_STATISTICS_set (plugin->env->stats,
495 HTTP_STAT_STR_CONNECTIONS,
496 plugin->cur_requests,
499 while (NULL != (pos = next))
502 GNUNET_CONTAINER_DLL_remove (s->msg_head,
505 GNUNET_assert (0 < s->msgs_in_queue);
507 GNUNET_assert (pos->size <= s->bytes_in_queue);
508 s->bytes_in_queue -= pos->size;
509 if (NULL != pos->transmit_cont)
510 pos->transmit_cont (pos->transmit_cont_cls,
514 pos->pos + s->overhead);
518 GNUNET_assert (0 == s->msgs_in_queue);
519 GNUNET_assert (0 == s->bytes_in_queue);
520 notify_session_monitor (plugin,
522 GNUNET_TRANSPORT_SS_DONE);
523 if (NULL != s->msg_tk)
525 GNUNET_SERVER_mst_destroy (s->msg_tk);
528 GNUNET_HELLO_address_free (s->address);
529 GNUNET_free (s->url);
535 * Increment session timeout due to activity for session @a s.
537 * @param s the session
540 client_reschedule_session_timeout (struct Session *s)
542 GNUNET_assert (GNUNET_SCHEDULER_NO_TASK != s->timeout_task);
543 s->timeout = GNUNET_TIME_relative_to_absolute (GNUNET_CONSTANTS_IDLE_CONNECTION_TIMEOUT);
548 * Task performing curl operations
550 * @param cls plugin as closure
551 * @param tc gnunet scheduler task context
554 client_run (void *cls,
555 const struct GNUNET_SCHEDULER_TaskContext *tc);
559 * Function setting up file descriptors and scheduling task to run
561 * @param plugin the plugin as closure
562 * @param now schedule task in 1ms, regardless of what curl may say
563 * @return #GNUNET_SYSERR for hard failure, #GNUNET_OK for ok
566 client_schedule (struct HTTP_Client_Plugin *plugin,
573 struct GNUNET_NETWORK_FDSet *grs;
574 struct GNUNET_NETWORK_FDSet *gws;
577 struct GNUNET_TIME_Relative timeout;
579 /* Cancel previous scheduled task */
580 if (plugin->client_perform_task != GNUNET_SCHEDULER_NO_TASK)
582 GNUNET_SCHEDULER_cancel (plugin->client_perform_task);
583 plugin->client_perform_task = GNUNET_SCHEDULER_NO_TASK;
589 mret = curl_multi_fdset (plugin->curl_multi_handle, &rs, &ws, &es, &max);
590 if (mret != CURLM_OK)
592 LOG (GNUNET_ERROR_TYPE_ERROR, _("%s failed at %s:%d: `%s'\n"),
593 "curl_multi_fdset", __FILE__, __LINE__,
594 curl_multi_strerror (mret));
595 return GNUNET_SYSERR;
597 mret = curl_multi_timeout (plugin->curl_multi_handle, &to);
599 timeout = GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 1);
601 timeout = GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MILLISECONDS, to);
602 if (now == GNUNET_YES)
603 timeout = GNUNET_TIME_UNIT_MILLISECONDS;
605 if (mret != CURLM_OK)
607 LOG (GNUNET_ERROR_TYPE_ERROR,
608 _("%s failed at %s:%d: `%s'\n"),
609 "curl_multi_timeout", __FILE__, __LINE__,
610 curl_multi_strerror (mret));
611 return GNUNET_SYSERR;
614 grs = GNUNET_NETWORK_fdset_create ();
615 gws = GNUNET_NETWORK_fdset_create ();
616 GNUNET_NETWORK_fdset_copy_native (grs, &rs, max + 1);
617 GNUNET_NETWORK_fdset_copy_native (gws, &ws, max + 1);
619 /* Schedule task to run when select is ready to read or write */
620 plugin->client_perform_task =
621 GNUNET_SCHEDULER_add_select (GNUNET_SCHEDULER_PRIORITY_DEFAULT,
623 &client_run, plugin);
624 GNUNET_NETWORK_fdset_destroy (gws);
625 GNUNET_NETWORK_fdset_destroy (grs);
633 * @param curl the curl easy handle
634 * @param type message type
635 * @param data data to log, NOT a 0-terminated string
636 * @param size data length
637 * @param cls the closure
641 client_log (CURL *curl,
647 struct RequestHandle *ch = cls;
648 const char *ttype = "UNSPECIFIED";
651 if (! ((type == CURLINFO_TEXT) || (type == CURLINFO_HEADER_IN) || (type == CURLINFO_HEADER_OUT)))
658 case CURLINFO_HEADER_IN:
661 case CURLINFO_HEADER_OUT:
662 ttype = "HEADER_OUT";
664 GNUNET_assert (NULL != ch);
665 GNUNET_assert (NULL != ch->easyhandle);
666 GNUNET_assert (NULL != ch->s);
667 ch->s->overhead += size;
670 ttype = "UNSPECIFIED";
673 memcpy (text, data, size);
674 if (text[size - 1] == '\n')
681 text[size + 1] = '\0';
683 LOG (GNUNET_ERROR_TYPE_DEBUG,
693 * Connect GET request
695 * @param s the session to connect
696 * @return #GNUNET_OK on success, #GNUNET_SYSERR otherwise
699 client_connect_get (struct Session *s);
703 * Connect a HTTP put request
705 * @param s the session to connect
706 * @return #GNUNET_SYSERR for hard failure, #GNUNET_OK for success
709 client_connect_put (struct Session *s);
713 * Function that can be used by the transport service to transmit
714 * a message using the plugin. Note that in the case of a
715 * peer disconnecting, the continuation MUST be called
716 * prior to the disconnect notification itself. This function
717 * will be called with this peer's HELLO message to initiate
718 * a fresh connection to another peer.
721 * @param s which session must be used
722 * @param msgbuf the message to transmit
723 * @param msgbuf_size number of bytes in @a msgbuf
724 * @param priority how important is the message (most plugins will
725 * ignore message priority and just FIFO)
726 * @param to how long to wait at most for the transmission (does not
727 * require plugins to discard the message after the timeout,
728 * just advisory for the desired delay; most plugins will ignore
730 * @param cont continuation to call once the message has
731 * been transmitted (or if the transport is ready
732 * for the next transmission call; or if the
733 * peer disconnected...); can be NULL
734 * @param cont_cls closure for cont
735 * @return number of bytes used (on the physical network, with overheads);
736 * -1 on hard errors (i.e. address invalid); 0 is a legal value
737 * and does NOT mean that the message was not transmitted (DV)
740 http_client_plugin_send (void *cls,
744 unsigned int priority,
745 struct GNUNET_TIME_Relative to,
746 GNUNET_TRANSPORT_TransmitContinuation cont,
749 struct HTTP_Client_Plugin *plugin = cls;
750 struct HTTP_Message *msg;
753 LOG (GNUNET_ERROR_TYPE_DEBUG,
754 "Session %p/request %p: Sending message with %u to peer `%s' \n",
755 s, s->put.easyhandle,
756 msgbuf_size, GNUNET_i2s (&s->address->peer));
758 /* create new message and schedule */
759 msg = GNUNET_malloc (sizeof (struct HTTP_Message) + msgbuf_size);
761 msg->size = msgbuf_size;
763 msg->buf = (char *) &msg[1];
764 msg->transmit_cont = cont;
765 msg->transmit_cont_cls = cont_cls;
766 memcpy (msg->buf, msgbuf, msgbuf_size);
767 GNUNET_CONTAINER_DLL_insert_tail (s->msg_head,
771 s->bytes_in_queue += msg->size;
773 GNUNET_asprintf (&stat_txt,
774 "# bytes currently in %s_client buffers",
776 GNUNET_STATISTICS_update (plugin->env->stats,
777 stat_txt, msgbuf_size, GNUNET_NO);
778 GNUNET_free (stat_txt);
779 notify_session_monitor (plugin,
781 GNUNET_TRANSPORT_SS_UPDATE);
782 if (H_TMP_DISCONNECTING == s->put.state)
784 /* PUT request is currently getting disconnected */
785 s->put.state = H_TMP_RECONNECT_REQUIRED;
786 LOG (GNUNET_ERROR_TYPE_DEBUG,
787 "Session %p/request %p: currently disconnecting, reconnecting immediately\n",
792 if (H_PAUSED == s->put.state)
794 /* PUT request was paused, unpause */
795 GNUNET_assert (s->put_disconnect_task != GNUNET_SCHEDULER_NO_TASK);
796 GNUNET_SCHEDULER_cancel (s->put_disconnect_task);
797 s->put_disconnect_task = GNUNET_SCHEDULER_NO_TASK;
798 LOG (GNUNET_ERROR_TYPE_DEBUG,
799 "Session %p/request %p: unpausing request\n",
800 s, s->put.easyhandle);
801 s->put.state = H_CONNECTED;
802 if (NULL != s->put.easyhandle)
803 curl_easy_pause (s->put.easyhandle, CURLPAUSE_CONT);
805 else if (H_TMP_DISCONNECTED == s->put.state)
807 /* PUT request was disconnected, reconnect */
808 LOG (GNUNET_ERROR_TYPE_DEBUG, "Session %p: Reconnecting PUT request\n", s);
809 GNUNET_break (NULL == s->put.easyhandle);
810 if (GNUNET_SYSERR == client_connect_put (s))
812 /* Could not reconnect */
813 http_client_plugin_session_disconnect (plugin, s);
814 return GNUNET_SYSERR;
817 client_schedule (s->plugin, GNUNET_YES);
823 * Disconnect a session
825 * @param cls the `struct HTTP_Client_Plugin *`
827 * @return #GNUNET_OK on success, #GNUNET_SYSERR on error
830 http_client_plugin_session_disconnect (void *cls,
833 struct HTTP_Client_Plugin *plugin = cls;
835 LOG (GNUNET_ERROR_TYPE_DEBUG,
836 "Session %p: notifying transport about ending session\n",s);
837 plugin->env->session_end (plugin->env->cls, s->address, s);
838 client_delete_session (s);
840 /* Re-schedule since handles have changed */
841 if (plugin->client_perform_task != GNUNET_SCHEDULER_NO_TASK)
843 GNUNET_SCHEDULER_cancel (plugin->client_perform_task);
844 plugin->client_perform_task = GNUNET_SCHEDULER_NO_TASK;
846 client_schedule (plugin, GNUNET_YES);
853 * Function that is called to get the keepalive factor.
854 * #GNUNET_CONSTANTS_IDLE_CONNECTION_TIMEOUT is divided by this number to
855 * calculate the interval between keepalive packets.
857 * @param cls closure with the `struct Plugin`
858 * @return keepalive factor
861 http_client_query_keepalive_factor (void *cls)
868 * Callback to destroys all sessions on exit.
870 * @param cls the `struct HTTP_Client_Plugin *`
871 * @param peer identity of the peer
872 * @param value the `struct Session *`
873 * @return #GNUNET_OK (continue iterating)
876 destroy_session_cb (void *cls,
877 const struct GNUNET_PeerIdentity *peer,
880 struct HTTP_Client_Plugin *plugin = cls;
881 struct Session *session = value;
883 http_client_plugin_session_disconnect (plugin, session);
889 * Function that can be used to force the plugin to disconnect
890 * from the given peer and cancel all previous transmissions
891 * (and their continuationc).
894 * @param target peer from which to disconnect
897 http_client_plugin_peer_disconnect (void *cls,
898 const struct GNUNET_PeerIdentity *target)
900 struct HTTP_Client_Plugin *plugin = cls;
902 LOG (GNUNET_ERROR_TYPE_DEBUG,
903 "Transport tells me to disconnect `%s'\n",
904 GNUNET_i2s (target));
905 GNUNET_CONTAINER_multipeermap_get_multiple (plugin->sessions, target,
906 &destroy_session_cb, plugin);
911 * Closure for #session_lookup_client_by_address().
913 struct SessionClientCtx
916 * Address we are looking for.
918 const struct GNUNET_HELLO_Address *address;
921 * Session that was found.
928 * Locate the seession object for a given address.
930 * @param cls the `struct SessionClientCtx *`
931 * @param key peer identity
932 * @param value the `struct Session` to check
933 * @return #GNUNET_NO if found, #GNUNET_OK if not
936 session_lookup_client_by_address (void *cls,
937 const struct GNUNET_PeerIdentity *key,
940 struct SessionClientCtx *sc_ctx = cls;
941 struct Session *s = value;
943 if (0 == GNUNET_HELLO_address_cmp (sc_ctx->address,
954 * Check if a sessions exists for an specific address
956 * @param plugin the plugin
957 * @param address the address
958 * @return the session or NULL
960 static struct Session *
961 client_lookup_session (struct HTTP_Client_Plugin *plugin,
962 const struct GNUNET_HELLO_Address *address)
964 struct SessionClientCtx sc_ctx;
966 sc_ctx.address = address;
968 GNUNET_CONTAINER_multipeermap_iterate (plugin->sessions,
969 &session_lookup_client_by_address,
976 * When we have nothing to transmit, we pause the HTTP PUT
977 * after a while (so that gnurl stops asking). This task
978 * is the delayed task that actually disconnects the PUT.
980 * @param cls the `struct Session *` with the put
981 * @param tc scheduler context
984 client_put_disconnect (void *cls,
985 const struct GNUNET_SCHEDULER_TaskContext *tc)
987 struct Session *s = cls;
989 s->put_disconnect_task = GNUNET_SCHEDULER_NO_TASK;
990 LOG (GNUNET_ERROR_TYPE_DEBUG,
991 "Session %p/request %p: will be disconnected due to no activity\n",
992 s, s->put.easyhandle);
993 s->put.state = H_TMP_DISCONNECTING;
994 if (NULL != s->put.easyhandle)
995 curl_easy_pause (s->put.easyhandle, CURLPAUSE_CONT);
996 client_schedule (s->plugin, GNUNET_YES);
1001 * Callback method used with libcurl
1002 * Method is called when libcurl needs to read data during sending
1004 * @param stream pointer where to write data
1005 * @param size size of an individual element
1006 * @param nmemb count of elements that can be written to the buffer
1007 * @param cls our `struct Session`
1008 * @return bytes written to stream, returning 0 will terminate request!
1011 client_send_cb (void *stream,
1016 struct Session *s = cls;
1017 struct HTTP_Client_Plugin *plugin = s->plugin;
1018 struct HTTP_Message *msg = s->msg_head;
1022 if (H_TMP_DISCONNECTING == s->put.state)
1024 LOG (GNUNET_ERROR_TYPE_DEBUG,
1025 "Session %p/request %p: disconnect due to inactivity\n",
1026 s, s->put.easyhandle);
1032 if (GNUNET_YES == plugin->emulate_xhr)
1034 LOG (GNUNET_ERROR_TYPE_DEBUG,
1035 "Session %p/request %p: PUT request finished\n",
1036 s, s->put.easyhandle);
1037 s->put.state = H_TMP_DISCONNECTING;
1041 /* We have nothing to send, so pause PUT request */
1042 LOG (GNUNET_ERROR_TYPE_DEBUG,
1043 "Session %p/request %p: nothing to send, suspending\n",
1044 s, s->put.easyhandle);
1045 s->put_disconnect_task = GNUNET_SCHEDULER_add_delayed (PUT_DISCONNECT_TIMEOUT,
1046 &client_put_disconnect, s);
1047 s->put.state = H_PAUSED;
1048 return CURL_READFUNC_PAUSE;
1051 GNUNET_assert (msg->pos < msg->size);
1052 /* calculate how much fits in buffer */
1053 len = GNUNET_MIN (msg->size - msg->pos,
1055 memcpy (stream, &msg->buf[msg->pos], len);
1057 if (msg->pos == msg->size)
1059 LOG (GNUNET_ERROR_TYPE_DEBUG,
1060 "Session %p/request %p: sent message with %u bytes sent, removing message from queue\n",
1061 s, s->put.easyhandle, msg->size, msg->pos);
1062 /* Calling transmit continuation */
1063 GNUNET_CONTAINER_DLL_remove (s->msg_head,
1066 GNUNET_assert (0 < s->msgs_in_queue);
1068 GNUNET_assert (msg->size <= s->bytes_in_queue);
1069 s->bytes_in_queue -= msg->size;
1070 if (NULL != msg->transmit_cont)
1071 msg->transmit_cont (msg->transmit_cont_cls,
1075 msg->size + s->overhead);
1079 notify_session_monitor (plugin,
1081 GNUNET_TRANSPORT_SS_UPDATE);
1082 GNUNET_asprintf (&stat_txt,
1083 "# bytes currently in %s_client buffers",
1085 GNUNET_STATISTICS_update (plugin->env->stats,
1089 GNUNET_free (stat_txt);
1090 GNUNET_asprintf (&stat_txt,
1091 "# bytes transmitted via %s_client",
1093 GNUNET_STATISTICS_update (plugin->env->stats,
1097 GNUNET_free (stat_txt);
1103 * Wake up a curl handle which was suspended
1105 * @param cls the session
1106 * @param tc task context
1109 client_wake_up (void *cls,
1110 const struct GNUNET_SCHEDULER_TaskContext *tc)
1112 struct Session *s = cls;
1114 s->recv_wakeup_task = GNUNET_SCHEDULER_NO_TASK;
1115 if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
1117 LOG (GNUNET_ERROR_TYPE_DEBUG,
1118 "Session %p/request %p: Waking up GET handle\n",
1119 s, s->get.easyhandle);
1120 if (H_PAUSED == s->put.state)
1122 /* PUT request was paused, unpause */
1123 GNUNET_assert (s->put_disconnect_task != GNUNET_SCHEDULER_NO_TASK);
1124 GNUNET_SCHEDULER_cancel (s->put_disconnect_task);
1125 s->put_disconnect_task = GNUNET_SCHEDULER_NO_TASK;
1126 s->put.state = H_CONNECTED;
1127 if (NULL != s->put.easyhandle)
1128 curl_easy_pause (s->put.easyhandle, CURLPAUSE_CONT);
1130 if (NULL != s->get.easyhandle)
1131 curl_easy_pause (s->get.easyhandle, CURLPAUSE_CONT);
1136 * Callback for message stream tokenizer
1138 * @param cls the session
1139 * @param client not used
1140 * @param message the message received
1141 * @return always #GNUNET_OK
1144 client_receive_mst_cb (void *cls,
1146 const struct GNUNET_MessageHeader *message)
1148 struct Session *s = cls;
1149 struct HTTP_Client_Plugin *plugin;
1150 struct GNUNET_TIME_Relative delay;
1151 struct GNUNET_ATS_Information atsi;
1155 atsi.type = htonl (GNUNET_ATS_NETWORK_TYPE);
1156 atsi.value = s->ats_address_network_type;
1157 GNUNET_break (s->ats_address_network_type != ntohl (GNUNET_ATS_NET_UNSPECIFIED));
1159 delay = s->plugin->env->receive (plugin->env->cls,
1163 plugin->env->update_address_metrics (plugin->env->cls,
1167 GNUNET_asprintf (&stat_txt,
1168 "# bytes received via %s_client",
1170 GNUNET_STATISTICS_update (plugin->env->stats,
1172 ntohs (message->size),
1174 GNUNET_free (stat_txt);
1176 s->next_receive = GNUNET_TIME_relative_to_absolute (delay);
1177 if (GNUNET_TIME_absolute_get ().abs_value_us < s->next_receive.abs_value_us)
1179 LOG (GNUNET_ERROR_TYPE_DEBUG,
1180 "Client: peer `%s' address `%s' next read delayed for %s\n",
1181 GNUNET_i2s (&s->address->peer),
1182 http_common_plugin_address_to_string (s->plugin->protocol,
1183 s->address->address,
1184 s->address->address_length),
1185 GNUNET_STRINGS_relative_time_to_string (delay,
1188 client_reschedule_session_timeout (s);
1194 * Callback method used with libcurl when data for a PUT request are
1195 * received. We do not expect data here, so we just discard it.
1197 * @param stream pointer where to write data
1198 * @param size size of an individual element
1199 * @param nmemb count of elements that can be written to the buffer
1200 * @param cls destination pointer, passed to the libcurl handle
1201 * @return bytes read from stream
1204 client_receive_put (void *stream,
1209 return size * nmemb;
1214 * Callback method used with libcurl when data for a GET request are
1215 * received. Forward to MST
1217 * @param stream pointer where to write data
1218 * @param size size of an individual element
1219 * @param nmemb count of elements that can be written to the buffer
1220 * @param cls destination pointer, passed to the libcurl handle
1221 * @return bytes read from stream
1224 client_receive (void *stream,
1229 struct Session *s = cls;
1230 struct GNUNET_TIME_Absolute now;
1231 size_t len = size * nmemb;
1233 LOG (GNUNET_ERROR_TYPE_DEBUG,
1234 "Session %p / request %p: Received %u bytes from peer `%s'\n",
1235 s, s->get.easyhandle,
1236 len, GNUNET_i2s (&s->address->peer));
1237 now = GNUNET_TIME_absolute_get ();
1238 if (now.abs_value_us < s->next_receive.abs_value_us)
1240 struct GNUNET_TIME_Absolute now = GNUNET_TIME_absolute_get ();
1241 struct GNUNET_TIME_Relative delta
1242 = GNUNET_TIME_absolute_get_difference (now, s->next_receive);
1244 LOG (GNUNET_ERROR_TYPE_DEBUG,
1245 "Session %p / request %p: No inbound bandwidth available! Next read was delayed for %s\n",
1248 GNUNET_STRINGS_relative_time_to_string (delta,
1250 if (s->recv_wakeup_task != GNUNET_SCHEDULER_NO_TASK)
1252 GNUNET_SCHEDULER_cancel (s->recv_wakeup_task);
1253 s->recv_wakeup_task = GNUNET_SCHEDULER_NO_TASK;
1256 = GNUNET_SCHEDULER_add_delayed (delta,
1259 return CURL_WRITEFUNC_PAUSE;
1261 if (NULL == s->msg_tk)
1262 s->msg_tk = GNUNET_SERVER_mst_create (&client_receive_mst_cb,
1264 GNUNET_SERVER_mst_receive (s->msg_tk,
1275 * Task performing curl operations
1277 * @param cls plugin as closure
1278 * @param tc scheduler task context
1281 client_run (void *cls,
1282 const struct GNUNET_SCHEDULER_TaskContext *tc)
1284 struct HTTP_Client_Plugin *plugin = cls;
1286 long http_statuscode;
1289 int put_request; /* GNUNET_YES if easy handle is put, GNUNET_NO for get */
1292 plugin->client_perform_task = GNUNET_SCHEDULER_NO_TASK;
1293 if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
1296 /* While data are available or timeouts occured */
1300 /* Perform operations for all handles */
1301 mret = curl_multi_perform (plugin->curl_multi_handle, &running);
1303 /* Get additional information for all handles */
1304 while (NULL != (msg = curl_multi_info_read (plugin->curl_multi_handle, &msgs_left)))
1306 CURL *easy_h = msg->easy_handle;
1307 struct Session *s = NULL;
1308 char *d = NULL; /* curl requires 'd' to be a 'char *' */
1310 GNUNET_assert (NULL != easy_h);
1312 /* Obtain session from easy handle */
1313 GNUNET_assert (CURLE_OK == curl_easy_getinfo (easy_h, CURLINFO_PRIVATE, &d));
1314 s = (struct Session *) d;
1315 GNUNET_assert (NULL != s);
1317 if (msg->msg != CURLMSG_DONE)
1318 continue; /* This should not happen */
1320 /* Get HTTP response code */
1321 GNUNET_break (CURLE_OK == curl_easy_getinfo (easy_h,
1322 CURLINFO_RESPONSE_CODE, &http_statuscode));
1324 if (easy_h == s->put.easyhandle)
1325 put_request = GNUNET_YES;
1327 put_request = GNUNET_NO;
1329 /* Log status of terminated request */
1330 if ((0 != msg->data.result) || (http_statuscode != 200))
1331 LOG (GNUNET_ERROR_TYPE_DEBUG,
1332 "Session %p/request %p: %s request to `%s' ended with status %i reason %i: `%s'\n",
1333 s, msg->easy_handle,
1334 (GNUNET_YES == put_request) ? "PUT" : "GET",
1335 GNUNET_i2s (&s->address->peer),
1338 curl_easy_strerror (msg->data.result));
1340 LOG (GNUNET_ERROR_TYPE_DEBUG,
1341 "Session %p/request %p: %s request to `%s' ended normal\n",
1342 s, msg->easy_handle,
1343 (GNUNET_YES == put_request) ? "PUT" : "GET",
1344 GNUNET_i2s (&s->address->peer));
1346 /* Remove easy handle from multi handle */
1347 curl_multi_remove_handle (plugin->curl_multi_handle, easy_h);
1349 /* Clean up easy handle */
1350 curl_easy_cleanup (easy_h);
1352 /* Remove information */
1353 GNUNET_assert (plugin->cur_requests > 0);
1354 plugin->cur_requests--;
1355 LOG (GNUNET_ERROR_TYPE_INFO,
1356 "%s request to %s done, number of requests decreased to %u\n",
1357 (GNUNET_YES == put_request) ? "PUT" : "GET",
1359 plugin->cur_requests);
1361 if (GNUNET_YES == put_request)
1363 /* Clean up a PUT request */
1364 s->put.easyhandle = NULL;
1367 switch (s->put.state) {
1368 case H_NOT_CONNECTED:
1369 case H_DISCONNECTED:
1370 case H_TMP_DISCONNECTED:
1371 /* This must not happen */
1374 case H_TMP_RECONNECT_REQUIRED:
1375 /* Transport called send while disconnect in progess, reconnect */
1376 if (GNUNET_SYSERR == client_connect_put (s))
1378 /* Reconnect failed, disconnect session */
1379 http_client_plugin_session_disconnect (plugin, s);
1382 case H_TMP_DISCONNECTING:
1383 /* PUT gets temporarily disconnected */
1384 s->put.state = H_TMP_DISCONNECTED;
1388 /* PUT gets permanently disconnected */
1389 s->put.state = H_DISCONNECTED;
1390 http_client_plugin_session_disconnect (plugin, s);
1397 else if (GNUNET_NO == put_request)
1399 /* Clean up a GET request */
1400 s->get.easyhandle = NULL;
1403 /* If we are emulating an XHR client we need to make another GET
1406 if (GNUNET_YES == plugin->emulate_xhr)
1408 if (GNUNET_SYSERR == client_connect_get (s))
1409 http_client_plugin_session_disconnect (plugin, s);
1413 /* GET request was terminated, so disconnect session */
1414 http_client_plugin_session_disconnect (plugin, s);
1418 GNUNET_break (0); /* Must not happen */
1420 GNUNET_STATISTICS_set (plugin->env->stats,
1421 HTTP_STAT_STR_CONNECTIONS,
1422 plugin->cur_requests,
1426 while (mret == CURLM_CALL_MULTI_PERFORM);
1427 client_schedule (plugin, GNUNET_NO);
1432 * Connect GET request for a session
1434 * @param s the session to connect
1435 * @return #GNUNET_OK on success, #GNUNET_SYSERR otherwise
1438 client_connect_get (struct Session *s)
1442 /* create get request */
1443 s->get.easyhandle = curl_easy_init ();
1446 curl_easy_setopt (s->get.easyhandle, CURLOPT_VERBOSE, 1L);
1447 curl_easy_setopt (s->get.easyhandle, CURLOPT_DEBUGFUNCTION, &client_log);
1448 curl_easy_setopt (s->get.easyhandle, CURLOPT_DEBUGDATA, &s->get);
1451 curl_easy_setopt (s->get.easyhandle, CURLOPT_SSLVERSION, CURL_SSLVERSION_TLSv1);
1453 struct HttpAddress *ha;
1455 ha = (struct HttpAddress *) s->address->address;
1457 if (HTTP_OPTIONS_VERIFY_CERTIFICATE ==
1458 (ntohl (ha->options) & HTTP_OPTIONS_VERIFY_CERTIFICATE))
1460 curl_easy_setopt (s->get.easyhandle, CURLOPT_SSL_VERIFYPEER, 1L);
1461 curl_easy_setopt (s->get.easyhandle, CURLOPT_SSL_VERIFYHOST, 2L);
1465 curl_easy_setopt (s->get.easyhandle, CURLOPT_SSL_VERIFYPEER, 0);
1466 curl_easy_setopt (s->get.easyhandle, CURLOPT_SSL_VERIFYHOST, 0);
1469 curl_easy_setopt (s->get.easyhandle, CURLOPT_PROTOCOLS, CURLPROTO_HTTPS);
1470 curl_easy_setopt (s->get.easyhandle, CURLOPT_REDIR_PROTOCOLS, CURLPROTO_HTTPS);
1472 curl_easy_setopt (s->get.easyhandle, CURLOPT_PROTOCOLS, CURLPROTO_HTTP);
1473 curl_easy_setopt (s->get.easyhandle, CURLOPT_REDIR_PROTOCOLS, CURLPROTO_HTTP);
1476 if (NULL != s->plugin->proxy_hostname)
1478 curl_easy_setopt (s->get.easyhandle, CURLOPT_PROXY, s->plugin->proxy_hostname);
1479 curl_easy_setopt (s->get.easyhandle, CURLOPT_PROXYTYPE, s->plugin->proxytype);
1480 if (NULL != s->plugin->proxy_username)
1481 curl_easy_setopt (s->get.easyhandle, CURLOPT_PROXYUSERNAME,
1482 s->plugin->proxy_username);
1483 if (NULL != s->plugin->proxy_password)
1484 curl_easy_setopt (s->get.easyhandle, CURLOPT_PROXYPASSWORD,
1485 s->plugin->proxy_password);
1486 if (GNUNET_YES == s->plugin->proxy_use_httpproxytunnel)
1487 curl_easy_setopt (s->get.easyhandle, CURLOPT_HTTPPROXYTUNNEL,
1488 s->plugin->proxy_use_httpproxytunnel);
1491 if (GNUNET_YES == s->plugin->emulate_xhr)
1495 GNUNET_asprintf(&url, "%s,1", s->url);
1496 curl_easy_setopt (s->get.easyhandle, CURLOPT_URL, url);
1499 curl_easy_setopt (s->get.easyhandle, CURLOPT_URL, s->url);
1500 //curl_easy_setopt (s->get.easyhandle, CURLOPT_HEADERFUNCTION, &curl_get_header_cb);
1501 //curl_easy_setopt (s->get.easyhandle, CURLOPT_WRITEHEADER, ps);
1502 curl_easy_setopt (s->get.easyhandle, CURLOPT_READFUNCTION, client_send_cb);
1503 curl_easy_setopt (s->get.easyhandle, CURLOPT_READDATA, s);
1504 curl_easy_setopt (s->get.easyhandle, CURLOPT_WRITEFUNCTION, client_receive);
1505 curl_easy_setopt (s->get.easyhandle, CURLOPT_WRITEDATA, s);
1506 /* No timeout by default, timeout done with session timeout */
1507 curl_easy_setopt (s->get.easyhandle, CURLOPT_TIMEOUT, 0);
1508 curl_easy_setopt (s->get.easyhandle, CURLOPT_PRIVATE, s);
1509 curl_easy_setopt (s->get.easyhandle, CURLOPT_CONNECTTIMEOUT_MS,
1510 (long) (HTTP_CLIENT_NOT_VALIDATED_TIMEOUT.rel_value_us / 1000LL));
1511 curl_easy_setopt (s->get.easyhandle, CURLOPT_BUFFERSIZE,
1512 2 * GNUNET_SERVER_MAX_MESSAGE_SIZE);
1513 #if CURL_TCP_NODELAY
1514 curl_easy_setopt (ps->recv_endpoint, CURLOPT_TCP_NODELAY, 1);
1516 curl_easy_setopt (s->get.easyhandle, CURLOPT_FOLLOWLOCATION, 0);
1518 mret = curl_multi_add_handle (s->plugin->curl_multi_handle,
1520 if (CURLM_OK != mret)
1522 LOG (GNUNET_ERROR_TYPE_ERROR,
1523 "Session %p : Failed to add GET handle to multihandle: `%s'\n",
1525 curl_multi_strerror (mret));
1526 curl_easy_cleanup (s->get.easyhandle);
1527 s->get.easyhandle = NULL;
1529 s->get.easyhandle = NULL;
1531 return GNUNET_SYSERR;
1533 s->plugin->cur_requests++;
1534 LOG (GNUNET_ERROR_TYPE_INFO,
1535 "GET request `%s' established, number of requests increased to %u\n",
1536 s->url, s->plugin->cur_requests);
1542 * Connect a HTTP put request
1544 * @param s the session to connect
1545 * @return #GNUNET_SYSERR for hard failure, #GNUNET_OK for ok
1548 client_connect_put (struct Session *s)
1552 /* create put request */
1553 LOG (GNUNET_ERROR_TYPE_DEBUG,
1554 "Session %p: Init PUT handle\n", s);
1555 s->put.easyhandle = curl_easy_init ();
1558 curl_easy_setopt (s->put.easyhandle, CURLOPT_VERBOSE, 1L);
1559 curl_easy_setopt (s->put.easyhandle, CURLOPT_DEBUGFUNCTION, &client_log);
1560 curl_easy_setopt (s->put.easyhandle, CURLOPT_DEBUGDATA, &s->put);
1563 curl_easy_setopt (s->put.easyhandle, CURLOPT_SSLVERSION, CURL_SSLVERSION_TLSv1);
1565 struct HttpAddress *ha;
1566 ha = (struct HttpAddress *) s->address->address;
1568 if (HTTP_OPTIONS_VERIFY_CERTIFICATE ==
1569 (ntohl (ha->options) & HTTP_OPTIONS_VERIFY_CERTIFICATE))
1571 curl_easy_setopt (s->put.easyhandle, CURLOPT_SSL_VERIFYPEER, 1L);
1572 curl_easy_setopt (s->put.easyhandle, CURLOPT_SSL_VERIFYHOST, 2L);
1576 curl_easy_setopt (s->put.easyhandle, CURLOPT_SSL_VERIFYPEER, 0);
1577 curl_easy_setopt (s->put.easyhandle, CURLOPT_SSL_VERIFYHOST, 0);
1580 curl_easy_setopt (s->put.easyhandle, CURLOPT_PROTOCOLS, CURLPROTO_HTTPS);
1581 curl_easy_setopt (s->put.easyhandle, CURLOPT_REDIR_PROTOCOLS, CURLPROTO_HTTPS);
1583 curl_easy_setopt (s->put.easyhandle, CURLOPT_PROTOCOLS, CURLPROTO_HTTP);
1584 curl_easy_setopt (s->put.easyhandle, CURLOPT_REDIR_PROTOCOLS, CURLPROTO_HTTP);
1586 if (s->plugin->proxy_hostname != NULL)
1588 curl_easy_setopt (s->put.easyhandle, CURLOPT_PROXY, s->plugin->proxy_hostname);
1589 curl_easy_setopt (s->put.easyhandle, CURLOPT_PROXYTYPE, s->plugin->proxytype);
1590 if (NULL != s->plugin->proxy_username)
1591 curl_easy_setopt (s->put.easyhandle, CURLOPT_PROXYUSERNAME,
1592 s->plugin->proxy_username);
1593 if (NULL != s->plugin->proxy_password)
1594 curl_easy_setopt (s->put.easyhandle, CURLOPT_PROXYPASSWORD,
1595 s->plugin->proxy_password);
1596 if (GNUNET_YES == s->plugin->proxy_use_httpproxytunnel)
1597 curl_easy_setopt (s->put.easyhandle, CURLOPT_HTTPPROXYTUNNEL,
1598 s->plugin->proxy_use_httpproxytunnel);
1601 curl_easy_setopt (s->put.easyhandle, CURLOPT_URL, s->url);
1602 curl_easy_setopt (s->put.easyhandle, CURLOPT_UPLOAD, 1L);
1603 //curl_easy_setopt (s->put.easyhandle, CURLOPT_HEADERFUNCTION, &client_curl_header);
1604 //curl_easy_setopt (s->put.easyhandle, CURLOPT_WRITEHEADER, ps);
1605 curl_easy_setopt (s->put.easyhandle, CURLOPT_READFUNCTION, client_send_cb);
1606 curl_easy_setopt (s->put.easyhandle, CURLOPT_READDATA, s);
1607 curl_easy_setopt (s->put.easyhandle, CURLOPT_WRITEFUNCTION, client_receive_put);
1608 curl_easy_setopt (s->put.easyhandle, CURLOPT_WRITEDATA, s);
1609 /* No timeout by default, timeout done with session timeout */
1610 curl_easy_setopt (s->put.easyhandle, CURLOPT_TIMEOUT, 0);
1611 curl_easy_setopt (s->put.easyhandle, CURLOPT_PRIVATE, s);
1612 curl_easy_setopt (s->put.easyhandle, CURLOPT_CONNECTTIMEOUT_MS,
1613 (long) (HTTP_CLIENT_NOT_VALIDATED_TIMEOUT.rel_value_us / 1000LL));
1614 curl_easy_setopt (s->put.easyhandle, CURLOPT_BUFFERSIZE,
1615 2 * GNUNET_SERVER_MAX_MESSAGE_SIZE);
1616 #if CURL_TCP_NODELAY
1617 curl_easy_setopt (s->put.easyhandle, CURLOPT_TCP_NODELAY, 1);
1619 mret = curl_multi_add_handle (s->plugin->curl_multi_handle,
1621 if (CURLM_OK != mret)
1623 LOG (GNUNET_ERROR_TYPE_ERROR,
1624 "Session %p : Failed to add PUT handle to multihandle: `%s'\n",
1625 s, curl_multi_strerror (mret));
1626 curl_easy_cleanup (s->put.easyhandle);
1627 s->put.easyhandle = NULL;
1628 s->put.easyhandle = NULL;
1630 s->put.state = H_DISCONNECTED;
1631 return GNUNET_SYSERR;
1633 s->put.state = H_CONNECTED;
1634 s->plugin->cur_requests++;
1636 LOG (GNUNET_ERROR_TYPE_INFO,
1637 "PUT request `%s' established, number of requests increased to %u\n",
1638 s->url, s->plugin->cur_requests);
1645 * Connect both PUT and GET request for a session
1647 * @param s the session to connect
1648 * @return #GNUNET_OK on success, #GNUNET_SYSERR otherwise
1651 client_connect (struct Session *s)
1653 struct HTTP_Client_Plugin *plugin = s->plugin;
1654 int res = GNUNET_OK;
1657 if (NULL == http_common_plugin_address_to_string(plugin->protocol,
1658 s->address->address, s->address->address_length))
1660 LOG(GNUNET_ERROR_TYPE_DEBUG, "Invalid address peer `%s'\n",
1661 GNUNET_i2s(&s->address->peer));
1662 return GNUNET_SYSERR;
1665 GNUNET_asprintf(&s->url, "%s/%s;%u",
1666 http_common_plugin_address_to_url(NULL, s->address->address,
1667 s->address->address_length),
1668 GNUNET_i2s_full(plugin->env->my_identity), plugin->last_tag);
1671 LOG (GNUNET_ERROR_TYPE_DEBUG,
1672 "Initiating outbound session peer `%s' using address `%s'\n",
1673 GNUNET_i2s (&s->address->peer), s->url);
1675 if (GNUNET_SYSERR == client_connect_get (s))
1676 return GNUNET_SYSERR;
1677 /* If we are emulating an XHR client then delay sending a PUT request until
1678 * there is something to send.
1680 if (GNUNET_YES == plugin->emulate_xhr)
1682 s->put.state = H_TMP_DISCONNECTED;
1684 else if (GNUNET_SYSERR == client_connect_put (s))
1685 return GNUNET_SYSERR;
1687 LOG (GNUNET_ERROR_TYPE_DEBUG,
1688 "Session %p: connected with GET %p and PUT %p\n",
1689 s, s->get.easyhandle, s->put.easyhandle);
1690 /* Perform connect */
1691 GNUNET_STATISTICS_set (plugin->env->stats,
1692 HTTP_STAT_STR_CONNECTIONS,
1693 plugin->cur_requests,
1695 /* Re-schedule since handles have changed */
1696 if (plugin->client_perform_task != GNUNET_SCHEDULER_NO_TASK)
1698 GNUNET_SCHEDULER_cancel (plugin->client_perform_task);
1699 plugin->client_perform_task = GNUNET_SCHEDULER_NO_TASK;
1702 /* Schedule task to run immediately */
1703 plugin->client_perform_task = GNUNET_SCHEDULER_add_now (client_run, plugin);
1709 * Function obtain the network type for a session
1711 * @param cls closure (`struct Plugin*`)
1712 * @param session the session
1713 * @return the network type
1715 static enum GNUNET_ATS_Network_Type
1716 http_client_plugin_get_network (void *cls,
1717 struct Session *session)
1719 return ntohl (session->ats_address_network_type);
1724 * Session was idle, so disconnect it
1726 * @param cls the `struct Session` of the idle session
1727 * @param tc scheduler context
1730 client_session_timeout (void *cls,
1731 const struct GNUNET_SCHEDULER_TaskContext *tc)
1733 struct Session *s = cls;
1734 struct GNUNET_TIME_Relative left;
1736 s->timeout_task = GNUNET_SCHEDULER_NO_TASK;
1737 left = GNUNET_TIME_absolute_get_remaining (s->timeout);
1738 if (0 != left.rel_value_us)
1740 /* not actually our turn yet, but let's at least update
1741 the monitor, it may think we're about to die ... */
1742 notify_session_monitor (s->plugin,
1744 GNUNET_TRANSPORT_SS_UPDATE);
1745 s->timeout_task = GNUNET_SCHEDULER_add_delayed (left,
1746 &client_session_timeout,
1751 "Session %p was idle for %s, disconnecting\n",
1753 GNUNET_STRINGS_relative_time_to_string (HTTP_CLIENT_SESSION_TIMEOUT,
1755 GNUNET_assert (GNUNET_OK ==
1756 http_client_plugin_session_disconnect (s->plugin,
1762 * Creates a new outbound session the transport service will use to
1763 * send data to the peer
1765 * @param cls the plugin
1766 * @param address the address
1767 * @return the session or NULL of max connections exceeded
1769 static struct Session *
1770 http_client_plugin_get_session (void *cls,
1771 const struct GNUNET_HELLO_Address *address)
1773 struct HTTP_Client_Plugin *plugin = cls;
1775 struct sockaddr *sa;
1776 struct GNUNET_ATS_Information ats;
1780 GNUNET_assert (NULL != address->address);
1782 /* find existing session */
1783 s = client_lookup_session (plugin, address);
1787 /* create a new session */
1788 if (plugin->max_requests <= plugin->cur_requests)
1790 LOG (GNUNET_ERROR_TYPE_WARNING,
1791 "Maximum number of requests (%u) reached: "
1792 "cannot connect to peer `%s'\n",
1793 plugin->max_requests,
1794 GNUNET_i2s (&address->peer));
1798 /* Determine network location */
1799 ats.type = htonl (GNUNET_ATS_NETWORK_TYPE);
1800 ats.value = htonl (GNUNET_ATS_NET_UNSPECIFIED);
1801 sa = http_common_socket_from_address (address->address, address->address_length, &res);
1802 if (GNUNET_SYSERR == res)
1804 if (GNUNET_YES == res)
1806 GNUNET_assert (NULL != sa);
1807 if (AF_INET == sa->sa_family)
1809 salen = sizeof (struct sockaddr_in);
1811 else if (AF_INET6 == sa->sa_family)
1813 salen = sizeof (struct sockaddr_in6);
1815 ats = plugin->env->get_address_type (plugin->env->cls, sa, salen);
1818 else if (GNUNET_NO == res)
1820 /* Cannot convert to sockaddr -> is external hostname */
1821 ats.value = htonl (GNUNET_ATS_NET_WAN);
1823 if (GNUNET_ATS_NET_UNSPECIFIED == ntohl (ats.value))
1829 s = GNUNET_new (struct Session);
1831 s->address = GNUNET_HELLO_address_copy (address);
1832 s->ats_address_network_type = ats.value;
1834 s->put.state = H_NOT_CONNECTED;
1835 s->timeout = GNUNET_TIME_relative_to_absolute (HTTP_CLIENT_SESSION_TIMEOUT);
1836 s->timeout_task = GNUNET_SCHEDULER_add_delayed (HTTP_CLIENT_SESSION_TIMEOUT,
1837 &client_session_timeout,
1839 LOG (GNUNET_ERROR_TYPE_DEBUG,
1840 "Created new session %p for `%s' address `%s''\n",
1842 http_common_plugin_address_to_string (plugin->protocol,
1843 s->address->address,
1844 s->address->address_length),
1845 GNUNET_i2s (&s->address->peer));
1847 /* add new session */
1848 (void) GNUNET_CONTAINER_multipeermap_put (plugin->sessions,
1851 GNUNET_CONTAINER_MULTIHASHMAPOPTION_MULTIPLE);
1852 /* initiate new connection */
1853 if (GNUNET_SYSERR == client_connect (s))
1855 LOG (GNUNET_ERROR_TYPE_ERROR,
1856 "Cannot connect to peer `%s' address `%s''\n",
1857 http_common_plugin_address_to_string (plugin->protocol,
1858 s->address->address, s->address->address_length),
1859 GNUNET_i2s (&s->address->peer));
1860 client_delete_session (s);
1863 notify_session_monitor (plugin,
1865 GNUNET_TRANSPORT_SS_INIT);
1866 notify_session_monitor (plugin,
1868 GNUNET_TRANSPORT_SS_UP); /* or handshake? */
1874 * Setup http_client plugin
1876 * @param plugin the plugin handle
1877 * @return #GNUNET_OK on success, #GNUNET_SYSERR on error
1880 client_start (struct HTTP_Client_Plugin *plugin)
1882 curl_global_init (CURL_GLOBAL_ALL);
1883 plugin->curl_multi_handle = curl_multi_init ();
1885 if (NULL == plugin->curl_multi_handle)
1887 LOG (GNUNET_ERROR_TYPE_ERROR,
1888 _("Could not initialize curl multi handle, failed to start %s plugin!\n"),
1890 return GNUNET_SYSERR;
1897 * Another peer has suggested an address for this
1898 * peer and transport plugin. Check that this could be a valid
1899 * address. If so, consider adding it to the list
1902 * @param cls closure with the `struct Plugin`
1903 * @param addr pointer to the address
1904 * @param addrlen length of @a addr
1905 * @return #GNUNET_OK if this is a plausible address for this peer
1906 * and transport; always returns #GNUNET_NO (this is the client!)
1909 http_client_plugin_address_suggested (void *cls,
1913 /* A HTTP/S client does not have any valid address so:*/
1919 * Exit point from the plugin.
1921 * @param cls api as closure
1925 LIBGNUNET_PLUGIN_TRANSPORT_DONE (void *cls)
1927 struct GNUNET_TRANSPORT_PluginFunctions *api = cls;
1928 struct HTTP_Client_Plugin *plugin = api->cls;
1930 if (NULL == api->cls)
1936 LOG (GNUNET_ERROR_TYPE_DEBUG,
1937 _("Shutting down plugin `%s'\n"),
1939 GNUNET_CONTAINER_multipeermap_iterate (plugin->sessions,
1940 &destroy_session_cb,
1942 if (GNUNET_SCHEDULER_NO_TASK != plugin->client_perform_task)
1944 GNUNET_SCHEDULER_cancel (plugin->client_perform_task);
1945 plugin->client_perform_task = GNUNET_SCHEDULER_NO_TASK;
1947 if (NULL != plugin->curl_multi_handle)
1949 curl_multi_cleanup (plugin->curl_multi_handle);
1950 plugin->curl_multi_handle = NULL;
1952 curl_global_cleanup ();
1953 LOG (GNUNET_ERROR_TYPE_DEBUG,
1954 _("Shutdown for plugin `%s' complete\n"),
1956 GNUNET_CONTAINER_multipeermap_destroy (plugin->sessions);
1957 GNUNET_free_non_null (plugin->proxy_hostname);
1958 GNUNET_free_non_null (plugin->proxy_username);
1959 GNUNET_free_non_null (plugin->proxy_password);
1960 GNUNET_free (plugin);
1969 * @param plugin the plugin handle
1970 * @return #GNUNET_OK on success, #GNUNET_SYSERR on failure
1973 client_configure_plugin (struct HTTP_Client_Plugin *plugin)
1975 unsigned long long max_requests;
1979 /* Optional parameters */
1981 GNUNET_CONFIGURATION_get_value_number (plugin->env->cfg,
1986 plugin->max_requests = max_requests;
1988 LOG (GNUNET_ERROR_TYPE_DEBUG,
1989 _("Maximum number of requests is %u\n"),
1990 plugin->max_requests);
1992 /* Read proxy configuration */
1993 if (GNUNET_OK == GNUNET_CONFIGURATION_get_value_string (plugin->env->cfg,
1994 plugin->name, "PROXY", &plugin->proxy_hostname))
1996 LOG (GNUNET_ERROR_TYPE_DEBUG,
1997 "Found proxy host: `%s'\n",
1998 plugin->proxy_hostname);
1999 /* proxy username */
2001 GNUNET_CONFIGURATION_get_value_string (plugin->env->cfg,
2004 &plugin->proxy_username))
2006 LOG (GNUNET_ERROR_TYPE_DEBUG,
2007 "Found proxy username name: `%s'\n",
2008 plugin->proxy_username);
2011 /* proxy password */
2013 GNUNET_CONFIGURATION_get_value_string (plugin->env->cfg,
2016 &plugin->proxy_password))
2018 LOG (GNUNET_ERROR_TYPE_DEBUG,
2019 "Found proxy password name: `%s'\n",
2020 plugin->proxy_password);
2025 GNUNET_CONFIGURATION_get_value_string (plugin->env->cfg,
2030 GNUNET_STRINGS_utf8_toupper (proxy_type, proxy_type);
2032 if (0 == strcmp(proxy_type, "HTTP"))
2033 plugin->proxytype = CURLPROXY_HTTP;
2034 else if (0 == strcmp(proxy_type, "SOCKS4"))
2035 plugin->proxytype = CURLPROXY_SOCKS4;
2036 else if (0 == strcmp(proxy_type, "SOCKS5"))
2037 plugin->proxytype = CURLPROXY_SOCKS5;
2038 else if (0 == strcmp(proxy_type, "SOCKS4A"))
2039 plugin->proxytype = CURLPROXY_SOCKS4A;
2040 else if (0 == strcmp(proxy_type, "SOCKS5_HOSTNAME "))
2041 plugin->proxytype = CURLPROXY_SOCKS5_HOSTNAME ;
2044 LOG (GNUNET_ERROR_TYPE_ERROR,
2045 _("Invalid proxy type: `%s', disabling proxy! Check configuration!\n"),
2048 GNUNET_free (proxy_type);
2049 GNUNET_free (plugin->proxy_hostname);
2050 plugin->proxy_hostname = NULL;
2051 GNUNET_free_non_null (plugin->proxy_username);
2052 plugin->proxy_username = NULL;
2053 GNUNET_free_non_null (plugin->proxy_password);
2054 plugin->proxy_password = NULL;
2056 return GNUNET_SYSERR;
2059 LOG (GNUNET_ERROR_TYPE_DEBUG,
2060 "Found proxy type: `%s'\n",
2064 /* proxy http tunneling */
2065 plugin->proxy_use_httpproxytunnel
2066 = GNUNET_CONFIGURATION_get_value_yesno (plugin->env->cfg,
2068 "PROXY_HTTP_TUNNELING");
2069 if (GNUNET_SYSERR == plugin->proxy_use_httpproxytunnel)
2070 plugin->proxy_use_httpproxytunnel = GNUNET_NO;
2072 GNUNET_free_non_null (proxy_type);
2075 /* Should we emulate an XHR client for testing? */
2077 = GNUNET_CONFIGURATION_get_value_yesno (plugin->env->cfg,
2085 * Function to convert an address to a human-readable string.
2087 * @param cls closure
2088 * @param addr address to convert
2089 * @param addrlen address length
2090 * @return res string if conversion was successful, NULL otherwise
2093 http_client_plugin_address_to_string (void *cls,
2097 return http_common_plugin_address_to_string (PLUGIN_NAME,
2104 * Function that will be called whenever the transport service wants to
2105 * notify the plugin that a session is still active and in use and
2106 * therefore the session timeout for this session has to be updated
2108 * @param cls closure
2109 * @param peer which peer was the session for
2110 * @param session which session is being updated
2113 http_client_plugin_update_session_timeout (void *cls,
2114 const struct GNUNET_PeerIdentity *peer,
2115 struct Session *session)
2117 client_reschedule_session_timeout (session);
2122 * Function that will be called whenever the transport service wants to
2123 * notify the plugin that the inbound quota changed and that the plugin
2124 * should update it's delay for the next receive value
2126 * @param cls closure
2127 * @param peer which peer was the session for
2128 * @param s which session is being updated
2129 * @param delay new delay to use for receiving
2132 http_client_plugin_update_inbound_delay (void *cls,
2133 const struct GNUNET_PeerIdentity *peer,
2135 struct GNUNET_TIME_Relative delay)
2137 s->next_receive = GNUNET_TIME_relative_to_absolute (delay);
2138 LOG (GNUNET_ERROR_TYPE_DEBUG,
2139 "New inbound delay %s\n",
2140 GNUNET_STRINGS_relative_time_to_string (delay,
2142 if (s->recv_wakeup_task != GNUNET_SCHEDULER_NO_TASK)
2144 GNUNET_SCHEDULER_cancel (s->recv_wakeup_task);
2145 s->recv_wakeup_task = GNUNET_SCHEDULER_add_delayed (delay,
2146 &client_wake_up, s);
2152 * Return information about the given session to the
2155 * @param cls the `struct Plugin` with the monitor callback (`sic`)
2156 * @param peer peer we send information about
2157 * @param value our `struct Session` to send information about
2158 * @return #GNUNET_OK (continue to iterate)
2161 send_session_info_iter (void *cls,
2162 const struct GNUNET_PeerIdentity *peer,
2165 struct HTTP_Client_Plugin *plugin = cls;
2166 struct Session *session = value;
2168 notify_session_monitor (plugin,
2170 GNUNET_TRANSPORT_SS_INIT);
2171 notify_session_monitor (plugin,
2173 GNUNET_TRANSPORT_SS_UP); /* FIXME: or handshake? */
2179 * Begin monitoring sessions of a plugin. There can only
2180 * be one active monitor per plugin (i.e. if there are
2181 * multiple monitors, the transport service needs to
2182 * multiplex the generated events over all of them).
2184 * @param cls closure of the plugin
2185 * @param sic callback to invoke, NULL to disable monitor;
2186 * plugin will being by iterating over all active
2187 * sessions immediately and then enter monitor mode
2188 * @param sic_cls closure for @a sic
2191 http_client_plugin_setup_monitor (void *cls,
2192 GNUNET_TRANSPORT_SessionInfoCallback sic,
2195 struct HTTP_Client_Plugin *plugin = cls;
2198 plugin->sic_cls = sic_cls;
2201 GNUNET_CONTAINER_multipeermap_iterate (plugin->sessions,
2202 &send_session_info_iter,
2204 /* signal end of first iteration */
2205 sic (sic_cls, NULL, NULL);
2211 * Entry point for the plugin.
2214 LIBGNUNET_PLUGIN_TRANSPORT_INIT (void *cls)
2216 struct GNUNET_TRANSPORT_PluginEnvironment *env = cls;
2217 struct GNUNET_TRANSPORT_PluginFunctions *api;
2218 struct HTTP_Client_Plugin *plugin;
2220 if (NULL == env->receive)
2222 /* run in 'stub' mode (i.e. as part of gnunet-peerinfo), don't fully
2223 initialze the plugin or the API */
2224 api = GNUNET_new (struct GNUNET_TRANSPORT_PluginFunctions);
2226 api->address_to_string = &http_client_plugin_address_to_string;
2227 api->string_to_address = &http_common_plugin_string_to_address;
2228 api->address_pretty_printer = &http_common_plugin_address_pretty_printer;
2232 plugin = GNUNET_new (struct HTTP_Client_Plugin);
2234 plugin->sessions = GNUNET_CONTAINER_multipeermap_create (128,
2236 api = GNUNET_new (struct GNUNET_TRANSPORT_PluginFunctions);
2238 api->send = &http_client_plugin_send;
2239 api->disconnect_session = &http_client_plugin_session_disconnect;
2240 api->query_keepalive_factor = &http_client_query_keepalive_factor;
2241 api->disconnect_peer = &http_client_plugin_peer_disconnect;
2242 api->check_address = &http_client_plugin_address_suggested;
2243 api->get_session = &http_client_plugin_get_session;
2244 api->address_to_string = &http_client_plugin_address_to_string;
2245 api->string_to_address = &http_common_plugin_string_to_address;
2246 api->address_pretty_printer = &http_common_plugin_address_pretty_printer;
2247 api->get_network = &http_client_plugin_get_network;
2248 api->update_session_timeout = &http_client_plugin_update_session_timeout;
2249 api->update_inbound_delay = &http_client_plugin_update_inbound_delay;
2250 api->setup_monitor = &http_client_plugin_setup_monitor;
2252 plugin->name = "transport-https_client";
2253 plugin->protocol = "https";
2255 plugin->name = "transport-http_client";
2256 plugin->protocol = "http";
2258 plugin->last_tag = 1;
2260 if (GNUNET_SYSERR == client_configure_plugin (plugin))
2262 LIBGNUNET_PLUGIN_TRANSPORT_DONE (api);
2267 if (GNUNET_SYSERR == client_start (plugin))
2269 LIBGNUNET_PLUGIN_TRANSPORT_DONE (api);
2275 /* end of plugin_transport_http_client.c */