-/*\r
- This file is part of GNUnet\r
- (C) 2007, 2009, 2011, 2012 Christian Grothoff\r
-\r
- GNUnet is free software; you can redistribute it and/or modify\r
- it under the terms of the GNU General Public License as published\r
- by the Free Software Foundation; either version 2, or (at your\r
- option) any later version.\r
-\r
- GNUnet is distributed in the hope that it will be useful, but\r
- WITHOUT ANY WARRANTY; without even the implied warranty of\r
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU\r
- General Public License for more details.\r
-\r
- You should have received a copy of the GNU General Public License\r
- along with GNUnet; see the file COPYING. If not, write to the\r
- Free Software Foundation, Inc., 59 Temple Place - Suite 330,\r
- Boston, MA 02111-1307, USA.\r
-*/\r
-\r
-/**\r
- * @file test_gnunet_vpn.c\r
- * @brief testcase for tunneling HTTP over the GNUnet VPN\r
- * @author Christian Grothoff\r
- */\r
-#include "platform.h"\r
-#include <curl/curl.h>\r
-#include <microhttpd.h>\r
-#include "gnunet_vpn_service.h"\r
-#include "gnunet_testing_lib.h"\r
-\r
-#define PORT 48080\r
-\r
-#define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 300)\r
-\r
-\r
-/**\r
- * Return value for 'main'.\r
- */\r
-static int global_ret;\r
-\r
-static struct GNUNET_VPN_Handle *vpn;\r
-\r
-static struct MHD_Daemon *mhd;\r
-\r
-static GNUNET_SCHEDULER_TaskIdentifier mhd_task_id;\r
-\r
-static GNUNET_SCHEDULER_TaskIdentifier curl_task_id;\r
-\r
-static GNUNET_SCHEDULER_TaskIdentifier ctrl_c_task_id;\r
-\r
-static struct GNUNET_VPN_RedirectionRequest *rr;\r
-\r
-static CURL *curl;\r
-\r
-static CURLM *multi;\r
-\r
-static char *url;\r
-\r
-/**\r
- * IP address of the ultimate destination.\r
- */\r
-static const char *dest_ip;\r
-\r
-/**\r
- * Address family of the dest_ip.\r
- */\r
-static int dest_af;\r
-\r
-/**\r
- * Address family to use by the curl client.\r
- */\r
-static int src_af;\r
-\r
-\r
-struct CBC\r
-{\r
- char buf[1024];\r
- size_t pos;\r
-};\r
-\r
-static struct CBC cbc;\r
-\r
-\r
-static size_t\r
-copy_buffer (void *ptr, size_t size, size_t nmemb, void *ctx)\r
-{\r
- struct CBC *cbc = ctx;\r
-\r
- if (cbc->pos + size * nmemb > sizeof (cbc->buf))\r
- return 0; /* overflow */\r
- memcpy (&cbc->buf[cbc->pos], ptr, size * nmemb);\r
- cbc->pos += size * nmemb;\r
- return size * nmemb;\r
-}\r
-\r
-\r
-static int\r
-mhd_ahc (void *cls, struct MHD_Connection *connection, const char *url,\r
- const char *method, const char *version, const char *upload_data,\r
- size_t * upload_data_size, void **unused)\r
-{\r
- static int ptr;\r
- struct MHD_Response *response;\r
- int ret;\r
-\r
- if (0 != strcmp ("GET", method))\r
- return MHD_NO; /* unexpected method */\r
- if (&ptr != *unused)\r
- {\r
- *unused = &ptr;\r
- return MHD_YES;\r
- }\r
- *unused = NULL;\r
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,\r
- "MHD sends respose for request to URL `%s'\n", url);\r
- response =\r
- MHD_create_response_from_buffer (strlen (url), (void *) url,\r
- MHD_RESPMEM_MUST_COPY);\r
- ret = MHD_queue_response (connection, MHD_HTTP_OK, response);\r
- MHD_destroy_response (response);\r
- if (ret == MHD_NO)\r
- abort ();\r
- return ret;\r
-}\r
-\r
-\r
-static void\r
-do_shutdown ()\r
-{\r
- if (mhd_task_id != GNUNET_SCHEDULER_NO_TASK)\r
- {\r
- GNUNET_SCHEDULER_cancel (mhd_task_id);\r
- mhd_task_id = GNUNET_SCHEDULER_NO_TASK;\r
- }\r
- if (curl_task_id != GNUNET_SCHEDULER_NO_TASK)\r
- {\r
- GNUNET_SCHEDULER_cancel (curl_task_id);\r
- curl_task_id = GNUNET_SCHEDULER_NO_TASK;\r
- }\r
- if (ctrl_c_task_id != GNUNET_SCHEDULER_NO_TASK)\r
- {\r
- GNUNET_SCHEDULER_cancel (ctrl_c_task_id);\r
- ctrl_c_task_id = GNUNET_SCHEDULER_NO_TASK;\r
- }\r
- if (NULL != mhd)\r
- {\r
- MHD_stop_daemon (mhd);\r
- mhd = NULL;\r
- }\r
- if (NULL != rr)\r
- {\r
- GNUNET_VPN_cancel_request (rr);\r
- rr = NULL;\r
- }\r
- if (NULL != vpn)\r
- {\r
- GNUNET_VPN_disconnect (vpn);\r
- vpn = NULL;\r
- }\r
- GNUNET_free_non_null (url);\r
- url = NULL;\r
-}\r
-\r
-\r
-/**\r
- * Function to run the HTTP client.\r
- */\r
-static void\r
-curl_main (void);\r
-\r
-\r
-static void\r
-curl_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)\r
-{\r
- curl_task_id = GNUNET_SCHEDULER_NO_TASK;\r
- curl_main ();\r
-}\r
-\r
-\r
-static void\r
-curl_main ()\r
-{\r
- fd_set rs;\r
- fd_set ws;\r
- fd_set es;\r
- int max;\r
- struct GNUNET_NETWORK_FDSet nrs;\r
- struct GNUNET_NETWORK_FDSet nws;\r
- struct GNUNET_TIME_Relative delay;\r
- long timeout;\r
- int running;\r
- struct CURLMsg *msg;\r
-\r
- max = 0;\r
- FD_ZERO (&rs);\r
- FD_ZERO (&ws);\r
- FD_ZERO (&es);\r
- curl_multi_perform (multi, &running);\r
- if (running == 0)\r
- {\r
- GNUNET_assert (NULL != (msg = curl_multi_info_read (multi, &running)));\r
- if (msg->msg == CURLMSG_DONE)\r
- {\r
- if (msg->data.result != CURLE_OK)\r
- {\r
- fprintf (stderr, "%s failed at %s:%d: `%s'\n", "curl_multi_perform",\r
- __FILE__, __LINE__, curl_easy_strerror (msg->data.result));\r
- global_ret = 1;\r
- }\r
- }\r
- curl_multi_remove_handle (multi, curl);\r
- curl_multi_cleanup (multi);\r
- curl_easy_cleanup (curl);\r
- curl = NULL;\r
- multi = NULL;\r
- if (cbc.pos != strlen ("/hello_world"))\r
- {\r
- GNUNET_break (0);\r
- global_ret = 2;\r
- }\r
- if (0 != strncmp ("/hello_world", cbc.buf, strlen ("/hello_world")))\r
- {\r
- GNUNET_break (0);\r
- GNUNET_log (GNUNET_ERROR_TYPE_WARNING,\r
- "You might want to check if your host-based firewall is blocking the connections.\n");\r
- global_ret = 3;\r
- }\r
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Download complete, shutting down!\n");\r
- do_shutdown ();\r
- return;\r
- }\r
- GNUNET_assert (CURLM_OK == curl_multi_fdset (multi, &rs, &ws, &es, &max));\r
- if ((CURLM_OK != curl_multi_timeout (multi, &timeout)) || (-1 == timeout))\r
- delay = GNUNET_TIME_UNIT_SECONDS;\r
- else\r
- delay =\r
- GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MILLISECONDS,\r
- (unsigned int) timeout);\r
- GNUNET_NETWORK_fdset_copy_native (&nrs, &rs, max + 1);\r
- GNUNET_NETWORK_fdset_copy_native (&nws, &ws, max + 1);\r
- curl_task_id =\r
- GNUNET_SCHEDULER_add_select (GNUNET_SCHEDULER_PRIORITY_DEFAULT, delay,\r
- &nrs, &nws, &curl_task, NULL);\r
-}\r
-\r
-\r
-/**\r
- * Callback invoked from the VPN service once a redirection is\r
- * available. Provides the IP address that can now be used to\r
- * reach the requested destination (in our case, the MHD server)\r
- *\r
- * @param cls closure\r
- * @param af address family, AF_INET or AF_INET6; AF_UNSPEC on error;\r
- * will match 'result_af' from the request\r
- * @param address IP address (struct in_addr or struct in_addr6, depending on 'af')\r
- * that the VPN allocated for the redirection;\r
- * traffic to this IP will now be redirected to the\r
- * specified target peer; NULL on error\r
- */\r
-static void\r
-allocation_cb (void *cls, int af, const void *address)\r
-{\r
- char ips[INET6_ADDRSTRLEN];\r
-\r
- rr = NULL;\r
- if (src_af != af)\r
- {\r
- fprintf (stderr, "VPN failed to allocate appropriate address\n");\r
- GNUNET_SCHEDULER_shutdown ();\r
- return;\r
- }\r
- GNUNET_asprintf (&url, "http://%s:%u/hello_world",\r
- inet_ntop (af, address, ips, sizeof (ips)),\r
- (unsigned int) PORT);\r
- curl = curl_easy_init ();\r
- curl_easy_setopt (curl, CURLOPT_URL, url);\r
- curl_easy_setopt (curl, CURLOPT_WRITEFUNCTION, ©_buffer);\r
- curl_easy_setopt (curl, CURLOPT_WRITEDATA, &cbc);\r
- curl_easy_setopt (curl, CURLOPT_FAILONERROR, 1);\r
- curl_easy_setopt (curl, CURLOPT_TIMEOUT, 150L);\r
- curl_easy_setopt (curl, CURLOPT_CONNECTTIMEOUT, 15L);\r
- curl_easy_setopt (curl, CURLOPT_NOSIGNAL, 1);\r
-\r
- multi = curl_multi_init ();\r
- GNUNET_assert (multi != NULL);\r
- GNUNET_assert (CURLM_OK == curl_multi_add_handle (multi, curl));\r
- GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Beginning HTTP download from `%s'\n",\r
- url);\r
- curl_main ();\r
-}\r
-\r
-\r
-/**\r
- * Function to keep the HTTP server running.\r
- */\r
-static void\r
-mhd_main (void);\r
-\r
-\r
-static void\r
-mhd_task (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)\r
-{\r
- mhd_task_id = GNUNET_SCHEDULER_NO_TASK;\r
- MHD_run (mhd);\r
- mhd_main ();\r
-}\r
-\r
-\r
-static void\r
-ctrl_c_shutdown (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)\r
-{\r
- ctrl_c_task_id = GNUNET_SCHEDULER_NO_TASK;\r
- do_shutdown ();\r
- GNUNET_break (0);\r
- global_ret = 1;\r
-}\r
-\r
-\r
-static void\r
-mhd_main ()\r
-{\r
- struct GNUNET_NETWORK_FDSet nrs;\r
- struct GNUNET_NETWORK_FDSet nws;\r
- fd_set rs;\r
- fd_set ws;\r
- fd_set es;\r
- int max_fd;\r
- unsigned MHD_LONG_LONG timeout;\r
- struct GNUNET_TIME_Relative delay;\r
-\r
- GNUNET_assert (GNUNET_SCHEDULER_NO_TASK == mhd_task_id);\r
- FD_ZERO (&rs);\r
- FD_ZERO (&ws);\r
- FD_ZERO (&es);\r
- max_fd = -1;\r
- GNUNET_assert (MHD_YES == MHD_get_fdset (mhd, &rs, &ws, &es, &max_fd));\r
- if (MHD_YES == MHD_get_timeout (mhd, &timeout))\r
- delay =\r
- GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MILLISECONDS,\r
- (unsigned int) timeout);\r
- else\r
- delay = GNUNET_TIME_UNIT_FOREVER_REL;\r
- GNUNET_NETWORK_fdset_copy_native (&nrs, &rs, max_fd + 1);\r
- GNUNET_NETWORK_fdset_copy_native (&nws, &ws, max_fd + 1);\r
- mhd_task_id =\r
- GNUNET_SCHEDULER_add_select (GNUNET_SCHEDULER_PRIORITY_DEFAULT, delay,\r
- &nrs, &nws, &mhd_task, NULL);\r
-}\r
-\r
-\r
-static void\r
-run (void *cls, const struct GNUNET_CONFIGURATION_Handle *cfg,\r
- struct GNUNET_TESTING_Peer *peer)\r
-{\r
- struct in_addr v4;\r
- struct in6_addr v6;\r
- void *addr;\r
- enum MHD_FLAG flags;\r
- \r
- vpn = GNUNET_VPN_connect (cfg);\r
- GNUNET_assert (NULL != vpn);\r
- flags = MHD_USE_DEBUG;\r
- if (AF_INET6 == dest_af)\r
- flags |= MHD_USE_IPv6;\r
- mhd =\r
- MHD_start_daemon (flags, PORT, NULL, NULL, &mhd_ahc, NULL,\r
- MHD_OPTION_END);\r
- \r
- \r
- GNUNET_assert (NULL != mhd);\r
- mhd_main ();\r
- addr = NULL;\r
- switch (dest_af)\r
- {\r
- case AF_INET:\r
- GNUNET_assert (1 == inet_pton (dest_af, dest_ip, &v4));\r
- addr = &v4;\r
- break;\r
- case AF_INET6:\r
- GNUNET_assert (1 == inet_pton (dest_af, dest_ip, &v6));\r
- addr = &v6;\r
- break;\r
- default:\r
- GNUNET_assert (0);\r
- }\r
- rr = GNUNET_VPN_redirect_to_ip (vpn, src_af, dest_af, addr, GNUNET_YES,\r
- GNUNET_TIME_UNIT_FOREVER_ABS, &allocation_cb,\r
- NULL);\r
- ctrl_c_task_id =\r
- GNUNET_SCHEDULER_add_delayed (TIMEOUT, &ctrl_c_shutdown, NULL);\r
-}\r
-\r
-\r
-int\r
-main (int argc, char *const *argv)\r
-{\r
- const char *type;\r
- const char *bin;\r
- char *vpn_binary;\r
- char *exit_binary;\r
- int ret=0;\r
-\r
-#ifndef MINGW\r
- if (0 != ACCESS ("/dev/net/tun", R_OK))\r
- {\r
- GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR, "access",\r
- "/dev/net/tun");\r
- fprintf (stderr, "WARNING: System unable to run test, skipping.\n");\r
- return 0;\r
- }\r
-#endif\r
- vpn_binary = GNUNET_OS_get_libexec_binary_path ("gnunet-helper-vpn");\r
- exit_binary = GNUNET_OS_get_libexec_binary_path ("gnunet-helper-exit");\r
- fprintf (stderr,"%s\n", vpn_binary);\r
- fprintf (stderr,"%s\n", exit_binary);\r
- if ((GNUNET_YES != (ret = GNUNET_OS_check_helper_binary (vpn_binary, GNUNET_YES, "-d gnunet-vpn - - 169.1.3.3.7 255.255.255.0"))) || //ipv4 only please!\r
- (GNUNET_YES != (ret = GNUNET_OS_check_helper_binary (exit_binary, GNUNET_YES, "-d gnunet-vpn - - - 169.1.3.3.7 255.255.255.0")))) //no nat, ipv4 only\r
- {\r
- GNUNET_free (vpn_binary);\r
- GNUNET_free (exit_binary);\r
- fprintf (stderr,\r
- "WARNING: gnunet-helper-{exit,vpn} binaries are not SUID, refusing to run test (as it would have to fail). %d\n", ret);\r
- return 0;\r
- }\r
-\r
- GNUNET_free (vpn_binary);\r
- GNUNET_free (exit_binary);\r
- GNUNET_CRYPTO_ecc_setup_hostkey ("test_gnunet_vpn.conf");\r
- bin = argv[0];\r
- if (NULL != strstr (bin, "lt-"))\r
- bin = strstr (bin, "lt-") + 4;\r
- type = strstr (bin, "-");\r
- if (NULL == type)\r
- {\r
- fprintf (stderr, "invalid binary name\n");\r
- return 1;\r
- }\r
- type++;\r
- /* on Windows, .exe is suffixed to these binaries, \r
- * thus cease comparison after the 6th char.\r
- */\r
- if (0 == strncmp (type, "4_to_6",6))\r
- {\r
- dest_ip = "FC5A:04E1:C2BA::1";\r
- dest_af = AF_INET6;\r
- src_af = AF_INET;\r
- }\r
- else if (0 == strncmp (type, "6_to_4",6))\r
- {\r
- dest_ip = "169.254.86.1";\r
- dest_af = AF_INET;\r
- src_af = AF_INET6;\r
- }\r
- else if (0 == strncmp (type, "4_over",6))\r
- {\r
- dest_ip = "169.254.86.1";\r
- dest_af = AF_INET;\r
- src_af = AF_INET;\r
- }\r
- else if (0 == strncmp (type, "6_over",6))\r
- {\r
- dest_ip = "FC5A:04E1:C2BA::1";\r
- dest_af = AF_INET6;\r
- src_af = AF_INET6;\r
- }\r
- else\r
- {\r
- fprintf (stderr, "invalid binary suffix `%s'\n", type);\r
- return 1;\r
- }\r
- if ((GNUNET_OK != GNUNET_NETWORK_test_pf (src_af)) || \r
- (GNUNET_OK != GNUNET_NETWORK_test_pf (dest_af)))\r
- {\r
- fprintf (stderr,\r
- "Required address families not supported by this system, skipping test.\n");\r
- return 0;\r
- }\r
- if (0 != curl_global_init (CURL_GLOBAL_WIN32))\r
- {\r
- fprintf (stderr, "failed to initialize curl\n");\r
- return 2;\r
- }\r
- if (0 !=\r
- GNUNET_TESTING_peer_run ("test-gnunet-vpn", "test_gnunet_vpn.conf", &run,\r
- NULL))\r
- return 1; \r
- GNUNET_DISK_directory_remove ("/tmp/gnunet-test-vpn"); \r
- return global_ret;\r
-}\r
-\r
-/* end of test_gnunet_vpn.c */\r
+/*
+ This file is part of GNUnet
+ Copyright (C) 2007, 2009, 2011, 2012 Christian Grothoff
+
+ GNUnet is free software; you can redistribute it and/or modify
+ it under the terms of the GNU General Public License as published
+ by the Free Software Foundation; either version 3, or (at your
+ option) any later version.
+
+ GNUnet is distributed in the hope that it will be useful, but
+ WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ General Public License for more details.
+
+ You should have received a copy of the GNU General Public License
+ along with GNUnet; see the file COPYING. If not, write to the
+ Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+ Boston, MA 02110-1301, USA.
+*/
+
+/**
+ * @file test_gnunet_vpn.c
+ * @brief testcase for tunneling HTTP over the GNUnet VPN
+ * @author Christian Grothoff
+ */
+#include "platform.h"
+#if HAVE_CURL_CURL_H
+#include <curl/curl.h>
+#elif HAVE_GNURL_CURL_H
+#include <gnurl/curl.h>
+#endif
+#include <microhttpd.h>
+#include "gnunet_vpn_service.h"
+#include "gnunet_testing_lib.h"
+
+#define PORT 48080
+
+#define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 300)
+
+
+/**
+ * Return value for 'main'.
+ */
+static int global_ret;
+
+static struct GNUNET_VPN_Handle *vpn;
+
+static struct MHD_Daemon *mhd;
+
+static struct GNUNET_SCHEDULER_Task * mhd_task_id;
+
+static struct GNUNET_SCHEDULER_Task * curl_task_id;
+
+static struct GNUNET_SCHEDULER_Task * ctrl_c_task_id;
+
+static struct GNUNET_VPN_RedirectionRequest *rr;
+
+static CURL *curl;
+
+static CURLM *multi;
+
+static char *url;
+
+/**
+ * IP address of the ultimate destination.
+ */
+static const char *dest_ip;
+
+/**
+ * Address family of the dest_ip.
+ */
+static int dest_af;
+
+/**
+ * Address family to use by the curl client.
+ */
+static int src_af;
+
+
+struct CBC
+{
+ char buf[1024];
+ size_t pos;
+};
+
+static struct CBC cbc;
+
+
+static size_t
+copy_buffer (void *ptr, size_t size, size_t nmemb, void *ctx)
+{
+ struct CBC *cbc = ctx;
+
+ if (cbc->pos + size * nmemb > sizeof (cbc->buf))
+ return 0; /* overflow */
+ memcpy (&cbc->buf[cbc->pos], ptr, size * nmemb);
+ cbc->pos += size * nmemb;
+ return size * nmemb;
+}
+
+
+static int
+mhd_ahc (void *cls, struct MHD_Connection *connection, const char *url,
+ const char *method, const char *version, const char *upload_data,
+ size_t * upload_data_size, void **unused)
+{
+ static int ptr;
+ struct MHD_Response *response;
+ int ret;
+
+ if (0 != strcmp ("GET", method))
+ return MHD_NO; /* unexpected method */
+ if (&ptr != *unused)
+ {
+ *unused = &ptr;
+ return MHD_YES;
+ }
+ *unused = NULL;
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "MHD sends respose for request to URL `%s'\n", url);
+ response =
+ MHD_create_response_from_buffer (strlen (url), (void *) url,
+ MHD_RESPMEM_MUST_COPY);
+ ret = MHD_queue_response (connection, MHD_HTTP_OK, response);
+ MHD_destroy_response (response);
+ if (ret == MHD_NO)
+ abort ();
+ return ret;
+}
+
+
+static void
+do_shutdown ()
+{
+ if (mhd_task_id != NULL)
+ {
+ GNUNET_SCHEDULER_cancel (mhd_task_id);
+ mhd_task_id = NULL;
+ }
+ if (curl_task_id != NULL)
+ {
+ GNUNET_SCHEDULER_cancel (curl_task_id);
+ curl_task_id = NULL;
+ }
+ if (ctrl_c_task_id != NULL)
+ {
+ GNUNET_SCHEDULER_cancel (ctrl_c_task_id);
+ ctrl_c_task_id = NULL;
+ }
+ if (NULL != mhd)
+ {
+ MHD_stop_daemon (mhd);
+ mhd = NULL;
+ }
+ if (NULL != rr)
+ {
+ GNUNET_VPN_cancel_request (rr);
+ rr = NULL;
+ }
+ if (NULL != vpn)
+ {
+ GNUNET_VPN_disconnect (vpn);
+ vpn = NULL;
+ }
+ GNUNET_free_non_null (url);
+ url = NULL;
+}
+
+
+/**
+ * Function to run the HTTP client.
+ */
+static void
+curl_main (void *cls)
+{
+ fd_set rs;
+ fd_set ws;
+ fd_set es;
+ int max;
+ struct GNUNET_NETWORK_FDSet nrs;
+ struct GNUNET_NETWORK_FDSet nws;
+ struct GNUNET_TIME_Relative delay;
+ long timeout;
+ int running;
+ struct CURLMsg *msg;
+
+ curl_task_id = NULL;
+ max = 0;
+ FD_ZERO (&rs);
+ FD_ZERO (&ws);
+ FD_ZERO (&es);
+ curl_multi_perform (multi, &running);
+ if (running == 0)
+ {
+ GNUNET_assert (NULL != (msg = curl_multi_info_read (multi, &running)));
+ if (msg->msg == CURLMSG_DONE)
+ {
+ if (msg->data.result != CURLE_OK)
+ {
+ fprintf (stderr, "%s failed at %s:%d: `%s'\n", "curl_multi_perform",
+ __FILE__, __LINE__, curl_easy_strerror (msg->data.result));
+ global_ret = 1;
+ }
+ }
+ curl_multi_remove_handle (multi, curl);
+ curl_multi_cleanup (multi);
+ curl_easy_cleanup (curl);
+ curl = NULL;
+ multi = NULL;
+ if (cbc.pos != strlen ("/hello_world"))
+ {
+ GNUNET_break (0);
+ global_ret = 2;
+ }
+ if (0 != strncmp ("/hello_world", cbc.buf, strlen ("/hello_world")))
+ {
+ GNUNET_break (0);
+ GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
+ "You might want to check if your host-based firewall is blocking the connections.\n");
+ global_ret = 3;
+ }
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Download complete, shutting down!\n");
+ do_shutdown ();
+ return;
+ }
+ GNUNET_assert (CURLM_OK == curl_multi_fdset (multi, &rs, &ws, &es, &max));
+ if ((CURLM_OK != curl_multi_timeout (multi, &timeout)) || (-1 == timeout))
+ delay = GNUNET_TIME_UNIT_SECONDS;
+ else
+ delay =
+ GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MILLISECONDS,
+ (unsigned int) timeout);
+ GNUNET_NETWORK_fdset_copy_native (&nrs, &rs, max + 1);
+ GNUNET_NETWORK_fdset_copy_native (&nws, &ws, max + 1);
+ curl_task_id =
+ GNUNET_SCHEDULER_add_select (GNUNET_SCHEDULER_PRIORITY_DEFAULT, delay,
+ &nrs, &nws, &curl_main, NULL);
+}
+
+
+/**
+ * Callback invoked from the VPN service once a redirection is
+ * available. Provides the IP address that can now be used to
+ * reach the requested destination (in our case, the MHD server)
+ *
+ * @param cls closure
+ * @param af address family, AF_INET or AF_INET6; AF_UNSPEC on error;
+ * will match 'result_af' from the request
+ * @param address IP address (struct in_addr or struct in_addr6, depending on 'af')
+ * that the VPN allocated for the redirection;
+ * traffic to this IP will now be redirected to the
+ * specified target peer; NULL on error
+ */
+static void
+allocation_cb (void *cls, int af, const void *address)
+{
+ char ips[INET6_ADDRSTRLEN];
+
+ rr = NULL;
+ if (src_af != af)
+ {
+ fprintf (stderr, "VPN failed to allocate appropriate address\n");
+ GNUNET_SCHEDULER_shutdown ();
+ return;
+ }
+ if (AF_INET6 == af)
+ GNUNET_asprintf (&url,
+ "http://[%s]:%u/hello_world",
+ inet_ntop (af, address, ips, sizeof (ips)),
+ (unsigned int) PORT);
+ else
+ GNUNET_asprintf (&url,
+ "http://%s:%u/hello_world",
+ inet_ntop (af, address, ips, sizeof (ips)),
+ (unsigned int) PORT);
+ curl = curl_easy_init ();
+ curl_easy_setopt (curl, CURLOPT_URL, url);
+ curl_easy_setopt (curl, CURLOPT_WRITEFUNCTION, ©_buffer);
+ curl_easy_setopt (curl, CURLOPT_WRITEDATA, &cbc);
+ curl_easy_setopt (curl, CURLOPT_FAILONERROR, 1);
+ curl_easy_setopt (curl, CURLOPT_TIMEOUT, 150L);
+ curl_easy_setopt (curl, CURLOPT_CONNECTTIMEOUT, 15L);
+ curl_easy_setopt (curl, CURLOPT_NOSIGNAL, 1);
+ curl_easy_setopt (curl, CURLOPT_VERBOSE, 0);
+
+ multi = curl_multi_init ();
+ GNUNET_assert (multi != NULL);
+ GNUNET_assert (CURLM_OK == curl_multi_add_handle (multi, curl));
+ GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
+ "Beginning HTTP download from `%s'\n",
+ url);
+ GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS,
+ &curl_main,
+ NULL);
+}
+
+
+/**
+ * Function to keep the HTTP server running.
+ */
+static void
+mhd_main (void);
+
+
+static void
+mhd_task (void *cls)
+{
+ mhd_task_id = NULL;
+ MHD_run (mhd);
+ mhd_main ();
+}
+
+
+static void
+ctrl_c_shutdown (void *cls)
+{
+ ctrl_c_task_id = NULL;
+ do_shutdown ();
+ GNUNET_break (0);
+ global_ret = 1;
+}
+
+
+static void
+mhd_main ()
+{
+ struct GNUNET_NETWORK_FDSet nrs;
+ struct GNUNET_NETWORK_FDSet nws;
+ fd_set rs;
+ fd_set ws;
+ fd_set es;
+ int max_fd;
+ unsigned MHD_LONG_LONG timeout;
+ struct GNUNET_TIME_Relative delay;
+
+ GNUNET_assert (NULL == mhd_task_id);
+ FD_ZERO (&rs);
+ FD_ZERO (&ws);
+ FD_ZERO (&es);
+ max_fd = -1;
+ GNUNET_assert (MHD_YES == MHD_get_fdset (mhd, &rs, &ws, &es, &max_fd));
+ if (MHD_YES == MHD_get_timeout (mhd, &timeout))
+ delay =
+ GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MILLISECONDS,
+ (unsigned int) timeout);
+ else
+ delay = GNUNET_TIME_UNIT_FOREVER_REL;
+ GNUNET_NETWORK_fdset_copy_native (&nrs, &rs, max_fd + 1);
+ GNUNET_NETWORK_fdset_copy_native (&nws, &ws, max_fd + 1);
+ mhd_task_id =
+ GNUNET_SCHEDULER_add_select (GNUNET_SCHEDULER_PRIORITY_DEFAULT, delay,
+ &nrs, &nws, &mhd_task, NULL);
+}
+
+
+static void
+run (void *cls,
+ const struct GNUNET_CONFIGURATION_Handle *cfg,
+ struct GNUNET_TESTING_Peer *peer)
+{
+ struct in_addr v4;
+ struct in6_addr v6;
+ void *addr;
+ enum MHD_FLAG flags;
+
+ vpn = GNUNET_VPN_connect (cfg);
+ GNUNET_assert (NULL != vpn);
+ flags = MHD_USE_DEBUG;
+ if (AF_INET6 == dest_af)
+ flags |= MHD_USE_IPv6;
+ mhd =
+ MHD_start_daemon (flags, PORT, NULL, NULL, &mhd_ahc, NULL,
+ MHD_OPTION_END);
+
+
+ GNUNET_assert (NULL != mhd);
+ mhd_main ();
+ addr = NULL;
+ switch (dest_af)
+ {
+ case AF_INET:
+ GNUNET_assert (1 == inet_pton (dest_af, dest_ip, &v4));
+ addr = &v4;
+ break;
+ case AF_INET6:
+ GNUNET_assert (1 == inet_pton (dest_af, dest_ip, &v6));
+ addr = &v6;
+ break;
+ default:
+ GNUNET_assert (0);
+ }
+ rr = GNUNET_VPN_redirect_to_ip (vpn, src_af, dest_af, addr,
+ GNUNET_TIME_UNIT_FOREVER_ABS, &allocation_cb,
+ NULL);
+ ctrl_c_task_id =
+ GNUNET_SCHEDULER_add_delayed (TIMEOUT, &ctrl_c_shutdown, NULL);
+}
+
+
+int
+main (int argc, char *const *argv)
+{
+ const char *type;
+ const char *bin;
+ char *vpn_binary;
+ char *exit_binary;
+ int ret=0;
+
+#ifndef MINGW
+ if (0 != ACCESS ("/dev/net/tun", R_OK))
+ {
+ GNUNET_log_strerror_file (GNUNET_ERROR_TYPE_ERROR, "access",
+ "/dev/net/tun");
+ fprintf (stderr,
+ "WARNING: System unable to run test, skipping.\n");
+ return 0;
+ }
+#endif
+ vpn_binary = GNUNET_OS_get_libexec_binary_path ("gnunet-helper-vpn");
+ exit_binary = GNUNET_OS_get_libexec_binary_path ("gnunet-helper-exit");
+ if ((GNUNET_YES != (ret = GNUNET_OS_check_helper_binary (vpn_binary, GNUNET_YES, "-d gnunet-vpn - - 169.1.3.3.7 255.255.255.0"))) || //ipv4 only please!
+ (GNUNET_YES != (ret = GNUNET_OS_check_helper_binary (exit_binary, GNUNET_YES, "-d gnunet-vpn - - - 169.1.3.3.7 255.255.255.0")))) //no nat, ipv4 only
+ {
+ GNUNET_free (vpn_binary);
+ GNUNET_free (exit_binary);
+ fprintf (stderr,
+ "WARNING: gnunet-helper-{exit,vpn} binaries are not SUID, refusing to run test (as it would have to fail). %d\n", ret);
+ return 0;
+ }
+
+ GNUNET_free (vpn_binary);
+ GNUNET_free (exit_binary);
+ bin = argv[0];
+ if (NULL != strstr (bin, "lt-"))
+ bin = strstr (bin, "lt-") + 4;
+ type = strstr (bin, "-");
+ if (NULL == type)
+ {
+ fprintf (stderr,
+ "invalid binary name\n");
+ return 1;
+ }
+ type++;
+ /* on Windows, .exe is suffixed to these binaries,
+ * thus cease comparison after the 6th char.
+ */
+ if (0 == strncmp (type, "4_to_6",6))
+ {
+ dest_ip = "FC5A:04E1:C2BA::1";
+ dest_af = AF_INET6;
+ src_af = AF_INET;
+ }
+ else if (0 == strncmp (type, "6_to_4",6))
+ {
+ dest_ip = "169.254.86.1";
+ dest_af = AF_INET;
+ src_af = AF_INET6;
+ }
+ else if (0 == strncmp (type, "4_over",6))
+ {
+ dest_ip = "169.254.86.1";
+ dest_af = AF_INET;
+ src_af = AF_INET;
+ }
+ else if (0 == strncmp (type, "6_over",6))
+ {
+ dest_ip = "FC5A:04E1:C2BA::1";
+ dest_af = AF_INET6;
+ src_af = AF_INET6;
+ }
+ else
+ {
+ fprintf (stderr, "invalid binary suffix `%s'\n", type);
+ return 1;
+ }
+ if ((GNUNET_OK != GNUNET_NETWORK_test_pf (src_af)) ||
+ (GNUNET_OK != GNUNET_NETWORK_test_pf (dest_af)))
+ {
+ fprintf (stderr,
+ "Required address families not supported by this system, skipping test.\n");
+ return 0;
+ }
+ if (0 != curl_global_init (CURL_GLOBAL_WIN32))
+ {
+ fprintf (stderr, "failed to initialize curl\n");
+ return 2;
+ }
+ if (0 !=
+ GNUNET_TESTING_peer_run ("test-gnunet-vpn", "test_gnunet_vpn.conf", &run,
+ NULL))
+ return 1;
+ GNUNET_DISK_directory_remove ("/tmp/gnunet-test-vpn");
+ return global_ret;
+}
+
+/* end of test_gnunet_vpn.c */