2 This file is part of GNUnet.
3 (C) 2009, 2010 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.
21 * @file transport/test_transport_api.c
22 * @brief base test case for transport implementations
24 * This test case serves as a base for tcp, udp, and udp-nat
25 * transport test cases. Based on the executable being run
26 * the correct test case will be performed. Conservation of
30 #include "gnunet_common.h"
31 #include "gnunet_hello_lib.h"
32 #include "gnunet_getopt_lib.h"
33 #include "gnunet_os_lib.h"
34 #include "gnunet_program_lib.h"
35 #include "gnunet_scheduler_lib.h"
36 #include "gnunet_transport_service.h"
37 #include "transport.h"
38 #include "transport-testing.h"
40 #define VERBOSE GNUNET_NO
42 #define VERBOSE_ARM GNUNET_NO
44 #define START_ARM GNUNET_YES
47 * How long until we give up on transmitting the message?
49 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 300)
52 * How long until we give up on transmitting the message?
54 #define TIMEOUT_TRANSMIT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 60)
60 static GNUNET_SCHEDULER_TaskIdentifier die_task;
62 static GNUNET_SCHEDULER_TaskIdentifier send_task;
64 struct PeerContext *p1;
66 struct PeerContext *p2;
68 static GNUNET_TRANSPORT_TESTING_ConnectRequest cc;
70 struct GNUNET_TRANSPORT_TransmitHandle *th;
77 #define OKPP do { ok++; fprintf (stderr, "Now at stage %u at %s:%u\n", ok, __FILE__, __LINE__); } while (0)
79 #define OKPP do { ok++; } while (0)
86 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Stopping peers\n");
88 if (send_task != GNUNET_SCHEDULER_NO_TASK)
89 GNUNET_SCHEDULER_cancel (send_task);
91 if (die_task != GNUNET_SCHEDULER_NO_TASK)
92 GNUNET_SCHEDULER_cancel (die_task);
95 GNUNET_TRANSPORT_notify_transmit_ready_cancel (th);
98 GNUNET_TRANSPORT_TESTING_stop_peer (p1);
99 GNUNET_TRANSPORT_TESTING_stop_peer (p2);
103 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
105 die_task = GNUNET_SCHEDULER_NO_TASK;
107 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Fail! Stopping peers\n");
109 if (send_task != GNUNET_SCHEDULER_NO_TASK)
110 GNUNET_SCHEDULER_cancel (send_task);
113 GNUNET_TRANSPORT_TESTING_connect_peers_cancel (cc);
116 GNUNET_TRANSPORT_notify_transmit_ready_cancel (th);
120 GNUNET_TRANSPORT_TESTING_stop_peer (p1);
122 GNUNET_TRANSPORT_TESTING_stop_peer (p2);
129 notify_receive (void *cls, const struct GNUNET_PeerIdentity *peer,
130 const struct GNUNET_MessageHeader *message,
131 const struct GNUNET_TRANSPORT_ATS_Information *ats,
134 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
135 "Received message of type %d from peer %s!\n",
136 ntohs (message->type), GNUNET_i2s (peer));
138 if ((MTYPE == ntohs (message->type)) &&
139 (sizeof (struct GNUNET_MessageHeader) == ntohs (message->size)))
154 notify_ready (void *cls, size_t size, void *buf)
156 struct PeerContext *p = cls;
157 struct GNUNET_MessageHeader *hdr;
161 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
162 "Transmitting message with %u bytes to peer %s\n",
163 sizeof (struct GNUNET_MessageHeader), GNUNET_i2s (&p->id));
164 GNUNET_assert (size >= 256);
169 hdr->size = htons (sizeof (struct GNUNET_MessageHeader));
170 hdr->type = htons (MTYPE);
172 return sizeof (struct GNUNET_MessageHeader);
177 notify_connect (void *cls, const struct GNUNET_PeerIdentity *peer,
178 const struct GNUNET_TRANSPORT_ATS_Information *ats,
181 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer `%4s' connected to us (%p)!\n",
182 GNUNET_i2s (peer), cls);
187 notify_disconnect (void *cls, const struct GNUNET_PeerIdentity *peer)
189 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peer `%4s' disconnected (%p)!\n",
190 GNUNET_i2s (peer), cls);
194 sendtask (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
196 send_task = GNUNET_SCHEDULER_NO_TASK;
198 if ((tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN) != 0)
201 th = GNUNET_TRANSPORT_notify_transmit_ready (p1->th, &p2->id, 256, 0, TIMEOUT,
206 testing_connect_cb (struct PeerContext *p1, struct PeerContext *p2, void *cls)
209 char *p1_c = strdup (GNUNET_i2s (&p1->id));
211 GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Peers connected: %s <-> %s\n", p1_c,
212 GNUNET_i2s (&p2->id));
215 // FIXME: THIS IS REQUIRED! SEEMS TO BE A BUG!
217 GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_SECONDS, &sendtask, NULL);
221 run (void *cls, char *const *args, const char *cfgfile,
222 const struct GNUNET_CONFIGURATION_Handle *cfg)
224 die_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
226 p1 = GNUNET_TRANSPORT_TESTING_start_peer (cfg_file_p1, ¬ify_receive,
227 ¬ify_connect, ¬ify_disconnect,
229 p2 = GNUNET_TRANSPORT_TESTING_start_peer (cfg_file_p2, ¬ify_receive,
230 ¬ify_connect, ¬ify_disconnect,
232 cc = GNUNET_TRANSPORT_TESTING_connect_peers (p1, p2, &testing_connect_cb,
239 static char *const argv[] = { "test-transport-api",
241 "test_transport_api_data.conf",
247 static struct GNUNET_GETOPT_CommandLineOption options[] = {
248 GNUNET_GETOPT_OPTION_END
252 setTransportOptions ("test_transport_api_data.conf");
254 send_task = GNUNET_SCHEDULER_NO_TASK;
257 GNUNET_PROGRAM_run ((sizeof (argv) / sizeof (char *)) - 1, argv,
258 "test-transport-api", "nohelp", options, &run, &ok);
264 * Return the actual path to a file found in the current
265 * PATH environment variable.
267 * @param binary the name of the file to find
270 get_path_from_PATH (char *binary)
281 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
282 _("PATH environment variable is unset.\n"));
285 path = GNUNET_strdup (p); /* because we write on it */
286 buf = GNUNET_malloc (strlen (path) + 20);
289 while (NULL != (end = strchr (pos, PATH_SEPARATOR)))
292 sprintf (buf, "%s/%s", pos, binary);
293 if (GNUNET_DISK_file_test (buf) == GNUNET_YES)
300 sprintf (buf, "%s/%s", pos, binary);
301 if (GNUNET_DISK_file_test (buf) == GNUNET_YES)
312 * Check whether the suid bit is set on a file.
313 * Attempts to find the file using the current
314 * PATH environment variable as a search path.
316 * @param binary the name of the file to check
318 * @return GNUNET_YES if the binary is found and
319 * can be run properly, GNUNET_NO otherwise
322 check_gnunet_nat_binary (char *binary)
334 GNUNET_asprintf (&binaryexe, "%s.exe", binary);
335 p = get_path_from_PATH (binaryexe);
338 p = get_path_from_PATH (binary);
342 GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
343 _("Could not find binary `%s' in PATH!\n"), binary);
346 if (0 != STAT (p, &statbuf))
348 GNUNET_log (GNUNET_ERROR_TYPE_WARNING, _("stat (%s) failed: %s\n"), p,
351 return GNUNET_SYSERR;
355 if ((0 != (statbuf.st_mode & S_ISUID)) && (statbuf.st_uid == 0))
359 rawsock = socket (AF_INET, SOCK_RAW, IPPROTO_ICMP);
360 if (INVALID_SOCKET == rawsock)
362 DWORD err = GetLastError ();
364 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
365 "socket (AF_INET, SOCK_RAW, IPPROTO_ICMP) have failed! GLE = %d\n",
367 return GNUNET_NO; /* not running as administrator */
369 closesocket (rawsock);
375 main (int argc, char *argv[])
379 GNUNET_log_setup ("test-transport-api",
387 char *pch = strdup (argv[0]);
389 char *filename = NULL;
392 /* get executable filename */
393 pch = strtok (pch, "/");
396 pch = strtok (NULL, "/");
401 filename = strstr (filename, "tes");
402 if (NULL != (dotexe = strstr (filename, ".exe")))
405 /* create cfg filename */
406 GNUNET_asprintf (&cfg_file_p1, "%s_peer1.conf", filename);
407 GNUNET_asprintf (&cfg_file_p2, "%s_peer2.conf", filename);
408 GNUNET_free (backup);
410 if (strstr (argv[0], "tcp_nat") != NULL)
412 if (GNUNET_YES != check_gnunet_nat_binary ("gnunet-nat-server"))
414 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
415 "`%s' not properly installed, cannot run NAT test!\n",
416 "gnunet-nat-server");
420 else if (strstr (argv[0], "udp_nat") != NULL)
422 if (GNUNET_YES != check_gnunet_nat_binary ("gnunet-nat-server"))
424 GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
425 "`%s' not properly installed, cannot run NAT test!\n",
426 "gnunet-nat-server");
433 GNUNET_free (cfg_file_p1);
434 GNUNET_free (cfg_file_p2);
439 /* end of test_transport_api.c */